rtiss_soap4r 2.1.0 → 3.0.0.beta

data/rubyStyle.css

@@ -0,0 +1,104 @@
+body {
+    background: #fff;
+    color: black;
+    margin-left: 2%;
+    margin-right: 2%;
+    font-family: Verdana, Arial, Helvetica, Sans-Serif;
+}
+
+a:link, a:visited {
+    text-decoration: none;
+    font-weight: bold;
+    color: #c00;
+    background: white;
+}
+
+a:link:hover, a:visited:hover {
+    font-weight: bold;
+    color: #fff;
+    background: black;
+}
+
+h1 {
+    color: #666;
+    background: white;
+    text-align: right;
+    margin-top: 1em;
+}
+
+h2 {
+    color: #666;
+    background: #ddd;
+    margin-top: 3ex;
+}
+
+h2 span.content {
+    border-style: solid solid dashed solid;
+    border-width: 0px 0px 1px 20px;
+    border-color: #666;
+    padding-left: 1ex;
+}
+
+h3 {
+    color: #666;
+    background: #ddd;
+    margin-top: 2ex;
+}
+
+h3 span.content {
+    border-style: solid;
+    border-width: 0px 0px 0px 10px;
+    border-color: #999;
+    padding-left: 1ex;
+}
+
+dt {
+    font-weight: bold;
+    margin-top: 2ex;
+    margin-left: 1em;
+}
+
+ul {
+    margin-bottom: 0.5em;
+}
+
+li {
+    margin-bottom: 0.1em;
+}
+
+table {
+    border-collapse: collapse;
+    empty-cells: show;
+    border-style: solid;
+    border-color: black;
+}
+
+table td {
+    border-style: solid;
+}
+
+address {
+    color: gray;
+    background: #fff;
+    text-align: right;
+    font-family: Times, serif;
+    font-style: normal;
+    font-variant: normal;
+    font-weight: normal;
+}
+
+pre {
+    font-size: 90%;
+    border-style: inset;
+    border-width: 1px;
+    border-color: #666;
+    padding-right: 1ex;
+    padding-top: 0.5em;
+    padding-left: 1ex;
+    padding-bottom: 0.5em;
+    margin-left: 1em;
+    margin-right: 2em;
+    white-space: pre;
+    background: #e6e6e6;
+    color: black;
+}

data/sample/attachment/complexmime/EdmService.rb

@@ -0,0 +1,124 @@
+require 'xsd/qname'
+
+# {urn:EDD:Edm}LocationInfo
+class LocationInfo
+  @@schema_type = "LocationInfo"
+  @@schema_ns = "urn:EDD:Edm"
+  @@schema_element = [["bottomLeft", ["Coordinates", XSD::QName.new(nil, "bottomLeft")]], ["topRight", ["Coordinates", XSD::QName.new(nil, "topRight")]], ["startTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "startTime")]], ["endTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "endTime")]]]
+
+  attr_accessor :bottomLeft
+  attr_accessor :topRight
+  attr_accessor :startTime
+  attr_accessor :endTime
+
+  def initialize(bottomLeft = nil, topRight = nil, startTime = nil, endTime = nil)
+    @bottomLeft = bottomLeft
+    @topRight = topRight
+    @startTime = startTime
+    @endTime = endTime
+  end
+end
+
+# {urn:EDD:Edm}MapInfo
+class MapInfo
+  @@schema_type = "MapInfo"
+  @@schema_ns = "urn:EDD:Edm"
+  @@schema_element = [["mapArea", ["MapArea", XSD::QName.new(nil, "mapArea")]], ["mapTime", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "mapTime")]], ["mapOptions", ["MapOptions", XSD::QName.new(nil, "mapOptions")]]]
+
+  attr_accessor :mapArea
+  attr_accessor :mapTime
+  attr_accessor :mapOptions
+
+  def initialize(mapArea = nil, mapTime = nil, mapOptions = nil)
+    @mapArea = mapArea
+    @mapTime = mapTime
+    @mapOptions = mapOptions
+  end
+end
+
+# {urn:EDD}ObjectIdentification
+class ObjectIdentification
+  @@schema_type = "ObjectIdentification"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["mmsiNumber", ["SOAP::SOAPString", XSD::QName.new(nil, "mmsiNumber")]], ["weight", ["SOAP::SOAPLong", XSD::QName.new(nil, "weight")]], ["length", ["SOAP::SOAPLong", XSD::QName.new(nil, "length")]], ["width", ["SOAP::SOAPLong", XSD::QName.new(nil, "width")]], ["draught", ["SOAP::SOAPLong", XSD::QName.new(nil, "draught")]]]
+
+  attr_accessor :mmsiNumber
+  attr_accessor :weight
+  attr_accessor :length
+  attr_accessor :width
+  attr_accessor :draught
+
+  def initialize(mmsiNumber = nil, weight = nil, length = nil, width = nil, draught = nil)
+    @mmsiNumber = mmsiNumber
+    @weight = weight
+    @length = length
+    @width = width
+    @draught = draught
+  end
+end
+
+# {urn:EDD}Coordinates
+class Coordinates
+  @@schema_type = "Coordinates"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["wgs84Latitude", ["SOAP::SOAPDouble", XSD::QName.new(nil, "wgs84Latitude")]], ["wgs84Longitude", ["SOAP::SOAPDouble", XSD::QName.new(nil, "wgs84Longitude")]]]
+
+  attr_accessor :wgs84Latitude
+  attr_accessor :wgs84Longitude
+
+  def initialize(wgs84Latitude = nil, wgs84Longitude = nil)
+    @wgs84Latitude = wgs84Latitude
+    @wgs84Longitude = wgs84Longitude
+  end
+end
+
+# {urn:EDD}LastKnownPosition
+class LastKnownPosition
+  @@schema_type = "LastKnownPosition"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["location", ["Coordinates", XSD::QName.new(nil, "location")]], ["timestamp", ["SOAP::SOAPDateTime", XSD::QName.new(nil, "timestamp")]]]
+
+  attr_accessor :location
+  attr_accessor :timestamp
+
+  def initialize(location = nil, timestamp = nil)
+    @location = location
+    @timestamp = timestamp
+  end
+end
+
+# {urn:EDD}MapArea
+class MapArea
+  @@schema_type = "MapArea"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["bottomLeft", ["Coordinates", XSD::QName.new(nil, "bottomLeft")]], ["topRight", ["Coordinates", XSD::QName.new(nil, "topRight")]], ["width", ["SOAP::SOAPLong", XSD::QName.new(nil, "width")]], ["height", ["SOAP::SOAPLong", XSD::QName.new(nil, "height")]]]
+
+  attr_accessor :bottomLeft
+  attr_accessor :topRight
+  attr_accessor :width
+  attr_accessor :height
+
+  def initialize(bottomLeft = nil, topRight = nil, width = nil, height = nil)
+    @bottomLeft = bottomLeft
+    @topRight = topRight
+    @width = width
+    @height = height
+  end
+end
+
+# {urn:EDD}MapOptions
+class MapOptions
+  @@schema_type = "MapOptions"
+  @@schema_ns = "urn:EDD"
+  @@schema_element = [["showCurrentData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showCurrentData")]], ["showWaveData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showWaveData")]], ["showWindData", ["SOAP::SOAPBoolean", XSD::QName.new(nil, "showWindData")]]]
+
+  attr_accessor :showCurrentData
+  attr_accessor :showWaveData
+  attr_accessor :showWindData
+
+  def initialize(showCurrentData = nil, showWaveData = nil, showWindData = nil)
+    @showCurrentData = showCurrentData
+    @showWaveData = showWaveData
+    @showWindData = showWindData
+  end
+end

