rtiss_soap4r 1.6.1 → 2.0.4

data/test/soap/test_cookie.rb

@@ -1,113 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'testutil'
-require 'soap/rpc/driver'
-require 'webrick'
-require 'logger'
-
-
-module SOAP
-
-
-class TestCookie < Test::Unit::TestCase
-  Port = 17171
-
-  class CookieFilter < SOAP::Filter::StreamHandler
-    attr_accessor :cookie_value
-
-    def initialize
-      @cookie_value = nil
-    end
-
-    def on_http_outbound(req)
-      if @cookie_value
-        req.header.delete('Cookie')
-        req.header['Cookie'] = @cookie_value
-      end
-    end
-
-    def on_http_inbound(req, res)
-      # this sample filter only caputures the first cookie.
-      cookie = res.header['Set-Cookie'][0]
-      cookie.sub!(/;.*\z/, '') if cookie
-      @cookie_value = cookie
-      # do not save cookie value.
-    end
-  end
-
-  def setup
-    @logger = Logger.new(STDERR)
-    @logger.level = Logger::Severity::ERROR
-    @url = "http://localhost:#{Port}/"
-    @server = @client = nil
-    @server_thread = nil
-    setup_server
-    setup_client
-  end
-
-  def teardown
-    teardown_client if @client
-    teardown_server if @server
-  end
-
-  def setup_server
-    @server = WEBrick::HTTPServer.new(
-      :BindAddress => "0.0.0.0",
-      :Logger => @logger,
-      :Port => Port,
-      :AccessLog => [],
-      :DocumentRoot => File.dirname(File.expand_path(__FILE__))
-    )
-    @server.mount(
-      '/',
-      WEBrick::HTTPServlet::ProcHandler.new(method(:do_server_proc).to_proc)
-    )
-    @server_thread = TestUtil.start_server_thread(@server)
-  end
-
-  def setup_client
-    @client = SOAP::RPC::Driver.new(@url, '')
-    @client.add_method("do_server_proc")
-  end
-
-  def teardown_server
-    @server.shutdown
-    @server_thread.kill
-    @server_thread.join
-  end
-
-  def teardown_client
-    @client.reset_stream
-  end
-
-  def do_server_proc(req, res)
-    cookie = req['Cookie'].to_s
-    cookie = "var=hello world" if cookie.empty?
-    res['content-type'] = 'text/xml'
-    res['Set-Cookie'] = cookie
-    res.body = <<__EOX__
-<?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:do_server_proc xmlns:n1="urn:foo" env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-      <return xsi:nil="true"/>
-    </n1:do_server_proc>
-  </env:Body>
-</env:Envelope>
-__EOX__
-  end
-
-  def test_normal
-    @client.wiredump_dev = STDOUT if $DEBUG
-    filter = CookieFilter.new
-    @client.streamhandler.filterchain << filter
-    assert_nil(@client.do_server_proc)
-    assert_equal('var=hello world', filter.cookie_value)
-    filter.cookie_value = 'var=empty'
-    assert_nil(@client.do_server_proc)
-    assert_equal('var=empty', filter.cookie_value)
-  end
-end
-
-
-end

data/test/soap/test_custom_ns.rb

