2 a84cbb2a 2004-04-19 devnull * 386 definition
4 a84cbb2a 2004-04-19 devnull #include <u.h>
5 a84cbb2a 2004-04-19 devnull #include <libc.h>
6 a84cbb2a 2004-04-19 devnull #include <bio.h>
7 a84cbb2a 2004-04-19 devnull #include <mach.h>
8 a84cbb2a 2004-04-19 devnull #include "ureg386.h"
10 a84cbb2a 2004-04-19 devnull #define REGOFF(x) (ulong)(&((struct Ureg *) 0)->x)
12 a84cbb2a 2004-04-19 devnull #define REGSIZE sizeof(struct Ureg)
13 a84cbb2a 2004-04-19 devnull #define FP_CTL(x) (REGSIZE+4*(x))
14 a84cbb2a 2004-04-19 devnull #define FP_REG(x) (FP_CTL(7)+10*(x))
15 a84cbb2a 2004-04-19 devnull #define FPREGSIZE (6*4+8*10)
18 a84cbb2a 2004-04-19 devnull * i386-specific debugger interface
21 a84cbb2a 2004-04-19 devnull static char *i386excep(Map*, Regs*);
24 a84cbb2a 2004-04-19 devnull static int i386trace(Map*, ulong, ulong, ulong, Tracer);
25 a84cbb2a 2004-04-19 devnull static ulong i386frame(Map*, ulong, ulong, ulong, ulong);
27 a84cbb2a 2004-04-19 devnull static int i386foll(Map*, Regs*, ulong, ulong*);
28 a84cbb2a 2004-04-19 devnull static int i386hexinst(Map*, ulong, char*, int);
29 a84cbb2a 2004-04-19 devnull static int i386das(Map*, ulong, char, char*, int);
30 a84cbb2a 2004-04-19 devnull static int i386instlen(Map*, ulong);
31 1cc215aa 2004-12-25 devnull static int i386unwind(Map*, Regs*, ulong*, Symbol*);
33 cbeb0b26 2006-04-01 devnull static char *i386windregs[] = {
46 a84cbb2a 2004-04-19 devnull static Regdesc i386reglist[] = {
47 a84cbb2a 2004-04-19 devnull {"DI", REGOFF(di), RINT, 'X'},
48 a84cbb2a 2004-04-19 devnull {"SI", REGOFF(si), RINT, 'X'},
49 a84cbb2a 2004-04-19 devnull {"BP", REGOFF(bp), RINT, 'X'},
50 a84cbb2a 2004-04-19 devnull {"BX", REGOFF(bx), RINT, 'X'},
51 a84cbb2a 2004-04-19 devnull {"DX", REGOFF(dx), RINT, 'X'},
52 a84cbb2a 2004-04-19 devnull {"CX", REGOFF(cx), RINT, 'X'},
53 a84cbb2a 2004-04-19 devnull {"AX", REGOFF(ax), RINT, 'X'},
54 a84cbb2a 2004-04-19 devnull {"GS", REGOFF(gs), RINT, 'X'},
55 a84cbb2a 2004-04-19 devnull {"FS", REGOFF(fs), RINT, 'X'},
56 a84cbb2a 2004-04-19 devnull {"ES", REGOFF(es), RINT, 'X'},
57 a84cbb2a 2004-04-19 devnull {"DS", REGOFF(ds), RINT, 'X'},
58 a84cbb2a 2004-04-19 devnull {"TRAP", REGOFF(trap), RINT, 'X'},
59 a84cbb2a 2004-04-19 devnull {"ECODE", REGOFF(ecode), RINT, 'X'},
60 a84cbb2a 2004-04-19 devnull {"PC", REGOFF(pc), RINT, 'X'},
61 a84cbb2a 2004-04-19 devnull {"CS", REGOFF(cs), RINT, 'X'},
62 a84cbb2a 2004-04-19 devnull {"EFLAGS", REGOFF(flags), RINT, 'X'},
63 a84cbb2a 2004-04-19 devnull {"SP", REGOFF(sp), RINT, 'X'},
64 a84cbb2a 2004-04-19 devnull {"SS", REGOFF(ss), RINT, 'X'},
66 a84cbb2a 2004-04-19 devnull {"E0", FP_CTL(0), RFLT, 'X'},
67 a84cbb2a 2004-04-19 devnull {"E1", FP_CTL(1), RFLT, 'X'},
68 a84cbb2a 2004-04-19 devnull {"E2", FP_CTL(2), RFLT, 'X'},
69 a84cbb2a 2004-04-19 devnull {"E3", FP_CTL(3), RFLT, 'X'},
70 a84cbb2a 2004-04-19 devnull {"E4", FP_CTL(4), RFLT, 'X'},
71 a84cbb2a 2004-04-19 devnull {"E5", FP_CTL(5), RFLT, 'X'},
72 a84cbb2a 2004-04-19 devnull {"E6", FP_CTL(6), RFLT, 'X'},
73 a84cbb2a 2004-04-19 devnull {"F0", FP_REG(7), RFLT, '3'},
74 a84cbb2a 2004-04-19 devnull {"F1", FP_REG(6), RFLT, '3'},
75 a84cbb2a 2004-04-19 devnull {"F2", FP_REG(5), RFLT, '3'},
76 a84cbb2a 2004-04-19 devnull {"F3", FP_REG(4), RFLT, '3'},
77 a84cbb2a 2004-04-19 devnull {"F4", FP_REG(3), RFLT, '3'},
78 a84cbb2a 2004-04-19 devnull {"F5", FP_REG(2), RFLT, '3'},
79 a84cbb2a 2004-04-19 devnull {"F6", FP_REG(1), RFLT, '3'},
80 a84cbb2a 2004-04-19 devnull {"F7", FP_REG(0), RFLT, '3'},
84 a84cbb2a 2004-04-19 devnull Mach mach386 =
87 a84cbb2a 2004-04-19 devnull M386, /* machine type */
88 a84cbb2a 2004-04-19 devnull i386reglist, /* register list */
89 a84cbb2a 2004-04-19 devnull REGSIZE, /* size of registers in bytes */
90 a84cbb2a 2004-04-19 devnull FPREGSIZE, /* size of fp registers in bytes */
91 a84cbb2a 2004-04-19 devnull "PC", /* name of PC */
92 a84cbb2a 2004-04-19 devnull "SP", /* name of SP */
93 a84cbb2a 2004-04-19 devnull "BP", /* name of FP */
94 a84cbb2a 2004-04-19 devnull 0, /* link register */
95 a84cbb2a 2004-04-19 devnull "setSB", /* static base register name (bogus anyways) */
96 a84cbb2a 2004-04-19 devnull 0, /* static base register value */
97 a84cbb2a 2004-04-19 devnull 0x1000, /* page size */
98 a84cbb2a 2004-04-19 devnull 0x80100000, /* kernel base */
99 a84cbb2a 2004-04-19 devnull 0, /* kernel text mask */
100 a84cbb2a 2004-04-19 devnull 1, /* quantization of pc */
101 a84cbb2a 2004-04-19 devnull 4, /* szaddr */
102 a84cbb2a 2004-04-19 devnull 4, /* szreg */
103 a84cbb2a 2004-04-19 devnull 4, /* szfloat */
104 a84cbb2a 2004-04-19 devnull 8, /* szdouble */
106 a84cbb2a 2004-04-19 devnull i386windregs, /* locations unwound in stack trace */
109 a84cbb2a 2004-04-19 devnull {0xCC, 0, 0, 0}, /* break point: INT 3 */
110 a84cbb2a 2004-04-19 devnull 1, /* break point size */
112 a84cbb2a 2004-04-19 devnull i386foll, /* following addresses */
113 a84cbb2a 2004-04-19 devnull i386excep, /* print exception */
114 a84cbb2a 2004-04-19 devnull i386unwind, /* stack unwind */
116 a84cbb2a 2004-04-19 devnull leswap2, /* convert short to local byte order */
117 a84cbb2a 2004-04-19 devnull leswap4, /* convert long to local byte order */
118 a84cbb2a 2004-04-19 devnull leswap8, /* convert vlong to local byte order */
119 a84cbb2a 2004-04-19 devnull leieeeftoa32, /* single precision float pointer */
120 a84cbb2a 2004-04-19 devnull leieeeftoa64, /* double precision float pointer */
121 a84cbb2a 2004-04-19 devnull leieeeftoa80, /* long double precision floating point */
123 a84cbb2a 2004-04-19 devnull i386das, /* dissembler */
124 a84cbb2a 2004-04-19 devnull i386das, /* plan9-format disassembler */
125 a84cbb2a 2004-04-19 devnull 0, /* commercial disassembler */
126 a84cbb2a 2004-04-19 devnull i386hexinst, /* print instruction */
127 a84cbb2a 2004-04-19 devnull i386instlen, /* instruction size calculation */
131 1cc215aa 2004-12-25 devnull * The wrapper code around Linux system calls
132 1cc215aa 2004-12-25 devnull * saves AX on the stack before calling some calls
133 1cc215aa 2004-12-25 devnull * (at least, __libc_nanosleep), when running in
134 1cc215aa 2004-12-25 devnull * threaded programs.
136 1cc215aa 2004-12-25 devnull static void
137 1cc215aa 2004-12-25 devnull syscallhack(Map *map, Regs *regs, int *spoff)
139 1cc215aa 2004-12-25 devnull ulong pc;
140 1cc215aa 2004-12-25 devnull char buf[60];
142 1cc215aa 2004-12-25 devnull rget(regs, "PC", &pc);
143 1cc215aa 2004-12-25 devnull if(i386das(map, pc-2, 0, buf, sizeof buf) != 2 || strncmp(buf, "INTB\t$", 6) != 0)
145 1cc215aa 2004-12-25 devnull if(i386das(map, pc, 0, buf, sizeof buf) != 2 || strcmp(buf, "MOVL\tDX,BX") != 0)
147 1cc215aa 2004-12-25 devnull if(i386das(map, pc+2, 0, buf, sizeof buf) != 3 || strcmp(buf, "XCHGL\tAX,0(SP)") != 0)
149 1cc215aa 2004-12-25 devnull *spoff += 4;
152 a84cbb2a 2004-04-19 devnull static int
153 1cc215aa 2004-12-25 devnull i386unwind(Map *map, Regs *regs, ulong *next, Symbol *sym)
155 1cc215aa 2004-12-25 devnull int i, isp, ipc, ibp, havebp, n, spoff, off[9];
156 1cc215aa 2004-12-25 devnull ulong pc;
157 a84cbb2a 2004-04-19 devnull u32int v;
158 1cc215aa 2004-12-25 devnull char buf[60], *p;
160 cbeb0b26 2006-04-01 devnull /*print("i386unwind %s\n", sym ? sym->name : nil); */
161 a84cbb2a 2004-04-19 devnull isp = windindex("SP");
162 a84cbb2a 2004-04-19 devnull ipc = windindex("PC");
163 a84cbb2a 2004-04-19 devnull ibp = windindex("BP");
164 a84cbb2a 2004-04-19 devnull if(isp < 0 || ipc < 0 || ibp < 0){
165 a84cbb2a 2004-04-19 devnull werrstr("i386unwind: cannot happen");
166 a84cbb2a 2004-04-19 devnull return -1;
170 1cc215aa 2004-12-25 devnull * Disassemble entry to figure out
171 1cc215aa 2004-12-25 devnull * where values have been saved.
172 1cc215aa 2004-12-25 devnull * Perhaps should disassemble exit path
173 1cc215aa 2004-12-25 devnull * instead -- a random walk on the code
174 1cc215aa 2004-12-25 devnull * should suffice to get us to a RET.
176 1cc215aa 2004-12-25 devnull if(sym){
177 1cc215aa 2004-12-25 devnull pc = sym->loc.addr;
178 cbeb0b26 2006-04-01 devnull /*print("startpc %lux\n", pc); */
179 1cc215aa 2004-12-25 devnull memset(off, 0xff, sizeof off);
180 1cc215aa 2004-12-25 devnull spoff = 0;
181 1cc215aa 2004-12-25 devnull havebp = 0;
182 1cc215aa 2004-12-25 devnull for(;;){
183 1cc215aa 2004-12-25 devnull if((n = i386das(map, pc, 0, buf, sizeof buf)) < 0)
185 cbeb0b26 2006-04-01 devnull /*print("%s\n", buf); */
186 1cc215aa 2004-12-25 devnull pc += n;
187 1cc215aa 2004-12-25 devnull if(strncmp(buf, "PUSHL\t", 6) == 0){
188 1cc215aa 2004-12-25 devnull spoff += 4;
189 1cc215aa 2004-12-25 devnull if((i = windindex(buf+6)) >= 0)
190 1cc215aa 2004-12-25 devnull off[i] = spoff;
191 1cc215aa 2004-12-25 devnull }else if(strcmp(buf, "MOVL\tSP,BP") == 0 && spoff == 4 && off[ibp] == 4){
192 1cc215aa 2004-12-25 devnull havebp = 1;
193 1cc215aa 2004-12-25 devnull }else if(strncmp(buf, "SUBL\t$", 6) == 0){
194 1cc215aa 2004-12-25 devnull if((p = strrchr(buf, ',')) && strcmp(p, ",SP") == 0){
195 cbeb0b26 2006-04-01 devnull /*print("spoff %s\n", buf+6); */
196 1cc215aa 2004-12-25 devnull spoff += strtol(buf+6, 0, 16);
199 1cc215aa 2004-12-25 devnull }else if(strncmp(buf, "XORL\t", 5) == 0 || strncmp(buf, "MOVL\t", 5) == 0){
201 1cc215aa 2004-12-25 devnull * Hope these are rescheduled non-prologue instructions
202 1cc215aa 2004-12-25 devnull * like XORL AX, AX or MOVL $0x3, AX and thus ignorable.
208 1cc215aa 2004-12-25 devnull syscallhack(map, regs, &spoff);
210 1cc215aa 2004-12-25 devnull if(havebp){
211 cbeb0b26 2006-04-01 devnull /*print("havebp\n"); */
212 1cc215aa 2004-12-25 devnull rget(regs, "BP", &next[isp]);
213 1cc215aa 2004-12-25 devnull get4(map, next[isp], &v);
214 1cc215aa 2004-12-25 devnull next[ibp] = v;
215 1cc215aa 2004-12-25 devnull next[isp] += 4;
217 1cc215aa 2004-12-25 devnull rget(regs, "SP", &next[isp]);
218 cbeb0b26 2006-04-01 devnull /*print("old sp %lux + %d\n", next[isp], spoff); */
219 1cc215aa 2004-12-25 devnull next[isp] += spoff;
221 1cc215aa 2004-12-25 devnull for(i=0; i<nelem(off); i++)
222 1cc215aa 2004-12-25 devnull if(off[i] != -1){
223 1cc215aa 2004-12-25 devnull get4(map, next[isp]-off[i], &v);
224 1cc215aa 2004-12-25 devnull next[i] = v;
227 1cc215aa 2004-12-25 devnull if(get4(map, next[isp], &v) < 0)
228 1cc215aa 2004-12-25 devnull return -1;
229 cbeb0b26 2006-04-01 devnull /*print("new pc %lux => %lux\n", next[isp], v); */
230 1cc215aa 2004-12-25 devnull next[ipc] = v;
231 1cc215aa 2004-12-25 devnull next[isp] += 4;
232 1cc215aa 2004-12-25 devnull return 0;
236 1cc215aa 2004-12-25 devnull * Rely on bp chaining
238 1cc215aa 2004-12-25 devnull if(rget(regs, "BP", &next[isp]) < 0
239 1cc215aa 2004-12-25 devnull || get4(map, next[isp], &v) < 0)
240 a84cbb2a 2004-04-19 devnull return -1;
241 1cc215aa 2004-12-25 devnull next[ibp] = v;
242 1cc215aa 2004-12-25 devnull next[isp] += 4;
243 1cc215aa 2004-12-25 devnull if(get4(map, next[isp], &v) < 0)
244 1cc215aa 2004-12-25 devnull return -1;
245 a84cbb2a 2004-04-19 devnull next[ipc] = v;
246 1cc215aa 2004-12-25 devnull next[isp] += 4;
247 1cc215aa 2004-12-25 devnull return 0;
250 cbeb0b26 2006-04-01 devnull /*static char STARTSYM[] = "_main"; */
251 cbeb0b26 2006-04-01 devnull /*static char PROFSYM[] = "_mainp"; */
252 a84cbb2a 2004-04-19 devnull static char FRAMENAME[] = ".frame";
253 a84cbb2a 2004-04-19 devnull static char *excname[] =
255 20b33daf 2004-04-20 devnull "divide error", /* 0 */
256 20b33daf 2004-04-20 devnull "debug exception", /* 1 */
257 20b33daf 2004-04-20 devnull 0,0, /* 2, 3 */
258 20b33daf 2004-04-20 devnull "overflow", /* 4 */
259 20b33daf 2004-04-20 devnull "bounds check", /* 5 */
260 20b33daf 2004-04-20 devnull "invalid opcode", /* 6 */
261 20b33daf 2004-04-20 devnull "math coprocessor emulation", /* 7 */
262 20b33daf 2004-04-20 devnull "double fault", /* 8 */
263 20b33daf 2004-04-20 devnull "math coprocessor overrun", /* 9 */
264 20b33daf 2004-04-20 devnull "invalid TSS", /* 10 */
265 20b33daf 2004-04-20 devnull "segment not present", /* 11 */
266 20b33daf 2004-04-20 devnull "stack exception", /* 12 */
267 20b33daf 2004-04-20 devnull "general protection violation", /* 13 */
268 20b33daf 2004-04-20 devnull "page fault", /* 14 */
269 20b33daf 2004-04-20 devnull 0, /* 15 */
270 20b33daf 2004-04-20 devnull "math coprocessor error", /* 16 */
271 20b33daf 2004-04-20 devnull 0,0,0,0,0,0,0, /* 17-23 */
272 20b33daf 2004-04-20 devnull "clock", /* 24 */
273 20b33daf 2004-04-20 devnull "keyboard", /* 25 */
274 20b33daf 2004-04-20 devnull 0, /* 26 */
275 20b33daf 2004-04-20 devnull "modem status", /* 27 */
276 20b33daf 2004-04-20 devnull "serial line status", /* 28 */
277 20b33daf 2004-04-20 devnull 0, /* 29 */
278 20b33daf 2004-04-20 devnull "floppy disk", /* 30 */
279 20b33daf 2004-04-20 devnull 0,0,0,0,0, /* 31-35 */
280 20b33daf 2004-04-20 devnull "mouse", /* 36 */
281 20b33daf 2004-04-20 devnull "math coprocessor", /* 37 */
282 20b33daf 2004-04-20 devnull "hard disk", /* 38 */
283 20b33daf 2004-04-20 devnull 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,/* 39-54 */
284 20b33daf 2004-04-20 devnull 0,0,0,0,0,0,0,0,0, /* 55-63 */
285 20b33daf 2004-04-20 devnull "system call", /* 64 */
288 a84cbb2a 2004-04-19 devnull static char*
289 a84cbb2a 2004-04-19 devnull i386excep(Map *map, Regs *regs)
291 a84cbb2a 2004-04-19 devnull ulong c;
292 a84cbb2a 2004-04-19 devnull ulong pc;
293 a84cbb2a 2004-04-19 devnull static char buf[16];
295 a84cbb2a 2004-04-19 devnull if(rget(regs, "TRAP", &c) < 0)
296 a84cbb2a 2004-04-19 devnull return "no trap register";
298 a84cbb2a 2004-04-19 devnull if(c > 64 || excname[c] == 0) {
299 a84cbb2a 2004-04-19 devnull if (c == 3) {
300 a84cbb2a 2004-04-19 devnull if (rget(regs, "PC", &pc) >= 0)
301 a84cbb2a 2004-04-19 devnull if (get1(map, pc, (uchar*)buf, mach->bpsize) > 0)
302 a84cbb2a 2004-04-19 devnull if (memcmp(buf, mach->bpinst, mach->bpsize) == 0)
303 a84cbb2a 2004-04-19 devnull return "breakpoint";
305 a84cbb2a 2004-04-19 devnull sprint(buf, "exception %ld", c);
306 a84cbb2a 2004-04-19 devnull return buf;
308 a84cbb2a 2004-04-19 devnull return excname[c];
311 a84cbb2a 2004-04-19 devnull /* I386/486 - Disassembler and related functions */
314 a84cbb2a 2004-04-19 devnull * an instruction
316 a84cbb2a 2004-04-19 devnull typedef struct Instr Instr;
317 a84cbb2a 2004-04-19 devnull struct Instr
319 a84cbb2a 2004-04-19 devnull uchar mem[1+1+1+1+2+1+1+4+4]; /* raw instruction */
320 a84cbb2a 2004-04-19 devnull ulong addr; /* address of start of instruction */
321 a84cbb2a 2004-04-19 devnull int n; /* number of bytes in instruction */
322 a84cbb2a 2004-04-19 devnull char *prefix; /* instr prefix */
323 a84cbb2a 2004-04-19 devnull char *segment; /* segment override */
324 a84cbb2a 2004-04-19 devnull uchar jumptype; /* set to the operand type for jump/ret/call */
325 a84cbb2a 2004-04-19 devnull char osize; /* 'W' or 'L' */
326 a84cbb2a 2004-04-19 devnull char asize; /* address size 'W' or 'L' */
327 a84cbb2a 2004-04-19 devnull uchar mod; /* bits 6-7 of mod r/m field */
328 a84cbb2a 2004-04-19 devnull uchar reg; /* bits 3-5 of mod r/m field */
329 1c171e3a 2005-07-19 devnull schar ss; /* bits 6-7 of SIB */
330 1c171e3a 2005-07-19 devnull schar index; /* bits 3-5 of SIB */
331 1c171e3a 2005-07-19 devnull schar base; /* bits 0-2 of SIB */
332 a84cbb2a 2004-04-19 devnull short seg; /* segment of far address */
333 a84cbb2a 2004-04-19 devnull ulong disp; /* displacement */
334 a84cbb2a 2004-04-19 devnull ulong imm; /* immediate */
335 a84cbb2a 2004-04-19 devnull ulong imm2; /* second immediate operand */
336 a84cbb2a 2004-04-19 devnull char *curr; /* fill level in output buffer */
337 a84cbb2a 2004-04-19 devnull char *end; /* end of output buffer */
338 a84cbb2a 2004-04-19 devnull char *err; /* error message */
341 a84cbb2a 2004-04-19 devnull /* 386 register (ha!) set */
352 a84cbb2a 2004-04-19 devnull /* Operand Format codes */
354 a84cbb2a 2004-04-19 devnull %A - address size register modifier (!asize -> 'E')
355 a84cbb2a 2004-04-19 devnull %C - Control register CR0/CR1/CR2
356 a84cbb2a 2004-04-19 devnull %D - Debug register DR0/DR1/DR2/DR3/DR6/DR7
357 a84cbb2a 2004-04-19 devnull %I - second immediate operand
358 a84cbb2a 2004-04-19 devnull %O - Operand size register modifier (!osize -> 'E')
359 a84cbb2a 2004-04-19 devnull %T - Test register TR6/TR7
360 a84cbb2a 2004-04-19 devnull %S - size code ('W' or 'L')
361 a84cbb2a 2004-04-19 devnull %X - Weird opcode: OSIZE == 'W' => "CBW"; else => "CWDE"
362 a84cbb2a 2004-04-19 devnull %d - displacement 16-32 bits
363 a84cbb2a 2004-04-19 devnull %e - effective address - Mod R/M value
364 a84cbb2a 2004-04-19 devnull %f - floating point register F0-F7 - from Mod R/M register
365 a84cbb2a 2004-04-19 devnull %g - segment register
366 a84cbb2a 2004-04-19 devnull %i - immediate operand 8-32 bits
367 a84cbb2a 2004-04-19 devnull %p - PC-relative - signed displacement in immediate field
368 a84cbb2a 2004-04-19 devnull %r - Reg from Mod R/M
369 a84cbb2a 2004-04-19 devnull %x - Weird opcode: OSIZE == 'W' => "CWD"; else => "CDQ"
372 a84cbb2a 2004-04-19 devnull typedef struct Optable Optable;
373 a84cbb2a 2004-04-19 devnull struct Optable
375 a84cbb2a 2004-04-19 devnull char operand[2];
376 a84cbb2a 2004-04-19 devnull void *proto; /* actually either (char*) or (Optable*) */
378 a84cbb2a 2004-04-19 devnull /* Operand decoding codes */
380 a84cbb2a 2004-04-19 devnull Ib = 1, /* 8-bit immediate - (no sign extension)*/
381 a84cbb2a 2004-04-19 devnull Ibs, /* 8-bit immediate (sign extended) */
382 a84cbb2a 2004-04-19 devnull Jbs, /* 8-bit sign-extended immediate in jump or call */
383 a84cbb2a 2004-04-19 devnull Iw, /* 16-bit immediate -> imm */
384 a84cbb2a 2004-04-19 devnull Iw2, /* 16-bit immediate -> imm2 */
385 a84cbb2a 2004-04-19 devnull Iwd, /* Operand-sized immediate (no sign extension)*/
386 a84cbb2a 2004-04-19 devnull Awd, /* Address offset */
387 a84cbb2a 2004-04-19 devnull Iwds, /* Operand-sized immediate (sign extended) */
388 a84cbb2a 2004-04-19 devnull RM, /* Word or long R/M field with register (/r) */
389 a84cbb2a 2004-04-19 devnull RMB, /* Byte R/M field with register (/r) */
390 a84cbb2a 2004-04-19 devnull RMOP, /* Word or long R/M field with op code (/digit) */
391 a84cbb2a 2004-04-19 devnull RMOPB, /* Byte R/M field with op code (/digit) */
392 a84cbb2a 2004-04-19 devnull RMR, /* R/M register only (mod = 11) */
393 a84cbb2a 2004-04-19 devnull RMM, /* R/M memory only (mod = 0/1/2) */
394 a84cbb2a 2004-04-19 devnull R0, /* Base reg of Mod R/M is literal 0x00 */
395 a84cbb2a 2004-04-19 devnull R1, /* Base reg of Mod R/M is literal 0x01 */
396 a84cbb2a 2004-04-19 devnull FRMOP, /* Floating point R/M field with opcode */
397 a84cbb2a 2004-04-19 devnull FRMEX, /* Extended floating point R/M field with opcode */
398 a84cbb2a 2004-04-19 devnull JUMP, /* Jump or Call flag - no operand */
399 a84cbb2a 2004-04-19 devnull RET, /* Return flag - no operand */
400 a84cbb2a 2004-04-19 devnull OA, /* literal 0x0a byte */
401 a84cbb2a 2004-04-19 devnull PTR, /* Seg:Displacement addr (ptr16:16 or ptr16:32) */
402 a84cbb2a 2004-04-19 devnull AUX, /* Multi-byte op code - Auxiliary table */
403 a84cbb2a 2004-04-19 devnull PRE, /* Instr Prefix */
404 a84cbb2a 2004-04-19 devnull SEG, /* Segment Prefix */
405 a84cbb2a 2004-04-19 devnull OPOVER, /* Operand size override */
406 cbeb0b26 2006-04-01 devnull ADDOVER /* Address size override */
409 a84cbb2a 2004-04-19 devnull static Optable optab0F00[8]=
411 10323cd3 2004-04-19 devnull 0,0, "MOVW LDT,%e", /* 0x00 */
412 10323cd3 2004-04-19 devnull 0,0, "MOVW TR,%e", /* 0x01 */
413 10323cd3 2004-04-19 devnull 0,0, "MOVW %e,LDT", /* 0x02 */
414 10323cd3 2004-04-19 devnull 0,0, "MOVW %e,TR", /* 0x03 */
415 10323cd3 2004-04-19 devnull 0,0, "VERR %e", /* 0x04 */
416 10323cd3 2004-04-19 devnull 0,0, "VERW %e", /* 0x05 */
419 a84cbb2a 2004-04-19 devnull static Optable optab0F01[8]=
421 10323cd3 2004-04-19 devnull 0,0, "MOVL GDTR,%e", /* 0x00 */
422 10323cd3 2004-04-19 devnull 0,0, "MOVL IDTR,%e", /* 0x01 */
423 10323cd3 2004-04-19 devnull 0,0, "MOVL %e,GDTR", /* 0x02 */
424 10323cd3 2004-04-19 devnull 0,0, "MOVL %e,IDTR", /* 0x03 */
425 10323cd3 2004-04-19 devnull 0,0, "MOVW MSW,%e", /* 0x04 */ /* word */
426 10323cd3 2004-04-19 devnull 0,0, "", /* 0x05 */
427 10323cd3 2004-04-19 devnull 0,0, "MOVW %e,MSW", /* 0x06 */ /* word */
430 a84cbb2a 2004-04-19 devnull static Optable optab0FBA[8]=
432 10323cd3 2004-04-19 devnull 0,0, "", /* 0x00 */
433 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
434 10323cd3 2004-04-19 devnull 0,0, "", /* 0x02 */
435 10323cd3 2004-04-19 devnull 0,0, "", /* 0x03 */
436 10323cd3 2004-04-19 devnull Ib,0, "BT%S %i,%e", /* 0x04 */
437 10323cd3 2004-04-19 devnull Ib,0, "BTS%S %i,%e", /* 0x05 */
438 10323cd3 2004-04-19 devnull Ib,0, "BTR%S %i,%e", /* 0x06 */
439 10323cd3 2004-04-19 devnull Ib,0, "BTC%S %i,%e", /* 0x07 */
442 a84cbb2a 2004-04-19 devnull static Optable optab0F[256]=
444 10323cd3 2004-04-19 devnull RMOP,0, optab0F00, /* 0x00 */
445 10323cd3 2004-04-19 devnull RMOP,0, optab0F01, /* 0x01 */
446 10323cd3 2004-04-19 devnull RM,0, "LAR %e,%r", /* 0x02 */
447 10323cd3 2004-04-19 devnull RM,0, "LSL %e,%r", /* 0x03 */
448 10323cd3 2004-04-19 devnull 0,0, "", /* 0x04 */
449 10323cd3 2004-04-19 devnull 0,0, "", /* 0x05 */
450 10323cd3 2004-04-19 devnull 0,0, "CLTS", /* 0x06 */
451 10323cd3 2004-04-19 devnull 0,0, "", /* 0x07 */
452 10323cd3 2004-04-19 devnull 0,0, "INVD", /* 0x08 */
453 10323cd3 2004-04-19 devnull 0,0, "WBINVD", /* 0x09 */
454 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
455 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0b */
456 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0c */
457 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0d */
458 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0e */
459 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0f */
460 10323cd3 2004-04-19 devnull 0,0, "", /* 0x10 */
461 10323cd3 2004-04-19 devnull 0,0, "", /* 0x11 */
462 10323cd3 2004-04-19 devnull 0,0, "", /* 0x12 */
463 10323cd3 2004-04-19 devnull 0,0, "", /* 0x13 */
464 10323cd3 2004-04-19 devnull 0,0, "", /* 0x14 */
465 10323cd3 2004-04-19 devnull 0,0, "", /* 0x15 */
466 10323cd3 2004-04-19 devnull 0,0, "", /* 0x16 */
467 10323cd3 2004-04-19 devnull 0,0, "", /* 0x17 */
468 10323cd3 2004-04-19 devnull 0,0, "", /* 0x18 */
469 10323cd3 2004-04-19 devnull 0,0, "", /* 0x19 */
470 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1a */
471 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1b */
472 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1c */
473 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1d */
474 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1e */
475 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1f */
476 10323cd3 2004-04-19 devnull RMR,0, "MOVL %C,%e", /* 0x20 */
477 10323cd3 2004-04-19 devnull RMR,0, "MOVL %D,%e", /* 0x21 */
478 10323cd3 2004-04-19 devnull RMR,0, "MOVL %e,%C", /* 0x22 */
479 10323cd3 2004-04-19 devnull RMR,0, "MOVL %e,%D", /* 0x23 */
480 10323cd3 2004-04-19 devnull RMR,0, "MOVL %T,%e", /* 0x24 */
481 10323cd3 2004-04-19 devnull 0,0, "", /* 0x25 */
482 10323cd3 2004-04-19 devnull RMR,0, "MOVL %e,%T", /* 0x26 */
483 10323cd3 2004-04-19 devnull 0,0, "", /* 0x27 */
484 10323cd3 2004-04-19 devnull 0,0, "", /* 0x28 */
485 10323cd3 2004-04-19 devnull 0,0, "", /* 0x29 */
486 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2a */
487 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2b */
488 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2c */
489 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2d */
490 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2e */
491 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2f */
492 10323cd3 2004-04-19 devnull 0,0, "WRMSR", /* 0x30 */
493 10323cd3 2004-04-19 devnull 0,0, "RDTSC", /* 0x31 */
494 10323cd3 2004-04-19 devnull 0,0, "RDMSR", /* 0x32 */
495 10323cd3 2004-04-19 devnull 0,0, "", /* 0x33 */
496 10323cd3 2004-04-19 devnull 0,0, "", /* 0x34 */
497 10323cd3 2004-04-19 devnull 0,0, "", /* 0x35 */
498 10323cd3 2004-04-19 devnull 0,0, "", /* 0x36 */
499 10323cd3 2004-04-19 devnull 0,0, "", /* 0x37 */
500 10323cd3 2004-04-19 devnull 0,0, "", /* 0x38 */
501 10323cd3 2004-04-19 devnull 0,0, "", /* 0x39 */
502 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3a */
503 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3b */
504 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3c */
505 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3d */
506 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3e */
507 10323cd3 2004-04-19 devnull 0,0, "", /* 0x3f */
508 10323cd3 2004-04-19 devnull 0,0, "", /* 0x40 */
509 10323cd3 2004-04-19 devnull 0,0, "", /* 0x41 */
510 10323cd3 2004-04-19 devnull 0,0, "", /* 0x42 */
511 10323cd3 2004-04-19 devnull 0,0, "", /* 0x43 */
512 10323cd3 2004-04-19 devnull 0,0, "", /* 0x44 */
513 10323cd3 2004-04-19 devnull 0,0, "", /* 0x45 */
514 10323cd3 2004-04-19 devnull 0,0, "", /* 0x46 */
515 10323cd3 2004-04-19 devnull 0,0, "", /* 0x47 */
516 10323cd3 2004-04-19 devnull 0,0, "", /* 0x48 */
517 10323cd3 2004-04-19 devnull 0,0, "", /* 0x49 */
518 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4a */
519 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4b */
520 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4c */
521 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4d */
522 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4e */
523 10323cd3 2004-04-19 devnull 0,0, "", /* 0x4f */
524 10323cd3 2004-04-19 devnull 0,0, "", /* 0x50 */
525 10323cd3 2004-04-19 devnull 0,0, "", /* 0x51 */
526 10323cd3 2004-04-19 devnull 0,0, "", /* 0x52 */
527 10323cd3 2004-04-19 devnull 0,0, "", /* 0x53 */
528 10323cd3 2004-04-19 devnull 0,0, "", /* 0x54 */
529 10323cd3 2004-04-19 devnull 0,0, "", /* 0x55 */
530 10323cd3 2004-04-19 devnull 0,0, "", /* 0x56 */
531 10323cd3 2004-04-19 devnull 0,0, "", /* 0x57 */
532 10323cd3 2004-04-19 devnull 0,0, "", /* 0x58 */
533 10323cd3 2004-04-19 devnull 0,0, "", /* 0x59 */
534 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5a */
535 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5b */
536 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5c */
537 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5d */
538 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5e */
539 10323cd3 2004-04-19 devnull 0,0, "", /* 0x5f */
540 10323cd3 2004-04-19 devnull 0,0, "", /* 0x60 */
541 10323cd3 2004-04-19 devnull 0,0, "", /* 0x61 */
542 10323cd3 2004-04-19 devnull 0,0, "", /* 0x62 */
543 10323cd3 2004-04-19 devnull 0,0, "", /* 0x63 */
544 10323cd3 2004-04-19 devnull 0,0, "", /* 0x64 */
545 10323cd3 2004-04-19 devnull 0,0, "", /* 0x65 */
546 10323cd3 2004-04-19 devnull 0,0, "", /* 0x66 */
547 10323cd3 2004-04-19 devnull 0,0, "", /* 0x67 */
548 10323cd3 2004-04-19 devnull 0,0, "", /* 0x68 */
549 10323cd3 2004-04-19 devnull 0,0, "", /* 0x69 */
550 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6a */
551 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6b */
552 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6c */
553 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6d */
554 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6e */
555 10323cd3 2004-04-19 devnull 0,0, "", /* 0x6f */
556 10323cd3 2004-04-19 devnull 0,0, "", /* 0x70 */
557 10323cd3 2004-04-19 devnull 0,0, "", /* 0x71 */
558 10323cd3 2004-04-19 devnull 0,0, "", /* 0x72 */
559 10323cd3 2004-04-19 devnull 0,0, "", /* 0x73 */
560 10323cd3 2004-04-19 devnull 0,0, "", /* 0x74 */
561 10323cd3 2004-04-19 devnull 0,0, "", /* 0x75 */
562 10323cd3 2004-04-19 devnull 0,0, "", /* 0x76 */
563 10323cd3 2004-04-19 devnull 0,0, "", /* 0x77 */
564 10323cd3 2004-04-19 devnull 0,0, "", /* 0x78 */
565 10323cd3 2004-04-19 devnull 0,0, "", /* 0x79 */
566 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7a */
567 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7b */
568 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7c */
569 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7d */
570 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7e */
571 10323cd3 2004-04-19 devnull 0,0, "", /* 0x7f */
572 10323cd3 2004-04-19 devnull Iwds,0, "JOS %p", /* 0x80 */
573 10323cd3 2004-04-19 devnull Iwds,0, "JOC %p", /* 0x81 */
574 10323cd3 2004-04-19 devnull Iwds,0, "JCS %p", /* 0x82 */
575 10323cd3 2004-04-19 devnull Iwds,0, "JCC %p", /* 0x83 */
576 10323cd3 2004-04-19 devnull Iwds,0, "JEQ %p", /* 0x84 */
577 10323cd3 2004-04-19 devnull Iwds,0, "JNE %p", /* 0x85 */
578 10323cd3 2004-04-19 devnull Iwds,0, "JLS %p", /* 0x86 */
579 10323cd3 2004-04-19 devnull Iwds,0, "JHI %p", /* 0x87 */
580 10323cd3 2004-04-19 devnull Iwds,0, "JMI %p", /* 0x88 */
581 10323cd3 2004-04-19 devnull Iwds,0, "JPL %p", /* 0x89 */
582 10323cd3 2004-04-19 devnull Iwds,0, "JPS %p", /* 0x8a */
583 10323cd3 2004-04-19 devnull Iwds,0, "JPC %p", /* 0x8b */
584 10323cd3 2004-04-19 devnull Iwds,0, "JLT %p", /* 0x8c */
585 10323cd3 2004-04-19 devnull Iwds,0, "JGE %p", /* 0x8d */
586 10323cd3 2004-04-19 devnull Iwds,0, "JLE %p", /* 0x8e */
587 10323cd3 2004-04-19 devnull Iwds,0, "JGT %p", /* 0x8f */
588 10323cd3 2004-04-19 devnull RMB,0, "SETOS %e", /* 0x90 */
589 10323cd3 2004-04-19 devnull RMB,0, "SETOC %e", /* 0x91 */
590 10323cd3 2004-04-19 devnull RMB,0, "SETCS %e", /* 0x92 */
591 10323cd3 2004-04-19 devnull RMB,0, "SETCC %e", /* 0x93 */
592 10323cd3 2004-04-19 devnull RMB,0, "SETEQ %e", /* 0x94 */
593 10323cd3 2004-04-19 devnull RMB,0, "SETNE %e", /* 0x95 */
594 10323cd3 2004-04-19 devnull RMB,0, "SETLS %e", /* 0x96 */
595 10323cd3 2004-04-19 devnull RMB,0, "SETHI %e", /* 0x97 */
596 10323cd3 2004-04-19 devnull RMB,0, "SETMI %e", /* 0x98 */
597 10323cd3 2004-04-19 devnull RMB,0, "SETPL %e", /* 0x99 */
598 10323cd3 2004-04-19 devnull RMB,0, "SETPS %e", /* 0x9a */
599 10323cd3 2004-04-19 devnull RMB,0, "SETPC %e", /* 0x9b */
600 10323cd3 2004-04-19 devnull RMB,0, "SETLT %e", /* 0x9c */
601 10323cd3 2004-04-19 devnull RMB,0, "SETGE %e", /* 0x9d */
602 10323cd3 2004-04-19 devnull RMB,0, "SETLE %e", /* 0x9e */
603 10323cd3 2004-04-19 devnull RMB,0, "SETGT %e", /* 0x9f */
604 10323cd3 2004-04-19 devnull 0,0, "PUSHL FS", /* 0xa0 */
605 10323cd3 2004-04-19 devnull 0,0, "POPL FS", /* 0xa1 */
606 10323cd3 2004-04-19 devnull 0,0, "CPUID", /* 0xa2 */
607 10323cd3 2004-04-19 devnull RM,0, "BT%S %r,%e", /* 0xa3 */
608 10323cd3 2004-04-19 devnull RM,Ib, "SHLD%S %r,%i,%e", /* 0xa4 */
609 10323cd3 2004-04-19 devnull RM,0, "SHLD%S %r,CL,%e", /* 0xa5 */
610 10323cd3 2004-04-19 devnull 0,0, "", /* 0xa6 */
611 10323cd3 2004-04-19 devnull 0,0, "", /* 0xa7 */
612 10323cd3 2004-04-19 devnull 0,0, "PUSHL GS", /* 0xa8 */
613 10323cd3 2004-04-19 devnull 0,0, "POPL GS", /* 0xa9 */
614 10323cd3 2004-04-19 devnull 0,0, "", /* 0xaa */
615 10323cd3 2004-04-19 devnull RM,0, "BTS%S %r,%e", /* 0xab */
616 10323cd3 2004-04-19 devnull RM,Ib, "SHRD%S %r,%i,%e", /* 0xac */
617 10323cd3 2004-04-19 devnull RM,0, "SHRD%S %r,CL,%e", /* 0xad */
618 10323cd3 2004-04-19 devnull 0,0, "", /* 0xae */
619 10323cd3 2004-04-19 devnull RM,0, "IMUL%S %e,%r", /* 0xaf */
620 10323cd3 2004-04-19 devnull 0,0, "", /* 0xb0 */
621 10323cd3 2004-04-19 devnull 0,0, "", /* 0xb1 */
622 10323cd3 2004-04-19 devnull RMM,0, "LSS %e,%r", /* 0xb2 */
623 10323cd3 2004-04-19 devnull RM,0, "BTR%S %r,%e", /* 0xb3 */
624 10323cd3 2004-04-19 devnull RMM,0, "LFS %e,%r", /* 0xb4 */
625 10323cd3 2004-04-19 devnull RMM,0, "LGS %e,%r", /* 0xb5 */
626 10323cd3 2004-04-19 devnull RMB,0, "MOVBZX %e,%R", /* 0xb6 */
627 10323cd3 2004-04-19 devnull RM,0, "MOVWZX %e,%R", /* 0xb7 */
628 10323cd3 2004-04-19 devnull 0,0, "", /* 0xb8 */
629 10323cd3 2004-04-19 devnull 0,0, "", /* 0xb9 */
630 10323cd3 2004-04-19 devnull RMOP,0, optab0FBA, /* 0xba */
631 10323cd3 2004-04-19 devnull RM,0, "BTC%S %e,%r", /* 0xbb */
632 10323cd3 2004-04-19 devnull RM,0, "BSF%S %e,%r", /* 0xbc */
633 10323cd3 2004-04-19 devnull RM,0, "BSR%S %e,%r", /* 0xbd */
634 10323cd3 2004-04-19 devnull RMB,0, "MOVBSX %e,%R", /* 0xbe */
635 10323cd3 2004-04-19 devnull RM,0, "MOVWSX %e,%R", /* 0xbf */
638 a84cbb2a 2004-04-19 devnull static Optable optab80[8]=
640 10323cd3 2004-04-19 devnull Ib,0, "ADDB %i,%e", /* 0x00 */
641 10323cd3 2004-04-19 devnull Ib,0, "ORB %i,%e", /* 0x01 */
642 10323cd3 2004-04-19 devnull Ib,0, "ADCB %i,%e", /* 0x02 */
643 10323cd3 2004-04-19 devnull Ib,0, "SBBB %i,%e", /* 0x03 */
644 10323cd3 2004-04-19 devnull Ib,0, "ANDB %i,%e", /* 0x04 */
645 10323cd3 2004-04-19 devnull Ib,0, "SUBB %i,%e", /* 0x05 */
646 10323cd3 2004-04-19 devnull Ib,0, "XORB %i,%e", /* 0x06 */
647 10323cd3 2004-04-19 devnull Ib,0, "CMPB %e,%i", /* 0x07 */
650 a84cbb2a 2004-04-19 devnull static Optable optab81[8]=
652 10323cd3 2004-04-19 devnull Iwd,0, "ADD%S %i,%e", /* 0x00 */
653 10323cd3 2004-04-19 devnull Iwd,0, "OR%S %i,%e", /* 0x01 */
654 10323cd3 2004-04-19 devnull Iwd,0, "ADC%S %i,%e", /* 0x02 */
655 10323cd3 2004-04-19 devnull Iwd,0, "SBB%S %i,%e", /* 0x03 */
656 10323cd3 2004-04-19 devnull Iwd,0, "AND%S %i,%e", /* 0x04 */
657 10323cd3 2004-04-19 devnull Iwd,0, "SUB%S %i,%e", /* 0x05 */
658 10323cd3 2004-04-19 devnull Iwd,0, "XOR%S %i,%e", /* 0x06 */
659 10323cd3 2004-04-19 devnull Iwd,0, "CMP%S %e,%i", /* 0x07 */
662 a84cbb2a 2004-04-19 devnull static Optable optab83[8]=
664 10323cd3 2004-04-19 devnull Ibs,0, "ADD%S %i,%e", /* 0x00 */
665 10323cd3 2004-04-19 devnull Ibs,0, "OR%S %i,%e", /* 0x01 */
666 10323cd3 2004-04-19 devnull Ibs,0, "ADC%S %i,%e", /* 0x02 */
667 10323cd3 2004-04-19 devnull Ibs,0, "SBB%S %i,%e", /* 0x03 */
668 10323cd3 2004-04-19 devnull Ibs,0, "AND%S %i,%e", /* 0x04 */
669 10323cd3 2004-04-19 devnull Ibs,0, "SUB%S %i,%e", /* 0x05 */
670 10323cd3 2004-04-19 devnull Ibs,0, "XOR%S %i,%e", /* 0x06 */
671 10323cd3 2004-04-19 devnull Ibs,0, "CMP%S %e,%i", /* 0x07 */
674 a84cbb2a 2004-04-19 devnull static Optable optabC0[8] =
676 10323cd3 2004-04-19 devnull Ib,0, "ROLB %i,%e", /* 0x00 */
677 10323cd3 2004-04-19 devnull Ib,0, "RORB %i,%e", /* 0x01 */
678 10323cd3 2004-04-19 devnull Ib,0, "RCLB %i,%e", /* 0x02 */
679 10323cd3 2004-04-19 devnull Ib,0, "RCRB %i,%e", /* 0x03 */
680 10323cd3 2004-04-19 devnull Ib,0, "SHLB %i,%e", /* 0x04 */
681 10323cd3 2004-04-19 devnull Ib,0, "SHRB %i,%e", /* 0x05 */
682 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
683 10323cd3 2004-04-19 devnull Ib,0, "SARB %i,%e", /* 0x07 */
686 a84cbb2a 2004-04-19 devnull static Optable optabC1[8] =
688 10323cd3 2004-04-19 devnull Ib,0, "ROL%S %i,%e", /* 0x00 */
689 10323cd3 2004-04-19 devnull Ib,0, "ROR%S %i,%e", /* 0x01 */
690 10323cd3 2004-04-19 devnull Ib,0, "RCL%S %i,%e", /* 0x02 */
691 10323cd3 2004-04-19 devnull Ib,0, "RCR%S %i,%e", /* 0x03 */
692 10323cd3 2004-04-19 devnull Ib,0, "SHL%S %i,%e", /* 0x04 */
693 10323cd3 2004-04-19 devnull Ib,0, "SHR%S %i,%e", /* 0x05 */
694 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
695 10323cd3 2004-04-19 devnull Ib,0, "SAR%S %i,%e", /* 0x07 */
698 a84cbb2a 2004-04-19 devnull static Optable optabD0[8] =
700 10323cd3 2004-04-19 devnull 0,0, "ROLB %e", /* 0x00 */
701 10323cd3 2004-04-19 devnull 0,0, "RORB %e", /* 0x01 */
702 10323cd3 2004-04-19 devnull 0,0, "RCLB %e", /* 0x02 */
703 10323cd3 2004-04-19 devnull 0,0, "RCRB %e", /* 0x03 */
704 10323cd3 2004-04-19 devnull 0,0, "SHLB %e", /* 0x04 */
705 10323cd3 2004-04-19 devnull 0,0, "SHRB %e", /* 0x05 */
706 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
707 10323cd3 2004-04-19 devnull 0,0, "SARB %e", /* 0x07 */
710 a84cbb2a 2004-04-19 devnull static Optable optabD1[8] =
712 10323cd3 2004-04-19 devnull 0,0, "ROL%S %e", /* 0x00 */
713 10323cd3 2004-04-19 devnull 0,0, "ROR%S %e", /* 0x01 */
714 10323cd3 2004-04-19 devnull 0,0, "RCL%S %e", /* 0x02 */
715 10323cd3 2004-04-19 devnull 0,0, "RCR%S %e", /* 0x03 */
716 10323cd3 2004-04-19 devnull 0,0, "SHL%S %e", /* 0x04 */
717 10323cd3 2004-04-19 devnull 0,0, "SHR%S %e", /* 0x05 */
718 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
719 10323cd3 2004-04-19 devnull 0,0, "SAR%S %e", /* 0x07 */
722 a84cbb2a 2004-04-19 devnull static Optable optabD2[8] =
724 10323cd3 2004-04-19 devnull 0,0, "ROLB CL,%e", /* 0x00 */
725 10323cd3 2004-04-19 devnull 0,0, "RORB CL,%e", /* 0x01 */
726 10323cd3 2004-04-19 devnull 0,0, "RCLB CL,%e", /* 0x02 */
727 10323cd3 2004-04-19 devnull 0,0, "RCRB CL,%e", /* 0x03 */
728 10323cd3 2004-04-19 devnull 0,0, "SHLB CL,%e", /* 0x04 */
729 10323cd3 2004-04-19 devnull 0,0, "SHRB CL,%e", /* 0x05 */
730 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
731 10323cd3 2004-04-19 devnull 0,0, "SARB CL,%e", /* 0x07 */
734 a84cbb2a 2004-04-19 devnull static Optable optabD3[8] =
736 10323cd3 2004-04-19 devnull 0,0, "ROL%S CL,%e", /* 0x00 */
737 10323cd3 2004-04-19 devnull 0,0, "ROR%S CL,%e", /* 0x01 */
738 10323cd3 2004-04-19 devnull 0,0, "RCL%S CL,%e", /* 0x02 */
739 10323cd3 2004-04-19 devnull 0,0, "RCR%S CL,%e", /* 0x03 */
740 10323cd3 2004-04-19 devnull 0,0, "SHL%S CL,%e", /* 0x04 */
741 10323cd3 2004-04-19 devnull 0,0, "SHR%S CL,%e", /* 0x05 */
742 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
743 10323cd3 2004-04-19 devnull 0,0, "SAR%S CL,%e", /* 0x07 */
746 a84cbb2a 2004-04-19 devnull static Optable optabD8[8+8] =
748 10323cd3 2004-04-19 devnull 0,0, "FADDF %e,F0", /* 0x00 */
749 10323cd3 2004-04-19 devnull 0,0, "FMULF %e,F0", /* 0x01 */
750 10323cd3 2004-04-19 devnull 0,0, "FCOMF %e,F0", /* 0x02 */
751 10323cd3 2004-04-19 devnull 0,0, "FCOMFP %e,F0", /* 0x03 */
752 10323cd3 2004-04-19 devnull 0,0, "FSUBF %e,F0", /* 0x04 */
753 10323cd3 2004-04-19 devnull 0,0, "FSUBRF %e,F0", /* 0x05 */
754 10323cd3 2004-04-19 devnull 0,0, "FDIVF %e,F0", /* 0x06 */
755 10323cd3 2004-04-19 devnull 0,0, "FDIVRF %e,F0", /* 0x07 */
756 10323cd3 2004-04-19 devnull 0,0, "FADDD %f,F0", /* 0x08 */
757 10323cd3 2004-04-19 devnull 0,0, "FMULD %f,F0", /* 0x09 */
758 10323cd3 2004-04-19 devnull 0,0, "FCOMD %f,F0", /* 0x0a */
759 10323cd3 2004-04-19 devnull 0,0, "FCOMPD %f,F0", /* 0x0b */
760 10323cd3 2004-04-19 devnull 0,0, "FSUBD %f,F0", /* 0x0c */
761 10323cd3 2004-04-19 devnull 0,0, "FSUBRD %f,F0", /* 0x0d */
762 10323cd3 2004-04-19 devnull 0,0, "FDIVD %f,F0", /* 0x0e */
763 10323cd3 2004-04-19 devnull 0,0, "FDIVRD %f,F0", /* 0x0f */
766 a84cbb2a 2004-04-19 devnull * optabD9 and optabDB use the following encoding:
767 a84cbb2a 2004-04-19 devnull * if (0 <= modrm <= 2) instruction = optabDx[modrm&0x07];
768 a84cbb2a 2004-04-19 devnull * else instruction = optabDx[(modrm&0x3f)+8];
770 a84cbb2a 2004-04-19 devnull * the instructions for MOD == 3, follow the 8 instructions
771 a84cbb2a 2004-04-19 devnull * for the other MOD values stored at the front of the table.
773 a84cbb2a 2004-04-19 devnull static Optable optabD9[64+8] =
775 10323cd3 2004-04-19 devnull 0,0, "FMOVF %e,F0", /* 0x00 */
776 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
777 10323cd3 2004-04-19 devnull 0,0, "FMOVF F0,%e", /* 0x02 */
778 10323cd3 2004-04-19 devnull 0,0, "FMOVFP F0,%e", /* 0x03 */
779 10323cd3 2004-04-19 devnull 0,0, "FLDENV%S %e", /* 0x04 */
780 10323cd3 2004-04-19 devnull 0,0, "FLDCW %e", /* 0x05 */
781 10323cd3 2004-04-19 devnull 0,0, "FSTENV%S %e", /* 0x06 */
782 10323cd3 2004-04-19 devnull 0,0, "FSTCW %e", /* 0x07 */
783 10323cd3 2004-04-19 devnull 0,0, "FMOVD F0,F0", /* 0x08 */ /* Mod R/M = 11xx xxxx*/
784 10323cd3 2004-04-19 devnull 0,0, "FMOVD F1,F0", /* 0x09 */
785 10323cd3 2004-04-19 devnull 0,0, "FMOVD F2,F0", /* 0x0a */
786 10323cd3 2004-04-19 devnull 0,0, "FMOVD F3,F0", /* 0x0b */
787 10323cd3 2004-04-19 devnull 0,0, "FMOVD F4,F0", /* 0x0c */
788 10323cd3 2004-04-19 devnull 0,0, "FMOVD F5,F0", /* 0x0d */
789 10323cd3 2004-04-19 devnull 0,0, "FMOVD F6,F0", /* 0x0e */
790 10323cd3 2004-04-19 devnull 0,0, "FMOVD F7,F0", /* 0x0f */
791 10323cd3 2004-04-19 devnull 0,0, "FXCHD F0,F0", /* 0x10 */
792 10323cd3 2004-04-19 devnull 0,0, "FXCHD F1,F0", /* 0x11 */
793 10323cd3 2004-04-19 devnull 0,0, "FXCHD F2,F0", /* 0x12 */
794 10323cd3 2004-04-19 devnull 0,0, "FXCHD F3,F0", /* 0x13 */
795 10323cd3 2004-04-19 devnull 0,0, "FXCHD F4,F0", /* 0x14 */
796 10323cd3 2004-04-19 devnull 0,0, "FXCHD F5,F0", /* 0x15 */
797 10323cd3 2004-04-19 devnull 0,0, "FXCHD F6,F0", /* 0x16 */
798 10323cd3 2004-04-19 devnull 0,0, "FXCHD F7,F0", /* 0x17 */
799 10323cd3 2004-04-19 devnull 0,0, "FNOP", /* 0x18 */
800 10323cd3 2004-04-19 devnull 0,0, "", /* 0x19 */
801 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1a */
802 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1b */
803 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1c */
804 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1d */
805 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1e */
806 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1f */
807 10323cd3 2004-04-19 devnull 0,0, "", /* 0x20 */
808 10323cd3 2004-04-19 devnull 0,0, "", /* 0x21 */
809 10323cd3 2004-04-19 devnull 0,0, "", /* 0x22 */
810 10323cd3 2004-04-19 devnull 0,0, "", /* 0x23 */
811 10323cd3 2004-04-19 devnull 0,0, "", /* 0x24 */
812 10323cd3 2004-04-19 devnull 0,0, "", /* 0x25 */
813 10323cd3 2004-04-19 devnull 0,0, "", /* 0x26 */
814 10323cd3 2004-04-19 devnull 0,0, "", /* 0x27 */
815 10323cd3 2004-04-19 devnull 0,0, "FCHS", /* 0x28 */
816 10323cd3 2004-04-19 devnull 0,0, "FABS", /* 0x29 */
817 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2a */
818 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2b */
819 10323cd3 2004-04-19 devnull 0,0, "FTST", /* 0x2c */
820 10323cd3 2004-04-19 devnull 0,0, "FXAM", /* 0x2d */
821 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2e */
822 10323cd3 2004-04-19 devnull 0,0, "", /* 0x2f */
823 10323cd3 2004-04-19 devnull 0,0, "FLD1", /* 0x30 */
824 10323cd3 2004-04-19 devnull 0,0, "FLDL2T", /* 0x31 */
825 10323cd3 2004-04-19 devnull 0,0, "FLDL2E", /* 0x32 */
826 10323cd3 2004-04-19 devnull 0,0, "FLDPI", /* 0x33 */
827 10323cd3 2004-04-19 devnull 0,0, "FLDLG2", /* 0x34 */
828 10323cd3 2004-04-19 devnull 0,0, "FLDLN2", /* 0x35 */
829 10323cd3 2004-04-19 devnull 0,0, "FLDZ", /* 0x36 */
830 10323cd3 2004-04-19 devnull 0,0, "", /* 0x37 */
831 10323cd3 2004-04-19 devnull 0,0, "F2XM1", /* 0x38 */
832 10323cd3 2004-04-19 devnull 0,0, "FYL2X", /* 0x39 */
833 10323cd3 2004-04-19 devnull 0,0, "FPTAN", /* 0x3a */
834 10323cd3 2004-04-19 devnull 0,0, "FPATAN", /* 0x3b */
835 10323cd3 2004-04-19 devnull 0,0, "FXTRACT", /* 0x3c */
836 10323cd3 2004-04-19 devnull 0,0, "FPREM1", /* 0x3d */
837 10323cd3 2004-04-19 devnull 0,0, "FDECSTP", /* 0x3e */
838 10323cd3 2004-04-19 devnull 0,0, "FNCSTP", /* 0x3f */
839 10323cd3 2004-04-19 devnull 0,0, "FPREM", /* 0x40 */
840 10323cd3 2004-04-19 devnull 0,0, "FYL2XP1", /* 0x41 */
841 10323cd3 2004-04-19 devnull 0,0, "FSQRT", /* 0x42 */
842 10323cd3 2004-04-19 devnull 0,0, "FSINCOS", /* 0x43 */
843 10323cd3 2004-04-19 devnull 0,0, "FRNDINT", /* 0x44 */
844 10323cd3 2004-04-19 devnull 0,0, "FSCALE", /* 0x45 */
845 10323cd3 2004-04-19 devnull 0,0, "FSIN", /* 0x46 */
846 10323cd3 2004-04-19 devnull 0,0, "FCOS", /* 0x47 */
849 a84cbb2a 2004-04-19 devnull static Optable optabDA[8+8] =
851 10323cd3 2004-04-19 devnull 0,0, "FADDL %e,F0", /* 0x00 */
852 10323cd3 2004-04-19 devnull 0,0, "FMULL %e,F0", /* 0x01 */
853 10323cd3 2004-04-19 devnull 0,0, "FCOML %e,F0", /* 0x02 */
854 10323cd3 2004-04-19 devnull 0,0, "FCOMLP %e,F0", /* 0x03 */
855 10323cd3 2004-04-19 devnull 0,0, "FSUBL %e,F0", /* 0x04 */
856 10323cd3 2004-04-19 devnull 0,0, "FSUBRL %e,F0", /* 0x05 */
857 10323cd3 2004-04-19 devnull 0,0, "FDIVL %e,F0", /* 0x06 */
858 10323cd3 2004-04-19 devnull 0,0, "FDIVRL %e,F0", /* 0x07 */
859 10323cd3 2004-04-19 devnull 0,0, "", /* 0x08 */
860 10323cd3 2004-04-19 devnull 0,0, "", /* 0x09 */
861 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
862 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0b */
863 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0c */
864 10323cd3 2004-04-19 devnull R1,0, "FUCOMPP", /* 0x0d */
867 a84cbb2a 2004-04-19 devnull static Optable optabDB[8+64] =
869 10323cd3 2004-04-19 devnull 0,0, "FMOVL %e,F0", /* 0x00 */
870 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
871 10323cd3 2004-04-19 devnull 0,0, "FMOVL F0,%e", /* 0x02 */
872 10323cd3 2004-04-19 devnull 0,0, "FMOVLP F0,%e", /* 0x03 */
873 10323cd3 2004-04-19 devnull 0,0, "", /* 0x04 */
874 10323cd3 2004-04-19 devnull 0,0, "FMOVX %e,F0", /* 0x05 */
875 10323cd3 2004-04-19 devnull 0,0, "", /* 0x06 */
876 10323cd3 2004-04-19 devnull 0,0, "FMOVXP F0,%e", /* 0x07 */
877 10323cd3 2004-04-19 devnull 0,0, "", /* 0x08 */
878 10323cd3 2004-04-19 devnull 0,0, "", /* 0x09 */
879 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
880 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0b */
881 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0c */
882 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0d */
883 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0e */
884 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0f */
885 10323cd3 2004-04-19 devnull 0,0, "", /* 0x10 */
886 10323cd3 2004-04-19 devnull 0,0, "", /* 0x11 */
887 10323cd3 2004-04-19 devnull 0,0, "", /* 0x12 */
888 10323cd3 2004-04-19 devnull 0,0, "", /* 0x13 */
889 10323cd3 2004-04-19 devnull 0,0, "", /* 0x14 */
890 10323cd3 2004-04-19 devnull 0,0, "", /* 0x15 */
891 10323cd3 2004-04-19 devnull 0,0, "", /* 0x16 */
892 10323cd3 2004-04-19 devnull 0,0, "", /* 0x17 */
893 10323cd3 2004-04-19 devnull 0,0, "", /* 0x18 */
894 10323cd3 2004-04-19 devnull 0,0, "", /* 0x19 */
895 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1a */
896 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1b */
897 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1c */
898 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1d */
899 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1e */
900 10323cd3 2004-04-19 devnull 0,0, "", /* 0x1f */
901 10323cd3 2004-04-19 devnull 0,0, "", /* 0x20 */
902 10323cd3 2004-04-19 devnull 0,0, "", /* 0x21 */
903 10323cd3 2004-04-19 devnull 0,0, "", /* 0x22 */
904 10323cd3 2004-04-19 devnull 0,0, "", /* 0x23 */
905 10323cd3 2004-04-19 devnull 0,0, "", /* 0x24 */
906 10323cd3 2004-04-19 devnull 0,0, "", /* 0x25 */
907 10323cd3 2004-04-19 devnull 0,0, "", /* 0x26 */
908 10323cd3 2004-04-19 devnull 0,0, "", /* 0x27 */
909 10323cd3 2004-04-19 devnull 0,0, "", /* 0x28 */
910 10323cd3 2004-04-19 devnull 0,0, "", /* 0x29 */
911 10323cd3 2004-04-19 devnull 0,0, "FCLEX", /* 0x2a */
912 10323cd3 2004-04-19 devnull 0,0, "FINIT", /* 0x2b */
915 a84cbb2a 2004-04-19 devnull static Optable optabDC[8+8] =
917 10323cd3 2004-04-19 devnull 0,0, "FADDD %e,F0", /* 0x00 */
918 10323cd3 2004-04-19 devnull 0,0, "FMULD %e,F0", /* 0x01 */
919 10323cd3 2004-04-19 devnull 0,0, "FCOMD %e,F0", /* 0x02 */
920 10323cd3 2004-04-19 devnull 0,0, "FCOMDP %e,F0", /* 0x03 */
921 10323cd3 2004-04-19 devnull 0,0, "FSUBD %e,F0", /* 0x04 */
922 10323cd3 2004-04-19 devnull 0,0, "FSUBRD %e,F0", /* 0x05 */
923 10323cd3 2004-04-19 devnull 0,0, "FDIVD %e,F0", /* 0x06 */
924 10323cd3 2004-04-19 devnull 0,0, "FDIVRD %e,F0", /* 0x07 */
925 10323cd3 2004-04-19 devnull 0,0, "FADDD F0,%f", /* 0x08 */
926 10323cd3 2004-04-19 devnull 0,0, "FMULD F0,%f", /* 0x09 */
927 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
928 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0b */
929 10323cd3 2004-04-19 devnull 0,0, "FSUBRD F0,%f", /* 0x0c */
930 10323cd3 2004-04-19 devnull 0,0, "FSUBD F0,%f", /* 0x0d */
931 10323cd3 2004-04-19 devnull 0,0, "FDIVRD F0,%f", /* 0x0e */
932 10323cd3 2004-04-19 devnull 0,0, "FDIVD F0,%f", /* 0x0f */
935 a84cbb2a 2004-04-19 devnull static Optable optabDD[8+8] =
937 10323cd3 2004-04-19 devnull 0,0, "FMOVD %e,F0", /* 0x00 */
938 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
939 10323cd3 2004-04-19 devnull 0,0, "FMOVD F0,%e", /* 0x02 */
940 10323cd3 2004-04-19 devnull 0,0, "FMOVDP F0,%e", /* 0x03 */
941 10323cd3 2004-04-19 devnull 0,0, "FRSTOR%S %e", /* 0x04 */
942 10323cd3 2004-04-19 devnull 0,0, "", /* 0x05 */
943 10323cd3 2004-04-19 devnull 0,0, "FSAVE%S %e", /* 0x06 */
944 10323cd3 2004-04-19 devnull 0,0, "FSTSW %e", /* 0x07 */
945 10323cd3 2004-04-19 devnull 0,0, "FFREED %f", /* 0x08 */
946 10323cd3 2004-04-19 devnull 0,0, "", /* 0x09 */
947 10323cd3 2004-04-19 devnull 0,0, "FMOVD %f,F0", /* 0x0a */
948 10323cd3 2004-04-19 devnull 0,0, "FMOVDP %f,F0", /* 0x0b */
949 10323cd3 2004-04-19 devnull 0,0, "FUCOMD %f,F0", /* 0x0c */
950 10323cd3 2004-04-19 devnull 0,0, "FUCOMDP %f,F0", /* 0x0d */
953 a84cbb2a 2004-04-19 devnull static Optable optabDE[8+8] =
955 10323cd3 2004-04-19 devnull 0,0, "FADDW %e,F0", /* 0x00 */
956 10323cd3 2004-04-19 devnull 0,0, "FMULW %e,F0", /* 0x01 */
957 10323cd3 2004-04-19 devnull 0,0, "FCOMW %e,F0", /* 0x02 */
958 10323cd3 2004-04-19 devnull 0,0, "FCOMWP %e,F0", /* 0x03 */
959 10323cd3 2004-04-19 devnull 0,0, "FSUBW %e,F0", /* 0x04 */
960 10323cd3 2004-04-19 devnull 0,0, "FSUBRW %e,F0", /* 0x05 */
961 10323cd3 2004-04-19 devnull 0,0, "FDIVW %e,F0", /* 0x06 */
962 10323cd3 2004-04-19 devnull 0,0, "FDIVRW %e,F0", /* 0x07 */
963 10323cd3 2004-04-19 devnull 0,0, "FADDDP F0,%f", /* 0x08 */
964 10323cd3 2004-04-19 devnull 0,0, "FMULDP F0,%f", /* 0x09 */
965 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
966 10323cd3 2004-04-19 devnull R1,0, "FCOMPDP", /* 0x0b */
967 10323cd3 2004-04-19 devnull 0,0, "FSUBRDP F0,%f", /* 0x0c */
968 10323cd3 2004-04-19 devnull 0,0, "FSUBDP F0,%f", /* 0x0d */
969 10323cd3 2004-04-19 devnull 0,0, "FDIVRDP F0,%f", /* 0x0e */
970 10323cd3 2004-04-19 devnull 0,0, "FDIVDP F0,%f", /* 0x0f */
973 a84cbb2a 2004-04-19 devnull static Optable optabDF[8+8] =
975 10323cd3 2004-04-19 devnull 0,0, "FMOVW %e,F0", /* 0x00 */
976 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
977 10323cd3 2004-04-19 devnull 0,0, "FMOVW F0,%e", /* 0x02 */
978 10323cd3 2004-04-19 devnull 0,0, "FMOVWP F0,%e", /* 0x03 */
979 10323cd3 2004-04-19 devnull 0,0, "FBLD %e", /* 0x04 */
980 10323cd3 2004-04-19 devnull 0,0, "FMOVL %e,F0", /* 0x05 */
981 10323cd3 2004-04-19 devnull 0,0, "FBSTP %e", /* 0x06 */
982 10323cd3 2004-04-19 devnull 0,0, "FMOVLP F0,%e", /* 0x07 */
983 10323cd3 2004-04-19 devnull 0,0, "", /* 0x08 */
984 10323cd3 2004-04-19 devnull 0,0, "", /* 0x09 */
985 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0a */
986 10323cd3 2004-04-19 devnull 0,0, "", /* 0x0b */
987 10323cd3 2004-04-19 devnull R0,0, "FSTSW %OAX", /* 0x0c */
990 a84cbb2a 2004-04-19 devnull static Optable optabF6[8] =
992 10323cd3 2004-04-19 devnull Ib,0, "TESTB %i,%e", /* 0x00 */
993 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
994 10323cd3 2004-04-19 devnull 0,0, "NOTB %e", /* 0x02 */
995 10323cd3 2004-04-19 devnull 0,0, "NEGB %e", /* 0x03 */
996 10323cd3 2004-04-19 devnull 0,0, "MULB AL,%e", /* 0x04 */
997 10323cd3 2004-04-19 devnull 0,0, "IMULB AL,%e", /* 0x05 */
998 10323cd3 2004-04-19 devnull 0,0, "DIVB AL,%e", /* 0x06 */
999 10323cd3 2004-04-19 devnull 0,0, "IDIVB AL,%e", /* 0x07 */
1002 a84cbb2a 2004-04-19 devnull static Optable optabF7[8] =
1004 10323cd3 2004-04-19 devnull Iwd,0, "TEST%S %i,%e", /* 0x00 */
1005 10323cd3 2004-04-19 devnull 0,0, "", /* 0x01 */
1006 10323cd3 2004-04-19 devnull 0,0, "NOT%S %e", /* 0x02 */
1007 10323cd3 2004-04-19 devnull 0,0, "NEG%S %e", /* 0x03 */
1008 10323cd3 2004-04-19 devnull 0,0, "MUL%S %OAX,%e", /* 0x04 */
1009 10323cd3 2004-04-19 devnull 0,0, "IMUL%S %OAX,%e", /* 0x05 */
1010 10323cd3 2004-04-19 devnull 0,0, "DIV%S %OAX,%e", /* 0x06 */
1011 10323cd3 2004-04-19 devnull 0,0, "IDIV%S %OAX,%e", /* 0x07 */
1014 a84cbb2a 2004-04-19 devnull static Optable optabFE[8] =
1016 10323cd3 2004-04-19 devnull 0,0, "INCB %e", /* 0x00 */
1017 10323cd3 2004-04-19 devnull 0,0, "DECB %e", /* 0x01 */
1020 a84cbb2a 2004-04-19 devnull static Optable optabFF[8] =
1022 10323cd3 2004-04-19 devnull 0,0, "INC%S %e", /* 0x00 */
1023 10323cd3 2004-04-19 devnull 0,0, "DEC%S %e", /* 0x01 */
1024 10323cd3 2004-04-19 devnull JUMP,0, "CALL*%S %e", /* 0x02 */
1025 10323cd3 2004-04-19 devnull JUMP,0, "CALLF*%S %e", /* 0x03 */
1026 10323cd3 2004-04-19 devnull JUMP,0, "JMP*%S %e", /* 0x04 */
1027 10323cd3 2004-04-19 devnull JUMP,0, "JMPF*%S %e", /* 0x05 */
1028 10323cd3 2004-04-19 devnull 0,0, "PUSHL %e", /* 0x06 */
1031 a84cbb2a 2004-04-19 devnull static Optable optable[256] =
1033 10323cd3 2004-04-19 devnull RMB,0, "ADDB %r,%e", /* 0x00 */
1034 10323cd3 2004-04-19 devnull RM,0, "ADD%S %r,%e", /* 0x01 */
1035 10323cd3 2004-04-19 devnull RMB,0, "ADDB %e,%r", /* 0x02 */
1036 10323cd3 2004-04-19 devnull RM,0, "ADD%S %e,%r", /* 0x03 */
1037 10323cd3 2004-04-19 devnull Ib,0, "ADDB %i,AL", /* 0x04 */
1038 10323cd3 2004-04-19 devnull Iwd,0, "ADD%S %i,%OAX", /* 0x05 */
1039 10323cd3 2004-04-19 devnull 0,0, "PUSHL ES", /* 0x06 */
1040 10323cd3 2004-04-19 devnull 0,0, "POPL ES", /* 0x07 */
1041 10323cd3 2004-04-19 devnull RMB,0, "ORB %r,%e", /* 0x08 */
1042 10323cd3 2004-04-19 devnull RM,0, "OR%S %r,%e", /* 0x09 */
1043 10323cd3 2004-04-19 devnull RMB,0, "ORB %e,%r", /* 0x0a */
1044 10323cd3 2004-04-19 devnull RM,0, "OR%S %e,%r", /* 0x0b */
1045 10323cd3 2004-04-19 devnull Ib,0, "ORB %i,AL", /* 0x0c */
1046 10323cd3 2004-04-19 devnull Iwd,0, "OR%S %i,%OAX", /* 0x0d */
1047 10323cd3 2004-04-19 devnull 0,0, "PUSHL CS", /* 0x0e */
1048 10323cd3 2004-04-19 devnull AUX,0, optab0F, /* 0x0f */
1049 10323cd3 2004-04-19 devnull RMB,0, "ADCB %r,%e", /* 0x10 */
1050 10323cd3 2004-04-19 devnull RM,0, "ADC%S %r,%e", /* 0x11 */
1051 10323cd3 2004-04-19 devnull RMB,0, "ADCB %e,%r", /* 0x12 */
1052 10323cd3 2004-04-19 devnull RM,0, "ADC%S %e,%r", /* 0x13 */
1053 10323cd3 2004-04-19 devnull Ib,0, "ADCB %i,AL", /* 0x14 */
1054 10323cd3 2004-04-19 devnull Iwd,0, "ADC%S %i,%OAX", /* 0x15 */
1055 10323cd3 2004-04-19 devnull 0,0, "PUSHL SS", /* 0x16 */
1056 10323cd3 2004-04-19 devnull 0,0, "POPL SS", /* 0x17 */
1057 10323cd3 2004-04-19 devnull RMB,0, "SBBB %r,%e", /* 0x18 */
1058 10323cd3 2004-04-19 devnull RM,0, "SBB%S %r,%e", /* 0x19 */
1059 10323cd3 2004-04-19 devnull RMB,0, "SBBB %e,%r", /* 0x1a */
1060 10323cd3 2004-04-19 devnull RM,0, "SBB%S %e,%r", /* 0x1b */
1061 10323cd3 2004-04-19 devnull Ib,0, "SBBB %i,AL", /* 0x1c */
1062 10323cd3 2004-04-19 devnull Iwd,0, "SBB%S %i,%OAX", /* 0x1d */
1063 10323cd3 2004-04-19 devnull 0,0, "PUSHL DS", /* 0x1e */
1064 10323cd3 2004-04-19 devnull 0,0, "POPL DS", /* 0x1f */
1065 10323cd3 2004-04-19 devnull RMB,0, "ANDB %r,%e", /* 0x20 */
1066 10323cd3 2004-04-19 devnull RM,0, "AND%S %r,%e", /* 0x21 */
1067 10323cd3 2004-04-19 devnull RMB,0, "ANDB %e,%r", /* 0x22 */
1068 10323cd3 2004-04-19 devnull RM,0, "AND%S %e,%r", /* 0x23 */
1069 10323cd3 2004-04-19 devnull Ib,0, "ANDB %i,AL", /* 0x24 */
1070 10323cd3 2004-04-19 devnull Iwd,0, "AND%S %i,%OAX", /* 0x25 */
1071 10323cd3 2004-04-19 devnull SEG,0, "ES:", /* 0x26 */
1072 10323cd3 2004-04-19 devnull 0,0, "DAA", /* 0x27 */
1073 10323cd3 2004-04-19 devnull RMB,0, "SUBB %r,%e", /* 0x28 */
1074 10323cd3 2004-04-19 devnull RM,0, "SUB%S %r,%e", /* 0x29 */
1075 10323cd3 2004-04-19 devnull RMB,0, "SUBB %e,%r", /* 0x2a */
1076 10323cd3 2004-04-19 devnull RM,0, "SUB%S %e,%r", /* 0x2b */
1077 10323cd3 2004-04-19 devnull Ib,0, "SUBB %i,AL", /* 0x2c */
1078 10323cd3 2004-04-19 devnull Iwd,0, "SUB%S %i,%OAX", /* 0x2d */
1079 10323cd3 2004-04-19 devnull SEG,0, "CS:", /* 0x2e */
1080 10323cd3 2004-04-19 devnull 0,0, "DAS", /* 0x2f */
1081 10323cd3 2004-04-19 devnull RMB,0, "XORB %r,%e", /* 0x30 */
1082 10323cd3 2004-04-19 devnull RM,0, "XOR%S %r,%e", /* 0x31 */
1083 10323cd3 2004-04-19 devnull RMB,0, "XORB %e,%r", /* 0x32 */
1084 10323cd3 2004-04-19 devnull RM,0, "XOR%S %e,%r", /* 0x33 */
1085 10323cd3 2004-04-19 devnull Ib,0, "XORB %i,AL", /* 0x34 */
1086 10323cd3 2004-04-19 devnull Iwd,0, "XOR%S %i,%OAX", /* 0x35 */
1087 10323cd3 2004-04-19 devnull SEG,0, "SS:", /* 0x36 */
1088 10323cd3 2004-04-19 devnull 0,0, "AAA", /* 0x37 */
1089 10323cd3 2004-04-19 devnull RMB,0, "CMPB %r,%e", /* 0x38 */
1090 10323cd3 2004-04-19 devnull RM,0, "CMP%S %r,%e", /* 0x39 */
1091 10323cd3 2004-04-19 devnull RMB,0, "CMPB %e,%r", /* 0x3a */
1092 10323cd3 2004-04-19 devnull RM,0, "CMP%S %e,%r", /* 0x3b */
1093 10323cd3 2004-04-19 devnull Ib,0, "CMPB %i,AL", /* 0x3c */
1094 10323cd3 2004-04-19 devnull Iwd,0, "CMP%S %i,%OAX", /* 0x3d */
1095 10323cd3 2004-04-19 devnull SEG,0, "DS:", /* 0x3e */
1096 10323cd3 2004-04-19 devnull 0,0, "AAS", /* 0x3f */
1097 10323cd3 2004-04-19 devnull 0,0, "INC%S %OAX", /* 0x40 */
1098 10323cd3 2004-04-19 devnull 0,0, "INC%S %OCX", /* 0x41 */
1099 10323cd3 2004-04-19 devnull 0,0, "INC%S %ODX", /* 0x42 */
1100 10323cd3 2004-04-19 devnull 0,0, "INC%S %OBX", /* 0x43 */
1101 10323cd3 2004-04-19 devnull 0,0, "INC%S %OSP", /* 0x44 */
1102 10323cd3 2004-04-19 devnull 0,0, "INC%S %OBP", /* 0x45 */
1103 10323cd3 2004-04-19 devnull 0,0, "INC%S %OSI", /* 0x46 */
1104 10323cd3 2004-04-19 devnull 0,0, "INC%S %ODI", /* 0x47 */
1105 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OAX", /* 0x48 */
1106 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OCX", /* 0x49 */
1107 10323cd3 2004-04-19 devnull 0,0, "DEC%S %ODX", /* 0x4a */
1108 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OBX", /* 0x4b */
1109 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OSP", /* 0x4c */
1110 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OBP", /* 0x4d */
1111 10323cd3 2004-04-19 devnull 0,0, "DEC%S %OSI", /* 0x4e */
1112 10323cd3 2004-04-19 devnull 0,0, "DEC%S %ODI", /* 0x4f */
1113 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OAX", /* 0x50 */
1114 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OCX", /* 0x51 */
1115 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %ODX", /* 0x52 */
1116 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OBX", /* 0x53 */
1117 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OSP", /* 0x54 */
1118 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OBP", /* 0x55 */
1119 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %OSI", /* 0x56 */
1120 10323cd3 2004-04-19 devnull 0,0, "PUSH%S %ODI", /* 0x57 */
1121 10323cd3 2004-04-19 devnull 0,0, "POP%S %OAX", /* 0x58 */
1122 10323cd3 2004-04-19 devnull 0,0, "POP%S %OCX", /* 0x59 */
1123 10323cd3 2004-04-19 devnull 0,0, "POP%S %ODX", /* 0x5a */
1124 10323cd3 2004-04-19 devnull 0,0, "POP%S %OBX", /* 0x5b */
1125 10323cd3 2004-04-19 devnull 0,0, "POP%S %OSP", /* 0x5c */
1126 10323cd3 2004-04-19 devnull 0,0, "POP%S %OBP", /* 0x5d */
1127 10323cd3 2004-04-19 devnull 0,0, "POP%S %OSI", /* 0x5e */
1128 10323cd3 2004-04-19 devnull 0,0, "POP%S %ODI", /* 0x5f */
1129 10323cd3 2004-04-19 devnull 0,0, "PUSHA%S", /* 0x60 */
1130 10323cd3 2004-04-19 devnull 0,0, "POPA%S", /* 0x61 */
1131 10323cd3 2004-04-19 devnull RMM,0, "BOUND %e,%r", /* 0x62 */
1132 10323cd3 2004-04-19 devnull RM,0, "ARPL %r,%e", /* 0x63 */
1133 10323cd3 2004-04-19 devnull SEG,0, "FS:", /* 0x64 */
1134 10323cd3 2004-04-19 devnull SEG,0, "GS:", /* 0x65 */
1135 10323cd3 2004-04-19 devnull OPOVER,0, "", /* 0x66 */
1136 10323cd3 2004-04-19 devnull ADDOVER,0, "", /* 0x67 */
1137 10323cd3 2004-04-19 devnull Iwd,0, "PUSH%S %i", /* 0x68 */
1138 10323cd3 2004-04-19 devnull RM,Iwd, "IMUL%S %e,%i,%r", /* 0x69 */
1139 10323cd3 2004-04-19 devnull Ib,0, "PUSH%S %i", /* 0x6a */
1140 10323cd3 2004-04-19 devnull RM,Ibs, "IMUL%S %e,%i,%r", /* 0x6b */
1141 10323cd3 2004-04-19 devnull 0,0, "INSB DX,(%ODI)", /* 0x6c */
1142 10323cd3 2004-04-19 devnull 0,0, "INS%S DX,(%ODI)", /* 0x6d */
1143 10323cd3 2004-04-19 devnull 0,0, "OUTSB (%ASI),DX", /* 0x6e */
1144 10323cd3 2004-04-19 devnull 0,0, "OUTS%S (%ASI),DX", /* 0x6f */
1145 10323cd3 2004-04-19 devnull Jbs,0, "JOS %p", /* 0x70 */
1146 10323cd3 2004-04-19 devnull Jbs,0, "JOC %p", /* 0x71 */
1147 10323cd3 2004-04-19 devnull Jbs,0, "JCS %p", /* 0x72 */
1148 10323cd3 2004-04-19 devnull Jbs,0, "JCC %p", /* 0x73 */
1149 10323cd3 2004-04-19 devnull Jbs,0, "JEQ %p", /* 0x74 */
1150 10323cd3 2004-04-19 devnull Jbs,0, "JNE %p", /* 0x75 */
1151 10323cd3 2004-04-19 devnull Jbs,0, "JLS %p", /* 0x76 */
1152 10323cd3 2004-04-19 devnull Jbs,0, "JHI %p", /* 0x77 */
1153 10323cd3 2004-04-19 devnull Jbs,0, "JMI %p", /* 0x78 */
1154 10323cd3 2004-04-19 devnull Jbs,0, "JPL %p", /* 0x79 */
1155 10323cd3 2004-04-19 devnull Jbs,0, "JPS %p", /* 0x7a */
1156 10323cd3 2004-04-19 devnull Jbs,0, "JPC %p", /* 0x7b */
1157 10323cd3 2004-04-19 devnull Jbs,0, "JLT %p", /* 0x7c */
1158 10323cd3 2004-04-19 devnull Jbs,0, "JGE %p", /* 0x7d */
1159 10323cd3 2004-04-19 devnull Jbs,0, "JLE %p", /* 0x7e */
1160 10323cd3 2004-04-19 devnull Jbs,0, "JGT %p", /* 0x7f */
1161 10323cd3 2004-04-19 devnull RMOPB,0, optab80, /* 0x80 */
1162 10323cd3 2004-04-19 devnull RMOP,0, optab81, /* 0x81 */
1163 10323cd3 2004-04-19 devnull 0,0, "", /* 0x82 */
1164 10323cd3 2004-04-19 devnull RMOP,0, optab83, /* 0x83 */
1165 10323cd3 2004-04-19 devnull RMB,0, "TESTB %r,%e", /* 0x84 */
1166 10323cd3 2004-04-19 devnull RM,0, "TEST%S %r,%e", /* 0x85 */
1167 10323cd3 2004-04-19 devnull RMB,0, "XCHGB %r,%e", /* 0x86 */
1168 10323cd3 2004-04-19 devnull RM,0, "XCHG%S %r,%e", /* 0x87 */
1169 10323cd3 2004-04-19 devnull RMB,0, "MOVB %r,%e", /* 0x88 */
1170 10323cd3 2004-04-19 devnull RM,0, "MOV%S %r,%e", /* 0x89 */
1171 10323cd3 2004-04-19 devnull RMB,0, "MOVB %e,%r", /* 0x8a */
1172 10323cd3 2004-04-19 devnull RM,0, "MOV%S %e,%r", /* 0x8b */
1173 10323cd3 2004-04-19 devnull RM,0, "MOVW %g,%e", /* 0x8c */
1174 10323cd3 2004-04-19 devnull RM,0, "LEA %e,%r", /* 0x8d */
1175 10323cd3 2004-04-19 devnull RM,0, "MOVW %e,%g", /* 0x8e */
1176 10323cd3 2004-04-19 devnull RM,0, "POP%S %e", /* 0x8f */
1177 10323cd3 2004-04-19 devnull 0,0, "NOP", /* 0x90 */
1178 10323cd3 2004-04-19 devnull 0,0, "XCHG %OCX,%OAX", /* 0x91 */
1179 10323cd3 2004-04-19 devnull 0,0, "XCHG %OCX,%OAX", /* 0x92 */
1180 10323cd3 2004-04-19 devnull 0,0, "XCHG %OCX,%OAX", /* 0x93 */
1181 10323cd3 2004-04-19 devnull 0,0, "XCHG %OSP,%OAX", /* 0x94 */
1182 10323cd3 2004-04-19 devnull 0,0, "XCHG %OBP,%OAX", /* 0x95 */
1183 10323cd3 2004-04-19 devnull 0,0, "XCHG %OSI,%OAX", /* 0x96 */
1184 10323cd3 2004-04-19 devnull 0,0, "XCHG %ODI,%OAX", /* 0x97 */
1185 10323cd3 2004-04-19 devnull 0,0, "%X", /* 0x98 */ /* miserable CBW or CWDE */
1186 10323cd3 2004-04-19 devnull 0,0, "%x", /* 0x99 */ /* idiotic CWD or CDQ */
1187 10323cd3 2004-04-19 devnull PTR,0, "CALL%S %d", /* 0x9a */
1188 10323cd3 2004-04-19 devnull 0,0, "WAIT", /* 0x9b */
1189 10323cd3 2004-04-19 devnull 0,0, "PUSHF", /* 0x9c */
1190 10323cd3 2004-04-19 devnull 0,0, "POPF", /* 0x9d */
1191 10323cd3 2004-04-19 devnull 0,0, "SAHF", /* 0x9e */
1192 10323cd3 2004-04-19 devnull 0,0, "LAHF", /* 0x9f */
1193 10323cd3 2004-04-19 devnull Awd,0, "MOVB %i,AL", /* 0xa0 */
1194 10323cd3 2004-04-19 devnull Awd,0, "MOV%S %i,%OAX", /* 0xa1 */
1195 10323cd3 2004-04-19 devnull Awd,0, "MOVB AL,%i", /* 0xa2 */
1196 10323cd3 2004-04-19 devnull Awd,0, "MOV%S %OAX,%i", /* 0xa3 */
1197 10323cd3 2004-04-19 devnull 0,0, "MOVSB (%ASI),(%ADI)", /* 0xa4 */
1198 10323cd3 2004-04-19 devnull 0,0, "MOVS%S (%ASI),(%ADI)", /* 0xa5 */
1199 10323cd3 2004-04-19 devnull 0,0, "CMPSB (%ASI),(%ADI)", /* 0xa6 */
1200 10323cd3 2004-04-19 devnull 0,0, "CMPS%S (%ASI),(%ADI)", /* 0xa7 */
1201 10323cd3 2004-04-19 devnull Ib,0, "TESTB %i,AL", /* 0xa8 */
1202 10323cd3 2004-04-19 devnull Iwd,0, "TEST%S %i,%OAX", /* 0xa9 */
1203 10323cd3 2004-04-19 devnull 0,0, "STOSB AL,(%ADI)", /* 0xaa */
1204 10323cd3 2004-04-19 devnull 0,0, "STOS%S %OAX,(%ADI)", /* 0xab */
1205 10323cd3 2004-04-19 devnull 0,0, "LODSB (%ASI),AL", /* 0xac */
1206 10323cd3 2004-04-19 devnull 0,0, "LODS%S (%ASI),%OAX", /* 0xad */
1207 10323cd3 2004-04-19 devnull 0,0, "SCASB (%ADI),AL", /* 0xae */
1208 10323cd3 2004-04-19 devnull 0,0, "SCAS%S (%ADI),%OAX", /* 0xaf */
1209 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,AL", /* 0xb0 */
1210 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,CL", /* 0xb1 */
1211 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,DL", /* 0xb2 */
1212 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,BL", /* 0xb3 */
1213 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,AH", /* 0xb4 */
1214 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,CH", /* 0xb5 */
1215 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,DH", /* 0xb6 */
1216 10323cd3 2004-04-19 devnull Ib,0, "MOVB %i,BH", /* 0xb7 */
1217 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OAX", /* 0xb8 */
1218 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OCX", /* 0xb9 */
1219 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%ODX", /* 0xba */
1220 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OBX", /* 0xbb */
1221 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OSP", /* 0xbc */
1222 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OBP", /* 0xbd */
1223 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%OSI", /* 0xbe */
1224 10323cd3 2004-04-19 devnull Iwd,0, "MOV%S %i,%ODI", /* 0xbf */
1225 10323cd3 2004-04-19 devnull RMOPB,0, optabC0, /* 0xc0 */
1226 10323cd3 2004-04-19 devnull RMOP,0, optabC1, /* 0xc1 */
1227 10323cd3 2004-04-19 devnull Iw,0, "RET %i", /* 0xc2 */
1228 10323cd3 2004-04-19 devnull RET,0, "RET", /* 0xc3 */
1229 10323cd3 2004-04-19 devnull RM,0, "LES %e,%r", /* 0xc4 */
1230 10323cd3 2004-04-19 devnull RM,0, "LDS %e,%r", /* 0xc5 */
1231 10323cd3 2004-04-19 devnull RMB,Ib, "MOVB %i,%e", /* 0xc6 */
1232 10323cd3 2004-04-19 devnull RM,Iwd, "MOV%S %i,%e", /* 0xc7 */
1233 10323cd3 2004-04-19 devnull Iw2,Ib, "ENTER %i,%I", /* 0xc8 */ /* loony ENTER */
1234 10323cd3 2004-04-19 devnull RET,0, "LEAVE", /* 0xc9 */ /* bizarre LEAVE */
1235 10323cd3 2004-04-19 devnull Iw,0, "RETF %i", /* 0xca */
1236 10323cd3 2004-04-19 devnull RET,0, "RETF", /* 0xcb */
1237 10323cd3 2004-04-19 devnull 0,0, "INT 3", /* 0xcc */
1238 10323cd3 2004-04-19 devnull Ib,0, "INTB %i", /* 0xcd */
1239 10323cd3 2004-04-19 devnull 0,0, "INTO", /* 0xce */
1240 10323cd3 2004-04-19 devnull 0,0, "IRET", /* 0xcf */
1241 10323cd3 2004-04-19 devnull RMOPB,0, optabD0, /* 0xd0 */
1242 10323cd3 2004-04-19 devnull RMOP,0, optabD1, /* 0xd1 */
1243 10323cd3 2004-04-19 devnull RMOPB,0, optabD2, /* 0xd2 */
1244 10323cd3 2004-04-19 devnull RMOP,0, optabD3, /* 0xd3 */
1245 10323cd3 2004-04-19 devnull OA,0, "AAM", /* 0xd4 */
1246 10323cd3 2004-04-19 devnull OA,0, "AAD", /* 0xd5 */
1247 10323cd3 2004-04-19 devnull 0,0, "", /* 0xd6 */
1248 10323cd3 2004-04-19 devnull 0,0, "XLAT", /* 0xd7 */
1249 10323cd3 2004-04-19 devnull FRMOP,0, optabD8, /* 0xd8 */
1250 10323cd3 2004-04-19 devnull FRMEX,0, optabD9, /* 0xd9 */
1251 10323cd3 2004-04-19 devnull FRMOP,0, optabDA, /* 0xda */
1252 10323cd3 2004-04-19 devnull FRMEX,0, optabDB, /* 0xdb */
1253 10323cd3 2004-04-19 devnull FRMOP,0, optabDC, /* 0xdc */
1254 10323cd3 2004-04-19 devnull FRMOP,0, optabDD, /* 0xdd */
1255 10323cd3 2004-04-19 devnull FRMOP,0, optabDE, /* 0xde */
1256 10323cd3 2004-04-19 devnull FRMOP,0, optabDF, /* 0xdf */
1257 10323cd3 2004-04-19 devnull Jbs,0, "LOOPNE %p", /* 0xe0 */
1258 10323cd3 2004-04-19 devnull Jbs,0, "LOOPE %p", /* 0xe1 */
1259 10323cd3 2004-04-19 devnull Jbs,0, "LOOP %p", /* 0xe2 */
1260 10323cd3 2004-04-19 devnull Jbs,0, "JCXZ %p", /* 0xe3 */
1261 10323cd3 2004-04-19 devnull Ib,0, "INB %i,AL", /* 0xe4 */
1262 10323cd3 2004-04-19 devnull Ib,0, "IN%S %i,%OAX", /* 0xe5 */
1263 10323cd3 2004-04-19 devnull Ib,0, "OUTB AL,%i", /* 0xe6 */
1264 10323cd3 2004-04-19 devnull Ib,0, "OUT%S %OAX,%i", /* 0xe7 */
1265 10323cd3 2004-04-19 devnull Iwds,0, "CALL %p", /* 0xe8 */
1266 10323cd3 2004-04-19 devnull Iwds,0, "JMP %p", /* 0xe9 */
1267 10323cd3 2004-04-19 devnull PTR,0, "JMP %d", /* 0xea */
1268 10323cd3 2004-04-19 devnull Jbs,0, "JMP %p", /* 0xeb */
1269 10323cd3 2004-04-19 devnull 0,0, "INB DX,AL", /* 0xec */
1270 10323cd3 2004-04-19 devnull 0,0, "IN%S DX,%OAX", /* 0xed */
1271 10323cd3 2004-04-19 devnull 0,0, "OUTB AL,DX", /* 0xee */
1272 10323cd3 2004-04-19 devnull 0,0, "OUT%S %OAX,DX", /* 0xef */
1273 10323cd3 2004-04-19 devnull PRE,0, "LOCK", /* 0xf0 */
1274 10323cd3 2004-04-19 devnull 0,0, "", /* 0xf1 */
1275 10323cd3 2004-04-19 devnull PRE,0, "REPNE", /* 0xf2 */
1276 10323cd3 2004-04-19 devnull PRE,0, "REP", /* 0xf3 */
1277 10323cd3 2004-04-19 devnull 0,0, "HALT", /* 0xf4 */
1278 10323cd3 2004-04-19 devnull 0,0, "CMC", /* 0xf5 */
1279 10323cd3 2004-04-19 devnull RMOPB,0, optabF6, /* 0xf6 */
1280 10323cd3 2004-04-19 devnull RMOP,0, optabF7, /* 0xf7 */
1281 10323cd3 2004-04-19 devnull 0,0, "CLC", /* 0xf8 */
1282 10323cd3 2004-04-19 devnull 0,0, "STC", /* 0xf9 */
1283 10323cd3 2004-04-19 devnull 0,0, "CLI", /* 0xfa */
1284 10323cd3 2004-04-19 devnull 0,0, "STI", /* 0xfb */
1285 10323cd3 2004-04-19 devnull 0,0, "CLD", /* 0xfc */
1286 10323cd3 2004-04-19 devnull 0,0, "STD", /* 0xfd */
1287 10323cd3 2004-04-19 devnull RMOPB,0, optabFE, /* 0xfe */
1288 10323cd3 2004-04-19 devnull RMOP,0, optabFF, /* 0xff */
1292 a84cbb2a 2004-04-19 devnull * get a byte of the instruction
1294 a84cbb2a 2004-04-19 devnull static int
1295 a84cbb2a 2004-04-19 devnull igetc(Map * map, Instr *ip, uchar *c)
1297 a84cbb2a 2004-04-19 devnull if(ip->n+1 > sizeof(ip->mem)){
1298 a84cbb2a 2004-04-19 devnull werrstr("instruction too long");
1299 a84cbb2a 2004-04-19 devnull return -1;
1301 a84cbb2a 2004-04-19 devnull if (get1(map, ip->addr+ip->n, c, 1) < 0) {
1302 a84cbb2a 2004-04-19 devnull werrstr("can't read instruction: %r");
1303 a84cbb2a 2004-04-19 devnull return -1;
1305 a84cbb2a 2004-04-19 devnull ip->mem[ip->n++] = *c;
1306 a84cbb2a 2004-04-19 devnull return 1;
1310 a84cbb2a 2004-04-19 devnull * get two bytes of the instruction
1312 a84cbb2a 2004-04-19 devnull static int
1313 a84cbb2a 2004-04-19 devnull igets(Map *map, Instr *ip, ushort *sp)
1315 a84cbb2a 2004-04-19 devnull uchar c;
1316 a84cbb2a 2004-04-19 devnull ushort s;
1318 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1319 a84cbb2a 2004-04-19 devnull return -1;
1321 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1322 a84cbb2a 2004-04-19 devnull return -1;
1323 a84cbb2a 2004-04-19 devnull s |= (c<<8);
1324 a84cbb2a 2004-04-19 devnull *sp = s;
1325 a84cbb2a 2004-04-19 devnull return 1;
1329 a84cbb2a 2004-04-19 devnull * get 4 bytes of the instruction
1331 a84cbb2a 2004-04-19 devnull static int
1332 a84cbb2a 2004-04-19 devnull igetl(Map *map, Instr *ip, ulong *lp)
1334 a84cbb2a 2004-04-19 devnull ushort s;
1335 a84cbb2a 2004-04-19 devnull long l;
1337 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s) < 0)
1338 a84cbb2a 2004-04-19 devnull return -1;
1340 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s) < 0)
1341 a84cbb2a 2004-04-19 devnull return -1;
1342 a84cbb2a 2004-04-19 devnull l |= (s<<16);
1343 a84cbb2a 2004-04-19 devnull *lp = l;
1344 a84cbb2a 2004-04-19 devnull return 1;
1347 a84cbb2a 2004-04-19 devnull static int
1348 a84cbb2a 2004-04-19 devnull getdisp(Map *map, Instr *ip, int mod, int rm, int code)
1350 a84cbb2a 2004-04-19 devnull uchar c;
1351 a84cbb2a 2004-04-19 devnull ushort s;
1353 a84cbb2a 2004-04-19 devnull if (mod > 2)
1354 a84cbb2a 2004-04-19 devnull return 1;
1355 a84cbb2a 2004-04-19 devnull if (mod == 1) {
1356 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1357 a84cbb2a 2004-04-19 devnull return -1;
1358 a84cbb2a 2004-04-19 devnull if (c&0x80)
1359 a84cbb2a 2004-04-19 devnull ip->disp = c|0xffffff00;
1361 a84cbb2a 2004-04-19 devnull ip->disp = c&0xff;
1362 a84cbb2a 2004-04-19 devnull } else if (mod == 2 || rm == code) {
1363 a84cbb2a 2004-04-19 devnull if (ip->asize == 'E') {
1364 a84cbb2a 2004-04-19 devnull if (igetl(map, ip, &ip->disp) < 0)
1365 a84cbb2a 2004-04-19 devnull return -1;
1366 a84cbb2a 2004-04-19 devnull } else {
1367 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s) < 0)
1368 a84cbb2a 2004-04-19 devnull return -1;
1369 a84cbb2a 2004-04-19 devnull if (s&0x8000)
1370 a84cbb2a 2004-04-19 devnull ip->disp = s|0xffff0000;
1372 a84cbb2a 2004-04-19 devnull ip->disp = s;
1374 a84cbb2a 2004-04-19 devnull if (mod == 0)
1375 a84cbb2a 2004-04-19 devnull ip->base = -1;
1377 a84cbb2a 2004-04-19 devnull return 1;
1380 a84cbb2a 2004-04-19 devnull static int
1381 a84cbb2a 2004-04-19 devnull modrm(Map *map, Instr *ip, uchar c)
1383 a84cbb2a 2004-04-19 devnull uchar rm, mod;
1385 a84cbb2a 2004-04-19 devnull mod = (c>>6)&3;
1386 a84cbb2a 2004-04-19 devnull rm = c&7;
1387 a84cbb2a 2004-04-19 devnull ip->mod = mod;
1388 a84cbb2a 2004-04-19 devnull ip->base = rm;
1389 a84cbb2a 2004-04-19 devnull ip->reg = (c>>3)&7;
1390 a84cbb2a 2004-04-19 devnull if (mod == 3) /* register */
1391 a84cbb2a 2004-04-19 devnull return 1;
1392 a84cbb2a 2004-04-19 devnull if (ip->asize == 0) { /* 16-bit mode */
1393 a84cbb2a 2004-04-19 devnull switch(rm)
1395 a84cbb2a 2004-04-19 devnull case 0:
1396 a84cbb2a 2004-04-19 devnull ip->base = BX; ip->index = SI;
1398 a84cbb2a 2004-04-19 devnull case 1:
1399 a84cbb2a 2004-04-19 devnull ip->base = BX; ip->index = DI;
1401 a84cbb2a 2004-04-19 devnull case 2:
1402 a84cbb2a 2004-04-19 devnull ip->base = BP; ip->index = SI;
1404 a84cbb2a 2004-04-19 devnull case 3:
1405 a84cbb2a 2004-04-19 devnull ip->base = BP; ip->index = DI;
1407 a84cbb2a 2004-04-19 devnull case 4:
1408 a84cbb2a 2004-04-19 devnull ip->base = SI;
1410 a84cbb2a 2004-04-19 devnull case 5:
1411 a84cbb2a 2004-04-19 devnull ip->base = DI;
1413 a84cbb2a 2004-04-19 devnull case 6:
1414 a84cbb2a 2004-04-19 devnull ip->base = BP;
1416 a84cbb2a 2004-04-19 devnull case 7:
1417 a84cbb2a 2004-04-19 devnull ip->base = BX;
1419 a84cbb2a 2004-04-19 devnull default:
1422 a84cbb2a 2004-04-19 devnull return getdisp(map, ip, mod, rm, 6);
1424 a84cbb2a 2004-04-19 devnull if (rm == 4) { /* scummy sib byte */
1425 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1426 a84cbb2a 2004-04-19 devnull return -1;
1427 a84cbb2a 2004-04-19 devnull ip->ss = (c>>6)&0x03;
1428 a84cbb2a 2004-04-19 devnull ip->index = (c>>3)&0x07;
1429 a84cbb2a 2004-04-19 devnull if (ip->index == 4)
1430 a84cbb2a 2004-04-19 devnull ip->index = -1;
1431 a84cbb2a 2004-04-19 devnull ip->base = c&0x07;
1432 a84cbb2a 2004-04-19 devnull return getdisp(map, ip, mod, ip->base, 5);
1434 a84cbb2a 2004-04-19 devnull return getdisp(map, ip, mod, rm, 5);
1437 a84cbb2a 2004-04-19 devnull static Optable *
1438 a84cbb2a 2004-04-19 devnull mkinstr(Map *map, Instr *ip, ulong pc)
1440 a84cbb2a 2004-04-19 devnull int i, n;
1441 a84cbb2a 2004-04-19 devnull uchar c;
1442 a84cbb2a 2004-04-19 devnull ushort s;
1443 a84cbb2a 2004-04-19 devnull Optable *op, *obase;
1444 a84cbb2a 2004-04-19 devnull char buf[128];
1446 a84cbb2a 2004-04-19 devnull memset(ip, 0, sizeof(*ip));
1447 a84cbb2a 2004-04-19 devnull ip->base = -1;
1448 a84cbb2a 2004-04-19 devnull ip->index = -1;
1449 a84cbb2a 2004-04-19 devnull if(0) /* asstype == AI8086) */
1450 a84cbb2a 2004-04-19 devnull ip->osize = 'W';
1452 a84cbb2a 2004-04-19 devnull ip->osize = 'L';
1453 a84cbb2a 2004-04-19 devnull ip->asize = 'E';
1455 a84cbb2a 2004-04-19 devnull ip->addr = pc;
1456 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1457 a84cbb2a 2004-04-19 devnull return 0;
1458 a84cbb2a 2004-04-19 devnull obase = optable;
1460 a84cbb2a 2004-04-19 devnull op = &obase[c];
1461 a84cbb2a 2004-04-19 devnull if (op->proto == 0) {
1463 a84cbb2a 2004-04-19 devnull n = snprint(buf, sizeof(buf), "opcode: ??");
1464 a84cbb2a 2004-04-19 devnull for (i = 0; i < ip->n && n < sizeof(buf)-3; i++, n+=2)
1465 a84cbb2a 2004-04-19 devnull _hexify(buf+n, ip->mem[i], 1);
1466 a84cbb2a 2004-04-19 devnull strcpy(buf+n, "??");
1467 a84cbb2a 2004-04-19 devnull werrstr(buf);
1468 a84cbb2a 2004-04-19 devnull return 0;
1470 a84cbb2a 2004-04-19 devnull for(i = 0; i < 2 && op->operand[i]; i++) {
1471 a84cbb2a 2004-04-19 devnull switch(op->operand[i])
1473 a84cbb2a 2004-04-19 devnull case Ib: /* 8-bit immediate - (no sign extension)*/
1474 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1475 a84cbb2a 2004-04-19 devnull return 0;
1476 a84cbb2a 2004-04-19 devnull ip->imm = c&0xff;
1478 a84cbb2a 2004-04-19 devnull case Jbs: /* 8-bit jump immediate (sign extended) */
1479 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1480 a84cbb2a 2004-04-19 devnull return 0;
1481 a84cbb2a 2004-04-19 devnull if (c&0x80)
1482 a84cbb2a 2004-04-19 devnull ip->imm = c|0xffffff00;
1484 a84cbb2a 2004-04-19 devnull ip->imm = c&0xff;
1485 a84cbb2a 2004-04-19 devnull ip->jumptype = Jbs;
1487 a84cbb2a 2004-04-19 devnull case Ibs: /* 8-bit immediate (sign extended) */
1488 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1489 a84cbb2a 2004-04-19 devnull return 0;
1490 a84cbb2a 2004-04-19 devnull if (c&0x80)
1491 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L')
1492 a84cbb2a 2004-04-19 devnull ip->imm = c|0xffffff00;
1494 a84cbb2a 2004-04-19 devnull ip->imm = c|0xff00;
1496 a84cbb2a 2004-04-19 devnull ip->imm = c&0xff;
1498 a84cbb2a 2004-04-19 devnull case Iw: /* 16-bit immediate -> imm */
1499 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s) < 0)
1500 a84cbb2a 2004-04-19 devnull return 0;
1501 a84cbb2a 2004-04-19 devnull ip->imm = s&0xffff;
1502 a84cbb2a 2004-04-19 devnull ip->jumptype = Iw;
1504 a84cbb2a 2004-04-19 devnull case Iw2: /* 16-bit immediate -> in imm2*/
1505 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s) < 0)
1506 a84cbb2a 2004-04-19 devnull return 0;
1507 a84cbb2a 2004-04-19 devnull ip->imm2 = s&0xffff;
1509 a84cbb2a 2004-04-19 devnull case Iwd: /* Operand-sized immediate (no sign extension)*/
1510 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L') {
1511 a84cbb2a 2004-04-19 devnull if (igetl(map, ip, &ip->imm) < 0)
1512 a84cbb2a 2004-04-19 devnull return 0;
1513 a84cbb2a 2004-04-19 devnull } else {
1514 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s)< 0)
1515 a84cbb2a 2004-04-19 devnull return 0;
1516 a84cbb2a 2004-04-19 devnull ip->imm = s&0xffff;
1519 a84cbb2a 2004-04-19 devnull case Awd: /* Address-sized immediate (no sign extension)*/
1520 a84cbb2a 2004-04-19 devnull if (ip->asize == 'E') {
1521 a84cbb2a 2004-04-19 devnull if (igetl(map, ip, &ip->imm) < 0)
1522 a84cbb2a 2004-04-19 devnull return 0;
1523 a84cbb2a 2004-04-19 devnull } else {
1524 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s)< 0)
1525 a84cbb2a 2004-04-19 devnull return 0;
1526 a84cbb2a 2004-04-19 devnull ip->imm = s&0xffff;
1529 a84cbb2a 2004-04-19 devnull case Iwds: /* Operand-sized immediate (sign extended) */
1530 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L') {
1531 a84cbb2a 2004-04-19 devnull if (igetl(map, ip, &ip->imm) < 0)
1532 a84cbb2a 2004-04-19 devnull return 0;
1533 a84cbb2a 2004-04-19 devnull } else {
1534 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s)< 0)
1535 a84cbb2a 2004-04-19 devnull return 0;
1536 a84cbb2a 2004-04-19 devnull if (s&0x8000)
1537 a84cbb2a 2004-04-19 devnull ip->imm = s|0xffff0000;
1539 a84cbb2a 2004-04-19 devnull ip->imm = s&0xffff;
1541 a84cbb2a 2004-04-19 devnull ip->jumptype = Iwds;
1543 a84cbb2a 2004-04-19 devnull case OA: /* literal 0x0a byte */
1544 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1545 a84cbb2a 2004-04-19 devnull return 0;
1546 a84cbb2a 2004-04-19 devnull if (c != 0x0a)
1547 a84cbb2a 2004-04-19 devnull goto badop;
1549 a84cbb2a 2004-04-19 devnull case R0: /* base register must be R0 */
1550 a84cbb2a 2004-04-19 devnull if (ip->base != 0)
1551 a84cbb2a 2004-04-19 devnull goto badop;
1553 a84cbb2a 2004-04-19 devnull case R1: /* base register must be R1 */
1554 a84cbb2a 2004-04-19 devnull if (ip->base != 1)
1555 a84cbb2a 2004-04-19 devnull goto badop;
1557 a84cbb2a 2004-04-19 devnull case RMB: /* R/M field with byte register (/r)*/
1558 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1559 a84cbb2a 2004-04-19 devnull return 0;
1560 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1561 a84cbb2a 2004-04-19 devnull return 0;
1562 a84cbb2a 2004-04-19 devnull ip->osize = 'B';
1564 a84cbb2a 2004-04-19 devnull case RM: /* R/M field with register (/r) */
1565 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1566 a84cbb2a 2004-04-19 devnull return 0;
1567 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1568 a84cbb2a 2004-04-19 devnull return 0;
1570 a84cbb2a 2004-04-19 devnull case RMOPB: /* R/M field with op code (/digit) */
1571 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1572 a84cbb2a 2004-04-19 devnull return 0;
1573 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1574 a84cbb2a 2004-04-19 devnull return 0;
1575 a84cbb2a 2004-04-19 devnull c = ip->reg; /* secondary op code */
1576 a84cbb2a 2004-04-19 devnull obase = (Optable*)op->proto;
1577 a84cbb2a 2004-04-19 devnull ip->osize = 'B';
1578 a84cbb2a 2004-04-19 devnull goto newop;
1579 a84cbb2a 2004-04-19 devnull case RMOP: /* R/M field with op code (/digit) */
1580 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1581 a84cbb2a 2004-04-19 devnull return 0;
1582 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1583 a84cbb2a 2004-04-19 devnull return 0;
1584 a84cbb2a 2004-04-19 devnull c = ip->reg;
1585 a84cbb2a 2004-04-19 devnull obase = (Optable*)op->proto;
1586 a84cbb2a 2004-04-19 devnull goto newop;
1587 a84cbb2a 2004-04-19 devnull case FRMOP: /* FP R/M field with op code (/digit) */
1588 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1589 a84cbb2a 2004-04-19 devnull return 0;
1590 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1591 a84cbb2a 2004-04-19 devnull return 0;
1592 a84cbb2a 2004-04-19 devnull if ((c&0xc0) == 0xc0)
1593 a84cbb2a 2004-04-19 devnull c = ip->reg+8; /* 16 entry table */
1595 a84cbb2a 2004-04-19 devnull c = ip->reg;
1596 a84cbb2a 2004-04-19 devnull obase = (Optable*)op->proto;
1597 a84cbb2a 2004-04-19 devnull goto newop;
1598 a84cbb2a 2004-04-19 devnull case FRMEX: /* Extended FP R/M field with op code (/digit) */
1599 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1600 a84cbb2a 2004-04-19 devnull return 0;
1601 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1602 a84cbb2a 2004-04-19 devnull return 0;
1603 a84cbb2a 2004-04-19 devnull if ((c&0xc0) == 0xc0)
1604 a84cbb2a 2004-04-19 devnull c = (c&0x3f)+8; /* 64-entry table */
1606 a84cbb2a 2004-04-19 devnull c = ip->reg;
1607 a84cbb2a 2004-04-19 devnull obase = (Optable*)op->proto;
1608 a84cbb2a 2004-04-19 devnull goto newop;
1609 a84cbb2a 2004-04-19 devnull case RMR: /* R/M register only (mod = 11) */
1610 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1611 a84cbb2a 2004-04-19 devnull return 0;
1612 a84cbb2a 2004-04-19 devnull if ((c&0xc0) != 0xc0) {
1613 a84cbb2a 2004-04-19 devnull werrstr("invalid R/M register: %x", c);
1614 a84cbb2a 2004-04-19 devnull return 0;
1616 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1617 a84cbb2a 2004-04-19 devnull return 0;
1619 a84cbb2a 2004-04-19 devnull case RMM: /* R/M register only (mod = 11) */
1620 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1621 a84cbb2a 2004-04-19 devnull return 0;
1622 a84cbb2a 2004-04-19 devnull if ((c&0xc0) == 0xc0) {
1623 a84cbb2a 2004-04-19 devnull werrstr("invalid R/M memory mode: %x", c);
1624 a84cbb2a 2004-04-19 devnull return 0;
1626 a84cbb2a 2004-04-19 devnull if (modrm(map, ip, c) < 0)
1627 a84cbb2a 2004-04-19 devnull return 0;
1629 a84cbb2a 2004-04-19 devnull case PTR: /* Seg:Displacement addr (ptr16:16 or ptr16:32) */
1630 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L') {
1631 a84cbb2a 2004-04-19 devnull if (igetl(map, ip, &ip->disp) < 0)
1632 a84cbb2a 2004-04-19 devnull return 0;
1633 a84cbb2a 2004-04-19 devnull } else {
1634 a84cbb2a 2004-04-19 devnull if (igets(map, ip, &s)< 0)
1635 a84cbb2a 2004-04-19 devnull return 0;
1636 a84cbb2a 2004-04-19 devnull ip->disp = s&0xffff;
1638 a84cbb2a 2004-04-19 devnull if (igets(map, ip, (ushort*)&ip->seg) < 0)
1639 a84cbb2a 2004-04-19 devnull return 0;
1640 a84cbb2a 2004-04-19 devnull ip->jumptype = PTR;
1642 a84cbb2a 2004-04-19 devnull case AUX: /* Multi-byte op code - Auxiliary table */
1643 a84cbb2a 2004-04-19 devnull obase = (Optable*)op->proto;
1644 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1645 a84cbb2a 2004-04-19 devnull return 0;
1646 a84cbb2a 2004-04-19 devnull goto newop;
1647 a84cbb2a 2004-04-19 devnull case PRE: /* Instr Prefix */
1648 a84cbb2a 2004-04-19 devnull ip->prefix = (char*)op->proto;
1649 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1650 a84cbb2a 2004-04-19 devnull return 0;
1651 a84cbb2a 2004-04-19 devnull goto newop;
1652 a84cbb2a 2004-04-19 devnull case SEG: /* Segment Prefix */
1653 a84cbb2a 2004-04-19 devnull ip->segment = (char*)op->proto;
1654 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1655 a84cbb2a 2004-04-19 devnull return 0;
1656 a84cbb2a 2004-04-19 devnull goto newop;
1657 a84cbb2a 2004-04-19 devnull case OPOVER: /* Operand size override */
1658 a84cbb2a 2004-04-19 devnull ip->osize = 'W';
1659 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1660 a84cbb2a 2004-04-19 devnull return 0;
1661 a84cbb2a 2004-04-19 devnull goto newop;
1662 a84cbb2a 2004-04-19 devnull case ADDOVER: /* Address size override */
1663 a84cbb2a 2004-04-19 devnull ip->asize = 0;
1664 a84cbb2a 2004-04-19 devnull if (igetc(map, ip, &c) < 0)
1665 a84cbb2a 2004-04-19 devnull return 0;
1666 a84cbb2a 2004-04-19 devnull goto newop;
1667 a84cbb2a 2004-04-19 devnull case JUMP: /* mark instruction as JUMP or RET */
1668 a84cbb2a 2004-04-19 devnull case RET:
1669 a84cbb2a 2004-04-19 devnull ip->jumptype = op->operand[i];
1671 a84cbb2a 2004-04-19 devnull default:
1672 a84cbb2a 2004-04-19 devnull werrstr("bad operand type %d", op->operand[i]);
1673 a84cbb2a 2004-04-19 devnull return 0;
1676 a84cbb2a 2004-04-19 devnull return op;
1679 a84cbb2a 2004-04-19 devnull static void
1680 a84cbb2a 2004-04-19 devnull bprint(Instr *ip, char *fmt, ...)
1682 a84cbb2a 2004-04-19 devnull va_list arg;
1684 a84cbb2a 2004-04-19 devnull va_start(arg, fmt);
1685 a84cbb2a 2004-04-19 devnull ip->curr = vseprint(ip->curr, ip->end, fmt, arg);
1686 a84cbb2a 2004-04-19 devnull va_end(arg);
1690 a84cbb2a 2004-04-19 devnull * if we want to call 16 bit regs AX,BX,CX,...
1691 a84cbb2a 2004-04-19 devnull * and 32 bit regs EAX,EBX,ECX,... then
1692 a84cbb2a 2004-04-19 devnull * change the defs of ANAME and ONAME to:
1693 a84cbb2a 2004-04-19 devnull * #define ANAME(ip) ((ip->asize == 'E' ? "E" : "")
1694 a84cbb2a 2004-04-19 devnull * #define ONAME(ip) ((ip)->osize == 'L' ? "E" : "")
1696 a84cbb2a 2004-04-19 devnull #define ANAME(ip) ""
1697 a84cbb2a 2004-04-19 devnull #define ONAME(ip) ""
1699 a84cbb2a 2004-04-19 devnull static char *reg[] = {
1700 89f6ec8e 2004-04-20 devnull "AX", /* 0 */
1701 89f6ec8e 2004-04-20 devnull "CX", /* 1 */
1702 89f6ec8e 2004-04-20 devnull "DX", /* 2 */
1703 89f6ec8e 2004-04-20 devnull "BX", /* 3 */
1704 89f6ec8e 2004-04-20 devnull "SP", /* 4 */
1705 89f6ec8e 2004-04-20 devnull "BP", /* 5 */
1706 89f6ec8e 2004-04-20 devnull "SI", /* 6 */
1707 89f6ec8e 2004-04-20 devnull "DI", /* 7 */
1710 a84cbb2a 2004-04-19 devnull static char *breg[] = { "AL", "CL", "DL", "BL", "AH", "CH", "DH", "BH" };
1711 a84cbb2a 2004-04-19 devnull static char *sreg[] = { "ES", "CS", "SS", "DS", "FS", "GS" };
1713 a84cbb2a 2004-04-19 devnull static void
1714 a84cbb2a 2004-04-19 devnull plocal(Instr *ip)
1716 a84cbb2a 2004-04-19 devnull Symbol s;
1717 a84cbb2a 2004-04-19 devnull char *name;
1718 a84cbb2a 2004-04-19 devnull Loc l, li;
1720 a84cbb2a 2004-04-19 devnull l.type = LOFFSET;
1721 a84cbb2a 2004-04-19 devnull l.offset = ip->disp;
1722 a84cbb2a 2004-04-19 devnull if(ip->base == SP)
1723 a84cbb2a 2004-04-19 devnull l.reg = "SP";
1725 a84cbb2a 2004-04-19 devnull l.reg = "BP";
1727 a84cbb2a 2004-04-19 devnull li.type = LADDR;
1728 a84cbb2a 2004-04-19 devnull li.addr = ip->addr;
1729 a84cbb2a 2004-04-19 devnull if(findsym(li, CTEXT, &s) < 0)
1730 a84cbb2a 2004-04-19 devnull goto raw;
1732 a84cbb2a 2004-04-19 devnull name = nil;
1733 a84cbb2a 2004-04-19 devnull if(ip->base==SP && lookuplsym(&s, FRAMENAME, &s) >= 0){
1734 a84cbb2a 2004-04-19 devnull /* translate stack offset to offset from plan 9 frame pointer */
1735 a84cbb2a 2004-04-19 devnull /* XXX not sure how to do this */
1738 a84cbb2a 2004-04-19 devnull if(name==nil && findlsym(&s, l, &s) >= 0)
1739 a84cbb2a 2004-04-19 devnull name = s.name;
1741 a84cbb2a 2004-04-19 devnull if(name)
1742 a84cbb2a 2004-04-19 devnull bprint(ip, "%s+", name);
1745 a84cbb2a 2004-04-19 devnull bprint(ip, "%lx(%s)", l.offset, l.reg);
1748 a84cbb2a 2004-04-19 devnull static int
1749 a84cbb2a 2004-04-19 devnull isjmp(Instr *ip)
1751 a84cbb2a 2004-04-19 devnull switch(ip->jumptype){
1752 a84cbb2a 2004-04-19 devnull case Iwds:
1753 a84cbb2a 2004-04-19 devnull case Jbs:
1754 a84cbb2a 2004-04-19 devnull case JUMP:
1755 a84cbb2a 2004-04-19 devnull return 1;
1756 a84cbb2a 2004-04-19 devnull default:
1757 a84cbb2a 2004-04-19 devnull return 0;
1762 a84cbb2a 2004-04-19 devnull * This is too smart for its own good, but it really is nice
1763 a84cbb2a 2004-04-19 devnull * to have accurate translations when debugging, and it
1764 a84cbb2a 2004-04-19 devnull * helps us identify which code is different in binaries that
1765 a84cbb2a 2004-04-19 devnull * are changed on sources.
1767 a84cbb2a 2004-04-19 devnull static int
1768 a84cbb2a 2004-04-19 devnull issymref(Instr *ip, Symbol *s, long w, long val)
1770 a84cbb2a 2004-04-19 devnull Symbol next, tmp;
1771 a84cbb2a 2004-04-19 devnull long isstring, size;
1773 a84cbb2a 2004-04-19 devnull if (isjmp(ip))
1774 a84cbb2a 2004-04-19 devnull return 1;
1775 a84cbb2a 2004-04-19 devnull if (s->class==CTEXT && w==0)
1776 a84cbb2a 2004-04-19 devnull return 1;
1777 a84cbb2a 2004-04-19 devnull if (s->class==CDATA) {
1778 a84cbb2a 2004-04-19 devnull /* use first bss symbol (or "end") rather than edata */
1779 a84cbb2a 2004-04-19 devnull if (s->name[0]=='e' && strcmp(s->name, "edata") == 0){
1780 a84cbb2a 2004-04-19 devnull if((indexsym(s->index+1, &tmp) && loccmp(&tmp.loc, &s->loc)==0)
1781 a84cbb2a 2004-04-19 devnull || (indexsym(s->index-1, &tmp) && loccmp(&tmp.loc, &s->loc)==0))
1782 a84cbb2a 2004-04-19 devnull *s = tmp;
1784 a84cbb2a 2004-04-19 devnull if (w == 0)
1785 a84cbb2a 2004-04-19 devnull return 1;
1786 a84cbb2a 2004-04-19 devnull for (next=*s; next.loc.addr==s->loc.addr; next=tmp)
1787 a84cbb2a 2004-04-19 devnull if (!indexsym(next.index+1, &tmp))
1789 a84cbb2a 2004-04-19 devnull size = next.loc.addr - s->loc.addr;
1790 a84cbb2a 2004-04-19 devnull if (w >= size)
1791 a84cbb2a 2004-04-19 devnull return 0;
1792 a84cbb2a 2004-04-19 devnull if (w > size-w)
1793 a84cbb2a 2004-04-19 devnull w = size-w;
1794 a84cbb2a 2004-04-19 devnull /* huge distances are usually wrong except in .string */
1795 a84cbb2a 2004-04-19 devnull isstring = (s->name[0]=='.' && strcmp(s->name, ".string") == 0);
1796 a84cbb2a 2004-04-19 devnull if (w > 8192 && !isstring)
1797 a84cbb2a 2004-04-19 devnull return 0;
1798 a84cbb2a 2004-04-19 devnull /* medium distances are tricky - look for constants */
1799 a84cbb2a 2004-04-19 devnull /* near powers of two */
1800 a84cbb2a 2004-04-19 devnull if ((val&(val-1)) == 0 || (val&(val+1)) == 0)
1801 a84cbb2a 2004-04-19 devnull return 0;
1802 a84cbb2a 2004-04-19 devnull return 1;
1804 a84cbb2a 2004-04-19 devnull return 0;
1807 a84cbb2a 2004-04-19 devnull static void
1808 a84cbb2a 2004-04-19 devnull immediate(Instr *ip, long val)
1810 a84cbb2a 2004-04-19 devnull Symbol s;
1811 a84cbb2a 2004-04-19 devnull long w;
1814 a84cbb2a 2004-04-19 devnull l.type = LADDR;
1815 a84cbb2a 2004-04-19 devnull l.addr = val;
1816 a84cbb2a 2004-04-19 devnull if (findsym(l, CANY, &s) >= 0) {
1817 a84cbb2a 2004-04-19 devnull w = val - s.loc.addr;
1818 a84cbb2a 2004-04-19 devnull if (w < 0)
1819 a84cbb2a 2004-04-19 devnull w = -w;
1820 a84cbb2a 2004-04-19 devnull if (issymref(ip, &s, w, val)) {
1822 a84cbb2a 2004-04-19 devnull bprint(ip, "%s+%lux(SB)", s.name, w);
1824 a84cbb2a 2004-04-19 devnull bprint(ip, "%s(SB)", s.name);
1825 a84cbb2a 2004-04-19 devnull return;
1827 a84cbb2a 2004-04-19 devnull if (s.class==CDATA && indexsym(s.index+1, &s) >= 0) {
1828 a84cbb2a 2004-04-19 devnull w = s.loc.addr - val;
1829 a84cbb2a 2004-04-19 devnull if (w < 0)
1830 a84cbb2a 2004-04-19 devnull w = -w;
1831 a84cbb2a 2004-04-19 devnull if (w < 4096) {
1832 a84cbb2a 2004-04-19 devnull bprint(ip, "%s-%lux(SB)", s.name, w);
1833 a84cbb2a 2004-04-19 devnull return;
1837 a84cbb2a 2004-04-19 devnull bprint(ip, "%lux", val);
1840 a84cbb2a 2004-04-19 devnull static void
1841 a84cbb2a 2004-04-19 devnull pea(Instr *ip)
1843 a84cbb2a 2004-04-19 devnull if (ip->mod == 3) {
1844 a84cbb2a 2004-04-19 devnull if (ip->osize == 'B')
1845 a84cbb2a 2004-04-19 devnull bprint(ip, breg[(uchar)ip->base]);
1847 a84cbb2a 2004-04-19 devnull bprint(ip, "%s%s", ANAME(ip), reg[(uchar)ip->base]);
1848 a84cbb2a 2004-04-19 devnull return;
1850 a84cbb2a 2004-04-19 devnull if (ip->segment)
1851 a84cbb2a 2004-04-19 devnull bprint(ip, ip->segment);
1852 a84cbb2a 2004-04-19 devnull if (ip->asize == 'E' && (ip->base == SP || ip->base == BP))
1853 a84cbb2a 2004-04-19 devnull plocal(ip);
1855 a84cbb2a 2004-04-19 devnull if (ip->base < 0)
1856 a84cbb2a 2004-04-19 devnull immediate(ip, ip->disp);
1858 1cc215aa 2004-12-25 devnull bprint(ip, "%lux", ip->disp);
1859 a84cbb2a 2004-04-19 devnull bprint(ip,"(%s%s)", ANAME(ip), reg[(uchar)ip->base]);
1862 a84cbb2a 2004-04-19 devnull if (ip->index >= 0)
1863 a84cbb2a 2004-04-19 devnull bprint(ip,"(%s%s*%d)", ANAME(ip), reg[(uchar)ip->index], 1<<ip->ss);
1866 a84cbb2a 2004-04-19 devnull static void
1867 a84cbb2a 2004-04-19 devnull prinstr(Instr *ip, char *fmt)
1869 a84cbb2a 2004-04-19 devnull if (ip->prefix)
1870 a84cbb2a 2004-04-19 devnull bprint(ip, "%s ", ip->prefix);
1871 a84cbb2a 2004-04-19 devnull for (; *fmt && ip->curr < ip->end; fmt++) {
1872 a84cbb2a 2004-04-19 devnull if (*fmt != '%')
1873 a84cbb2a 2004-04-19 devnull *ip->curr++ = *fmt;
1874 a84cbb2a 2004-04-19 devnull else switch(*++fmt)
1876 a84cbb2a 2004-04-19 devnull case '%':
1877 a84cbb2a 2004-04-19 devnull *ip->curr++ = '%';
1879 a84cbb2a 2004-04-19 devnull case 'A':
1880 a84cbb2a 2004-04-19 devnull bprint(ip, "%s", ANAME(ip));
1882 a84cbb2a 2004-04-19 devnull case 'C':
1883 a84cbb2a 2004-04-19 devnull bprint(ip, "CR%d", ip->reg);
1885 a84cbb2a 2004-04-19 devnull case 'D':
1886 a84cbb2a 2004-04-19 devnull if (ip->reg < 4 || ip->reg == 6 || ip->reg == 7)
1887 a84cbb2a 2004-04-19 devnull bprint(ip, "DR%d",ip->reg);
1889 a84cbb2a 2004-04-19 devnull bprint(ip, "???");
1891 a84cbb2a 2004-04-19 devnull case 'I':
1892 a84cbb2a 2004-04-19 devnull bprint(ip, "$");
1893 a84cbb2a 2004-04-19 devnull immediate(ip, ip->imm2);
1895 a84cbb2a 2004-04-19 devnull case 'O':
1896 a84cbb2a 2004-04-19 devnull bprint(ip,"%s", ONAME(ip));
1898 a84cbb2a 2004-04-19 devnull case 'i':
1899 a84cbb2a 2004-04-19 devnull bprint(ip, "$");
1900 a84cbb2a 2004-04-19 devnull immediate(ip,ip->imm);
1902 a84cbb2a 2004-04-19 devnull case 'R':
1903 a84cbb2a 2004-04-19 devnull bprint(ip, "%s%s", ONAME(ip), reg[ip->reg]);
1905 a84cbb2a 2004-04-19 devnull case 'S':
1906 a84cbb2a 2004-04-19 devnull bprint(ip, "%c", ip->osize);
1908 a84cbb2a 2004-04-19 devnull case 'T':
1909 a84cbb2a 2004-04-19 devnull if (ip->reg == 6 || ip->reg == 7)
1910 a84cbb2a 2004-04-19 devnull bprint(ip, "TR%d",ip->reg);
1912 a84cbb2a 2004-04-19 devnull bprint(ip, "???");
1914 a84cbb2a 2004-04-19 devnull case 'X':
1915 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L')
1916 a84cbb2a 2004-04-19 devnull bprint(ip,"CWDE");
1918 a84cbb2a 2004-04-19 devnull bprint(ip, "CBW");
1920 a84cbb2a 2004-04-19 devnull case 'd':
1921 a84cbb2a 2004-04-19 devnull bprint(ip,"%lux:%lux",ip->seg,ip->disp);
1923 a84cbb2a 2004-04-19 devnull case 'e':
1924 a84cbb2a 2004-04-19 devnull pea(ip);
1926 a84cbb2a 2004-04-19 devnull case 'f':
1927 a84cbb2a 2004-04-19 devnull bprint(ip, "F%d", ip->base);
1929 a84cbb2a 2004-04-19 devnull case 'g':
1930 a84cbb2a 2004-04-19 devnull if (ip->reg < 6)
1931 a84cbb2a 2004-04-19 devnull bprint(ip,"%s",sreg[ip->reg]);
1933 a84cbb2a 2004-04-19 devnull bprint(ip,"???");
1935 a84cbb2a 2004-04-19 devnull case 'p':
1936 a84cbb2a 2004-04-19 devnull immediate(ip, ip->imm+ip->addr+ip->n);
1938 a84cbb2a 2004-04-19 devnull case 'r':
1939 a84cbb2a 2004-04-19 devnull if (ip->osize == 'B')
1940 a84cbb2a 2004-04-19 devnull bprint(ip,"%s",breg[ip->reg]);
1942 a84cbb2a 2004-04-19 devnull bprint(ip, reg[ip->reg]);
1944 a84cbb2a 2004-04-19 devnull case 'x':
1945 a84cbb2a 2004-04-19 devnull if (ip->osize == 'L')
1946 a84cbb2a 2004-04-19 devnull bprint(ip,"CDQ");
1948 a84cbb2a 2004-04-19 devnull bprint(ip, "CWD");
1950 a84cbb2a 2004-04-19 devnull default:
1951 a84cbb2a 2004-04-19 devnull bprint(ip, "%%%c", *fmt);
1955 a84cbb2a 2004-04-19 devnull *ip->curr = 0; /* there's always room for 1 byte */
1958 a84cbb2a 2004-04-19 devnull static int
1959 a84cbb2a 2004-04-19 devnull i386das(Map *map, ulong pc, char modifier, char *buf, int n)
1961 a84cbb2a 2004-04-19 devnull Instr instr;
1962 a84cbb2a 2004-04-19 devnull Optable *op;
1964 a84cbb2a 2004-04-19 devnull USED(modifier);
1965 a84cbb2a 2004-04-19 devnull op = mkinstr(map, &instr, pc);
1966 a84cbb2a 2004-04-19 devnull if (op == 0) {
1967 a84cbb2a 2004-04-19 devnull errstr(buf, n);
1968 a84cbb2a 2004-04-19 devnull return -1;
1970 a84cbb2a 2004-04-19 devnull instr.curr = buf;
1971 a84cbb2a 2004-04-19 devnull instr.end = buf+n-1;
1972 a84cbb2a 2004-04-19 devnull prinstr(&instr, op->proto);
1973 a84cbb2a 2004-04-19 devnull return instr.n;
1976 a84cbb2a 2004-04-19 devnull static int
1977 a84cbb2a 2004-04-19 devnull i386hexinst(Map *map, ulong pc, char *buf, int n)
1979 a84cbb2a 2004-04-19 devnull Instr instr;
1982 a84cbb2a 2004-04-19 devnull if (mkinstr(map, &instr, pc) == 0) {
1983 a84cbb2a 2004-04-19 devnull errstr(buf, n);
1984 a84cbb2a 2004-04-19 devnull return -1;
1986 a84cbb2a 2004-04-19 devnull for(i = 0; i < instr.n && n > 2; i++) {
1987 a84cbb2a 2004-04-19 devnull _hexify(buf, instr.mem[i], 1);
1988 a84cbb2a 2004-04-19 devnull buf += 2;
1989 a84cbb2a 2004-04-19 devnull n -= 2;
1991 a84cbb2a 2004-04-19 devnull *buf = 0;
1992 a84cbb2a 2004-04-19 devnull return instr.n;
1995 a84cbb2a 2004-04-19 devnull static int
1996 a84cbb2a 2004-04-19 devnull i386instlen(Map *map, ulong pc)
1998 a84cbb2a 2004-04-19 devnull Instr i;
2000 a84cbb2a 2004-04-19 devnull if (mkinstr(map, &i, pc))
2001 a84cbb2a 2004-04-19 devnull return i.n;
2002 a84cbb2a 2004-04-19 devnull return -1;
2005 a84cbb2a 2004-04-19 devnull static int
2006 a84cbb2a 2004-04-19 devnull i386foll(Map *map, Regs *regs, ulong pc, ulong *foll)
2008 a84cbb2a 2004-04-19 devnull Instr i;
2009 a84cbb2a 2004-04-19 devnull Optable *op;
2010 a84cbb2a 2004-04-19 devnull ushort s;
2011 a84cbb2a 2004-04-19 devnull ulong addr;
2012 a84cbb2a 2004-04-19 devnull u32int l;
2015 a84cbb2a 2004-04-19 devnull op = mkinstr(map, &i, pc);
2016 a84cbb2a 2004-04-19 devnull if (!op)
2017 a84cbb2a 2004-04-19 devnull return -1;
2021 a84cbb2a 2004-04-19 devnull switch(i.jumptype) {
2022 a84cbb2a 2004-04-19 devnull case RET: /* RETURN or LEAVE */
2023 a84cbb2a 2004-04-19 devnull case Iw: /* RETURN */
2024 a84cbb2a 2004-04-19 devnull if (strcmp(op->proto, "LEAVE") == 0) {
2025 a84cbb2a 2004-04-19 devnull if (lget4(map, regs, locindir("BP", 0), &l) < 0)
2026 a84cbb2a 2004-04-19 devnull return -1;
2027 a84cbb2a 2004-04-19 devnull } else if (lget4(map, regs, locindir(mach->sp, 0), &l) < 0)
2028 a84cbb2a 2004-04-19 devnull return -1;
2029 a84cbb2a 2004-04-19 devnull foll[0] = l;
2030 a84cbb2a 2004-04-19 devnull return 1;
2031 a84cbb2a 2004-04-19 devnull case Iwds: /* pc relative JUMP or CALL*/
2032 a84cbb2a 2004-04-19 devnull case Jbs: /* pc relative JUMP or CALL */
2033 a84cbb2a 2004-04-19 devnull foll[0] = pc+i.imm+i.n;
2036 a84cbb2a 2004-04-19 devnull case PTR: /* seg:displacement JUMP or CALL */
2037 a84cbb2a 2004-04-19 devnull foll[0] = (i.seg<<4)+i.disp;
2038 a84cbb2a 2004-04-19 devnull return 1;
2039 a84cbb2a 2004-04-19 devnull case JUMP: /* JUMP or CALL EA */
2041 a84cbb2a 2004-04-19 devnull if(i.mod == 3) {
2042 a84cbb2a 2004-04-19 devnull if (rget(regs, reg[(uchar)i.base], &foll[0]) < 0)
2043 a84cbb2a 2004-04-19 devnull return -1;
2044 a84cbb2a 2004-04-19 devnull return 1;
2046 a84cbb2a 2004-04-19 devnull /* calculate the effective address */
2047 a84cbb2a 2004-04-19 devnull addr = i.disp;
2048 a84cbb2a 2004-04-19 devnull if (i.base >= 0) {
2049 a84cbb2a 2004-04-19 devnull if (lget4(map, regs, locindir(reg[(uchar)i.base], 0), &l) < 0)
2050 a84cbb2a 2004-04-19 devnull return -1;
2051 a84cbb2a 2004-04-19 devnull addr += l;
2053 a84cbb2a 2004-04-19 devnull if (i.index >= 0) {
2054 a84cbb2a 2004-04-19 devnull if (lget4(map, regs, locindir(reg[(uchar)i.index], 0), &l) < 0)
2055 a84cbb2a 2004-04-19 devnull return -1;
2056 a84cbb2a 2004-04-19 devnull addr += l*(1<<i.ss);
2058 a84cbb2a 2004-04-19 devnull /* now retrieve a seg:disp value at that address */
2059 a84cbb2a 2004-04-19 devnull if (get2(map, addr, &s) < 0) /* seg */
2060 a84cbb2a 2004-04-19 devnull return -1;
2061 a84cbb2a 2004-04-19 devnull foll[0] = s<<4;
2062 a84cbb2a 2004-04-19 devnull addr += 2;
2063 a84cbb2a 2004-04-19 devnull if (i.asize == 'L') {
2064 a84cbb2a 2004-04-19 devnull if (get4(map, addr, &l) < 0) /* disp32 */
2065 a84cbb2a 2004-04-19 devnull return -1;
2066 a84cbb2a 2004-04-19 devnull foll[0] += l;
2067 a84cbb2a 2004-04-19 devnull } else { /* disp16 */
2068 a84cbb2a 2004-04-19 devnull if (get2(map, addr, &s) < 0)
2069 a84cbb2a 2004-04-19 devnull return -1;
2070 a84cbb2a 2004-04-19 devnull foll[0] += s;
2072 a84cbb2a 2004-04-19 devnull return 1;
2073 a84cbb2a 2004-04-19 devnull default:
2076 a84cbb2a 2004-04-19 devnull if (strncmp(op->proto,"JMP", 3) == 0 || strncmp(op->proto,"CALL", 4) == 0)
2077 a84cbb2a 2004-04-19 devnull return 1;
2078 a84cbb2a 2004-04-19 devnull foll[n++] = pc+i.n;
2079 a84cbb2a 2004-04-19 devnull return n;
