3 # a = Array, s = String, t = Template
9 puts "#{a.inspect}.pack(#{t.inspect}) -> #{r.inspect} should be #{s.inspect}"
12 puts "#{a.inspect}.pack(#{t.inspect}) -> #{r.inspect} should be #{s.inspect}"
17 def unpacktest(a, s, t)
20 puts "#{s.inspect}.unpack(#{t.inspect}) -> #{r.inspect} should be #{a.inspect}"
28 pptest [1], "\x01", "C"
30 packtest [1.1], "\x01", "C"
31 packtest [-1], "\xff", "C"
32 packtest [1,2], "\x01\x02", "C2"
33 #packtest [1], "X", ArgumentError
35 unpacktest [48, nil], "0", "CC"
36 unpacktest [160, -96], "\xa0\xa0", "Cc"
37 unpacktest [49, 50, 51], "123", "C*"
39 pptest [12849], "12", "S"
40 unpacktest [nil], "0", "S"
41 unpacktest [12849, nil], "123", "SS"
42 unpacktest [12849], "123", "S*"
44 pptest [10000], "\x27\x10", "s>"
45 pptest [-10000], "\xd8\xf0", "s>"
46 pptest [50000], "\xc3\x50", "S>"
48 pptest [10000], "\x10\x27", "s<"
49 pptest [-10000], "\xf0\xd8", "s<"
50 pptest [50000], "\x50\xc3", "S<"
52 pptest [1000000000], "\x3b\x9a\xca\x00", "l>"
53 pptest [-1000000000], "\xc4\x65\x36\x00", "l>"
55 pptest [1], "\x01\x00\x00\x00", "L<"
56 pptest [258], "\x02\x01\x00\x00", "L<"
57 pptest [66051], "\x03\x02\x01\x00", "L<"
58 pptest [16909060], "\x04\x03\x02\x01", "L<"
59 pptest [16909060], "\x01\x02\x03\x04", "L>"
61 packtest [-1], "\xff\xff\xff\xff", "L<"
63 pptest [1000000000], "\x00\x00\x00\x00\x3b\x9a\xca\x00", "q>"
64 pptest [-1000000000], "\xff\xff\xff\xff\xc4\x65\x36\x00", "q>"
66 if (2**33).is_a? Fixnum
67 pptest [81985529216486895], "\x01\x23\x45\x67\x89\xab\xcd\xef", "q>"
68 pptest [-1167088121787636991], "\x01\x23\x45\x67\x89\xab\xcd\xef", "q<"
71 pptest [16909060], "\x01\x02\x03\x04", "N"
72 pptest [258], "\x01\x02", "n"
73 pptest [32769], "\x80\x01", "n"
75 pptest [16909060], "\x04\x03\x02\x01", "V"
76 pptest [258], "\x02\x01", "v"
78 packtest [""], "", "m"
79 packtest ["a"], "YQ==\n", "m"
80 packtest ["ab"], "YWI=\n", "m"
81 packtest ["abc"], "YWJj\n", "m"
82 packtest ["abcd"], "YWJjZA==\n", "m"
84 unpacktest [""], "", "m"
85 unpacktest ["a"], "YQ==\n", "m"
86 unpacktest ["ab"], "YWI=\n", "m"
87 unpacktest ["abc"], "YWJj\n", "m"
88 unpacktest ["abcd"], "YWJjZA==\n", "m"
90 packtest [""], "\0", "H"
91 packtest ["3"], "0", "H"
92 packtest ["34"], "", "H0"
93 packtest ["34"], "0", "H"
94 packtest ["34"], "4", "H2"
95 packtest ["34"], "4\0", "H3"
96 packtest ["3456"], "4P", "H3"
97 packtest ["34563"], "4V0", "H*"
98 packtest ["5a"], "Z", "H*"
99 packtest ["5A"], "Z", "H*"
101 unpacktest [""], "", "H"
102 unpacktest [""], "0", "H0"
103 unpacktest ["3"], "0", "H"
104 unpacktest ["30"], "0", "H2"
105 unpacktest ["30"], "0", "H3"
106 unpacktest ["303"], "01", "H3"
107 unpacktest ["303132"], "012", "H*"
108 unpacktest ["3031", 50], "012", "H4C"
109 unpacktest ["5a"], "Z", "H*"
111 packtest [""], "\0", "h"
112 packtest ["3"], "\03", "h"
113 packtest ["34"], "", "h0"
114 packtest ["34"], "\03", "h"
115 packtest ["34"], "C", "h2"
116 packtest ["34"], "C\0", "h3"
117 packtest ["3456"], "C\05", "h3"
118 packtest ["34563"], "Ce\03", "h*"
120 packtest [""], " ", "A"
121 unpacktest [""], "", "A"
122 pptest ["1"], "1", "A"
123 pptest ["1"], "1 ", "A2"
124 unpacktest ["1"], "1", "A2"
125 unpacktest ["1"], "1 ", "A2"
126 unpacktest ["1"], "1\0", "A2"
127 packtest ["12"], "1", "A"
128 unpacktest ["1"], "12", "A"
129 pptest ["123"], "123", "A*"
130 packtest ["1","2"], "2", "A0A"
131 unpacktest ["","2"], "2", "A0A"
133 packtest [""], "\0", "a"
134 unpacktest [""], "", "a"
135 pptest ["1"], "1", "a"
136 pptest ["1 "], "1 ", "a2"
137 pptest ["1\0"], "1\0", "a2"
138 packtest ["1"], "1\0", "a2"
139 pptest ["123"], "123", "a*"
141 packtest [""], "\0", "Z"
142 unpacktest [""], "", "Z"
143 pptest ["1"], "1", "Z"
144 pptest ["1"], "1\0", "Z2"
145 pptest ["1 "], "1 ", "Z2"
146 pptest ["123"], "123\0", "Z*"
147 pptest ["1","2"], "12", "ZZ"
148 pptest ["1","2"], "1\0002", "Z*Z"
149 unpacktest ["1","3"], "1\00023", "Z3Z"
151 packtest [1, 2], "\x01\x02", "CyC"
153 packtest [65], "A", 'U'
154 packtest [59411], "\xEE\xA0\x93", 'U'
156 pptest [1], "\x00\x01", "xC"
157 unpacktest [2], "\xcc\x02", "xC"