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