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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
|
# frozen_string_literal: true
module Prism
module Pack
%i[
SPACE
COMMENT
INTEGER
UTF8
BER
FLOAT
STRING_SPACE_PADDED
STRING_NULL_PADDED
STRING_NULL_TERMINATED
STRING_MSB
STRING_LSB
STRING_HEX_HIGH
STRING_HEX_LOW
STRING_UU
STRING_MIME
STRING_BASE64
STRING_FIXED
STRING_POINTER
MOVE
BACK
NULL
UNSIGNED
SIGNED
SIGNED_NA
AGNOSTIC_ENDIAN
LITTLE_ENDIAN
BIG_ENDIAN
NATIVE_ENDIAN
ENDIAN_NA
SIZE_SHORT
SIZE_INT
SIZE_LONG
SIZE_LONG_LONG
SIZE_8
SIZE_16
SIZE_32
SIZE_64
SIZE_P
SIZE_NA
LENGTH_FIXED
LENGTH_MAX
LENGTH_RELATIVE
LENGTH_NA
].each do |const|
const_set(const, const)
end
class Directive
attr_reader :version, :variant, :source, :type, :signed, :endian, :size, :length_type, :length
def initialize(version, variant, source, type, signed, endian, size, length_type, length)
@version = version
@variant = variant
@source = source
@type = type
@signed = signed
@endian = endian
@size = size
@length_type = length_type
@length = length
end
ENDIAN_DESCRIPTIONS = {
AGNOSTIC_ENDIAN: 'agnostic',
LITTLE_ENDIAN: 'little-endian (VAX)',
BIG_ENDIAN: 'big-endian (network)',
NATIVE_ENDIAN: 'native-endian',
ENDIAN_NA: 'n/a'
}
SIGNED_DESCRIPTIONS = {
UNSIGNED: 'unsigned',
SIGNED: 'signed',
SIGNED_NA: 'n/a'
}
SIZE_DESCRIPTIONS = {
SIZE_SHORT: 'short',
SIZE_INT: 'int-width',
SIZE_LONG: 'long',
SIZE_LONG_LONG: 'long long',
SIZE_8: '8-bit',
SIZE_16: '16-bit',
SIZE_32: '32-bit',
SIZE_64: '64-bit',
SIZE_P: 'pointer-width'
}
def describe
case type
when SPACE
'whitespace'
when COMMENT
'comment'
when INTEGER
if size == SIZE_8
base = "#{SIGNED_DESCRIPTIONS[signed]} #{SIZE_DESCRIPTIONS[size]} integer"
else
base = "#{SIGNED_DESCRIPTIONS[signed]} #{SIZE_DESCRIPTIONS[size]} #{ENDIAN_DESCRIPTIONS[endian]} integer"
end
case length_type
when LENGTH_FIXED
if length > 1
base + ", x#{length}"
else
base
end
when LENGTH_MAX
base + ', as many as possible'
end
when UTF8
'UTF-8 character'
when BER
'BER-compressed integer'
when FLOAT
"#{SIZE_DESCRIPTIONS[size]} #{ENDIAN_DESCRIPTIONS[endian]} float"
when STRING_SPACE_PADDED
'arbitrary binary string (space padded)'
when STRING_NULL_PADDED
'arbitrary binary string (null padded, count is width)'
when STRING_NULL_TERMINATED
'arbitrary binary string (null padded, count is width), except that null is added with *'
when STRING_MSB
'bit string (MSB first)'
when STRING_LSB
'bit string (LSB first)'
when STRING_HEX_HIGH
'hex string (high nibble first)'
when STRING_HEX_LOW
'hex string (low nibble first)'
when STRING_UU
'UU-encoded string'
when STRING_MIME
'quoted printable, MIME encoding'
when STRING_BASE64
'base64 encoded string'
when STRING_FIXED
'pointer to a structure (fixed-length string)'
when STRING_POINTER
'pointer to a null-terminated string'
when MOVE
'move to absolute position'
when BACK
'back up a byte'
when NULL
'null byte'
else
raise
end
end
end
class Format
attr_reader :directives, :encoding
def initialize(directives, encoding)
@directives = directives
@encoding = encoding
end
def describe
source_width = directives.map { |d| d.source.inspect.length }.max
directive_lines = directives.map do |directive|
if directive.type == SPACE
source = directive.source.inspect
else
source = directive.source
end
" #{source.ljust(source_width)} #{directive.describe}"
end
(['Directives:'] + directive_lines + ['Encoding:', " #{encoding}"]).join("\n")
end
end
end
end
|
