soap4r 1.5.7 → 1.5.8

data/test/soap/test_styleuse.rb

@@ -231,8 +231,8 @@ class TestStyleUse < Test::Unit::TestCase
   end
 
   def teardown
-    teardown_server
-    teardown_client
+    teardown_server if @server
+    teardown_client if @client
   end
 
   def teardown_server

data/test/soap/wsdlDriver/test_calc.rb

@@ -42,8 +42,8 @@ class TestCalc < Test::Unit::TestCase
   end
 
   def teardown
-    teardown_server
-    teardown_client
+    teardown_server if @server
+    teardown_client if @client
   end
 
   def teardown_server

data/test/soap/wsdlDriver/test_document.rb

@@ -43,8 +43,8 @@ class TestDocument < Test::Unit::TestCase
   end
 
   def teardown
-    teardown_server
-    teardown_client
+    teardown_server if @server
+    teardown_client if @client
   end
 
   def teardown_server

data/test/soap/wsdlDriver/test_simpletype.rb

@@ -49,8 +49,8 @@ class TestSimpleType < Test::Unit::TestCase
   end
 
   def teardown
-    teardown_server
-    teardown_client
+    teardown_server if @server
+    teardown_client if @client
   end
 
   def teardown_server

data/test/wsdl/abstract/test_abstract.rb

@@ -52,7 +52,7 @@ class TestAbstract < Test::Unit::TestCase
   end
 
   def teardown
-    teardown_server
+    teardown_server if @server
     unless $DEBUG
       File.unlink(pathname('abstract.rb'))
       File.unlink(pathname('abstractMappingRegistry.rb'))

data/test/wsdl/anonymous/expectedClassDef.rb

@@ -0,0 +1,128 @@
+require 'xsd/qname'
+
+module WSDL; module Anonymous
+
+
+# {urn:lp}Header
+#   header3 - SOAP::SOAPString
+class Header
+  attr_accessor :header3
+
+  def initialize(header3 = nil)
+    @header3 = header3
+  end
+end
+
+# {urn:lp}ExtraInfo
+class ExtraInfo < ::Array
+
+  # {}Entry
+  #   key - SOAP::SOAPString
+  #   value - SOAP::SOAPString
+  class Entry
+    attr_accessor :key
+    attr_accessor :value
+
+    def initialize(key = nil, value = nil)
+      @key = key
+      @value = value
+    end
+  end
+end
+
+# {urn:lp}loginResponse
+#   loginResult - WSDL::Anonymous::LoginResponse::LoginResult
+class LoginResponse
+
+  # inner class for member: loginResult
+  # {}loginResult
+  #   sessionID - SOAP::SOAPString
+  class LoginResult
+    attr_accessor :sessionID
+
+    def initialize(sessionID = nil)
+      @sessionID = sessionID
+    end
+  end
+
+  attr_accessor :loginResult
+
+  def initialize(loginResult = nil)
+    @loginResult = loginResult
+  end
+end
+
+# {urn:lp}Pack
+#   header - WSDL::Anonymous::Pack::Header
+class Pack
+
+  # inner class for member: Header
+  # {}Header
+  #   header1 - SOAP::SOAPString
+  class Header
+    attr_accessor :header1
+
+    def initialize(header1 = nil)
+      @header1 = header1
+    end
+  end
+
+  attr_accessor :header
+
+  def initialize(header = nil)
+    @header = header
+  end
+end
+
+# {urn:lp}Envelope
+#   header - WSDL::Anonymous::Envelope::Header
+class Envelope
+
+  # inner class for member: Header
+  # {}Header
+  #   header2 - SOAP::SOAPString
+  class Header
+    attr_accessor :header2
+
+    def initialize(header2 = nil)
+      @header2 = header2
+    end
+  end
+
+  attr_accessor :header
+
+  def initialize(header = nil)
+    @header = header
+  end
+end
+
+# {urn:lp}login
+#   loginRequest - WSDL::Anonymous::Login::LoginRequest
+class Login
+
+  # inner class for member: loginRequest
+  # {}loginRequest
+  #   username - SOAP::SOAPString
+  #   password - SOAP::SOAPString
+  #   timezone - SOAP::SOAPString
+  class LoginRequest
+    attr_accessor :username
+    attr_accessor :password
+    attr_accessor :timezone
+
+    def initialize(username = nil, password = nil, timezone = nil)
+      @username = username
+      @password = password
+      @timezone = timezone
+    end
+  end
+
+  attr_accessor :loginRequest
+
+  def initialize(loginRequest = nil)
+    @loginRequest = loginRequest
+  end
+end
+
+
+end; end

