soap4r 1.5.5.20061022

data/test/soap/wsdlDriver/test_simpletype.rb

@@ -0,0 +1,87 @@
+require 'test/unit'
+require 'soap/rpc/httpserver'
+require 'soap/wsdlDriver'
+
+
+module SOAP
+
+
+class TestSimpleType < Test::Unit::TestCase
+  class Server < ::SOAP::RPC::HTTPServer
+    def on_init
+      add_method(self, 'echo_version', 'version')
+    end
+  
+    def echo_version(version)
+      # "2.0" is out of range.
+      Version_struct.new(version || "2.0", 'checked')
+    end
+  end
+
+  DIR = File.dirname(File.expand_path(__FILE__))
+  require File.join(DIR, 'echo_version')
+
+  Port = 17171
+
+  def setup
+    setup_server
+    setup_client
+  end
+
+  def setup_server
+    @server = Server.new(
+      :BindAddress => "0.0.0.0",
+      :Port => Port,
+      :AccessLog => [],
+      :SOAPDefaultNamespace => "urn:example.com:simpletype-rpc"
+    )
+    @server.level = Logger::Severity::ERROR
+    @server_thread = start_server_thread(@server)
+  end
+
+  def setup_client
+    wsdl = File.join(DIR, 'simpletype.wsdl')
+    @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    @client.wiredump_dev = STDOUT if $DEBUG
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.generate_explicit_type = false
+  end
+
+  def teardown
+    teardown_server
+    teardown_client
+  end
+
+  def teardown_server
+    @server.shutdown
+    @server_thread.kill
+    @server_thread.join
+  end
+
+  def teardown_client
+    @client.reset_stream
+  end
+
+  def start_server_thread(server)
+    t = Thread.new {
+      Thread.current.abort_on_exception = true
+      server.start
+    }
+    t
+  end
+
+  def test_ping
+    result = @client.echo_version("1.9")
+    assert_equal("1.9", result.myversion)
+    assert_equal("checked", result.msg)
+    assert_raise(XSD::ValueSpaceError) do
+      @client.echo_version("2.0")
+    end
+    assert_raise(XSD::ValueSpaceError) do
+      @client.echo_version(nil) # nil => "2.0" => out of range
+    end
+  end
+end
+
+
+end

data/test/wsdl/abstract/abstract.wsdl

@@ -0,0 +1,97 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<wsdl:definitions
+  name="abstract"
+  targetNamespace="urn:www.example.org:abstract"
+  xmlns="http://schemas.xmlsoap.org/wsdl/"
+  xmlns:tns="urn:www.example.org:abstract"
+  xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
+  xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/"
+  xmlns:wsdlsoap="http://schemas.xmlsoap.org/wsdl/soap/"
+  xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+
+  <wsdl:types>
+    <schema targetNamespace="urn:www.example.org:abstract"
+      xmlns="http://www.w3.org/2001/XMLSchema">
+
+      <import namespace="http://schemas.xmlsoap.org/soap/encoding/"/>
+
+      <complexType name="Book">
+        <sequence>
+          <element name="name" type="xsd:string"/>
+          <element name="author" type="tns:Author"/>
+        </sequence>
+      </complexType>
+
+      <complexType abstract="true" name="Author">
+        <sequence>
+          <element name="firstname" type="xsd:string"/>
+          <element name="lastname" type="xsd:string"/>
+        </sequence>
+      </complexType>
+
+      <complexType name="UserAuthor">
+        <complexContent>
+          <extension base="tns:Author">
+            <sequence>
+              <element name="userid" type="xsd:string"/>
+            </sequence>
+          </extension>
+        </complexContent>
+      </complexType>
+
+      <complexType name="NonUserAuthor">
+        <complexContent>
+          <extension base="tns:Author">
+            <sequence>
+              <element name="nonuserid" type="xsd:string"/>
+            </sequence>
+          </extension>
+        </complexContent>
+      </complexType>
+    </schema>
+  </wsdl:types>
+
+  <wsdl:message name="echoRequest">
+    <wsdl:part name="name" type="xsd:string"/>
+    <wsdl:part name="author" type="tns:Author"/>
+  </wsdl:message>
+
+  <wsdl:message name="echoResponse">
+    <wsdl:part name="return" type="tns:Book"/>
+  </wsdl:message>
+
+  <wsdl:portType name="AbstractService">
+    <wsdl:operation name="echo" parameterOrder="obj typename">
+      <wsdl:input message="tns:echoRequest" name="echoRequest"/>
+      <wsdl:output message="tns:echoResponse" name="echoResponse"/>
+    </wsdl:operation>
+  </wsdl:portType>
+
+  <wsdl:binding name="AbstractServiceSoapBinding"
+    type="tns:AbstractService">
+
+    <wsdlsoap:binding style="rpc"
+      transport="http://schemas.xmlsoap.org/soap/http"/>
+
+    <wsdl:operation name="echo">
+      <wsdlsoap:operation soapAction=""/>
+      <wsdl:input name="echoRequest">
+        <wsdlsoap:body
+          encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:www.example.org:abstract" use="encoded"/>
+      </wsdl:input>
+      <wsdl:output name="echoResponse">
+        <wsdlsoap:body
+          encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
+          namespace="urn:www.example.org:abstract" use="encoded"/>
+      </wsdl:output>
+    </wsdl:operation>
+  </wsdl:binding>
+
+  <wsdl:service name="AbstractServiceService">
+    <wsdl:port name="AbstractService"
+      binding="tns:AbstractServiceSoapBinding">
+      <wsdlsoap:address location="http://localhost:8080/"/>
+    </wsdl:port>
+  </wsdl:service>
+</wsdl:definitions>