data/sample/attachment/complexmime/README.txt

@@ -0,0 +1,3 @@
+This directory includes Complex Type + MIME attachment example
+by Ger Apeldoorn <g.apeldoorn at argoss dot nl>
+Thanks.

data/sample/attachment/complexmime/client.rb

@@ -0,0 +1,57 @@
+require 'soap/rpc/driver'
+require 'soap/attachment'
+require 'EdmService'
+
+# test script for the EDD service in ruby, to see if we can send and
+# receive attachments.
+
+# set up the server parameters
+server = 'http://localhost:7000/'
+driver = SOAP::RPC::Driver.new(server, 'urn:EDD:Edm')
+
+# debugging?
+driver.wiredump_dev = STDERR
+
+# add methods
+driver.add_method('MapInfo', 'mapArea', 'mapTime', 'mapOptions', 'driftPrediction')
+driver.add_method('LocationInfo', 'bottomLeft', 'topRight', 'startTime', 'endTime')
+
+# LocationInfo
+bottomLeft = Coordinates.new
+bottomLeft.wgs84Latitude = 0.12
+bottomLeft.wgs84Longitude = 3.45
+
+topRight = Coordinates.new
+topRight.wgs84Latitude = 1.23
+topRight.wgs84Longitude = 4.56
+
+startTime = '2006-07-13T14:39:25.459Z'
+endTime   = '2006-07-13T14:55:25.459Z'
+
+result = driver.LocationInfo(bottomLeft, topRight, startTime, endTime)
+puts("LocationInfo result: #{result}")
+
+# MapInfo
+mapArea = MapArea.new
+mapArea.bottomLeft = Coordinates.new
+mapArea.topRight = Coordinates.new
+mapArea.bottomLeft.wgs84Latitude = 2.34
+mapArea.bottomLeft.wgs84Longitude = 5.67
+mapArea.topRight.wgs84Latitude = 3.45
+mapArea.topRight.wgs84Longitude = 6.78
+mapArea.width = 4.56
+mapArea.height = 7.89
+
+mapTime = SOAP::SOAPDateTime.new('2006-07-13T14:39:25.459Z')
+
+mapOptions = MapOptions.new
+mapOptions.showCurrentData = true
+mapOptions.showWaveData = false
+mapOptions.showWindData = true
+
+driftPrediction = SOAP::Attachment.new(File.open('drift.cdf'))
+driftPrediction.contenttype = "application/x-netcdf"
+
+result = driver.MapInfo(mapArea, mapTime, mapOptions, driftPrediction)
+puts("MapInfo result: #{result}")
+

data/sample/attachment/complexmime/drift.cdf

@@ -0,0 +1 @@
+file content of drift.cdf

data/sample/attachment/complexmime/plaatje.png

@@ -0,0 +1 @@
+file content of plaatje.png

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