2003-09-24 11:18:44 -04:00
|
|
|
require 'test/unit'
|
|
|
|
require 'soap/rpc/driver'
|
|
|
|
|
|
|
|
dir = File.dirname(__FILE__)
|
|
|
|
$:.push(dir)
|
|
|
|
require 'server2.rb'
|
|
|
|
$:.delete(dir)
|
|
|
|
|
2003-09-26 14:34:41 -04:00
|
|
|
|
|
|
|
module SOAP
|
|
|
|
module Calc
|
|
|
|
|
|
|
|
|
2003-09-24 11:18:44 -04:00
|
|
|
class TestCalc2 < Test::Unit::TestCase
|
2003-10-18 11:21:18 -04:00
|
|
|
Port = 17171
|
|
|
|
|
2003-09-24 11:18:44 -04:00
|
|
|
def setup
|
2003-10-18 11:21:18 -04:00
|
|
|
@server = CalcServer2.new('CalcServer', 'http://tempuri.org/calcService', '0.0.0.0', Port)
|
2003-10-22 11:43:10 -04:00
|
|
|
@server.level = Logger::Severity::ERROR
|
2003-09-24 11:18:44 -04:00
|
|
|
@t = Thread.new {
|
2003-10-20 11:37:11 -04:00
|
|
|
Thread.current.abort_on_exception = true
|
2003-09-24 11:18:44 -04:00
|
|
|
@server.start
|
|
|
|
}
|
2003-09-27 03:03:29 -04:00
|
|
|
while @server.server.nil? or @server.server.status != :Running
|
2003-09-24 11:18:44 -04:00
|
|
|
sleep 0.1
|
2003-10-20 11:37:11 -04:00
|
|
|
unless @t.alive?
|
|
|
|
@t.join
|
|
|
|
raise
|
|
|
|
end
|
2003-09-24 11:18:44 -04:00
|
|
|
end
|
2003-10-22 11:43:10 -04:00
|
|
|
@endpoint = "http://localhost:#{Port}/"
|
|
|
|
@var = SOAP::RPC::Driver.new(@endpoint, 'http://tempuri.org/calcService')
|
2003-09-24 11:18:44 -04:00
|
|
|
@var.add_method('set', 'newValue')
|
|
|
|
@var.add_method('get')
|
|
|
|
@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.server.shutdown
|
|
|
|
@t.kill
|
2003-10-20 11:37:11 -04:00
|
|
|
@t.join
|
2003-10-22 11:43:10 -04:00
|
|
|
@var.reset_stream
|
2003-09-24 11:18:44 -04:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_calc2
|
|
|
|
assert_equal(1, @var.set(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
|
2003-09-26 14:34:41 -04:00
|
|
|
|
|
|
|
|
|
|
|
end
|
|
|
|
end
|