[picodrive.git] / pico / memory_amips.S

#*
#* memory handlers with banking support
#* (C) notaz, 2007-2008
#*
#* This work is licensed under the terms of MAME license.
#* See COPYING file in the top-level directory.
#*

# OUT OF DATE

#include "pico_int_o32.h"

.set noreorder
.set noat

.text
.align 4

# default jump tables

m_read8_def_table:
    .long   m_read8_rom0    # 0x000000 - 0x07FFFF
    .long   m_read8_rom1    # 0x080000 - 0x0FFFFF
    .long   m_read8_rom2    # 0x100000 - 0x17FFFF
    .long   m_read8_rom3    # 0x180000 - 0x1FFFFF
    .long   m_read8_rom4    # 0x200000 - 0x27FFFF
    .long   m_read8_rom5    # 0x280000 - 0x2FFFFF
    .long   m_read8_rom6    # 0x300000 - 0x37FFFF
    .long   m_read8_rom7    # 0x380000 - 0x3FFFFF
    .long   m_read8_rom8    # 0x400000 - 0x47FFFF - for all those large ROM hacks
    .long   m_read8_rom9    # 0x480000 - 0x4FFFFF
    .long   m_read8_romA    # 0x500000 - 0x57FFFF
    .long   m_read8_romB    # 0x580000 - 0x5FFFFF
    .long   m_read8_romC    # 0x600000 - 0x67FFFF
    .long   m_read8_romD    # 0x680000 - 0x6FFFFF
    .long   m_read8_romE    # 0x700000 - 0x77FFFF
    .long   m_read8_romF    # 0x780000 - 0x7FFFFF
    .long   m_read8_rom10   # 0x800000 - 0x87FFFF
    .long   m_read8_rom11   # 0x880000 - 0x8FFFFF
    .long   m_read8_rom12   # 0x900000 - 0x97FFFF
    .long   m_read8_rom13   # 0x980000 - 0x9FFFFF
    .long   m_read8_misc    # 0xA00000 - 0xA7FFFF
    .long   m_read_null     # 0xA80000 - 0xAFFFFF
    .long   m_read_null     # 0xB00000 - 0xB7FFFF
    .long   m_read_null     # 0xB80000 - 0xBFFFFF
    .long   m_read8_vdp     # 0xC00000 - 0xC7FFFF
    .long   m_read8_vdp     # 0xC80000 - 0xCFFFFF
    .long   m_read8_vdp     # 0xD00000 - 0xD7FFFF
    .long   m_read8_vdp     # 0xD80000 - 0xDFFFFF
    .long   m_read8_ram     # 0xE00000 - 0xE7FFFF
    .long   m_read8_ram     # 0xE80000 - 0xEFFFFF
    .long   m_read8_ram     # 0xF00000 - 0xF7FFFF
    .long   m_read8_ram     # 0xF80000 - 0xFFFFFF

m_read16_def_table:
    .long   m_read16_rom0    # 0x000000 - 0x07FFFF
    .long   m_read16_rom1    # 0x080000 - 0x0FFFFF
    .long   m_read16_rom2    # 0x100000 - 0x17FFFF
    .long   m_read16_rom3    # 0x180000 - 0x1FFFFF
    .long   m_read16_rom4    # 0x200000 - 0x27FFFF
    .long   m_read16_rom5    # 0x280000 - 0x2FFFFF
    .long   m_read16_rom6    # 0x300000 - 0x37FFFF
    .long   m_read16_rom7    # 0x380000 - 0x3FFFFF
    .long   m_read16_rom8    # 0x400000 - 0x47FFFF
    .long   m_read16_rom9    # 0x480000 - 0x4FFFFF
    .long   m_read16_romA    # 0x500000 - 0x57FFFF
    .long   m_read16_romB    # 0x580000 - 0x5FFFFF
    .long   m_read16_romC    # 0x600000 - 0x67FFFF
    .long   m_read16_romD    # 0x680000 - 0x6FFFFF
    .long   m_read16_romE    # 0x700000 - 0x77FFFF
    .long   m_read16_romF    # 0x780000 - 0x7FFFFF
    .long   m_read16_rom10   # 0x800000 - 0x87FFFF
    .long   m_read16_rom11   # 0x880000 - 0x8FFFFF
    .long   m_read16_rom12   # 0x900000 - 0x97FFFF
    .long   m_read16_rom13   # 0x980000 - 0x9FFFFF
    .long   m_read16_misc    # 0xA00000 - 0xA7FFFF
    .long   m_read_null      # 0xA80000 - 0xAFFFFF
    .long   m_read_null      # 0xB00000 - 0xB7FFFF
    .long   m_read_null      # 0xB80000 - 0xBFFFFF
    .long   m_read16_vdp     # 0xC00000 - 0xC7FFFF
    .long   m_read16_vdp     # 0xC80000 - 0xCFFFFF
    .long   m_read16_vdp     # 0xD00000 - 0xD7FFFF
    .long   m_read16_vdp     # 0xD80000 - 0xDFFFFF
    .long   m_read16_ram     # 0xE00000 - 0xE7FFFF
    .long   m_read16_ram     # 0xE80000 - 0xEFFFFF
    .long   m_read16_ram     # 0xF00000 - 0xF7FFFF
    .long   m_read16_ram     # 0xF80000 - 0xFFFFFF

m_read32_def_table:
    .long   m_read32_rom0    # 0x000000 - 0x07FFFF
    .long   m_read32_rom1    # 0x080000 - 0x0FFFFF
    .long   m_read32_rom2    # 0x100000 - 0x17FFFF
    .long   m_read32_rom3    # 0x180000 - 0x1FFFFF
    .long   m_read32_rom4    # 0x200000 - 0x27FFFF
    .long   m_read32_rom5    # 0x280000 - 0x2FFFFF
    .long   m_read32_rom6    # 0x300000 - 0x37FFFF
    .long   m_read32_rom7    # 0x380000 - 0x3FFFFF
    .long   m_read32_rom8    # 0x400000 - 0x47FFFF
    .long   m_read32_rom9    # 0x480000 - 0x4FFFFF
    .long   m_read32_romA    # 0x500000 - 0x57FFFF
    .long   m_read32_romB    # 0x580000 - 0x5FFFFF
    .long   m_read32_romC    # 0x600000 - 0x67FFFF
    .long   m_read32_romD    # 0x680000 - 0x6FFFFF
    .long   m_read32_romE    # 0x700000 - 0x77FFFF
    .long   m_read32_romF    # 0x780000 - 0x7FFFFF
    .long   m_read32_rom10   # 0x800000 - 0x87FFFF
    .long   m_read32_rom11   # 0x880000 - 0x8FFFFF
    .long   m_read32_rom12   # 0x900000 - 0x97FFFF
    .long   m_read32_rom13   # 0x980000 - 0x9FFFFF
    .long   m_read32_misc    # 0xA00000 - 0xA7FFFF
    .long   m_read_null      # 0xA80000 - 0xAFFFFF
    .long   m_read_null      # 0xB00000 - 0xB7FFFF
    .long   m_read_null      # 0xB80000 - 0xBFFFFF
    .long   m_read32_vdp     # 0xC00000 - 0xC7FFFF
    .long   m_read32_vdp     # 0xC80000 - 0xCFFFFF
    .long   m_read32_vdp     # 0xD00000 - 0xD7FFFF
    .long   m_read32_vdp     # 0xD80000 - 0xDFFFFF
    .long   m_read32_ram     # 0xE00000 - 0xE7FFFF
    .long   m_read32_ram     # 0xE80000 - 0xEFFFFF
    .long   m_read32_ram     # 0xF00000 - 0xF7FFFF
    .long   m_read32_ram     # 0xF80000 - 0xFFFFFF


