blob: fb11fcfe3253f53f153f8c5f95093a81b77e25ad
1 | /* vi: set sw=4 ts=4: */ |
2 | /* |
3 | * od implementation for busybox |
4 | * Based on code from util-linux v 2.11l |
5 | * |
6 | * Copyright (c) 1990 |
7 | * The Regents of the University of California. All rights reserved. |
8 | * |
9 | * Licensed under GPLv2 or later, see file LICENSE in this source tree. |
10 | * |
11 | * Original copyright notice is retained at the end of this file. |
12 | */ |
13 | |
14 | //usage:#if !ENABLE_DESKTOP |
15 | //usage:#define od_trivial_usage |
16 | //usage: "[-aBbcDdeFfHhIiLlOovXx] [FILE]" |
17 | //usage:#define od_full_usage "\n\n" |
18 | //usage: "Print FILE (or stdin) unambiguously, as octal bytes by default" |
19 | //usage:#endif |
20 | |
21 | #include "libbb.h" |
22 | #if ENABLE_DESKTOP |
23 | /* This one provides -t (busybox's own build script needs it) */ |
24 | #include "od_bloaty.c" |
25 | #else |
26 | |
27 | #include "dump.h" |
28 | |
29 | static void |
30 | odoffset(dumper_t *dumper, int argc, char ***argvp) |
31 | { |
32 | char *num, *p; |
33 | int base; |
34 | char *end; |
35 | |
36 | /* |
37 | * The offset syntax of od(1) was genuinely bizarre. First, if |
38 | * it started with a plus it had to be an offset. Otherwise, if |
39 | * there were at least two arguments, a number or lower-case 'x' |
40 | * followed by a number makes it an offset. By default it was |
41 | * octal; if it started with 'x' or '0x' it was hex. If it ended |
42 | * in a '.', it was decimal. If a 'b' or 'B' was appended, it |
43 | * multiplied the number by 512 or 1024 byte units. There was |
44 | * no way to assign a block count to a hex offset. |
45 | * |
46 | * We assumes it's a file if the offset is bad. |
47 | */ |
48 | p = **argvp; |
49 | |
50 | if (!p) { |
51 | /* hey someone is probably piping to us ... */ |
52 | return; |
53 | } |
54 | |
55 | if ((*p != '+') |
56 | && (argc < 2 |
57 | || (!isdigit(p[0]) |
58 | && ((p[0] != 'x') || !isxdigit(p[1]))))) |
59 | return; |
60 | |
61 | base = 0; |
62 | /* |
63 | * skip over leading '+', 'x[0-9a-fA-f]' or '0x', and |
64 | * set base. |
65 | */ |
66 | if (p[0] == '+') |
67 | ++p; |
68 | if (p[0] == 'x' && isxdigit(p[1])) { |
69 | ++p; |
70 | base = 16; |
71 | } else if (p[0] == '0' && p[1] == 'x') { |
72 | p += 2; |
73 | base = 16; |
74 | } |
75 | |
76 | /* skip over the number */ |
77 | if (base == 16) |
78 | for (num = p; isxdigit(*p); ++p) |
79 | continue; |
80 | else |
81 | for (num = p; isdigit(*p); ++p) |
82 | continue; |
83 | |
84 | /* check for no number */ |
85 | if (num == p) |
86 | return; |
87 | |
88 | /* if terminates with a '.', base is decimal */ |
89 | if (*p == '.') { |
90 | if (base) |
91 | return; |
92 | base = 10; |
93 | } |
94 | |
95 | dumper->dump_skip = strtol(num, &end, base ? base : 8); |
96 | |
97 | /* if end isn't the same as p, we got a non-octal digit */ |
98 | if (end != p) |
99 | dumper->dump_skip = 0; |
100 | else { |
101 | if (*p) { |
102 | if (*p == 'b') { |
103 | dumper->dump_skip *= 512; |
104 | ++p; |
105 | } else if (*p == 'B') { |
106 | dumper->dump_skip *= 1024; |
107 | ++p; |
108 | } |
109 | } |
110 | if (*p) |
111 | dumper->dump_skip = 0; |
112 | else { |
113 | ++*argvp; |
114 | /* |
115 | * If the offset uses a non-octal base, the base of |
116 | * the offset is changed as well. This isn't pretty, |
117 | * but it's easy. |
118 | */ |
119 | #define TYPE_OFFSET 7 |
120 | { |
121 | char x_or_d; |
122 | if (base == 16) { |
123 | x_or_d = 'x'; |
124 | goto DO_X_OR_D; |
125 | } |
126 | if (base == 10) { |
127 | x_or_d = 'd'; |
128 | DO_X_OR_D: |
129 | dumper->fshead->nextfu->fmt[TYPE_OFFSET] |
130 | = dumper->fshead->nextfs->nextfu->fmt[TYPE_OFFSET] |
131 | = x_or_d; |
132 | } |
133 | } |
134 | } |
135 | } |
136 | } |
137 | |
138 | static const char *const add_strings[] = { |
139 | "16/1 \"%3_u \" \"\\n\"", /* a */ |
140 | "8/2 \" %06o \" \"\\n\"", /* B, o */ |
141 | "16/1 \"%03o \" \"\\n\"", /* b */ |
142 | "16/1 \"%3_c \" \"\\n\"", /* c */ |
143 | "8/2 \" %05u \" \"\\n\"", /* d */ |
144 | "4/4 \" %010u \" \"\\n\"", /* D */ |
145 | "2/8 \" %21.14e \" \"\\n\"", /* e (undocumented in od), F */ |
146 | "4/4 \" %14.7e \" \"\\n\"", /* f */ |
147 | "4/4 \" %08x \" \"\\n\"", /* H, X */ |
148 | "8/2 \" %04x \" \"\\n\"", /* h, x */ |
149 | "4/4 \" %11d \" \"\\n\"", /* I, L, l */ |
150 | "8/2 \" %6d \" \"\\n\"", /* i */ |
151 | "4/4 \" %011o \" \"\\n\"", /* O */ |
152 | }; |
153 | |
154 | static const char od_opts[] ALIGN1 = "aBbcDdeFfHhIiLlOoXxv"; |
155 | |
156 | static const char od_o2si[] ALIGN1 = { |
157 | 0, 1, 2, 3, 5, |
158 | 4, 6, 6, 7, 8, |
159 | 9, 0xa, 0xb, 0xa, 0xa, |
160 | 0xb, 1, 8, 9, |
161 | }; |
162 | |
163 | int od_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; |
164 | int od_main(int argc, char **argv) |
165 | { |
166 | int ch; |
167 | int first = 1; |
168 | char *p; |
169 | dumper_t *dumper = alloc_dumper(); |
170 | |
171 | while ((ch = getopt(argc, argv, od_opts)) > 0) { |
172 | if (ch == 'v') { |
173 | dumper->dump_vflag = ALL; |
174 | } else if (((p = strchr(od_opts, ch)) != NULL) && (*p != '\0')) { |
175 | if (first) { |
176 | first = 0; |
177 | bb_dump_add(dumper, "\"%07.7_Ao\n\""); |
178 | bb_dump_add(dumper, "\"%07.7_ao \""); |
179 | } else { |
180 | bb_dump_add(dumper, "\" \""); |
181 | } |
182 | bb_dump_add(dumper, add_strings[(int)od_o2si[(p - od_opts)]]); |
183 | } else { /* P, p, s, w, or other unhandled */ |
184 | bb_show_usage(); |
185 | } |
186 | } |
187 | if (!dumper->fshead) { |
188 | bb_dump_add(dumper, "\"%07.7_Ao\n\""); |
189 | bb_dump_add(dumper, "\"%07.7_ao \" 8/2 \"%06o \" \"\\n\""); |
190 | } |
191 | |
192 | argc -= optind; |
193 | argv += optind; |
194 | |
195 | odoffset(dumper, argc, &argv); |
196 | |
197 | return bb_dump_dump(dumper, argv); |
198 | } |
199 | #endif /* ENABLE_DESKTOP */ |
200 | |
201 | /*- |
202 | * Copyright (c) 1990 The Regents of the University of California. |
203 | * All rights reserved. |
204 | * |
205 | * Redistribution and use in source and binary forms, with or without |
206 | * modification, are permitted provided that the following conditions |
207 | * are met: |
208 | * 1. Redistributions of source code must retain the above copyright |
209 | * notice, this list of conditions and the following disclaimer. |
210 | * 2. Redistributions in binary form must reproduce the above copyright |
211 | * notice, this list of conditions and the following disclaimer in the |
212 | * documentation and/or other materials provided with the distribution. |
213 | * 3. Neither the name of the University nor the names of its contributors |
214 | * may be used to endorse or promote products derived from this software |
215 | * without specific prior written permission. |
216 | * |
217 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
218 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
219 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
220 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
221 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
222 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
223 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
224 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
225 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
226 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
227 | * SUCH DAMAGE. |
228 | */ |
229 |