src/gba/gba.c (view raw)
1/* Copyright (c) 2013-2015 Jeffrey Pfau
2 *
3 * This Source Code Form is subject to the terms of the Mozilla Public
4 * License, v. 2.0. If a copy of the MPL was not distributed with this
5 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
6#include <mgba/internal/gba/gba.h>
7
8#include <mgba/internal/arm/isa-inlines.h>
9#include <mgba/internal/arm/debugger/debugger.h>
10#include <mgba/internal/arm/decoder.h>
11
12#include <mgba/internal/gba/bios.h>
13#include <mgba/internal/gba/cheats.h>
14#include <mgba/internal/gba/io.h>
15#include <mgba/internal/gba/overrides.h>
16#include <mgba/internal/gba/rr/rr.h>
17
18#include <mgba-util/patch.h>
19#include <mgba-util/crc32.h>
20#include <mgba-util/math.h>
21#include <mgba-util/memory.h>
22#include <mgba-util/vfs.h>
23
24#ifdef USE_ELF
25#include <mgba-util/elf-read.h>
26#endif
27
28#define GBA_IRQ_DELAY 7
29
30mLOG_DEFINE_CATEGORY(GBA, "GBA", "gba");
31mLOG_DEFINE_CATEGORY(GBA_DEBUG, "GBA Debug", "gba.debug");
32
33const uint32_t GBA_COMPONENT_MAGIC = 0x1000000;
34
35static const size_t GBA_ROM_MAGIC_OFFSET = 3;
36static const uint8_t GBA_ROM_MAGIC[] = { 0xEA };
37
38static const size_t GBA_ROM_MAGIC_OFFSET2 = 0xB2;
39static const uint8_t GBA_ROM_MAGIC2[] = { 0x96 };
40
41static const size_t GBA_MB_MAGIC_OFFSET = 0xC0;
42
43static void GBAInit(void* cpu, struct mCPUComponent* component);
44static void GBAInterruptHandlerInit(struct ARMInterruptHandler* irqh);
45static void GBAProcessEvents(struct ARMCore* cpu);
46static void GBAHitStub(struct ARMCore* cpu, uint32_t opcode);
47static void GBAIllegal(struct ARMCore* cpu, uint32_t opcode);
48static void GBABreakpoint(struct ARMCore* cpu, int immediate);
49static void GBATestIRQNoDelay(struct ARMCore* cpu);
50
51static void _triggerIRQ(struct mTiming*, void* user, uint32_t cyclesLate);
52
53#ifdef USE_DEBUGGERS
54static bool _setSoftwareBreakpoint(struct ARMDebugger*, uint32_t address, enum ExecutionMode mode, uint32_t* opcode);
55static bool _clearSoftwareBreakpoint(struct ARMDebugger*, uint32_t address, enum ExecutionMode mode, uint32_t opcode);
56#endif
57
58#ifdef FIXED_ROM_BUFFER
59extern uint32_t* romBuffer;
60extern size_t romBufferSize;
61#endif
62
63void GBACreate(struct GBA* gba) {
64 gba->d.id = GBA_COMPONENT_MAGIC;
65 gba->d.init = GBAInit;
66 gba->d.deinit = 0;
67}
68
69static void GBAInit(void* cpu, struct mCPUComponent* component) {
70 struct GBA* gba = (struct GBA*) component;
71 gba->cpu = cpu;
72 gba->debugger = 0;
73 gba->sync = 0;
74
75 GBAInterruptHandlerInit(&gba->cpu->irqh);
76 GBAMemoryInit(gba);
77
78 gba->memory.savedata.timing = &gba->timing;
79 GBASavedataInit(&gba->memory.savedata, NULL);
80
81 gba->video.p = gba;
82 GBAVideoInit(&gba->video);
83
84 gba->audio.p = gba;
85 GBAAudioInit(&gba->audio, GBA_AUDIO_SAMPLES);
86
87 GBAIOInit(gba);
88
89 gba->sio.p = gba;
90 GBASIOInit(&gba->sio);
91
92 GBAHardwareInit(&gba->memory.hw, NULL);
93
94 gba->keySource = 0;
95 gba->rotationSource = 0;
96 gba->luminanceSource = 0;
97 gba->rtcSource = 0;
98 gba->rumble = 0;
99 gba->rr = 0;
100
101 gba->romVf = 0;
102 gba->biosVf = 0;
103
104 gba->stream = NULL;
105 gba->keyCallback = NULL;
106 mCoreCallbacksListInit(&gba->coreCallbacks, 0);
107
108 gba->biosChecksum = GBAChecksum(gba->memory.bios, SIZE_BIOS);
109
110 gba->idleOptimization = IDLE_LOOP_REMOVE;
111 gba->idleLoop = IDLE_LOOP_NONE;
112
113 gba->hardCrash = true;
114 gba->allowOpposingDirections = true;
115
116 gba->performingDMA = false;
117
118 gba->isPristine = false;
119 gba->pristineRomSize = 0;
120 gba->yankedRomSize = 0;
121
122 mTimingInit(&gba->timing, &gba->cpu->cycles, &gba->cpu->nextEvent);
123
124 gba->irqEvent.name = "GBA IRQ Event";
125 gba->irqEvent.callback = _triggerIRQ;
126 gba->irqEvent.context = gba;
127 gba->irqEvent.priority = 0;
128}
129
130void GBAUnloadROM(struct GBA* gba) {
131 if (gba->memory.rom && !gba->isPristine) {
132 if (gba->yankedRomSize) {
133 gba->yankedRomSize = 0;
134 }
135 mappedMemoryFree(gba->memory.rom, SIZE_CART0);
136 }
137
138 if (gba->romVf) {
139#ifndef FIXED_ROM_BUFFER
140 if (gba->isPristine) {
141 gba->romVf->unmap(gba->romVf, gba->memory.rom, gba->pristineRomSize);
142 }
143#endif
144 gba->romVf->close(gba->romVf);
145 gba->romVf = NULL;
146 }
147 gba->memory.rom = NULL;
148 gba->isPristine = false;
149
150 gba->memory.savedata.maskWriteback = false;
151 GBASavedataUnmask(&gba->memory.savedata);
152 GBASavedataDeinit(&gba->memory.savedata);
153 if (gba->memory.savedata.realVf) {
154 gba->memory.savedata.realVf->close(gba->memory.savedata.realVf);
155 gba->memory.savedata.realVf = 0;
156 }
157 gba->idleLoop = IDLE_LOOP_NONE;
158}
159
160void GBADestroy(struct GBA* gba) {
161 GBAUnloadROM(gba);
162
163 if (gba->biosVf) {
164 gba->biosVf->unmap(gba->biosVf, gba->memory.bios, SIZE_BIOS);
165 gba->biosVf->close(gba->biosVf);
166 gba->biosVf = 0;
167 }
168
169 GBAMemoryDeinit(gba);
170 GBAVideoDeinit(&gba->video);
171 GBAAudioDeinit(&gba->audio);
172 GBASIODeinit(&gba->sio);
173 gba->rr = 0;
174 mTimingDeinit(&gba->timing);
175 mCoreCallbacksListDeinit(&gba->coreCallbacks);
176}
177
178void GBAInterruptHandlerInit(struct ARMInterruptHandler* irqh) {
179 irqh->reset = GBAReset;
180 irqh->processEvents = GBAProcessEvents;
181 irqh->swi16 = GBASwi16;
182 irqh->swi32 = GBASwi32;
183 irqh->hitIllegal = GBAIllegal;
184 irqh->readCPSR = GBATestIRQNoDelay;
185 irqh->hitStub = GBAHitStub;
186 irqh->bkpt16 = GBABreakpoint;
187 irqh->bkpt32 = GBABreakpoint;
188}
189
190void GBAReset(struct ARMCore* cpu) {
191 ARMSetPrivilegeMode(cpu, MODE_IRQ);
192 cpu->gprs[ARM_SP] = SP_BASE_IRQ;
193 ARMSetPrivilegeMode(cpu, MODE_SUPERVISOR);
194 cpu->gprs[ARM_SP] = SP_BASE_SUPERVISOR;
195 ARMSetPrivilegeMode(cpu, MODE_SYSTEM);
196 cpu->gprs[ARM_SP] = SP_BASE_SYSTEM;
197
198 struct GBA* gba = (struct GBA*) cpu->master;
199 if (!gba->rr || (!gba->rr->isPlaying(gba->rr) && !gba->rr->isRecording(gba->rr))) {
200 gba->memory.savedata.maskWriteback = false;
201 GBASavedataUnmask(&gba->memory.savedata);
202 }
203
204 gba->cpuBlocked = false;
205 gba->earlyExit = false;
206 if (gba->yankedRomSize) {
207 gba->memory.romSize = gba->yankedRomSize;
208 gba->memory.romMask = toPow2(gba->memory.romSize) - 1;
209 gba->yankedRomSize = 0;
210 }
211 mTimingClear(&gba->timing);
212 GBAMemoryReset(gba);
213 GBAVideoReset(&gba->video);
214 GBAAudioReset(&gba->audio);
215 GBAIOInit(gba);
216 GBATimerInit(gba);
217
218 GBASIOReset(&gba->sio);
219
220 bool isELF = false;
221#ifdef USE_ELF
222 struct ELF* elf = ELFOpen(gba->romVf);
223 if (elf) {
224 isELF = true;
225 ELFClose(elf);
226 }
227#endif
228
229 if (GBAIsMB(gba->romVf) && !isELF) {
230 gba->romVf->seek(gba->romVf, 0, SEEK_SET);
231 gba->romVf->read(gba->romVf, gba->memory.wram, gba->pristineRomSize);
232 }
233
234 gba->lastJump = 0;
235 gba->haltPending = false;
236 gba->idleDetectionStep = 0;
237 gba->idleDetectionFailures = 0;
238
239 gba->debug = false;
240 memset(gba->debugString, 0, sizeof(gba->debugString));
241 if (gba->pristineRomSize > SIZE_CART0) {
242 GBAMatrixReset(gba);
243 }
244
245 if (!gba->romVf && gba->memory.rom) {
246 GBASkipBIOS(gba);
247 }
248}
249
250void GBASkipBIOS(struct GBA* gba) {
251 struct ARMCore* cpu = gba->cpu;
252 if (cpu->gprs[ARM_PC] == BASE_RESET + WORD_SIZE_ARM) {
253 if (gba->memory.rom) {
254 cpu->gprs[ARM_PC] = BASE_CART0;
255 } else {
256 cpu->gprs[ARM_PC] = BASE_WORKING_RAM;
257 }
258 gba->video.vcount = 0x7D;
259 gba->memory.io[REG_VCOUNT >> 1] = 0x7D;
260 gba->memory.io[REG_POSTFLG >> 1] = 1;
261 ARMWritePC(cpu);
262 }
263}
264
265static void GBAProcessEvents(struct ARMCore* cpu) {
266 struct GBA* gba = (struct GBA*) cpu->master;
267
268 gba->bus = cpu->prefetch[1];
269 if (cpu->executionMode == MODE_THUMB) {
270 gba->bus |= cpu->prefetch[1] << 16;
271 }
272
273 int32_t nextEvent = cpu->nextEvent;
274 while (cpu->cycles >= nextEvent) {
275 cpu->nextEvent = INT_MAX;
276 nextEvent = 0;
277 do {
278 int32_t cycles = cpu->cycles;
279 cpu->cycles = 0;
280#ifndef NDEBUG
281 if (cycles < 0) {
282 mLOG(GBA, FATAL, "Negative cycles passed: %i", cycles);
283 }
284#endif
285 nextEvent = mTimingTick(&gba->timing, nextEvent + cycles);
286 } while (gba->cpuBlocked);
287
288 cpu->nextEvent = nextEvent;
289 if (cpu->halted) {
290 cpu->cycles = nextEvent;
291 if (!gba->memory.io[REG_IME >> 1] || !gba->memory.io[REG_IE >> 1]) {
292 break;
293 }
294 }
295#ifndef NDEBUG
296 else if (nextEvent < 0) {
297 mLOG(GBA, FATAL, "Negative cycles will pass: %i", nextEvent);
298 }
299#endif
300 if (gba->earlyExit) {
301 break;
302 }
303 }
304 gba->earlyExit = false;
305#ifndef NDEBUG
306 if (gba->cpuBlocked) {
307 mLOG(GBA, FATAL, "CPU is blocked!");
308 }
309#endif
310}
311
312#ifdef USE_DEBUGGERS
313void GBAAttachDebugger(struct GBA* gba, struct mDebugger* debugger) {
314 gba->debugger = (struct ARMDebugger*) debugger->platform;
315 gba->debugger->setSoftwareBreakpoint = _setSoftwareBreakpoint;
316 gba->debugger->clearSoftwareBreakpoint = _clearSoftwareBreakpoint;
317 gba->cpu->components[CPU_COMPONENT_DEBUGGER] = &debugger->d;
318 ARMHotplugAttach(gba->cpu, CPU_COMPONENT_DEBUGGER);
319}
320
321void GBADetachDebugger(struct GBA* gba) {
322 if (gba->debugger) {
323 ARMHotplugDetach(gba->cpu, CPU_COMPONENT_DEBUGGER);
324 }
325 gba->cpu->components[CPU_COMPONENT_DEBUGGER] = NULL;
326 gba->debugger = NULL;
327}
328#endif
329
330bool GBALoadNull(struct GBA* gba) {
331 GBAUnloadROM(gba);
332 gba->romVf = NULL;
333 gba->pristineRomSize = 0;
334#ifndef FIXED_ROM_BUFFER
335 gba->memory.rom = anonymousMemoryMap(SIZE_CART0);
336#else
337 gba->memory.rom = romBuffer;
338#endif
339 gba->isPristine = false;
340 gba->yankedRomSize = 0;
341 gba->memory.romSize = SIZE_CART0;
342 gba->memory.romMask = SIZE_CART0 - 1;
343 gba->memory.mirroring = false;
344 gba->romCrc32 = 0;
345
346 if (gba->cpu) {
347 gba->cpu->memory.setActiveRegion(gba->cpu, gba->cpu->gprs[ARM_PC]);
348 }
349 return true;
350}
351
352bool GBALoadMB(struct GBA* gba, struct VFile* vf) {
353 GBAUnloadROM(gba);
354 gba->romVf = vf;
355 gba->pristineRomSize = vf->size(vf);
356 vf->seek(vf, 0, SEEK_SET);
357 if (gba->pristineRomSize > SIZE_WORKING_RAM) {
358 gba->pristineRomSize = SIZE_WORKING_RAM;
359 }
360 gba->isPristine = true;
361 memset(gba->memory.wram, 0, SIZE_WORKING_RAM);
362 gba->yankedRomSize = 0;
363 gba->memory.romSize = 0;
364 gba->memory.romMask = 0;
365 gba->romCrc32 = doCrc32(gba->memory.wram, gba->pristineRomSize);
366 if (gba->cpu && gba->memory.activeRegion == REGION_WORKING_RAM) {
367 gba->cpu->memory.setActiveRegion(gba->cpu, gba->cpu->gprs[ARM_PC]);
368 }
369 return true;
370}
371
372bool GBALoadROM(struct GBA* gba, struct VFile* vf) {
373 if (!vf) {
374 return false;
375 }
376 GBAUnloadROM(gba);
377 gba->romVf = vf;
378 gba->pristineRomSize = vf->size(vf);
379 vf->seek(vf, 0, SEEK_SET);
380 if (gba->pristineRomSize > SIZE_CART0) {
381 gba->isPristine = false;
382 gba->memory.romSize = 0x01000000;
383#ifdef FIXED_ROM_BUFFER
384 gba->memory.rom = romBuffer;
385#else
386 gba->memory.rom = anonymousMemoryMap(SIZE_CART0);
387#endif
388 } else {
389 gba->isPristine = true;
390#ifdef FIXED_ROM_BUFFER
391 if (gba->pristineRomSize <= romBufferSize) {
392 gba->memory.rom = romBuffer;
393 vf->read(vf, romBuffer, gba->pristineRomSize);
394 }
395#else
396 gba->memory.rom = vf->map(vf, gba->pristineRomSize, MAP_READ);
397#endif
398 gba->memory.romSize = gba->pristineRomSize;
399 }
400 if (!gba->memory.rom) {
401 mLOG(GBA, WARN, "Couldn't map ROM");
402 return false;
403 }
404 gba->yankedRomSize = 0;
405 gba->memory.romMask = toPow2(gba->memory.romSize) - 1;
406 gba->memory.mirroring = false;
407 gba->romCrc32 = doCrc32(gba->memory.rom, gba->memory.romSize);
408 GBAHardwareInit(&gba->memory.hw, &((uint16_t*) gba->memory.rom)[GPIO_REG_DATA >> 1]);
409 GBAVFameDetect(&gba->memory.vfame, gba->memory.rom, gba->memory.romSize);
410 if (popcount32(gba->memory.romSize) != 1) {
411 // This ROM is either a bad dump or homebrew. Emulate flash cart behavior.
412#ifndef FIXED_ROM_BUFFER
413 void* newRom = anonymousMemoryMap(SIZE_CART0);
414 memcpy(newRom, gba->memory.rom, gba->pristineRomSize);
415 gba->memory.rom = newRom;
416#endif
417 gba->memory.romSize = SIZE_CART0;
418 gba->memory.romMask = SIZE_CART0 - 1;
419 gba->isPristine = false;
420 }
421 if (gba->cpu && gba->memory.activeRegion >= REGION_CART0) {
422 gba->cpu->memory.setActiveRegion(gba->cpu, gba->cpu->gprs[ARM_PC]);
423 }
424 // TODO: error check
425 return true;
426}
427
428bool GBALoadSave(struct GBA* gba, struct VFile* sav) {
429 GBASavedataInit(&gba->memory.savedata, sav);
430 return true;
431}
432
433void GBAYankROM(struct GBA* gba) {
434 gba->yankedRomSize = gba->memory.romSize;
435 gba->memory.romSize = 0;
436 gba->memory.romMask = 0;
437 GBARaiseIRQ(gba, IRQ_GAMEPAK, 0);
438}
439
440void GBALoadBIOS(struct GBA* gba, struct VFile* vf) {
441 gba->biosVf = vf;
442 uint32_t* bios = vf->map(vf, SIZE_BIOS, MAP_READ);
443 if (!bios) {
444 mLOG(GBA, WARN, "Couldn't map BIOS");
445 return;
446 }
447 gba->memory.bios = bios;
448 gba->memory.fullBios = 1;
449 uint32_t checksum = GBAChecksum(gba->memory.bios, SIZE_BIOS);
450 mLOG(GBA, DEBUG, "BIOS Checksum: 0x%X", checksum);
451 if (checksum == GBA_BIOS_CHECKSUM) {
452 mLOG(GBA, INFO, "Official GBA BIOS detected");
453 } else if (checksum == GBA_DS_BIOS_CHECKSUM) {
454 mLOG(GBA, INFO, "Official GBA (DS) BIOS detected");
455 } else {
456 mLOG(GBA, WARN, "BIOS checksum incorrect");
457 }
458 gba->biosChecksum = checksum;
459 if (gba->memory.activeRegion == REGION_BIOS) {
460 gba->cpu->memory.activeRegion = gba->memory.bios;
461 }
462 // TODO: error check
463}
464
465void GBAApplyPatch(struct GBA* gba, struct Patch* patch) {
466 size_t patchedSize = patch->outputSize(patch, gba->memory.romSize);
467 if (!patchedSize || patchedSize > SIZE_CART0) {
468 return;
469 }
470 void* newRom = anonymousMemoryMap(SIZE_CART0);
471 if (!patch->applyPatch(patch, gba->memory.rom, gba->pristineRomSize, newRom, patchedSize)) {
472 mappedMemoryFree(newRom, SIZE_CART0);
473 return;
474 }
475 if (gba->romVf) {
476#ifndef FIXED_ROM_BUFFER
477 gba->romVf->unmap(gba->romVf, gba->memory.rom, gba->pristineRomSize);
478#endif
479 gba->romVf->close(gba->romVf);
480 gba->romVf = NULL;
481 }
482 gba->isPristine = false;
483 gba->memory.rom = newRom;
484 gba->memory.hw.gpioBase = &((uint16_t*) gba->memory.rom)[GPIO_REG_DATA >> 1];
485 gba->memory.romSize = patchedSize;
486 gba->memory.romMask = SIZE_CART0 - 1;
487 gba->romCrc32 = doCrc32(gba->memory.rom, gba->memory.romSize);
488}
489
490void GBARaiseIRQ(struct GBA* gba, enum GBAIRQ irq, uint32_t cyclesLate) {
491 gba->memory.io[REG_IF >> 1] |= 1 << irq;
492 GBATestIRQ(gba, cyclesLate);
493}
494
495void GBATestIRQNoDelay(struct ARMCore* cpu) {
496 struct GBA* gba = (struct GBA*) cpu->master;
497 GBATestIRQ(gba, 0);
498}
499
500void GBATestIRQ(struct GBA* gba, uint32_t cyclesLate) {
501 if (gba->memory.io[REG_IE >> 1] & gba->memory.io[REG_IF >> 1]) {
502 if (!mTimingIsScheduled(&gba->timing, &gba->irqEvent)) {
503 mTimingSchedule(&gba->timing, &gba->irqEvent, GBA_IRQ_DELAY - cyclesLate);
504 }
505 }
506}
507
508void GBAHalt(struct GBA* gba) {
509 ARMHalt(gba->cpu);
510}
511
512void GBAStop(struct GBA* gba) {
513 size_t c;
514 for (c = 0; c < mCoreCallbacksListSize(&gba->coreCallbacks); ++c) {
515 struct mCoreCallbacks* callbacks = mCoreCallbacksListGetPointer(&gba->coreCallbacks, c);
516 if (callbacks->sleep) {
517 callbacks->sleep(callbacks->context);
518 }
519 }
520 gba->cpu->nextEvent = gba->cpu->cycles;
521}
522
523void GBADebug(struct GBA* gba, uint16_t flags) {
524 gba->debugFlags = flags;
525 if (GBADebugFlagsIsSend(gba->debugFlags)) {
526 int level = 1 << GBADebugFlagsGetLevel(gba->debugFlags);
527 level &= 0x1F;
528 char oolBuf[0x101];
529 strncpy(oolBuf, gba->debugString, sizeof(oolBuf) - 1);
530 memset(gba->debugString, 0, sizeof(gba->debugString));
531 oolBuf[0x100] = '\0';
532 mLog(_mLOG_CAT_GBA_DEBUG, level, "%s", oolBuf);
533 }
534 gba->debugFlags = GBADebugFlagsClearSend(gba->debugFlags);
535}
536
537bool GBAIsROM(struct VFile* vf) {
538#ifdef USE_ELF
539 struct ELF* elf = ELFOpen(vf);
540 if (elf) {
541 uint32_t entry = ELFEntry(elf);
542 bool isGBA = true;
543 isGBA = isGBA && ELFMachine(elf) == EM_ARM;
544 isGBA = isGBA && (entry == BASE_CART0 || entry == BASE_WORKING_RAM);
545 ELFClose(elf);
546 return isGBA;
547 }
548#endif
549 if (!vf) {
550 return false;
551 }
552
553 uint8_t signature[sizeof(GBA_ROM_MAGIC) + sizeof(GBA_ROM_MAGIC2)];
554 if (vf->seek(vf, GBA_ROM_MAGIC_OFFSET, SEEK_SET) < 0) {
555 return false;
556 }
557 if (vf->read(vf, &signature, sizeof(GBA_ROM_MAGIC)) != sizeof(GBA_ROM_MAGIC)) {
558 return false;
559 }
560 if (memcmp(signature, GBA_ROM_MAGIC, sizeof(GBA_ROM_MAGIC)) != 0) {
561 return false;
562 }
563
564 if (vf->seek(vf, GBA_ROM_MAGIC_OFFSET2, SEEK_SET) < 0) {
565 return false;
566 }
567 if (vf->read(vf, &signature, sizeof(GBA_ROM_MAGIC2)) != sizeof(GBA_ROM_MAGIC2)) {
568 return false;
569 }
570 if (memcmp(signature, GBA_ROM_MAGIC2, sizeof(GBA_ROM_MAGIC2)) != 0) {
571 // If the signature byte is missing then we must be using an unfixed ROM
572 uint32_t buffer[0x9C / sizeof(uint32_t)];
573 if (vf->seek(vf, 0x4, SEEK_SET) < 0) {
574 return false;
575 }
576 if (vf->read(vf, &buffer, sizeof(buffer)) != sizeof(buffer)) {
577 return false;
578 }
579 uint32_t bits = 0;
580 size_t i;
581 for (i = 0; i < sizeof(buffer) / sizeof(*buffer); ++i) {
582 bits |= buffer[i];
583 }
584 if (bits) {
585 return false;
586 }
587 }
588
589
590 if (GBAIsBIOS(vf)) {
591 return false;
592 }
593 return true;
594}
595
596bool GBAIsMB(struct VFile* vf) {
597 if (!GBAIsROM(vf)) {
598 return false;
599 }
600#ifdef USE_ELF
601 struct ELF* elf = ELFOpen(vf);
602 if (elf) {
603 bool isMB = ELFEntry(elf) == BASE_WORKING_RAM;
604 ELFClose(elf);
605 return isMB;
606 }
607#endif
608 if (vf->size(vf) > SIZE_WORKING_RAM) {
609 return false;
610 }
611 if (vf->seek(vf, GBA_MB_MAGIC_OFFSET, SEEK_SET) < 0) {
612 return false;
613 }
614 uint32_t signature;
615 if (vf->read(vf, &signature, sizeof(signature)) != sizeof(signature)) {
616 return false;
617 }
618 uint32_t opcode;
619 LOAD_32(opcode, 0, &signature);
620 struct ARMInstructionInfo info;
621 ARMDecodeARM(opcode, &info);
622 if (info.branchType == ARM_BRANCH) {
623 if (info.op1.immediate <= 0) {
624 return false;
625 } else if (info.op1.immediate == 28) {
626 // Ancient toolchain that is known to throw MB detection for a loop
627 return false;
628 } else if (info.op1.immediate != 24) {
629 return true;
630 }
631 }
632
633 uint32_t pc = GBA_MB_MAGIC_OFFSET;
634 int i;
635 for (i = 0; i < 80; ++i) {
636 if (vf->read(vf, &signature, sizeof(signature)) != sizeof(signature)) {
637 break;
638 }
639 pc += 4;
640 LOAD_32(opcode, 0, &signature);
641 ARMDecodeARM(opcode, &info);
642 if (info.mnemonic != ARM_MN_LDR) {
643 continue;
644 }
645 if ((info.operandFormat & ARM_OPERAND_MEMORY) && info.memory.baseReg == ARM_PC && info.memory.format & ARM_MEMORY_IMMEDIATE_OFFSET) {
646 uint32_t immediate = info.memory.offset.immediate;
647 if (info.memory.format & ARM_MEMORY_OFFSET_SUBTRACT) {
648 immediate = -immediate;
649 }
650 immediate += pc + 8;
651 if (vf->seek(vf, immediate, SEEK_SET) < 0) {
652 break;
653 }
654 if (vf->read(vf, &signature, sizeof(signature)) != sizeof(signature)) {
655 break;
656 }
657 LOAD_32(immediate, 0, &signature);
658 if (vf->seek(vf, pc, SEEK_SET) < 0) {
659 break;
660 }
661 if ((immediate & ~0x7FF) == BASE_WORKING_RAM) {
662 return true;
663 }
664 }
665 }
666 // Found a libgba-linked cart...these are a bit harder to detect.
667 return false;
668}
669
670bool GBAIsBIOS(struct VFile* vf) {
671 if (vf->seek(vf, 0, SEEK_SET) < 0) {
672 return false;
673 }
674 uint8_t interruptTable[7 * 4];
675 if (vf->read(vf, &interruptTable, sizeof(interruptTable)) != sizeof(interruptTable)) {
676 return false;
677 }
678 int i;
679 for (i = 0; i < 7; ++i) {
680 if (interruptTable[4 * i + 3] != 0xEA || interruptTable[4 * i + 2]) {
681 return false;
682 }
683 }
684 return true;
685}
686
687void GBAGetGameCode(const struct GBA* gba, char* out) {
688 memset(out, 0, 8);
689 if (!gba->memory.rom) {
690 return;
691 }
692
693 memcpy(out, "AGB-", 4);
694 memcpy(&out[4], &((struct GBACartridge*) gba->memory.rom)->id, 4);
695}
696
697void GBAGetGameTitle(const struct GBA* gba, char* out) {
698 if (gba->memory.rom) {
699 memcpy(out, &((struct GBACartridge*) gba->memory.rom)->title, 12);
700 return;
701 }
702 if (gba->isPristine && gba->memory.wram) {
703 memcpy(out, &((struct GBACartridge*) gba->memory.wram)->title, 12);
704 return;
705 }
706 strncpy(out, "(BIOS)", 12);
707}
708
709void GBAHitStub(struct ARMCore* cpu, uint32_t opcode) {
710 struct GBA* gba = (struct GBA*) cpu->master;
711 UNUSED(gba);
712#ifdef USE_DEBUGGERS
713 if (gba->debugger) {
714 struct mDebuggerEntryInfo info = {
715 .address = _ARMPCAddress(cpu),
716 .type.bp.opcode = opcode
717 };
718 mDebuggerEnter(gba->debugger->d.p, DEBUGGER_ENTER_ILLEGAL_OP, &info);
719 }
720#endif
721 // TODO: More sensible category?
722 mLOG(GBA, ERROR, "Stub opcode: %08x", opcode);
723}
724
725void GBAIllegal(struct ARMCore* cpu, uint32_t opcode) {
726 struct GBA* gba = (struct GBA*) cpu->master;
727 if (!gba->yankedRomSize) {
728 // TODO: More sensible category?
729 mLOG(GBA, WARN, "Illegal opcode: %08x", opcode);
730 }
731 if (cpu->executionMode == MODE_THUMB && (opcode & 0xFFC0) == 0xE800) {
732 mLOG(GBA, DEBUG, "Hit Wii U VC opcode: %08x", opcode);
733 return;
734 }
735#ifdef USE_DEBUGGERS
736 if (gba->debugger) {
737 struct mDebuggerEntryInfo info = {
738 .address = _ARMPCAddress(cpu),
739 .type.bp.opcode = opcode
740 };
741 mDebuggerEnter(gba->debugger->d.p, DEBUGGER_ENTER_ILLEGAL_OP, &info);
742 } else
743#endif
744 {
745 ARMRaiseUndefined(cpu);
746 }
747}
748
749void GBABreakpoint(struct ARMCore* cpu, int immediate) {
750 struct GBA* gba = (struct GBA*) cpu->master;
751 if (immediate >= CPU_COMPONENT_MAX) {
752 return;
753 }
754 switch (immediate) {
755#ifdef USE_DEBUGGERS
756 case CPU_COMPONENT_DEBUGGER:
757 if (gba->debugger) {
758 struct mDebuggerEntryInfo info = {
759 .address = _ARMPCAddress(cpu),
760 .type.bp.breakType = BREAKPOINT_SOFTWARE
761 };
762 mDebuggerEnter(gba->debugger->d.p, DEBUGGER_ENTER_BREAKPOINT, &info);
763 }
764 break;
765#endif
766 case CPU_COMPONENT_CHEAT_DEVICE:
767 if (gba->cpu->components[CPU_COMPONENT_CHEAT_DEVICE]) {
768 struct mCheatDevice* device = (struct mCheatDevice*) gba->cpu->components[CPU_COMPONENT_CHEAT_DEVICE];
769 struct GBACheatHook* hook = 0;
770 size_t i;
771 for (i = 0; i < mCheatSetsSize(&device->cheats); ++i) {
772 struct GBACheatSet* cheats = (struct GBACheatSet*) *mCheatSetsGetPointer(&device->cheats, i);
773 if (cheats->hook && cheats->hook->address == _ARMPCAddress(cpu)) {
774 mCheatRefresh(device, &cheats->d);
775 hook = cheats->hook;
776 }
777 }
778 if (hook) {
779 ARMRunFake(cpu, hook->patchedOpcode);
780 }
781 }
782 break;
783 default:
784 break;
785 }
786}
787
788void GBAFrameStarted(struct GBA* gba) {
789 GBATestKeypadIRQ(gba);
790
791 size_t c;
792 for (c = 0; c < mCoreCallbacksListSize(&gba->coreCallbacks); ++c) {
793 struct mCoreCallbacks* callbacks = mCoreCallbacksListGetPointer(&gba->coreCallbacks, c);
794 if (callbacks->videoFrameStarted) {
795 callbacks->videoFrameStarted(callbacks->context);
796 }
797 }
798}
799
800void GBAFrameEnded(struct GBA* gba) {
801 GBASavedataClean(&gba->memory.savedata, gba->video.frameCounter);
802
803 if (gba->rr) {
804 gba->rr->nextFrame(gba->rr);
805 }
806
807 if (gba->cpu->components && gba->cpu->components[CPU_COMPONENT_CHEAT_DEVICE]) {
808 struct mCheatDevice* device = (struct mCheatDevice*) gba->cpu->components[CPU_COMPONENT_CHEAT_DEVICE];
809 size_t i;
810 for (i = 0; i < mCheatSetsSize(&device->cheats); ++i) {
811 struct GBACheatSet* cheats = (struct GBACheatSet*) *mCheatSetsGetPointer(&device->cheats, i);
812 if (!cheats->hook) {
813 mCheatRefresh(device, &cheats->d);
814 }
815 }
816 }
817
818 if (gba->stream && gba->stream->postVideoFrame) {
819 const color_t* pixels;
820 size_t stride;
821 gba->video.renderer->getPixels(gba->video.renderer, &stride, (const void**) &pixels);
822 gba->stream->postVideoFrame(gba->stream, pixels, stride);
823 }
824
825 if (gba->memory.hw.devices & (HW_GB_PLAYER | HW_GB_PLAYER_DETECTION)) {
826 GBAHardwarePlayerUpdate(gba);
827 }
828
829 size_t c;
830 for (c = 0; c < mCoreCallbacksListSize(&gba->coreCallbacks); ++c) {
831 struct mCoreCallbacks* callbacks = mCoreCallbacksListGetPointer(&gba->coreCallbacks, c);
832 if (callbacks->videoFrameEnded) {
833 callbacks->videoFrameEnded(callbacks->context);
834 }
835 }
836}
837
838void GBATestKeypadIRQ(struct GBA* gba) {
839 uint16_t keycnt = gba->memory.io[REG_KEYCNT >> 1];
840 if (!(keycnt & 0x4000)) {
841 return;
842 }
843 int isAnd = keycnt & 0x8000;
844 if (!gba->keySource) {
845 // TODO?
846 return;
847 }
848
849 keycnt &= 0x3FF;
850 uint16_t keyInput = *gba->keySource & keycnt;
851
852 if (isAnd && keycnt == keyInput) {
853 GBARaiseIRQ(gba, IRQ_KEYPAD, 0);
854 } else if (!isAnd && keyInput) {
855 GBARaiseIRQ(gba, IRQ_KEYPAD, 0);
856 }
857}
858
859static void _triggerIRQ(struct mTiming* timing, void* user, uint32_t cyclesLate) {
860 UNUSED(timing);
861 UNUSED(cyclesLate);
862 struct GBA* gba = user;
863 gba->cpu->halted = 0;
864 if (!(gba->memory.io[REG_IE >> 1] & gba->memory.io[REG_IF >> 1])) {
865 return;
866 }
867
868 if (gba->memory.io[REG_IME >> 1] && !gba->cpu->cpsr.i) {
869 ARMRaiseIRQ(gba->cpu);
870 }
871}
872
873void GBASetBreakpoint(struct GBA* gba, struct mCPUComponent* component, uint32_t address, enum ExecutionMode mode, uint32_t* opcode) {
874 size_t immediate;
875 for (immediate = 0; immediate < gba->cpu->numComponents; ++immediate) {
876 if (gba->cpu->components[immediate] == component) {
877 break;
878 }
879 }
880 if (immediate == gba->cpu->numComponents) {
881 return;
882 }
883 if (mode == MODE_ARM) {
884 int32_t value;
885 int32_t old;
886 value = 0xE1200070;
887 value |= immediate & 0xF;
888 value |= (immediate & 0xFFF0) << 4;
889 GBAPatch32(gba->cpu, address, value, &old);
890 *opcode = old;
891 } else {
892 int16_t value;
893 int16_t old;
894 value = 0xBE00;
895 value |= immediate & 0xFF;
896 GBAPatch16(gba->cpu, address, value, &old);
897 *opcode = (uint16_t) old;
898 }
899}
900
901void GBAClearBreakpoint(struct GBA* gba, uint32_t address, enum ExecutionMode mode, uint32_t opcode) {
902 if (mode == MODE_ARM) {
903 GBAPatch32(gba->cpu, address, opcode, 0);
904 } else {
905 GBAPatch16(gba->cpu, address, opcode, 0);
906 }
907}
908
909#ifdef USE_DEBUGGERS
910static bool _setSoftwareBreakpoint(struct ARMDebugger* debugger, uint32_t address, enum ExecutionMode mode, uint32_t* opcode) {
911 GBASetBreakpoint((struct GBA*) debugger->cpu->master, &debugger->d.p->d, address, mode, opcode);
912 return true;
913}
914
915static bool _clearSoftwareBreakpoint(struct ARMDebugger* debugger, uint32_t address, enum ExecutionMode mode, uint32_t opcode) {
916 GBAClearBreakpoint((struct GBA*) debugger->cpu->master, address, mode, opcode);
917 return true;
918}
919#endif