# #############################################################################

.bss
.align 4

# used tables
m_read8_table:
    .skip 32*4

m_read16_table:
    .skip 32*4

m_read32_table:
    .skip 32*4


# #############################################################################

.text
.align 4

.global PicoMemReset
.global PicoRead8
.global PicoRead16
.global PicoRead32
.global PicoWriteRomHW_SSF2

.global m_read8_def_table
.global m_read8_table

.macro PicoMemResetCopyDef dst_table src_table
    lui     $t0, %hi(\dst_table)
    addiu   $t0, %lo(\dst_table)
    lui     $t1, %hi(\src_table)
    addiu   $t1, %lo(\src_table)
    li      $t2, 32
1:
    lw      $t3, 0($t1)
    sw      $t3, 0($t0)
    addiu   $t2, -1
    addiu   $t1, 4
    bnez    $t2, 1b
    addiu   $t0, 4
.endm

# $t4 = 4
.macro PicoMemResetRomArea dst_table ar_label
    lui     $t0, %hi(\dst_table)
    addiu   $t0, %lo(\dst_table)
    lui     $t1, %hi(\ar_label)
    addiu   $t1, %lo(\ar_label)
    li      $t2, 20
1:
    beq     $t2, $v1, 2f
    addiu   $t2, -1
    sll     $t3, $t2, 2
    beq     $t2, $t4, 1b           # do not touch the SRAM area
    addu    $t3, $t0
    j       1b
    sw      $t1, 0($t3)
2:
.endm


PicoMemReset:
    lui     $v1, %hi(Pico+OFS_Pico_romsize)
    lw      $v1, %lo(Pico+OFS_Pico_romsize)($v1)  # romsize
    lui     $t0, 8
    addu    $v1, $t0
    addiu   $v1, -1
    srl     $v1, 19

    PicoMemResetCopyDef m_read8_table  m_read8_def_table
    PicoMemResetCopyDef m_read16_table m_read16_def_table
    PicoMemResetCopyDef m_read32_table m_read32_def_table

    # update memhandlers according to ROM size
    li      $t4, 4
    PicoMemResetRomArea m_read8_table  m_read8_above_rom
    PicoMemResetRomArea m_read16_table m_read16_above_rom
    PicoMemResetRomArea m_read32_table m_read32_above_rom

    jr      $ra
    nop

# #############################################################################

.macro PicoReadJump table
    lui     $t0, %hi(\table)
    srl     $t1, $a0, 19
    ins     $t0, $t1, 2, 5
    lw      $t0, %lo(\table)($t0)
    ins     $a0, $0,  24, 8
    jr      $t0
    nop
.endm

PicoRead8: # u32 a
    PicoReadJump m_read8_table

PicoRead16: # u32 a
    PicoReadJump m_read16_table

PicoRead32: # u32 a
    PicoReadJump m_read32_table

# #############################################################################

m_read_null:
    jr      $ra
    li      $v0, 0

m_read_neg1:
    jr      $ra
    addiu   $v0, $0, 0xffff

# loads &Pico to $t3
.macro m_read_rom_try_sram is200000 size
    lui     $t2, %hi(Pico)
    addiu   $t2, %lo(Pico)
    lw      $t1, OFS_Pico_sv_end($t2)
.if \is200000
    ins     $a0, $0,  19, 13
    lui     $t4, 0x20
    or      $a0, $t4
.endif
    subu    $t4, $a0, $t1
    bgtz    $t4, 1f
    lw      $t1, OFS_Pico_sv_start($t2)
    subu    $t4, $t1, $a0
    bgtz    $t4, 1f
    nop
    lb      $t1, OFS_Pico_m_sram_reg($t2)
    andi    $t4, $t1, 5
    beqz    $t4, 1f
    nop
.if \size == 8
    j       SRAMRead
    nop
.elseif \size == 16
    sw      $ra, -4($sp)
    jal     SRAMRead16
    addiu   $sp, -4
    lw      $ra, 0($sp)
    jr      $ra
    addiu   $sp, 4
.else
    addiu   $sp, -8
    sw      $ra, 0($sp)
    sw      $a0, 4($sp)
    jal     SRAMRead16
    nop
    lw      $a0, 4($sp)
    sw      $v0, 4($sp)
    jal     SRAMRead16
    addiu   $a0, 2
    lw      $v1, 4($sp)
    lw      $ra, 0($sp)
    addiu   $sp, 8
    jr      $ra
    ins     $v0, $v1, 16, 16
.endif
# m_read_nosram:
1:
.endm

.macro m_read8_rom sect
    lui     $t0, %hi(Pico+OFS_Pico_rom)
    lw      $t0, %lo(Pico+OFS_Pico_rom)($t0)  # rom
    xori    $a0, 1
    ins     $a0, $0,  19, 13
.if \sect
    lui     $t1, 8*\sect
    addu    $a0, $t1
.endif
    addu    $t0, $a0
    jr      $ra
    lb      $v0, 0($t0)
.endm


m_read8_rom0: # 0x000000 - 0x07ffff
    m_read8_rom 0

m_read8_rom1: # 0x080000 - 0x0fffff
    m_read8_rom 1

m_read8_rom2: # 0x100000 - 0x17ffff
    m_read8_rom 2

m_read8_rom3: # 0x180000 - 0x1fffff
    m_read8_rom 3

m_read8_rom4: # 0x200000 - 0x27ffff, SRAM area
    m_read_rom_try_sram 1 8
    lw      $t1, 4($t3)     # romsize
    subu    $t4, $t1, $a0
    blez    $t4, m_read_null
    lw      $t1, 0($t3)     # rom
    xori    $a0, 1
    addu    $t1, $a0
    jr      $ra
    lb      $v0, 0($t1)

m_read8_rom5: # 0x280000 - 0x2fffff
    m_read8_rom 5

m_read8_rom6: # 0x300000 - 0x37ffff
    m_read8_rom 6

m_read8_rom7: # 0x380000 - 0x3fffff
    m_read8_rom 7

m_read8_rom8: # 0x400000 - 0x47ffff
    m_read8_rom 8

m_read8_rom9: # 0x480000 - 0x4fffff
    m_read8_rom 9

m_read8_romA: # 0x500000 - 0x57ffff
    m_read8_rom 0xA

m_read8_romB: # 0x580000 - 0x5fffff
    m_read8_rom 0xB

m_read8_romC: # 0x600000 - 0x67ffff
    m_read8_rom 0xC

m_read8_romD: # 0x680000 - 0x6fffff
    m_read8_rom 0xD

m_read8_romE: # 0x700000 - 0x77ffff
    m_read8_rom 0xE

m_read8_romF: # 0x780000 - 0x7fffff
    m_read8_rom 0xF

m_read8_rom10: # 0x800000 - 0x87ffff
    m_read8_rom 0x10

m_read8_rom11: # 0x880000 - 0x8fffff
    m_read8_rom 0x11

m_read8_rom12: # 0x900000 - 0x97ffff
    m_read8_rom 0x12

m_read8_rom13: # 0x980000 - 0x9fffff
    m_read8_rom 0x13


m_read8_misc:
    srl     $t0, $a0, 5
    sll     $t0, $t0, 5
    lui     $t1, 0xa1
    bne     $t0, $t1, m_read8_misc2
    andi    $t0, $a0, 0x1e
