git.sur5r.net Git - freertos/blob - FreeRTOS/Source/portable/CCS/ARM_CM3/portasm.asm

   1 ;/*\r
   2 ; * FreeRTOS Kernel V10.0.0\r
   3 ; * Copyright (C) 2017 Amazon.com, Inc. or its affiliates.  All Rights Reserved.\r
   4 ; *\r
   5 ; * Permission is hereby granted, free of charge, to any person obtaining a copy of\r
   6 ; * this software and associated documentation files (the "Software"), to deal in\r
   7 ; * the Software without restriction, including without limitation the rights to\r
   8 ; * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of\r
   9 ; * the Software, and to permit persons to whom the Software is furnished to do so,\r
  10 ; * subject to the following conditions:\r
  11 ; *\r
  12 ; * The above copyright notice and this permission notice shall be included in all\r
  13 ; * copies or substantial portions of the Software. If you wish to use our Amazon\r
  14 ; * FreeRTOS name, please do so in a fair use way that does not cause confusion.\r
  15 ; *\r
  16 ; * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
  17 ; * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS\r
  18 ; * FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR\r
  19 ; * COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
  20 ; * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
  21 ; * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
  22 ; *\r
  23 ; * http://www.FreeRTOS.org\r
  24 ; * http://aws.amazon.com/freertos\r
  25 ; *\r
  26 ; * 1 tab == 4 spaces!\r
  27 ; */\r
  28 \r
  29         .thumb\r
  30 \r
  31         .ref pxCurrentTCB\r
  32         .ref vTaskSwitchContext\r
  33         .ref ulMaxSyscallInterruptPriority\r
  34 \r
  35         .def xPortPendSVHandler\r
  36         .def ulPortGetIPSR\r
  37         .def vPortSVCHandler\r
  38         .def vPortStartFirstTask\r
  39 \r
  40 NVICOffsetConst:                                        .word   0xE000ED08\r
  41 CPACRConst:                                                     .word   0xE000ED88\r
  42 pxCurrentTCBConst:                                      .word   pxCurrentTCB\r
  43 ulMaxSyscallInterruptPriorityConst: .word ulMaxSyscallInterruptPriority\r
  44 \r
  45 ; -----------------------------------------------------------\r
  46 \r
  47         .align 4\r
  48 ulPortGetIPSR: .asmfunc\r
  49         mrs r0, ipsr\r
  50         bx r14\r
  51         .endasmfunc\r
  52  ; -----------------------------------------------------------\r
  53 \r
  54         .align 4\r
  55 vPortSetInterruptMask: .asmfunc\r
  56         push {r0}\r
  57         ldr r0, ulMaxSyscallInterruptPriorityConst\r
  58         msr basepri, r0\r
  59         pop {r0}\r
  60         bx r14\r
  61         .endasmfunc\r
  62 ; -----------------------------------------------------------\r
  63 \r
  64         .align 4\r
  65 xPortPendSVHandler: .asmfunc\r
  66         mrs r0, psp\r
  67         isb\r
  68 \r
  69         ;/* Get the location of the current TCB. */\r
  70         ldr     r3, pxCurrentTCBConst\r
  71         ldr     r2, [r3]\r
  72 \r
  73         ;/* Save the core registers. */\r
  74         stmdb r0!, {r4-r11}\r
  75 \r
  76         ;/* Save the new top of stack into the first member of the TCB. */\r
  77         str r0, [r2]\r
  78 \r
  79         stmdb sp!, {r3, r14}\r
  80         ldr r0, ulMaxSyscallInterruptPriorityConst\r
  81         ldr r1, [r0]\r
  82         msr basepri, r1\r
  83         dsb\r
  84         isb\r
  85         bl vTaskSwitchContext\r
  86         mov r0, #0\r
  87         msr basepri, r0\r
  88         ldmia sp!, {r3, r14}\r
  89 \r
  90         ;/* The first item in pxCurrentTCB is the task top of stack. */\r
  91         ldr r1, [r3]\r
  92         ldr r0, [r1]\r
  93 \r
  94         ;/* Pop the core registers. */\r
  95         ldmia r0!, {r4-r11}\r
  96 \r
  97         msr psp, r0\r
  98         isb\r
  99         bx r14\r
 100         .endasmfunc\r
 101 \r
 102 ; -----------------------------------------------------------\r
 103 \r
 104         .align 4\r
 105 vPortSVCHandler: .asmfunc\r
 106         ;/* Get the location of the current TCB. */\r
 107         ldr     r3, pxCurrentTCBConst\r
 108         ldr r1, [r3]\r
 109         ldr r0, [r1]\r
 110         ;/* Pop the core registers. */\r
 111         ldmia r0!, {r4-r11}\r
 112         msr psp, r0\r
 113         isb\r
 114         mov r0, #0\r
 115         msr     basepri, r0\r
 116         orr r14, #0xd\r
 117         bx r14\r
 118         .endasmfunc\r
 119 \r
 120 ; -----------------------------------------------------------\r
 121 \r
 122         .align 4\r
 123 vPortStartFirstTask: .asmfunc\r
 124         ;/* Use the NVIC offset register to locate the stack. */\r
 125         ldr r0, NVICOffsetConst\r
 126         ldr r0, [r0]\r
 127         ldr r0, [r0]\r
 128         ;/* Set the msp back to the start of the stack. */\r
 129         msr msp, r0\r
 130         ;/* Clear the bit that indicates the FPU is in use in case the FPU was used\r
 131         ;before the scheduler was started - which would otherwise result in the\r
 132         ;unnecessary leaving of space in the SVC stack for lazy saving of FPU\r
 133         ;registers. */\r
 134         mov r0, #0\r
 135         msr control, r0\r
 136         ;/* Call SVC to start the first task. */\r
 137         cpsie i\r
 138         cpsie f\r
 139         dsb\r
 140         isb\r
 141         svc #0\r
 142         .endasmfunc\r
 143 \r
 144 ; -----------------------------------------------------------\r
 145 \r