git.sur5r.net Git - freertos/blob - Source/portable/IAR/78K0R/ISR_Support.h

   1 ;/*\r
   2 ;    FreeRTOS V6.0.4 - 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 #include "FreeRTOSConfig.h"\r
  55 \r
  56 ; Variables used by scheduler\r
  57 ;------------------------------------------------------------------------------\r
  58         EXTERN    pxCurrentTCB\r
  59         EXTERN    usCriticalNesting\r
  60 \r
  61 ;------------------------------------------------------------------------------\r
  62 ;   portSAVE_CONTEXT MACRO\r
  63 ;   Saves the context of the general purpose registers, CS and ES (only in far \r
  64 ;       memory mode) registers the usCriticalNesting Value and the Stack Pointer\r
  65 ;   of the active Task onto the task stack\r
  66 ;------------------------------------------------------------------------------\r
  67 portSAVE_CONTEXT MACRO\r
  68 \r
  69         PUSH      AX                    ; Save AX Register to stack.\r
  70         PUSH      HL\r
  71 #if configMEMORY_MODE == 1\r
  72         MOV       A, CS                 ; Save CS register.\r
  73         XCH       A, X\r
  74         MOV       A, ES                 ; Save ES register.\r
  75         PUSH      AX\r
  76 #else\r
  77         MOV       A, CS                 ; Save CS register.\r
  78         PUSH      AX\r
  79 #endif\r
  80         PUSH      DE                    ; Save the remaining general purpose registers.\r
  81         PUSH      BC\r
  82         MOVW      AX, usCriticalNesting ; Save the usCriticalNesting value.\r
  83         PUSH      AX    \r
  84         MOVW      AX, pxCurrentTCB          ; Save the Stack pointer.\r
  85         MOVW      HL, AX                                        \r
  86         MOVW      AX, SP                                        \r
  87         MOVW      [HL], AX                                      \r
  88         ENDM\r
  89 ;------------------------------------------------------------------------------\r
  90 \r
  91 ;------------------------------------------------------------------------------\r
  92 ;   portRESTORE_CONTEXT MACRO\r
  93 ;   Restores the task Stack Pointer then use this to restore usCriticalNesting,\r
  94 ;   general purpose registers and the CS and ES (only in far memory mode)\r
  95 ;   of the selected task from the task stack\r
  96 ;------------------------------------------------------------------------------\r
  97 portRESTORE_CONTEXT MACRO\r
  98         MOVW      AX, pxCurrentTCB          ; Restore the Stack pointer.\r
  99         MOVW      HL, AX\r
 100         MOVW      AX, [HL]\r
 101         MOVW      SP, AX\r
 102         POP           AX                        ; Restore usCriticalNesting value.\r
 103         MOVW      usCriticalNesting, AX\r
 104         POP           BC                    ; Restore the necessary general purpose registers.\r
 105         POP           DE\r
 106 #if configMEMORY_MODE == 1\r
 107         POP       AX                    ; Restore the ES register.\r
 108         MOV       ES, A\r
 109         XCH       A, X                  ; Restore the CS register.\r
 110         MOV       CS, A\r
 111 #else\r
 112         POP       AX\r
 113         MOV       CS, A                 ; Restore CS register.\r
 114 #endif\r
 115         POP       HL                    ; Restore general purpose register HL.\r
 116         POP       AX                    ; Restore AX.\r
 117         ENDM\r
 118 ;------------------------------------------------------------------------------\r