malagant-soap4r 1.5.8.20141127181857

data/test/wsdl/axisArray/axisArray.wsdl

@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<wsdl:definitions name = "itemList"
+    targetNamespace="urn:jp.gr.jin.rrr.example.itemList"
+    xmlns:tns="urn:jp.gr.jin.rrr.example.itemList"
+    xmlns:typens="urn:jp.gr.jin.rrr.example.itemListType"
+    xmlns="http://schemas.xmlsoap.org/wsdl/"
+    xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/"
+    xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
+    xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <wsdl:types>
+    <schema targetNamespace="urn:jp.gr.jin.rrr.example.itemListType"
+	xmlns="http://www.w3.org/2001/XMLSchema">
+      <import namespace="http://schemas.xmlsoap.org/soap/encoding/"/>
+      <complexType name="Item">
+        <sequence>
+          <element name="name" type="xsd:string"/>
+        </sequence>
+      </complexType>
+      <complexType name="ItemList">
+        <sequence>
+          <element maxOccurs="unbounded" minOccurs="0" name="Item" type="typens:Item"/>
+        </sequence>
+      </complexType>
+
+      <complexType name="MeetingInfo">
+        <sequence>
+          <element name="meetingId" type="xsd:long"/>
+        </sequence>
+      </complexType>
+    </schema>
+  </wsdl:types>
+
+  <wsdl:message name="listItemRequest"/>
+
+  <wsdl:message name="listItemResponse">
+    <wsdl:part name="list" type="typens:ItemList"/>
+  </wsdl:message>
+
+  <wsdl:message name="getMeetingInfoRequest"/>
+
+  <wsdl:message name="getMeetingInfoResponse">
+    <wsdl:part name="getMeetingInfoReturn" type="typens:MeetingInfo"/>
+  </wsdl:message>
+
+  <wsdl:portType name="ItemListPortType">
+    <wsdl:operation name="listItem">
+      <wsdl:input message="tns:listItemRequest" name="listItemRequest"/>
+      <wsdl:output message="tns:listItemResponse" name="listItemResponse"/>
+    </wsdl:operation>
+    <wsdl:operation name="getMeetingInfo">
+      <wsdl:input name="getMeetingInfoRequest" message="tns:getMeetingInfoRequest"/>
+      <wsdl:output name="getMeetingInfoResponse" message="tns:getMeetingInfoResponse"/>
+    </wsdl:operation>
+  </wsdl:portType>
+
+  <wsdl:binding name="ItemListBinding" type="tns:ItemListPortType">
+    <soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http"/>
+    <wsdl:operation name="listItem">
+      <soap:operation soapAction=""/>
+      <wsdl:input name="listItemRequest">
+        <soap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:jp.gr.jin.rrr.example.itemList" use="encoded"/>
+      </wsdl:input>
+      <wsdl:output name="listItemResponse">
+        <soap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:jp.gr.jin.rrr.example.itemList" use="encoded"/>
+      </wsdl:output>
+    </wsdl:operation>
+    <wsdl:operation name="getMeetingInfo">
+      <soap:operation soapAction=""/>
+      <wsdl:input name="getMeetingInfoRequest">
+        <soap:body use="encoded" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:jp.gr.jin.rrr.example.itemList"/>
+      </wsdl:input>
+      <wsdl:output name="getMeetingInfoResponse">
+        <soap:body use="encoded" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:jp.gr.jin.rrr.example.itemList"/>
+      </wsdl:output>
+    </wsdl:operation>
+  </wsdl:binding>
+
+  <wsdl:service name="ItemListService">
+    <wsdl:port binding="tns:ItemListBinding" name="ItemListPort">
+      <soap:address location="http://localhost:10080/"/>
+    </wsdl:port>
+  </wsdl:service>
+</wsdl:definitions>

data/test/wsdl/axisArray/test_axisarray.rb