m_read8_misc_io:
    beqz    $t0, m_read8_misc_hwreg
    sub     $t1, $t0, 4
    bgtz    $t1, m_read8_misc_ioports
    nop
    slti    $a0, $t0, 4
    xori    $a0, 1
    j       PadRead
    nop

m_read8_misc_hwreg:
    lui     $v0, %hi(Pico+OFS_Pico_m_hardware)
    jr      $ra
    lb      $v0, %lo(Pico+OFS_Pico_m_hardware)($v0)

m_read8_misc_ioports:
    lui     $v0, %hi(PicoMem+0x22000)
    ins     $v0, $t0, 0, 5
    jr      $ra
    lb      $v0, %lo(PicoMem+0x22000)($v0)

m_read8_misc2:
    lui     $t0, 0xa1
    ori     $t0, 0x1100
    bne     $a0, $t0, m_read8_misc3
    srl     $t0, $a0, 16
    j       z80ReadBusReq

m_read8_misc3:
    addiu   $t0, 0xff60       # expecting 0xa0 to get 0
    bnez    $t0, m_read8_misc4

    # z80 area
    andi    $t0, $a0, 0x4000
    bnez    $t0, m_read8_z80_misc
    andi    $t0, $a0, 0x6000
    j       z80Read8          # z80 RAM

m_read8_z80_misc:
    addiu   $t0, 0xc000       # expecting 0x4000 to get 0
    bnez    $t0, m_read_neg1  # invalid
    nop
    j       ym2612_read_local_68k
    nop

m_read8_fake_ym2612:
    lb      $v0, %lo(Pico+OFS_Pico_m_rotate)($t0)
    addiu   $t1, $v0, 1
    jr      $ra
    sb      $t1, %lo(Pico+OFS_Pico_m_rotate)($t0)

# delay slot friendly
.macro m_read8_call16 funcname is_func_ptr=0
.if \is_func_ptr
    lui     $t1, %hi(\funcname)
    lw      $t1, %lo(\funcname)($t1)
.endif
    andi    $t0, $a0, 1
    beqz    $t0, 1f
    li      $a1, 8      # not always needed, but shouln't cause problems
.if \is_func_ptr
    jr      $t1
.else
    j       \funcname   # odd address
.endif
    nop
1:
    addiu   $sp, -4
    sw      $ra, 0($sp)
.if \is_func_ptr
    jalr    $t1
.else
    jal     \funcname
.endif
    xori    $a0, 1
    lw      $ra, 0($sp)
    addiu   $sp, 4
    jr      $ra
    srl     $v0, 8
.endm

m_read8_misc4:
    # if everything else fails, use generic handler
    m_read8_call16 OtherRead16

m_read8_vdp:
    ext     $t0, $a0, 16, 3
    andi    $t1, $a0, 0xe0
    or      $t0, $t1
    bnez    $t0, m_read_null # invalid address
    nop
    j       PicoRead8_vdp
    nop

m_read8_ram:
    lui     $t0, %hi(PicoMem)
    ins     $t0, $a0, 0, 16
    xori    $t0, 1
    jr      $ra
    lb      $v0, %lo(PicoMem)($t0)

m_read8_above_rom:
    # might still be SRam (Micro Machines, HardBall '95)
    m_read_rom_try_sram 0 8
    m_read8_call16 PicoRead16Hook 1

# #############################################################################

.macro m_read16_rom sect
    lui     $t0, %hi(Pico+OFS_Pico_rom)
    lw      $t0, %lo(Pico+OFS_Pico_rom)($t0)  # rom
    ins     $a0, $0,   0,  1
    ins     $a0, $0,  19, 13
.if \sect
    lui     $t1, 8*\sect
    addu    $a0, $t1
.endif
    addu    $t0, $a0
    jr      $ra
    lh      $v0, 0($t0)
.endm


m_read16_rom0: # 0x000000 - 0x07ffff
    m_read16_rom 0

m_read16_rom1: # 0x080000 - 0x0fffff
    m_read16_rom 1

m_read16_rom2: # 0x100000 - 0x17ffff
    m_read16_rom 2

m_read16_rom3: # 0x180000 - 0x1fffff
    m_read16_rom 3

m_read16_rom4: # 0x200000 - 0x27ffff, SRAM area
    m_read_rom_try_sram 1 16
    lw      $t1, 4($t3)     # romsize
    subu    $t4, $t1, $a0
    blez    $t4, m_read_null
    lw      $t1, 0($t3)     # rom
    ins     $a0, $0, 0, 1
    addu    $t1, $a0
    jr      $ra
    lh      $v0, 0($t1)

m_read16_rom5: # 0x280000 - 0x2fffff
    m_read16_rom 5

m_read16_rom6: # 0x300000 - 0x37ffff
    m_read16_rom 6

m_read16_rom7: # 0x380000 - 0x3fffff
    m_read16_rom 7

m_read16_rom8: # 0x400000 - 0x47ffff
    m_read16_rom 8

m_read16_rom9: # 0x480000 - 0x4fffff
    m_read16_rom 9

m_read16_romA: # 0x500000 - 0x57ffff
    m_read16_rom 0xA

m_read16_romB: # 0x580000 - 0x5fffff
    m_read16_rom 0xB

m_read16_romC: # 0x600000 - 0x67ffff
    m_read16_rom 0xC

m_read16_romD: # 0x680000 - 0x6fffff
    m_read16_rom 0xD

m_read16_romE: # 0x700000 - 0x77ffff
    m_read16_rom 0xE

m_read16_romF: # 0x780000 - 0x7fffff
    m_read16_rom 0xF

m_read16_rom10: # 0x800000 - 0x87ffff
    m_read16_rom 0x10

m_read16_rom11: # 0x880000 - 0x8fffff
    m_read16_rom 0x11

m_read16_rom12: # 0x900000 - 0x97ffff
    m_read16_rom 0x12

m_read16_rom13: # 0x980000 - 0x9fffff
    m_read16_rom 0x13

m_read16_misc:
    ins     $a0, $0, 0, 1
    j       OtherRead16
    li      $a1, 16

m_read16_vdp:
    ext     $t0, $a0, 16, 3
    andi    $t1, $a0, 0xe0
    or      $t0, $t1
    bnez    $t0, m_read_null # invalid address
    ins     $a0, $0, 0, 1
    j       PicoVideoRead
    nop

m_read16_ram:
    lui     $t0, %hi(PicoMem)
    ins     $a0, $0, 0, 1
    ins     $t0, $a0, 0, 16
    jr      $ra
    lh      $v0, %lo(PicoMem)($t0)

m_read16_above_rom:
    # might still be SRam
    m_read_rom_try_sram 0 16
    lui     $t1, %hi(PicoRead16Hook)
    lw      $t1, %lo(PicoRead16Hook)($t1)
    jr      $t1
    ins     $a0, $0, 0, 1

# #############################################################################

.macro m_read32_rom sect
    lui     $t0, %hi(Pico+OFS_Pico_rom)
    lw      $t0, %lo(Pico+OFS_Pico_rom)($t0)  # rom
    ins     $a0, $0,   0,  1
    ins     $a0, $0,  19, 13
.if \sect
    lui     $t1, 8*\sect
    addu    $a0, $t1
.endif
    addu    $t0, $a0
    lh      $v1, 0($t0)
    lh      $v0, 2($t0)
    jr      $ra
    ins     $v0, $v1, 16, 16
.endm


m_read32_rom0: # 0x000000 - 0x07ffff
    m_read32_rom 0

m_read32_rom1: # 0x080000 - 0x0fffff
    m_read32_rom 1

m_read32_rom2: # 0x100000 - 0x17ffff
    m_read32_rom 2

