1 /*----------------------------------------------------------------------------
3 *----------------------------------------------------------------------------
5 * Purpose: Hardware Abstraction Layer for Cortex-M0
7 *----------------------------------------------------------------------------
9 * Copyright (c) 1999-2009 KEIL, 2009-2013 ARM Germany GmbH
10 * All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions are met:
13 * - Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * - Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * - Neither the name of ARM nor the names of its contributors may be used
19 * to endorse or promote products derived from this software without
20 * specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
23 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL COPYRIGHT HOLDERS AND CONTRIBUTORS BE
26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32 * POSSIBILITY OF SUCH DAMAGE.
33 *---------------------------------------------------------------------------*/
50 /*----------------------------------------------------------------------------
52 *---------------------------------------------------------------------------*/
54 SECTION .text:CODE:NOROOT(2)
57 /*--------------------------- rt_set_PSP ------------------------------------*/
59 ; void rt_set_PSP (U32 stack);
68 /*--------------------------- rt_get_PSP ------------------------------------*/
70 ; U32 rt_get_PSP (void);
79 /*--------------------------- os_set_env ------------------------------------*/
81 ; void os_set_env (void);
82 /* Switch to Unprivileged/Privileged Thread mode, use PSP. */
87 MOV R0,SP /* PSP = MSP */
93 MOVS R0,#0x03 /* Unprivileged Thread mode, use PSP */
97 MOVS R0,#0x02 /* Privileged Thread mode, use PSP */
102 /*--------------------------- _alloc_box ------------------------------------*/
104 ; void *_alloc_box (void *box_mem);
105 /* Function wrapper for Unprivileged/Privileged mode. */
124 /*--------------------------- _free_box -------------------------------------*/
126 ; int _free_box (void *box_mem, void *box);
127 /* Function wrapper for Unprivileged/Privileged mode. */
146 /*-------------------------- SVC_Handler ------------------------------------*/
148 ; void SVC_Handler (void);
153 MRS R0,PSP /* Read PSP */
154 LDR R1,[R0,#24] /* Read Saved PC from Stack */
155 SUBS R1,R1,#2 /* Point to SVC Instruction */
156 LDRB R1,[R1] /* Load SVC Number */
158 BNE SVC_User /* User SVC Number > 0 */
161 LDMIA R0,{R0-R3,R4} /* Read R0-R3,R12 from stack */
164 BLX R12 /* Call SVC Function */
166 MRS R3,PSP /* Read PSP */
167 STMIA R3!,{R0-R2} /* Store return values */
170 LDMIA R3!,{R1,R2} /* os_tsk.run, os_tsk.new */
172 BEQ SVC_Exit /* no task switch */
175 CMP R1,#0 /* Runtask deleted? */
178 MRS R0,PSP /* Read PSP */
179 SUBS R0,R0,#32 /* Adjust Start Address */
180 STR R0,[R1,#TCB_TSTACK] /* Update os_tsk.run->tsk_stack */
181 STMIA R0!,{R4-R7} /* Save old context (R4-R7) */
186 STMIA R0!,{R4-R7} /* Save old context (R8-R11) */
189 BL rt_stk_check /* Check for Stack overflow */
193 STR R2,[R3] /* os_tsk.run = os_tsk.new */
195 LDR R0,[R2,#TCB_TSTACK] /* os_tsk.new->tsk_stack */
196 ADDS R0,R0,#16 /* Adjust Start Address */
197 LDMIA R0!,{R4-R7} /* Restore new Context (R8-R11) */
202 MSR PSP,R0 /* Write PSP */
203 SUBS R0,R0,#32 /* Adjust Start Address */
204 LDMIA R0!,{R4-R7} /* Restore new Context (R4-R7) */
207 MOVS R0,#~0xFFFFFFFD /* Set EXC_RETURN value */
209 BX R0 /* RETI to Thread Mode, use PSP */
211 /*------------------- User SVC ------------------------------*/
214 PUSH {R4,LR} /* Save Registers */
218 BHI SVC_Done /* Overflow */
222 LDR R4,[R4,R1] /* Load SVC Function Address */
225 LDMIA R0,{R0-R3,R4} /* Read R0-R3,R12 from stack */
227 BLX LR /* Call SVC Function */
229 MRS R4,PSP /* Read PSP */
230 STMIA R4!,{R0-R3} /* Function return values */
232 POP {R4,PC} /* RETI */
235 /*-------------------------- PendSV_Handler ---------------------------------*/
237 ; void PendSV_Handler (void);
239 PUBLIC PendSV_Handler
246 LDMIA R3!,{R1,R2} /* os_tsk.run, os_tsk.new */
248 BEQ Sys_Exit /* no task switch */
252 MRS R0,PSP /* Read PSP */
253 SUBS R0,R0,#32 /* Adjust Start Address */
254 STR R0,[R1,#TCB_TSTACK] /* Update os_tsk.run->tsk_stack */
255 STMIA R0!,{R4-R7} /* Save old context (R4-R7) */
260 STMIA R0!,{R4-R7} /* Save old context (R8-R11) */
263 BL rt_stk_check /* Check for Stack overflow */
266 STR R2,[R3] /* os_tsk.run = os_tsk.new */
268 LDR R0,[R2,#TCB_TSTACK] /* os_tsk.new->tsk_stack */
269 ADDS R0,R0,#16 /* Adjust Start Address */
270 LDMIA R0!,{R4-R7} /* Restore new Context (R8-R11) */
275 MSR PSP,R0 /* Write PSP */
276 SUBS R0,R0,#32 /* Adjust Start Address */
277 LDMIA R0!,{R4-R7} /* Restore new Context (R4-R7) */
280 MOVS R0,#~0xFFFFFFFD /* Set EXC_RETURN value */
282 BX R0 /* RETI to Thread Mode, use PSP */
285 /*-------------------------- SysTick_Handler --------------------------------*/
287 ; void SysTick_Handler (void);
289 PUBLIC SysTick_Handler
296 /*-------------------------- OS_Tick_Handler --------------------------------*/
298 ; void OS_Tick_Handler (void);
300 PUBLIC OS_Tick_Handler
310 /*----------------------------------------------------------------------------
312 *---------------------------------------------------------------------------*/