rtiss_soap4r 1.6.1 → 2.0.4

data/test/wsdl/raa/test_raa.rb

@@ -1,127 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'testutil'
-require 'soap/wsdlDriver'
-require 'wsdl/soap/wsdl2ruby'
-
-
-module WSDL
-module RAA
-
-
-class TestRAA < Test::Unit::TestCase
-  DIR = File.dirname(File.expand_path(__FILE__))
-
-  Port = 17171
-
-  def setup
-    setup_stub
-    setup_server
-    setup_client
-  end
-
-  def setup_stub
-    gen = WSDL::SOAP::WSDL2Ruby.new
-    gen.location = pathname("raa.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
-    TestUtil.require(DIR, 'RAADriver.rb', 'RAAMappingRegistry.rb', 'RAA.rb')
-  end
-
-  def setup_server
-    require pathname('RAAService.rb')
-    @server = RAABaseServicePortTypeApp.new('RAA server', nil, '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      Thread.current.abort_on_exception = true
-      @server.start
-    }
-  end
-
-  def setup_client
-    wsdl = File.join(DIR, 'raa.wsdl')
-    @raa = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
-    @raa.endpoint_url = "http://localhost:#{Port}/"
-    @raa.wiredump_dev = STDOUT if $DEBUG
-    @raa.mapping_registry = RAAMappingRegistry::EncodedRegistry
-    @raa.literal_mapping_registry = RAAMappingRegistry::LiteralRegistry
-  end
-
-  def teardown
-    teardown_server if defined?(@server)
-    teardown_client if defined?(@client)
-    unless $DEBUG
-      File.unlink(pathname('RAA.rb'))
-      File.unlink(pathname('RAAMappingRegistry.rb'))
-      File.unlink(pathname('RAADriver.rb'))
-    end
-  end
-
-  def teardown_server
-    @server.shutdown
-    @t.kill
-    @t.join
-  end
-
-  def teardown_client
-    @raa.reset_stream
-  end
-
-  def test_stubgeneration
-    compare("expectedClassDef.rb", "RAA.rb")
-    compare("expectedMappingRegistry.rb", "RAAMappingRegistry.rb")
-    compare("expectedDriver.rb", "RAADriver.rb")
-  end
-
-  def test_raa
-    do_test_raa(@raa)
-  end
-
-  def test_stub
-    client = RAABaseServicePortType.new("http://localhost:#{Port}/")
-    do_test_raa(client)
-  end
-
-  def do_test_raa(client)
-    assert_equal(["ruby", "soap4r"], client.getAllListings)
-    info = client.getInfoFromName("SOAP4R")
-    assert_equal(Info, info.class)
-    assert_equal(Category, info.category.class)
-    assert_equal(Product, info.product.class)
-    assert_equal(Owner, info.owner.class)
-    assert_equal("major", info.category.major)
-    assert_equal("minor", info.category.minor)
-    assert_equal(123, info.product.id)
-    assert_equal("SOAP4R", info.product.name)
-    assert_equal("short description", info.product.short_description)
-    assert_equal("version", info.product.version)
-    assert_equal("status", info.product.status)
-    assert_equal("http://example.com/homepage", info.product.homepage.to_s)
-    assert_equal("http://example.com/download", info.product.download.to_s)
-    assert_equal("license", info.product.license)
-    assert_equal("description", info.product.description)
-    assert_equal(456, info.owner.id)
-    assert_equal("mailto:email@example.com", info.owner.email.to_s)
-    assert_equal("name", info.owner.name)
-    assert(!info.created.nil?)
-    assert(!info.updated.nil?)
-  end
-
-  def compare(expected, actual)
-    TestUtil.filecompare(pathname(expected), pathname(actual))
-  end
-
-  def pathname(filename)
-    File.join(DIR, filename)
-  end
-end
-
-
-end
-end

data/test/wsdl/ref/expectedDriver.rb

@@ -1,52 +0,0 @@
-# encoding: ASCII-8BIT
-require 'product.rb'
-require 'productMappingRegistry.rb'
-require 'soap/rpc/driver'
-
-module WSDL::Ref
-
-class Ref_porttype < ::SOAP::RPC::Driver
-  DefaultEndpointUrl = "http://localhost:17171/"
-
-  Methods = [
-    [ "urn:ref:echo",
-      "echo",
-      [ [:in, "parameters", ["::SOAP::SOAPElement", "urn:ref", "Product-Bag"]],
-        [:out, "parameters", ["::SOAP::SOAPElement", "urn:ref", "Creator"]] ],
-      { :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 = ProductMappingRegistry::EncodedRegistry
-    self.literal_mapping_registry = ProductMappingRegistry::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/ref/expectedProduct.rb

@@ -1,244 +0,0 @@
-# encoding: ASCII-8BIT
-require 'xsd/qname'
-
-module WSDL; module Ref
-
-
-# {urn:ref}Product
-#   name - SOAP::SOAPString
-#   rating - SOAP::SOAPString
-class Product
-  attr_accessor :name
-  attr_accessor :rating
-
-  def initialize(name = nil, rating = nil)
-    @name = name
-    @rating = rating
-  end
-end
-
-# {urn:ref}Comment
-#   xmlattr_msgid - SOAP::SOAPString
-class Comment < ::String
-  AttrMsgid = XSD::QName.new(nil, "msgid")
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_msgid
-    __xmlattr[AttrMsgid]
-  end
-
-  def xmlattr_msgid=(value)
-    __xmlattr[AttrMsgid] = value
-  end
-
-  def initialize(*arg)
-    super
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}_point
-#   xmlattr_unit - SOAP::SOAPString
-class C__point < ::String
-  AttrUnit = XSD::QName.new(nil, "unit")
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_unit
-    __xmlattr[AttrUnit]
-  end
-
-  def xmlattr_unit=(value)
-    __xmlattr[AttrUnit] = value
-  end
-
-  def initialize(*arg)
-    super
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}Document
-#   xmlattr_ID - SOAP::SOAPString
-class Document < ::String
-  AttrID = XSD::QName.new(nil, "ID")
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_ID
-    __xmlattr[AttrID]
-  end
-
-  def xmlattr_ID=(value)
-    __xmlattr[AttrID] = value
-  end
-
-  def initialize(*arg)
-    super
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}DerivedChoice_BaseSimpleContent
-#   varStringExt - SOAP::SOAPString
-#   varFloatExt - SOAP::SOAPFloat
-#   xmlattr_ID - SOAP::SOAPString
-#   xmlattr_attrStringExt - SOAP::SOAPString
-class DerivedChoice_BaseSimpleContent < Document
-  AttrAttrStringExt = XSD::QName.new(nil, "attrStringExt")
-  AttrID = XSD::QName.new(nil, "ID")
-
-  attr_accessor :varStringExt
-  attr_accessor :varFloatExt
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_ID
-    __xmlattr[AttrID]
-  end
-
-  def xmlattr_ID=(value)
-    __xmlattr[AttrID] = value
-  end
-
-  def xmlattr_attrStringExt
-    __xmlattr[AttrAttrStringExt]
-  end
-
-  def xmlattr_attrStringExt=(value)
-    __xmlattr[AttrAttrStringExt] = value
-  end
-
-  def initialize(varStringExt = nil, varFloatExt = nil)
-    @varStringExt = varStringExt
-    @varFloatExt = varFloatExt
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}Rating
-class Rating < ::String
-  C_0 = new("0")
-  C_1 = new("+1")
-  C_1_2 = new("-1")
-end
-
-# {urn:ref}Product-Bag
-#   bag - WSDL::Ref::Product
-#   rating - SOAP::SOAPString
-#   comment_1 - WSDL::Ref::ProductBag::Comment_1
-#   comment_2 - WSDL::Ref::Comment
-#   m___point - WSDL::Ref::C__point
-#   xmlattr_version - SOAP::SOAPString
-#   xmlattr_yesno - SOAP::SOAPString
-class ProductBag
-  AttrVersion = XSD::QName.new("urn:ref", "version")
-  AttrYesno = XSD::QName.new("urn:ref", "yesno")
-
-  # inner class for member: Comment_1
-  # {}Comment_1
-  #   xmlattr_msgid - SOAP::SOAPString
-  class Comment_1 < ::String
-    AttrMsgid = XSD::QName.new(nil, "msgid")
-
-    def __xmlattr
-      @__xmlattr ||= {}
-    end
-
-    def xmlattr_msgid
-      __xmlattr[AttrMsgid]
-    end
-
-    def xmlattr_msgid=(value)
-      __xmlattr[AttrMsgid] = value
-    end
-
-    def initialize(*arg)
-      super
-      @__xmlattr = {}
-    end
-  end
-
-  attr_accessor :bag
-  attr_accessor :rating
-  attr_accessor :comment_1
-  attr_accessor :comment_2
-
-  def m___point
-    @v___point
-  end
-
-  def m___point=(value)
-    @v___point = value
-  end
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_version
-    __xmlattr[AttrVersion]
-  end
-
-  def xmlattr_version=(value)
-    __xmlattr[AttrVersion] = value
-  end
-
-  def xmlattr_yesno
-    __xmlattr[AttrYesno]
-  end
-
-  def xmlattr_yesno=(value)
-    __xmlattr[AttrYesno] = value
-  end
-
-  def initialize(bag = [], rating = [], comment_1 = [], comment_2 = [], v___point = nil)
-    @bag = bag
-    @rating = rating
-    @comment_1 = comment_1
-    @comment_2 = comment_2
-    @v___point = v___point
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}Creator
-#   xmlattr_Role - SOAP::SOAPString
-class Creator < ::String
-  AttrRole = XSD::QName.new(nil, "Role")
-
-  def __xmlattr
-    @__xmlattr ||= {}
-  end
-
-  def xmlattr_Role
-    __xmlattr[AttrRole]
-  end
-
-  def xmlattr_Role=(value)
-    __xmlattr[AttrRole] = value
-  end
-
-  def initialize(*arg)
-    super
-    @__xmlattr = {}
-  end
-end
-
-# {urn:ref}yesno
-class Yesno < ::String
-  N = new("N")
-  Y = new("Y")
-end
-
-
-end; end

