improved memhandlers
[pcsx_rearmed.git] / libpcsxcore / new_dynarec / emu_if.c
index d0b991e..7f7d8f8 100644 (file)
-// cycles after syscall/hle?
+/*
+ * (C) GraÅžvydas "notaz" Ignotas, 2010
+ *
+ * This work is licensed under the terms of GNU GPL version 2 or later.
+ * See the COPYING file in the top-level directory.
+ */
+
 // pending_exception?
+// swi 0 in do_unalignedwritestub?
 #include <stdio.h>
 
 #include "emu_if.h"
-#include "../psxmem.h"
+#include "pcsxmem.h"
 #include "../psxhle.h"
 
-//#define memprintf printf
-#define memprintf(...)
+#define ARRAY_SIZE(x) (sizeof(x) / sizeof(x[0]))
+
 //#define evprintf printf
 #define evprintf(...)
 
-//#define DRC_DBG
-
 char invalid_code[0x100000];
+u32 event_cycles[7];
 
-void MTC0_()
+static void schedule_timeslice(void)
 {
-       extern void psxMTC0();
+       u32 i, c = psxRegs.cycle;
+       s32 min, dif;
+
+       min = psxNextsCounter + psxNextCounter - c;
+       for (i = 0; i < ARRAY_SIZE(event_cycles); i++) {
+               dif = event_cycles[i] - c;
+               //evprintf("  ev %d\n", dif);
+               if (0 < dif && dif < min)
+                       min = dif;
+       }
+       next_interupt = c + min;
 
-       printf("ari64 MTC0 %08x\n", psxRegs.code);
-       psxMTC0();
-       pending_exception = 1; /* FIXME? */
+#if 0
+       static u32 cnt, last_cycle;
+       static u64 sum;
+       if (last_cycle) {
+               cnt++;
+               sum += psxRegs.cycle - last_cycle;
+               if ((cnt & 0xff) == 0)
+                       printf("%u\n", (u32)(sum / cnt));
+       }
+       last_cycle = psxRegs.cycle;
+#endif
 }
 
 void gen_interupt()
 {
-       evprintf("ari64_gen_interupt\n");
-       evprintf("  +ge %08x, %d->%d\n", psxRegs.pc, Count, next_interupt);
+       evprintf("  +ge %08x, %u->%u\n", psxRegs.pc, psxRegs.cycle, next_interupt);
 #ifdef DRC_DBG
        psxRegs.cycle += 2;
-#else
-       psxRegs.cycle = Count; // stupid
 #endif
 
        psxBranchTest();
 
-       if (psxRegs.cycle != Count) {
-               printf("psxRegs.cycle != Count: %d != %d\n", psxRegs.cycle, Count);
-               Count = psxRegs.cycle;
-       }
+       schedule_timeslice();
 
-       next_interupt = Count + psxNextCounter;
-       evprintf("  -ge %08x, %d->%d\n", psxRegs.pc, Count, next_interupt);
+       evprintf("  -ge %08x, %u->%u (%d)\n", psxRegs.pc, psxRegs.cycle,
+               next_interupt, next_interupt - psxRegs.cycle);
 
        pending_exception = 1; /* FIXME */
 }
 
-void check_interupt()
-{
-       printf("ari64_check_interupt\n");
-}
-
-void read_nomem_new()
-{
-       printf("ari64_read_nomem_new\n");
-}
-
-static void read_mem8()
-{
-       memprintf("ari64_read_mem8  %08x, PC~=%08x\n", address, psxRegs.pc);
-       readmem_word = psxMemRead8(address) & 0xff;
-}
-
-static void read_mem16()
-{
-       memprintf("ari64_read_mem16 %08x, PC~=%08x\n", address, psxRegs.pc);
-       readmem_word = psxMemRead16(address) & 0xffff;
-}
-
-static void read_mem32()
-{
-       memprintf("ari64_read_mem32 %08x, PC~=%08x\n", address, psxRegs.pc);
-       readmem_word = psxMemRead32(address);
-}
-
-static void write_mem8()
+void MTC0_()
 {
-       memprintf("ari64_write_mem8  %08x,       %02x, PC~=%08x\n", address, byte, psxRegs.pc);
-       psxMemWrite8(address, byte);
-}
+       extern void psxMTC0();
 