m_read32_rom3: # 0x180000 - 0x1fffff
    m_read32_rom 3

m_read32_rom4: # 0x200000 - 0x27ffff, SRAM area
    m_read_rom_try_sram 1 32
    lw      $t1, 4($t3)     # romsize
    subu    $t4, $t1, $a0
    blez    $t4, m_read_null
    lw      $t1, 0($t3)     # rom
    ins     $a0, $0, 0, 1
    addu    $t1, $a0
    lh      $v1, 0($t1)
    lh      $v0, 2($t1)
    jr      $ra
    ins     $v0, $v1, 16, 16

m_read32_rom5: # 0x280000 - 0x2fffff
    m_read32_rom 5

m_read32_rom6: # 0x300000 - 0x37ffff
    m_read32_rom 6

m_read32_rom7: # 0x380000 - 0x3fffff
    m_read32_rom 7

m_read32_rom8: # 0x400000 - 0x47ffff
    m_read32_rom 8

m_read32_rom9: # 0x480000 - 0x4fffff
    m_read32_rom 9

m_read32_romA: # 0x500000 - 0x57ffff
    m_read32_rom 0xA

m_read32_romB: # 0x580000 - 0x5fffff
    m_read32_rom 0xB

m_read32_romC: # 0x600000 - 0x67ffff
    m_read32_rom 0xC

m_read32_romD: # 0x680000 - 0x6fffff
    m_read32_rom 0xD

m_read32_romE: # 0x700000 - 0x77ffff
    m_read32_rom 0xE

m_read32_romF: # 0x780000 - 0x7fffff
    m_read32_rom 0xF

m_read32_rom10: # 0x800000 - 0x87ffff
    m_read32_rom 0x10

m_read32_rom11: # 0x880000 - 0x8fffff
    m_read32_rom 0x11

m_read32_rom12: # 0x900000 - 0x97ffff
    m_read32_rom 0x12

m_read32_rom13: # 0x980000 - 0x9fffff
    m_read32_rom 0x13

.macro m_read32_call16 func need_a1=0
    addiu   $sp, -8
    sw      $ra, 0($sp)
    sw      $s0, 4($sp)
.if \need_a1
    li      $a1, 16
.endif
    jal     \func
    move    $s0, $a0

    addu    $a0, $s0, 2
.if \need_a1
    li      $a1, 16
.endif
    jal     \func
    move    $s0, $v0

    ins     $v0, $s0, 16, 16
    lw      $ra, 0($sp)
    lw      $s0, 4($sp)
    jr      $ra
    addiu   $sp, 8
.endm

m_read32_misc:
    ins     $a0, $0, 0, 1
    m_read32_call16 OtherRead16, 1

m_read32_vdp:
    ext     $t0, $a0, 16, 3
    andi    $t1, $a0, 0xe0
    or      $t0, $t1
    bnez    $t0, m_read_null # invalid address
    ins     $a0, $0, 0, 1
    m_read32_call16 PicoVideoRead

m_read32_ram:
    lui     $t0, %hi(PicoMem)
    ins     $a0, $0, 0, 1
    ins     $t0, $a0, 0, 16
    lh      $v1, %lo(PicoMem)($t0)
    lh      $v0, %lo(PicoMem+2)($t0)
    jr      $ra
    ins     $v0, $v1, 16, 16

m_read32_above_rom:
    # might still be SRam
    m_read_rom_try_sram 0 32
    ins     $a0, $0, 0, 1
    lui     $t1, %hi(PicoRead16Hook)
    lw      $t1, %lo(PicoRead16Hook)($t1)
    addiu   $sp, -4*3
    sw      $ra, 0($sp)
    sw      $s0, 4($sp)
    sw      $t1, 8($sp)
    jalr    $t1
    move    $s0, $a0

    lw      $t1, 8($sp)
    addu    $a0, $s0, 2
    jalr    $t1
    move    $s0, $v0

    ins     $v0, $s0, 16, 16
    lw      $ra, 0($sp)
    lw      $s0, 4($sp)
    jr      $ra
    addiu   $sp, 4*3

# #############################################################################

.macro PicoWriteRomHW_SSF2_ls def_table table
    lui     $t3, %hi(\def_table)
    ins     $t3, $a1, 2, 5
    lw      $t0, %lo(\def_table)($t3)
    lui     $t2, %hi(\table)
    ins     $t2, $a0, 2, 3
    sw      $t0, %lo(\table)($t2)
.endm

PicoWriteRomHW_SSF2: # u32 a, u32 d
    ext     $a0, $a0, 1, 3
    bnez    $a0, pwr_banking

    # sram register
    lui     $t0, %hi(Pico+OFS_Pico_m_sram_reg)
    lb      $t1, %lo(Pico+OFS_Pico_m_sram_reg)($t0) # Pico.m.sram_reg
    ins     $t1, $a1, 0, 2
    jr      $ra
    sb      $t1, %lo(Pico+OFS_Pico_m_sram_reg)($t0)

pwr_banking:
    andi    $a1, 0x1f

    PicoWriteRomHW_SSF2_ls m_read8_def_table  m_read8_table
    PicoWriteRomHW_SSF2_ls m_read16_def_table m_read16_table
    PicoWriteRomHW_SSF2_ls m_read32_def_table m_read32_table
 
    jr      $ra
    nop

# vim:filetype=mips
Commit	Line	Data
cff531af	1	#*
	2	#* memory handlers with banking support
	3	#* (C) notaz, 2007-2008
	4	#*
	5	#* This work is licensed under the terms of MAME license.
	6	#* See COPYING file in the top-level directory.
	7	#*
