| #include "macros.inc" |
| |
| test_suite windowed |
| |
| .altmacro |
| |
| .macro reset_window start |
| movi a2, 0xff |
| wsr a2, windowstart |
| rsync |
| movi a2, 0 |
| wsr a2, windowbase |
| rsync |
| movi a2, \start |
| wsr a2, windowstart |
| rsync |
| .endm |
| |
| .macro overflow_test shift, window, probe_ok, probe_ex |
| set_vector window_overflow_4, 0 |
| set_vector window_overflow_8, 0 |
| set_vector window_overflow_12, 0 |
| |
| movi a2, 1 | (((1 << ((\window) / 4)) | 1) << ((\shift) / 4)) |
| wsr a2, windowstart |
| reset_ps |
| |
| mov a2, a\probe_ok |
| set_vector window_overflow_\window, 10f |
| 1: |
| mov a2, a\probe_ex |
| test_fail |
| 10: |
| rsr a2, epc1 |
| movi a3, 1b |
| assert eq, a2, a3 |
| movi a2, 2f |
| wsr a2, epc1 |
| |
| rsr a2, windowbase |
| movi a3, (\shift) / 4 |
| assert eq, a2, a3 |
| rsr a2, ps |
| movi a3, 0x4001f |
| assert eq, a2, a3 |
| rfwo |
| test_fail |
| 2: |
| rsr a2, windowbase |
| assert eqi, a2, 0 |
| rsr a2, windowstart |
| movi a3, 1 | ((1 << ((\window) / 4)) << ((\shift) / 4)) |
| assert eq, a2, a3 |
| rsr a2, ps |
| movi a3, 0x4000f |
| assert eq, a2, a3 |
| .endm |
| |
| .macro overflow_tests shift, window, probe |
| .if \probe < 15 |
| overflow_test \shift, \window, %((\shift) - 1), \probe |
| overflow_tests \shift, \window, %((\probe) + 1) |
| .endif |
| .endm |
| |
| .macro all_overflow_tests |
| .irp shift, 4, 8, 12 |
| .irp window, 4, 8, 12 |
| overflow_tests \shift, \window, \shift |
| .endr |
| .endr |
| .endm |
| |
| test overflow |
| all_overflow_tests |
| test_end |
| |
| |
| .macro underflow_test window |
| set_vector window_underflow_4, 0 |
| set_vector window_underflow_8, 0 |
| set_vector window_underflow_12, 0 |
| |
| set_vector window_underflow_\window, 10f |
| |
| reset_window 1 |
| reset_ps |
| |
| ssai 2 |
| movi a2, 2f |
| slli a2, a2, 2 |
| movi a3, (\window) / 4 |
| src a0, a3, a2 |
| 1: |
| retw |
| test_fail |
| 10: |
| rsr a2, epc1 |
| movi a3, 1b |
| assert eq, a2, a3 |
| movi a2, 2f |
| wsr a2, epc1 |
| |
| rsr a2, ps |
| movi a3, 0x4001f |
| assert eq, a2, a3 |
| rsr a2, windowbase |
| assert eqi, a2, 8 - ((\window) / 4) |
| rsr a2, windowstart |
| assert eqi, a2, 1 |
| rfwu |
| 2: |
| rsr a2, ps |
| movi a3, 0x4000f |
| assert eq, a2, a3 |
| rsr a2, windowbase |
| assert eqi, a2, 0 |
| rsr a2, windowstart |
| assert bsi, a2, 0 |
| assert bsi, a2, 8 - ((\window) / 4) |
| .endm |
| |
| test underflow |
| set_vector window_overflow_4, 0 |
| set_vector window_overflow_8, 0 |
| set_vector window_overflow_12, 0 |
| |
| underflow_test 4 |
| underflow_test 8 |
| underflow_test 12 |
| test_end |
| |
| |
| .macro retw_test window |
| reset_window %(1 | (1 << (8 - (\window) / 4))) |
| reset_ps |
| |
| ssai 2 |
| movi a2, 1f |
| slli a2, a2, 2 |
| movi a3, (\window) / 4 |
| src a0, a3, a2 |
| retw |
| test_fail |
| 1: |
| rsr a2, ps |
| movi a3, 0x4000f |
| assert eq, a2, a3 |
| rsr a2, windowbase |
| assert eqi, a2, 8 - ((\window) / 4) |
| rsr a2, windowstart |
| assert bci, a2, 0 |
| assert bsi, a2, 8 - ((\window) / 4) |
| .endm |
| |
| test retw |
| set_vector window_underflow_4, 0 |
| set_vector window_underflow_8, 0 |
| set_vector window_underflow_12, 0 |
| |
| retw_test 4 |
| retw_test 8 |
| retw_test 12 |
| test_end |
| |
| test movsp |
| set_vector kernel, 2f |
| |
| reset_window 1 |
| reset_ps |
| 1: |
| movsp a2, a3 |
| test_fail |
| 2: |
| rsr a2, exccause |
| assert eqi, a2, 5 |
| rsr a2, epc1 |
| movi a3, 1b |
| assert eq, a2, a3 |
| |
| set_vector kernel, 0 |
| |
| reset_window 0x81 |
| reset_ps |
| |
| movsp a2, a3 |
| test_end |
| |
| test rotw |
| reset_window 0x4b |
| reset_ps |
| |
| movi a3, 0x10 |
| |
| rotw 1 |
| rsr a2, windowbase |
| assert eqi, a2, 1 |
| movi a3, 0x11 |
| movi a7, 0x12 |
| |
| rotw 2 |
| rsr a2, windowbase |
| assert eqi, a2, 3 |
| movi a3, 0x13 |
| movi a7, 0x14 |
| movi a11, 0x15 |
| |
| rotw 3 |
| rsr a2, windowbase |
| assert eqi, a2, 6 |
| movi a3, 0x16 |
| movi a7, 0x17 |
| |
| movi a2, 0x44 |
| wsr a2, windowstart |
| rsync |
| |
| movi a2, 0x10 |
| assert eq, a2, a11 |
| movi a11, 0x18 |
| movi a2, 0x11 |
| assert eq, a2, a15 |
| movi a15, 0x19 |
| |
| rotw 4 |
| movi a2, 0x12 |
| assert eq, a2, a3 |
| movi a2, 0x13 |
| assert eq, a2, a7 |
| movi a2, 0x14 |
| assert eq, a2, a11 |
| movi a2, 0x15 |
| assert eq, a2, a15 |
| |
| movi a2, 0x5 |
| wsr a2, windowstart |
| rsync |
| |
| rotw -2 |
| movi a2, 0x18 |
| assert eq, a2, a3 |
| movi a2, 0x19 |
| assert eq, a2, a7 |
| test_end |
| |
| .macro callw_test window |
| call\window 2f |
| 1: |
| test_fail |
| .align 4 |
| 2: |
| rsr a2, windowbase |
| assert eqi, a2, 0 |
| rsr a2, ps |
| movi a3, 0x4000f | ((\window) << 14) |
| assert eq, a2, a3 |
| movi a2, 1b |
| slli a2, a2, 2 |
| ssai 2 |
| movi a3, (\window) / 4 |
| src a2, a3, a2 |
| assert eq, a2, a\window |
| .endm |
| |
| test callw |
| reset_window 0x1 |
| reset_ps |
| |
| callw_test 4 |
| callw_test 8 |
| callw_test 12 |
| test_end |
| |
| |
| .macro entry_test window |
| reset_window 0x1 |
| reset_ps |
| movi a2, 0x4000f | ((\window) << 14) |
| wsr a2, ps |
| isync |
| movi a3, 0x12345678 |
| j 1f |
| .align 4 |
| 1: |
| entry a3, 0x5678 |
| movi a2, 0x12340000 |
| assert eq, a2, a3 |
| rsr a2, windowbase |
| assert eqi, a2, (\window) / 4 |
| rsr a2, windowstart |
| movi a3, 1 | (1 << ((\window) / 4)) |
| assert eq, a2, a3 |
| rotw -(\window) / 4 |
| .endm |
| |
| test entry |
| entry_test 4 |
| entry_test 8 |
| entry_test 12 |
| test_end |
| |
| test_suite_end |
