| version 1.5, 2004/01/26 15:23:55 | version 1.10, 2004/03/08 12:56:22 | 
| Line 36 | Line 36 | 
 | #endif | #endif | 
 |  |  | 
 |  |  | 
| char *cpu_reg2str(void) | char * | 
|  | cpu_reg2str(void) | 
 | { | { | 
| static char buf[512]; | static char buf[512]; | 
 |  |  | 
| sprintf(buf, | snprintf(buf, sizeof(buf), | 
| "eax=%08x ebx=%08x ecx=%08x edx=%08x esi=%08x edi=%08x\n" | "eax=%08x ecx=%08x edx=%08x ebx=%08x\n" | 
| "eip=%08x esp=%08x ebp=%08x prev_eip=%08x\n" | "esp=%08x ebp=%08x esi=%08x edi=%08x\n" | 
| "cs=%04x  ss=%04x  ds=%04x  es=%04x  fs=%04x  gs=%04x\n" | "eip=%08x prev_eip=%08x\n" | 
| "eflag=%08x " | "es=%04x cs=%04x ss=%04x ds=%04x fs=%04x gs=%04x\n" | 
| /* ID VIP VIF AC VM RF NT IOPL OF DF IF TF SF ZF AF PF CF */ | "eflag=%08x " | 
| "[ ID=%d VIP=%d VIF=%d AC=%d VM=%d RF=%d NT=%d IOPL=%d%d %s %s %s TF=%d %s %s %s %s %s ]\n" | /* ID VIP VIF AC VM RF NT IOPL OF DF IF TF SF ZF AF PF CF */ | 
| "gdtr=%08x:%04x idtr=%08x:%04x\n" | "[ ID=%d VIP=%d VIF=%d AC=%d VM=%d RF=%d NT=%d IOPL=%d %s %s %s TF=%d %s %s %s %s %s ]\n" | 
| "ldtr=%04x(%08x:%04x) tr=%04x(%08x:%04x)\n" | "gdtr=%08x:%04x idtr=%08x:%04x\n" | 
| "cr0=%08x cr1=%08x cr2=%08x cr3=%08x cr4=%08x mxcsr=%08x", | "ldtr=%04x(%08x:%04x) tr=%04x(%08x:%04x)\n" | 
| CPU_EAX, CPU_EBX, CPU_ECX, CPU_EDX, CPU_ESI, CPU_EDI, | "cr0=%08x cr1=%08x cr2=%08x cr3=%08x cr4=%08x mxcsr=%08x", | 
| CPU_EIP, CPU_ESP, CPU_EBP, CPU_PREV_EIP, | CPU_EAX, CPU_ECX, CPU_EDX, CPU_EBX, | 
| CPU_CS, CPU_SS, CPU_DS, CPU_ES, CPU_FS, CPU_GS, | CPU_ESP, CPU_EBP,CPU_ESI, CPU_EDI, | 
| CPU_EFLAG, | CPU_EIP, CPU_PREV_EIP, | 
| (CPU_EFLAG & ID_FLAG) != 0, | CPU_CS, CPU_SS, CPU_DS, CPU_ES, CPU_FS, CPU_GS, | 
| (CPU_EFLAG & VIP_FLAG) != 0, | CPU_EFLAG, | 
| (CPU_EFLAG & VIF_FLAG) != 0, | (CPU_EFLAG & ID_FLAG) != 0, | 
| (CPU_EFLAG & AC_FLAG) != 0, | (CPU_EFLAG & VIP_FLAG) != 0, | 
| (CPU_EFLAG & VM_FLAG) != 0, | (CPU_EFLAG & VIF_FLAG) != 0, | 
| (CPU_EFLAG & RF_FLAG) != 0, | (CPU_EFLAG & AC_FLAG) != 0, | 
| (CPU_EFLAG & NT_FLAG) != 0, | (CPU_EFLAG & VM_FLAG) != 0, | 
| CPU_EFLAG >> 13 & 1, | (CPU_EFLAG & RF_FLAG) != 0, | 
| CPU_EFLAG >> 12 & 1, | (CPU_EFLAG & NT_FLAG) != 0, | 
| CPU_EFLAG & O_FLAG ? "OV" : "NV", | (int)((CPU_EFLAG >> 12) & 3), | 
| CPU_EFLAG & D_FLAG ? "UP" : "DN", | CPU_OV ? "OV" : "NV", | 
| CPU_EFLAG & I_FLAG ? "DI" : "EI", | CPU_EFLAG & D_FLAG ? "UP" : "DN", | 
| (CPU_EFLAG & T_FLAG) != 0, | CPU_EFLAG & I_FLAG ? "DI" : "EI", | 
| CPU_EFLAG & S_FLAG ? "NG" : "PL", | (CPU_EFLAG & T_FLAG) != 0, | 
| CPU_EFLAG & Z_FLAG ? "ZR" : "NZ", | CPU_EFLAG & S_FLAG ? "NG" : "PL", | 
| CPU_EFLAG & A_FLAG ? "AC" : "NA", | CPU_EFLAG & Z_FLAG ? "ZR" : "NZ", | 
| CPU_EFLAG & P_FLAG ? "PE" : "PO", | CPU_EFLAG & A_FLAG ? "AC" : "NA", | 
| CPU_EFLAG & C_FLAG ? "CY" : "NC", | CPU_EFLAG & P_FLAG ? "PE" : "PO", | 
| CPU_GDTR_BASE, CPU_GDTR_LIMIT, CPU_IDTR_BASE, CPU_IDTR_LIMIT, | CPU_EFLAG & C_FLAG ? "CY" : "NC", | 
| CPU_LDTR, CPU_LDTR_BASE, CPU_LDTR_LIMIT, CPU_TR, CPU_TR_BASE, CPU_TR_LIMIT, | CPU_GDTR_BASE, CPU_GDTR_LIMIT, CPU_IDTR_BASE, CPU_IDTR_LIMIT, | 
| CPU_CR0, CPU_CR1, CPU_CR2, CPU_CR3, CPU_CR4, CPU_MXCSR); | CPU_LDTR, CPU_LDTR_BASE, CPU_LDTR_LIMIT, | 
|  | CPU_TR, CPU_TR_BASE, CPU_TR_LIMIT, | 
|  | CPU_CR0, CPU_CR1, CPU_CR2, CPU_CR3, CPU_CR4, CPU_MXCSR); | 
 |  |  | 
| return buf; | return buf; | 
 | } | } | 
 |  |  | 
 | #ifdef USE_FPU | #ifdef USE_FPU | 
