/*\r
- FreeRTOS.org V5.0.3 - Copyright (C) 2003-2008 Richard Barry.\r
+ FreeRTOS V7.1.1 - Copyright (C) 2012 Real Time Engineers Ltd.\r
+ \r
\r
- This file is part of the FreeRTOS.org distribution.\r
-\r
- FreeRTOS.org is free software; you can redistribute it and/or modify\r
- it under the terms of the GNU General Public License as published by\r
- the Free Software Foundation; either version 2 of the License, or\r
- (at your option) any later version.\r
-\r
- FreeRTOS.org is distributed in the hope that it will be useful,\r
- but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
- GNU General Public License for more details.\r
-\r
- You should have received a copy of the GNU General Public License\r
- along with FreeRTOS.org; if not, write to the Free Software\r
- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA\r
-\r
- A special exception to the GPL can be applied should you wish to distribute\r
- a combined work that includes FreeRTOS.org, without being obliged to provide\r
- the source code for any proprietary components. See the licensing section\r
- of http://www.FreeRTOS.org for full details of how and when the exception\r
- can be applied.\r
-\r
- ***************************************************************************\r
***************************************************************************\r
- * *\r
- * SAVE TIME AND MONEY! We can port FreeRTOS.org to your own hardware, *\r
- * and even write all or part of your application on your behalf. *\r
- * See http://www.OpenRTOS.com for details of the services we provide to *\r
- * expedite your project. *\r
- * *\r
+ * *\r
+ * FreeRTOS tutorial books are available in pdf and paperback. *\r
+ * Complete, revised, and edited pdf reference manuals are also *\r
+ * available. *\r
+ * *\r
+ * Purchasing FreeRTOS documentation will not only help you, by *\r
+ * ensuring you get running as quickly as possible and with an *\r
+ * in-depth knowledge of how to use FreeRTOS, it will also help *\r
+ * the FreeRTOS project to continue with its mission of providing *\r
+ * professional grade, cross platform, de facto standard solutions *\r
+ * for microcontrollers - completely free of charge! *\r
+ * *\r
+ * >>> See http://www.FreeRTOS.org/Documentation for details. <<< *\r
+ * *\r
+ * Thank you for using FreeRTOS, and thank you for your support! *\r
+ * *\r
***************************************************************************\r
- ***************************************************************************\r
-\r
- Please ensure to read the configuration and relevant port sections of the\r
- online documentation.\r
\r
- http://www.FreeRTOS.org - Documentation, latest information, license and\r
- contact details.\r
\r
- http://www.SafeRTOS.com - A version that is certified for use in safety\r
- critical systems.\r
+ This file is part of the FreeRTOS distribution.\r
+\r
+ FreeRTOS is free software; you can redistribute it and/or modify it under\r
+ the terms of the GNU General Public License (version 2) as published by the\r
+ Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
+ >>>NOTE<<< The modification to the GPL is included to allow you to\r
+ distribute a combined work that includes FreeRTOS without being obliged to\r
+ provide the source code for proprietary components outside of the FreeRTOS\r
+ kernel. FreeRTOS is distributed in the hope that it will be useful, but\r
+ WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY\r
+ or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for\r
+ more details. You should have received a copy of the GNU General Public\r
+ License and the FreeRTOS license exception along with FreeRTOS; if not it\r
+ can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
+ by writing to Richard Barry, contact details for whom are available on the\r
+ FreeRTOS WEB site.\r
+\r
+ 1 tab == 4 spaces!\r
+ \r
+ ***************************************************************************\r
+ * *\r
+ * Having a problem? Start by reading the FAQ "My application does *\r
+ * not run, what could be wrong? *\r
+ * *\r
+ * http://www.FreeRTOS.org/FAQHelp.html *\r
+ * *\r
+ ***************************************************************************\r
\r
- http://www.OpenRTOS.com - Commercial support, development, porting,\r
- licensing and training services.\r
+ \r
+ http://www.FreeRTOS.org - Documentation, training, latest information, \r
+ license and contact details.\r
+ \r
+ http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
+ including FreeRTOS+Trace - an indispensable productivity tool.\r
+\r
+ Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell \r
+ the code with commercial support, indemnification, and middleware, under \r
+ the OpenRTOS brand: http://www.OpenRTOS.com. High Integrity Systems also\r
+ provide a safety engineered and independently SIL3 certified version under \r
+ the SafeRTOS brand: http://www.SafeRTOS.com.\r
*/\r
\r
/* Kernel includes. */\r
-\r
#include "FreeRTOS.h"\r
#include "task.h"\r
\r
/* Supervisor mode set. */\r
#define portINITIAL_STATUS_REGISTER ( ( portSTACK_TYPE ) 0x2000)\r
\r
-static unsigned portLONG ulCriticalNesting = 0x9999UL;\r
+/* Used to keep track of the number of nested calls to taskENTER_CRITICAL(). This\r
+will be set to 0 prior to the first task being started. */\r
+static unsigned long ulCriticalNesting = 0x9999UL;\r
\r
+/*-----------------------------------------------------------*/\r
\r
portSTACK_TYPE *pxPortInitialiseStack( portSTACK_TYPE * pxTopOfStack, pdTASK_CODE pxCode, void *pvParameters )\r
{\r
pxTopOfStack--;\r
\r
*pxTopOfStack = ( portSTACK_TYPE ) 0x0; /*FP*/\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA5A5A5A5;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA4A4A4A4;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA3A3A3A3;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA2A2A2A2;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA1A1A1A1;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xA0A0A0A0;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD7D7D7D7;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD6D6D6D6;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD5D5D5D5;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD4D4D4D4;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD3D3D3D3;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD2D2D2D2;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD1D1D1D1;\r
- pxTopOfStack--;\r
-\r
- *pxTopOfStack = ( portSTACK_TYPE ) 0xD0D0D0D0;\r
+ pxTopOfStack -= 14; /* A5 to D0. */\r
\r
return pxTopOfStack;\r
}\r
\r
ulCriticalNesting = 0UL;\r
\r
+ /* Configure the interrupts used by this port. */\r
vApplicationSetupInterrupts();\r
+\r
+ /* Start the first task executing. */\r
vPortStartFirstTask();\r
\r
return pdFALSE;\r
\r
void vPortEndScheduler( void )\r
{\r
+ /* Not implemented as there is nothing to return to. */\r
}\r
/*-----------------------------------------------------------*/\r
\r
void vPortEnterCritical( void )\r
{\r
- portDISABLE_INTERRUPTS();\r
+ if( ulCriticalNesting == 0UL )\r
+ {\r
+ /* Guard against context switches being pended simultaneously with a\r
+ critical section being entered. */\r
+ do\r
+ {\r
+ portDISABLE_INTERRUPTS();\r
+ if( MCF_INTC0_INTFRCL == 0UL )\r
+ {\r
+ break;\r
+ }\r
+\r
+ portENABLE_INTERRUPTS();\r
+\r
+ } while( 1 );\r
+ }\r
ulCriticalNesting++;\r
}\r
/*-----------------------------------------------------------*/\r
\r
void vPortYieldHandler( void )\r
{\r
-unsigned portLONG ulSavedInterruptMask;\r
-\r
- /* -32 as we are using the high word of the 64bit mask. */\r
- MCF_INTC0_INTFRCH &= ~( 1UL << ( configYIELD_INTERRUPT_VECTOR - 32UL ) );\r
+unsigned long ulSavedInterruptMask;\r
\r
ulSavedInterruptMask = portSET_INTERRUPT_MASK_FROM_ISR();\r
+ /* Note this will clear all forced interrupts - this is done for speed. */\r
+ MCF_INTC0_INTFRCL = 0;\r
vTaskSwitchContext();\r
portCLEAR_INTERRUPT_MASK_FROM_ISR( ulSavedInterruptMask );\r
}\r