mumboe-soap4r 1.5.8.2

data/test/interopR2/clientVWOpentalkSoap.rb

@@ -0,0 +1,19 @@
+#!/usr/bin/env ruby
+
+$serverName = 'VWOpentalkSoap'
+
+$server = 'http://www.cincomsmalltalk.com/soap/interop'
+$serverGroupB = 'http://www.cincomsmalltalk.com/r2groupb/interop'
+$noEchoMap = true
+
+require 'clientBase'
+
+drv = SOAP::RPC::Driver.new($server, InterfaceNS)
+methodDefBase(drv)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+
+doTestBase(drv)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientWASP.rb

@@ -0,0 +1,19 @@
+#!/usr/bin/env ruby
+
+$serverName = 'WASPforJava'
+
+$serverBase = 'http://soap.systinet.net:6060/InteropService/'
+$serverGroupB = 'http://soap.systinet.net:6060/InteropBService/'
+$noEchoMap = true
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDefBase(drvBase)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientWASPC.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+
+$serverName = 'WASPforC++'
+
+$serverBase = 'http://soap.systinet.net:6070/InteropService/'
+$serverGroupB = 'http://soap.systinet.net:6070/InteropBService/'
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDefBase(drvBase)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientWebMethods.rb

@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+
+$serverName = 'webMethods'
+
+$server = 'http://ewsdemo.webMethods.com:80/soap/rpc'
+$noEchoMap = true
+
+require 'clientBase'
+
+drv = SOAP::RPC::Driver.new($server, InterfaceNS)
+methodDef(drv)
+
+doTestBase(drv)
+doTestGroupB(drv)
+submitTestResult

data/test/interopR2/clientWhiteMesa.rb

@@ -0,0 +1,28 @@
+#!/usr/bin/env ruby
+
+$serverName = 'WhiteMesaSOAPServer'
+$serverBase = 'http://www.whitemesa.net/interop/std'
+$serverGroupB = 'http://www.whitemesa.net/interop/std/groupB'
+
+$wsdlBase = 'http://www.whitemesa.net/wsdl/std/interop.wsdl'
+$wsdlGroupB = 'http://www.whitemesa.net/wsdl/std/interopB.wsdl'
+
+require 'clientBase'
+
+=begin
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDefBase(drvBase)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+=end
+
+require 'soap/wsdlDriver'
+drvBase = SOAP::WSDLDriverFactory.new($wsdlBase).create_rpc_driver
+drvBase.endpoint_url = $serverBase
+drvGroupB = SOAP::WSDLDriverFactory.new($wsdlGroupB).create_rpc_driver
+drvGroupB.endpoint_url = $serverGroupB
+
+doTestBase(drvBase)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientWingfoot.rb

@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+
+$serverName = 'WingfootSOAPServer'
+
+$server = 'http://www.wingfoot.com/servlet/wserver'
+$noEchoMap = true
+
+require 'clientBase'
+
+drv = SOAP::RPC::Driver.new($server, InterfaceNS)
+methodDef(drv)
+
+doTestBase(drv)
+doTestGroupB(drv)
+submitTestResult

data/test/interopR2/clientXMLBus.rb

@@ -0,0 +1,19 @@
+#!/usr/bin/env ruby
+
+$serverName = 'IONAXMLBus'
+
+$serverBase = 'http://interop.xmlbus.com:7002/xmlbus/container/InteropTest/BaseService/BasePort'
+$serverGroupB = 'http://interop.xmlbus.com:7002/xmlbus/container/InteropTest/GroupBService/GroupBPort'
+$noEchoMap = true
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDef(drvBase)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientXMLRPC-EPI.rb

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+
+$serverName = 'XMLRPC-EPI'
+$serverBase = 'http://xmlrpc-epi.sourceforge.net/xmlrpc_php/interop-server.php'
+#$serverGroupB = 'http://soapinterop.simdb.com/round2B'
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDefBase( drvBase )
+
+#drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+#methodDefGroupB( drvGroupB )
+
+doTestBase( drvBase )
+#doTestGroupB( drvGroupB )
+submitTestResult

data/test/interopR2/clientXSOAP.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+$serverName = 'XSOAP1.2'
+
+$server = 'http://www.wingfoot.com/servlet/wserver'
+
+require 'clientBase'
+
+drv = SOAP::RPC::Driver.new($server, InterfaceNS)
+methodDefBase(drv)
+
+doTestBase(drv)
+#doTestGroupB(drv)
+submitTestResult

