]> git.sur5r.net Git - freertos/blob - Demo/CORTEX_LPC1768_GCC_Rowley/main.c
Prepare for release.
[freertos] / Demo / CORTEX_LPC1768_GCC_Rowley / main.c
1 /*\r
2         FreeRTOS.org V5.4.0 - Copyright (C) 2003-2009 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 it\r
7         under the terms of the GNU General Public License (version 2) as published\r
8         by the Free Software Foundation and modified by the FreeRTOS exception.\r
9         **NOTE** The exception to the GPL is included to allow you to distribute a\r
10         combined work that includes FreeRTOS.org without being obliged to provide\r
11         the source code for any proprietary components.  Alternative commercial\r
12         license and support terms are also available upon request.  See the\r
13         licensing section of http://www.FreeRTOS.org for full details.\r
14 \r
15         FreeRTOS.org is distributed in the hope that it will be useful, but WITHOUT\r
16         ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
17         FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
18         more details.\r
19 \r
20         You should have received a copy of the GNU General Public License along\r
21         with FreeRTOS.org; if not, write to the Free Software Foundation, Inc., 59\r
22         Temple Place, Suite 330, Boston, MA  02111-1307  USA.\r
23 \r
24 \r
25         ***************************************************************************\r
26         *                                                                         *\r
27         * Get the FreeRTOS eBook!  See http://www.FreeRTOS.org/Documentation      *\r
28         *                                                                         *\r
29         * This is a concise, step by step, 'hands on' guide that describes both   *\r
30         * general multitasking concepts and FreeRTOS specifics. It presents and   *\r
31         * explains numerous examples that are written using the FreeRTOS API.     *\r
32         * Full source code for all the examples is provided in an accompanying    *\r
33         * .zip file.                                                              *\r
34         *                                                                         *\r
35         ***************************************************************************\r
36 \r
37         1 tab == 4 spaces!\r
38 \r
39         Please ensure to read the configuration and relevant port sections of the\r
40         online documentation.\r
41 \r
42         http://www.FreeRTOS.org - Documentation, latest information, license and\r
43         contact details.\r
44 \r
45         http://www.SafeRTOS.com - A version that is certified for use in safety\r
46         critical systems.\r
47 \r
48         http://www.OpenRTOS.com - Commercial support, development, porting,\r
49         licensing and training services.\r
50 */\r
51 \r
52 \r
53 /*\r
54  * Creates all the demo application tasks, then starts the scheduler.  The WEB\r
55  * documentation provides more details of the standard demo application tasks\r
56  * (which just exist to test the kernel port and provide an example of how to use\r
57  * each FreeRTOS API function).\r
58  *\r
59  * In addition to the standard demo tasks, the following tasks and tests are\r
60  * defined and/or created within this file:\r
61  *\r
62  * "Check" hook -  This only executes fully every five seconds from the tick\r
63  * hook.  Its main function is to check that all the standard demo tasks are\r
64  * still operational.  The status can be viewed using on the Task Stats page\r
65  * served by the WEB server.\r
66  *\r
67  * "uIP" task -  This is the task that handles the uIP stack.  All TCP/IP\r
68  * processing is performed in this task.\r
69  */\r
70 \r
71 /* Scheduler includes. */\r
72 #include "FreeRTOS.h"\r
73 #include "task.h"\r
74 \r
75 /* Demo app includes. */\r
76 #include "BlockQ.h"\r
77 #include "integer.h"\r
78 #include "blocktim.h"\r
79 #include "flash.h"\r
80 #include "partest.h"\r
81 #include "semtest.h"\r
82 #include "PollQ.h"\r
83 #include "GenQTest.h"\r
84 #include "QPeek.h"\r
85 #include "recmutex.h"\r
86 \r
87 /*-----------------------------------------------------------*/\r
88 \r
89 /* The time between cycles of the 'check' functionality (defined within the\r
90 tick hook). */\r
91 #define mainCHECK_DELAY                                         ( ( portTickType ) 5000 / portTICK_RATE_MS )\r
92 \r
93 /* Task priorities. */\r
94 #define mainQUEUE_POLL_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
95 #define mainSEM_TEST_PRIORITY                           ( tskIDLE_PRIORITY + 1 )\r
96 #define mainBLOCK_Q_PRIORITY                            ( tskIDLE_PRIORITY + 2 )\r
97 #define mainUIP_TASK_PRIORITY                           ( tskIDLE_PRIORITY + 3 )\r
98 #define mainINTEGER_TASK_PRIORITY           ( tskIDLE_PRIORITY )\r
99 #define mainGEN_QUEUE_TASK_PRIORITY                     ( tskIDLE_PRIORITY )\r
100 #define mainFLASH_TASK_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
101 \r
102 /* The WEB server has a larger stack as it utilises stack hungry string\r
103 handling library calls. */\r
104 #define mainBASIC_WEB_STACK_SIZE            ( configMINIMAL_STACK_SIZE * 4 )\r
105 \r
106 /* The message displayed by the WEB server when all tasks are executing\r
107 without an error being reported. */\r
108 #define mainPASS_STATUS_MESSAGE                         "All tasks are executing without error."\r
109 \r
110 /*-----------------------------------------------------------*/\r
111 \r
112 /*\r
113  * Configure the hardware for the demo.\r
114  */\r
115 static void prvSetupHardware( void );\r
116 \r
117 /*\r
118  * The task that handles the uIP stack.  All TCP/IP processing is performed in\r
119  * this task.\r
120  */\r
121 extern void vuIP_Task( void *pvParameters );\r
122 \r
123 /*\r
124  * Simply returns the current status message for display on served WEB pages.\r
125  */\r
126 char *pcGetTaskStatusMessage( void );\r
127 \r
128 /*-----------------------------------------------------------*/\r
129 \r
130 /* Holds the status message displayed by the WEB server. */\r
131 static char *pcStatusMessage = mainPASS_STATUS_MESSAGE;\r
132 \r
133 /*-----------------------------------------------------------*/\r
134 \r
135 int main( void )\r
136 {\r
137         /* Configure the hardware for use by this demo. */\r
138         prvSetupHardware();\r
139 \r
140         /* Start the standard demo tasks.  These are just here to exercise the\r
141         kernel port and provide examples of how the FreeRTOS API can be used. */\r
142         vStartBlockingQueueTasks( mainBLOCK_Q_PRIORITY );\r
143     vCreateBlockTimeTasks();\r
144     vStartSemaphoreTasks( mainSEM_TEST_PRIORITY );\r
145     vStartPolledQueueTasks( mainQUEUE_POLL_PRIORITY );\r
146     vStartIntegerMathTasks( mainINTEGER_TASK_PRIORITY );\r
147     vStartGenericQueueTasks( mainGEN_QUEUE_TASK_PRIORITY );\r
148     vStartQueuePeekTasks();\r
149     vStartRecursiveMutexTasks();\r
150         vStartLEDFlashTasks( mainFLASH_TASK_PRIORITY );\r
151 \r
152         /* Create the uIP task.  The WEB server runs in this task. */\r
153     xTaskCreate( vuIP_Task, ( signed char * ) "uIP", mainBASIC_WEB_STACK_SIZE, ( void * ) NULL, mainUIP_TASK_PRIORITY, NULL );\r
154 \r
155     /* Start the scheduler. */\r
156         vTaskStartScheduler();\r
157 \r
158     /* Will only get here if there was insufficient memory to create the idle\r
159     task.  The idle task is created within vTaskStartScheduler(). */\r
160         for( ;; );\r
161 }\r
162 /*-----------------------------------------------------------*/\r
163 \r
164 void vApplicationTickHook( void )\r
165 {\r
166 static unsigned portLONG ulTicksSinceLastDisplay = 0;\r
167 \r
168         /* Called from every tick interrupt as described in the comments at the top\r
169         of this file.\r
170 \r
171         Have enough ticks passed to make it     time to perform our health status\r
172         check again? */\r
173         ulTicksSinceLastDisplay++;\r
174         if( ulTicksSinceLastDisplay >= mainCHECK_DELAY )\r
175         {\r
176                 /* Reset the counter so these checks run again in mainCHECK_DELAY\r
177                 ticks time. */\r
178                 ulTicksSinceLastDisplay = 0;\r
179 \r
180                 /* Has an error been found in any task? */\r
181                 if( xAreGenericQueueTasksStillRunning() != pdTRUE )\r
182                 {\r
183                         pcStatusMessage = "An error has been detected in the Generic Queue test/demo.";\r
184                 }\r
185                 else if( xAreQueuePeekTasksStillRunning() != pdTRUE )\r
186                 {\r
187                         pcStatusMessage = "An error has been detected in the Peek Queue test/demo.";\r
188                 }\r
189                 else if( xAreBlockingQueuesStillRunning() != pdTRUE )\r
190                 {\r
191                         pcStatusMessage = "An error has been detected in the Block Queue test/demo.";\r
192                 }\r
193                 else if( xAreBlockTimeTestTasksStillRunning() != pdTRUE )\r
194                 {\r
195                         pcStatusMessage = "An error has been detected in the Block Time test/demo.";\r
196                 }\r
197             else if( xAreSemaphoreTasksStillRunning() != pdTRUE )\r
198             {\r
199                 pcStatusMessage = "An error has been detected in the Semaphore test/demo.";\r
200             }\r
201             else if( xArePollingQueuesStillRunning() != pdTRUE )\r
202             {\r
203                 pcStatusMessage = "An error has been detected in the Poll Queue test/demo.";\r
204             }\r
205             else if( xAreIntegerMathsTaskStillRunning() != pdTRUE )\r
206             {\r
207                 pcStatusMessage = "An error has been detected in the Int Math test/demo.";\r
208             }\r
209             else if( xAreRecursiveMutexTasksStillRunning() != pdTRUE )\r
210             {\r
211                 pcStatusMessage = "An error has been detected in the Mutex test/demo.";\r
212             }\r
213         }\r
214 }\r
215 /*-----------------------------------------------------------*/\r
216 \r
217 char *pcGetTaskStatusMessage( void )\r
218 {\r
219         /* Not bothered about a critical section here. */\r
220         return pcStatusMessage;\r
221 }\r
222 /*-----------------------------------------------------------*/\r
223 \r
224 void prvSetupHardware( void )\r
225 {\r
226         /* Disable peripherals power. */\r
227         SC->PCONP = 0;\r
228 \r
229         /* Enable GPIO power. */\r
230         SC->PCONP = PCONP_PCGPIO;\r
231 \r
232         /* Disable TPIU. */\r
233         PINCON->PINSEL10 = 0;\r
234 \r
235         /* Disconnect the main PLL. */\r
236         SC->PLL0CON &= ~PLLCON_PLLC;\r
237         SC->PLL0FEED = PLLFEED_FEED1;\r
238         SC->PLL0FEED = PLLFEED_FEED2;\r
239         while ((SC->PLL0STAT & PLLSTAT_PLLC) != 0);\r
240 \r
241         /* Turn off the main PLL. */\r
242         SC->PLL0CON &= ~PLLCON_PLLE;\r
243         SC->PLL0FEED = PLLFEED_FEED1;\r
244         SC->PLL0FEED = PLLFEED_FEED2;\r
245         while ((SC->PLL0STAT & PLLSTAT_PLLE) != 0);\r
246 \r
247         /* No CPU clock divider. */\r
248         SC->CCLKCFG = 0;\r
249 \r
250         /* OSCEN. */\r
251         SC->SCS = 0x20;\r
252         while ((SC->SCS & 0x40) == 0);\r
253 \r
254         /* Use main oscillator. */\r
255         SC->CLKSRCSEL = 1;\r
256         SC->PLL0CFG = (PLLCFG_MUL16 | PLLCFG_DIV1);\r
257 \r
258         SC->PLL0FEED = PLLFEED_FEED1;\r
259         SC->PLL0FEED = PLLFEED_FEED2;\r
260 \r
261         /*  Activate the PLL by turning it on then feeding the correct\r
262         sequence of bytes. */\r
263         SC->PLL0CON  = PLLCON_PLLE;\r
264         SC->PLL0FEED = PLLFEED_FEED1;\r
265         SC->PLL0FEED = PLLFEED_FEED2;\r
266 \r
267         /* 6x CPU clock divider (64 MHz) */\r
268         SC->CCLKCFG = 5;\r
269 \r
270         /*  Wait for the PLL to lock. */\r
271         while ((SC->PLL0STAT & PLLSTAT_PLOCK) == 0);\r
272 \r
273         /*  Connect the PLL. */\r
274         SC->PLL0CON  = PLLCON_PLLC | PLLCON_PLLE;\r
275         SC->PLL0FEED = PLLFEED_FEED1;\r
276         SC->PLL0FEED = PLLFEED_FEED2;\r
277 \r
278         /*  Setup the peripheral bus to be the same as the PLL output (64 MHz). */\r
279         SC->PCLKSEL0 = 0x05555555;\r
280 \r
281         /* Configure the LEDs. */\r
282         vParTestInitialise();\r
283 }\r
284 /*-----------------------------------------------------------*/\r
285 \r
286 void vApplicationStackOverflowHook( xTaskHandle *pxTask, signed portCHAR *pcTaskName )\r
287 {\r
288         /* This function will get called if a task overflows its stack. */\r
289 \r
290         ( void ) pxTask;\r
291         ( void ) pcTaskName;\r
292 \r
293         for( ;; );\r
294 }\r
295 /*-----------------------------------------------------------*/\r
296 \r
297 void vConfigureTimerForRunTimeStats( void )\r
298 {\r
299 const unsigned long TCR_COUNT_RESET = 2, CTCR_CTM_TIMER = 0x00, TCR_COUNT_ENABLE = 0x01;\r
300 \r
301         /* This function configures a timer that is used as the time base when\r
302         collecting run time statistical information - basically the percentage\r
303         of CPU time that each task is utilising.  It is called automatically when\r
304         the scheduler is started (assuming configGENERATE_RUN_TIME_STATS is set\r
305         to 1). */\r
306 \r
307         /* Power up and feed the timer. */\r
308         SC->PCONP |= 0x02UL;\r
309         SC->PCLKSEL0 = (SC->PCLKSEL0 & (~(0x3<<2))) | (0x01 << 2);\r
310 \r
311         /* Reset Timer 0 */\r
312         TIM0->TCR = TCR_COUNT_RESET;\r
313 \r
314         /* Just count up. */\r
315         TIM0->CTCR = CTCR_CTM_TIMER;\r
316 \r
317         /* Prescale to a frequency that is good enough to get a decent resolution,\r
318         but not too fast so as to overflow all the time. */\r
319         TIM0->PR =  ( configCPU_CLOCK_HZ / 10000UL ) - 1UL;\r
320 \r
321         /* Start the counter. */\r
322         TIM0->TCR = TCR_COUNT_ENABLE;\r
323 }\r
324 /*-----------------------------------------------------------*/\r
325 \r