data/test/wsdl/abstract/test_abstract.rb

@@ -0,0 +1,130 @@
+require 'test/unit'
+require 'wsdl/parser'
+require 'wsdl/soap/wsdl2ruby'
+require 'soap/rpc/standaloneServer'
+require 'soap/wsdlDriver'
+
+
+module WSDL; module Abstract
+
+
+class TestAbstract < Test::Unit::TestCase
+  class Server < ::SOAP::RPC::StandaloneServer
+    def on_init
+      add_rpc_method(self, 'echo', 'name', 'author')
+      self.mapping_registry = AbstractMappingRegistry::EncodedRegistry
+    end
+  
+    def echo(name, author)
+      Book.new(name, author)
+    end
+  end
+
+  DIR = File.dirname(File.expand_path(__FILE__))
+
+  Port = 17171
+
+  def setup
+    setup_classdef
+    setup_server
+    @client = nil
+  end
+
+  def teardown
+    teardown_server
+    unless $DEBUG
+      File.unlink(pathname('abstract.rb'))
+      File.unlink(pathname('abstractMappingRegistry.rb'))
+      File.unlink(pathname('abstractDriver.rb'))
+    end
+    @client.reset_stream if @client
+  end
+
+  def setup_server
+    @server = Server.new('Test', "urn:www.example.org:abstract", '0.0.0.0', Port)
+    @server.level = Logger::Severity::ERROR
+    @server_thread = start_server_thread(@server)
+  end
+
+  def setup_classdef
+    gen = WSDL::SOAP::WSDL2Ruby.new
+    gen.location = pathname("abstract.wsdl")
+    gen.basedir = DIR
+    gen.logger.level = Logger::FATAL
+    gen.opt['classdef'] = nil
+    gen.opt['driver'] = nil
+    gen.opt['force'] = true
+    gen.run
+    backupdir = Dir.pwd
+    begin
+      Dir.chdir(DIR)
+      require pathname('abstract.rb')
+      require pathname('abstractMappingRegistry.rb')
+      require pathname('abstractDriver.rb')
+    ensure
+      Dir.chdir(backupdir)
+    end
+  end
+
+  def teardown_server
+    @server.shutdown
+    @server_thread.kill
+    @server_thread.join
+  end
+
+  def start_server_thread(server)
+    t = Thread.new {
+      Thread.current.abort_on_exception = true
+      server.start
+    }
+    t
+  end
+
+  def pathname(filename)
+    File.join(DIR, filename)
+  end
+
+  def test_wsdl
+    wsdl = File.join(DIR, 'abstract.wsdl')
+    @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    @client.mapping_registry = AbstractMappingRegistry::EncodedRegistry
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = STDERR if $DEBUG
+
+    author = UserAuthor.new("first", "last", "uid")
+    ret = @client.echo("book1", author)
+    assert_equal("book1", ret.name)
+    assert_equal(author.firstname, ret.author.firstname)
+    assert_equal(author.lastname, ret.author.lastname)
+    assert_equal(author.userid, ret.author.userid)
+
+    author = NonUserAuthor.new("first", "last", "nonuserid")
+    ret = @client.echo("book2", author)
+    assert_equal("book2", ret.name)
+    assert_equal(author.firstname, ret.author.firstname)
+    assert_equal(author.lastname, ret.author.lastname)
+    assert_equal(author.nonuserid, ret.author.nonuserid)
+  end
+
+  def test_stub
+    @client = AbstractService.new("http://localhost:#{Port}/")
+    @client.wiredump_dev = STDERR if $DEBUG
+
+    author = UserAuthor.new("first", "last", "uid")
+    ret = @client.echo("book1", author)
+    assert_equal("book1", ret.name)
+    assert_equal(author.firstname, ret.author.firstname)
+    assert_equal(author.lastname, ret.author.lastname)
+    assert_equal(author.userid, ret.author.userid)
+
+    author = NonUserAuthor.new("first", "last", "nonuserid")
+    ret = @client.echo("book2", author)
+    assert_equal("book2", ret.name)
+    assert_equal(author.firstname, ret.author.firstname)
+    assert_equal(author.lastname, ret.author.lastname)
+    assert_equal(author.nonuserid, ret.author.nonuserid)
+  end
+end
+
+
+end; end

data/test/wsdl/any/any.wsdl