@@ -1,106 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/processor'
-
-
-module SOAP
-
-
-class TestCustomNs < Test::Unit::TestCase
-  NORMAL_XML = <<__XML__.chomp
-<?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:Header>
-      <n1:headeritem xmlns:n1="my:foo">hi</n1:headeritem>
-  </env:Header>
-  <env:Body>
-    <n2:test xmlns:n2="my:foo"
-        xmlns:n3="my:bar"
-        n3:baz="qux">bi</n2:test>
-  </env:Body>
-</env:Envelope>
-__XML__
-
-  CUSTOM_NS_XML = <<__XML__.chomp
-<?xml version="1.0" encoding="utf-8" ?>
-<ENV:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema"
-    xmlns:myns="my:foo"
-    xmlns:ENV="http://schemas.xmlsoap.org/soap/envelope/"
-    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
-  <ENV:Header>
-      <myns:headeritem>hi</myns:headeritem>
-  </ENV:Header>
-  <ENV:Body>
-    <myns:test xmlns:bar="my:bar"
-        bar:baz="qux">bi</myns:test>
-  </ENV:Body>
-</ENV:Envelope>
-__XML__
-
-  XML_WITH_DEFAULT_NS = <<__XML__.chomp
-<?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:Header>
-      <headeritem xmlns="my:foo">hi</headeritem>
-  </env:Header>
-  <env:Body>
-    <test xmlns:n1="my:bar"
-        xmlns:n2="my:foo"
-        n1:baz="qux"
-        n2:quxx="quxxx"
-        xmlns="my:foo">bi</test>
-  </env:Body>
-</env:Envelope>
-__XML__
-
-  def test_custom_ns
-    # create test env
-    header = SOAP::SOAPHeader.new()
-    hi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "headeritem"), 'hi')
-    header.add("test", hi)
-    body = SOAP::SOAPBody.new()
-    bi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "bodyitem"), 'bi')
-    bi.extraattr[XSD::QName.new('my:bar', 'baz')] = 'qux'
-    body.add("test", bi)
-    env = SOAP::SOAPEnvelope.new(header, body)
-    # normal
-    opt = {}
-    result = SOAP::Processor.marshal(env, opt)
-    assert_xml_equal(NORMAL_XML, result)
-    # Envelope ns customize
-    env = SOAP::SOAPEnvelope.new(header, body)
-    ns = XSD::NS.new
-    ns.assign(SOAP::EnvelopeNamespace, 'ENV')
-    ns.assign('my:foo', 'myns')
-    # tag customize
-    tag = XSD::NS.new
-    tag.assign('my:bar', 'bar')
-    opt = { :default_ns => ns, :default_ns_tag => tag }
-    result = SOAP::Processor.marshal(env, opt)
-    assert_xml_equal(CUSTOM_NS_XML, result)
-  end
-
-  def test_default_namespace
-    # create test env
-    header = SOAP::SOAPHeader.new()
-    hi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "headeritem"), 'hi')
-    header.add("test", hi)
-    body = SOAP::SOAPBody.new()
-    bi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "bodyitem"), 'bi')
-    bi.extraattr[XSD::QName.new('my:bar', 'baz')] = 'qux'
-    bi.extraattr[XSD::QName.new('my:foo', 'quxx')] = 'quxxx'
-    body.add("test", bi)
-    env = SOAP::SOAPEnvelope.new(header, body)
-    # normal
-    opt = {:use_default_namespace => true}
-    result = SOAP::Processor.marshal(env, opt)
-    assert_xml_equal(XML_WITH_DEFAULT_NS, result)
-  end
-end
-
-
-end

data/test/soap/test_custommap.rb

@@ -1,111 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/marshal'
-require 'soap/rpc/standaloneServer'
-require 'soap/rpc/driver'
-
-
-module SOAP
-
-
-class TestMap < Test::Unit::TestCase
-
-  class CustomHashFactory < SOAP::Mapping::Factory
-    def initialize(itemname)
-      @itemname = itemname
-    end
-
-    def obj2soap(soap_class, obj, info, map)
-      soap_obj = SOAP::SOAPStruct.new(SOAP::Mapping::MapQName)
-      mark_marshalled_obj(obj, soap_obj)
-      obj.each do |key, value|
-        elem = SOAP::SOAPStruct.new
-        elem.add('key', Mapping._obj2soap(key, map))
-        elem.add('value', Mapping._obj2soap(value, map))
-        soap_obj.add(@itemname, elem)
-      end
-      soap_obj
-    end
-
-    def soap2obj(obj_class, node, info, map)
-      false
-    end
-  end
-
-  Map = SOAP::Mapping::Registry.new
-  Map.add(Hash, SOAP::SOAPStruct, CustomHashFactory.new('customname'))
-
-  Port = 17171
-
-  class MapServer < SOAP::RPC::StandaloneServer
-    def initialize(*arg)
-      super
-      add_rpc_method(self, 'echo', 'map')
-      add_rpc_method(self, 'setmap')
-    end
-
-    def echo(map)
-      map
-    end
-
-    def setmap
-      self.mapping_registry = Map
-      nil
-    end
-  end
-
-  def setup
-    @server = MapServer.new(self.class.name, nil, '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/"
-    @client = SOAP::RPC::Driver.new(@endpoint)
-    @client.add_rpc_method('echo', 'map')
-    @client.add_rpc_method('setmap')
-    @client.wiredump_dev = STDOUT if $DEBUG
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @client.reset_stream if @client
-  end
-
-  def test_map
-    h = {'a' => 1, 'b' => 2}
-    soap = SOAP::Marshal.marshal(h)
-    puts soap if $DEBUG
-    obj = SOAP::Marshal.unmarshal(soap)
-    assert_equal(h, obj)
-    #
-    soap = SOAP::Marshal.marshal(h, Map)
-    puts soap if $DEBUG
-    obj = SOAP::Marshal.unmarshal(soap, Map)
-    assert_equal(h, obj)
-  end
-
-  def test_rpc
-    h = {'a' => 1, 'b' => 2}
-    @client.wiredump_dev = str = ''
-    assert_equal(h, @client.echo(h))
-    assert_equal(0, str.scan(/customname/).size)
-    #
-    @client.setmap
-    @client.wiredump_dev = str = ''
-    assert_equal(h, @client.echo(h))
-    assert_equal(4, str.scan(/customname/).size)
-    #
-    @client.mapping_registry = Map
-    @client.wiredump_dev = str = ''
-    assert_equal(h, @client.echo(h))
-    assert_equal(8, str.scan(/customname/).size)
-  end
-end
-
-
-end

data/test/soap/test_empty.rb

@@ -1,106 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/standaloneServer'
-require 'soap/rpc/driver'
-require 'soap/header/handler'
-
-
-module SOAP
-
-
-class TestEmpty < Test::Unit::TestCase
-  Port = 17171
-
-  class EmptyHeaderHandler < SOAP::Header::Handler
-    def on_outbound(header)
-      # dump Header even if no header item given.
-      header.force_encode = true
-      # no additional header item
-      nil
-    end
-  end
-
-  class NopServer < SOAP::RPC::StandaloneServer
-    def initialize(*arg)
-      super
-      add_document_method(self, 'urn:empty:nop',  'nop', [], [])
-      add_document_method(self, 'urn:empty:nop',  'nop_nil', nil, nil)
-    end
-
-    def nop
-      [1, 2, 3] # ignored
-    end
-
-    def nop_nil
-      [1, 2, 3] # ignored
-    end
-  end
-
-  def setup
-    @server = NopServer.new(self.class.name, nil, '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/"
-    @client = SOAP::RPC::Driver.new(@endpoint)
-    @client.add_document_method('nop', 'urn:empty:nop', [], [])
-    @client.add_document_method('nop_nil', 'urn:empty:nop', nil, nil)
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @client.reset_stream if @client
-  end
-
-  EMPTY_XML = %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></env:Body>
-</env:Envelope>]
-
-  EMPTY_HEADER_XML = %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:Header></env:Header>
-  <env:Body></env:Body>
-</env:Envelope>]
-
-  def test_nop
-    @client.wiredump_dev = str = ''
-    @client.nop
-    assert_xml_equal(EMPTY_XML, parse_requestxml(str))
-    assert_xml_equal(EMPTY_XML, parse_responsexml(str))
-  end
-
-  def test_nop_nil
-    @client.wiredump_dev = str = ''
-    @client.nop_nil
-    assert_xml_equal(EMPTY_XML, parse_requestxml(str))
-    assert_xml_equal(EMPTY_XML, parse_responsexml(str))
-  end
-
-  def test_empty_header
-    @client.headerhandler << EmptyHeaderHandler.new(nil)
-    @client.wiredump_dev = str = ''
-    @client.nop
-    assert_xml_equal(EMPTY_HEADER_XML, parse_requestxml(str))
-  end
-
-  def parse_requestxml(str)
-    str.split(/\r?\n\r?\n/)[3]
-  end
-
-  def parse_responsexml(str)
-    str.split(/\r?\n\r?\n/)[6]
-  end
-end
-
-
-end

