soap5r 2.0.0

data/test/wsdl/qualified/test_qualified.rb

@@ -0,0 +1,138 @@
+# encoding: ASCII-8BIT
+require 'helper'
+require 'testutil'
+require 'wsdl/soap/wsdl2ruby'
+require 'soap/rpc/standaloneServer'
+require 'soap/wsdlDriver'
+
+
+if defined?(HTTPClient)
+
+module WSDL
+
+
+class TestQualified < Test::Unit::TestCase
+  class Server < ::SOAP::RPC::StandaloneServer
+    Namespace = 'http://www50.brinkster.com/vbfacileinpt/np'
+
+    def on_init
+      add_document_method(
+        self,
+        Namespace + '/GetPrimeNumbers',
+        'GetPrimeNumbers',
+        XSD::QName.new(Namespace, 'GetPrimeNumbers'),
+        XSD::QName.new(Namespace, 'GetPrimeNumbersResponse')
+      )
+    end
+  
+    def GetPrimeNumbers(arg)
+      nil
+    end
+  end
+
+  DIR = File.dirname(File.expand_path(__FILE__))
+  Port = 17171
+
+  def setup
+    setup_server
+    setup_clientdef
+    @client = nil
+  end
+
+  def teardown
+    teardown_server if @server
+    unless $DEBUG
+      File.unlink(pathname('default.rb'))
+      File.unlink(pathname('defaultMappingRegistry.rb'))
+      File.unlink(pathname('defaultDriver.rb'))
+    end
+    @client.reset_stream if @client
+  end
+
+  def setup_server
+    @server = Server.new('Test', "urn:lp", '0.0.0.0', Port)
+    @server.level = Logger::Severity::ERROR
+    @server_thread = TestUtil.start_server_thread(@server)
+  end
+
+  def setup_clientdef
+    backupdir = Dir.pwd
+    begin
+      Dir.chdir(DIR)
+      gen = WSDL::SOAP::WSDL2Ruby.new
+      gen.location = pathname("np.wsdl")
+      gen.basedir = DIR
+      gen.logger.level = Logger::FATAL
+      gen.opt['module_path'] = self.class.to_s.sub(/::[^:]+$/, '')
+      gen.opt['classdef'] = nil
+      gen.opt['mapping_registry'] = nil
+      gen.opt['driver'] = nil
+      gen.opt['force'] = true
+      gen.run
+      require 'default.rb'
+    ensure
+      $".delete('default.rb')
+      Dir.chdir(backupdir)
+    end
+  end
+
+  def teardown_server
+    @server.shutdown
+    @server_thread.kill
+    @server_thread.join
+  end
+
+  def pathname(filename)
+    File.join(DIR, filename)
+  end
+
+  LOGIN_REQUEST_QUALIFIED =
+%q[<?xml version="1.0" encoding="utf-8" ?>
+<env:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+    xmlns:env="http://schemas.xmlsoap.org/soap/envelope/"
+    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <env:Body>
+    <n1:GetPrimeNumbers xmlns:n1="http://www50.brinkster.com/vbfacileinpt/np">
+      <Min>2</Min>
+      <n1:Max>10</n1:Max>
+    </n1:GetPrimeNumbers>
+  </env:Body>
+</env:Envelope>]
+
+  def test_wsdl
+    wsdl = File.join(DIR, 'np.wsdl')
+    @client = nil
+    backupdir = Dir.pwd
+    begin
+      Dir.chdir(DIR)
+      @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    ensure
+      Dir.chdir(backupdir)
+    end
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = str = ''
+    @client.GetPrimeNumbers(:Min => 2, :Max => 10)
+    assert_xml_equal(LOGIN_REQUEST_QUALIFIED, parse_requestxml(str),
+      [LOGIN_REQUEST_QUALIFIED, parse_requestxml(str)].join("\n\n"))
+  end
+
+  include ::SOAP
+  def test_naive
+    TestUtil.require(DIR, 'defaultDriver.rb', 'defaultMappingRegistry.rb', 'default.rb')
+    @client = PnumSoap.new("http://localhost:#{Port}/")
+
+    @client.wiredump_dev = str = ''
+    @client.getPrimeNumbers(GetPrimeNumbers.new(2, 10))
+    assert_xml_equal(LOGIN_REQUEST_QUALIFIED, parse_requestxml(str),
+      [LOGIN_REQUEST_QUALIFIED, parse_requestxml(str)].join("\n\n"))
+  end
+
+  def parse_requestxml(str)
+    str.split(/\r?\n\r?\n/)[3]
+  end
+end
+
+
+end
+
+end