data/test/wsdl/anonymous/expectedDriver.rb

@@ -0,0 +1,59 @@
+require 'lp.rb'
+require 'lpMappingRegistry.rb'
+require 'soap/rpc/driver'
+
+module WSDL::Anonymous
+
+class Lp_porttype < ::SOAP::RPC::Driver
+  DefaultEndpointUrl = "http://localhost:17171/"
+
+  Methods = [
+    [ "urn:lp:login",
+      "login",
+      [ ["in", "parameters", ["::SOAP::SOAPElement", "urn:lp", "login"]],
+        ["out", "parameters", ["::SOAP::SOAPElement", "urn:lp", "loginResponse"]] ],
+      { :request_style =>  :document, :request_use =>  :literal,
+        :response_style => :document, :response_use => :literal,
+        :faults => {} }
+    ],
+    [ "urn:lp:echo",
+      "echo",
+      [ ["in", "parameters", ["::SOAP::SOAPElement", "urn:lp", "Pack"]],
+        ["out", "parameters", ["::SOAP::SOAPElement", "urn:lp", "Envelope"]] ],
+      { :request_style =>  :document, :request_use =>  :literal,
+        :response_style => :document, :response_use => :literal,
+        :faults => {} }
+    ]
+  ]
+
+  def initialize(endpoint_url = nil)
+    endpoint_url ||= DefaultEndpointUrl
+    super(endpoint_url, nil)
+    self.mapping_registry = LpMappingRegistry::EncodedRegistry
+    self.literal_mapping_registry = LpMappingRegistry::LiteralRegistry
+    init_methods
+  end
+
+private
+
+  def init_methods
+    Methods.each do |definitions|
+      opt = definitions.last
+      if opt[:request_style] == :document
+        add_document_operation(*definitions)
+      else
+        add_rpc_operation(*definitions)
+        qname = definitions[0]
+        name = definitions[2]
+        if qname.name != name and qname.name.capitalize == name.capitalize
+          ::SOAP::Mapping.define_singleton_method(self, qname.name) do |*arg|
+            __send__(name, *arg)
+          end
+        end
+      end
+    end
+  end
+end
+
+
+end

data/test/wsdl/anonymous/expectedMappingRegistry.rb

