?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add GNU Free Documentation License
[binutils.git] / opcodes / i386-dis.c
bloba75d6e316c3b2cdc5a3c7725f5c5b577917f03ab
1 /* Print i386 instructions for GDB, the GNU debugger.
2 Copyright (C) 1988, 89, 91, 93, 94, 95, 96, 97, 98, 1999
3 Free Software Foundation, Inc.
4
5 This file is part of GDB.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20
21 /*
22 * 80386 instruction printer by Pace Willisson (pace@prep.ai.mit.edu)
23 * July 1988
24 * modified by John Hassey (hassey@dg-rtp.dg.com)
25 */
26
27 /*
28 * The main tables describing the instructions is essentially a copy
29 * of the "Opcode Map" chapter (Appendix A) of the Intel 80386
30 * Programmers Manual. Usually, there is a capital letter, followed
31 * by a small letter. The capital letter tell the addressing mode,
32 * and the small letter tells about the operand size. Refer to
33 * the Intel manual for details.
34 */
35
36 #include "dis-asm.h"
37 #include "sysdep.h"
38 #include "opintl.h"
39
40 #define MAXLEN 20
41
42 #include <setjmp.h>
43
44 #ifndef UNIXWARE_COMPAT
45 /* Set non-zero for broken, compatible instructions. Set to zero for
46 non-broken opcodes. */
47 #define UNIXWARE_COMPAT 1
48 #endif
49
50 static int fetch_data PARAMS ((struct disassemble_info *, bfd_byte *));
51
52 struct dis_private
53 {
54 /* Points to first byte not fetched. */
55 bfd_byte *max_fetched;
56 bfd_byte the_buffer[MAXLEN];
57 bfd_vma insn_start;
58 jmp_buf bailout;
59 };
60
61 /* The opcode for the fwait instruction, which we treat as a prefix
62 when we can. */
63 #define FWAIT_OPCODE (0x9b)
64
65 /* Flags for the prefixes for the current instruction. See below. */
66 static int prefixes;
67
68 /* Flags for prefixes which we somehow handled when printing the
69 current instruction. */
70 static int used_prefixes;
71
72 /* Flags stored in PREFIXES. */
73 #define PREFIX_REPZ 1
74 #define PREFIX_REPNZ 2
75 #define PREFIX_LOCK 4
76 #define PREFIX_CS 8
77 #define PREFIX_SS 0x10
78 #define PREFIX_DS 0x20
79 #define PREFIX_ES 0x40
80 #define PREFIX_FS 0x80
81 #define PREFIX_GS 0x100
82 #define PREFIX_DATA 0x200
83 #define PREFIX_ADDR 0x400
84 #define PREFIX_FWAIT 0x800
85
86 /* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive)
87 to ADDR (exclusive) are valid. Returns 1 for success, longjmps
88 on error. */
89 #define FETCH_DATA(info, addr) \
90 ((addr) <= ((struct dis_private *)(info->private_data))->max_fetched \
91 ? 1 : fetch_data ((info), (addr)))
92
93 static int
94 fetch_data (info, addr)
95 struct disassemble_info *info;
96 bfd_byte *addr;
97 {
98 int status;
99 struct dis_private *priv = (struct dis_private *)info->private_data;
100 bfd_vma start = priv->insn_start + (priv->max_fetched - priv->the_buffer);
101
102 status = (*info->read_memory_func) (start,
103 priv->max_fetched,
104 addr - priv->max_fetched,
105 info);
106 if (status != 0)
107 {
108 /* If we did manage to read at least one byte, then
109 print_insn_i386 will do something sensible. Otherwise, print
110 an error. We do that here because this is where we know
111 STATUS. */
112 if (priv->max_fetched == priv->the_buffer)
113 (*info->memory_error_func) (status, start, info);
114 longjmp (priv->bailout, 1);
115 }
116 else
117 priv->max_fetched = addr;
118 return 1;
119 }
120
121 #define XX NULL, 0
122
123 #define Eb OP_E, b_mode
124 #define indirEb OP_indirE, b_mode
125 #define Gb OP_G, b_mode
126 #define Ev OP_E, v_mode
127 #define Ed OP_E, d_mode
128 #define indirEv OP_indirE, v_mode
129 #define Ew OP_E, w_mode
130 #define Ma OP_E, v_mode
131 #define M OP_E, 0 /* lea */
132 #define Mp OP_E, 0 /* 32 or 48 bit memory operand for LDS, LES etc */
133 #define Gv OP_G, v_mode
134 #define Gw OP_G, w_mode
135 #define Rd OP_Rd, d_mode
136 #define Ib OP_I, b_mode
137 #define sIb OP_sI, b_mode /* sign extened byte */
138 #define Iv OP_I, v_mode
139 #define Iw OP_I, w_mode
140 #define Jb OP_J, b_mode
141 #define Jv OP_J, v_mode
142 #define Cd OP_C, d_mode
143 #define Dd OP_D, d_mode
144 #define Td OP_T, d_mode
145
146 #define eAX OP_REG, eAX_reg
147 #define eBX OP_REG, eBX_reg
148 #define eCX OP_REG, eCX_reg
149 #define eDX OP_REG, eDX_reg
150 #define eSP OP_REG, eSP_reg
151 #define eBP OP_REG, eBP_reg
152 #define eSI OP_REG, eSI_reg
153 #define eDI OP_REG, eDI_reg
154 #define AL OP_REG, al_reg
155 #define CL OP_REG, cl_reg
156 #define DL OP_REG, dl_reg
157 #define BL OP_REG, bl_reg
158 #define AH OP_REG, ah_reg
159 #define CH OP_REG, ch_reg
160 #define DH OP_REG, dh_reg
161 #define BH OP_REG, bh_reg
162 #define AX OP_REG, ax_reg
163 #define DX OP_REG, dx_reg
164 #define indirDX OP_REG, indir_dx_reg
165
166 #define Sw OP_SEG, w_mode
167 #define Ap OP_DIR, 0
168 #define Ob OP_OFF, b_mode
169 #define Ov OP_OFF, v_mode
170 #define Xb OP_DSreg, eSI_reg
171 #define Xv OP_DSreg, eSI_reg
172 #define Yb OP_ESreg, eDI_reg
173 #define Yv OP_ESreg, eDI_reg
174 #define DSBX OP_DSreg, eBX_reg
175
176 #define es OP_REG, es_reg
177 #define ss OP_REG, ss_reg
178 #define cs OP_REG, cs_reg
179 #define ds OP_REG, ds_reg
180 #define fs OP_REG, fs_reg
181 #define gs OP_REG, gs_reg
182
183 #define MX OP_MMX, 0
184 #define XM OP_XMM, 0
185 #define EM OP_EM, v_mode
186 #define EX OP_EX, v_mode
187 #define MS OP_MS, v_mode
188 #define None OP_E, 0
189 #define OPSUF OP_3DNowSuffix, 0
190 #define OPSIMD OP_SIMD_Suffix, 0
191
192 /* bits in sizeflag */
193 #if 0 /* leave undefined until someone adds the extra flag to objdump */
194 #define SUFFIX_ALWAYS 4
195 #endif
196 #define AFLAG 2
197 #define DFLAG 1
198
199 typedef void (*op_rtn) PARAMS ((int bytemode, int sizeflag));
200
201 static void OP_E PARAMS ((int, int));
202 static void OP_G PARAMS ((int, int));
203 static void OP_I PARAMS ((int, int));
204 static void OP_indirE PARAMS ((int, int));
205 static void OP_sI PARAMS ((int, int));
206 static void OP_REG PARAMS ((int, int));
207 static void OP_J PARAMS ((int, int));
208 static void OP_DIR PARAMS ((int, int));
209 static void OP_OFF PARAMS ((int, int));
210 static void OP_ESreg PARAMS ((int, int));
211 static void OP_DSreg PARAMS ((int, int));
212 static void OP_SEG PARAMS ((int, int));
213 static void OP_C PARAMS ((int, int));
214 static void OP_D PARAMS ((int, int));
215 static void OP_T PARAMS ((int, int));
216 static void OP_Rd PARAMS ((int, int));
217 static void OP_ST PARAMS ((int, int));
218 static void OP_STi PARAMS ((int, int));
219 static void OP_MMX PARAMS ((int, int));
220 static void OP_XMM PARAMS ((int, int));
221 static void OP_EM PARAMS ((int, int));
222 static void OP_EX PARAMS ((int, int));
223 static void OP_MS PARAMS ((int, int));
224 static void OP_3DNowSuffix PARAMS ((int, int));
225 static void OP_SIMD_Suffix PARAMS ((int, int));
226 static void SIMD_Fixup PARAMS ((int, int));
227
228 static void append_seg PARAMS ((void));
229 static void set_op PARAMS ((unsigned int op));
230 static void putop PARAMS ((const char *template, int sizeflag));
231 static void dofloat PARAMS ((int sizeflag));
232 static int get16 PARAMS ((void));
233 static int get32 PARAMS ((void));
234 static void ckprefix PARAMS ((void));
235 static const char *prefix_name PARAMS ((int, int));
236 static void ptr_reg PARAMS ((int, int));
237 static void BadOp PARAMS ((void));
238
239 #define b_mode 1
240 #define v_mode 2
241 #define w_mode 3
242 #define d_mode 4
243 #define x_mode 5
244
245 #define es_reg 100
246 #define cs_reg 101
247 #define ss_reg 102
248 #define ds_reg 103
249 #define fs_reg 104
250 #define gs_reg 105
251
252 #define eAX_reg 108
253 #define eCX_reg 109
254 #define eDX_reg 110
255 #define eBX_reg 111
256 #define eSP_reg 112
257 #define eBP_reg 113
258 #define eSI_reg 114
259 #define eDI_reg 115
260
261 #define al_reg 116
262 #define cl_reg 117
263 #define dl_reg 118
264 #define bl_reg 119
265 #define ah_reg 120
266 #define ch_reg 121
267 #define dh_reg 122
268 #define bh_reg 123
269
270 #define ax_reg 124
271 #define cx_reg 125
272 #define dx_reg 126
273 #define bx_reg 127
274 #define sp_reg 128
275 #define bp_reg 129
276 #define si_reg 130
277 #define di_reg 131
278
279 #define indir_dx_reg 150
280
281 #define USE_GROUPS 1
282 #define USE_PREFIX_USER_TABLE 2
283
284 #define GRP1b NULL, NULL, 0, NULL, USE_GROUPS, NULL, 0
285 #define GRP1S NULL, NULL, 1, NULL, USE_GROUPS, NULL, 0
286 #define GRP1Ss NULL, NULL, 2, NULL, USE_GROUPS, NULL, 0
287 #define GRP2b NULL, NULL, 3, NULL, USE_GROUPS, NULL, 0
288 #define GRP2S NULL, NULL, 4, NULL, USE_GROUPS, NULL, 0
289 #define GRP2b_one NULL, NULL, 5, NULL, USE_GROUPS, NULL, 0
290 #define GRP2S_one NULL, NULL, 6, NULL, USE_GROUPS, NULL, 0
291 #define GRP2b_cl NULL, NULL, 7, NULL, USE_GROUPS, NULL, 0
292 #define GRP2S_cl NULL, NULL, 8, NULL, USE_GROUPS, NULL, 0
293 #define GRP3b NULL, NULL, 9, NULL, USE_GROUPS, NULL, 0
294 #define GRP3S NULL, NULL, 10, NULL, USE_GROUPS, NULL, 0
295 #define GRP4 NULL, NULL, 11, NULL, USE_GROUPS, NULL, 0
296 #define GRP5 NULL, NULL, 12, NULL, USE_GROUPS, NULL, 0
297 #define GRP6 NULL, NULL, 13, NULL, USE_GROUPS, NULL, 0
298 #define GRP7 NULL, NULL, 14, NULL, USE_GROUPS, NULL, 0
299 #define GRP8 NULL, NULL, 15, NULL, USE_GROUPS, NULL, 0
300 #define GRP9 NULL, NULL, 16, NULL, USE_GROUPS, NULL, 0
301 #define GRP10 NULL, NULL, 17, NULL, USE_GROUPS, NULL, 0
302 #define GRP11 NULL, NULL, 18, NULL, USE_GROUPS, NULL, 0
303 #define GRP12 NULL, NULL, 19, NULL, USE_GROUPS, NULL, 0
304 #define GRP13 NULL, NULL, 20, NULL, USE_GROUPS, NULL, 0
305 #define GRP14 NULL, NULL, 21, NULL, USE_GROUPS, NULL, 0
306 #define GRPAMD NULL, NULL, 22, NULL, USE_GROUPS, NULL, 0
307
308 #define PREGRP0 NULL, NULL, 0, NULL, USE_PREFIX_USER_TABLE, NULL, 0
309 #define PREGRP1 NULL, NULL, 1, NULL, USE_PREFIX_USER_TABLE, NULL, 0
310 #define PREGRP2 NULL, NULL, 2, NULL, USE_PREFIX_USER_TABLE, NULL, 0
311 #define PREGRP3 NULL, NULL, 3, NULL, USE_PREFIX_USER_TABLE, NULL, 0
312 #define PREGRP4 NULL, NULL, 4, NULL, USE_PREFIX_USER_TABLE, NULL, 0
313 #define PREGRP5 NULL, NULL, 5, NULL, USE_PREFIX_USER_TABLE, NULL, 0
314 #define PREGRP6 NULL, NULL, 6, NULL, USE_PREFIX_USER_TABLE, NULL, 0
315 #define PREGRP7 NULL, NULL, 7, NULL, USE_PREFIX_USER_TABLE, NULL, 0
316 #define PREGRP8 NULL, NULL, 8, NULL, USE_PREFIX_USER_TABLE, NULL, 0
317 #define PREGRP9 NULL, NULL, 9, NULL, USE_PREFIX_USER_TABLE, NULL, 0
318 #define PREGRP10 NULL, NULL, 10, NULL, USE_PREFIX_USER_TABLE, NULL, 0
319 #define PREGRP11 NULL, NULL, 11, NULL, USE_PREFIX_USER_TABLE, NULL, 0
320 #define PREGRP12 NULL, NULL, 12, NULL, USE_PREFIX_USER_TABLE, NULL, 0
321 #define PREGRP13 NULL, NULL, 13, NULL, USE_PREFIX_USER_TABLE, NULL, 0
322 #define PREGRP14 NULL, NULL, 14, NULL, USE_PREFIX_USER_TABLE, NULL, 0
323
324 #define FLOATCODE 50
325 #define FLOAT NULL, NULL, FLOATCODE, NULL, 0, NULL, 0
326
327 struct dis386 {
328 const char *name;
329 op_rtn op1;
330 int bytemode1;
331 op_rtn op2;
332 int bytemode2;
333 op_rtn op3;
334 int bytemode3;
335 };
336
337 /* Upper case letters in the instruction names here are macros.
338 'A' => print 'b' if no register operands or suffix_always is true
339 'B' => print 'b' if suffix_always is true
340 'E' => print 'e' if 32-bit form of jcxz
341 'L' => print 'l' if suffix_always is true
342 'N' => print 'n' if instruction has no wait "prefix"
343 'P' => print 'w' or 'l' if instruction has an operand size prefix,
344 or suffix_always is true
345 'Q' => print 'w' or 'l' if no register operands or suffix_always is true
346 'R' => print 'w' or 'l' ("wd" or "dq" in intel mode)
347 'S' => print 'w' or 'l' if suffix_always is true
348 'W' => print 'b' or 'w' ("w" or "de" in intel mode)
349 */
350
351 static const struct dis386 dis386_att[] = {
352 /* 00 */
353 { "addB", Eb, Gb, XX },
354 { "addS", Ev, Gv, XX },
355 { "addB", Gb, Eb, XX },
356 { "addS", Gv, Ev, XX },
357 { "addB", AL, Ib, XX },
358 { "addS", eAX, Iv, XX },
359 { "pushP", es, XX, XX },
360 { "popP", es, XX, XX },
361 /* 08 */
362 { "orB", Eb, Gb, XX },
363 { "orS", Ev, Gv, XX },
364 { "orB", Gb, Eb, XX },
365 { "orS", Gv, Ev, XX },
366 { "orB", AL, Ib, XX },
367 { "orS", eAX, Iv, XX },
368 { "pushP", cs, XX, XX },
369 { "(bad)", XX, XX, XX }, /* 0x0f extended opcode escape */
370 /* 10 */
371 { "adcB", Eb, Gb, XX },
372 { "adcS", Ev, Gv, XX },
373 { "adcB", Gb, Eb, XX },
374 { "adcS", Gv, Ev, XX },
375 { "adcB", AL, Ib, XX },
376 { "adcS", eAX, Iv, XX },
377 { "pushP", ss, XX, XX },
378 { "popP", ss, XX, XX },
379 /* 18 */
380 { "sbbB", Eb, Gb, XX },
381 { "sbbS", Ev, Gv, XX },
382 { "sbbB", Gb, Eb, XX },
383 { "sbbS", Gv, Ev, XX },
384 { "sbbB", AL, Ib, XX },
385 { "sbbS", eAX, Iv, XX },
386 { "pushP", ds, XX, XX },
387 { "popP", ds, XX, XX },
388 /* 20 */
389 { "andB", Eb, Gb, XX },
390 { "andS", Ev, Gv, XX },
391 { "andB", Gb, Eb, XX },
392 { "andS", Gv, Ev, XX },
393 { "andB", AL, Ib, XX },
394 { "andS", eAX, Iv, XX },
395 { "(bad)", XX, XX, XX }, /* SEG ES prefix */
396 { "daa", XX, XX, XX },
397 /* 28 */
398 { "subB", Eb, Gb, XX },
399 { "subS", Ev, Gv, XX },
400 { "subB", Gb, Eb, XX },
401 { "subS", Gv, Ev, XX },
402 { "subB", AL, Ib, XX },
403 { "subS", eAX, Iv, XX },
404 { "(bad)", XX, XX, XX }, /* SEG CS prefix */
405 { "das", XX, XX, XX },
406 /* 30 */
407 { "xorB", Eb, Gb, XX },
408 { "xorS", Ev, Gv, XX },
409 { "xorB", Gb, Eb, XX },
410 { "xorS", Gv, Ev, XX },
411 { "xorB", AL, Ib, XX },
412 { "xorS", eAX, Iv, XX },
413 { "(bad)", XX, XX, XX }, /* SEG SS prefix */
414 { "aaa", XX, XX, XX },
415 /* 38 */
416 { "cmpB", Eb, Gb, XX },
417 { "cmpS", Ev, Gv, XX },
418 { "cmpB", Gb, Eb, XX },
419 { "cmpS", Gv, Ev, XX },
420 { "cmpB", AL, Ib, XX },
421 { "cmpS", eAX, Iv, XX },
422 { "(bad)", XX, XX, XX }, /* SEG DS prefix */
423 { "aas", XX, XX, XX },
424 /* 40 */
425 { "incS", eAX, XX, XX },
426 { "incS", eCX, XX, XX },
427 { "incS", eDX, XX, XX },
428 { "incS", eBX, XX, XX },
429 { "incS", eSP, XX, XX },
430 { "incS", eBP, XX, XX },
431 { "incS", eSI, XX, XX },
432 { "incS", eDI, XX, XX },
433 /* 48 */
434 { "decS", eAX, XX, XX },
435 { "decS", eCX, XX, XX },
436 { "decS", eDX, XX, XX },
437 { "decS", eBX, XX, XX },
438 { "decS", eSP, XX, XX },
439 { "decS", eBP, XX, XX },
440 { "decS", eSI, XX, XX },
441 { "decS", eDI, XX, XX },
442 /* 50 */
443 { "pushS", eAX, XX, XX },
444 { "pushS", eCX, XX, XX },
445 { "pushS", eDX, XX, XX },
446 { "pushS", eBX, XX, XX },
447 { "pushS", eSP, XX, XX },
448 { "pushS", eBP, XX, XX },
449 { "pushS", eSI, XX, XX },
450 { "pushS", eDI, XX, XX },
451 /* 58 */
452 { "popS", eAX, XX, XX },
453 { "popS", eCX, XX, XX },
454 { "popS", eDX, XX, XX },
455 { "popS", eBX, XX, XX },
456 { "popS", eSP, XX, XX },
457 { "popS", eBP, XX, XX },
458 { "popS", eSI, XX, XX },
459 { "popS", eDI, XX, XX },
460 /* 60 */
461 { "pushaP", XX, XX, XX },
462 { "popaP", XX, XX, XX },
463 { "boundS", Gv, Ma, XX },
464 { "arpl", Ew, Gw, XX },
465 { "(bad)", XX, XX, XX }, /* seg fs */
466 { "(bad)", XX, XX, XX }, /* seg gs */
467 { "(bad)", XX, XX, XX }, /* op size prefix */
468 { "(bad)", XX, XX, XX }, /* adr size prefix */
469 /* 68 */
470 { "pushP", Iv, XX, XX }, /* 386 book wrong */
471 { "imulS", Gv, Ev, Iv },
472 { "pushP", sIb, XX, XX }, /* push of byte really pushes 2 or 4 bytes */
473 { "imulS", Gv, Ev, sIb },
474 { "insb", Yb, indirDX, XX },
475 { "insR", Yv, indirDX, XX },
476 { "outsb", indirDX, Xb, XX },
477 { "outsR", indirDX, Xv, XX },
478 /* 70 */
479 { "jo", Jb, XX, XX },
480 { "jno", Jb, XX, XX },
481 { "jb", Jb, XX, XX },
482 { "jae", Jb, XX, XX },
483 { "je", Jb, XX, XX },
484 { "jne", Jb, XX, XX },
485 { "jbe", Jb, XX, XX },
486 { "ja", Jb, XX, XX },
487 /* 78 */
488 { "js", Jb, XX, XX },
489 { "jns", Jb, XX, XX },
490 { "jp", Jb, XX, XX },
491 { "jnp", Jb, XX, XX },
492 { "jl", Jb, XX, XX },
493 { "jge", Jb, XX, XX },
494 { "jle", Jb, XX, XX },
495 { "jg", Jb, XX, XX },
496 /* 80 */
497 { GRP1b },
498 { GRP1S },
499 { "(bad)", XX, XX, XX },
500 { GRP1Ss },
501 { "testB", Eb, Gb, XX },
502 { "testS", Ev, Gv, XX },
503 { "xchgB", Eb, Gb, XX },
504 { "xchgS", Ev, Gv, XX },
505 /* 88 */
506 { "movB", Eb, Gb, XX },
507 { "movS", Ev, Gv, XX },
508 { "movB", Gb, Eb, XX },
509 { "movS", Gv, Ev, XX },
510 { "movQ", Ev, Sw, XX },
511 { "leaS", Gv, M, XX },
512 { "movQ", Sw, Ev, XX },
513 { "popQ", Ev, XX, XX },
514 /* 90 */
515 { "nop", XX, XX, XX },
516 { "xchgS", eCX, eAX, XX },
517 { "xchgS", eDX, eAX, XX },
518 { "xchgS", eBX, eAX, XX },
519 { "xchgS", eSP, eAX, XX },
520 { "xchgS", eBP, eAX, XX },
521 { "xchgS", eSI, eAX, XX },
522 { "xchgS", eDI, eAX, XX },
523 /* 98 */
524 { "cWtR", XX, XX, XX },
525 { "cRtd", XX, XX, XX },
526 { "lcallP", Ap, XX, XX },
527 { "(bad)", XX, XX, XX }, /* fwait */
528 { "pushfP", XX, XX, XX },
529 { "popfP", XX, XX, XX },
530 { "sahf", XX, XX, XX },
531 { "lahf", XX, XX, XX },
532 /* a0 */
533 { "movB", AL, Ob, XX },
534 { "movS", eAX, Ov, XX },
535 { "movB", Ob, AL, XX },
536 { "movS", Ov, eAX, XX },
537 { "movsb", Yb, Xb, XX },
538 { "movsR", Yv, Xv, XX },
539 { "cmpsb", Xb, Yb, XX },
540 { "cmpsR", Xv, Yv, XX },
541 /* a8 */
542 { "testB", AL, Ib, XX },
543 { "testS", eAX, Iv, XX },
544 { "stosB", Yb, AL, XX },
545 { "stosS", Yv, eAX, XX },
546 { "lodsB", AL, Xb, XX },
547 { "lodsS", eAX, Xv, XX },
548 { "scasB", AL, Yb, XX },
549 { "scasS", eAX, Yv, XX },
550 /* b0 */
551 { "movB", AL, Ib, XX },
552 { "movB", CL, Ib, XX },
553 { "movB", DL, Ib, XX },
554 { "movB", BL, Ib, XX },
555 { "movB", AH, Ib, XX },
556 { "movB", CH, Ib, XX },
557 { "movB", DH, Ib, XX },
558 { "movB", BH, Ib, XX },
559 /* b8 */
560 { "movS", eAX, Iv, XX },
561 { "movS", eCX, Iv, XX },
562 { "movS", eDX, Iv, XX },
563 { "movS", eBX, Iv, XX },
564 { "movS", eSP, Iv, XX },
565 { "movS", eBP, Iv, XX },
566 { "movS", eSI, Iv, XX },
567 { "movS", eDI, Iv, XX },
568 /* c0 */
569 { GRP2b },
570 { GRP2S },
571 { "retP", Iw, XX, XX },
572 { "retP", XX, XX, XX },
573 { "lesS", Gv, Mp, XX },
574 { "ldsS", Gv, Mp, XX },
575 { "movA", Eb, Ib, XX },
576 { "movQ", Ev, Iv, XX },
577 /* c8 */
578 { "enterP", Iw, Ib, XX },
579 { "leaveP", XX, XX, XX },
580 { "lretP", Iw, XX, XX },
581 { "lretP", XX, XX, XX },
582 { "int3", XX, XX, XX },
583 { "int", Ib, XX, XX },
584 { "into", XX, XX, XX},
585 { "iretP", XX, XX, XX },
586 /* d0 */
587 { GRP2b_one },
588 { GRP2S_one },
589 { GRP2b_cl },
590 { GRP2S_cl },
591 { "aam", sIb, XX, XX },
592 { "aad", sIb, XX, XX },
593 { "(bad)", XX, XX, XX },
594 { "xlat", DSBX, XX, XX },
595 /* d8 */
596 { FLOAT },
597 { FLOAT },
598 { FLOAT },
599 { FLOAT },
600 { FLOAT },
601 { FLOAT },
602 { FLOAT },
603 { FLOAT },
604 /* e0 */
605 { "loopne", Jb, XX, XX },
606 { "loope", Jb, XX, XX },
607 { "loop", Jb, XX, XX },
608 { "jEcxz", Jb, XX, XX },
609 { "inB", AL, Ib, XX },
610 { "inS", eAX, Ib, XX },
611 { "outB", Ib, AL, XX },
612 { "outS", Ib, eAX, XX },
613 /* e8 */
614 { "callP", Jv, XX, XX },
615 { "jmpP", Jv, XX, XX },
616 { "ljmpP", Ap, XX, XX },
617 { "jmp", Jb, XX, XX },
618 { "inB", AL, indirDX, XX },
619 { "inS", eAX, indirDX, XX },
620 { "outB", indirDX, AL, XX },
621 { "outS", indirDX, eAX, XX },
622 /* f0 */
623 { "(bad)", XX, XX, XX }, /* lock prefix */
624 { "(bad)", XX, XX, XX },
625 { "(bad)", XX, XX, XX }, /* repne */
626 { "(bad)", XX, XX, XX }, /* repz */
627 { "hlt", XX, XX, XX },
628 { "cmc", XX, XX, XX },
629 { GRP3b },
630 { GRP3S },
631 /* f8 */
632 { "clc", XX, XX, XX },
633 { "stc", XX, XX, XX },
634 { "cli", XX, XX, XX },
635 { "sti", XX, XX, XX },
636 { "cld", XX, XX, XX },
637 { "std", XX, XX, XX },
638 { GRP4 },
639 { GRP5 },
640 };
641
642 static const struct dis386 dis386_intel[] = {
643 /* 00 */
644 { "add", Eb, Gb, XX },
645 { "add", Ev, Gv, XX },
646 { "add", Gb, Eb, XX },
647 { "add", Gv, Ev, XX },
648 { "add", AL, Ib, XX },
649 { "add", eAX, Iv, XX },
650 { "push", es, XX, XX },
651 { "pop", es, XX, XX },
652 /* 08 */
653 { "or", Eb, Gb, XX },
654 { "or", Ev, Gv, XX },
655 { "or", Gb, Eb, XX },
656 { "or", Gv, Ev, XX },
657 { "or", AL, Ib, XX },
658 { "or", eAX, Iv, XX },
659 { "push", cs, XX, XX },
660 { "(bad)", XX, XX, XX }, /* 0x0f extended opcode escape */
661 /* 10 */
662 { "adc", Eb, Gb, XX },
663 { "adc", Ev, Gv, XX },
664 { "adc", Gb, Eb, XX },
665 { "adc", Gv, Ev, XX },
666 { "adc", AL, Ib, XX },
667 { "adc", eAX, Iv, XX },
668 { "push", ss, XX, XX },
669 { "pop", ss, XX, XX },
670 /* 18 */
671 { "sbb", Eb, Gb, XX },
672 { "sbb", Ev, Gv, XX },
673 { "sbb", Gb, Eb, XX },
674 { "sbb", Gv, Ev, XX },
675 { "sbb", AL, Ib, XX },
676 { "sbb", eAX, Iv, XX },
677 { "push", ds, XX, XX },
678 { "pop", ds, XX, XX },
679 /* 20 */
680 { "and", Eb, Gb, XX },
681 { "and", Ev, Gv, XX },
682 { "and", Gb, Eb, XX },
683 { "and", Gv, Ev, XX },
684 { "and", AL, Ib, XX },
685 { "and", eAX, Iv, XX },
686 { "(bad)", XX, XX, XX }, /* SEG ES prefix */
687 { "daa", XX, XX, XX },
688 /* 28 */
689 { "sub", Eb, Gb, XX },
690 { "sub", Ev, Gv, XX },
691 { "sub", Gb, Eb, XX },
692 { "sub", Gv, Ev, XX },
693 { "sub", AL, Ib, XX },
694 { "sub", eAX, Iv, XX },
695 { "(bad)", XX, XX, XX }, /* SEG CS prefix */
696 { "das", XX, XX, XX },
697 /* 30 */
698 { "xor", Eb, Gb, XX },
699 { "xor", Ev, Gv, XX },
700 { "xor", Gb, Eb, XX },
701 { "xor", Gv, Ev, XX },
702 { "xor", AL, Ib, XX },
703 { "xor", eAX, Iv, XX },
704 { "(bad)", XX, XX, XX }, /* SEG SS prefix */
705 { "aaa", XX, XX, XX },
706 /* 38 */
707 { "cmp", Eb, Gb, XX },
708 { "cmp", Ev, Gv, XX },
709 { "cmp", Gb, Eb, XX },
710 { "cmp", Gv, Ev, XX },
711 { "cmp", AL, Ib, XX },
712 { "cmp", eAX, Iv, XX },
713 { "(bad)", XX, XX, XX }, /* SEG DS prefix */
714 { "aas", XX, XX, XX },
715 /* 40 */
716 { "inc", eAX, XX, XX },
717 { "inc", eCX, XX, XX },
718 { "inc", eDX, XX, XX },
719 { "inc", eBX, XX, XX },
720 { "inc", eSP, XX, XX },
721 { "inc", eBP, XX, XX },
722 { "inc", eSI, XX, XX },
723 { "inc", eDI, XX, XX },
724 /* 48 */
725 { "dec", eAX, XX, XX },
726 { "dec", eCX, XX, XX },
727 { "dec", eDX, XX, XX },
728 { "dec", eBX, XX, XX },
729 { "dec", eSP, XX, XX },
730 { "dec", eBP, XX, XX },
731 { "dec", eSI, XX, XX },
732 { "dec", eDI, XX, XX },
733 /* 50 */
734 { "push", eAX, XX, XX },
735 { "push", eCX, XX, XX },
736 { "push", eDX, XX, XX },
737 { "push", eBX, XX, XX },
738 { "push", eSP, XX, XX },
739 { "push", eBP, XX, XX },
740 { "push", eSI, XX, XX },
741 { "push", eDI, XX, XX },
742 /* 58 */
743 { "pop", eAX, XX, XX },
744 { "pop", eCX, XX, XX },
745 { "pop", eDX, XX, XX },
746 { "pop", eBX, XX, XX },
747 { "pop", eSP, XX, XX },
748 { "pop", eBP, XX, XX },
749 { "pop", eSI, XX, XX },
750 { "pop", eDI, XX, XX },
751 /* 60 */
752 { "pusha", XX, XX, XX },
753 { "popa", XX, XX, XX },
754 { "bound", Gv, Ma, XX },
755 { "arpl", Ew, Gw, XX },
756 { "(bad)", XX, XX, XX }, /* seg fs */
757 { "(bad)", XX, XX, XX }, /* seg gs */
758 { "(bad)", XX, XX, XX }, /* op size prefix */
759 { "(bad)", XX, XX, XX }, /* adr size prefix */
760 /* 68 */
761 { "push", Iv, XX, XX }, /* 386 book wrong */
762 { "imul", Gv, Ev, Iv },
763 { "push", sIb, XX, XX }, /* push of byte really pushes 2 or 4 bytes */
764 { "imul", Gv, Ev, sIb },
765 { "ins", Yb, indirDX, XX },
766 { "ins", Yv, indirDX, XX },
767 { "outs", indirDX, Xb, XX },
768 { "outs", indirDX, Xv, XX },
769 /* 70 */
770 { "jo", Jb, XX, XX },
771 { "jno", Jb, XX, XX },
772 { "jb", Jb, XX, XX },
773 { "jae", Jb, XX, XX },
774 { "je", Jb, XX, XX },
775 { "jne", Jb, XX, XX },
776 { "jbe", Jb, XX, XX },
777 { "ja", Jb, XX, XX },
778 /* 78 */
779 { "js", Jb, XX, XX },
780 { "jns", Jb, XX, XX },
781 { "jp", Jb, XX, XX },
782 { "jnp", Jb, XX, XX },
783 { "jl", Jb, XX, XX },
784 { "jge", Jb, XX, XX },
785 { "jle", Jb, XX, XX },
786 { "jg", Jb, XX, XX },
787 /* 80 */
788 { GRP1b },
789 { GRP1S },
790 { "(bad)", XX, XX, XX },
791 { GRP1Ss },
792 { "test", Eb, Gb, XX },
793 { "test", Ev, Gv, XX },
794 { "xchg", Eb, Gb, XX },
795 { "xchg", Ev, Gv, XX },
796 /* 88 */
797 { "mov", Eb, Gb, XX },
798 { "mov", Ev, Gv, XX },
799 { "mov", Gb, Eb, XX },
800 { "mov", Gv, Ev, XX },
801 { "mov", Ev, Sw, XX },
802 { "lea", Gv, M, XX },
803 { "mov", Sw, Ev, XX },
804 { "pop", Ev, XX, XX },
805 /* 90 */
806 { "nop", XX, XX, XX },
807 { "xchg", eCX, eAX, XX },
808 { "xchg", eDX, eAX, XX },
809 { "xchg", eBX, eAX, XX },
810 { "xchg", eSP, eAX, XX },
811 { "xchg", eBP, eAX, XX },
812 { "xchg", eSI, eAX, XX },
813 { "xchg", eDI, eAX, XX },
814 /* 98 */
815 { "cW", XX, XX, XX }, /* cwde and cbw */
816 { "cR", XX, XX, XX }, /* cdq and cwd */
817 { "lcall", Ap, XX, XX },
818 { "(bad)", XX, XX, XX }, /* fwait */
819 { "pushf", XX, XX, XX },
820 { "popf", XX, XX, XX },
821 { "sahf", XX, XX, XX },
822 { "lahf", XX, XX, XX },
823 /* a0 */
824 { "mov", AL, Ob, XX },
825 { "mov", eAX, Ov, XX },
826 { "mov", Ob, AL, XX },
827 { "mov", Ov, eAX, XX },
828 { "movs", Yb, Xb, XX },
829 { "movs", Yv, Xv, XX },
830 { "cmps", Xb, Yb, XX },
831 { "cmps", Xv, Yv, XX },
832 /* a8 */
833 { "test", AL, Ib, XX },
834 { "test", eAX, Iv, XX },
835 { "stos", Yb, AL, XX },
836 { "stos", Yv, eAX, XX },
837 { "lods", AL, Xb, XX },
838 { "lods", eAX, Xv, XX },
839 { "scas", AL, Yb, XX },
840 { "scas", eAX, Yv, XX },
841 /* b0 */
842 { "mov", AL, Ib, XX },
843 { "mov", CL, Ib, XX },
844 { "mov", DL, Ib, XX },
845 { "mov", BL, Ib, XX },
846 { "mov", AH, Ib, XX },
847 { "mov", CH, Ib, XX },
848 { "mov", DH, Ib, XX },
849 { "mov", BH, Ib, XX },
850 /* b8 */
851 { "mov", eAX, Iv, XX },
852 { "mov", eCX, Iv, XX },
853 { "mov", eDX, Iv, XX },
854 { "mov", eBX, Iv, XX },
855 { "mov", eSP, Iv, XX },
856 { "mov", eBP, Iv, XX },
857 { "mov", eSI, Iv, XX },
858 { "mov", eDI, Iv, XX },
859 /* c0 */
860 { GRP2b },
861 { GRP2S },
862 { "ret", Iw, XX, XX },
863 { "ret", XX, XX, XX },
864 { "les", Gv, Mp, XX },
865 { "lds", Gv, Mp, XX },
866 { "mov", Eb, Ib, XX },
867 { "mov", Ev, Iv, XX },
868 /* c8 */
869 { "enter", Iw, Ib, XX },
870 { "leave", XX, XX, XX },
871 { "lret", Iw, XX, XX },
872 { "lret", XX, XX, XX },
873 { "int3", XX, XX, XX },
874 { "int", Ib, XX, XX },
875 { "into", XX, XX, XX },
876 { "iret", XX, XX, XX },
877 /* d0 */
878 { GRP2b_one },
879 { GRP2S_one },
880 { GRP2b_cl },
881 { GRP2S_cl },
882 { "aam", sIb, XX, XX },
883 { "aad", sIb, XX, XX },
884 { "(bad)", XX, XX, XX },
885 { "xlat", DSBX, XX, XX },
886 /* d8 */
887 { FLOAT },
888 { FLOAT },
889 { FLOAT },
890 { FLOAT },
891 { FLOAT },
892 { FLOAT },
893 { FLOAT },
894 { FLOAT },
895 /* e0 */
896 { "loopne", Jb, XX, XX },
897 { "loope", Jb, XX, XX },
898 { "loop", Jb, XX, XX },
899 { "jEcxz", Jb, XX, XX },
900 { "in", AL, Ib, XX },
901 { "in", eAX, Ib, XX },
902 { "out", Ib, AL, XX },
903 { "out", Ib, eAX, XX },
904 /* e8 */
905 { "call", Jv, XX, XX },
906 { "jmp", Jv, XX, XX },
907 { "ljmp", Ap, XX, XX },
908 { "jmp", Jb, XX, XX },
909 { "in", AL, indirDX, XX },
910 { "in", eAX, indirDX, XX },
911 { "out", indirDX, AL, XX },
912 { "out", indirDX, eAX, XX },
913 /* f0 */
914 { "(bad)", XX, XX, XX }, /* lock prefix */
915 { "(bad)", XX, XX, XX },
916 { "(bad)", XX, XX, XX }, /* repne */
917 { "(bad)", XX, XX, XX }, /* repz */
918 { "hlt", XX, XX, XX },
919 { "cmc", XX, XX, XX },
920 { GRP3b },
921 { GRP3S },
922 /* f8 */
923 { "clc", XX, XX, XX },
924 { "stc", XX, XX, XX },
925 { "cli", XX, XX, XX },
926 { "sti", XX, XX, XX },
927 { "cld", XX, XX, XX },
928 { "std", XX, XX, XX },
929 { GRP4 },
930 { GRP5 },
931 };
932
933 static const struct dis386 dis386_twobyte_att[] = {
934 /* 00 */
935 { GRP6 },
936 { GRP7 },
937 { "larS", Gv, Ew, XX },
938 { "lslS", Gv, Ew, XX },
939 { "(bad)", XX, XX, XX },
940 { "(bad)", XX, XX, XX },
941 { "clts", XX, XX, XX },
942 { "(bad)", XX, XX, XX },
943 /* 08 */
944 { "invd", XX, XX, XX },
945 { "wbinvd", XX, XX, XX },
946 { "(bad)", XX, XX, XX },
947 { "ud2a", XX, XX, XX },
948 { "(bad)", XX, XX, XX },
949 { GRPAMD },
950 { "femms", XX, XX, XX },
951 { "", MX, EM, OPSUF }, /* See OP_3DNowSuffix */
952 /* 10 */
953 { PREGRP8 },
954 { PREGRP9 },
955 { "movlps", XM, EX, SIMD_Fixup, 'h' }, /* really only 2 operands */
956 { "movlps", EX, XM, SIMD_Fixup, 'h' },
957 { "unpcklps", XM, EX, XX },
958 { "unpckhps", XM, EX, XX },
959 { "movhps", XM, EX, SIMD_Fixup, 'l' },
960 { "movhps", EX, XM, SIMD_Fixup, 'l' },
961 /* 18 */
962 { GRP14 },
963 { "(bad)", XX, XX, XX },
964 { "(bad)", XX, XX, XX },
965 { "(bad)", XX, XX, XX },
966 { "(bad)", XX, XX, XX },
967 { "(bad)", XX, XX, XX },
968 { "(bad)", XX, XX, XX },
969 { "(bad)", XX, XX, XX },
970 /* 20 */
971 /* these are all backward in appendix A of the intel book */
972 { "movL", Rd, Cd, XX },
973 { "movL", Rd, Dd, XX },
974 { "movL", Cd, Rd, XX },
975 { "movL", Dd, Rd, XX },
976 { "movL", Rd, Td, XX },
977 { "(bad)", XX, XX, XX },
978 { "movL", Td, Rd, XX },
979 { "(bad)", XX, XX, XX },
980 /* 28 */
981 { "movaps", XM, EX, XX },
982 { "movaps", EX, XM, XX },
983 { PREGRP2 },
984 { "movntps", Ev, XM, XX },
985 { PREGRP4 },
986 { PREGRP3 },
987 { "ucomiss", XM, EX, XX },
988 { "comiss", XM, EX, XX },
989 /* 30 */
990 { "wrmsr", XX, XX, XX },
991 { "rdtsc", XX, XX, XX },
992 { "rdmsr", XX, XX, XX },
993 { "rdpmc", XX, XX, XX },
994 { "sysenter", XX, XX, XX },
995 { "sysexit", XX, XX, XX },
996 { "(bad)", XX, XX, XX },
997 { "(bad)", XX, XX, XX },
998 /* 38 */
999 { "(bad)", XX, XX, XX },
1000 { "(bad)", XX, XX, XX },
1001 { "(bad)", XX, XX, XX },
1002 { "(bad)", XX, XX, XX },
1003 { "(bad)", XX, XX, XX },
1004 { "(bad)", XX, XX, XX },
1005 { "(bad)", XX, XX, XX },
1006 { "(bad)", XX, XX, XX },
1007 /* 40 */
1008 { "cmovo", Gv, Ev, XX },
1009 { "cmovno", Gv, Ev, XX },
1010 { "cmovb", Gv, Ev, XX },
1011 { "cmovae", Gv, Ev, XX },
1012 { "cmove", Gv, Ev, XX },
1013 { "cmovne", Gv, Ev, XX },
1014 { "cmovbe", Gv, Ev, XX },
1015 { "cmova", Gv, Ev, XX },
1016 /* 48 */
1017 { "cmovs", Gv, Ev, XX },
1018 { "cmovns", Gv, Ev, XX },
1019 { "cmovp", Gv, Ev, XX },
1020 { "cmovnp", Gv, Ev, XX },
1021 { "cmovl", Gv, Ev, XX },
1022 { "cmovge", Gv, Ev, XX },
1023 { "cmovle", Gv, Ev, XX },
1024 { "cmovg", Gv, Ev, XX },
1025 /* 50 */
1026 { "movmskps", Gv, EX, XX },
1027 { PREGRP13 },
1028 { PREGRP12 },
1029 { PREGRP11 },
1030 { "andps", XM, EX, XX },
1031 { "andnps", XM, EX, XX },
1032 { "orps", XM, EX, XX },
1033 { "xorps", XM, EX, XX },
1034 /* 58 */
1035 { PREGRP0 },
1036 { PREGRP10 },
1037 { "(bad)", XX, XX, XX },
1038 { "(bad)", XX, XX, XX },
1039 { PREGRP14 },
1040 { PREGRP7 },
1041 { PREGRP5 },
1042 { PREGRP6 },
1043 /* 60 */
1044 { "punpcklbw", MX, EM, XX },
1045 { "punpcklwd", MX, EM, XX },
1046 { "punpckldq", MX, EM, XX },
1047 { "packsswb", MX, EM, XX },
1048 { "pcmpgtb", MX, EM, XX },
1049 { "pcmpgtw", MX, EM, XX },
1050 { "pcmpgtd", MX, EM, XX },
1051 { "packuswb", MX, EM, XX },
1052 /* 68 */
1053 { "punpckhbw", MX, EM, XX },
1054 { "punpckhwd", MX, EM, XX },
1055 { "punpckhdq", MX, EM, XX },
1056 { "packssdw", MX, EM, XX },
1057 { "(bad)", XX, XX, XX },
1058 { "(bad)", XX, XX, XX },
1059 { "movd", MX, Ed, XX },
1060 { "movq", MX, EM, XX },
1061 /* 70 */
1062 { "pshufw", MX, EM, Ib },
1063 { GRP10 },
1064 { GRP11 },
1065 { GRP12 },
1066 { "pcmpeqb", MX, EM, XX },
1067 { "pcmpeqw", MX, EM, XX },
1068 { "pcmpeqd", MX, EM, XX },
1069 { "emms", XX, XX, XX },
1070 /* 78 */
1071 { "(bad)", XX, XX, XX },
1072 { "(bad)", XX, XX, XX },
1073 { "(bad)", XX, XX, XX },
1074 { "(bad)", XX, XX, XX },
1075 { "(bad)", XX, XX, XX },
1076 { "(bad)", XX, XX, XX },
1077 { "movd", Ed, MX, XX },
1078 { "movq", EM, MX, XX },
1079 /* 80 */
1080 { "jo", Jv, XX, XX },
1081 { "jno", Jv, XX, XX },
1082 { "jb", Jv, XX, XX },
1083 { "jae", Jv, XX, XX },
1084 { "je", Jv, XX, XX },
1085 { "jne", Jv, XX, XX },
1086 { "jbe", Jv, XX, XX },
1087 { "ja", Jv, XX, XX },
1088 /* 88 */
1089 { "js", Jv, XX, XX },
1090 { "jns", Jv, XX, XX },
1091 { "jp", Jv, XX, XX },
1092 { "jnp", Jv, XX, XX },
1093 { "jl", Jv, XX, XX },
1094 { "jge", Jv, XX, XX },
1095 { "jle", Jv, XX, XX },
1096 { "jg", Jv, XX, XX },
1097 /* 90 */
1098 { "seto", Eb, XX, XX },
1099 { "setno", Eb, XX, XX },
1100 { "setb", Eb, XX, XX },
1101 { "setae", Eb, XX, XX },
1102 { "sete", Eb, XX, XX },
1103 { "setne", Eb, XX, XX },
1104 { "setbe", Eb, XX, XX },
1105 { "seta", Eb, XX, XX },
1106 /* 98 */
1107 { "sets", Eb, XX, XX },
1108 { "setns", Eb, XX, XX },
1109 { "setp", Eb, XX, XX },
1110 { "setnp", Eb, XX, XX },
1111 { "setl", Eb, XX, XX },
1112 { "setge", Eb, XX, XX },
1113 { "setle", Eb, XX, XX },
1114 { "setg", Eb, XX, XX },
1115 /* a0 */
1116 { "pushP", fs, XX, XX },
1117 { "popP", fs, XX, XX },
1118 { "cpuid", XX, XX, XX },
1119 { "btS", Ev, Gv, XX },
1120 { "shldS", Ev, Gv, Ib },
1121 { "shldS", Ev, Gv, CL },
1122 { "(bad)", XX, XX, XX },
1123 { "(bad)", XX, XX, XX },
1124 /* a8 */
1125 { "pushP", gs, XX, XX },
1126 { "popP", gs, XX, XX },
1127 { "rsm", XX, XX, XX },
1128 { "btsS", Ev, Gv, XX },
1129 { "shrdS", Ev, Gv, Ib },
1130 { "shrdS", Ev, Gv, CL },
1131 { GRP13 },
1132 { "imulS", Gv, Ev, XX },
1133 /* b0 */
1134 { "cmpxchgB", Eb, Gb, XX },
1135 { "cmpxchgS", Ev, Gv, XX },
1136 { "lssS", Gv, Mp, XX },
1137 { "btrS", Ev, Gv, XX },
1138 { "lfsS", Gv, Mp, XX },
1139 { "lgsS", Gv, Mp, XX },
1140 { "movzbR", Gv, Eb, XX },
1141 { "movzwR", Gv, Ew, XX }, /* yes, there really is movzww ! */
1142 /* b8 */
1143 { "(bad)", XX, XX, XX },
1144 { "ud2b", XX, XX, XX },
1145 { GRP8 },
1146 { "btcS", Ev, Gv, XX },
1147 { "bsfS", Gv, Ev, XX },
1148 { "bsrS", Gv, Ev, XX },
1149 { "movsbR", Gv, Eb, XX },
1150 { "movswR", Gv, Ew, XX }, /* yes, there really is movsww ! */
1151 /* c0 */
1152 { "xaddB", Eb, Gb, XX },
1153 { "xaddS", Ev, Gv, XX },
1154 { PREGRP1 },
1155 { "(bad)", XX, XX, XX },
1156 { "pinsrw", MX, Ev, Ib },
1157 { "pextrw", Ev, MX, Ib },
1158 { "shufps", XM, EX, Ib },
1159 { GRP9 },
1160 /* c8 */
1161 { "bswap", eAX, XX, XX }, /* bswap doesn't support 16 bit regs */
1162 { "bswap", eCX, XX, XX },
1163 { "bswap", eDX, XX, XX },
1164 { "bswap", eBX, XX, XX },
1165 { "bswap", eSP, XX, XX },
1166 { "bswap", eBP, XX, XX },
1167 { "bswap", eSI, XX, XX },
1168 { "bswap", eDI, XX, XX },
1169 /* d0 */
1170 { "(bad)", XX, XX, XX },
1171 { "psrlw", MX, EM, XX },
1172 { "psrld", MX, EM, XX },
1173 { "psrlq", MX, EM, XX },
1174 { "(bad)", XX, XX, XX },
1175 { "pmullw", MX, EM, XX },
1176 { "(bad)", XX, XX, XX },
1177 { "pmovmskb", Ev, MX, XX },
1178 /* d8 */
1179 { "psubusb", MX, EM, XX },
1180 { "psubusw", MX, EM, XX },
1181 { "pminub", MX, EM, XX },
1182 { "pand", MX, EM, XX },
1183 { "paddusb", MX, EM, XX },
1184 { "paddusw", MX, EM, XX },
1185 { "pmaxub", MX, EM, XX },
1186 { "pandn", MX, EM, XX },
1187 /* e0 */
1188 { "pavgb", MX, EM, XX },
1189 { "psraw", MX, EM, XX },
1190 { "psrad", MX, EM, XX },
1191 { "pavgw", MX, EM, XX },
1192 { "pmulhuw", MX, EM, XX },
1193 { "pmulhw", MX, EM, XX },
1194 { "(bad)", XX, XX, XX },
1195 { "movntq", Ev, MX, XX },
1196 /* e8 */
1197 { "psubsb", MX, EM, XX },
1198 { "psubsw", MX, EM, XX },
1199 { "pminsw", MX, EM, XX },
1200 { "por", MX, EM, XX },
1201 { "paddsb", MX, EM, XX },
1202 { "paddsw", MX, EM, XX },
1203 { "pmaxsw", MX, EM, XX },
1204 { "pxor", MX, EM, XX },
1205 /* f0 */
1206 { "(bad)", XX, XX, XX },
1207 { "psllw", MX, EM, XX },
1208 { "pslld", MX, EM, XX },
1209 { "psllq", MX, EM, XX },
1210 { "(bad)", XX, XX, XX },
1211 { "pmaddwd", MX, EM, XX },
1212 { "psadbw", MX, EM, XX },
1213 { "maskmovq", MX, EM, XX },
1214 /* f8 */
1215 { "psubb", MX, EM, XX },
1216 { "psubw", MX, EM, XX },
1217 { "psubd", MX, EM, XX },
1218 { "(bad)", XX, XX, XX },
1219 { "paddb", MX, EM, XX },
1220 { "paddw", MX, EM, XX },
1221 { "paddd", MX, EM, XX },
1222 { "(bad)", XX, XX, XX }
1223 };
1224
1225 static const struct dis386 dis386_twobyte_intel[] = {
1226 /* 00 */
1227 { GRP6 },
1228 { GRP7 },
1229 { "lar", Gv, Ew, XX },
1230 { "lsl", Gv, Ew, XX },
1231 { "(bad)", XX, XX, XX },
1232 { "(bad)", XX, XX, XX },
1233 { "clts", XX, XX, XX },
1234 { "(bad)", XX, XX, XX },
1235 /* 08 */
1236 { "invd", XX, XX, XX },
1237 { "wbinvd", XX, XX, XX },
1238 { "(bad)", XX, XX, XX },
1239 { "ud2a", XX, XX, XX },
1240 { "(bad)", XX, XX, XX },
1241 { GRPAMD },
1242 { "femms" , XX, XX, XX},
1243 { "", MX, EM, OPSUF }, /* See OP_3DNowSuffix */
1244 /* 10 */
1245 { PREGRP8 },
1246 { PREGRP9 },
1247 { "movlps", XM, EX, SIMD_Fixup, 'h' }, /* really only 2 operands */
1248 { "movlps", EX, XM, SIMD_Fixup, 'h' },
1249 { "unpcklps", XM, EX, XX },
1250 { "unpckhps", XM, EX, XX },
1251 { "movhps", XM, EX, SIMD_Fixup, 'l' },
1252 { "movhps", EX, XM, SIMD_Fixup, 'l' },
1253 /* 18 */
1254 { GRP14 },
1255 { "(bad)", XX, XX, XX },
1256 { "(bad)", XX, XX, XX },
1257 { "(bad)", XX, XX, XX },
1258 { "(bad)", XX, XX, XX },
1259 { "(bad)", XX, XX, XX },
1260 { "(bad)", XX, XX, XX },
1261 { "(bad)", XX, XX, XX },
1262 /* 20 */
1263 /* these are all backward in appendix A of the intel book */
1264 { "mov", Rd, Cd, XX },
1265 { "mov", Rd, Dd, XX },
1266 { "mov", Cd, Rd, XX },
1267 { "mov", Dd, Rd, XX },
1268 { "mov", Rd, Td, XX },
1269 { "(bad)", XX, XX, XX },
1270 { "mov", Td, Rd, XX },
1271 { "(bad)", XX, XX, XX },
1272 /* 28 */
1273 { "movaps", XM, EX, XX },
1274 { "movaps", EX, XM, XX },
1275 { PREGRP2 },
1276 { "movntps", Ev, XM, XX },
1277 { PREGRP4 },
1278 { PREGRP3 },
1279 { "ucomiss", XM, EX, XX },
1280 { "comiss", XM, EX, XX },
1281 /* 30 */
1282 { "wrmsr", XX, XX, XX },
1283 { "rdtsc", XX, XX, XX },
1284 { "rdmsr", XX, XX, XX },
1285 { "rdpmc", XX, XX, XX },
1286 { "sysenter", XX, XX, XX },
1287 { "sysexit", XX, XX, XX },
1288 { "(bad)", XX, XX, XX },
1289 { "(bad)", XX, XX, XX },
1290 /* 38 */
1291 { "(bad)", XX, XX, XX },
1292 { "(bad)", XX, XX, XX },
1293 { "(bad)", XX, XX, XX },
1294 { "(bad)", XX, XX, XX },
1295 { "(bad)", XX, XX, XX },
1296 { "(bad)", XX, XX, XX },
1297 { "(bad)", XX, XX, XX },
1298 { "(bad)", XX, XX, XX },
1299 /* 40 */
1300 { "cmovo", Gv, Ev, XX },
1301 { "cmovno", Gv, Ev, XX },
1302 { "cmovb", Gv, Ev, XX },
1303 { "cmovae", Gv, Ev, XX },
1304 { "cmove", Gv, Ev, XX },
1305 { "cmovne", Gv, Ev, XX },
1306 { "cmovbe", Gv, Ev, XX },
1307 { "cmova", Gv, Ev, XX },
1308 /* 48 */
1309 { "cmovs", Gv, Ev, XX },
1310 { "cmovns", Gv, Ev, XX },
1311 { "cmovp", Gv, Ev, XX },
1312 { "cmovnp", Gv, Ev, XX },
1313 { "cmovl", Gv, Ev, XX },
1314 { "cmovge", Gv, Ev, XX },
1315 { "cmovle", Gv, Ev, XX },
1316 { "cmovg", Gv, Ev, XX },
1317 /* 50 */
1318 { "movmskps", Gv, EX, XX },
1319 { PREGRP13 },
1320 { PREGRP12 },
1321 { PREGRP11 },
1322 { "andps", XM, EX, XX },
1323 { "andnps", XM, EX, XX },
1324 { "orps", XM, EX, XX },
1325 { "xorps", XM, EX, XX },
1326 /* 58 */
1327 { PREGRP0 },
1328 { PREGRP10 },
1329 { "(bad)", XX, XX, XX },
1330 { "(bad)", XX, XX, XX },
1331 { PREGRP14 },
1332 { PREGRP7 },
1333 { PREGRP5 },
1334 { PREGRP6 },
1335 /* 60 */
1336 { "punpcklbw", MX, EM, XX },
1337 { "punpcklwd", MX, EM, XX },
1338 { "punpckldq", MX, EM, XX },
1339 { "packsswb", MX, EM, XX },
1340 { "pcmpgtb", MX, EM, XX },
1341 { "pcmpgtw", MX, EM, XX },
1342 { "pcmpgtd", MX, EM, XX },
1343 { "packuswb", MX, EM, XX },
1344 /* 68 */
1345 { "punpckhbw", MX, EM, XX },
1346 { "punpckhwd", MX, EM, XX },
1347 { "punpckhdq", MX, EM, XX },
1348 { "packssdw", MX, EM, XX },
1349 { "(bad)", XX, XX, XX },
1350 { "(bad)", XX, XX, XX },
1351 { "movd", MX, Ed, XX },
1352 { "movq", MX, EM, XX },
1353 /* 70 */
1354 { "pshufw", MX, EM, Ib },
1355 { GRP10 },
1356 { GRP11 },
1357 { GRP12 },
1358 { "pcmpeqb", MX, EM, XX },
1359 { "pcmpeqw", MX, EM, XX },
1360 { "pcmpeqd", MX, EM, XX },
1361 { "emms", XX, XX, XX },
1362 /* 78 */
1363 { "(bad)", XX, XX, XX },
1364 { "(bad)", XX, XX, XX },
1365 { "(bad)", XX, XX, XX },
1366 { "(bad)", XX, XX, XX },
1367 { "(bad)", XX, XX, XX },
1368 { "(bad)", XX, XX, XX },
1369 { "movd", Ed, MX, XX },
1370 { "movq", EM, MX, XX },
1371 /* 80 */
1372 { "jo", Jv, XX, XX },
1373 { "jno", Jv, XX, XX },
1374 { "jb", Jv, XX, XX },
1375 { "jae", Jv, XX, XX },
1376 { "je", Jv, XX, XX },
1377 { "jne", Jv, XX, XX },
1378 { "jbe", Jv, XX, XX },
1379 { "ja", Jv, XX, XX },
1380 /* 88 */
1381 { "js", Jv, XX, XX },
1382 { "jns", Jv, XX, XX },
1383 { "jp", Jv, XX, XX },
1384 { "jnp", Jv, XX, XX },
1385 { "jl", Jv, XX, XX },
1386 { "jge", Jv, XX, XX },
1387 { "jle", Jv, XX, XX },
1388 { "jg", Jv, XX, XX },
1389 /* 90 */
1390 { "seto", Eb, XX, XX },
1391 { "setno", Eb, XX, XX },
1392 { "setb", Eb, XX, XX },
1393 { "setae", Eb, XX, XX },
1394 { "sete", Eb, XX, XX },
1395 { "setne", Eb, XX, XX },
1396 { "setbe", Eb, XX, XX },
1397 { "seta", Eb, XX, XX },
1398 /* 98 */
1399 { "sets", Eb, XX, XX },
1400 { "setns", Eb, XX, XX },
1401 { "setp", Eb, XX, XX },
1402 { "setnp", Eb, XX, XX },
1403 { "setl", Eb, XX, XX },
1404 { "setge", Eb, XX, XX },
1405 { "setle", Eb, XX, XX },
1406 { "setg", Eb, XX, XX },
1407 /* a0 */
1408 { "push", fs, XX, XX },
1409 { "pop", fs, XX, XX },
1410 { "cpuid", XX, XX, XX },
1411 { "bt", Ev, Gv, XX },
1412 { "shld", Ev, Gv, Ib },
1413 { "shld", Ev, Gv, CL },
1414 { "(bad)", XX, XX, XX },
1415 { "(bad)", XX, XX, XX },
1416 /* a8 */
1417 { "push", gs, XX, XX },
1418 { "pop", gs, XX, XX },
1419 { "rsm" , XX, XX, XX},
1420 { "bts", Ev, Gv, XX },
1421 { "shrd", Ev, Gv, Ib },
1422 { "shrd", Ev, Gv, CL },
1423 { GRP13 },
1424 { "imul", Gv, Ev, XX },
1425 /* b0 */
1426 { "cmpxchg", Eb, Gb, XX },
1427 { "cmpxchg", Ev, Gv, XX },
1428 { "lss", Gv, Mp, XX },
1429 { "btr", Ev, Gv, XX },
1430 { "lfs", Gv, Mp, XX },
1431 { "lgs", Gv, Mp, XX },
1432 { "movzx", Gv, Eb, XX },
1433 { "movzx", Gv, Ew, XX },
1434 /* b8 */
1435 { "(bad)", XX, XX, XX },
1436 { "ud2b", XX, XX, XX },
1437 { GRP8 },
1438 { "btc", Ev, Gv, XX },
1439 { "bsf", Gv, Ev, XX },
1440 { "bsr", Gv, Ev, XX },
1441 { "movsx", Gv, Eb, XX },
1442 { "movsx", Gv, Ew, XX },
1443 /* c0 */
1444 { "xadd", Eb, Gb, XX },
1445 { "xadd", Ev, Gv, XX },
1446 { PREGRP1 },
1447 { "(bad)", XX, XX, XX },
1448 { "pinsrw", MX, Ev, Ib },
1449 { "pextrw", Ev, MX, Ib },
1450 { "shufps", XM, EX, Ib },
1451 { GRP9 },
1452 /* c8 */
1453 { "bswap", eAX, XX, XX }, /* bswap doesn't support 16 bit regs */
1454 { "bswap", eCX, XX, XX },
1455 { "bswap", eDX, XX, XX },
1456 { "bswap", eBX, XX, XX },
1457 { "bswap", eSP, XX, XX },
1458 { "bswap", eBP, XX, XX },
1459 { "bswap", eSI, XX, XX },
1460 { "bswap", eDI, XX, XX },
1461 /* d0 */
1462 { "(bad)", XX, XX, XX },
1463 { "psrlw", MX, EM, XX },
1464 { "psrld", MX, EM, XX },
1465 { "psrlq", MX, EM, XX },
1466 { "(bad)", XX, XX, XX },
1467 { "pmullw", MX, EM, XX },
1468 { "(bad)", XX, XX, XX },
1469 { "pmovmskb", Ev, MX, XX },
1470 /* d8 */
1471 { "psubusb", MX, EM, XX },
1472 { "psubusw", MX, EM, XX },
1473 { "pminub", MX, EM, XX },
1474 { "pand", MX, EM, XX },
1475 { "paddusb", MX, EM, XX },
1476 { "paddusw", MX, EM, XX },
1477 { "pmaxub", MX, EM, XX },
1478 { "pandn", MX, EM, XX },
1479 /* e0 */
1480 { "pavgb", MX, EM, XX },
1481 { "psraw", MX, EM, XX },
1482 { "psrad", MX, EM, XX },
1483 { "pavgw", MX, EM, XX },
1484 { "pmulhuw", MX, EM, XX },
1485 { "pmulhw", MX, EM, XX },
1486 { "(bad)", XX, XX, XX },
1487 { "movntq", Ev, MX, XX },
1488 /* e8 */
1489 { "psubsb", MX, EM, XX },
1490 { "psubsw", MX, EM, XX },
1491 { "pminsw", MX, EM, XX },
1492 { "por", MX, EM, XX },
1493 { "paddsb", MX, EM, XX },
1494 { "paddsw", MX, EM, XX },
1495 { "pmaxsw", MX, EM, XX },
1496 { "pxor", MX, EM, XX },
1497 /* f0 */
1498 { "(bad)", XX, XX, XX },
1499 { "psllw", MX, EM, XX },
1500 { "pslld", MX, EM, XX },
1501 { "psllq", MX, EM, XX },
1502 { "(bad)", XX, XX, XX },
1503 { "pmaddwd", MX, EM, XX },
1504 { "psadbw", MX, EM, XX },
1505 { "maskmovq", MX, EM, XX },
1506 /* f8 */
1507 { "psubb", MX, EM, XX },
1508 { "psubw", MX, EM, XX },
1509 { "psubd", MX, EM, XX },
1510 { "(bad)", XX, XX, XX },
1511 { "paddb", MX, EM, XX },
1512 { "paddw", MX, EM, XX },
1513 { "paddd", MX, EM, XX },
1514 { "(bad)", XX, XX, XX }
1515 };
1516
1517 static const unsigned char onebyte_has_modrm[256] = {
1518 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1519 /* ------------------------------- */
1520 /* 00 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 00 */
1521 /* 10 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 10 */
1522 /* 20 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 20 */
1523 /* 30 */ 1,1,1,1,0,0,0,0,1,1,1,1,0,0,0,0, /* 30 */
1524 /* 40 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 40 */
1525 /* 50 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 50 */
1526 /* 60 */ 0,0,1,1,0,0,0,0,0,1,0,1,0,0,0,0, /* 60 */
1527 /* 70 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 70 */
1528 /* 80 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 80 */
1529 /* 90 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 90 */
1530 /* a0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* a0 */
1531 /* b0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* b0 */
1532 /* c0 */ 1,1,0,0,1,1,1,1,0,0,0,0,0,0,0,0, /* c0 */
1533 /* d0 */ 1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,1, /* d0 */
1534 /* e0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* e0 */
1535 /* f0 */ 0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,1 /* f0 */
1536 /* ------------------------------- */
1537 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1538 };
1539
1540 static const unsigned char twobyte_has_modrm[256] = {
1541 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1542 /* ------------------------------- */
1543 /* 00 */ 1,1,1,1,0,0,0,0,0,0,0,0,0,1,0,1, /* 0f */
1544 /* 10 */ 1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0, /* 1f */
1545 /* 20 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 2f */
1546 /* 30 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 3f */
1547 /* 40 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 4f */
1548 /* 50 */ 1,1,1,1,1,1,1,1,1,1,0,0,1,1,1,1, /* 5f */
1549 /* 60 */ 1,1,1,1,1,1,1,1,1,1,1,1,0,0,1,1, /* 6f */
1550 /* 70 */ 1,1,1,1,1,1,1,0,0,0,0,0,0,0,1,1, /* 7f */
1551 /* 80 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 8f */
1552 /* 90 */ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* 9f */
1553 /* a0 */ 0,0,0,1,1,1,1,1,0,0,0,1,1,1,1,1, /* af */
1554 /* b0 */ 1,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1, /* bf */
1555 /* c0 */ 1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0, /* cf */
1556 /* d0 */ 0,1,1,1,0,1,0,1,1,1,1,1,1,1,1,1, /* df */
1557 /* e0 */ 1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1, /* ef */
1558 /* f0 */ 0,1,1,1,0,1,1,1,1,1,1,0,1,1,1,0 /* ff */
1559 /* ------------------------------- */
1560 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1561 };
1562
1563 static const unsigned char twobyte_uses_f3_prefix[256] = {
1564 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1565 /* ------------------------------- */
1566 /* 00 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0f */
1567 /* 10 */ 1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 1f */
1568 /* 20 */ 0,0,0,0,0,0,0,0,0,0,1,0,1,1,0,0, /* 2f */
1569 /* 30 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 3f */
1570 /* 40 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 4f */
1571 /* 50 */ 0,1,1,1,0,0,0,0,1,1,0,0,1,1,1,1, /* 5f */
1572 /* 60 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 6f */
1573 /* 70 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 7f */
1574 /* 80 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 8f */
1575 /* 90 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 9f */
1576 /* a0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* af */
1577 /* b0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* bf */
1578 /* c0 */ 0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0, /* cf */
1579 /* d0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* df */
1580 /* e0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* ef */
1581 /* f0 */ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 /* ff */
1582 /* ------------------------------- */
1583 /* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
1584 };
1585
1586 static char obuf[100];
1587 static char *obufp;
1588 static char scratchbuf[100];
1589 static unsigned char *start_codep;
1590 static unsigned char *insn_codep;
1591 static unsigned char *codep;
1592 static disassemble_info *the_info;
1593 static int mod;
1594 static int rm;
1595 static int reg;
1596 static void oappend PARAMS ((const char *s));
1597
1598 static const char *names32[]={
1599 "%eax","%ecx","%edx","%ebx", "%esp","%ebp","%esi","%edi",
1600 };
1601 static const char *names16[] = {
1602 "%ax","%cx","%dx","%bx","%sp","%bp","%si","%di",
1603 };
1604 static const char *names8[] = {
1605 "%al","%cl","%dl","%bl","%ah","%ch","%dh","%bh",
1606 };
1607 static const char *names_seg[] = {
1608 "%es","%cs","%ss","%ds","%fs","%gs","%?","%?",
1609 };
1610 static const char *index16[] = {
1611 "%bx,%si","%bx,%di","%bp,%si","%bp,%di","%si","%di","%bp","%bx"
1612 };
1613
1614 static const struct dis386 grps[][8] = {
1615 /* GRP1b */
1616 {
1617 { "addA", Eb, Ib, XX },
1618 { "orA", Eb, Ib, XX },
1619 { "adcA", Eb, Ib, XX },
1620 { "sbbA", Eb, Ib, XX },
1621 { "andA", Eb, Ib, XX },
1622 { "subA", Eb, Ib, XX },
1623 { "xorA", Eb, Ib, XX },
1624 { "cmpA", Eb, Ib, XX }
1625 },
1626 /* GRP1S */
1627 {
1628 { "addQ", Ev, Iv, XX },
1629 { "orQ", Ev, Iv, XX },
1630 { "adcQ", Ev, Iv, XX },
1631 { "sbbQ", Ev, Iv, XX },
1632 { "andQ", Ev, Iv, XX },
1633 { "subQ", Ev, Iv, XX },
1634 { "xorQ", Ev, Iv, XX },
1635 { "cmpQ", Ev, Iv, XX }
1636 },
1637 /* GRP1Ss */
1638 {
1639 { "addQ", Ev, sIb, XX },
1640 { "orQ", Ev, sIb, XX },
1641 { "adcQ", Ev, sIb, XX },
1642 { "sbbQ", Ev, sIb, XX },
1643 { "andQ", Ev, sIb, XX },
1644 { "subQ", Ev, sIb, XX },
1645 { "xorQ", Ev, sIb, XX },
1646 { "cmpQ", Ev, sIb, XX }
1647 },
1648 /* GRP2b */
1649 {
1650 { "rolA", Eb, Ib, XX },
1651 { "rorA", Eb, Ib, XX },
1652 { "rclA", Eb, Ib, XX },
1653 { "rcrA", Eb, Ib, XX },
1654 { "shlA", Eb, Ib, XX },
1655 { "shrA", Eb, Ib, XX },
1656 { "(bad)", XX, XX, XX },
1657 { "sarA", Eb, Ib, XX },
1658 },
1659 /* GRP2S */
1660 {
1661 { "rolQ", Ev, Ib, XX },
1662 { "rorQ", Ev, Ib, XX },
1663 { "rclQ", Ev, Ib, XX },
1664 { "rcrQ", Ev, Ib, XX },
1665 { "shlQ", Ev, Ib, XX },
1666 { "shrQ", Ev, Ib, XX },
1667 { "(bad)", XX, XX, XX },
1668 { "sarQ", Ev, Ib, XX },
1669 },
1670 /* GRP2b_one */
1671 {
1672 { "rolA", Eb, XX, XX },
1673 { "rorA", Eb, XX, XX },
1674 { "rclA", Eb, XX, XX },
1675 { "rcrA", Eb, XX, XX },
1676 { "shlA", Eb, XX, XX },
1677 { "shrA", Eb, XX, XX },
1678 { "(bad)", XX, XX, XX },
1679 { "sarA", Eb, XX, XX },
1680 },
1681 /* GRP2S_one */
1682 {
1683 { "rolQ", Ev, XX, XX },
1684 { "rorQ", Ev, XX, XX },
1685 { "rclQ", Ev, XX, XX },
1686 { "rcrQ", Ev, XX, XX },
1687 { "shlQ", Ev, XX, XX },
1688 { "shrQ", Ev, XX, XX },
1689 { "(bad)", XX, XX, XX},
1690 { "sarQ", Ev, XX, XX },
1691 },
1692 /* GRP2b_cl */
1693 {
1694 { "rolA", Eb, CL, XX },
1695 { "rorA", Eb, CL, XX },
1696 { "rclA", Eb, CL, XX },
1697 { "rcrA", Eb, CL, XX },
1698 { "shlA", Eb, CL, XX },
1699 { "shrA", Eb, CL, XX },
1700 { "(bad)", XX, XX, XX },
1701 { "sarA", Eb, CL, XX },
1702 },
1703 /* GRP2S_cl */
1704 {
1705 { "rolQ", Ev, CL, XX },
1706 { "rorQ", Ev, CL, XX },
1707 { "rclQ", Ev, CL, XX },
1708 { "rcrQ", Ev, CL, XX },
1709 { "shlQ", Ev, CL, XX },
1710 { "shrQ", Ev, CL, XX },
1711 { "(bad)", XX, XX, XX },
1712 { "sarQ", Ev, CL, XX }
1713 },
1714 /* GRP3b */
1715 {
1716 { "testA", Eb, Ib, XX },
1717 { "(bad)", Eb, XX, XX },
1718 { "notA", Eb, XX, XX },
1719 { "negA", Eb, XX, XX },
1720 { "mulB", AL, Eb, XX },
1721 { "imulB", AL, Eb, XX },
1722 { "divB", AL, Eb, XX },
1723 { "idivB", AL, Eb, XX }
1724 },
1725 /* GRP3S */
1726 {
1727 { "testQ", Ev, Iv, XX },
1728 { "(bad)", XX, XX, XX },
1729 { "notQ", Ev, XX, XX },
1730 { "negQ", Ev, XX, XX },
1731 { "mulS", eAX, Ev, XX },
1732 { "imulS", eAX, Ev, XX },
1733 { "divS", eAX, Ev, XX },
1734 { "idivS", eAX, Ev, XX },
1735 },
1736 /* GRP4 */
1737 {
1738 { "incA", Eb, XX, XX },
1739 { "decA", Eb, XX, XX },
1740 { "(bad)", XX, XX, XX },
1741 { "(bad)", XX, XX, XX },
1742 { "(bad)", XX, XX, XX },
1743 { "(bad)", XX, XX, XX },
1744 { "(bad)", XX, XX, XX },
1745 { "(bad)", XX, XX, XX },
1746 },
1747 /* GRP5 */
1748 {
1749 { "incQ", Ev, XX, XX },
1750 { "decQ", Ev, XX, XX },
1751 { "callP", indirEv, XX, XX },
1752 { "lcallP", indirEv, XX, XX },
1753 { "jmpP", indirEv, XX, XX },
1754 { "ljmpP", indirEv, XX, XX },
1755 { "pushQ", Ev, XX, XX },
1756 { "(bad)", XX, XX, XX },
1757 },
1758 /* GRP6 */
1759 {
1760 { "sldt", Ew, XX, XX },
1761 { "str", Ew, XX, XX },
1762 { "lldt", Ew, XX, XX },
1763 { "ltr", Ew, XX, XX },
1764 { "verr", Ew, XX, XX },
1765 { "verw", Ew, XX, XX },
1766 { "(bad)", XX, XX, XX },
1767 { "(bad)", XX, XX, XX }
1768 },
1769 /* GRP7 */
1770 {
1771 { "sgdt", Ew, XX, XX },
1772 { "sidt", Ew, XX, XX },
1773 { "lgdt", Ew, XX, XX },
1774 { "lidt", Ew, XX, XX },
1775 { "smsw", Ew, XX, XX },
1776 { "(bad)", XX, XX, XX },
1777 { "lmsw", Ew, XX, XX },
1778 { "invlpg", Ew, XX, XX },
1779 },
1780 /* GRP8 */
1781 {
1782 { "(bad)", XX, XX, XX },
1783 { "(bad)", XX, XX, XX },
1784 { "(bad)", XX, XX, XX },
1785 { "(bad)", XX, XX, XX },
1786 { "btQ", Ev, Ib, XX },
1787 { "btsQ", Ev, Ib, XX },
1788 { "btrQ", Ev, Ib, XX },
1789 { "btcQ", Ev, Ib, XX },
1790 },
1791 /* GRP9 */
1792 {
1793 { "(bad)", XX, XX, XX },
1794 { "cmpxchg8b", Ev, XX, XX },
1795 { "(bad)", XX, XX, XX },
1796 { "(bad)", XX, XX, XX },
1797 { "(bad)", XX, XX, XX },
1798 { "(bad)", XX, XX, XX },
1799 { "(bad)", XX, XX, XX },
1800 { "(bad)", XX, XX, XX },
1801 },
1802 /* GRP10 */
1803 {
1804 { "(bad)", XX, XX, XX },
1805 { "(bad)", XX, XX, XX },
1806 { "psrlw", MS, Ib, XX },
1807 { "(bad)", XX, XX, XX },
1808 { "psraw", MS, Ib, XX },
1809 { "(bad)", XX, XX, XX },
1810 { "psllw", MS, Ib, XX },
1811 { "(bad)", XX, XX, XX },
1812 },
1813 /* GRP11 */
1814 {
1815 { "(bad)", XX, XX, XX },
1816 { "(bad)", XX, XX, XX },
1817 { "psrld", MS, Ib, XX },
1818 { "(bad)", XX, XX, XX },
1819 { "psrad", MS, Ib, XX },
1820 { "(bad)", XX, XX, XX },
1821 { "pslld", MS, Ib, XX },
1822 { "(bad)", XX, XX, XX },
1823 },
1824 /* GRP12 */
1825 {
1826 { "(bad)", XX, XX, XX },
1827 { "(bad)", XX, XX, XX },
1828 { "psrlq", MS, Ib, XX },
1829 { "(bad)", XX, XX, XX },
1830 { "(bad)", XX, XX, XX },
1831 { "(bad)", XX, XX, XX },
1832 { "psllq", MS, Ib, XX },
1833 { "(bad)", XX, XX, XX },
1834 },
1835 /* GRP13 */
1836 {
1837 { "fxsave", Ev, XX, XX },
1838 { "fxrstor", Ev, XX, XX },
1839 { "ldmxcsr", Ev, XX, XX },
1840 { "stmxcsr", Ev, XX, XX },
1841 { "(bad)", XX, XX, XX },
1842 { "(bad)", XX, XX, XX },
1843 { "(bad)", XX, XX, XX },
1844 { "sfence", None, XX, XX },
1845 },
1846 /* GRP14 */
1847 {
1848 { "prefetchnta", Ev, XX, XX },
1849 { "prefetcht0", Ev, XX, XX },
1850 { "prefetcht1", Ev, XX, XX },
1851 { "prefetcht2", Ev, XX, XX },
1852 { "(bad)", XX, XX, XX },
1853 { "(bad)", XX, XX, XX },
1854 { "(bad)", XX, XX, XX },
1855 { "(bad)", XX, XX, XX },
1856 },
1857 /* GRPAMD */
1858 {
1859 { "prefetch", Eb, XX, XX },
1860 { "prefetchw", Eb, XX, XX },
1861 { "(bad)", XX, XX, XX },
1862 { "(bad)", XX, XX, XX },
1863 { "(bad)", XX, XX, XX },
1864 { "(bad)", XX, XX, XX },
1865 { "(bad)", XX, XX, XX },
1866 { "(bad)", XX, XX, XX },
1867 }
1868
1869 };
1870
1871 static const struct dis386 prefix_user_table[][2] = {
1872 /* PREGRP0 */
1873 {
1874 { "addps", XM, EX, XX },
1875 { "addss", XM, EX, XX },
1876 },
1877 /* PREGRP1 */
1878 {
1879 { "", XM, EX, OPSIMD }, /* See OP_SIMD_SUFFIX */
1880 { "", XM, EX, OPSIMD },
1881 },
1882 /* PREGRP2 */
1883 {
1884 { "cvtpi2ps", XM, EM, XX },
1885 { "cvtsi2ss", XM, Ev, XX },
1886 },
1887 /* PREGRP3 */
1888 {
1889 { "cvtps2pi", MX, EX, XX },
1890 { "cvtss2si", Gv, EX, XX },
1891 },
1892 /* PREGRP4 */
1893 {
1894 { "cvttps2pi", MX, EX, XX },
1895 { "cvttss2si", Gv, EX, XX },
1896 },
1897 /* PREGRP5 */
1898 {
1899 { "divps", XM, EX, XX },
1900 { "divss", XM, EX, XX },
1901 },
1902 /* PREGRP6 */
1903 {
1904 { "maxps", XM, EX, XX },
1905 { "maxss", XM, EX, XX },
1906 },
1907 /* PREGRP7 */
1908 {
1909 { "minps", XM, EX, XX },
1910 { "minss", XM, EX, XX },
1911 },
1912 /* PREGRP8 */
1913 {
1914 { "movups", XM, EX, XX },
1915 { "movss", XM, EX, XX },
1916 },
1917 /* PREGRP9 */
1918 {
1919 { "movups", EX, XM, XX },
1920 { "movss", EX, XM, XX },
1921 },
1922 /* PREGRP10 */
1923 {
1924 { "mulps", XM, EX, XX },
1925 { "mulss", XM, EX, XX },
1926 },
1927 /* PREGRP11 */
1928 {
1929 { "rcpps", XM, EX, XX },
1930 { "rcpss", XM, EX, XX },
1931 },
1932 /* PREGRP12 */
1933 {
1934 { "rsqrtps", XM, EX, XX },
1935 { "rsqrtss", XM, EX, XX },
1936 },
1937 /* PREGRP13 */
1938 {
1939 { "sqrtps", XM, EX, XX },
1940 { "sqrtss", XM, EX, XX },
1941 },
1942 /* PREGRP14 */
1943 {
1944 { "subps", XM, EX, XX },
1945 { "subss", XM, EX, XX },
1946 }
1947 };
1948
1949 #define INTERNAL_DISASSEMBLER_ERROR _("<internal disassembler error>")
1950
1951 static void
1952 ckprefix ()
1953 {
1954 prefixes = 0;
1955 used_prefixes = 0;
1956 while (1)
1957 {
1958 FETCH_DATA (the_info, codep + 1);
1959 switch (*codep)
1960 {
1961 case 0xf3:
1962 prefixes |= PREFIX_REPZ;
1963 break;
1964 case 0xf2:
1965 prefixes |= PREFIX_REPNZ;
1966 break;
1967 case 0xf0:
1968 prefixes |= PREFIX_LOCK;
1969 break;
1970 case 0x2e:
1971 prefixes |= PREFIX_CS;
1972 break;
1973 case 0x36:
1974 prefixes |= PREFIX_SS;
1975 break;
1976 case 0x3e:
1977 prefixes |= PREFIX_DS;
1978 break;
1979 case 0x26:
1980 prefixes |= PREFIX_ES;
1981 break;
1982 case 0x64:
1983 prefixes |= PREFIX_FS;
1984 break;
1985 case 0x65:
1986 prefixes |= PREFIX_GS;
1987 break;
1988 case 0x66:
1989 prefixes |= PREFIX_DATA;
1990 break;
1991 case 0x67:
1992 prefixes |= PREFIX_ADDR;
1993 break;
1994 case FWAIT_OPCODE:
1995 /* fwait is really an instruction. If there are prefixes
1996 before the fwait, they belong to the fwait, *not* to the
1997 following instruction. */
1998 if (prefixes)
1999 {
2000 prefixes |= PREFIX_FWAIT;
2001 codep++;
2002 return;
2003 }
2004 prefixes = PREFIX_FWAIT;
2005 break;
2006 default:
2007 return;
2008 }
2009 codep++;
2010 }
2011 }
2012
2013 /* Return the name of the prefix byte PREF, or NULL if PREF is not a
2014 prefix byte. */
2015
2016 static const char *
2017 prefix_name (pref, sizeflag)
2018 int pref;
2019 int sizeflag;
2020 {
2021 switch (pref)
2022 {
2023 case 0xf3:
2024 return "repz";
2025 case 0xf2:
2026 return "repnz";
2027 case 0xf0:
2028 return "lock";
2029 case 0x2e:
2030 return "cs";
2031 case 0x36:
2032 return "ss";
2033 case 0x3e:
2034 return "ds";
2035 case 0x26:
2036 return "es";
2037 case 0x64:
2038 return "fs";
2039 case 0x65:
2040 return "gs";
2041 case 0x66:
2042 return (sizeflag & DFLAG) ? "data16" : "data32";
2043 case 0x67:
2044 return (sizeflag & AFLAG) ? "addr16" : "addr32";
2045 case FWAIT_OPCODE:
2046 return "fwait";
2047 default:
2048 return NULL;
2049 }
2050 }
2051
2052 static char op1out[100], op2out[100], op3out[100];
2053 static int op_ad, op_index[3];
2054 static unsigned int op_address[3];
2055 static unsigned int start_pc;
2056
2057 \f
2058 /*
2059 * On the 386's of 1988, the maximum length of an instruction is 15 bytes.
2060 * (see topic "Redundant prefixes" in the "Differences from 8086"
2061 * section of the "Virtual 8086 Mode" chapter.)
2062 * 'pc' should be the address of this instruction, it will
2063 * be used to print the target address if this is a relative jump or call
2064 * The function returns the length of this instruction in bytes.
2065 */
2066
2067 static int print_insn_i386
2068 PARAMS ((bfd_vma pc, disassemble_info *info));
2069
2070 static char intel_syntax;
2071 static char open_char;
2072 static char close_char;
2073 static char separator_char;
2074 static char scale_char;
2075
2076 int
2077 print_insn_i386_att (pc, info)
2078 bfd_vma pc;
2079 disassemble_info *info;
2080 {
2081 intel_syntax = 0;
2082 open_char = '(';
2083 close_char = ')';
2084 separator_char = ',';
2085 scale_char = ',';
2086
2087 return print_insn_i386 (pc, info);
2088 }
2089
2090 int
2091 print_insn_i386_intel (pc, info)
2092 bfd_vma pc;
2093 disassemble_info *info;
2094 {
2095 intel_syntax = 1;
2096 open_char = '[';
2097 close_char = ']';
2098 separator_char = '+';
2099 scale_char = '*';
2100
2101 return print_insn_i386 (pc, info);
2102 }
2103
2104 static int
2105 print_insn_i386 (pc, info)
2106 bfd_vma pc;
2107 disassemble_info *info;
2108 {
2109 const struct dis386 *dp;
2110 int i;
2111 int two_source_ops;
2112 char *first, *second, *third;
2113 int needcomma;
2114 unsigned char need_modrm;
2115 unsigned char uses_f3_prefix;
2116 VOLATILE int sizeflag;
2117 VOLATILE int orig_sizeflag;
2118
2119 struct dis_private priv;
2120 bfd_byte *inbuf = priv.the_buffer;
2121
2122 if (info->mach == bfd_mach_i386_i386
2123 || info->mach == bfd_mach_i386_i386_intel_syntax)
2124 sizeflag = AFLAG|DFLAG;
2125 else if (info->mach == bfd_mach_i386_i8086)
2126 sizeflag = 0;
2127 else
2128 abort ();
2129 orig_sizeflag = sizeflag;
2130
2131 /* The output looks better if we put 7 bytes on a line, since that
2132 puts most long word instructions on a single line. */
2133 info->bytes_per_line = 7;
2134
2135 info->private_data = (PTR) &priv;
2136 priv.max_fetched = priv.the_buffer;
2137 priv.insn_start = pc;
2138
2139 obuf[0] = 0;
2140 op1out[0] = 0;
2141 op2out[0] = 0;
2142 op3out[0] = 0;
2143
2144 op_index[0] = op_index[1] = op_index[2] = -1;
2145
2146 the_info = info;
2147 start_pc = pc;
2148 start_codep = inbuf;
2149 codep = inbuf;
2150
2151 if (setjmp (priv.bailout) != 0)
2152 {
2153 const char *name;
2154
2155 /* Getting here means we tried for data but didn't get it. That
2156 means we have an incomplete instruction of some sort. Just
2157 print the first byte as a prefix or a .byte pseudo-op. */
2158 if (codep > inbuf)
2159 {
2160 name = prefix_name (inbuf[0], orig_sizeflag);
2161 if (name != NULL)
2162 (*info->fprintf_func) (info->stream, "%s", name);
2163 else
2164 {
2165 /* Just print the first byte as a .byte instruction. */
2166 (*info->fprintf_func) (info->stream, ".byte 0x%x",
2167 (unsigned int) inbuf[0]);
2168 }
2169
2170 return 1;
2171 }
2172
2173 return -1;
2174 }
2175
2176 ckprefix ();
2177
2178 insn_codep = codep;
2179
2180 FETCH_DATA (info, codep + 1);
2181 two_source_ops = (*codep == 0x62) || (*codep == 0xc8);
2182
2183 obufp = obuf;
2184
2185 if ((prefixes & PREFIX_FWAIT)
2186 && ((*codep < 0xd8) || (*codep > 0xdf)))
2187 {
2188 const char *name;
2189
2190 /* fwait not followed by floating point instruction. Print the
2191 first prefix, which is probably fwait itself. */
2192 name = prefix_name (inbuf[0], orig_sizeflag);
2193 if (name == NULL)
2194 name = INTERNAL_DISASSEMBLER_ERROR;
2195 (*info->fprintf_func) (info->stream, "%s", name);
2196 return 1;
2197 }
2198
2199 if (*codep == 0x0f)
2200 {
2201 FETCH_DATA (info, codep + 2);
2202 if (intel_syntax)
2203 dp = &dis386_twobyte_intel[*++codep];
2204 else
2205 dp = &dis386_twobyte_att[*++codep];
2206 need_modrm = twobyte_has_modrm[*codep];
2207 uses_f3_prefix = twobyte_uses_f3_prefix[*codep];
2208 }
2209 else
2210 {
2211 if (intel_syntax)
2212 dp = &dis386_intel[*codep];
2213 else
2214 dp = &dis386_att[*codep];
2215 need_modrm = onebyte_has_modrm[*codep];
2216 uses_f3_prefix = 0;
2217 }
2218 codep++;
2219
2220 if (!uses_f3_prefix && (prefixes & PREFIX_REPZ))
2221 {
2222 oappend ("repz ");
2223 used_prefixes |= PREFIX_REPZ;
2224 }
2225 if (prefixes & PREFIX_REPNZ)
2226 {
2227 oappend ("repnz ");
2228 used_prefixes |= PREFIX_REPNZ;
2229 }
2230 if (prefixes & PREFIX_LOCK)
2231 {
2232 oappend ("lock ");
2233 used_prefixes |= PREFIX_LOCK;
2234 }
2235
2236 if (prefixes & PREFIX_DATA)
2237 sizeflag ^= DFLAG;
2238
2239 if (prefixes & PREFIX_ADDR)
2240 {
2241 sizeflag ^= AFLAG;
2242 if (sizeflag & AFLAG)
2243 oappend ("addr32 ");
2244 else
2245 oappend ("addr16 ");
2246 used_prefixes |= PREFIX_ADDR;
2247 }
2248
2249 if (need_modrm)
2250 {
2251 FETCH_DATA (info, codep + 1);
2252 mod = (*codep >> 6) & 3;
2253 reg = (*codep >> 3) & 7;
2254 rm = *codep & 7;
2255 }
2256
2257 if (dp->name == NULL && dp->bytemode1 == FLOATCODE)
2258 {
2259 dofloat (sizeflag);
2260 }
2261 else
2262 {
2263 if (dp->name == NULL)
2264 {
2265 switch(dp->bytemode2)
2266 {
2267 case USE_GROUPS:
2268 dp = &grps[dp->bytemode1][reg];
2269 break;
2270 case USE_PREFIX_USER_TABLE:
2271 dp = &prefix_user_table[dp->bytemode1][prefixes & PREFIX_REPZ ? 1 : 0];
2272 used_prefixes |= (prefixes & PREFIX_REPZ);
2273 break;
2274 default:
2275 oappend (INTERNAL_DISASSEMBLER_ERROR);
2276 break;
2277 }
2278 }
2279
2280 putop (dp->name, sizeflag);
2281
2282 obufp = op1out;
2283 op_ad = 2;
2284 if (dp->op1)
2285 (*dp->op1)(dp->bytemode1, sizeflag);
2286
2287 obufp = op2out;
2288 op_ad = 1;
2289 if (dp->op2)
2290 (*dp->op2)(dp->bytemode2, sizeflag);
2291
2292 obufp = op3out;
2293 op_ad = 0;
2294 if (dp->op3)
2295 (*dp->op3)(dp->bytemode3, sizeflag);
2296 }
2297
2298 /* See if any prefixes were not used. If so, print the first one
2299 separately. If we don't do this, we'll wind up printing an
2300 instruction stream which does not precisely correspond to the
2301 bytes we are disassembling. */
2302 if ((prefixes & ~used_prefixes) != 0)
2303 {
2304 const char *name;
2305
2306 name = prefix_name (inbuf[0], orig_sizeflag);
2307 if (name == NULL)
2308 name = INTERNAL_DISASSEMBLER_ERROR;
2309 (*info->fprintf_func) (info->stream, "%s", name);
2310 return 1;
2311 }
2312
2313 obufp = obuf + strlen (obuf);
2314 for (i = strlen (obuf); i < 6; i++)
2315 oappend (" ");
2316 oappend (" ");
2317 (*info->fprintf_func) (info->stream, "%s", obuf);
2318
2319 /* The enter and bound instructions are printed with operands in the same
2320 order as the intel book; everything else is printed in reverse order. */
2321 if (intel_syntax || two_source_ops)
2322 {
2323 first = op1out;
2324 second = op2out;
2325 third = op3out;
2326 op_ad = op_index[0];
2327 op_index[0] = op_index[2];
2328 op_index[2] = op_ad;
2329 }
2330 else
2331 {
2332 first = op3out;
2333 second = op2out;
2334 third = op1out;
2335 }
2336 needcomma = 0;
2337 if (*first)
2338 {
2339 if (op_index[0] != -1)
2340 (*info->print_address_func) ((bfd_vma) op_address[op_index[0]], info);
2341 else
2342 (*info->fprintf_func) (info->stream, "%s", first);
2343 needcomma = 1;
2344 }
2345 if (*second)
2346 {
2347 if (needcomma)
2348 (*info->fprintf_func) (info->stream, ",");
2349 if (op_index[1] != -1)
2350 (*info->print_address_func) ((bfd_vma) op_address[op_index[1]], info);
2351 else
2352 (*info->fprintf_func) (info->stream, "%s", second);
2353 needcomma = 1;
2354 }
2355 if (*third)
2356 {
2357 if (needcomma)
2358 (*info->fprintf_func) (info->stream, ",");
2359 if (op_index[2] != -1)
2360 (*info->print_address_func) ((bfd_vma) op_address[op_index[2]], info);
2361 else
2362 (*info->fprintf_func) (info->stream, "%s", third);
2363 }
2364 return codep - inbuf;
2365 }
2366
2367 static const char *float_mem_att[] = {
2368 /* d8 */
2369 "fadds",
2370 "fmuls",
2371 "fcoms",
2372 "fcomps",
2373 "fsubs",
2374 "fsubrs",
2375 "fdivs",
2376 "fdivrs",
2377 /* d9 */
2378 "flds",
2379 "(bad)",
2380 "fsts",
2381 "fstps",
2382 "fldenv",
2383 "fldcw",
2384 "fNstenv",
2385 "fNstcw",
2386 /* da */
2387 "fiaddl",
2388 "fimull",
2389 "ficoml",
2390 "ficompl",
2391 "fisubl",
2392 "fisubrl",
2393 "fidivl",
2394 "fidivrl",
2395 /* db */
2396 "fildl",
2397 "(bad)",
2398 "fistl",
2399 "fistpl",
2400 "(bad)",
2401 "fldt",
2402 "(bad)",
2403 "fstpt",
2404 /* dc */
2405 "faddl",
2406 "fmull",
2407 "fcoml",
2408 "fcompl",
2409 "fsubl",
2410 "fsubrl",
2411 "fdivl",
2412 "fdivrl",
2413 /* dd */
2414 "fldl",
2415 "(bad)",
2416 "fstl",
2417 "fstpl",
2418 "frstor",
2419 "(bad)",
2420 "fNsave",
2421 "fNstsw",
2422 /* de */
2423 "fiadd",
2424 "fimul",
2425 "ficom",
2426 "ficomp",
2427 "fisub",
2428 "fisubr",
2429 "fidiv",
2430 "fidivr",
2431 /* df */
2432 "fild",
2433 "(bad)",
2434 "fist",
2435 "fistp",
2436 "fbld",
2437 "fildll",
2438 "fbstp",
2439 "fistpll",
2440 };
2441
2442 static const char *float_mem_intel[] = {
2443 /* d8 */
2444 "fadd",
2445 "fmul",
2446 "fcom",
2447 "fcomp",
2448 "fsub",
2449 "fsubr",
2450 "fdiv",
2451 "fdivr",
2452 /* d9 */
2453 "fld",
2454 "(bad)",
2455 "fst",
2456 "fstp",
2457 "fldenv",
2458 "fldcw",
2459 "fNstenv",
2460 "fNstcw",
2461 /* da */
2462 "fiadd",
2463 "fimul",
2464 "ficom",
2465 "ficomp",
2466 "fisub",
2467 "fisubr",
2468 "fidiv",
2469 "fidivr",
2470 /* db */
2471 "fild",
2472 "(bad)",
2473 "fist",
2474 "fistp",
2475 "(bad)",
2476 "fld",
2477 "(bad)",
2478 "fstp",
2479 /* dc */
2480 "fadd",
2481 "fmul",
2482 "fcom",
2483 "fcomp",
2484 "fsub",
2485 "fsubr",
2486 "fdiv",
2487 "fdivr",
2488 /* dd */
2489 "fld",
2490 "(bad)",
2491 "fst",
2492 "fstp",
2493 "frstor",
2494 "(bad)",
2495 "fNsave",
2496 "fNstsw",
2497 /* de */
2498 "fiadd",
2499 "fimul",
2500 "ficom",
2501 "ficomp",
2502 "fisub",
2503 "fisubr",
2504 "fidiv",
2505 "fidivr",
2506 /* df */
2507 "fild",
2508 "(bad)",
2509 "fist",
2510 "fistp",
2511 "fbld",
2512 "fild",
2513 "fbstp",
2514 "fistpll",
2515 };
2516
2517 #define ST OP_ST, 0
2518 #define STi OP_STi, 0
2519
2520 #define FGRPd9_2 NULL, NULL, 0, NULL, 0, NULL, 0
2521 #define FGRPd9_4 NULL, NULL, 1, NULL, 0, NULL, 0
2522 #define FGRPd9_5 NULL, NULL, 2, NULL, 0, NULL, 0
2523 #define FGRPd9_6 NULL, NULL, 3, NULL, 0, NULL, 0
2524 #define FGRPd9_7 NULL, NULL, 4, NULL, 0, NULL, 0
2525 #define FGRPda_5 NULL, NULL, 5, NULL, 0, NULL, 0
2526 #define FGRPdb_4 NULL, NULL, 6, NULL, 0, NULL, 0
2527 #define FGRPde_3 NULL, NULL, 7, NULL, 0, NULL, 0
2528 #define FGRPdf_4 NULL, NULL, 8, NULL, 0, NULL, 0
2529
2530 static const struct dis386 float_reg[][8] = {
2531 /* d8 */
2532 {
2533 { "fadd", ST, STi, XX },
2534 { "fmul", ST, STi, XX },
2535 { "fcom", STi, XX, XX },
2536 { "fcomp", STi, XX, XX },
2537 { "fsub", ST, STi, XX },
2538 { "fsubr", ST, STi, XX },
2539 { "fdiv", ST, STi, XX },
2540 { "fdivr", ST, STi, XX },
2541 },
2542 /* d9 */
2543 {
2544 { "fld", STi, XX, XX },
2545 { "fxch", STi, XX, XX },
2546 { FGRPd9_2 },
2547 { "(bad)", XX, XX, XX },
2548 { FGRPd9_4 },
2549 { FGRPd9_5 },
2550 { FGRPd9_6 },
2551 { FGRPd9_7 },
2552 },
2553 /* da */
2554 {
2555 { "fcmovb", ST, STi, XX },
2556 { "fcmove", ST, STi, XX },
2557 { "fcmovbe",ST, STi, XX },
2558 { "fcmovu", ST, STi, XX },
2559 { "(bad)", XX, XX, XX },
2560 { FGRPda_5 },
2561 { "(bad)", XX, XX, XX },
2562 { "(bad)", XX, XX, XX },
2563 },
2564 /* db */
2565 {
2566 { "fcmovnb",ST, STi, XX },
2567 { "fcmovne",ST, STi, XX },
2568 { "fcmovnbe",ST, STi, XX },
2569 { "fcmovnu",ST, STi, XX },
2570 { FGRPdb_4 },
2571 { "fucomi", ST, STi, XX },
2572 { "fcomi", ST, STi, XX },
2573 { "(bad)", XX, XX, XX },
2574 },
2575 /* dc */
2576 {
2577 { "fadd", STi, ST, XX },
2578 { "fmul", STi, ST, XX },
2579 { "(bad)", XX, XX, XX },
2580 { "(bad)", XX, XX, XX },
2581 #if UNIXWARE_COMPAT
2582 { "fsub", STi, ST, XX },
2583 { "fsubr", STi, ST, XX },
2584 { "fdiv", STi, ST, XX },
2585 { "fdivr", STi, ST, XX },
2586 #else
2587 { "fsubr", STi, ST, XX },
2588 { "fsub", STi, ST, XX },
2589 { "fdivr", STi, ST, XX },
2590 { "fdiv", STi, ST, XX },
2591 #endif
2592 },
2593 /* dd */
2594 {
2595 { "ffree", STi, XX, XX },
2596 { "(bad)", XX, XX, XX },
2597 { "fst", STi, XX, XX },
2598 { "fstp", STi, XX, XX },
2599 { "fucom", STi, XX, XX },
2600 { "fucomp", STi, XX, XX },
2601 { "(bad)", XX, XX, XX },
2602 { "(bad)", XX, XX, XX },
2603 },
2604 /* de */
2605 {
2606 { "faddp", STi, ST, XX },
2607 { "fmulp", STi, ST, XX },
2608 { "(bad)", XX, XX, XX },
2609 { FGRPde_3 },
2610 #if UNIXWARE_COMPAT
2611 { "fsubp", STi, ST, XX },
2612 { "fsubrp", STi, ST, XX },
2613 { "fdivp", STi, ST, XX },
2614 { "fdivrp", STi, ST, XX },
2615 #else
2616 { "fsubrp", STi, ST, XX },
2617 { "fsubp", STi, ST, XX },
2618 { "fdivrp", STi, ST, XX },
2619 { "fdivp", STi, ST, XX },
2620 #endif
2621 },
2622 /* df */
2623 {
2624 { "(bad)", XX, XX, XX },
2625 { "(bad)", XX, XX, XX },
2626 { "(bad)", XX, XX, XX },
2627 { "(bad)", XX, XX, XX },
2628 { FGRPdf_4 },
2629 { "fucomip",ST, STi, XX },
2630 { "fcomip", ST, STi, XX },
2631 { "(bad)", XX, XX, XX },
2632 },
2633 };
2634
2635
2636 static char *fgrps[][8] = {
2637 /* d9_2 0 */
2638 {
2639 "fnop","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
2640 },
2641
2642 /* d9_4 1 */
2643 {
2644 "fchs","fabs","(bad)","(bad)","ftst","fxam","(bad)","(bad)",
2645 },
2646
2647 /* d9_5 2 */
2648 {
2649 "fld1","fldl2t","fldl2e","fldpi","fldlg2","fldln2","fldz","(bad)",
2650 },
2651
2652 /* d9_6 3 */
2653 {
2654 "f2xm1","fyl2x","fptan","fpatan","fxtract","fprem1","fdecstp","fincstp",
2655 },
2656
2657 /* d9_7 4 */
2658 {
2659 "fprem","fyl2xp1","fsqrt","fsincos","frndint","fscale","fsin","fcos",
2660 },
2661
2662 /* da_5 5 */
2663 {
2664 "(bad)","fucompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
2665 },
2666
2667 /* db_4 6 */
2668 {
2669 "feni(287 only)","fdisi(287 only)","fNclex","fNinit",
2670 "fNsetpm(287 only)","(bad)","(bad)","(bad)",
2671 },
2672
2673 /* de_3 7 */
2674 {
2675 "(bad)","fcompp","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
2676 },
2677
2678 /* df_4 8 */
2679 {
2680 "fNstsw","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)","(bad)",
2681 },
2682 };
2683
2684 static void
2685 dofloat (sizeflag)
2686 int sizeflag;
2687 {
2688 const struct dis386 *dp;
2689 unsigned char floatop;
2690
2691 floatop = codep[-1];
2692
2693 if (mod != 3)
2694 {
2695 if (intel_syntax)
2696 putop (float_mem_intel[(floatop - 0xd8 ) * 8 + reg], sizeflag);
2697 else
2698 putop (float_mem_att[(floatop - 0xd8 ) * 8 + reg], sizeflag);
2699 obufp = op1out;
2700 if (floatop == 0xdb)
2701 OP_E (x_mode, sizeflag);
2702 else if (floatop == 0xdd)
2703 OP_E (d_mode, sizeflag);
2704 else
2705 OP_E (v_mode, sizeflag);
2706 return;
2707 }
2708 codep++;
2709
2710 dp = &float_reg[floatop - 0xd8][reg];
2711 if (dp->name == NULL)
2712 {
2713 putop (fgrps[dp->bytemode1][rm], sizeflag);
2714
2715 /* instruction fnstsw is only one with strange arg */
2716 if (floatop == 0xdf && codep[-1] == 0xe0)
2717 strcpy (op1out, names16[0]);
2718 }
2719 else
2720 {
2721 putop (dp->name, sizeflag);
2722
2723 obufp = op1out;
2724 if (dp->op1)
2725 (*dp->op1)(dp->bytemode1, sizeflag);
2726 obufp = op2out;
2727 if (dp->op2)
2728 (*dp->op2)(dp->bytemode2, sizeflag);
2729 }
2730 }
2731
2732 /* ARGSUSED */
2733 static void
2734 OP_ST (ignore, sizeflag)
2735 int ignore ATTRIBUTE_UNUSED;
2736 int sizeflag ATTRIBUTE_UNUSED;
2737 {
2738 oappend ("%st");
2739 }
2740
2741 /* ARGSUSED */
2742 static void
2743 OP_STi (ignore, sizeflag)
2744 int ignore ATTRIBUTE_UNUSED;
2745 int sizeflag ATTRIBUTE_UNUSED;
2746 {
2747 sprintf (scratchbuf, "%%st(%d)", rm);
2748 oappend (scratchbuf);
2749 }
2750
2751
2752 /* capital letters in template are macros */
2753 static void
2754 putop (template, sizeflag)
2755 const char *template;
2756 int sizeflag;
2757 {
2758 const char *p;
2759
2760 for (p = template; *p; p++)
2761 {
2762 switch (*p)
2763 {
2764 default:
2765 *obufp++ = *p;
2766 break;
2767 case 'A':
2768 if (intel_syntax)
2769 break;
2770 if (mod != 3
2771 #ifdef SUFFIX_ALWAYS
2772 || (sizeflag & SUFFIX_ALWAYS)
2773 #endif
2774 )
2775 *obufp++ = 'b';
2776 break;
2777 case 'B':
2778 if (intel_syntax)
2779 break;
2780 #ifdef SUFFIX_ALWAYS
2781 if (sizeflag & SUFFIX_ALWAYS)
2782 *obufp++ = 'b';
2783 #endif
2784 break;
2785 case 'E': /* For jcxz/jecxz */
2786 if (sizeflag & AFLAG)
2787 *obufp++ = 'e';
2788 break;
2789 case 'L':
2790 if (intel_syntax)
2791 break;
2792 #ifdef SUFFIX_ALWAYS
2793 if (sizeflag & SUFFIX_ALWAYS)
2794 *obufp++ = 'l';
2795 #endif
2796 break;
2797 case 'N':
2798 if ((prefixes & PREFIX_FWAIT) == 0)
2799 *obufp++ = 'n';
2800 else
2801 used_prefixes |= PREFIX_FWAIT;
2802 break;
2803 case 'P':
2804 if (intel_syntax)
2805 break;
2806 if ((prefixes & PREFIX_DATA)
2807 #ifdef SUFFIX_ALWAYS
2808 || (sizeflag & SUFFIX_ALWAYS)
2809 #endif
2810 )
2811 {
2812 if (sizeflag & DFLAG)
2813 *obufp++ = 'l';
2814 else
2815 *obufp++ = 'w';
2816 used_prefixes |= (prefixes & PREFIX_DATA);
2817 }
2818 break;
2819 case 'Q':
2820 if (intel_syntax)
2821 break;
2822 if (mod != 3
2823 #ifdef SUFFIX_ALWAYS
2824 || (sizeflag & SUFFIX_ALWAYS)
2825 #endif
2826 )
2827 {
2828 if (sizeflag & DFLAG)
2829 *obufp++ = 'l';
2830 else
2831 *obufp++ = 'w';
2832 used_prefixes |= (prefixes & PREFIX_DATA);
2833 }
2834 break;
2835 case 'R':
2836 if (intel_syntax)
2837 {
2838 if (sizeflag & DFLAG)
2839 {
2840 *obufp++ = 'd';
2841 *obufp++ = 'q';
2842 }
2843 else
2844 {
2845 *obufp++ = 'w';
2846 *obufp++ = 'd';
2847 }
2848 }
2849 else
2850 {
2851 if (sizeflag & DFLAG)
2852 *obufp++ = 'l';
2853 else
2854 *obufp++ = 'w';
2855 }
2856 used_prefixes |= (prefixes & PREFIX_DATA);
2857 break;
2858 case 'S':
2859 if (intel_syntax)
2860 break;
2861 #ifdef SUFFIX_ALWAYS
2862 if (sizeflag & SUFFIX_ALWAYS)
2863 {
2864 if (sizeflag & DFLAG)
2865 *obufp++ = 'l';
2866 else
2867 *obufp++ = 'w';
2868 used_prefixes |= (prefixes & PREFIX_DATA);
2869 }
2870 #endif
2871 break;
2872 case 'W':
2873 /* operand size flag for cwtl, cbtw */
2874 if (sizeflag & DFLAG)
2875 *obufp++ = 'w';
2876 else
2877 *obufp++ = 'b';
2878 if (intel_syntax)
2879 {
2880 if (sizeflag & DFLAG)
2881 {
2882 *obufp++ = 'd';
2883 *obufp++ = 'e';
2884 }
2885 else
2886 {
2887 *obufp++ = 'w';
2888 }
2889 }
2890 used_prefixes |= (prefixes & PREFIX_DATA);
2891 break;
2892 }
2893 }
2894 *obufp = 0;
2895 }
2896
2897 static void
2898 oappend (s)
2899 const char *s;
2900 {
2901 strcpy (obufp, s);
2902 obufp += strlen (s);
2903 }
2904
2905 static void
2906 append_seg ()
2907 {
2908 if (prefixes & PREFIX_CS)
2909 {
2910 oappend ("%cs:");
2911 used_prefixes |= PREFIX_CS;
2912 }
2913 if (prefixes & PREFIX_DS)
2914 {
2915 oappend ("%ds:");
2916 used_prefixes |= PREFIX_DS;
2917 }
2918 if (prefixes & PREFIX_SS)
2919 {
2920 oappend ("%ss:");
2921 used_prefixes |= PREFIX_SS;
2922 }
2923 if (prefixes & PREFIX_ES)
2924 {
2925 oappend ("%es:");
2926 used_prefixes |= PREFIX_ES;
2927 }
2928 if (prefixes & PREFIX_FS)
2929 {
2930 oappend ("%fs:");
2931 used_prefixes |= PREFIX_FS;
2932 }
2933 if (prefixes & PREFIX_GS)
2934 {
2935 oappend ("%gs:");
2936 used_prefixes |= PREFIX_GS;
2937 }
2938 }
2939
2940 static void
2941 OP_indirE (bytemode, sizeflag)
2942 int bytemode;
2943 int sizeflag;
2944 {
2945 if (!intel_syntax)
2946 oappend ("*");
2947 OP_E (bytemode, sizeflag);
2948 }
2949
2950 static void
2951 OP_E (bytemode, sizeflag)
2952 int bytemode;
2953 int sizeflag;
2954 {
2955 int disp;
2956
2957 /* skip mod/rm byte */
2958 codep++;
2959
2960 if (mod == 3)
2961 {
2962 switch (bytemode)
2963 {
2964 case b_mode:
2965 oappend (names8[rm]);
2966 break;
2967 case w_mode:
2968 oappend (names16[rm]);
2969 break;
2970 case d_mode:
2971 oappend (names32[rm]);
2972 break;
2973 case v_mode:
2974 if (sizeflag & DFLAG)
2975 oappend (names32[rm]);
2976 else
2977 oappend (names16[rm]);
2978 used_prefixes |= (prefixes & PREFIX_DATA);
2979 break;
2980 case 0:
2981 if ( !(codep[-2] == 0xAE && codep[-1] == 0xF8 /* sfence */))
2982 BadOp(); /* bad sfence,lea,lds,les,lfs,lgs,lss modrm */
2983 break;
2984 default:
2985 oappend (INTERNAL_DISASSEMBLER_ERROR);
2986 break;
2987 }
2988 return;
2989 }
2990
2991 disp = 0;
2992 append_seg ();
2993
2994 if (sizeflag & AFLAG) /* 32 bit address mode */
2995 {
2996 int havesib;
2997 int havebase;
2998 int base;
2999 int index = 0;
3000 int scale = 0;
3001
3002 havesib = 0;
3003 havebase = 1;
3004 base = rm;
3005
3006 if (base == 4)
3007 {
3008 havesib = 1;
3009 FETCH_DATA (the_info, codep + 1);
3010 scale = (*codep >> 6) & 3;
3011 index = (*codep >> 3) & 7;
3012 base = *codep & 7;
3013 codep++;
3014 }
3015
3016 switch (mod)
3017 {
3018 case 0:
3019 if (base == 5)
3020 {
3021 havebase = 0;
3022 disp = get32 ();
3023 }
3024 break;
3025 case 1:
3026 FETCH_DATA (the_info, codep + 1);
3027 disp = *codep++;
3028 if ((disp & 0x80) != 0)
3029 disp -= 0x100;
3030 break;
3031 case 2:
3032 disp = get32 ();
3033 break;
3034 }
3035
3036 if (!intel_syntax)
3037 if (mod != 0 || base == 5)
3038 {
3039 sprintf (scratchbuf, "0x%x", disp);
3040 oappend (scratchbuf);
3041 }
3042
3043 if (havebase || (havesib && (index != 4 || scale != 0)))
3044 {
3045 if (intel_syntax)
3046 {
3047 switch (bytemode)
3048 {
3049 case b_mode:
3050 oappend("BYTE PTR ");
3051 break;
3052 case w_mode:
3053 oappend("WORD PTR ");
3054 break;
3055 case v_mode:
3056 oappend("DWORD PTR ");
3057 break;
3058 case d_mode:
3059 oappend("QWORD PTR ");
3060 break;
3061 case x_mode:
3062 oappend("XWORD PTR ");
3063 break;
3064 default:
3065 break;
3066 }
3067 }
3068 *obufp++ = open_char;
3069 *obufp = '\0';
3070 if (havebase)
3071 oappend (names32[base]);
3072 if (havesib)
3073 {
3074 if (index != 4)
3075 {
3076 if (intel_syntax)
3077 {
3078 if (havebase)
3079 {
3080 *obufp++ = separator_char;
3081 *obufp = '\0';
3082 }
3083 sprintf (scratchbuf, "%s", names32[index]);
3084 }
3085 else
3086 sprintf (scratchbuf, ",%s", names32[index]);
3087 oappend (scratchbuf);
3088 }
3089 if (!intel_syntax
3090 || (intel_syntax
3091 && bytemode != b_mode
3092 && bytemode != w_mode
3093 && bytemode != v_mode))
3094 {
3095 *obufp++ = scale_char;
3096 *obufp = '\0';
3097 sprintf (scratchbuf, "%d", 1 << scale);
3098 oappend (scratchbuf);
3099 }
3100 }
3101 if (intel_syntax)
3102 if (mod != 0 || base == 5)
3103 {
3104 /* Don't print zero displacements */
3105 if (disp > 0)
3106 {
3107 sprintf (scratchbuf, "+%d", disp);
3108 oappend (scratchbuf);
3109 }
3110 else if (disp < 0)
3111 {
3112 sprintf (scratchbuf, "%d", disp);
3113 oappend (scratchbuf);
3114 }
3115 }
3116
3117 *obufp++ = close_char;
3118 *obufp = '\0';
3119 }
3120 else if (intel_syntax)
3121 {
3122 if (mod != 0 || base == 5)
3123 {
3124 if (prefixes & (PREFIX_CS | PREFIX_SS | PREFIX_DS
3125 | PREFIX_ES | PREFIX_FS | PREFIX_GS))
3126 ;
3127 else
3128 {
3129 oappend (names_seg[3]);
3130 oappend (":");
3131 }
3132 sprintf (scratchbuf, "0x%x", disp);
3133 oappend (scratchbuf);
3134 }
3135 }
3136 }
3137 else
3138 { /* 16 bit address mode */
3139 switch (mod)
3140 {
3141 case 0:
3142 if (rm == 6)
3143 {
3144 disp = get16 ();
3145 if ((disp & 0x8000) != 0)
3146 disp -= 0x10000;
3147 }
3148 break;
3149 case 1:
3150 FETCH_DATA (the_info, codep + 1);
3151 disp = *codep++;
3152 if ((disp & 0x80) != 0)
3153 disp -= 0x100;
3154 break;
3155 case 2:
3156 disp = get16 ();
3157 if ((disp & 0x8000) != 0)
3158 disp -= 0x10000;
3159 break;
3160 }
3161
3162 if (!intel_syntax)
3163 if (mod != 0 || rm == 6)
3164 {
3165 sprintf (scratchbuf, "%d", disp);
3166 oappend (scratchbuf);
3167 }
3168
3169 if (mod != 0 || rm != 6)
3170 {
3171 *obufp++ = open_char;
3172 *obufp = '\0';
3173 oappend (index16[rm]);
3174 *obufp++ = close_char;
3175 *obufp = '\0';
3176 }
3177 }
3178 }
3179
3180 static void
3181 OP_G (bytemode, sizeflag)
3182 int bytemode;
3183 int sizeflag;
3184 {
3185 switch (bytemode)
3186 {
3187 case b_mode:
3188 oappend (names8[reg]);
3189 break;
3190 case w_mode:
3191 oappend (names16[reg]);
3192 break;
3193 case d_mode:
3194 oappend (names32[reg]);
3195 break;
3196 case v_mode:
3197 if (sizeflag & DFLAG)
3198 oappend (names32[reg]);
3199 else
3200 oappend (names16[reg]);
3201 used_prefixes |= (prefixes & PREFIX_DATA);
3202 break;
3203 default:
3204 oappend (INTERNAL_DISASSEMBLER_ERROR);
3205 break;
3206 }
3207 }
3208
3209 static int
3210 get32 ()
3211 {
3212 int x = 0;
3213
3214 FETCH_DATA (the_info, codep + 4);
3215 x = *codep++ & 0xff;
3216 x |= (*codep++ & 0xff) << 8;
3217 x |= (*codep++ & 0xff) << 16;
3218 x |= (*codep++ & 0xff) << 24;
3219 return x;
3220 }
3221
3222 static int
3223 get16 ()
3224 {
3225 int x = 0;
3226
3227 FETCH_DATA (the_info, codep + 2);
3228 x = *codep++ & 0xff;
3229 x |= (*codep++ & 0xff) << 8;
3230 return x;
3231 }
3232
3233 static void
3234 set_op (op)
3235 unsigned int op;
3236 {
3237 op_index[op_ad] = op_ad;
3238 op_address[op_ad] = op;
3239 }
3240
3241 static void
3242 OP_REG (code, sizeflag)
3243 int code;
3244 int sizeflag;
3245 {
3246 const char *s;
3247
3248 switch (code)
3249 {
3250 case indir_dx_reg:
3251 s = "(%dx)";
3252 break;
3253 case ax_reg: case cx_reg: case dx_reg: case bx_reg:
3254 case sp_reg: case bp_reg: case si_reg: case di_reg:
3255 s = names16[code - ax_reg];
3256 break;
3257 case es_reg: case ss_reg: case cs_reg:
3258 case ds_reg: case fs_reg: case gs_reg:
3259 s = names_seg[code - es_reg];
3260 break;
3261 case al_reg: case ah_reg: case cl_reg: case ch_reg:
3262 case dl_reg: case dh_reg: case bl_reg: case bh_reg:
3263 s = names8[code - al_reg];
3264 break;
3265 case eAX_reg: case eCX_reg: case eDX_reg: case eBX_reg:
3266 case eSP_reg: case eBP_reg: case eSI_reg: case eDI_reg:
3267 if (sizeflag & DFLAG)
3268 s = names32[code - eAX_reg];
3269 else
3270 s = names16[code - eAX_reg];
3271 used_prefixes |= (prefixes & PREFIX_DATA);
3272 break;
3273 default:
3274 s = INTERNAL_DISASSEMBLER_ERROR;
3275 break;
3276 }
3277 oappend (s);
3278 }
3279
3280 static void
3281 OP_I (bytemode, sizeflag)
3282 int bytemode;
3283 int sizeflag;
3284 {
3285 int op;
3286
3287 switch (bytemode)
3288 {
3289 case b_mode:
3290 FETCH_DATA (the_info, codep + 1);
3291 op = *codep++ & 0xff;
3292 break;
3293 case v_mode:
3294 if (sizeflag & DFLAG)
3295 op = get32 ();
3296 else
3297 op = get16 ();
3298 used_prefixes |= (prefixes & PREFIX_DATA);
3299 break;
3300 case w_mode:
3301 op = get16 ();
3302 break;
3303 default:
3304 oappend (INTERNAL_DISASSEMBLER_ERROR);
3305 return;
3306 }
3307
3308 if (intel_syntax)
3309 sprintf (scratchbuf, "0x%x", op);
3310 else
3311 sprintf (scratchbuf, "$0x%x", op);
3312 oappend (scratchbuf);
3313 scratchbuf[0] = '\0';
3314 }
3315
3316 static void
3317 OP_sI (bytemode, sizeflag)
3318 int bytemode;
3319 int sizeflag;
3320 {
3321 int op;
3322
3323 switch (bytemode)
3324 {
3325 case b_mode:
3326 FETCH_DATA (the_info, codep + 1);
3327 op = *codep++;
3328 if ((op & 0x80) != 0)
3329 op -= 0x100;
3330 break;
3331 case v_mode:
3332 if (sizeflag & DFLAG)
3333 op = get32 ();
3334 else
3335 {
3336 op = get16();
3337 if ((op & 0x8000) != 0)
3338 op -= 0x10000;
3339 }
3340 used_prefixes |= (prefixes & PREFIX_DATA);
3341 break;
3342 case w_mode:
3343 op = get16 ();
3344 if ((op & 0x8000) != 0)
3345 op -= 0x10000;
3346 break;
3347 default:
3348 oappend (INTERNAL_DISASSEMBLER_ERROR);
3349 return;
3350 }
3351 if (intel_syntax)
3352 sprintf (scratchbuf, "%d", op);
3353 else
3354 sprintf (scratchbuf, "$0x%x", op);
3355 oappend (scratchbuf);
3356 }
3357
3358 static void
3359 OP_J (bytemode, sizeflag)
3360 int bytemode;
3361 int sizeflag;
3362 {
3363 int disp;
3364 int mask = -1;
3365
3366 switch (bytemode)
3367 {
3368 case b_mode:
3369 FETCH_DATA (the_info, codep + 1);
3370 disp = *codep++;
3371 if ((disp & 0x80) != 0)
3372 disp -= 0x100;
3373 break;
3374 case v_mode:
3375 if (sizeflag & DFLAG)
3376 disp = get32 ();
3377 else
3378 {
3379 disp = get16 ();
3380 /* for some reason, a data16 prefix on a jump instruction
3381 means that the pc is masked to 16 bits after the
3382 displacement is added! */
3383 mask = 0xffff;
3384 }
3385 used_prefixes |= (prefixes & PREFIX_DATA);
3386 break;
3387 default:
3388 oappend (INTERNAL_DISASSEMBLER_ERROR);
3389 return;
3390 }
3391 disp = (start_pc + codep - start_codep + disp) & mask;
3392 set_op (disp);
3393 sprintf (scratchbuf, "0x%x", disp);
3394 oappend (scratchbuf);
3395 }
3396
3397 /* ARGSUSED */
3398 static void
3399 OP_SEG (dummy, sizeflag)
3400 int dummy ATTRIBUTE_UNUSED;
3401 int sizeflag ATTRIBUTE_UNUSED;
3402 {
3403 static char *sreg[] = {
3404 "%es","%cs","%ss","%ds","%fs","%gs","%?","%?",
3405 };
3406
3407 oappend (sreg[reg]);
3408 }
3409
3410 /* ARGSUSED */
3411 static void
3412 OP_DIR (dummy, sizeflag)
3413 int dummy ATTRIBUTE_UNUSED;
3414 int sizeflag;
3415 {
3416 int seg, offset;
3417
3418 if (sizeflag & DFLAG)
3419 {
3420 offset = get32 ();
3421 seg = get16 ();
3422 }
3423 else
3424 {
3425 offset = get16 ();
3426 seg = get16 ();
3427 }
3428 used_prefixes |= (prefixes & PREFIX_DATA);
3429 sprintf (scratchbuf, "$0x%x,$0x%x", seg, offset);
3430 oappend (scratchbuf);
3431 }
3432
3433 /* ARGSUSED */
3434 static void
3435 OP_OFF (ignore, sizeflag)
3436 int ignore ATTRIBUTE_UNUSED;
3437 int sizeflag;
3438 {
3439 int off;
3440
3441 append_seg ();
3442
3443 if (sizeflag & AFLAG)
3444 off = get32 ();
3445 else
3446 off = get16 ();
3447
3448 if (intel_syntax)
3449 {
3450 if (!(prefixes & (PREFIX_CS | PREFIX_SS | PREFIX_DS
3451 | PREFIX_ES | PREFIX_FS | PREFIX_GS)))
3452 {
3453 oappend (names_seg[3]);
3454 oappend (":");
3455 }
3456 }
3457 sprintf (scratchbuf, "0x%x", off);
3458 oappend (scratchbuf);
3459 }
3460
3461 static void
3462 ptr_reg (code, sizeflag)
3463 int code;
3464 int sizeflag;
3465 {
3466 const char *s;
3467 oappend ("(");
3468 if (sizeflag & AFLAG)
3469 s = names32[code - eAX_reg];
3470 else
3471 s = names16[code - eAX_reg];
3472 oappend (s);
3473 oappend (")");
3474 }
3475
3476 static void
3477 OP_ESreg (code, sizeflag)
3478 int code;
3479 int sizeflag;
3480 {
3481 oappend ("%es:");
3482 ptr_reg (code, sizeflag);
3483 }
3484
3485 static void
3486 OP_DSreg (code, sizeflag)
3487 int code;
3488 int sizeflag;
3489 {
3490 if ((prefixes
3491 & (PREFIX_CS
3492 | PREFIX_DS
3493 | PREFIX_SS
3494 | PREFIX_ES
3495 | PREFIX_FS
3496 | PREFIX_GS)) == 0)
3497 prefixes |= PREFIX_DS;
3498 append_seg();
3499 ptr_reg (code, sizeflag);
3500 }
3501
3502 /* ARGSUSED */
3503 static void
3504 OP_C (dummy, sizeflag)
3505 int dummy ATTRIBUTE_UNUSED;
3506 int sizeflag ATTRIBUTE_UNUSED;
3507 {
3508 sprintf (scratchbuf, "%%cr%d", reg);
3509 oappend (scratchbuf);
3510 }
3511
3512 /* ARGSUSED */
3513 static void
3514 OP_D (dummy, sizeflag)
3515 int dummy ATTRIBUTE_UNUSED;
3516 int sizeflag ATTRIBUTE_UNUSED;
3517 {
3518 sprintf (scratchbuf, "%%db%d", reg);
3519 oappend (scratchbuf);
3520 }
3521
3522 /* ARGSUSED */
3523 static void
3524 OP_T (dummy, sizeflag)
3525 int dummy ATTRIBUTE_UNUSED;
3526 int sizeflag ATTRIBUTE_UNUSED;
3527 {
3528 sprintf (scratchbuf, "%%tr%d", reg);
3529 oappend (scratchbuf);
3530 }
3531
3532 static void
3533 OP_Rd (bytemode, sizeflag)
3534 int bytemode;
3535 int sizeflag;
3536 {
3537 if (mod == 3)
3538 OP_E (bytemode, sizeflag);
3539 else
3540 BadOp();
3541 }
3542
3543 static void
3544 OP_MMX (ignore, sizeflag)
3545 int ignore ATTRIBUTE_UNUSED;
3546 int sizeflag ATTRIBUTE_UNUSED;
3547 {
3548 sprintf (scratchbuf, "%%mm%d", reg);
3549 oappend (scratchbuf);
3550 }
3551
3552 static void
3553 OP_XMM (bytemode, sizeflag)
3554 int bytemode ATTRIBUTE_UNUSED;
3555 int sizeflag ATTRIBUTE_UNUSED;
3556 {
3557 sprintf (scratchbuf, "%%xmm%d", reg);
3558 oappend (scratchbuf);
3559 }
3560
3561 static void
3562 OP_EM (bytemode, sizeflag)
3563 int bytemode;
3564 int sizeflag;
3565 {
3566 if (mod != 3)
3567 {
3568 OP_E (bytemode, sizeflag);
3569 return;
3570 }
3571
3572 codep++;
3573 sprintf (scratchbuf, "%%mm%d", rm);
3574 oappend (scratchbuf);
3575 }
3576
3577 static void
3578 OP_EX (bytemode, sizeflag)
3579 int bytemode;
3580 int sizeflag;
3581 {
3582 if (mod != 3)
3583 {
3584 OP_E (bytemode, sizeflag);
3585 return;
3586 }
3587
3588 codep++;
3589 sprintf (scratchbuf, "%%xmm%d", rm);
3590 oappend (scratchbuf);
3591 }
3592
3593 static void
3594 OP_MS (bytemode, sizeflag)
3595 int bytemode;
3596 int sizeflag;
3597 {
3598 if (mod == 3)
3599 OP_EM (bytemode, sizeflag);
3600 else
3601 BadOp();
3602 }
3603
3604 static const char *Suffix3DNow[] = {
3605 /* 00 */ NULL, NULL, NULL, NULL,
3606 /* 04 */ NULL, NULL, NULL, NULL,
3607 /* 08 */ NULL, NULL, NULL, NULL,
3608 /* 0C */ "pi2fw", "pi2fd", NULL, NULL,
3609 /* 10 */ NULL, NULL, NULL, NULL,
3610 /* 14 */ NULL, NULL, NULL, NULL,
3611 /* 18 */ NULL, NULL, NULL, NULL,
3612 /* 1C */ "pf2iw", "pf2id", NULL, NULL,
3613 /* 20 */ NULL, NULL, NULL, NULL,
3614 /* 24 */ NULL, NULL, NULL, NULL,
3615 /* 28 */ NULL, NULL, NULL, NULL,
3616 /* 2C */ NULL, NULL, NULL, NULL,
3617 /* 30 */ NULL, NULL, NULL, NULL,
3618 /* 34 */ NULL, NULL, NULL, NULL,
3619 /* 38 */ NULL, NULL, NULL, NULL,
3620 /* 3C */ NULL, NULL, NULL, NULL,
3621 /* 40 */ NULL, NULL, NULL, NULL,
3622 /* 44 */ NULL, NULL, NULL, NULL,
3623 /* 48 */ NULL, NULL, NULL, NULL,
3624 /* 4C */ NULL, NULL, NULL, NULL,
3625 /* 50 */ NULL, NULL, NULL, NULL,
3626 /* 54 */ NULL, NULL, NULL, NULL,
3627 /* 58 */ NULL, NULL, NULL, NULL,
3628 /* 5C */ NULL, NULL, NULL, NULL,
3629 /* 60 */ NULL, NULL, NULL, NULL,
3630 /* 64 */ NULL, NULL, NULL, NULL,
3631 /* 68 */ NULL, NULL, NULL, NULL,
3632 /* 6C */ NULL, NULL, NULL, NULL,
3633 /* 70 */ NULL, NULL, NULL, NULL,
3634 /* 74 */ NULL, NULL, NULL, NULL,
3635 /* 78 */ NULL, NULL, NULL, NULL,
3636 /* 7C */ NULL, NULL, NULL, NULL,
3637 /* 80 */ NULL, NULL, NULL, NULL,
3638 /* 84 */ NULL, NULL, NULL, NULL,
3639 /* 88 */ NULL, NULL, "pfnacc", NULL,
3640 /* 8C */ NULL, NULL, "pfpnacc", NULL,
3641 /* 90 */ "pfcmpge", NULL, NULL, NULL,
3642 /* 94 */ "pfmin", NULL, "pfrcp", "pfrsqrt",
3643 /* 98 */ NULL, NULL, "pfsub", NULL,
3644 /* 9C */ NULL, NULL, "pfadd", NULL,
3645 /* A0 */ "pfcmpgt", NULL, NULL, NULL,
3646 /* A4 */ "pfmax", NULL, "pfrcpit1", "pfrsqit1",
3647 /* A8 */ NULL, NULL, "pfsubr", NULL,
3648 /* AC */ NULL, NULL, "pfacc", NULL,
3649 /* B0 */ "pfcmpeq", NULL, NULL, NULL,
3650 /* B4 */ "pfmul", NULL, "pfrcpit2", "pfmulhrw",
3651 /* B8 */ NULL, NULL, NULL, "pswapd",
3652 /* BC */ NULL, NULL, NULL, "pavgusb",
3653 /* C0 */ NULL, NULL, NULL, NULL,
3654 /* C4 */ NULL, NULL, NULL, NULL,
3655 /* C8 */ NULL, NULL, NULL, NULL,
3656 /* CC */ NULL, NULL, NULL, NULL,
3657 /* D0 */ NULL, NULL, NULL, NULL,
3658 /* D4 */ NULL, NULL, NULL, NULL,
3659 /* D8 */ NULL, NULL, NULL, NULL,
3660 /* DC */ NULL, NULL, NULL, NULL,
3661 /* E0 */ NULL, NULL, NULL, NULL,
3662 /* E4 */ NULL, NULL, NULL, NULL,
3663 /* E8 */ NULL, NULL, NULL, NULL,
3664 /* EC */ NULL, NULL, NULL, NULL,
3665 /* F0 */ NULL, NULL, NULL, NULL,
3666 /* F4 */ NULL, NULL, NULL, NULL,
3667 /* F8 */ NULL, NULL, NULL, NULL,
3668 /* FC */ NULL, NULL, NULL, NULL,
3669 };
3670
3671 static void
3672 OP_3DNowSuffix (bytemode, sizeflag)
3673 int bytemode ATTRIBUTE_UNUSED;
3674 int sizeflag ATTRIBUTE_UNUSED;
3675 {
3676 const char *mnemonic;
3677
3678 FETCH_DATA (the_info, codep + 1);
3679 /* AMD 3DNow! instructions are specified by an opcode suffix in the
3680 place where an 8-bit immediate would normally go. ie. the last
3681 byte of the instruction. */
3682 obufp = obuf + strlen(obuf);
3683 mnemonic = Suffix3DNow[*codep++ & 0xff];
3684 if (mnemonic)
3685 oappend (mnemonic);
3686 else
3687 {
3688 /* Since a variable sized modrm/sib chunk is between the start
3689 of the opcode (0x0f0f) and the opcode suffix, we need to do
3690 all the modrm processing first, and don't know until now that
3691 we have a bad opcode. This necessitates some cleaning up. */
3692 op1out[0] = '\0';
3693 op2out[0] = '\0';
3694 BadOp();
3695 }
3696 }
3697
3698
3699 static const char *simd_cmp_op [] = {
3700 "eq",
3701 "lt",
3702 "le",
3703 "unord",
3704 "neq",
3705 "nlt",
3706 "nle",
3707 "ord"
3708 };
3709
3710 static void
3711 OP_SIMD_Suffix (bytemode, sizeflag)
3712 int bytemode ATTRIBUTE_UNUSED;
3713 int sizeflag ATTRIBUTE_UNUSED;
3714 {
3715 unsigned int cmp_type;
3716
3717 FETCH_DATA (the_info, codep + 1);
3718 obufp = obuf + strlen(obuf);
3719 cmp_type = *codep++ & 0xff;
3720 if (cmp_type < 8)
3721 {
3722 sprintf (scratchbuf, "cmp%s%cs",
3723 simd_cmp_op[cmp_type],
3724 prefixes & PREFIX_REPZ ? 's' : 'p');
3725 used_prefixes |= (prefixes & PREFIX_REPZ);
3726 oappend (scratchbuf);
3727 }
3728 else
3729 {
3730 /* We have a bad extension byte. Clean up. */
3731 op1out[0] = '\0';
3732 op2out[0] = '\0';
3733 BadOp();
3734 }
3735 }
3736
3737 static void
3738 SIMD_Fixup (extrachar, sizeflag)
3739 int extrachar;
3740 int sizeflag ATTRIBUTE_UNUSED;
3741 {
3742 /* Change movlps/movhps to movhlps/movlhps for 2 register operand
3743 forms of these instructions. */
3744 if (mod == 3)
3745 {
3746 char *p = obuf + strlen(obuf);
3747 *(p+1) = '\0';
3748 *p = *(p-1);
3749 *(p-1) = *(p-2);
3750 *(p-2) = *(p-3);
3751 *(p-3) = extrachar;
3752 }
3753 }
3754
3755 static void BadOp (void)
3756 {
3757 codep = insn_codep + 1; /* throw away prefixes and 1st. opcode byte */
3758 oappend ("(bad)");
3759 }
git-cvsimport of binutils cvsroot