data/test/wsdl/qualified/test_unqualified.rb

@@ -0,0 +1,139 @@
+# encoding: ASCII-8BIT
+require 'helper'
+require 'testutil'
+require 'wsdl/soap/wsdl2ruby'
+require 'soap/rpc/standaloneServer'
+require 'soap/wsdlDriver'
+
+
+if defined?(HTTPClient)
+
+module WSDL
+
+
+class TestUnqualified < Test::Unit::TestCase
+  class Server < ::SOAP::RPC::StandaloneServer
+    Namespace = 'urn:lp'
+
+    def on_init
+      add_document_method(
+        self,
+        Namespace + ':login',
+        'login',
+        XSD::QName.new(Namespace, 'login'),
+        XSD::QName.new(Namespace, 'loginResponse')
+      )
+    end
+  
+    def login(arg)
+      nil
+    end
+  end
+
+  DIR = File.dirname(File.expand_path(__FILE__))
+  Port = 17171
+
+  def setup
+    setup_server
+    setup_clientdef
+    @client = nil
+  end
+
+  def teardown
+    teardown_server if @server
+    unless $DEBUG
+      File.unlink(pathname('lp.rb'))
+      File.unlink(pathname('lpMappingRegistry.rb'))
+      File.unlink(pathname('lpDriver.rb'))
+    end
+    @client.reset_stream if @client
+  end
+
+  def setup_server
+    @server = Server.new('Test', "urn:lp", '0.0.0.0', Port)
+    @server.level = Logger::Severity::ERROR
+    @server_thread = TestUtil.start_server_thread(@server)
+  end
+
+  def setup_clientdef
+    backupdir = Dir.pwd
+    begin
+      Dir.chdir(DIR)
+      gen = WSDL::SOAP::WSDL2Ruby.new
+      gen.location = pathname("lp.wsdl")
+      gen.basedir = DIR
+      gen.logger.level = Logger::FATAL
+      gen.opt['module_path'] = self.class.to_s.sub(/::[^:]+$/, '')
+      gen.opt['classdef'] = nil
+      gen.opt['mapping_registry'] = nil
+      gen.opt['driver'] = nil
+      gen.opt['force'] = true
+      gen.run
+      require 'lp.rb'
+    ensure
+      $".delete('lp.rb')
+      Dir.chdir(backupdir)
+    end
+  end
+
+  def teardown_server
+    @server.shutdown
+    @server_thread.kill
+    @server_thread.join
+  end
+
+  def pathname(filename)
+    File.join(DIR, filename)
+  end
+
+  LOGIN_REQUEST_QUALIFIED_UNTYPED =
+%q[<?xml version="1.0" encoding="utf-8" ?>
+<env:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema"
+    xmlns:env="http://schemas.xmlsoap.org/soap/envelope/"
+    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <env:Body>
+    <n1:login xmlns:n1="urn:lp">
+      <username>NaHi</username>
+      <password>passwd</password>
+      <timezone>JST</timezone>
+    </n1:login>
+  </env:Body>
+</env:Envelope>]
+
+  def test_wsdl
+    wsdl = File.join(DIR, 'lp.wsdl')
+    @client = nil
+    backupdir = Dir.pwd
+    begin
+      Dir.chdir(DIR)
+      @client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
+    ensure
+      Dir.chdir(backupdir)
+    end
+    @client.endpoint_url = "http://localhost:#{Port}/"
+    @client.wiredump_dev = str = ''
+    @client.login(:timezone => 'JST', :password => 'passwd',
+      :username => 'NaHi')
+    # untyped because of passing a Hash
+    assert_xml_equal(LOGIN_REQUEST_QUALIFIED_UNTYPED, parse_requestxml(str))
+  end
+
+  include ::SOAP
+  def test_naive
+    TestUtil.require(DIR, 'lpDriver.rb', 'lpMappingRegistry.rb', 'lp.rb')
+    @client = Lp_porttype.new("http://localhost:#{Port}/")
+
+    @client.wiredump_dev = str = ''
+    @client.login(Login.new('NaHi', 'passwd', 'JST'))
+    assert_xml_equal(LOGIN_REQUEST_QUALIFIED_UNTYPED, parse_requestxml(str))
+  end
+
+  def parse_requestxml(str)
+    str.split(/\r?\n\r?\n/)[3]
+  end
+end
+
+
+end
+
+end

