rtiss_soap4r 1.6.1 → 2.0.4

data/test/soap/test_extraattr.rb

@@ -1,55 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/processor'
-
-
-module SOAP
-
-
-class TestExtrAttr < Test::Unit::TestCase
-
-  HEADER_XML = %q[<?xml version="1.0" encoding="utf-8" ?>
-<env:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema"
-    Id="extraattr"
-    xmlns:env="http://schemas.xmlsoap.org/soap/envelope/"
-    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
-  <env:Header Id="extraattr">
-      <n1:headeritem xmlns:n1="my:foo"
-          Id="extraattr"></n1:headeritem>
-  </env:Header>
-  <env:Body Id="extraattr&lt;&gt;">
-    <n2:test xmlns:n2="my:foo"
-        Id="extraattr"></n2:test>
-  </env:Body>
-</env:Envelope>]
-
-  def test_extraattr
-    header = SOAP::SOAPHeader.new()
-    header.extraattr["Id"] = "extraattr"
-    hi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "headeritem"))
-    hi.extraattr["Id"] = "extraattr"
-    header.add("test", hi)
-    body = SOAP::SOAPBody.new()
-    body.extraattr["Id"] = "extraattr<>"
-    bi = SOAP::SOAPElement.new(XSD::QName.new("my:foo", "bodyitem"))
-    bi.extraattr["Id"] = "extraattr"
-    body.add("test", bi)
-    env = SOAP::SOAPEnvelope.new(header, body)
-    env.extraattr["Id"] = "extraattr"
-    g = SOAP::Generator.new()
-    xml = g.generate(env)
-    assert_xml_equal(HEADER_XML, xml)
-    #
-    parser = SOAP::Parser.new
-    env = parser.parse(xml)
-    header = env.header
-    body = env.body
-    assert_equal("extraattr", env.extraattr[XSD::QName.new(nil, "Id")])
-    assert_equal("extraattr", header.extraattr[XSD::QName.new(nil, "Id")])
-    assert_equal("extraattr<>", body.extraattr[XSD::QName.new(nil, "Id")])
-    assert_equal("extraattr", header["headeritem"].element.extraattr[XSD::QName.new(nil, "Id")])
-  end
-end
-
-
-end

data/test/soap/test_generator.rb

@@ -1,32 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/processor'
-
-
-module SOAP
-
-
-class TestGenerator < Test::Unit::TestCase
-  # based on #417, reported by Kou.
-  def test_encode
-    str = "\343\201\217<"
-    g = SOAP::Generator.new
-    g.generate(SOAPElement.new('foo'))
-    assert_equal("&lt;", g.encode_string(str)[-4, 4])
-    #
-    if RUBY_VERSION.to_f >= 1.9
-      assert_equal("&lt;", g.encode_string(str)[-4, 4])
-    else
-      begin
-        kc_backup = $KCODE.dup
-        $KCODE = 'EUC-JP'
-        assert_equal("&lt;", g.encode_string(str)[-4, 4])
-      ensure
-        $KCODE = kc_backup
-      end
-    end
-  end
-end
-
-
-end

data/test/soap/test_httpconfigloader.rb

@@ -1,72 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/httpconfigloader'
-require 'soap/rpc/driver'
-
-if defined?(HTTPClient)
-
-module SOAP
-
-
-class TestHTTPConfigLoader < Test::Unit::TestCase
-  DIR = File.dirname(File.expand_path(__FILE__))
-
-  def setup
-    @client = SOAP::RPC::Driver.new(nil, nil)
-  end
-
-  class Request
-    class Header
-      attr_reader :request_uri
-      def initialize(request_uri)
-        @request_uri = request_uri
-      end
-    end
-
-    attr_reader :header
-    def initialize(request_uri)
-      @header = Header.new(request_uri)
-    end
-  end
-
-  def test_property
-    testpropertyname = File.join(DIR, 'soapclient.properties')
-    File.open(testpropertyname, "w") do |f|
-      f <<<<__EOP__
-protocol.http.proxy = http://myproxy:8080
-protocol.http.ssl_config.verify_mode = OpenSSL::SSL::VERIFY_PEER
-# depth: 1 causes an error (intentional)
-protocol.http.ssl_config.verify_depth = 1
-protocol.http.ssl_config.ciphers = ALL
-protocol.http.basic_auth.1.url = http://www.example.com/foo1/
-protocol.http.basic_auth.1.userid = user1
-protocol.http.basic_auth.1.password = password1
-protocol.http.basic_auth.2.url = http://www.example.com/foo2/
-protocol.http.basic_auth.2.userid = user2
-protocol.http.basic_auth.2.password = password2
-__EOP__
-    end
-    begin
-      @client.loadproperty(testpropertyname)
-      assert_equal('ALL', @client.options['protocol.http.ssl_config.ciphers'])
-      @client.options['protocol.http.basic_auth'] <<
-        ['http://www.example.com/foo3/', 'user3', 'password3']
-      h = @client.streamhandler.client
-      basic_auth = h.www_auth.basic_auth
-      cred1 = ["user1:password1"].pack('m').tr("\n", '')
-      cred2 = ["user2:password2"].pack('m').tr("\n", '')
-      cred3 = ["user3:password3"].pack('m').tr("\n", '')
-      basic_auth.challenge(URI.parse("http://www.example.com/"), nil)
-      assert_equal(cred1, basic_auth.get(Request.new(URI.parse("http://www.example.com/foo1/baz"))))
-      assert_equal(cred2, basic_auth.get(Request.new(URI.parse("http://www.example.com/foo2/"))))
-      assert_equal(cred3, basic_auth.get(Request.new(URI.parse("http://www.example.com/foo3/baz/qux"))))
-    ensure
-      File.unlink(testpropertyname)
-    end
-  end
-end
-
-
-end
-
-end