@@ -0,0 +1,125 @@
+# encoding: ASCII-8BIT
+require 'helper'
+require 'testutil'
+require 'soap/processor'
+require 'soap/mapping'
+require 'soap/rpc/element'
+require 'wsdl/importer'
+require 'wsdl/soap/wsdl2ruby'
+
+
+module WSDL
+module AxisArray
+
+
+class TestAxisArray < Test::Unit::TestCase
+  DIR = File.dirname(File.expand_path(__FILE__))
+
+  def setup
+    @xml =<<__EOX__
+<?xml version="1.0" encoding="UTF-8"?>
+<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <soapenv:Body>
+    <ns1:listItemResponse soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns1="urn:jp.gr.jin.rrr.example.itemList">
+      <list href="#id0"/>
+    </ns1:listItemResponse>
+    <multiRef id="id0" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="ns2:ItemList" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns2="urn:jp.gr.jin.rrr.example.itemListType">
+      <Item href="#id1"/>
+      <Item href="#id2"/>
+      <Item href="#id3"/>
+    </multiRef>
+    <multiRef id="id3" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="ns3:Item" xmlns:ns3="urn:jp.gr.jin.rrr.example.itemListType" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
+      <name xsi:type="xsd:string">name3</name>
+    </multiRef>
+    <multiRef id="id1" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="ns4:Item" xmlns:ns4="urn:jp.gr.jin.rrr.example.itemListType" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
+      <name xsi:type="xsd:string">name1</name>
+    </multiRef>
+    <multiRef id="id2" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="ns5:Item" xmlns:ns5="urn:jp.gr.jin.rrr.example.itemListType" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
+      <name xsi:type="xsd:string">name2</name>
+    </multiRef>
+  </soapenv:Body>
+</soapenv:Envelope>
+__EOX__
+    setup_classdef
+  end
+
+  def teardown
+    unless $DEBUG
+      File.unlink(pathname('itemList.rb'))
+      File.unlink(pathname('itemListMappingRegistry.rb'))
+      File.unlink(pathname('itemListDriver.rb'))
+    end
+  end
+
+  def setup_classdef
+    gen = WSDL::SOAP::WSDL2Ruby.new
+    gen.location = pathname("axisArray.wsdl")
+    gen.basedir = DIR
+    gen.logger.level = Logger::FATAL
+    gen.opt['classdef'] = nil
+    gen.opt['mapping_registry'] = nil
+    gen.opt['module_path'] = self.class.to_s.sub(/::[^:]+$/, '')
+    gen.opt['driver'] = nil
+    gen.opt['force'] = true
+    gen.run
+    TestUtil.require(DIR, 'itemListDriver.rb', 'itemList.rb', 'itemListMappingRegistry.rb')
+  end
+
+  def test_by_stub
+    driver = ItemListPortType.new
+    driver.test_loopback_response << @xml
+    ary = driver.listItem
+    assert_equal(3, ary.size)
+    assert_equal("name1", ary[0].name)
+    assert_equal("name2", ary[1].name)
+    assert_equal("name3", ary[2].name)
+  end
+
+  def test_by_wsdl
+    wsdlfile = File.join(File.dirname(File.expand_path(__FILE__)), 'axisArray.wsdl')
+    wsdl = WSDL::Importer.import(wsdlfile)
+    service = wsdl.services[0]
+    port = service.ports[0]
+    wsdl_types = wsdl.collect_complextypes
+    rpc_decode_typemap = wsdl_types + wsdl.soap_rpc_complextypes(port.find_binding)
+    opt = {}
+    opt[:default_encodingstyle] = ::SOAP::EncodingNamespace
+    opt[:decode_typemap] = rpc_decode_typemap
+    header, body = ::SOAP::Processor.unmarshal(@xml, opt)
+    ary = ::SOAP::Mapping.soap2obj(body.response)
+    assert_equal(3, ary.size)
+    assert_equal("name1", ary[0].name)
+    assert_equal("name2", ary[1].name)
+    assert_equal("name3", ary[2].name)
+  end
+
+XML_LONG = <<__XML__
+<?xml version="1.0" encoding="utf-8"?>
+<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <soapenv:Body>
+    <ns1:getMeetingInfoResponse soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns1="urn:jp.gr.jin.rrr.example.itemList">
+      <getMeetingInfoReturn href="#id0"/>
+    </ns1:getMeetingInfoResponse>
+    <multiRef id="id0" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="ns2:MeetingInfo" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns2="urn:long">
+      <meetingId href="#id11"/>
+    </multiRef>
+    <multiRef id="id11" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="xsd:long" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">105759347</multiRef>
+  </soapenv:Body>
+</soapenv:Envelope>
+__XML__
+
+  def test_multiref_long
+    driver = ItemListPortType.new
+    driver.test_loopback_response << XML_LONG
+    ret = driver.getMeetingInfo
+    assert_equal(105759347, ret.meetingId)
+  end
+
+  def pathname(filename)
+    File.join(DIR, filename)
+  end
+end
+
+
+end
+end

