?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
vn.4: Describe autocloning & use standard description for kernel modules
[dragonfly.git] / usr.bin / doscmd / i386-pinsn.c
blob01d59251eb315a943028b32e5720aa269521ccbf
1 /*
2 * $FreeBSD: src/usr.bin/doscmd/i386-pinsn.c,v 1.1.6.1 2002/04/25 11:04:51 tg Exp $
3 * $DragonFly: src/usr.bin/doscmd/i386-pinsn.c,v 1.4 2008/10/16 01:52:32 swildner Exp $
4 */
5 #ifdef DISASSEMBLER
6
7 /* Print i386 instructions for GDB, the GNU debugger.
8 Copyright (C) 1988, 1989 Free Software Foundation, Inc.
9
10 This file is part of GDB.
11
12 GDB is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 1, or (at your option)
15 any later version.
16
17 GDB is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
21
22 You should have received a copy of the GNU General Public License
23 along with GDB; see the file COPYING. If not, write to
24 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
25
26 /*
27 * 80386 instruction printer by Pace Willisson (pace@prep.ai.mit.edu)
28 * July 1988
29 */
30
31 /*
32 * The main tables describing the instructions is essentially a copy
33 * of the "Opcode Map" chapter (Appendix A) of the Intel 80386
34 * Programmers Manual. Usually, there is a capital letter, followed
35 * by a small letter. The capital letter tell the addressing mode,
36 * and the small letter tells about the operand size. Refer to
37 * the Intel manual for details.
38 */
39
40 #include <stdio.h>
41 #include <ctype.h>
42
43 #include "doscmd.h"
44
45 static void OP_E(int), OP_indirE(int), OP_G(int);
46 static void OP_I(int), OP_sI(int), OP_REG(int), OP_J(int), OP_SEG(int);
47 static void OP_DIR(int), OP_OFF(int), OP_DSSI(int), OP_ESDI(int);
48 static void OP_C(int), OP_D(int), OP_T(int), OP_rm(int);
49 static void OP_ST(int), OP_STi(int);
50 static void append_pc(unsigned long);
51 static void append_prefix(void);
52 static void dofloat(void);
53 static int get16(void);
54 static int get32(void);
55 static void oappend(const char *);
56 static void putop(const char *);
57
58 #define Eb OP_E, b_mode
59 #define indirEb OP_indirE, b_mode
60 #define Gb OP_G, b_mode
61 #define Ev OP_E, v_mode
62 #define indirEv OP_indirE, v_mode
63 #define Ew OP_E, w_mode
64 #define Ma OP_E, v_mode
65 #define M OP_E, 0
66 #define Mp OP_E, 0 /* ? */
67 #define Gv OP_G, v_mode
68 #define Gw OP_G, w_mode
69 #define Rw OP_rm, w_mode
70 #define Rd OP_rm, d_mode
71 #define Ib OP_I, b_mode
72 #define sIb OP_sI, b_mode /* sign extended byte */
73 #define Iv OP_I, v_mode
74 #define Iw OP_I, w_mode
75 #define Jb OP_J, b_mode
76 #define Jv OP_J, v_mode
77 #define Cd OP_C, d_mode
78 #define Dd OP_D, d_mode
79 #define Td OP_T, d_mode
80
81 #define eAX OP_REG, eAX_reg
82 #define eBX OP_REG, eBX_reg
83 #define eCX OP_REG, eCX_reg
84 #define eDX OP_REG, eDX_reg
85 #define eSP OP_REG, eSP_reg
86 #define eBP OP_REG, eBP_reg
87 #define eSI OP_REG, eSI_reg
88 #define eDI OP_REG, eDI_reg
89 #define AL OP_REG, al_reg
90 #define CL OP_REG, cl_reg
91 #define DL OP_REG, dl_reg
92 #define BL OP_REG, bl_reg
93 #define AH OP_REG, ah_reg
94 #define CH OP_REG, ch_reg
95 #define DH OP_REG, dh_reg
96 #define BH OP_REG, bh_reg
97 #define AX OP_REG, ax_reg
98 #define DX OP_REG, dx_reg
99 #define indirDX OP_REG, indir_dx_reg
100
101 #define Sw OP_SEG, w_mode
102 #define Ap OP_DIR, lptr
103 #define Av OP_DIR, v_mode
104 #define Ob OP_OFF, b_mode
105 #define Ov OP_OFF, v_mode
106 #define Xb OP_DSSI, b_mode
107 #define Xv OP_DSSI, v_mode
108 #define Yb OP_ESDI, b_mode
109 #define Yv OP_ESDI, v_mode
110
111 #define es OP_REG, es_reg
112 #define ss OP_REG, ss_reg
113 #define cs OP_REG, cs_reg
114 #define ds OP_REG, ds_reg
115 #define fs OP_REG, fs_reg
116 #define gs OP_REG, gs_reg
117
118 #define b_mode 1
119 #define v_mode 2
120 #define w_mode 3
121 #define d_mode 4
122
123 #define es_reg 100
124 #define cs_reg 101
125 #define ss_reg 102
126 #define ds_reg 103
127 #define fs_reg 104
128 #define gs_reg 105
129 #define eAX_reg 107
130 #define eCX_reg 108
131 #define eDX_reg 109
132 #define eBX_reg 110
133 #define eSP_reg 111
134 #define eBP_reg 112
135 #define eSI_reg 113
136 #define eDI_reg 114
137
138 #define lptr 115
139
140 #define al_reg 116
141 #define cl_reg 117
142 #define dl_reg 118
143 #define bl_reg 119
144 #define ah_reg 120
145 #define ch_reg 121
146 #define dh_reg 122
147 #define bh_reg 123
148
149 #define ax_reg 124
150 #define cx_reg 125
151 #define dx_reg 126
152 #define bx_reg 127
153 #define sp_reg 128
154 #define bp_reg 129
155 #define si_reg 130
156 #define di_reg 131
157
158 #define indir_dx_reg 150
159
160 #define NOFUNC NULL, 0
161
162 #define GRP1b NULL, NULL, 0, NOFUNC, NOFUNC
163 #define GRP1S NULL, NULL, 1, NOFUNC, NOFUNC
164 #define GRP1Ss NULL, NULL, 2, NOFUNC, NOFUNC
165 #define GRP2b NULL, NULL, 3, NOFUNC, NOFUNC
166 #define GRP2S NULL, NULL, 4, NOFUNC, NOFUNC
167 #define GRP2b_one NULL, NULL, 5, NOFUNC, NOFUNC
168 #define GRP2S_one NULL, NULL, 6, NOFUNC, NOFUNC
169 #define GRP2b_cl NULL, NULL, 7, NOFUNC, NOFUNC
170 #define GRP2S_cl NULL, NULL, 8, NOFUNC, NOFUNC
171 #define GRP3b NULL, NULL, 9, NOFUNC, NOFUNC
172 #define GRP3S NULL, NULL, 10, NOFUNC, NOFUNC
173 #define GRP4 NULL, NULL, 11, NOFUNC, NOFUNC
174 #define GRP5 NULL, NULL, 12, NOFUNC, NOFUNC
175 #define GRP6 NULL, NULL, 13, NOFUNC, NOFUNC
176 #define GRP7 NULL, NULL, 14, NOFUNC, NOFUNC
177 #define GRP8 NULL, NULL, 15, NOFUNC, NOFUNC
178
179 #define FLOATCODE 50
180 #define FLOAT NULL, NULL, FLOATCODE, NOFUNC, NOFUNC
181
182 struct dis386 {
183 const char *name;
184 void (*op1)(int);
185 int bytemode1;
186 void (*op2)(int);
187 int bytemode2;
188 void (*op3)(int);
189 int bytemode3;
190 };
191
192 struct dis386 dis386[] = {
193 /* 00 */
194 { "addb", Eb, Gb, NOFUNC },
195 { "addS", Ev, Gv, NOFUNC },
196 { "addb", Gb, Eb, NOFUNC },
197 { "addS", Gv, Ev, NOFUNC },
198 { "addb", AL, Ib, NOFUNC },
199 { "addS", eAX, Iv, NOFUNC },
200 { "pushl", es, NOFUNC, NOFUNC },
201 { "popl", es, NOFUNC, NOFUNC },
202 /* 08 */
203 { "orb", Eb, Gb, NOFUNC },
204 { "orS", Ev, Gv, NOFUNC },
205 { "orb", Gb, Eb, NOFUNC },
206 { "orS", Gv, Ev, NOFUNC },
207 { "orb", AL, Ib, NOFUNC },
208 { "orS", eAX, Iv, NOFUNC },
209 { "pushl", cs, NOFUNC, NOFUNC },
210 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* extended opcode escape */
211 /* 10 */
212 { "adcb", Eb, Gb, NOFUNC },
213 { "adcS", Ev, Gv, NOFUNC },
214 { "adcb", Gb, Eb, NOFUNC },
215 { "adcS", Gv, Ev, NOFUNC },
216 { "adcb", AL, Ib, NOFUNC },
217 { "adcS", eAX, Iv, NOFUNC },
218 { "pushl", ss, NOFUNC, NOFUNC },
219 { "popl", ss, NOFUNC, NOFUNC },
220 /* 18 */
221 { "sbbb", Eb, Gb, NOFUNC },
222 { "sbbS", Ev, Gv, NOFUNC },
223 { "sbbb", Gb, Eb, NOFUNC },
224 { "sbbS", Gv, Ev, NOFUNC },
225 { "sbbb", AL, Ib, NOFUNC },
226 { "sbbS", eAX, Iv, NOFUNC },
227 { "pushl", ds, NOFUNC, NOFUNC },
228 { "popl", ds, NOFUNC, NOFUNC },
229 /* 20 */
230 { "andb", Eb, Gb, NOFUNC },
231 { "andS", Ev, Gv, NOFUNC },
232 { "andb", Gb, Eb, NOFUNC },
233 { "andS", Gv, Ev, NOFUNC },
234 { "andb", AL, Ib, NOFUNC },
235 { "andS", eAX, Iv, NOFUNC },
236 { "(bad)", NOFUNC, NOFUNC, NOFUNC}, /* SEG ES prefix */
237 { "daa", NOFUNC, NOFUNC, NOFUNC },
238 /* 28 */
239 { "subb", Eb, Gb, NOFUNC },
240 { "subS", Ev, Gv, NOFUNC },
241 { "subb", Gb, Eb, NOFUNC },
242 { "subS", Gv, Ev, NOFUNC },
243 { "subb", AL, Ib, NOFUNC },
244 { "subS", eAX, Iv, NOFUNC },
245 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* SEG CS prefix */
246 { "das", NOFUNC, NOFUNC, NOFUNC },
247 /* 30 */
248 { "xorb", Eb, Gb, NOFUNC },
249 { "xorS", Ev, Gv, NOFUNC },
250 { "xorb", Gb, Eb, NOFUNC },
251 { "xorS", Gv, Ev, NOFUNC },
252 { "xorb", AL, Ib, NOFUNC },
253 { "xorS", eAX, Iv, NOFUNC },
254 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* SEG SS prefix */
255 { "aaa", NOFUNC, NOFUNC, NOFUNC },
256 /* 38 */
257 { "cmpb", Eb, Gb, NOFUNC },
258 { "cmpS", Ev, Gv, NOFUNC },
259 { "cmpb", Gb, Eb, NOFUNC },
260 { "cmpS", Gv, Ev, NOFUNC },
261 { "cmpb", AL, Ib, NOFUNC },
262 { "cmpS", eAX, Iv, NOFUNC },
263 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* SEG DS prefix */
264 { "aas", NOFUNC, NOFUNC, NOFUNC },
265 /* 40 */
266 { "incS", eAX, NOFUNC, NOFUNC },
267 { "incS", eCX, NOFUNC, NOFUNC },
268 { "incS", eDX, NOFUNC, NOFUNC },
269 { "incS", eBX, NOFUNC, NOFUNC },
270 { "incS", eSP, NOFUNC, NOFUNC },
271 { "incS", eBP, NOFUNC, NOFUNC },
272 { "incS", eSI, NOFUNC, NOFUNC },
273 { "incS", eDI, NOFUNC, NOFUNC },
274 /* 48 */
275 { "decS", eAX, NOFUNC, NOFUNC },
276 { "decS", eCX, NOFUNC, NOFUNC },
277 { "decS", eDX, NOFUNC, NOFUNC },
278 { "decS", eBX, NOFUNC, NOFUNC },
279 { "decS", eSP, NOFUNC, NOFUNC },
280 { "decS", eBP, NOFUNC, NOFUNC },
281 { "decS", eSI, NOFUNC, NOFUNC },
282 { "decS", eDI, NOFUNC, NOFUNC },
283 /* 50 */
284 { "pushS", eAX, NOFUNC, NOFUNC },
285 { "pushS", eCX, NOFUNC, NOFUNC },
286 { "pushS", eDX, NOFUNC, NOFUNC },
287 { "pushS", eBX, NOFUNC, NOFUNC },
288 { "pushS", eSP, NOFUNC, NOFUNC },
289 { "pushS", eBP, NOFUNC, NOFUNC },
290 { "pushS", eSI, NOFUNC, NOFUNC },
291 { "pushS", eDI, NOFUNC, NOFUNC },
292 /* 58 */
293 { "popS", eAX, NOFUNC, NOFUNC },
294 { "popS", eCX, NOFUNC, NOFUNC },
295 { "popS", eDX, NOFUNC, NOFUNC },
296 { "popS", eBX, NOFUNC, NOFUNC },
297 { "popS", eSP, NOFUNC, NOFUNC },
298 { "popS", eBP, NOFUNC, NOFUNC },
299 { "popS", eSI, NOFUNC, NOFUNC },
300 { "popS", eDI, NOFUNC, NOFUNC },
301 /* 60 */
302 { "pusha", NOFUNC, NOFUNC, NOFUNC },
303 { "popa", NOFUNC, NOFUNC, NOFUNC },
304 { "boundS", Gv, Ma, NOFUNC },
305 { "arpl", Ew, Gw, NOFUNC },
306 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* seg fs */
307 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* seg gs */
308 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* op size prefix */
309 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* adr size prefix */
310 /* 68 */
311 { "pushS", Iv, NOFUNC, NOFUNC }, /* 386 book wrong */
312 { "imulS", Gv, Ev, Iv },
313 { "pushl", sIb, NOFUNC, NOFUNC }, /* push of byte really pushes 4 bytes */
314 { "imulS", Gv, Ev, Ib },
315 { "insb", Yb, indirDX, NOFUNC },
316 { "insS", Yv, indirDX, NOFUNC },
317 { "outsb", indirDX, Xb, NOFUNC },
318 { "outsS", indirDX, Xv, NOFUNC },
319 /* 70 */
320 { "jo", Jb, NOFUNC, NOFUNC },
321 { "jno", Jb, NOFUNC, NOFUNC },
322 { "jb", Jb, NOFUNC, NOFUNC },
323 { "jae", Jb, NOFUNC, NOFUNC },
324 { "je", Jb, NOFUNC, NOFUNC },
325 { "jne", Jb, NOFUNC, NOFUNC },
326 { "jbe", Jb, NOFUNC, NOFUNC },
327 { "ja", Jb, NOFUNC, NOFUNC },
328 /* 78 */
329 { "js", Jb, NOFUNC, NOFUNC },
330 { "jns", Jb, NOFUNC, NOFUNC },
331 { "jp", Jb, NOFUNC, NOFUNC },
332 { "jnp", Jb, NOFUNC, NOFUNC },
333 { "jl", Jb, NOFUNC, NOFUNC },
334 { "jnl", Jb, NOFUNC, NOFUNC },
335 { "jle", Jb, NOFUNC, NOFUNC },
336 { "jg", Jb, NOFUNC, NOFUNC },
337 /* 80 */
338 { GRP1b },
339 { GRP1S },
340 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
341 { GRP1Ss },
342 { "testb", Eb, Gb, NOFUNC },
343 { "testS", Ev, Gv, NOFUNC },
344 { "xchgb", Eb, Gb, NOFUNC },
345 { "xchgS", Ev, Gv, NOFUNC },
346 /* 88 */
347 { "movb", Eb, Gb, NOFUNC },
348 { "movS", Ev, Gv, NOFUNC },
349 { "movb", Gb, Eb, NOFUNC },
350 { "movS", Gv, Ev, NOFUNC },
351 { "movw", Ew, Sw, NOFUNC },
352 { "leaS", Gv, M, NOFUNC },
353 { "movw", Sw, Ew, NOFUNC },
354 { "popS", Ev, NOFUNC, NOFUNC },
355 /* 90 */
356 { "nop", NOFUNC, NOFUNC, NOFUNC },
357 { "xchgS", eCX, eAX, NOFUNC },
358 { "xchgS", eDX, eAX, NOFUNC },
359 { "xchgS", eBX, eAX, NOFUNC },
360 { "xchgS", eSP, eAX, NOFUNC },
361 { "xchgS", eBP, eAX, NOFUNC },
362 { "xchgS", eSI, eAX, NOFUNC },
363 { "xchgS", eDI, eAX, NOFUNC },
364 /* 98 */
365 { "cwtl", NOFUNC, NOFUNC, NOFUNC },
366 { "cltd", NOFUNC, NOFUNC, NOFUNC },
367 { "lcall", Ap, NOFUNC, NOFUNC },
368 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* fwait */
369 { "pushf", NOFUNC, NOFUNC, NOFUNC },
370 { "popf", NOFUNC, NOFUNC, NOFUNC },
371 { "sahf", NOFUNC, NOFUNC, NOFUNC },
372 { "lahf", NOFUNC, NOFUNC, NOFUNC },
373 /* a0 */
374 { "movb", AL, Ob, NOFUNC },
375 { "movS", eAX, Ov, NOFUNC },
376 { "movb", Ob, AL, NOFUNC },
377 { "movS", Ov, eAX, NOFUNC },
378 { "movsb", Yb, Xb, NOFUNC },
379 { "movsS", Yv, Xv, NOFUNC },
380 { "cmpsb", Xb, Yb, NOFUNC },
381 { "cmpsS", Xv, Yv, NOFUNC },
382 /* a8 */
383 { "testb", AL, Ib, NOFUNC },
384 { "testS", eAX, Iv, NOFUNC },
385 { "stosb", Yb, AL, NOFUNC },
386 { "stosS", Yv, eAX, NOFUNC },
387 { "lodsb", AL, Xb, NOFUNC },
388 { "lodsS", eAX, Xv, NOFUNC },
389 { "scasb", AL, Yb, NOFUNC },
390 { "scasS", eAX, Yv, NOFUNC },
391 /* b0 */
392 { "movb", AL, Ib, NOFUNC },
393 { "movb", CL, Ib, NOFUNC },
394 { "movb", DL, Ib, NOFUNC },
395 { "movb", BL, Ib, NOFUNC },
396 { "movb", AH, Ib, NOFUNC },
397 { "movb", CH, Ib, NOFUNC },
398 { "movb", DH, Ib, NOFUNC },
399 { "movb", BH, Ib, NOFUNC },
400 /* b8 */
401 { "movS", eAX, Iv, NOFUNC },
402 { "movS", eCX, Iv, NOFUNC },
403 { "movS", eDX, Iv, NOFUNC },
404 { "movS", eBX, Iv, NOFUNC },
405 { "movS", eSP, Iv, NOFUNC },
406 { "movS", eBP, Iv, NOFUNC },
407 { "movS", eSI, Iv, NOFUNC },
408 { "movS", eDI, Iv, NOFUNC },
409 /* c0 */
410 { GRP2b },
411 { GRP2S },
412 { "ret", Iw, NOFUNC, NOFUNC },
413 { "ret", NOFUNC, NOFUNC, NOFUNC },
414 { "lesS", Gv, Mp, NOFUNC },
415 { "ldsS", Gv, Mp, NOFUNC },
416 { "movb", Eb, Ib, NOFUNC },
417 { "movS", Ev, Iv, NOFUNC },
418 /* c8 */
419 { "enter", Iw, Ib, NOFUNC },
420 { "leave", NOFUNC, NOFUNC, NOFUNC },
421 { "lret", Iw, NOFUNC, NOFUNC },
422 { "lret", NOFUNC, NOFUNC, NOFUNC },
423 { "int3", NOFUNC, NOFUNC, NOFUNC },
424 { "int", Ib, NOFUNC, NOFUNC },
425 { "into", NOFUNC, NOFUNC, NOFUNC },
426 { "iret", NOFUNC, NOFUNC, NOFUNC },
427 /* d0 */
428 { GRP2b_one },
429 { GRP2S_one },
430 { GRP2b_cl },
431 { GRP2S_cl },
432 { "aam", Ib, NOFUNC, NOFUNC },
433 { "aad", Ib, NOFUNC, NOFUNC },
434 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
435 { "xlat", NOFUNC, NOFUNC, NOFUNC },
436 /* d8 */
437 { FLOAT },
438 { FLOAT },
439 { FLOAT },
440 { FLOAT },
441 { FLOAT },
442 { FLOAT },
443 { FLOAT },
444 { FLOAT },
445 /* e0 */
446 { "loopne", Jb, NOFUNC, NOFUNC },
447 { "loope", Jb, NOFUNC, NOFUNC },
448 { "loop", Jb, NOFUNC, NOFUNC },
449 { "jCcxz", Jb, NOFUNC, NOFUNC },
450 { "inb", AL, Ib, NOFUNC },
451 { "inS", eAX, Ib, NOFUNC },
452 { "outb", Ib, AL, NOFUNC },
453 { "outS", Ib, eAX, NOFUNC },
454 /* e8 */
455 { "call", Av, NOFUNC, NOFUNC },
456 { "jmp", Jv, NOFUNC, NOFUNC },
457 { "ljmp", Ap, NOFUNC, NOFUNC },
458 { "jmp", Jb, NOFUNC, NOFUNC },
459 { "inb", AL, indirDX, NOFUNC },
460 { "inS", eAX, indirDX, NOFUNC },
461 { "outb", indirDX, AL, NOFUNC },
462 { "outS", indirDX, eAX, NOFUNC },
463 /* f0 */
464 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* lock prefix */
465 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
466 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* repne */
467 { "(bad)", NOFUNC, NOFUNC, NOFUNC }, /* repz */
468 { "hlt", NOFUNC, NOFUNC, NOFUNC },
469 { "cmc", NOFUNC, NOFUNC, NOFUNC },
470 { GRP3b },
471 { GRP3S },
472 /* f8 */
473 { "clc", NOFUNC, NOFUNC, NOFUNC },
474 { "stc", NOFUNC, NOFUNC, NOFUNC },
475 { "cli", NOFUNC, NOFUNC, NOFUNC },
476 { "sti", NOFUNC, NOFUNC, NOFUNC },
477 { "cld", NOFUNC, NOFUNC, NOFUNC },
478 { "std", NOFUNC, NOFUNC, NOFUNC },
479 { GRP4 },
480 { GRP5 },
481 };
482
483 struct dis386 dis386_twobyte[] = {
484 /* 00 */
485 { GRP6 },
486 { GRP7 },
487 { "larS", Gv, Ew, NOFUNC },
488 { "lslS", Gv, Ew, NOFUNC },
489 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
490 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
491 { "clts", NOFUNC, NOFUNC, NOFUNC },
492 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
493 /* 08 */
494 { "invd", NOFUNC, NOFUNC, NOFUNC },
495 { "wbinvd", NOFUNC, NOFUNC, NOFUNC },
496 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
497 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
498 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
499 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
500 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
501 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
502 /* 10 */
503 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
504 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
505 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
506 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
507 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
508 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
509 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
510 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
511 /* 18 */
512 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
513 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
514 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
515 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
516 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
517 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
518 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
519 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
520 /* 20 */
521 /* these are all backward in appendix A of the intel book */
522 { "movl", Rd, Cd, NOFUNC },
523 { "movl", Rd, Dd, NOFUNC },
524 { "movl", Cd, Rd, NOFUNC },
525 { "movl", Dd, Rd, NOFUNC },
526 { "movl", Rd, Td, NOFUNC },
527 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
528 { "movl", Td, Rd, NOFUNC },
529 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
530 /* 28 */
531 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
532 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
533 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
534 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
535 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
536 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
537 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
538 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
539 /* 30 */
540 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
541 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
542 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
543 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
544 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
545 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
546 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
547 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
548 /* 38 */
549 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
550 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
551 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
552 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
553 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
554 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
555 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
556 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
557 /* 40 */
558 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
559 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
560 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
561 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
562 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
563 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
564 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
565 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
566 /* 48 */
567 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
568 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
569 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
570 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
571 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
572 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
573 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
574 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
575 /* 50 */
576 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
577 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
578 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
579 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
580 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
581 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
582 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
583 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
584 /* 58 */
585 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
586 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
587 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
588 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
589 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
590 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
591 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
592 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
593 /* 60 */
594 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
595 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
596 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
597 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
598 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
599 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
600 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
601 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
602 /* 68 */
603 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
604 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
605 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
606 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
607 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
608 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
609 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
610 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
611 /* 70 */
612 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
613 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
614 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
615 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
616 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
617 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
618 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
619 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
620 /* 78 */
621 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
622 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
623 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
624 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
625 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
626 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
627 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
628 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
629 /* 80 */
630 { "jo", Jv, NOFUNC, NOFUNC },
631 { "jno", Jv, NOFUNC, NOFUNC },
632 { "jb", Jv, NOFUNC, NOFUNC },
633 { "jae", Jv, NOFUNC, NOFUNC },
634 { "je", Jv, NOFUNC, NOFUNC },
635 { "jne", Jv, NOFUNC, NOFUNC },
636 { "jbe", Jv, NOFUNC, NOFUNC },
637 { "ja", Jv, NOFUNC, NOFUNC },
638 /* 88 */
639 { "js", Jv, NOFUNC, NOFUNC },
640 { "jns", Jv, NOFUNC, NOFUNC },
641 { "jp", Jv, NOFUNC, NOFUNC },
642 { "jnp", Jv, NOFUNC, NOFUNC },
643 { "jl", Jv, NOFUNC, NOFUNC },
644 { "jge", Jv, NOFUNC, NOFUNC },
645 { "jle", Jv, NOFUNC, NOFUNC },
646 { "jg", Jv, NOFUNC, NOFUNC },
647 /* 90 */
648 { "seto", Eb, NOFUNC, NOFUNC },
649 { "setno", Eb, NOFUNC, NOFUNC },
650 { "setb", Eb, NOFUNC, NOFUNC },
651 { "setae", Eb, NOFUNC, NOFUNC },
652 { "sete", Eb, NOFUNC, NOFUNC },
653 { "setne", Eb, NOFUNC, NOFUNC },
654 { "setbe", Eb, NOFUNC, NOFUNC },
655 { "seta", Eb, NOFUNC, NOFUNC },
656 /* 98 */
657 { "sets", Eb, NOFUNC, NOFUNC },
658 { "setns", Eb, NOFUNC, NOFUNC },
659 { "setp", Eb, NOFUNC, NOFUNC },
660 { "setnp", Eb, NOFUNC, NOFUNC },
661 { "setl", Eb, NOFUNC, NOFUNC },
662 { "setge", Eb, NOFUNC, NOFUNC },
663 { "setle", Eb, NOFUNC, NOFUNC },
664 { "setg", Eb, NOFUNC, NOFUNC },
665 /* a0 */
666 { "pushl", fs, NOFUNC, NOFUNC },
667 { "popl", fs, NOFUNC, NOFUNC },
668 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
669 { "btS", Ev, Gv, NOFUNC },
670 { "shldS", Ev, Gv, Ib },
671 { "shldS", Ev, Gv, CL },
672 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
673 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
674 /* a8 */
675 { "pushl", gs, NOFUNC, NOFUNC },
676 { "popl", gs, NOFUNC, NOFUNC },
677 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
678 { "btsS", Ev, Gv, NOFUNC },
679 { "shrdS", Ev, Gv, Ib },
680 { "shrdS", Ev, Gv, CL },
681 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
682 { "imulS", Gv, Ev, NOFUNC },
683 /* b0 */
684 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
685 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
686 { "lssS", Gv, Mp, NOFUNC }, /* 386 lists only Mp */
687 { "btrS", Ev, Gv, NOFUNC },
688 { "lfsS", Gv, Mp, NOFUNC }, /* 386 lists only Mp */
689 { "lgsS", Gv, Mp, NOFUNC }, /* 386 lists only Mp */
690 { "movzbS", Gv, Eb, NOFUNC },
691 { "movzwS", Gv, Ew, NOFUNC },
692 /* b8 */
693 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
694 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
695 { GRP8 },
696 { "btcS", Ev, Gv, NOFUNC },
697 { "bsfS", Gv, Ev, NOFUNC },
698 { "bsrS", Gv, Ev, NOFUNC },
699 { "movsbS", Gv, Eb, NOFUNC },
700 { "movswS", Gv, Ew, NOFUNC },
701 /* c0 */
702 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
703 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
704 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
705 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
706 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
707 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
708 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
709 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
710 /* c8 */
711 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
712 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
713 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
714 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
715 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
716 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
717 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
718 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
719 /* d0 */
720 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
721 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
722 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
723 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
724 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
725 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
726 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
727 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
728 /* d8 */
729 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
730 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
731 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
732 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
733 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
734 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
735 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
736 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
737 /* e0 */
738 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
739 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
740 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
741 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
742 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
743 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
744 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
745 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
746 /* e8 */
747 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
748 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
749 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
750 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
751 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
752 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
753 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
754 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
755 /* f0 */
756 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
757 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
758 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
759 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
760 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
761 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
762 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
763 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
764 /* f8 */
765 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
766 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
767 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
768 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
769 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
770 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
771 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
772 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
773 };
774
775 static char obuf[100];
776 static char *obufp;
777 static char scratchbuf[100];
778 static unsigned char *start_codep;
779 static unsigned char *codep;
780 static int mod;
781 static int rm;
782 static int reg;
783
784 static const char *names32[]={
785 "%eax","%ecx","%edx","%ebx", "%esp","%ebp","%esi","%edi",
786 };
787 static const char *names16[] = {
788 "%ax","%cx","%dx","%bx","%sp","%bp","%si","%di",
789 };
790 static const char *names8[] = {
791 "%al","%cl","%dl","%bl","%ah","%ch","%dh","%bh",
792 };
793 static const char *names_seg[] = {
794 "%es","%cs","%ss","%ds","%fs","%gs","%?","%?",
795 };
796 static const char *names16_pairs[] = {
797 "%bx+%si","%bx+%di","%bp+%si","%bp+%di","%si","%di","%bp","%bx",
798 };
799
800 struct dis386 grps[][8] = {
801 /* GRP1b */
802 {
803 { "addb", Eb, Ib, NOFUNC },
804 { "orb", Eb, Ib, NOFUNC },
805 { "adcb", Eb, Ib, NOFUNC },
806 { "sbbb", Eb, Ib, NOFUNC },
807 { "andb", Eb, Ib, NOFUNC },
808 { "subb", Eb, Ib, NOFUNC },
809 { "xorb", Eb, Ib, NOFUNC },
810 { "cmpb", Eb, Ib, NOFUNC }
811 },
812 /* GRP1S */
813 {
814 { "addS", Ev, Iv, NOFUNC },
815 { "orS", Ev, Iv, NOFUNC },
816 { "adcS", Ev, Iv, NOFUNC },
817 { "sbbS", Ev, Iv, NOFUNC },
818 { "andS", Ev, Iv, NOFUNC },
819 { "subS", Ev, Iv, NOFUNC },
820 { "xorS", Ev, Iv, NOFUNC },
821 { "cmpS", Ev, Iv, NOFUNC }
822 },
823 /* GRP1Ss */
824 {
825 { "addS", Ev, sIb, NOFUNC },
826 { "orS", Ev, sIb, NOFUNC },
827 { "adcS", Ev, sIb, NOFUNC },
828 { "sbbS", Ev, sIb, NOFUNC },
829 { "andS", Ev, sIb, NOFUNC },
830 { "subS", Ev, sIb, NOFUNC },
831 { "xorS", Ev, sIb, NOFUNC },
832 { "cmpS", Ev, sIb, NOFUNC }
833 },
834 /* GRP2b */
835 {
836 { "rolb", Eb, Ib, NOFUNC },
837 { "rorb", Eb, Ib, NOFUNC },
838 { "rclb", Eb, Ib, NOFUNC },
839 { "rcrb", Eb, Ib, NOFUNC },
840 { "shlb", Eb, Ib, NOFUNC },
841 { "shrb", Eb, Ib, NOFUNC },
842 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
843 { "sarb", Eb, Ib, NOFUNC },
844 },
845 /* GRP2S */
846 {
847 { "rolS", Ev, Ib, NOFUNC },
848 { "rorS", Ev, Ib, NOFUNC },
849 { "rclS", Ev, Ib, NOFUNC },
850 { "rcrS", Ev, Ib, NOFUNC },
851 { "shlS", Ev, Ib, NOFUNC },
852 { "shrS", Ev, Ib, NOFUNC },
853 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
854 { "sarS", Ev, Ib, NOFUNC },
855 },
856 /* GRP2b_one */
857 {
858 { "rolb", Eb, NOFUNC, NOFUNC },
859 { "rorb", Eb, NOFUNC, NOFUNC },
860 { "rclb", Eb, NOFUNC, NOFUNC },
861 { "rcrb", Eb, NOFUNC, NOFUNC },
862 { "shlb", Eb, NOFUNC, NOFUNC },
863 { "shrb", Eb, NOFUNC, NOFUNC },
864 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
865 { "sarb", Eb, NOFUNC, NOFUNC },
866 },
867 /* GRP2S_one */
868 {
869 { "rolS", Ev, NOFUNC, NOFUNC },
870 { "rorS", Ev, NOFUNC, NOFUNC },
871 { "rclS", Ev, NOFUNC, NOFUNC },
872 { "rcrS", Ev, NOFUNC, NOFUNC },
873 { "shlS", Ev, NOFUNC, NOFUNC },
874 { "shrS", Ev, NOFUNC, NOFUNC },
875 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
876 { "sarS", Ev, NOFUNC, NOFUNC },
877 },
878 /* GRP2b_cl */
879 {
880 { "rolb", Eb, CL, NOFUNC },
881 { "rorb", Eb, CL, NOFUNC },
882 { "rclb", Eb, CL, NOFUNC },
883 { "rcrb", Eb, CL, NOFUNC },
884 { "shlb", Eb, CL, NOFUNC },
885 { "shrb", Eb, CL, NOFUNC },
886 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
887 { "sarb", Eb, CL, NOFUNC },
888 },
889 /* GRP2S_cl */
890 {
891 { "rolS", Ev, CL, NOFUNC },
892 { "rorS", Ev, CL, NOFUNC },
893 { "rclS", Ev, CL, NOFUNC },
894 { "rcrS", Ev, CL, NOFUNC },
895 { "shlS", Ev, CL, NOFUNC },
896 { "shrS", Ev, CL, NOFUNC },
897 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
898 { "sarS", Ev, CL, NOFUNC }
899 },
900 /* GRP3b */
901 {
902 { "testb", Eb, Ib, NOFUNC },
903 { "(bad)", Eb, NOFUNC, NOFUNC },
904 { "notb", Eb, NOFUNC, NOFUNC },
905 { "negb", Eb, NOFUNC, NOFUNC },
906 { "mulb", AL, Eb, NOFUNC },
907 { "imulb", AL, Eb, NOFUNC },
908 { "divb", AL, Eb, NOFUNC },
909 { "idivb", AL, Eb, NOFUNC }
910 },
911 /* GRP3S */
912 {
913 { "testS", Ev, Iv, NOFUNC },
914 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
915 { "notS", Ev, NOFUNC, NOFUNC },
916 { "negS", Ev, NOFUNC, NOFUNC },
917 { "mulS", eAX, Ev, NOFUNC },
918 { "imulS", eAX, Ev, NOFUNC },
919 { "divS", eAX, Ev, NOFUNC },
920 { "idivS", eAX, Ev, NOFUNC },
921 },
922 /* GRP4 */
923 {
924 { "incb", Eb, NOFUNC, NOFUNC },
925 { "decb", Eb, NOFUNC, NOFUNC },
926 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
927 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
928 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
929 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
930 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
931 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
932 },
933 /* GRP5 */
934 {
935 { "incS", Ev, NOFUNC, NOFUNC },
936 { "decS", Ev, NOFUNC, NOFUNC },
937 { "call", indirEv, NOFUNC, NOFUNC },
938 { "lcall", indirEv, NOFUNC, NOFUNC },
939 { "jmp", indirEv, NOFUNC, NOFUNC },
940 { "ljmp", indirEv, NOFUNC, NOFUNC },
941 { "pushS", Ev, NOFUNC, NOFUNC },
942 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
943 },
944 /* GRP6 */
945 {
946 { "sldt", Ew, NOFUNC, NOFUNC },
947 { "str", Ew, NOFUNC, NOFUNC },
948 { "lldt", Ew, NOFUNC, NOFUNC },
949 { "ltr", Ew, NOFUNC, NOFUNC },
950 { "verr", Ew, NOFUNC, NOFUNC },
951 { "verw", Ew, NOFUNC, NOFUNC },
952 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
953 { "(bad)", NOFUNC, NOFUNC, NOFUNC }
954 },
955 /* GRP7 */
956 {
957 { "sgdt", Ew, NOFUNC, NOFUNC },
958 { "sidt", Ew, NOFUNC, NOFUNC },
959 { "lgdt", Ew, NOFUNC, NOFUNC },
960 { "lidt", Ew, NOFUNC, NOFUNC },
961 { "smsw", Ew, NOFUNC, NOFUNC },
962 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
963 { "lmsw", Ew, NOFUNC, NOFUNC },
964 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
965 },
966 /* GRP8 */
967 {
968 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
969 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
970 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
971 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
972 { "btS", Ev, Ib, NOFUNC },
973 { "btsS", Ev, Ib, NOFUNC },
974 { "btrS", Ev, Ib, NOFUNC },
975 { "btcS", Ev, Ib, NOFUNC },
976 }
977 };
978
979 #define PREFIX_REPZ 0x01
980 #define PREFIX_REPNZ 0x02
981 #define PREFIX_LOCK 0x04
982 #define PREFIX_CS 0x08
983 #define PREFIX_SS 0x10
984 #define PREFIX_DS 0x20
985 #define PREFIX_ES 0x40
986 #define PREFIX_FS 0x80
987 #define PREFIX_GS 0x100
988 #define PREFIX_DATA 0x200
989 #define PREFIX_ADR 0x400
990 #define PREFIX_FWAIT 0x800
991
992 static int prefixes;
993
994 static void
995 ckprefix(void)
996 {
997 prefixes = 0;
998 while (1)
999 {
1000 switch (*codep)
1001 {
1002 case 0xf3:
1003 prefixes |= PREFIX_REPZ;
1004 break;
1005 case 0xf2:
1006 prefixes |= PREFIX_REPNZ;
1007 break;
1008 case 0xf0:
1009 prefixes |= PREFIX_LOCK;
1010 break;
1011 case 0x2e:
1012 prefixes |= PREFIX_CS;
1013 break;
1014 case 0x36:
1015 prefixes |= PREFIX_SS;
1016 break;
1017 case 0x3e:
1018 prefixes |= PREFIX_DS;
1019 break;
1020 case 0x26:
1021 prefixes |= PREFIX_ES;
1022 break;
1023 case 0x64:
1024 prefixes |= PREFIX_FS;
1025 break;
1026 case 0x65:
1027 prefixes |= PREFIX_GS;
1028 break;
1029 case 0x66:
1030 prefixes |= PREFIX_DATA;
1031 break;
1032 case 0x67:
1033 prefixes |= PREFIX_ADR;
1034 break;
1035 case 0x9b:
1036 prefixes |= PREFIX_FWAIT;
1037 break;
1038 default:
1039 return;
1040 }
1041 codep++;
1042 }
1043 }
1044
1045 static int dflag;
1046 static int aflag;
1047
1048 static char op1out[100], op2out[100], op3out[100];
1049 static unsigned long start_pc;
1050
1051 /*
1052 * disassemble the first instruction in 'inbuf'. You have to make
1053 * sure all of the bytes of the instruction are filled in.
1054 * On the 386's of 1988, the maximum length of an instruction is 15 bytes.
1055 * (see topic "Redundant prefixes" in the "Differences from 8086"
1056 * section of the "Virtual 8086 Mode" chapter.)
1057 * 'pc' should be the address of this instruction, it will
1058 * be used to print the target address if this is a relative jump or call
1059 * 'outbuf' gets filled in with the disassembled instruction. it should
1060 * be long enough to hold the longest disassembled instruction.
1061 * 100 bytes is certainly enough, unless symbol printing is added later
1062 * The function returns the length of this instruction in bytes.
1063 */
1064 int
1065 i386dis (unsigned short ucs, unsigned short uip, unsigned char *inbuf,
1066 char *outbuf, int mode)
1067 {
1068 struct dis386 *dp;
1069 int i;
1070 int enter_instruction;
1071 char *first, *second, *third;
1072 int needcomma;
1073
1074 obuf[0] = 0;
1075 op1out[0] = 0;
1076 op2out[0] = 0;
1077 op3out[0] = 0;
1078
1079 start_pc = ucs << 16 | uip;
1080 start_codep = inbuf;
1081 codep = inbuf;
1082
1083 ckprefix ();
1084
1085 if (*codep == 0xc8)
1086 enter_instruction = 1;
1087 else
1088 enter_instruction = 0;
1089
1090 obufp = obuf;
1091
1092 if (prefixes & PREFIX_REPZ)
1093 oappend ("repz ");
1094 if (prefixes & PREFIX_REPNZ)
1095 oappend ("repnz ");
1096 if (prefixes & PREFIX_LOCK)
1097 oappend ("lock ");
1098
1099 if ((prefixes & PREFIX_FWAIT)
1100 && ((*codep < 0xd8) || (*codep > 0xdf)))
1101 {
1102 /* fwait not followed by floating point instruction */
1103 oappend ("fwait");
1104 strcpy (outbuf, obuf);
1105 return (1);
1106 }
1107
1108 /* these would be initialized to 0 if disassembling for 8086 or 286 */
1109 if (mode) {
1110 dflag = 1;
1111 aflag = 1;
1112 } else {
1113 dflag = 0;
1114 aflag = 0;
1115 }
1116
1117 if (prefixes & PREFIX_DATA)
1118 dflag ^= 1;
1119
1120 if (prefixes & PREFIX_ADR)
1121 {
1122 aflag ^= 1;
1123 oappend ("addr16 ");
1124 }
1125
1126 if (*codep == 0x0f)
1127 dp = &dis386_twobyte[*++codep];
1128 else
1129 dp = &dis386[*codep];
1130 codep++;
1131 mod = (*codep >> 6) & 3;
1132 reg = (*codep >> 3) & 7;
1133 rm = *codep & 7;
1134
1135 if (dp->name == NULL && dp->bytemode1 == FLOATCODE)
1136 {
1137 dofloat ();
1138 }
1139 else
1140 {
1141 if (dp->name == NULL)
1142 dp = &grps[dp->bytemode1][reg];
1143
1144 putop (dp->name);
1145
1146 obufp = op1out;
1147 if (dp->op1)
1148 (*dp->op1)(dp->bytemode1);
1149
1150 obufp = op2out;
1151 if (dp->op2)
1152 (*dp->op2)(dp->bytemode2);
1153
1154 obufp = op3out;
1155 if (dp->op3)
1156 (*dp->op3)(dp->bytemode3);
1157 }
1158
1159 obufp = obuf + strlen (obuf);
1160 for (i = strlen (obuf); i < 6; i++)
1161 oappend (" ");
1162 oappend (" ");
1163
1164 /* enter instruction is printed with operands in the
1165 * same order as the intel book; everything else
1166 * is printed in reverse order
1167 */
1168 if (enter_instruction)
1169 {
1170 first = op1out;
1171 second = op2out;
1172 third = op3out;
1173 }
1174 else
1175 {
1176 first = op3out;
1177 second = op2out;
1178 third = op1out;
1179 }
1180 needcomma = 0;
1181 if (*first)
1182 {
1183 oappend (first);
1184 needcomma = 1;
1185 }
1186 if (*second)
1187 {
1188 if (needcomma)
1189 oappend (",");
1190 oappend (second);
1191 needcomma = 1;
1192 }
1193 if (*third)
1194 {
1195 if (needcomma)
1196 oappend (",");
1197 oappend (third);
1198 }
1199 strcpy (outbuf, obuf);
1200 return (codep - inbuf);
1201 }
1202
1203 const char *float_mem[] = {
1204 /* d8 */
1205 "fadds",
1206 "fmuls",
1207 "fcoms",
1208 "fcomps",
1209 "fsubs",
1210 "fsubrs",
1211 "fdivs",
1212 "fdivrs",
1213 /* d9 */
1214 "flds",
1215 "(bad)",
1216 "fsts",
1217 "fstps",
1218 "fldenv",
1219 "fldcw",
1220 "fNstenv",
1221 "fNstcw",
1222 /* da */
1223 "fiaddl",
1224 "fimull",
1225 "ficoml",
1226 "ficompl",
1227 "fisubl",
1228 "fisubrl",
1229 "fidivl",
1230 "fidivrl",
1231 /* db */
1232 "fildl",
1233 "(bad)",
1234 "fistl",
1235 "fistpl",
1236 "(bad)",
1237 "fldt",
1238 "(bad)",
1239 "fstpt",
1240 /* dc */
1241 "faddl",
1242 "fmull",
1243 "fcoml",
1244 "fcompl",
1245 "fsubl",
1246 "fsubrl",
1247 "fdivl",
1248 "fdivrl",
1249 /* dd */
1250 "fldl",
1251 "(bad)",
1252 "fstl",
1253 "fstpl",
1254 "frstor",
1255 "(bad)",
1256 "fNsave",
1257 "fNstsw",
1258 /* de */
1259 "fiadd",
1260 "fimul",
1261 "ficom",
1262 "ficomp",
1263 "fisub",
1264 "fisubr",
1265 "fidiv",
1266 "fidivr",
1267 /* df */
1268 "fild",
1269 "(bad)",
1270 "fist",
1271 "fistp",
1272 "fbld",
1273 "fildll",
1274 "fbstp",
1275 "fistpll",
1276 };
1277
1278 #define ST OP_ST, 0
1279 #define STi OP_STi, 0
1280
1281 #define FGRPd9_2 NULL, NULL, 0, NOFUNC, NOFUNC
1282 #define FGRPd9_4 NULL, NULL, 1, NOFUNC, NOFUNC
1283 #define FGRPd9_5 NULL, NULL, 2, NOFUNC, NOFUNC
1284 #define FGRPd9_6 NULL, NULL, 3, NOFUNC, NOFUNC
1285 #define FGRPd9_7 NULL, NULL, 4, NOFUNC, NOFUNC
1286 #define FGRPda_5 NULL, NULL, 5, NOFUNC, NOFUNC
1287 #define FGRPdb_4 NULL, NULL, 6, NOFUNC, NOFUNC
1288 #define FGRPde_3 NULL, NULL, 7, NOFUNC, NOFUNC
1289 #define FGRPdf_4 NULL, NULL, 8, NOFUNC, NOFUNC
1290
1291 struct dis386 float_reg[][8] = {
1292 /* d8 */
1293 {
1294 { "fadd", ST, STi, NOFUNC },
1295 { "fmul", ST, STi, NOFUNC },
1296 { "fcom", STi, NOFUNC, NOFUNC },
1297 { "fcomp", STi, NOFUNC, NOFUNC },
1298 { "fsub", ST, STi, NOFUNC },
1299 { "fsubr", ST, STi, NOFUNC },
1300 { "fdiv", ST, STi, NOFUNC },
1301 { "fdivr", ST, STi, NOFUNC },
1302 },
1303 /* d9 */
1304 {
1305 { "fld", STi, NOFUNC, NOFUNC },
1306 { "fxch", STi, NOFUNC, NOFUNC },
1307 { FGRPd9_2 },
1308 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1309 { FGRPd9_4 },
1310 { FGRPd9_5 },
1311 { FGRPd9_6 },
1312 { FGRPd9_7 },
1313 },
1314 /* da */
1315 {
1316 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1317 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1318 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1319 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1320 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1321 { FGRPda_5 },
1322 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1323 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1324 },
1325 /* db */
1326 {
1327 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1328 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1329 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1330 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1331 { FGRPdb_4 },
1332 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1333 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1334 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1335 },
1336 /* dc */
1337 {
1338 { "fadd", STi, ST, NOFUNC },
1339 { "fmul", STi, ST, NOFUNC },
1340 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1341 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1342 { "fsub", STi, ST, NOFUNC },
1343 { "fsubr", STi, ST, NOFUNC },
1344 { "fdiv", STi, ST, NOFUNC },
1345 { "fdivr", STi, ST, NOFUNC },
1346 },
1347 /* dd */
1348 {
1349 { "ffree", STi, NOFUNC, NOFUNC },
1350 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1351 { "fst", STi, NOFUNC, NOFUNC },
1352 { "fstp", STi, NOFUNC, NOFUNC },
1353 { "fucom", STi, NOFUNC, NOFUNC },
1354 { "fucomp", STi, NOFUNC, NOFUNC },
1355 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1356 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1357 },
1358 /* de */
1359 {
1360 { "faddp", STi, ST, NOFUNC },
1361 { "fmulp", STi, ST, NOFUNC },
1362 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1363 { FGRPde_3 },
1364 { "fsubp", STi, ST, NOFUNC },
1365 { "fsubrp", STi, ST, NOFUNC },
1366 { "fdivp", STi, ST, NOFUNC },
1367 { "fdivrp", STi, ST, NOFUNC },
1368 },
1369 /* df */
1370 {
1371 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1372 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1373 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1374 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1375 { FGRPdf_4 },
1376 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1377 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1378 { "(bad)", NOFUNC, NOFUNC, NOFUNC },
1379 },
1380 };
1381
1382
1383 const char *fgrps[][8] = {
1384 /* d9_2 0 */
1385 {
1386 "fnop","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
1387 },
1388
1389 /* d9_4 1 */
1390 {
1391 "fchs","fabs","(bad)","(bad)","ftst","fxam","(bad)","(bad)",
1392 },
1393
1394 /* d9_5 2 */
1395 {
1396 "fld1","fldl2t","fldl2e","fldpi","fldlg2","fldln2","fldz","(bad)",
1397 },
1398
1399 /* d9_6 3 */
1400 {
1401 "f2xm1","fyl2x","fptan","fpatan","fxtract","fprem1","fdecstp","fincstp",
1402 },
1403
1404 /* d9_7 4 */
1405 {
1406 "fprem","fyl2xp1","fsqrt","fsincos","frndint","fscale","fsin","fcos",
1407 },
1408
1409 /* da_5 5 */
1410 {
1411 "(bad)","fucompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
1412 },
1413
1414 /* db_4 6 */
1415 {
1416 "feni(287 only)","fdisi(287 only)","fNclex","fNinit",
1417 "fNsetpm(287 only)","(bad)","(bad)","(bad)",
1418 },
1419
1420 /* de_3 7 */
1421 {
1422 "(bad)","fcompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
1423 },
1424
1425 /* df_4 8 */
1426 {
1427 "fNstsw","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
1428 },
1429 };
1430
1431
1432 static void
1433 dofloat (void)
1434 {
1435 struct dis386 *dp;
1436 unsigned char floatop;
1437
1438 floatop = codep[-1];
1439
1440 if (mod != 3)
1441 {
1442 putop (float_mem[(floatop - 0xd8) * 8 + reg]);
1443 obufp = op1out;
1444 OP_E (v_mode);
1445 return;
1446 }
1447 codep++;
1448
1449 dp = &float_reg[floatop - 0xd8][reg];
1450 if (dp->name == NULL)
1451 {
1452 putop (fgrps[dp->bytemode1][rm]);
1453 /* instruction fnstsw is only one with strange arg */
1454 if (floatop == 0xdf && *codep == 0xe0)
1455 strcpy (op1out, "%eax");
1456 }
1457 else
1458 {
1459 putop (dp->name);
1460 obufp = op1out;
1461 if (dp->op1)
1462 (*dp->op1)(dp->bytemode1);
1463 obufp = op2out;
1464 if (dp->op2)
1465 (*dp->op2)(dp->bytemode2);
1466 }
1467 }
1468
1469 static void
1470 OP_ST(int dummy __unused)
1471 {
1472 oappend ("%st");
1473 }
1474
1475 static void
1476 OP_STi(int dummy __unused)
1477 {
1478 sprintf (scratchbuf, "%%st(%d)", rm);
1479 oappend (scratchbuf);
1480 }
1481
1482
1483 /* capital letters in template are macros */
1484 static void
1485 putop(const char *template)
1486 {
1487 const char *p;
1488
1489 for (p = template; *p; p++)
1490 {
1491 switch (*p)
1492 {
1493 default:
1494 *obufp++ = *p;
1495 break;
1496 case 'C': /* For jcxz/jecxz */
1497 if (aflag == 0)
1498 *obufp++ = 'e';
1499 break;
1500 case 'N':
1501 if ((prefixes & PREFIX_FWAIT) == 0)
1502 *obufp++ = 'n';
1503 break;
1504 case 'S':
1505 /* operand size flag */
1506 if (dflag)
1507 *obufp++ = 'l';
1508 else
1509 *obufp++ = 'w';
1510 break;
1511 }
1512 }
1513 *obufp = 0;
1514 }
1515
1516 static void
1517 oappend(const char *s)
1518 {
1519 strcpy (obufp, s);
1520 obufp += strlen (s);
1521 *obufp = 0;
1522 }
1523
1524 static void
1525 append_prefix(void)
1526 {
1527 if (prefixes & PREFIX_CS)
1528 oappend ("%cs:");
1529 if (prefixes & PREFIX_DS)
1530 oappend ("%ds:");
1531 if (prefixes & PREFIX_SS)
1532 oappend ("%ss:");
1533 if (prefixes & PREFIX_ES)
1534 oappend ("%es:");
1535 if (prefixes & PREFIX_FS)
1536 oappend ("%fs:");
1537 if (prefixes & PREFIX_GS)
1538 oappend ("%gs:");
1539 }
1540
1541 static void
1542 OP_indirE(int bytemode)
1543 {
1544 oappend ("*");
1545 OP_E (bytemode);
1546 }
1547
1548 static void
1549 OP_E(int bytemode)
1550 {
1551 int disp;
1552 int havesib;
1553 int base = 0;
1554 int idx = 0;
1555 int scale = 0;
1556 int havebase;
1557
1558 /* skip mod/rm byte */
1559 codep++;
1560
1561 havesib = 0;
1562 havebase = 0;
1563 disp = 0;
1564
1565 if (mod == 3) {
1566 switch (bytemode) {
1567 case b_mode:
1568 oappend (names8[rm]);
1569 break;
1570 case w_mode:
1571 oappend (names16[rm]);
1572 break;
1573 case v_mode:
1574 if (dflag)
1575 oappend (names32[rm]);
1576 else
1577 oappend (names16[rm]);
1578 break;
1579 default:
1580 oappend ("<bad dis table>");
1581 break;
1582 }
1583 return;
1584 }
1585
1586 append_prefix ();
1587
1588 if (aflag && rm == 4) {
1589 havesib = 1;
1590 havebase = 1;
1591 scale = (*codep >> 6) & 3;
1592 idx = (*codep >> 3) & 7;
1593 base = *codep & 7;
1594 codep++;
1595 }
1596
1597 switch (mod) {
1598 case 0:
1599 if (aflag) {
1600 switch (rm) {
1601 case 4:
1602 /* implies havesib and havebase */
1603 if (base == 5) {
1604 havebase = 0;
1605 disp = get32 ();
1606 }
1607 break;
1608 case 5:
1609 disp = get32 ();
1610 break;
1611 default:
1612 havebase = 1;
1613 base = rm;
1614 break;
1615 }
1616 } else {
1617 if (rm == 6) {
1618 havebase = 0;
1619 disp = get16 ();
1620 } else {
1621 havebase = 1;
1622 base = rm;
1623 }
1624 }
1625 break;
1626 case 1:
1627 disp = *(char *)codep++;
1628 if (!aflag || rm != 4) {
1629 havebase = 1;
1630 base = rm;
1631 }
1632 break;
1633 case 2:
1634 if (aflag)
1635 disp = get32 ();
1636 else
1637 disp = get16 ();
1638 if (!aflag || rm != 4) {
1639 havebase = 1;
1640 base = rm;
1641 }
1642 break;
1643 }
1644
1645 if (mod != 0 || ((aflag && rm == 5) || (havesib && base == 5))
1646 || (!aflag && rm == 6)) {
1647 sprintf (scratchbuf, "0x%x", disp);
1648 oappend (scratchbuf);
1649 }
1650
1651 if (havebase || havesib) {
1652 oappend ("(");
1653 if (havebase)
1654 oappend (aflag ? names32[base] : names16_pairs[base]);
1655 if (havesib) {
1656 if (idx != 4) {
1657 sprintf (scratchbuf, ",%s", names32[idx]);
1658 oappend (scratchbuf);
1659 }
1660 sprintf (scratchbuf, ",%d", 1 << scale);
1661 oappend (scratchbuf);
1662 }
1663 oappend (")");
1664 }
1665 }
1666
1667 static void
1668 OP_G(int bytemode)
1669 {
1670 switch (bytemode)
1671 {
1672 case b_mode:
1673 oappend (names8[reg]);
1674 break;
1675 case w_mode:
1676 oappend (names16[reg]);
1677 break;
1678 case d_mode:
1679 oappend (names32[reg]);
1680 break;
1681 case v_mode:
1682 if (dflag)
1683 oappend (names32[reg]);
1684 else
1685 oappend (names16[reg]);
1686 break;
1687 default:
1688 oappend ("<internal disassembler error>");
1689 break;
1690 }
1691 }
1692
1693 static int
1694 get32(void)
1695 {
1696 int x = 0;
1697
1698 x = *codep++ & 0xff;
1699 x |= (*codep++ & 0xff) << 8;
1700 x |= (*codep++ & 0xff) << 16;
1701 x |= (*codep++ & 0xff) << 24;
1702 return (x);
1703 }
1704
1705 static int
1706 get16(void)
1707 {
1708 int x = 0;
1709
1710 x = *codep++ & 0xff;
1711 x |= (*codep++ & 0xff) << 8;
1712 return (x);
1713 }
1714
1715 static void
1716 OP_REG(int code)
1717 {
1718 const char *s;
1719
1720 switch (code)
1721 {
1722 case indir_dx_reg: s = "(%dx)"; break;
1723 case ax_reg: case cx_reg: case dx_reg: case bx_reg:
1724 case sp_reg: case bp_reg: case si_reg: case di_reg:
1725 s = names16[code - ax_reg];
1726 break;
1727 case es_reg: case ss_reg: case cs_reg:
1728 case ds_reg: case fs_reg: case gs_reg:
1729 s = names_seg[code - es_reg];
1730 break;
1731 case al_reg: case ah_reg: case cl_reg: case ch_reg:
1732 case dl_reg: case dh_reg: case bl_reg: case bh_reg:
1733 s = names8[code - al_reg];
1734 break;
1735 case eAX_reg: case eCX_reg: case eDX_reg: case eBX_reg:
1736 case eSP_reg: case eBP_reg: case eSI_reg: case eDI_reg:
1737 if (dflag)
1738 s = names32[code - eAX_reg];
1739 else
1740 s = names16[code - eAX_reg];
1741 break;
1742 default:
1743 s = "<internal disassembler error>";
1744 break;
1745 }
1746 oappend (s);
1747 }
1748
1749 static void
1750 OP_I(int bytemode)
1751 {
1752 int op;
1753
1754 switch (bytemode)
1755 {
1756 case b_mode:
1757 op = *codep++ & 0xff;
1758 break;
1759 case v_mode:
1760 if (dflag)
1761 op = get32 ();
1762 else
1763 op = get16 ();
1764 break;
1765 case w_mode:
1766 op = get16 ();
1767 break;
1768 default:
1769 oappend ("<internal disassembler error>");
1770 return;
1771 }
1772 sprintf (scratchbuf, "$0x%x", op);
1773 oappend (scratchbuf);
1774 }
1775
1776 static void
1777 OP_sI(int bytemode)
1778 {
1779 int op;
1780
1781 switch (bytemode)
1782 {
1783 case b_mode:
1784 op = *(char *)codep++;
1785 break;
1786 case v_mode:
1787 if (dflag)
1788 op = get32 ();
1789 else
1790 op = (short)get16();
1791 break;
1792 case w_mode:
1793 op = (short)get16 ();
1794 break;
1795 default:
1796 oappend ("<internal disassembler error>");
1797 return;
1798 }
1799 sprintf (scratchbuf, "$0x%x", op);
1800 oappend (scratchbuf);
1801 }
1802
1803 static void
1804 OP_J(int bytemode)
1805 {
1806 int disp;
1807
1808 switch (bytemode)
1809 {
1810 case b_mode:
1811 disp = *(char *)codep++;
1812 append_pc(start_pc + codep - start_codep + disp);
1813 break;
1814 case v_mode:
1815 if (dflag) {
1816 disp = get32 ();
1817 append_pc(start_pc + codep - start_codep + disp);
1818 } else {
1819 disp = (short)get16 ();
1820 disp = (((start_pc + codep - start_codep) & 0xffff) + disp) & 0xffff;
1821 append_pc((start_pc & 0xffff0000) | disp);
1822 }
1823 break;
1824 default:
1825 oappend ("<internal disassembelr error>");
1826 return;
1827 }
1828
1829 oappend (scratchbuf);
1830 }
1831
1832 static void
1833 append_pc(unsigned long pc)
1834 {
1835 sprintf(scratchbuf, "%04lx:%04lx", pc >> 16, pc & 0xffff);
1836 }
1837
1838 static void
1839 OP_SEG(int dummy __unused)
1840 {
1841 static const char *sreg[] = {
1842 "%es","%cs","%ss","%ds","%fs","%gs","%?","%?",
1843 };
1844
1845 oappend (sreg[reg]);
1846 }
1847
1848 static void
1849 OP_DIR(int size)
1850 {
1851 int seg, offset;
1852
1853 switch (size)
1854 {
1855 case lptr:
1856 if (dflag)
1857 {
1858 offset = get32 ();
1859 seg = get16 ();
1860 }
1861 else
1862 {
1863 offset = get16 ();
1864 seg = get16 ();
1865 }
1866 sprintf (scratchbuf, "%04x:%04x", seg, offset);
1867 oappend (scratchbuf);
1868 break;
1869 case v_mode:
1870 if (aflag)
1871 offset = get32 ();
1872 else
1873 offset = (short)get16 ();
1874
1875 append_pc(start_pc + codep - start_codep + offset);
1876 oappend (scratchbuf);
1877 break;
1878 default:
1879 oappend ("<internal disassembler error>");
1880 break;
1881 }
1882 }
1883
1884 static void
1885 OP_OFF(int dummy __unused)
1886 {
1887 int off;
1888
1889 if (aflag)
1890 off = get32 ();
1891 else
1892 off = get16 ();
1893
1894 sprintf (scratchbuf, "0x%x", off);
1895 oappend (scratchbuf);
1896 }
1897
1898 static void
1899 OP_ESDI(int dummy __unused)
1900 {
1901 oappend ("%es:(");
1902 oappend (aflag ? "%edi" : "%di");
1903 oappend (")");
1904 }
1905
1906 static void
1907 OP_DSSI(int dummy __unused)
1908 {
1909 oappend ("%ds:(");
1910 oappend (aflag ? "%esi" : "%si");
1911 oappend (")");
1912 }
1913
1914 static void
1915 OP_C(int dummy __unused)
1916 {
1917 codep++; /* skip mod/rm */
1918 sprintf (scratchbuf, "%%cr%d", reg);
1919 oappend (scratchbuf);
1920 }
1921
1922 static void
1923 OP_D(int dummy __unused)
1924 {
1925 codep++; /* skip mod/rm */
1926 sprintf (scratchbuf, "%%db%d", reg);
1927 oappend (scratchbuf);
1928 }
1929
1930 static void
1931 OP_T(int dummy __unused)
1932 {
1933 codep++; /* skip mod/rm */
1934 sprintf (scratchbuf, "%%tr%d", reg);
1935 oappend (scratchbuf);
1936 }
1937
1938 static void
1939 OP_rm(int bytemode)
1940 {
1941 switch (bytemode)
1942 {
1943 case d_mode:
1944 oappend (names32[rm]);
1945 break;
1946 case w_mode:
1947 oappend (names16[rm]);
1948 break;
1949 }
1950 }
1951
1952 #else
1953
1954 i386dis (int pc, unsigned char *inbuf, char outbuf, int mode)
1955 {
1956 strcpy (outbuf, "(no disassembler)");
1957 return (1);
1958 }
1959
1960 #endif /* DISASSEMBLER */
DragonFly BSD