soap4r-ruby1.9 1.0.0

data/sample/basic/exchange/exchange.rb

@@ -0,0 +1,17 @@
+require 'soap/rpc/driver'
+
+ExchangeServiceNamespace = 'http://tempuri.org/exchangeService'
+
+class Exchange
+  ForeignServer = "http://services.xmethods.net/soap"
+  Namespace = "urn:xmethods-CurrencyExchange"
+
+  def initialize
+    @drv = SOAP::RPC::Driver.new(ForeignServer, Namespace)
+    @drv.add_method("getRate", "country1", "country2")
+  end
+
+  def rate(country1, country2)
+    return @drv.getRate(country1, country2)
+  end
+end

data/sample/basic/exchange/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/exchange/samplehttpd.conf

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

data/sample/basic/exchange/server.cgi

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/cgistub'
+require 'exchange'
+
+class ExchangeServer < SOAP::RPC::CGIStub
+  def initialize(*arg)
+    super
+    servant = Exchange.new
+    add_servant(servant)
+  end
+end
+
+status = ExchangeServer.new('SampleStructServer', ExchangeServiceNamespace).start

data/sample/basic/exchange/server.rb

@@ -0,0 +1,20 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/standaloneServer'
+require 'exchange'
+
+class ExchangeServer < SOAP::RPC::StandaloneServer
+  def initialize(*arg)
+    super
+    servant = Exchange.new
+    add_servant(servant)
+  end
+end
+
+if $0 == __FILE__
+  server = ExchangeServer.new('SampleStructServer', ExchangeServiceNamespace, '0.0.0.0', 7000)
+  trap(:INT) do
+    server.shutdown
+  end
+  status = server.start
+end

data/sample/basic/flickr.rb

@@ -0,0 +1,26 @@
+require 'soap/rpc/driver'
+
+api_key = ARGV.shift or raise
+
+flickr = SOAP::RPC::Driver.new('http://www.flickr.com/services/soap/')
+flickr.wiredump_dev = STDOUT if $DEBUG
+
+flickr.add_document_method('request', nil,
+  XSD::QName.new('urn:flickr', 'FlickrRequest'),
+  XSD::QName.new('urn:flickr', 'FlickrResponse'))
+
+soap12namespace = 'http://www.w3.org/2003/05/soap-envelope'
+flickr.options['soap.envelope.requestnamespace'] = soap12namespace
+flickr.options['soap.envelope.responsenamespace'] = soap12namespace
+
+response = flickr.request(
+  :api_key => api_key,
+  :method => 'flickr.test.echo',
+  :name => 'hello world')
+
+responsexml = "<dummy>#{response}</dummy>"
+
+require 'xsd/mapping'
+obj = XSD::Mapping.xml2obj(responsexml)
+p obj.method
+p obj.name

data/sample/basic/helloworld/client.rb

@@ -0,0 +1,6 @@
+require 'soap/rpc/driver'
+
+s = SOAP::RPC::Driver.new('http://localhost:2000/', 'urn:hws')
+s.add_method("hello_world", "from")
+
+p s.hello_world(self.to_s)

data/sample/basic/helloworld/server.rb

@@ -0,0 +1,20 @@
+require 'soap/rpc/standaloneServer'
+
+class HelloWorldServer < SOAP::RPC::StandaloneServer
+  def on_init
+    @log.level = Logger::Severity::DEBUG
+    add_method(self, 'hello_world', 'from')
+  end
+
+  def hello_world(from)
+    "Hello World, from #{ from }"
+  end
+end
+
+if $0 == __FILE__
+  server = HelloWorldServer.new('hws', 'urn:hws', '0.0.0.0', 2000)
+  trap(:INT) do 
+    server.shutdown
+  end
+  server.start
+end

data/sample/basic/sampleStruct/client.rb

@@ -0,0 +1,16 @@
+require 'soap/rpc/driver'
+
+require 'iSampleStruct'
+
+server = ARGV.shift || 'http://localhost:7000/'
+# server = 'http://localhost:8808/server.cgi'
+
+drv = SOAP::RPC::Driver.new(server, SampleStructServiceNamespace)
+drv.wiredump_dev = STDERR
+drv.add_method('hi', 'sampleStruct')
+
+o1 = SampleStruct.new
+puts "Sending struct: #{ o1.inspect }"
+puts
+o2 = drv.hi(o1)
+puts "Received (wrapped): #{ o2.inspect }"

