db_disasm.c revision 118
14Srgrimes/* 24Srgrimes * Mach Operating System 34Srgrimes * Copyright (c) 1991,1990 Carnegie Mellon University 44Srgrimes * All Rights Reserved. 54Srgrimes * 64Srgrimes * Permission to use, copy, modify and distribute this software and its 74Srgrimes * documentation is hereby granted, provided that both the copyright 84Srgrimes * notice and this permission notice appear in all copies of the 94Srgrimes * software, derivative works or modified versions, and any portions 104Srgrimes * thereof, and that both notices appear in supporting documentation. 114Srgrimes * 124Srgrimes * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS 134Srgrimes * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR 144Srgrimes * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 154Srgrimes * 164Srgrimes * Carnegie Mellon requests users of this software to return to 174Srgrimes * 184Srgrimes * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU 194Srgrimes * School of Computer Science 204Srgrimes * Carnegie Mellon University 214Srgrimes * Pittsburgh PA 15213-3890 224Srgrimes * 234Srgrimes * any improvements or extensions that they make and grant Carnegie the 244Srgrimes * rights to redistribute these changes. 254Srgrimes */ 264Srgrimes/* 274Srgrimes * HISTORY 284Srgrimes * $Log: db_disasm.c,v $ 29118Srgrimes * Revision 1.1.1.1 1993/06/12 14:58:07 rgrimes 30118Srgrimes * Initial import, 0.1 + pk 0.2.4-B1 31118Srgrimes * 324Srgrimes * Revision 1.1 1992/03/25 21:42:01 pace 334Srgrimes * Initial revision 344Srgrimes * 354Srgrimes * Revision 2.3 91/02/05 17:11:03 mrt 364Srgrimes * Changed to new Mach copyright 374Srgrimes * [91/02/01 17:31:03 mrt] 384Srgrimes * 394Srgrimes * Revision 2.2 90/08/27 21:55:56 dbg 404Srgrimes * Fix register operand for move to/from control/test/debug 414Srgrimes * register instructions. Add i486 instructions. 424Srgrimes * [90/08/27 dbg] 434Srgrimes * 444Srgrimes * Import db_sym.h. Print instruction displacements in 454Srgrimes * current radix (signed). Change calling sequence of 464Srgrimes * db_disasm. 474Srgrimes * [90/08/21 dbg] 484Srgrimes * Fix includes. 494Srgrimes * [90/08/08 dbg] 504Srgrimes * Created. 514Srgrimes * [90/07/25 dbg] 524Srgrimes * 534Srgrimes */ 544Srgrimes 554Srgrimes/* 564Srgrimes * Instruction disassembler. 574Srgrimes */ 584Srgrimes#include "param.h" 594Srgrimes#include "proc.h" 604Srgrimes#include <machine/db_machdep.h> 614Srgrimes 624Srgrimes#include <ddb/db_access.h> 634Srgrimes#include <ddb/db_sym.h> 644Srgrimes 654Srgrimes/* 664Srgrimes * Size attributes 674Srgrimes */ 684Srgrimes#define BYTE 0 694Srgrimes#define WORD 1 704Srgrimes#define LONG 2 714Srgrimes#define QUAD 3 724Srgrimes#define SNGL 4 734Srgrimes#define DBLR 5 744Srgrimes#define EXTR 6 754Srgrimes#define SDEP 7 764Srgrimes#define NONE 8 774Srgrimes 784Srgrimes/* 794Srgrimes * Addressing modes 804Srgrimes */ 814Srgrimes#define E 1 /* general effective address */ 824Srgrimes#define Eind 2 /* indirect address (jump, call) */ 834Srgrimes#define Ew 3 /* address, word size */ 844Srgrimes#define Eb 4 /* address, byte size */ 854Srgrimes#define R 5 /* register, in 'reg' field */ 864Srgrimes#define Rw 6 /* word register, in 'reg' field */ 874Srgrimes#define Ri 7 /* register in instruction */ 884Srgrimes#define S 8 /* segment reg, in 'reg' field */ 894Srgrimes#define Si 9 /* segment reg, in instruction */ 904Srgrimes#define A 10 /* accumulator */ 914Srgrimes#define BX 11 /* (bx) */ 924Srgrimes#define CL 12 /* cl, for shifts */ 934Srgrimes#define DX 13 /* dx, for IO */ 944Srgrimes#define SI 14 /* si */ 954Srgrimes#define DI 15 /* di */ 964Srgrimes#define CR 16 /* control register */ 974Srgrimes#define DR 17 /* debug register */ 984Srgrimes#define TR 18 /* test register */ 994Srgrimes#define I 19 /* immediate, unsigned */ 1004Srgrimes#define Is 20 /* immediate, signed */ 1014Srgrimes#define Ib 21 /* byte immediate, unsigned */ 1024Srgrimes#define Ibs 22 /* byte immediate, signed */ 1034Srgrimes#define Iw 23 /* word immediate, unsigned */ 1044Srgrimes#define Il 24 /* long immediate */ 1054Srgrimes#define O 25 /* direct address */ 1064Srgrimes#define Db 26 /* byte displacement from EIP */ 1074Srgrimes#define Dl 27 /* long displacement from EIP */ 1084Srgrimes#define o1 28 /* constant 1 */ 1094Srgrimes#define o3 29 /* constant 3 */ 1104Srgrimes#define OS 30 /* immediate offset/segment */ 1114Srgrimes#define ST 31 /* FP stack top */ 1124Srgrimes#define STI 32 /* FP stack */ 1134Srgrimes#define X 33 /* extended FP op */ 1144Srgrimes#define XA 34 /* for 'fstcw %ax' */ 1154Srgrimes 1164Srgrimesstruct inst { 1174Srgrimes char * i_name; /* name */ 1184Srgrimes short i_has_modrm; /* has regmodrm byte */ 1194Srgrimes short i_size; /* operand size */ 1204Srgrimes int i_mode; /* addressing modes */ 1214Srgrimes char * i_extra; /* pointer to extra opcode table */ 1224Srgrimes}; 1234Srgrimes 1244Srgrimes#define op1(x) (x) 1254Srgrimes#define op2(x,y) ((x)|((y)<<8)) 1264Srgrimes#define op3(x,y,z) ((x)|((y)<<8)|((z)<<16)) 1274Srgrimes 1284Srgrimesstruct finst { 1294Srgrimes char * f_name; /* name for memory instruction */ 1304Srgrimes int f_size; /* size for memory instruction */ 1314Srgrimes int f_rrmode; /* mode for rr instruction */ 1324Srgrimes char * f_rrname; /* name for rr instruction 1334Srgrimes (or pointer to table) */ 1344Srgrimes}; 1354Srgrimes 1364Srgrimeschar * db_Grp6[] = { 1374Srgrimes "sldt", 1384Srgrimes "str", 1394Srgrimes "lldt", 1404Srgrimes "ltr", 1414Srgrimes "verr", 1424Srgrimes "verw", 1434Srgrimes "", 1444Srgrimes "" 1454Srgrimes}; 1464Srgrimes 1474Srgrimeschar * db_Grp7[] = { 1484Srgrimes "sgdt", 1494Srgrimes "sidt", 1504Srgrimes "lgdt", 1514Srgrimes "lidt", 1524Srgrimes "smsw", 1534Srgrimes "", 1544Srgrimes "lmsw", 1554Srgrimes "invlpg" 1564Srgrimes}; 1574Srgrimes 1584Srgrimeschar * db_Grp8[] = { 1594Srgrimes "", 1604Srgrimes "", 1614Srgrimes "", 1624Srgrimes "", 1634Srgrimes "bt", 1644Srgrimes "bts", 1654Srgrimes "btr", 1664Srgrimes "btc" 1674Srgrimes}; 1684Srgrimes 1694Srgrimesstruct inst db_inst_0f0x[] = { 1704Srgrimes/*00*/ { "", TRUE, NONE, op1(Ew), (char *)db_Grp6 }, 1714Srgrimes/*01*/ { "", TRUE, NONE, op1(Ew), (char *)db_Grp7 }, 1724Srgrimes/*02*/ { "lar", TRUE, LONG, op2(E,R), 0 }, 1734Srgrimes/*03*/ { "lsl", TRUE, LONG, op2(E,R), 0 }, 1744Srgrimes/*04*/ { "", FALSE, NONE, 0, 0 }, 1754Srgrimes/*05*/ { "", FALSE, NONE, 0, 0 }, 1764Srgrimes/*06*/ { "clts", FALSE, NONE, 0, 0 }, 1774Srgrimes/*07*/ { "", FALSE, NONE, 0, 0 }, 1784Srgrimes 1794Srgrimes/*08*/ { "invd", FALSE, NONE, 0, 0 }, 1804Srgrimes/*09*/ { "wbinvd",FALSE, NONE, 0, 0 }, 1814Srgrimes/*0a*/ { "", FALSE, NONE, 0, 0 }, 1824Srgrimes/*0b*/ { "", FALSE, NONE, 0, 0 }, 1834Srgrimes/*0c*/ { "", FALSE, NONE, 0, 0 }, 1844Srgrimes/*0d*/ { "", FALSE, NONE, 0, 0 }, 1854Srgrimes/*0e*/ { "", FALSE, NONE, 0, 0 }, 1864Srgrimes/*0f*/ { "", FALSE, NONE, 0, 0 }, 1874Srgrimes}; 1884Srgrimes 1894Srgrimesstruct inst db_inst_0f2x[] = { 1904Srgrimes/*20*/ { "mov", TRUE, LONG, op2(CR,E), 0 }, /* use E for reg */ 1914Srgrimes/*21*/ { "mov", TRUE, LONG, op2(DR,E), 0 }, /* since mod == 11 */ 1924Srgrimes/*22*/ { "mov", TRUE, LONG, op2(E,CR), 0 }, 1934Srgrimes/*23*/ { "mov", TRUE, LONG, op2(E,DR), 0 }, 1944Srgrimes/*24*/ { "mov", TRUE, LONG, op2(TR,E), 0 }, 1954Srgrimes/*25*/ { "", FALSE, NONE, 0, 0 }, 1964Srgrimes/*26*/ { "mov", TRUE, LONG, op2(E,TR), 0 }, 1974Srgrimes/*27*/ { "", FALSE, NONE, 0, 0 }, 1984Srgrimes 1994Srgrimes/*28*/ { "", FALSE, NONE, 0, 0 }, 2004Srgrimes/*29*/ { "", FALSE, NONE, 0, 0 }, 2014Srgrimes/*2a*/ { "", FALSE, NONE, 0, 0 }, 2024Srgrimes/*2b*/ { "", FALSE, NONE, 0, 0 }, 2034Srgrimes/*2c*/ { "", FALSE, NONE, 0, 0 }, 2044Srgrimes/*2d*/ { "", FALSE, NONE, 0, 0 }, 2054Srgrimes/*2e*/ { "", FALSE, NONE, 0, 0 }, 2064Srgrimes/*2f*/ { "", FALSE, NONE, 0, 0 }, 2074Srgrimes}; 2084Srgrimes 2094Srgrimesstruct inst db_inst_0f8x[] = { 2104Srgrimes/*80*/ { "jo", FALSE, NONE, op1(Dl), 0 }, 2114Srgrimes/*81*/ { "jno", FALSE, NONE, op1(Dl), 0 }, 2124Srgrimes/*82*/ { "jb", FALSE, NONE, op1(Dl), 0 }, 2134Srgrimes/*83*/ { "jnb", FALSE, NONE, op1(Dl), 0 }, 2144Srgrimes/*84*/ { "jz", FALSE, NONE, op1(Dl), 0 }, 2154Srgrimes/*85*/ { "jnz", FALSE, NONE, op1(Dl), 0 }, 2164Srgrimes/*86*/ { "jbe", FALSE, NONE, op1(Dl), 0 }, 2174Srgrimes/*87*/ { "jnbe", FALSE, NONE, op1(Dl), 0 }, 2184Srgrimes 2194Srgrimes/*88*/ { "js", FALSE, NONE, op1(Dl), 0 }, 2204Srgrimes/*89*/ { "jns", FALSE, NONE, op1(Dl), 0 }, 2214Srgrimes/*8a*/ { "jp", FALSE, NONE, op1(Dl), 0 }, 2224Srgrimes/*8b*/ { "jnp", FALSE, NONE, op1(Dl), 0 }, 2234Srgrimes/*8c*/ { "jl", FALSE, NONE, op1(Dl), 0 }, 2244Srgrimes/*8d*/ { "jnl", FALSE, NONE, op1(Dl), 0 }, 2254Srgrimes/*8e*/ { "jle", FALSE, NONE, op1(Dl), 0 }, 2264Srgrimes/*8f*/ { "jnle", FALSE, NONE, op1(Dl), 0 }, 2274Srgrimes}; 2284Srgrimes 2294Srgrimesstruct inst db_inst_0f9x[] = { 2304Srgrimes/*90*/ { "seto", TRUE, NONE, op1(Eb), 0 }, 2314Srgrimes/*91*/ { "setno", TRUE, NONE, op1(Eb), 0 }, 2324Srgrimes/*92*/ { "setb", TRUE, NONE, op1(Eb), 0 }, 2334Srgrimes/*93*/ { "setnb", TRUE, NONE, op1(Eb), 0 }, 2344Srgrimes/*94*/ { "setz", TRUE, NONE, op1(Eb), 0 }, 2354Srgrimes/*95*/ { "setnz", TRUE, NONE, op1(Eb), 0 }, 2364Srgrimes/*96*/ { "setbe", TRUE, NONE, op1(Eb), 0 }, 2374Srgrimes/*97*/ { "setnbe",TRUE, NONE, op1(Eb), 0 }, 2384Srgrimes 2394Srgrimes/*98*/ { "sets", TRUE, NONE, op1(Eb), 0 }, 2404Srgrimes/*99*/ { "setns", TRUE, NONE, op1(Eb), 0 }, 2414Srgrimes/*9a*/ { "setp", TRUE, NONE, op1(Eb), 0 }, 2424Srgrimes/*9b*/ { "setnp", TRUE, NONE, op1(Eb), 0 }, 2434Srgrimes/*9c*/ { "setl", TRUE, NONE, op1(Eb), 0 }, 2444Srgrimes/*9d*/ { "setnl", TRUE, NONE, op1(Eb), 0 }, 2454Srgrimes/*9e*/ { "setle", TRUE, NONE, op1(Eb), 0 }, 2464Srgrimes/*9f*/ { "setnle",TRUE, NONE, op1(Eb), 0 }, 2474Srgrimes}; 2484Srgrimes 2494Srgrimesstruct inst db_inst_0fax[] = { 2504Srgrimes/*a0*/ { "push", FALSE, NONE, op1(Si), 0 }, 2514Srgrimes/*a1*/ { "pop", FALSE, NONE, op1(Si), 0 }, 2524Srgrimes/*a2*/ { "", FALSE, NONE, 0, 0 }, 2534Srgrimes/*a3*/ { "bt", TRUE, LONG, op2(E,R), 0 }, 2544Srgrimes/*a4*/ { "shld", TRUE, LONG, op3(Ib,E,R), 0 }, 2554Srgrimes/*a5*/ { "shld", TRUE, LONG, op3(CL,E,R), 0 }, 2564Srgrimes/*a6*/ { "", FALSE, NONE, 0, 0 }, 2574Srgrimes/*a7*/ { "", FALSE, NONE, 0, 0 }, 2584Srgrimes 2594Srgrimes/*a8*/ { "push", FALSE, NONE, op1(Si), 0 }, 2604Srgrimes/*a9*/ { "pop", FALSE, NONE, op1(Si), 0 }, 2614Srgrimes/*aa*/ { "", FALSE, NONE, 0, 0 }, 2624Srgrimes/*ab*/ { "bts", TRUE, LONG, op2(E,R), 0 }, 2634Srgrimes/*ac*/ { "shrd", TRUE, LONG, op3(Ib,E,R), 0 }, 2644Srgrimes/*ad*/ { "shrd", TRUE, LONG, op3(CL,E,R), 0 }, 2654Srgrimes/*a6*/ { "", FALSE, NONE, 0, 0 }, 2664Srgrimes/*a7*/ { "imul", TRUE, LONG, op2(E,R), 0 }, 2674Srgrimes}; 2684Srgrimes 2694Srgrimesstruct inst db_inst_0fbx[] = { 2704Srgrimes/*b0*/ { "", FALSE, NONE, 0, 0 }, 2714Srgrimes/*b1*/ { "", FALSE, NONE, 0, 0 }, 2724Srgrimes/*b2*/ { "lss", TRUE, LONG, op2(E, R), 0 }, 2734Srgrimes/*b3*/ { "bts", TRUE, LONG, op2(R, E), 0 }, 2744Srgrimes/*b4*/ { "lfs", TRUE, LONG, op2(E, R), 0 }, 2754Srgrimes/*b5*/ { "lgs", TRUE, LONG, op2(E, R), 0 }, 2764Srgrimes/*b6*/ { "movzb", TRUE, LONG, op2(E, R), 0 }, 2774Srgrimes/*b7*/ { "movzw", TRUE, LONG, op2(E, R), 0 }, 2784Srgrimes 2794Srgrimes/*b8*/ { "", FALSE, NONE, 0, 0 }, 2804Srgrimes/*b9*/ { "", FALSE, NONE, 0, 0 }, 2814Srgrimes/*ba*/ { "", TRUE, LONG, op2(Is, E), (char *)db_Grp8 }, 2824Srgrimes/*bb*/ { "btc", TRUE, LONG, op2(R, E), 0 }, 2834Srgrimes/*bc*/ { "bsf", TRUE, LONG, op2(E, R), 0 }, 2844Srgrimes/*bd*/ { "bsr", TRUE, LONG, op2(E, R), 0 }, 2854Srgrimes/*be*/ { "movsb", TRUE, LONG, op2(E, R), 0 }, 2864Srgrimes/*bf*/ { "movsw", TRUE, LONG, op2(E, R), 0 }, 2874Srgrimes}; 2884Srgrimes 2894Srgrimesstruct inst db_inst_0fcx[] = { 2904Srgrimes/*c0*/ { "xadd", TRUE, BYTE, op2(R, E), 0 }, 2914Srgrimes/*c1*/ { "xadd", TRUE, LONG, op2(R, E), 0 }, 2924Srgrimes/*c2*/ { "", FALSE, NONE, 0, 0 }, 2934Srgrimes/*c3*/ { "", FALSE, NONE, 0, 0 }, 2944Srgrimes/*c4*/ { "", FALSE, NONE, 0, 0 }, 2954Srgrimes/*c5*/ { "", FALSE, NONE, 0, 0 }, 2964Srgrimes/*c6*/ { "", FALSE, NONE, 0, 0 }, 2974Srgrimes/*c7*/ { "", FALSE, NONE, 0, 0 }, 2984Srgrimes/*c8*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 2994Srgrimes/*c9*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3004Srgrimes/*ca*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3014Srgrimes/*cb*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3024Srgrimes/*cc*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3034Srgrimes/*cd*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3044Srgrimes/*ce*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3054Srgrimes/*cf*/ { "bswap", FALSE, LONG, op1(Ri), 0 }, 3064Srgrimes}; 3074Srgrimes 3084Srgrimesstruct inst db_inst_0fdx[] = { 3094Srgrimes/*c0*/ { "cmpxchg",TRUE, BYTE, op2(R, E), 0 }, 3104Srgrimes/*c1*/ { "cmpxchg",TRUE, LONG, op2(R, E), 0 }, 3114Srgrimes/*c2*/ { "", FALSE, NONE, 0, 0 }, 3124Srgrimes/*c3*/ { "", FALSE, NONE, 0, 0 }, 3134Srgrimes/*c4*/ { "", FALSE, NONE, 0, 0 }, 3144Srgrimes/*c5*/ { "", FALSE, NONE, 0, 0 }, 3154Srgrimes/*c6*/ { "", FALSE, NONE, 0, 0 }, 3164Srgrimes/*c7*/ { "", FALSE, NONE, 0, 0 }, 3174Srgrimes/*c8*/ { "", FALSE, NONE, 0, 0 }, 3184Srgrimes/*c9*/ { "", FALSE, NONE, 0, 0 }, 3194Srgrimes/*ca*/ { "", FALSE, NONE, 0, 0 }, 3204Srgrimes/*cb*/ { "", FALSE, NONE, 0, 0 }, 3214Srgrimes/*cc*/ { "", FALSE, NONE, 0, 0 }, 3224Srgrimes/*cd*/ { "", FALSE, NONE, 0, 0 }, 3234Srgrimes/*ce*/ { "", FALSE, NONE, 0, 0 }, 3244Srgrimes/*cf*/ { "", FALSE, NONE, 0, 0 }, 3254Srgrimes}; 3264Srgrimes 3274Srgrimesstruct inst *db_inst_0f[] = { 3284Srgrimes db_inst_0f0x, 3294Srgrimes 0, 3304Srgrimes db_inst_0f2x, 3314Srgrimes 0, 3324Srgrimes 0, 3334Srgrimes 0, 3344Srgrimes 0, 3354Srgrimes 0, 3364Srgrimes db_inst_0f8x, 3374Srgrimes db_inst_0f9x, 3384Srgrimes db_inst_0fax, 3394Srgrimes db_inst_0fbx, 3404Srgrimes db_inst_0fcx, 3414Srgrimes db_inst_0fdx, 3424Srgrimes 0, 3434Srgrimes 0 3444Srgrimes}; 3454Srgrimes 3464Srgrimeschar * db_Esc92[] = { 3474Srgrimes "fnop", "", "", "", "", "", "", "" 3484Srgrimes}; 3494Srgrimeschar * db_Esc93[] = { 3504Srgrimes "", "", "", "", "", "", "", "" 3514Srgrimes}; 3524Srgrimeschar * db_Esc94[] = { 3534Srgrimes "fchs", "fabs", "", "", "ftst", "fxam", "", "" 3544Srgrimes}; 3554Srgrimeschar * db_Esc95[] = { 3564Srgrimes "fld1", "fldl2t","fldl2e","fldpi","fldlg2","fldln2","fldz","" 3574Srgrimes}; 3584Srgrimeschar * db_Esc96[] = { 3594Srgrimes "f2xm1","fyl2x","fptan","fpatan","fxtract","fprem1","fdecstp", 3604Srgrimes "fincstp" 3614Srgrimes}; 3624Srgrimeschar * db_Esc97[] = { 3634Srgrimes "fprem","fyl2xp1","fsqrt","fsincos","frndint","fscale","fsin","fcos" 3644Srgrimes}; 3654Srgrimes 3664Srgrimeschar * db_Esca4[] = { 3674Srgrimes "", "fucompp","", "", "", "", "", "" 3684Srgrimes}; 3694Srgrimes 3704Srgrimeschar * db_Escb4[] = { 3714Srgrimes "", "", "fnclex","fninit","", "", "", "" 3724Srgrimes}; 3734Srgrimes 3744Srgrimeschar * db_Esce3[] = { 3754Srgrimes "", "fcompp","", "", "", "", "", "" 3764Srgrimes}; 3774Srgrimes 3784Srgrimeschar * db_Escf4[] = { 3794Srgrimes "fnstsw","", "", "", "", "", "", "" 3804Srgrimes}; 3814Srgrimes 3824Srgrimesstruct finst db_Esc8[] = { 3834Srgrimes/*0*/ { "fadd", SNGL, op2(STI,ST), 0 }, 3844Srgrimes/*1*/ { "fmul", SNGL, op2(STI,ST), 0 }, 3854Srgrimes/*2*/ { "fcom", SNGL, op2(STI,ST), 0 }, 3864Srgrimes/*3*/ { "fcomp", SNGL, op2(STI,ST), 0 }, 3874Srgrimes/*4*/ { "fsub", SNGL, op2(STI,ST), 0 }, 3884Srgrimes/*5*/ { "fsubr", SNGL, op2(STI,ST), 0 }, 3894Srgrimes/*6*/ { "fdiv", SNGL, op2(STI,ST), 0 }, 3904Srgrimes/*7*/ { "fdivr", SNGL, op2(STI,ST), 0 }, 3914Srgrimes}; 3924Srgrimes 3934Srgrimesstruct finst db_Esc9[] = { 3944Srgrimes/*0*/ { "fld", SNGL, op1(STI), 0 }, 3954Srgrimes/*1*/ { "", NONE, op1(STI), "fxch" }, 3964Srgrimes/*2*/ { "fst", SNGL, op1(X), (char *)db_Esc92 }, 3974Srgrimes/*3*/ { "fstp", SNGL, op1(X), (char *)db_Esc93 }, 3984Srgrimes/*4*/ { "fldenv", NONE, op1(X), (char *)db_Esc94 }, 3994Srgrimes/*5*/ { "fldcw", NONE, op1(X), (char *)db_Esc95 }, 4004Srgrimes/*6*/ { "fnstenv",NONE, op1(X), (char *)db_Esc96 }, 4014Srgrimes/*7*/ { "fnstcw", NONE, op1(X), (char *)db_Esc97 }, 4024Srgrimes}; 4034Srgrimes 4044Srgrimesstruct finst db_Esca[] = { 4054Srgrimes/*0*/ { "fiadd", WORD, 0, 0 }, 4064Srgrimes/*1*/ { "fimul", WORD, 0, 0 }, 4074Srgrimes/*2*/ { "ficom", WORD, 0, 0 }, 4084Srgrimes/*3*/ { "ficomp", WORD, 0, 0 }, 4094Srgrimes/*4*/ { "fisub", WORD, op1(X), (char *)db_Esca4 }, 4104Srgrimes/*5*/ { "fisubr", WORD, 0, 0 }, 4114Srgrimes/*6*/ { "fidiv", WORD, 0, 0 }, 4124Srgrimes/*7*/ { "fidivr", WORD, 0, 0 } 4134Srgrimes}; 4144Srgrimes 4154Srgrimesstruct finst db_Escb[] = { 4164Srgrimes/*0*/ { "fild", WORD, 0, 0 }, 4174Srgrimes/*1*/ { "", NONE, 0, 0 }, 4184Srgrimes/*2*/ { "fist", WORD, 0, 0 }, 4194Srgrimes/*3*/ { "fistp", WORD, 0, 0 }, 4204Srgrimes/*4*/ { "", WORD, op1(X), (char *)db_Escb4 }, 4214Srgrimes/*5*/ { "fld", EXTR, 0, 0 }, 4224Srgrimes/*6*/ { "", WORD, 0, 0 }, 4234Srgrimes/*7*/ { "fstp", EXTR, 0, 0 }, 4244Srgrimes}; 4254Srgrimes 4264Srgrimesstruct finst db_Escc[] = { 4274Srgrimes/*0*/ { "fadd", DBLR, op2(ST,STI), 0 }, 4284Srgrimes/*1*/ { "fmul", DBLR, op2(ST,STI), 0 }, 4294Srgrimes/*2*/ { "fcom", DBLR, op2(ST,STI), 0 }, 4304Srgrimes/*3*/ { "fcomp", DBLR, op2(ST,STI), 0 }, 4314Srgrimes/*4*/ { "fsub", DBLR, op2(ST,STI), "fsubr" }, 4324Srgrimes/*5*/ { "fsubr", DBLR, op2(ST,STI), "fsub" }, 4334Srgrimes/*6*/ { "fdiv", DBLR, op2(ST,STI), "fdivr" }, 4344Srgrimes/*7*/ { "fdivr", DBLR, op2(ST,STI), "fdiv" }, 4354Srgrimes}; 4364Srgrimes 4374Srgrimesstruct finst db_Escd[] = { 4384Srgrimes/*0*/ { "fld", DBLR, op1(STI), "ffree" }, 4394Srgrimes/*1*/ { "", NONE, 0, 0 }, 4404Srgrimes/*2*/ { "fst", DBLR, op1(STI), 0 }, 4414Srgrimes/*3*/ { "fstp", DBLR, op1(STI), 0 }, 4424Srgrimes/*4*/ { "frstor", NONE, op1(STI), "fucom" }, 4434Srgrimes/*5*/ { "", NONE, op1(STI), "fucomp" }, 4444Srgrimes/*6*/ { "fnsave", NONE, 0, 0 }, 4454Srgrimes/*7*/ { "fnstsw", NONE, 0, 0 }, 4464Srgrimes}; 4474Srgrimes 4484Srgrimesstruct finst db_Esce[] = { 4494Srgrimes/*0*/ { "fiadd", LONG, op2(ST,STI), "faddp" }, 4504Srgrimes/*1*/ { "fimul", LONG, op2(ST,STI), "fmulp" }, 4514Srgrimes/*2*/ { "ficom", LONG, 0, 0 }, 4524Srgrimes/*3*/ { "ficomp", LONG, op1(X), (char *)db_Esce3 }, 4534Srgrimes/*4*/ { "fisub", LONG, op2(ST,STI), "fsubrp" }, 4544Srgrimes/*5*/ { "fisubr", LONG, op2(ST,STI), "fsubp" }, 4554Srgrimes/*6*/ { "fidiv", LONG, op2(ST,STI), "fdivrp" }, 4564Srgrimes/*7*/ { "fidivr", LONG, op2(ST,STI), "fdivp" }, 4574Srgrimes}; 4584Srgrimes 4594Srgrimesstruct finst db_Escf[] = { 4604Srgrimes/*0*/ { "fild", LONG, 0, 0 }, 4614Srgrimes/*1*/ { "", LONG, 0, 0 }, 4624Srgrimes/*2*/ { "fist", LONG, 0, 0 }, 4634Srgrimes/*3*/ { "fistp", LONG, 0, 0 }, 4644Srgrimes/*4*/ { "fbld", NONE, op1(XA), (char *)db_Escf4 }, 4654Srgrimes/*5*/ { "fld", QUAD, 0, 0 }, 4664Srgrimes/*6*/ { "fbstp", NONE, 0, 0 }, 4674Srgrimes/*7*/ { "fstp", QUAD, 0, 0 }, 4684Srgrimes}; 4694Srgrimes 4704Srgrimesstruct finst *db_Esc_inst[] = { 4714Srgrimes db_Esc8, db_Esc9, db_Esca, db_Escb, 4724Srgrimes db_Escc, db_Escd, db_Esce, db_Escf 4734Srgrimes}; 4744Srgrimes 4754Srgrimeschar * db_Grp1[] = { 4764Srgrimes "add", 4774Srgrimes "or", 4784Srgrimes "adc", 4794Srgrimes "sbb", 4804Srgrimes "and", 4814Srgrimes "sub", 4824Srgrimes "xor", 4834Srgrimes "cmp" 4844Srgrimes}; 4854Srgrimes 4864Srgrimeschar * db_Grp2[] = { 4874Srgrimes "rol", 4884Srgrimes "ror", 4894Srgrimes "rcl", 4904Srgrimes "rcr", 4914Srgrimes "shl", 4924Srgrimes "shr", 4934Srgrimes "shl", 4944Srgrimes "sar" 4954Srgrimes}; 4964Srgrimes 4974Srgrimesstruct inst db_Grp3[] = { 4984Srgrimes { "test", TRUE, NONE, op2(I,E), 0 }, 4994Srgrimes { "test", TRUE, NONE, op2(I,E), 0 }, 5004Srgrimes { "not", TRUE, NONE, op1(E), 0 }, 5014Srgrimes { "neg", TRUE, NONE, op1(E), 0 }, 5024Srgrimes { "mul", TRUE, NONE, op2(E,A), 0 }, 5034Srgrimes { "imul", TRUE, NONE, op2(E,A), 0 }, 5044Srgrimes { "div", TRUE, NONE, op2(E,A), 0 }, 5054Srgrimes { "idiv", TRUE, NONE, op2(E,A), 0 }, 5064Srgrimes}; 5074Srgrimes 5084Srgrimesstruct inst db_Grp4[] = { 5094Srgrimes { "inc", TRUE, BYTE, op1(E), 0 }, 5104Srgrimes { "dec", TRUE, BYTE, op1(E), 0 }, 5114Srgrimes { "", TRUE, NONE, 0, 0 }, 5124Srgrimes { "", TRUE, NONE, 0, 0 }, 5134Srgrimes { "", TRUE, NONE, 0, 0 }, 5144Srgrimes { "", TRUE, NONE, 0, 0 }, 5154Srgrimes { "", TRUE, NONE, 0, 0 }, 5164Srgrimes { "", TRUE, NONE, 0, 0 } 5174Srgrimes}; 5184Srgrimes 5194Srgrimesstruct inst db_Grp5[] = { 5204Srgrimes { "inc", TRUE, LONG, op1(E), 0 }, 5214Srgrimes { "dec", TRUE, LONG, op1(E), 0 }, 5224Srgrimes { "call", TRUE, NONE, op1(Eind),0 }, 5234Srgrimes { "lcall", TRUE, NONE, op1(Eind),0 }, 5244Srgrimes { "jmp", TRUE, NONE, op1(Eind),0 }, 5254Srgrimes { "ljmp", TRUE, NONE, op1(Eind),0 }, 5264Srgrimes { "push", TRUE, LONG, op1(E), 0 }, 5274Srgrimes { "", TRUE, NONE, 0, 0 } 5284Srgrimes}; 5294Srgrimes 5304Srgrimesstruct inst db_inst_table[256] = { 5314Srgrimes/*00*/ { "add", TRUE, BYTE, op2(R, E), 0 }, 5324Srgrimes/*01*/ { "add", TRUE, LONG, op2(R, E), 0 }, 5334Srgrimes/*02*/ { "add", TRUE, BYTE, op2(E, R), 0 }, 5344Srgrimes/*03*/ { "add", TRUE, LONG, op2(E, R), 0 }, 5354Srgrimes/*04*/ { "add", FALSE, BYTE, op2(Is, A), 0 }, 5364Srgrimes/*05*/ { "add", FALSE, LONG, op2(Is, A), 0 }, 5374Srgrimes/*06*/ { "push", FALSE, NONE, op1(Si), 0 }, 5384Srgrimes/*07*/ { "pop", FALSE, NONE, op1(Si), 0 }, 5394Srgrimes 5404Srgrimes/*08*/ { "or", TRUE, BYTE, op2(R, E), 0 }, 5414Srgrimes/*09*/ { "or", TRUE, LONG, op2(R, E), 0 }, 5424Srgrimes/*0a*/ { "or", TRUE, BYTE, op2(E, R), 0 }, 5434Srgrimes/*0b*/ { "or", TRUE, LONG, op2(E, R), 0 }, 5444Srgrimes/*0c*/ { "or", FALSE, BYTE, op2(I, A), 0 }, 5454Srgrimes/*0d*/ { "or", FALSE, LONG, op2(I, A), 0 }, 5464Srgrimes/*0e*/ { "push", FALSE, NONE, op1(Si), 0 }, 5474Srgrimes/*0f*/ { "", FALSE, NONE, 0, 0 }, 5484Srgrimes 5494Srgrimes/*10*/ { "adc", TRUE, BYTE, op2(R, E), 0 }, 5504Srgrimes/*11*/ { "adc", TRUE, LONG, op2(R, E), 0 }, 5514Srgrimes/*12*/ { "adc", TRUE, BYTE, op2(E, R), 0 }, 5524Srgrimes/*13*/ { "adc", TRUE, LONG, op2(E, R), 0 }, 5534Srgrimes/*14*/ { "adc", FALSE, BYTE, op2(Is, A), 0 }, 5544Srgrimes/*15*/ { "adc", FALSE, LONG, op2(Is, A), 0 }, 5554Srgrimes/*16*/ { "push", FALSE, NONE, op1(Si), 0 }, 5564Srgrimes/*17*/ { "pop", FALSE, NONE, op1(Si), 0 }, 5574Srgrimes 5584Srgrimes/*18*/ { "sbb", TRUE, BYTE, op2(R, E), 0 }, 5594Srgrimes/*19*/ { "sbb", TRUE, LONG, op2(R, E), 0 }, 5604Srgrimes/*1a*/ { "sbb", TRUE, BYTE, op2(E, R), 0 }, 5614Srgrimes/*1b*/ { "sbb", TRUE, LONG, op2(E, R), 0 }, 5624Srgrimes/*1c*/ { "sbb", FALSE, BYTE, op2(Is, A), 0 }, 5634Srgrimes/*1d*/ { "sbb", FALSE, LONG, op2(Is, A), 0 }, 5644Srgrimes/*1e*/ { "push", FALSE, NONE, op1(Si), 0 }, 5654Srgrimes/*1f*/ { "pop", FALSE, NONE, op1(Si), 0 }, 5664Srgrimes 5674Srgrimes/*20*/ { "and", TRUE, BYTE, op2(R, E), 0 }, 5684Srgrimes/*21*/ { "and", TRUE, LONG, op2(R, E), 0 }, 5694Srgrimes/*22*/ { "and", TRUE, BYTE, op2(E, R), 0 }, 5704Srgrimes/*23*/ { "and", TRUE, LONG, op2(E, R), 0 }, 5714Srgrimes/*24*/ { "and", FALSE, BYTE, op2(I, A), 0 }, 5724Srgrimes/*25*/ { "and", FALSE, LONG, op2(I, A), 0 }, 5734Srgrimes/*26*/ { "", FALSE, NONE, 0, 0 }, 5744Srgrimes/*27*/ { "aaa", FALSE, NONE, 0, 0 }, 5754Srgrimes 5764Srgrimes/*28*/ { "sub", TRUE, BYTE, op2(R, E), 0 }, 5774Srgrimes/*29*/ { "sub", TRUE, LONG, op2(R, E), 0 }, 5784Srgrimes/*2a*/ { "sub", TRUE, BYTE, op2(E, R), 0 }, 5794Srgrimes/*2b*/ { "sub", TRUE, LONG, op2(E, R), 0 }, 5804Srgrimes/*2c*/ { "sub", FALSE, BYTE, op2(Is, A), 0 }, 5814Srgrimes/*2d*/ { "sub", FALSE, LONG, op2(Is, A), 0 }, 5824Srgrimes/*2e*/ { "", FALSE, NONE, 0, 0 }, 5834Srgrimes/*2f*/ { "das", FALSE, NONE, 0, 0 }, 5844Srgrimes 5854Srgrimes/*30*/ { "xor", TRUE, BYTE, op2(R, E), 0 }, 5864Srgrimes/*31*/ { "xor", TRUE, LONG, op2(R, E), 0 }, 5874Srgrimes/*32*/ { "xor", TRUE, BYTE, op2(E, R), 0 }, 5884Srgrimes/*33*/ { "xor", TRUE, LONG, op2(E, R), 0 }, 5894Srgrimes/*34*/ { "xor", FALSE, BYTE, op2(I, A), 0 }, 5904Srgrimes/*35*/ { "xor", FALSE, LONG, op2(I, A), 0 }, 5914Srgrimes/*36*/ { "", FALSE, NONE, 0, 0 }, 5924Srgrimes/*37*/ { "daa", FALSE, NONE, 0, 0 }, 5934Srgrimes 5944Srgrimes/*38*/ { "cmp", TRUE, BYTE, op2(R, E), 0 }, 5954Srgrimes/*39*/ { "cmp", TRUE, LONG, op2(R, E), 0 }, 5964Srgrimes/*3a*/ { "cmp", TRUE, BYTE, op2(E, R), 0 }, 5974Srgrimes/*3b*/ { "cmp", TRUE, LONG, op2(E, R), 0 }, 5984Srgrimes/*3c*/ { "cmp", FALSE, BYTE, op2(Is, A), 0 }, 5994Srgrimes/*3d*/ { "cmp", FALSE, LONG, op2(Is, A), 0 }, 6004Srgrimes/*3e*/ { "", FALSE, NONE, 0, 0 }, 6014Srgrimes/*3f*/ { "aas", FALSE, NONE, 0, 0 }, 6024Srgrimes 6034Srgrimes/*40*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6044Srgrimes/*41*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6054Srgrimes/*42*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6064Srgrimes/*43*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6074Srgrimes/*44*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6084Srgrimes/*45*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6094Srgrimes/*46*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6104Srgrimes/*47*/ { "inc", FALSE, LONG, op1(Ri), 0 }, 6114Srgrimes 6124Srgrimes/*48*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6134Srgrimes/*49*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6144Srgrimes/*4a*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6154Srgrimes/*4b*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6164Srgrimes/*4c*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6174Srgrimes/*4d*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6184Srgrimes/*4e*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6194Srgrimes/*4f*/ { "dec", FALSE, LONG, op1(Ri), 0 }, 6204Srgrimes 6214Srgrimes/*50*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6224Srgrimes/*51*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6234Srgrimes/*52*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6244Srgrimes/*53*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6254Srgrimes/*54*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6264Srgrimes/*55*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6274Srgrimes/*56*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6284Srgrimes/*57*/ { "push", FALSE, LONG, op1(Ri), 0 }, 6294Srgrimes 6304Srgrimes/*58*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6314Srgrimes/*59*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6324Srgrimes/*5a*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6334Srgrimes/*5b*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6344Srgrimes/*5c*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6354Srgrimes/*5d*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6364Srgrimes/*5e*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6374Srgrimes/*5f*/ { "pop", FALSE, LONG, op1(Ri), 0 }, 6384Srgrimes 6394Srgrimes/*60*/ { "pusha", FALSE, LONG, 0, 0 }, 6404Srgrimes/*61*/ { "popa", FALSE, LONG, 0, 0 }, 6414Srgrimes/*62*/ { "bound", TRUE, LONG, op2(E, R), 0 }, 6424Srgrimes/*63*/ { "arpl", TRUE, NONE, op2(Ew,Rw), 0 }, 6434Srgrimes 6444Srgrimes/*64*/ { "", FALSE, NONE, 0, 0 }, 6454Srgrimes/*65*/ { "", FALSE, NONE, 0, 0 }, 6464Srgrimes/*66*/ { "", FALSE, NONE, 0, 0 }, 6474Srgrimes/*67*/ { "", FALSE, NONE, 0, 0 }, 6484Srgrimes 6494Srgrimes/*68*/ { "push", FALSE, LONG, op1(I), 0 }, 6504Srgrimes/*69*/ { "imul", TRUE, LONG, op3(I,E,R), 0 }, 6514Srgrimes/*6a*/ { "push", FALSE, LONG, op1(Ib), 0 }, 6524Srgrimes/*6b*/ { "imul", TRUE, LONG, op3(Ibs,E,R),0 }, 6534Srgrimes/*6c*/ { "ins", FALSE, BYTE, op2(DX, DI), 0 }, 6544Srgrimes/*6d*/ { "ins", FALSE, LONG, op2(DX, DI), 0 }, 6554Srgrimes/*6e*/ { "outs", FALSE, BYTE, op2(SI, DX), 0 }, 6564Srgrimes/*6f*/ { "outs", FALSE, LONG, op2(SI, DX), 0 }, 6574Srgrimes 6584Srgrimes/*70*/ { "jo", FALSE, NONE, op1(Db), 0 }, 6594Srgrimes/*71*/ { "jno", FALSE, NONE, op1(Db), 0 }, 6604Srgrimes/*72*/ { "jb", FALSE, NONE, op1(Db), 0 }, 6614Srgrimes/*73*/ { "jnb", FALSE, NONE, op1(Db), 0 }, 6624Srgrimes/*74*/ { "jz", FALSE, NONE, op1(Db), 0 }, 6634Srgrimes/*75*/ { "jnz", FALSE, NONE, op1(Db), 0 }, 6644Srgrimes/*76*/ { "jbe", FALSE, NONE, op1(Db), 0 }, 6654Srgrimes/*77*/ { "jnbe", FALSE, NONE, op1(Db), 0 }, 6664Srgrimes 6674Srgrimes/*78*/ { "js", FALSE, NONE, op1(Db), 0 }, 6684Srgrimes/*79*/ { "jns", FALSE, NONE, op1(Db), 0 }, 6694Srgrimes/*7a*/ { "jp", FALSE, NONE, op1(Db), 0 }, 6704Srgrimes/*7b*/ { "jnp", FALSE, NONE, op1(Db), 0 }, 6714Srgrimes/*7c*/ { "jl", FALSE, NONE, op1(Db), 0 }, 6724Srgrimes/*7d*/ { "jnl", FALSE, NONE, op1(Db), 0 }, 6734Srgrimes/*7e*/ { "jle", FALSE, NONE, op1(Db), 0 }, 6744Srgrimes/*7f*/ { "jnle", FALSE, NONE, op1(Db), 0 }, 6754Srgrimes 6764Srgrimes/*80*/ { "", TRUE, BYTE, op2(I, E), (char *)db_Grp1 }, 6774Srgrimes/*81*/ { "", TRUE, LONG, op2(I, E), (char *)db_Grp1 }, 6784Srgrimes/*82*/ { "", TRUE, BYTE, op2(Is,E), (char *)db_Grp1 }, 6794Srgrimes/*83*/ { "", TRUE, LONG, op2(Ibs,E), (char *)db_Grp1 }, 6804Srgrimes/*84*/ { "test", TRUE, BYTE, op2(R, E), 0 }, 6814Srgrimes/*85*/ { "test", TRUE, LONG, op2(R, E), 0 }, 6824Srgrimes/*86*/ { "xchg", TRUE, BYTE, op2(R, E), 0 }, 6834Srgrimes/*87*/ { "xchg", TRUE, LONG, op2(R, E), 0 }, 6844Srgrimes 6854Srgrimes/*88*/ { "mov", TRUE, BYTE, op2(R, E), 0 }, 6864Srgrimes/*89*/ { "mov", TRUE, LONG, op2(R, E), 0 }, 6874Srgrimes/*8a*/ { "mov", TRUE, BYTE, op2(E, R), 0 }, 6884Srgrimes/*8b*/ { "mov", TRUE, LONG, op2(E, R), 0 }, 6894Srgrimes/*8c*/ { "mov", TRUE, NONE, op2(S, Ew), 0 }, 6904Srgrimes/*8d*/ { "lea", TRUE, LONG, op2(E, R), 0 }, 6914Srgrimes/*8e*/ { "mov", TRUE, NONE, op2(Ew, S), 0 }, 6924Srgrimes/*8f*/ { "pop", TRUE, LONG, op1(E), 0 }, 6934Srgrimes 6944Srgrimes/*90*/ { "nop", FALSE, NONE, 0, 0 }, 6954Srgrimes/*91*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 6964Srgrimes/*92*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 6974Srgrimes/*93*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 6984Srgrimes/*94*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 6994Srgrimes/*95*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 7004Srgrimes/*96*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 7014Srgrimes/*97*/ { "xchg", FALSE, LONG, op2(A, Ri), 0 }, 7024Srgrimes 7034Srgrimes/*98*/ { "cbw", FALSE, SDEP, 0, "cwde" }, /* cbw/cwde */ 7044Srgrimes/*99*/ { "cwd", FALSE, SDEP, 0, "cdq" }, /* cwd/cdq */ 7054Srgrimes/*9a*/ { "lcall", FALSE, NONE, op1(OS), 0 }, 7064Srgrimes/*9b*/ { "wait", FALSE, NONE, 0, 0 }, 7074Srgrimes/*9c*/ { "pushf", FALSE, LONG, 0, 0 }, 7084Srgrimes/*9d*/ { "popf", FALSE, LONG, 0, 0 }, 7094Srgrimes/*9e*/ { "sahf", FALSE, NONE, 0, 0 }, 7104Srgrimes/*9f*/ { "lahf", FALSE, NONE, 0, 0 }, 7114Srgrimes 7124Srgrimes/*a0*/ { "mov", FALSE, BYTE, op2(O, A), 0 }, 7134Srgrimes/*a1*/ { "mov", FALSE, LONG, op2(O, A), 0 }, 7144Srgrimes/*a2*/ { "mov", FALSE, BYTE, op2(A, O), 0 }, 7154Srgrimes/*a3*/ { "mov", FALSE, LONG, op2(A, O), 0 }, 7164Srgrimes/*a4*/ { "movs", FALSE, BYTE, op2(SI,DI), 0 }, 7174Srgrimes/*a5*/ { "movs", FALSE, LONG, op2(SI,DI), 0 }, 7184Srgrimes/*a6*/ { "cmps", FALSE, BYTE, op2(SI,DI), 0 }, 7194Srgrimes/*a7*/ { "cmps", FALSE, LONG, op2(SI,DI), 0 }, 7204Srgrimes 7214Srgrimes/*a8*/ { "test", FALSE, BYTE, op2(I, A), 0 }, 7224Srgrimes/*a9*/ { "test", FALSE, LONG, op2(I, A), 0 }, 7234Srgrimes/*aa*/ { "stos", FALSE, BYTE, op1(DI), 0 }, 7244Srgrimes/*ab*/ { "stos", FALSE, LONG, op1(DI), 0 }, 725118Srgrimes/*ac*/ { "lods", FALSE, BYTE, op1(SI), 0 }, 726118Srgrimes/*ad*/ { "lods", FALSE, LONG, op1(SI), 0 }, 7274Srgrimes/*ae*/ { "scas", FALSE, BYTE, op1(SI), 0 }, 7284Srgrimes/*af*/ { "scas", FALSE, LONG, op1(SI), 0 }, 7294Srgrimes 7304Srgrimes/*b0*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7314Srgrimes/*b1*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7324Srgrimes/*b2*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7334Srgrimes/*b3*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7344Srgrimes/*b4*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7354Srgrimes/*b5*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7364Srgrimes/*b6*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7374Srgrimes/*b7*/ { "mov", FALSE, BYTE, op2(I, Ri), 0 }, 7384Srgrimes 7394Srgrimes/*b8*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7404Srgrimes/*b9*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7414Srgrimes/*ba*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7424Srgrimes/*bb*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7434Srgrimes/*bc*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7444Srgrimes/*bd*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7454Srgrimes/*be*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7464Srgrimes/*bf*/ { "mov", FALSE, LONG, op2(I, Ri), 0 }, 7474Srgrimes 7484Srgrimes/*c0*/ { "", TRUE, BYTE, op2(Ib, E), (char *)db_Grp2 }, 7494Srgrimes/*c1*/ { "", TRUE, LONG, op2(Ib, E), (char *)db_Grp2 }, 7504Srgrimes/*c2*/ { "ret", FALSE, NONE, op1(Iw), 0 }, 7514Srgrimes/*c3*/ { "ret", FALSE, NONE, 0, 0 }, 7524Srgrimes/*c4*/ { "les", TRUE, LONG, op2(E, R), 0 }, 7534Srgrimes/*c5*/ { "lds", TRUE, LONG, op2(E, R), 0 }, 7544Srgrimes/*c6*/ { "mov", TRUE, BYTE, op2(I, E), 0 }, 7554Srgrimes/*c7*/ { "mov", TRUE, LONG, op2(I, E), 0 }, 7564Srgrimes 7574Srgrimes/*c8*/ { "enter", FALSE, NONE, op2(Ib, Iw), 0 }, 7584Srgrimes/*c9*/ { "leave", FALSE, NONE, 0, 0 }, 7594Srgrimes/*ca*/ { "lret", FALSE, NONE, op1(Iw), 0 }, 7604Srgrimes/*cb*/ { "lret", FALSE, NONE, 0, 0 }, 7614Srgrimes/*cc*/ { "int", FALSE, NONE, op1(o3), 0 }, 7624Srgrimes/*cd*/ { "int", FALSE, NONE, op1(Ib), 0 }, 7634Srgrimes/*ce*/ { "into", FALSE, NONE, 0, 0 }, 7644Srgrimes/*cf*/ { "iret", FALSE, NONE, 0, 0 }, 7654Srgrimes 7664Srgrimes/*d0*/ { "", TRUE, BYTE, op2(o1, E), (char *)db_Grp2 }, 7674Srgrimes/*d1*/ { "", TRUE, LONG, op2(o1, E), (char *)db_Grp2 }, 7684Srgrimes/*d2*/ { "", TRUE, BYTE, op2(CL, E), (char *)db_Grp2 }, 7694Srgrimes/*d3*/ { "", TRUE, LONG, op2(CL, E), (char *)db_Grp2 }, 7704Srgrimes/*d4*/ { "aam", TRUE, NONE, 0, 0 }, 7714Srgrimes/*d5*/ { "aad", TRUE, NONE, 0, 0 }, 7724Srgrimes/*d6*/ { "", FALSE, NONE, 0, 0 }, 7734Srgrimes/*d7*/ { "xlat", FALSE, BYTE, op1(BX), 0 }, 7744Srgrimes 7754Srgrimes/*d8*/ { "", TRUE, NONE, 0, (char *)db_Esc8 }, 7764Srgrimes/*d9*/ { "", TRUE, NONE, 0, (char *)db_Esc9 }, 7774Srgrimes/*da*/ { "", TRUE, NONE, 0, (char *)db_Esca }, 7784Srgrimes/*db*/ { "", TRUE, NONE, 0, (char *)db_Escb }, 7794Srgrimes/*dc*/ { "", TRUE, NONE, 0, (char *)db_Escc }, 7804Srgrimes/*dd*/ { "", TRUE, NONE, 0, (char *)db_Escd }, 7814Srgrimes/*de*/ { "", TRUE, NONE, 0, (char *)db_Esce }, 7824Srgrimes/*df*/ { "", TRUE, NONE, 0, (char *)db_Escf }, 7834Srgrimes 7844Srgrimes/*e0*/ { "loopne",FALSE, NONE, op1(Db), 0 }, 7854Srgrimes/*e1*/ { "loope", FALSE, NONE, op1(Db), 0 }, 7864Srgrimes/*e2*/ { "loop", FALSE, NONE, op1(Db), 0 }, 7874Srgrimes/*e3*/ { "jcxz", FALSE, SDEP, op1(Db), "jecxz" }, 7884Srgrimes/*e4*/ { "in", FALSE, BYTE, op2(Ib, A), 0 }, 7894Srgrimes/*e5*/ { "in", FALSE, LONG, op2(Ib, A) , 0 }, 7904Srgrimes/*e6*/ { "out", FALSE, BYTE, op2(A, Ib), 0 }, 7914Srgrimes/*e7*/ { "out", FALSE, LONG, op2(A, Ib) , 0 }, 7924Srgrimes 7934Srgrimes/*e8*/ { "call", FALSE, NONE, op1(Dl), 0 }, 7944Srgrimes/*e9*/ { "jmp", FALSE, NONE, op1(Dl), 0 }, 7954Srgrimes/*ea*/ { "ljmp", FALSE, NONE, op1(OS), 0 }, 7964Srgrimes/*eb*/ { "jmp", FALSE, NONE, op1(Db), 0 }, 7974Srgrimes/*ec*/ { "in", FALSE, BYTE, op2(DX, A), 0 }, 7984Srgrimes/*ed*/ { "in", FALSE, LONG, op2(DX, A) , 0 }, 7994Srgrimes/*ee*/ { "out", FALSE, BYTE, op2(A, DX), 0 }, 8004Srgrimes/*ef*/ { "out", FALSE, LONG, op2(A, DX) , 0 }, 8014Srgrimes 8024Srgrimes/*f0*/ { "", FALSE, NONE, 0, 0 }, 8034Srgrimes/*f1*/ { "", FALSE, NONE, 0, 0 }, 8044Srgrimes/*f2*/ { "", FALSE, NONE, 0, 0 }, 8054Srgrimes/*f3*/ { "", FALSE, NONE, 0, 0 }, 8064Srgrimes/*f4*/ { "hlt", FALSE, NONE, 0, 0 }, 8074Srgrimes/*f5*/ { "cmc", FALSE, NONE, 0, 0 }, 8084Srgrimes/*f6*/ { "", TRUE, BYTE, 0, (char *)db_Grp3 }, 8094Srgrimes/*f7*/ { "", TRUE, LONG, 0, (char *)db_Grp3 }, 8104Srgrimes 8114Srgrimes/*f8*/ { "clc", FALSE, NONE, 0, 0 }, 8124Srgrimes/*f9*/ { "stc", FALSE, NONE, 0, 0 }, 8134Srgrimes/*fa*/ { "cli", FALSE, NONE, 0, 0 }, 8144Srgrimes/*fb*/ { "sti", FALSE, NONE, 0, 0 }, 8154Srgrimes/*fc*/ { "cld", FALSE, NONE, 0, 0 }, 8164Srgrimes/*fd*/ { "std", FALSE, NONE, 0, 0 }, 8174Srgrimes/*fe*/ { "", TRUE, NONE, 0, (char *)db_Grp4 }, 8184Srgrimes/*ff*/ { "", TRUE, NONE, 0, (char *)db_Grp5 }, 8194Srgrimes}; 8204Srgrimes 8214Srgrimesstruct inst db_bad_inst = 8224Srgrimes { "???", FALSE, NONE, 0, 0 } 8234Srgrimes; 8244Srgrimes 8254Srgrimes#define f_mod(byte) ((byte)>>6) 8264Srgrimes#define f_reg(byte) (((byte)>>3)&0x7) 8274Srgrimes#define f_rm(byte) ((byte)&0x7) 8284Srgrimes 8294Srgrimes#define sib_ss(byte) ((byte)>>6) 8304Srgrimes#define sib_index(byte) (((byte)>>3)&0x7) 8314Srgrimes#define sib_base(byte) ((byte)&0x7) 8324Srgrimes 8334Srgrimesstruct i_addr { 8344Srgrimes int is_reg; /* if reg, reg number is in 'disp' */ 8354Srgrimes int disp; 8364Srgrimes char * base; 8374Srgrimes char * index; 8384Srgrimes int ss; 8394Srgrimes}; 8404Srgrimes 8414Srgrimeschar * db_index_reg_16[8] = { 8424Srgrimes "%bx,%si", 8434Srgrimes "%bx,%di", 8444Srgrimes "%bp,%si", 8454Srgrimes "%bp,%di", 8464Srgrimes "%si", 8474Srgrimes "%di", 8484Srgrimes "%bp", 8494Srgrimes "%bx" 8504Srgrimes}; 8514Srgrimes 8524Srgrimeschar * db_reg[3][8] = { 8534Srgrimes "%al", "%cl", "%dl", "%bl", "%ah", "%ch", "%dh", "%bh", 8544Srgrimes "%ax", "%cx", "%dx", "%bx", "%sp", "%bp", "%si", "%di", 8554Srgrimes "%eax", "%ecx", "%edx", "%ebx", "%esp", "%ebp", "%esi", "%edi" 8564Srgrimes}; 8574Srgrimes 8584Srgrimeschar * db_seg_reg[8] = { 8594Srgrimes "%es", "%cs", "%ss", "%ds", "%fs", "%gs", "", "" 8604Srgrimes}; 8614Srgrimes 8624Srgrimes/* 8634Srgrimes * lengths for size attributes 8644Srgrimes */ 8654Srgrimesint db_lengths[] = { 8664Srgrimes 1, /* BYTE */ 8674Srgrimes 2, /* WORD */ 8684Srgrimes 4, /* LONG */ 8694Srgrimes 8, /* QUAD */ 8704Srgrimes 4, /* SNGL */ 8714Srgrimes 8, /* DBLR */ 8724Srgrimes 10, /* EXTR */ 8734Srgrimes}; 8744Srgrimes 8754Srgrimes#define get_value_inc(result, loc, size, is_signed) \ 8764Srgrimes result = db_get_value((loc), (size), (is_signed)); \ 8774Srgrimes (loc) += (size); 8784Srgrimes 8794Srgrimes/* 8804Srgrimes * Read address at location and return updated location. 8814Srgrimes */ 8824Srgrimesdb_addr_t 8834Srgrimesdb_read_address(loc, short_addr, regmodrm, addrp) 8844Srgrimes db_addr_t loc; 8854Srgrimes int short_addr; 8864Srgrimes int regmodrm; 8874Srgrimes struct i_addr *addrp; /* out */ 8884Srgrimes{ 8894Srgrimes int mod, rm, sib, index, ss, disp; 8904Srgrimes 8914Srgrimes mod = f_mod(regmodrm); 8924Srgrimes rm = f_rm(regmodrm); 8934Srgrimes 8944Srgrimes if (mod == 3) { 8954Srgrimes addrp->is_reg = TRUE; 8964Srgrimes addrp->disp = rm; 8974Srgrimes return (loc); 8984Srgrimes } 8994Srgrimes addrp->is_reg = FALSE; 9004Srgrimes addrp->index = 0; 9014Srgrimes 9024Srgrimes if (short_addr) { 9034Srgrimes addrp->index = 0; 9044Srgrimes addrp->ss = 0; 9054Srgrimes switch (mod) { 9064Srgrimes case 0: 9074Srgrimes if (rm == 6) { 9084Srgrimes get_value_inc(disp, loc, 2, TRUE); 9094Srgrimes addrp->disp = disp; 9104Srgrimes addrp->base = 0; 9114Srgrimes } 9124Srgrimes else { 9134Srgrimes addrp->disp = 0; 9144Srgrimes addrp->base = db_index_reg_16[rm]; 9154Srgrimes } 9164Srgrimes break; 9174Srgrimes case 1: 9184Srgrimes get_value_inc(disp, loc, 1, TRUE); 9194Srgrimes addrp->disp = disp; 9204Srgrimes addrp->base = db_index_reg_16[rm]; 9214Srgrimes break; 9224Srgrimes case 2: 9234Srgrimes get_value_inc(disp, loc, 2, TRUE); 9244Srgrimes addrp->disp = disp; 9254Srgrimes addrp->base = db_index_reg_16[rm]; 9264Srgrimes break; 9274Srgrimes } 9284Srgrimes } 9294Srgrimes else { 9304Srgrimes if (mod != 3 && rm == 4) { 9314Srgrimes get_value_inc(sib, loc, 1, FALSE); 9324Srgrimes rm = sib_base(sib); 9334Srgrimes index = sib_index(sib); 9344Srgrimes if (index != 4) 9354Srgrimes addrp->index = db_reg[LONG][index]; 9364Srgrimes addrp->ss = sib_ss(sib); 9374Srgrimes } 9384Srgrimes 9394Srgrimes switch (mod) { 9404Srgrimes case 0: 9414Srgrimes if (rm == 5) { 9424Srgrimes get_value_inc(addrp->disp, loc, 4, FALSE); 9434Srgrimes addrp->base = 0; 9444Srgrimes } 9454Srgrimes else { 9464Srgrimes addrp->disp = 0; 9474Srgrimes addrp->base = db_reg[LONG][rm]; 9484Srgrimes } 9494Srgrimes break; 9504Srgrimes 9514Srgrimes case 1: 9524Srgrimes get_value_inc(disp, loc, 1, TRUE); 9534Srgrimes addrp->disp = disp; 9544Srgrimes addrp->base = db_reg[LONG][rm]; 9554Srgrimes break; 9564Srgrimes 9574Srgrimes case 2: 9584Srgrimes get_value_inc(disp, loc, 4, FALSE); 9594Srgrimes addrp->disp = disp; 9604Srgrimes addrp->base = db_reg[LONG][rm]; 9614Srgrimes break; 9624Srgrimes } 9634Srgrimes } 9644Srgrimes return (loc); 9654Srgrimes} 9664Srgrimes 9674Srgrimesvoid 9684Srgrimesdb_print_address(seg, size, addrp) 9694Srgrimes char * seg; 9704Srgrimes int size; 9714Srgrimes struct i_addr *addrp; 9724Srgrimes{ 9734Srgrimes if (addrp->is_reg) { 9744Srgrimes db_printf("%s", db_reg[size][addrp->disp]); 9754Srgrimes return; 9764Srgrimes } 9774Srgrimes 9784Srgrimes if (seg) { 9794Srgrimes db_printf("%s:", seg); 9804Srgrimes } 9814Srgrimes 9824Srgrimes db_printsym((db_addr_t)addrp->disp, DB_STGY_ANY); 9834Srgrimes if (addrp->base != 0 || addrp->index != 0) { 9844Srgrimes db_printf("("); 9854Srgrimes if (addrp->base) 9864Srgrimes db_printf("%s", addrp->base); 9874Srgrimes if (addrp->index) 9884Srgrimes db_printf(",%s,%d", addrp->index, 1<<addrp->ss); 9894Srgrimes db_printf(")"); 9904Srgrimes } 9914Srgrimes} 9924Srgrimes 9934Srgrimes/* 9944Srgrimes * Disassemble floating-point ("escape") instruction 9954Srgrimes * and return updated location. 9964Srgrimes */ 9974Srgrimesdb_addr_t 9984Srgrimesdb_disasm_esc(loc, inst, short_addr, size, seg) 9994Srgrimes db_addr_t loc; 10004Srgrimes int inst; 10014Srgrimes int short_addr; 10024Srgrimes int size; 10034Srgrimes char * seg; 10044Srgrimes{ 10054Srgrimes int regmodrm; 10064Srgrimes struct finst *fp; 10074Srgrimes int mod; 10084Srgrimes struct i_addr address; 10094Srgrimes char * name; 10104Srgrimes 10114Srgrimes get_value_inc(regmodrm, loc, 1, FALSE); 10124Srgrimes fp = &db_Esc_inst[inst - 0xd8][f_reg(regmodrm)]; 10134Srgrimes mod = f_mod(regmodrm); 10144Srgrimes if (mod != 3) { 10154Srgrimes /* 10164Srgrimes * Normal address modes. 10174Srgrimes */ 10184Srgrimes loc = db_read_address(loc, short_addr, regmodrm, &address); 10194Srgrimes db_printf(fp->f_name); 10204Srgrimes switch(fp->f_size) { 10214Srgrimes case SNGL: 10224Srgrimes db_printf("s"); 10234Srgrimes break; 10244Srgrimes case DBLR: 10254Srgrimes db_printf("l"); 10264Srgrimes break; 10274Srgrimes case EXTR: 10284Srgrimes db_printf("t"); 10294Srgrimes break; 10304Srgrimes case WORD: 10314Srgrimes db_printf("s"); 10324Srgrimes break; 10334Srgrimes case LONG: 10344Srgrimes db_printf("l"); 10354Srgrimes break; 10364Srgrimes case QUAD: 10374Srgrimes db_printf("q"); 10384Srgrimes break; 10394Srgrimes default: 10404Srgrimes break; 10414Srgrimes } 10424Srgrimes db_printf("\t"); 10434Srgrimes db_print_address(seg, BYTE, &address); 10444Srgrimes } 10454Srgrimes else { 10464Srgrimes /* 10474Srgrimes * 'reg-reg' - special formats 10484Srgrimes */ 10494Srgrimes switch (fp->f_rrmode) { 10504Srgrimes case op2(ST,STI): 10514Srgrimes name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; 10524Srgrimes db_printf("%s\t%%st,%%st(%d)",name,f_rm(regmodrm)); 10534Srgrimes break; 10544Srgrimes case op2(STI,ST): 10554Srgrimes name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; 10564Srgrimes db_printf("%s\t%%st(%d),%%st",name, f_rm(regmodrm)); 10574Srgrimes break; 10584Srgrimes case op1(STI): 10594Srgrimes name = (fp->f_rrname) ? fp->f_rrname : fp->f_name; 10604Srgrimes db_printf("%s\t%%st(%d)",name, f_rm(regmodrm)); 10614Srgrimes break; 10624Srgrimes case op1(X): 10634Srgrimes db_printf("%s", ((char **)fp->f_rrname)[f_rm(regmodrm)]); 10644Srgrimes break; 10654Srgrimes case op1(XA): 10664Srgrimes db_printf("%s\t%%ax", 10674Srgrimes ((char **)fp->f_rrname)[f_rm(regmodrm)]); 10684Srgrimes break; 10694Srgrimes default: 10704Srgrimes db_printf("<bad instruction>"); 10714Srgrimes break; 10724Srgrimes } 10734Srgrimes } 10744Srgrimes 10754Srgrimes return (loc); 10764Srgrimes} 10774Srgrimes 10784Srgrimes/* 10794Srgrimes * Disassemble instruction at 'loc'. 'altfmt' specifies an 10804Srgrimes * (optional) alternate format. Return address of start of 10814Srgrimes * next instruction. 10824Srgrimes */ 10834Srgrimesdb_addr_t 10844Srgrimesdb_disasm(loc, altfmt) 10854Srgrimes db_addr_t loc; 10864Srgrimes boolean_t altfmt; 10874Srgrimes{ 10884Srgrimes int inst; 10894Srgrimes int size; 10904Srgrimes int short_addr; 10914Srgrimes char * seg; 10924Srgrimes struct inst * ip; 10934Srgrimes char * i_name; 10944Srgrimes int i_size; 10954Srgrimes int i_mode; 10964Srgrimes int regmodrm; 10974Srgrimes boolean_t first; 10984Srgrimes int displ; 10994Srgrimes int prefix; 11004Srgrimes int imm; 11014Srgrimes int imm2; 11024Srgrimes int len; 11034Srgrimes struct i_addr address; 11044Srgrimes 11054Srgrimes get_value_inc(inst, loc, 1, FALSE); 11064Srgrimes short_addr = FALSE; 11074Srgrimes size = LONG; 11084Srgrimes seg = 0; 11094Srgrimes 11104Srgrimes /* 11114Srgrimes * Get prefixes 11124Srgrimes */ 11134Srgrimes prefix = TRUE; 11144Srgrimes do { 11154Srgrimes switch (inst) { 11164Srgrimes case 0x66: /* data16 */ 11174Srgrimes size = WORD; 11184Srgrimes break; 11194Srgrimes case 0x67: 11204Srgrimes short_addr = TRUE; 11214Srgrimes break; 11224Srgrimes case 0x26: 11234Srgrimes seg = "%es"; 11244Srgrimes break; 11254Srgrimes case 0x36: 11264Srgrimes seg = "%ss"; 11274Srgrimes break; 11284Srgrimes case 0x2e: 11294Srgrimes seg = "%cs"; 11304Srgrimes break; 11314Srgrimes case 0x3e: 11324Srgrimes seg = "%ds"; 11334Srgrimes break; 11344Srgrimes case 0x64: 11354Srgrimes seg = "%fs"; 11364Srgrimes break; 11374Srgrimes case 0x65: 11384Srgrimes seg = "%gs"; 11394Srgrimes break; 11404Srgrimes case 0xf0: 11414Srgrimes db_printf("lock "); 11424Srgrimes break; 11434Srgrimes case 0xf2: 11444Srgrimes db_printf("repne "); 11454Srgrimes break; 11464Srgrimes case 0xf3: 11474Srgrimes db_printf("repe "); /* XXX repe VS rep */ 11484Srgrimes break; 11494Srgrimes default: 11504Srgrimes prefix = FALSE; 11514Srgrimes break; 11524Srgrimes } 11534Srgrimes if (prefix) { 11544Srgrimes get_value_inc(inst, loc, 1, FALSE); 11554Srgrimes } 11564Srgrimes } while (prefix); 11574Srgrimes 11584Srgrimes if (inst >= 0xd8 && inst <= 0xdf) { 11594Srgrimes loc = db_disasm_esc(loc, inst, short_addr, size, seg); 11604Srgrimes db_printf("\n"); 11614Srgrimes return (loc); 11624Srgrimes } 11634Srgrimes 11644Srgrimes if (inst == 0x0f) { 11654Srgrimes get_value_inc(inst, loc, 1, FALSE); 11664Srgrimes ip = db_inst_0f[inst>>4]; 11674Srgrimes if (ip == 0) { 11684Srgrimes ip = &db_bad_inst; 11694Srgrimes } 11704Srgrimes else { 11714Srgrimes ip = &ip[inst&0xf]; 11724Srgrimes } 11734Srgrimes } 11744Srgrimes else 11754Srgrimes ip = &db_inst_table[inst]; 11764Srgrimes 11774Srgrimes if (ip->i_has_modrm) { 11784Srgrimes get_value_inc(regmodrm, loc, 1, FALSE); 11794Srgrimes loc = db_read_address(loc, short_addr, regmodrm, &address); 11804Srgrimes } 11814Srgrimes 11824Srgrimes i_name = ip->i_name; 11834Srgrimes i_size = ip->i_size; 11844Srgrimes i_mode = ip->i_mode; 11854Srgrimes 11864Srgrimes if (ip->i_extra == (char *)db_Grp1 || 11874Srgrimes ip->i_extra == (char *)db_Grp2 || 11884Srgrimes ip->i_extra == (char *)db_Grp6 || 11894Srgrimes ip->i_extra == (char *)db_Grp7 || 11904Srgrimes ip->i_extra == (char *)db_Grp8) { 11914Srgrimes i_name = ((char **)ip->i_extra)[f_reg(regmodrm)]; 11924Srgrimes } 11934Srgrimes else if (ip->i_extra == (char *)db_Grp3) { 11944Srgrimes ip = (struct inst *)ip->i_extra; 11954Srgrimes ip = &ip[f_reg(regmodrm)]; 11964Srgrimes i_name = ip->i_name; 11974Srgrimes i_mode = ip->i_mode; 11984Srgrimes } 11994Srgrimes else if (ip->i_extra == (char *)db_Grp4 || 12004Srgrimes ip->i_extra == (char *)db_Grp5) { 12014Srgrimes ip = (struct inst *)ip->i_extra; 12024Srgrimes ip = &ip[f_reg(regmodrm)]; 12034Srgrimes i_name = ip->i_name; 12044Srgrimes i_mode = ip->i_mode; 12054Srgrimes i_size = ip->i_size; 12064Srgrimes } 12074Srgrimes 12084Srgrimes if (i_size == SDEP) { 12094Srgrimes if (size == WORD) 12104Srgrimes db_printf(i_name); 12114Srgrimes else 12124Srgrimes db_printf(ip->i_extra); 12134Srgrimes } 12144Srgrimes else { 12154Srgrimes db_printf(i_name); 12164Srgrimes if (i_size != NONE) { 12174Srgrimes if (i_size == BYTE) { 12184Srgrimes db_printf("b"); 12194Srgrimes size = BYTE; 12204Srgrimes } 12214Srgrimes else if (i_size == WORD) { 12224Srgrimes db_printf("w"); 12234Srgrimes size = WORD; 12244Srgrimes } 12254Srgrimes else if (size == WORD) 12264Srgrimes db_printf("w"); 12274Srgrimes else 12284Srgrimes db_printf("l"); 12294Srgrimes } 12304Srgrimes } 12314Srgrimes db_printf("\t"); 12324Srgrimes for (first = TRUE; 12334Srgrimes i_mode != 0; 12344Srgrimes i_mode >>= 8, first = FALSE) 12354Srgrimes { 12364Srgrimes if (!first) 12374Srgrimes db_printf(","); 12384Srgrimes 12394Srgrimes switch (i_mode & 0xFF) { 12404Srgrimes 12414Srgrimes case E: 12424Srgrimes db_print_address(seg, size, &address); 12434Srgrimes break; 12444Srgrimes 12454Srgrimes case Eind: 12464Srgrimes db_printf("*"); 12474Srgrimes db_print_address(seg, size, &address); 12484Srgrimes break; 12494Srgrimes 12504Srgrimes case Ew: 12514Srgrimes db_print_address(seg, WORD, &address); 12524Srgrimes break; 12534Srgrimes 12544Srgrimes case Eb: 12554Srgrimes db_print_address(seg, BYTE, &address); 12564Srgrimes break; 12574Srgrimes 12584Srgrimes case R: 12594Srgrimes db_printf("%s", db_reg[size][f_reg(regmodrm)]); 12604Srgrimes break; 12614Srgrimes 12624Srgrimes case Rw: 12634Srgrimes db_printf("%s", db_reg[WORD][f_reg(regmodrm)]); 12644Srgrimes break; 12654Srgrimes 12664Srgrimes case Ri: 12674Srgrimes db_printf("%s", db_reg[size][f_rm(inst)]); 12684Srgrimes break; 12694Srgrimes 12704Srgrimes case S: 12714Srgrimes db_printf("%s", db_seg_reg[f_reg(regmodrm)]); 12724Srgrimes break; 12734Srgrimes 12744Srgrimes case Si: 12754Srgrimes db_printf("%s", db_seg_reg[f_reg(inst)]); 12764Srgrimes break; 12774Srgrimes 12784Srgrimes case A: 12794Srgrimes db_printf("%s", db_reg[size][0]); /* acc */ 12804Srgrimes break; 12814Srgrimes 12824Srgrimes case BX: 12834Srgrimes if (seg) 12844Srgrimes db_printf("%s:", seg); 12854Srgrimes db_printf("(%s)", short_addr ? "%bx" : "%ebx"); 12864Srgrimes break; 12874Srgrimes 12884Srgrimes case CL: 12894Srgrimes db_printf("%%cl"); 12904Srgrimes break; 12914Srgrimes 12924Srgrimes case DX: 12934Srgrimes db_printf("%%dx"); 12944Srgrimes break; 12954Srgrimes 12964Srgrimes case SI: 12974Srgrimes if (seg) 12984Srgrimes db_printf("%s:", seg); 12994Srgrimes db_printf("(%s)", short_addr ? "%si" : "%esi"); 13004Srgrimes break; 13014Srgrimes 13024Srgrimes case DI: 13034Srgrimes db_printf("%%es:(%s)", short_addr ? "%di" : "%edi"); 13044Srgrimes break; 13054Srgrimes 13064Srgrimes case CR: 13074Srgrimes db_printf("%%cr%d", f_reg(regmodrm)); 13084Srgrimes break; 13094Srgrimes 13104Srgrimes case DR: 13114Srgrimes db_printf("%%dr%d", f_reg(regmodrm)); 13124Srgrimes break; 13134Srgrimes 13144Srgrimes case TR: 13154Srgrimes db_printf("%%tr%d", f_reg(regmodrm)); 13164Srgrimes break; 13174Srgrimes 13184Srgrimes case I: 13194Srgrimes len = db_lengths[size]; 13204Srgrimes get_value_inc(imm, loc, len, FALSE);/* unsigned */ 13214Srgrimes db_printf("$%#n", imm); 13224Srgrimes break; 13234Srgrimes 13244Srgrimes case Is: 13254Srgrimes len = db_lengths[size]; 13264Srgrimes get_value_inc(imm, loc, len, TRUE); /* signed */ 13274Srgrimes db_printf("$%#r", imm); 13284Srgrimes break; 13294Srgrimes 13304Srgrimes case Ib: 13314Srgrimes get_value_inc(imm, loc, 1, FALSE); /* unsigned */ 13324Srgrimes db_printf("$%#n", imm); 13334Srgrimes break; 13344Srgrimes 13354Srgrimes case Ibs: 13364Srgrimes get_value_inc(imm, loc, 1, TRUE); /* signed */ 13374Srgrimes db_printf("$%#r", imm); 13384Srgrimes break; 13394Srgrimes 13404Srgrimes case Iw: 13414Srgrimes get_value_inc(imm, loc, 2, FALSE); /* unsigned */ 13424Srgrimes db_printf("$%#n", imm); 13434Srgrimes break; 13444Srgrimes 13454Srgrimes case Il: 13464Srgrimes get_value_inc(imm, loc, 4, FALSE); 13474Srgrimes db_printf("$%#n", imm); 13484Srgrimes break; 13494Srgrimes 13504Srgrimes case O: 13514Srgrimes if (short_addr) { 13524Srgrimes get_value_inc(displ, loc, 2, TRUE); 13534Srgrimes } 13544Srgrimes else { 13554Srgrimes get_value_inc(displ, loc, 4, TRUE); 13564Srgrimes } 13574Srgrimes if (seg) 13584Srgrimes db_printf("%s:%#r",seg, displ); 13594Srgrimes else 13604Srgrimes db_printsym((db_addr_t)displ, DB_STGY_ANY); 13614Srgrimes break; 13624Srgrimes 13634Srgrimes case Db: 13644Srgrimes get_value_inc(displ, loc, 1, TRUE); 13654Srgrimes db_printsym((db_addr_t)(displ + loc), DB_STGY_XTRN); 13664Srgrimes break; 13674Srgrimes 13684Srgrimes case Dl: 13694Srgrimes get_value_inc(displ, loc, 4, TRUE); 13704Srgrimes db_printsym((db_addr_t)(displ + loc), DB_STGY_XTRN); 13714Srgrimes break; 13724Srgrimes 13734Srgrimes case o1: 13744Srgrimes db_printf("$1"); 13754Srgrimes break; 13764Srgrimes 13774Srgrimes case o3: 13784Srgrimes db_printf("$3"); 13794Srgrimes break; 13804Srgrimes 13814Srgrimes case OS: 13824Srgrimes get_value_inc(imm, loc, 4, FALSE); /* offset */ 13834Srgrimes get_value_inc(imm2, loc, 2, FALSE); /* segment */ 13844Srgrimes db_printf("$%#n,%#n", imm2, imm); 13854Srgrimes break; 13864Srgrimes } 13874Srgrimes } 13884Srgrimes 13894Srgrimes if (altfmt == 0) { 13904Srgrimes if (inst == 0xe9 || inst == 0xeb) { 13914Srgrimes /* 13924Srgrimes * GAS pads to longword boundary after unconditional jumps. 13934Srgrimes */ 13944Srgrimes loc = (loc + (4-1)) & ~(4-1); 13954Srgrimes } 13964Srgrimes } 13974Srgrimes db_printf("\n"); 13984Srgrimes return (loc); 13994Srgrimes} 14004Srgrimes 1401