first debug version of ncpu
[fceu.git] / ncpu_debug.c
diff --git a/ncpu_debug.c b/ncpu_debug.c
new file mode 100644 (file)
index 0000000..864cae3
--- /dev/null
@@ -0,0 +1,156 @@
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "types.h"
+#include "x6502.h"
+#include "fce.h"
+
+// asm core state
+extern uint32 nes_registers[0x10];
+extern uint32 pc_base;
+uint32 PC_prev = 0;
+
+
+static void leave(void)
+{
+       printf("A: %02x, X: %02x, Y: %02x, S: %02x\n", X.A, X.X, X.Y, X.S);
+       printf("PC = %04lx, OP=%02X\n", PC_prev, (PC_prev < 0x2000) ? RAM[PC_prev&0x7ff] : ARead[PC_prev](PC_prev));
+       exit(1);
+}
+
+static void compare_state(void)
+{
+       uint8 nes_flags;
+
+       if ((nes_registers[0] >> 24) != X.A) {
+               printf("A: %02lx vs %02x\n", nes_registers[0] >> 24, X.A);
+               leave();
+       }
+
+       if ((nes_registers[1] & 0xff) != X.X) {
+               printf("X: %02lx vs %02x\n", nes_registers[1] & 0xff, X.X);
+               leave();
+       }
+
+       if ((nes_registers[2] & 0xff) != X.Y) {
+               printf("Y: %02lx vs %02x\n", nes_registers[2] & 0xff, X.Y);
+               leave();
+       }
+
+       if (nes_registers[3] - pc_base != X.PC) {
+               printf("PC: %04lx vs %04x\n", nes_registers[3] - pc_base, X.PC);
+               leave();
+       }
+
+       if ((nes_registers[4] >> 24) != X.S) {
+               printf("S: %02lx vs %02x\n", nes_registers[4] >> 24, X.S);
+               leave();
+       }
+
+       if (((nes_registers[4]>>8)&0xff) != X.IRQlow) {
+               printf("IRQlow: %02lx vs %02x\n", ((nes_registers[4]>>8)&0xff), X.IRQlow);
+               leave();
+       }
+
+       // NVUB DIZC
+       nes_flags = nes_registers[4] & 0x5d;
+       if (  nes_registers[5]&0x80000000)  nes_flags |= 0x80; // N
+       if (!(nes_registers[5]&0x000000ff)) nes_flags |= 0x02; // Z
+       // nes_flags |= 0x20; // U, not set in C core (set only when pushing)
+
+       if (nes_flags != X.P) {
+               printf("flags: %02x vs %02x\n", nes_flags, X.P);
+               leave();
+       }
+
+       if ((int32)nes_registers[7] != X.count) {
+               printf("cycles: %li vs %li\n", (int32)nes_registers[7], X.count);
+               leave();
+       }
+}
+
+
+void TriggerIRQ_d(void)
+{
+       printf("-- irq\n");
+       TriggerIRQ_c();
+       TriggerIRQ_a();
+       compare_state();
+}
+
+void TriggerNMI_d(void)
+{
+       printf("-- nmi\n");
+       TriggerNMI_c();
+       TriggerNMI_a();
+       compare_state();
+}
+
+void TriggerNMINSF_d(void)
+{
+}
+
+void X6502_Run_d(int32 c)
+{
+       int32 cycles = c << 4; /* *16 */ \
+       if (PAL) cycles -= c;  /* *15 */ \
+
+       printf("-- run(%i)\n", (int)c);
+
+       while (cycles > 0)
+       {
+               PC_prev = X.PC;
+               nes_registers[7]=1;
+               X.count=1;
+               X6502_Run_c();
+               X6502_Run_a();
+               compare_state();
+               cycles -= 1 - X.count;
+       }
+}
+
+void X6502_Reset_d(void)
+{
+       printf("-- reset\n");
+
+       X6502_Reset_c();
+       X6502_Reset_a();
+       compare_state();
+}
+
+void X6502_Power_d(void)
+{
+       printf("-- power\n");
+
+       X6502_Power_c();
+       X6502_Power_a();
+       compare_state();
+}
+
+void X6502_AddCycles_d(int x)
+{
+       printf("-- AddCycles(%i)\n", x);
+
+       X6502_AddCycles_c(x);
+       X6502_AddCycles_a(x);
+       //compare_state();
+}
+
+void X6502_IRQBegin_d(int w)
+{
+       printf("-- IRQBegin(%02x)\n", w);
+
+       X6502_IRQBegin_c(w);
+       X6502_IRQBegin_a(w);
+}
+
+void X6502_IRQEnd_d(int w)
+{
+       printf("-- IRQEnd(%02x)\n", w);
+
+       X6502_IRQEnd_c(w);
+       X6502_IRQEnd_a(w);
+}
+
+
+