1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
require 'test/unit'
require 'wsdl/parser'
require 'wsdl/soap/wsdl2ruby'
require 'soap/rpc/standaloneServer'
require 'soap/wsdlDriver'
require 'soap/rpc/driver'
module WSDL; module Document
class TestNoSOAPAction < Test::Unit::TestCase
class Server < ::SOAP::RPC::StandaloneServer
Namespace = 'http://xmlsoap.org/Ping'
def on_init
add_document_method(
self,
Namespace + '/ping',
'ping_with_soapaction',
XSD::QName.new(Namespace, 'Ping'),
XSD::QName.new(Namespace, 'PingResponse')
)
add_document_method(
self,
nil,
'ping',
XSD::QName.new(Namespace, 'Ping'),
XSD::QName.new(Namespace, 'PingResponse')
)
# When no SOAPAction given, latter method(ping) is called.
end
def ping(arg)
arg.text = 'ping'
arg
end
def ping_with_soapaction(arg)
arg.text = 'ping_with_soapaction'
arg
end
end
DIR = File.dirname(File.expand_path(__FILE__))
Port = 17171
def setup
setup_server
@client = nil
end
def teardown
teardown_server
@client.reset_stream if @client
end
def setup_server
@server = Server.new('Test', Server::Namespace, '0.0.0.0', Port)
@server.level = Logger::Severity::ERROR
@server_thread = start_server_thread(@server)
end
def teardown_server
@server.shutdown
@server_thread.kill
@server_thread.join
end
def start_server_thread(server)
t = Thread.new {
Thread.current.abort_on_exception = true
server.start
}
t
end
def test_with_soapaction
wsdl = File.join(DIR, 'ping_nosoapaction.wsdl')
@client = ::SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver
@client.endpoint_url = "http://localhost:#{Port}/"
@client.wiredump_dev = STDOUT if $DEBUG
rv = @client.ping(:scenario => 'scenario', :origin => 'origin',
:text => 'text')
assert_equal('scenario', rv.scenario)
assert_equal('origin', rv.origin)
assert_equal('ping', rv.text)
end
def test_without_soapaction
@client = ::SOAP::RPC::Driver.new("http://localhost:#{Port}/",
Server::Namespace)
@client.add_document_method('ping', Server::Namespace + '/ping',
XSD::QName.new(Server::Namespace, 'Ping'),
XSD::QName.new(Server::Namespace, 'PingResponse'))
@client.wiredump_dev = STDOUT if $DEBUG
rv = @client.ping(:scenario => 'scenario', :origin => 'origin',
:text => 'text')
assert_equal('scenario', rv.scenario)
assert_equal('origin', rv.origin)
assert_equal('ping_with_soapaction', rv.text)
end
end
end; end
|
