# gameplaySP # # Copyright (C) 2006 Exophase # # This program is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License as # published by the Free Software Foundation; either version 2 of # the License, or (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA .align 4 .global mips_update_gba .global mips_indirect_branch_arm .global mips_indirect_branch_thumb .global mips_indirect_branch_dual .global execute_load_u8 .global execute_load_u16 .global execute_load_u32 .global execute_load_s8 .global execute_load_s16 .global execute_store_u8 .global execute_store_u16 .global execute_store_u32 .global execute_aligned_load32 .global execute_aligned_store32 .global execute_read_cpsr .global execute_read_spsr .global execute_swi .global execute_spsr_restore .global execute_store_cpsr .global execute_store_spsr .global execute_lsl_flags_reg .global execute_lsr_flags_reg .global execute_asr_flags_reg .global execute_ror_flags_reg .global execute_arm_translate .global invalidate_icache_region .global invalidate_all_cache .global step_debug_mips .global reg_check .global memory_map_read .global memory_map_write .global reg .extern reg .extern spsr # MIPS register layout: # $0 - constant zero # $1 - temporary # $2 - temporary / return value # $3 - ARM r0 (not saved) # $4 - temporary / function argument 0 # $5 - temporary / function argument 1 # $6 - temporary / function argument 2 # $7 - ARM r1 (not saved) # $8 - ARM r2 (not saved) # $9 - ARM r3 (not saved) # $10 - ARM r4 (not saved) # $11 - ARM r5 (not saved) # $12 - ARM r6 (not saved) # $13 - ARM r7 (not saved) # $14 - ARM r8 (not saved) # $15 - ARM r9 (not saved) # $16 - ARM machine state pointer (saved) # $17 - cycle counter (saved) # $18 - ARM r10 (saved) # $19 - block start address (roughly r15) (saved) # $20 - ARM negative register (saved) # $21 - ARM zero register (saved) # $22 - ARM carry register (saved) # $23 - ARM overflow register (saved) # $24 - ARM r11 (not saved) # $25 - ARM r12 (not saved) # $26 - kernel temporary 0 # $27 - kernel temporary 1 # $28 - ARM r13 (saved) # $29 - stack pointer # $30 - ARM r14 (saved) # $31 - return address .equ REG_R0, (0 * 4) .equ REG_R1, (1 * 4) .equ REG_R2, (2 * 4) .equ REG_R3, (3 * 4) .equ REG_R4, (4 * 4) .equ REG_R5, (5 * 4) .equ REG_R6, (6 * 4) .equ REG_R7, (7 * 4) .equ REG_R8, (8 * 4) .equ REG_R9, (9 * 4) .equ REG_R10, (10 * 4) .equ REG_R11, (11 * 4) .equ REG_R12, (12 * 4) .equ REG_R13, (13 * 4) .equ REG_R14, (14 * 4) .equ REG_LR, (14 * 4) .equ REG_PC, (15 * 4) .equ REG_N_FLAG, (16 * 4) .equ REG_Z_FLAG, (17 * 4) .equ REG_C_FLAG, (18 * 4) .equ REG_V_FLAG, (19 * 4) .equ REG_CPSR, (20 * 4) .equ REG_SAVE, (21 * 4) .equ REG_SAVE2, (22 * 4) .equ REG_SAVE3, (23 * 4) .equ CPU_MODE, (29 * 4) .equ CPU_HALT_STATE, (30 * 4) .equ CHANGED_PC_STATUS, (31 * 4) .equ GP_SAVE, (32 * 4) .equ SUPERVISOR_LR, (reg_mode + (3 * (7 * 4)) + (6 * 4)) .equ SUPERVISOR_SPSR, (spsr + (3 * 4)) .set noat .set noreorder # make sure $16 has the register base for these macros .macro collapse_flag flag_reg, shift ins $2, $\flag_reg, \shift, 1 # insert flag into CPSR .endm .macro collapse_flags lw $2, REG_CPSR($16) # load CPSR andi $2, $2, 0xFF # isolate lower 8bits collapse_flag 20, 31 # store flags collapse_flag 21, 30 collapse_flag 22, 29 collapse_flag 23, 28 sw $2, REG_CPSR($16) # store CPSR .endm .macro extract_flag shift, flag_reg ext $\flag_reg, $1, \shift, 1 # extract flag from CPSR .endm .macro extract_flags_body # extract flags from $1 extract_flag 31, 20 # load flags extract_flag 30, 21 extract_flag 29, 22 extract_flag 28, 23 .endm .macro extract_flags lw $1, REG_CPSR($16) # load CPSR extract_flags_body .endm .macro save_registers sw $3, REG_R0($16) sw $7, REG_R1($16) sw $8, REG_R2($16) sw $9, REG_R3($16) sw $10, REG_R4($16) sw $11, REG_R5($16) sw $12, REG_R6($16) sw $13, REG_R7($16) sw $14, REG_R8($16) sw $15, REG_R9($16) sw $24, REG_R11($16) sw $25, REG_R12($16) sw $18, REG_R10($16) sw $28, REG_R13($16) sw $30, REG_R14($16) lw $28, GP_SAVE($16) .endm .macro restore_registers lw $3, REG_R0($16) lw $7, REG_R1($16) lw $8, REG_R2($16) lw $9, REG_R3($16) lw $10, REG_R4($16) lw $11, REG_R5($16) lw $12, REG_R6($16) lw $13, REG_R7($16) lw $14, REG_R8($16) lw $15, REG_R9($16) lw $24, REG_R11($16) lw $25, REG_R12($16) lw $18, REG_R10($16) lw $28, REG_R13($16) lw $30, REG_R14($16) .endm # Process a hardware event. Since an interrupt might be # raised we have to check if the PC has changed. # $4: next address # $16: register base # $17: cycle counter .balign 64 mips_update_gba: sw $4, REG_PC($16) # current PC = $4 addiu $sp, $sp, -4 # make room on the stack sw $ra,($sp) # save return address collapse_flags # update cpsr save_registers # save registers jal update_gba # process the next event sw $0, CHANGED_PC_STATUS($16) lw $ra, ($sp) # restore return address addiu $sp, $sp, 4 # fix stack lw $1, CHANGED_PC_STATUS($16) bne $1, $0, lookup_pc addu $17, $2, $0 # $17 = new cycle count (delay slot) restore_registers jr $ra # if not, go back to caller nop # Perform an indirect branch. # $4: GBA address to branch to mips_indirect_branch_arm: save_registers jal block_lookup_address_arm # $2 = MIPS address to jump to nop restore_registers jr $2 # jump to it nop mips_indirect_branch_thumb: save_registers jal block_lookup_address_thumb # $2 = MIPS address to jump to nop restore_registers jr $2 # jump to it nop mips_indirect_branch_dual: save_registers jal block_lookup_address_dual # $2 = MIPS address to jump to nop restore_registers jr $2 # jump to it nop # $4: address to write to # $5: current PC # Will patch the return address with a call to the correct handler as # listed in the given table. # Value will be set to force_open if it's open .macro patch_handler ftable, force_open srl $1, $4, 24 # $1 = address region sltu $2, $1, 0x0F # check if the value is open bne $2, $0, 1f sll $1, $1, 2 # make address word indexed (delay) addiu $1, $0, (\force_open * 4) 1: lui $2, %hi(\ftable) addu $2, $2, $1 lw $2, %lo(\ftable)($2) # new function handler is in $2 srl $2, $2, 2 # remove lower two bits lui $1, %hi(3 << 26) # $1 = 3 (JAL opcode) ins $1, $2, 0, 26 # insert offset into jal addiu $ra, $ra, -8 # rewind return address to function call sw $1, ($ra) # modify to call new handler cache 0x1a, ($ra) # hit writeback dcache line cache 0x08, ($ra) # hit invalidate icache line jr $ra # return nop # wary of putting cache here .endm # Like the above, but will use the table of the proper alignment, # The tables should be ordered by alignment .macro patch_handler_align ftable, alignment srl $1, $4, 24 # $1 = address region sltu $2, $1, 0x0F # check if the value is open bne $2, $0, 1f sll $1, $1, 2 # make address word indexed (delay) addiu $1, $0, 4 # force address to 0x1 (open) 1: ins $1, $4, 6, \alignment # place alignment bits into offset lui $2, %hi(\ftable) addu $2, $2, $1 lw $2, %lo(\ftable)($2) # new function handler is in $2 srl $2, $2, 2 # remove lower two bits lui $1, %hi(3 << 26) # $1 = 3 (JAL opcode) ins $1, $2, 0, 26 # insert offset into jal addiu $ra, $ra, -8 # rewind return address to function call sw $1, ($ra) # modify to call new handler cache 0x1a, ($ra) # hit writeback dcache line cache 0x08, ($ra) # hit invalidate icache line jr $ra # return nop # wary of putting cache here .endm .macro region_check region, patch_handler srl $1, $4, 24 # check upper 8bits of address xor $1, $1, \region # see if it is the given region bne $1, $0, \patch_handler # if not repatch/try again .endm .macro region_check_open patch_handler srl $1, $4, 24 # check upper 8bits of address sltiu $2, $1, 0x0F # true if it is a low address addiu $1, $1, -1 # non-zero if it is not a low open sltu $1, $0, $1 # true if lower bits != 1 and $1, $1, $2 # true if low address and not open bne $1, $0, \patch_handler # if above is true, patch .endm .macro region_check_align region, align_bits, alignment, patch_handler srl $1, $4, 24 # check upper 8bits of address ins $1, $4, 8, \align_bits # look at lower bits of address too # See if it is the given region and alignment xori $1, $1, (\region | (\alignment << 8)) bne $1, $0, \patch_handler # if not repatch/try again .endm .macro region_check_open_align align_bits, alignment, patch_handler srl $1, $4, 24 # check upper 8bits of address sltiu $2, $1, 0x0F # true if it is a low address addiu $1, $1, -1 # non-zero if it is not a low open sltu $1, $0, $1 # true if $1 != 0 and $1, $1, $2 # true if low address and not open ext $2, $4, 0, \align_bits # $2 = low bits of 4 xori $2, $2, \alignment # true if alignment doesn't match or $1, $1, $2 # align failure will trigger too bne $1, $0, \patch_handler # if above is true, patch .endm .macro ignore_region region, patch_handler region_check \region, \patch_handler nop jr $ra nop .endm .macro ignore_high patch_handler srl $1, $4, 24 # check upper 8bits of address sltiu $1, $1, 0x0F # see if it is not high bne $1, $0, \patch_handler # if not repatch/try again nop jr $ra nop .endm .macro translate_region_core base, size lui $2, %hi(\base) # generate upper address andi $4, $4, \size # generate offset addu $2, $2, $4 # add ptr upper and offset .endm .macro translate_region region, patch_handler, base, size region_check \region, \patch_handler translate_region_core \base, \size .endm # I refuse to have > 80 char lines, and GAS has a problem with the param # list spilling over (grumble) .macro translate_region_align region, a_b, alignment, p_h, base, size region_check_align \region, \a_b, \alignment, \p_h translate_region_core \base, \size .endm .macro translate_region_ewram_core mask lui $2, %hi(ewram + 0x8000) # generate upper address (delay) andi $1, $4, \mask # generate 15bit offset ext $4, $4, 15, 3 # isolate top 3 bits of offset ins $1, $4, 16, 3 # reinsert into top 4 bits addu $2, $2, $1 .endm .macro translate_region_ewram patch_handler region_check 2, \patch_handler translate_region_ewram_core 0x7FFF .endm .macro translate_region_ewram_load_align align_bits, alignment, patch_handler region_check_align 2, \align_bits, \alignment, \patch_handler translate_region_ewram_core 0x7FFF .endm .macro translate_region_ewram_load_align16 align_bits, alignment, patch_handler region_check_align 2, \align_bits, \alignment, \patch_handler translate_region_ewram_core 0x7FFE .endm .macro translate_region_ewram_load_align32 align_bits, alignment, patch_handler region_check_align 2, \align_bits, \alignment, \patch_handler translate_region_ewram_core 0x7FFC .endm .macro translate_region_ewram_store_align16 patch_handler region_check 2, \patch_handler translate_region_ewram_core 0x7FFE .endm .macro translate_region_ewram_store_align32 patch_handler region_check 2, \patch_handler translate_region_ewram_core 0x7FFC .endm .macro translate_region_vram_core addiu $2, $2, -3 # see if it's 3 ext $4, $4, 0, 17 # generate 17bit offset bne $2, $0, 1f lui $1, %hi(vram) # start loading vram address (delay) addiu $4, $4, -0x8000 # move address into VRAM region 1: addu $2, $1, $4 # $2 = (hi)vram + address .endm .macro translate_region_vram patch_handler region_check 6, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) translate_region_vram_core .endm .macro translate_region_vram_load_align align_bits, alignment, patch_handler region_check_align 6, \align_bits, \alignment, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) translate_region_vram_core .endm .macro translate_region_vram_load_align16 align_bits, alignment, patch_handler region_check_align 6, \align_bits, \alignment, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) ins $4, $0, 0, 1 # mask out lower bit of address translate_region_vram_core .endm .macro translate_region_vram_load_align32 align_bits, alignment, patch_handler region_check_align 6, \align_bits, \alignment, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) ins $4, $0, 0, 2 # mask out lower two bits of address translate_region_vram_core .endm .macro translate_region_vram_store_align16 patch_handler region_check 6, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) ins $4, $0, 0, 1 # mask out lower bit of address translate_region_vram_core .endm .macro translate_region_vram_store_align32 patch_handler region_check 6, \patch_handler ext $2, $4, 15, 2 # $2 = bits 15 and 16 of address (delay) ins $4, $0, 0, 2 # mask out lower two bits of address translate_region_vram_core .endm .macro translate_region_gamepak_core mask srl $2, $4, 15 # $2 = page number of address (delay) sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $2 = memory_map_read[address >> 15] lw $2, -32768($2) bne $2, $0, 1f # if it's non-NULL continue andi $1, $4, \mask # $1 = low 15bits of address (delay slot) sw $ra, REG_SAVE2($16) # save return address save_registers # save the registers ext $4, $4, 15, 10 # $4 = (address >> 15) & 0x3FF jal load_gamepak_page # get page in $2 sw $1, REG_SAVE($16) # save offset (delay) lw $1, REG_SAVE($16) # restore offset (delay) restore_registers # restore the other registers lw $ra, REG_SAVE2($16) # restore return address 1: addu $2, $2, $1 # add the memory map offset .endm .macro translate_region_gamepak region, patch_handler region_check \region, \patch_handler translate_region_gamepak_core 0x7FFF .endm .macro translate_region_gamepak_align region, a_b, alignment, patch_handler region_check_align \region, \a_b, \alignment, \patch_handler translate_region_gamepak_core 0x7FFF .endm .macro translate_region_gamepak_align16 region, a_b, alignment, patch_handler region_check_align \region, \a_b, \alignment, \patch_handler translate_region_gamepak_core 0x7FFE .endm .macro translate_region_gamepak_align32 region, a_b, alignment, patch_handler region_check_align \region, \a_b, \alignment, \patch_handler translate_region_gamepak_core 0x7FFC .endm .macro translate_region_gamepak_a region, patch_handler region_check \region, \patch_handler srl $2, $4, 15 # $2 = page number of address (delay) sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $2 = memory_map_read[address >> 15] lw $2, -32768($2) bne $2, $0, 1f # if it's non-NULL continue andi $1, $4, 0x7FFF # $1 = low 15bits of address (delay slot) sw $ra, REG_SAVE2($16) # save return address sw $6, REG_SAVE3($16) # save a2 save_registers # save the registers ext $4, $4, 15, 10 # $4 = (address >> 15) & 0x3FF jal load_gamepak_page # get page in $2 sw $1, REG_SAVE($16) # save offset (delay) lw $1, REG_SAVE($16) # restore offset (delay) restore_registers # restore the other registers lw $ra, REG_SAVE2($16) # restore return address lw $6, REG_SAVE3($16) # restore a2 1: addu $2, $2, $1 # add the memory map offset .endm .macro eeprom_load_a patch_handler region_check 0xD, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) sw $6, REG_SAVE2($16) # save a2 save_registers # save the registers jal read_eeprom # get eeprom value in $2 nop restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return lw $6, REG_SAVE2($16) # restore a2 .endm .macro eeprom_load_core sw $ra, REG_SAVE($16) # save the return address (delay) save_registers # save the registers jal read_eeprom # get eeprom value in $2 nop restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return nop .endm .macro eeprom_load patch_handler region_check 0xD, \patch_handler eeprom_load_core .endm .macro eeprom_load_align align_bits, alignment, patch_handler region_check_align 0xD, \align_bits, \alignment, \patch_handler eeprom_load_core .endm .macro eeprom_load_align16 align_bits, alignment, patch_handler eeprom_load_align \align_bits, \alignment, \patch_handler .endm .macro eeprom_load_align32 align_bits, alignment, patch_handler eeprom_load_align \align_bits, \alignment, \patch_handler .endm .macro backup_load_core save_registers # save the registers jal read_backup # get backup value in $2 ext $4, $4, 0, 16 # address &= 0xFFFF restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return .endm .macro backup_load_a patch_handler region_check 0xE, \patch_handler sw $ra, REG_SAVE($16) # save return address (delay) sw $6, REG_SAVE2($16) # save a2 save_registers # save the registers jal read_backup # get backup value in $2 ext $4, $4, 0, 16 # address &= 0xFFFF restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return lw $6, REG_SAVE2($16) # restore a2 .endm .macro backup_load patch_handler region_check 0xE, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) backup_load_core .endm .macro backup_load_align align_bits, alignment, patch_handler region_check_align 0xE, \align_bits, \alignment, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) backup_load_core .endm .macro backup_load_align16 align_bits, alignment, patch_handler region_check_align 0xE, \align_bits, \alignment, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) ins $4, $0, 0, 1 # mask out lower bit backup_load_core .endm .macro backup_load_align32 align_bits, alignment, patch_handler region_check_align 0xE, \align_bits, \alignment, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) ins $4, $0, 0, 2 # mask out lower two bits backup_load_core .endm .macro open_load8_core lw $2, REG_CPSR($16) # $2 = CPSR (delay) andi $2, $2, 0x20 # test T bit beq $2, $0, 1f # branch if ARM mode andi $4, $4, 0x03 # isolate lower 3bits from address (delay) andi $4, $4, 0x01 # in Thumb mode, isolate one more bit 1: sw $ra, REG_SAVE($16) # save the return address (delay) save_registers # save the registers jal read_memory8 # get instruction at PC addu $4, $5, $4 # a0 = PC + low bits of address restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return .endm .macro open_load8 patch_handler region_check_open \patch_handler open_load8_core .endm .macro open_load16_core lw $2, REG_CPSR($16) # $2 = CPSR (delay) andi $2, $2, 0x20 # test T bit beq $2, $0, 1f # branch if ARM mode andi $4, $4, 0x02 # isolate bit 1 from address (delay) addu $4, $0, $0 # zero out address bit 1: sw $ra, REG_SAVE($16) # save the return address (delay) save_registers # save the registers jal read_memory16 # get instruction at PC addu $4, $5, $4 # a0 = PC + low bits of address restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return .endm .macro open_load16_align align_bits, alignment, patch_handler region_check_open_align \align_bits, \alignment, \patch_handler open_load16_core .endm .macro open_load16_align16 align_bits, alignment, patch_handler open_load16_align \align_bits, \alignment, \patch_handler .endm .macro open_load32_core lw $2, REG_CPSR($16) # $2 = CPSR (delay) andi $2, $2, 0x20 # test T bit save_registers # save the registers beq $2, $0, 1f # branch if ARM mode sw $ra, REG_SAVE($16) # save the return address (delay) jal read_memory16 # get instruction at PC addu $4, $5, $0 # a0 = PC j 2f ins $2, $2, 16, 16 # result = (result << 16) | result (delay) 1: jal read_memory32 # get instruction at PC addu $4, $5, $4 # a0 = PC 2: # join point restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return .endm .macro open_load32_a patch_handler region_check_open \patch_handler lw $2, REG_CPSR($16) # $2 = CPSR (delay) andi $2, $2, 0x20 # test T bit save_registers # save the registers sw $6, REG_SAVE2($16) # save a2 beq $2, $0, 1f # branch if ARM mode sw $ra, REG_SAVE($16) # save the return address (delay) jal read_memory16 # get instruction at PC addu $4, $5, $0 # a0 = PC j 2f ins $2, $2, 16, 16 # result = (result << 16) | result (delay) 1: jal read_memory32 # get instruction at PC addu $4, $5, $4 # a0 = PC 2: restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return lw $6, REG_SAVE2($16) # restore a2 (delay) .endm .macro open_load32_align align_bits, alignment, patch_handler region_check_open_align \align_bits, \alignment, \patch_handler open_load32_core .endm .macro open_load32_align32 align_bits, alignment, patch_handler open_load32_align \align_bits, \alignment, \patch_handler .endm .macro store_function function, region, patch_handler, mask region_check \region, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) save_registers # save the registers jal \function # store value out andi $4, $4, \mask # mask address restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return nop .endm .macro store_function_a function, region, patch_handler, mask region_check \region, \patch_handler sw $ra, REG_SAVE($16) # save the return address (delay) save_registers # save the registers jal \function # store value out andi $4, $4, \mask # mask address restore_registers # restore the other registers lw $ra, REG_SAVE($16) # restore return address jr $ra # return nop .endm .macro load_u8 base jr $ra # return lbu $2, %lo(\base)($2) # return base[offset] .endm .macro load_s8 base jr $ra # return lb $2, %lo(\base)($2) # return base[offset] .endm .macro load_u16 base jr $ra # return lhu $2, %lo(\base)($2) # return base[offset] .endm .macro load_s16 base jr $ra # return lh $2, %lo(\base)($2) # return base[offset] .endm .macro load_u32 base jr $ra # return lw $2, %lo(\base)($2) # return base[offset] .endm # 16bit unaligned load will always have a 1 in the LSB; # should have already been taken care of in indexing. .macro load_u16_unaligned base lhu $2, %lo(\base)($2) # load base[offset] jr $ra # return ror $2, $2, 8 # rotate value by 8bits .endm # This is technically the same as load_s8, but kept to # avoid confusion. .macro load_s16_unaligned base jr $ra # return lb $2, %lo(\base)($2) # return base[offset] .endm # Unalignment must be known statically (use the tables to # patch correctly) .macro load_u32_unaligned base, alignment lw $2, %lo(\base)($2) # load base[offset] jr $ra # return ror $2, $2, (\alignment * 8) # rotate value by 8bits .endm .macro store_u8 base jr $ra # return sb $5, %lo(\base)($2) # store value at base[offset] .endm .macro store_u16 base jr $ra # return sh $5, %lo(\base)($2) # store value at base[offset] .endm .macro store_u32 base jr $ra # return sw $5, %lo(\base)($2) # store value at base[offset] .endm # Store the value double mirrored (u16) .macro store_u8_double base ins $5, $5, 8, 8 # value = (value << 8) | value jr $ra # return sh $5, %lo(\base)($2) # store value at base[offset] .endm # Store the values and check if it overwrote code there .macro store_u8_smc base addiu $2, $2, %lo(\base) # offset the address lb $1, -32768($2) # load the SMC status bne $1, $0, smc_write # is there code there? sb $5, ($2) # store value at base[offset] (delay) jr $ra # return nop .endm .macro store_u16_smc base addiu $2, $2, %lo(\base) # offset the address lh $1, -32768($2) # load the SMC status bne $1, $0, smc_write # is there code there? sh $5, ($2) # store value at base[offset] (delay) jr $ra # return nop .endm .macro store_u32_smc base addiu $2, $2, %lo(\base) # offset the address lw $1, -32768($2) # load the SMC status bne $1, $0, smc_write # is there code there? sw $5, ($2) # store value at base[offset] (delay) jr $ra # return nop .endm # Unsigned 8bit load handlers execute_load_bios_u8: region_check 0, patch_load_u8 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_u8 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ins $2, $4, 0, 2 # lower 2 bits address contributes load_u8 bios_read_protect 2: open_load8_core nop execute_load_ewram_u8: translate_region_ewram patch_load_u8 load_u8 (ewram + 0x8000) # Put the generic address over the handler you want to be default # IWRAM is typically the most frequently read and written to. execute_load_u8: execute_load_iwram_u8: translate_region 3, patch_load_u8, (iwram + 0x8000), 0x7FFF load_u8 (iwram + 0x8000) execute_load_io_u8: translate_region 4, patch_load_u8, io_registers, 0x3FF load_u8 io_registers execute_load_palette_u8: translate_region 5, patch_load_u8, palette_ram, 0x3FF load_u8 palette_ram execute_load_vram_u8: translate_region_vram patch_load_u8 load_u8 vram execute_load_oam_u8: translate_region 7, patch_load_u8, oam_ram, 0x3FF load_u8 oam_ram execute_load_gamepak8_u8: translate_region_gamepak 8, patch_load_u8 load_u8 0 execute_load_gamepak9_u8: translate_region_gamepak 9, patch_load_u8 load_u8 0 execute_load_gamepakA_u8: translate_region_gamepak 10, patch_load_u8 load_u8 0 execute_load_gamepakB_u8: translate_region_gamepak 11, patch_load_u8 load_u8 0 execute_load_gamepakC_u8: translate_region_gamepak 12, patch_load_u8 load_u8 0 execute_load_eeprom_u8: eeprom_load patch_load_u8 execute_load_backup_u8: backup_load patch_load_u8 nop execute_load_open_u8: open_load8 patch_load_u8 nop load_u8_ftable: .long execute_load_bios_u8 # 0x00 BIOS .long execute_load_open_u8 # 0x01 open address .long execute_load_ewram_u8 # 0x02 EWRAM .long execute_load_iwram_u8 # 0x03 IWRAM .long execute_load_io_u8 # 0x04 I/O registers .long execute_load_palette_u8 # 0x05 Palette RAM .long execute_load_vram_u8 # 0x06 VRAM .long execute_load_oam_u8 # 0x07 OAM RAM .long execute_load_gamepak8_u8 # 0x08 gamepak .long execute_load_gamepak9_u8 # 0x09 gamepak .long execute_load_gamepakA_u8 # 0x0A gamepak .long execute_load_gamepakB_u8 # 0x0B gamepak .long execute_load_gamepakC_u8 # 0x0C gamepak .long execute_load_eeprom_u8 # 0x0D gamepak/eeprom .long execute_load_backup_u8 # 0x0E Flash ROM/SRAM .long execute_load_open_u8 # 0x0F open address patch_load_u8: patch_handler load_u8_ftable, 0x01 # Signed 8bit load handlers execute_load_bios_s8: region_check 0, patch_load_s8 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_s8 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ins $2, $4, 0, 2 # lower 2 bits contribute load_s8 bios_read_protect 2: open_load8_core seb $2, $2 execute_load_ewram_s8: translate_region_ewram patch_load_s8 load_s8 (ewram + 0x8000) execute_load_s8: execute_load_iwram_s8: translate_region 3, patch_load_s8, (iwram + 0x8000), 0x7FFF load_s8 (iwram + 0x8000) execute_load_io_s8: translate_region 4, patch_load_s8, io_registers, 0x3FF load_s8 io_registers execute_load_palette_s8: translate_region 5, patch_load_s8, palette_ram, 0x3FF load_s8 palette_ram execute_load_vram_s8: translate_region_vram patch_load_s8 load_s8 vram execute_load_oam_s8: translate_region 7, patch_load_s8, oam_ram, 0x3FF load_s8 oam_ram execute_load_gamepak8_s8: translate_region_gamepak 8, patch_load_s8 load_s8 0 execute_load_gamepak9_s8: translate_region_gamepak 9, patch_load_s8 load_s8 0 execute_load_gamepakA_s8: translate_region_gamepak 10, patch_load_s8 load_s8 0 execute_load_gamepakB_s8: translate_region_gamepak 11, patch_load_s8 load_s8 0 execute_load_gamepakC_s8: translate_region_gamepak 12, patch_load_s8 load_s8 0 execute_load_eeprom_s8: eeprom_load patch_load_s8 execute_load_backup_s8: backup_load patch_load_s8 seb $2, $2 # sign extend result (delay) execute_load_open_s8: open_load8 patch_load_s8 seb $2, $2 # sign extend result (delay) load_s8_ftable: .long execute_load_bios_s8 # 0x00 BIOS .long execute_load_open_s8 # 0x01 open address .long execute_load_ewram_s8 # 0x02 EWRAM .long execute_load_iwram_s8 # 0x03 IWRAM .long execute_load_io_s8 # 0x04 I/O registers .long execute_load_palette_s8 # 0x05 Palette RAM .long execute_load_vram_s8 # 0x06 VRAM .long execute_load_oam_s8 # 0x07 OAM RAM .long execute_load_gamepak8_s8 # 0x08 gamepak .long execute_load_gamepak9_s8 # 0x09 gamepak .long execute_load_gamepakA_s8 # 0x0A gamepak .long execute_load_gamepakB_s8 # 0x0B gamepak .long execute_load_gamepakC_s8 # 0x0C gamepak .long execute_load_eeprom_s8 # 0x0D gamepak/eeprom .long execute_load_backup_s8 # 0x0E Flash ROM/SRAM .long execute_load_open_s8 # 0x0F open address patch_load_s8: patch_handler load_s8_ftable, 1 # Unsigned aligned 16bit load handlers execute_load_bios_u16: region_check_align 0, 1, 0, patch_load_u16 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_u16 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ins $2, $4, 0, 2 # bit 1 contributes load_u16 bios_read_protect 2: open_load16_core nop execute_load_ewram_u16: translate_region_ewram_load_align 1, 0, patch_load_u16 load_u16 (ewram + 0x8000) execute_load_u16: execute_load_iwram_u16: translate_region_align 3, 1, 0, patch_load_u16, (iwram + 0x8000), 0x7FFF load_u16 (iwram + 0x8000) execute_load_io_u16: translate_region_align 4, 1, 0, patch_load_u16, io_registers, 0x3FF load_u16 io_registers execute_load_palette_u16: translate_region_align 5, 1, 0, patch_load_u16, palette_ram, 0x3FF load_u16 palette_ram execute_load_vram_u16: translate_region_vram_load_align 1, 0, patch_load_u16 load_u16 vram execute_load_oam_u16: translate_region_align 7, 1, 0, patch_load_u16, oam_ram, 0x3FF load_u16 oam_ram execute_load_gamepak8_u16: translate_region_gamepak_align 8, 1, 0, patch_load_u16 load_u16 0 execute_load_gamepak9_u16: translate_region_gamepak_align 9, 1, 0, patch_load_u16 load_u16 0 execute_load_gamepakA_u16: translate_region_gamepak_align 10, 1, 0, patch_load_u16 load_u16 0 execute_load_gamepakB_u16: translate_region_gamepak_align 11, 1, 0, patch_load_u16 load_u16 0 execute_load_gamepakC_u16: translate_region_gamepak_align 12, 1, 0, patch_load_u16 load_u16 0 execute_load_eeprom_u16: eeprom_load_align 1, 0, patch_load_u16 execute_load_backup_u16: backup_load_align 1, 0, patch_load_u16 nop execute_load_open_u16: open_load16_align 1, 0, patch_load_u16 nop # Unsigned unaligned 16bit load handlers execute_load_bios_u16u: region_check_align 0, 1, 1, patch_load_u16 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFE # generate offset addu $2, $2, $4 load_u16_unaligned bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ext $1, $4, 1, 1 ins $2, $1, 1, 1 # bit 1 contributes load_u16_unaligned bios_read_protect 2: open_load16_core ror $2, $2, 8 execute_load_ewram_u16u: translate_region_ewram_load_align16 1, 1, patch_load_u16 load_u16_unaligned (ewram + 0x8000) execute_load_iwram_u16u: translate_region_align 3, 1, 1, patch_load_u16, (iwram + 0x8000), 0x7FFE load_u16_unaligned (iwram + 0x8000) execute_load_io_u16u: translate_region_align 4, 1, 1, patch_load_u16, io_registers, 0x3FE load_u16_unaligned io_registers execute_load_palette_u16u: translate_region_align 5, 1, 1, patch_load_u16, palette_ram, 0x3FE load_u16_unaligned palette_ram execute_load_vram_u16u: translate_region_vram_load_align16 1, 1, patch_load_u16 load_u16_unaligned vram execute_load_oam_u16u: translate_region_align 7, 1, 1, patch_load_u16, oam_ram, 0x3FE load_u16_unaligned oam_ram execute_load_gamepak8_u16u: translate_region_gamepak_align16 8, 1, 1, patch_load_u16 load_u16_unaligned 0 execute_load_gamepak9_u16u: translate_region_gamepak_align16 9, 1, 1, patch_load_u16 load_u16_unaligned 0 execute_load_gamepakA_u16u: translate_region_gamepak_align16 10, 1, 1, patch_load_u16 load_u16_unaligned 0 execute_load_gamepakB_u16u: translate_region_gamepak_align16 11, 1, 1, patch_load_u16 load_u16_unaligned 0 execute_load_gamepakC_u16u: translate_region_gamepak_align16 12, 1, 1, patch_load_u16 load_u16_unaligned 0 execute_load_eeprom_u16u: eeprom_load_align16 1, 1, patch_load_u16 execute_load_backup_u16u: backup_load_align16 1, 1, patch_load_u16 ror $2, $2, 8 # rotate value by 8bits execute_load_open_u16u: open_load16_align16 1, 1, patch_load_u16 ror $2, $2, 8 # rotate value by 8bits load_u16_ftable: # .long execute_load_full_u16 .long execute_load_bios_u16 # 0x00 BIOS .long execute_load_open_u16 # 0x01 open address .long execute_load_ewram_u16 # 0x02 EWRAM .long execute_load_iwram_u16 # 0x03 IWRAM .long execute_load_io_u16 # 0x04 I/O registers .long execute_load_palette_u16 # 0x05 Palette RAM .long execute_load_vram_u16 # 0x06 VRAM .long execute_load_oam_u16 # 0x07 OAM RAM .long execute_load_gamepak8_u16 # 0x08 gamepak .long execute_load_gamepak9_u16 # 0x09 gamepak .long execute_load_gamepakA_u16 # 0x0A gamepak .long execute_load_gamepakB_u16 # 0x0B gamepak .long execute_load_gamepakC_u16 # 0x0C gamepak .long execute_load_eeprom_u16 # 0x0D gamepak/eeprom .long execute_load_backup_u16 # 0x0E Flash ROM/SRAM .long execute_load_open_u16 # 0x0F open .long execute_load_bios_u16u # 0x00 BIOS unaligned .long execute_load_open_u16u # 0x01 open address unaligned .long execute_load_ewram_u16u # 0x02 EWRAM unaligned .long execute_load_iwram_u16u # 0x03 IWRAM unaligned .long execute_load_io_u16u # 0x04 I/O registers unaligned .long execute_load_palette_u16u # 0x05 Palette RAM unaligned .long execute_load_vram_u16u # 0x06 VRAM unaligned .long execute_load_oam_u16u # 0x07 OAM RAM unaligned .long execute_load_gamepak8_u16u# 0x08 gamepak unaligned .long execute_load_gamepak9_u16u# 0x09 gamepak unaligned .long execute_load_gamepakA_u16u# 0x0A gamepak unaligned .long execute_load_gamepakB_u16u# 0x0B gamepak unaligned .long execute_load_gamepakC_u16u# 0x0C gamepak unaligned .long execute_load_eeprom_u16u # 0x0D gamepak/eeprom unaligned .long execute_load_backup_u16u # 0x0E Flash ROM/SRAM unaligned .long execute_load_open_u16u # 0x0F open unaligned .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 .long execute_load_full_u16 patch_load_u16: patch_handler_align load_u16_ftable, 1 # Signed aligned 16bit load handlers execute_load_bios_s16: region_check_align 0, 1, 0, patch_load_s16 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_s16 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ins $2, $4, 0, 2 # bit 1 contributes load_s16 bios_read_protect 2: open_load16_core seh $2, $2 execute_load_ewram_s16: translate_region_ewram_load_align 1, 0, patch_load_s16 load_s16 (ewram + 0x8000) execute_load_s16: execute_load_iwram_s16: translate_region_align 3, 1, 0, patch_load_s16, (iwram + 0x8000), 0x7FFF load_s16 (iwram + 0x8000) execute_load_io_s16: translate_region_align 4, 1, 0, patch_load_s16, io_registers, 0x3FF load_s16 io_registers execute_load_palette_s16: translate_region_align 5, 1, 0, patch_load_s16, palette_ram, 0x3FF load_s16 palette_ram execute_load_vram_s16: translate_region_vram_load_align 1, 0, patch_load_s16 load_s16 vram execute_load_oam_s16: translate_region_align 7, 1, 0, patch_load_s16, oam_ram, 0x3FF load_s16 oam_ram execute_load_gamepak8_s16: translate_region_gamepak_align 8, 1, 0, patch_load_s16 load_s16 0 execute_load_gamepak9_s16: translate_region_gamepak_align 9, 1, 0, patch_load_s16 load_s16 0 execute_load_gamepakA_s16: translate_region_gamepak_align 10, 1, 0, patch_load_s16 load_s16 0 execute_load_gamepakB_s16: translate_region_gamepak_align 11, 1, 0, patch_load_s16 load_s16 0 execute_load_gamepakC_s16: translate_region_gamepak_align 12, 1, 0, patch_load_s16 load_s16 0 execute_load_eeprom_s16: eeprom_load_align 1, 0, patch_load_s16 execute_load_backup_s16: backup_load_align 1, 0, patch_load_s16 nop execute_load_open_s16: open_load16_align 1, 0, patch_load_s16 nop # Signed unaligned 16bit load handlers execute_load_bios_s16u: region_check_align 0, 1, 1, patch_load_s16 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFE # generate offset addu $2, $1, $4 load_s16_unaligned bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address ext $1, $4, 1, 1 ins $2, $1, 1, 1 # bit 1 contributes load_s16_unaligned bios_read_protect 2: open_load16_core seb $2, $2 execute_load_ewram_s16u: translate_region_ewram_load_align16 1, 1, patch_load_s16 load_s16_unaligned (ewram + 0x8000) execute_load_iwram_s16u: translate_region_align 3, 1, 1, patch_load_s16, (iwram + 0x8000), 0x7FFE load_s16_unaligned (iwram + 0x8000) execute_load_io_s16u: translate_region_align 4, 1, 1, patch_load_s16, io_registers, 0x3FE load_s16_unaligned io_registers execute_load_palette_s16u: translate_region_align 5, 1, 1, patch_load_s16, palette_ram, 0x3FE load_s16_unaligned palette_ram execute_load_vram_s16u: translate_region_vram_load_align16 1, 1, patch_load_s16 load_s16_unaligned vram execute_load_oam_s16u: translate_region_align 7, 1, 1, patch_load_s16, oam_ram, 0x3FE load_s16_unaligned oam_ram execute_load_gamepak8_s16u: translate_region_gamepak_align16 8, 1, 1, patch_load_s16 load_s16_unaligned 0 execute_load_gamepak9_s16u: translate_region_gamepak_align16 9, 1, 1, patch_load_s16 load_s16_unaligned 0 execute_load_gamepakA_s16u: translate_region_gamepak_align16 10, 1, 1, patch_load_s16 load_s16_unaligned 0 execute_load_gamepakB_s16u: translate_region_gamepak_align16 11, 1, 1, patch_load_s16 load_s16_unaligned 0 execute_load_gamepakC_s16u: translate_region_gamepak_align16 12, 1, 1, patch_load_s16 load_s16_unaligned 0 execute_load_eeprom_s16u: eeprom_load_align 1, 1, patch_load_s16 execute_load_backup_s16u: backup_load_align 1, 1, patch_load_s16 seb $2, $2 # sign extend result from 8bits execute_load_open_s16u: open_load16_align 1, 1, patch_load_s16 seb $2, $2 # sign extend result from 8bits load_s16_ftable: .long execute_load_bios_s16 # 0x00 BIOS .long execute_load_open_s16 # 0x01 open address .long execute_load_ewram_s16 # 0x02 EWRAM .long execute_load_iwram_s16 # 0x03 IWRAM .long execute_load_io_s16 # 0x04 I/O registers .long execute_load_palette_s16 # 0x05 Palette RAM .long execute_load_vram_s16 # 0x06 VRAM .long execute_load_oam_s16 # 0x07 OAM RAM .long execute_load_gamepak8_s16 # 0x08 gamepak .long execute_load_gamepak9_s16 # 0x09 gamepak .long execute_load_gamepakA_s16 # 0x0A gamepak .long execute_load_gamepakB_s16 # 0x0B gamepak .long execute_load_gamepakC_s16 # 0x0C gamepak .long execute_load_eeprom_s16 # 0x0D gamepak/eeprom .long execute_load_backup_s16 # 0x0E Flash ROM/SRAM .long execute_load_open_s16 # 0x0F open unaligned .long execute_load_bios_s16u # 0x00 BIOS unaligned .long execute_load_open_s16u # 0x01 open address unaligned .long execute_load_ewram_s16u # 0x02 EWRAM unaligned .long execute_load_iwram_s16u # 0x03 IWRAM unaligned .long execute_load_io_s16u # 0x04 I/O registers unaligned .long execute_load_palette_s16u # 0x05 Palette RAM unaligned .long execute_load_vram_s16u # 0x06 VRAM unaligned .long execute_load_oam_s16u # 0x07 OAM RAM unaligned .long execute_load_gamepak8_s16u# 0x08 gamepak unaligned .long execute_load_gamepak9_s16u# 0x09 gamepak unaligned .long execute_load_gamepakA_s16u# 0x0A gamepak unaligned .long execute_load_gamepakB_s16u# 0x0B gamepak unaligned .long execute_load_gamepakC_s16u# 0x0C gamepak unaligned .long execute_load_eeprom_s16u # 0x0D gamepak/eeprom unaligned .long execute_load_backup_s16u # 0x0E Flash ROM/SRAM unaligned .long execute_load_open_s16u # 0x0F open unaligned patch_load_s16: patch_handler_align load_s16_ftable, 1 # Unsigned aligned 32bit load handlers execute_load_bios_u32: region_check_align 0, 2, 0, patch_load_u32 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_u32 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address load_u32 bios_read_protect 2: open_load32_core nop execute_load_ewram_u32: translate_region_ewram_load_align 2, 0, patch_load_u32 load_u32 (ewram + 0x8000) execute_load_u32: execute_load_iwram_u32: translate_region_align 3, 2, 0, patch_load_u32, (iwram + 0x8000), 0x7FFF load_u32 (iwram + 0x8000) execute_load_io_u32: translate_region_align 4, 2, 0, patch_load_u32, io_registers, 0x3FF load_u32 io_registers execute_load_palette_u32: translate_region_align 5, 2, 0, patch_load_u32, palette_ram, 0x3FF load_u32 palette_ram execute_load_vram_u32: translate_region_vram_load_align 2, 0, patch_load_u32 load_u32 vram execute_load_oam_u32: translate_region_align 7, 2, 0, patch_load_u32, oam_ram, 0x3FF load_u32 oam_ram execute_load_gamepak8_u32: translate_region_gamepak_align 8, 2, 0, patch_load_u32 load_u32 0 execute_load_gamepak9_u32: translate_region_gamepak_align 9, 2, 0, patch_load_u32 load_u32 0 execute_load_gamepakA_u32: translate_region_gamepak_align 10, 2, 0, patch_load_u32 load_u32 0 execute_load_gamepakB_u32: translate_region_gamepak_align 11, 2, 0, patch_load_u32 load_u32 0 execute_load_gamepakC_u32: translate_region_gamepak_align 12, 2, 0, patch_load_u32 load_u32 0 execute_load_eeprom_u32: eeprom_load_align 2, 0, patch_load_u32 execute_load_backup_u32: backup_load_align 2, 0, patch_load_u32 nop execute_load_open_u32: open_load32_align 2, 0, patch_load_u32 nop # Unsigned unaligned (by 1) 32bit load handlers execute_load_bios_u32u1: region_check_align 0, 2, 1, patch_load_u32 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFC # generate offset addu $2, $2, $4 load_u32_unaligned bios_rom, 1 1: lui $2, %hi(bios_read_protect) # generate upper address load_u32_unaligned bios_read_protect, 1 2: open_load32_core ror $2, $2, 8 execute_load_ewram_u32u1: translate_region_ewram_load_align32 2, 1, patch_load_u32 load_u32_unaligned (ewram + 0x8000), 1 execute_load_iwram_u32u1: translate_region_align 3, 2, 1, patch_load_u32, (iwram + 0x8000), 0x7FFC load_u32_unaligned (iwram + 0x8000), 1 execute_load_io_u32u1: translate_region_align 4, 2, 1, patch_load_u32, io_registers, 0x3FC load_u32_unaligned io_registers, 1 execute_load_palette_u32u1: translate_region_align 5, 2, 1, patch_load_u32, palette_ram, 0x3FC load_u32_unaligned palette_ram, 1 execute_load_vram_u32u1: translate_region_vram_load_align32 2, 1, patch_load_u32 load_u32_unaligned vram, 1 execute_load_oam_u32u1: translate_region_align 7, 2, 1, patch_load_u32, oam_ram, 0x3FC load_u32_unaligned oam_ram, 1 execute_load_gamepak8_u32u1: translate_region_gamepak_align32 8, 2, 1, patch_load_u32 load_u32_unaligned 0, 1 execute_load_gamepak9_u32u1: translate_region_gamepak_align32 9, 2, 1, patch_load_u32 load_u32_unaligned 0, 1 execute_load_gamepakA_u32u1: translate_region_gamepak_align32 10, 2, 1, patch_load_u32 load_u32_unaligned 0, 1 execute_load_gamepakB_u32u1: translate_region_gamepak_align32 11, 2, 1, patch_load_u32 load_u32_unaligned 0, 1 execute_load_gamepakC_u32u1: translate_region_gamepak_align32 12, 2, 1, patch_load_u32 load_u32_unaligned 0, 1 execute_load_eeprom_u32u1: eeprom_load_align32 2, 1, patch_load_u32 execute_load_backup_u32u1: backup_load_align32 2, 1, patch_load_u32 ror $2, $2, 8 # rotate value by 8bits execute_load_open_u32u1: open_load32_align32 2, 1, patch_load_u32 ror $2, $2, 8 # rotate value by 8bits # Unsigned unaligned (by 2) 32bit load handlers execute_load_bios_u32u2: region_check_align 0, 2, 2, patch_load_u32 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFC # generate offset addu $2, $2, $4 load_u32_unaligned bios_rom, 2 1: lui $2, %hi(bios_read_protect) # generate upper address load_u32_unaligned bios_read_protect, 2 2: open_load32_core ror $2, $2, 16 execute_load_ewram_u32u2: translate_region_ewram_load_align32 2, 2, patch_load_u32 load_u32_unaligned (ewram + 0x8000), 2 execute_load_iwram_u32u2: translate_region_align 3, 2, 2, patch_load_u32, (iwram + 0x8000), 0x7FFC load_u32_unaligned (iwram + 0x8000), 2 execute_load_io_u32u2: translate_region_align 4, 2, 2, patch_load_u32, io_registers, 0x3FC load_u32_unaligned io_registers, 2 execute_load_palette_u32u2: translate_region_align 5, 2, 2, patch_load_u32, palette_ram, 0x3FC load_u32_unaligned palette_ram, 2 execute_load_vram_u32u2: translate_region_vram_load_align32 2, 2, patch_load_u32 load_u32_unaligned vram, 2 execute_load_oam_u32u2: translate_region_align 7, 2, 2, patch_load_u32, oam_ram, 0x3FC load_u32_unaligned oam_ram, 2 execute_load_gamepak8_u32u2: translate_region_gamepak_align32 8, 2, 2, patch_load_u32 load_u32_unaligned 0, 2 execute_load_gamepak9_u32u2: translate_region_gamepak_align32 9, 2, 2, patch_load_u32 load_u32_unaligned 0, 2 execute_load_gamepakA_u32u2: translate_region_gamepak_align32 10, 2, 2, patch_load_u32 load_u32_unaligned 0, 2 execute_load_gamepakB_u32u2: translate_region_gamepak_align32 11, 2, 2, patch_load_u32 load_u32_unaligned 0, 2 execute_load_gamepakC_u32u2: translate_region_gamepak_align32 12, 2, 2, patch_load_u32 load_u32_unaligned 0, 2 execute_load_eeprom_u32u2: eeprom_load_align32 2, 2, patch_load_u32 execute_load_backup_u32u2: backup_load_align32 2, 2, patch_load_u32 ror $2, $2, 16 # rotate value by 16bits execute_load_open_u32u2: open_load32_align32 2, 2, patch_load_u32 ror $2, $2, 16 # rotate value by 16bits # Unsigned unaligned (by 1) 32bit load handlers execute_load_bios_u32u3: region_check_align 0, 2, 3, patch_load_u32 srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFC # generate offset addu $2, $2, $4 load_u32_unaligned bios_rom, 3 1: lui $2, %hi(bios_read_protect) # generate upper address load_u32_unaligned bios_read_protect, 3 2: open_load32_core ror $2, $2, 24 execute_load_ewram_u32u3: translate_region_ewram_load_align32 2, 3, patch_load_u32 load_u32_unaligned (ewram + 0x8000), 3 execute_load_iwram_u32u3: translate_region_align 3, 2, 3, patch_load_u32, (iwram + 0x8000), 0x7FFC load_u32_unaligned (iwram + 0x8000), 3 execute_load_io_u32u3: translate_region_align 4, 2, 3, patch_load_u32, io_registers, 0x3FC load_u32_unaligned io_registers, 3 execute_load_palette_u32u3: translate_region_align 5, 2, 3, patch_load_u32, palette_ram, 0x3FC load_u32_unaligned palette_ram, 3 execute_load_vram_u32u3: translate_region_vram_load_align32 2, 3, patch_load_u32 load_u32_unaligned vram, 3 execute_load_oam_u32u3: translate_region_align 7, 2, 3, patch_load_u32, oam_ram, 0x3FC load_u32_unaligned oam_ram, 3 execute_load_gamepak8_u32u3: translate_region_gamepak_align32 8, 2, 3, patch_load_u32 load_u32_unaligned 0, 3 execute_load_gamepak9_u32u3: translate_region_gamepak_align32 9, 2, 3, patch_load_u32 load_u32_unaligned 0, 3 execute_load_gamepakA_u32u3: translate_region_gamepak_align32 10, 2, 3, patch_load_u32 load_u32_unaligned 0, 3 execute_load_gamepakB_u32u3: translate_region_gamepak_align32 11, 2, 3, patch_load_u32 load_u32_unaligned 0, 3 execute_load_gamepakC_u32u3: translate_region_gamepak_align32 12, 2, 3, patch_load_u32 load_u32_unaligned 0, 3 execute_load_eeprom_u32u3: eeprom_load_align32 2, 3, patch_load_u32 execute_load_backup_u32u3: backup_load_align32 2, 3, patch_load_u32 ror $2, $2, 24 # rotate value by 24bits execute_load_open_u32u3: open_load32_align32 2, 3, patch_load_u32 ror $2, $2, 24 # rotate value by 24bits load_u32_ftable: .long execute_load_bios_u32 # 0x00 BIOS .long execute_load_open_u32 # 0x01 open address .long execute_load_ewram_u32 # 0x02 EWRAM .long execute_load_iwram_u32 # 0x03 IWRAM .long execute_load_io_u32 # 0x04 I/O registers .long execute_load_palette_u32 # 0x05 Palette RAM .long execute_load_vram_u32 # 0x06 VRAM .long execute_load_oam_u32 # 0x07 OAM RAM .long execute_load_gamepak8_u32 # 0x08 gamepak .long execute_load_gamepak9_u32 # 0x09 gamepak .long execute_load_gamepakA_u32 # 0x0A gamepak .long execute_load_gamepakB_u32 # 0x0B gamepak .long execute_load_gamepakC_u32 # 0x0C gamepak .long execute_load_eeprom_u32 # 0x0D gamepak/eeprom .long execute_load_backup_u32 # 0x0E Flash ROM/SRAM .long execute_load_open_u32 # 0x0F open .long execute_load_bios_u32u1 # 0x00 BIOS unaligned (1b) .long execute_load_open_u32u1 # 0x01 open address unaligned (1b) .long execute_load_ewram_u32u1 # 0x02 EWRAM unaligned (1b) .long execute_load_iwram_u32u1 # 0x03 IWRAM unaligned (1b) .long execute_load_io_u32u1 # 0x04 I/O registers unaligned (1b) .long execute_load_palette_u32u1 # 0x05 Palette RAM unaligned (1b) .long execute_load_vram_u32u1 # 0x06 VRAM unaligned (1b) .long execute_load_oam_u32u1 # 0x07 OAM RAM unaligned (1b) .long execute_load_gamepak8_u32u1 # 0x08 gamepak unaligned (1b) .long execute_load_gamepak9_u32u1 # 0x09 gamepak unaligned (1b) .long execute_load_gamepakA_u32u1 # 0x0A gamepak unaligned (1b) .long execute_load_gamepakB_u32u1 # 0x0B gamepak unaligned (1b) .long execute_load_gamepakC_u32u1 # 0x0C gamepak unaligned (1b) .long execute_load_eeprom_u32u1 # 0x0D gamepak/eeprom unaligned (1b) .long execute_load_backup_u32u1 # 0x0E Flash ROM/SRAM unaligned (1b) .long execute_load_open_u32u1 # 0x0F open unaligned (1b) .long execute_load_bios_u32u2 # 0x00 BIOS unaligned (2b) .long execute_load_open_u32u2 # 0x01 open address unaligned (2b) .long execute_load_ewram_u32u2 # 0x02 EWRAM unaligned (2b) .long execute_load_iwram_u32u2 # 0x03 IWRAM unaligned (2b) .long execute_load_io_u32u2 # 0x04 I/O registers unaligned (2b) .long execute_load_palette_u32u2 # 0x05 Palette RAM unaligned (2b) .long execute_load_vram_u32u2 # 0x06 VRAM unaligned (2b) .long execute_load_oam_u32u2 # 0x07 OAM RAM unaligned (2b) .long execute_load_gamepak8_u32u2 # 0x08 gamepak unaligned (2b) .long execute_load_gamepak9_u32u2 # 0x09 gamepak unaligned (2b) .long execute_load_gamepakA_u32u2 # 0x0A gamepak unaligned (2b) .long execute_load_gamepakB_u32u2 # 0x0B gamepak unaligned (2b) .long execute_load_gamepakC_u32u2 # 0x0C gamepak unaligned (2b) .long execute_load_eeprom_u32u2 # 0x0D gamepak/eeprom unaligned (2b) .long execute_load_backup_u32u2 # 0x0E Flash ROM/SRAM unaligned (2b) .long execute_load_open_u32u2 # 0x0F open unaligned (2b) .long execute_load_bios_u32u3 # 0x00 BIOS unaligned (3b) .long execute_load_open_u32u3 # 0x01 open address unaligned (3b) .long execute_load_ewram_u32u3 # 0x02 EWRAM unaligned (3b) .long execute_load_iwram_u32u3 # 0x03 IWRAM unaligned (3b) .long execute_load_io_u32u3 # 0x04 I/O registers unaligned (3b) .long execute_load_palette_u32u3 # 0x05 Palette RAM unaligned (3b) .long execute_load_vram_u32u3 # 0x06 VRAM unaligned (3b) .long execute_load_oam_u32u3 # 0x07 OAM RAM unaligned (3b) .long execute_load_gamepak8_u32u3 # 0x08 gamepak unaligned (3b) .long execute_load_gamepak9_u32u3 # 0x09 gamepak unaligned (3b) .long execute_load_gamepakA_u32u3 # 0x0A gamepak unaligned (3b) .long execute_load_gamepakB_u32u3 # 0x0B gamepak unaligned (3b) .long execute_load_gamepakC_u32u3 # 0x0C gamepak unaligned (3b) .long execute_load_eeprom_u32u3 # 0x0D gamepak/eeprom unaligned (3b) .long execute_load_backup_u32u3 # 0x0E Flash ROM/SRAM unaligned (3b) .long execute_load_open_u32u3 # 0x0F open unaligned (3b) patch_load_u32: patch_handler_align load_u32_ftable, 2 # Unsigned always aligned 32bit load handlers execute_load_bios_u32a: region_check 0, patch_load_u32a srl $2, $4, 14 # check if address is in BIOS region bne $2, $0, 2f # if not, perform open read srl $1, $5, 14 # check if PC is in BIOS region bne $1, $0, 1f # if not, perform BIOS protected read lui $2, %hi(bios_rom) # generate upper address (delay) andi $4, $4, 0x3FFF # generate offset addu $2, $2, $4 load_u32 bios_rom 1: lui $2, %hi(bios_read_protect) # generate upper address load_u32 bios_read_protect 2: open_load32_a nop execute_load_ewram_u32a: translate_region_ewram patch_load_u32a load_u32 (ewram + 0x8000) execute_aligned_load32: execute_load_iwram_u32a: translate_region 3, patch_load_u32a, (iwram + 0x8000), 0x7FFF load_u32 (iwram + 0x8000) execute_load_io_u32a: translate_region 4, patch_load_u32a, io_registers, 0x3FF load_u32 io_registers execute_load_palette_u32a: translate_region 5, patch_load_u32a, palette_ram, 0x3FF load_u32 palette_ram execute_load_vram_u32a: translate_region_vram patch_load_u32a load_u32 vram execute_load_oam_u32a: translate_region 7, patch_load_u32a, oam_ram, 0x3FF load_u32 oam_ram execute_load_gamepak8_u32a: translate_region_gamepak_a 8, patch_load_u32a load_u32 0 execute_load_gamepak9_u32a: translate_region_gamepak_a 9, patch_load_u32a load_u32 0 execute_load_gamepakA_u32a: translate_region_gamepak_a 10, patch_load_u32a load_u32 0 execute_load_gamepakB_u32a: translate_region_gamepak_a 11, patch_load_u32a load_u32 0 execute_load_gamepakC_u32a: translate_region_gamepak_a 12, patch_load_u32a load_u32 0 execute_load_eeprom_u32a: eeprom_load_a patch_load_u32a execute_load_backup_u32a: backup_load_a patch_load_u32a nop execute_load_open_u32a: open_load32_a patch_load_u32a load_u32a_ftable: .long execute_load_bios_u32a # 0x00 BIOS unaligned (3b) .long execute_load_open_u32a # 0x01 open address unaligned (3b) .long execute_load_ewram_u32a # 0x02 EWRAM unaligned (3b) .long execute_load_iwram_u32a # 0x03 IWRAM unaligned (3b) .long execute_load_io_u32a # 0x04 I/O registers unaligned (3b) .long execute_load_palette_u32a # 0x05 Palette RAM unaligned (3b) .long execute_load_vram_u32a # 0x06 VRAM unaligned (3b) .long execute_load_oam_u32a # 0x07 OAM RAM unaligned (3b) .long execute_load_gamepak8_u32a # 0x08 gamepak unaligned (3b) .long execute_load_gamepak9_u32a # 0x09 gamepak unaligned (3b) .long execute_load_gamepakA_u32a # 0x0A gamepak unaligned (3b) .long execute_load_gamepakB_u32a # 0x0B gamepak unaligned (3b) .long execute_load_gamepakC_u32a # 0x0C gamepak unaligned (3b) .long execute_load_eeprom_u32a # 0x0D gamepak/eeprom unaligned (3b) .long execute_load_backup_u32a # 0x0E Flash ROM/SRAM unaligned (3b) .long execute_load_open_u32a # 0x0F open unaligned (3b) patch_load_u32a: patch_handler load_u32a_ftable, 1 # Unsigned 8bit store handlers execute_store_ignore0_u8: ignore_region 0, patch_store_u8 execute_store_ignore1_u8: ignore_region 1, patch_store_u8 execute_store_ewram_u8: translate_region_ewram patch_store_u8 store_u8_smc (ewram + 0x8000) execute_store_u8: execute_store_iwram_u8: translate_region 3, patch_store_u8, (iwram + 0x8000), 0x7FFF store_u8_smc (iwram + 0x8000) execute_store_io_u8: region_check 4, patch_store_u8 andi $5, $5, 0xFF # make value 8bit andi $4, $4, 0x3FF # wrap around address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register8 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop execute_store_palette_u8: region_check 5, patch_store_u8 lui $2, %hi(palette_ram) # start loading palette_ram address (delay) ins $5, $5, 8, 8 # double value andi $4, $4, 0x3FE # align palette address addu $2, $2, $4 sh $5, %lo(palette_ram)($2) # palette_ram[address] = value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 lui $2, %hi(palette_ram_converted) addu $2, $2, $4 jr $ra # return sh $1, %lo(palette_ram_converted)($2) execute_store_vram_u8: translate_region_vram_store_align16 patch_store_u8 store_u8_double vram execute_store_oam_u8: translate_region 7, patch_store_u8, oam_ram, 0x3FE lui $1, %hi(oam_update) # write non-zero to oam_update sw $1, %lo(oam_update)($1) # cheap, but this is non-zero store_u8_double oam_ram execute_store_ignore8_u8: ignore_region 8, patch_store_u8 execute_store_ignore9_u8: ignore_region 9, patch_store_u8 execute_store_ignoreA_u8: ignore_region 10, patch_store_u8 execute_store_ignoreB_u8: ignore_region 11, patch_store_u8 execute_store_ignoreC_u8: ignore_region 12, patch_store_u8 execute_store_eeprom_u8: store_function write_eeprom, 13, patch_store_u8, 0x3FF execute_store_backup_u8: store_function write_backup, 14, patch_store_u8, 0xFFFF execute_store_ignoreF_u8: ignore_high patch_store_u8 store_u8_ftable: .long execute_store_ignore0_u8 # 0x00 BIOS .long execute_store_ignore1_u8 # 0x01 open address .long execute_store_ewram_u8 # 0x02 EWRAM .long execute_store_iwram_u8 # 0x03 IWRAM .long execute_store_io_u8 # 0x04 I/O registers .long execute_store_palette_u8 # 0x05 Palette RAM .long execute_store_vram_u8 # 0x06 VRAM .long execute_store_oam_u8 # 0x07 OAM RAM .long execute_store_ignore8_u8 # 0x08 gamepak .long execute_store_ignore9_u8 # 0x09 gamepak .long execute_store_ignoreA_u8 # 0x0A gamepak .long execute_store_ignoreB_u8 # 0x0B gamepak .long execute_store_ignoreC_u8 # 0x0C gamepak .long execute_store_eeprom_u8 # 0x0D gamepak/eeprom .long execute_store_backup_u8 # 0x0E Flash ROM/SRAM .long execute_store_ignoreF_u8 # 0x0F open address patch_store_u8: patch_handler store_u8_ftable, 0x0F # Unsigned 16bit store handlers execute_store_ignore0_u16: ignore_region 0, patch_store_u16 execute_store_ignore1_u16: ignore_region 1, patch_store_u16 execute_store_ewram_u16: translate_region_ewram_store_align16 patch_store_u16 store_u16_smc (ewram + 0x8000) execute_store_u16: execute_store_iwram_u16: translate_region 3, patch_store_u16, (iwram + 0x8000), 0x7FFE store_u16_smc (iwram + 0x8000) execute_store_io_u16: region_check 4, patch_store_u16 andi $5, $5, 0xFFFF # make value 16bit andi $4, $4, 0x3FE # wrap around/align address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register16 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop execute_store_palette_u16: region_check 5, patch_store_u16 lui $2, %hi(palette_ram) # start loading palette_ram address (delay) andi $4, $4, 0x3FE # wrap/align palette address addu $2, $2, $4 sh $5, %lo(palette_ram)($2) # palette_ram[address] = value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 lui $2, %hi(palette_ram_converted) addu $2, $2, $4 jr $ra # return sh $1, %lo(palette_ram_converted)($2) execute_store_vram_u16: translate_region_vram_store_align16 patch_store_u16 store_u16 vram execute_store_oam_u16: translate_region 7, patch_store_u16, oam_ram, 0x3FE lui $1, %hi(oam_update) # write non-zero to oam_update sw $1, %lo(oam_update)($1) # cheap, but this is non-zero store_u16 oam_ram execute_store_rtc_u16: store_function write_rtc, 8, patch_store_u16, 0xFE execute_store_ignore9_u16: ignore_region 9, patch_store_u16 execute_store_ignoreA_u16: ignore_region 10, patch_store_u16 execute_store_ignoreB_u16: ignore_region 11, patch_store_u16 execute_store_ignoreC_u16: ignore_region 12, patch_store_u16 execute_store_eeprom_u16: store_function write_eeprom, 13, patch_store_u16, 0x3FE execute_store_ignoreE_u16: ignore_region 14, patch_store_u16 execute_store_ignoreF_u16: ignore_high patch_store_u16 store_u16_ftable: .long execute_store_ignore0_u16 # 0x00 BIOS .long execute_store_ignore1_u16 # 0x01 open address .long execute_store_ewram_u16 # 0x02 EWRAM .long execute_store_iwram_u16 # 0x03 IWRAM .long execute_store_io_u16 # 0x04 I/O registers .long execute_store_palette_u16 # 0x05 Palette RAM .long execute_store_vram_u16 # 0x06 VRAM .long execute_store_oam_u16 # 0x07 OAM RAM .long execute_store_rtc_u16 # 0x08 gamepak .long execute_store_ignore9_u16 # 0x09 gamepak .long execute_store_ignoreA_u16 # 0x0A gamepak .long execute_store_ignoreB_u16 # 0x0B gamepak .long execute_store_ignoreC_u16 # 0x0C gamepak .long execute_store_eeprom_u16 # 0x0D gamepak/eeprom .long execute_store_ignoreE_u16 # 0x0E Flash ROM/SRAM .long execute_store_ignoreF_u16 # 0x0F open address patch_store_u16: patch_handler store_u16_ftable, 0x0F # Unsigned 32bit store handlers execute_store_ignore0_u32: ignore_region 0, patch_store_u32 execute_store_ignore1_u32: ignore_region 1, patch_store_u32 execute_store_ewram_u32: translate_region_ewram_store_align32 patch_store_u32 store_u32_smc (ewram + 0x8000) execute_store_u32: execute_store_iwram_u32: translate_region 3, patch_store_u32, (iwram + 0x8000), 0x7FFC store_u32_smc (iwram + 0x8000) execute_store_io_u32: region_check 4, patch_store_u32 nop andi $4, $4, 0x3FC # wrap around/align address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register32 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop execute_store_palette_u32: region_check 5, patch_store_u32 lui $2, %hi(palette_ram) # start loading palette_ram address (delay) andi $4, $4, 0x3FC # wrap/align palette address addu $2, $2, $4 sw $5, %lo(palette_ram)($2) # palette_ram[address] = value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 lui $2, %hi(palette_ram_converted) addu $2, $2, $4 addiu $2, $2, %lo(palette_ram_converted) sh $1, ($2) srl $5, $5, 16 # shift down to next palette value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 jr $ra # return sh $1, 2($2) execute_store_vram_u32: translate_region_vram_store_align32 patch_store_u32 store_u32 vram execute_store_oam_u32: translate_region 7, patch_store_u32, oam_ram, 0x3FC lui $1, %hi(oam_update) # write non-zero to oam_update sw $1, %lo(oam_update)($1) # cheap, but this is non-zero store_u32 oam_ram execute_store_ignore8_u32: ignore_region 8, patch_store_u32 execute_store_ignore9_u32: ignore_region 9, patch_store_u32 execute_store_ignoreA_u32: ignore_region 10, patch_store_u32 execute_store_ignoreB_u32: ignore_region 11, patch_store_u32 execute_store_ignoreC_u32: ignore_region 12, patch_store_u32 execute_store_eeprom_u32: store_function write_eeprom, 13, patch_store_u32, 0x3FC execute_store_ignoreE_u32: ignore_region 14, patch_store_u32 execute_store_ignoreF_u32: ignore_high patch_store_u32 store_u32_ftable: .long execute_store_ignore0_u32 # 0x00 BIOS .long execute_store_ignore1_u32 # 0x01 open address .long execute_store_ewram_u32 # 0x02 EWRAM .long execute_store_iwram_u32 # 0x03 IWRAM .long execute_store_io_u32 # 0x04 I/O registers .long execute_store_palette_u32 # 0x05 Palette RAM .long execute_store_vram_u32 # 0x06 VRAM .long execute_store_oam_u32 # 0x07 OAM RAM .long execute_store_ignore8_u32 # 0x08 gamepak .long execute_store_ignore9_u32 # 0x09 gamepak .long execute_store_ignoreA_u32 # 0x0A gamepak .long execute_store_ignoreB_u32 # 0x0B gamepak .long execute_store_ignoreC_u32 # 0x0C gamepak .long execute_store_eeprom_u32 # 0x0D gamepak/eeprom .long execute_store_ignoreE_u32 # 0x0E Flash ROM/SRAM .long execute_store_ignoreF_u32 # 0x0F open address patch_store_u32: patch_handler store_u32_ftable, 0x0F # Unsigned always aligned, a2 safe 32bit store handlers execute_store_ignore0_u32a: ignore_region 0, patch_store_u32a execute_store_ignore1_u32a: ignore_region 1, patch_store_u32a execute_store_ewram_u32a: translate_region_ewram_store_align32 patch_store_u32a store_u32 (ewram + 0x8000) execute_aligned_store32: execute_store_iwram_u32a: translate_region 3, patch_store_u32a, (iwram + 0x8000), 0x7FFC store_u32 (iwram + 0x8000) execute_store_io_u32a: region_check 4, patch_store_u32a nop sw $6, REG_SAVE($16) # save a2 sw $ra, REG_SAVE2($16) # save ra andi $4, $4, 0x3FC # wrap around/align address save_registers jal write_io_register32 # write the value out nop restore_registers lw $ra, REG_SAVE2($16) # restore ra jr $ra lw $6, REG_SAVE($16) # restore a2 execute_store_palette_u32a: region_check 5, patch_store_u32a lui $2, %hi(palette_ram) # start loading palette_ram address (delay) andi $4, $4, 0x3FC # wrap/align palette address addu $2, $2, $4 sw $5, %lo(palette_ram)($2) # palette_ram[address] = value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 lui $2, %hi(palette_ram_converted) addu $2, $2, $4 addiu $2, $2, %lo(palette_ram_converted) sh $1, ($2) srl $5, $5, 16 # shift down to next palette value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 jr $ra # return sh $1, 2($2) execute_store_vram_u32a: translate_region_vram_store_align32 patch_store_u32a store_u32 vram execute_store_oam_u32a: translate_region 7, patch_store_u32a, oam_ram, 0x3FC lui $1, %hi(oam_update) # write non-zero to oam_update sw $1, %lo(oam_update)($1) # cheap, but this is non-zero store_u32 oam_ram execute_store_ignore8_u32a: ignore_region 8, patch_store_u32a execute_store_ignore9_u32a: ignore_region 9, patch_store_u32a execute_store_ignoreA_u32a: ignore_region 10, patch_store_u32a execute_store_ignoreB_u32a: ignore_region 11, patch_store_u32a execute_store_ignoreC_u32a: ignore_region 12, patch_store_u32a execute_store_eeprom_u32a: store_function_a write_eeprom, 13, patch_store_u32a, 0x3FC execute_store_ignoreE_u32a: ignore_region 14, patch_store_u32a execute_store_ignoreF_u32a: ignore_high patch_store_u32a store_u32a_ftable: .long execute_store_ignore0_u32a# 0x00 BIOS .long execute_store_ignore1_u32a# 0x01 open address .long execute_store_ewram_u32a # 0x02 EWRAM .long execute_store_iwram_u32a # 0x03 IWRAM .long execute_store_io_u32a # 0x04 I/O registers .long execute_store_palette_u32a# 0x05 Palette RAM .long execute_store_vram_u32a # 0x06 VRAM .long execute_store_oam_u32a # 0x07 OAM RAM .long execute_store_ignore8_u32a# 0x08 gamepak .long execute_store_ignore9_u32a# 0x09 gamepak .long execute_store_ignoreA_u32a# 0x0A gamepak .long execute_store_ignoreB_u32a# 0x0B gamepak .long execute_store_ignoreC_u32a# 0x0C gamepak .long execute_store_eeprom_u32a # 0x0D gamepak/eeprom .long execute_store_ignoreE_u32a# 0x0E Flash ROM/SRAM .long execute_store_ignoreF_u32a# 0x0F open address patch_store_u32a: patch_handler store_u32a_ftable, 0x0F #execute_load_u8: execute_load_full_u8: srl $1, $4, 28 # check if the address is out of range bne $1, $0, ext_load_u8 # if it is, perform an extended read srl $2, $4, 15 # $1 = page number of address sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($2) beq $1, $0, ext_load_u8 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lbu $2, ($1) # read the value ext_load_u8: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) # store return address save_registers jal read_memory8 # read the value nop restore_registers lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 4 # fix stack (delay slot) #execute_load_s8: execute_load_full_s8: srl $1, $4, 28 # check if the address is out of range bne $1, $0, ext_load_s8 # if it is, perform an extended read srl $2, $4, 15 # $1 = page number of address sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($2) beq $1, $0, ext_load_s8 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lb $2, ($1) # read the value ext_load_s8: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) # store return address save_registers jal read_memory8 # read the value nop restore_registers seb $2, $2 # sign extend the read value lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 4 # fix stack (delay slot) #execute_load_u16: execute_load_full_u16: srl $1, $4, 28 # check if the address is out of range ins $1, $4, 4, 1 # or unaligned (bottom bit) bne $1, $0, ext_load_u16 # if it is, perform an extended read srl $2, $4, 15 # $1 = page number of address sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($2) beq $1, $0, ext_load_u16 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lhu $2, ($1) # read the value ext_load_u16: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) # store return address save_registers jal read_memory16 # read the value nop restore_registers lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 4 # fix stack (delay slot) #execute_load_s16: execute_load_full_s16: srl $1, $4, 28 # check if the address is out of range ins $1, $4, 4, 1 # or unaligned (bottom bit) bne $1, $0, ext_load_s16 # if it is, perform an extended read srl $2, $4, 15 # $1 = page number of address sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($2) beq $1, $0, ext_load_s16 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lh $2, ($1) # read the value ext_load_s16: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) # store return address save_registers jal read_memory16_signed # read the value nop restore_registers seh $2, $2 # sign extend the return value lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 4 # fix stack (delay slot) #execute_load_u32: execute_load_full_u32: srl $1, $4, 28 # check if the address is out of range ins $1, $4, 4, 2 # or unaligned (bottom two bits) bne $1, $0, ext_load_u32 # if it is, perform an extended read srl $2, $4, 15 # $1 = page number of address sll $2, $2, 2 # adjust to word index addu $2, $2, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($2) beq $1, $0, ext_load_u32 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lw $2, ($1) # read the value ext_load_u32: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) # store return address save_registers jal read_memory32 # read the value nop restore_registers lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 4 # fix stack (delay slot) #execute_aligned_load32: srl $2, $4, 28 # check if the address is out of range bne $2, $0, ext_aligned_load32 # if it is, perform an extended load srl $1, $4, 15 # $1 = page number of address sll $1, $1, 2 # adjust to word index addu $1, $1, $16 # $1 = memory_map_read[address >> 15] lw $1, -32768($1) beq $1, $0, ext_aligned_load32 # if it's NULL perform an extended read andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return lw $2, ($1) # read the value ext_aligned_load32: addiu $sp, $sp, -8 # make room on the stack for $ra sw $6, 4($sp) sw $ra, ($sp) # store return address save_registers jal read_memory32 # read the value nop restore_registers lw $6, 4($sp) lw $ra, ($sp) # restore return address jr $ra # return addiu $sp, $sp, 8 # fix stack (delay slot) # General ext memory routines ext_store_ignore: jr $ra # ignore these writes nop write_io_epilogue: beq $2, $0, no_alert # 0 means nothing happened addiu $4, $2, -2 # see if return value is 2 (delay slot) beq $4, $0, smc_dma # is it an SMC alert? (return value = 2) nop addiu $4, $2, -3 # see if return value is 3 beq $4, $0, irq_alert # is it an IRQ alert? (return value = 3) nop collapse_flags # make sure flags are good for update_gba alert_loop: jal update_gba # process the next event nop lw $1, CPU_HALT_STATE($16) # check if CPU is sleeping bne $1, $0, alert_loop # see if it hasn't changed nop addu $17, $2, $0 # $17 = new cycle counter lw $4, REG_PC($16) # $4 = new PC j lookup_pc addiu $sp, $sp, 4 # fix the stack (delay slot) irq_alert: restore_registers j lookup_pc # PC has changed, get a new one addiu $sp, $sp, 4 # fix the stack no_alert: restore_registers lw $ra, ($sp) # restore return address jr $ra # we can return addiu $sp, $sp, 4 # fix the stack smc_dma: addiu $sp, $sp, 4 # fix the stack jal flush_translation_cache_ram # flush translation cache nop j lookup_pc nop ext_store_eeprom: addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_eeprom # write the value out sw $6, REG_PC($16) # save the PC (delay slot) restore_registers lw $ra, ($sp) # restore return address jr $ra # we can return addiu $sp, $sp, 4 # fix the stack # 8bit ext memory routines ext_store_io8: andi $5, $5, 0xFF # make value 8bit andi $4, $4, 0x3FF # wrap around address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register8 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop ext_store_palette8: j ext_store_palette16b # perform 16bit palette write andi $4, $4, 0x3FE # wrap + align (delay) ext_store_vram8: ins $5, $5, 8, 8 # value = (value << 8) | value ext $4, $4, 0, 17 # address = adress & 0x1FFFF ins $4, $0, 0, 1 # align out bottom bit lui $1, %hi(0x18000) # $1 = 0x18000 sltu $1, $4, $1 # see if address < 0x18000 bne $1, $0, ext_store_vram8b lui $2, %hi(vram) # start loading vram address (delay) addiu $4, $4, -0x8000 # move address into VRAM region ext_store_vram8b: addu $2, $2, $4 # $2 = (hi)vram + address jr $ra # return sh $5, %lo(vram)($2) # vram[address] = value (delay) ext_store_oam8: lui $1, %hi(oam_update) # $1 = oam_update addiu $1, %lo(oam_update) li $2, 1 # $2 = 1 sw $2, ($1) # *oam_update = 1 andi $4, $4, 0x3FE # wrap around address and align to 16bits ins $5, $5, 8, 8 # value = (value << 8) | value lui $1, %hi(oam_ram) # $1 = (hi)oam_ram addu $1, $1, $4 # $1 = (hi)oam_ram + address jr $ra # return sh $5, %lo(oam_ram)($1) # oam_ram[address] = value (delay) ext_store_backup: andi $5, $5, 0xFF # make value 8bit andi $4, $4, 0xFFFF # mask value addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_backup # write the value out sw $6, REG_PC($16) # save the PC (delay slot) restore_registers lw $ra, ($sp) # restore return address jr $ra # we can return addiu $sp, $sp, 4 # fix the stack ext_store_u8_jtable: .long ext_store_ignore # 0x00 BIOS .long ext_store_ignore # 0x01 invalid .long ext_store_ignore # 0x02 EWRAM .long ext_store_ignore # 0x03 IWRAM .long ext_store_io8 # 0x04 I/O registers .long ext_store_palette8 # 0x05 Palette RAM .long ext_store_vram8 # 0x06 VRAM .long ext_store_oam8 # 0x07 OAM RAM .long ext_store_ignore # 0x08 gamepak (no RTC accepted in 8bit) .long ext_store_ignore # 0x09 gamepak, ignore .long ext_store_ignore # 0x0A gamepak, ignore .long ext_store_ignore # 0x0B gamepak, ignore .long ext_store_ignore # 0x0C gamepak, ignore .long ext_store_eeprom # 0x0D EEPROM (possibly) .long ext_store_backup # 0x0E Flash ROM/SRAM .long ext_store_ignore # 0x0F invalid ext_store_u8: srl $1, $4, 24 # $1 = address >> 24 sltu $2, $1, 16 # check if the value is out of range beq $2, $0, ext_store_ignore sll $1, $1, 2 # make address word indexed (delay) lui $2, %hi(ext_store_u8_jtable) addu $2, $2, $1 # $2 = ext_store_u8_jtable[address >> 24] lw $2, %lo(ext_store_u8_jtable)($2) jr $2 # jump to table location nop # $4: address to write to # $5: value to write # $6: current PC #execute_store_u8: srl $1, $4, 28 # check if the address is out of range bne $1, $0, ext_store_u8 # if it is, perform an extended write srl $2, $4, 15 # $1 = page number of address (delay slot) sll $2, $2, 2 # adjust to word index addu $2, $2, $16 lw $1, 256($2) # $1 = memory_map_write[address >> 15] beq $1, $0, ext_store_u8 # if it's NULL perform an extended write andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset lb $2, -32768($1) # load the SMC status bne $2, $0, smc_write # is there code there? sb $5, ($1) # store the value (delay slot) jr $ra # return nop # 16bit ext memory routines ext_store_io16: andi $4, $4, 0x3FF # wrap around address andi $5, $5, 0xFFFF # make value 16bit addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register16 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop ext_store_palette16: andi $4, 0x3FF # wrap address ext_store_palette16b: lui $2, %hi(palette_ram) addu $2, $2, $4 sh $5, %lo(palette_ram)($2) # palette_ram[address] = value sll $1, $5, 1 # make green 6bits ins $1, $0, 0, 6 # make bottom bit 0 ins $1, $5, 0, 5 # insert red channel into $1 lui $2, %hi(palette_ram_converted) addu $2, $2, $4 jr $ra # return sh $1, %lo(palette_ram_converted)($2) ext_store_vram16: ext $4, $4, 0, 17 # address = adress & 0x1FFFF lui $1, %hi(0x18000) # $1 = 0x18000 sltu $1, $4, $1 # see if address < 0x18000 bne $1, $0, ext_store_vram16b lui $2, %hi(vram) # start loading vram address (delay) addiu $4, $4, -0x8000 # move address into VRAM region ext_store_vram16b: addu $2, $2, $4 # $2 = (hi)vram + address jr $ra # return sh $5, %lo(vram)($2) # vram[address] = value (delay) ext_store_oam16: lui $1, %hi(oam_update) # $1 = oam_update addiu $1, %lo(oam_update) li $2, 1 # $2 = 1 sw $2, ($1) # *oam_update = 1 andi $4, $4, 0x3FF # wrap around address lui $1, %hi(oam_ram) # $1 = (hi)oam_ram addu $1, $1, $4 # $1 = (hi)oam_ram + address jr $ra # return sh $5, %lo(oam_ram)($1) # oam_ram[address] = value (delay) ext_store_rtc: andi $5, $5, 0xFFFF # make value 16bit addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_rtc # write the value out sw $6, REG_PC($16) # save the PC (delay slot) restore_registers lw $ra, ($sp) # restore return address jr $ra # we can return addiu $sp, $sp, 4 # fix the stack ext_store_u16_jtable: .long ext_store_ignore # 0x00 BIOS, ignore .long ext_store_ignore # 0x01 invalid, ignore .long ext_store_ignore # 0x02 EWRAM, should have been hit already .long ext_store_ignore # 0x03 IWRAM, should have been hit already .long ext_store_io16 # 0x04 I/O registers .long ext_store_palette16 # 0x05 Palette RAM .long ext_store_vram16 # 0x06 VRAM .long ext_store_oam16 # 0x07 OAM RAM .long ext_store_rtc # 0x08 gamepak, RTC .long ext_store_ignore # 0x09 gamepak, ignore .long ext_store_ignore # 0x0A gamepak, ignore .long ext_store_ignore # 0x0B gamepak, ignore .long ext_store_ignore # 0x0C gamepak, ignore .long ext_store_eeprom # 0x0D EEPROM (possibly) .long ext_store_ignore # 0x0E Flash ROM/SRAM ext_store_u16: srl $1, $4, 24 # $1 = address >> 24 sltu $2, $1, 16 # check if the value is out of range beq $2, $0, ext_store_ignore sll $1, $1, 2 # make address word indexed (delay) lui $2, %hi(ext_store_u16_jtable) addu $2, $2, $1 # $2 = ext_store_u16_jtable[address >> 24] lw $2, %lo(ext_store_u16_jtable)($2) jr $2 # jump to table location nop #execute_store_u16: srl $1, $4, 28 # check if the address is out of range bne $1, $0, ext_store_u16 # if it is, perform an extended write srl $2, $4, 15 # $1 = page number of address (delay slot) sll $2, $2, 2 # adjust to word index addu $2, $2, $16 lw $1, 256($2) # $1 = memory_map_write[address >> 15] beq $1, $0, ext_store_u16 # if it's NULL perform an extended write andi $2, $4, 0x7FFE # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset lh $2, -32768($1) # load the SMC status bne $2, $0, smc_write # is there code there? sh $5, ($1) # store the value (delay slot) jr $ra # return nop # 32bit ext memory routines ext_store_io32: andi $4, $4, 0x3FF # wrap around address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register32 # write the value out sw $6, REG_PC($16) # save the PC (delay slot) j write_io_epilogue # handle any state changes nop ext_store_palette32: addu $6, $ra, $0 # save return address in $6 jal ext_store_palette16b # write out palette entry andi $4, 0x3FF # wrap address (delay) addiu $4, $4, 2 # go to next location srl $5, $5, 16 # shift to next 16bit value j ext_store_palette16b # write out next palette entry addu $ra, $6, $0 # restore return address (delay) ext_store_vram32: ext $4, $4, 0, 17 # address = adress & 0x1FFFF lui $1, %hi(0x18000) # $1 = 0x18000 sltu $1, $4, $1 # see if address < 0x18000 bne $1, $0, ext_store_vram32b lui $2, %hi(vram) # start loading vram address (delay) addiu $4, $4, -0x8000 # move address into VRAM region ext_store_vram32b: addu $2, $2, $4 # $2 = (hi)vram + address jr $ra # return sw $5, %lo(vram)($2) # vram[address] = value (delay) ext_store_oam32: lui $1, %hi(oam_update) # $1 = oam_update addiu $1, %lo(oam_update) li $2, 1 # $2 = 1 sw $2, ($1) # *oam_update = 1 andi $4, $4, 0x3FF # wrap around address lui $1, %hi(oam_ram) # $1 = (hi)oam_ram addu $1, $1, $4 # $1 = (hi)oam_ram + address jr $ra # return sw $5, %lo(oam_ram)($1) # oam_ram[address] = value (delay) ext_store_u32_jtable: .long ext_store_ignore # 0x00 BIOS, ignore .long ext_store_ignore # 0x01 invalid, ignore .long ext_store_ignore # 0x02 EWRAM, should have been hit already .long ext_store_ignore # 0x03 IWRAM, should have been hit already .long ext_store_io32 # 0x04 I/O registers .long ext_store_palette32 # 0x05 Palette RAM .long ext_store_vram32 # 0x06 VRAM .long ext_store_oam32 # 0x07 OAM RAM .long ext_store_ignore # 0x08 gamepak, ignore .long ext_store_ignore # 0x09 gamepak, ignore .long ext_store_ignore # 0x0A gamepak, ignore .long ext_store_ignore # 0x0B gamepak, ignore .long ext_store_ignore # 0x0C gamepak, ignore .long ext_store_eeprom # 0x0D EEPROM (possibly) .long ext_store_ignore # 0x0E Flash ROM/SRAM ext_store_u32: srl $1, $4, 24 # $1 = address >> 24 sltu $2, $1, 16 # check if the value is out of range beq $2, $0, ext_store_ignore sll $1, $1, 2 # make address word indexed (delay) lui $2, %hi(ext_store_u32_jtable) addu $2, $2, $1 # $2 = ext_store_u32_jtable[address >> 24] lw $2, %lo(ext_store_u32_jtable)($2) jr $2 # jump to table location nop #execute_store_u32: execute_store_full_u32: srl $1, $4, 28 # check if the address is out of range bne $1, $0, ext_store_u32 # if it is, perform an extended write srl $2, $4, 15 # $1 = page number of address (delay slot) sll $2, $2, 2 # adjust to word index addu $2, $2, $16 lw $1, 256($2) # $1 = memory_map_write[address >> 15] beq $1, $0, ext_store_u32 # if it's NULL perform an extended write andi $2, $4, 0x7FFC # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset lw $2, -32768($1) # load the SMC status bne $2, $0, smc_write # is there code there? sw $5, ($1) # store the value (delay slot) jr $ra # return nop # 32bit ext aligned, non a2 destroying routines ext_store_io32a: andi $4, $4, 0x3FF # wrap around address addiu $sp, $sp, -4 # make room on the stack for $ra sw $ra, ($sp) save_registers jal write_io_register32 # write the value out sw $6, REG_SAVE($16) # save a2 lw $6, REG_SAVE($16) # restore a2 j write_io_epilogue # handle any state changes nop ext_store_palette32a: sw $ra, REG_SAVE($16) # save return address jal ext_store_palette16b # write out palette entry andi $4, 0x3FF # wrap address (delay) addiu $4, $4, 2 # go to next location srl $5, $5, 16 # shift to next 16bit value j ext_store_palette16b # write out next palette entry lw $ra, REG_SAVE($16) # restore return address (delay) ext_store_u32a_jtable: .long ext_store_ignore # 0x00 BIOS, ignore .long ext_store_ignore # 0x01 invalid, ignore .long ext_store_ignore # 0x02 EWRAM, should have been hit already .long ext_store_ignore # 0x03 IWRAM, should have been hit already .long ext_store_io32a # 0x04 I/O registers .long ext_store_palette32a # 0x05 Palette RAM .long ext_store_vram32 # 0x06 VRAM .long ext_store_oam32 # 0x07 OAM RAM .long ext_store_ignore # 0x08 gamepak, ignore .long ext_store_ignore # 0x09 gamepak, ignore .long ext_store_ignore # 0x0A gamepak, ignore .long ext_store_ignore # 0x0B gamepak, ignore .long ext_store_ignore # 0x0C gamepak, ignore .long ext_store_ignore # 0x0D EEPROM (nothing will write this) .long ext_store_ignore # 0x0E Flash ROM/SRAM ext_aligned_store32: srl $1, $4, 24 # $1 = address >> 24 sltu $2, $1, 16 # check if the value is out of range beq $2, $0, ext_store_ignore sll $1, $1, 2 # make address word indexed (delay) lui $2, %hi(ext_store_u32a_jtable) addu $2, $2, $1 # $2 = ext_store_u32a_jtable[address >> 24] lw $2, %lo(ext_store_u32a_jtable)($2) jr $2 # jump to table location nop #execute_aligned_store32: srl $2, $4, 28 # check if the address is out of range bne $2, $0, ext_aligned_store32 # if it is, perform an extended load srl $1, $4, 15 # $1 = page number of address sll $1, $1, 2 # adjust to word index addu $1, $1, $16 # $1 = memory_map_write[address >> 15] lw $1, 256($1) beq $1, $0, ext_aligned_store32 # if it's NULL perform an extended write andi $2, $4, 0x7FFF # $2 = low 15bits of address (delay slot) addu $1, $1, $2 # add the memory map offset jr $ra # return sw $5, ($1) # write the value smc_write: save_registers jal flush_translation_cache_ram # flush translation cache sw $6, REG_PC($16) # save PC (delay slot) lookup_pc: lw $2, REG_CPSR($16) # $2 = cpsr andi $2, $2, 0x20 # isolate mode bit beq $2, $0, lookup_pc_arm # if T bit is zero use arm handler nop lookup_pc_thumb: jal block_lookup_address_thumb # get Thumb address lw $4, REG_PC($16) # load PC as arg 0 (delay slot) restore_registers jr $2 # jump to result nop lookup_pc_arm: jal block_lookup_address_arm # get ARM address lw $4, REG_PC($16) # load PC as arg 0 (delay slot) restore_registers jr $2 # jump to result nop # Return the current cpsr execute_read_cpsr: collapse_flags # fold flags into cpsr, put cpsr into $2 jr $ra # return nop # Return the current spsr execute_read_spsr: lw $1, CPU_MODE($16) # $1 = cpu_mode lui $2, %hi(spsr) sll $1, $1, 2 # adjust to word offset size addu $2, $2, $1 jr $ra # return lw $2, %lo(spsr)($2) # $2 = spsr[cpu_mode] (delay slot) # Switch into SWI, has to collapse flags # $4: Current pc execute_swi: add $sp, $sp, -4 # push $ra sw $ra, ($sp) lui $1, %hi(SUPERVISOR_LR) sw $4, %lo(SUPERVISOR_LR)($1) # store next PC in the supervisor's LR collapse_flags # get cpsr in $2 lui $5, %hi(SUPERVISOR_SPSR) sw $2, %lo(SUPERVISOR_SPSR)($5) # save cpsr in SUPERVISOR_CPSR ins $2, $0, 0, 6 # zero out bottom 6 bits of CPSR ori $2, 0x13 # set mode to supervisor sw $2, REG_CPSR($16) # write back CPSR save_registers jal set_cpu_mode # set the CPU mode to supervisor li $4, 3 # 3 is supervisor mode (delay slot) restore_registers lw $ra, ($sp) # pop $ra jr $ra # return add $sp, $sp, 4 # fix stack (delay slot) # $4: pc to restore to # returns in $4 execute_spsr_restore: lw $1, CPU_MODE($16) # $1 = cpu_mode beq $1, $0, no_spsr_restore # only restore if the cpu isn't usermode lui $2, %hi(spsr) # start loading SPSR (delay) sll $1, $1, 2 # adjust to word offset size addu $2, $2, $1 lw $1, %lo(spsr)($2) # $1 = spsr[cpu_mode] sw $1, REG_CPSR($16) # cpsr = spsr[cpu_mode] extract_flags_body # extract flags from $1 addiu $sp, $sp, -4 sw $ra, ($sp) save_registers jal execute_spsr_restore_body # do the dirty work in this C function nop restore_registers addu $4, $2, $0 # move return value to $4 lw $ra, ($sp) jr $ra addiu $sp, $sp, 4 no_spsr_restore: jr $ra nop # $4: new cpsr # $5: store mask # $6: current PC execute_store_cpsr: and $1, $4, $5 # $1 = new_cpsr & store_mask lw $2, REG_CPSR($16) # $2 = current cpsr nor $4, $5, $0 # $4 = ~store_mask and $2, $2, $4 # $2 = (cpsr & (~store_mask)) or $1, $1, $2 # $1 = new cpsr combined with old extract_flags_body # extract flags from $1 addiu $sp, $sp, -4 sw $ra, ($sp) save_registers jal execute_store_cpsr_body # do the dirty work in this C function addu $4, $1, $0 # load the new CPSR (delay slot) bne $2, $0, changed_pc_cpsr # this could have changed the pc nop restore_registers lw $ra, ($sp) jr $ra addiu $sp, $sp, 4 changed_pc_cpsr: jal block_lookup_address_arm # GBA address is in $4 addu $4, $2, $0 # load new address in $4 (delay slot) restore_registers # restore registers jr $2 # jump to the new address addiu $sp, $sp, 4 # get rid of the old ra (delay slot) # $4: new spsr # $5: store mask execute_store_spsr: lw $1, CPU_MODE($16) # $1 = cpu_mode lui $2, %hi(spsr) sll $1, $1, 2 # adjust to word offset size addu $1, $2, $1 lw $2, %lo(spsr)($1) # $2 = spsr[cpu_mode] and $4, $4, $5 # $4 = new_spsr & store_mask nor $5, $5, $0 # $5 = ~store_mask and $2, $2, $5 # $2 = (spsr & (~store_mask)) or $4, $4, $2 # $4 = new spsr combined with old jr $ra # return sw $4, %lo(spsr)($1) # spsr[cpu_mode] = $4 (delay slot) # $4: value # $5: shift execute_lsl_flags_reg: beq $5, $0, lsl_shift_zero # is the shift zero? sltiu $1, $5, 32 # $1 = (shift < 32) (delay) beq $1, $0, lsl_shift_high # is the shift >= 32? li $2, 32 subu $2, $2, $5 # $2 = (32 - shift) srlv $2, $4, $2 # $2 = (value >> (32 - shift)) andi $22, $2, 1 # c flag = (value >> (32 - shift)) & 0x01 lsl_shift_zero: jr $ra # return sllv $4, $4, $5 # return (value << shift) (delay) lsl_shift_high: sltiu $1, $5, 33 # $1 = (shift < 33) (delay) bne $1, $0, lsl_shift_done # jump if shift == 32 andi $22, $4, 1 # c flag = value & 0x01 (delay) add $22, $0, $0 # c flag = 0 otherwise lsl_shift_done: jr $ra # return add $4, $0, $0 # value = 0 no matter what execute_lsr_flags_reg: beq $5, $0, lsr_shift_zero # is the shift zero? sltiu $1, $5, 32 # $1 = (shift < 32) (delay) beq $1, $0, lsr_shift_high # is the shift >= 32? addiu $2, $5, -1 # $2 = shift - 1 (delay) srlv $2, $4, $2 # $2 = (value >> (shift - 1)) andi $22, $2, 1 # c flag = (value >> (32 - shift)) & 0x01 lsr_shift_zero: jr $ra # return srlv $4, $4, $5 # return (value >> shift) (delay) lsr_shift_high: sltiu $1, $5, 33 # $1 = (shift < 33) (delay) bne $1, $0, lsr_shift_done # jump if shift == 32 srl $22, $4, 31 # c flag = value >> 31 (delay) add $22, $0, $0 # c flag = 0 otherwise lsr_shift_done: jr $ra # return add $4, $0, $0 # value = 0 no matter what execute_asr_flags_reg: beq $5, $0, asr_shift_zero # is the shift zero? sltiu $1, $5, 32 # $1 = (shift < 32) (delay) beq $1, $0, asr_shift_high # is the shift >= 32? addiu $2, $5, -1 # $2 = shift - 1 (delay) srlv $2, $4, $2 # $2 = (value >> (shift - 1)) andi $22, $2, 1 # c flag = (value >> (32 - shift)) & 0x01 asr_shift_zero: jr $ra # return srav $4, $4, $5 # return (value >> shift) (delay) asr_shift_high: sra $4, $4, 31 # value >>= 31 jr $ra # return andi $22, $4, 1 # c flag = value & 0x01 execute_ror_flags_reg: beq $5, $0, ror_zero_shift # is the shift zero? addiu $1, $5, -1 # $1 = (shift - 1) (delay) srav $1, $4, $1 # $1 = (value >> (shift - 1)) andi $22, $1, 1 # c flag = $1 & 1 ror_zero_shift: jr $ra # return rotrv $4, $4, $5 # return (value ror shift) delay # $4: cycle counter argument execute_arm_translate: addu $17, $4, $0 # load cycle counter register lui $16, %hi(reg) # load base register addiu $16, %lo(reg) extract_flags # load flag variables and $1, $1, 0x20 # see if Thumb bit is set in flags bne $1, $0, 1f lw $4, REG_PC($16) # load PC into $4 (delay) jal block_lookup_address_arm # lookup initial jump address nop restore_registers # load initial register values jr $2 # jump to return nop 1: jal block_lookup_address_thumb # lookup initial jump address nop restore_registers # load initial register values jr $2 # jump to return nop # sceKernelInvalidateIcacheRange gives me problems, trying this instead # Invalidates an n byte region starting at the start address # $4: start location # $5: length invalidate_icache_region: ins $4, $0, 0, 6 # align to 64 bytes addiu $2, $5, 63 # align up to 64 bytes srl $2, $2, 6 # divide by 64 beq $2, $0, done # exit early on 0 nop iir_loop: cache 0x08, ($4) # hit invalidate icache line addiu $2, $2, -1 # next loop iteration bne $2, $0, iir_loop # loop addiu $4, $4, 64 # go to next cache line (delay slot) done: jr $ra # return nop # Writes back dcache and invalidates icache. invalidate_all_cache: addu $4, $0, $0 # $4 = 0 addiu $5, $0, 0x4000 # $5 = 0x4000 iac_loop: cache 0x14, 0($4) # index invalidate/writeback dcache index addiu $4, $4, 0x40 # goto next cache line bne $4, $5, iac_loop # next iteration cache 0x04, -0x40($4) # index invalidate icache index.. maybe? jr $ra # return nop step_debug_mips: addiu $sp, $sp, -4 sw $ra, ($sp) collapse_flags save_registers jal step_debug addiu $5, $17, 0 restore_registers lw $ra, ($sp) jr $ra addiu $sp, $sp, 4 memory_map_read: .space 0x8000 reg: .space 0x100 memory_map_write: .space 0x8000