@@ -0,0 +1,51 @@
+<?xml version="1.0" encoding="utf-8"?>
+<definitions name="echo"
+    xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
+    xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+    xmlns:tns="urn:example.com:echo"
+    xmlns:txd="urn:example.com:echo-type"
+    targetNamespace="urn:example.com:echo"
+    xmlns="http://schemas.xmlsoap.org/wsdl/">
+  <types>
+    <xsd:schema targetNamespace="urn:example.com:echo-type">
+      <xsd:complexType name="foo.bar">
+        <xsd:sequence>
+          <xsd:element name="before" type="xsd:string"/>
+          <xsd:any/>
+          <xsd:element name="after" type="xsd:string"/>
+        </xsd:sequence>
+      </xsd:complexType>
+      <xsd:element name="foo.bar" type="txd:foo.bar"/>
+    </xsd:schema>
+  </types>
+
+  <message name="msg_echoitem">
+    <part name="parameters" type="txd:foo.bar"/>
+  </message>
+
+  <portType name="echo_port_type">
+    <operation name="echo">
+      <input message="tns:msg_echoitem"/>
+      <output message="tns:msg_echoitem"/>
+    </operation>
+  </portType>
+
+  <binding name="echo_binding" type="tns:echo_port_type">
+    <soap:binding transport="http://schemas.xmlsoap.org/soap/http" style="document"/>
+    <operation name="echo">
+      <soap:operation soapAction="urn:example.com:echo"/>
+      <input>
+        <soap:body use="literal"/>
+      </input>
+      <output>
+        <soap:body use="literal"/>
+      </output>
+    </operation>
+  </binding>
+
+  <service name="echo_service">
+    <port name="echo_port" binding="tns:echo_binding">
+      <soap:address location="http://localhost:10080"/>
+    </port>
+  </service>
+</definitions>

data/test/wsdl/any/expectedDriver.rb

@@ -0,0 +1,46 @@
+require 'echo.rb'
+require 'echoMappingRegistry.rb'
+require 'soap/rpc/driver'
+
+class Echo_port_type < ::SOAP::RPC::Driver
+  DefaultEndpointUrl = "http://localhost:10080"
+
+  Methods = [
+    [ "urn:example.com:echo",
+      "echo",
+      [ ["in", "parameters", ["::SOAP::SOAPElement", "urn:example.com:echo-type", "foo.bar"]],
+        ["out", "parameters", ["::SOAP::SOAPElement", "urn:example.com:echo-type", "foo.bar"]] ],
+      { :request_style =>  :document, :request_use =>  :literal,
+        :response_style => :document, :response_use => :literal }
+    ]
+  ]
+
+  def initialize(endpoint_url = nil)
+    endpoint_url ||= DefaultEndpointUrl
+    super(endpoint_url, nil)
+    self.mapping_registry = EchoMappingRegistry::EncodedRegistry
+    self.literal_mapping_registry = EchoMappingRegistry::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
+

data/test/wsdl/any/expectedEcho.rb

@@ -0,0 +1,18 @@
+require 'xsd/qname'
+
+# {urn:example.com:echo-type}foo.bar
+class FooBar
+  attr_accessor :before
+  attr_reader :__xmlele_any
+  attr_accessor :after
+
+  def set_any(elements)
+    @__xmlele_any = elements
+  end
+
+  def initialize(before = nil, after = nil)
+    @before = before
+    @__xmlele_any = nil
+    @after = after
+  end
+end

data/test/wsdl/any/expectedService.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+require 'echoServant.rb'
+require 'echoMappingRegistry.rb'
+require 'soap/rpc/standaloneServer'
+
+class Echo_port_type
+  Methods = [
+    [ "urn:example.com:echo",
+      "echo",
+      [ ["in", "parameters", ["::SOAP::SOAPElement", "urn:example.com:echo-type", "foo.bar"]],
+        ["out", "parameters", ["::SOAP::SOAPElement", "urn:example.com:echo-type", "foo.bar"]] ],
+      { :request_style =>  :document, :request_use =>  :literal,
+        :response_style => :document, :response_use => :literal }
+    ]
+  ]
+end
+
+class Echo_port_typeApp < ::SOAP::RPC::StandaloneServer
+  def initialize(*arg)
+    super(*arg)
+    servant = Echo_port_type.new
+    Echo_port_type::Methods.each do |definitions|
+      opt = definitions.last
+      if opt[:request_style] == :document
+        @router.add_document_operation(servant, *definitions)
+      else
+        @router.add_rpc_operation(servant, *definitions)
+      end
+    end
+    self.mapping_registry = EchoMappingRegistry::EncodedRegistry
+    self.literal_mapping_registry = EchoMappingRegistry::LiteralRegistry
+  end
+end
+
+if $0 == __FILE__
+  # Change listen port.
+  server = Echo_port_typeApp.new('app', nil, '0.0.0.0', 10080)
+  trap(:INT) do
+    server.shutdown
+  end
+  server.start
+end