28 |
|
#include "macos_util.h" |
29 |
|
#include "block-alloc.hpp" |
30 |
|
#include "sigsegv.h" |
31 |
– |
#include "spcflags.h" |
31 |
|
#include "cpu/ppc/ppc-cpu.hpp" |
32 |
|
#include "cpu/ppc/ppc-operations.hpp" |
33 |
|
|
43 |
|
#include "mon_disass.h" |
44 |
|
#endif |
45 |
|
|
46 |
< |
#define DEBUG 1 |
46 |
> |
#define DEBUG 0 |
47 |
|
#include "debug.h" |
48 |
|
|
49 |
|
static void enter_mon(void) |
56 |
|
} |
57 |
|
|
58 |
|
// Enable multicore (main/interrupts) cpu emulation? |
59 |
< |
#define MULTICORE_CPU 0 |
59 |
> |
#define MULTICORE_CPU (ASYNC_IRQ ? 1 : 0) |
60 |
|
|
61 |
|
// Enable Execute68k() safety checks? |
62 |
|
#define SAFE_EXEC_68K 1 |
78 |
|
* PowerPC emulator glue with special 'sheep' opcodes |
79 |
|
**/ |
80 |
|
|
82 |
– |
struct sheepshaver_exec_return { }; |
83 |
– |
|
81 |
|
class sheepshaver_cpu |
82 |
|
: public powerpc_cpu |
83 |
|
{ |
86 |
|
|
87 |
|
public: |
88 |
|
|
89 |
< |
sheepshaver_cpu() |
90 |
< |
: powerpc_cpu() |
94 |
< |
{ init_decoder(); } |
89 |
> |
// Constructor |
90 |
> |
sheepshaver_cpu(); |
91 |
|
|
92 |
|
// Condition Register accessors |
93 |
|
uint32 get_cr() const { return cr().get(); } |
94 |
|
void set_cr(uint32 v) { cr().set(v); } |
95 |
|
|
96 |
|
// Execution loop |
97 |
< |
void execute(uint32 pc); |
97 |
> |
void execute(uint32 entry, bool enable_cache = false); |
98 |
|
|
99 |
|
// Execute 68k routine |
100 |
|
void execute_68k(uint32 entry, M68kRegisters *r); |
110 |
|
|
111 |
|
// Handle MacOS interrupt |
112 |
|
void interrupt(uint32 entry); |
113 |
< |
|
118 |
< |
// spcflags for interrupts handling |
119 |
< |
static uint32 spcflags; |
113 |
> |
void handle_interrupt(); |
114 |
|
|
115 |
|
// Lazy memory allocator (one item at a time) |
116 |
|
void *operator new(size_t size) |
122 |
|
void operator delete[](void *p); |
123 |
|
}; |
124 |
|
|
131 |
– |
uint32 sheepshaver_cpu::spcflags = 0; |
125 |
|
lazy_allocator< sheepshaver_cpu > allocator_helper< sheepshaver_cpu, lazy_allocator >::allocator; |
126 |
|
|
127 |
+ |
sheepshaver_cpu::sheepshaver_cpu() |
128 |
+ |
: powerpc_cpu() |
129 |
+ |
{ |
130 |
+ |
init_decoder(); |
131 |
+ |
} |
132 |
+ |
|
133 |
|
void sheepshaver_cpu::init_decoder() |
134 |
|
{ |
135 |
|
#ifndef PPC_NO_STATIC_II_INDEX_TABLE |
141 |
|
|
142 |
|
static const instr_info_t sheep_ii_table[] = { |
143 |
|
{ "sheep", |
144 |
< |
(execute_fn)&sheepshaver_cpu::execute_sheep, |
144 |
> |
(execute_pmf)&sheepshaver_cpu::execute_sheep, |
145 |
|
NULL, |
146 |
|
D_form, 6, 0, CFLOW_JUMP | CFLOW_TRAP |
147 |
|
} |
180 |
|
case 0: // EMUL_RETURN |
181 |
|
QuitEmulator(); |
182 |
|
break; |
183 |
< |
|
183 |
> |
|
184 |
|
case 1: // EXEC_RETURN |
185 |
< |
throw sheepshaver_exec_return(); |
185 |
> |
spcflags().set(SPCFLAG_CPU_EXEC_RETURN); |
186 |
|
break; |
187 |
|
|
188 |
|
case 2: // EXEC_NATIVE |
215 |
|
} |
216 |
|
} |
217 |
|
|
219 |
– |
// Checks for pending interrupts |
220 |
– |
struct execute_nothing { |
221 |
– |
static inline void execute(powerpc_cpu *) { } |
222 |
– |
}; |
223 |
– |
|
224 |
– |
struct execute_spcflags_check { |
225 |
– |
static inline void execute(powerpc_cpu *cpu) { |
226 |
– |
#if !ASYNC_IRQ |
227 |
– |
if (SPCFLAGS_TEST(SPCFLAG_ALL_BUT_EXEC_RETURN)) { |
228 |
– |
if (SPCFLAGS_TEST( SPCFLAG_ENTER_MON )) { |
229 |
– |
SPCFLAGS_CLEAR( SPCFLAG_ENTER_MON ); |
230 |
– |
enter_mon(); |
231 |
– |
} |
232 |
– |
if (SPCFLAGS_TEST( SPCFLAG_DOINT )) { |
233 |
– |
SPCFLAGS_CLEAR( SPCFLAG_DOINT ); |
234 |
– |
HandleInterrupt(); |
235 |
– |
} |
236 |
– |
if (SPCFLAGS_TEST( SPCFLAG_INT )) { |
237 |
– |
SPCFLAGS_CLEAR( SPCFLAG_INT ); |
238 |
– |
SPCFLAGS_SET( SPCFLAG_DOINT ); |
239 |
– |
} |
240 |
– |
} |
241 |
– |
#endif |
242 |
– |
} |
243 |
– |
}; |
244 |
– |
|
218 |
|
// Execution loop |
219 |
< |
void sheepshaver_cpu::execute(uint32 entry) |
219 |
> |
void sheepshaver_cpu::execute(uint32 entry, bool enable_cache) |
220 |
|
{ |
221 |
< |
try { |
249 |
< |
pc() = entry; |
250 |
< |
powerpc_cpu::do_execute<execute_nothing, execute_spcflags_check>(); |
251 |
< |
} |
252 |
< |
catch (sheepshaver_exec_return const &) { |
253 |
< |
// Nothing, simply return |
254 |
< |
} |
255 |
< |
catch (...) { |
256 |
< |
printf("ERROR: execute() received an unknown exception!\n"); |
257 |
< |
QuitEmulator(); |
258 |
< |
} |
221 |
> |
powerpc_cpu::execute(entry, enable_cache); |
222 |
|
} |
223 |
|
|
224 |
|
// Handle MacOS interrupt |
257 |
|
gpr(8) = 0; |
258 |
|
gpr(10) = (uint32)trampoline; |
259 |
|
gpr(12) = (uint32)trampoline; |
260 |
< |
gpr(13) = cr().get(); |
260 |
> |
gpr(13) = get_cr(); |
261 |
|
|
262 |
|
// rlwimi. r7,r7,8,0,0 |
263 |
|
uint32 result = op_ppc_rlwimi::apply(gpr(7), 8, 0x80000000, gpr(7)); |
265 |
|
gpr(7) = result; |
266 |
|
|
267 |
|
gpr(11) = 0xf072; // MSR (SRR1) |
268 |
< |
cr().set((gpr(11) & 0x0fff0000) | (cr().get() & ~0x0fff0000)); |
268 |
> |
cr().set((gpr(11) & 0x0fff0000) | (get_cr() & ~0x0fff0000)); |
269 |
|
|
270 |
|
// Enter nanokernel |
271 |
|
execute(entry); |
291 |
|
uint32 saved_pc = pc(); |
292 |
|
uint32 saved_lr = lr(); |
293 |
|
uint32 saved_ctr= ctr(); |
294 |
+ |
uint32 saved_cr = get_cr(); |
295 |
|
|
296 |
|
// Create MacOS stack frame |
297 |
|
// FIXME: make sure MacOS doesn't expect PPC registers to live on top |
363 |
|
pc() = saved_pc; |
364 |
|
lr() = saved_lr; |
365 |
|
ctr()= saved_ctr; |
366 |
+ |
set_cr(saved_cr); |
367 |
|
} |
368 |
|
|
369 |
|
// Call MacOS PPC code |
559 |
|
void emul_ppc(uint32 entry) |
560 |
|
{ |
561 |
|
current_cpu = main_cpu; |
562 |
+ |
#if DEBUG |
563 |
|
current_cpu->start_log(); |
564 |
< |
current_cpu->execute(entry); |
564 |
> |
#endif |
565 |
> |
// start emulation loop and enable code translation or caching |
566 |
> |
current_cpu->execute(entry, true); |
567 |
|
} |
568 |
|
|
569 |
|
/* |
570 |
|
* Handle PowerPC interrupt |
571 |
|
*/ |
572 |
|
|
573 |
< |
// Atomic operations |
574 |
< |
extern int atomic_add(int *var, int v); |
575 |
< |
extern int atomic_and(int *var, int v); |
576 |
< |
extern int atomic_or(int *var, int v); |
577 |
< |
|
578 |
< |
#if !ASYNC_IRQ |
573 |
> |
#if ASYNC_IRQ |
574 |
> |
void HandleInterrupt(void) |
575 |
> |
{ |
576 |
> |
main_cpu->handle_interrupt(); |
577 |
> |
} |
578 |
> |
#else |
579 |
|
void TriggerInterrupt(void) |
580 |
|
{ |
581 |
|
#if 0 |
582 |
|
WriteMacInt32(0x16a, ReadMacInt32(0x16a) + 1); |
583 |
|
#else |
584 |
< |
SPCFLAGS_SET( SPCFLAG_INT ); |
584 |
> |
// Trigger interrupt to main cpu only |
585 |
> |
if (main_cpu) |
586 |
> |
main_cpu->trigger_interrupt(); |
587 |
|
#endif |
588 |
|
} |
589 |
|
#endif |
590 |
|
|
591 |
< |
void HandleInterrupt(void) |
591 |
> |
void sheepshaver_cpu::handle_interrupt(void) |
592 |
|
{ |
593 |
|
// Do nothing if interrupts are disabled |
594 |
|
if (int32(ReadMacInt32(XLM_IRQ_NEST)) > 0) |
607 |
|
// 68k emulator active, trigger 68k interrupt level 1 |
608 |
|
assert(current_cpu == main_cpu); |
609 |
|
WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); |
610 |
< |
main_cpu->set_cr(main_cpu->get_cr() | tswap32(kernel_data->v[0x674 >> 2])); |
610 |
> |
set_cr(get_cr() | tswap32(kernel_data->v[0x674 >> 2])); |
611 |
|
break; |
612 |
|
|
613 |
|
#if INTERRUPTS_IN_NATIVE_MODE |
614 |
|
case MODE_NATIVE: |
615 |
|
// 68k emulator inactive, in nanokernel? |
616 |
|
assert(current_cpu == main_cpu); |
617 |
< |
if (main_cpu->gpr(1) != KernelDataAddr) { |
617 |
> |
if (gpr(1) != KernelDataAddr) { |
618 |
|
// Prepare for 68k interrupt level 1 |
619 |
|
WriteMacInt16(tswap32(kernel_data->v[0x67c >> 2]), 1); |
620 |
|
WriteMacInt32(tswap32(kernel_data->v[0x658 >> 2]) + 0xdc, |
870 |
|
} |
871 |
|
|
872 |
|
/* |
903 |
– |
* Atomic operations |
904 |
– |
*/ |
905 |
– |
|
906 |
– |
int atomic_add(int *var, int v) |
907 |
– |
{ |
908 |
– |
int ret = *var; |
909 |
– |
*var += v; |
910 |
– |
return ret; |
911 |
– |
} |
912 |
– |
|
913 |
– |
int atomic_and(int *var, int v) |
914 |
– |
{ |
915 |
– |
int ret = *var; |
916 |
– |
*var &= v; |
917 |
– |
return ret; |
918 |
– |
} |
919 |
– |
|
920 |
– |
int atomic_or(int *var, int v) |
921 |
– |
{ |
922 |
– |
int ret = *var; |
923 |
– |
*var |= v; |
924 |
– |
return ret; |
925 |
– |
} |
926 |
– |
|
927 |
– |
/* |
873 |
|
* Resource Manager thunks |
874 |
|
*/ |
875 |
|
|