git.sur5r.net Git - freertos/blob - Source/portable/IAR/78K0R/portasm.s26

   1 ;/*\r
   2 ;    FreeRTOS V6.1.1 - Copyright (C) 2011 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 #include "ISR_Support.h"\r
  54 ;------------------------------------------------------------------------------\r
  55 \r
  56 #if __CORE__ != __78K0R__\r
  57         #error "This file is only for 78K0R Devices"\r
  58 #endif\r
  59 \r
  60 #define CS                    0xFFFFC\r
  61 #define ES                    0xFFFFD\r
  62 \r
  63 ; Functions implemented in this file\r
  64 ;------------------------------------------------------------------------------\r
  65         PUBLIC    vPortYield\r
  66         PUBLIC    vPortStart\r
  67 \r
  68 ; Functions used by scheduler\r
  69 ;------------------------------------------------------------------------------\r
  70         EXTERN    vTaskSwitchContext\r
  71         EXTERN    vTaskIncrementTick\r
  72 \r
  73 ; Tick ISR Prototype\r
  74 ;------------------------------------------------------------------------------\r
  75 ;       EXTERN    ?CL78K0R_V2_L00\r
  76 \r
  77         PUBWEAK   `??MD_INTTM05??INTVEC 68`\r
  78         PUBLIC    MD_INTTM05\r
  79 \r
  80 MD_INTTM05    SYMBOL "MD_INTTM05"\r
  81 `??MD_INTTM05??INTVEC 68` SYMBOL "??INTVEC 68", MD_INTTM05\r
  82 \r
  83 \r
  84 \r
  85 ;------------------------------------------------------------------------------\r
  86 ;   Yield to another task.  Implemented as a software interrupt.  The return\r
  87 ;   address and PSW will have been saved to the stack automatically before\r
  88 ;   this code runs.\r
  89 ;\r
  90 ;   Input:  NONE\r
  91 ;\r
  92 ;   Call:   CALL    vPortYield\r
  93 ;\r
  94 ;   Output: NONE\r
  95 ;\r
  96 ;------------------------------------------------------------------------------\r
  97     RSEG CODE:CODE\r
  98 vPortYield:\r
  99         portSAVE_CONTEXT                        ; Save the context of the current task.\r
 100         call      vTaskSwitchContext    ; Call the scheduler to select the next task.\r
 101         portRESTORE_CONTEXT                     ; Restore the context of the next task to run.\r
 102         retb\r
 103 \r
 104         \r
 105 ;------------------------------------------------------------------------------\r
 106 ;   Restore the context of the first task that is going to run.\r
 107 ;\r
 108 ;   Input:  NONE\r
 109 ;\r
 110 ;   Call:   CALL    vPortStart\r
 111 ;\r
 112 ;   Output: NONE\r
 113 ;\r
 114 ;------------------------------------------------------------------------------ \r
 115     RSEG CODE:CODE\r
 116 vPortStart:\r
 117         portRESTORE_CONTEXT                 ; Restore the context of whichever task the ...\r
 118         reti                                            ; An interrupt stack frame is used so the task\r
 119                                     ; is started using a RETI instruction.\r
 120 \r
 121 ;------------------------------------------------------------------------------\r
 122 ;   Perform the necessary steps of the Tick Count Increment and Task Switch\r
 123 ;   depending on the chosen kernel configuration\r
 124 ;\r
 125 ;   Input:  NONE\r
 126 ;\r
 127 ;   Call:   ISR\r
 128 ;\r
 129 ;   Output: NONE\r
 130 ;\r
 131 ;------------------------------------------------------------------------------ \r
 132 \r
 133 MD_INTTM05:\r
 134 \r
 135         portSAVE_CONTEXT                        ; Save the context of the current task.\r
 136         call      vTaskIncrementTick    ; Call the timer tick function.\r
 137 #if configUSE_PREEMPTION == 1\r
 138         call      vTaskSwitchContext    ; Call the scheduler to select the next task.\r
 139 #endif\r
 140         portRESTORE_CONTEXT                     ; Restore the context of the next task to run.\r
 141         reti\r
 142 \r
 143 \r
 144 \r
 145 ;       REQUIRE ?CL78K0R_V2_L00\r
 146         COMMON INTVEC:CODE:ROOT(1)      ; Set ISR location to the Interrupt vector table.\r
 147         ORG 68\r
 148 `??MD_INTTM05??INTVEC 68`:\r
 149         DW MD_INTTM05\r
 150 \r
 151         COMMON INTVEC:CODE:ROOT(1)      ; Set ISR location to the Interrupt vector table.\r
 152         ORG 126\r
 153 `??vPortYield??INTVEC 126`:\r
 154         DW vPortYield\r
 155 \r
 156                                                                         ; Set value for the usCriticalNesting.\r
 157         RSEG NEAR_ID:CONST:SORT:NOROOT(1)\r
 158 `?<Initializer for usCriticalNesting>`:\r
 159         DW 10\r
 160 \r
 161 ;#endif\r
 162 \r
 163       END