3ec29f01	8
0ace9b9a	9	# OUT OF DATE
3ec29f01	10
88fd63ad	11	#include "pico_int_o32.h"
88fd63ad	12
3ec29f01	13	.set noreorder
	14	.set noat
	15
	16	.text
	17	.align 4
	18
	19	# default jump tables
	20
	21	m_read8_def_table:
	22	.long m_read8_rom0 # 0x000000 - 0x07FFFF
	23	.long m_read8_rom1 # 0x080000 - 0x0FFFFF
	24	.long m_read8_rom2 # 0x100000 - 0x17FFFF
	25	.long m_read8_rom3 # 0x180000 - 0x1FFFFF
	26	.long m_read8_rom4 # 0x200000 - 0x27FFFF
	27	.long m_read8_rom5 # 0x280000 - 0x2FFFFF
	28	.long m_read8_rom6 # 0x300000 - 0x37FFFF
	29	.long m_read8_rom7 # 0x380000 - 0x3FFFFF
	30	.long m_read8_rom8 # 0x400000 - 0x47FFFF - for all those large ROM hacks
	31	.long m_read8_rom9 # 0x480000 - 0x4FFFFF
	32	.long m_read8_romA # 0x500000 - 0x57FFFF
	33	.long m_read8_romB # 0x580000 - 0x5FFFFF
	34	.long m_read8_romC # 0x600000 - 0x67FFFF
	35	.long m_read8_romD # 0x680000 - 0x6FFFFF
	36	.long m_read8_romE # 0x700000 - 0x77FFFF
	37	.long m_read8_romF # 0x780000 - 0x7FFFFF
	38	.long m_read8_rom10 # 0x800000 - 0x87FFFF
	39	.long m_read8_rom11 # 0x880000 - 0x8FFFFF
	40	.long m_read8_rom12 # 0x900000 - 0x97FFFF
	41	.long m_read8_rom13 # 0x980000 - 0x9FFFFF
	42	.long m_read8_misc # 0xA00000 - 0xA7FFFF
	43	.long m_read_null # 0xA80000 - 0xAFFFFF
	44	.long m_read_null # 0xB00000 - 0xB7FFFF
	45	.long m_read_null # 0xB80000 - 0xBFFFFF
	46	.long m_read8_vdp # 0xC00000 - 0xC7FFFF
	47	.long m_read8_vdp # 0xC80000 - 0xCFFFFF
	48	.long m_read8_vdp # 0xD00000 - 0xD7FFFF
	49	.long m_read8_vdp # 0xD80000 - 0xDFFFFF
	50	.long m_read8_ram # 0xE00000 - 0xE7FFFF
	51	.long m_read8_ram # 0xE80000 - 0xEFFFFF
	52	.long m_read8_ram # 0xF00000 - 0xF7FFFF
	53	.long m_read8_ram # 0xF80000 - 0xFFFFFF
	54
	55	m_read16_def_table:
	56	.long m_read16_rom0 # 0x000000 - 0x07FFFF
	57	.long m_read16_rom1 # 0x080000 - 0x0FFFFF
	58	.long m_read16_rom2 # 0x100000 - 0x17FFFF
	59	.long m_read16_rom3 # 0x180000 - 0x1FFFFF
	60	.long m_read16_rom4 # 0x200000 - 0x27FFFF
	61	.long m_read16_rom5 # 0x280000 - 0x2FFFFF
	62	.long m_read16_rom6 # 0x300000 - 0x37FFFF
	63	.long m_read16_rom7 # 0x380000 - 0x3FFFFF
	64	.long m_read16_rom8 # 0x400000 - 0x47FFFF
	65	.long m_read16_rom9 # 0x480000 - 0x4FFFFF
	66	.long m_read16_romA # 0x500000 - 0x57FFFF
	67	.long m_read16_romB # 0x580000 - 0x5FFFFF
	68	.long m_read16_romC # 0x600000 - 0x67FFFF
	69	.long m_read16_romD # 0x680000 - 0x6FFFFF
	70	.long m_read16_romE # 0x700000 - 0x77FFFF
	71	.long m_read16_romF # 0x780000 - 0x7FFFFF
	72	.long m_read16_rom10 # 0x800000 - 0x87FFFF
	73	.long m_read16_rom11 # 0x880000 - 0x8FFFFF
	74	.long m_read16_rom12 # 0x900000 - 0x97FFFF
	75	.long m_read16_rom13 # 0x980000 - 0x9FFFFF
	76	.long m_read16_misc # 0xA00000 - 0xA7FFFF
77	.long m_read_null # 0xA80000 - 0xAFFFFF
78	.long m_read_null # 0xB00000 - 0xB7FFFF
79	.long m_read_null # 0xB80000 - 0xBFFFFF
80	.long m_read16_vdp # 0xC00000 - 0xC7FFFF
81	.long m_read16_vdp # 0xC80000 - 0xCFFFFF
82	.long m_read16_vdp # 0xD00000 - 0xD7FFFF
83	.long m_read16_vdp # 0xD80000 - 0xDFFFFF
84	.long m_read16_ram # 0xE00000 - 0xE7FFFF
85	.long m_read16_ram # 0xE80000 - 0xEFFFFF
86	.long m_read16_ram # 0xF00000 - 0xF7FFFF
87	.long m_read16_ram # 0xF80000 - 0xFFFFFF
88
89	m_read32_def_table:
90	.long m_read32_rom0 # 0x000000 - 0x07FFFF
91	.long m_read32_rom1 # 0x080000 - 0x0FFFFF
92	.long m_read32_rom2 # 0x100000 - 0x17FFFF
93	.long m_read32_rom3 # 0x180000 - 0x1FFFFF
94	.long m_read32_rom4 # 0x200000 - 0x27FFFF
95	.long m_read32_rom5 # 0x280000 - 0x2FFFFF
96	.long m_read32_rom6 # 0x300000 - 0x37FFFF
97	.long m_read32_rom7 # 0x380000 - 0x3FFFFF
98	.long m_read32_rom8 # 0x400000 - 0x47FFFF
99	.long m_read32_rom9 # 0x480000 - 0x4FFFFF
100	.long m_read32_romA # 0x500000 - 0x57FFFF
101	.long m_read32_romB # 0x580000 - 0x5FFFFF
102	.long m_read32_romC # 0x600000 - 0x67FFFF
103	.long m_read32_romD # 0x680000 - 0x6FFFFF
104	.long m_read32_romE # 0x700000 - 0x77FFFF
105	.long m_read32_romF # 0x780000 - 0x7FFFFF
106	.long m_read32_rom10 # 0x800000 - 0x87FFFF
107	.long m_read32_rom11 # 0x880000 - 0x8FFFFF
108	.long m_read32_rom12 # 0x900000 - 0x97FFFF
109	.long m_read32_rom13 # 0x980000 - 0x9FFFFF
110	.long m_read32_misc # 0xA00000 - 0xA7FFFF
111	.long m_read_null # 0xA80000 - 0xAFFFFF
112	.long m_read_null # 0xB00000 - 0xB7FFFF
113	.long m_read_null # 0xB80000 - 0xBFFFFF
114	.long m_read32_vdp # 0xC00000 - 0xC7FFFF
115	.long m_read32_vdp # 0xC80000 - 0xCFFFFF
116	.long m_read32_vdp # 0xD00000 - 0xD7FFFF
117	.long m_read32_vdp # 0xD80000 - 0xDFFFFF
118	.long m_read32_ram # 0xE00000 - 0xE7FFFF
119	.long m_read32_ram # 0xE80000 - 0xEFFFFF
120	.long m_read32_ram # 0xF00000 - 0xF7FFFF
121	.long m_read32_ram # 0xF80000 - 0xFFFFFF
122
123
124	# #############################################################################
125
126	.bss
127	.align 4
128
129	# used tables
130	m_read8_table:
131	.skip 32*4
132
133	m_read16_table:
134	.skip 32*4
135
136	m_read32_table:
137	.skip 32*4
138
139
140	# #############################################################################
141
142	.text
143	.align 4
144
145	.global PicoMemReset
146	.global PicoRead8
147	.global PicoRead16
148	.global PicoRead32
149	.global PicoWriteRomHW_SSF2
150
151	.global m_read8_def_table
152	.global m_read8_table
153
154	.macro PicoMemResetCopyDef dst_table src_table
155	lui $t0, %hi(\dst_table)
156	addiu $t0, %lo(\dst_table)
157	lui $t1, %hi(\src_table)
158	addiu $t1, %lo(\src_table)
159	li $t2, 32
160	1:
161	lw $t3, 0($t1)
162	sw $t3, 0($t0)
163	addiu $t2, -1
164	addiu $t1, 4
165	bnez $t2, 1b
166	addiu $t0, 4
167	.endm
168
169	# $t4 = 4
170	.macro PicoMemResetRomArea dst_table ar_label
171	lui $t0, %hi(\dst_table)
172	addiu $t0, %lo(\dst_table)
173	lui $t1, %hi(\ar_label)
174	addiu $t1, %lo(\ar_label)
175	li $t2, 20
176	1:
177	beq $t2, $v1, 2f
178	addiu $t2, -1
179	sll $t3, $t2, 2
180	beq $t2, $t4, 1b # do not touch the SRAM area
181	addu $t3, $t0
182	j 1b
183	sw $t1, 0($t3)
184	2:
185	.endm
186
187
188	PicoMemReset:
88fd63ad	189	lui $v1, %hi(Pico+OFS_Pico_romsize)
88fd63ad	190	lw $v1, %lo(Pico+OFS_Pico_romsize)($v1) # romsize
3ec29f01	191	lui $t0, 8
	192	addu $v1, $t0
	193	addiu $v1, -1
	194	srl $v1, 19
	195
	196	PicoMemResetCopyDef m_read8_table m_read8_def_table
	197	PicoMemResetCopyDef m_read16_table m_read16_def_table
	198	PicoMemResetCopyDef m_read32_table m_read32_def_table
	199
	200	# update memhandlers according to ROM size
	201	li $t4, 4
	202	PicoMemResetRomArea m_read8_table m_read8_above_rom
	203	PicoMemResetRomArea m_read16_table m_read16_above_rom
	204	PicoMemResetRomArea m_read32_table m_read32_above_rom
	205
	206	jr $ra
	207	nop
	208
	209	# #############################################################################
	210
	211	.macro PicoReadJump table
	212	lui $t0, %hi(\table)
	213	srl $t1, $a0, 19
	214	ins $t0, $t1, 2, 5
	215	lw $t0, %lo(\table)($t0)
	216	ins $a0, $0, 24, 8
	217	jr $t0
	218	nop
	219	.endm
	220
	221	PicoRead8: # u32 a
	222	PicoReadJump m_read8_table
	223
	224	PicoRead16: # u32 a
	225	PicoReadJump m_read16_table
	226
	227	PicoRead32: # u32 a
	228	PicoReadJump m_read32_table
	229
	230	# #############################################################################
	231
	232	m_read_null:
	233	jr $ra
	234	li $v0, 0
	235
	236	m_read_neg1:
	237	jr $ra
	238	addiu $v0, $0, 0xffff
	239
