--- np2/i386c/ia32/disasm.c	2005/03/12 12:32:54	1.9
+++ np2/i386c/ia32/disasm.c	2012/02/07 09:11:10	1.13
@@ -1,5 +1,3 @@
-/*	$Id: disasm.c,v 1.9 2005/03/12 12:32:54 monaka Exp $	*/
-
 /*
  * Copyright (c) 2004 NONAKA Kimihiro
  * All rights reserved.
@@ -31,25 +29,6 @@
 
 
 /*
- * register strings
- */
-const char *reg8_str[8] = {
-	"al", "cl", "dl", "bl", "ah", "ch", "dh", "bh"
-};
-
-const char *reg16_str[8] = { 
-	"ax", "cx", "dx", "bx", "sp", "bp", "si", "di"
-};
-
-const char *reg32_str[8] = { 
-	"eax", "ecx", "edx", "ebx", "esp", "ebp", "esi", "edi"
-};
-
-const char *sreg_str[6] = {
-	"es", "cs", "ss", "ds", "fs", "gs"
-};
-
-/*
  * opcode strings
  */
 static const char *opcode_1byte[2][256] = {
@@ -639,7 +618,7 @@ ea(disasm_context_t *ctx)
  * get opcode
  */
 static int
-op(disasm_context_t *ctx)
+get_opcode(disasm_context_t *ctx)
 {
 	const char *opcode;
 	UINT8 op[3];
@@ -654,36 +633,35 @@ op(disasm_context_t *ctx)
 			return rv;
 
 		op[0] = (UINT8)(ctx->val & 0xff);
-		if (insttable_info[op[0]] & INST_PREFIX) {
-			if (ctx->prefix == 0)
-				ctx->prefix = ctx->next;
-
-			switch (op[0]) {
-			case 0x26: 	/* ES: */
-			case 0x2e: 	/* CS: */
-			case 0x36: 	/* SS: */
-			case 0x3e: 	/* DS: */
-				ctx->useseg = TRUE;
-				ctx->seg = (op[0] >> 3) & 3;
-				break;
-
-			case 0x64:	/* FS: */
-			case 0x65:	/* GS: */
-				ctx->useseg = TRUE;
-				ctx->seg = (op[0] - 0x64) + 4;
-				break;
-
-			case 0x66:	/* OPSize: */
-				ctx->op32 = !CPU_INST_OP32;
-				break;
-
-			case 0x67:	/* AddrSize: */
-				ctx->as32 = !CPU_INST_AS32;
-				break;
-			}
-			continue;
+		if (!(insttable_info[op[0]] & INST_PREFIX))
+			break;
+
+		if (ctx->prefix == 0)
+			ctx->prefix = ctx->next;
+
+		switch (op[0]) {
+		case 0x26: 	/* ES: */
+		case 0x2e: 	/* CS: */
+		case 0x36: 	/* SS: */
+		case 0x3e: 	/* DS: */
+			ctx->useseg = TRUE;
+			ctx->seg = (op[0] >> 3) & 3;
+			break;
+
+		case 0x64:	/* FS: */
+		case 0x65:	/* GS: */
+			ctx->useseg = TRUE;
+			ctx->seg = (op[0] - 0x64) + 4;
+			break;
+
+		case 0x66:	/* OPSize: */
+			ctx->op32 = !CPU_STATSAVE.cpu_inst_default.op_32;
+			break;
+
+		case 0x67:	/* AddrSize: */
+			ctx->as32 = !CPU_STATSAVE.cpu_inst_default.as_32;
+			break;
 		}
-		break;
 	}
 	if (prefix == MAX_PREFIX)
 		return 1;
@@ -795,14 +773,14 @@ disasm(UINT32 *eip, disasm_context_t *ct
 	ctx->arg[2] = 0;
 
 	ctx->eip = *eip;
-	ctx->op32 = CPU_INST_OP32;
-	ctx->as32 = CPU_INST_AS32;
+	ctx->op32 = CPU_STATSAVE.cpu_inst_default.op_32;
+	ctx->as32 = CPU_STATSAVE.cpu_inst_default.as_32;
 	ctx->seg = -1;
 
 	ctx->baseaddr = ctx->eip;
 	ctx->pad = ' ';
 
-	rv = op(ctx);
+	rv = get_opcode(ctx);
 	if (rv) {
 		memset(ctx, 0, sizeof(disasm_context_t));
 		return rv;
@@ -811,3 +789,54 @@ disasm(UINT32 *eip, disasm_context_t *ct
 
 	return 0;
 }
+
+char *
+cpu_disasm2str(UINT32 eip)
+{
+	static char output[2048];
+	disasm_context_t d;
+	UINT32 eip2 = eip;
+	int rv;
+
+	output[0] = '\0';
+	rv = disasm(&eip2, &d);
+	if (rv == 0) {
+		char buf[256];
+		char tmp[32];
+		int len = d.nopbytes > 8 ? 8 : d.nopbytes;
+		int i;
+
+		buf[0] = '\0';
+		for (i = 0; i < len; i++) {
+			snprintf(tmp, sizeof(tmp), "%02x ", d.opbyte[i]);
+			milstr_ncat(buf, tmp, sizeof(buf));
+		}
+		for (; i < 8; i++) {
+			milstr_ncat(buf, "   ", sizeof(buf));
+		}
+		snprintf(output, sizeof(output), "%04x:%08x: %s%s",
+		    CPU_CS, eip, buf, d.str);
+
+		if (i < d.nopbytes) {
+			char t[256];
+			buf[0] = '\0';
+			for (; i < d.nopbytes; i++) {
+				snprintf(tmp, sizeof(tmp), "%02x ",
+				    d.opbyte[i]);
+				milstr_ncat(buf, tmp, sizeof(buf));
+				if ((i % 8) == 7) {
+					snprintf(t, sizeof(t),
+					    "\n             : %s", buf);
+					milstr_ncat(output, t, sizeof(output));
+					buf[0] = '\0';
+				}
+			}
+			if ((i % 8) != 0) {
+				snprintf(t, sizeof(t),
+				    "\n             : %s", buf);
+				milstr_ncat(output, t, sizeof(output));
+			}
+		}
+	}
+	return output;
+}