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
|
require 'test/unit'
require 'wsdl/parser'
require 'wsdl/soap/wsdl2ruby'
require 'soap/rpc/standaloneServer'
require 'soap/wsdlDriver'
require File.join(File.dirname(File.expand_path(__FILE__)), '..', '..', 'testutil.rb')
module WSDL; module SimpleContent
class TestSimpleContent < Test::Unit::TestCase
NS = 'urn:www.example.org:simpleContent'
class Server < ::SOAP::RPC::StandaloneServer
def on_init
SimpleContentService::Methods.each do |definition|
add_document_operation(self, *definition)
end
self.literal_mapping_registry =
SimpleContentMappingRegistry::LiteralRegistry
end
def echo(address)
address
end
end
DIR = File.dirname(File.expand_path(__FILE__))
Port = 17171
def setup
setup_classdef
setup_server
@client = nil
end
def teardown
teardown_server if @server
unless $DEBUG
File.unlink(pathname('simpleContent.rb'))
File.unlink(pathname('simpleContentMappingRegistry.rb'))
File.unlink(pathname('simpleContentDriver.rb'))
end
@client.reset_stream if @client
end
def setup_server
@server = Server.new('Test', "urn:www.example.org:simpleContent", '0.0.0.0', Port)
@server.level = Logger::Severity::ERROR
@server_thread = TestUtil.start_server_thread(@server)
end
def setup_classdef
gen = WSDL::SOAP::WSDL2Ruby.new
gen.location = pathname("simplecontent.wsdl")
gen.basedir = DIR
gen.logger.level = Logger::FATAL
gen.opt['classdef'] = nil
gen.opt['mapping_registry'] = nil
gen.opt['driver'] = nil
gen.opt['force'] = true
gen.opt['module_path'] = 'WSDL::SimpleContent'
gen.run
TestUtil.require(DIR, 'simpleContent.rb', 'simpleContentMappingRegistry.rb', 'simpleContentDriver.rb')
end
def teardown_server
@server.shutdown
@server_thread.kill
@server_thread.join
end
def pathname(filename)
File.join(DIR, filename)
end
def test_stub
@client = SimpleContentService.new("http://localhost:#{Port}/")
@client.wiredump_dev = STDERR if $DEBUG
list = PhoneList.new
list.xmlattr_default = "default"
phone1 = PhoneNumber.new("12<>345")
phone1.xmlattr_type = PhoneNumberType::Fax
phone2 = PhoneNumber.new("234<>56")
phone2.xmlattr_type = PhoneNumberType::Home
list.phone << phone1 << phone2
address = Address.new(list, "addr")
ret = @client.echo(address)
assert_equal(address.blah, ret.blah)
assert_equal(2, ret.list.phone.size)
assert_equal("12<>345", ret.list.phone[0])
assert_equal(PhoneNumberType::Fax, ret.list.phone[0].xmlattr_type)
assert_equal("234<>56", ret.list.phone[1])
assert_equal(PhoneNumberType::Home, ret.list.phone[1].xmlattr_type)
end
end
end; end
|
