mbed client lightswitch demo

Dependencies:   mbed Socket lwip-eth lwip-sys lwip

Fork of mbed-client-classic-example-lwip by Austin Blackstone

Committer:
mbedAustin
Date:
Thu Jun 09 17:08:36 2016 +0000
Revision:
11:cada08fc8a70
Commit for public Consumption

Who changed what in which revision?

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