data/test/wsdl/ref/product.wsdl

@@ -1,147 +0,0 @@
-<?xml version="1.0"?>
-<definitions name="product"
-    targetNamespace="urn:ref"
-    xmlns:tns="urn:ref"
-    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 xmlns="http://www.w3.org/2001/XMLSchema"
-        targetNamespace="urn:ref">
-      <simpleType name="non-empty-string">
-        <restriction base="xsd:string">
-          <minLength value="1"/>
-        </restriction>
-      </simpleType>
-
-      <complexType name="Product">
-        <all>
-          <element name="name" type="xsd:string"/>
-          <element ref="tns:Rating"/>
-        </all>
-      </complexType>
-
-      <complexType name="Comment">
-        <simpleContent>
-          <extension base="xsd:string">
-            <attribute name="msgid" type="xsd:string" use="required"/>
-          </extension>
-        </simpleContent>
-      </complexType>
-
-      <complexType name="_point">
-        <simpleContent>
-          <extension base="xsd:integer">
-            <attribute name="unit" type="xsd:string" use="required"/>
-          </extension>
-        </simpleContent>
-      </complexType>
-
-      <attribute name="version" type="tns:non-empty-string"/>
-
-      <attribute default="Y" name="yesno">
-        <simpleType>
-          <restriction base="xsd:string">
-            <enumeration value="Y"/>
-            <enumeration value="N"/>
-          </restriction>
-        </simpleType>
-      </attribute>
-
-      <element name="Rating">
-        <simpleType>
-          <restriction base="xsd:string">
-            <enumeration value="+1"/>
-            <enumeration value="0"/>
-            <enumeration value="-1"/>
-          </restriction>
-        </simpleType>
-      </element>
-
-      <element name="Product-Bag">
-        <complexType>
-          <sequence>
-            <element name="bag" type="tns:Product" minOccurs="0" maxOccurs="unbounded"/>
-            <element ref="tns:Rating" minOccurs="0" maxOccurs="unbounded"/>
-            <element name="Comment_1" minOccurs="0" maxOccurs="unbounded">
-              <complexType>
-                <simpleContent>
-                  <extension base="xsd:string">
-                    <attribute name="msgid" type="xsd:string" use="required"/>
-                  </extension>
-                </simpleContent>
-              </complexType>
-            </element>
-            <element name="comment-2" type="tns:Comment" minOccurs="0" maxOccurs="unbounded"/>
-            <element name="__point" type="tns:_point" minOccurs="0" maxOccurs="1"/>
-          </sequence>
-          <attribute ref="tns:version"/>
-          <attribute ref="tns:yesno"/>
-        </complexType>
-      </element>
-
-      <element name="Creator">
-        <complexType>
-          <simpleContent>
-            <extension base="xsd:string">
-              <attribute name="Role" type="xsd:string" use="required"/>
-            </extension>
-          </simpleContent>
-        </complexType>
-      </element>
-
-      <complexType name="Document">
-        <simpleContent>
-          <extension base="string">
-            <attribute name="ID" type="xsd:string"/>
-          </extension>
-        </simpleContent>
-      </complexType>
-
-      <complexType name="DerivedChoice_BaseSimpleContent">
-        <complexContent mixed="false">
-          <extension base="tns:Document">
-            <choice>
-              <element name="varStringExt" type="xsd:string"/>
-              <element name="varFloatExt" type="xsd:float"/>
-            </choice>
-            <attribute name="attrStringExt" type="xsd:string"/>
-          </extension>
-        </complexContent>
-      </complexType>
-    </xsd:schema>
-  </types>
-
-  <message name="echo_in">
-    <part name="parameters" element="tns:Product-Bag" />
-  </message>
-  <message name="echo_out">
-    <part name="parameters" element="tns:Creator" />
-  </message>
-
-  <portType name="ref_porttype">
-    <operation name="echo">
-      <input message="tns:echo_in" />
-      <output message="tns:echo_out" />
-    </operation>
-  </portType>
-
-  <binding name="ref_binding" type="tns:ref_porttype">
-    <soap:binding transport="http://schemas.xmlsoap.org/soap/http" style="document" />
-    <operation name="echo">
-      <soap:operation soapAction="urn:ref:echo" style="document" />
-      <input>
-        <soap:body use="literal" />
-      </input>
-      <output>
-        <soap:body use="literal" />
-      </output>
-    </operation>
-  </binding>
-
-  <service name="ref_service">
-    <port name="ref_service_port" binding="tns:ref_binding">
-      <soap:address location="http://localhost:17171/" />
-    </port>
-  </service>
-</definitions>