-static void write_mem16()
-{
-       memprintf("ari64_write_mem16 %08x,     %04x, PC~=%08x\n", address, hword, psxRegs.pc);
-       psxMemWrite16(address, hword);
+       evprintf("ari64 MTC0 %08x %08x %u\n", psxRegs.code, psxRegs.pc, psxRegs.cycle);
+       psxMTC0();
+       gen_interupt(); /* FIXME: checking pending irqs should be enough */
 }
 
-static void write_mem32()
+void check_interupt()
 {
-       memprintf("ari64_write_mem32 %08x, %08x, PC~=%08x\n", address, word, psxRegs.pc);
-       psxMemWrite32(address, word);
+       printf("ari64_check_interupt\n");
 }
 
-void (*readmem[0x10000])();
-void (*readmemb[0x10000])();
-void (*readmemh[0x10000])();
-void (*writemem[0x10000])();
-void (*writememb[0x10000])();
-void (*writememh[0x10000])();
+void *gte_handlers[64];
 
+/* from gte.txt.. not sure if this is any good. */
+const char gte_cycletab[64] = {
+       /*   1   2   3   4   5   6   7   8   9   a   b   c   d   e   f */
+        0, 15,  0,  0,  0,  0,  8,  0,  0,  0,  0,  0,  6,  0,  0,  0,
+        8,  8,  8, 19, 13,  0, 44,  0,  0,  0,  0, 17, 11,  0, 14,  0,
+       30,  0,  0,  0,  0,  0,  0,  0,  5,  8, 17,  0,  0,  5,  6,  0,
+       23,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  5,  5, 39,
+};
 
 static int ari64_init()
 {
+       extern void (*psxCP2[64])();
+       extern void psxNULL();
+       extern void *psxH_ptr;
        size_t i;
+
        new_dynarec_init();
+       new_dyna_pcsx_mem_init();
 
-       for (i = 0; i < sizeof(readmem) / sizeof(readmem[0]); i++) {
-               readmemb[i] = read_mem8;
-               readmemh[i] = read_mem16;
-               readmem[i] = read_mem32;
-               writememb[i] = write_mem8;
-               writememh[i] = write_mem16;
-               writemem[i] = write_mem32;
-       }
+       for (i = 0; i < ARRAY_SIZE(gte_handlers); i++)
+               if (psxCP2[i] != psxNULL)
+                       gte_handlers[i] = psxCP2[i];
+
+       psxH_ptr = psxH;
 
-       psxHLEt_addr = (void *)psxHLEt;
+       return 0;
 }
 
 static void ari64_reset()
 {
-       /* hmh */
        printf("ari64_reset\n");
+       new_dyna_pcsx_mem_reset();
+       invalidate_all_pages();
+       pending_exception = 1;
 }
 
 static void ari64_execute()
 {
-       /* TODO: get rid of this cycle counter copying */
-       Count = psxRegs.cycle;
-       next_interupt = Count + psxNextCounter;
+       schedule_timeslice();
 
-       evprintf("psxNextsCounter %d, psxNextCounter %d\n", psxNextsCounter, psxNextCounter);
-       evprintf("ari64_execute %08x, %d->%d\n", psxRegs.pc, Count, next_interupt);
-       new_dyna_start(psxRegs.pc);
-       evprintf("ari64_execute end %08x, %d->%d\n", psxRegs.pc, Count, next_interupt);
+       evprintf("ari64_execute %08x, %u->%u (%d)\n", psxRegs.pc,
+               psxRegs.cycle, next_interupt, next_interupt - psxRegs.cycle);
 
-#ifndef DRC_DBG
-       psxRegs.cycle = Count;
-#endif
+       new_dyna_start();
+
+       evprintf("ari64_execute end %08x, %u->%u (%d)\n", psxRegs.pc,
+               psxRegs.cycle, next_interupt, next_interupt - psxRegs.cycle);
 }
 
-static void ari64_clear(u32 Addr, u32 Size)
+static void ari64_clear(u32 addr, u32 size)
 {
+       u32 start, end;
+
+       evprintf("ari64_clear %08x %04x\n", addr, size);
+
+       /* check for RAM mirrors */
+       if ((addr & ~0xe0600000) < 0x200000) {
+               addr &= ~0xe0600000;
+               addr |=  0x80000000;
+       }
+
+       start = addr >> 12;
+       end = (addr + size) >> 12;
+
+       for (; start <= end; start++)
+               if (!invalid_code[start])
+                       invalidate_block(start);
 }
 
 static void ari64_shutdown()