data/test/interopR2/clientZSI.rb

@@ -0,0 +1,19 @@
+#!/usr/bin/env ruby
+
+$serverName = 'ZSI'
+
+$serverBase = 'http://63.142.188.184:1122/'
+$serverGroupB = 'http://63.142.188.184:1122/'
+
+require 'clientBase'
+#$soapAction = 'urn:soapinterop'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDef( drvBase )
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB( drvGroupB )
+
+doTestBase( drvBase )
+doTestGroupB( drvGroupB )
+submitTestResult

data/test/interopR2/clienteSOAP.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+
+$serverName = 'eSoap'
+
+$serverBase = 'http://www.quakersoft.net/cgi-bin/interop2_server.cgi'
+$noEchoMap = true
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDefBase(drvBase)
+
+#drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+#methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+#doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientgSOAP.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+
+$serverName = 'gSOAP'
+
+$serverBase = 'http://websrv.cs.fsu.edu/~engelen/interop2.cgi'
+$serverGroupB = 'http://websrv.cs.fsu.edu/~engelen/interop2B.cgi'
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDef(drvBase)
+
+drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/clientkSOAP.rb

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+
+$serverName = 'kSOAP'
+
+$serverBase = 'http://kissen.cs.uni-dortmund.de:8080/ksoapinterop'
+
+require 'clientBase'
+
+drvBase = SOAP::RPC::Driver.new($serverBase, InterfaceNS)
+methodDef(drvBase)
+
+#drvGroupB = SOAP::RPC::Driver.new($serverGroupB, InterfaceNS)
+#methodDefGroupB(drvGroupB)
+
+doTestBase(drvBase)
+#doTestGroupB(drvGroupB)
+submitTestResult

data/test/interopR2/iSimonReg.rb

@@ -0,0 +1,112 @@
+require 'soap/soap'
+require 'soap/rpcUtils'
+
+module SimonReg
+  TypeNS = 'http://soap.pocketsoap.com/registration/types'
+
+  module Services
+
+    InterfaceNS = 'http://soap.pocketsoap.com/registration/services'
+
+    class Service
+      include SOAP::Marshallable
+      @typeName = 'Service'
+      @typeNamespace = SimonReg::TypeNS
+
+      attr_accessor :id, :name, :description, :wsdlURL, :websiteURL
+
+      def initialize( id = nil, name = nil, description = nil, wsdlURL = nil, websiteURL = nil )
+
+	@id = id
+	@name = name
+	@description = description
+	@wsdlURL = wsdlURL
+	@websiteURL = websiteURL
+      end
+    end
+
+    Methods = {
+      'ServiceList' => [ 'services' ],
+      'Servers' => [ 'Servers', 'serviceID' ],
+      'Clients' => [ 'Clients', 'serviceID' ],
+    }
+  end
+
+  module Clients
+
+    InterfaceNS = 'http://soap.pocketsoap.com/registration/clients'
+
+    class ClientInfo
+      include SOAP::Marshallable
+      @typeName = 'clientInfo'
+      @typeNamespace = SimonReg::TypeNS
+
+      attr_accessor :name, :version, :resultsURL
+
+      def initialize( name = nil, version = nil, resultsURL = nil )
+
+	@name = name
+	@version = version
+	@resultsURL = resultsURL
+      end
+    end
+
+    Methods = {
+      'RegisterClient' => [ 'clientID', 'serviceID', 'clientInfo' ],
+      'UpdateClient' => [ 'void', 'clientID', 'clientInfo' ],
+      'RemoveClient' => [ 'void', 'clientID' ],
+    }
+  end
+
+  module Servers
+
+    InterfaceNS = 'http://soap.pocketsoap.com/registration/servers'
+
+    class ServerInfo
+      include SOAP::Marshallable
+      @typeName = 'serverInfo'
+      @typeNamespace = SimonReg::TypeNS
+
+      attr_accessor :name, :version, :endpointURL, :wsdlURL
+
+      def initialize( name = nil, version = nil, endpointURL = nil, wsdlURL = nil )
+
+	@name = name
+	@version = version
+	@endpointURL = endpointURL
+	@wsdlURL = wsdlURL
+      end
+    end
+
+    Methods = {
+      'RegisterServer' => [ 'serverID', 'serviceID', 'serverInfo' ],
+      'UpdateServer' => [ 'void', 'serverID', 'serverInfo' ],
+      'RemoveServer' => [ 'void', 'serverID' ],
+    }
+  end
+
+  module Subscriber
+
+    InterfaceNS = 'http://soap.pocketsoap.com/registration/subscriber'
+
+    class SubscriberInfo
+      include SOAP::Marshallable
+      @typeName = 'subscriberInfo'
+      @typeNamespace = SimonReg::TypeNS
+
+      attr_accessor :notificationID, :expires
+
+      def initialize( notificationID = nil, expires = nil )
+
+	@notificationID = notificationID
+	@expires = expires
+      end
+    end
+
+    Methods = {
+      'Subscribe' => [ 'subscriberInfo', 'serviceID', 'ServerChanges', 'ClientChanges', 'NotificationURL' ],
+      'Renew' => [ 'expires', 'notificationID' ],
+      'Cancel' => [ 'void', 'notificationID' ],
+    }
+  end
+end