data/test/wsdl/choice/choice.wsdl

@@ -0,0 +1,167 @@
+<?xml version="1.0" encoding="utf-8"?>
+<definitions
+    name="choice"
+    targetNamespace="urn:choice"
+    xmlns:tns="urn:choice"
+    xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+    xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
+    xmlns="http://schemas.xmlsoap.org/wsdl/">
+  <types>
+    <xsd:schema elementFormDefault="unqualified" targetNamespace="urn:choice">
+      <xsd:complexType name="andor">
+        <xsd:sequence>
+          <xsd:element name="A" type="xsd:string"/>
+          <xsd:choice>
+            <xsd:element name="B1" type="xsd:string"/>
+            <xsd:sequence>
+              <xsd:element name="B2a" type="xsd:string"/>
+              <xsd:element name="B2b" type="xsd:string"/>
+            </xsd:sequence>
+            <xsd:choice>
+              <xsd:element name="B3a" type="xsd:string"/>
+              <xsd:element name="B3b" type="xsd:string"/>
+            </xsd:choice>
+          </xsd:choice>
+          <xsd:sequence>
+            <xsd:element name="C1" type="xsd:string"/>
+            <xsd:element name="C2" type="xsd:string"/>
+          </xsd:sequence>
+        </xsd:sequence>
+      </xsd:complexType>
+
+      <xsd:complexType name="emptyArrayAtFirst">
+        <xsd:sequence>
+          <xsd:choice>
+            <xsd:element name="A" maxOccurs="unbounded" type="xsd:string"/>
+            <xsd:element name="B1" type="xsd:string"/>
+            <xsd:element name="B2" type="xsd:string"/>
+          </xsd:choice>
+        </xsd:sequence>
+      </xsd:complexType>
+
+      <xsd:element name="terminalID" minOccurs="1" maxOccurs="1">
+        <xsd:complexType>
+          <xsd:choice>
+            <xsd:element name="imei" type="xsd:string"/>
+            <xsd:element name="devId" type="xsd:string"/>
+          </xsd:choice>
+        </xsd:complexType>
+      </xsd:element>
+
+      <xsd:element name="echoele">
+        <xsd:complexType>
+          <xsd:sequence>
+            <xsd:element minOccurs="0" maxOccurs="1" ref="tns:terminalID" />
+          </xsd:sequence>
+        </xsd:complexType>
+      </xsd:element>
+
+      <xsd:element name="echo_response">
+        <xsd:complexType>
+          <xsd:sequence>
+            <xsd:element minOccurs="0" maxOccurs="1" ref="tns:terminalID" />
+          </xsd:sequence>
+        </xsd:complexType>
+      </xsd:element>
+
+      <xsd:element name="echoele_complex">
+        <xsd:complexType>
+          <xsd:sequence>
+            <xsd:element name="data" type="tns:andor"/>
+          </xsd:sequence>
+        </xsd:complexType>
+      </xsd:element>
+
+      <xsd:element name="echo_complex_response">
+        <xsd:complexType>
+          <xsd:sequence>
+            <xsd:element name="data" type="tns:andor"/>
+          </xsd:sequence>
+        </xsd:complexType>
+      </xsd:element>
+
+      <xsd:element name="echoele_complex_emptyArrayAtFirst">
+        <xsd:complexType>
+          <xsd:sequence>
+            <xsd:element name="data" type="tns:emptyArrayAtFirst"/>
+          </xsd:sequence>
+        </xsd:complexType>
+      </xsd:element>
+    </xsd:schema>
+  </types>
+
+  <message name="echo_in">
+    <part name="parameters" element="tns:echoele" />
+  </message>
+  <message name="echo_out">
+    <part name="parameters" element="tns:echo_response" />
+  </message>
+  <message name="echo_complex_in">
+    <part name="parameters" element="tns:echoele_complex" />
+  </message>
+  <message name="echo_complex_out">
+    <part name="parameters" element="tns:echo_complex_response" />
+  </message>
+  <message name="echo_complex_emptyArrayAtFirst_in">
+    <part name="parameters" element="tns:echoele_complex_emptyArrayAtFirst" />
+  </message>
+  <message name="echo_complex_emptyArrayAtFirst_out">
+    <part name="parameters" element="tns:echoele_complex_emptyArrayAtFirst" />
+  </message>
+
+  <portType name="choice_porttype">
+    <operation name="echo">
+      <input message="tns:echo_in" />
+      <output message="tns:echo_out" />
+    </operation>
+
+    <operation name="echo_complex">
+      <input message="tns:echo_complex_in" />
+      <output message="tns:echo_complex_out" />
+    </operation>
+
+    <operation name="echo_complex_emptyArrayAtFirst">
+      <input message="tns:echo_complex_emptyArrayAtFirst_in" />
+      <output message="tns:echo_complex_emptyArrayAtFirst_out" />
+    </operation>
+  </portType>
+
+  <binding name="choice_binding" type="tns:choice_porttype">
+    <soap:binding transport="http://schemas.xmlsoap.org/soap/http" style="document" />
+    <operation name="echo">
+      <soap:operation soapAction="urn:choice:echo" style="document" />
+      <input>
+        <soap:body use="literal" />
+      </input>
+      <output>
+        <soap:body use="literal" />
+      </output>
+    </operation>
+
+    <operation name="echo_complex">
+      <soap:operation soapAction="urn:choice:echo_complex" style="document" />
+      <input>
+        <soap:body use="literal" />
+      </input>
+      <output>
+        <soap:body use="literal" />
+      </output>
+    </operation>
+
+    <operation name="echo_complex_emptyArrayAtFirst">
+      <soap:operation soapAction="urn:choice:echo_complex_emptyArrayAtFirst" style="document" />
+      <input>
+        <soap:body use="literal" />
+      </input>
+      <output>
+        <soap:body use="literal" />
+      </output>
+    </operation>
+  </binding>
+
+  <service name="choice_service">
+    <port name="choice_service_port" binding="tns:choice_binding">
+      <soap:address location="http://localhost:17171/" />
+    </port>
+  </service>
+</definitions>