@@ -182,12 +188,16 @@ void do_insn_cmp() {}
 unsigned int address, readmem_word, word;
 unsigned short hword;
 unsigned char byte;
-int pending_exception;
+int pending_exception, stop;
 unsigned int next_interupt;
-void *psxHLEt_addr;
+void *psxH_ptr;
 void new_dynarec_init() {}
-int  new_dyna_start() {}
+void new_dyna_start() {}
 void new_dynarec_cleanup() {}
+void invalidate_all_pages() {}
+void invalidate_block(unsigned int block) {}
+void new_dyna_pcsx_mem_init(void) {}
+void new_dyna_pcsx_mem_reset(void) {}
 #endif
 
 #ifdef DRC_DBG
@@ -199,6 +209,8 @@ extern u32 last_io_addr;
 static void dump_mem(const char *fname, void *mem, size_t size)
 {
        FILE *f1 = fopen(fname, "wb");
+       if (f1 == NULL)
+               f1 = fopen(strrchr(fname, '/') + 1, "wb");
        fwrite(mem, 1, size, f1);
        fclose(f1);
 }
@@ -276,6 +288,25 @@ static const char *regnames[offsetof(psxRegisters, intCycle) / 4] = {
        "PC", "code", "cycle", "interrupt",
 };
 
+static struct {
+       int reg;
+       u32 val, val_expect;
+       u32 pc, cycle;
+} miss_log[64];
+static int miss_log_i;
+#define miss_log_len (sizeof(miss_log)/sizeof(miss_log[0]))
+#define miss_log_mask (miss_log_len-1)
+
+static void miss_log_add(int reg, u32 val, u32 val_expect, u32 pc, u32 cycle)
+{
+       miss_log[miss_log_i].reg = reg;
+       miss_log[miss_log_i].val = val;
+       miss_log[miss_log_i].val_expect = val_expect;
+       miss_log[miss_log_i].pc = pc;
+       miss_log[miss_log_i].cycle = cycle;
+       miss_log_i = (miss_log_i + 1) & miss_log_mask;
+}
+
 void breakme() {}
 
 void do_insn_cmp(void)
@@ -335,8 +366,7 @@ psxRegs.CP0.r[9] = rregs.CP0.r[9]; // Count
 
        for (i = 0; i < offsetof(psxRegisters, intCycle) / 4; i++) {
                if (allregs_p[i] != allregs_e[i]) {
-                       printf("bad %5s: %08x %08x, pc=%08x, cycle %u\n",
-                               regnames[i], allregs_p[i], allregs_e[i], psxRegs.pc, psxRegs.cycle);
+                       miss_log_add(i, allregs_p[i], allregs_e[i], psxRegs.pc, psxRegs.cycle);
                        bad++;
                }
        }
@@ -347,12 +377,24 @@ psxRegs.CP0.r[9] = rregs.CP0.r[9]; // Count
        }
 
        if (psxRegs.pc == rregs.pc && bad < 6 && failcount < 32) {
-               printf("-- %d\n", bad);
+               static int last_mcycle;
+               if (last_mcycle != psxRegs.cycle >> 20) {
+                       printf("%u\n", psxRegs.cycle);
+                       last_mcycle = psxRegs.cycle >> 20;
+               }
                failcount++;
                goto ok;
        }
 
 end:
+       for (i = 0; i < miss_log_len; i++, miss_log_i = (miss_log_i + 1) & miss_log_mask)
+               printf("bad %5s: %08x %08x, pc=%08x, cycle %u\n",
+                       regnames[miss_log[miss_log_i].reg], miss_log[miss_log_i].val,
+                       miss_log[miss_log_i].val_expect, miss_log[miss_log_i].pc, miss_log[miss_log_i].cycle);
+       printf("-- %d\n", bad);
+       for (i = 0; i < 8; i++)
+               printf("r%d=%08x r%2d=%08x r%2d=%08x r%2d=%08x\n", i, allregs_p[i],
+                       i+8, allregs_p[i+8], i+16, allregs_p[i+16], i+24, allregs_p[i+24]);
        printf("PC: %08x/%08x, cycle %u\n", psxRegs.pc, ppc, psxRegs.cycle);
        dump_mem("/mnt/ntz/dev/pnd/tmp/psxram.dump", psxM, 0x200000);
        dump_mem("/mnt/ntz/dev/pnd/tmp/psxregs.dump", psxH, 0x10000);