soap4r-ruby1.9 1.0.0

data/sample/attachment/complexmime/server.rb

@@ -0,0 +1,68 @@
+require 'soap/rpc/standaloneServer'
+require 'soap/attachment'
+
+# Ruby test class for the EDD project to see if we can receive and
+# send attachments on the server side.
+
+class SwAService
+
+    def initialize
+        puts("EDD SOAP service (ruby) initialized.")
+    end
+    
+    def LocationInfo(bottomLeft, topRight, startTime, endTime)
+		puts("bottomLeft->wgs84Latitude : '#{bottomLeft.wgs84Latitude}'")
+		puts("bottomLeft->wgs84Longitude: '#{bottomLeft.wgs84Longitude}'")
+		puts("topRight->wgs84Latitude   : '#{topRight.wgs84Latitude}'")
+		puts("topRight->wgs84Longitude  : '#{topRight.wgs84Longitude}'")
+		puts("startTime  : '#{startTime}'")
+		puts("endTime    : '#{endTime}'")
+		
+		# COMPUTE NETCDF HERE!
+		cdffilename = 'drift.cdf'
+		
+		file = SOAP::Attachment.new(File.open(cdffilename))
+		file.contenttype = "application/x-netcdf"
+        return file
+    end
+	
+	def MapInfo(mapArea, mapTime, mapOptions, driftPrediction)
+		
+        puts("mapArea.topRight.wgs84Longitude : #{mapArea.topRight.wgs84Longitude}")
+        puts("mapArea.topRight.wgs84Latitude  : #{mapArea.topRight.wgs84Latitude}")
+        puts("mapArea.bottomLeft.wgs84Longitude  : #{mapArea.bottomLeft.wgs84Longitude}")
+        puts("mapArea.bottomLeft.wgs84Latitude : #{mapArea.bottomLeft.wgs84Latitude}")
+        puts("mapArea.width : #{mapArea.width}")
+        puts("mapArea.height : #{mapArea.height}")
+        puts("mapTime  : #{mapTime}")
+        puts("mapOptions.showCurrentData : #{mapOptions.showCurrentData}")
+        puts("mapOptions.showWaveData : #{mapOptions.showWaveData}")
+        puts("mapOptions.showWindData : #{mapOptions.showWindData}")
+		puts("Received file:")
+		puts(driftPrediction.to_s)
+
+		# COMPUTE PNG IMAGE HERE!
+		imagefilename = 'plaatje.png'
+
+		file = SOAP::Attachment.new(File.open(imagefilename))
+		file.contenttype = "image/png"
+		file.contentid = "out"
+		file
+	end
+end
+
+# setup server object
+server = SOAP::RPC::StandaloneServer.new('SwAServer',
+                                         'urn:EDD:Edm',
+                                         '0.0.0.0', 7000)
+
+# add attachment functionality
+server.add_servant(SwAService.new)
+
+# run until interrupted
+trap(:INT) do
+    server.shutdown
+end
+
+# go
+server.start

data/sample/attachment/swa/client.rb

@@ -0,0 +1,13 @@
+require 'soap/rpc/driver'
+require 'soap/attachment'
+
+server = 'http://localhost:7000/'
+driver = SOAP::RPC::Driver.new(server, 'http://www.acmetron.com/soap')
+driver.wiredump_dev = STDERR
+driver.add_method('get_file')
+driver.add_method('put_file', 'name', 'file')
+
+p driver.get_file
+file = File.open($0)
+attach = SOAP::Attachment.new(file)
+p driver.put_file($0, attach)

data/sample/attachment/swa/server.rb

@@ -0,0 +1,23 @@
+require 'soap/rpc/standaloneServer'
+require 'soap/attachment'
+
+class SwAService
+  def get_file
+    return {
+      'name' => $0,
+      'file' => SOAP::Attachment.new(File.open($0))
+    }
+  end
+
+  def put_file(name, file)
+    "File '#{name}' was received ok."
+  end
+end
+
+server = SOAP::RPC::StandaloneServer.new('SwAServer',
+  'http://www.acmetron.com/soap', '0.0.0.0', 7000)
+server.add_servant(SwAService.new)
+trap(:INT) do
+  server.shutdown
+end
+server.start

data/sample/basic/apacheClient.rb

