psxinterpreter: yet more exceptions, new config option
[pcsx_rearmed.git] / libpcsxcore / r3000a.c
1 /***************************************************************************
2  *   Copyright (C) 2007 Ryan Schultz, PCSX-df Team, PCSX team              *
3  *                                                                         *
4  *   This program is free software; you can redistribute it and/or modify  *
5  *   it under the terms of the GNU General Public License as published by  *
6  *   the Free Software Foundation; either version 2 of the License, or     *
7  *   (at your option) any later version.                                   *
8  *                                                                         *
9  *   This program is distributed in the hope that it will be useful,       *
10  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
11  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
12  *   GNU General Public License for more details.                          *
13  *                                                                         *
14  *   You should have received a copy of the GNU General Public License     *
15  *   along with this program; if not, write to the                         *
16  *   Free Software Foundation, Inc.,                                       *
17  *   51 Franklin Street, Fifth Floor, Boston, MA 02111-1307 USA.           *
18  ***************************************************************************/
19
20 /*
21 * R3000A CPU functions.
22 */
23
24 #include "r3000a.h"
25 #include "cdrom.h"
26 #include "mdec.h"
27 #include "gte.h"
28 #include "psxinterpreter.h"
29 #include "../include/compiler_features.h"
30
31 R3000Acpu *psxCpu = NULL;
32 #ifdef DRC_DISABLE
33 psxRegisters psxRegs;
34 #endif
35
36 int psxInit() {
37         SysPrintf(_("Running PCSX Version %s (%s).\n"), PCSX_VERSION, __DATE__);
38
39 #ifndef DRC_DISABLE
40         if (Config.Cpu == CPU_INTERPRETER) {
41                 psxCpu = &psxInt;
42         } else psxCpu = &psxRec;
43 #else
44         Config.Cpu = CPU_INTERPRETER;
45         psxCpu = &psxInt;
46 #endif
47
48         Log = 0;
49
50         if (psxMemInit() == -1) return -1;
51
52         return psxCpu->Init();
53 }
54
55 void psxReset() {
56         psxMemReset();
57
58         memset(&psxRegs, 0, sizeof(psxRegs));
59
60         psxRegs.pc = 0xbfc00000; // Start in bootstrap
61
62         psxRegs.CP0.n.SR   = 0x10600000; // COP0 enabled | BEV = 1 | TS = 1
63         psxRegs.CP0.n.PRid = 0x00000002; // PRevID = Revision ID, same as R3000A
64         if (Config.HLE)
65                 psxRegs.CP0.n.SR |= 1u << 30; // COP2 enabled
66
67         psxCpu->ApplyConfig();
68         psxCpu->Reset();
69
70         psxHwReset();
71         psxBiosInit();
72
73         BiosLikeGPUSetup(); // a bit of a hack but whatever
74
75         if (!Config.HLE) {
76                 psxExecuteBios();
77                 if (psxRegs.pc == 0x80030000 && !Config.SlowBoot)
78                         BiosBootBypass();
79         }
80
81 #ifdef EMU_LOG
82         EMU_LOG("*BIOS END*\n");
83 #endif
84         Log = 0;
85 }
86
87 void psxShutdown() {
88         psxBiosShutdown();
89
90         psxCpu->Shutdown();
91
92         psxMemShutdown();
93 }
94
95 // cp0 is passed separately for lightrec to be less messy
96 void psxException(u32 cause, enum R3000Abdt bdt, psxCP0Regs *cp0) {
97         u32 opcode = intFakeFetch(psxRegs.pc);
98         
99         if (unlikely(!Config.HLE && ((((opcode) >> 24) & 0xfe) == 0x4a))) {
100                 // "hokuto no ken" / "Crash Bandicot 2" ...
101                 // BIOS does not allow to return to GTE instructions
102                 // (just skips it, supposedly because it's scheduled already)
103                 // so we execute it here
104                 psxCP2Regs *cp2 = (psxCP2Regs *)(cp0 + 1);
105                 psxRegs.code = opcode;
106                 psxCP2[opcode & 0x3f](cp2);
107         }
108
109         // Set the Cause
110         cp0->n.Cause = (bdt << 30) | (cp0->n.Cause & 0x300) | cause;
111
112         // Set the EPC & PC
113         cp0->n.EPC = bdt ? psxRegs.pc - 4 : psxRegs.pc;
114
115         if (cp0->n.SR & 0x400000)
116                 psxRegs.pc = 0xbfc00180;
117         else
118                 psxRegs.pc = 0x80000080;
119
120         // Set the SR
121         cp0->n.SR = (cp0->n.SR & ~0x3f) | ((cp0->n.SR & 0x0f) << 2);
122
123         if (Config.HLE) psxBiosException();
124 }
125
126 void psxBranchTest() {
127         if ((psxRegs.cycle - psxNextsCounter) >= psxNextCounter)
128                 psxRcntUpdate();
129
130         if (psxRegs.interrupt) {
131                 if ((psxRegs.interrupt & (1 << PSXINT_SIO))) { // sio
132                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_SIO].sCycle) >= psxRegs.intCycle[PSXINT_SIO].cycle) {
133                                 psxRegs.interrupt &= ~(1 << PSXINT_SIO);
134                                 sioInterrupt();
135                         }
136                 }
137                 if (psxRegs.interrupt & (1 << PSXINT_CDR)) { // cdr
138                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_CDR].sCycle) >= psxRegs.intCycle[PSXINT_CDR].cycle) {
139                                 psxRegs.interrupt &= ~(1 << PSXINT_CDR);
140                                 cdrInterrupt();
141                         }
142                 }
143                 if (psxRegs.interrupt & (1 << PSXINT_CDREAD)) { // cdr read
144                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_CDREAD].sCycle) >= psxRegs.intCycle[PSXINT_CDREAD].cycle) {
145                                 psxRegs.interrupt &= ~(1 << PSXINT_CDREAD);
146                                 cdrPlayReadInterrupt();
147                         }
148                 }
149                 if (psxRegs.interrupt & (1 << PSXINT_GPUDMA)) { // gpu dma
150                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_GPUDMA].sCycle) >= psxRegs.intCycle[PSXINT_GPUDMA].cycle) {
151                                 psxRegs.interrupt &= ~(1 << PSXINT_GPUDMA);
152                                 gpuInterrupt();
153                         }
154                 }
155                 if (psxRegs.interrupt & (1 << PSXINT_MDECOUTDMA)) { // mdec out dma
156                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_MDECOUTDMA].sCycle) >= psxRegs.intCycle[PSXINT_MDECOUTDMA].cycle) {
157                                 psxRegs.interrupt &= ~(1 << PSXINT_MDECOUTDMA);
158                                 mdec1Interrupt();
159                         }
160                 }
161                 if (psxRegs.interrupt & (1 << PSXINT_SPUDMA)) { // spu dma
162                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_SPUDMA].sCycle) >= psxRegs.intCycle[PSXINT_SPUDMA].cycle) {
163                                 psxRegs.interrupt &= ~(1 << PSXINT_SPUDMA);
164                                 spuInterrupt();
165                         }
166                 }
167                 if (psxRegs.interrupt & (1 << PSXINT_MDECINDMA)) { // mdec in
168                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_MDECINDMA].sCycle) >= psxRegs.intCycle[PSXINT_MDECINDMA].cycle) {
169                                 psxRegs.interrupt &= ~(1 << PSXINT_MDECINDMA);
170                                 mdec0Interrupt();
171                         }
172                 }
173                 if (psxRegs.interrupt & (1 << PSXINT_GPUOTCDMA)) { // gpu otc
174                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_GPUOTCDMA].sCycle) >= psxRegs.intCycle[PSXINT_GPUOTCDMA].cycle) {
175                                 psxRegs.interrupt &= ~(1 << PSXINT_GPUOTCDMA);
176                                 gpuotcInterrupt();
177                         }
178                 }
179                 if (psxRegs.interrupt & (1 << PSXINT_CDRDMA)) { // cdrom
180                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_CDRDMA].sCycle) >= psxRegs.intCycle[PSXINT_CDRDMA].cycle) {
181                                 psxRegs.interrupt &= ~(1 << PSXINT_CDRDMA);
182                                 cdrDmaInterrupt();
183                         }
184                 }
185                 if (psxRegs.interrupt & (1 << PSXINT_CDRLID)) { // cdr lid states
186                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_CDRLID].sCycle) >= psxRegs.intCycle[PSXINT_CDRLID].cycle) {
187                                 psxRegs.interrupt &= ~(1 << PSXINT_CDRLID);
188                                 cdrLidSeekInterrupt();
189                         }
190                 }
191                 if (psxRegs.interrupt & (1 << PSXINT_SPU_UPDATE)) { // scheduled spu update
192                         if ((psxRegs.cycle - psxRegs.intCycle[PSXINT_SPU_UPDATE].sCycle) >= psxRegs.intCycle[PSXINT_SPU_UPDATE].cycle) {
193                                 psxRegs.interrupt &= ~(1 << PSXINT_SPU_UPDATE);
194                                 spuUpdate();
195                         }
196                 }
197         }
198
199         if (psxHu32(0x1070) & psxHu32(0x1074)) {
200                 if ((psxRegs.CP0.n.SR & 0x401) == 0x401) {
201 #ifdef PSXCPU_LOG
202                         PSXCPU_LOG("Interrupt: %x %x\n", psxHu32(0x1070), psxHu32(0x1074));
203 #endif
204 //                      SysPrintf("Interrupt (%x): %x %x\n", psxRegs.cycle, psxHu32(0x1070), psxHu32(0x1074));
205                         psxException(0x400, 0, &psxRegs.CP0);
206                 }
207         }
208 }
209
210 void psxJumpTest() {
211         if (!Config.HLE && Config.PsxOut) {
212                 u32 call = psxRegs.GPR.n.t1 & 0xff;
213                 switch (psxRegs.pc & 0x1fffff) {
214                         case 0xa0:
215 #ifdef PSXBIOS_LOG
216                                 if (call != 0x28 && call != 0xe) {
217                                         PSXBIOS_LOG("Bios call a0: %s (%x) %x,%x,%x,%x\n", biosA0n[call], call, psxRegs.GPR.n.a0, psxRegs.GPR.n.a1, psxRegs.GPR.n.a2, psxRegs.GPR.n.a3); }
218 #endif
219                                 if (biosA0[call])
220                                         biosA0[call]();
221                                 break;
222                         case 0xb0:
223 #ifdef PSXBIOS_LOG
224                                 if (call != 0x17 && call != 0xb) {
225                                         PSXBIOS_LOG("Bios call b0: %s (%x) %x,%x,%x,%x\n", biosB0n[call], call, psxRegs.GPR.n.a0, psxRegs.GPR.n.a1, psxRegs.GPR.n.a2, psxRegs.GPR.n.a3); }
226 #endif
227                                 if (biosB0[call])
228                                         biosB0[call]();
229                                 break;
230                         case 0xc0:
231 #ifdef PSXBIOS_LOG
232                                 PSXBIOS_LOG("Bios call c0: %s (%x) %x,%x,%x,%x\n", biosC0n[call], call, psxRegs.GPR.n.a0, psxRegs.GPR.n.a1, psxRegs.GPR.n.a2, psxRegs.GPR.n.a3);
233 #endif
234                                 if (biosC0[call])
235                                         biosC0[call]();
236                                 break;
237                 }
238         }
239 }
240
241 void psxExecuteBios() {
242         int i;
243         for (i = 0; i < 5000000; i++) {
244                 psxCpu->ExecuteBlock(EXEC_CALLER_BOOT);
245                 if ((psxRegs.pc & 0xff800000) == 0x80000000)
246                         break;
247         }
248         if (psxRegs.pc != 0x80030000)
249                 SysPrintf("non-standard BIOS detected (%d, %08x)\n", i, psxRegs.pc);
250 }
251