| char *fpu_reg2str(void) | char * | 
|  | fpu_reg2str(void) | 
 | { | { | 
| static char buf[512]; | static char buf[512]; | 
| char tmp[128]; | char tmp[128]; | 
| int i; | int i; | 
| int no; | int no; | 
|  |  | 
| strcpy(buf, "st=\n"); |  | 
| for(no = 0; no < 8; no++) |  | 
| { |  | 
| for(i = 9; i >= 0; i--) |  | 
| { |  | 
| sprintf(tmp, "%02x", FPU_ST[no][i]); |  | 
| strcat(buf, tmp); |  | 
| } |  | 
| strcat(buf, "\n"); |  | 
| } |  | 
|  |  | 
| sprintf(tmp, |  | 
| "ctrl=%04x  status=%04x  tag=%04x\n" |  | 
| "inst=%08x%04x  data=%08x%04x  op=%03x\n", |  | 
| FPU_CTRLWORD, |  | 
| FPU_STATUSWORD, |  | 
| FPU_TAGWORD, |  | 
| FPU_INSTPTR_OFFSET, FPU_INSTPTR_SEG, |  | 
| FPU_DATAPTR_OFFSET, FPU_DATAPTR_SEG, |  | 
| FPU_LASTINSTOP); |  | 
| strcat(buf, tmp); |  | 
|  |  | 
| return buf; |  | 
| } |  | 
| #endif |  | 
|  |  | 
| static char *a20str(void) |  | 
| { |  | 
| static char buf[32]; |  | 
|  |  | 
| sprintf(buf, "a20line=%s\n", CPU_STAT_ADRSMASK == 0xffffffff ? "enable" : "disable"); |  | 
| return buf; |  | 
| } |  | 
 |  |  | 
| static char *mem2str(DWORD cs, DWORD ip) | strcpy(buf, "st=\n"); | 
| { | for (no = 0; no < 8; no++) { | 
| static char buf[128]; | for (i = 9; i >= 0; i--) { | 
| char tmp[16]; | snprintf(tmp, sizeof(tmp), "%02x", FPU_ST[no][i]); | 
| int i; | strcat(buf, tmp); | 
|  | } | 
|  | strcat(buf, "\n"); | 
|  | } | 
 |  |  | 
| strcpy(buf, "mem=... "); | snprintf(tmp, sizeof(tmp), | 
| for(i = -10; i < 0; i++) | "ctrl=%04x  status=%04x  tag=%04x\n" | 
| { | "inst=%08x%04x  data=%08x%04x  op=%03x\n", | 
| sprintf(tmp, "%02x ", __i286_memoryread((cs << 4) + ip + i)); | FPU_CTRLWORD, | 
| strcat(buf, tmp); | FPU_STATUSWORD, | 
| } | FPU_TAGWORD, | 
| sprintf(tmp, "<%02x> ", __i286_memoryread((cs << 4) + ip)); | FPU_INSTPTR_OFFSET, FPU_INSTPTR_SEG, | 
| strcat(buf, tmp); | FPU_DATAPTR_OFFSET, FPU_DATAPTR_SEG, | 
| for(i = 1; i <= 10; i++) | FPU_LASTINSTOP); | 
| { | strcat(buf, tmp); | 
| sprintf(tmp, "%02x ", __i286_memoryread((cs << 4) + ip + i)); |  | 
| strcat(buf, tmp); |  | 
| } |  | 
| strcat(buf, "...\n"); |  | 
 |  |  | 
| return buf; | return buf; | 
 | } | } | 
 |  | #endif | 
 |  |  | 
