RUBEN ELISEO VAZQUEZ / Mbed 2 deprecated ds1302-bluetooth

the program have one sensor acs712 and moduleds1302

Dependencies:   FATFileSystem mbed

rtx/TARGET_CORTEX_M/TARGET_M0/TOOLCHAIN_GCC/HAL_CM0.S@0:b82abca089ac, 2017-06-08 (annotated)

Committer:
RUBENTEC
Date:
Thu Jun 08 20:17:34 2017 +0000
Revision:
0:b82abca089ac
ds1302-bluetooth-acs712

Who changed what in which revision?

UserRevisionLine numberNew contents of line
RUBENTEC 0:b82abca089ac 1 /*----------------------------------------------------------------------------
RUBENTEC 0:b82abca089ac 2 * RL-ARM - RTX
RUBENTEC 0:b82abca089ac 3 *----------------------------------------------------------------------------
RUBENTEC 0:b82abca089ac 4 * Name: HAL_CM0.S
RUBENTEC 0:b82abca089ac 5 * Purpose: Hardware Abstraction Layer for Cortex-M0
RUBENTEC 0:b82abca089ac 6 * Rev.: V4.60
RUBENTEC 0:b82abca089ac 7 *----------------------------------------------------------------------------
RUBENTEC 0:b82abca089ac 8 *
RUBENTEC 0:b82abca089ac 9 * Copyright (c) 1999-2009 KEIL, 2009-2012 ARM Germany GmbH
RUBENTEC 0:b82abca089ac 10 * All rights reserved.
RUBENTEC 0:b82abca089ac 11 * Redistribution and use in source and binary forms, with or without
RUBENTEC 0:b82abca089ac 12 * modification, are permitted provided that the following conditions are met:
RUBENTEC 0:b82abca089ac 13 * - Redistributions of source code must retain the above copyright
RUBENTEC 0:b82abca089ac 14 * notice, this list of conditions and the following disclaimer.
RUBENTEC 0:b82abca089ac 15 * - Redistributions in binary form must reproduce the above copyright
RUBENTEC 0:b82abca089ac 16 * notice, this list of conditions and the following disclaimer in the
RUBENTEC 0:b82abca089ac 17 * documentation and/or other materials provided with the distribution.
RUBENTEC 0:b82abca089ac 18 * - Neither the name of ARM nor the names of its contributors may be used
RUBENTEC 0:b82abca089ac 19 * to endorse or promote products derived from this software without
RUBENTEC 0:b82abca089ac 20 * specific prior written permission.
RUBENTEC 0:b82abca089ac 21 *
RUBENTEC 0:b82abca089ac 22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
RUBENTEC 0:b82abca089ac 23 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
RUBENTEC 0:b82abca089ac 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
RUBENTEC 0:b82abca089ac 25 * ARE DISCLAIMED. IN NO EVENT SHALL COPYRIGHT HOLDERS AND CONTRIBUTORS BE
RUBENTEC 0:b82abca089ac 26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
RUBENTEC 0:b82abca089ac 27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
RUBENTEC 0:b82abca089ac 28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
RUBENTEC 0:b82abca089ac 29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
RUBENTEC 0:b82abca089ac 30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
RUBENTEC 0:b82abca089ac 31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
RUBENTEC 0:b82abca089ac 32 * POSSIBILITY OF SUCH DAMAGE.
RUBENTEC 0:b82abca089ac 33 *---------------------------------------------------------------------------*/
RUBENTEC 0:b82abca089ac 34
RUBENTEC 0:b82abca089ac 35 .file "HAL_CM0.S"
RUBENTEC 0:b82abca089ac 36 .syntax unified
RUBENTEC 0:b82abca089ac 37
RUBENTEC 0:b82abca089ac 38 .equ TCB_TSTACK, 40
RUBENTEC 0:b82abca089ac 39
RUBENTEC 0:b82abca089ac 40
RUBENTEC 0:b82abca089ac 41 /*----------------------------------------------------------------------------
RUBENTEC 0:b82abca089ac 42 * Functions
RUBENTEC 0:b82abca089ac 43 *---------------------------------------------------------------------------*/
RUBENTEC 0:b82abca089ac 44
RUBENTEC 0:b82abca089ac 45 .thumb
RUBENTEC 0:b82abca089ac 46
RUBENTEC 0:b82abca089ac 47 .section ".text"
RUBENTEC 0:b82abca089ac 48 .align 2
RUBENTEC 0:b82abca089ac 49
RUBENTEC 0:b82abca089ac 50
RUBENTEC 0:b82abca089ac 51 /*--------------------------- rt_set_PSP ------------------------------------*/
RUBENTEC 0:b82abca089ac 52
RUBENTEC 0:b82abca089ac 53 # void rt_set_PSP (U32 stack);
RUBENTEC 0:b82abca089ac 54
RUBENTEC 0:b82abca089ac 55 .thumb_func
RUBENTEC 0:b82abca089ac 56 .type rt_set_PSP, %function
RUBENTEC 0:b82abca089ac 57 .global rt_set_PSP
RUBENTEC 0:b82abca089ac 58 rt_set_PSP:
RUBENTEC 0:b82abca089ac 59 .fnstart
RUBENTEC 0:b82abca089ac 60 .cantunwind
RUBENTEC 0:b82abca089ac 61
RUBENTEC 0:b82abca089ac 62 MSR PSP,R0
RUBENTEC 0:b82abca089ac 63 BX LR
RUBENTEC 0:b82abca089ac 64
RUBENTEC 0:b82abca089ac 65 .fnend
RUBENTEC 0:b82abca089ac 66 .size rt_set_PSP, .-rt_set_PSP
RUBENTEC 0:b82abca089ac 67
RUBENTEC 0:b82abca089ac 68
RUBENTEC 0:b82abca089ac 69 /*--------------------------- rt_get_PSP ------------------------------------*/
RUBENTEC 0:b82abca089ac 70
RUBENTEC 0:b82abca089ac 71 # U32 rt_get_PSP (void);
RUBENTEC 0:b82abca089ac 72
RUBENTEC 0:b82abca089ac 73 .thumb_func
RUBENTEC 0:b82abca089ac 74 .type rt_get_PSP, %function
RUBENTEC 0:b82abca089ac 75 .global rt_get_PSP
RUBENTEC 0:b82abca089ac 76 rt_get_PSP:
RUBENTEC 0:b82abca089ac 77 .fnstart
RUBENTEC 0:b82abca089ac 78 .cantunwind
RUBENTEC 0:b82abca089ac 79
RUBENTEC 0:b82abca089ac 80 MRS R0,PSP
RUBENTEC 0:b82abca089ac 81 BX LR
RUBENTEC 0:b82abca089ac 82
RUBENTEC 0:b82abca089ac 83 .fnend
RUBENTEC 0:b82abca089ac 84 .size rt_get_PSP, .-rt_get_PSP
RUBENTEC 0:b82abca089ac 85
RUBENTEC 0:b82abca089ac 86
RUBENTEC 0:b82abca089ac 87 /*--------------------------- os_set_env ------------------------------------*/
RUBENTEC 0:b82abca089ac 88
RUBENTEC 0:b82abca089ac 89 # void os_set_env (void);
RUBENTEC 0:b82abca089ac 90 /* Switch to Unprivileged/Privileged Thread mode, use PSP. */
RUBENTEC 0:b82abca089ac 91
RUBENTEC 0:b82abca089ac 92 .thumb_func
RUBENTEC 0:b82abca089ac 93 .type os_set_env, %function
RUBENTEC 0:b82abca089ac 94 .global os_set_env
RUBENTEC 0:b82abca089ac 95 os_set_env:
RUBENTEC 0:b82abca089ac 96 .fnstart
RUBENTEC 0:b82abca089ac 97 .cantunwind
RUBENTEC 0:b82abca089ac 98
RUBENTEC 0:b82abca089ac 99 MOV R0,SP /* PSP = MSP */
RUBENTEC 0:b82abca089ac 100 MSR PSP,R0
RUBENTEC 0:b82abca089ac 101 LDR R0,=os_flags
RUBENTEC 0:b82abca089ac 102 LDRB R0,[R0]
RUBENTEC 0:b82abca089ac 103 LSLS R0,#31
RUBENTEC 0:b82abca089ac 104 BNE PrivilegedE
RUBENTEC 0:b82abca089ac 105 MOVS R0,#0x03 /* Unprivileged Thread mode, use PSP */
RUBENTEC 0:b82abca089ac 106 MSR CONTROL,R0
RUBENTEC 0:b82abca089ac 107 BX LR
RUBENTEC 0:b82abca089ac 108 PrivilegedE:
RUBENTEC 0:b82abca089ac 109 MOVS R0,#0x02 /* Privileged Thread mode, use PSP */
RUBENTEC 0:b82abca089ac 110 MSR CONTROL,R0
RUBENTEC 0:b82abca089ac 111 BX LR
RUBENTEC 0:b82abca089ac 112
RUBENTEC 0:b82abca089ac 113 .fnend
RUBENTEC 0:b82abca089ac 114 .size os_set_env, .-os_set_env
RUBENTEC 0:b82abca089ac 115
RUBENTEC 0:b82abca089ac 116
RUBENTEC 0:b82abca089ac 117 /*--------------------------- _alloc_box ------------------------------------*/
RUBENTEC 0:b82abca089ac 118
RUBENTEC 0:b82abca089ac 119 # void *_alloc_box (void *box_mem);
RUBENTEC 0:b82abca089ac 120 /* Function wrapper for Unprivileged/Privileged mode. */
RUBENTEC 0:b82abca089ac 121
RUBENTEC 0:b82abca089ac 122 .thumb_func
RUBENTEC 0:b82abca089ac 123 .type _alloc_box, %function
RUBENTEC 0:b82abca089ac 124 .global _alloc_box
RUBENTEC 0:b82abca089ac 125 _alloc_box:
RUBENTEC 0:b82abca089ac 126 .fnstart
RUBENTEC 0:b82abca089ac 127 .cantunwind
RUBENTEC 0:b82abca089ac 128
RUBENTEC 0:b82abca089ac 129 LDR R3,=rt_alloc_box
RUBENTEC 0:b82abca089ac 130 MOV R12,R3
RUBENTEC 0:b82abca089ac 131 MRS R3,IPSR
RUBENTEC 0:b82abca089ac 132 LSLS R3,#24
RUBENTEC 0:b82abca089ac 133 BNE PrivilegedA
RUBENTEC 0:b82abca089ac 134 MRS R3,CONTROL
RUBENTEC 0:b82abca089ac 135 LSLS R3,#31
RUBENTEC 0:b82abca089ac 136 BEQ PrivilegedA
RUBENTEC 0:b82abca089ac 137 SVC 0
RUBENTEC 0:b82abca089ac 138 BX LR
RUBENTEC 0:b82abca089ac 139 PrivilegedA:
RUBENTEC 0:b82abca089ac 140 BX R12
RUBENTEC 0:b82abca089ac 141
RUBENTEC 0:b82abca089ac 142 .fnend
RUBENTEC 0:b82abca089ac 143 .size _alloc_box, .-_alloc_box
RUBENTEC 0:b82abca089ac 144
RUBENTEC 0:b82abca089ac 145
RUBENTEC 0:b82abca089ac 146 /*--------------------------- _free_box -------------------------------------*/
RUBENTEC 0:b82abca089ac 147
RUBENTEC 0:b82abca089ac 148 # int _free_box (void *box_mem, void *box);
RUBENTEC 0:b82abca089ac 149 /* Function wrapper for Unprivileged/Privileged mode. */
RUBENTEC 0:b82abca089ac 150
RUBENTEC 0:b82abca089ac 151 .thumb_func
RUBENTEC 0:b82abca089ac 152 .type _free_box, %function
RUBENTEC 0:b82abca089ac 153 .global _free_box
RUBENTEC 0:b82abca089ac 154 _free_box:
RUBENTEC 0:b82abca089ac 155 .fnstart
RUBENTEC 0:b82abca089ac 156 .cantunwind
RUBENTEC 0:b82abca089ac 157
RUBENTEC 0:b82abca089ac 158 LDR R3,=rt_free_box
RUBENTEC 0:b82abca089ac 159 MOV R12,R3
RUBENTEC 0:b82abca089ac 160 MRS R3,IPSR
RUBENTEC 0:b82abca089ac 161 LSLS R3,#24
RUBENTEC 0:b82abca089ac 162 BNE PrivilegedF
RUBENTEC 0:b82abca089ac 163 MRS R3,CONTROL
RUBENTEC 0:b82abca089ac 164 LSLS R3,#31
RUBENTEC 0:b82abca089ac 165 BEQ PrivilegedF
RUBENTEC 0:b82abca089ac 166 SVC 0
RUBENTEC 0:b82abca089ac 167 BX LR
RUBENTEC 0:b82abca089ac 168 PrivilegedF:
RUBENTEC 0:b82abca089ac 169 BX R12
RUBENTEC 0:b82abca089ac 170
RUBENTEC 0:b82abca089ac 171 .fnend
RUBENTEC 0:b82abca089ac 172 .size _free_box, .-_free_box
RUBENTEC 0:b82abca089ac 173
RUBENTEC 0:b82abca089ac 174
RUBENTEC 0:b82abca089ac 175 /*-------------------------- SVC_Handler ------------------------------------*/
RUBENTEC 0:b82abca089ac 176
RUBENTEC 0:b82abca089ac 177 # void SVC_Handler (void);
RUBENTEC 0:b82abca089ac 178
RUBENTEC 0:b82abca089ac 179 .thumb_func
RUBENTEC 0:b82abca089ac 180 .type SVC_Handler, %function
RUBENTEC 0:b82abca089ac 181 .global SVC_Handler
RUBENTEC 0:b82abca089ac 182 SVC_Handler:
RUBENTEC 0:b82abca089ac 183 .fnstart
RUBENTEC 0:b82abca089ac 184 .cantunwind
RUBENTEC 0:b82abca089ac 185
RUBENTEC 0:b82abca089ac 186 MRS R0,PSP /* Read PSP */
RUBENTEC 0:b82abca089ac 187 LDR R1,[R0,#24] /* Read Saved PC from Stack */
RUBENTEC 0:b82abca089ac 188 SUBS R1,R1,#2 /* Point to SVC Instruction */
RUBENTEC 0:b82abca089ac 189 LDRB R1,[R1] /* Load SVC Number */
RUBENTEC 0:b82abca089ac 190 CMP R1,#0
RUBENTEC 0:b82abca089ac 191 BNE SVC_User /* User SVC Number > 0 */
RUBENTEC 0:b82abca089ac 192
RUBENTEC 0:b82abca089ac 193 MOV LR,R4
RUBENTEC 0:b82abca089ac 194 LDMIA R0,{R0-R3,R4} /* Read R0-R3,R12 from stack */
RUBENTEC 0:b82abca089ac 195 MOV R12,R4
RUBENTEC 0:b82abca089ac 196 MOV R4,LR
RUBENTEC 0:b82abca089ac 197 BLX R12 /* Call SVC Function */
RUBENTEC 0:b82abca089ac 198
RUBENTEC 0:b82abca089ac 199 MRS R3,PSP /* Read PSP */
RUBENTEC 0:b82abca089ac 200 STMIA R3!,{R0-R2} /* Store return values */
RUBENTEC 0:b82abca089ac 201
RUBENTEC 0:b82abca089ac 202 LDR R3,=os_tsk
RUBENTEC 0:b82abca089ac 203 LDMIA R3!,{R1,R2} /* os_tsk.run, os_tsk.new */
RUBENTEC 0:b82abca089ac 204 CMP R1,R2
RUBENTEC 0:b82abca089ac 205 BEQ SVC_Exit /* no task switch */
RUBENTEC 0:b82abca089ac 206
RUBENTEC 0:b82abca089ac 207 SUBS R3,#8
RUBENTEC 0:b82abca089ac 208 CMP R1,#0 /* Runtask deleted? */
RUBENTEC 0:b82abca089ac 209 BEQ SVC_Next
RUBENTEC 0:b82abca089ac 210
RUBENTEC 0:b82abca089ac 211 MRS R0,PSP /* Read PSP */
RUBENTEC 0:b82abca089ac 212 SUBS R0,R0,#32 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 213 STR R0,[R1,#TCB_TSTACK] /* Update os_tsk.run->tsk_stack */
RUBENTEC 0:b82abca089ac 214 STMIA R0!,{R4-R7} /* Save old context (R4-R7) */
RUBENTEC 0:b82abca089ac 215 MOV R4,R8
RUBENTEC 0:b82abca089ac 216 MOV R5,R9
RUBENTEC 0:b82abca089ac 217 MOV R6,R10
RUBENTEC 0:b82abca089ac 218 MOV R7,R11
RUBENTEC 0:b82abca089ac 219 STMIA R0!,{R4-R7} /* Save old context (R8-R11) */
RUBENTEC 0:b82abca089ac 220
RUBENTEC 0:b82abca089ac 221 PUSH {R2,R3}
RUBENTEC 0:b82abca089ac 222 BL rt_stk_check /* Check for Stack overflow */
RUBENTEC 0:b82abca089ac 223 POP {R2,R3}
RUBENTEC 0:b82abca089ac 224
RUBENTEC 0:b82abca089ac 225 SVC_Next:
RUBENTEC 0:b82abca089ac 226 STR R2,[R3] /* os_tsk.run = os_tsk.new */
RUBENTEC 0:b82abca089ac 227
RUBENTEC 0:b82abca089ac 228 LDR R0,[R2,#TCB_TSTACK] /* os_tsk.new->tsk_stack */
RUBENTEC 0:b82abca089ac 229 ADDS R0,R0,#16 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 230 LDMIA R0!,{R4-R7} /* Restore new Context (R8-R11) */
RUBENTEC 0:b82abca089ac 231 MOV R8,R4
RUBENTEC 0:b82abca089ac 232 MOV R9,R5
RUBENTEC 0:b82abca089ac 233 MOV R10,R6
RUBENTEC 0:b82abca089ac 234 MOV R11,R7
RUBENTEC 0:b82abca089ac 235 MSR PSP,R0 /* Write PSP */
RUBENTEC 0:b82abca089ac 236 SUBS R0,R0,#32 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 237 LDMIA R0!,{R4-R7} /* Restore new Context (R4-R7) */
RUBENTEC 0:b82abca089ac 238
RUBENTEC 0:b82abca089ac 239 SVC_Exit:
RUBENTEC 0:b82abca089ac 240 MOVS R0,#~0xFFFFFFFD /* Set EXC_RETURN value */
RUBENTEC 0:b82abca089ac 241 MVNS R0,R0
RUBENTEC 0:b82abca089ac 242 BX R0 /* RETI to Thread Mode, use PSP */
RUBENTEC 0:b82abca089ac 243
RUBENTEC 0:b82abca089ac 244 /*------------------- User SVC ------------------------------*/
RUBENTEC 0:b82abca089ac 245
RUBENTEC 0:b82abca089ac 246 SVC_User:
RUBENTEC 0:b82abca089ac 247 PUSH {R4,LR} /* Save Registers */
RUBENTEC 0:b82abca089ac 248 LDR R2,=SVC_Count
RUBENTEC 0:b82abca089ac 249 LDR R2,[R2]
RUBENTEC 0:b82abca089ac 250 CMP R1,R2
RUBENTEC 0:b82abca089ac 251 BHI SVC_Done /* Overflow */
RUBENTEC 0:b82abca089ac 252
RUBENTEC 0:b82abca089ac 253 LDR R4,=SVC_Table-4
RUBENTEC 0:b82abca089ac 254 LSLS R1,R1,#2
RUBENTEC 0:b82abca089ac 255 LDR R4,[R4,R1] /* Load SVC Function Address */
RUBENTEC 0:b82abca089ac 256 MOV LR,R4
RUBENTEC 0:b82abca089ac 257
RUBENTEC 0:b82abca089ac 258 LDMIA R0,{R0-R3,R4} /* Read R0-R3,R12 from stack */
RUBENTEC 0:b82abca089ac 259 MOV R12,R4
RUBENTEC 0:b82abca089ac 260 BLX LR /* Call SVC Function */
RUBENTEC 0:b82abca089ac 261
RUBENTEC 0:b82abca089ac 262 MRS R4,PSP /* Read PSP */
RUBENTEC 0:b82abca089ac 263 STMIA R4!,{R0-R3} /* Function return values */
RUBENTEC 0:b82abca089ac 264 SVC_Done:
RUBENTEC 0:b82abca089ac 265 POP {R4,PC} /* RETI */
RUBENTEC 0:b82abca089ac 266
RUBENTEC 0:b82abca089ac 267 .fnend
RUBENTEC 0:b82abca089ac 268 .size SVC_Handler, .-SVC_Handler
RUBENTEC 0:b82abca089ac 269
RUBENTEC 0:b82abca089ac 270
RUBENTEC 0:b82abca089ac 271 /*-------------------------- PendSV_Handler ---------------------------------*/
RUBENTEC 0:b82abca089ac 272
RUBENTEC 0:b82abca089ac 273 # void PendSV_Handler (void);
RUBENTEC 0:b82abca089ac 274
RUBENTEC 0:b82abca089ac 275 .thumb_func
RUBENTEC 0:b82abca089ac 276 .type PendSV_Handler, %function
RUBENTEC 0:b82abca089ac 277 .global PendSV_Handler
RUBENTEC 0:b82abca089ac 278 .global Sys_Switch
RUBENTEC 0:b82abca089ac 279 PendSV_Handler:
RUBENTEC 0:b82abca089ac 280 .fnstart
RUBENTEC 0:b82abca089ac 281 .cantunwind
RUBENTEC 0:b82abca089ac 282
RUBENTEC 0:b82abca089ac 283 BL rt_pop_req
RUBENTEC 0:b82abca089ac 284
RUBENTEC 0:b82abca089ac 285 Sys_Switch:
RUBENTEC 0:b82abca089ac 286 LDR R3,=os_tsk
RUBENTEC 0:b82abca089ac 287 LDMIA R3!,{R1,R2} /* os_tsk.run, os_tsk.new */
RUBENTEC 0:b82abca089ac 288 CMP R1,R2
RUBENTEC 0:b82abca089ac 289 BEQ Sys_Exit /* no task switch */
RUBENTEC 0:b82abca089ac 290
RUBENTEC 0:b82abca089ac 291 SUBS R3,#8
RUBENTEC 0:b82abca089ac 292
RUBENTEC 0:b82abca089ac 293 MRS R0,PSP /* Read PSP */
RUBENTEC 0:b82abca089ac 294 SUBS R0,R0,#32 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 295 STR R0,[R1,#TCB_TSTACK] /* Update os_tsk.run->tsk_stack */
RUBENTEC 0:b82abca089ac 296 STMIA R0!,{R4-R7} /* Save old context (R4-R7) */
RUBENTEC 0:b82abca089ac 297 MOV R4,R8
RUBENTEC 0:b82abca089ac 298 MOV R5,R9
RUBENTEC 0:b82abca089ac 299 MOV R6,R10
RUBENTEC 0:b82abca089ac 300 MOV R7,R11
RUBENTEC 0:b82abca089ac 301 STMIA R0!,{R4-R7} /* Save old context (R8-R11) */
RUBENTEC 0:b82abca089ac 302
RUBENTEC 0:b82abca089ac 303 PUSH {R2,R3}
RUBENTEC 0:b82abca089ac 304 BL rt_stk_check /* Check for Stack overflow */
RUBENTEC 0:b82abca089ac 305 POP {R2,R3}
RUBENTEC 0:b82abca089ac 306
RUBENTEC 0:b82abca089ac 307 STR R2,[R3] /* os_tsk.run = os_tsk.new */
RUBENTEC 0:b82abca089ac 308
RUBENTEC 0:b82abca089ac 309 LDR R0,[R2,#TCB_TSTACK] /* os_tsk.new->tsk_stack */
RUBENTEC 0:b82abca089ac 310 ADDS R0,R0,#16 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 311 LDMIA R0!,{R4-R7} /* Restore new Context (R8-R11) */
RUBENTEC 0:b82abca089ac 312 MOV R8,R4
RUBENTEC 0:b82abca089ac 313 MOV R9,R5
RUBENTEC 0:b82abca089ac 314 MOV R10,R6
RUBENTEC 0:b82abca089ac 315 MOV R11,R7
RUBENTEC 0:b82abca089ac 316 MSR PSP,R0 /* Write PSP */
RUBENTEC 0:b82abca089ac 317 SUBS R0,R0,#32 /* Adjust Start Address */
RUBENTEC 0:b82abca089ac 318 LDMIA R0!,{R4-R7} /* Restore new Context (R4-R7) */
RUBENTEC 0:b82abca089ac 319
RUBENTEC 0:b82abca089ac 320 Sys_Exit:
RUBENTEC 0:b82abca089ac 321 MOVS R0,#~0xFFFFFFFD /* Set EXC_RETURN value */
RUBENTEC 0:b82abca089ac 322 MVNS R0,R0
RUBENTEC 0:b82abca089ac 323 BX R0 /* RETI to Thread Mode, use PSP */
RUBENTEC 0:b82abca089ac 324
RUBENTEC 0:b82abca089ac 325 .fnend
RUBENTEC 0:b82abca089ac 326 .size PendSV_Handler, .-PendSV_Handler
RUBENTEC 0:b82abca089ac 327
RUBENTEC 0:b82abca089ac 328
RUBENTEC 0:b82abca089ac 329 /*-------------------------- SysTick_Handler --------------------------------*/
RUBENTEC 0:b82abca089ac 330
RUBENTEC 0:b82abca089ac 331 # void SysTick_Handler (void);
RUBENTEC 0:b82abca089ac 332
RUBENTEC 0:b82abca089ac 333 .thumb_func
RUBENTEC 0:b82abca089ac 334 .type SysTick_Handler, %function
RUBENTEC 0:b82abca089ac 335 .global SysTick_Handler
RUBENTEC 0:b82abca089ac 336 SysTick_Handler:
RUBENTEC 0:b82abca089ac 337 .fnstart
RUBENTEC 0:b82abca089ac 338 .cantunwind
RUBENTEC 0:b82abca089ac 339
RUBENTEC 0:b82abca089ac 340 BL rt_systick
RUBENTEC 0:b82abca089ac 341 B Sys_Switch
RUBENTEC 0:b82abca089ac 342
RUBENTEC 0:b82abca089ac 343 .fnend
RUBENTEC 0:b82abca089ac 344 .size SysTick_Handler, .-SysTick_Handler
RUBENTEC 0:b82abca089ac 345
RUBENTEC 0:b82abca089ac 346
RUBENTEC 0:b82abca089ac 347 /*-------------------------- OS_Tick_Handler --------------------------------*/
RUBENTEC 0:b82abca089ac 348
RUBENTEC 0:b82abca089ac 349 # void OS_Tick_Handler (void);
RUBENTEC 0:b82abca089ac 350
RUBENTEC 0:b82abca089ac 351 .thumb_func
RUBENTEC 0:b82abca089ac 352 .type OS_Tick_Handler, %function
RUBENTEC 0:b82abca089ac 353 .global OS_Tick_Handler
RUBENTEC 0:b82abca089ac 354 OS_Tick_Handler:
RUBENTEC 0:b82abca089ac 355 .fnstart
RUBENTEC 0:b82abca089ac 356 .cantunwind
RUBENTEC 0:b82abca089ac 357
RUBENTEC 0:b82abca089ac 358 BL os_tick_irqack
RUBENTEC 0:b82abca089ac 359 BL rt_systick
RUBENTEC 0:b82abca089ac 360 B Sys_Switch
RUBENTEC 0:b82abca089ac 361
RUBENTEC 0:b82abca089ac 362 .fnend
RUBENTEC 0:b82abca089ac 363 .size OS_Tick_Handler, .-OS_Tick_Handler
RUBENTEC 0:b82abca089ac 364
RUBENTEC 0:b82abca089ac 365
RUBENTEC 0:b82abca089ac 366 .end
RUBENTEC 0:b82abca089ac 367
RUBENTEC 0:b82abca089ac 368 /*----------------------------------------------------------------------------
RUBENTEC 0:b82abca089ac 369 * end of file
RUBENTEC 0:b82abca089ac 370 *---------------------------------------------------------------------------*/