diff options
author | Denis Vlasenko <vda.linux@googlemail.com> | 2006-11-28 23:37:46 +0000 |
---|---|---|
committer | Denis Vlasenko <vda.linux@googlemail.com> | 2006-11-28 23:37:46 +0000 |
commit | 601ae1378ba7bb59e9c1a19fcc4ddd7bf9fb2e1b (patch) | |
tree | 79ad3707bb3374a2e429135ece7e604a26cde8c1 | |
parent | df38188367a9fe10cc4efc00d3236be05178ff4e (diff) | |
download | busybox-w32-601ae1378ba7bb59e9c1a19fcc4ddd7bf9fb2e1b.tar.gz busybox-w32-601ae1378ba7bb59e9c1a19fcc4ddd7bf9fb2e1b.tar.bz2 busybox-w32-601ae1378ba7bb59e9c1a19fcc4ddd7bf9fb2e1b.zip |
od: sometime ago I landed BIG od implementation
from coreutils. My fault. This commit contains
cleanups and size reductions.
-rw-r--r-- | coreutils/od_bloaty.c | 1370 | ||||
-rw-r--r-- | networking/httpd.c | 16 | ||||
-rw-r--r-- | networking/wget.c | 2 |
3 files changed, 627 insertions, 761 deletions
diff --git a/coreutils/od_bloaty.c b/coreutils/od_bloaty.c index a88ca25dc..dff7e3f50 100644 --- a/coreutils/od_bloaty.c +++ b/coreutils/od_bloaty.c | |||
@@ -18,29 +18,55 @@ | |||
18 | /* Written by Jim Meyering. */ | 18 | /* Written by Jim Meyering. */ |
19 | 19 | ||
20 | /* Busyboxed by Denis Vlasenko | 20 | /* Busyboxed by Denis Vlasenko |
21 | ** Based on od.c from coreutils-5.2.1 | 21 | |
22 | ** Top bloat sources: | 22 | Based on od.c from coreutils-5.2.1 |
23 | ** get_lcm 111 | 23 | Top bloat sources: |
24 | ** print_ascii 145 | 24 | |
25 | ** format_address_std 159 | 25 | 00000073 t parse_old_offset |
26 | ** check_and_close 160 | 26 | 0000007b t get_lcm |
27 | ** open_next_file 170 | 27 | 00000090 r long_options |
28 | ** write_block 368 | 28 | 00000092 t print_named_ascii |
29 | ** decode_format_string 1169 | 29 | 000000bf t print_ascii |
30 | ** od_main 2623 | 30 | 00000168 t write_block |
31 | ** TODO: get rid of getopt() | 31 | 00000366 t decode_format_string |
32 | 00000a71 T od_main | ||
33 | |||
34 | Tested for compat with coreutils 6.3 | ||
35 | using this script. Minor differences fixed. | ||
36 | |||
37 | #!/bin/sh | ||
38 | echo STD | ||
39 | time /path/to/coreutils/od \ | ||
40 | ...params... \ | ||
41 | >std | ||
42 | echo Exit code $? | ||
43 | echo BBOX | ||
44 | time ./busybox od \ | ||
45 | ...params... \ | ||
46 | >bbox | ||
47 | echo Exit code $? | ||
48 | diff -u -a std bbox >bbox.diff || { echo Different!; sleep 1; } | ||
49 | |||
32 | */ | 50 | */ |
33 | 51 | ||
52 | |||
34 | #include "busybox.h" | 53 | #include "busybox.h" |
35 | #include <getopt.h> | 54 | #include <getopt.h> |
36 | 55 | ||
37 | #define assert(a) ((void)0) | 56 | #define assert(a) ((void)0) |
38 | #define ISPRINT(c) ((c)>=' ') | 57 | |
58 | /* Check for 0x7f is a coreutils 6.3 addition */ | ||
59 | #define ISPRINT(c) (((c)>=' ') && (c) != 0x7f) | ||
39 | 60 | ||
40 | typedef long double longdouble_t; | 61 | typedef long double longdouble_t; |
41 | typedef unsigned long long ulonglong_t; | 62 | typedef unsigned long long ulonglong_t; |
42 | #define xstrtoumax_sfx xstrtoul_sfx | 63 | typedef long long llong; |
43 | #define xstrtoumax_range_sfx xstrtoul_range_sfx | 64 | |
65 | #if ENABLE_LFS | ||
66 | # define xstrtooff_sfx xstrtoull_sfx | ||
67 | #else | ||
68 | # define xstrtooff_sfx xstrtoul_sfx | ||
69 | #endif | ||
44 | 70 | ||
45 | /* The default number of input bytes per output line. */ | 71 | /* The default number of input bytes per output line. */ |
46 | #define DEFAULT_BYTES_PER_BLOCK 16 | 72 | #define DEFAULT_BYTES_PER_BLOCK 16 |
@@ -67,7 +93,6 @@ enum size_spec { | |||
67 | INT, | 93 | INT, |
68 | LONG, | 94 | LONG, |
69 | LONG_LONG, | 95 | LONG_LONG, |
70 | /* FIXME: add INTMAX support, too */ | ||
71 | FLOAT_SINGLE, | 96 | FLOAT_SINGLE, |
72 | FLOAT_DOUBLE, | 97 | FLOAT_DOUBLE, |
73 | FLOAT_LONG_DOUBLE, | 98 | FLOAT_LONG_DOUBLE, |
@@ -105,16 +130,16 @@ struct tspec { | |||
105 | 10 unsigned decimal | 130 | 10 unsigned decimal |
106 | 8 unsigned hexadecimal */ | 131 | 8 unsigned hexadecimal */ |
107 | 132 | ||
108 | static const unsigned char bytes_to_oct_digits[] = | 133 | static const uint8_t bytes_to_oct_digits[] = |
109 | {0, 3, 6, 8, 11, 14, 16, 19, 22, 25, 27, 30, 32, 35, 38, 41, 43}; | 134 | {0, 3, 6, 8, 11, 14, 16, 19, 22, 25, 27, 30, 32, 35, 38, 41, 43}; |
110 | 135 | ||
111 | static const unsigned char bytes_to_signed_dec_digits[] = | 136 | static const uint8_t bytes_to_signed_dec_digits[] = |
112 | {1, 4, 6, 8, 11, 13, 16, 18, 20, 23, 25, 28, 30, 33, 35, 37, 40}; | 137 | {1, 4, 6, 8, 11, 13, 16, 18, 20, 23, 25, 28, 30, 33, 35, 37, 40}; |
113 | 138 | ||
114 | static const unsigned char bytes_to_unsigned_dec_digits[] = | 139 | static const uint8_t bytes_to_unsigned_dec_digits[] = |
115 | {0, 3, 5, 8, 10, 13, 15, 17, 20, 22, 25, 27, 29, 32, 34, 37, 39}; | 140 | {0, 3, 5, 8, 10, 13, 15, 17, 20, 22, 25, 27, 29, 32, 34, 37, 39}; |
116 | 141 | ||
117 | static const unsigned char bytes_to_hex_digits[] = | 142 | static const uint8_t bytes_to_hex_digits[] = |
118 | {0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32}; | 143 | {0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32}; |
119 | 144 | ||
120 | /* Convert enum size_spec to the size of the named type. */ | 145 | /* Convert enum size_spec to the size of the named type. */ |
@@ -137,57 +162,32 @@ struct dummy { | |||
137 | [sizeof width_bytes / sizeof width_bytes[0] == N_SIZE_SPECS ? 1 : -1]; | 162 | [sizeof width_bytes / sizeof width_bytes[0] == N_SIZE_SPECS ? 1 : -1]; |
138 | }; | 163 | }; |
139 | 164 | ||
140 | /* Names for some non-printing characters. */ | ||
141 | static const char charname[33][4] = { | ||
142 | "nul", "soh", "stx", "etx", "eot", "enq", "ack", "bel", | ||
143 | "bs", "ht", "nl", "vt", "ff", "cr", "so", "si", | ||
144 | "dle", "dc1", "dc2", "dc3", "dc4", "nak", "syn", "etb", | ||
145 | "can", "em", "sub", "esc", "fs", "gs", "rs", "us", | ||
146 | "sp" | ||
147 | }; | ||
148 | |||
149 | /* Address base (8, 10 or 16). */ | ||
150 | static int address_base; | ||
151 | |||
152 | /* The number of octal digits required to represent the largest | ||
153 | address value. */ | ||
154 | #define MAX_ADDRESS_LENGTH \ | ||
155 | ((sizeof(uintmax_t) * CHAR_BIT + CHAR_BIT - 1) / 3) | ||
156 | |||
157 | /* Width of a normal address. */ | ||
158 | static int address_pad_len; | ||
159 | |||
160 | static size_t string_min; | 165 | static size_t string_min; |
161 | static int flag_dump_strings; | 166 | static int flag_dump_strings; |
162 | 167 | ||
163 | /* Non-zero if we should recognize the older non-option arguments | ||
164 | that specified at most one file and optional arguments specifying | ||
165 | offset and pseudo-start address. */ | ||
166 | static int traditional; | ||
167 | |||
168 | /* Non-zero if an old-style 'pseudo-address' was specified. */ | 168 | /* Non-zero if an old-style 'pseudo-address' was specified. */ |
169 | static int flag_pseudo_start; | 169 | static int flag_pseudo_start; |
170 | 170 | ||
171 | /* The difference between the old-style pseudo starting address and | 171 | /* The difference between the old-style pseudo starting address and |
172 | the number of bytes to skip. */ | 172 | the number of bytes to skip. */ |
173 | static uintmax_t pseudo_offset; | 173 | static off_t pseudo_offset; |
174 | 174 | ||
175 | /* Function that accepts an address and an optional following char, | 175 | /* Function that accepts an address and an optional following char, |
176 | and prints the address and char to stdout. */ | 176 | and prints the address and char to stdout. */ |
177 | static void (*format_address) (uintmax_t, char); | 177 | static void (*format_address) (off_t, char); |
178 | 178 | ||
179 | /* The number of input bytes to skip before formatting and writing. */ | 179 | /* The number of input bytes to skip before formatting and writing. */ |
180 | static uintmax_t n_bytes_to_skip; // = 0; | 180 | static off_t n_bytes_to_skip; // = 0; |
181 | 181 | ||
182 | /* When zero, MAX_BYTES_TO_FORMAT and END_OFFSET are ignored, and all | 182 | /* When zero, MAX_BYTES_TO_FORMAT and END_OFFSET are ignored, and all |
183 | input is formatted. */ | 183 | input is formatted. */ |
184 | static int limit_bytes_to_format; // = 0; | 184 | static int limit_bytes_to_format; // = 0; |
185 | 185 | ||
186 | /* The maximum number of bytes that will be formatted. */ | 186 | /* The maximum number of bytes that will be formatted. */ |
187 | static uintmax_t max_bytes_to_format; | 187 | static off_t max_bytes_to_format; |
188 | 188 | ||
189 | /* The offset of the first byte after the last byte to be formatted. */ | 189 | /* The offset of the first byte after the last byte to be formatted. */ |
190 | static uintmax_t end_offset; | 190 | static off_t end_offset; |
191 | 191 | ||
192 | /* When nonzero and two or more consecutive blocks are equal, format | 192 | /* When nonzero and two or more consecutive blocks are equal, format |
193 | only the first block and output an asterisk alone on the following | 193 | only the first block and output an asterisk alone on the following |
@@ -195,10 +195,8 @@ static uintmax_t end_offset; | |||
195 | static int abbreviate_duplicate_blocks = 1; | 195 | static int abbreviate_duplicate_blocks = 1; |
196 | 196 | ||
197 | /* An array of specs describing how to format each input block. */ | 197 | /* An array of specs describing how to format each input block. */ |
198 | static struct tspec *spec; | ||
199 | |||
200 | /* The number of format specs. */ | ||
201 | static size_t n_specs; | 198 | static size_t n_specs; |
199 | static struct tspec *spec; | ||
202 | 200 | ||
203 | /* The number of input bytes formatted per output line. It must be | 201 | /* The number of input bytes formatted per output line. It must be |
204 | a multiple of the least common multiple of the sizes associated with | 202 | a multiple of the least common multiple of the sizes associated with |
@@ -215,25 +213,36 @@ static char const *const *file_list; | |||
215 | 213 | ||
216 | /* Initializer for file_list if no file-arguments | 214 | /* Initializer for file_list if no file-arguments |
217 | were specified on the command line. */ | 215 | were specified on the command line. */ |
218 | static char const *const default_file_list[] = {"-", NULL}; | 216 | static char const *const default_file_list[] = { "-", NULL }; |
219 | 217 | ||
220 | /* The input stream associated with the current file. */ | 218 | /* The input stream associated with the current file. */ |
221 | static FILE *in_stream; | 219 | static FILE *in_stream; |
222 | 220 | ||
223 | /* If nonzero, at least one of the files we read was standard input. */ | 221 | static int ioerror; |
224 | static int have_read_stdin; | ||
225 | 222 | ||
226 | #define MAX_INTEGRAL_TYPE_SIZE sizeof(ulonglong_t) | 223 | #define MAX_INTEGRAL_TYPE_SIZE sizeof(ulonglong_t) |
227 | static unsigned char integral_type_size[MAX_INTEGRAL_TYPE_SIZE + 1]; | 224 | static unsigned char integral_type_size[MAX_INTEGRAL_TYPE_SIZE + 1] = { |
225 | [sizeof(char)] = CHAR, | ||
226 | #if USHRT_MAX != UCHAR_MAX | ||
227 | [sizeof(short)] = SHORT, | ||
228 | #endif | ||
229 | #if UINT_MAX != USHRT_MAX | ||
230 | [sizeof(int)] = INT, | ||
231 | #endif | ||
232 | #if ULONG_MAX != UINT_MAX | ||
233 | [sizeof(long)] = LONG, | ||
234 | #endif | ||
235 | #if ULLONG_MAX != ULONG_MAX | ||
236 | [sizeof(ulonglong_t)] = LONG_LONG, | ||
237 | #endif | ||
238 | }; | ||
228 | 239 | ||
229 | #define MAX_FP_TYPE_SIZE sizeof(longdouble_t) | 240 | #define MAX_FP_TYPE_SIZE sizeof(longdouble_t) |
230 | static unsigned char fp_type_size[MAX_FP_TYPE_SIZE + 1]; | 241 | static unsigned char fp_type_size[MAX_FP_TYPE_SIZE + 1] = { |
231 | 242 | /* gcc seems to allow repeated indexes. Last one stays */ | |
232 | 243 | [sizeof(longdouble_t)] = FLOAT_LONG_DOUBLE, | |
233 | /* For long options that have no equivalent short option, use a | 244 | [sizeof(double)] = FLOAT_DOUBLE, |
234 | non-character as a pseudo short option, starting with CHAR_MAX + 1. */ | 245 | [sizeof(float)] = FLOAT_SINGLE, |
235 | enum { | ||
236 | TRADITIONAL_OPTION = CHAR_MAX + 1 | ||
237 | }; | 246 | }; |
238 | 247 | ||
239 | 248 | ||
@@ -261,12 +270,8 @@ lcm(unsigned u, unsigned v) { | |||
261 | static void | 270 | static void |
262 | print_s_char(size_t n_bytes, const char *block, const char *fmt_string) | 271 | print_s_char(size_t n_bytes, const char *block, const char *fmt_string) |
263 | { | 272 | { |
264 | size_t i; | 273 | while (n_bytes--) { |
265 | for (i = n_bytes; i > 0; i--) { | 274 | int tmp = *(signed char *) block; |
266 | int tmp = (unsigned) *(unsigned char *) block; | ||
267 | if (tmp > SCHAR_MAX) | ||
268 | tmp -= SCHAR_MAX - SCHAR_MIN + 1; | ||
269 | assert(tmp <= SCHAR_MAX); | ||
270 | printf(fmt_string, tmp); | 275 | printf(fmt_string, tmp); |
271 | block += sizeof(unsigned char); | 276 | block += sizeof(unsigned char); |
272 | } | 277 | } |
@@ -275,8 +280,7 @@ print_s_char(size_t n_bytes, const char *block, const char *fmt_string) | |||
275 | static void | 280 | static void |
276 | print_char(size_t n_bytes, const char *block, const char *fmt_string) | 281 | print_char(size_t n_bytes, const char *block, const char *fmt_string) |
277 | { | 282 | { |
278 | size_t i; | 283 | while (n_bytes--) { |
279 | for (i = n_bytes; i > 0; i--) { | ||
280 | unsigned tmp = *(unsigned char *) block; | 284 | unsigned tmp = *(unsigned char *) block; |
281 | printf(fmt_string, tmp); | 285 | printf(fmt_string, tmp); |
282 | block += sizeof(unsigned char); | 286 | block += sizeof(unsigned char); |
@@ -286,12 +290,9 @@ print_char(size_t n_bytes, const char *block, const char *fmt_string) | |||
286 | static void | 290 | static void |
287 | print_s_short(size_t n_bytes, const char *block, const char *fmt_string) | 291 | print_s_short(size_t n_bytes, const char *block, const char *fmt_string) |
288 | { | 292 | { |
289 | size_t i; | 293 | n_bytes /= sizeof(signed short); |
290 | for (i = n_bytes / sizeof(unsigned short); i > 0; i--) { | 294 | while (n_bytes--) { |
291 | int tmp = (unsigned) *(unsigned short *) block; | 295 | int tmp = *(signed short *) block; |
292 | if (tmp > SHRT_MAX) | ||
293 | tmp -= SHRT_MAX - SHRT_MIN + 1; | ||
294 | assert(tmp <= SHRT_MAX); | ||
295 | printf(fmt_string, tmp); | 296 | printf(fmt_string, tmp); |
296 | block += sizeof(unsigned short); | 297 | block += sizeof(unsigned short); |
297 | } | 298 | } |
@@ -300,8 +301,8 @@ print_s_short(size_t n_bytes, const char *block, const char *fmt_string) | |||
300 | static void | 301 | static void |
301 | print_short(size_t n_bytes, const char *block, const char *fmt_string) | 302 | print_short(size_t n_bytes, const char *block, const char *fmt_string) |
302 | { | 303 | { |
303 | size_t i; | 304 | n_bytes /= sizeof(unsigned short); |
304 | for (i = n_bytes / sizeof(unsigned short); i > 0; i--) { | 305 | while (n_bytes--) { |
305 | unsigned tmp = *(unsigned short *) block; | 306 | unsigned tmp = *(unsigned short *) block; |
306 | printf(fmt_string, tmp); | 307 | printf(fmt_string, tmp); |
307 | block += sizeof(unsigned short); | 308 | block += sizeof(unsigned short); |
@@ -311,41 +312,49 @@ print_short(size_t n_bytes, const char *block, const char *fmt_string) | |||
311 | static void | 312 | static void |
312 | print_int(size_t n_bytes, const char *block, const char *fmt_string) | 313 | print_int(size_t n_bytes, const char *block, const char *fmt_string) |
313 | { | 314 | { |
314 | size_t i; | 315 | n_bytes /= sizeof(unsigned); |
315 | for (i = n_bytes / sizeof(unsigned); i > 0; i--) { | 316 | while (n_bytes--) { |
316 | unsigned tmp = *(unsigned *) block; | 317 | unsigned tmp = *(unsigned *) block; |
317 | printf(fmt_string, tmp); | 318 | printf(fmt_string, tmp); |
318 | block += sizeof(unsigned); | 319 | block += sizeof(unsigned); |
319 | } | 320 | } |
320 | } | 321 | } |
321 | 322 | ||
323 | #if UINT_MAX == ULONG_MAX | ||
324 | # define print_long print_int | ||
325 | #else | ||
322 | static void | 326 | static void |
323 | print_long(size_t n_bytes, const char *block, const char *fmt_string) | 327 | print_long(size_t n_bytes, const char *block, const char *fmt_string) |
324 | { | 328 | { |
325 | size_t i; | 329 | n_bytes /= sizeof(unsigned long); |
326 | for (i = n_bytes / sizeof(unsigned long); i > 0; i--) { | 330 | while (n_bytes--) { |
327 | unsigned long tmp = *(unsigned long *) block; | 331 | unsigned long tmp = *(unsigned long *) block; |
328 | printf(fmt_string, tmp); | 332 | printf(fmt_string, tmp); |
329 | block += sizeof(unsigned long); | 333 | block += sizeof(unsigned long); |
330 | } | 334 | } |
331 | } | 335 | } |
336 | #endif | ||
332 | 337 | ||
338 | #if ULONG_MAX == ULLONG_MAX | ||
339 | # define print_long_long print_long | ||
340 | #else | ||
333 | static void | 341 | static void |
334 | print_long_long(size_t n_bytes, const char *block, const char *fmt_string) | 342 | print_long_long(size_t n_bytes, const char *block, const char *fmt_string) |
335 | { | 343 | { |
336 | size_t i; | 344 | n_bytes /= sizeof(ulonglong_t); |
337 | for (i = n_bytes / sizeof(ulonglong_t); i > 0; i--) { | 345 | while (n_bytes--) { |
338 | ulonglong_t tmp = *(ulonglong_t *) block; | 346 | ulonglong_t tmp = *(ulonglong_t *) block; |
339 | printf(fmt_string, tmp); | 347 | printf(fmt_string, tmp); |
340 | block += sizeof(ulonglong_t); | 348 | block += sizeof(ulonglong_t); |
341 | } | 349 | } |
342 | } | 350 | } |
351 | #endif | ||
343 | 352 | ||
344 | static void | 353 | static void |
345 | print_float(size_t n_bytes, const char *block, const char *fmt_string) | 354 | print_float(size_t n_bytes, const char *block, const char *fmt_string) |
346 | { | 355 | { |
347 | size_t i; | 356 | n_bytes /= sizeof(float); |
348 | for (i = n_bytes / sizeof(float); i > 0; i--) { | 357 | while (n_bytes--) { |
349 | float tmp = *(float *) block; | 358 | float tmp = *(float *) block; |
350 | printf(fmt_string, tmp); | 359 | printf(fmt_string, tmp); |
351 | block += sizeof(float); | 360 | block += sizeof(float); |
@@ -355,8 +364,8 @@ print_float(size_t n_bytes, const char *block, const char *fmt_string) | |||
355 | static void | 364 | static void |
356 | print_double(size_t n_bytes, const char *block, const char *fmt_string) | 365 | print_double(size_t n_bytes, const char *block, const char *fmt_string) |
357 | { | 366 | { |
358 | size_t i; | 367 | n_bytes /= sizeof(double); |
359 | for (i = n_bytes / sizeof(double); i > 0; i--) { | 368 | while (n_bytes--) { |
360 | double tmp = *(double *) block; | 369 | double tmp = *(double *) block; |
361 | printf(fmt_string, tmp); | 370 | printf(fmt_string, tmp); |
362 | block += sizeof(double); | 371 | block += sizeof(double); |
@@ -366,50 +375,55 @@ print_double(size_t n_bytes, const char *block, const char *fmt_string) | |||
366 | static void | 375 | static void |
367 | print_long_double(size_t n_bytes, const char *block, const char *fmt_string) | 376 | print_long_double(size_t n_bytes, const char *block, const char *fmt_string) |
368 | { | 377 | { |
369 | size_t i; | 378 | n_bytes /= sizeof(longdouble_t); |
370 | for (i = n_bytes / sizeof(longdouble_t); i > 0; i--) { | 379 | while (n_bytes--) { |
371 | longdouble_t tmp = *(longdouble_t *) block; | 380 | longdouble_t tmp = *(longdouble_t *) block; |
372 | printf(fmt_string, tmp); | 381 | printf(fmt_string, tmp); |
373 | block += sizeof(longdouble_t); | 382 | block += sizeof(longdouble_t); |
374 | } | 383 | } |
375 | } | 384 | } |
376 | 385 | ||
377 | static void | 386 | /* print_[named]_ascii are optimized for speed. |
378 | dump_hexl_mode_trailer(size_t n_bytes, const char *block) | 387 | * Remember, someday you may want to pump gigabytes thru this thing. |
379 | { | 388 | * Saving a dozen of .text bytes here is counter-productive */ |
380 | size_t i; | ||
381 | fputs(" >", stdout); | ||
382 | for (i = n_bytes; i > 0; i--) { | ||
383 | unsigned c = *(unsigned char *) block; | ||
384 | unsigned c2 = (ISPRINT(c) ? c : '.'); | ||
385 | putchar(c2); | ||
386 | block += sizeof(unsigned char); | ||
387 | } | ||
388 | putchar('<'); | ||
389 | } | ||
390 | 389 | ||
391 | static void | 390 | static void |
392 | print_named_ascii(size_t n_bytes, const char *block, | 391 | print_named_ascii(size_t n_bytes, const char *block, |
393 | const char *unused_fmt_string ATTRIBUTE_UNUSED) | 392 | const char *unused_fmt_string ATTRIBUTE_UNUSED) |
394 | { | 393 | { |
395 | size_t i; | 394 | /* Names for some non-printing characters. */ |
396 | for (i = n_bytes; i > 0; i--) { | 395 | static const char charname[33][3] = { |
397 | unsigned c = *(unsigned char *) block; | 396 | "nul", "soh", "stx", "etx", "eot", "enq", "ack", "bel", |
398 | unsigned masked_c = (0x7f & c); | 397 | " bs", " ht", " nl", " vt", " ff", " cr", " so", " si", |
399 | const char *s; | 398 | "dle", "dc1", "dc2", "dc3", "dc4", "nak", "syn", "etb", |
400 | char buf[5]; | 399 | "can", " em", "sub", "esc", " fs", " gs", " rs", " us", |
401 | 400 | " sp" | |
402 | if (masked_c == 127) | 401 | }; |
403 | s = "del"; | 402 | // buf[N] pos: 01234 56789 |
404 | else if (masked_c <= 040) | 403 | char buf[12] = " x\0 0xx\0"; |
405 | s = charname[masked_c]; | 404 | // actually " x\0 xxx\0", but I want to share the string with below. |
406 | else { | 405 | // [12] because we take three 32bit stack slots anyway, and |
407 | sprintf(buf, " %c", masked_c); | 406 | // gcc is too dumb to initialize with constant stores, |
408 | s = buf; | 407 | // it copies initializer from rodata. Oh well. |
408 | |||
409 | while (n_bytes--) { | ||
410 | unsigned masked_c = *(unsigned char *) block++; | ||
411 | |||
412 | masked_c &= 0x7f; | ||
413 | if (masked_c == 0x7f) { | ||
414 | fputs(" del", stdout); | ||
415 | continue; | ||
409 | } | 416 | } |
410 | 417 | if (masked_c > ' ') { | |
411 | printf(" %3s", s); | 418 | buf[3] = masked_c; |
412 | block += sizeof(unsigned char); | 419 | fputs(buf, stdout); |
420 | continue; | ||
421 | } | ||
422 | /* Why? Because printf(" %3.3s") is much slower... */ | ||
423 | buf[6] = charname[masked_c][0]; | ||
424 | buf[7] = charname[masked_c][1]; | ||
425 | buf[8] = charname[masked_c][2]; | ||
426 | fputs(buf+5, stdout); | ||
413 | } | 427 | } |
414 | } | 428 | } |
415 | 429 | ||
@@ -417,53 +431,113 @@ static void | |||
417 | print_ascii(size_t n_bytes, const char *block, | 431 | print_ascii(size_t n_bytes, const char *block, |
418 | const char *unused_fmt_string ATTRIBUTE_UNUSED) | 432 | const char *unused_fmt_string ATTRIBUTE_UNUSED) |
419 | { | 433 | { |
420 | size_t i; | 434 | // buf[N] pos: 01234 56789 |
421 | for (i = n_bytes; i > 0; i--) { | 435 | char buf[12] = " x\0 0xx\0"; |
422 | unsigned c = *(unsigned char *) block; | 436 | |
437 | while (n_bytes--) { | ||
423 | const char *s; | 438 | const char *s; |
424 | char buf[5]; | 439 | unsigned c = *(unsigned char *) block++; |
425 | 440 | ||
441 | if (ISPRINT(c)) { | ||
442 | buf[3] = c; | ||
443 | fputs(buf, stdout); | ||
444 | continue; | ||
445 | } | ||
426 | switch (c) { | 446 | switch (c) { |
427 | case '\0': | 447 | case '\0': |
428 | s = " \\0"; | 448 | s = " \\0"; |
429 | break; | 449 | break; |
430 | case '\007': | 450 | case '\007': |
431 | s = " \\a"; | 451 | s = " \\a"; |
432 | break; | 452 | break; |
433 | case '\b': | 453 | case '\b': |
434 | s = " \\b"; | 454 | s = " \\b"; |
435 | break; | 455 | break; |
436 | case '\f': | 456 | case '\f': |
437 | s = " \\f"; | 457 | s = " \\f"; |
438 | break; | 458 | break; |
439 | case '\n': | 459 | case '\n': |
440 | s = " \\n"; | 460 | s = " \\n"; |
441 | break; | 461 | break; |
442 | case '\r': | 462 | case '\r': |
443 | s = " \\r"; | 463 | s = " \\r"; |
444 | break; | 464 | break; |
445 | case '\t': | 465 | case '\t': |
446 | s = " \\t"; | 466 | s = " \\t"; |
447 | break; | 467 | break; |
448 | case '\v': | 468 | case '\v': |
449 | s = " \\v"; | 469 | s = " \\v"; |
450 | break; | 470 | break; |
451 | default: | 471 | case '\x7f': |
452 | sprintf(buf, (ISPRINT(c) ? " %c" : "%03o"), c); | 472 | s = " 177"; |
453 | s = (const char *) buf; | 473 | break; |
474 | default: /* c is never larger than 040 */ | ||
475 | buf[7] = (c >> 3) + '0'; | ||
476 | buf[8] = (c & 7) + '0'; | ||
477 | s = buf + 5; | ||
454 | } | 478 | } |
479 | fputs(s, stdout); | ||
480 | } | ||
481 | } | ||
455 | 482 | ||
456 | printf(" %3s", s); | 483 | /* Given a list of one or more input filenames FILE_LIST, set the global |
457 | block += sizeof(unsigned char); | 484 | file pointer IN_STREAM and the global string INPUT_FILENAME to the |
485 | first one that can be successfully opened. Modify FILE_LIST to | ||
486 | reference the next filename in the list. A file name of "-" is | ||
487 | interpreted as standard input. If any file open fails, give an error | ||
488 | message and return nonzero. */ | ||
489 | |||
490 | static void | ||
491 | open_next_file(void) | ||
492 | { | ||
493 | while(1) { | ||
494 | input_filename = *file_list; | ||
495 | if (!input_filename) | ||
496 | return; | ||
497 | file_list++; | ||
498 | in_stream = fopen_or_warn_stdin(input_filename); | ||
499 | if (in_stream) { | ||
500 | if (in_stream == stdin) | ||
501 | input_filename = bb_msg_standard_input; | ||
502 | break; | ||
503 | } | ||
504 | ioerror = 1; | ||
505 | } | ||
506 | |||
507 | if (limit_bytes_to_format && !flag_dump_strings) | ||
508 | setbuf(in_stream, NULL); | ||
509 | } | ||
510 | |||
511 | /* Test whether there have been errors on in_stream, and close it if | ||
512 | it is not standard input. Return nonzero if there has been an error | ||
513 | on in_stream or stdout; return zero otherwise. This function will | ||
514 | report more than one error only if both a read and a write error | ||
515 | have occurred. IN_ERRNO, if nonzero, is the error number | ||
516 | corresponding to the most recent action for IN_STREAM. */ | ||
517 | |||
518 | static void | ||
519 | check_and_close(void) | ||
520 | { | ||
521 | if (in_stream) { | ||
522 | if (ferror(in_stream)) { | ||
523 | bb_error_msg("%s: read error", input_filename); | ||
524 | ioerror = 1; | ||
525 | } | ||
526 | fclose_if_not_stdin(in_stream); | ||
527 | in_stream = NULL; | ||
528 | } | ||
529 | |||
530 | if (ferror(stdout)) { | ||
531 | bb_error_msg("write error"); | ||
532 | ioerror = 1; | ||
458 | } | 533 | } |
459 | } | 534 | } |
460 | 535 | ||
461 | /* If S points to a single valid modern od format string, put | 536 | /* If S points to a single valid modern od format string, put |
462 | a description of that format in *TSPEC, make *NEXT point at the | 537 | a description of that format in *TSPEC, make *NEXT point at the |
463 | character following the just-decoded format (if *NEXT is non-NULL), | 538 | character following the just-decoded format (if *NEXT is non-NULL), |
464 | and return zero. If S is not valid, don't modify *NEXT or *TSPEC, | 539 | and return zero. For example, if S were "d4afL" |
465 | give a diagnostic, and return nonzero. For example, if S were | 540 | *NEXT would be set to "afL" and *TSPEC would be |
466 | "d4afL" *NEXT would be set to "afL" and *TSPEC would be | ||
467 | { | 541 | { |
468 | fmt = SIGNED_DECIMAL; | 542 | fmt = SIGNED_DECIMAL; |
469 | size = INT or LONG; (whichever integral_type_size[4] resolves to) | 543 | size = INT or LONG; (whichever integral_type_size[4] resolves to) |
@@ -471,22 +545,22 @@ print_ascii(size_t n_bytes, const char *block, | |||
471 | fmt_string = "%011d%c"; | 545 | fmt_string = "%011d%c"; |
472 | } | 546 | } |
473 | S_ORIG is solely for reporting errors. It should be the full format | 547 | S_ORIG is solely for reporting errors. It should be the full format |
474 | string argument. | 548 | string argument. */ |
475 | */ | ||
476 | 549 | ||
477 | static int | 550 | static void |
478 | decode_one_format(const char *s_orig, const char *s, const char **next, | 551 | decode_one_format(const char *s_orig, const char *s, const char **next, |
479 | struct tspec *tspec) | 552 | struct tspec *tspec) |
480 | { | 553 | { |
481 | enum size_spec size_spec; | 554 | enum size_spec size_spec; |
482 | unsigned long size; | 555 | unsigned size; |
483 | enum output_format fmt; | 556 | enum output_format fmt; |
484 | const char *pre_fmt_string; | 557 | const char *p; |
485 | char *end; | 558 | char *end; |
486 | char *fmt_string; | 559 | char *fmt_string = NULL; |
487 | void (*print_function) (size_t, const char *, const char *); | 560 | void (*print_function) (size_t, const char *, const char *); |
488 | unsigned c; | 561 | unsigned c; |
489 | unsigned field_width = 0; | 562 | unsigned field_width = 0; |
563 | int pos; | ||
490 | 564 | ||
491 | assert(tspec != NULL); | 565 | assert(tspec != NULL); |
492 | 566 | ||
@@ -494,40 +568,33 @@ decode_one_format(const char *s_orig, const char *s, const char **next, | |||
494 | case 'd': | 568 | case 'd': |
495 | case 'o': | 569 | case 'o': |
496 | case 'u': | 570 | case 'u': |
497 | case 'x': | 571 | case 'x': { |
498 | c = *s; | 572 | static const char CSIL[] = "CSIL"; |
499 | ++s; | 573 | |
500 | switch (*s) { | 574 | c = *s++; |
501 | case 'C': | 575 | p = strchr(CSIL, *s); |
502 | ++s; | 576 | if (!p) { |
503 | size = sizeof(char); | ||
504 | break; | ||
505 | case 'S': | ||
506 | ++s; | ||
507 | size = sizeof(short); | ||
508 | break; | ||
509 | case 'I': | ||
510 | ++s; | ||
511 | size = sizeof(int); | ||
512 | break; | ||
513 | case 'L': | ||
514 | ++s; | ||
515 | size = sizeof(long); | ||
516 | break; | ||
517 | default: | ||
518 | size = sizeof(int); | 577 | size = sizeof(int); |
519 | if (isdigit(s[0])) { | 578 | if (isdigit(s[0])) { |
520 | size = strtoul(s, &end, 0); | 579 | size = bb_strtou(s, &end, 0); |
521 | if (end[0] || MAX_INTEGRAL_TYPE_SIZE < size | 580 | if (errno == ERANGE |
581 | || MAX_INTEGRAL_TYPE_SIZE < size | ||
522 | || integral_type_size[size] == NO_SIZE | 582 | || integral_type_size[size] == NO_SIZE |
523 | ) { | 583 | ) { |
524 | bb_error_msg("invalid type string '%s'; " | 584 | bb_error_msg_and_die("invalid type string '%s'; " |
525 | "%lu-byte integral type is not spported", s_orig, size); | 585 | "%u-byte %s type is not supported", |
526 | return 1; | 586 | s_orig, size, "integral"); |
527 | } | 587 | } |
528 | s = end; | 588 | s = end; |
529 | } | 589 | } |
530 | break; | 590 | } else { |
591 | static const uint8_t CSIL_sizeof[] = { | ||
592 | sizeof(char), | ||
593 | sizeof(short), | ||
594 | sizeof(int), | ||
595 | sizeof(long), | ||
596 | }; | ||
597 | size = CSIL_sizeof[p - CSIL]; | ||
531 | } | 598 | } |
532 | 599 | ||
533 | #define ISPEC_TO_FORMAT(Spec, Min_format, Long_format, Max_format) \ | 600 | #define ISPEC_TO_FORMAT(Spec, Min_format, Long_format, Max_format) \ |
@@ -535,41 +602,41 @@ decode_one_format(const char *s_orig, const char *s, const char **next, | |||
535 | : ((Spec) == LONG ? (Long_format) : (Min_format))) | 602 | : ((Spec) == LONG ? (Long_format) : (Min_format))) |
536 | 603 | ||
537 | #define FMT_BYTES_ALLOCATED 9 | 604 | #define FMT_BYTES_ALLOCATED 9 |
538 | fmt_string = xmalloc(FMT_BYTES_ALLOCATED); | ||
539 | |||
540 | size_spec = integral_type_size[size]; | 605 | size_spec = integral_type_size[size]; |
541 | 606 | ||
542 | switch (c) { | 607 | { |
543 | case 'd': | 608 | static const char doux[] = "doux"; |
544 | fmt = SIGNED_DECIMAL; | 609 | static const char doux_fmt_letter[][4] = { |
545 | sprintf(fmt_string, " %%%u%s", | 610 | "lld", "llo", "llu", "llx" |
546 | (field_width = bytes_to_signed_dec_digits[size]), | 611 | }; |
547 | ISPEC_TO_FORMAT(size_spec, "d", "ld", PRIdMAX)); | 612 | static const enum output_format doux_fmt[] = { |
548 | break; | 613 | SIGNED_DECIMAL, |
549 | case 'o': | 614 | OCTAL, |
550 | fmt = OCTAL; | 615 | UNSIGNED_DECIMAL, |
551 | sprintf(fmt_string, " %%0%u%s", | 616 | HEXADECIMAL, |
552 | (field_width = bytes_to_oct_digits[size]), | 617 | }; |
553 | ISPEC_TO_FORMAT(size_spec, "o", "lo", PRIoMAX)); | 618 | static const uint8_t *const doux_bytes_to_XXX[] = { |
554 | break; | 619 | bytes_to_signed_dec_digits, |
555 | case 'u': | 620 | bytes_to_oct_digits, |
556 | fmt = UNSIGNED_DECIMAL; | 621 | bytes_to_unsigned_dec_digits, |
557 | sprintf(fmt_string, " %%%u%s", | 622 | bytes_to_hex_digits, |
558 | (field_width = bytes_to_unsigned_dec_digits[size]), | 623 | }; |
559 | ISPEC_TO_FORMAT(size_spec, "u", "lu", PRIuMAX)); | 624 | static const char doux_fmtstring[][sizeof(" %%0%u%s")] = { |
560 | break; | 625 | " %%%u%s", |
561 | case 'x': | 626 | " %%0%u%s", |
562 | fmt = HEXADECIMAL; | 627 | " %%%u%s", |
563 | sprintf(fmt_string, " %%0%u%s", | 628 | " %%0%u%s", |
564 | (field_width = bytes_to_hex_digits[size]), | 629 | }; |
565 | ISPEC_TO_FORMAT(size_spec, "x", "lx", PRIxMAX)); | 630 | |
566 | break; | 631 | pos = strchr(doux, c) - doux; |
567 | default: | 632 | fmt = doux_fmt[pos]; |
568 | abort(); | 633 | field_width = doux_bytes_to_XXX[pos][size]; |
634 | p = doux_fmt_letter[pos] + 2; | ||
635 | if (size_spec == LONG) p--; | ||
636 | if (size_spec == LONG_LONG) p -= 2; | ||
637 | fmt_string = xasprintf(doux_fmtstring[pos], field_width, p); | ||
569 | } | 638 | } |
570 | 639 | ||
571 | assert(strlen(fmt_string) < FMT_BYTES_ALLOCATED); | ||
572 | |||
573 | switch (size_spec) { | 640 | switch (size_spec) { |
574 | case CHAR: | 641 | case CHAR: |
575 | print_function = (fmt == SIGNED_DECIMAL | 642 | print_function = (fmt == SIGNED_DECIMAL |
@@ -587,80 +654,69 @@ decode_one_format(const char *s_orig, const char *s, const char **next, | |||
587 | case LONG: | 654 | case LONG: |
588 | print_function = print_long; | 655 | print_function = print_long; |
589 | break; | 656 | break; |
590 | case LONG_LONG: | 657 | default: /* case LONG_LONG: */ |
591 | print_function = print_long_long; | 658 | print_function = print_long_long; |
592 | break; | 659 | break; |
593 | default: | ||
594 | abort(); | ||
595 | } | 660 | } |
596 | break; | 661 | break; |
662 | } | ||
663 | |||
664 | case 'f': { | ||
665 | static const char FDL[] = "FDL"; | ||
597 | 666 | ||
598 | case 'f': | ||
599 | fmt = FLOATING_POINT; | 667 | fmt = FLOATING_POINT; |
600 | ++s; | 668 | ++s; |
601 | switch (*s) { | 669 | p = strchr(FDL, *s); |
602 | case 'F': | 670 | if (!p) { |
603 | ++s; | ||
604 | size = sizeof(float); | ||
605 | break; | ||
606 | case 'D': | ||
607 | ++s; | ||
608 | size = sizeof(double); | ||
609 | break; | ||
610 | case 'L': | ||
611 | ++s; | ||
612 | size = sizeof(longdouble_t); | ||
613 | break; | ||
614 | default: | ||
615 | size = sizeof(double); | 671 | size = sizeof(double); |
616 | if (isdigit(s[0])) { | 672 | if (isdigit(s[0])) { |
617 | size = strtoul(s, &end, 0); | 673 | size = bb_strtou(s, &end, 0); |
618 | if (end[0] || size > MAX_FP_TYPE_SIZE | 674 | if (errno == ERANGE || size > MAX_FP_TYPE_SIZE |
619 | || fp_type_size[size] == NO_SIZE | 675 | || fp_type_size[size] == NO_SIZE |
620 | ) { | 676 | ) { |
621 | bb_error_msg("invalid type string '%s'; " | 677 | bb_error_msg_and_die("invalid type string '%s'; " |
622 | "%lu-byte floating point type is not supported", s_orig, size); | 678 | "%u-byte %s type is not supported", |
623 | return 1; | 679 | s_orig, size, "floating point"); |
624 | } | 680 | } |
625 | s = end; | 681 | s = end; |
626 | } | 682 | } |
627 | break; | 683 | } else { |
684 | static const uint8_t FDL_sizeof[] = { | ||
685 | sizeof(float), | ||
686 | sizeof(double), | ||
687 | sizeof(longdouble_t), | ||
688 | }; | ||
689 | |||
690 | size = FDL_sizeof[p - FDL]; | ||
628 | } | 691 | } |
692 | |||
629 | size_spec = fp_type_size[size]; | 693 | size_spec = fp_type_size[size]; |
630 | 694 | ||
631 | switch (size_spec) { | 695 | switch (size_spec) { |
632 | case FLOAT_SINGLE: | 696 | case FLOAT_SINGLE: |
633 | print_function = print_float; | 697 | print_function = print_float; |
698 | field_width = FLT_DIG + 8; | ||
634 | /* Don't use %#e; not all systems support it. */ | 699 | /* Don't use %#e; not all systems support it. */ |
635 | pre_fmt_string = " %%%d.%de"; | 700 | fmt_string = xasprintf(" %%%d.%de", field_width, FLT_DIG); |
636 | fmt_string = xmalloc(strlen(pre_fmt_string)); | ||
637 | sprintf(fmt_string, pre_fmt_string, | ||
638 | (field_width = FLT_DIG + 8), FLT_DIG); | ||
639 | break; | 701 | break; |
640 | case FLOAT_DOUBLE: | 702 | case FLOAT_DOUBLE: |
641 | print_function = print_double; | 703 | print_function = print_double; |
642 | pre_fmt_string = " %%%d.%de"; | 704 | field_width = DBL_DIG + 8; |
643 | fmt_string = xmalloc(strlen(pre_fmt_string)); | 705 | fmt_string = xasprintf(" %%%d.%de", field_width, DBL_DIG); |
644 | sprintf(fmt_string, pre_fmt_string, | ||
645 | (field_width = DBL_DIG + 8), DBL_DIG); | ||
646 | break; | 706 | break; |
647 | case FLOAT_LONG_DOUBLE: | 707 | default: /* case FLOAT_LONG_DOUBLE: */ |
648 | print_function = print_long_double; | 708 | print_function = print_long_double; |
649 | pre_fmt_string = " %%%d.%dLe"; | 709 | field_width = LDBL_DIG + 8; |
650 | fmt_string = xmalloc(strlen(pre_fmt_string)); | 710 | fmt_string = xasprintf(" %%%d.%dLe", field_width, LDBL_DIG); |
651 | sprintf(fmt_string, pre_fmt_string, | ||
652 | (field_width = LDBL_DIG + 8), LDBL_DIG); | ||
653 | break; | 711 | break; |
654 | default: | ||
655 | abort(); | ||
656 | } | 712 | } |
657 | break; | 713 | break; |
714 | } | ||
658 | 715 | ||
659 | case 'a': | 716 | case 'a': |
660 | ++s; | 717 | ++s; |
661 | fmt = NAMED_CHARACTER; | 718 | fmt = NAMED_CHARACTER; |
662 | size_spec = CHAR; | 719 | size_spec = CHAR; |
663 | fmt_string = NULL; | ||
664 | print_function = print_named_ascii; | 720 | print_function = print_named_ascii; |
665 | field_width = 3; | 721 | field_width = 3; |
666 | break; | 722 | break; |
@@ -668,13 +724,12 @@ decode_one_format(const char *s_orig, const char *s, const char **next, | |||
668 | ++s; | 724 | ++s; |
669 | fmt = CHARACTER; | 725 | fmt = CHARACTER; |
670 | size_spec = CHAR; | 726 | size_spec = CHAR; |
671 | fmt_string = NULL; | ||
672 | print_function = print_ascii; | 727 | print_function = print_ascii; |
673 | field_width = 3; | 728 | field_width = 3; |
674 | break; | 729 | break; |
675 | default: | 730 | default: |
676 | bb_error_msg("invalid character '%c' in type string '%s'", *s, s_orig); | 731 | bb_error_msg_and_die("invalid character '%c' " |
677 | return 1; | 732 | "in type string '%s'", *s, s_orig); |
678 | } | 733 | } |
679 | 734 | ||
680 | tspec->size = size_spec; | 735 | tspec->size = size_spec; |
@@ -689,96 +744,22 @@ decode_one_format(const char *s_orig, const char *s, const char **next, | |||
689 | 744 | ||
690 | if (next != NULL) | 745 | if (next != NULL) |
691 | *next = s; | 746 | *next = s; |
692 | |||
693 | return 0; | ||
694 | } | ||
695 | |||
696 | /* Given a list of one or more input filenames FILE_LIST, set the global | ||
697 | file pointer IN_STREAM and the global string INPUT_FILENAME to the | ||
698 | first one that can be successfully opened. Modify FILE_LIST to | ||
699 | reference the next filename in the list. A file name of "-" is | ||
700 | interpreted as standard input. If any file open fails, give an error | ||
701 | message and return nonzero. */ | ||
702 | |||
703 | static int | ||
704 | open_next_file(void) | ||
705 | { | ||
706 | int err = 0; | ||
707 | |||
708 | do { | ||
709 | input_filename = *file_list; | ||
710 | if (input_filename == NULL) | ||
711 | return err; | ||
712 | ++file_list; | ||
713 | |||
714 | if (input_filename[0] == '-' && !input_filename[1]) { | ||
715 | input_filename = "standard input"; | ||
716 | in_stream = stdin; | ||
717 | have_read_stdin = 1; | ||
718 | } else { | ||
719 | in_stream = fopen(input_filename, "r"); | ||
720 | if (in_stream == NULL) { | ||
721 | bb_perror_msg("%s", input_filename); | ||
722 | err = 1; | ||
723 | } | ||
724 | } | ||
725 | } while (in_stream == NULL); | ||
726 | |||
727 | if (limit_bytes_to_format && !flag_dump_strings) | ||
728 | setbuf(in_stream, NULL); | ||
729 | |||
730 | return err; | ||
731 | } | ||
732 | |||
733 | /* Test whether there have been errors on in_stream, and close it if | ||
734 | it is not standard input. Return nonzero if there has been an error | ||
735 | on in_stream or stdout; return zero otherwise. This function will | ||
736 | report more than one error only if both a read and a write error | ||
737 | have occurred. IN_ERRNO, if nonzero, is the error number | ||
738 | corresponding to the most recent action for IN_STREAM. */ | ||
739 | |||
740 | static int | ||
741 | check_and_close(int in_errno) | ||
742 | { | ||
743 | int err = 0; | ||
744 | |||
745 | if (in_stream != NULL) { | ||
746 | if (ferror(in_stream)) { | ||
747 | bb_error_msg("%s: read error", input_filename); | ||
748 | if (in_stream != stdin) | ||
749 | fclose(in_stream); | ||
750 | err = 1; | ||
751 | } else if (in_stream != stdin && fclose(in_stream) == EOF) { | ||
752 | bb_perror_msg("%s", input_filename); | ||
753 | err = 1; | ||
754 | } | ||
755 | in_stream = NULL; | ||
756 | } | ||
757 | |||
758 | if (ferror(stdout)) { | ||
759 | bb_error_msg("write error"); | ||
760 | err = 1; | ||
761 | } | ||
762 | |||
763 | return err; | ||
764 | } | 747 | } |
765 | 748 | ||
766 | /* Decode the modern od format string S. Append the decoded | 749 | /* Decode the modern od format string S. Append the decoded |
767 | representation to the global array SPEC, reallocating SPEC if | 750 | representation to the global array SPEC, reallocating SPEC if |
768 | necessary. Return zero if S is valid, nonzero otherwise. */ | 751 | necessary. Return zero if S is valid, nonzero otherwise. */ |
769 | 752 | ||
770 | static int | 753 | static void |
771 | decode_format_string(const char *s) | 754 | decode_format_string(const char *s) |
772 | { | 755 | { |
773 | const char *s_orig = s; | 756 | const char *s_orig = s; |
774 | assert(s != NULL); | ||
775 | 757 | ||
776 | while (*s != '\0') { | 758 | while (*s != '\0') { |
777 | struct tspec tspec; | 759 | struct tspec tspec; |
778 | const char *next; | 760 | const char *next; |
779 | 761 | ||
780 | if (decode_one_format(s_orig, s, &next, &tspec)) | 762 | decode_one_format(s_orig, s, &next, &tspec); |
781 | return 1; | ||
782 | 763 | ||
783 | assert(s != next); | 764 | assert(s != next); |
784 | s = next; | 765 | s = next; |
@@ -786,8 +767,6 @@ decode_format_string(const char *s) | |||
786 | spec = xrealloc(spec, n_specs * sizeof(*spec)); | 767 | spec = xrealloc(spec, n_specs * sizeof(*spec)); |
787 | memcpy(&spec[n_specs-1], &tspec, sizeof *spec); | 768 | memcpy(&spec[n_specs-1], &tspec, sizeof *spec); |
788 | } | 769 | } |
789 | |||
790 | return 0; | ||
791 | } | 770 | } |
792 | 771 | ||
793 | /* Given a list of one or more input filenames FILE_LIST, set the global | 772 | /* Given a list of one or more input filenames FILE_LIST, set the global |
@@ -797,16 +776,13 @@ decode_format_string(const char *s) | |||
797 | nonzero. When possible, use seek rather than read operations to | 776 | nonzero. When possible, use seek rather than read operations to |
798 | advance IN_STREAM. */ | 777 | advance IN_STREAM. */ |
799 | 778 | ||
800 | static int | 779 | static void |
801 | skip(uintmax_t n_skip) | 780 | skip(off_t n_skip) |
802 | { | 781 | { |
803 | int err = 0; | ||
804 | int in_errno = 0; | ||
805 | |||
806 | if (n_skip == 0) | 782 | if (n_skip == 0) |
807 | return 0; | 783 | return; |
808 | 784 | ||
809 | while (in_stream != NULL) { /* EOF */ | 785 | while (in_stream) { /* !EOF */ |
810 | struct stat file_stats; | 786 | struct stat file_stats; |
811 | 787 | ||
812 | /* First try seeking. For large offsets, this extra work is | 788 | /* First try seeking. For large offsets, this extra work is |
@@ -819,87 +795,71 @@ skip(uintmax_t n_skip) | |||
819 | Try to do that by getting file's size using fstat. | 795 | Try to do that by getting file's size using fstat. |
820 | But that will work only for regular files. */ | 796 | But that will work only for regular files. */ |
821 | 797 | ||
822 | if (fstat(fileno(in_stream), &file_stats) == 0) { | ||
823 | /* The st_size field is valid only for regular files | 798 | /* The st_size field is valid only for regular files |
824 | (and for symbolic links, which cannot occur here). | 799 | (and for symbolic links, which cannot occur here). |
825 | If the number of bytes left to skip is at least | 800 | If the number of bytes left to skip is at least |
826 | as large as the size of the current file, we can | 801 | as large as the size of the current file, we can |
827 | decrement n_skip and go on to the next file. */ | 802 | decrement n_skip and go on to the next file. */ |
828 | 803 | if (fstat(fileno(in_stream), &file_stats) == 0 | |
829 | if (S_ISREG(file_stats.st_mode) && 0 <= file_stats.st_size) { | 804 | && S_ISREG(file_stats.st_mode) && file_stats.st_size >= 0 |
830 | if ((uintmax_t) file_stats.st_size <= n_skip) | 805 | ) { |
831 | n_skip -= file_stats.st_size; | 806 | if (file_stats.st_size < n_skip) { |
832 | else { | 807 | n_skip -= file_stats.st_size; |
833 | if (fseeko(in_stream, n_skip, SEEK_CUR) != 0) { | 808 | /* take check&close / open_next route */ |
834 | in_errno = errno; | ||
835 | err = 1; | ||
836 | } | ||
837 | n_skip = 0; | ||
838 | } | ||
839 | } else { | 809 | } else { |
840 | 810 | if (fseeko(in_stream, n_skip, SEEK_CUR) != 0) | |
841 | /* If it's not a regular file with nonnegative size, | 811 | ioerror = 1; |
842 | position the file pointer by reading. */ | 812 | return; |
843 | char buf[BUFSIZ]; | 813 | } |
844 | size_t n_bytes_read, n_bytes_to_read = BUFSIZ; | 814 | } else { |
845 | 815 | /* If it's not a regular file with nonnegative size, | |
846 | while (0 < n_skip) { | 816 | position the file pointer by reading. */ |
847 | if (n_skip < n_bytes_to_read) | 817 | char buf[BUFSIZ]; |
848 | n_bytes_to_read = n_skip; | 818 | size_t n_bytes_read, n_bytes_to_read = BUFSIZ; |
849 | n_bytes_read = fread(buf, 1, n_bytes_to_read, in_stream); | 819 | |
850 | n_skip -= n_bytes_read; | 820 | while (n_skip > 0) { |
851 | if (n_bytes_read != n_bytes_to_read) { | 821 | if (n_skip < n_bytes_to_read) |
852 | in_errno = errno; | 822 | n_bytes_to_read = n_skip; |
853 | err = 1; | 823 | n_bytes_read = fread(buf, 1, n_bytes_to_read, in_stream); |
854 | n_skip = 0; | 824 | n_skip -= n_bytes_read; |
855 | break; | 825 | if (n_bytes_read != n_bytes_to_read) |
856 | } | 826 | break; /* EOF on this file or error */ |
857 | } | ||
858 | } | 827 | } |
859 | if (n_skip == 0) | ||
860 | break; | ||
861 | } else { /* cannot fstat() file */ | ||
862 | bb_perror_msg("%s", input_filename); | ||
863 | err = 1; | ||
864 | } | 828 | } |
829 | if (n_skip == 0) | ||
830 | return; | ||
865 | 831 | ||
866 | err |= check_and_close(in_errno); | 832 | check_and_close(); |
867 | err |= open_next_file(); | 833 | open_next_file(); |
868 | } | 834 | } |
869 | 835 | ||
870 | if (n_skip != 0) | 836 | if (n_skip) |
871 | bb_error_msg_and_die("cannot skip past end of combined input"); | 837 | bb_error_msg_and_die("cannot skip past end of combined input"); |
872 | return err; | ||
873 | } | 838 | } |
874 | 839 | ||
840 | |||
841 | typedef void FN_format_address(off_t address, char c); | ||
842 | |||
875 | static void | 843 | static void |
876 | format_address_none(uintmax_t address ATTRIBUTE_UNUSED, char c ATTRIBUTE_UNUSED) | 844 | format_address_none(off_t address ATTRIBUTE_UNUSED, char c ATTRIBUTE_UNUSED) |
877 | { | 845 | { |
878 | } | 846 | } |
879 | 847 | ||
848 | static int address_pad_len; | ||
849 | static char address_fmt[] = "%0*"OFF_FMT"xc"; | ||
850 | /* Corresponds to 'x' above */ | ||
851 | #define address_base_char address_fmt[sizeof(address_fmt)-3] | ||
852 | |||
880 | static void | 853 | static void |
881 | format_address_std(uintmax_t address, char c) | 854 | format_address_std(off_t address, char c) |
882 | { | 855 | { |
883 | char buf[MAX_ADDRESS_LENGTH + 2]; | 856 | /* Corresponds to 'c' */ |
884 | char *p = buf + sizeof(buf)-1; | 857 | address_fmt[sizeof(address_fmt)-2] = c; |
885 | char const *pbound; | 858 | printf(address_fmt, address_pad_len, address); |
886 | |||
887 | *p = '\0'; | ||
888 | *--p = c; | ||
889 | pbound = p - address_pad_len; | ||
890 | |||
891 | do { | ||
892 | *--p = "0123456789abcdef"[address % address_base]; | ||
893 | address /= address_base; | ||
894 | } while (address); | ||
895 | |||
896 | while (pbound < p) | ||
897 | *--p = '0'; | ||
898 | fputs(p, stdout); | ||
899 | } | 859 | } |
900 | 860 | ||
901 | static void | 861 | static void |
902 | format_address_paren(uintmax_t address, char c) | 862 | format_address_paren(off_t address, char c) |
903 | { | 863 | { |
904 | putchar('('); | 864 | putchar('('); |
905 | format_address_std(address, ')'); | 865 | format_address_std(address, ')'); |
@@ -907,12 +867,25 @@ format_address_paren(uintmax_t address, char c) | |||
907 | } | 867 | } |
908 | 868 | ||
909 | static void | 869 | static void |
910 | format_address_label(uintmax_t address, char c) | 870 | format_address_label(off_t address, char c) |
911 | { | 871 | { |
912 | format_address_std(address, ' '); | 872 | format_address_std(address, ' '); |
913 | format_address_paren(address + pseudo_offset, c); | 873 | format_address_paren(address + pseudo_offset, c); |
914 | } | 874 | } |
915 | 875 | ||
876 | |||
877 | static void | ||
878 | dump_hexl_mode_trailer(size_t n_bytes, const char *block) | ||
879 | { | ||
880 | fputs(" >", stdout); | ||
881 | while (n_bytes--) { | ||
882 | unsigned c = *(unsigned char *) block++; | ||
883 | c = (ISPRINT(c) ? c : '.'); | ||
884 | putchar(c); | ||
885 | } | ||
886 | putchar('<'); | ||
887 | } | ||
888 | |||
916 | /* Write N_BYTES bytes from CURR_BLOCK to standard output once for each | 889 | /* Write N_BYTES bytes from CURR_BLOCK to standard output once for each |
917 | of the N_SPEC format specs. CURRENT_OFFSET is the byte address of | 890 | of the N_SPEC format specs. CURRENT_OFFSET is the byte address of |
918 | CURR_BLOCK in the concatenation of input files, and it is printed | 891 | CURR_BLOCK in the concatenation of input files, and it is printed |
@@ -925,11 +898,12 @@ format_address_label(uintmax_t address, char c) | |||
925 | only when it has not been padded to length BYTES_PER_BLOCK. */ | 898 | only when it has not been padded to length BYTES_PER_BLOCK. */ |
926 | 899 | ||
927 | static void | 900 | static void |
928 | write_block(uintmax_t current_offset, size_t n_bytes, | 901 | write_block(off_t current_offset, size_t n_bytes, |
929 | const char *prev_block, const char *curr_block) | 902 | const char *prev_block, const char *curr_block) |
930 | { | 903 | { |
931 | static int first = 1; | 904 | static char first = 1; |
932 | static int prev_pair_equal = 0; | 905 | static char prev_pair_equal = 0; |
906 | size_t i; | ||
933 | 907 | ||
934 | if (abbreviate_duplicate_blocks | 908 | if (abbreviate_duplicate_blocks |
935 | && !first | 909 | && !first |
@@ -944,8 +918,7 @@ write_block(uintmax_t current_offset, size_t n_bytes, | |||
944 | prev_pair_equal = 1; | 918 | prev_pair_equal = 1; |
945 | } | 919 | } |
946 | } else { | 920 | } else { |
947 | size_t i; | 921 | first = 0; |
948 | |||
949 | prev_pair_equal = 0; | 922 | prev_pair_equal = 0; |
950 | for (i = 0; i < n_specs; i++) { | 923 | for (i = 0; i < n_specs; i++) { |
951 | if (i == 0) | 924 | if (i == 0) |
@@ -964,63 +937,17 @@ write_block(uintmax_t current_offset, size_t n_bytes, | |||
964 | putchar('\n'); | 937 | putchar('\n'); |
965 | } | 938 | } |
966 | } | 939 | } |
967 | first = 0; | ||
968 | } | ||
969 | |||
970 | /* Read a single byte into *C from the concatenation of the input files | ||
971 | named in the global array FILE_LIST. On the first call to this | ||
972 | function, the global variable IN_STREAM is expected to be an open | ||
973 | stream associated with the input file INPUT_FILENAME. If IN_STREAM | ||
974 | is at end-of-file, close it and update the global variables IN_STREAM | ||
975 | and INPUT_FILENAME so they correspond to the next file in the list. | ||
976 | Then try to read a byte from the newly opened file. Repeat if | ||
977 | necessary until EOF is reached for the last file in FILE_LIST, then | ||
978 | set *C to EOF and return. Subsequent calls do likewise. The return | ||
979 | value is nonzero if any errors occured, zero otherwise. */ | ||
980 | |||
981 | static int | ||
982 | read_char(int *c) | ||
983 | { | ||
984 | int err = 0; | ||
985 | |||
986 | *c = EOF; | ||
987 | |||
988 | while (in_stream != NULL) { /* EOF. */ | ||
989 | *c = fgetc(in_stream); | ||
990 | if (*c != EOF) | ||
991 | break; | ||
992 | err |= check_and_close(errno); | ||
993 | err |= open_next_file(); | ||
994 | } | ||
995 | |||
996 | return err; | ||
997 | } | 940 | } |
998 | 941 | ||
999 | /* Read N bytes into BLOCK from the concatenation of the input files | 942 | static void |
1000 | named in the global array FILE_LIST. On the first call to this | ||
1001 | function, the global variable IN_STREAM is expected to be an open | ||
1002 | stream associated with the input file INPUT_FILENAME. If all N | ||
1003 | bytes cannot be read from IN_STREAM, close IN_STREAM and update | ||
1004 | the global variables IN_STREAM and INPUT_FILENAME. Then try to | ||
1005 | read the remaining bytes from the newly opened file. Repeat if | ||
1006 | necessary until EOF is reached for the last file in FILE_LIST. | ||
1007 | On subsequent calls, don't modify BLOCK and return zero. Set | ||
1008 | *N_BYTES_IN_BUFFER to the number of bytes read. If an error occurs, | ||
1009 | it will be detected through ferror when the stream is about to be | ||
1010 | closed. If there is an error, give a message but continue reading | ||
1011 | as usual and return nonzero. Otherwise return zero. */ | ||
1012 | |||
1013 | static int | ||
1014 | read_block(size_t n, char *block, size_t *n_bytes_in_buffer) | 943 | read_block(size_t n, char *block, size_t *n_bytes_in_buffer) |
1015 | { | 944 | { |
1016 | int err = 0; | ||
1017 | |||
1018 | assert(0 < n && n <= bytes_per_block); | 945 | assert(0 < n && n <= bytes_per_block); |
1019 | 946 | ||
1020 | *n_bytes_in_buffer = 0; | 947 | *n_bytes_in_buffer = 0; |
1021 | 948 | ||
1022 | if (n == 0) | 949 | if (n == 0) |
1023 | return 0; | 950 | return; |
1024 | 951 | ||
1025 | while (in_stream != NULL) { /* EOF. */ | 952 | while (in_stream != NULL) { /* EOF. */ |
1026 | size_t n_needed; | 953 | size_t n_needed; |
@@ -1031,11 +958,10 @@ read_block(size_t n, char *block, size_t *n_bytes_in_buffer) | |||
1031 | *n_bytes_in_buffer += n_read; | 958 | *n_bytes_in_buffer += n_read; |
1032 | if (n_read == n_needed) | 959 | if (n_read == n_needed) |
1033 | break; | 960 | break; |
1034 | err |= check_and_close(errno); | 961 | /* error check is done in check_and_close */ |
1035 | err |= open_next_file(); | 962 | check_and_close(); |
963 | open_next_file(); | ||
1036 | } | 964 | } |
1037 | |||
1038 | return err; | ||
1039 | } | 965 | } |
1040 | 966 | ||
1041 | /* Return the least common multiple of the sizes associated | 967 | /* Return the least common multiple of the sizes associated |
@@ -1056,37 +982,34 @@ get_lcm(void) | |||
1056 | leading '+' return nonzero and set *OFFSET to the offset it denotes. */ | 982 | leading '+' return nonzero and set *OFFSET to the offset it denotes. */ |
1057 | 983 | ||
1058 | static int | 984 | static int |
1059 | parse_old_offset(const char *s, uintmax_t *offset) | 985 | parse_old_offset(const char *s, off_t *offset) |
1060 | { | 986 | { |
1061 | static const struct suffix_mult Bb[] = { | 987 | static const struct suffix_mult Bb[] = { |
1062 | { "B", 1024 }, | 988 | { "B", 1024 }, |
1063 | { "b", 512 }, | 989 | { "b", 512 }, |
1064 | { NULL, 0 } | 990 | { NULL, 0 } |
1065 | }; | 991 | }; |
1066 | 992 | char *p; | |
1067 | int radix; | 993 | int radix; |
1068 | 994 | ||
1069 | if (*s == '\0') | ||
1070 | return 0; | ||
1071 | |||
1072 | /* Skip over any leading '+'. */ | 995 | /* Skip over any leading '+'. */ |
1073 | if (s[0] == '+') | 996 | if (s[0] == '+') ++s; |
1074 | ++s; | ||
1075 | 997 | ||
1076 | /* Determine the radix we'll use to interpret S. If there is a '.', | 998 | /* Determine the radix we'll use to interpret S. If there is a '.', |
1077 | it's decimal, otherwise, if the string begins with '0X'or '0x', | 999 | * it's decimal, otherwise, if the string begins with '0X'or '0x', |
1078 | it's hexadecimal, else octal. */ | 1000 | * it's hexadecimal, else octal. */ |
1079 | if (strchr(s, '.') != NULL) | 1001 | p = strchr(s, '.'); |
1002 | radix = 8; | ||
1003 | if (p) { | ||
1004 | p[0] = '\0'; /* cheating */ | ||
1080 | radix = 10; | 1005 | radix = 10; |
1081 | else { | 1006 | } else if (s[0] == '0' && (s[1] == 'x' || s[1] == 'X')) |
1082 | if (s[0] == '0' && (s[1] == 'x' || s[1] == 'X')) | 1007 | radix = 16; |
1083 | radix = 16; | 1008 | |
1084 | else | 1009 | *offset = xstrtooff_sfx(s, radix, Bb); |
1085 | radix = 8; | 1010 | if (p) p[0] = '.'; |
1086 | } | ||
1087 | 1011 | ||
1088 | *offset = xstrtoumax_sfx(s, radix, Bb); | 1012 | return (*offset >= 0); |
1089 | return 1; | ||
1090 | } | 1013 | } |
1091 | 1014 | ||
1092 | /* Read a chunk of size BYTES_PER_BLOCK from the input files, write the | 1015 | /* Read a chunk of size BYTES_PER_BLOCK from the input files, write the |
@@ -1101,13 +1024,12 @@ parse_old_offset(const char *s, uintmax_t *offset) | |||
1101 | check_and_close, and if any was nonzero, return nonzero. | 1024 | check_and_close, and if any was nonzero, return nonzero. |
1102 | Otherwise, return zero. */ | 1025 | Otherwise, return zero. */ |
1103 | 1026 | ||
1104 | static int | 1027 | static void |
1105 | dump(void) | 1028 | dump(void) |
1106 | { | 1029 | { |
1107 | char *block[2]; | 1030 | char *block[2]; |
1108 | uintmax_t current_offset; | 1031 | off_t current_offset; |
1109 | int idx; | 1032 | int idx; |
1110 | int err; | ||
1111 | size_t n_bytes_read; | 1033 | size_t n_bytes_read; |
1112 | 1034 | ||
1113 | block[0] = xmalloc(2*bytes_per_block); | 1035 | block[0] = xmalloc(2*bytes_per_block); |
@@ -1116,7 +1038,6 @@ dump(void) | |||
1116 | current_offset = n_bytes_to_skip; | 1038 | current_offset = n_bytes_to_skip; |
1117 | 1039 | ||
1118 | idx = 0; | 1040 | idx = 0; |
1119 | err = 0; | ||
1120 | if (limit_bytes_to_format) { | 1041 | if (limit_bytes_to_format) { |
1121 | while (1) { | 1042 | while (1) { |
1122 | size_t n_needed; | 1043 | size_t n_needed; |
@@ -1125,8 +1046,8 @@ dump(void) | |||
1125 | break; | 1046 | break; |
1126 | } | 1047 | } |
1127 | n_needed = MIN(end_offset - current_offset, | 1048 | n_needed = MIN(end_offset - current_offset, |
1128 | (uintmax_t) bytes_per_block); | 1049 | (off_t) bytes_per_block); |
1129 | err |= read_block(n_needed, block[idx], &n_bytes_read); | 1050 | read_block(n_needed, block[idx], &n_bytes_read); |
1130 | if (n_bytes_read < bytes_per_block) | 1051 | if (n_bytes_read < bytes_per_block) |
1131 | break; | 1052 | break; |
1132 | assert(n_bytes_read == bytes_per_block); | 1053 | assert(n_bytes_read == bytes_per_block); |
@@ -1137,7 +1058,7 @@ dump(void) | |||
1137 | } | 1058 | } |
1138 | } else { | 1059 | } else { |
1139 | while (1) { | 1060 | while (1) { |
1140 | err |= read_block(bytes_per_block, block[idx], &n_bytes_read); | 1061 | read_block(bytes_per_block, block[idx], &n_bytes_read); |
1141 | if (n_bytes_read < bytes_per_block) | 1062 | if (n_bytes_read < bytes_per_block) |
1142 | break; | 1063 | break; |
1143 | assert(n_bytes_read == bytes_per_block); | 1064 | assert(n_bytes_read == bytes_per_block); |
@@ -1167,13 +1088,49 @@ dump(void) | |||
1167 | format_address(current_offset, '\n'); | 1088 | format_address(current_offset, '\n'); |
1168 | 1089 | ||
1169 | if (limit_bytes_to_format && current_offset >= end_offset) | 1090 | if (limit_bytes_to_format && current_offset >= end_offset) |
1170 | err |= check_and_close(0); | 1091 | check_and_close(); |
1171 | 1092 | ||
1172 | free(block[0]); | 1093 | free(block[0]); |
1094 | } | ||
1095 | |||
1096 | /* Read a single byte into *C from the concatenation of the input files | ||
1097 | named in the global array FILE_LIST. On the first call to this | ||
1098 | function, the global variable IN_STREAM is expected to be an open | ||
1099 | stream associated with the input file INPUT_FILENAME. If IN_STREAM | ||
1100 | is at end-of-file, close it and update the global variables IN_STREAM | ||
1101 | and INPUT_FILENAME so they correspond to the next file in the list. | ||
1102 | Then try to read a byte from the newly opened file. Repeat if | ||
1103 | necessary until EOF is reached for the last file in FILE_LIST, then | ||
1104 | set *C to EOF and return. Subsequent calls do likewise. The return | ||
1105 | value is nonzero if any errors occured, zero otherwise. */ | ||
1173 | 1106 | ||
1174 | return err; | 1107 | static void |
1108 | read_char(int *c) | ||
1109 | { | ||
1110 | while (in_stream) { /* !EOF */ | ||
1111 | *c = fgetc(in_stream); | ||
1112 | if (*c != EOF) | ||
1113 | return; | ||
1114 | check_and_close(); | ||
1115 | open_next_file(); | ||
1116 | } | ||
1117 | *c = EOF; | ||
1175 | } | 1118 | } |
1176 | 1119 | ||
1120 | /* Read N bytes into BLOCK from the concatenation of the input files | ||
1121 | named in the global array FILE_LIST. On the first call to this | ||
1122 | function, the global variable IN_STREAM is expected to be an open | ||
1123 | stream associated with the input file INPUT_FILENAME. If all N | ||
1124 | bytes cannot be read from IN_STREAM, close IN_STREAM and update | ||
1125 | the global variables IN_STREAM and INPUT_FILENAME. Then try to | ||
1126 | read the remaining bytes from the newly opened file. Repeat if | ||
1127 | necessary until EOF is reached for the last file in FILE_LIST. | ||
1128 | On subsequent calls, don't modify BLOCK and return zero. Set | ||
1129 | *N_BYTES_IN_BUFFER to the number of bytes read. If an error occurs, | ||
1130 | it will be detected through ferror when the stream is about to be | ||
1131 | closed. If there is an error, give a message but continue reading | ||
1132 | as usual and return nonzero. Otherwise return zero. */ | ||
1133 | |||
1177 | /* STRINGS mode. Find each "string constant" in the input. | 1134 | /* STRINGS mode. Find each "string constant" in the input. |
1178 | A string constant is a run of at least 'string_min' ASCII | 1135 | A string constant is a run of at least 'string_min' ASCII |
1179 | graphic (or formatting) characters terminated by a null. | 1136 | graphic (or formatting) characters terminated by a null. |
@@ -1181,98 +1138,58 @@ dump(void) | |||
1181 | traditional version of od. Return nonzero if an error | 1138 | traditional version of od. Return nonzero if an error |
1182 | occurs. Otherwise, return zero. */ | 1139 | occurs. Otherwise, return zero. */ |
1183 | 1140 | ||
1184 | static int | 1141 | static void |
1185 | dump_strings(void) | 1142 | dump_strings(void) |
1186 | { | 1143 | { |
1187 | size_t bufsize = MAX(100, string_min); | 1144 | size_t bufsize = MAX(100, string_min); |
1188 | char *buf = xmalloc(bufsize); | 1145 | char *buf = xmalloc(bufsize); |
1189 | uintmax_t address = n_bytes_to_skip; | 1146 | off_t address = n_bytes_to_skip; |
1190 | int err; | ||
1191 | 1147 | ||
1192 | err = 0; | ||
1193 | while (1) { | 1148 | while (1) { |
1194 | size_t i; | 1149 | size_t i; |
1195 | int c; | 1150 | int c; |
1196 | 1151 | ||
1197 | /* See if the next 'string_min' chars are all printing chars. */ | 1152 | /* See if the next 'string_min' chars are all printing chars. */ |
1198 | tryline: | 1153 | tryline: |
1199 | 1154 | if (limit_bytes_to_format && (end_offset - string_min <= address)) | |
1200 | if (limit_bytes_to_format | ||
1201 | && (end_offset < string_min || end_offset - string_min <= address) | ||
1202 | ) { | ||
1203 | break; | 1155 | break; |
1204 | } | 1156 | i = 0; |
1205 | |||
1206 | for (i = 0; i < string_min; i++) { | ||
1207 | err |= read_char(&c); | ||
1208 | address++; | ||
1209 | if (c < 0) { | ||
1210 | free(buf); | ||
1211 | return err; | ||
1212 | } | ||
1213 | if (!ISPRINT(c)) | ||
1214 | /* Found a non-printing. Try again starting with next char. */ | ||
1215 | goto tryline; | ||
1216 | buf[i] = c; | ||
1217 | } | ||
1218 | |||
1219 | /* We found a run of 'string_min' printable characters. | ||
1220 | Now see if it is terminated with a null byte. */ | ||
1221 | while (!limit_bytes_to_format || address < end_offset) { | 1157 | while (!limit_bytes_to_format || address < end_offset) { |
1222 | if (i == bufsize) { | 1158 | if (i == bufsize) { |
1223 | bufsize *= 2; | 1159 | bufsize += bufsize/8; |
1224 | buf = xrealloc(buf, bufsize * sizeof(*buf)); | 1160 | buf = xrealloc(buf, bufsize); |
1225 | } | 1161 | } |
1226 | err |= read_char(&c); | 1162 | read_char(&c); |
1227 | address++; | 1163 | if (c < 0) { /* EOF */ |
1228 | if (c < 0) { | ||
1229 | free(buf); | 1164 | free(buf); |
1230 | return err; | 1165 | return; |
1231 | } | 1166 | } |
1232 | if (c == '\0') | 1167 | address++; |
1233 | break; /* It is; print this string. */ | 1168 | if (!c) |
1169 | break; | ||
1234 | if (!ISPRINT(c)) | 1170 | if (!ISPRINT(c)) |
1235 | goto tryline; /* It isn't; give up on this string. */ | 1171 | goto tryline; /* It isn't; give up on this string. */ |
1236 | buf[i++] = c; /* String continues; store it all. */ | 1172 | buf[i++] = c; /* String continues; store it all. */ |
1237 | } | 1173 | } |
1238 | 1174 | ||
1175 | if (i < string_min) /* Too short! */ | ||
1176 | goto tryline; | ||
1177 | |||
1239 | /* If we get here, the string is all printable and null-terminated, | 1178 | /* If we get here, the string is all printable and null-terminated, |
1240 | so print it. It is all in 'buf' and 'i' is its length. */ | 1179 | * so print it. It is all in 'buf' and 'i' is its length. */ |
1241 | buf[i] = 0; | 1180 | buf[i] = 0; |
1242 | format_address(address - i - 1, ' '); | 1181 | format_address(address - i - 1, ' '); |
1243 | 1182 | ||
1244 | for (i = 0; (c = buf[i]); i++) { | 1183 | for (i = 0; (c = buf[i]); i++) { |
1245 | switch (c) { | 1184 | switch (c) { |
1246 | case '\007': | 1185 | case '\007': fputs("\\a", stdout); break; |
1247 | fputs("\\a", stdout); | 1186 | case '\b': fputs("\\b", stdout); break; |
1248 | break; | 1187 | case '\f': fputs("\\f", stdout); break; |
1249 | 1188 | case '\n': fputs("\\n", stdout); break; | |
1250 | case '\b': | 1189 | case '\r': fputs("\\r", stdout); break; |
1251 | fputs("\\b", stdout); | 1190 | case '\t': fputs("\\t", stdout); break; |
1252 | break; | 1191 | case '\v': fputs("\\v", stdout); break; |
1253 | 1192 | default: putc(c, stdout); | |
1254 | case '\f': | ||
1255 | fputs("\\f", stdout); | ||
1256 | break; | ||
1257 | |||
1258 | case '\n': | ||
1259 | fputs("\\n", stdout); | ||
1260 | break; | ||
1261 | |||
1262 | case '\r': | ||
1263 | fputs("\\r", stdout); | ||
1264 | break; | ||
1265 | |||
1266 | case '\t': | ||
1267 | fputs("\\t", stdout); | ||
1268 | break; | ||
1269 | |||
1270 | case '\v': | ||
1271 | fputs("\\v", stdout); | ||
1272 | break; | ||
1273 | |||
1274 | default: | ||
1275 | putc(c, stdout); | ||
1276 | } | 1193 | } |
1277 | } | 1194 | } |
1278 | putchar('\n'); | 1195 | putchar('\n'); |
@@ -1280,11 +1197,9 @@ dump_strings(void) | |||
1280 | 1197 | ||
1281 | /* We reach this point only if we search through | 1198 | /* We reach this point only if we search through |
1282 | (max_bytes_to_format - string_min) bytes before reaching EOF. */ | 1199 | (max_bytes_to_format - string_min) bytes before reaching EOF. */ |
1283 | |||
1284 | free(buf); | 1200 | free(buf); |
1285 | 1201 | ||
1286 | err |= check_and_close(0); | 1202 | check_and_close(); |
1287 | return err; | ||
1288 | } | 1203 | } |
1289 | 1204 | ||
1290 | int | 1205 | int |
@@ -1296,227 +1211,181 @@ od_main(int argc, char **argv) | |||
1296 | { "m", 1024*1024 }, | 1211 | { "m", 1024*1024 }, |
1297 | { NULL, 0 } | 1212 | { NULL, 0 } |
1298 | }; | 1213 | }; |
1214 | unsigned opt; | ||
1215 | int l_c_m; | ||
1216 | /* The old-style 'pseudo starting address' to be printed in parentheses | ||
1217 | after any true address. */ | ||
1218 | off_t pseudo_start = 0; // only for gcc | ||
1219 | enum { | ||
1220 | OPT_A = 1 << 0, | ||
1221 | OPT_N = 1 << 1, | ||
1222 | OPT_a = 1 << 2, | ||
1223 | OPT_b = 1 << 3, | ||
1224 | OPT_c = 1 << 4, | ||
1225 | OPT_d = 1 << 5, | ||
1226 | OPT_f = 1 << 6, | ||
1227 | OPT_h = 1 << 7, | ||
1228 | OPT_i = 1 << 8, | ||
1229 | OPT_j = 1 << 9, | ||
1230 | OPT_l = 1 << 10, | ||
1231 | OPT_o = 1 << 11, | ||
1232 | OPT_t = 1 << 12, | ||
1233 | OPT_v = 1 << 13, | ||
1234 | OPT_x = 1 << 14, | ||
1235 | OPT_s = 1 << 15, | ||
1236 | OPT_S = 1 << 16, | ||
1237 | OPT_w = 1 << 17, | ||
1238 | OPT_traditional = 1 << 18, | ||
1239 | }; | ||
1299 | static const struct option long_options[] = { | 1240 | static const struct option long_options[] = { |
1300 | { "skip-bytes", required_argument, NULL, 'j' }, | 1241 | { "skip-bytes", required_argument, NULL, 'j' }, |
1301 | { "address-radix", required_argument, NULL, 'A' }, | 1242 | { "address-radix", required_argument, NULL, 'A' }, |
1302 | { "read-bytes", required_argument, NULL, 'N' }, | 1243 | { "read-bytes", required_argument, NULL, 'N' }, |
1303 | { "format", required_argument, NULL, 't' }, | 1244 | { "format", required_argument, NULL, 't' }, |
1304 | { "output-duplicates", no_argument, NULL, 'v' }, | 1245 | { "output-duplicates", no_argument, NULL, 'v' }, |
1305 | { "strings", optional_argument, NULL, 's' }, | 1246 | { "strings", optional_argument, NULL, 'S' }, |
1306 | { "traditional", no_argument, NULL, TRADITIONAL_OPTION }, | 1247 | { "width", optional_argument, NULL, 'w' }, |
1307 | { "width", optional_argument, NULL, 'w' }, | 1248 | { "traditional", no_argument, NULL, 0xff }, |
1308 | { NULL, 0, NULL, 0 } | 1249 | { NULL, 0, NULL, 0 } |
1309 | }; | 1250 | }; |
1310 | 1251 | char *str_A, *str_N, *str_j, *str_S; | |
1311 | int c; | 1252 | char *str_w = NULL; |
1312 | int n_files; | 1253 | llist_t *lst_t = NULL; |
1313 | int l_c_m; | ||
1314 | size_t desired_width = 0; // only for gcc | ||
1315 | int width_specified = 0; | ||
1316 | int n_failed_decodes = 0; | ||
1317 | int err; | ||
1318 | |||
1319 | /* The old-style 'pseudo starting address' to be printed in parentheses | ||
1320 | after any true address. */ | ||
1321 | uintmax_t pseudo_start = 0; // only for gcc | ||
1322 | |||
1323 | err = 0; | ||
1324 | |||
1325 | integral_type_size[sizeof(char)] = CHAR; | ||
1326 | integral_type_size[sizeof(short)] = SHORT; | ||
1327 | integral_type_size[sizeof(int)] = INT; | ||
1328 | integral_type_size[sizeof(long)] = LONG; | ||
1329 | /* If 'long' and 'long long' have the same size, it's fine | ||
1330 | to overwrite the entry for 'long' with this one. */ | ||
1331 | integral_type_size[sizeof(ulonglong_t)] = LONG_LONG; | ||
1332 | |||
1333 | fp_type_size[sizeof(float)] = FLOAT_SINGLE; | ||
1334 | /* The array entry for 'double' is filled in after that for longdouble_t | ||
1335 | so that if 'long double' is the same type or if long double isn't | ||
1336 | supported FLOAT_LONG_DOUBLE will never be used. */ | ||
1337 | fp_type_size[sizeof(longdouble_t)] = FLOAT_LONG_DOUBLE; | ||
1338 | fp_type_size[sizeof(double)] = FLOAT_DOUBLE; | ||
1339 | 1254 | ||
1340 | spec = NULL; | 1255 | spec = NULL; |
1341 | |||
1342 | format_address = format_address_std; | 1256 | format_address = format_address_std; |
1343 | address_base = 8; | 1257 | address_base_char = 'o'; |
1344 | address_pad_len = 7; | 1258 | address_pad_len = 7; |
1345 | flag_dump_strings = 0; | 1259 | flag_dump_strings = 0; |
1346 | 1260 | ||
1347 | while ((c = getopt_long(argc, argv, "A:N:abcdfhij:lot:vxs:w:", long_options, NULL)) != -1) { | 1261 | /* Parse command line */ |
1348 | switch (c) { | 1262 | opt_complementary = "t::"; // list |
1349 | case 0: | 1263 | applet_long_options = long_options; |
1350 | break; | 1264 | opt = getopt32(argc, argv, "A:N:abcdfhij:lot:vxsS:" |
1351 | case 'A': | 1265 | "w::", // -w with optional param |
1352 | switch (optarg[0]) { | 1266 | // -S was -s and also had optional parameter |
1353 | case 'd': | 1267 | // but in coreutils 6.3 it was renamed and now has |
1354 | format_address = format_address_std; | 1268 | // _mandatory_ parameter |
1355 | address_base = 10; | 1269 | &str_A, &str_N, &str_j, &lst_t, &str_S, &str_w); |
1356 | address_pad_len = 7; | 1270 | argc -= optind; |
1357 | break; | 1271 | argv += optind; |
1358 | case 'o': | 1272 | if (opt & OPT_A) { |
1359 | format_address = format_address_std; | 1273 | static const char doxn[] = "doxn"; |
1360 | address_base = 8; | 1274 | static FN_format_address *const doxn_format_address[] = { |
1361 | address_pad_len = 7; | 1275 | format_address_std, |
1362 | break; | 1276 | format_address_std, |
1363 | case 'x': | 1277 | format_address_std, |
1364 | format_address = format_address_std; | 1278 | format_address_none, |
1365 | address_base = 16; | 1279 | }; |
1366 | address_pad_len = 6; | 1280 | static const char doxn_address_base_char[] = { 'u', 'o', 'x', 'x' }; |
1367 | break; | 1281 | static const uint8_t doxn_address_pad_len[] = { 7, 7, 6, 0 }; |
1368 | case 'n': | 1282 | char *p; |
1369 | format_address = format_address_none; | 1283 | int pos; |
1370 | address_pad_len = 0; | 1284 | p = strchr(doxn, str_A[0]); |
1371 | break; | 1285 | if (!p) |
1372 | default: | 1286 | bb_error_msg_and_die("bad output address radix " |
1373 | bb_error_msg_and_die("bad output address radix '%c' " | 1287 | "'%c' (must be [doxn])", str_A[0]); |
1374 | "(must be [doxn])", optarg[0]); | 1288 | pos = p - doxn; |
1375 | break; | 1289 | format_address = doxn_format_address[pos]; |
1376 | } | 1290 | address_base_char = doxn_address_base_char[pos]; |
1377 | break; | 1291 | address_pad_len = doxn_address_pad_len[pos]; |
1378 | |||
1379 | case 'j': | ||
1380 | n_bytes_to_skip = xstrtoumax_sfx(optarg, 0, bkm); | ||
1381 | break; | ||
1382 | case 'N': | ||
1383 | limit_bytes_to_format = 1; | ||
1384 | |||
1385 | max_bytes_to_format = xstrtoumax_sfx(optarg, 0, bkm); | ||
1386 | break; | ||
1387 | case 's': | ||
1388 | if (optarg == NULL) | ||
1389 | string_min = 3; | ||
1390 | else { | ||
1391 | string_min = xstrtoumax_range_sfx(optarg, 0, 0, SIZE_MAX, bkm); | ||
1392 | } | ||
1393 | flag_dump_strings = 1; | ||
1394 | break; | ||
1395 | case 't': | ||
1396 | if (decode_format_string(optarg)) | ||
1397 | ++n_failed_decodes; | ||
1398 | break; | ||
1399 | case 'v': | ||
1400 | abbreviate_duplicate_blocks = 0; | ||
1401 | break; | ||
1402 | case TRADITIONAL_OPTION: | ||
1403 | traditional = 1; | ||
1404 | break; | ||
1405 | |||
1406 | /* The next several cases map the traditional format | ||
1407 | specification options to the corresponding modern format | ||
1408 | specs. GNU od accepts any combination of old- and | ||
1409 | new-style options. Format specification options accumulate. */ | ||
1410 | |||
1411 | #define CASE_OLD_ARG(old_char,new_string) \ | ||
1412 | case old_char: \ | ||
1413 | if (decode_format_string(new_string)) \ | ||
1414 | ++n_failed_decodes; \ | ||
1415 | break | ||
1416 | |||
1417 | CASE_OLD_ARG('a', "a"); | ||
1418 | CASE_OLD_ARG('b', "oC"); | ||
1419 | CASE_OLD_ARG('c', "c"); | ||
1420 | CASE_OLD_ARG('d', "u2"); | ||
1421 | CASE_OLD_ARG('f', "fF"); | ||
1422 | CASE_OLD_ARG('h', "x2"); | ||
1423 | CASE_OLD_ARG('i', "d2"); | ||
1424 | CASE_OLD_ARG('l', "d4"); | ||
1425 | CASE_OLD_ARG('o', "o2"); | ||
1426 | CASE_OLD_ARG('x', "x2"); | ||
1427 | |||
1428 | /* FIXME: POSIX 1003.1-2001 with XSI requires this: | ||
1429 | CASE_OLD_ARG('s', "d2"); | ||
1430 | for the traditional syntax, but this conflicts with case | ||
1431 | 's' above. */ | ||
1432 | |||
1433 | #undef CASE_OLD_ARG | ||
1434 | |||
1435 | case 'w': | ||
1436 | width_specified = 1; | ||
1437 | desired_width = 32; | ||
1438 | if (optarg) | ||
1439 | desired_width = xatoul_range(optarg, 0, SIZE_MAX); | ||
1440 | break; | ||
1441 | default: | ||
1442 | bb_show_usage(); | ||
1443 | break; | ||
1444 | } | ||
1445 | } | 1292 | } |
1446 | 1293 | if (opt & OPT_N) { | |
1447 | if (n_failed_decodes > 0) | 1294 | limit_bytes_to_format = 1; |
1448 | exit(EXIT_FAILURE); | 1295 | max_bytes_to_format = xstrtooff_sfx(str_N, 0, bkm); |
1296 | } | ||
1297 | if (opt & OPT_a) decode_format_string("a"); | ||
1298 | if (opt & OPT_b) decode_format_string("oC"); | ||
1299 | if (opt & OPT_c) decode_format_string("c"); | ||
1300 | if (opt & OPT_d) decode_format_string("u2"); | ||
1301 | if (opt & OPT_f) decode_format_string("fF"); | ||
1302 | if (opt & OPT_h) decode_format_string("x2"); | ||
1303 | if (opt & OPT_i) decode_format_string("d2"); | ||
1304 | if (opt & OPT_j) n_bytes_to_skip = xstrtooff_sfx(str_j, 0, bkm); | ||
1305 | if (opt & OPT_l) decode_format_string("d4"); | ||
1306 | if (opt & OPT_o) decode_format_string("o2"); | ||
1307 | //if (opt & OPT_t)... | ||
1308 | lst_t = rev_llist(lst_t); | ||
1309 | while (lst_t) { | ||
1310 | decode_format_string(lst_t->data); | ||
1311 | lst_t = lst_t->link; | ||
1312 | } | ||
1313 | if (opt & OPT_v) abbreviate_duplicate_blocks = 0; | ||
1314 | if (opt & OPT_x) decode_format_string("x2"); | ||
1315 | if (opt & OPT_s) decode_format_string("d2"); | ||
1316 | if (opt & OPT_S) { | ||
1317 | string_min = 3; | ||
1318 | string_min = xstrtou_sfx(str_S, 0, bkm); | ||
1319 | flag_dump_strings = 1; | ||
1320 | } | ||
1321 | //if (opt & OPT_w)... | ||
1322 | //if (opt & OPT_traditional)... | ||
1449 | 1323 | ||
1450 | if (flag_dump_strings && n_specs > 0) | 1324 | if (flag_dump_strings && n_specs > 0) |
1451 | bb_error_msg_and_die("no type may be specified when dumping strings"); | 1325 | bb_error_msg_and_die("no type may be specified when dumping strings"); |
1452 | 1326 | ||
1453 | n_files = argc - optind; | ||
1454 | |||
1455 | /* If the --traditional option is used, there may be from | 1327 | /* If the --traditional option is used, there may be from |
1456 | 0 to 3 remaining command line arguments; handle each case | 1328 | * 0 to 3 remaining command line arguments; handle each case |
1457 | separately. | 1329 | * separately. |
1458 | od [file] [[+]offset[.][b] [[+]label[.][b]]] | 1330 | * od [file] [[+]offset[.][b] [[+]label[.][b]]] |
1459 | The offset and pseudo_start have the same syntax. | 1331 | * The offset and pseudo_start have the same syntax. |
1460 | 1332 | * | |
1461 | FIXME: POSIX 1003.1-2001 with XSI requires support for the | 1333 | * FIXME: POSIX 1003.1-2001 with XSI requires support for the |
1462 | traditional syntax even if --traditional is not given. */ | 1334 | * traditional syntax even if --traditional is not given. */ |
1463 | 1335 | ||
1464 | if (traditional) { | 1336 | if (opt & OPT_traditional) { |
1465 | uintmax_t offset; | 1337 | off_t o1, o2; |
1466 | 1338 | ||
1467 | if (n_files == 1) { | 1339 | if (argc == 1) { |
1468 | if (parse_old_offset(argv[optind], &offset)) { | 1340 | if (parse_old_offset(argv[0], &o1)) { |
1469 | n_bytes_to_skip = offset; | 1341 | n_bytes_to_skip = o1; |
1470 | --n_files; | 1342 | --argc; |
1471 | ++argv; | 1343 | ++argv; |
1472 | } | 1344 | } |
1473 | } else if (n_files == 2) { | 1345 | } else if (argc == 2) { |
1474 | uintmax_t o1, o2; | 1346 | if (parse_old_offset(argv[0], &o1) |
1475 | 1347 | && parse_old_offset(argv[1], &o2) | |
1476 | if (parse_old_offset(argv[optind], &o1) | ||
1477 | && parse_old_offset(argv[optind + 1], &o2) | ||
1478 | ) { | 1348 | ) { |
1479 | n_bytes_to_skip = o1; | 1349 | n_bytes_to_skip = o1; |
1480 | flag_pseudo_start = 1; | 1350 | flag_pseudo_start = 1; |
1481 | pseudo_start = o2; | 1351 | pseudo_start = o2; |
1482 | argv += 2; | 1352 | argv += 2; |
1483 | n_files -= 2; | 1353 | argc -= 2; |
1484 | } else if (parse_old_offset(argv[optind + 1], &o2)) { | 1354 | } else if (parse_old_offset(argv[1], &o2)) { |
1485 | n_bytes_to_skip = o2; | 1355 | n_bytes_to_skip = o2; |
1486 | --n_files; | 1356 | --argc; |
1487 | argv[optind + 1] = argv[optind]; | 1357 | argv[1] = argv[0]; |
1488 | ++argv; | 1358 | ++argv; |
1489 | } else { | 1359 | } else { |
1490 | bb_error_msg_and_die("invalid second operand " | 1360 | bb_error_msg_and_die("invalid second operand " |
1491 | "in compatibility mode '%s'", argv[optind + 1]); | 1361 | "in compatibility mode '%s'", argv[1]); |
1492 | } | 1362 | } |
1493 | } else if (n_files == 3) { | 1363 | } else if (argc == 3) { |
1494 | uintmax_t o1, o2; | 1364 | if (parse_old_offset(argv[1], &o1) |
1495 | if (parse_old_offset(argv[optind + 1], &o1) | 1365 | && parse_old_offset(argv[2], &o2) |
1496 | && parse_old_offset(argv[optind + 2], &o2) | ||
1497 | ) { | 1366 | ) { |
1498 | n_bytes_to_skip = o1; | 1367 | n_bytes_to_skip = o1; |
1499 | flag_pseudo_start = 1; | 1368 | flag_pseudo_start = 1; |
1500 | pseudo_start = o2; | 1369 | pseudo_start = o2; |
1501 | argv[optind + 2] = argv[optind]; | 1370 | argv[2] = argv[0]; |
1502 | argv += 2; | 1371 | argv += 2; |
1503 | n_files -= 2; | 1372 | argc -= 2; |
1504 | } else { | 1373 | } else { |
1505 | bb_error_msg_and_die("in compatibility mode " | 1374 | bb_error_msg_and_die("in compatibility mode " |
1506 | "the last two arguments must be offsets"); | 1375 | "the last two arguments must be offsets"); |
1507 | } | 1376 | } |
1508 | } else if (n_files > 3) { | 1377 | } else if (argc > 3) { |
1509 | bb_error_msg_and_die("compatibility mode supports " | 1378 | bb_error_msg_and_die("compatibility mode supports " |
1510 | "at most three arguments"); | 1379 | "at most three arguments"); |
1511 | } | 1380 | } |
1512 | 1381 | ||
1513 | if (flag_pseudo_start) { | 1382 | if (flag_pseudo_start) { |
1383 | format_address = format_address_label; | ||
1514 | if (format_address == format_address_none) { | 1384 | if (format_address == format_address_none) { |
1515 | address_base = 8; | 1385 | address_base_char = 'o'; |
1516 | address_pad_len = 7; | 1386 | address_pad_len = 7; |
1517 | format_address = format_address_paren; | 1387 | format_address = format_address_paren; |
1518 | } else | 1388 | } |
1519 | format_address = format_address_label; | ||
1520 | } | 1389 | } |
1521 | } | 1390 | } |
1522 | 1391 | ||
@@ -1527,53 +1396,45 @@ od_main(int argc, char **argv) | |||
1527 | } | 1396 | } |
1528 | 1397 | ||
1529 | if (n_specs == 0) { | 1398 | if (n_specs == 0) { |
1530 | if (decode_format_string("o2")) { | 1399 | decode_format_string("o2"); |
1531 | /* This happens on Cray systems that don't have a 2-byte | ||
1532 | integral type. */ | ||
1533 | exit(EXIT_FAILURE); | ||
1534 | } | ||
1535 | n_specs = 1; | 1400 | n_specs = 1; |
1536 | } | 1401 | } |
1537 | 1402 | ||
1538 | if (n_files > 0) { | 1403 | /* If no files were listed on the command line, |
1404 | set the global pointer FILE_LIST so that it | ||
1405 | references the null-terminated list of one name: "-". */ | ||
1406 | file_list = default_file_list; | ||
1407 | if (argc > 0) { | ||
1539 | /* Set the global pointer FILE_LIST so that it | 1408 | /* Set the global pointer FILE_LIST so that it |
1540 | references the first file-argument on the command-line. */ | 1409 | references the first file-argument on the command-line. */ |
1541 | file_list = (char const *const *) &argv[optind]; | 1410 | file_list = (char const *const *) argv; |
1542 | } else { | ||
1543 | /* No files were listed on the command line. | ||
1544 | Set the global pointer FILE_LIST so that it | ||
1545 | references the null-terminated list of one name: "-". */ | ||
1546 | file_list = default_file_list; | ||
1547 | } | 1411 | } |
1548 | 1412 | ||
1549 | /* open the first input file */ | 1413 | /* open the first input file */ |
1550 | err |= open_next_file(); | 1414 | open_next_file(); |
1551 | if (in_stream == NULL) | ||
1552 | goto cleanup; | ||
1553 | |||
1554 | /* skip over any unwanted header bytes */ | 1415 | /* skip over any unwanted header bytes */ |
1555 | err |= skip(n_bytes_to_skip); | 1416 | skip(n_bytes_to_skip); |
1556 | if (in_stream == NULL) | 1417 | if (!in_stream) |
1557 | goto cleanup; | 1418 | return 1; |
1558 | 1419 | ||
1559 | pseudo_offset = (flag_pseudo_start ? pseudo_start - n_bytes_to_skip : 0); | 1420 | pseudo_offset = (flag_pseudo_start ? pseudo_start - n_bytes_to_skip : 0); |
1560 | 1421 | ||
1561 | /* Compute output block length. */ | 1422 | /* Compute output block length. */ |
1562 | l_c_m = get_lcm(); | 1423 | l_c_m = get_lcm(); |
1563 | 1424 | ||
1564 | if (width_specified) { | 1425 | if (opt & OPT_w) { /* -w: width */ |
1565 | if (desired_width != 0 && desired_width % l_c_m == 0) | 1426 | bytes_per_block = 32; |
1566 | bytes_per_block = desired_width; | 1427 | if (str_w) |
1567 | else { | 1428 | bytes_per_block = xatou(str_w); |
1568 | bb_error_msg("warning: invalid width %lu; using %d instead", | 1429 | if (!bytes_per_block || bytes_per_block % l_c_m != 0) { |
1569 | (unsigned long) desired_width, l_c_m); | 1430 | bb_error_msg("warning: invalid width %u; using %d instead", |
1431 | bytes_per_block, l_c_m); | ||
1570 | bytes_per_block = l_c_m; | 1432 | bytes_per_block = l_c_m; |
1571 | } | 1433 | } |
1572 | } else { | 1434 | } else { |
1435 | bytes_per_block = l_c_m; | ||
1573 | if (l_c_m < DEFAULT_BYTES_PER_BLOCK) | 1436 | if (l_c_m < DEFAULT_BYTES_PER_BLOCK) |
1574 | bytes_per_block = l_c_m * (DEFAULT_BYTES_PER_BLOCK / l_c_m); | 1437 | bytes_per_block *= DEFAULT_BYTES_PER_BLOCK / l_c_m; |
1575 | else | ||
1576 | bytes_per_block = l_c_m; | ||
1577 | } | 1438 | } |
1578 | 1439 | ||
1579 | #ifdef DEBUG | 1440 | #ifdef DEBUG |
@@ -1583,12 +1444,13 @@ od_main(int argc, char **argv) | |||
1583 | } | 1444 | } |
1584 | #endif | 1445 | #endif |
1585 | 1446 | ||
1586 | err |= (flag_dump_strings ? dump_strings() : dump()); | 1447 | if (flag_dump_strings) |
1587 | 1448 | dump_strings(); | |
1588 | cleanup: | 1449 | else |
1450 | dump(); | ||
1589 | 1451 | ||
1590 | if (have_read_stdin && fclose(stdin) == EOF) | 1452 | if (fclose(stdin) == EOF) |
1591 | bb_perror_msg_and_die("standard input"); | 1453 | bb_perror_msg_and_die(bb_msg_standard_input); |
1592 | 1454 | ||
1593 | exit(err == 0 ? EXIT_SUCCESS : EXIT_FAILURE); | 1455 | return (ioerror != 0); /* err != 0 - return 1 (failure) */ |
1594 | } | 1456 | } |
diff --git a/networking/httpd.c b/networking/httpd.c index 0de60ba06..f95e0c06e 100644 --- a/networking/httpd.c +++ b/networking/httpd.c | |||
@@ -671,7 +671,7 @@ static char *encodeString(const char *string) | |||
671 | * | 671 | * |
672 | * $Parameters: | 672 | * $Parameters: |
673 | * (char *) string . . . The first string to decode. | 673 | * (char *) string . . . The first string to decode. |
674 | * (int) flag . . . 1 if require decode '+' as ' ' for CGI | 674 | * (int) flag . . . 1 if need to decode '+' as ' ' for CGI |
675 | * | 675 | * |
676 | * $Return: (char *) . . . . A pointer to the decoded string (same as input). | 676 | * $Return: (char *) . . . . A pointer to the decoded string (same as input). |
677 | * | 677 | * |
@@ -685,14 +685,18 @@ static char *decodeString(char *orig, int flag_plus_to_space) | |||
685 | char *ptr = string; | 685 | char *ptr = string; |
686 | 686 | ||
687 | while (*ptr) { | 687 | while (*ptr) { |
688 | if (*ptr == '+' && flag_plus_to_space) { *string++ = ' '; ptr++; } | 688 | if (*ptr == '+' && flag_plus_to_space) { |
689 | else if (*ptr != '%') *string++ = *ptr++; | 689 | *string++ = ' '; |
690 | else { | 690 | ptr++; |
691 | } else if (*ptr != '%') { | ||
692 | *string++ = *ptr++; | ||
693 | } else { | ||
691 | unsigned int value1, value2; | 694 | unsigned int value1, value2; |
692 | 695 | ||
693 | ptr++; | 696 | ptr++; |
694 | if (sscanf(ptr, "%1X", &value1) != 1 || | 697 | if (sscanf(ptr, "%1X", &value1) != 1 |
695 | sscanf(ptr+1, "%1X", &value2) != 1) { | 698 | || sscanf(ptr+1, "%1X", &value2) != 1 |
699 | ) { | ||
696 | if (!flag_plus_to_space) | 700 | if (!flag_plus_to_space) |
697 | return NULL; | 701 | return NULL; |
698 | *string++ = '%'; | 702 | *string++ = '%'; |
diff --git a/networking/wget.c b/networking/wget.c index 49ebda73c..028e18c73 100644 --- a/networking/wget.c +++ b/networking/wget.c | |||
@@ -139,7 +139,7 @@ int wget_main(int argc, char **argv) | |||
139 | { "passive-ftp", no_argument, NULL, 0xff }, | 139 | { "passive-ftp", no_argument, NULL, 0xff }, |
140 | { "header", required_argument, NULL, 0xfe }, | 140 | { "header", required_argument, NULL, 0xfe }, |
141 | { 0, 0, 0, 0 } | 141 | { 0, 0, 0, 0 } |
142 | }; | 142 | }; |
143 | applet_long_options = wget_long_options; | 143 | applet_long_options = wget_long_options; |
144 | #endif | 144 | #endif |
145 | opt_complementary = "-1" USE_FEATURE_WGET_LONG_OPTIONS(":\xfe::"); | 145 | opt_complementary = "-1" USE_FEATURE_WGET_LONG_OPTIONS(":\xfe::"); |