rtiss_soap4r 1.6.1 → 2.0.4

data/test/soap/calc/calc.rb

@@ -1,18 +0,0 @@
-# encoding: ASCII-8BIT
-module CalcService
-  def self.add(lhs, rhs)
-    lhs + rhs
-  end
-
-  def self.sub(lhs, rhs)
-    lhs - rhs
-  end
-
-  def self.multi(lhs, rhs)
-    lhs * rhs
-  end
-
-  def self.div(lhs, rhs)
-    lhs / rhs
-  end
-end

data/test/soap/calc/calc2.rb

@@ -1,30 +0,0 @@
-# encoding: ASCII-8BIT
-class CalcService2
-  def initialize(value = 0)
-    @value = value
-  end
-
-  def set_value(value)
-    @value = value
-  end
-
-  def get_value
-    @value
-  end
-
-  def +(rhs)
-    @value + rhs
-  end
-
-  def -(rhs)
-    @value - rhs
-  end
-
-  def *(rhs)
-    @value * rhs
-  end
-
-  def /(rhs)
-    @value / rhs
-  end
-end

data/test/soap/calc/server.cgi

@@ -1,16 +0,0 @@
-# encoding: ASCII-8BIT
-$:.unshift File.expand_path(File.dirname(__FILE__)+'/../../../lib')
-$:.unshift '.' if RUBY_VERSION.to_f >= 1.9
-require 'soap/rpc/cgistub'
-
-class CalcServer < SOAP::RPC::CGIStub
-  def initialize(*arg)
-    super
-
-    require 'calc'
-    servant = CalcService
-    add_servant(servant, 'http://tempuri.org/calcService')
-  end
-end
-
-status = CalcServer.new('CalcServer', nil).start

data/test/soap/calc/server.rb

@@ -1,18 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: ASCII-8BIT
-
-require 'soap/rpc/standaloneServer'
-require 'calc'
-
-class CalcServer < SOAP::RPC::StandaloneServer
-  def initialize(*arg)
-    super
-
-    servant = CalcService
-    add_servant(servant, 'http://tempuri.org/calcService')
-  end
-end
-
-if $0 == __FILE__
-  status = CalcServer.new('CalcServer', nil, '0.0.0.0', 17171).start
-end

data/test/soap/calc/server2.rb

@@ -1,21 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: ASCII-8BIT
-
-require 'soap/rpc/standaloneServer'
-require 'calc2'
-
-class CalcServer2 < SOAP::RPC::StandaloneServer
-  def on_init
-    servant = CalcService2.new
-    add_method(servant, 'set_value', 'newValue')
-    add_method(servant, 'get_value')
-    add_method_as(servant, '+', 'add', 'lhs')
-    add_method_as(servant, '-', 'sub', 'lhs')
-    add_method_as(servant, '*', 'multi', 'lhs')
-    add_method_as(servant, '/', 'div', 'lhs')
-  end
-end
-
-if $0 == __FILE__
-  status = CalcServer2.new('CalcServer', 'http://tempuri.org/calcService', '0.0.0.0', 17171).start
-end

data/test/soap/calc/test_calc.rb

