1 /* ----------------------------------------------------------------------- *
3 * Copyright 1996-2009 The NASM Authors - All Rights Reserved
4 * See the file AUTHORS included with the NASM distribution for
5 * the specific copyright holders.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following
11 * * Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * * Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
19 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
21 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
30 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 * ----------------------------------------------------------------------- */
35 * ndisasm.c the Netwide Disassembler main module
54 #define BPL 8 /* bytes per line of hex dump */
56 static const char *help
=
57 "usage: ndisasm [-a] [-i] [-h] [-r] [-u] [-b bits] [-o origin] [-s sync...]\n"
58 " [-e bytes] [-k start,bytes] [-p vendor] file\n"
59 " -a or -i activates auto (intelligent) sync\n"
61 " -b 16, -b 32 or -b 64 sets the processor mode\n"
62 " -h displays this text\n"
63 " -r or -v displays the version number\n"
64 " -e skips <bytes> bytes of header\n"
65 " -k avoids disassembling <bytes> bytes from position <start>\n"
66 " -p selects the preferred vendor instruction set (intel, amd, cyrix, idt)\n";
68 static void output_ins(uint32_t, uint8_t *, int, char *);
69 static void skip(uint32_t dist
, FILE * fp
);
71 static void ndisasm_verror(int severity
, const char *fmt
, va_list va
)
73 vfprintf(stderr
, fmt
, va
);
75 if (severity
& ERR_FATAL
)
79 int main(int argc
, char **argv
)
81 char buffer
[INSN_MAX
* 2], *p
, *ep
, *q
;
84 char *filename
= NULL
;
85 uint32_t nextsync
, synclen
, initskip
= 0L;
88 bool autosync
= false;
97 nasm_set_verror(ndisasm_verror
);
98 nasm_init_malloc_error();
104 char *v
, *vv
, *p
= *++argv
;
105 if (*p
== '-' && p
[1]) {
108 switch (nasm_tolower(*p
)) {
109 case 'a': /* auto or intelligent sync */
120 "NDISASM version %s compiled on %s\n",
121 nasm_version
, nasm_date
);
123 case 'u': /* -u for -b 32, -uu for -b 64 */
129 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
131 fprintf(stderr
, "%s: `-b' requires an argument\n",
135 b
= strtoul(v
, &ep
, 10);
136 if (*ep
|| !(bits
== 16 || bits
== 32 || bits
== 64)) {
137 fprintf(stderr
, "%s: argument to `-b' should"
138 " be 16, 32 or 64\n", pname
);
142 p
= ""; /* force to next argument */
144 case 'o': /* origin */
145 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
147 fprintf(stderr
, "%s: `-o' requires an argument\n",
151 offset
= readnum(v
, &rn_error
);
154 "%s: `-o' requires a numeric argument\n",
158 p
= ""; /* force to next argument */
160 case 's': /* sync point */
161 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
163 fprintf(stderr
, "%s: `-s' requires an argument\n",
167 add_sync(readnum(v
, &rn_error
), 0L);
170 "%s: `-s' requires a numeric argument\n",
174 p
= ""; /* force to next argument */
176 case 'e': /* skip a header */
177 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
179 fprintf(stderr
, "%s: `-e' requires an argument\n",
183 initskip
= readnum(v
, &rn_error
);
186 "%s: `-e' requires a numeric argument\n",
190 p
= ""; /* force to next argument */
192 case 'k': /* skip a region */
193 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
195 fprintf(stderr
, "%s: `-k' requires an argument\n",
202 "%s: `-k' requires two numbers separated"
203 " by a comma\n", pname
);
207 nextsync
= readnum(v
, &rn_error
);
210 "%s: `-k' requires numeric arguments\n",
214 synclen
= readnum(vv
, &rn_error
);
217 "%s: `-k' requires numeric arguments\n",
221 add_sync(nextsync
, synclen
);
222 p
= ""; /* force to next argument */
224 case 'p': /* preferred vendor */
225 v
= p
[1] ? p
+ 1 : --argc
? *++argv
: NULL
;
227 fprintf(stderr
, "%s: `-p' requires an argument\n",
231 if (!strcmp(v
, "intel")) {
232 prefer
= 0; /* Default */
233 } else if (!strcmp(v
, "amd")) {
234 prefer
= IF_AMD
| IF_3DNOW
;
235 } else if (!strcmp(v
, "cyrix")) {
236 prefer
= IF_CYRIX
| IF_3DNOW
;
237 } else if (!strcmp(v
, "idt") || !strcmp(v
, "centaur")
238 || !strcmp(v
, "winchip")) {
242 "%s: unknown vendor `%s' specified with `-p'\n",
246 p
= ""; /* force to next argument */
249 fprintf(stderr
, "%s: unrecognised option `-%c'\n",
253 } else if (!filename
) {
256 fprintf(stderr
, "%s: more than one filename specified\n",
263 fprintf(stderr
, help
, pname
);
267 if (strcmp(filename
, "-")) {
268 fp
= fopen(filename
, "rb");
270 fprintf(stderr
, "%s: unable to open `%s': %s\n",
271 pname
, filename
, strerror(errno
));
281 * This main loop is really horrible, and wants rewriting with
282 * an axe. It'll stay the way it is for a while though, until I
287 nextsync
= next_sync(offset
, &synclen
);
289 uint32_t to_read
= buffer
+ sizeof(buffer
) - p
;
290 if ((nextsync
|| synclen
) &&
291 to_read
> nextsync
- offset
- (p
- q
))
292 to_read
= nextsync
- offset
- (p
- q
);
294 lenread
= fread(p
, 1, to_read
, fp
);
296 eof
= true; /* help along systems with bad feof */
300 if ((nextsync
|| synclen
) &&
301 (uint32_t)offset
== nextsync
) {
303 fprintf(stdout
, "%08"PRIX32
" skipping 0x%"PRIX32
" bytes\n",
309 nextsync
= next_sync(offset
, &synclen
);
311 while (p
> q
&& (p
- q
>= INSN_MAX
|| lenread
== 0)) {
313 disasm((uint8_t *) q
, outbuf
, sizeof(outbuf
), bits
,
314 offset
, autosync
, prefer
);
315 if (!lendis
|| lendis
> (p
- q
)
316 || ((nextsync
|| synclen
) &&
317 (uint32_t)lendis
> nextsync
- offset
))
318 lendis
= eatbyte((uint8_t *) q
, outbuf
, sizeof(outbuf
), bits
);
319 output_ins(offset
, (uint8_t *) q
, lendis
, outbuf
);
323 if (q
>= buffer
+ INSN_MAX
) {
324 uint8_t *r
= (uint8_t *) buffer
, *s
= (uint8_t *) q
;
331 } while (lenread
> 0 || !(eof
|| feof(fp
)));
339 static void output_ins(uint32_t offset
, uint8_t *data
,
340 int datalen
, char *insn
)
343 fprintf(stdout
, "%08"PRIX32
" ", offset
);
346 while (datalen
> 0 && bytes
< BPL
) {
347 fprintf(stdout
, "%02X", *data
++);
352 fprintf(stdout
, "%*s%s\n", (BPL
+ 1 - bytes
) * 2, "", insn
);
354 while (datalen
> 0) {
355 fprintf(stdout
, " -");
357 while (datalen
> 0 && bytes
< BPL
) {
358 fprintf(stdout
, "%02X", *data
++);
362 fprintf(stdout
, "\n");
367 * Skip a certain amount of data in a file, either by seeking if
368 * possible, or if that fails then by reading and discarding.
370 static void skip(uint32_t dist
, FILE * fp
)
372 char buffer
[256]; /* should fit on most stacks :-) */
375 * Got to be careful with fseek: at least one fseek I've tried
376 * doesn't approve of SEEK_CUR. So I'll use SEEK_SET and
377 * ftell... horrible but apparently necessary.
379 if (fseek(fp
, dist
+ ftell(fp
), SEEK_SET
)) {
381 uint32_t len
= (dist
< sizeof(buffer
) ?
382 dist
: sizeof(buffer
));
383 if (fread(buffer
, 1, len
, fp
) < len
) {