Firebee/FireBee_SVN
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

x86emu now compiles with DBG_X86EMU

Browse Source
This commit is contained in:
Markus Fröschle
2014-01-04 09:09:20 +00:00
parent 34281aa232
commit d2f9d70d60
4 changed files with 108 additions and 129 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
BaS_gcc/Makefile
View File

@@ -9,7 +9,7 @@
# can be either "Y" or "N" (without quotes). "Y" for using the m68k-elf-, "N" for using the m68k-atari-mint
# toolchain
COMPILE_ELF=Y
COMPILE_ELF=N
ifeq (Y,$(COMPILE_ELF))
TCPREFIX=m68k-elf-

30
BaS_gcc/include/x86debug.h
View File

@@ -182,22 +182,26 @@
if (DEBUG_TRACECALLREGS()) \
x86emu_dump_regs(); \
if (DEBUG_TRACECALL()) { \
DPRINTVALHEXWORD("", u); \
DPRINTVALHEXWORD(":", v); \
DPRINT(": CALL "); \
DPRINT(s); \
DPRINTVALHEXWORD("", w); \
DPRINTVALHEXWORD(":", x); \
DPRINT("\r\n"); }
xprintf("%x", u); \
xprintf(":%x", v); \
xprintf(": CALL "); \
xprintf("%x", s); \
xprintf(" %x", w); \
xprintf(":%x", x); \
xprintf("%s", "\r\n"); \
}
# define RETURN_TRACE(n,u,v) \
if (DEBUG_TRACECALLREGS()) \
x86emu_dump_regs(); \
if (DEBUG_TRACECALL()) { \
DPRINTVALHEXWORD("", (unsigned long)u); \
DPRINTVALHEXWORD(":", (unsigned long)v); \
DPRINT(": CALL "); \
DPRINT(n); \
DPRINT("\r\n"); }
if (DEBUG_TRACECALL()) \
{ \
xprintf("%x", (unsigned long)u); \
xprintf(":%x", (unsigned long)v); \
xprintf(": CALL "); \
xprintf("%x", n); \
xprintf("\r\n"); \
}
#else
# define CALL_TRACE(u,v,w,x,s)
# define RETURN_TRACE(n,u,v)

8
BaS_gcc/x86emu/x86ops.c
View File

@@ -80,8 +80,10 @@ extern unsigned decode_rmXX_address(int mod, int rm);
/* constant arrays to do several instructions in just one function */
#ifdef DBG_X86EMU
static char *x86emu_GenOpName[8] = {
"ADD", "OR", "ADC", "SBB", "AND", "SUB", "XOR", "CMP"};
static char *x86emu_GenOpName[8] =
{
"ADD", "OR", "ADC", "SBB", "AND", "SUB", "XOR", "CMP"
};
#endif
/* used by several opcodes */
@@ -3241,7 +3243,7 @@ void x86emuOp_ret_near_IMM(uint8_t X86EMU_UNUSED(op1))
DECODE_PRINTF("RET\t");
imm = fetch_word_imm();
DECODE_PRINTF2("%x\r\n", imm);
RETURN_TRACE("RET",M.x86.saved_cs,M.x86.saved_ip);
RETURN_TRACE("RET", M.x86.saved_cs,M.x86.saved_ip);
TRACE_AND_STEP();
M.x86.R_IP = pop_word();
M.x86.R_SP += imm;

173
BaS_gcc/x86emu/x86sys.c
View File

