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

   1 /*\r
   2     FreeRTOS V6.0.5 - Copyright (C) 2010 Real Time Engineers Ltd.\r
   3 \r
   4     ***************************************************************************\r
   5     *                                                                         *\r
   6     * If you are:                                                             *\r
   7     *                                                                         *\r
   8     *    + New to FreeRTOS,                                                   *\r
   9     *    + Wanting to learn FreeRTOS or multitasking in general quickly       *\r
  10     *    + Looking for basic training,                                        *\r
  11     *    + Wanting to improve your FreeRTOS skills and productivity           *\r
  12     *                                                                         *\r
  13     * then take a look at the FreeRTOS eBook                                  *\r
  14     *                                                                         *\r
  15     *        "Using the FreeRTOS Real Time Kernel - a Practical Guide"        *\r
  16     *                  http://www.FreeRTOS.org/Documentation                  *\r
  17     *                                                                         *\r
  18     * A pdf reference manual is also available.  Both are usually delivered   *\r
  19     * to your inbox within 20 minutes to two hours when purchased between 8am *\r
  20     * and 8pm GMT (although please allow up to 24 hours in case of            *\r
  21     * exceptional circumstances).  Thank you for your support!                *\r
  22     *                                                                         *\r
  23     ***************************************************************************\r
  24 \r
  25     This file is part of the FreeRTOS distribution.\r
  26 \r
  27     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  28     the terms of the GNU General Public License (version 2) as published by the\r
  29     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  30     ***NOTE*** The exception to the GPL is included to allow you to distribute\r
  31     a combined work that includes FreeRTOS without being obliged to provide the\r
  32     source code for proprietary components outside of the FreeRTOS kernel.\r
  33     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT\r
  34     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
  35     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  36     more details. You should have received a copy of the GNU General Public\r
  37     License and the FreeRTOS license exception along with FreeRTOS; if not it\r
  38     can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
  39     by writing to Richard Barry, contact details for whom are available on the\r
  40     FreeRTOS WEB site.\r
  41 \r
  42     1 tab == 4 spaces!\r
  43 \r
  44     http://www.FreeRTOS.org - Documentation, latest information, license and\r
  45     contact details.\r
  46 \r
  47     http://www.SafeRTOS.com - A version that is certified for use in safety\r
  48     critical systems.\r
  49 \r
  50     http://www.OpenRTOS.com - Commercial support, development, porting,\r
  51     licensing and training services.\r
  52 */\r
  53 \r
  54         PUBLIC _prvStartFirstTask\r
  55         PUBLIC ___interrupt_27\r
  56 \r
  57         EXTERN _pxCurrentTCB\r
  58         EXTERN _vTaskSwitchContext\r
  59 \r
  60         RSEG CODE:CODE(4)\r
  61 \r
  62 _prvStartFirstTask:\r
  63 \r
  64                 /* When starting the scheduler there is nothing that needs moving to the\r
  65                 interrupt stack because the function is not called from an interrupt.\r
  66                 Just ensure the current stack is the user stack. */\r
  67                 SETPSW          U\r
  68 \r
  69                 /* Obtain the location of the stack associated with which ever task\r
  70                 pxCurrentTCB is currently pointing to. */\r
  71                 MOV.L           #_pxCurrentTCB, R15\r
  72                 MOV.L           [R15], R15\r
  73                 MOV.L           [R15], R0\r
  74 \r
  75                 /* Restore the registers from the stack of the task pointed to by\r
  76                 pxCurrentTCB. */\r
  77                 POP                     R15\r
  78 \r
  79                 /* Accumulator low 32 bits. */\r
  80                 MVTACLO         R15\r
  81                 POP                     R15\r
  82 \r
  83                 /* Accumulator high 32 bits. */\r
  84                 MVTACHI         R15\r
  85                 POP                     R15\r
  86 \r
  87                 /* Floating point status word. */\r
  88                 MVTC            R15, FPSW\r
  89 \r
  90                 /* R1 to R15 - R0 is not included as it is the SP. */\r
  91                 POPM            R1-R15\r
  92 \r
  93                 /* This pops the remaining registers. */\r
  94                 RTE\r
  95                 NOP\r
  96                 NOP\r
  97 \r
  98 /*-----------------------------------------------------------*/\r
  99 \r
 100 /* The software interrupt - overwrite the default 'weak' definition. */\r
 101 ___interrupt_27:\r
 102 \r
 103                 /* Re-enable interrupts. */\r
 104                 SETPSW          I\r
 105 \r
 106                 /* Move the data that was automatically pushed onto the interrupt stack when\r
 107                 the interrupt occurred from the interrupt stack to the user stack.\r
 108 \r
 109                 R15 is saved before it is clobbered. */\r
 110                 PUSH.L          R15\r
 111 \r
 112                 /* Read the user stack pointer. */\r
 113                 MVFC            USP, R15\r
 114 \r
 115                 /* Move the address down to the data being moved. */\r
 116                 SUB                     #12, R15\r
 117                 MVTC            R15, USP\r
 118 \r
 119                 /* Copy the data across, R15, then PC, then PSW. */\r
 120                 MOV.L           [ R0 ], [ R15 ]\r
 121                 MOV.L           4[ R0 ], 4[ R15 ]\r
 122                 MOV.L           8[ R0 ], 8[ R15 ]\r
 123 \r
 124                 /* Move the interrupt stack pointer to its new correct position. */\r
 125                 ADD             #12, R0\r
 126 \r
 127                 /* All the rest of the registers are saved directly to the user stack. */\r
 128                 SETPSW          U\r
 129 \r
 130                 /* Save the rest of the general registers (R15 has been saved already). */\r
 131                 PUSHM           R1-R14\r
 132 \r
 133                 /* Save the FPSW and accumulator. */\r
 134                 MVFC            FPSW, R15\r
 135                 PUSH.L          R15\r
 136                 MVFACHI         R15\r
 137                 PUSH.L          R15\r
 138 \r
 139                 /* Middle word. */\r
 140                 MVFACMI R15\r
 141 \r
 142                 /* Shifted left as it is restored to the low order word. */\r
 143                 SHLL            #16, R15\r
 144                 PUSH.L          R15\r
 145 \r
 146                 /* Save the stack pointer to the TCB. */\r
 147                 MOV.L           #_pxCurrentTCB, R15\r
 148                 MOV.L           [ R15 ], R15\r
 149                 MOV.L           R0, [ R15 ]\r
 150 \r
 151                 /* Ensure the interrupt mask is set to the syscall priority while the kernel\r
 152                 structures are being accessed. */\r
 153                 MVTIPL          #4\r
 154 \r
 155                 /* Select the next task to run. */\r
 156                 BSR.A           _vTaskSwitchContext\r
 157 \r
 158                 /* Reset the interrupt mask as no more data structure access is required. */\r
 159                 MVTIPL          #1\r
 160 \r
 161                 /* Load the stack pointer of the task that is now selected as the Running\r
 162                 state task from its TCB. */\r
 163                 MOV.L           #_pxCurrentTCB,R15\r
 164                 MOV.L           [ R15 ], R15\r
 165                 MOV.L           [ R15 ], R0\r
 166 \r
 167                 /* Restore the context of the new task.  The PSW (Program Status Word) and\r
 168                 PC will be popped by the RTE instruction. */\r
 169                 POP                     R15\r
 170                 MVTACLO         R15\r
 171                 POP                     R15\r
 172                 MVTACHI         R15\r
 173                 POP                     R15\r
 174                 MVTC            R15, FPSW\r
 175                 POPM            R1-R15\r
 176                 RTE\r
 177                 NOP\r
 178                 NOP\r
 179 \r
 180 /*-----------------------------------------------------------*/\r
 181 \r
 182                 END\r
 183 \r