88fd63ad	240	# loads &Pico to $t3
3ec29f01	241	.macro m_read_rom_try_sram is200000 size
88fd63ad	242	lui $t2, %hi(Pico)
	243	addiu $t2, %lo(Pico)
	244	lw $t1, OFS_Pico_sv_end($t2)
3ec29f01	245	.if \is200000
	246	ins $a0, $0, 19, 13
	247	lui $t4, 0x20
	248	or $a0, $t4
	249	.endif
	250	subu $t4, $a0, $t1
	251	bgtz $t4, 1f
88fd63ad	252	lw $t1, OFS_Pico_sv_start($t2)
3ec29f01	253	subu $t4, $t1, $a0
	254	bgtz $t4, 1f
	255	nop
88fd63ad	256	lb $t1, OFS_Pico_m_sram_reg($t2)
3ec29f01	257	andi $t4, $t1, 5
	258	beqz $t4, 1f
	259	nop
	260	.if \size == 8
	261	j SRAMRead
	262	nop
	263	.elseif \size == 16
9dc09829	264	sw $ra, -4($sp)
9dc09829	265	jal SRAMRead16
3ec29f01	266	addiu $sp, -4
3ec29f01	267	lw $ra, 0($sp)
3ec29f01	268	jr $ra
9dc09829	269	addiu $sp, 4
3ec29f01	270	.else
3ec29f01	271	addiu $sp, -8
3ec29f01	272	sw $ra, 0($sp)
9dc09829	273	sw $a0, 4($sp)
	274	jal SRAMRead16
	275	nop
3ec29f01	276	lw $a0, 4($sp)
3ec29f01	277	sw $v0, 4($sp)
9dc09829	278	jal SRAMRead16
3ec29f01	279	addiu $a0, 2
	280	lw $v1, 4($sp)
	281	lw $ra, 0($sp)
	282	addiu $sp, 8
3ec29f01	283	jr $ra
9dc09829	284	ins $v0, $v1, 16, 16
3ec29f01	285	.endif
	286	# m_read_nosram:
	287	1:
	288	.endm
	289
	290	.macro m_read8_rom sect
88fd63ad	291	lui $t0, %hi(Pico+OFS_Pico_rom)
88fd63ad	292	lw $t0, %lo(Pico+OFS_Pico_rom)($t0) # rom
3ec29f01	293	xori $a0, 1
	294	ins $a0, $0, 19, 13
	295	.if \sect
	296	lui $t1, 8*\sect
	297	addu $a0, $t1
	298	.endif
	299	addu $t0, $a0
	300	jr $ra
	301	lb $v0, 0($t0)
	302	.endm
	303
	304
	305	m_read8_rom0: # 0x000000 - 0x07ffff
	306	m_read8_rom 0
	307
	308	m_read8_rom1: # 0x080000 - 0x0fffff
	309	m_read8_rom 1
	310
	311	m_read8_rom2: # 0x100000 - 0x17ffff
	312	m_read8_rom 2
	313
	314	m_read8_rom3: # 0x180000 - 0x1fffff
	315	m_read8_rom 3
	316
	317	m_read8_rom4: # 0x200000 - 0x27ffff, SRAM area
	318	m_read_rom_try_sram 1 8
	319	lw $t1, 4($t3) # romsize
	320	subu $t4, $t1, $a0
	321	blez $t4, m_read_null
	322	lw $t1, 0($t3) # rom
	323	xori $a0, 1
	324	addu $t1, $a0
	325	jr $ra
	326	lb $v0, 0($t1)
	327
	328	m_read8_rom5: # 0x280000 - 0x2fffff
	329	m_read8_rom 5
	330
	331	m_read8_rom6: # 0x300000 - 0x37ffff
	332	m_read8_rom 6
	333
	334	m_read8_rom7: # 0x380000 - 0x3fffff
	335	m_read8_rom 7
	336
	337	m_read8_rom8: # 0x400000 - 0x47ffff
	338	m_read8_rom 8
	339
	340	m_read8_rom9: # 0x480000 - 0x4fffff
	341	m_read8_rom 9
	342
	343	m_read8_romA: # 0x500000 - 0x57ffff
	344	m_read8_rom 0xA
	345
	346	m_read8_romB: # 0x580000 - 0x5fffff
	347	m_read8_rom 0xB
	348
	349	m_read8_romC: # 0x600000 - 0x67ffff
	350	m_read8_rom 0xC
	351
	352	m_read8_romD: # 0x680000 - 0x6fffff
	353	m_read8_rom 0xD
	354
	355	m_read8_romE: # 0x700000 - 0x77ffff
	356	m_read8_rom 0xE
357
358	m_read8_romF: # 0x780000 - 0x7fffff
359	m_read8_rom 0xF
360
361	m_read8_rom10: # 0x800000 - 0x87ffff
362	m_read8_rom 0x10
363
364	m_read8_rom11: # 0x880000 - 0x8fffff
365	m_read8_rom 0x11
366
367	m_read8_rom12: # 0x900000 - 0x97ffff
368	m_read8_rom 0x12
369
370	m_read8_rom13: # 0x980000 - 0x9fffff
371	m_read8_rom 0x13
372
373
374	m_read8_misc:
375	srl $t0, $a0, 5
376	sll $t0, $t0, 5
377	lui $t1, 0xa1
378	bne $t0, $t1, m_read8_misc2
379	andi $t0, $a0, 0x1e
380	m_read8_misc_io:
381	beqz $t0, m_read8_misc_hwreg
382	sub $t1, $t0, 4
383	bgtz $t1, m_read8_misc_ioports
384	nop
385	slti $a0, $t0, 4
386	xori $a0, 1
387	j PadRead
388	nop
389
390	m_read8_misc_hwreg:
88fd63ad	391	lui $v0, %hi(Pico+OFS_Pico_m_hardware)
3ec29f01	392	jr $ra
88fd63ad	393	lb $v0, %lo(Pico+OFS_Pico_m_hardware)($v0)
3ec29f01	394
3ec29f01	395	m_read8_misc_ioports:
88fd63ad	396	lui $v0, %hi(PicoMem+0x22000)
3ec29f01	397	ins $v0, $t0, 0, 5
3ec29f01	398	jr $ra
88fd63ad	399	lb $v0, %lo(PicoMem+0x22000)($v0)
3ec29f01	400
	401	m_read8_misc2:
	402	lui $t0, 0xa1
	403	ori $t0, 0x1100
	404	bne $a0, $t0, m_read8_misc3
	405	srl $t0, $a0, 16
	406	j z80ReadBusReq
	407
	408	m_read8_misc3:
	409	addiu $t0, 0xff60 # expecting 0xa0 to get 0
	410	bnez $t0, m_read8_misc4
	411
	412	# z80 area
	413	andi $t0, $a0, 0x4000
	414	bnez $t0, m_read8_z80_misc
	415	andi $t0, $a0, 0x6000
	416	j z80Read8 # z80 RAM
	417
	418	m_read8_z80_misc:
	419	addiu $t0, 0xc000 # expecting 0x4000 to get 0
	420	bnez $t0, m_read_neg1 # invalid
