379 lines
14 KiB
C++
379 lines
14 KiB
C++
/////////////////////////////////////////////////////////////////////////
|
|
// $Id$
|
|
/////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Copyright (C) 2001-2009 The Bochs Project
|
|
//
|
|
// This library is free software; you can redistribute it and/or
|
|
// modify it under the terms of the GNU Lesser General Public
|
|
// License as published by the Free Software Foundation; either
|
|
// version 2 of the License, or (at your option) any later version.
|
|
//
|
|
// This library is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
// Lesser General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU Lesser General Public
|
|
// License along with this library; if not, write to the Free Software
|
|
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA B 02110-1301 USA
|
|
//
|
|
/////////////////////////////////////////////////////////////////////////
|
|
|
|
#define NEED_CPU_REG_SHORTCUTS 1
|
|
#include "bochs.h"
|
|
#include "cpu.h"
|
|
#define LOG_THIS BX_CPU_THIS_PTR
|
|
|
|
#if BX_DISASM
|
|
|
|
#include "disasm/disasm.h"
|
|
|
|
void BX_CPU_C::debug_disasm_instruction(bx_address offset)
|
|
{
|
|
#if BX_DEBUGGER
|
|
bx_dbg_disassemble_current(BX_CPU_ID, 1); // only one cpu, print time stamp
|
|
#else
|
|
bx_phy_address phy_addr;
|
|
Bit8u instr_buf[16];
|
|
char char_buf[512];
|
|
size_t i=0;
|
|
|
|
static char letters[] = "0123456789ABCDEF";
|
|
static disassembler bx_disassemble;
|
|
unsigned remainsInPage = 0x1000 - PAGE_OFFSET(offset);
|
|
|
|
bx_bool valid = dbg_xlate_linear2phy(get_laddr(BX_SEG_REG_CS, offset), &phy_addr);
|
|
if (valid) {
|
|
BX_MEM(0)->dbg_fetch_mem(BX_CPU_THIS, phy_addr, 16, instr_buf);
|
|
unsigned isize = bx_disassemble.disasm(
|
|
BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.d_b,
|
|
BX_CPU_THIS_PTR cpu_mode == BX_MODE_LONG_64,
|
|
BX_CPU_THIS_PTR get_segment_base(BX_SEG_REG_CS), offset,
|
|
instr_buf, char_buf+i);
|
|
if (isize <= remainsInPage) {
|
|
i=strlen(char_buf);
|
|
char_buf[i++] = ' ';
|
|
char_buf[i++] = ':';
|
|
char_buf[i++] = ' ';
|
|
for (unsigned j=0; j<isize; j++) {
|
|
char_buf[i++] = letters[(instr_buf[j] >> 4) & 0xf];
|
|
char_buf[i++] = letters[(instr_buf[j] >> 0) & 0xf];
|
|
}
|
|
char_buf[i] = 0;
|
|
BX_INFO(("0x" FMT_ADDRX ">> %s", offset, char_buf));
|
|
}
|
|
else {
|
|
BX_INFO(("0x" FMT_ADDRX ": (instruction unavailable) page split instruction", offset));
|
|
}
|
|
}
|
|
else {
|
|
BX_INFO(("0x" FMT_ADDRX ": (instruction unavailable) page not present", offset));
|
|
}
|
|
#endif // #if BX_DEBUGGER
|
|
}
|
|
|
|
#endif // #if BX_DISASM
|
|
|
|
const char* cpu_mode_string(unsigned cpu_mode)
|
|
{
|
|
static const char *cpu_mode_name[] = {
|
|
"real mode",
|
|
"v8086 mode",
|
|
"protected mode",
|
|
"compatibility mode",
|
|
"long mode",
|
|
"unknown mode"
|
|
};
|
|
|
|
if(cpu_mode >= 5) cpu_mode = 5;
|
|
return cpu_mode_name[cpu_mode];
|
|
}
|
|
|
|
const char* cpu_state_string(unsigned state)
|
|
{
|
|
static const char *cpu_state_name[] = {
|
|
"active",
|
|
"halted",
|
|
"in shutdown",
|
|
"waiting for SIPI",
|
|
"executing mwait",
|
|
"executing mwait inhibit interrupts",
|
|
"unknown state"
|
|
};
|
|
|
|
if(state >= 6) state = 6;
|
|
return cpu_state_name[state];
|
|
}
|
|
|
|
void BX_CPU_C::debug(bx_address offset)
|
|
{
|
|
#if BX_SUPPORT_VMX
|
|
BX_INFO(("CPU is in %s (%s%s)", cpu_mode_string(BX_CPU_THIS_PTR get_cpu_mode()),
|
|
cpu_state_string(BX_CPU_THIS_PTR activity_state),
|
|
BX_CPU_THIS_PTR in_vmx_guest ? ", vmx guest" : ""));
|
|
#else
|
|
BX_INFO(("CPU is in %s (%s)", cpu_mode_string(BX_CPU_THIS_PTR get_cpu_mode()),
|
|
cpu_state_string(BX_CPU_THIS_PTR activity_state)));
|
|
#endif
|
|
BX_INFO(("CS.mode = %u bit",
|
|
long64_mode() ? 64 : (BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.d_b ? 32 : 16)));
|
|
BX_INFO(("SS.mode = %u bit",
|
|
long64_mode() ? 64 : (BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].cache.u.segment.d_b ? 32 : 16)));
|
|
#if BX_CPU_LEVEL >= 5
|
|
BX_INFO(("EFER = 0x%08x", BX_CPU_THIS_PTR efer.get32()));
|
|
#endif
|
|
#if BX_SUPPORT_X86_64
|
|
if (long_mode()) {
|
|
BX_INFO(("| RAX=" FMT_ADDRX64 " RBX=" FMT_ADDRX64 "", RAX, RBX));
|
|
BX_INFO(("| RCX=" FMT_ADDRX64 " RDX=" FMT_ADDRX64 "", RCX, RDX));
|
|
BX_INFO(("| RSP=" FMT_ADDRX64 " RBP=" FMT_ADDRX64 "", RSP, RBP));
|
|
BX_INFO(("| RSI=" FMT_ADDRX64 " RDI=" FMT_ADDRX64 "", RSI, RDI));
|
|
BX_INFO(("| R8=" FMT_ADDRX64 " R9=" FMT_ADDRX64 "", R8, R9));
|
|
BX_INFO(("| R10=" FMT_ADDRX64 " R11=" FMT_ADDRX64 "", R10, R11));
|
|
BX_INFO(("| R12=" FMT_ADDRX64 " R13=" FMT_ADDRX64 "", R12, R13));
|
|
BX_INFO(("| R14=" FMT_ADDRX64 " R15=" FMT_ADDRX64 "", R14, R15));
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
BX_INFO(("| EAX=%08x EBX=%08x ECX=%08x EDX=%08x", EAX, EBX, ECX, EDX));
|
|
BX_INFO(("| ESP=%08x EBP=%08x ESI=%08x EDI=%08x", ESP, EBP, ESI, EDI));
|
|
}
|
|
BX_INFO(("| IOPL=%1u %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s",
|
|
BX_CPU_THIS_PTR get_IOPL(),
|
|
BX_CPU_THIS_PTR get_ID() ? "ID" : "id",
|
|
BX_CPU_THIS_PTR get_VIP() ? "VIP" : "vip",
|
|
BX_CPU_THIS_PTR get_VIF() ? "VIF" : "vif",
|
|
BX_CPU_THIS_PTR get_AC() ? "AC" : "ac",
|
|
BX_CPU_THIS_PTR get_VM() ? "VM" : "vm",
|
|
BX_CPU_THIS_PTR get_RF() ? "RF" : "rf",
|
|
BX_CPU_THIS_PTR get_NT() ? "NT" : "nt",
|
|
BX_CPU_THIS_PTR get_OF() ? "OF" : "of",
|
|
BX_CPU_THIS_PTR get_DF() ? "DF" : "df",
|
|
BX_CPU_THIS_PTR get_IF() ? "IF" : "if",
|
|
BX_CPU_THIS_PTR get_TF() ? "TF" : "tf",
|
|
BX_CPU_THIS_PTR get_SF() ? "SF" : "sf",
|
|
BX_CPU_THIS_PTR get_ZF() ? "ZF" : "zf",
|
|
BX_CPU_THIS_PTR get_AF() ? "AF" : "af",
|
|
BX_CPU_THIS_PTR get_PF() ? "PF" : "pf",
|
|
BX_CPU_THIS_PTR get_CF() ? "CF" : "cf"));
|
|
|
|
BX_INFO(("| SEG sltr(index|ti|rpl) base limit G D"));
|
|
BX_INFO(("| CS:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_CS].cache.u.segment.d_b));
|
|
BX_INFO(("| DS:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_DS].cache.u.segment.d_b));
|
|
BX_INFO(("| SS:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_SS].cache.u.segment.d_b));
|
|
BX_INFO(("| ES:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_ES].cache.u.segment.d_b));
|
|
BX_INFO(("| FS:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_FS].cache.u.segment.d_b));
|
|
BX_INFO(("| GS:%04x( %04x| %01u| %1u) %08x %08x %1u %1u",
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].selector.value,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].selector.index,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].selector.ti,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].selector.rpl,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].cache.u.segment.base,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].cache.u.segment.limit_scaled,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].cache.u.segment.g,
|
|
(unsigned) BX_CPU_THIS_PTR sregs[BX_SEG_REG_GS].cache.u.segment.d_b));
|
|
#if BX_SUPPORT_X86_64
|
|
if (long_mode()) {
|
|
BX_INFO(("| MSR_FS_BASE:" FMT_ADDRX64,
|
|
MSR_FSBASE));
|
|
BX_INFO(("| MSR_GS_BASE:" FMT_ADDRX64,
|
|
MSR_GSBASE));
|
|
|
|
BX_INFO(("| RIP=" FMT_ADDRX64 " (" FMT_ADDRX64 ")",
|
|
BX_CPU_THIS_PTR gen_reg[BX_64BIT_REG_RIP].rrx,
|
|
BX_CPU_THIS_PTR prev_rip));
|
|
BX_INFO(("| CR0=0x%08x CR2=0x" FMT_ADDRX64,
|
|
(BX_CPU_THIS_PTR cr0.get32()),
|
|
(BX_CPU_THIS_PTR cr2)));
|
|
BX_INFO(("| CR3=0x" FMT_ADDRX64 " CR4=0x%08x",
|
|
BX_CPU_THIS_PTR cr3, BX_CPU_THIS_PTR cr4.get32()));
|
|
}
|
|
else
|
|
#endif // BX_SUPPORT_X86_64
|
|
{
|
|
BX_INFO(("| EIP=%08x (%08x)", (unsigned) EIP,
|
|
(unsigned) BX_CPU_THIS_PTR prev_rip));
|
|
|
|
#if BX_CPU_LEVEL < 5
|
|
BX_INFO(("| CR0=0x%08x CR2=0x%08x CR3=0x%08x",
|
|
(unsigned) BX_CPU_THIS_PTR cr0.get32(),
|
|
(unsigned) BX_CPU_THIS_PTR cr2, (unsigned) BX_CPU_THIS_PTR cr3));
|
|
#else
|
|
BX_INFO(("| CR0=0x%08x CR2=0x%08x",
|
|
BX_CPU_THIS_PTR cr0.get32(), (unsigned) BX_CPU_THIS_PTR cr2));
|
|
BX_INFO(("| CR3=0x%08x CR4=0x%08x",
|
|
(unsigned) BX_CPU_THIS_PTR cr3,
|
|
(unsigned) BX_CPU_THIS_PTR cr4.get32()));
|
|
#endif
|
|
}
|
|
|
|
#if BX_DISASM
|
|
debug_disasm_instruction(offset);
|
|
#endif // #if BX_DISASM
|
|
}
|
|
|
|
|
|
#if BX_DEBUGGER
|
|
void BX_CPU_C::dbg_set_eip(bx_address val)
|
|
{
|
|
RIP = BX_CPU_THIS_PTR prev_rip = val;
|
|
invalidate_prefetch_q();
|
|
}
|
|
|
|
bx_bool BX_CPU_C::dbg_set_eflags(Bit32u val)
|
|
{
|
|
// returns 1=OK, 0=can't change
|
|
|
|
if (val & 0xffff0000) {
|
|
BX_INFO(("dbg_set_eflags: can't set upper 16 bits of EFLAGS !"));
|
|
return(0);
|
|
}
|
|
|
|
// make sure none of the system bits are being changed
|
|
Bit32u current_sys_bits = ((BX_CPU_THIS_PTR getB_NT()) << 14) |
|
|
(BX_CPU_THIS_PTR get_IOPL () << 12) |
|
|
((BX_CPU_THIS_PTR getB_TF()) << 8);
|
|
if (current_sys_bits != (val & 0x0000f100)) {
|
|
BX_INFO(("dbg_set_eflags: can't modify NT, IOPL, or TF !"));
|
|
return(0);
|
|
}
|
|
|
|
BX_CPU_THIS_PTR set_CF(val & 0x01); val >>= 2;
|
|
BX_CPU_THIS_PTR set_PF(val & 0x01); val >>= 2;
|
|
BX_CPU_THIS_PTR set_AF(val & 0x01); val >>= 2;
|
|
BX_CPU_THIS_PTR set_ZF(val & 0x01); val >>= 1;
|
|
BX_CPU_THIS_PTR set_SF(val & 0x01); val >>= 2;
|
|
BX_CPU_THIS_PTR set_DF(val & 0x01); val >>= 1;
|
|
BX_CPU_THIS_PTR set_OF(val & 0x01);
|
|
return(1);
|
|
}
|
|
|
|
unsigned BX_CPU_C::dbg_query_pending(void)
|
|
{
|
|
unsigned ret = 0;
|
|
|
|
if (BX_HRQ) { // DMA Hold Request
|
|
ret |= BX_DBG_PENDING_DMA;
|
|
}
|
|
|
|
if (is_unmasked_event_pending(BX_EVENT_PENDING_INTR)) {
|
|
ret |= BX_DBG_PENDING_IRQ;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
bx_bool BX_CPU_C::dbg_get_sreg(bx_dbg_sreg_t *sreg, unsigned sreg_no)
|
|
{
|
|
if (sreg_no > 5)
|
|
return(0);
|
|
sreg->valid = BX_CPU_THIS_PTR sregs[sreg_no].cache.valid;
|
|
sreg->sel = BX_CPU_THIS_PTR sregs[sreg_no].selector.value;
|
|
sreg->des_l = get_descriptor_l(&BX_CPU_THIS_PTR sregs[sreg_no].cache);
|
|
sreg->des_h = get_descriptor_h(&BX_CPU_THIS_PTR sregs[sreg_no].cache);
|
|
#if BX_SUPPORT_X86_64
|
|
sreg->dword3 = BX_CPU_THIS_PTR sregs[sreg_no].cache.u.segment.base >> 32;
|
|
#endif
|
|
return(1);
|
|
}
|
|
|
|
bx_bool BX_CPU_C::dbg_set_sreg(unsigned sreg_no, bx_segment_reg_t *sreg)
|
|
{
|
|
if (sreg_no < 6) {
|
|
BX_CPU_THIS_PTR sregs[sreg_no] = *sreg;
|
|
if (sreg_no == BX_SEG_REG_CS) {
|
|
handleCpuModeChange();
|
|
#if BX_CPU_LEVEL >= 4
|
|
handleAlignmentCheck(/* CPL change */);
|
|
#endif
|
|
invalidate_prefetch_q();
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void BX_CPU_C::dbg_get_tr(bx_dbg_sreg_t *sreg)
|
|
{
|
|
sreg->valid = BX_CPU_THIS_PTR tr.cache.valid;
|
|
sreg->sel = BX_CPU_THIS_PTR tr.selector.value;
|
|
sreg->des_l = get_descriptor_l(&BX_CPU_THIS_PTR tr.cache);
|
|
sreg->des_h = get_descriptor_h(&BX_CPU_THIS_PTR tr.cache);
|
|
#if BX_SUPPORT_X86_64
|
|
sreg->dword3 = BX_CPU_THIS_PTR tr.cache.u.segment.base >> 32;
|
|
#endif
|
|
}
|
|
|
|
void BX_CPU_C::dbg_get_ldtr(bx_dbg_sreg_t *sreg)
|
|
{
|
|
sreg->valid = BX_CPU_THIS_PTR ldtr.cache.valid;
|
|
sreg->sel = BX_CPU_THIS_PTR ldtr.selector.value;
|
|
sreg->des_l = get_descriptor_l(&BX_CPU_THIS_PTR ldtr.cache);
|
|
sreg->des_h = get_descriptor_h(&BX_CPU_THIS_PTR ldtr.cache);
|
|
#if BX_SUPPORT_X86_64
|
|
sreg->dword3 = BX_CPU_THIS_PTR ldtr.cache.u.segment.base >> 32;
|
|
#endif
|
|
}
|
|
|
|
void BX_CPU_C::dbg_get_gdtr(bx_dbg_global_sreg_t *sreg)
|
|
{
|
|
sreg->base = BX_CPU_THIS_PTR gdtr.base;
|
|
sreg->limit = BX_CPU_THIS_PTR gdtr.limit;
|
|
}
|
|
|
|
void BX_CPU_C::dbg_get_idtr(bx_dbg_global_sreg_t *sreg)
|
|
{
|
|
sreg->base = BX_CPU_THIS_PTR idtr.base;
|
|
sreg->limit = BX_CPU_THIS_PTR idtr.limit;
|
|
}
|
|
|
|
#endif // #if BX_DEBUGGER
|
|
|
|
void BX_CPU_C::atexit(void)
|
|
{
|
|
debug(BX_CPU_THIS_PTR prev_rip);
|
|
}
|