data/sample/basic/sampleStruct/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/sampleStruct/iSampleStruct.rb

@@ -0,0 +1,22 @@
+require 'soap/mapping'
+
+SampleStructServiceNamespace = 'http://tempuri.org/sampleStructService'
+
+class SampleStruct; include SOAP::Marshallable
+  attr_accessor :sampleArray
+  attr_accessor :date
+
+  def initialize
+    @sampleArray = SampleArray[ "cyclic", self ]
+    @date = DateTime.now
+  end
+
+  def wrap( rhs )
+    @sampleArray = SampleArray[ "wrap", rhs.dup ]
+    @date = DateTime.now
+    self
+  end
+end
+
+class SampleArray < Array; include SOAP::Marshallable
+end

data/sample/basic/sampleStruct/sampleStruct.rb

@@ -0,0 +1,13 @@
+require 'iSampleStruct'
+
+class SampleStructService
+  def hi(struct)
+    ack = SampleStruct.new
+    ack.wrap(struct)
+    ack
+  end
+end
+
+if __FILE__ == $0
+  p SampleStructService.new.hi(SampleStruct.new)
+end

data/sample/basic/sampleStruct/samplehttpd.conf

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

data/sample/basic/sampleStruct/server.cgi

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/cgistub'
+require 'sampleStruct'
+
+class SampleStructServer < SOAP::RPC::CGIStub
+  def initialize(*arg)
+    super
+    servant = SampleStructService.new
+    add_servant(servant)
+  end
+end
+
+status = SampleStructServer.new('SampleStructServer', SampleStructServiceNamespace).start

data/sample/basic/sampleStruct/server.rb

@@ -0,0 +1,20 @@
+#!/usr/bin/env ruby
+
+require 'soap/rpc/standaloneServer'
+require 'sampleStruct'
+
+class SampleStructServer < SOAP::RPC::StandaloneServer
+  def initialize(*arg)
+    super
+    servant = SampleStructService.new
+    add_servant(servant)
+  end
+end
+
+if $0 == __FILE__
+  server = SampleStructServer.new('SampleStructServer', SampleStructServiceNamespace, '0.0.0.0', 7000)
+  trap(:INT) do
+    server.shutdown
+  end
+  server.start
+end

data/sample/basic/whois.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+key = ARGV.shift
+
+require 'soap/rpc/driver'
+
+server = 'http://www.SoapClient.com/xml/SQLDataSoap.WSDL'
+interface = 'http://www.SoapClient.com/xml/SQLDataSoap.xsd'
+
+whois = SOAP::RPC::Driver.new(server, interface)
+whois.wiredump_dev = STDERR
+whois.add_method('ProcessSRL', 'SRLFile', 'RequestName', 'key')
+
+p whois.ProcessSRL('WHOIS.SRI', 'whois', key)

data/sample/basic/wsdl_helloworld/README

@@ -0,0 +1,15 @@
+The files:
+hwsClient.rb
+default.rb
+defaultDriver.rb
+
+were generated by applying wsdl2ruby.rb to hws.wsdl
+
+The hws.wsdl file was written to describe the server
+hw_s.rb in the /helloworld/server directory. 
+Please note that the namespace declaration in hw_s.rb is
+the same as the name space delaration in hws.wsdl.  You
+cannot make the client will generate an error if the namespace
+used in the client differs from the namespace in the server.
+
+

data/sample/basic/wsdl_helloworld/client/default.rb

@@ -0,0 +1 @@
+require 'xsd/qname'

data/sample/basic/wsdl_helloworld/client/defaultDriver.rb

