git.sur5r.net Git - freertos/blob - Source/portable/IAR/STR75x/port.c

   1 /*\r
   2         FreeRTOS.org V4.1.2 - Copyright (C) 2003-2006 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 /*-----------------------------------------------------------\r
  34  * Implementation of functions defined in portable.h for the ST STR75x ARM7\r
  35  * port.\r
  36  *----------------------------------------------------------*/\r
  37 \r
  38 /* Library includes. */\r
  39 #include "75x_tb.h"\r
  40 #include "75x_eic.h"\r
  41 \r
  42 /* Scheduler includes. */\r
  43 #include "FreeRTOS.h"\r
  44 #include "task.h"\r
  45 \r
  46 /* Constants required to setup the initial stack. */\r
  47 #define portINITIAL_SPSR                                ( ( portSTACK_TYPE ) 0x3f ) /* System mode, THUMB mode, interrupts enabled. */\r
  48 #define portINSTRUCTION_SIZE                    ( ( portSTACK_TYPE ) 4 )\r
  49 \r
  50 /* Constants required to handle critical sections. */\r
  51 #define portNO_CRITICAL_NESTING                 ( ( unsigned portLONG ) 0 )\r
  52 \r
  53 /* Prescale used on the timer clock when calculating the tick period. */\r
  54 #define portPRESCALE 20\r
  55 \r
  56 \r
  57 /*-----------------------------------------------------------*/\r
  58 \r
  59 /* Setup the TB to generate the tick interrupts. */\r
  60 static void prvSetupTimerInterrupt( void );\r
  61 \r
  62 /* ulCriticalNesting will get set to zero when the first task starts.  It\r
  63 cannot be initialised to 0 as this will cause interrupts to be enabled\r
  64 during the kernel initialisation process. */\r
  65 unsigned portLONG ulCriticalNesting = ( unsigned portLONG ) 9999;\r
  66 \r
  67 /* Tick interrupt routines for preemptive operation. */\r
  68 __arm void vPortPreemptiveTick( void );\r
  69 \r
  70 /*-----------------------------------------------------------*/\r
  71 \r
  72 /*\r
  73  * Initialise the stack of a task to look exactly as if a call to\r
  74  * portSAVE_CONTEXT had been called.\r
  75  *\r
  76  * See header file for description.\r
  77  */\r
  78 portSTACK_TYPE *pxPortInitialiseStack( portSTACK_TYPE *pxTopOfStack, pdTASK_CODE pxCode, void *pvParameters )\r
  79 {\r
  80 portSTACK_TYPE *pxOriginalTOS;\r
  81 \r
  82         pxOriginalTOS = pxTopOfStack;\r
  83 \r
  84         /* Setup the initial stack of the task.  The stack is set exactly as\r
  85         expected by the portRESTORE_CONTEXT() macro. */\r
  86 \r
  87         /* First on the stack is the return address - which in this case is the\r
  88         start of the task.  The offset is added to make the return address appear\r
  89         as it would within an IRQ ISR. */\r
  90         *pxTopOfStack = ( portSTACK_TYPE ) pxCode + portINSTRUCTION_SIZE;               \r
  91         pxTopOfStack--;\r
  92 \r
  93         *pxTopOfStack = ( portSTACK_TYPE ) 0xaaaaaaaa;  /* R14 */\r
  94         pxTopOfStack--; \r
  95         *pxTopOfStack = ( portSTACK_TYPE ) pxOriginalTOS; /* Stack used when task starts goes in R13. */\r
  96         pxTopOfStack--;\r
  97         *pxTopOfStack = ( portSTACK_TYPE ) 0x12121212;  /* R12 */\r
  98         pxTopOfStack--; \r
  99         *pxTopOfStack = ( portSTACK_TYPE ) 0x11111111;  /* R11 */\r
 100         pxTopOfStack--; \r
 101         *pxTopOfStack = ( portSTACK_TYPE ) 0x10101010;  /* R10 */\r
 102         pxTopOfStack--; \r
 103         *pxTopOfStack = ( portSTACK_TYPE ) 0x09090909;  /* R9 */\r
 104         pxTopOfStack--; \r
 105         *pxTopOfStack = ( portSTACK_TYPE ) 0x08080808;  /* R8 */\r
 106         pxTopOfStack--; \r
 107         *pxTopOfStack = ( portSTACK_TYPE ) 0x07070707;  /* R7 */\r
 108         pxTopOfStack--; \r
 109         *pxTopOfStack = ( portSTACK_TYPE ) 0x06060606;  /* R6 */\r
 110         pxTopOfStack--; \r
 111         *pxTopOfStack = ( portSTACK_TYPE ) 0x05050505;  /* R5 */\r
 112         pxTopOfStack--; \r
 113         *pxTopOfStack = ( portSTACK_TYPE ) 0x04040404;  /* R4 */\r
 114         pxTopOfStack--; \r
 115         *pxTopOfStack = ( portSTACK_TYPE ) 0x03030303;  /* R3 */\r
 116         pxTopOfStack--; \r
 117         *pxTopOfStack = ( portSTACK_TYPE ) 0x02020202;  /* R2 */\r
 118         pxTopOfStack--; \r
 119         *pxTopOfStack = ( portSTACK_TYPE ) 0x01010101;  /* R1 */\r
 120         pxTopOfStack--; \r
 121 \r
 122         /* When the task starts is will expect to find the function parameter in\r
 123         R0. */\r
 124         *pxTopOfStack = ( portSTACK_TYPE ) pvParameters; /* R0 */\r
 125         pxTopOfStack--;\r
 126 \r
 127         /* The status register is set for system mode, with interrupts enabled. */\r
 128         *pxTopOfStack = ( portSTACK_TYPE ) portINITIAL_SPSR;\r
 129         pxTopOfStack--;\r
 130 \r
 131         /* Interrupt flags cannot always be stored on the stack and will\r
 132         instead be stored in a variable, which is then saved as part of the\r
 133         tasks context. */\r
 134         *pxTopOfStack = portNO_CRITICAL_NESTING;\r
 135 \r
 136         return pxTopOfStack;    \r
 137 }\r
 138 /*-----------------------------------------------------------*/\r
 139 \r
 140 portBASE_TYPE xPortStartScheduler( void )\r
 141 {\r
 142 extern void vPortStartFirstTask( void );\r
 143 \r
 144         /* Start the timer that generates the tick ISR.  Interrupts are disabled\r
 145         here already. */\r
 146         prvSetupTimerInterrupt();\r
 147 \r
 148         /* Start the first task. */\r
 149         vPortStartFirstTask();  \r
 150 \r
 151         /* Should not get here! */\r
 152         return 0;\r
 153 }\r
 154 /*-----------------------------------------------------------*/\r
 155 \r
 156 void vPortEndScheduler( void )\r
 157 {\r
 158         /* It is unlikely that the ARM port will require this function as there\r
 159         is nothing to return to.  */\r
 160 }\r
 161 /*-----------------------------------------------------------*/\r
 162 \r
 163 __arm void vPortPreemptiveTick( void )\r
 164 {\r
 165         /* Increment the tick counter. */\r
 166         vTaskIncrementTick();\r
 167 \r
 168         /* The new tick value might unblock a task.  Ensure the highest task that\r
 169         is ready to execute is the task that will execute when the tick ISR\r
 170         exits. */\r
 171         #if configUSE_PREEMPTION == 1\r
 172                 vTaskSwitchContext();\r
 173         #endif\r
 174 \r
 175         TB_ClearITPendingBit( TB_IT_Update );\r
 176 }\r
 177 /*-----------------------------------------------------------*/\r
 178 \r
 179 static void prvSetupTimerInterrupt( void )\r
 180 {\r
 181 EIC_IRQInitTypeDef  EIC_IRQInitStructure;       \r
 182 TB_InitTypeDef      TB_InitStructure;\r
 183 \r
 184         /* Setup the EIC for the TB. */\r
 185         EIC_IRQInitStructure.EIC_IRQChannelCmd = ENABLE;\r
 186         EIC_IRQInitStructure.EIC_IRQChannel = TB_IRQChannel;\r
 187         EIC_IRQInitStructure.EIC_IRQChannelPriority = 1;\r
 188         EIC_IRQInit(&EIC_IRQInitStructure);\r
 189         \r
 190         /* Setup the TB for the generation of the tick interrupt. */\r
 191         TB_InitStructure.TB_Mode = TB_Mode_Timing;\r
 192         TB_InitStructure.TB_CounterMode = TB_CounterMode_Down;\r
 193         TB_InitStructure.TB_Prescaler = portPRESCALE;\r
 194         TB_InitStructure.TB_AutoReload = ( ( configCPU_CLOCK_HZ / ( portPRESCALE + 1 ) ) / configTICK_RATE_HZ ) + 1;\r
 195         TB_Init(&TB_InitStructure);\r
 196         \r
 197         /* Enable TB Update interrupt */\r
 198         TB_ITConfig(TB_IT_Update, ENABLE);\r
 199 \r
 200         /* Clear TB Update interrupt pending bit */\r
 201         TB_ClearITPendingBit(TB_IT_Update);\r
 202 \r
 203         /* Enable TB */\r
 204         TB_Cmd(ENABLE);\r
 205 }\r
 206 /*-----------------------------------------------------------*/\r
 207 \r
 208 __arm __interwork void vPortEnterCritical( void )\r
 209 {\r
 210         /* Disable interrupts first! */\r
 211         __disable_interrupt();\r
 212 \r
 213         /* Now interrupts are disabled ulCriticalNesting can be accessed\r
 214         directly.  Increment ulCriticalNesting to keep a count of how many times\r
 215         portENTER_CRITICAL() has been called. */\r
 216         ulCriticalNesting++;\r
 217 }\r
 218 /*-----------------------------------------------------------*/\r
 219 \r
 220 __arm __interwork void vPortExitCritical( void )\r
 221 {\r
 222         if( ulCriticalNesting > portNO_CRITICAL_NESTING )\r
 223         {\r
 224                 /* Decrement the nesting count as we are leaving a critical section. */\r
 225                 ulCriticalNesting--;\r
 226 \r
 227                 /* If the nesting level has reached zero then interrupts should be\r
 228                 re-enabled. */\r
 229                 if( ulCriticalNesting == portNO_CRITICAL_NESTING )\r
 230                 {\r
 231                         __enable_interrupt();\r
 232                 }\r
 233         }\r
 234 }\r
 235 /*-----------------------------------------------------------*/\r
 236 \r
 237 \r
 238 \r
 239 \r
 240 \r
 241 \r