| 1 |
|
/* |
| 2 |
|
* sheepshaver_glue.cpp - Glue Kheperix CPU to SheepShaver CPU engine interface |
| 3 |
|
* |
| 4 |
< |
* SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig |
| 4 |
> |
* SheepShaver (C) 1997-2008 Christian Bauer and Marc Hellwig |
| 5 |
|
* |
| 6 |
|
* This program is free software; you can redistribute it and/or modify |
| 7 |
|
* it under the terms of the GNU General Public License as published by |
| 58 |
|
#define DEBUG 0 |
| 59 |
|
#include "debug.h" |
| 60 |
|
|
| 61 |
+ |
extern "C" { |
| 62 |
+ |
#include "dis-asm.h" |
| 63 |
+ |
} |
| 64 |
+ |
|
| 65 |
|
// Emulation time statistics |
| 66 |
|
#ifndef EMUL_TIME_STATS |
| 67 |
|
#define EMUL_TIME_STATS 0 |
| 730 |
|
ppc_cpu->dump_log(); |
| 731 |
|
} |
| 732 |
|
|
| 733 |
< |
/* |
| 734 |
< |
* Initialize CPU emulation |
| 735 |
< |
*/ |
| 733 |
> |
static int read_mem(bfd_vma memaddr, bfd_byte *myaddr, int length, struct disassemble_info *info) |
| 734 |
> |
{ |
| 735 |
> |
Mac2Host_memcpy(myaddr, memaddr, length); |
| 736 |
> |
return 0; |
| 737 |
> |
} |
| 738 |
> |
|
| 739 |
> |
static void dump_disassembly(const uint32 pc, const int prefix_count, const int suffix_count) |
| 740 |
> |
{ |
| 741 |
> |
struct disassemble_info info; |
| 742 |
> |
INIT_DISASSEMBLE_INFO(info, stderr, fprintf); |
| 743 |
> |
info.read_memory_func = read_mem; |
| 744 |
> |
|
| 745 |
> |
const int count = prefix_count + suffix_count + 1; |
| 746 |
> |
const uint32 base_addr = pc - prefix_count * 4; |
| 747 |
> |
for (int i = 0; i < count; i++) { |
| 748 |
> |
const bfd_vma addr = base_addr + i * 4; |
| 749 |
> |
fprintf(stderr, "%s0x%8llx: ", addr == pc ? " >" : " ", addr); |
| 750 |
> |
print_insn_ppc(addr, &info); |
| 751 |
> |
fprintf(stderr, "\n"); |
| 752 |
> |
} |
| 753 |
> |
} |
| 754 |
|
|
| 755 |
|
sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) |
| 756 |
|
{ |
| 772 |
|
const uint32 pc = cpu->pc(); |
| 773 |
|
|
| 774 |
|
// Fault in Mac ROM or RAM? |
| 775 |
< |
bool mac_fault = (pc >= ROM_BASE) && (pc < (ROM_BASE + ROM_AREA_SIZE)) || (pc >= RAMBase) && (pc < (RAMBase + RAMSize)) || (pc >= DR_CACHE_BASE && pc < (DR_CACHE_BASE + DR_CACHE_SIZE)); |
| 775 |
> |
bool mac_fault = (pc >= ROMBase) && (pc < (ROMBase + ROM_AREA_SIZE)) || (pc >= RAMBase) && (pc < (RAMBase + RAMSize)) || (pc >= DR_CACHE_BASE && pc < (DR_CACHE_BASE + DR_CACHE_SIZE)); |
| 776 |
|
if (mac_fault) { |
| 777 |
|
|
| 778 |
|
// "VM settings" during MacOS 8 installation |
| 779 |
< |
if (pc == ROM_BASE + 0x488160 && cpu->gpr(20) == 0xf8000000) |
| 779 |
> |
if (pc == ROMBase + 0x488160 && cpu->gpr(20) == 0xf8000000) |
| 780 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
| 781 |
|
|
| 782 |
|
// MacOS 8.5 installation |
| 783 |
< |
else if (pc == ROM_BASE + 0x488140 && cpu->gpr(16) == 0xf8000000) |
| 783 |
> |
else if (pc == ROMBase + 0x488140 && cpu->gpr(16) == 0xf8000000) |
| 784 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
| 785 |
|
|
| 786 |
|
// MacOS 8 serial drivers on startup |
| 787 |
< |
else if (pc == ROM_BASE + 0x48e080 && (cpu->gpr(8) == 0xf3012002 || cpu->gpr(8) == 0xf3012000)) |
| 787 |
> |
else if (pc == ROMBase + 0x48e080 && (cpu->gpr(8) == 0xf3012002 || cpu->gpr(8) == 0xf3012000)) |
| 788 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
| 789 |
|
|
| 790 |
|
// MacOS 8.1 serial drivers on startup |
| 791 |
< |
else if (pc == ROM_BASE + 0x48c5e0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
| 791 |
> |
else if (pc == ROMBase + 0x48c5e0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
| 792 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
| 793 |
< |
else if (pc == ROM_BASE + 0x4a10a0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
| 793 |
> |
else if (pc == ROMBase + 0x4a10a0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
| 794 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
| 795 |
|
|
| 796 |
|
// MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM) |
| 816 |
|
fprintf(stderr, " ea %p\n", sigsegv_get_fault_address(sip)); |
| 817 |
|
dump_registers(); |
| 818 |
|
ppc_cpu->dump_log(); |
| 819 |
+ |
dump_disassembly(pc, 8, 8); |
| 820 |
+ |
|
| 821 |
|
enter_mon(); |
| 822 |
|
QuitEmulator(); |
| 823 |
|
|
| 824 |
|
return SIGSEGV_RETURN_FAILURE; |
| 825 |
|
} |
| 826 |
|
|
| 827 |
+ |
/* |
| 828 |
+ |
* Initialize CPU emulation |
| 829 |
+ |
*/ |
| 830 |
+ |
|
| 831 |
|
void init_emul_ppc(void) |
| 832 |
|
{ |
| 833 |
|
// Get pointer to KernelData in host address space |
| 835 |
|
|
| 836 |
|
// Initialize main CPU emulator |
| 837 |
|
ppc_cpu = new sheepshaver_cpu(); |
| 838 |
< |
ppc_cpu->set_register(powerpc_registers::GPR(3), any_register((uint32)ROM_BASE + 0x30d000)); |
| 838 |
> |
ppc_cpu->set_register(powerpc_registers::GPR(3), any_register((uint32)ROMBase + 0x30d000)); |
| 839 |
|
ppc_cpu->set_register(powerpc_registers::GPR(4), any_register(KernelDataAddr + 0x1000)); |
| 840 |
|
WriteMacInt32(XLM_RUN_MODE, MODE_68K); |
| 841 |
|
|
| 979 |
|
// Execute nanokernel interrupt routine (this will activate the 68k emulator) |
| 980 |
|
DisableInterrupt(); |
| 981 |
|
if (ROMType == ROMTYPE_NEWWORLD) |
| 982 |
< |
ppc_cpu->interrupt(ROM_BASE + 0x312b1c); |
| 982 |
> |
ppc_cpu->interrupt(ROMBase + 0x312b1c); |
| 983 |
|
else |
| 984 |
< |
ppc_cpu->interrupt(ROM_BASE + 0x312a3c); |
| 984 |
> |
ppc_cpu->interrupt(ROMBase + 0x312a3c); |
| 985 |
|
} |
| 986 |
|
break; |
| 987 |
|
#endif |
