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
|
require 'test/unit'
require "xmlrpc/marshal"
class Test_Marshal < Test::Unit::TestCase
# for test_parser_values
class Person
include XMLRPC::Marshallable
attr_reader :name
def initialize(name)
@name = name
end
end
def test1_dump_response
assert_nothing_raised(NameError) {
XMLRPC::Marshal.dump_response('arg')
}
end
def test1_dump_call
assert_nothing_raised(NameError) {
XMLRPC::Marshal.dump_call('methodName', 'arg')
}
end
def test2_dump_load_response
value = [1, 2, 3, {"test" => true}, 3.4]
res = XMLRPC::Marshal.dump_response(value)
assert_equal(value, XMLRPC::Marshal.load_response(res))
end
def test2_dump_load_call
methodName = "testMethod"
value = [1, 2, 3, {"test" => true}, 3.4]
exp = [methodName, [value, value]]
res = XMLRPC::Marshal.dump_call(methodName, value, value)
assert_equal(exp, XMLRPC::Marshal.load_call(res))
end
def test_parser_values
v1 = [
1, -7778, # integers
1.0, 0.0, -333.0, 2343434343.0, # floats
false, true, true, false, # booleans
"Hallo", "with < and >", "" # strings
]
v2 = [
[v1, v1, v1],
{"a" => v1}
]
v3 = [
XMLRPC::Base64.new("\001"*1000), # base64
:aSymbol, :anotherSym # symbols (-> string)
]
v3_exp = [
"\001"*1000,
"aSymbol", "anotherSym"
]
person = Person.new("Michael")
XMLRPC::XMLParser.each_installed_parser do |parser|
m = XMLRPC::Marshal.new(parser)
assert_equal( v1, m.load_response(m.dump_response(v1)) )
assert_equal( v2, m.load_response(m.dump_response(v2)) )
assert_equal( v3_exp, m.load_response(m.dump_response(v3)) )
pers = m.load_response(m.dump_response(person))
assert( pers.is_a?(Person) )
assert( person.name == pers.name )
end
# missing, Date, Time, DateTime
# Struct
end
def test_no_params_tag
# bug found by Idan Sofer
expect = %{<?xml version="1.0" ?><methodCall><methodName>myMethod</methodName><params/></methodCall>\n}
str = XMLRPC::Marshal.dump_call("myMethod")
assert_equal(expect, str)
end
end
|
