Ajurna
918c9020b5
Introduced symbol files for various Game Boy systems (CGB, AGB, MGB, SGB) to define boot sequences and functionalities. Included CPU instruction behavior tests, with detailed coverage of standard operations and interrupt handling. Added documentation for test execution and internal framework operations.
106 lines
1.7 KiB
ArmAsm
106 lines
1.7 KiB
ArmAsm
; Framework for CPU instruction tests
|
|
|
|
; Calls test_instr with each instruction copied
|
|
; to instr, with a JP instr_done after it.
|
|
; Verifies checksum after testing instruction and
|
|
; prints opcode if it's wrong.
|
|
|
|
.include "checksums.s"
|
|
.include "cpu_speed.s"
|
|
.include "apu.s"
|
|
.include "crc_fast.s"
|
|
|
|
.define instr $DEF8
|
|
.define rp_temp (instr-4)
|
|
|
|
.define temp bss
|
|
|
|
; Sets SP to word at addr
|
|
; Preserved: BC, DE
|
|
.macro ldsp ; addr
|
|
ld a,(\1)
|
|
ld l,a
|
|
ld a,((\1)+1)
|
|
ld h,a
|
|
ld sp,hl
|
|
.endm
|
|
|
|
main:
|
|
call cpu_fast
|
|
call init_crc_fast
|
|
call checksums_init
|
|
set_test 0
|
|
|
|
ld hl,instrs
|
|
- ; Copy instruction
|
|
ld a,(hl+)
|
|
ld (instr),a
|
|
ld a,(hl+)
|
|
ld (instr+1),a
|
|
ld a,(hl+)
|
|
ld (instr+2),a
|
|
push hl
|
|
|
|
; Put JP instr_done after it
|
|
ld a,$C3
|
|
ld (instr+3),a
|
|
ld a,<instr_done
|
|
ld (instr+4),a
|
|
ld a,>instr_done
|
|
ld (instr+5),a
|
|
|
|
call reset_crc
|
|
call test_instr
|
|
|
|
call checksums_compare
|
|
jr z,passed
|
|
|
|
set_test 1
|
|
ld a,(instr)
|
|
call print_a
|
|
cp $CB
|
|
jr nz,+
|
|
ld a,(instr+1)
|
|
call print_a
|
|
+
|
|
|
|
passed:
|
|
; Next instruction
|
|
pop hl
|
|
ld a,l
|
|
cp <instrs_end
|
|
jr nz,-
|
|
ld a,h
|
|
cp >instrs_end
|
|
jr nz,-
|
|
|
|
jp tests_done
|
|
|
|
|
|
; Updates checksum with AF, BC, DE, and HL
|
|
checksum_af_bc_de_hl:
|
|
push hl
|
|
|
|
push af
|
|
update_crc_fast
|
|
pop hl
|
|
ld a,l
|
|
update_crc_fast
|
|
|
|
ld a,b
|
|
update_crc_fast
|
|
ld a,c
|
|
update_crc_fast
|
|
|
|
ld a,d
|
|
update_crc_fast
|
|
ld a,e
|
|
update_crc_fast
|
|
|
|
pop de
|
|
ld a,d
|
|
update_crc_fast
|
|
ld a,e
|
|
update_crc_fast
|
|
ret
|