data/test/soap/test_envelopenamespace.rb

@@ -1,86 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'testutil'
-require 'soap/rpc/driver'
-require 'webrick'
-require 'logger'
-
-
-module SOAP
-
-
-class TestEnvelopeNamespace < Test::Unit::TestCase
-  Port = 17171
-  TemporaryNamespace = 'urn:foo'
-
-  def setup
-    @logger = Logger.new(STDERR)
-    @logger.level = Logger::Severity::ERROR
-    @url = "http://localhost:#{Port}/"
-    @server = @client = nil
-    @server_thread = nil
-    setup_server
-    setup_client
-  end
-
-  def teardown
-    teardown_client if @client
-    teardown_server if @server
-  end
-
-  def setup_server
-    @server = WEBrick::HTTPServer.new(
-      :BindAddress => "0.0.0.0",
-      :Logger => @logger,
-      :Port => Port,
-      :AccessLog => [],
-      :DocumentRoot => File.dirname(File.expand_path(__FILE__))
-    )
-    @server.mount(
-      '/',
-      WEBrick::HTTPServlet::ProcHandler.new(method(:do_server_proc).to_proc)
-    )
-    @server_thread = TestUtil.start_server_thread(@server)
-  end
-
-  def setup_client
-    @client = SOAP::RPC::Driver.new(@url, '')
-    @client.add_method("do_server_proc")
-  end
-
-  def teardown_server
-    @server.shutdown
-    @server_thread.kill
-    @server_thread.join
-  end
-
-  def teardown_client
-    @client.reset_stream
-  end
-
-  def do_server_proc(req, res)
-    res['content-type'] = 'text/xml'
-    res.body = <<__EOX__
-<?xml version="1.0" encoding="utf-8" ?>
-<env:Envelope xmlns:env="#{TemporaryNamespace}">
-  <env:Body>
-    <n1:do_server_proc xmlns:n1="urn:foo" env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-      <return>hello world</return>
-    </n1:do_server_proc>
-  </env:Body>
-</env:Envelope>
-__EOX__
-  end
-
-  def test_normal
-    assert_raise(SOAP::ResponseFormatError) do
-      @client.do_server_proc
-    end
-    @client.options["soap.envelope.requestnamespace"] = TemporaryNamespace
-    @client.options["soap.envelope.responsenamespace"] = TemporaryNamespace
-    assert_equal('hello world', @client.do_server_proc)
-  end
-end
-
-
-end