c060a9ab	421	nop
c060a9ab	422	j ym2612_read_local_68k
43e6eaad	423	nop
3ec29f01	424
3ec29f01	425	m_read8_fake_ym2612:
88fd63ad	426	lb $v0, %lo(Pico+OFS_Pico_m_rotate)($t0)
3ec29f01	427	addiu $t1, $v0, 1
3ec29f01	428	jr $ra
88fd63ad	429	sb $t1, %lo(Pico+OFS_Pico_m_rotate)($t0)
3ec29f01	430
3ec29f01	431	# delay slot friendly
0ffefdb8	432	.macro m_read8_call16 funcname is_func_ptr=0
	433	.if \is_func_ptr
	434	lui $t1, %hi(\funcname)
	435	lw $t1, %lo(\funcname)($t1)
	436	.endif
3ec29f01	437	andi $t0, $a0, 1
	438	beqz $t0, 1f
	439	li $a1, 8 # not always needed, but shouln't cause problems
0ffefdb8	440	.if \is_func_ptr
	441	jr $t1
	442	.else
3ec29f01	443	j \funcname # odd address
0ffefdb8	444	.endif
3ec29f01	445	nop
	446	1:
	447	addiu $sp, -4
	448	sw $ra, 0($sp)
0ffefdb8	449	.if \is_func_ptr
	450	jalr $t1
	451	.else
3ec29f01	452	jal \funcname
0ffefdb8	453	.endif
3ec29f01	454	xori $a0, 1
	455	lw $ra, 0($sp)
	456	addiu $sp, 4
	457	jr $ra
	458	srl $v0, 8
	459	.endm
	460
	461	m_read8_misc4:
	462	# if everything else fails, use generic handler
	463	m_read8_call16 OtherRead16
	464
	465	m_read8_vdp:
	466	ext $t0, $a0, 16, 3
	467	andi $t1, $a0, 0xe0
	468	or $t0, $t1
	469	bnez $t0, m_read_null # invalid address
9761a7d0	470	nop
75b84e4b	471	j PicoRead8_vdp
9761a7d0	472	nop
3ec29f01	473
3ec29f01	474	m_read8_ram:
88fd63ad	475	lui $t0, %hi(PicoMem)
3ec29f01	476	ins $t0, $a0, 0, 16
	477	xori $t0, 1
	478	jr $ra
88fd63ad	479	lb $v0, %lo(PicoMem)($t0)
3ec29f01	480
	481	m_read8_above_rom:
	482	# might still be SRam (Micro Machines, HardBall '95)
	483	m_read_rom_try_sram 0 8
0ffefdb8	484	m_read8_call16 PicoRead16Hook 1
3ec29f01	485
	486	# #############################################################################
	487
	488	.macro m_read16_rom sect
88fd63ad	489	lui $t0, %hi(Pico+OFS_Pico_rom)
88fd63ad	490	lw $t0, %lo(Pico+OFS_Pico_rom)($t0) # rom
3ec29f01	491	ins $a0, $0, 0, 1
	492	ins $a0, $0, 19, 13
	493	.if \sect
	494	lui $t1, 8*\sect
	495	addu $a0, $t1
	496	.endif
	497	addu $t0, $a0
	498	jr $ra
	499	lh $v0, 0($t0)
	500	.endm
	501
	502
	503	m_read16_rom0: # 0x000000 - 0x07ffff
	504	m_read16_rom 0
	505
	506	m_read16_rom1: # 0x080000 - 0x0fffff
	507	m_read16_rom 1
	508
	509	m_read16_rom2: # 0x100000 - 0x17ffff
	510	m_read16_rom 2
	511
	512	m_read16_rom3: # 0x180000 - 0x1fffff
	513	m_read16_rom 3
	514
	515	m_read16_rom4: # 0x200000 - 0x27ffff, SRAM area
	516	m_read_rom_try_sram 1 16
	517	lw $t1, 4($t3) # romsize
	518	subu $t4, $t1, $a0
	519	blez $t4, m_read_null
	520	lw $t1, 0($t3) # rom
	521	ins $a0, $0, 0, 1
	522	addu $t1, $a0
	523	jr $ra
	524	lh $v0, 0($t1)
	525
	526	m_read16_rom5: # 0x280000 - 0x2fffff
	527	m_read16_rom 5
	528
	529	m_read16_rom6: # 0x300000 - 0x37ffff
	530	m_read16_rom 6
	531
	532	m_read16_rom7: # 0x380000 - 0x3fffff
	533	m_read16_rom 7
	534
	535	m_read16_rom8: # 0x400000 - 0x47ffff
	536	m_read16_rom 8
	537
	538	m_read16_rom9: # 0x480000 - 0x4fffff
	539	m_read16_rom 9
	540
	541	m_read16_romA: # 0x500000 - 0x57ffff
	542	m_read16_rom 0xA
	543
	544	m_read16_romB: # 0x580000 - 0x5fffff
	545	m_read16_rom 0xB
	546
	547	m_read16_romC: # 0x600000 - 0x67ffff
	548	m_read16_rom 0xC
	549
	550	m_read16_romD: # 0x680000 - 0x6fffff
	551	m_read16_rom 0xD
	552
	553	m_read16_romE: # 0x700000 - 0x77ffff
	554	m_read16_rom 0xE
555
556	m_read16_romF: # 0x780000 - 0x7fffff
557	m_read16_rom 0xF
558
559	m_read16_rom10: # 0x800000 - 0x87ffff
560	m_read16_rom 0x10
561
562	m_read16_rom11: # 0x880000 - 0x8fffff
563	m_read16_rom 0x11
564
565	m_read16_rom12: # 0x900000 - 0x97ffff
566	m_read16_rom 0x12
567
568	m_read16_rom13: # 0x980000 - 0x9fffff
569	m_read16_rom 0x13
570
571	m_read16_misc:
572	ins $a0, $0, 0, 1
573	j OtherRead16
574	li $a1, 16
575
576	m_read16_vdp:
577	ext $t0, $a0, 16, 3
578	andi $t1, $a0, 0xe0
579	or $t0, $t1
580	bnez $t0, m_read_null # invalid address
581	ins $a0, $0, 0, 1
582	j PicoVideoRead
583	nop
584
585	m_read16_ram:
88fd63ad	586	lui $t0, %hi(PicoMem)
3ec29f01	587	ins $a0, $0, 0, 1
	588	ins $t0, $a0, 0, 16
	589	jr $ra
