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
|
require 'test/unit'
class TestPack < Test::Unit::TestCase
def setup
@char_array = %w/alpha beta gamma/
@int_array = [-1, 0, 1, 128]
@float_array = [-1.5, 0.0, 1.5, 128.5]
@bignum1 = 2**63
end
def teardown
@char_array = nil
@int_array = nil
@float_array = nil
@bignum1 = nil
end
def test_pack_w
assert_equal( "\005", [5].pack('w'))
assert_equal( "\203t", [500].pack('w'))
assert_equal( "\203\206P", [50000].pack('w'))
assert_equal( "\222\320\227\344\000", [5000000000].pack('w'))
assert_equal( "\222\320\227\344\001", [5000000001].pack('w'))
assert_equal( "\272\357\232\025", [123456789].pack('w'))
end
def test_pack_M
assert_equal("alpha=\n", %w/alpha beta gamma/.pack("M")) # ok
assert_equal("-1=\n", [-1, 0, 1, 128].pack("M"))
assert_equal("1=\n", [1].pack("M"))
assert_equal("-1.5=\n", [-1.5, 0.0, 1.5, 128.5].pack("M"))
assert_equal("9223372036854775808=\n", [9223372036854775808].pack("M"))
end
def endian(data, n=4)
[1].pack('I') == [1].pack('N') ? data.gsub(/.{#{n}}/){ |s| s.reverse } : data
end
def test_pack_q
assert_equal(endian("\000\000\000\000\000\000\000\000", 8), [0].pack("q"))
assert_equal(endian("\001\000\000\000\000\000\000\000", 8), [1].pack("q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), [-1].pack("q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), @int_array.pack("q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), @float_array.pack("q"))
assert_equal(endian("\000\000\000\000\000\000\000\200", 8), [@bignum1].pack("q"))
end
def test_pack_q_expected_errors
assert_raises(TypeError){ @char_array.pack("q") }
assert_raises(RangeError){ [(2**128)].pack("q") }
end
def test_pack_Q
assert_equal(endian("\000\000\000\000\000\000\000\000", 8), [0].pack("Q"))
assert_equal(endian("\001\000\000\000\000\000\000\000", 8), [1].pack("Q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), [-1].pack("Q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), @int_array.pack("Q"))
assert_equal(endian("\377\377\377\377\377\377\377\377", 8), @float_array.pack("Q"))
assert_equal(endian("\000\000\000\000\000\000\000\200", 8), [@bignum1].pack("Q"))
end
def test_pack_Q_expected_errors
assert_raises(TypeError){ @char_array.pack("Q") }
assert_raises(RangeError){ [(2**128)].pack("Q") }
end
# JRUBY-2502
def test_pack_m_u_regression
assert_equal(
"QUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJD\nQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJDQUJD\nQUJD\n",
["ABC"*31].pack('m'))
assert_equal(
"M04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!04%!\n%04%!04$`\n",
["A"*50].pack('u'))
end
# JRUBY-3677
def test_pack_N_star_regression
arr = ["head",1,1,1]
assert_equal(arr.pack("A4N3"), arr.pack("A4N*"))
end
# JRUBY-2502
def test_pack_M_regression
assert_equal("ABCDEF=\n", ['ABCDEF'].pack('M'))
end
# JRuby-4647
def test_unpack_M
assert_equal(["foo\r\n\r\r\r1\r2\r\r\r\rvvs"], "foo\r\n\r\r\r1\r=\r\n2\r\r\r\rvvs".unpack("M"))
assert_equal(["foo\r\n"], "foo\r\n".unpack("M"))
end
end
|
