ebb32fa2cd44e9869ab5181b16df4e1a6d01239f
[fceu.git] / ncpu_debug.c
1 #include <stdio.h>
2 #include <stdlib.h>
3
4 #include "types.h"
5 #include "x6502.h"
6 #include "fce.h"
7
8 // asm core state
9 extern uint32 nes_registers[0x10];
10 extern uint32 pc_base;
11 uint32 PC_prev = 0, g_cnt = 0;
12
13 int cpu_repeat;
14 int cpu_lastval;
15
16 static void leave(void)
17 {
18         printf("\nA: %02x, X: %02x, Y: %02x, S: %02x\n", X.A, X.X, X.Y, X.S);
19         printf("PC = %04lx, OP=%02X\n", PC_prev, (PC_prev < 0x2000) ? RAM[PC_prev&0x7ff] : ARead[PC_prev](PC_prev));
20         exit(1);
21 }
22
23 static void compare_state(void)
24 {
25         uint8 nes_flags;
26         int fail = 0;
27
28         if ((nes_registers[0] >> 24) != X.A) {
29                 printf("A: %02lx vs %02x\n", nes_registers[0] >> 24, X.A);
30                 fail = 1;
31         }
32
33         if ((nes_registers[1] & 0xff) != X.X) {
34                 printf("X: %02lx vs %02x\n", nes_registers[1] & 0xff, X.X);
35                 fail = 1;
36         }
37
38         if ((nes_registers[2] & 0xff) != X.Y) {
39                 printf("Y: %02lx vs %02x\n", nes_registers[2] & 0xff, X.Y);
40                 fail = 1;
41         }
42
43         if (nes_registers[3] - pc_base != X.PC) {
44                 printf("PC: %04lx vs %04x\n", nes_registers[3] - pc_base, X.PC);
45                 fail = 1;
46         }
47
48         if ((nes_registers[4] >> 24) != X.S) {
49                 printf("S: %02lx vs %02x\n", nes_registers[4] >> 24, X.S);
50                 fail = 1;
51         }
52
53         if (((nes_registers[4]>>8)&0xff) != X.IRQlow) {
54                 printf("IRQlow: %02lx vs %02x\n", ((nes_registers[4]>>8)&0xff), X.IRQlow);
55                 fail = 1;
56         }
57
58         // NVUB DIZC
59         nes_flags = nes_registers[4] & 0x5d;
60         if (  nes_registers[5]&0x80000000)  nes_flags |= 0x80; // N
61         if (!(nes_registers[5]&0x000000ff)) nes_flags |= 0x02; // Z
62         // nes_flags |= 0x20; // U, not set in C core (set only when pushing)
63
64         if (nes_flags != (X.P&~0x20)) {
65                 printf("flags: %02x vs %02x\n", nes_flags, (X.P&~0x20));
66                 fail = 1;
67         }
68
69         if ((int32)nes_registers[7] != X.count) {
70                 printf("cycles: %li vs %li\n", (int32)nes_registers[7], X.count);
71                 fail = 1;
72         }
73
74         if (fail) leave();
75 }
76
77
78 void TriggerIRQ_d(void)
79 {
80         printf("-- irq\n");
81         TriggerIRQ_c();
82         TriggerIRQ_a();
83         compare_state();
84 }
85
86 void TriggerNMI_d(void)
87 {
88         printf("-- nmi\n");
89         TriggerNMI_c();
90         TriggerNMI_a();
91         compare_state();
92 }
93
94 void TriggerNMINSF_d(void)
95 {
96 }
97
98 void X6502_Run_d(int32 c)
99 {
100         int32 cycles = c << 4; /* *16 */ \
101         if (PAL) cycles -= c;  /* *15 */ \
102
103         //printf("-- %06i: run(%i)\n", (int)g_cnt, (int)c);
104         g_cnt += c;
105
106         while (cycles > 0)
107         {
108                 PC_prev = X.PC;
109                 nes_registers[7]=1;
110                 X.count=1;
111
112                 cpu_repeat = 0;
113                 X6502_Run_c();
114
115                 cpu_repeat = 1;
116                 X6502_Run_a();
117
118                 compare_state();
119                 cycles -= 1 - X.count;
120         }
121
122         //printf("-- run_end\n");
123 }
124
125 void X6502_Reset_d(void)
126 {
127         printf("-- reset\n");
128
129         X6502_Reset_c();
130         X6502_Reset_a();
131         compare_state();
132 }
133
134 void X6502_Power_d(void)
135 {
136         printf("-- power\n");
137
138         X6502_Power_c();
139         X6502_Power_a();
140         compare_state();
141 }
142
143 void X6502_AddCycles_d(int x)
144 {
145         printf("-- AddCycles(%i|%i)\n", x, x*48);
146
147         printf("can't use this in debug\n");
148         exit(1);
149         //X6502_AddCycles_c(x);
150         //X6502_AddCycles_a(x);
151         //compare_state();
152 }
153
154 void X6502_IRQBegin_d(int w)
155 {
156         printf("-- IRQBegin(%02x)\n", w);
157
158         X6502_IRQBegin_c(w);
159         X6502_IRQBegin_a(w);
160 }
161
162 void X6502_IRQEnd_d(int w)
163 {
164         printf("-- IRQEnd(%02x)\n", w);
165
166         X6502_IRQEnd_c(w);
167         X6502_IRQEnd_a(w);
168 }
169
170
171