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 |
89 |
|
|
90 |
|
// From rsrc_patches.cpp |
91 |
|
extern "C" void check_load_invoc(uint32 type, int16 id, uint32 h); |
92 |
+ |
extern "C" void named_check_load_invoc(uint32 type, uint32 name, uint32 h); |
93 |
|
|
94 |
|
// PowerPC EmulOp to exit from emulation looop |
95 |
|
const uint32 POWERPC_EXEC_RETURN = POWERPC_EMUL_OP | 1; |
118 |
|
static uint8 *native_op_trampoline; |
119 |
|
#endif |
120 |
|
|
120 |
– |
// JIT Compiler enabled? |
121 |
– |
static inline bool enable_jit_p() |
122 |
– |
{ |
123 |
– |
return PrefsFindBool("jit"); |
124 |
– |
} |
125 |
– |
|
121 |
|
|
122 |
|
/** |
123 |
|
* PowerPC emulator glue with special 'sheep' opcodes |
171 |
|
void interrupt(uint32 entry); |
172 |
|
|
173 |
|
// Make sure the SIGSEGV handler can access CPU registers |
174 |
< |
friend sigsegv_return_t sigsegv_handler(sigsegv_address_t, sigsegv_address_t); |
174 |
> |
friend sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip); |
175 |
|
}; |
176 |
|
|
177 |
|
sheepshaver_cpu::sheepshaver_cpu() |
183 |
– |
: powerpc_cpu(enable_jit_p()) |
178 |
|
{ |
179 |
|
init_decoder(); |
180 |
+ |
|
181 |
+ |
#if PPC_ENABLE_JIT |
182 |
+ |
if (PrefsFindBool("jit")) |
183 |
+ |
enable_jit(); |
184 |
+ |
#endif |
185 |
|
} |
186 |
|
|
187 |
|
void sheepshaver_cpu::init_decoder() |
189 |
|
static const instr_info_t sheep_ii_table[] = { |
190 |
|
{ "sheep", |
191 |
|
(execute_pmf)&sheepshaver_cpu::execute_sheep, |
193 |
– |
NULL, |
192 |
|
PPC_I(SHEEP), |
193 |
|
D_form, 6, 0, CFLOW_JUMP | CFLOW_TRAP |
194 |
|
} |
333 |
|
status = COMPILE_CODE_OK; |
334 |
|
break; |
335 |
|
} |
336 |
+ |
#endif |
337 |
|
case NATIVE_CHECK_LOAD_INVOC: |
338 |
|
dg.gen_load_T0_GPR(3); |
339 |
|
dg.gen_load_T1_GPR(4); |
342 |
|
dg.gen_invoke_T0_T1_T2((void (*)(uint32, uint32, uint32))check_load_invoc); |
343 |
|
status = COMPILE_CODE_OK; |
344 |
|
break; |
345 |
< |
#endif |
346 |
< |
case NATIVE_BITBLT: |
345 |
> |
case NATIVE_NAMED_CHECK_LOAD_INVOC: |
346 |
> |
dg.gen_load_T0_GPR(3); |
347 |
> |
dg.gen_load_T1_GPR(4); |
348 |
> |
dg.gen_load_T2_GPR(5); |
349 |
> |
dg.gen_invoke_T0_T1_T2((void (*)(uint32, uint32, uint32))named_check_load_invoc); |
350 |
> |
status = COMPILE_CODE_OK; |
351 |
> |
break; |
352 |
> |
case NATIVE_NQD_SYNC_HOOK: |
353 |
> |
dg.gen_load_T0_GPR(3); |
354 |
> |
dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_sync_hook); |
355 |
> |
dg.gen_store_T0_GPR(3); |
356 |
> |
status = COMPILE_CODE_OK; |
357 |
> |
break; |
358 |
> |
case NATIVE_NQD_BITBLT_HOOK: |
359 |
> |
dg.gen_load_T0_GPR(3); |
360 |
> |
dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_bitblt_hook); |
361 |
> |
dg.gen_store_T0_GPR(3); |
362 |
> |
status = COMPILE_CODE_OK; |
363 |
> |
break; |
364 |
> |
case NATIVE_NQD_FILLRECT_HOOK: |
365 |
> |
dg.gen_load_T0_GPR(3); |
366 |
> |
dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_fillrect_hook); |
367 |
> |
dg.gen_store_T0_GPR(3); |
368 |
> |
status = COMPILE_CODE_OK; |
369 |
> |
break; |
370 |
> |
case NATIVE_NQD_UNKNOWN_HOOK: |
371 |
> |
dg.gen_load_T0_GPR(3); |
372 |
> |
dg.gen_invoke_T0_ret_T0((uint32 (*)(uint32))NQD_unknown_hook); |
373 |
> |
dg.gen_store_T0_GPR(3); |
374 |
> |
status = COMPILE_CODE_OK; |
375 |
> |
break; |
376 |
> |
case NATIVE_NQD_BITBLT: |
377 |
|
dg.gen_load_T0_GPR(3); |
378 |
|
dg.gen_invoke_T0((void (*)(uint32))NQD_bitblt); |
379 |
|
status = COMPILE_CODE_OK; |
380 |
|
break; |
381 |
< |
case NATIVE_INVRECT: |
381 |
> |
case NATIVE_NQD_INVRECT: |
382 |
|
dg.gen_load_T0_GPR(3); |
383 |
|
dg.gen_invoke_T0((void (*)(uint32))NQD_invrect); |
384 |
|
status = COMPILE_CODE_OK; |
385 |
|
break; |
386 |
< |
case NATIVE_FILLRECT: |
386 |
> |
case NATIVE_NQD_FILLRECT: |
387 |
|
dg.gen_load_T0_GPR(3); |
388 |
|
dg.gen_invoke_T0((void (*)(uint32))NQD_fillrect); |
389 |
|
status = COMPILE_CODE_OK; |
394 |
|
if (!FN_field::test(opcode)) |
395 |
|
cg_context.done_compile = false; |
396 |
|
else { |
397 |
< |
dg.gen_load_A0_LR(); |
398 |
< |
dg.gen_set_PC_A0(); |
397 |
> |
dg.gen_load_T0_LR_aligned(); |
398 |
> |
dg.gen_set_PC_T0(); |
399 |
|
cg_context.done_compile = true; |
400 |
|
} |
401 |
|
break; |
405 |
|
if (!FN_field::test(opcode)) |
406 |
|
dg.gen_set_PC_im(cg_context.pc + 4); |
407 |
|
else { |
408 |
< |
dg.gen_load_A0_LR(); |
409 |
< |
dg.gen_set_PC_A0(); |
408 |
> |
dg.gen_load_T0_LR_aligned(); |
409 |
> |
dg.gen_set_PC_T0(); |
410 |
|
} |
411 |
|
dg.gen_mov_32_T0_im(selector); |
412 |
|
dg.gen_jmp(native_op_trampoline); |
730 |
|
* Initialize CPU emulation |
731 |
|
*/ |
732 |
|
|
733 |
< |
sigsegv_return_t sigsegv_handler(sigsegv_address_t fault_address, sigsegv_address_t fault_instruction) |
733 |
> |
sigsegv_return_t sigsegv_handler(sigsegv_info_t *sip) |
734 |
|
{ |
735 |
|
#if ENABLE_VOSF |
736 |
|
// Handle screen fault |
737 |
< |
extern bool Screen_fault_handler(sigsegv_address_t, sigsegv_address_t); |
738 |
< |
if (Screen_fault_handler(fault_address, fault_instruction)) |
737 |
> |
extern bool Screen_fault_handler(sigsegv_info_t *sip); |
738 |
> |
if (Screen_fault_handler(sip)) |
739 |
|
return SIGSEGV_RETURN_SUCCESS; |
740 |
|
#endif |
741 |
|
|
742 |
< |
const uintptr addr = (uintptr)fault_address; |
742 |
> |
const uintptr addr = (uintptr)sigsegv_get_fault_address(sip); |
743 |
|
#if HAVE_SIGSEGV_SKIP_INSTRUCTION |
744 |
|
// Ignore writes to ROM |
745 |
|
if ((addr - (uintptr)ROMBaseHost) < ROM_SIZE) |
750 |
|
const uint32 pc = cpu->pc(); |
751 |
|
|
752 |
|
// Fault in Mac ROM or RAM? |
753 |
< |
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)); |
753 |
> |
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)); |
754 |
|
if (mac_fault) { |
755 |
|
|
756 |
|
// "VM settings" during MacOS 8 installation |
757 |
< |
if (pc == ROM_BASE + 0x488160 && cpu->gpr(20) == 0xf8000000) |
757 |
> |
if (pc == ROMBase + 0x488160 && cpu->gpr(20) == 0xf8000000) |
758 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
759 |
|
|
760 |
|
// MacOS 8.5 installation |
761 |
< |
else if (pc == ROM_BASE + 0x488140 && cpu->gpr(16) == 0xf8000000) |
761 |
> |
else if (pc == ROMBase + 0x488140 && cpu->gpr(16) == 0xf8000000) |
762 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
763 |
|
|
764 |
|
// MacOS 8 serial drivers on startup |
765 |
< |
else if (pc == ROM_BASE + 0x48e080 && (cpu->gpr(8) == 0xf3012002 || cpu->gpr(8) == 0xf3012000)) |
765 |
> |
else if (pc == ROMBase + 0x48e080 && (cpu->gpr(8) == 0xf3012002 || cpu->gpr(8) == 0xf3012000)) |
766 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
767 |
|
|
768 |
|
// MacOS 8.1 serial drivers on startup |
769 |
< |
else if (pc == ROM_BASE + 0x48c5e0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
769 |
> |
else if (pc == ROMBase + 0x48c5e0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
770 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
771 |
< |
else if (pc == ROM_BASE + 0x4a10a0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
771 |
> |
else if (pc == ROMBase + 0x4a10a0 && (cpu->gpr(20) == 0xf3012002 || cpu->gpr(20) == 0xf3012000)) |
772 |
|
return SIGSEGV_RETURN_SKIP_INSTRUCTION; |
773 |
|
|
774 |
|
// MacOS 8.6 serial drivers on startup (with DR Cache and OldWorld ROM) |
790 |
|
#endif |
791 |
|
|
792 |
|
fprintf(stderr, "SIGSEGV\n"); |
793 |
< |
fprintf(stderr, " pc %p\n", fault_instruction); |
794 |
< |
fprintf(stderr, " ea %p\n", fault_address); |
793 |
> |
fprintf(stderr, " pc %p\n", sigsegv_get_fault_instruction_address(sip)); |
794 |
> |
fprintf(stderr, " ea %p\n", sigsegv_get_fault_address(sip)); |
795 |
|
dump_registers(); |
796 |
|
ppc_cpu->dump_log(); |
797 |
|
enter_mon(); |
807 |
|
|
808 |
|
// Initialize main CPU emulator |
809 |
|
ppc_cpu = new sheepshaver_cpu(); |
810 |
< |
ppc_cpu->set_register(powerpc_registers::GPR(3), any_register((uint32)ROM_BASE + 0x30d000)); |
810 |
> |
ppc_cpu->set_register(powerpc_registers::GPR(3), any_register((uint32)ROMBase + 0x30d000)); |
811 |
|
ppc_cpu->set_register(powerpc_registers::GPR(4), any_register(KernelDataAddr + 0x1000)); |
812 |
|
WriteMacInt32(XLM_RUN_MODE, MODE_68K); |
813 |
|
|
951 |
|
// Execute nanokernel interrupt routine (this will activate the 68k emulator) |
952 |
|
DisableInterrupt(); |
953 |
|
if (ROMType == ROMTYPE_NEWWORLD) |
954 |
< |
ppc_cpu->interrupt(ROM_BASE + 0x312b1c); |
954 |
> |
ppc_cpu->interrupt(ROMBase + 0x312b1c); |
955 |
|
else |
956 |
< |
ppc_cpu->interrupt(ROM_BASE + 0x312a3c); |
956 |
> |
ppc_cpu->interrupt(ROMBase + 0x312a3c); |
957 |
|
} |
958 |
|
break; |
959 |
|
#endif |
1000 |
|
} |
1001 |
|
} |
1002 |
|
|
974 |
– |
static void get_resource(void); |
975 |
– |
static void get_1_resource(void); |
976 |
– |
static void get_ind_resource(void); |
977 |
– |
static void get_1_ind_resource(void); |
978 |
– |
static void r_get_resource(void); |
979 |
– |
|
1003 |
|
// Execute NATIVE_OP routine |
1004 |
|
void sheepshaver_cpu::execute_native_op(uint32 selector) |
1005 |
|
{ |
1054 |
|
case NATIVE_ETHER_RSRV: |
1055 |
|
gpr(3) = ether_rsrv((queue_t *)gpr(3)); |
1056 |
|
break; |
1057 |
< |
case NATIVE_SYNC_HOOK: |
1057 |
> |
case NATIVE_NQD_SYNC_HOOK: |
1058 |
|
gpr(3) = NQD_sync_hook(gpr(3)); |
1059 |
|
break; |
1060 |
< |
case NATIVE_BITBLT_HOOK: |
1060 |
> |
case NATIVE_NQD_UNKNOWN_HOOK: |
1061 |
> |
gpr(3) = NQD_unknown_hook(gpr(3)); |
1062 |
> |
break; |
1063 |
> |
case NATIVE_NQD_BITBLT_HOOK: |
1064 |
|
gpr(3) = NQD_bitblt_hook(gpr(3)); |
1065 |
|
break; |
1066 |
< |
case NATIVE_BITBLT: |
1066 |
> |
case NATIVE_NQD_BITBLT: |
1067 |
|
NQD_bitblt(gpr(3)); |
1068 |
|
break; |
1069 |
< |
case NATIVE_FILLRECT_HOOK: |
1069 |
> |
case NATIVE_NQD_FILLRECT_HOOK: |
1070 |
|
gpr(3) = NQD_fillrect_hook(gpr(3)); |
1071 |
|
break; |
1072 |
< |
case NATIVE_INVRECT: |
1072 |
> |
case NATIVE_NQD_INVRECT: |
1073 |
|
NQD_invrect(gpr(3)); |
1074 |
|
break; |
1075 |
< |
case NATIVE_FILLRECT: |
1075 |
> |
case NATIVE_NQD_FILLRECT: |
1076 |
|
NQD_fillrect(gpr(3)); |
1077 |
|
break; |
1078 |
|
case NATIVE_SERIAL_NOTHING: |
1096 |
|
break; |
1097 |
|
} |
1098 |
|
case NATIVE_GET_RESOURCE: |
1099 |
+ |
get_resource(ReadMacInt32(XLM_GET_RESOURCE)); |
1100 |
+ |
break; |
1101 |
|
case NATIVE_GET_1_RESOURCE: |
1102 |
+ |
get_resource(ReadMacInt32(XLM_GET_1_RESOURCE)); |
1103 |
+ |
break; |
1104 |
|
case NATIVE_GET_IND_RESOURCE: |
1105 |
+ |
get_resource(ReadMacInt32(XLM_GET_IND_RESOURCE)); |
1106 |
+ |
break; |
1107 |
|
case NATIVE_GET_1_IND_RESOURCE: |
1108 |
< |
case NATIVE_R_GET_RESOURCE: { |
1109 |
< |
typedef void (*GetResourceCallback)(void); |
1110 |
< |
static const GetResourceCallback get_resource_callbacks[] = { |
1111 |
< |
::get_resource, |
1080 |
< |
::get_1_resource, |
1081 |
< |
::get_ind_resource, |
1082 |
< |
::get_1_ind_resource, |
1083 |
< |
::r_get_resource |
1084 |
< |
}; |
1085 |
< |
get_resource_callbacks[selector - NATIVE_GET_RESOURCE](); |
1108 |
> |
get_resource(ReadMacInt32(XLM_GET_1_IND_RESOURCE)); |
1109 |
> |
break; |
1110 |
> |
case NATIVE_R_GET_RESOURCE: |
1111 |
> |
get_resource(ReadMacInt32(XLM_R_GET_RESOURCE)); |
1112 |
|
break; |
1087 |
– |
} |
1113 |
|
case NATIVE_MAKE_EXECUTABLE: |
1114 |
|
MakeExecutable(0, gpr(4), gpr(5)); |
1115 |
|
break; |
1116 |
|
case NATIVE_CHECK_LOAD_INVOC: |
1117 |
|
check_load_invoc(gpr(3), gpr(4), gpr(5)); |
1118 |
|
break; |
1119 |
+ |
case NATIVE_NAMED_CHECK_LOAD_INVOC: |
1120 |
+ |
named_check_load_invoc(gpr(3), gpr(4), gpr(5)); |
1121 |
+ |
break; |
1122 |
|
default: |
1123 |
|
printf("FATAL: NATIVE_OP called with bogus selector %d\n", selector); |
1124 |
|
QuitEmulator(); |
1205 |
|
const uint32 args[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7 }; |
1206 |
|
return ppc_cpu->execute_macos_code(tvect, sizeof(args)/sizeof(args[0]), args); |
1207 |
|
} |
1180 |
– |
|
1181 |
– |
/* |
1182 |
– |
* Resource Manager thunks |
1183 |
– |
*/ |
1184 |
– |
|
1185 |
– |
void get_resource(void) |
1186 |
– |
{ |
1187 |
– |
ppc_cpu->get_resource(ReadMacInt32(XLM_GET_RESOURCE)); |
1188 |
– |
} |
1189 |
– |
|
1190 |
– |
void get_1_resource(void) |
1191 |
– |
{ |
1192 |
– |
ppc_cpu->get_resource(ReadMacInt32(XLM_GET_1_RESOURCE)); |
1193 |
– |
} |
1194 |
– |
|
1195 |
– |
void get_ind_resource(void) |
1196 |
– |
{ |
1197 |
– |
ppc_cpu->get_resource(ReadMacInt32(XLM_GET_IND_RESOURCE)); |
1198 |
– |
} |
1199 |
– |
|
1200 |
– |
void get_1_ind_resource(void) |
1201 |
– |
{ |
1202 |
– |
ppc_cpu->get_resource(ReadMacInt32(XLM_GET_1_IND_RESOURCE)); |
1203 |
– |
} |
1204 |
– |
|
1205 |
– |
void r_get_resource(void) |
1206 |
– |
{ |
1207 |
– |
ppc_cpu->get_resource(ReadMacInt32(XLM_R_GET_RESOURCE)); |
1208 |
– |
} |