@@ -49,11 +49,6 @@
#include "x86debug.h"
#include "x86prim_ops.h"
#ifndef NULL
#define NULL ((void *)0)
#endif
extern uint8_t inb(uint16_t port);
extern uint16_t inw(uint16_t port);
extern uint32_t inl(uint16_t port);
@@ -86,7 +81,7 @@ inline uint8_t X86API rdb(uint32_t addr)
if ((addr >= 0xA0000) && (addr <= 0xBFFFF))
{
val = *(uint8_t *)(offset_mem + addr);
val = *(uint8_t *) (offset_mem + addr);
dbg("%s: rdb(%x) = %x\r\n", __FUNCTION__, addr, val);
}
else
@@ -95,9 +90,9 @@ inline uint8_t X86API rdb(uint32_t addr)
{
dbg("%s: %p 1 -> %x\r\n", __FUNCTION__, addr, val);
} )
}
return val;
}
/*
* PARAMETERS:
* addr - Emulator memory address to read
@@ -108,7 +103,7 @@ inline uint8_t X86API rdb(uint32_t addr)
* REMARKS:
* Reads a word value from the emulator memory.
*/
inline uint16_t X86API rdw(uint32_t addr)
uint16_t X86API rdw(uint32_t addr)
{
uint16_t val;
@@ -124,7 +119,7 @@ inline uint16_t X86API rdw(uint32_t addr)
}
DB(if (DEBUG_MEM_TRACE())
{
dbg("%s: %p 2 -> %x\r\n", __FUNCTION__, addr, value);
dbg("%s: %p 2 -> %x\r\n", __FUNCTION__, addr, val);
} )
return val;
}
@@ -154,7 +149,7 @@ inline uint32_t X86API rdl(uint32_t addr)
DB(if (DEBUG_MEM_TRACE())
{
dbg("%s: %p 4 -> %x\r\n", __FUNCTION__, addr, value);
dbg("%s: %p 4 -> %x\r\n", __FUNCTION__, addr, val);
} )
return val;
}
@@ -176,7 +171,7 @@ inline void X86API wrb(uint32_t addr, uint8_t val)
}
else
{
if(addr >= M.mem_size)
if (addr >= M.mem_size)
{
DB(
{
@@ -204,12 +199,12 @@ inline void X86API wrw(uint32_t addr, uint16_t val)
{
if ((addr >= 0xA0000) && (addr <= 0xBFFFF))
{
dbg("%s: wrw(%x) = %x\r\n", __FUNCTION_, addr, val);
dbg("%s: wrw(%x) = %x\r\n", __FUNCTION__, addr, val);
*(uint16_t *)(offset_mem+addr) = swpw(val);
}
else
{
if(addr > M.mem_size - 2)
if (addr > M.mem_size - 2)
{
DB(
{
@@ -238,147 +233,125 @@ inline void X86API wrl(uint32_t addr, uint32_t val)
{
if ((addr >= 0xA0000) && (addr <= 0xBFFFF))
{
#ifdef DEBUG_X86EMU_PCI
DPRINTVALHEX("wrl(", addr);
DPRINTVALHEX(") = ", val);
DPRINT("\r\n");
#endif
dbg("%s: wrl(%x) = %x\r\n", __FUNCTION__, addr, val);
*(uint32_t *)(offset_mem+addr) = swpl(val);
}
else
{
if(addr > M.mem_size - 4)
if (addr > M.mem_size - 4)
{
DB( { DPRINTVALHEX("mem_ptr: address ", addr);
DPRINT(" out of range!\r\n"); } )
DB(
{
dbg("%s: mem_ptr: address %x out of range!\r\n", __FUNCTION__, addr);
}
)
HALT_SYS();
}
#if 0
if(addr < 0x200)
{
DPRINTVALHEXWORD("", M.x86.R_CS);
DPRINTVALHEXWORD(":", M.x86.R_IP);
DPRINTVALHEX(" updating int vector ", addr >> 2);
DPRINT("\r\n");
}
#endif
*(uint32_t *)(M.mem_base + addr) = swpl(val);
// *(uint32_t *)(M.mem_base + addr) = val;
}
DB(if (DEBUG_MEM_TRACE())
{
DPRINTVALHEXLONG("", addr);
DPRINTVALHEXLONG(" 4 <- ", val);
DPRINT("\r\n");
dbg("%s: %p 4 <- %x\r\n", __FUNCTION__, addr, val);
} )
}
/****************************************************************************
PARAMETERS:
addr - PIO address to read
RETURN:
0
REMARKS:
Default PIO byte read function. Doesn't perform real inb.
****************************************************************************/
static uint8_t X86API p_inb(X86EMU_pioAddr addr)
/*
* PARAMETERS:
* addr - PIO address to read
* RETURN:
* 0
* REMARKS:
* Default PIO byte read function. Doesn't perform real inb.
*/
inline uint8_t X86API p_inb(X86EMU_pioAddr addr)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXWORD("inb ", addr);
DPRINT(" \r\n");
dbg("%s: inb(%p)\r\n", __FUNCTION__);
} )
return inb(addr);
}
/****************************************************************************
PARAMETERS:
addr - PIO address to read
RETURN:
0
REMARKS:
Default PIO word read function. Doesn't perform real inw.
****************************************************************************/
static uint16_t X86API p_inw(X86EMU_pioAddr addr)
/*
* PARAMETERS:
* addr - PIO address to read
* RETURN:
* 0
* REMARKS:
* Default PIO word read function. Doesn't perform real inw.
*/
inline uint16_t X86API p_inw(X86EMU_pioAddr addr)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXWORD("inw ", addr);
DPRINT(" \r\n");
dbg("%s: inw(%p)\r\n", __FUNCTION__, addr);
} )
return inw(addr);
}
/****************************************************************************
PARAMETERS:
addr - PIO address to read
RETURN:
0
REMARKS:
Default PIO long read function. Doesn't perform real inl.
****************************************************************************/
static uint32_t X86API p_inl(X86EMU_pioAddr addr)
/*
* PARAMETERS:
* addr - PIO address to read
* RETURN:
* 0
* REMARKS:
* Default PIO long read function. Doesn't perform real inl.
*/
inline uint32_t X86API p_inl(X86EMU_pioAddr addr)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXWORD("inl ", addr);
DPRINT(" \r\n");
dbg("%s: inl %p\r\n", __FUNCTION__, addr);
} )
return inl(addr);
}
/****************************************************************************
PARAMETERS:
addr - PIO address to write
val - Value to store
REMARKS:
Default PIO byte write function. Doesn't perform real outb.
****************************************************************************/
static void X86API p_outb(X86EMU_pioAddr addr, uint8_t val)
/*
* PARAMETERS:
* addr - PIO address to write
* val - Value to store
* REMARKS:
* Default PIO byte write function. Doesn't perform real outb.
*/
inline void X86API p_outb(X86EMU_pioAddr addr, uint8_t val)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXBYTE("outb ", val);
DPRINTVALHEXWORD(" -> ", addr);
DPRINT(" \r\n");
dbg("%s: outb %x -> %x\r\n", __FUNCTION__, val, addr);
} )
outb(val, addr);
return;
}
/****************************************************************************
PARAMETERS:
addr - PIO address to write
val - Value to store
REMARKS:
Default PIO word write function. Doesn't perform real outw.
****************************************************************************/
static void X86API p_outw(X86EMU_pioAddr addr, uint16_t val)
/*
* PARAMETERS:
* addr - PIO address to write
* val - Value to store
* REMARKS:
* Default PIO word write function. Doesn't perform real outw.
*/
inline void X86API p_outw(X86EMU_pioAddr addr, uint16_t val)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXWORD("outw ", (unsigned long)val);
DPRINTVALHEXWORD(" -> ", addr);
DPRINT(" \r\n");
dbg("outw %x -> %x\r\n", __FUNCTION__, val, addr);
} )
outw(val, addr);
return;
}
/****************************************************************************
PARAMETERS:
addr - PIO address to write
val - Value to store
REMARKS:
Default PIO ;ong write function. Doesn't perform real outl.
****************************************************************************/
static void X86API p_outl(X86EMU_pioAddr addr, uint32_t val)
/*
* PARAMETERS:
* addr - PIO address to write
* val - Value to store
* REMARKS:
* Default PIO ;ong write function. Doesn't perform real outl.
*/
inline void X86API p_outl(X86EMU_pioAddr addr, uint32_t val)
{
DB(if (DEBUG_IO_TRACE())
{
DPRINTVALHEXLONG("outl ", val);
DPRINTVALHEXWORD(" -> ", addr);
DPRINT(" \r\n");
dbg("%s: outl %x -> %x\r\n", __FUNCTION__, val, addr);
} )
outl(val, addr);
return;