begriffs open source - freertos/blob - 20100923-V6.1.0-RC2/Source/portable/IAR/STR75x/ISR_Support.h

   1 ;/*\r
   2 ;    FreeRTOS V6.1.0 - 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 books - available as PDF or paperback  *\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         EXTERN pxCurrentTCB\r
  55         EXTERN ulCriticalNesting\r
  56 \r
  57 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;\r
  58 ; Context save and restore macro definitions\r
  59 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;\r
  60 \r
  61 portSAVE_CONTEXT MACRO\r
  62 \r
  63         ; Push R0 as we are going to use the register.                                  \r
  64         STMDB   SP!, {R0}\r
  65 \r
  66         ; Set R0 to point to the task stack pointer.                                    \r
  67         STMDB   SP, {SP}^\r
  68         NOP\r
  69         SUB             SP, SP, #4\r
  70         LDMIA   SP!, {R0}\r
  71 \r
  72         ; Push the return address onto the stack.                                               \r
  73         STMDB   R0!, {LR}\r
  74 \r
  75         ; Now we have saved LR we can use it instead of R0.                             \r
  76         MOV             LR, R0\r
  77 \r
  78         ; Pop R0 so we can save it onto the system mode stack.                  \r
  79         LDMIA   SP!, {R0}\r
  80 \r
  81         ; Push all the system mode registers onto the task stack.               \r
  82         STMDB   LR, {R0-LR}^\r
  83         NOP\r
  84         SUB             LR, LR, #60\r
  85 \r
  86         ; Push the SPSR onto the task stack.                                                    \r
  87         MRS             R0, SPSR\r
  88         STMDB   LR!, {R0}\r
  89 \r
  90         LDR             R0, =ulCriticalNesting \r
  91         LDR             R0, [R0]\r
  92         STMDB   LR!, {R0}\r
  93 \r
  94         ; Store the new top of stack for the task.                                              \r
  95         LDR             R1, =pxCurrentTCB\r
  96         LDR             R0, [R1]\r
  97         STR             LR, [R0]\r
  98 \r
  99         ENDM\r
 100 \r
 101 \r
 102 portRESTORE_CONTEXT MACRO\r
 103 \r
 104         ; Set the LR to the task stack.                                                                         \r
 105         LDR             R1, =pxCurrentTCB\r
 106         LDR             R0, [R1]\r
 107         LDR             LR, [R0]\r
 108 \r
 109         ; The critical nesting depth is the first item on the stack.    \r
 110         ; Load it into the ulCriticalNesting variable.                                  \r
 111         LDR             R0, =ulCriticalNesting\r
 112         LDMFD   LR!, {R1}\r
 113         STR             R1, [R0]\r
 114 \r
 115         ; Get the SPSR from the stack.                                                                  \r
 116         LDMFD   LR!, {R0}\r
 117         MSR             SPSR_cxsf, R0\r
 118 \r
 119         ; Restore all system mode registers for the task.                               \r
 120         LDMFD   LR, {R0-R14}^\r
 121         NOP\r
 122 \r
 123         ; Restore the return address.                                                                   \r
 124         LDR             LR, [LR, #+60]\r
 125 \r
 126         ; And return - correcting the offset in the LR to obtain the    \r
 127         ; correct address.                                                                                              \r
 128         SUBS    PC, LR, #4\r
 129 \r
 130         ENDM\r
 131 \r