|
|
@ -27,6 +27,38 @@
|
|
|
|
* 1 tab == 4 spaces!
|
|
|
|
* 1 tab == 4 spaces!
|
|
|
|
*/
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
|
|
|
* The FreeRTOS kernel's RISC-V port is split between the the code that is
|
|
|
|
|
|
|
|
* common across all currently supported RISC-V chips (implementations of the
|
|
|
|
|
|
|
|
* RISC-V ISA), and code which tailors the port to a specific RISC-V chip:
|
|
|
|
|
|
|
|
*
|
|
|
|
|
|
|
|
* + The code that is common to all RISC-V chips is implemented in
|
|
|
|
|
|
|
|
* FreeRTOS\Source\portable\GCC\RISC-V-RV32\portASM.S. There is only one
|
|
|
|
|
|
|
|
* portASM.S file because the same file is used no matter which RISC-V chip is
|
|
|
|
|
|
|
|
* in use.
|
|
|
|
|
|
|
|
*
|
|
|
|
|
|
|
|
* + The code that tailors the kernel's RISC-V port to a specific RISC-V
|
|
|
|
|
|
|
|
* chip is implemented in freertos_risc_v_port_specific_extensions.h. There
|
|
|
|
|
|
|
|
* is one freertos_risc_v_port_specific_extensions.h that can be used with any
|
|
|
|
|
|
|
|
* RISC-V chip that both includes a standard CLINT and does not add to the
|
|
|
|
|
|
|
|
* base set of RISC-V registers. There are additional
|
|
|
|
|
|
|
|
* freertos_risc_v_port_specific_extensions.h files for RISC-V implementations
|
|
|
|
|
|
|
|
* that do not include a standard CLINT or do add to the base set of RISC-V
|
|
|
|
|
|
|
|
* regiters.
|
|
|
|
|
|
|
|
*
|
|
|
|
|
|
|
|
* CARE MUST BE TAKEN TO INCLDUE THE CORRECT
|
|
|
|
|
|
|
|
* freertos_risc_v_port_specific_extensions.h HEADER FILE FOR THE CHIP
|
|
|
|
|
|
|
|
* IN USE. To include the correct freertos_risc_v_port_specific_extensions.h
|
|
|
|
|
|
|
|
* header file ensure the path to the correct header file is in the assembler's
|
|
|
|
|
|
|
|
* include path.
|
|
|
|
|
|
|
|
*
|
|
|
|
|
|
|
|
* This freertos_risc_v_port_specific_extensions.h is for use on RISC-V chips
|
|
|
|
|
|
|
|
* that include a standard CLINT and do not add to the base set of RISC-V
|
|
|
|
|
|
|
|
* registers.
|
|
|
|
|
|
|
|
*
|
|
|
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "freertos_risc_v_port_specific_extensions.h"
|
|
|
|
|
|
|
|
|
|
|
|
#if __riscv_xlen == 64
|
|
|
|
#if __riscv_xlen == 64
|
|
|
|
#error Not implemented yet - change lw to ld, and sw to sd.
|
|
|
|
#error Not implemented yet - change lw to ld, and sw to sd.
|
|
|
|
#define WORD_SIZE 8
|
|
|
|
#define WORD_SIZE 8
|
|
|
@ -86,6 +118,8 @@ vPortTrapHandler:
|
|
|
|
sw x30, 27 * WORD_SIZE( sp )
|
|
|
|
sw x30, 27 * WORD_SIZE( sp )
|
|
|
|
sw x31, 28 * WORD_SIZE( sp )
|
|
|
|
sw x31, 28 * WORD_SIZE( sp )
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
portSAVE_ADDITIONAL_REGISTERS /* Defined in freertos_risc_v_port_specific_extensions.h to save any registers unique to the RISC-V implementation. */
|
|
|
|
|
|
|
|
|
|
|
|
csrr t0, mstatus /* Required for MPIE bit. */
|
|
|
|
csrr t0, mstatus /* Required for MPIE bit. */
|
|
|
|
sw t0, 29 * WORD_SIZE( sp )
|
|
|
|
sw t0, 29 * WORD_SIZE( sp )
|
|
|
|
|
|
|
|
|
|
|
@ -95,25 +129,19 @@ vPortTrapHandler:
|
|
|
|
csrr a0, mcause
|
|
|
|
csrr a0, mcause
|
|
|
|
csrr a1, mepc
|
|
|
|
csrr a1, mepc
|
|
|
|
|
|
|
|
|
|
|
|
test_if_environment_call:
|
|
|
|
test_if_asynchronous:
|
|
|
|
li t0, 11 /* 11 == environment call when using qemu. */
|
|
|
|
srli a2, a0, 0x1f /* MSB of mcause is 1 if handing an asynchronous interrupt - shift to LSB to clear other bits. */
|
|
|
|
bne a0, t0, test_if_timer
|
|
|
|
beq a2, x0, handle_synchronous /* Branch past interrupt handing if not asynchronous. */
|
|
|
|
addi a1, a1, 4 /* Synchronous so return to the instruction after the environment call. */
|
|
|
|
sw a1, 0( sp ) /* Asynch so save unmodified exception return address. */
|
|
|
|
sw a1, 0( sp ) /* Save updated exception return address. */
|
|
|
|
|
|
|
|
lw sp, xISRStackTop /* Switch to ISR stack before function call. */
|
|
|
|
|
|
|
|
jal vTaskSwitchContext
|
|
|
|
|
|
|
|
j processed_source
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
test_if_timer:
|
|
|
|
|
|
|
|
sw a1, 0( sp ) /* Asynch so save unmodified exception return address. */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
handle_asynchronous:
|
|
|
|
|
|
|
|
test_if_mtimer:
|
|
|
|
lui t0, 0x80000
|
|
|
|
lui t0, 0x80000
|
|
|
|
addi t1,t0, 7 /* 0x80000007 == machine timer interrupt. */
|
|
|
|
addi t1, t0, 7 /* 0x80000007 == machine timer interrupt. */
|
|
|
|
bne a0, t1, test_if_external_interrupt
|
|
|
|
bne a0, t1, test_if_external_interrupt
|
|
|
|
|
|
|
|
|
|
|
|
lw t0, pullMachineTimerCompareRegister /* Load address of compare register into t0. */
|
|
|
|
lw t0, pullMachineTimerCompareRegister /* Load address of compare register into t0. */
|
|
|
|
lw t1, pullNextTime /* Load the address of ullNextTime into t1. */
|
|
|
|
lw t1, pullNextTime /* Load the address of ullNextTime into t1. */
|
|
|
|
lw t2, 0(t1) /* Load the low word of ullNextTime into t2. */
|
|
|
|
lw t2, 0(t1) /* Load the low word of ullNextTime into t2. */
|
|
|
|
lw t3, 4(t1) /* Load the high word of ullNextTime into t3. */
|
|
|
|
lw t3, 4(t1) /* Load the high word of ullNextTime into t3. */
|
|
|
|
sw t2, 0(t0) /* Store low word of ullNextTime into compare register. */
|
|
|
|
sw t2, 0(t0) /* Store low word of ullNextTime into compare register. */
|
|
|
@ -131,15 +159,30 @@ test_if_timer:
|
|
|
|
j processed_source
|
|
|
|
j processed_source
|
|
|
|
|
|
|
|
|
|
|
|
test_if_external_interrupt:
|
|
|
|
test_if_external_interrupt:
|
|
|
|
addi t1, t1, 4 /* 0x80000007 + 4 = 0x8000000b == Machine external interrupt. */
|
|
|
|
addi t1, t1, 4 /* 0x80000007 + 4 = 0x8000000b == Machine external interrupt. */
|
|
|
|
bne a0, t1, is_exception /* Only thing left it can be. */
|
|
|
|
bne a0, t1, as_yet_unhandled /* Something as yet unhandled. */
|
|
|
|
jal vPortHandleInterrupt
|
|
|
|
jal vPortHandleInterrupt
|
|
|
|
j processed_source
|
|
|
|
j processed_source
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
handle_synchronous:
|
|
|
|
|
|
|
|
addi a1, a1, 4 /* Synchronous so updated exception return address to the instruction after the instruction that generated the exeption. */
|
|
|
|
|
|
|
|
sw a1, 0( sp ) /* Save updated exception return address. */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
test_if_environment_call:
|
|
|
|
|
|
|
|
li t0, 11 /* 11 == environment call. */
|
|
|
|
|
|
|
|
bne a0, t0, is_exception /* Not an M environment call, so some other exception. */
|
|
|
|
|
|
|
|
lw sp, xISRStackTop /* Switch to ISR stack before function call. */
|
|
|
|
|
|
|
|
jal vTaskSwitchContext
|
|
|
|
|
|
|
|
j processed_source
|
|
|
|
|
|
|
|
|
|
|
|
is_exception:
|
|
|
|
is_exception:
|
|
|
|
ebreak
|
|
|
|
ebreak
|
|
|
|
j is_exception
|
|
|
|
j is_exception
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
as_yet_unhandled:
|
|
|
|
|
|
|
|
ebreak
|
|
|
|
|
|
|
|
j as_yet_unhandled
|
|
|
|
|
|
|
|
|
|
|
|
processed_source:
|
|
|
|
processed_source:
|
|
|
|
lw sp, pxCurrentTCB /* Load pxCurrentTCB. */
|
|
|
|
lw sp, pxCurrentTCB /* Load pxCurrentTCB. */
|
|
|
|
lw sp, 0( sp ) /* Read sp from first TCB member. */
|
|
|
|
lw sp, 0( sp ) /* Read sp from first TCB member. */
|
|
|
@ -152,34 +195,36 @@ processed_source:
|
|
|
|
lw t0, 29 * WORD_SIZE( sp )
|
|
|
|
lw t0, 29 * WORD_SIZE( sp )
|
|
|
|
csrw mstatus, t0 /* Required for MPIE bit. */
|
|
|
|
csrw mstatus, t0 /* Required for MPIE bit. */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
portRESTORE_ADDITIONAL_REGISTERS /* Defined in freertos_risc_v_port_specific_extensions.h to restore any registers unique to the RISC-V implementation. */
|
|
|
|
|
|
|
|
|
|
|
|
lw x1, 1 * WORD_SIZE( sp )
|
|
|
|
lw x1, 1 * WORD_SIZE( sp )
|
|
|
|
lw x5, 2 * WORD_SIZE( sp ) /* t0 */
|
|
|
|
lw x5, 2 * WORD_SIZE( sp ) /* t0 */
|
|
|
|
lw x6, 3 * WORD_SIZE( sp ) /* t1 */
|
|
|
|
lw x6, 3 * WORD_SIZE( sp ) /* t1 */
|
|
|
|
lw x7, 4 * WORD_SIZE( sp ) /* t2 */
|
|
|
|
lw x7, 4 * WORD_SIZE( sp ) /* t2 */
|
|
|
|
lw x8, 5 * WORD_SIZE( sp ) /* s0/fp */
|
|
|
|
lw x8, 5 * WORD_SIZE( sp ) /* s0/fp */
|
|
|
|
lw x9, 6 * WORD_SIZE( sp ) /* s1 */
|
|
|
|
lw x9, 6 * WORD_SIZE( sp ) /* s1 */
|
|
|
|
lw x10, 7 * WORD_SIZE( sp ) /* a0 */
|
|
|
|
lw x10, 7 * WORD_SIZE( sp ) /* a0 */
|
|
|
|
lw x11, 8 * WORD_SIZE( sp ) /* a1 */
|
|
|
|
lw x11, 8 * WORD_SIZE( sp ) /* a1 */
|
|
|
|
lw x12, 9 * WORD_SIZE( sp ) /* a2 */
|
|
|
|
lw x12, 9 * WORD_SIZE( sp ) /* a2 */
|
|
|
|
lw x13, 10 * WORD_SIZE( sp ) /* a3 */
|
|
|
|
lw x13, 10 * WORD_SIZE( sp ) /* a3 */
|
|
|
|
lw x14, 11 * WORD_SIZE( sp ) /* a4 */
|
|
|
|
lw x14, 11 * WORD_SIZE( sp ) /* a4 */
|
|
|
|
lw x15, 12 * WORD_SIZE( sp ) /* a5 */
|
|
|
|
lw x15, 12 * WORD_SIZE( sp ) /* a5 */
|
|
|
|
lw x16, 13 * WORD_SIZE( sp ) /* a6 */
|
|
|
|
lw x16, 13 * WORD_SIZE( sp ) /* a6 */
|
|
|
|
lw x17, 14 * WORD_SIZE( sp ) /* a7 */
|
|
|
|
lw x17, 14 * WORD_SIZE( sp ) /* a7 */
|
|
|
|
lw x18, 15 * WORD_SIZE( sp ) /* s2 */
|
|
|
|
lw x18, 15 * WORD_SIZE( sp ) /* s2 */
|
|
|
|
lw x19, 16 * WORD_SIZE( sp ) /* s3 */
|
|
|
|
lw x19, 16 * WORD_SIZE( sp ) /* s3 */
|
|
|
|
lw x20, 17 * WORD_SIZE( sp ) /* s4 */
|
|
|
|
lw x20, 17 * WORD_SIZE( sp ) /* s4 */
|
|
|
|
lw x21, 18 * WORD_SIZE( sp ) /* s5 */
|
|
|
|
lw x21, 18 * WORD_SIZE( sp ) /* s5 */
|
|
|
|
lw x22, 19 * WORD_SIZE( sp ) /* s6 */
|
|
|
|
lw x22, 19 * WORD_SIZE( sp ) /* s6 */
|
|
|
|
lw x23, 20 * WORD_SIZE( sp ) /* s7 */
|
|
|
|
lw x23, 20 * WORD_SIZE( sp ) /* s7 */
|
|
|
|
lw x24, 21 * WORD_SIZE( sp ) /* s8 */
|
|
|
|
lw x24, 21 * WORD_SIZE( sp ) /* s8 */
|
|
|
|
lw x25, 22 * WORD_SIZE( sp ) /* s9 */
|
|
|
|
lw x25, 22 * WORD_SIZE( sp ) /* s9 */
|
|
|
|
lw x26, 23 * WORD_SIZE( sp ) /* s10 */
|
|
|
|
lw x26, 23 * WORD_SIZE( sp ) /* s10 */
|
|
|
|
lw x27, 24 * WORD_SIZE( sp ) /* s11 */
|
|
|
|
lw x27, 24 * WORD_SIZE( sp ) /* s11 */
|
|
|
|
lw x28, 25 * WORD_SIZE( sp ) /* t3 */
|
|
|
|
lw x28, 25 * WORD_SIZE( sp ) /* t3 */
|
|
|
|
lw x29, 26 * WORD_SIZE( sp ) /* t4 */
|
|
|
|
lw x29, 26 * WORD_SIZE( sp ) /* t4 */
|
|
|
|
lw x30, 27 * WORD_SIZE( sp ) /* t5 */
|
|
|
|
lw x30, 27 * WORD_SIZE( sp ) /* t5 */
|
|
|
|
lw x31, 28 * WORD_SIZE( sp ) /* t6 */
|
|
|
|
lw x31, 28 * WORD_SIZE( sp ) /* t6 */
|
|
|
|
addi sp, sp, CONTEXT_SIZE
|
|
|
|
addi sp, sp, CONTEXT_SIZE
|
|
|
|
|
|
|
|
|
|
|
|
mret
|
|
|
|
mret
|
|
|
@ -195,35 +240,35 @@ xPortStartFirstTask:
|
|
|
|
lw sp, 0( sp ) /* Read sp from first TCB member. */
|
|
|
|
lw sp, 0( sp ) /* Read sp from first TCB member. */
|
|
|
|
|
|
|
|
|
|
|
|
lw x1, 0( sp ) /* Note for starting the scheduler the exception return address is used as the function return address. */
|
|
|
|
lw x1, 0( sp ) /* Note for starting the scheduler the exception return address is used as the function return address. */
|
|
|
|
lw x5, 2 * WORD_SIZE( sp ) /* t0 */
|
|
|
|
lw x5, 2 * WORD_SIZE( sp ) /* t0 */
|
|
|
|
lw x6, 3 * WORD_SIZE( sp ) /* t1 */
|
|
|
|
lw x6, 3 * WORD_SIZE( sp ) /* t1 */
|
|
|
|
lw x7, 4 * WORD_SIZE( sp ) /* t2 */
|
|
|
|
lw x7, 4 * WORD_SIZE( sp ) /* t2 */
|
|
|
|
lw x8, 5 * WORD_SIZE( sp ) /* s0/fp */
|
|
|
|
lw x8, 5 * WORD_SIZE( sp ) /* s0/fp */
|
|
|
|
lw x9, 6 * WORD_SIZE( sp ) /* s1 */
|
|
|
|
lw x9, 6 * WORD_SIZE( sp ) /* s1 */
|
|
|
|
lw x10, 7 * WORD_SIZE( sp ) /* a0 */
|
|
|
|
lw x10, 7 * WORD_SIZE( sp ) /* a0 */
|
|
|
|
lw x11, 8 * WORD_SIZE( sp ) /* a1 */
|
|
|
|
lw x11, 8 * WORD_SIZE( sp ) /* a1 */
|
|
|
|
lw x12, 9 * WORD_SIZE( sp ) /* a2 */
|
|
|
|
lw x12, 9 * WORD_SIZE( sp ) /* a2 */
|
|
|
|
lw x13, 10 * WORD_SIZE( sp ) /* a3 */
|
|
|
|
lw x13, 10 * WORD_SIZE( sp ) /* a3 */
|
|
|
|
lw x14, 11 * WORD_SIZE( sp ) /* a4 */
|
|
|
|
lw x14, 11 * WORD_SIZE( sp ) /* a4 */
|
|
|
|
lw x15, 12 * WORD_SIZE( sp ) /* a5 */
|
|
|
|
lw x15, 12 * WORD_SIZE( sp ) /* a5 */
|
|
|
|
lw x16, 13 * WORD_SIZE( sp ) /* a6 */
|
|
|
|
lw x16, 13 * WORD_SIZE( sp ) /* a6 */
|
|
|
|
lw x17, 14 * WORD_SIZE( sp ) /* a7 */
|
|
|
|
lw x17, 14 * WORD_SIZE( sp ) /* a7 */
|
|
|
|
lw x18, 15 * WORD_SIZE( sp ) /* s2 */
|
|
|
|
lw x18, 15 * WORD_SIZE( sp ) /* s2 */
|
|
|
|
lw x19, 16 * WORD_SIZE( sp ) /* s3 */
|
|
|
|
lw x19, 16 * WORD_SIZE( sp ) /* s3 */
|
|
|
|
lw x20, 17 * WORD_SIZE( sp ) /* s4 */
|
|
|
|
lw x20, 17 * WORD_SIZE( sp ) /* s4 */
|
|
|
|
lw x21, 18 * WORD_SIZE( sp ) /* s5 */
|
|
|
|
lw x21, 18 * WORD_SIZE( sp ) /* s5 */
|
|
|
|
lw x22, 19 * WORD_SIZE( sp ) /* s6 */
|
|
|
|
lw x22, 19 * WORD_SIZE( sp ) /* s6 */
|
|
|
|
lw x23, 20 * WORD_SIZE( sp ) /* s7 */
|
|
|
|
lw x23, 20 * WORD_SIZE( sp ) /* s7 */
|
|
|
|
lw x24, 21 * WORD_SIZE( sp ) /* s8 */
|
|
|
|
lw x24, 21 * WORD_SIZE( sp ) /* s8 */
|
|
|
|
lw x25, 22 * WORD_SIZE( sp ) /* s9 */
|
|
|
|
lw x25, 22 * WORD_SIZE( sp ) /* s9 */
|
|
|
|
lw x26, 23 * WORD_SIZE( sp ) /* s10 */
|
|
|
|
lw x26, 23 * WORD_SIZE( sp ) /* s10 */
|
|
|
|
lw x27, 24 * WORD_SIZE( sp ) /* s11 */
|
|
|
|
lw x27, 24 * WORD_SIZE( sp ) /* s11 */
|
|
|
|
lw x28, 25 * WORD_SIZE( sp ) /* t3 */
|
|
|
|
lw x28, 25 * WORD_SIZE( sp ) /* t3 */
|
|
|
|
lw x29, 26 * WORD_SIZE( sp ) /* t4 */
|
|
|
|
lw x29, 26 * WORD_SIZE( sp ) /* t4 */
|
|
|
|
lw x30, 27 * WORD_SIZE( sp ) /* t5 */
|
|
|
|
lw x30, 27 * WORD_SIZE( sp ) /* t5 */
|
|
|
|
lw x31, 28 * WORD_SIZE( sp ) /* t6 */
|
|
|
|
lw x31, 28 * WORD_SIZE( sp ) /* t6 */
|
|
|
|
addi sp, sp, CONTEXT_SIZE
|
|
|
|
addi sp, sp, CONTEXT_SIZE
|
|
|
|
csrs mstatus, 8 /* Enable machine interrupts. */
|
|
|
|
csrs mstatus, 8 /* Enable machine interrupts. */
|
|
|
|
ret
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|