| void FASTCALL msgbox_str(char *msg) | static char * | 
|  | a20str(void) | 
 | { | { | 
 |  | static char buf[32]; | 
 |  |  | 
| printf(msg); | snprintf(buf, sizeof(buf), "a20line=%s\n", | 
| fflush(stdout); | (CPU_STAT_ADRSMASK == 0xffffffff) ? "enable" : "disable"); | 
| exit(1); | return buf; | 
 | } | } | 
 |  |  | 
| void FASTCALL msgbox_mem(DWORD no) | void | 
|  | put_cpuinfo(void) | 
 | { | { | 
| char buf[2048]; | char buf[2048]; | 
| char tmp[16]; |  | 
 |  |  | 
| strcpy(buf, cpu_reg2str()); | strcpy(buf, cpu_reg2str()); | 
| strcat(buf, "\n"); | strcat(buf, "\n"); | 
 | #ifdef USE_FPU | #ifdef USE_FPU | 
| strcat(buf, fpu_reg2str()); | strcat(buf, fpu_reg2str()); | 
| strcat(buf, "\n"); | strcat(buf, "\n"); | 
 | #endif | #endif | 
| strcat(buf, mem2str(CPU_CS, CPU_IP)); | strcat(buf, a20str()); | 
| strcat(buf, "\n"); |  | 
| sprintf(tmp, "no=%08x\n", no); |  | 
| strcat(buf, tmp); |  | 
 |  |  | 
| msgbox_str(buf); | printf(buf); | 
 | } | } | 
 |  |  | 
| void put_cpuinfo(void) | void | 
|  | dbg_printf(const char *str, ...) | 
 | { | { | 
| char buf[2048]; | char buf[1024]; | 
|  | va_list ap; | 
 |  |  | 
| strcpy(buf, cpu_reg2str()); | va_start(ap, str); | 
| strcat(buf, "\n"); | vsnprintf(buf, sizeof(buf), str, ap); | 
| #ifdef USE_FPU | va_end(ap); | 
| strcat(buf, fpu_reg2str()); | strcat(buf, "\n"); | 
| strcat(buf, "\n"); |  | 
| #endif |  | 
| strcat(buf, a20str()); |  | 
 |  |  | 
| printf(buf); | printf(buf); | 
 | } | } | 
 |  |  | 
 | void | void | 
