Renamed file.
Richard Barry
16 years ago
parent
d92156e85a
commit
19e2d266b6
@ -0,0 +1,330 @@
|
|||||||
|
; FreeRTOS.org V5.1.1 - Copyright (C) 2003-2008 Richard Barry.
|
||||||
|
;
|
||||||
|
; This file is part of the FreeRTOS.org distribution.
|
||||||
|
;
|
||||||
|
; FreeRTOS.org 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.
|
||||||
|
;
|
||||||
|
; FreeRTOS.org 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 FreeRTOS.org; if not, write to the Free Software
|
||||||
|
; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||||
|
;
|
||||||
|
; A special exception to the GPL can be applied should you wish to distribute
|
||||||
|
; a combined work that includes FreeRTOS.org, without being obliged to provide
|
||||||
|
; the source code for any proprietary components. See the licensing section
|
||||||
|
; of http://www.FreeRTOS.org for full details of how and when the exception
|
||||||
|
; can be applied.
|
||||||
|
;
|
||||||
|
; ***************************************************************************
|
||||||
|
; See http://www.FreeRTOS.org for documentation, latest information, license
|
||||||
|
; and contact details. Please ensure to read the configuration and relevant
|
||||||
|
; port sections of the online documentation.
|
||||||
|
; ***************************************************************************
|
||||||
|
;
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; Note: Select the correct include files for the device used by the application.
|
||||||
|
#include "FreeRTOSConfig.h"
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
; Functions used by scheduler
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
EXTERN vTaskSwitchContext
|
||||||
|
EXTERN vTaskIncrementTick
|
||||||
|
|
||||||
|
; Variables used by scheduler
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
EXTERN pxCurrentTCB
|
||||||
|
EXTERN usCriticalNesting
|
||||||
|
|
||||||
|
; Functions implemented in this file
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
PUBLIC vPortYield
|
||||||
|
PUBLIC vPortStart
|
||||||
|
|
||||||
|
; Security ID definition
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
#define CG_SECURITY0 0FFH
|
||||||
|
#define CG_SECURITY1 0FFH
|
||||||
|
#define CG_SECURITY2 0FFH
|
||||||
|
#define CG_SECURITY3 0FFH
|
||||||
|
#define CG_SECURITY4 0FFH
|
||||||
|
#define CG_SECURITY5 0FFH
|
||||||
|
#define CG_SECURITY6 0FFH
|
||||||
|
#define CG_SECURITY7 0FFH
|
||||||
|
#define CG_SECURITY8 0FFH
|
||||||
|
#define CG_SECURITY9 0FFH
|
||||||
|
|
||||||
|
; Option Byte definitions
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
#define CG_OPTION7A 0x00
|
||||||
|
#define CG_OPTION7B 0x04
|
||||||
|
#define OPT7C 0x00
|
||||||
|
#define OPT7D 0x00
|
||||||
|
#define OPT7E 0x00
|
||||||
|
#define OPT7F 0x00
|
||||||
|
|
||||||
|
; Tick ISR Prototype
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
PUBWEAK `??MD_INTTM0EQ0??INTVEC 608`
|
||||||
|
PUBLIC MD_INTTM0EQ0
|
||||||
|
|
||||||
|
MD_INTTM0EQ0 SYMBOL "MD_INTTM0EQ0"
|
||||||
|
`??MD_INTTM0EQ0??INTVEC 608` SYMBOL "??INTVEC 608", MD_INTTM0EQ0
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; portSAVE_CONTEXT MACRO
|
||||||
|
; Saves the context of the remaining general purpose registers
|
||||||
|
; and the usCriticalNesting Value of the active Task onto the task stack
|
||||||
|
; saves stack pointer to the TCB
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
portSAVE_CONTEXT MACRO
|
||||||
|
#if configDATA_MODE == 1 ; Using the Tiny data model
|
||||||
|
prepare {r20,r21,r22,r23,r24,r25,r26,r27,r28,r29,r30},76,sp ; save general purpose registers
|
||||||
|
sst.w r19,72[ep]
|
||||||
|
sst.w r18,68[ep]
|
||||||
|
sst.w r17,64[ep]
|
||||||
|
sst.w r16,60[ep]
|
||||||
|
sst.w r15,56[ep]
|
||||||
|
sst.w r14,52[ep]
|
||||||
|
sst.w r13,48[ep]
|
||||||
|
sst.w r12,44[ep]
|
||||||
|
sst.w r11,40[ep]
|
||||||
|
sst.w r10,36[ep]
|
||||||
|
sst.w r9,32[ep]
|
||||||
|
sst.w r8,28[ep]
|
||||||
|
sst.w r7,24[ep]
|
||||||
|
sst.w r6,20[ep]
|
||||||
|
sst.w r5,16[ep]
|
||||||
|
sst.w r4,12[ep]
|
||||||
|
#else ; Using the Small/Large data model
|
||||||
|
prepare {r20,r21,r22,r23,r24,r26,r27,r28,r29,r30},72,sp ; save general purpose registers
|
||||||
|
sst.w r19,68[ep]
|
||||||
|
sst.w r18,64[ep]
|
||||||
|
sst.w r17,60[ep]
|
||||||
|
sst.w r16,56[ep]
|
||||||
|
sst.w r15,52[ep]
|
||||||
|
sst.w r14,48[ep]
|
||||||
|
sst.w r13,44[ep]
|
||||||
|
sst.w r12,40[ep]
|
||||||
|
sst.w r11,36[ep]
|
||||||
|
sst.w r10,32[ep]
|
||||||
|
sst.w r9,28[ep]
|
||||||
|
sst.w r8,24[ep]
|
||||||
|
sst.w r7,20[ep]
|
||||||
|
sst.w r6,16[ep]
|
||||||
|
sst.w r5,12[ep]
|
||||||
|
#endif /* configDATA_MODE */
|
||||||
|
sst.w r2,8[ep]
|
||||||
|
sst.w r1,4[ep]
|
||||||
|
MOVHI hi1(usCriticalNesting),r0,r1 ; save usCriticalNesting value to stack
|
||||||
|
ld.w lw1(usCriticalNesting)[r1],r2
|
||||||
|
sst.w r2,0[ep]
|
||||||
|
MOVHI hi1(pxCurrentTCB),r0,r1 ; save SP to top of current TCB
|
||||||
|
ld.w lw1(pxCurrentTCB)[r1],r2
|
||||||
|
st.w sp,0[r2]
|
||||||
|
ENDM
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; portRESTORE_CONTEXT MACRO
|
||||||
|
; Gets stack pointer from the current TCB
|
||||||
|
; Restores the context of the usCriticalNesting value and general purpose
|
||||||
|
; registers of the selected task from the task stack
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
portRESTORE_CONTEXT MACRO
|
||||||
|
MOVHI hi1(pxCurrentTCB),r0,r1 ; get Stackpointer address
|
||||||
|
ld.w lw1(pxCurrentTCB)[r1],sp
|
||||||
|
MOV sp,r1
|
||||||
|
ld.w 0[r1],sp ; load stackpointer
|
||||||
|
MOV sp,ep ; set stack pointer to element pointer
|
||||||
|
sld.w 0[ep],r1 ; load usCriticalNesting value from stack
|
||||||
|
MOVHI hi1(usCriticalNesting),r0,r2
|
||||||
|
st.w r1,lw1(usCriticalNesting)[r2]
|
||||||
|
sld.w 4[ep],r1 ; restore general purpose registers
|
||||||
|
sld.w 8[ep],r2
|
||||||
|
#if configDATA_MODE == 1 ; Using Tiny data model
|
||||||
|
sld.w 12[ep],r4
|
||||||
|
sld.w 16[ep],r5
|
||||||
|
sld.w 20[ep],r6
|
||||||
|
sld.w 24[ep],r7
|
||||||
|
sld.w 28[ep],r8
|
||||||
|
sld.w 32[ep],r9
|
||||||
|
sld.w 36[ep],r10
|
||||||
|
sld.w 40[ep],r11
|
||||||
|
sld.w 44[ep],r12
|
||||||
|
sld.w 48[ep],r13
|
||||||
|
sld.w 52[ep],r14
|
||||||
|
sld.w 56[ep],r15
|
||||||
|
sld.w 60[ep],r16
|
||||||
|
sld.w 64[ep],r17
|
||||||
|
sld.w 68[ep],r18
|
||||||
|
sld.w 72[ep],r19
|
||||||
|
dispose 76,{r20,r21,r22,r23,r24,r25,r26,r27,r28,r29,r30}
|
||||||
|
#else ; Using Small/Large data model
|
||||||
|
sld.w 12[ep],r5
|
||||||
|
sld.w 16[ep],r6
|
||||||
|
sld.w 20[ep],r7
|
||||||
|
sld.w 24[ep],r8
|
||||||
|
sld.w 28[ep],r9
|
||||||
|
sld.w 32[ep],r10
|
||||||
|
sld.w 36[ep],r11
|
||||||
|
sld.w 40[ep],r12
|
||||||
|
sld.w 44[ep],r13
|
||||||
|
sld.w 48[ep],r14
|
||||||
|
sld.w 52[ep],r15
|
||||||
|
sld.w 56[ep],r16
|
||||||
|
sld.w 60[ep],r17
|
||||||
|
sld.w 64[ep],r18
|
||||||
|
sld.w 68[ep],r19
|
||||||
|
dispose 72,{r20,r21,r22,r23,r24,r26,r27,r28,r29,r30}
|
||||||
|
#endif /* configDATA_MODE */
|
||||||
|
ENDM
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; Restore the context of the first task that is going to run.
|
||||||
|
;
|
||||||
|
; Input: NONE
|
||||||
|
;
|
||||||
|
; Call: CALL vPortStart
|
||||||
|
;
|
||||||
|
; Output: NONE
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
RSEG CODE:CODE
|
||||||
|
vPortStart:
|
||||||
|
portRESTORE_CONTEXT ; Restore the context of whichever task the ...
|
||||||
|
ld.w 0[sp],lp
|
||||||
|
ldsr lp,5 ; restore PSW
|
||||||
|
DI
|
||||||
|
ld.w 4[sp],lp ; restore LP
|
||||||
|
ld.w 8[sp],lp ; restore LP
|
||||||
|
ADD 0x0C,sp ; set SP to right position
|
||||||
|
EI
|
||||||
|
jmp [lp]
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; Port Yield function to check for a Task switch in the cooperative and
|
||||||
|
; preemptive mode
|
||||||
|
;
|
||||||
|
; Input: NONE
|
||||||
|
;
|
||||||
|
; Call: CALL vPortYield
|
||||||
|
;
|
||||||
|
; Output: NONE
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
RSEG CODE:CODE
|
||||||
|
vPortYield:
|
||||||
|
DI
|
||||||
|
ADD -0x0C,sp ; prepare stack to save necessary values
|
||||||
|
st.w lp,8[sp] ; save LP to stack
|
||||||
|
st.w lp,4[sp] ; save LP to stack
|
||||||
|
stsr 5,lp
|
||||||
|
st.w lp,0[sp] ; save PSW to stack
|
||||||
|
portSAVE_CONTEXT ; Save the context of the current task.
|
||||||
|
jarl vTaskSwitchContext,lp ; Call the scheduler.
|
||||||
|
portRESTORE_CONTEXT ; Restore the context of whichever task the ...
|
||||||
|
ld.w 0[sp],lp ; restore EIPSW
|
||||||
|
ldsr lp,1
|
||||||
|
ld.w 4[sp],lp ; restore PIPC
|
||||||
|
ldsr lp,0
|
||||||
|
ld.w 8[sp],lp ; restore LP
|
||||||
|
add 0x0C,sp
|
||||||
|
RETI
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; Perform the necessary steps of the Tick Count Increment and Task Switch
|
||||||
|
; depending on the chosen kernel configuration
|
||||||
|
;
|
||||||
|
; Input: NONE
|
||||||
|
;
|
||||||
|
; Call: ISR
|
||||||
|
;
|
||||||
|
; Output: NONE
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
#if configUSE_PREEMPTION == 1 ; use preemptive kernel mode
|
||||||
|
|
||||||
|
MD_INTTM0EQ0:
|
||||||
|
|
||||||
|
add -0x0C,sp ; prepare stack to save necessary values
|
||||||
|
st.w lp,8[sp] ; store LP to stack
|
||||||
|
stsr 0,r31
|
||||||
|
st.w lp,4[sp] ; store EIPC to stack
|
||||||
|
stsr 1,lp
|
||||||
|
st.w lp,0[sp] ; store EIPSW to stack
|
||||||
|
portSAVE_CONTEXT ; Save the context of the current task.
|
||||||
|
jarl vTaskIncrementTick,lp ; Call the timer tick function.
|
||||||
|
jarl vTaskSwitchContext,lp ; Call the scheduler.
|
||||||
|
portRESTORE_CONTEXT ; Restore the context of whichever task the ...
|
||||||
|
; ... scheduler decided should run.
|
||||||
|
ld.w 0[sp],lp ; restore EIPSW from stack
|
||||||
|
ldsr lp,1
|
||||||
|
ld.w 4[sp],lp ; restore EIPC from stack
|
||||||
|
ldsr lp,0
|
||||||
|
ld.w 8[sp],lp ; restore LP from stack
|
||||||
|
add 0x0C,sp ; set SP to right position
|
||||||
|
|
||||||
|
RETI
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
#else ; use cooperative kernel mode
|
||||||
|
|
||||||
|
MD_INTTM0EQ0:
|
||||||
|
prepare {lp,ep},8,sp
|
||||||
|
sst.w r1,4[ep]
|
||||||
|
sst.w r5,0[ep]
|
||||||
|
jarl vTaskIncrementTick,lp ; Call the timer tick function.
|
||||||
|
sld.w 0[ep],r5
|
||||||
|
sld.w 4[ep],r1
|
||||||
|
dispose 8,{lp,ep}
|
||||||
|
RETI
|
||||||
|
#endif /* configUSE_PREEMPTION */
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
COMMON INTVEC:CODE:ROOT(2)
|
||||||
|
ORG 608
|
||||||
|
`??MD_INTTM0EQ0??INTVEC 608`:
|
||||||
|
JR MD_INTTM0EQ0
|
||||||
|
|
||||||
|
RSEG NEAR_ID:CONST:SORT:NOROOT(2)
|
||||||
|
`?<Initializer for usCriticalNesting>`:
|
||||||
|
DW 10
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; set microcontroller security ID
|
||||||
|
|
||||||
|
COMMON INTVEC:CODE:ROOT(2)
|
||||||
|
ORG 70H
|
||||||
|
`SECUID`:
|
||||||
|
DB CG_SECURITY0
|
||||||
|
DB CG_SECURITY1
|
||||||
|
DB CG_SECURITY2
|
||||||
|
DB CG_SECURITY3
|
||||||
|
DB CG_SECURITY4
|
||||||
|
DB CG_SECURITY5
|
||||||
|
DB CG_SECURITY6
|
||||||
|
DB CG_SECURITY7
|
||||||
|
DB CG_SECURITY8
|
||||||
|
DB CG_SECURITY9
|
||||||
|
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
; set microcontroller option bytes
|
||||||
|
|
||||||
|
COMMON INTVEC:CODE:ROOT(2)
|
||||||
|
ORG 7AH
|
||||||
|
`OPTBYTES`:
|
||||||
|
DB CG_OPTION7A
|
||||||
|
DB CG_OPTION7B
|
||||||
|
DB OPT7C
|
||||||
|
DB OPT7D
|
||||||
|
DB OPT7E
|
||||||
|
DB OPT7F
|
||||||
|
|
||||||
|
END
|
||||||
Loading…
Reference in New Issue