@@ -1,53 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'testutil'
-require 'soap/rpc/driver'
-TestUtil.require(File.dirname(__FILE__), 'server.rb')
-
-
-module SOAP
-module Calc
-
-
-class TestCalc < Test::Unit::TestCase
-  Port = 17171
-
-  def setup
-    @server = CalcServer.new(self.class.name, nil, '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/"
-    @calc = SOAP::RPC::Driver.new(@endpoint, 'http://tempuri.org/calcService')
-    @calc.add_method('add', 'lhs', 'rhs')
-    @calc.add_method('sub', 'lhs', 'rhs')
-    @calc.add_method('multi', 'lhs', 'rhs')
-    @calc.add_method('div', 'lhs', 'rhs')
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @calc.reset_stream if @calc
-  end
-
-  def test_calc
-    assert_equal(3, @calc.add(1, 2))
-    assert_equal(-1.1, @calc.sub(1.1, 2.2))
-    assert_equal(2.42, @calc.multi(1.1, 2.2))
-    assert_equal(2, @calc.div(5, 2))
-    assert_equal(2.5, @calc.div(5.0, 2))
-    assert_equal(1.0/0.0, @calc.div(1.1, 0))
-    assert_raises(ZeroDivisionError) do
-      @calc.div(1, 0)
-    end
-  end
-end
-
-
-end
-end

data/test/soap/calc/test_calc2.rb

@@ -1,57 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'testutil'
-require 'soap/rpc/driver'
-TestUtil.require(File.dirname(__FILE__), 'server2.rb')
-
-
-module SOAP
-module Calc
-
-
-class TestCalc2 < Test::Unit::TestCase
-  Port = 17171
-
-  def setup
-    @server = CalcServer2.new('CalcServer', 'http://tempuri.org/calcService', '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      Thread.current.abort_on_exception = true
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/"
-    @var = SOAP::RPC::Driver.new(@endpoint, 'http://tempuri.org/calcService')
-    @var.wiredump_dev = STDERR if $DEBUG
-    @var.add_method('set_value', 'newValue')
-    @var.add_method('get_value')
-    @var.add_method_as('+', 'add', 'rhs')
-    @var.add_method_as('-', 'sub', 'rhs')
-    @var.add_method_as('*', 'multi', 'rhs')
-    @var.add_method_as('/', 'div', 'rhs')
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @var.reset_stream if @var
-  end
-
-  def test_calc2
-    assert_equal(1, @var.set_value(1))
-    assert_equal(3, @var + 2)
-    assert_equal(-1.2, @var - 2.2)
-    assert_equal(2.2, @var * 2.2)
-    assert_equal(0, @var / 2)
-    assert_equal(0.5, @var / 2.0)
-    assert_raises(ZeroDivisionError) do
-      @var / 0
-    end
-  end
-end
-
-
-end
-end

data/test/soap/calc/test_calc_cgi.rb

@@ -1,72 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/driver'
-require 'logger'
-require 'webrick'
-require 'rbconfig'
-
-
-module SOAP
-module Calc
-
-
-class TestCalcCGI < Test::Unit::TestCase
-  # This test shuld be run after installing ruby.
-  RUBYBIN = File.join(
-    Config::CONFIG["bindir"],
-    Config::CONFIG["ruby_install_name"] + Config::CONFIG["EXEEXT"]
-  )
-  RUBYBIN << " -d" if $DEBUG
-
-  Port = 17171
-
-  def setup
-    logger = Logger.new(STDERR)
-    logger.level = Logger::Severity::ERROR
-    @server = WEBrick::HTTPServer.new(
-      :BindAddress => "0.0.0.0",
-      :Logger => logger,
-      :Port => Port,
-      :AccessLog => [],
-      :DocumentRoot => File.dirname(File.expand_path(__FILE__)),
-      :CGIPathEnv => ENV['PATH'],
-      :CGIInterpreter => RUBYBIN
-    )
-    @t = Thread.new {
-      Thread.current.abort_on_exception = true
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/server.cgi"
-    @calc = SOAP::RPC::Driver.new(@endpoint, 'http://tempuri.org/calcService')
-    @calc.wiredump_dev = STDERR if $DEBUG
-    @calc.add_method('add', 'lhs', 'rhs')
-    @calc.add_method('sub', 'lhs', 'rhs')
-    @calc.add_method('multi', 'lhs', 'rhs')
-    @calc.add_method('div', 'lhs', 'rhs')
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @calc.reset_stream if @calc
-  end
-
-  def test_calc_cgi
-    assert_equal(3, @calc.add(1, 2))
-    assert_equal(-1.1, @calc.sub(1.1, 2.2))
-    assert_equal(2.42, @calc.multi(1.1, 2.2))
-    assert_equal(2, @calc.div(5, 2))
-    assert_equal(2.5, @calc.div(5.0, 2))
-    assert_equal(1.0/0.0, @calc.div(1.1, 0))
-    assert_raises(ZeroDivisionError) do
-      @calc.div(1, 0)
-    end
-  end
-end
-
-
-end
-end

data/test/soap/case/test_mapping.rb

@@ -1,58 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/marshal'
-
-
-module SOAP; module Case
-
-# {urn:TruckMateTypes}TTMHeader
-class TTMHeader
-  @@schema_type = "TTMHeader"
-  @@schema_ns = "urn:TruckMateTypes"
-  @@schema_element = [
-    ["dSN", ["SOAP::SOAPString", XSD::QName.new(nil, "DSN")]],
-    ["password", ["SOAP::SOAPString", XSD::QName.new(nil, "Password")]],
-    ["schema", ["SOAP::SOAPString", XSD::QName.new(nil, "Schema")]],
-    ["username", ["SOAP::SOAPString", XSD::QName.new(nil, "Username")]]
-  ]
-
-  attr_accessor :dSN
-  attr_accessor :password
-  attr_accessor :schema
-  attr_accessor :username
-
-  def initialize(dSN = nil, password = nil, schema = nil, username = nil)
-    @dSN = dSN
-    @password = password
-    @schema = schema
-    @username = username
-  end
-end
-
-
-class TestMapping < Test::Unit::TestCase
-  def test_mapping
-    dump = <<__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:Body>
-    <SOAP..Case..TTMHeader xmlns:n1="urn:TruckMateTypes"
-        xsi:type="n1:TTMHeader"
-        env:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
-      <DSN xsi:type="xsd:string">dsn</DSN>
-      <Password xsi:type="xsd:string">password</Password>
-      <Schema xsi:type="xsd:string">schema</Schema>
-      <Username xsi:type="xsd:string">username</Username>
-    </SOAP..Case..TTMHeader>
-  </env:Body>
-</env:Envelope>
-__XML__
-    o = TTMHeader.new("dsn", "password", "schema", "username")
-    assert_xml_equal(dump, SOAP::Marshal.dump(o))
-  end
-end
-
-
-end; end

data/test/soap/fault/test_customfault.rb

@@ -1,61 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/driver'
-require 'soap/rpc/standaloneServer'
-
-
-module SOAP
-module Fault
-
-
-class TestCustomFault < Test::Unit::TestCase
-  Port = 17171
-
-  class CustomFaultServer < SOAP::RPC::StandaloneServer
-    def on_init
-      add_method(self, 'fault', 'msg')
-    end
-
-    def fault(msg)
-      SOAPFault.new(SOAPString.new("mycustom"),
-        SOAPString.new("error: #{msg}"),
-        SOAPString.new(self.class.name))
-    end
-  end
-
-  def setup
-    @server = CustomFaultServer.new('customfault', 'urn:customfault', '0.0.0.0', Port)
-    @server.level = Logger::Severity::ERROR
-    @t = Thread.new {
-      Thread.current.abort_on_exception = true
-      @server.start
-    }
-    @endpoint = "http://localhost:#{Port}/"
-    @client = SOAP::RPC::Driver.new(@endpoint, 'urn:customfault')
-    @client.wiredump_dev = STDERR if $DEBUG
-    @client.add_method("fault", "msg")
-  end
-
-  def teardown
-    @server.shutdown if @server
-    if @t
-      @t.kill
-      @t.join
-    end
-    @client.reset_stream if @client
-  end
-
-  def test_custom_fault
-    begin
-      @client.fault("message")
-      assert(false, 'exception not raised')
-    rescue SOAP::FaultError => e
-      assert(true, 'exception raised')
-      assert_equal('error: message', e.message)
-    end
-  end
-end
-
-
-end
-end

data/test/soap/fault/test_fault.rb

@@ -1,47 +0,0 @@
-# encoding: ASCII-8BIT
-require 'helper'
-require 'soap/rpc/driver'
-require 'soap/rpc/standaloneServer'
-
-
-module SOAP
-module Fault
-
-
-class TestFault < Test::Unit::TestCase
-
-  def setup
-    @client = SOAP::RPC::Driver.new(nil, 'urn:fault')
-    @client.wiredump_dev = STDERR if $DEBUG
-    @client.add_method("hello", "msg")
-  end
-
-  def teardown
-    @client.reset_stream if @client
-  end
-
-  def test_fault
-    @client.mapping_registry = SOAP::Mapping::EncodedRegistry.new
-    @client.test_loopback_response << <<__XML__
-<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
-  <soap:Body>
-    <soap:Fault>
-      <faultcode>soap:Server</faultcode>
-      <faultstring>DN cannot be empty</faultstring>
-      <detail />
-    </soap:Fault>
-  </soap:Body>
-</soap:Envelope>
-__XML__
-    begin
-      @client.hello("world")
-      assert(false)
-    rescue ::SOAP::FaultError => e
-      assert_equal("DN cannot be empty", e.message)
-    end
-  end
-end
-
-
-end
-end