| memory_dump(int idx, DWORD madr) | memory_dump(int idx, UINT32 madr) | 
 | { | { | 
| DWORD addr; | UINT32 addr; | 
 | size_t size; | size_t size; | 
 | unsigned char buf[16]; |  | 
 | size_t s, i; | size_t s, i; | 
| BYTE p; | UINT8 buf[16]; | 
|  | UINT8 c; | 
 |  |  | 
 | if (madr < 0x80) { | if (madr < 0x80) { | 
 | size = madr + 0x80; | size = madr + 0x80; | 
| Line 210  memory_dump(int idx, DWORD madr) | Line 178  memory_dump(int idx, DWORD madr) | 
 | memset(buf, '.', sizeof(buf)); | memset(buf, '.', sizeof(buf)); | 
 | } | } | 
 |  |  | 
| p = cpu_vmemoryread(idx, addr + s); | c = cpu_vmemoryread(idx, addr + s); | 
| VERBOSE(("%02x ", p)); | VERBOSE(("%02x ", c)); | 
| if (p >= 0x20 && p <= 0x7e) | if (c >= 0x20 && c <= 0x7e) | 
| buf[s % 16] = p; | buf[s % 16] = c; | 
 |  |  | 
 | if ((s % 16) == 15) { | if ((s % 16) == 15) { | 
 | VERBOSE(("| ")); | VERBOSE(("| ")); | 
| Line 225  memory_dump(int idx, DWORD madr) | Line 193  memory_dump(int idx, DWORD madr) | 
 | } | } | 
 |  |  | 
 | void | void | 
| gdtr_dump(DWORD base, DWORD limit) | gdtr_dump(UINT32 base, UINT limit) | 
 | { | { | 
| DWORD v[2]; | UINT32 v[2]; | 
| DWORD i; | UINT i; | 
 |  |  | 
| VERBOSE(("GDTR_DUMP: GDTR_BASE = 0x%08x, GDTR_LIMIT = 0x%04x",base,limit)); | VERBOSE(("GDTR_DUMP: GDTR_BASE = 0x%08x, GDTR_LIMIT = 0x%04x", base, limit)); | 
 |  |  | 
 | for (i = 0; i < limit; i += 8) { | for (i = 0; i < limit; i += 8) { | 
| v[0] = cpu_lmemoryread_d(base + i); | v[0] = cpu_kmemoryread_d(base + i); | 
| v[1] = cpu_lmemoryread_d(base + i + 4); | v[1] = cpu_kmemoryread_d(base + i + 4); | 
 | VERBOSE(("GDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | VERBOSE(("GDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | 
 | } | } | 
 | } | } | 
 |  |  | 
 | void | void | 
| ldtr_dump(DWORD base, DWORD limit) | ldtr_dump(UINT32 base, UINT limit) | 
 | { | { | 
| DWORD v[2]; | UINT32 v[2]; | 
| DWORD i; | UINT i; | 
 |  |  | 
| VERBOSE(("LDTR_DUMP: LDTR_BASE = 0x%08x, LDTR_LIMIT = 0x%04x",base,limit)); | VERBOSE(("LDTR_DUMP: LDTR_BASE = 0x%08x, LDTR_LIMIT = 0x%04x", base, limit)); | 
 |  |  | 
 | for (i = 0; i < limit; i += 8) { | for (i = 0; i < limit; i += 8) { | 
| v[0] = cpu_lmemoryread_d(base + i); | v[0] = cpu_kmemoryread_d(base + i); | 
| v[1] = cpu_lmemoryread_d(base + i + 4); | v[1] = cpu_kmemoryread_d(base + i + 4); | 
 | VERBOSE(("LDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | VERBOSE(("LDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | 
 | } | } | 
 | } | } | 
 |  |  | 
 | void | void | 
| idtr_dump(DWORD base, DWORD limit) | idtr_dump(UINT32 base, UINT limit) | 
 | { | { | 
| DWORD v[2]; | UINT32 v[2]; | 
| DWORD i; | UINT i; | 
 |  |  | 
| VERBOSE(("IDTR_DUMP: IDTR_BASE = 0x%08x, IDTR_LIMIT = 0x%04x",base,limit)); | VERBOSE(("IDTR_DUMP: IDTR_BASE = 0x%08x, IDTR_LIMIT = 0x%04x", base, limit)); | 
 |  |  | 
 | for (i = 0; i < limit; i += 8) { | for (i = 0; i < limit; i += 8) { | 
| v[0] = cpu_lmemoryread_d(base + i); | v[0] = cpu_kmemoryread_d(base + i); | 
| v[1] = cpu_lmemoryread_d(base + i + 4); | v[1] = cpu_kmemoryread_d(base + i + 4); | 
 | VERBOSE(("IDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | VERBOSE(("IDTR_DUMP: %08x: %08x%08x", base + i, v[0], v[1])); | 
 | } | } | 
 | } | } | 
 |  |  | 
 | void | void | 
| tr_dump(WORD selector, DWORD base, DWORD limit) | tr_dump(UINT16 selector, UINT32 base, UINT limit) | 
 | { | { | 
| DWORD v; | UINT32 v; | 
| DWORD i; | UINT i; | 
 |  |  | 
 | VERBOSE(("TR_DUMP: selector = %04x", selector)); | VERBOSE(("TR_DUMP: selector = %04x", selector)); | 
 |  |  | 
 | for (i = 0; i < limit; i += 4) { | for (i = 0; i < limit; i += 4) { | 
| v = cpu_lmemoryread_d(base + i); | v = cpu_kmemoryread_d(base + i); | 
 | VERBOSE(("TR_DUMP: %08x: %08x", base + i, v)); | VERBOSE(("TR_DUMP: %08x: %08x", base + i, v)); | 
 | } | } | 
 | } | } | 
 |  |  | 
| DWORD | UINT32 | 
| pde_dump(DWORD base, int idx) | pde_dump(UINT32 base, int idx) | 
 | { | { | 
| DWORD paddr; | UINT32 paddr; | 
| DWORD v; | UINT32 v; | 
 | int i; | int i; | 
 |  |  | 
 | if (idx < 0 && idx > -8192) { | if (idx < 0 && idx > -8192) { | 
| Line 311  pde_dump(DWORD base, int idx) | Line 279  pde_dump(DWORD base, int idx) | 
 | return paddr; | return paddr; | 
 | } | } | 
 |  |  | 
| DWORD | UINT32 | 
| convert_laddr_to_paddr(DWORD laddr) | convert_laddr_to_paddr(UINT32 laddr) | 
 | { | { | 
| DWORD paddr;    /* physical address */ | UINT32 paddr;           /* physical address */ | 
| DWORD pde_addr; /* page directory entry address */ | UINT32 pde_addr;        /* page directory entry address */ | 
| DWORD pde;      /* page directory entry */ | UINT32 pde;             /* page directory entry */ | 
| DWORD pte_addr; /* page table entry address */ | UINT32 pte_addr;        /* page table entry address */ | 
| DWORD pte;      /* page table entry */ | UINT32 pte;             /* page table entry */ | 
 |  |  | 
 | pde_addr = (CPU_CR3 & CPU_CR3_PD_MASK) | ((laddr >> 20) & 0xffc); | pde_addr = (CPU_CR3 & CPU_CR3_PD_MASK) | ((laddr >> 20) & 0xffc); | 
 | pde = cpu_memoryread_d(pde_addr); | pde = cpu_memoryread_d(pde_addr); | 
| Line 335  convert_laddr_to_paddr(DWORD laddr) | Line 303  convert_laddr_to_paddr(DWORD laddr) | 
 | return paddr; | return paddr; | 
 | } | } | 
 |  |  | 
| DWORD | UINT32 | 
| convert_vaddr_to_paddr(unsigned int idx, DWORD offset) | convert_vaddr_to_paddr(unsigned int idx, UINT32 offset) | 
 | { | { | 
 | descriptor_t *sdp; | descriptor_t *sdp; | 
| DWORD laddr; | UINT32 laddr; | 
 |  |  | 
 | if (idx < CPU_SEGREG_NUM) { | if (idx < CPU_SEGREG_NUM) { | 
 | sdp = &CPU_STAT_SREG(idx); | sdp = &CPU_STAT_SREG(idx); |