2004-11-16 09:07:15 -05:00
|
|
|
require 'test/unit'
|
|
|
|
require 'webrick'
|
|
|
|
require File.join(File.dirname(__FILE__), 'webrick_testing')
|
|
|
|
require "xmlrpc/server"
|
|
|
|
require 'xmlrpc/client'
|
|
|
|
|
|
|
|
class Test_Webrick < Test::Unit::TestCase
|
|
|
|
include WEBrick_Testing
|
|
|
|
|
|
|
|
def create_servlet
|
|
|
|
s = XMLRPC::WEBrickServlet.new
|
|
|
|
|
|
|
|
s.add_handler("test.add") do |a,b|
|
|
|
|
a + b
|
|
|
|
end
|
|
|
|
|
|
|
|
s.add_handler("test.div") do |a,b|
|
|
|
|
if b == 0
|
|
|
|
raise XMLRPC::FaultException.new(1, "division by zero")
|
|
|
|
else
|
|
|
|
a / b
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
s.set_default_handler do |name, *args|
|
|
|
|
raise XMLRPC::FaultException.new(-99, "Method #{name} missing" +
|
|
|
|
" or wrong number of parameters!")
|
|
|
|
end
|
|
|
|
|
|
|
|
s.add_introspection
|
|
|
|
|
|
|
|
return s
|
|
|
|
end
|
|
|
|
|
|
|
|
def setup_http_server(port, use_ssl)
|
2004-11-19 11:48:05 -05:00
|
|
|
require 'webrick/https'
|
2004-11-16 09:07:15 -05:00
|
|
|
start_server(
|
|
|
|
:Port => port,
|
|
|
|
:SSLEnable => use_ssl,
|
|
|
|
:SSLVerifyClient => ::OpenSSL::SSL::VERIFY_NONE,
|
|
|
|
:SSLCertName => []
|
|
|
|
) {|w| w.mount('/RPC2', create_servlet) }
|
|
|
|
|
|
|
|
@s = XMLRPC::Client.new3(:port => port, :use_ssl => use_ssl)
|
|
|
|
end
|
|
|
|
|
|
|
|
PORT = 8070
|
|
|
|
def test_client_server
|
|
|
|
[false, true].each do |use_ssl|
|
|
|
|
begin
|
|
|
|
setup_http_server(PORT, use_ssl)
|
|
|
|
do_test
|
|
|
|
ensure
|
|
|
|
stop_server
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def do_test
|
|
|
|
# simple call
|
|
|
|
assert_equal 9, @s.call('test.add', 4, 5)
|
|
|
|
|
|
|
|
# fault exception
|
|
|
|
assert_raises(XMLRPC::FaultException) { @s.call('test.div', 1, 0) }
|
|
|
|
|
|
|
|
# fault exception via call2
|
|
|
|
ok, param = @s.call2('test.div', 1, 0)
|
|
|
|
assert_equal false, ok
|
|
|
|
assert_instance_of XMLRPC::FaultException, param
|
|
|
|
assert_equal 1, param.faultCode
|
|
|
|
assert_equal 'division by zero', param.faultString
|
|
|
|
|
|
|
|
# call2 without fault exception
|
|
|
|
ok, param = @s.call2('test.div', 10, 5)
|
|
|
|
assert_equal true, ok
|
|
|
|
assert_equal param, 2
|
|
|
|
|
|
|
|
# introspection
|
|
|
|
assert_equal ["test.add", "test.div", "system.listMethods", "system.methodSignature", "system.methodHelp"], @s.call("system.listMethods")
|
|
|
|
|
|
|
|
# default handler (missing handler)
|
|
|
|
ok, param = @s.call2('test.nonexisting')
|
|
|
|
assert_equal false, ok
|
|
|
|
assert_equal -99, param.faultCode
|
|
|
|
|
|
|
|
# default handler (wrong number of arguments)
|
|
|
|
ok, param = @s.call2('test.add', 1, 2, 3)
|
|
|
|
assert_equal false, ok
|
|
|
|
assert_equal -99, param.faultCode
|
|
|
|
end
|
|
|
|
end
|