data/test/wsdl/raa/RAAService.rb

@@ -0,0 +1,126 @@
+#!/usr/bin/env ruby
+# encoding: ASCII-8BIT
+require 'soap/rpc/standaloneServer'
+
+module WSDL; module RAA
+
+class RAABaseServicePortTypeServer
+  def getAllListings
+    ["ruby", "soap4r"]
+  end
+
+  def getProductTree
+    raise NotImplementedError.new
+  end
+  
+  def getInfoFromCategory(category)
+    raise NotImplementedError.new
+  end
+  
+  def getModifiedInfoSince(timeInstant)
+    raise NotImplementedError.new
+  end
+  
+  def getInfoFromName(productName)
+    Info.new(
+      Category.new("major", "minor"), 
+      Product.new(123, productName, "short description", "version", "status",
+        URI.parse("http://example.com/homepage"),
+        URI.parse("http://example.com/download"),
+        "license", "description"),
+      Owner.new(456, URI.parse("mailto:email@example.com"), "name"),
+      Time.now,
+      Time.now)
+  end
+  
+  def getInfoFromOwnerId(ownerId)
+    raise NotImplementedError.new
+  end
+
+  Methods = [
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getAllListings"),
+      "",
+      "getAllListings",
+      [ [:retval, "return", ["WSDL::RAA::C_String[]", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "StringArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getProductTree"),
+      "",
+      "getProductTree",
+      [ [:retval, "return", ["Hash", "http://xml.apache.org/xml-soap", "Map"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getInfoFromCategory"),
+      "",
+      "getInfoFromCategory",
+      [ [:in, "category", ["WSDL::RAA::Category", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "Category"]],
+        [:retval, "return", ["WSDL::RAA::Info[]", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getModifiedInfoSince"),
+      "",
+      "getModifiedInfoSince",
+      [ [:in, "timeInstant", ["::SOAP::SOAPDateTime"]],
+        [:retval, "return", ["WSDL::RAA::Info[]", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getInfoFromName"),
+      "",
+      "getInfoFromName",
+      [ [:in, "productName", ["::SOAP::SOAPString"]],
+        [:retval, "return", ["WSDL::RAA::Info", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "Info"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new("http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "getInfoFromOwnerId"),
+      "",
+      "getInfoFromOwnerId",
+      [ [:in, "ownerId", ["::SOAP::SOAPInt"]],
+        [:retval, "return", ["WSDL::RAA::Info[]", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ]
+  ]
+end
+
+end; end
+
+module WSDL; module RAA
+
+class RAABaseServicePortTypeApp < ::SOAP::RPC::StandaloneServer
+  def initialize(*arg)
+    super(*arg)
+    servant = WSDL::RAA::RAABaseServicePortTypeServer.new
+    WSDL::RAA::RAABaseServicePortType::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 = RAAMappingRegistry::EncodedRegistry
+    self.literal_mapping_registry = RAAMappingRegistry::LiteralRegistry
+  end
+end
+
+end; end
+
+if $0 == __FILE__
+  # Change listen port.
+  server = WSDL::RAA::RAABaseServicePortTypeApp.new('app', nil, '0.0.0.0', 10080)
+  trap(:INT) do
+    server.shutdown
+  end
+  server.start
+end

data/test/wsdl/raa/README.txt

@@ -0,0 +1,8 @@
+RAAServant.rb: based on the file which is generated with the following command;
+  bin/wsdl2ruby.rb --wsdl raa.wsdl --servant_skelton --force
+
+RAAService.rb: generated with the following command;
+  bin/wsdl2ruby.rb --wsdl raa.wsdl --standalone_server_stub --force
+
+RAA.rb: generated with the following command;
+  bin/wsdl2ruby.rb --wsdl raa.wsdl --classdef --force

data/test/wsdl/raa/expectedClassDef.rb

@@ -0,0 +1,101 @@
+# encoding: ASCII-8BIT
+require 'xsd/qname'
+
+module WSDL; module RAA
+
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}Category
+#   major - SOAP::SOAPString
+#   minor - SOAP::SOAPString
+class Category
+  attr_accessor :major
+  attr_accessor :minor
+
+  def initialize(major = nil, minor = nil)
+    @major = major
+    @minor = minor
+  end
+end
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}Product
+#   id - SOAP::SOAPInt
+#   name - SOAP::SOAPString
+#   short_description - SOAP::SOAPString
+#   version - SOAP::SOAPString
+#   status - SOAP::SOAPString
+#   homepage - SOAP::SOAPAnyURI
+#   download - SOAP::SOAPAnyURI
+#   license - SOAP::SOAPString
+#   description - SOAP::SOAPString
+class Product
+  attr_accessor :id
+  attr_accessor :name
+  attr_accessor :short_description
+  attr_accessor :version
+  attr_accessor :status
+  attr_accessor :homepage
+  attr_accessor :download
+  attr_accessor :license
+  attr_accessor :description
+
+  def initialize(id = nil, name = nil, short_description = nil, version = nil, status = nil, homepage = nil, download = nil, license = nil, description = nil)
+    @id = id
+    @name = name
+    @short_description = short_description
+    @version = version
+    @status = status
+    @homepage = homepage
+    @download = download
+    @license = license
+    @description = description
+  end
+end
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}Owner
+#   id - SOAP::SOAPInt
+#   email - SOAP::SOAPAnyURI
+#   name - SOAP::SOAPString
+class Owner
+  attr_accessor :id
+  attr_accessor :email
+  attr_accessor :name
+
+  def initialize(id = nil, email = nil, name = nil)
+    @id = id
+    @email = email
+    @name = name
+  end
+end
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}Info
+#   category - WSDL::RAA::Category
+#   product - WSDL::RAA::Product
+#   owner - WSDL::RAA::Owner
+#   created - SOAP::SOAPDateTime
+#   updated - SOAP::SOAPDateTime
+class Info
+  attr_accessor :category
+  attr_accessor :product
+  attr_accessor :owner
+  attr_accessor :created
+  attr_accessor :updated
+
+  def initialize(category = nil, product = nil, owner = nil, created = nil, updated = nil)
+    @category = category
+    @product = product
+    @owner = owner
+    @created = created
+    @updated = updated
+  end
+end
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}InfoArray
+class InfoArray < ::Array
+end
+
+# {http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/}StringArray
+class StringArray < ::Array
+end
+
+
+end; end

data/test/wsdl/raa/expectedDriver.rb

@@ -0,0 +1,97 @@
+# encoding: ASCII-8BIT
+require 'RAA.rb'
+require 'RAAMappingRegistry.rb'
+require 'soap/rpc/driver'
+
+module WSDL::RAA
+
+class RAABaseServicePortType < ::SOAP::RPC::Driver
+  DefaultEndpointUrl = "http://raa.ruby-lang.org/soap/1.0.2/"
+  NsC_002 = "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/"
+
+  Methods = [
+    [ XSD::QName.new(NsC_002, "getAllListings"),
+      "",
+      "getAllListings",
+      [ [:retval, "return", ["WSDL::RAA::StringArray", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "StringArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new(NsC_002, "getProductTree"),
+      "",
+      "getProductTree",
+      [ [:retval, "return", ["Hash", "http://xml.apache.org/xml-soap", "Map"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new(NsC_002, "getInfoFromCategory"),
+      "",
+      "getInfoFromCategory",
+      [ [:in, "category", ["WSDL::RAA::Category", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "Category"]],
+        [:retval, "return", ["WSDL::RAA::InfoArray", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new(NsC_002, "getModifiedInfoSince"),
+      "",
+      "getModifiedInfoSince",
+      [ [:in, "timeInstant", ["::SOAP::SOAPDateTime"]],
+        [:retval, "return", ["WSDL::RAA::InfoArray", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new(NsC_002, "getInfoFromName"),
+      "",
+      "getInfoFromName",
+      [ [:in, "productName", ["::SOAP::SOAPString"]],
+        [:retval, "return", ["WSDL::RAA::Info", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "Info"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ],
+    [ XSD::QName.new(NsC_002, "getInfoFromOwnerId"),
+      "",
+      "getInfoFromOwnerId",
+      [ [:in, "ownerId", ["::SOAP::SOAPInt"]],
+        [:retval, "return", ["WSDL::RAA::InfoArray", "http://www.ruby-lang.org/xmlns/soap/interface/RAA/0.0.2/", "InfoArray"]] ],
+      { :request_style =>  :rpc, :request_use =>  :encoded,
+        :response_style => :rpc, :response_use => :encoded,
+        :faults => {} }
+    ]
+  ]
+
+  def initialize(endpoint_url = nil)
+    endpoint_url ||= DefaultEndpointUrl
+    super(endpoint_url, nil)
+    self.mapping_registry = RAAMappingRegistry::EncodedRegistry
+    self.literal_mapping_registry = RAAMappingRegistry::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