git.sur5r.net Git - freertos/blob - FreeRTOS/Source/portable/IAR/RX100/port_asm.s

   1 /*\r
   2     FreeRTOS V7.4.0 - Copyright (C) 2013 Real Time Engineers Ltd.\r
   3 \r
   4     FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME.  PLEASE VISIT\r
   5     http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
   6 \r
   7     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS tutorial books are available in pdf and paperback.        *\r
  10      *    Complete, revised, and edited pdf reference manuals are also       *\r
  11      *    available.                                                         *\r
  12      *                                                                       *\r
  13      *    Purchasing FreeRTOS documentation will not only help you, by       *\r
  14      *    ensuring you get running as quickly as possible and with an        *\r
  15      *    in-depth knowledge of how to use FreeRTOS, it will also help       *\r
  16      *    the FreeRTOS project to continue with its mission of providing     *\r
  17      *    professional grade, cross platform, de facto standard solutions    *\r
  18      *    for microcontrollers - completely free of charge!                  *\r
  19      *                                                                       *\r
  20      *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *\r
  21      *                                                                       *\r
  22      *    Thank you for using FreeRTOS, and thank you for your support!      *\r
  23      *                                                                       *\r
  24     ***************************************************************************\r
  25 \r
  26 \r
  27     This file is part of the FreeRTOS distribution.\r
  28 \r
  29     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  30     the terms of the GNU General Public License (version 2) as published by the\r
  31     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  32 \r
  33     >>>>>>NOTE<<<<<< The modification to the GPL is included to allow you to\r
  34     distribute a combined work that includes FreeRTOS without being obliged to\r
  35     provide the source code for proprietary components outside of the FreeRTOS\r
  36     kernel.\r
  37 \r
  38     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  39     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  40     FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more\r
  41     details. You should have received a copy of the GNU General Public License\r
  42     and the FreeRTOS license exception along with FreeRTOS; if not itcan be\r
  43     viewed here: http://www.freertos.org/a00114.html and also obtained by\r
  44     writing to Real Time Engineers Ltd., contact details for whom are available\r
  45     on the FreeRTOS WEB site.\r
  46 \r
  47     1 tab == 4 spaces!\r
  48 \r
  49     ***************************************************************************\r
  50      *                                                                       *\r
  51      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  52      *    not run, what could be wrong?"                                     *\r
  53      *                                                                       *\r
  54      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  55      *                                                                       *\r
  56     ***************************************************************************\r
  57 \r
  58 \r
  59     http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
  60     license and Real Time Engineers Ltd. contact details.\r
  61 \r
  62     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  63     including FreeRTOS+Trace - an indispensable productivity tool, and our new\r
  64     fully thread aware and reentrant UDP/IP stack.\r
  65 \r
  66     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
  67     Integrity Systems, who sell the code with commercial support,\r
  68     indemnification and middleware, under the OpenRTOS brand.\r
  69 \r
  70     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
  71     engineered and independently SIL3 certified version for use in safety and\r
  72     mission critical applications that require provable dependability.\r
  73 */\r
  74 \r
  75 #include "PriorityDefinitions.h"\r
  76 \r
  77         PUBLIC _prvStartFirstTask\r
  78         PUBLIC ___interrupt_27\r
  79 \r
  80         EXTERN _pxCurrentTCB\r
  81         EXTERN _vTaskSwitchContext\r
  82 \r
  83         RSEG CODE:CODE(4)\r
  84 \r
  85 _prvStartFirstTask:\r
  86 \r
  87                 /* When starting the scheduler there is nothing that needs moving to the\r
  88                 interrupt stack because the function is not called from an interrupt.\r
  89                 Just ensure the current stack is the user stack. */\r
  90                 SETPSW          U\r
  91 \r
  92                 /* Obtain the location of the stack associated with which ever task\r
  93                 pxCurrentTCB is currently pointing to. */\r
  94                 MOV.L           #_pxCurrentTCB, R15\r
  95                 MOV.L           [R15], R15\r
  96                 MOV.L           [R15], R0\r
  97 \r
  98                 /* Restore the registers from the stack of the task pointed to by\r
  99                 pxCurrentTCB. */\r
 100                 POP                     R15\r
 101 \r
 102                 /* Accumulator low 32 bits. */\r
 103                 MVTACLO         R15\r
 104                 POP                     R15\r
 105 \r
 106                 /* Accumulator high 32 bits. */\r
 107                 MVTACHI         R15\r
 108 \r
 109                 /* R1 to R15 - R0 is not included as it is the SP. */\r
 110                 POPM            R1-R15\r
 111 \r
 112                 /* This pops the remaining registers. */\r
 113                 RTE\r
 114                 NOP\r
 115                 NOP\r
 116 \r
 117 /*-----------------------------------------------------------*/\r
 118 \r
 119 /* The software interrupt - overwrite the default 'weak' definition. */\r
 120 ___interrupt_27:\r
 121 \r
 122                 /* Re-enable interrupts. */\r
 123                 SETPSW          I\r
 124 \r
 125                 /* Move the data that was automatically pushed onto the interrupt stack when\r
 126                 the interrupt occurred from the interrupt stack to the user stack.\r
 127 \r
 128                 R15 is saved before it is clobbered. */\r
 129                 PUSH.L          R15\r
 130 \r
 131                 /* Read the user stack pointer. */\r
 132                 MVFC            USP, R15\r
 133 \r
 134                 /* Move the address down to the data being moved. */\r
 135                 SUB                     #12, R15\r
 136                 MVTC            R15, USP\r
 137 \r
 138                 /* Copy the data across, R15, then PC, then PSW. */\r
 139                 MOV.L           [ R0 ], [ R15 ]\r
 140                 MOV.L           4[ R0 ], 4[ R15 ]\r
 141                 MOV.L           8[ R0 ], 8[ R15 ]\r
 142 \r
 143                 /* Move the interrupt stack pointer to its new correct position. */\r
 144                 ADD             #12, R0\r
 145 \r
 146                 /* All the rest of the registers are saved directly to the user stack. */\r
 147                 SETPSW          U\r
 148 \r
 149                 /* Save the rest of the general registers (R15 has been saved already). */\r
 150                 PUSHM           R1-R14\r
 151 \r
 152                 /* Save the accumulator. */\r
 153                 MVFACHI         R15\r
 154                 PUSH.L          R15\r
 155 \r
 156                 /* Middle word. */\r
 157                 MVFACMI R15\r
 158 \r
 159                 /* Shifted left as it is restored to the low order word. */\r
 160                 SHLL            #16, R15\r
 161                 PUSH.L          R15\r
 162 \r
 163                 /* Save the stack pointer to the TCB. */\r
 164                 MOV.L           #_pxCurrentTCB, R15\r
 165                 MOV.L           [ R15 ], R15\r
 166                 MOV.L           R0, [ R15 ]\r
 167 \r
 168                 /* Ensure the interrupt mask is set to the syscall priority while the kernel\r
 169                 structures are being accessed. */\r
 170                 MVTIPL          #configMAX_SYSCALL_INTERRUPT_PRIORITY\r
 171 \r
 172                 /* Select the next task to run. */\r
 173                 BSR.A           _vTaskSwitchContext\r
 174 \r
 175                 /* Reset the interrupt mask as no more data structure access is required. */\r
 176                 MVTIPL          #configKERNEL_INTERRUPT_PRIORITY\r
 177 \r
 178                 /* Load the stack pointer of the task that is now selected as the Running\r
 179                 state task from its TCB. */\r
 180                 MOV.L           #_pxCurrentTCB,R15\r
 181                 MOV.L           [ R15 ], R15\r
 182                 MOV.L           [ R15 ], R0\r
 183 \r
 184                 /* Restore the context of the new task.  The PSW (Program Status Word) and\r
 185                 PC will be popped by the RTE instruction. */\r
 186                 POP                     R15\r
 187                 MVTACLO         R15\r
 188                 POP                     R15\r
 189                 MVTACHI         R15\r
 190                 POPM            R1-R15\r
 191                 RTE\r
 192                 NOP\r
 193                 NOP\r
 194 \r
 195 /*-----------------------------------------------------------*/\r
 196 \r
 197                 END\r
 198 \r