data/test/wsdl/choice/test_choice.rb

@@ -0,0 +1,311 @@
+# encoding: ASCII-8BIT
+require 'helper'
+require 'testutil'
+require 'wsdl/parser'
+require 'wsdl/soap/wsdl2ruby'
+require 'soap/rpc/standaloneServer'
+require 'soap/wsdlDriver'
+
+
+module WSDL; module Choice
+
+
+class TestChoice < Test::Unit::TestCase
+  class Server < ::SOAP::RPC::StandaloneServer
+    Namespace = 'urn:choice'
+
+    def on_init
+      add_document_method(
+        self,
+        Namespace + ':echo',
+        'echo',
+        XSD::QName.new(Namespace, 'echoele'),
+        XSD::QName.new(Namespace, 'echo_response')
+      )
+      add_document_method(
+        self,
+        Namespace + ':echo_complex',
+        'echo_complex',
+        XSD::QName.new(Namespace, 'echoele_complex'),
+        XSD::QName.new(Namespace, 'echo_complex_response')
+      )
+      add_document_method(
+        self,
+        Namespace + ':echo_complex_emptyArrayAtFirst',
+        'echo_complex_emptyArrayAtFirst',
+        XSD::QName.new(Namespace, 'echoele_complex_emptyArrayAtFirst'),
+        XSD::QName.new(Namespace, 'echoele_complex_emptyArrayAtFirst')
+      )
+      @router.literal_mapping_registry = ChoiceMappingRegistry::LiteralRegistry
+    end
+  
+    def echo(arg)
+      arg
+    end
+
+    def echo_complex(arg)
+      Echo_complex_response.new(arg.data)
+    end
+
+    def echo_complex_emptyArrayAtFirst(arg)
+      arg
+    end
+  end
+
+  DIR = File.dirname(File.expand_path(__FILE__))
+
+  Port = 17171
+
+  def setup
+    setup_classdef
+    setup_server
+    @client = nil
+  end
+
+  def teardown
+    teardown_server if @server
+    unless $DEBUG
+      File.unlink(pathname('choice.rb'))
+      File.unlink(pathname('choiceMappingRegistry.rb'))
+      File.unlink(pathname('choiceDriver.rb'))
+    end
+    @client.reset_stream if @client
+  end
+
+  def setup_server
+    @server = Server.new('Test', Server::Namespace, '0.0.0.0', Port)
+    @server.level = Logger::Severity::ERROR
+    @server_thread = TestUtil.start_server_thread(@server)
+  end
+
+  def setup_classdef
+    gen = WSDL::SOAP::WSDL2Ruby.new
+    gen.location = pathname("choice.wsdl")
+    gen.basedir = DIR
+    gen.logger.level = Logger::FATAL
+    gen.opt['classdef'] = nil
+    gen.opt['mapping_registry'] = nil
+    gen.opt['module_path'] = self.class.to_s.sub(/::[^:]+$/, '')
+    gen.opt['driver'] = nil
+    gen.opt['force'] = true
+    gen.run
+    TestUtil.require(DIR, 'choiceDriver.rb', 'choiceMappingRegistry.rb', 'choice.rb')
+  end
+
+  def teardown_server
+    @server.shutdown
+    @server_thread.kill
+    @server_thread.join
+  end
+
+  def pathname(filename)
+    File.join(DIR, filename)
+  end
+
+  def test_wsdl
+    wsdl = File.join(DIR, 'choice.wsdl')
+    @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = STDOUT if $DEBUG
+    @client.literal_mapping_registry = ChoiceMappingRegistry::LiteralRegistry
+
+    ret = @client.echo(Echoele.new(TerminalID.new("imei", nil)))
+    assert_equal("imei", ret.terminalID.imei)
+    assert_nil(ret.terminalID.devId)
+    ret = @client.echo(Echoele.new(TerminalID.new(nil, 'devId')))
+    assert_equal("devId", ret.terminalID.devId)
+    assert_nil(ret.terminalID.imei)
+  end
+
+  include ::SOAP
+  def test_naive
+    @client = ::SOAP::RPC::Driver.new("http://localhost:#{Port}/")
+    @client.add_document_method('echo', 'urn:choice:echo',
+      XSD::QName.new('urn:choice', 'echoele'),
+      XSD::QName.new('urn:choice', 'echo_response'))
+    @client.wiredump_dev = STDOUT if $DEBUG
+    @client.literal_mapping_registry = ChoiceMappingRegistry::LiteralRegistry
+
+    echo = SOAPElement.new('echoele')
+    echo.add(terminalID = SOAPElement.new('terminalID'))
+    terminalID.add(SOAPElement.new('imei', 'imei'))
+    ret = @client.echo(echo)
+    assert_equal("imei", ret.terminalID.imei)
+    assert_nil(ret.terminalID.devId)
+
+    echo = SOAPElement.new('echoele')
+    echo.add(terminalID = SOAPElement.new('terminalID'))
+    terminalID.add(SOAPElement.new('devId', 'devId'))
+    ret = @client.echo(echo)
+    assert_equal("devId", ret.terminalID.devId)
+    assert_nil(ret.terminalID.imei)
+  end
+
+  def test_wsdl_with_map_complex
+    wsdl = File.join(DIR, 'choice.wsdl')
+    @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = STDOUT if $DEBUG
+    do_test_with_map_complex(@client)
+  end
+
+  def test_wsdl_with_stub_complex
+    wsdl = File.join(DIR, 'choice.wsdl')
+    @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = STDOUT if $DEBUG
+    @client.literal_mapping_registry = ChoiceMappingRegistry::LiteralRegistry
+    do_test_with_stub_complex(@client)
+  end
+
+  def test_naive_with_map_complex
+    @client = ::SOAP::RPC::Driver.new("http://localhost:#{Port}/")
+    @client.add_document_method('echo_complex', 'urn:choice:echo_complex',
+      XSD::QName.new('urn:choice', 'echoele_complex'),
+      XSD::QName.new('urn:choice', 'echo_complex_response'))
+    @client.wiredump_dev = STDOUT if $DEBUG
+    do_test_with_map_complex(@client)
+  end
+
+  def test_naive_with_stub_complex
+    @client = ::SOAP::RPC::Driver.new("http://localhost:#{Port}/")
+    @client.add_document_method('echo_complex', 'urn:choice:echo_complex',
+      XSD::QName.new('urn:choice', 'echoele_complex'),
+      XSD::QName.new('urn:choice', 'echo_complex_response'))
+    @client.wiredump_dev = STDOUT if $DEBUG
+    @client.literal_mapping_registry = ChoiceMappingRegistry::LiteralRegistry
+    do_test_with_stub_complex(@client)
+  end
+
+  def do_test_with_map_complex(client)
+    req = {
+      :data => {
+        :A => "A",
+        :B1 => "B1",
+        :C1 => "C1",
+        :C2 => "C2"
+      }
+    }
+    ret = client.echo_complex(req)
+    assert_equal("A", ret.data["A"])
+    assert_equal("B1", ret.data["B1"])
+    assert_equal(nil, ret.data["B2a"])
+    assert_equal(nil, ret.data["B2b"])
+    assert_equal(nil, ret.data["B3a"])
+    assert_equal(nil, ret.data["B3b"])
+    assert_equal("C1", ret.data["C1"])
+    assert_equal("C2", ret.data["C2"])
+    #
+    req = {
+      :data => {
+        :A => "A",
+        :B2a => "B2a",
+        :B2b => "B2b",
+        :C1 => "C1",
+        :C2 => "C2"
+      }
+    }
+    ret = client.echo_complex(req)
+    assert_equal("A", ret.data["A"])
+    assert_equal(nil, ret.data["B1"])
+    assert_equal("B2a", ret.data["B2a"])
+    assert_equal("B2b", ret.data["B2b"])
+    assert_equal(nil, ret.data["B3a"])
+    assert_equal(nil, ret.data["B3b"])
+    assert_equal("C1", ret.data["C1"])
+    assert_equal("C2", ret.data["C2"])
+    #
+    req = {
+      :data => {
+        :A => "A",
+        :B3a => "B3a",
+        :C1 => "C1",
+        :C2 => "C2"
+      }
+    }
+    ret = client.echo_complex(req)
+    assert_equal("A", ret.data["A"])
+    assert_equal(nil, ret.data["B1"])
+    assert_equal(nil, ret.data["B2a"])
+    assert_equal(nil, ret.data["B2b"])
+    assert_equal("B3a", ret.data["B3a"])
+    assert_equal(nil, ret.data["B3b"])
+    assert_equal("C1", ret.data["C1"])
+    assert_equal("C2", ret.data["C2"])
+    #
+    req = {
+      :data => {
+        :A => "A",
+        :B3b => "B3b",
+        :C1 => "C1",
+        :C2 => "C2"
+      }
+    }
+    ret = client.echo_complex(req)
+    assert_equal("A", ret.data["A"])
+    assert_equal(nil, ret.data["B1"])
+    assert_equal(nil, ret.data["B2a"])
+    assert_equal(nil, ret.data["B2b"])
+    assert_equal(nil, ret.data["B3a"])
+    assert_equal("B3b", ret.data["B3b"])
+    assert_equal("C1", ret.data["C1"])
+    assert_equal("C2", ret.data["C2"])
+  end
+
+  def do_test_with_stub_complex(client)
+    ret = client.echo_complex(Echoele_complex.new(Andor.new("A", "B1", nil, nil, nil, nil, "C1", "C2")))
+    assert_equal("A", ret.data.a)
+    assert_equal("B1", ret.data.b1)
+    assert_equal(nil, ret.data.b2a)
+    assert_equal(nil, ret.data.b2b)
+    assert_equal(nil, ret.data.b3a)
+    assert_equal(nil, ret.data.b3b)
+    assert_equal("C1", ret.data.c1)
+    assert_equal("C2", ret.data.c2)
+    #
+    ret = client.echo_complex(Echoele_complex.new(Andor.new("A", nil, "B2a", "B2b", nil, nil, "C1", "C2")))
+    assert_equal("A", ret.data.a)
+    assert_equal(nil, ret.data.b1)
+    assert_equal("B2a", ret.data.b2a)
+    assert_equal("B2b", ret.data.b2b)
+    assert_equal(nil, ret.data.b3a)
+    assert_equal(nil, ret.data.b3b)
+    assert_equal("C1", ret.data.c1)
+    assert_equal("C2", ret.data.c2)
+    #
+    ret = client.echo_complex(Echoele_complex.new(Andor.new("A", nil, nil, nil, "B3a", nil, "C1", "C2")))
+    assert_equal("A", ret.data.a)
+    assert_equal(nil, ret.data.b1)
+    assert_equal(nil, ret.data.b2a)
+    assert_equal(nil, ret.data.b2b)
+    assert_equal("B3a", ret.data.b3a)
+    assert_equal(nil, ret.data.b3b)
+    assert_equal("C1", ret.data.c1)
+    assert_equal("C2", ret.data.c2)
+    #
+    ret = client.echo_complex(Echoele_complex.new(Andor.new("A", nil, nil, nil, nil, "B3b", "C1", "C2")))
+    assert_equal("A", ret.data.a)
+    assert_equal(nil, ret.data.b1)
+    assert_equal(nil, ret.data.b2a)
+    assert_equal(nil, ret.data.b2b)
+    assert_equal(nil, ret.data.b3a)
+    assert_equal("B3b", ret.data.b3b)
+    assert_equal("C1", ret.data.c1)
+    assert_equal("C2", ret.data.c2)
+  end
+
+  def test_stub_emptyArrayAtFirst
+    @client = Choice_porttype.new("http://localhost:#{Port}/")
+    @client.wiredump_dev = STDOUT if $DEBUG
+    #
+    arg = EmptyArrayAtFirst.new
+    arg.b1 = "b1"
+    ret = @client.echo_complex_emptyArrayAtFirst(Echoele_complex_emptyArrayAtFirst.new(arg))
+    assert_nil(ret.data.a)
+    assert_equal("b1", ret.data.b1)
+    assert_nil(ret.data.b2)
+  end
+end
+
+
+end; end