data/test/soap/test_mapping.rb

@@ -1,132 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/mapping'
-require 'soap/marshal'
-
-
-module SOAP
-
-
-class TestMapping < Test::Unit::TestCase
-
-  class MappablePerson
-    attr_reader :name
-    attr_reader :age
-
-    def initialize(name, age)
-      @name, @age = name, age
-    end
-
-    def self.soap_marshallable
-      true
-    end
-  end
-
-  class UnmappablePerson
-    attr_reader :name
-    attr_reader :age
-
-    def initialize(name, age)
-      @name, @age = name, age
-    end
-
-    def self.soap_marshallable
-      false
-    end
-  end
-
-  def test_mappable
-    xml = <<__XML__
-<?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>
-    <SOAP..TestMapping..MappablePerson env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-      <name>nahi</name>
-      <age>37</age>
-    </SOAP..TestMapping..MappablePerson>
-  </env:Body>
-</env:Envelope>
-__XML__
-    obj = SOAP::Marshal.load(xml)
-    assert_equal(SOAP::TestMapping::MappablePerson, obj.class)
-    #
-    xml = <<__XML__
-<?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>
-    <SOAP..TestMapping..UnmappablePerson env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-      <name>nahi</name>
-      <age>37</age>
-    </SOAP..TestMapping..UnmappablePerson>
-  </env:Body>
-</env:Envelope>
-__XML__
-    obj = SOAP::Marshal.load(xml)
-    assert_equal(SOAP::Mapping::Object, obj.class)
-  end
-
-  def test_nestedexception
-    ele = Thread.new {}
-    obj = [ele]
-    begin
-      SOAP::Marshal.dump(obj)
-    rescue ::SOAP::Mapping::MappingError => e
-      assert(e.backtrace.find { |line| /\[NESTED\]/ =~ line })
-    end
-  end
-
-  def test_date
-    targets = [
-      ["2002-12-31",
-	"2002-12-31Z"],
-      ["2002-12-31+00:00",
-	"2002-12-31Z"],
-      ["2002-12-31-00:00",
-	"2002-12-31Z"],
-      ["-2002-12-31",
-	"-2002-12-31Z"],
-      ["-2002-12-31+00:00",
-	"-2002-12-31Z"],
-      ["-2002-12-31-00:00",
-	"-2002-12-31Z"],
-    ]
-    targets.each do |str, expectec|
-      d = Date.parse(str)
-      assert_equal(d.class, convert(d).class)
-      assert_equal(d, convert(d))
-    end
-  end
-
-  def test_datetime
-    targets = [
-      ["2002-12-31T23:59:59.00",
-	"2002-12-31T23:59:59Z"],
-      ["2002-12-31T23:59:59+00:00",
-	"2002-12-31T23:59:59Z"],
-      ["2002-12-31T23:59:59-00:00",
-	"2002-12-31T23:59:59Z"],
-      ["-2002-12-31T23:59:59.00",
-	"-2002-12-31T23:59:59Z"],
-      ["-2002-12-31T23:59:59+00:00",
-	"-2002-12-31T23:59:59Z"],
-      ["-2002-12-31T23:59:59-00:00",
-	"-2002-12-31T23:59:59Z"],
-    ]
-    targets.each do |str, expectec|
-      d = DateTime.parse(str)
-      assert_equal(d.class, convert(d).class)
-      assert_equal(d, convert(d))
-    end
-  end
-
-  def convert(obj)
-    SOAP::Mapping.soap2obj(SOAP::Mapping.obj2soap(obj))
-  end
-end
-
-
-end

data/test/soap/test_nestedexception.rb