@@ -0,0 +1,47 @@
+require 'default.rb'
+
+require 'soap/rpc/driver'
+
+class HwsPort < ::SOAP::RPC::Driver
+  DefaultEndpointUrl = "http://localhost:2000/"
+  MappingRegistry = ::SOAP::Mapping::Registry.new
+
+  Methods = [
+    ["hello_world", "hello_world",
+      [
+        [:in, "from", [::SOAP::SOAPString]],
+        [:retval, "from", [::SOAP::SOAPString]]
+      ],
+      "http://localhost:2000/wsdl/hws.wsdl#hello_world", "http://localhost:2000/wsdl/hws.wsdl", :rpc
+    ]
+  ]
+
+  def initialize(endpoint_url = nil)
+    endpoint_url ||= DefaultEndpointUrl
+    super(endpoint_url, nil)
+    self.mapping_registry = MappingRegistry
+    init_methods
+  end
+
+private
+
+  def init_methods
+    Methods.each do |name_as, name, params, soapaction, namespace, style|
+      qname = XSD::QName.new(namespace, name_as)
+      if style == :document
+        @proxy.add_document_method(soapaction, name, params)
+        add_document_method_interface(name, params)
+      else
+        @proxy.add_rpc_method(qname, soapaction, name, params)
+        add_rpc_method_interface(name, params)
+      end
+      if name_as != name and name_as.capitalize == name.capitalize
+        sclass = class << self; self; end
+        sclass.__send__(:define_method, name_as, proc { |*arg|
+          __send__(name, *arg)
+        })
+      end
+    end
+  end
+end
+

data/sample/basic/wsdl_helloworld/client/hws.wsdl

@@ -0,0 +1,46 @@
+<?xml version="1.0"?>
+<definitions xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" 
+xmlns:tns="http://localhost:2000/wsdl/hws.wsdl"
+xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
+xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" 
+xmlns:si="http://soapinterop.org/xsd" 
+xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" 
+xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" 
+xmlns="http://schemas.xmlsoap.org/wsdl/" 
+targetNamespace="http://localhost:2000/wsdl/hws.wsdl">
+<message name="getTermRequest">
+   <part name="from" type="xsd:string"/>
+</message>
+
+<message name="hello_worldResponse">
+   <part name="from" type="xsd:string"/>
+</message>
+
+<portType name="hwsPort">
+  <operation name="hello_world">
+      <input message="getTermRequest"/>
+      <output message="hello_worldResponse"/>
+  </operation>
+</portType>
+<binding name="hwsBinding" type="tns:hwsPort">
+   <soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http"/>
+   <operation name="hello_world">
+       <soap:operation soapAction="http://localhost:2000/wsdl/hws.wsdl#hello_world" style="rpc"/>
+      <input>
+         <soap:body use="encoded" namespace="http://localhost:2000/wsdl/hws.wsdl" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/>
+      </input>
+      <output>
+         <soap:body use="encoded" namespace="http://localhost:2000/wsdl/hws.wsdl" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/>
+      </output>
+   </operation>
+ </binding>
+ <service name="hws">
+    <documentation>The service simply says hello world from something supplied</documentation>
+ 
+    <port name="hwsPort" binding="tns:hwsBinding">
+       <soap:address location="http://localhost:2000/"/>
+    </port>
+</service>
+
+</definitions>

data/sample/basic/wsdl_helloworld/client/hwsClient.rb

@@ -0,0 +1,22 @@
+#!/usr/bin/env ruby
+require 'defaultDriver.rb'
+
+endpoint_url = ARGV.shift
+obj = HwsPort.new(endpoint_url)
+
+# Uncomment the below line to see SOAP wiredumps.
+# obj.wiredump_dev = STDERR
+
+# SYNOPSIS
+#   hello_world(from)
+#
+# ARGS
+#   from            String - {http://www.w3.org/2001/XMLSchema}string
+#
+# RETURNS
+#   from            String - {http://www.w3.org/2001/XMLSchema}string
+#
+from = "hwsClient" 
+puts obj.hello_world(from)
+
+

data/sample/basic/wsdl_helloworld/server/hw_s.rb

@@ -0,0 +1,25 @@
+require 'soap/rpc/httpserver'
+class QueryServer < SOAP::RPC::HTTPServer
+  def on_init
+    #@log.level = Logger::Severity::DEBUG
+    add_method(self, 'hello_world', 'from')
+  end
+
+  def hello_world(from)
+    sOut="Hellow world from #{from}"
+    sOut
+  end
+end
+
+if $0 == __FILE__
+  server = QueryServer.new(
+    :BindAddress => '0.0.0.0',
+    :Port => 2000,
+    :SOAPDefaultNamespace => 'http://localhost:2000/wsdl/hws.wsdl',
+    :WSDLDocumentDirectory => '.'
+  )
+  trap(:INT) do 
+    server.shutdown
+  end
+  server.start
+end