@@ -0,0 +1,92 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/driver'
+require 'soap/XMLSchemaDatatypes1999'
+
+
+class SampleClient < Application
+
+  private
+
+  AppName = 'SampleClient'
+
+  NS1 = 'urn:i3solutions-delayed-quotes'
+  NS2 = 'urn:AddressFetcher'
+
+  def initialize(server, proxy)
+    super(AppName)
+    @server = server
+    @proxy = proxy
+    @drv1 = nil
+    @drv2 = nil
+  end
+
+  def run
+    # Driver initialize and method definition
+
+    @drv1 = SOAP::RPC::Driver.new(@server, NS1)
+    @drv1.addMethod('getQuote', 'symbol')
+
+    @drv2 = SOAP::RPC::Driver.new(@server, NS2)
+    @drv2.addMethod('getAddressFromName', 'nameToLookup')
+    @drv2.addMethod('addEntry', 'nameToRegister', 'address')
+
+    # Method invocation
+
+    puts @drv1.getQuote("IBM")
+
+    address = @drv2.getAddressFromName("John B. Good")
+    dumpAddress(address)
+
+    phoneNumber = PhoneNumber.new(987, '654', '3210')
+    address = Address.new(123, 'STREET', 'CITY', 'NY', 99999, phoneNumber)
+    result = @drv2.addEntry('NaHi', address)
+    puts 'NaHi has been added.'
+
+    address = @drv2.getAddressFromName("NaHi")
+    dumpAddress(address)
+
+    return 0
+  end
+
+  def dumpAddress(addr)
+    phone = addr.phoneNumber
+    puts <<EOS
+#{ addr.streetNum } #{ addr.streetName }
+#{ addr.city }, #{ addr.state } #{ addr.zip }
+(#{ phone.areaCode }) #{ phone.exchange }-#{ phone.number }
+EOS
+  end
+end
+
+
+class Address
+  @@typeName = 'address'
+  @@typeNamespace = 'urn:ibm-soap-address-demo'
+
+  attr_accessor :streetNum, :streetName, :city, :state, :zip, :phoneNumber
+  def initialize(streetNum = nil, streetName = nil, city = nil, state = nil, zip = nil, phoneNumber = nil)
+    @streetNum = streetNum
+    @streetName = streetName
+    @city = city
+    @state = state
+    @zip = zip
+    @phoneNumber = phoneNumber
+  end
+end
+
+class PhoneNumber
+  @@typeName = 'phone'
+  @@typeNamespace = 'urn:ibm-soap-address-demo'
+
+  attr_accessor :areaCode, :exchange, :number
+  def initialize(areaCode = nil, exchange = nil, number = nil)
+    @exchange = exchange
+    @areaCode = areaCode
+    @number = number
+  end
+end
+
+server = ARGV.shift or raise ArgumentError.new('Target URL was not given.')
+proxy = ARGV.shift || nil
+app = SampleClient.new(server, proxy).start

data/sample/basic/babelfish.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+
+text = ARGV.shift || 'Hello world.'
+lang = ARGV.shift || 'en_fr'
+
+require 'soap/rpc/driver'
+
+server = 'http://services.xmethods.net/perl/soaplite.cgi'
+InterfaceNS = 'urn:xmethodsBabelFish'
+wireDumpDev = nil	# STDERR
+
+drv = SOAP::RPC::Driver.new(server, InterfaceNS)
+drv.wiredump_dev = wireDumpDev
+drv.add_method_with_soapaction('BabelFish', InterfaceNS + "#BabelFish", 'translationmode', 'sourcedata')
+
+p drv.BabelFish(lang, text)

data/sample/basic/calc/calc.rb

@@ -0,0 +1,17 @@
+module CalcService
+  def self.add(lhs, rhs)
+    lhs + rhs
+  end
+
+  def self.sub(lhs, rhs)
+    lhs - rhs
+  end
+
+  def self.multi(lhs, rhs)
+    lhs * rhs
+  end
+
+  def self.div(lhs, rhs)
+    lhs / rhs
+  end
+end

data/sample/basic/calc/calc2.rb

@@ -0,0 +1,29 @@
+class CalcService2
+  def initialize(value = 0)
+    @value = value
+  end
+
+  def set(value)
+    @value = value
+  end
+
+  def get
+    @value
+  end
+
+  def +(rhs)
+    @value + rhs
+  end
+
+  def -(rhs)
+    @value - rhs
+  end
+
+  def *(rhs)
+    @value * rhs
+  end
+
+  def /(rhs)
+    @value / rhs
+  end
+end

data/sample/basic/calc/client.rb

@@ -0,0 +1,26 @@
+require 'soap/rpc/driver'
+
+server = ARGV.shift || 'http://localhost:7000/'
+# server = 'http://localhost:8808/server.cgi'
+
+calc = SOAP::RPC::Driver.new(server, 'http://tempuri.org/calcService')
+calc.wiredump_dev = STDERR if $DEBUG
+calc.add_method('add', 'lhs', 'rhs')
+calc.add_method('sub', 'lhs', 'rhs')
+calc.add_method('multi', 'lhs', 'rhs')
+calc.add_method('div', 'lhs', 'rhs')
+
+puts 'add: 1 + 2	# => 3'
+puts calc.add(1, 2)
+puts 'sub: 1.1 - 2.2	# => -1.1'
+puts calc.sub(1.1, 2.2)
+puts 'multi: 1.1 * 2.2	# => 2.42'
+puts calc.multi(1.1, 2.2)
+puts 'div: 5 / 2	# => 2'
+puts calc.div(5, 2)
+puts 'div: 5.0 / 2	# => 2.5'
+puts calc.div(5.0, 2)
+puts 'div: 1.1 / 0	# => Infinity'
+puts calc.div(1.1, 0)
+puts 'div: 1 / 0	# => ZeroDivisionError'
+puts calc.div(1, 0)

data/sample/basic/calc/client2.rb

@@ -0,0 +1,29 @@
+require 'soap/rpc/driver'
+
+server = ARGV.shift || 'http://localhost:7000/'
+# server = 'http://localhost:8808/server2.cgi'
+
+var = SOAP::RPC::Driver.new( server, 'http://tempuri.org/calcService' )
+var.add_method( 'set', 'newValue' )
+var.add_method( 'get' )
+var.add_method_as( '+', 'add', 'rhs' )
+var.add_method_as( '-', 'sub', 'rhs' )
+var.add_method_as( '*', 'multi', 'rhs' )
+var.add_method_as( '/', 'div', 'rhs' )
+
+puts 'var.set( 1 )'
+puts '# Bare in mind that another client set another value to this service.'
+puts '# This is only a sample for proof of concept.'
+var.set( 1 )
+puts 'var + 2	# => 1 + 2 = 3'
+puts var + 2
+puts 'var - 2.2	# => 1 - 2.2 = -1.2'
+puts var - 2.2
+puts 'var * 2.2	# => 1 * 2.2 = 2.2'
+puts var * 2.2
+puts 'var / 2	# => 1 / 2 = 0'
+puts var / 2
+puts 'var / 2.0	# => 1 / 2.0 = 0.5'
+puts var / 2.0
+puts 'var / 0	# => 1 / 0 => ZeroDivisionError'
+puts var / 0

data/sample/basic/calc/httpd.rb

@@ -0,0 +1,20 @@
+#!/usr/bin/env ruby
+
+require 'webrick'
+require 'soap/property'
+
+docroot = "."
+port = 8808
+if opt = SOAP::Property.loadproperty("samplehttpd.conf")
+  docroot = opt["docroot"]
+  port = Integer(opt["port"])
+end
+
+s = WEBrick::HTTPServer.new(
+  :BindAddress => "0.0.0.0",
+  :Port => port,
+  :DocumentRoot => docroot,
+  :CGIPathEnv => ENV['PATH']
+)
+trap(:INT){ s.shutdown }
+s.start

data/sample/basic/calc/samplehttpd.conf

@@ -0,0 +1,2 @@
+docroot = .
+port = 8808

data/sample/basic/calc/server.cgi

@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/cgistub'
+
+class CalcServer < SOAP::RPC::CGIStub
+  def initialize(*arg)
+    super
+
+    require 'calc'
+    servant = CalcService
+    add_servant(servant, 'http://tempuri.org/calcService')
+  end
+end
+
+status = CalcServer.new('CalcServer', nil).start

data/sample/basic/calc/server.fcgi

@@ -0,0 +1,22 @@
+#!/usr/bin/env ruby
+
+require 'fcgi'
+
+require 'soap/rpc/cgistub'
+
+class CalcServer < SOAP::RPC::CGIStub
+  def initialize(*arg)
+    super
+
+    require 'calc'
+    servant = CalcService
+    add_servant(servant, 'http://tempuri.org/calcService')
+  end
+end
+
+app = CalcServer.new('CalcServer', nil)
+
+FCGI.each do |request|
+  app.set_fcgi_request(request)
+  app.start
+end

data/sample/basic/calc/server.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/standaloneServer'
+require 'calc'
+
+class CalcServer < SOAP::RPC::StandaloneServer
+  def initialize(*arg)
+    super
+
+    servant = CalcService
+    add_servant(servant, 'http://tempuri.org/calcService')
+  end
+end
+
+if $0 == __FILE__
+  server = CalcServer.new('CalcServer', nil, '0.0.0.0', 7000)
+  trap(:INT) do
+    server.shutdown
+  end
+  server.start
+end

data/sample/basic/calc/server2.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/standaloneServer'
+require 'calc2'
+
+class CalcServer2 < SOAP::RPC::StandaloneServer
+  def on_init
+    servant = CalcService2.new
+    add_method(servant, 'set', 'newValue')
+    add_method(servant, 'get')
+    add_method_as(servant, '+', 'add', 'lhs')
+    add_method_as(servant, '-', 'sub', 'lhs')
+    add_method_as(servant, '*', 'multi', 'lhs')
+    add_method_as(servant, '/', 'div', 'lhs')
+  end
+end
+
+if $0 == __FILE__
+  server = CalcServer2.new('CalcServer', 'http://tempuri.org/calcService', '0.0.0.0', 7000)
+  trap(:INT) do
+    server.shutdown
+  end
+  status = server.start
+end

data/sample/basic/exchange/client.rb

@@ -0,0 +1,19 @@
+#!/usr/bin/env ruby
+
+require "soap/rpc/driver"
+
+ExchangeServiceNamespace = 'http://tempuri.org/exchangeService'
+
+server = ARGV.shift || "http://localhost:7000/"
+# server = "http://localhost:8808/server.cgi"
+
+logger = nil
+wiredump_dev = nil
+# logger = Logger.new(STDERR)
+# wiredump_dev = STDERR
+
+drv = SOAP::RPC::Driver.new(server, ExchangeServiceNamespace)
+drv.wiredump_dev = wiredump_dev
+drv.add_method("rate", "country1", "country2")
+
+p drv.rate("USA", "Japan")