rtiss_soap4r 1.6.0

data/test/soap/test_mapping.rb

@@ -0,0 +1,132 @@
+# 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

@@ -0,0 +1,71 @@
+# 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

@@ -0,0 +1,71 @@
+# 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

@@ -0,0 +1,89 @@
+# 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