mirror of
https://github.com/RetroPortingToolKit/psxrecomp
synced 2026-10-28 02:56:36 -04:00
Matthew Stanley
167babab9f
Keep upstream atomic v9 restore and handoff serialization. Add scoped snapshot deferral for host adapters, reset abandoned scopes at scheduler escapes, and rebind enabled mod hooks before restored execution. The backport parent preserves the tested Tomba v0.15 savestate/cache lineage. Focused host-snapshot, restored-handoff, and mod-runtime tests pass.
38 lines
1.7 KiB
C
38 lines
1.7 KiB
C
#include "interrupts.c"
|
|
|
|
int psx_mod_function_entry_active(void) { return 0; }
|
|
int g_cosim_dirty_pump_site;
|
|
int g_call_unit_depth;
|
|
int g_psx_dispatch_depth;
|
|
uint32_t g_dirty_safe_resume_pc;
|
|
|
|
static void check(int ok, const char* message) {
|
|
if (!ok) { fprintf(stderr, "FAIL: %s\n", message); exit(1); }
|
|
}
|
|
|
|
int main(void) {
|
|
uint32_t pc = 0x80025070u;
|
|
check(psx_irq_resume_context_snapshot_safe_at(pc), "native boundary admitted");
|
|
psx_snapshot_host_call_begin();
|
|
psx_snapshot_host_call_begin();
|
|
check(!psx_irq_resume_context_snapshot_safe_at(pc), "nested host adapter deferred");
|
|
psx_snapshot_host_call_end();
|
|
check(!psx_irq_resume_context_snapshot_safe_at(pc), "outer adapter still active");
|
|
psx_snapshot_host_call_end();
|
|
check(psx_irq_resume_context_snapshot_safe_at(pc), "register restore admits snapshot");
|
|
g_cosim_dirty_pump_site = 1;
|
|
g_dirty_safe_resume_pc = pc;
|
|
check(psx_irq_resume_context_snapshot_safe_at(pc), "retired interpreter boundary admitted");
|
|
psx_snapshot_host_call_begin();
|
|
check(!psx_irq_resume_context_snapshot_safe_at(pc), "interpreter adapter deferred");
|
|
psx_snapshot_host_call_reset(); /* scheduler longjmp abandoned the adapter */
|
|
check(psx_irq_resume_context_snapshot_safe_at(pc), "scheduler escape releases abandoned scope");
|
|
psx_snapshot_host_call_end(); /* no underflow */
|
|
check(psx_irq_resume_context_snapshot_safe_at(pc), "unmatched end stays safe");
|
|
check(!psx_irq_resume_context_snapshot_safe_at(pc + 4), "existing resume-PC guard retained");
|
|
g_call_unit_depth = 1;
|
|
check(!psx_irq_resume_context_snapshot_safe_at(pc), "existing call-unit guard retained");
|
|
puts("host snapshot continuation checks passed");
|
|
return 0;
|
|
}
|