]> git.sur5r.net Git - freertos/blob - Source/portable/GCC/ColdFire_V2/port.c
Use the low force register.
[freertos] / Source / portable / GCC / ColdFire_V2 / port.c
1 /*\r
2         FreeRTOS.org V5.0.4 - Copyright (C) 2003-2008 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     ***************************************************************************\r
28     *                                                                         *\r
29     * SAVE TIME AND MONEY!  We can port FreeRTOS.org to your own hardware,    *\r
30     * and even write all or part of your application on your behalf.          *\r
31     * See http://www.OpenRTOS.com for details of the services we provide to   *\r
32     * expedite your project.                                                  *\r
33     *                                                                         *\r
34     ***************************************************************************\r
35     ***************************************************************************\r
36 \r
37         Please ensure to read the configuration and relevant port sections of the\r
38         online documentation.\r
39 \r
40         http://www.FreeRTOS.org - Documentation, latest information, license and\r
41         contact details.\r
42 \r
43         http://www.SafeRTOS.com - A version that is certified for use in safety\r
44         critical systems.\r
45 \r
46         http://www.OpenRTOS.com - Commercial support, development, porting,\r
47         licensing and training services.\r
48 */\r
49 \r
50 /* Kernel includes. */\r
51 #include "FreeRTOS.h"\r
52 #include "task.h"\r
53 \r
54 #define portINITIAL_FORMAT_VECTOR               ( ( portSTACK_TYPE ) 0x4000 )\r
55 \r
56 /* Supervisor mode set. */\r
57 #define portINITIAL_STATUS_REGISTER             ( ( portSTACK_TYPE ) 0x2000)\r
58 \r
59 /* Used to keep track of the number of nested calls to taskENTER_CRITICAL().  This\r
60 will be set to 0 prior to the first task being started. */\r
61 static unsigned portLONG ulCriticalNesting = 0x9999UL;\r
62 \r
63 /*-----------------------------------------------------------*/\r
64 \r
65 portSTACK_TYPE *pxPortInitialiseStack( portSTACK_TYPE * pxTopOfStack, pdTASK_CODE pxCode, void *pvParameters )\r
66 {\r
67         *pxTopOfStack = ( portSTACK_TYPE ) pvParameters;\r
68         pxTopOfStack--;\r
69 \r
70         *pxTopOfStack = (portSTACK_TYPE) 0xDEADBEEF;\r
71         pxTopOfStack--;\r
72 \r
73         /* Exception stack frame starts with the return address. */\r
74         *pxTopOfStack = ( portSTACK_TYPE ) pxCode;\r
75         pxTopOfStack--;\r
76 \r
77         *pxTopOfStack = ( portINITIAL_FORMAT_VECTOR << 16UL ) | ( portINITIAL_STATUS_REGISTER );\r
78         pxTopOfStack--;\r
79 \r
80         *pxTopOfStack = ( portSTACK_TYPE ) 0x0; /*FP*/\r
81         pxTopOfStack -= 14; /* A5 to D0. */\r
82 \r
83     return pxTopOfStack;\r
84 }\r
85 /*-----------------------------------------------------------*/\r
86 \r
87 portBASE_TYPE xPortStartScheduler( void )\r
88 {\r
89 extern void vPortStartFirstTask( void );\r
90 \r
91         ulCriticalNesting = 0UL;\r
92 \r
93         /* Configure the interrupts used by this port. */\r
94         vApplicationSetupInterrupts();\r
95 \r
96         /* Start the first task executing. */\r
97         vPortStartFirstTask();\r
98 \r
99         return pdFALSE;\r
100 }\r
101 /*-----------------------------------------------------------*/\r
102 \r
103 void vPortEndScheduler( void )\r
104 {\r
105         /* Not implemented as there is nothing to return to. */\r
106 }\r
107 /*-----------------------------------------------------------*/\r
108 \r
109 void vPortEnterCritical( void )\r
110 {\r
111         if( ulCriticalNesting == 0UL )\r
112         {\r
113                 /* Guard against context switches being pended simultaneously with a\r
114                 critical section being entered. */\r
115                 do\r
116                 {\r
117                         portDISABLE_INTERRUPTS();\r
118                         if( MCF_INTC0_INTFRCL == 0UL )\r
119                         {\r
120                                 break;\r
121                         }\r
122 \r
123                         portENABLE_INTERRUPTS();\r
124 \r
125                 } while( 1 );\r
126         }\r
127         ulCriticalNesting++;\r
128 }\r
129 /*-----------------------------------------------------------*/\r
130 \r
131 void vPortExitCritical( void )\r
132 {\r
133         ulCriticalNesting--;\r
134         if( ulCriticalNesting == 0 )\r
135         {\r
136                 portENABLE_INTERRUPTS();\r
137         }\r
138 }\r
139 /*-----------------------------------------------------------*/\r
140 \r
141 void vPortYieldHandler( void )\r
142 {\r
143 unsigned portLONG ulSavedInterruptMask;\r
144 \r
145         ulSavedInterruptMask = portSET_INTERRUPT_MASK_FROM_ISR();\r
146                 /* Note this will clear all forced interrupts - this is done for speed. */\r
147                 MCF_INTC0_INTFRCL = 0;\r
148                 vTaskSwitchContext();\r
149         portCLEAR_INTERRUPT_MASK_FROM_ISR( ulSavedInterruptMask );\r
150 }\r
151 \r
152 \r
153 \r
154 \r
155 \r
156 \r