--- np2/i386c/ia32/disasm.c 2004/02/13 14:52:35 1.4 +++ np2/i386c/ia32/disasm.c 2004/07/29 13:06:08 1.8 @@ -1,4 +1,4 @@ -/* $Id: disasm.c,v 1.4 2004/02/13 14:52:35 monaka Exp $ */ +/* $Id: disasm.c,v 1.8 2004/07/29 13:06:08 monaka Exp $ */ /* * Copyright (c) 2004 NONAKA Kimihiro @@ -82,7 +82,7 @@ static const char *opcode_1byte[2][256] /*b0*/ "movb", "movb", "movb", "movb", "movb", "movb", "movb", "movb", "movw", "movw", "movw", "movw", "movw", "movw", "movw", "movw", /*c0*/ NULL, NULL, "ret", "ret", "les", "lds", "movb", "movw", - "enter", "leave", "ret", "ret", "int3", "int", "into", "iret", + "enter", "leave", "retf", "retf", "int3", "int", "into", "iret", /*d0*/ NULL, NULL, NULL, NULL, "aam", "aad", "salc", "xlat", "esc0", "esc1", "esc2", "esc3", "esc4", "esc5", "esc6", "esc7", /*e0*/ "loopne","loope", "loop", "jcxz", "inb", "inw", "outb", "outw", @@ -117,7 +117,7 @@ static const char *opcode_1byte[2][256] /*b0*/ "movb", "movb", "movb", "movb", "movb", "movb", "movb", "movb", "movl", "movl", "movl", "movl", "movl", "movl", "movl", "movl", /*c0*/ NULL, NULL, "ret", "ret", "les", "lds", "movb", "movl", - "enter", "leave", "ret", "ret", "int3", "int", "into", "iretd", + "enter", "leave", "retf", "retf", "int3", "int", "into", "iretd", /*d0*/ NULL, NULL, NULL, NULL, "aam", "aad", "salc", "xlat", "esc0", "esc1", "esc2", "esc3", "esc4", "esc5", "esc6", "esc7", /*e0*/ "loopne","loope", "loop", "jecxz", "inb", "inl", "outb", "outl", @@ -332,41 +332,9 @@ static const char *opcode2_g9[8] = { NULL, "cmpxchg8b", NULL, NULL, NULL, NULL, NULL, NULL }; +#if 0 static const char *sep[2] = { " ", ", " }; - - -/* - * context - */ -typedef struct { - DWORD val; - - DWORD eip; - BOOL op32; - BOOL as32; - - DWORD baseaddr; - DWORD opcode[3]; - DWORD modrm; - DWORD sib; - - BOOL useseg; - int seg; - - BYTE opbyte[32]; - int nopbyte; - - char str[256]; - size_t remain; - - char *next; - char *prefix; - char *op; - char *arg[3]; - int narg; - - char pad; -} disasm_context_t; +#endif /* @@ -375,19 +343,21 @@ typedef struct { static int convert_address(disasm_context_t *ctx) { - DWORD pde_addr; /* page directory entry address */ - DWORD pde; /* page directory entry */ - DWORD pte_addr; /* page table entry address */ - DWORD pte; /* page table entry */ - DWORD addr; + UINT32 pde_addr; /* page directory entry address */ + UINT32 pde; /* page directory entry */ + UINT32 pte_addr; /* page table entry address */ + UINT32 pte; /* page table entry */ + UINT32 addr; if (CPU_STAT_SREG(CPU_CS_INDEX).valid) { addr = CPU_STAT_SREGBASE(CPU_CS_INDEX) + ctx->eip; if (CPU_STAT_PAGING) { pde_addr = CPU_STAT_PDE_BASE + ((addr >> 20) & 0xffc); pde = cpu_memoryread_d(pde_addr); + /* XXX: check */ pte_addr = (pde & CPU_PDE_BASEADDR_MASK) + ((addr >> 10) & 0xffc); pte = cpu_memoryread_d(pte_addr); + /* XXX: check */ addr = (pte & CPU_PTE_BASEADDR_MASK) + (addr & 0x00000fff); } ctx->val = addr; @@ -399,7 +369,7 @@ convert_address(disasm_context_t *ctx) static int disasm_codefetch_1(disasm_context_t *ctx) { - BYTE val; + UINT8 val; int rv; rv = convert_address(ctx); @@ -409,26 +379,27 @@ disasm_codefetch_1(disasm_context_t *ctx val = cpu_memoryread(ctx->val); ctx->val = val; - ctx->opbyte[ctx->nopbyte++] = ctx->val; + ctx->opbyte[ctx->nopbytes++] = (UINT8)ctx->val; ctx->eip++; return 0; } +#if 0 static int disasm_codefetch_2(disasm_context_t *ctx) { - WORD val; + UINT16 val; int rv; rv = disasm_codefetch_1(ctx); if (rv) return rv; - val = ctx->val & 0xff; + val = (UINT16)(ctx->val & 0xff); rv = disasm_codefetch_1(ctx); if (rv) return rv; - val |= (WORD)(ctx->val & 0xff) << 8; + val |= (UINT16)(ctx->val & 0xff) << 8; ctx->val = val; return 0; @@ -437,7 +408,7 @@ disasm_codefetch_2(disasm_context_t *ctx static int disasm_codefetch_4(disasm_context_t *ctx) { - DWORD val; + UINT32 val; int rv; rv = disasm_codefetch_1(ctx); @@ -447,15 +418,15 @@ disasm_codefetch_4(disasm_context_t *ctx rv = disasm_codefetch_1(ctx); if (rv) return rv; - val |= (DWORD)(ctx->val & 0xff) << 8; + val |= (UINT32)(ctx->val & 0xff) << 8; rv = disasm_codefetch_1(ctx); if (rv) return rv; - val |= (DWORD)(ctx->val & 0xff) << 16; + val |= (UINT32)(ctx->val & 0xff) << 16; rv = disasm_codefetch_1(ctx); if (rv) return rv; - val |= (DWORD)(ctx->val & 0xff) << 24; + val |= (UINT32)(ctx->val & 0xff) << 24; ctx->val = val; return 0; @@ -464,6 +435,7 @@ disasm_codefetch_4(disasm_context_t *ctx /* * get effective address. */ + static int ea16(disasm_context_t *ctx, char *buf, size_t size) { @@ -471,9 +443,8 @@ ea16(disasm_context_t *ctx, char *buf, s "bx + si", "bx + di", "bp + si", "bp + di", "si", "di", "bp", "bx" }; - char tmp[32]; - DWORD mod, rm; - DWORD val; + UINT32 val; + UINT mod, rm; int rv; mod = (ctx->modrm >> 6) & 3; @@ -519,13 +490,13 @@ static int ea32(disasm_context_t *ctx, char *buf, size_t size) { char tmp[32]; - DWORD count[9]; - DWORD mod, rm; - DWORD sib; - DWORD scale; - DWORD idx; - DWORD base; - DWORD val; + UINT count[9]; + UINT32 val; + UINT mod, rm; + UINT sib; + UINT scale; + UINT idx; + UINT base; int rv; int i, n; @@ -646,7 +617,7 @@ ea(disasm_context_t *ctx) } else { milstr_ncat(ctx->next, sep[1], ctx->remain); } - len += strlen(ctx->next); + len = strlen(ctx->next); len = (len < ctx->remain) ? len : ctx->remain; ctx->next += len; ctx->remain -= len; @@ -664,6 +635,7 @@ ea(disasm_context_t *ctx) return 0; } +#endif /* * get opcode @@ -672,10 +644,9 @@ static int op(disasm_context_t *ctx) { const char *opcode; - DWORD type; - BYTE op[3]; + UINT8 op[3]; int prefix; - int len; + size_t len; int rv; int i; @@ -684,7 +655,7 @@ op(disasm_context_t *ctx) if (rv) return rv; - op[0] = ctx->val & 0xff; + op[0] = (UINT8)(ctx->val & 0xff); if (insttable_info[op[0]] & INST_PREFIX) { if (ctx->prefix == 0) ctx->prefix = ctx->next; @@ -740,7 +711,7 @@ op(disasm_context_t *ctx) if (rv) return rv; - op[1] = ctx->val & 0xff; + op[1] = (UINT8)(ctx->val & 0xff); ctx->opcode[1] = op[1]; switch (op[0]) { @@ -751,7 +722,7 @@ op(disasm_context_t *ctx) if (rv) return rv; - op[2] = ctx->val & 0xff; + op[2] = (UINT8)(ctx->val & 0xff); ctx->opcode[2] = op[2]; switch (op[1]) { @@ -812,35 +783,33 @@ op(disasm_context_t *ctx) * interface */ int -disasm(DWORD *eip, char *buf, size_t size) +disasm(UINT32 *eip, disasm_context_t *ctx) { - disasm_context_t ctx; int rv; - memset(&ctx, 0, sizeof(ctx)); - ctx.remain = sizeof(ctx.str) - 1; - ctx.next = ctx.str; - ctx.prefix = 0; - ctx.op = 0; - ctx.arg[0] = 0; - ctx.arg[1] = 0; - ctx.arg[2] = 0; - - ctx.eip = *eip; - ctx.op32 = CPU_INST_OP32; - ctx.as32 = CPU_INST_AS32; - ctx.seg = -1; + memset(ctx, 0, sizeof(disasm_context_t)); + ctx->remain = sizeof(ctx->str) - 1; + ctx->next = ctx->str; + ctx->prefix = 0; + ctx->op = 0; + ctx->arg[0] = 0; + ctx->arg[1] = 0; + ctx->arg[2] = 0; + + ctx->eip = *eip; + ctx->op32 = CPU_INST_OP32; + ctx->as32 = CPU_INST_AS32; + ctx->seg = -1; - ctx.baseaddr = ctx.eip; - ctx.pad = ' '; + ctx->baseaddr = ctx->eip; + ctx->pad = ' '; - rv = op(&ctx); + rv = op(ctx); if (rv) { - memset(&ctx, 0, sizeof(ctx)); + memset(ctx, 0, sizeof(disasm_context_t)); return rv; } + *eip = ctx->eip; - *eip = ctx.eip; - milstr_ncpy(buf, ctx.str, size); return 0; }