88fd63ad	590	lh $v0, %lo(PicoMem)($t0)
3ec29f01	591
	592	m_read16_above_rom:
	593	# might still be SRam
	594	m_read_rom_try_sram 0 16
0ffefdb8	595	lui $t1, %hi(PicoRead16Hook)
	596	lw $t1, %lo(PicoRead16Hook)($t1)
	597	jr $t1
3ec29f01	598	ins $a0, $0, 0, 1
	599
	600	# #############################################################################
	601
	602	.macro m_read32_rom sect
88fd63ad	603	lui $t0, %hi(Pico+OFS_Pico_rom)
88fd63ad	604	lw $t0, %lo(Pico+OFS_Pico_rom)($t0) # rom
3ec29f01	605	ins $a0, $0, 0, 1
	606	ins $a0, $0, 19, 13
	607	.if \sect
	608	lui $t1, 8*\sect
	609	addu $a0, $t1
	610	.endif
	611	addu $t0, $a0
	612	lh $v1, 0($t0)
	613	lh $v0, 2($t0)
	614	jr $ra
	615	ins $v0, $v1, 16, 16
	616	.endm
	617
	618
	619	m_read32_rom0: # 0x000000 - 0x07ffff
	620	m_read32_rom 0
	621
	622	m_read32_rom1: # 0x080000 - 0x0fffff
	623	m_read32_rom 1
	624
	625	m_read32_rom2: # 0x100000 - 0x17ffff
	626	m_read32_rom 2
	627
	628	m_read32_rom3: # 0x180000 - 0x1fffff
	629	m_read32_rom 3
	630
	631	m_read32_rom4: # 0x200000 - 0x27ffff, SRAM area
	632	m_read_rom_try_sram 1 32
	633	lw $t1, 4($t3) # romsize
	634	subu $t4, $t1, $a0
	635	blez $t4, m_read_null
	636	lw $t1, 0($t3) # rom
	637	ins $a0, $0, 0, 1
	638	addu $t1, $a0
	639	lh $v1, 0($t1)
	640	lh $v0, 2($t1)
	641	jr $ra
	642	ins $v0, $v1, 16, 16
	643
	644	m_read32_rom5: # 0x280000 - 0x2fffff
	645	m_read32_rom 5
	646
	647	m_read32_rom6: # 0x300000 - 0x37ffff
	648	m_read32_rom 6
	649
	650	m_read32_rom7: # 0x380000 - 0x3fffff
	651	m_read32_rom 7
	652
	653	m_read32_rom8: # 0x400000 - 0x47ffff
	654	m_read32_rom 8
	655
	656	m_read32_rom9: # 0x480000 - 0x4fffff
	657	m_read32_rom 9
	658
	659	m_read32_romA: # 0x500000 - 0x57ffff
	660	m_read32_rom 0xA
	661
	662	m_read32_romB: # 0x580000 - 0x5fffff
	663	m_read32_rom 0xB
	664
	665	m_read32_romC: # 0x600000 - 0x67ffff
	666	m_read32_rom 0xC
	667
	668	m_read32_romD: # 0x680000 - 0x6fffff
669	m_read32_rom 0xD
670
671	m_read32_romE: # 0x700000 - 0x77ffff
672	m_read32_rom 0xE
673
674	m_read32_romF: # 0x780000 - 0x7fffff
675	m_read32_rom 0xF
676
677	m_read32_rom10: # 0x800000 - 0x87ffff
678	m_read32_rom 0x10
679
680	m_read32_rom11: # 0x880000 - 0x8fffff
681	m_read32_rom 0x11
682
683	m_read32_rom12: # 0x900000 - 0x97ffff
684	m_read32_rom 0x12
685
686	m_read32_rom13: # 0x980000 - 0x9fffff
687	m_read32_rom 0x13
688
689	.macro m_read32_call16 func need_a1=0
690	addiu $sp, -8
691	sw $ra, 0($sp)
692	sw $s0, 4($sp)
693	.if \need_a1
694	li $a1, 16
695	.endif
696	jal \func
697	move $s0, $a0
698
699	addu $a0, $s0, 2
700	.if \need_a1
701	li $a1, 16
702	.endif
703	jal \func
704	move $s0, $v0
705
706	ins $v0, $s0, 16, 16
707	lw $ra, 0($sp)
708	lw $s0, 4($sp)
709	jr $ra
710	addiu $sp, 8
711	.endm
712
713	m_read32_misc:
714	ins $a0, $0, 0, 1
715	m_read32_call16 OtherRead16, 1
716
717	m_read32_vdp:
718	ext $t0, $a0, 16, 3
719	andi $t1, $a0, 0xe0
720	or $t0, $t1
721	bnez $t0, m_read_null # invalid address
722	ins $a0, $0, 0, 1
723	m_read32_call16 PicoVideoRead
724
725	m_read32_ram:
88fd63ad	726	lui $t0, %hi(PicoMem)
3ec29f01	727	ins $a0, $0, 0, 1
3ec29f01	728	ins $t0, $a0, 0, 16
88fd63ad	729	lh $v1, %lo(PicoMem)($t0)
88fd63ad	730	lh $v0, %lo(PicoMem+2)($t0)
3ec29f01	731	jr $ra
	732	ins $v0, $v1, 16, 16
	733
	734	m_read32_above_rom:
	735	# might still be SRam
	736	m_read_rom_try_sram 0 32
	737	ins $a0, $0, 0, 1
0ffefdb8	738	lui $t1, %hi(PicoRead16Hook)
	739	lw $t1, %lo(PicoRead16Hook)($t1)
	740	addiu $sp, -4*3
	741	sw $ra, 0($sp)
	742	sw $s0, 4($sp)
	743	sw $t1, 8($sp)
	744	jalr $t1
	745	move $s0, $a0
	746
	747	lw $t1, 8($sp)
	748	addu $a0, $s0, 2
	749	jalr $t1
	750	move $s0, $v0
	751
	752	ins $v0, $s0, 16, 16
	753	lw $ra, 0($sp)
	754	lw $s0, 4($sp)
	755	jr $ra
	756	addiu $sp, 4*3
3ec29f01	757
	758	# #############################################################################
	759
	760	.macro PicoWriteRomHW_SSF2_ls def_table table
	761	lui $t3, %hi(\def_table)
	762	ins $t3, $a1, 2, 5
	763	lw $t0, %lo(\def_table)($t3)
	764	lui $t2, %hi(\table)
	765	ins $t2, $a0, 2, 3
	766	sw $t0, %lo(\table)($t2)
	767	.endm
	768
	769	PicoWriteRomHW_SSF2: # u32 a, u32 d
	770	ext $a0, $a0, 1, 3
	771	bnez $a0, pwr_banking
	772
	773	# sram register
88fd63ad	774	lui $t0, %hi(Pico+OFS_Pico_m_sram_reg)
88fd63ad	775	lb $t1, %lo(Pico+OFS_Pico_m_sram_reg)($t0) # Pico.m.sram_reg
3ec29f01	776	ins $t1, $a1, 0, 2
3ec29f01	777	jr $ra
88fd63ad	778	sb $t1, %lo(Pico+OFS_Pico_m_sram_reg)($t0)
3ec29f01	779
	780	pwr_banking:
	781	andi $a1, 0x1f
	782
	783	PicoWriteRomHW_SSF2_ls m_read8_def_table m_read8_table
	784	PicoWriteRomHW_SSF2_ls m_read16_def_table m_read16_table
	785	PicoWriteRomHW_SSF2_ls m_read32_def_table m_read32_table
	786
	787	jr $ra
	788	nop
	789
cff531af	790	# vim:filetype=mips