1 /* ndisasm.c the Netwide Disassembler main module
3 * The Netwide Assembler is copyright (C) 1996 Simon Tatham and
4 * Julian Hall. All rights reserved. The software is
5 * redistributable under the licence given in the file "Licence"
6 * distributed in the NASM archive.
23 #define BPL 8 /* bytes per line of hex dump */
25 static const char *help
=
26 "usage: ndisasm [-a] [-i] [-h] [-r] [-u] [-b bits] [-o origin] [-s sync...]\n"
27 " [-e bytes] [-k start,bytes] [-p vendor] file\n"
28 " -a or -i activates auto (intelligent) sync\n"
30 " -b 16, -b 32 or -b 64 sets the processor mode\n"
31 " -h displays this text\n"
32 " -r or -v displays the version number\n"
33 " -e skips <bytes> bytes of header\n"
34 " -k avoids disassembling <bytes> bytes from position <start>\n"
35 " -p selects the preferred vendor instruction set (intel, amd, cyrix, idt)\n";
37 static void output_ins(uint32_t, uint8_t *, int, char *);
38 static void skip(uint32_t dist
, FILE * fp
);
40 static void ndisasm_error(int severity
, const char *fmt
, ...)
45 vfprintf(stderr
, fmt
, va
);
47 if (severity
& ERR_FATAL
)
51 int main(int argc
, char **argv
)
53 char buffer
[INSN_MAX
* 2], *p
, *ep
, *q
;
56 char *filename
= NULL
;
57 uint32_t nextsync
, synclen
, initskip
= 0L;
68 nasm_set_malloc_error(ndisasm_error
);
74 char *v
, *vv
, *p
= *++argv
;
75 if (*p
== '-' && p
[1]) {
78 switch (tolower(*p
)) {
79 case 'a': /* auto or intelligent sync */
85 fprintf(stderr
, help
);
90 "NDISASM version %s compiled " __DATE__
"\n",
93 case 'u': /* -u for -b 32, -uu for -b 64 */
99 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
101 fprintf(stderr
, "%s: `-b' requires an argument\n",
105 b
= strtoul(v
, &ep
, 10);
106 if (*ep
|| !(bits
== 16 || bits
== 32 || bits
== 64)) {
107 fprintf(stderr
, "%s: argument to `-b' should"
108 " be 16, 32 or 64\n", pname
);
112 p
= ""; /* force to next argument */
114 case 'o': /* origin */
115 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
117 fprintf(stderr
, "%s: `-o' requires an argument\n",
121 offset
= readnum(v
, &rn_error
);
124 "%s: `-o' requires a numeric argument\n",
128 p
= ""; /* force to next argument */
130 case 's': /* sync point */
131 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
133 fprintf(stderr
, "%s: `-s' requires an argument\n",
137 add_sync(readnum(v
, &rn_error
), 0L);
140 "%s: `-s' requires a numeric argument\n",
144 p
= ""; /* force to next argument */
146 case 'e': /* skip a header */
147 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
149 fprintf(stderr
, "%s: `-e' requires an argument\n",
153 initskip
= readnum(v
, &rn_error
);
156 "%s: `-e' requires a numeric argument\n",
160 p
= ""; /* force to next argument */
162 case 'k': /* skip a region */
163 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
165 fprintf(stderr
, "%s: `-k' requires an argument\n",
172 "%s: `-k' requires two numbers separated"
173 " by a comma\n", pname
);
177 nextsync
= readnum(v
, &rn_error
);
180 "%s: `-k' requires numeric arguments\n",
184 synclen
= readnum(vv
, &rn_error
);
187 "%s: `-k' requires numeric arguments\n",
191 add_sync(nextsync
, synclen
);
192 p
= ""; /* force to next argument */
194 case 'p': /* preferred vendor */
195 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
197 fprintf(stderr
, "%s: `-p' requires an argument\n",
201 if (!strcmp(v
, "intel")) {
202 prefer
= 0; /* Default */
203 } else if (!strcmp(v
, "amd")) {
204 prefer
= IF_AMD
| IF_3DNOW
;
205 } else if (!strcmp(v
, "cyrix")) {
206 prefer
= IF_CYRIX
| IF_3DNOW
;
207 } else if (!strcmp(v
, "idt") || !strcmp(v
, "centaur")
208 || !strcmp(v
, "winchip")) {
212 "%s: unknown vendor `%s' specified with `-p'\n",
216 p
= ""; /* force to next argument */
219 fprintf(stderr
, "%s: unrecognised option `-%c'\n",
223 } else if (!filename
) {
226 fprintf(stderr
, "%s: more than one filename specified\n",
233 fprintf(stderr
, help
, pname
);
237 if (strcmp(filename
, "-")) {
238 fp
= fopen(filename
, "rb");
240 fprintf(stderr
, "%s: unable to open `%s': %s\n",
241 pname
, filename
, strerror(errno
));
251 * This main loop is really horrible, and wants rewriting with
252 * an axe. It'll stay the way it is for a while though, until I
257 nextsync
= next_sync(offset
, &synclen
);
259 uint32_t to_read
= buffer
+ sizeof(buffer
) - p
;
260 if (to_read
> nextsync
- offset
- (p
- q
))
261 to_read
= nextsync
- offset
- (p
- q
);
263 lenread
= fread(p
, 1, to_read
, fp
);
265 eof
= TRUE
; /* help along systems with bad feof */
269 if ((uint32_t)offset
== nextsync
) {
271 fprintf(stdout
, "%08"PRIX32
" skipping 0x%"PRIX32
" bytes\n", offset
, synclen
);
276 nextsync
= next_sync(offset
, &synclen
);
278 while (p
> q
&& (p
- q
>= INSN_MAX
|| lenread
== 0)) {
280 disasm(q
, outbuf
, sizeof(outbuf
), bits
, offset
, autosync
,
282 if (!lendis
|| lendis
> (p
- q
)
283 || (uint32_t)lendis
> nextsync
- offset
)
284 lendis
= eatbyte(q
, outbuf
, sizeof(outbuf
));
285 output_ins(offset
, q
, lendis
, outbuf
);
289 if (q
>= buffer
+ INSN_MAX
) {
290 uint8_t *r
= buffer
, *s
= q
;
297 } while (lenread
> 0 || !(eof
|| feof(fp
)));
305 static void output_ins(uint32_t offset
, uint8_t *data
,
306 int datalen
, char *insn
)
309 fprintf(stdout
, "%08"PRIX32
" ", offset
);
312 while (datalen
> 0 && bytes
< BPL
) {
313 fprintf(stdout
, "%02X", *data
++);
318 fprintf(stdout
, "%*s%s\n", (BPL
+ 1 - bytes
) * 2, "", insn
);
320 while (datalen
> 0) {
321 fprintf(stdout
, " -");
323 while (datalen
> 0 && bytes
< BPL
) {
324 fprintf(stdout
, "%02X", *data
++);
328 fprintf(stdout
, "\n");
333 * Skip a certain amount of data in a file, either by seeking if
334 * possible, or if that fails then by reading and discarding.
336 static void skip(uint32_t dist
, FILE * fp
)
338 char buffer
[256]; /* should fit on most stacks :-) */
341 * Got to be careful with fseek: at least one fseek I've tried
342 * doesn't approve of SEEK_CUR. So I'll use SEEK_SET and
343 * ftell... horrible but apparently necessary.
345 if (fseek(fp
, dist
+ ftell(fp
), SEEK_SET
)) {
347 uint32_t len
= (dist
< sizeof(buffer
) ?
348 dist
: sizeof(buffer
));
349 if (fread(buffer
, 1, len
, fp
) < len
) {