@@ -1,71 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/soap'
-
-
-module SOAP
-
-
-class TestNestedException < Test::Unit::TestCase
-  class MyError < SOAP::Error; end
-
-  def foo
-    begin
-      bar
-    rescue
-      raise MyError.new("foo", $!)
-    end
-  end
-
-  def bar
-    begin
-      baz
-    rescue
-      raise MyError.new("bar", $!)
-    end
-  end
-
-  def baz
-    raise MyError.new("baz", $!)
-  end
-
-  def test_nestedexception
-    begin
-      foo
-    rescue MyError => e
-      trace = e.backtrace.find_all { |line| /test\/unit/ !~ line && /\d\z/ !~ line }
-      trace = trace.map { |line| line.sub(/\A[^:]*/, '') }
-      assert_equal(TOBE, trace)
-    end
-  end
-
-  if (RUBY_VERSION.to_f >= 1.9)
-    TOBE = [
-      ":16:in `rescue in foo'",
-      ":13:in `foo'",
-      ":34:in `test_nestedexception'",
-      ":24:in `rescue in bar': bar (SOAP::TestNestedException::MyError) [NESTED]",
-      ":21:in `bar'",
-      ":14:in `foo'",
-      ":34:in `test_nestedexception'",
-      ":29:in `baz': baz (SOAP::TestNestedException::MyError) [NESTED]",
-      ":22:in `bar'",
-      ":14:in `foo'",
-      ":34:in `test_nestedexception'"
-    ]  
-  else
-    TOBE = [
-      ":16:in `foo'",
-      ":34:in `test_nestedexception'",
-      ":24:in `bar': bar (SOAP::TestNestedException::MyError) [NESTED]",
-      ":14:in `foo'",
-      ":34:in `test_nestedexception'",
-      ":29:in `baz': baz (SOAP::TestNestedException::MyError) [NESTED]",
-      ":22:in `bar'",
-      ":14:in `foo'",
-      ":34:in `test_nestedexception'",
-    ]
-  end
-end
-
-end

data/test/soap/test_nil.rb

@@ -1,71 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/standaloneServer'
-require 'soap/rpc/driver'
-require 'soap/header/handler'
-
-
-module SOAP
-
-
-class TestNil < Test::Unit::TestCase
-  Port = 17171
-
-  class NilServer < SOAP::RPC::StandaloneServer
-    def initialize(*arg)
-      super
-      add_method(self, 'nop')
-    end
-
-    def nop
-      1
-    end
-  end
-
-  def setup
-    @server = NilServer.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('nop')
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @client.reset_stream if @client
-  end
-
-  require 'rexml/document'
-  # emulates SOAP::Lite's nil request
-
-#  def test_soaplite_nil
-#    body = SOAP::SOAPBody.new(REXML::Document.new(<<-__XML__))
-#      <nop xsi:nil="true"/>
-#    __XML__
-#    @client.wiredump_dev = STDOUT if $DEBUG
-#    header, body = @client.invoke(nil, body)
-#    assert_equal(1, body.root_node["return"].data)
-#  end
-
-  def test_soaplite_nil
-    body = SOAP::SOAPBody.new(REXML::Document.new(<<-__XML__))
-      <nop/>
-    __XML__
-    @client.wiredump_dev = STDOUT if $DEBUG
-    header, body = @client.invoke(nil, body)
-    assert_equal(1, body.root_node["return"].data)
-  end
-
-
-
-end
-
-
-end

data/test/soap/test_no_indent.rb

@@ -1,89 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/standaloneServer'
-require 'soap/rpc/driver'
-
-if defined?(HTTPClient)
-
-module SOAP
-
-
-class TestNoIndent < Test::Unit::TestCase
-  Port = 17171
-
-  class NopServer < SOAP::RPC::StandaloneServer
-    def initialize(*arg)
-      super
-      add_rpc_method(self, 'nop')
-    end
-
-    def nop
-      SOAP::RPC::SOAPVoid.new
-    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_rpc_method('nop')
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @client.reset_stream if @client
-  end
-
-  INDENT_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>
-    <nop env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-    </nop>
-  </env:Body>
-</env:Envelope>]
-
-  NO_INDENT_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>
-<nop env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-</nop>
-</env:Body>
-</env:Envelope>]
-
-  def test_indent
-    @client.wiredump_dev = str = ''
-    @client.options["soap.envelope.no_indent"] = false
-    @client.nop
-    assert_xml_equal(INDENT_XML, parse_requestxml(str))
-  end
-
-  def test_no_indent
-    @client.wiredump_dev = str = ''
-    @client.options["soap.envelope.no_indent"] = true
-    @client.nop
-    assert_xml_equal(NO_INDENT_XML, parse_requestxml(str))
-  end
-
-  def parse_requestxml(str)
-    str.split(/\r?\n\r?\n/)[3]
-  end
-end
-
-
-end
-
-end