data/test/interopR2/interopResultBase.rb

@@ -0,0 +1,114 @@
+require 'soap/mapping'
+
+
+module SOAPBuildersInteropResult
+extend SOAP
+
+
+InterfaceNS = 'http://www.jin.gr.jp/~nahi/Ruby/SOAP4R/SOAPBuildersInteropResult/0.0.1'
+TypeNS = 'http://www.jin.gr.jp/~nahi/Ruby/SOAP4R/SOAPBuildersInteropResult/type/0.0.1'
+
+
+class Endpoint
+  include SOAP::Marshallable
+
+  attr_accessor :processorName, :processorVersion, :endpointName, :uri, :wsdl
+
+  def initialize( endpointName = nil, uri = nil, wsdl = nil )
+    @processorName = 'unknown'
+    @processorVersion = nil
+    @endpointName = endpointName
+    @uri = uri
+    @wsdl = wsdl
+  end
+  
+  def name
+    if @endpointName
+      @endpointName
+    elsif @processorVersion
+      "#{ @processorName }-#{ @processorVersion }"
+    else
+      "#{ @processorName }"
+    end
+  end
+end
+
+
+class TestResult
+  include SOAP::Marshallable
+
+  attr_accessor :testName, :result, :comment, :wiredump
+
+  def initialize( testName, result, comment = nil, wiredump = nil )
+    @testName = testName
+    @result = result
+    @comment = comment
+    @wiredump = wiredump
+  end
+end
+
+
+class InteropResults
+  include SOAP::Marshallable
+  include Enumerable
+
+  attr_accessor :dateTime, :server, :client
+
+  def initialize( client = nil, server = nil )
+    @dateTime = Time.now
+    @server = server
+    @client = client
+    @testResults = []
+  end
+
+  def add( testResult )
+    @testResults << testResult
+  end
+
+  def clear
+    @testResults.clear
+  end
+
+  def each
+    @testResults.each do | item |
+      yield( item )
+    end
+  end
+
+  def size
+    @testResults.size
+  end
+end
+
+
+Methods = [
+  [ 'addResults', [:in, 'interopResults' ]],
+  [ 'deleteResults', [:in, 'client'], [:in, 'server']],
+]
+
+
+
+MappingRegistry = SOAP::Mapping::Registry.new
+
+MappingRegistry.set(
+  ::SOAPBuildersInteropResult::Endpoint,
+  ::SOAP::SOAPStruct,
+  ::SOAP::Mapping::Registry::TypedStructFactory,
+  [ XSD::QName.new(TypeNS, 'Endpoint') ]
+)
+
+MappingRegistry.set(
+  ::SOAPBuildersInteropResult::TestResult,
+  ::SOAP::SOAPStruct,
+  ::SOAP::Mapping::Registry::TypedStructFactory,
+  [ XSD::QName.new(TypeNS, 'TestResult') ]
+)
+MappingRegistry.set(
+  ::SOAPBuildersInteropResult::InteropResults,
+  ::SOAP::SOAPStruct,
+  ::SOAP::Mapping::Registry::TypedStructFactory,
+  [ XSD::QName.new(TypeNS, 'InteropResults') ]
+)
+
+
+end