diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/libultra/gu/libm_vals.s | 8 | ||||
| -rw-r--r-- | src/libultra/os/getintmask.s | 6 | ||||
| -rw-r--r-- | src/libultra/os/interrupt.s | 45 | ||||
| -rw-r--r-- | src/libultra/os/invaldcache.s | 80 | ||||
| -rw-r--r-- | src/libultra/os/invalicache.s | 44 | ||||
| -rw-r--r-- | src/libultra/os/maptlbrdb.s | 31 | ||||
| -rw-r--r-- | src/libultra/os/probetlb.s | 83 | ||||
| -rw-r--r-- | src/libultra/os/unmaptlball.s | 25 | ||||
| -rw-r--r-- | src/libultra/os/writebackdcache.s | 54 | ||||
| -rw-r--r-- | src/libultra/os/writebackdcacheall.s | 19 |
10 files changed, 392 insertions, 3 deletions
diff --git a/src/libultra/gu/libm_vals.s b/src/libultra/gu/libm_vals.s new file mode 100644 index 000000000..fb430e1b6 --- /dev/null +++ b/src/libultra/gu/libm_vals.s @@ -0,0 +1,8 @@ +#include "PR/asm.h" +#include "PR/regdef.h" + +.rdata + +DATA(__libm_qnan_f) + .word 0x7F810000 +ENDDATA(__libm_qnan_f) diff --git a/src/libultra/os/getintmask.s b/src/libultra/os/getintmask.s index f5e7cf770..50c187f5c 100644 --- a/src/libultra/os/getintmask.s +++ b/src/libultra/os/getintmask.s @@ -22,13 +22,13 @@ LEAF(osGetIntMask) .set noreorder /* Extract interrupt enable bits from current SR */ mfc0 v0, C0_SR - andi v0, v0, (SR_IMASK | SR_IE) + and v0, v0, (SR_IMASK | SR_IE) /* Get value of __OSGlobalIntMask */ la t0, __OSGlobalIntMask lw t1, (t0) /* Bitwise-OR in the disabled CPU bits of __OSGlobalIntMask */ xor t0, t1, ~0 - andi t0, t0, SR_IMASK + and t0, t0, SR_IMASK or v0, v0, t0 /* Fetch MI_INTR_MASK_REG */ lw t1, PHYS_TO_K1(MI_INTR_MASK_REG) @@ -40,7 +40,7 @@ LEAF(osGetIntMask) /* Bitwise-OR in the disabled RCP bits of __OSGlobalIntMask */ srl t0, t0, RCP_IMASKSHIFT xor t0, t0, ~0 - andi t0, t0, (RCP_IMASK >> RCP_IMASKSHIFT) + and t0, t0, (RCP_IMASK >> RCP_IMASKSHIFT) or t1, t1, t0 1: /* Shift the RCP bits to not conflict with the CPU bits */ diff --git a/src/libultra/os/interrupt.s b/src/libultra/os/interrupt.s new file mode 100644 index 000000000..3726c3a42 --- /dev/null +++ b/src/libultra/os/interrupt.s @@ -0,0 +1,45 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" +#include "PR/os_thread.h" + +.text + +LEAF(__osDisableInt) + la t2, __OSGlobalIntMask + lw t3, (t2) + and t3, t3, SR_IMASK + MFC0( t0, C0_SR) + and t1, t0, ~SR_IE + MTC0( t1, C0_SR) + and v0, t0, SR_IE + lw t0, (t2) + and t0, t0, SR_IMASK +.set noreorder + beq t0, t3, No_Change_Global_Int + /*! @bug this la should be lw, it may never come up in practice as to reach this code + *! the CPU bits of __OSGlobalIntMask must have changed while this function is running. + */ + la t2, __osRunningThread + lw t1, THREAD_SR(t2) + and t2, t1, SR_IMASK + and t2, t2, t0 +.set reorder + and t1, t1, ~SR_IMASK + or t1, t1, t2 + and t1, t1, ~SR_IE + MTC0( t1, C0_SR) + NOP + NOP +No_Change_Global_Int: + jr ra +END(__osDisableInt) + +LEAF(__osRestoreInt) + MFC0( t0, C0_SR) + or t0, t0, a0 + MTC0( t0, C0_SR) + NOP + NOP + jr ra +END(__osRestoreInt) diff --git a/src/libultra/os/invaldcache.s b/src/libultra/os/invaldcache.s new file mode 100644 index 000000000..2187ccf80 --- /dev/null +++ b/src/libultra/os/invaldcache.s @@ -0,0 +1,80 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +/** + * void osInvalDCache(void* vaddr, s32 nbytes); + * + * Invalidates the CPU Data Cache for `nbytes` at `vaddr`. + * The cache is not automatically synced with physical memory, so cache + * lines must be invalidated to ensure old data is not used in place of + * newly available data supplied by an external agent in a DMA operation. + * + * If `vaddr` is not aligned to a cache line boundary, or nbytes is not a + * multiple of the data cache line size (16 bytes) a larger region is + * invalidated. + * + * If the amount to invalidate is at least the data cache size (DCACHE_SIZE), + * the entire data cache is invalidated. + */ +LEAF(osInvalDCache) + /* If the amount to invalidate is less than or equal to 0, return immediately */ + blez a1, 3f + /* If the amount to invalidate is as large as or larger than + * the data cache size, invalidate all */ + li t3, DCACHE_SIZE + bgeu a1, t3, 4f + /* Ensure end address doesn't wrap around and end up smaller + * than the start address */ + move t0, a0 + addu t1, a0, a1 + bgeu t0, t1, 3f + /* Mask start with cache line */ + addu t1, t1, -DCACHE_LINESIZE + and t2, t0, DCACHE_LINEMASK + /* If mask is not zero, the start is not cache aligned */ + beqz t2, 1f + /* Subtract mask result to align to cache line */ + subu t0, t0, t2 + /* Hit-Writeback-Invalidate unaligned part */ + CACHE( (CACH_PD | C_HWBINV), (t0)) + /* If that's all there is to do, return early */ + bgeu t0, t1, 3f + addu t0, t0, DCACHE_LINESIZE +1: + /* Mask end with cache line */ + and t2, t1, DCACHE_LINEMASK + /* If mask is not zero, the end is not cache aligned */ + beqz t2, 2f + /* Subtract mask result to align to cache line */ + subu t1, t1, t2 + /* Hit-Writeback-Invalidate unaligned part */ + CACHE( (CACH_PD | C_HWBINV), DCACHE_LINESIZE(t1)) + /* If that's all there is to do, return early */ + bltu t1, t0, 3f + /* Invalidate the rest */ +2: + /* Hit-Invalidate */ + CACHE( (CACH_PD | C_HINV), (t0)) +.set noreorder + bltu t0, t1, 2b + addu t0, t0, DCACHE_LINESIZE +.set reorder +3: + jr ra + +4: + li t0, K0BASE + addu t1, t0, t3 + addu t1, t1, -DCACHE_LINESIZE +5: + /* Index-Writeback-Invalidate */ + CACHE( (CACH_PD | C_IWBINV), (t0)) +.set noreorder + bltu t0, t1, 5b + addu t0, DCACHE_LINESIZE +.set reorder + jr ra +END(osInvalDCache) diff --git a/src/libultra/os/invalicache.s b/src/libultra/os/invalicache.s new file mode 100644 index 000000000..2d0840880 --- /dev/null +++ b/src/libultra/os/invalicache.s @@ -0,0 +1,44 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +LEAF(osInvalICache) + /* If the amount to invalidate is less than or equal to 0, return immediately */ + blez a1, 2f + /* If the amount to invalidate is as large as or larger than */ + /* the instruction cache size, invalidate all */ + li t3, ICACHE_SIZE + bgeu a1, t3, 3f + /* ensure end address doesn't wrap around and end up smaller */ + /* than the start address */ + move t0, a0 + addu t1, a0, a1 + bgeu t0, t1, 2f + /* Mask and subtract to align to cache line */ + addu t1, t1, -ICACHE_LINESIZE + and t2, t0, ICACHE_LINEMASK + subu t0, t0, t2 +1: + CACHE( (CACH_PI | C_HINV), (t0)) +.set noreorder + bltu t0, t1, 1b + addu t0, t0, ICACHE_LINESIZE +.set reorder +2: + jr ra + +3: + li t0, K0BASE + addu t1, t0, t3 + addu t1, t1, -ICACHE_LINESIZE +4: + CACHE( (CACH_PI | C_IINV), (t0)) +.set noreorder + bltu t0, t1, 4b + addu t0, ICACHE_LINESIZE +.set reorder + jr ra +.set reorder +END(osInvalICache) diff --git a/src/libultra/os/maptlbrdb.s b/src/libultra/os/maptlbrdb.s new file mode 100644 index 000000000..e186f060d --- /dev/null +++ b/src/libultra/os/maptlbrdb.s @@ -0,0 +1,31 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" +#include "PR/rdb.h" + +.text + +LEAF(osMapTLBRdb) + MFC0( t0, C0_ENTRYHI) + li t1, NTLBENTRIES + MTC0( t1, C0_INX) + MTC0( zero, C0_PAGEMASK) + li t2, (TLBLO_UNCACHED | TLBLO_D | TLBLO_V | TLBLO_G) + li t1, (RDB_BASE_REG & TLBHI_VPN2MASK) + MTC0( t1, C0_ENTRYHI) + /* Possible bug? Virtual address instead of physical address set as page frame number */ + li t1, RDB_BASE_VIRTUAL_ADDR + srl t3, t1, TLBLO_PFNSHIFT + or t3, t3, t2 + MTC0( t3, C0_ENTRYLO0) + li t1, TLBLO_G + MTC0( t1, C0_ENTRYLO1) + NOP + TLBWI + NOP + NOP + NOP + NOP + MTC0( t0, C0_ENTRYHI) + jr ra +END(osMapTLBRdb) diff --git a/src/libultra/os/probetlb.s b/src/libultra/os/probetlb.s new file mode 100644 index 000000000..27b4418fa --- /dev/null +++ b/src/libultra/os/probetlb.s @@ -0,0 +1,83 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +/** + * u32 __osProbeTLB(void* vaddr); + * + * Searches the TLB for the physical address associated with + * the virtual address `vaddr`. + * + * Returns the physical address if found, or -1 if not found. + */ +LEAF(__osProbeTLB) +.set noreorder + /* Set C0_ENTRYHI based on supplied vaddr */ + mfc0 t0, C0_ENTRYHI + and t1, t0, TLBHI_PIDMASK + and t2, a0, TLBHI_VPN2MASK + or t1, t1, t2 + mtc0 t1, C0_ENTRYHI + nop + nop + nop + /* TLB probe, sets C0_INX to a value matching C0_ENTRYHI. */ + /* If no match is found the TLBINX_PROBE bit is set to indicate this. */ + tlbp + nop + nop + /* Read result */ + mfc0 t3, C0_INX + and t3, t3, TLBINX_PROBE + /* Branch if no match was found */ + bnez t3, 3f + nop + + /* Read TLB, sets C0_ENTRYHI, C0_ENTRYLO0, C0_ENTRYLO1 and C0_PAGEMASK for the TLB */ + /* entry indicated by C0_INX */ + tlbr + nop + nop + nop + /* Calculate page size = (page mask + 0x2000) >> 1 */ + mfc0 t3, C0_PAGEMASK + add t3, t3, 0x2000 + srl t3, t3, 1 + /* & with vaddr */ + and t4, t3, a0 + /* Select C0_ENTRYLO0 or C0_ENTRYLO1 */ + bnez t4, 1f + add t3, t3, -1 /* make bitmask out of page size */ + mfc0 v0, C0_ENTRYLO0 + b 2f + nop +1: + mfc0 v0, C0_ENTRYLO1 +2: + /* Check valid bit and branch if not valid */ + and t5, v0, TLBLO_V + beqz t5, 3f + nop + + /* Extract the Page Frame Number from the entry */ + and v0, v0, TLBLO_PFNMASK + sll v0, v0, TLBLO_PFNSHIFT + /* Mask vaddr with page size mask */ + and t5, a0, t3 + /* Add masked vaddr to pfn to obtain the physical address */ + add v0, v0, t5 + b 4f + nop +3: + /* No physical address for the supplied virtual address was found, */ + /* return -1 */ + li v0, -1 +4: + /* Restore original C0_ENTRYHI value before returning */ + mtc0 t0, C0_ENTRYHI + jr ra + nop +.set reorder +END(__osProbeTLB) diff --git a/src/libultra/os/unmaptlball.s b/src/libultra/os/unmaptlball.s new file mode 100644 index 000000000..1933f373f --- /dev/null +++ b/src/libultra/os/unmaptlball.s @@ -0,0 +1,25 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +LEAF(osUnmapTLBAll) + MFC0( t0, C0_ENTRYHI) + li t1, (NTLBENTRIES - 1) + li t2, (K0BASE & TLBHI_VPN2MASK) + MTC0( t2, C0_ENTRYHI) + MTC0( zero, C0_ENTRYLO0) + MTC0( zero, C0_ENTRYLO1) +1: + MTC0( t1, C0_INX) + NOP + TLBWI + NOP + NOP + addi t1, t1, -1 + bgez t1, 1b + + MTC0( t0, C0_ENTRYHI) + jr ra +END(osUnmapTLBAll) diff --git a/src/libultra/os/writebackdcache.s b/src/libultra/os/writebackdcache.s new file mode 100644 index 000000000..1d77fea50 --- /dev/null +++ b/src/libultra/os/writebackdcache.s @@ -0,0 +1,54 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +/** + * void osWritebackDCache(void* vaddr, s32 nbytes); + * + * Writes back the contents of the data cache to main memory for `nbytes` at `vaddr`. + * If `nbytes` is as large as or larger than the data cache size, the entire cache is + * written back. + */ +LEAF(osWritebackDCache) + /* If the amount to write back is less than or equal to 0, return immediately */ + blez a1, 2f + + /* If the amount to write back is as large as or larger than */ + /* the data cache size, write back all */ + li t3, DCACHE_SIZE + bgeu a1, t3, 3f + + /* ensure end address doesn't wrap around and end up smaller */ + /* than the start address */ + move t0, a0 + addu t1, a0, a1 + bgeu t0, t1, 2f + + /* Mask and subtract to align to cache line */ + addu t1, t1, -DCACHE_LINESIZE + and t2, t0, DCACHE_LINEMASK + subu t0, t0, t2 +1: + CACHE( (CACH_PD | C_HWB), (t0)) +.set noreorder + bltu t0, t1, 1b + addu t0, t0, DCACHE_LINESIZE +.set reorder +2: + jr ra + +/* same as osWritebackDCacheAll in operation */ +3: + li t0, K0BASE + addu t1, t0, t3 + addu t1, t1, -DCACHE_LINESIZE +4: + CACHE( (CACH_PD | C_IWBINV), (t0)) +.set noreorder + bltu t0, t1, 4b + addu t0, DCACHE_LINESIZE +.set reorder + jr ra +END(osWritebackDCache) diff --git a/src/libultra/os/writebackdcacheall.s b/src/libultra/os/writebackdcacheall.s new file mode 100644 index 000000000..432b3b05e --- /dev/null +++ b/src/libultra/os/writebackdcacheall.s @@ -0,0 +1,19 @@ +#include "PR/asm.h" +#include "PR/regdef.h" +#include "PR/R4300.h" + +.text + +LEAF(osWritebackDCacheAll) + li t0, K0BASE + li t2, DCACHE_SIZE + addu t1, t0, t2 + addu t1, t1, -DCACHE_LINESIZE +1: + CACHE( (CACH_PD | C_IWBINV), (t0)) +.set noreorder + bltu t0, t1, 1b + addu t0, DCACHE_LINESIZE +.set reorder + jr ra +END(osWritebackDCacheAll) |
