git.sur5r.net Git - freertos/blob - Source/portable/GCC/HCS12/port.c

   1 /* \r
   2         FreeRTOS.org V4.1.1 - Copyright (C) 2003 - 2005 Richard Barry.\r
   3 \r
   4         This file is part of the FreeRTOS.org distribution.\r
   5 \r
   6         FreeRTOS.org is free software; you can redistribute it and/or modify\r
   7         it under the terms of the GNU General Public License as published by\r
   8         the Free Software Foundation; either version 2 of the License, or\r
   9         (at your option) any later version.\r
  10 \r
  11         FreeRTOS.org is distributed in the hope that it will be useful,\r
  12         but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14         GNU General Public License for more details.\r
  15 \r
  16         You should have received a copy of the GNU General Public License\r
  17         along with FreeRTOS.org; if not, write to the Free Software\r
  18         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
  19 \r
  20         A special exception to the GPL can be applied should you wish to distribute\r
  21         a combined work that includes FreeRTOS.org, without being obliged to provide\r
  22         the source code for any proprietary components.  See the licensing section \r
  23         of http://www.FreeRTOS.org for full details of how and when the exception\r
  24         can be applied.\r
  25 \r
  26         ***************************************************************************\r
  27         See http://www.FreeRTOS.org for documentation, latest information, license \r
  28         and contact details.  Please ensure to read the configuration and relevant \r
  29         port sections of the online documentation.\r
  30         ***************************************************************************\r
  31 */\r
  32 \r
  33 /* GCC/HCS12 port by Jefferson L Smith, 2005 */\r
  34 \r
  35 /* Scheduler includes. */\r
  36 #include "FreeRTOS.h"\r
  37 #include "task.h"\r
  38 \r
  39 /* Port includes */\r
  40 #include <sys/ports_def.h>\r
  41 \r
  42 /*-----------------------------------------------------------\r
  43  * Implementation of functions defined in portable.h for the HCS12 port.\r
  44  *----------------------------------------------------------*/\r
  45 \r
  46 \r
  47 /*\r
  48  * Configure a timer to generate the RTOS tick at the frequency specified \r
  49  * within FreeRTOSConfig.h.\r
  50  */\r
  51 static void prvSetupTimerInterrupt( void );\r
  52 \r
  53 /* NOTE: Interrupt service routines must be in non-banked memory - as does the\r
  54 scheduler startup function. */\r
  55 #define ATTR_NEAR       __attribute__((near))\r
  56 \r
  57 /* Manual context switch function.  This is the SWI ISR. */\r
  58 // __attribute__((interrupt))\r
  59 void ATTR_NEAR vPortYield( void );\r
  60 \r
  61 /* Tick context switch function.  This is the timer ISR. */\r
  62 // __attribute__((interrupt))\r
  63 void ATTR_NEAR vPortTickInterrupt( void );\r
  64 \r
  65 /* Function in non-banked memory which actually switches to first task. */\r
  66 portBASE_TYPE ATTR_NEAR xStartSchedulerNear( void );\r
  67 \r
  68 /* Calls to portENTER_CRITICAL() can be nested.  When they are nested the \r
  69 critical section should not be left (i.e. interrupts should not be re-enabled)\r
  70 until the nesting depth reaches 0.  This variable simply tracks the nesting \r
  71 depth.  Each task maintains it's own critical nesting depth variable so \r
  72 uxCriticalNesting is saved and restored from the task stack during a context\r
  73 switch. */\r
  74 volatile unsigned portBASE_TYPE uxCriticalNesting = 0x80;  // un-initialized\r
  75 \r
  76 /*-----------------------------------------------------------*/\r
  77 \r
  78 /* \r
  79  * See header file for description. \r
  80  */\r
  81 portSTACK_TYPE *pxPortInitialiseStack( portSTACK_TYPE *pxTopOfStack, pdTASK_CODE pxCode, void *pvParameters )\r
  82 {\r
  83 \r
  84 \r
  85         /* Setup the initial stack of the task.  The stack is set exactly as \r
  86         expected by the portRESTORE_CONTEXT() macro.  In this case the stack as\r
  87         expected by the HCS12 RTI instruction. */\r
  88 \r
  89 \r
  90         /* The address of the task function is placed in the stack byte at a time. */\r
  91         *pxTopOfStack   = ( portSTACK_TYPE ) *( ((portSTACK_TYPE *) (&pxCode) ) + 1 );\r
  92         *--pxTopOfStack = ( portSTACK_TYPE ) *( ((portSTACK_TYPE *) (&pxCode) ) + 0 );\r
  93 \r
  94         /* Next are all the registers that form part of the task context. */\r
  95 \r
  96         /* Y register */\r
  97         *--pxTopOfStack = ( portSTACK_TYPE ) 0xff;\r
  98         *--pxTopOfStack = ( portSTACK_TYPE ) 0xee;\r
  99 \r
 100         /* X register */\r
 101         *--pxTopOfStack = ( portSTACK_TYPE ) 0xdd;\r
 102         *--pxTopOfStack = ( portSTACK_TYPE ) 0xcc;\r
 103  \r
 104         /* A register contains parameter high byte. */\r
 105         *--pxTopOfStack = ( portSTACK_TYPE ) *( ((portSTACK_TYPE *) (&pvParameters) ) + 0 );\r
 106 \r
 107         /* B register contains parameter low byte. */\r
 108         *--pxTopOfStack = ( portSTACK_TYPE ) *( ((portSTACK_TYPE *) (&pvParameters) ) + 1 );\r
 109 \r
 110         /* CCR: Note that when the task starts interrupts will be enabled since\r
 111         "I" bit of CCR is cleared */\r
 112         *--pxTopOfStack = ( portSTACK_TYPE ) 0x80;              // keeps Stop disabled (MCU default)\r
 113         \r
 114         /* tmp softregs used by GCC. Values right now don't     matter. */\r
 115         __asm("\n\\r
 116                 movw _.frame, 2,-%0                                                     \n\\r
 117                 movw _.tmp, 2,-%0                                                       \n\\r
 118                 movw _.z, 2,-%0                                                         \n\\r
 119                 movw _.xy, 2,-%0                                                        \n\\r
 120                 ;movw _.d2, 2,-%0                                                       \n\\r
 121                 ;movw _.d1, 2,-%0                                                       \n\\r
 122         ": "=A"(pxTopOfStack) : "0"(pxTopOfStack) );\r
 123 \r
 124         #ifdef BANKED_MODEL\r
 125                 /* The page of the task. */\r
 126                 *--pxTopOfStack = 0x30;      // can only directly start in PPAGE 0x30\r
 127         #endif\r
 128         \r
 129         /* The critical nesting depth is initialised with 0 (meaning not in\r
 130         a critical section). */\r
 131         *--pxTopOfStack = ( portSTACK_TYPE ) 0x00;\r
 132 \r
 133 \r
 134         return pxTopOfStack;\r
 135 }\r
 136 /*-----------------------------------------------------------*/\r
 137 \r
 138 void vPortEndScheduler( void )\r
 139 {\r
 140         /* It is unlikely that the HCS12 port will get stopped. */\r
 141 }\r
 142 /*-----------------------------------------------------------*/\r
 143 \r
 144 static void prvSetupTimerInterrupt( void )\r
 145 {\r
 146         /* Enable hardware RTI timer */\r
 147         /* Ignores configTICK_RATE_HZ */\r
 148         RTICTL = 0x50;                  // 16 MHz xtal: 976.56 Hz, 1024mS \r
 149         CRGINT |= 0x80;                 // RTIE\r
 150 }\r
 151 /*-----------------------------------------------------------*/\r
 152 \r
 153 portBASE_TYPE xPortStartScheduler( void )\r
 154 {\r
 155         /* xPortStartScheduler() does not start the scheduler directly because \r
 156         the header file containing the xPortStartScheduler() prototype is part \r
 157         of the common kernel code, and therefore cannot use the CODE_SEG pragma. \r
 158         Instead it simply calls the locally defined xNearStartScheduler() - \r
 159         which does use the CODE_SEG pragma. */\r
 160 \r
 161         short register d;\r
 162         __asm ("jmp  xStartSchedulerNear                ; will never return": "=d"(d));\r
 163         return d;\r
 164 }\r
 165 /*-----------------------------------------------------------*/\r
 166 \r
 167 portBASE_TYPE xStartSchedulerNear( void )\r
 168 {\r
 169         /* Configure the timer that will generate the RTOS tick.  Interrupts are\r
 170         disabled when this function is called. */\r
 171         prvSetupTimerInterrupt();\r
 172 \r
 173         /* Restore the context of the first task. */\r
 174         portRESTORE_CONTEXT();\r
 175 \r
 176         portISR_TAIL();\r
 177 \r
 178         /* Should not get here! */\r
 179         return pdFALSE;\r
 180 }\r
 181 /*-----------------------------------------------------------*/\r
 182 \r
 183 /*\r
 184  * Context switch functions.  These are interrupt service routines.\r
 185  */\r
 186 \r
 187 /*\r
 188  * Manual context switch forced by calling portYIELD().  This is the SWI\r
 189  * handler.\r
 190  */\r
 191 void vPortYield( void )\r
 192 {\r
 193         portISR_HEAD();\r
 194         /* NOTE: This is the trap routine (swi) although not defined as a trap.\r
 195            It will fill the stack the same way as an ISR in order to mix preemtion\r
 196            and cooperative yield. */\r
 197 \r
 198         portSAVE_CONTEXT();\r
 199         vTaskSwitchContext();\r
 200         portRESTORE_CONTEXT();\r
 201 \r
 202         portISR_TAIL();\r
 203 }\r
 204 /*-----------------------------------------------------------*/\r
 205 \r
 206 /*\r
 207  * RTOS tick interrupt service routine.  If the cooperative scheduler is \r
 208  * being used then this simply increments the tick count.  If the \r
 209  * preemptive scheduler is being used a context switch can occur.\r
 210  */\r
 211 void vPortTickInterrupt( void )\r
 212 {\r
 213         portISR_HEAD();\r
 214 \r
 215         /* Clear tick timer flag */\r
 216         CRGFLG = 0x80;\r
 217 \r
 218         #if configUSE_PREEMPTION == 1\r
 219         {\r
 220                 /* A context switch might happen so save the context. */\r
 221                 portSAVE_CONTEXT();\r
 222 \r
 223                 /* Increment the tick ... */\r
 224                 vTaskIncrementTick();\r
 225 \r
 226                 /* ... then see if the new tick value has necessitated a\r
 227                 context switch. */\r
 228                 vTaskSwitchContext();\r
 229 \r
 230                 /* Restore the context of a task - which may be a different task\r
 231                 to that interrupted. */\r
 232                 portRESTORE_CONTEXT();\r
 233         }\r
 234         #else\r
 235         {\r
 236                 vTaskIncrementTick();\r
 237         }\r
 238         #endif\r
 239 \r
 240         portISR_TAIL();\r
 241 }\r
 242 \r