@@ -0,0 +1,176 @@
+require 'lp.rb'
+require 'soap/mapping'
+
+module WSDL; module Anonymous
+
+module LpMappingRegistry
+  EncodedRegistry = ::SOAP::Mapping::EncodedRegistry.new
+  LiteralRegistry = ::SOAP::Mapping::LiteralRegistry.new
+  NsLp = "urn:lp"
+
+  EncodedRegistry.register(
+    :class => WSDL::Anonymous::Header,
+    :schema_type => XSD::QName.new(NsLp, "Header"),
+    :schema_element => [
+      ["header3", ["SOAP::SOAPString", XSD::QName.new(nil, "Header3")]]
+    ]
+  )
+
+  EncodedRegistry.register(
+    :class => WSDL::Anonymous::ExtraInfo,
+    :schema_type => XSD::QName.new(NsLp, "ExtraInfo"),
+    :schema_element => [
+      ["entry", ["WSDL::Anonymous::ExtraInfo::Entry[]", XSD::QName.new(nil, "Entry")], [1, nil]]
+    ]
+  )
+
+  EncodedRegistry.register(
+    :class => WSDL::Anonymous::ExtraInfo::Entry,
+    :schema_name => XSD::QName.new(nil, "Entry"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["key", ["SOAP::SOAPString", XSD::QName.new(nil, "Key")]],
+      ["value", ["SOAP::SOAPString", XSD::QName.new(nil, "Value")]]
+    ]
+  )
+
+  EncodedRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse,
+    :schema_type => XSD::QName.new(NsLp, "loginResponse"),
+    :schema_element => [
+      ["loginResult", ["WSDL::Anonymous::LoginResponse::LoginResult", XSD::QName.new(nil, "loginResult")]]
+    ]
+  )
+
+  EncodedRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse::LoginResult,
+    :schema_name => XSD::QName.new(nil, "loginResult"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["sessionID", "SOAP::SOAPString"]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Header,
+    :schema_type => XSD::QName.new(NsLp, "Header"),
+    :schema_element => [
+      ["header3", ["SOAP::SOAPString", XSD::QName.new(nil, "Header3")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::ExtraInfo,
+    :schema_type => XSD::QName.new(NsLp, "ExtraInfo"),
+    :schema_element => [
+      ["entry", ["WSDL::Anonymous::ExtraInfo::Entry[]", XSD::QName.new(nil, "Entry")], [1, nil]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::ExtraInfo::Entry,
+    :schema_name => XSD::QName.new(nil, "Entry"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["key", ["SOAP::SOAPString", XSD::QName.new(nil, "Key")]],
+      ["value", ["SOAP::SOAPString", XSD::QName.new(nil, "Value")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse,
+    :schema_type => XSD::QName.new(NsLp, "loginResponse"),
+    :schema_element => [
+      ["loginResult", ["WSDL::Anonymous::LoginResponse::LoginResult", XSD::QName.new(nil, "loginResult")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse::LoginResult,
+    :schema_name => XSD::QName.new(nil, "loginResult"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["sessionID", "SOAP::SOAPString"]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Pack,
+    :schema_name => XSD::QName.new(NsLp, "Pack"),
+    :schema_element => [
+      ["header", ["WSDL::Anonymous::Pack::Header", XSD::QName.new(nil, "Header")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Pack::Header,
+    :schema_name => XSD::QName.new(nil, "Header"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["header1", ["SOAP::SOAPString", XSD::QName.new(nil, "Header1")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Envelope,
+    :schema_name => XSD::QName.new(NsLp, "Envelope"),
+    :schema_element => [
+      ["header", ["WSDL::Anonymous::Envelope::Header", XSD::QName.new(nil, "Header")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Envelope::Header,
+    :schema_name => XSD::QName.new(nil, "Header"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["header2", ["SOAP::SOAPString", XSD::QName.new(nil, "Header2")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Login,
+    :schema_name => XSD::QName.new(NsLp, "login"),
+    :schema_element => [
+      ["loginRequest", ["WSDL::Anonymous::Login::LoginRequest", XSD::QName.new(nil, "loginRequest")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::Login::LoginRequest,
+    :schema_name => XSD::QName.new(nil, "loginRequest"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["username", "SOAP::SOAPString"],
+      ["password", "SOAP::SOAPString"],
+      ["timezone", "SOAP::SOAPString", [0, 1]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse,
+    :schema_name => XSD::QName.new(NsLp, "loginResponse"),
+    :schema_element => [
+      ["loginResult", ["WSDL::Anonymous::LoginResponse::LoginResult", XSD::QName.new(nil, "loginResult")]]
+    ]
+  )
+
+  LiteralRegistry.register(
+    :class => WSDL::Anonymous::LoginResponse::LoginResult,
+    :schema_name => XSD::QName.new(nil, "loginResult"),
+    :is_anonymous => true,
+    :schema_qualified => false,
+    :schema_element => [
+      ["sessionID", "SOAP::SOAPString"]
+    ]
+  )
+end
+
+end; end

data/test/wsdl/anonymous/lp.wsdl

@@ -0,0 +1,147 @@
+<?xml version="1.0" encoding="utf-8"?>
+<definitions
+  name="lp"
+  targetNamespace="urn:lp"
+  xmlns:tns="urn:lp"
+  xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+  xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
+  xmlns="http://schemas.xmlsoap.org/wsdl/">
+  <types>
+    <schema xmlns="http://www.w3.org/2001/XMLSchema" targetNamespace="urn:lp">
+      <element name="Pack">
+        <complexType>
+          <sequence>
+            <element name="Header">
+              <complexType>
+                <sequence>
+                  <element name="Header1" type="xsd:string"/>
+                </sequence>
+              </complexType>
+            </element>
+          </sequence>
+        </complexType>
+      </element>
+
+      <element name="Envelope">
+        <complexType>
+          <sequence>
+            <element name="Header">
+              <complexType>
+                <sequence>
+                  <element name="Header2" type="xsd:string"/>
+                </sequence>
+              </complexType>
+            </element>
+          </sequence>
+        </complexType>
+      </element>
+
+      <complexType name="Header">
+        <sequence>
+          <element name="Header3" type="xsd:string"/>
+        </sequence>
+      </complexType>
+
+      <complexType name="ExtraInfo">
+        <annotation>
+          <documentation>Service specific information.</documentation>
+        </annotation>
+        <sequence>
+          <element maxOccurs="unbounded" name="Entry">
+            <complexType>
+              <sequence>
+                <element name="Key" type="xsd:string"/>
+                <element name="Value" type="xsd:string"/>
+              </sequence>
+            </complexType>
+          </element>
+        </sequence>
+      </complexType>
+
+      <element name="login">
+        <complexType>
+          <sequence>
+            <element name="loginRequest">
+              <complexType>
+                <sequence>
+                  <element name="username" type="xsd:string"/>
+                  <element name="password" type="xsd:string"/>
+                  <element name="timezone" type="xsd:string" minOccurs="0" maxOccurs="1"/>
+                </sequence>
+              </complexType>
+            </element>
+          </sequence>
+        </complexType>
+      </element>
+
+      <complexType name="loginResponse">
+        <sequence>
+          <element name="loginResult">
+            <complexType>
+              <sequence>
+                <element name="sessionID" type="xsd:string"/>
+              </sequence>
+            </complexType>
+          </element>
+        </sequence>
+      </complexType>
+
+      <element name="loginResponse" type="tns:loginResponse"/>
+    </schema>
+  </types>
+
+  <message name="login_in">
+    <part name="parameters" element="tns:login" />
+  </message>
+  <message name="login_out">
+    <part name="parameters" element="tns:loginResponse" />
+  </message>
+
+  <message name="echo_in">
+    <part name="parameters" element="tns:Pack" />
+  </message>
+  <message name="echo_out">
+    <part name="parameters" element="tns:Envelope" />
+  </message>
+
+  <portType name="lp_porttype">
+    <operation name="login">
+      <input message="tns:login_in" />
+      <output message="tns:login_out" />
+    </operation>
+
+    <operation name="echo">
+      <input message="tns:echo_in" />
+      <output message="tns:echo_out" />
+    </operation>
+  </portType>
+
+  <binding name="lp_binding" type="tns:lp_porttype">
+    <soap:binding transport="http://schemas.xmlsoap.org/soap/http" style="document" />
+    <operation name="login">
+      <soap:operation soapAction="urn:lp:login" style="document" />
+      <input>
+        <soap:body use="literal" />
+      </input>
+      <output>
+        <soap:body use="literal" />
+      </output>
+    </operation>
+
+    <operation name="echo">
+      <soap:operation soapAction="urn:lp:echo" style="document" />
+      <input>
+        <soap:body use="literal" />
+      </input>
+      <output>
+        <soap:body use="literal" />
+      </output>
+    </operation>
+  </binding>
+
+  <service name="lp_service">
+    <port name="lp_service_port" binding="tns:lp_binding">
+      <soap:address location="http://localhost:17171/" />
+    </port>
+  </service>
+</definitions>