git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_LPC1768_GCC_Rowley/main.c

   1 /*\r
   2     FreeRTOS V7.5.0 - Copyright (C) 2013 Real Time Engineers Ltd.\r
   3 \r
   4     VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
   5 \r
   6     ***************************************************************************\r
   7      *                                                                       *\r
   8      *    FreeRTOS provides completely free yet professionally developed,    *\r
   9      *    robust, strictly quality controlled, supported, and cross          *\r
  10      *    platform software that has become a de facto standard.             *\r
  11      *                                                                       *\r
  12      *    Help yourself get started quickly and support the FreeRTOS         *\r
  13      *    project by purchasing a FreeRTOS tutorial book, reference          *\r
  14      *    manual, or both from: http://www.FreeRTOS.org/Documentation        *\r
  15      *                                                                       *\r
  16      *    Thank you!                                                         *\r
  17      *                                                                       *\r
  18     ***************************************************************************\r
  19 \r
  20     This file is part of the FreeRTOS distribution.\r
  21 \r
  22     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  23     the terms of the GNU General Public License (version 2) as published by the\r
  24     Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.\r
  25 \r
  26     >>! NOTE: The modification to the GPL is included to allow you to distribute\r
  27     >>! a combined work that includes FreeRTOS without being obliged to provide\r
  28     >>! the source code for proprietary components outside of the FreeRTOS\r
  29     >>! kernel.\r
  30 \r
  31     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  32     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  33     FOR A PARTICULAR PURPOSE.  Full license text is available from the following\r
  34     link: http://www.freertos.org/a00114.html\r
  35 \r
  36     1 tab == 4 spaces!\r
  37 \r
  38     ***************************************************************************\r
  39      *                                                                       *\r
  40      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  41      *    not run, what could be wrong?"                                     *\r
  42      *                                                                       *\r
  43      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  44      *                                                                       *\r
  45     ***************************************************************************\r
  46 \r
  47     http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
  48     license and Real Time Engineers Ltd. contact details.\r
  49 \r
  50     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  51     including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
  52     compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
  53 \r
  54     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
  55     Integrity Systems to sell under the OpenRTOS brand.  Low cost OpenRTOS\r
  56     licenses offer ticketed support, indemnification and middleware.\r
  57 \r
  58     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
  59     engineered and independently SIL3 certified version for use in safety and\r
  60     mission critical applications that require provable dependability.\r
  61 \r
  62     1 tab == 4 spaces!\r
  63 */\r
  64 \r
  65 \r
  66 /*\r
  67  * Creates all the demo application tasks, then starts the scheduler.  The WEB\r
  68  * documentation provides more details of the standard demo application tasks\r
  69  * (which just exist to test the kernel port and provide an example of how to use\r
  70  * each FreeRTOS API function).\r
  71  *\r
  72  * In addition to the standard demo tasks, the following tasks and tests are\r
  73  * defined and/or created within this file:\r
  74  *\r
  75  * "Check" hook -  This only executes fully every five seconds from the tick\r
  76  * hook.  Its main function is to check that all the standard demo tasks are\r
  77  * still operational.  The status can be viewed using on the Task Stats page\r
  78  * served by the WEB server.\r
  79  *\r
  80  * "uIP" task -  This is the task that handles the uIP stack.  All TCP/IP\r
  81  * processing is performed in this task.\r
  82  * \r
  83  * "USB" task - Enumerates the USB device as a CDC class, then echoes back all\r
  84  * received characters with a configurable offset (for example, if the offset\r
  85  * is 1 and 'A' is received then 'B' will be sent back).  A dumb terminal such\r
  86  * as Hyperterminal can be used to talk to the USB task.\r
  87  */\r
  88 \r
  89 /* Scheduler includes. */\r
  90 #include "FreeRTOS.h"\r
  91 #include "task.h"\r
  92 \r
  93 /* Demo app includes. */\r
  94 #include "BlockQ.h"\r
  95 #include "integer.h"\r
  96 #include "blocktim.h"\r
  97 #include "flash.h"\r
  98 #include "partest.h"\r
  99 #include "semtest.h"\r
 100 #include "PollQ.h"\r
 101 #include "GenQTest.h"\r
 102 #include "QPeek.h"\r
 103 #include "recmutex.h"\r
 104 \r
 105 /*-----------------------------------------------------------*/\r
 106 \r
 107 /* The time between cycles of the 'check' functionality (defined within the\r
 108 tick hook). */\r
 109 #define mainCHECK_DELAY                                         ( ( portTickType ) 5000 / portTICK_RATE_MS )\r
 110 \r
 111 /* Task priorities. */\r
 112 #define mainQUEUE_POLL_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
 113 #define mainSEM_TEST_PRIORITY                           ( tskIDLE_PRIORITY + 1 )\r
 114 #define mainBLOCK_Q_PRIORITY                            ( tskIDLE_PRIORITY + 2 )\r
 115 #define mainUIP_TASK_PRIORITY                           ( tskIDLE_PRIORITY + 3 )\r
 116 #define mainINTEGER_TASK_PRIORITY           ( tskIDLE_PRIORITY )\r
 117 #define mainGEN_QUEUE_TASK_PRIORITY                     ( tskIDLE_PRIORITY )\r
 118 #define mainFLASH_TASK_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
 119 \r
 120 /* The WEB server has a larger stack as it utilises stack hungry string\r
 121 handling library calls. */\r
 122 #define mainBASIC_WEB_STACK_SIZE            ( configMINIMAL_STACK_SIZE * 4 )\r
 123 \r
 124 /* The message displayed by the WEB server when all tasks are executing\r
 125 without an error being reported. */\r
 126 #define mainPASS_STATUS_MESSAGE                         "All tasks are executing without error."\r
 127 \r
 128 /*-----------------------------------------------------------*/\r
 129 \r
 130 /*\r
 131  * Configure the hardware for the demo.\r
 132  */\r
 133 static void prvSetupHardware( void );\r
 134 \r
 135 /*\r
 136  * The task that handles the uIP stack.  All TCP/IP processing is performed in\r
 137  * this task.\r
 138  */\r
 139 extern void vuIP_Task( void *pvParameters );\r
 140 \r
 141 /*\r
 142  * The task that handles the USB stack.\r
 143  */\r
 144 extern void vUSBTask( void *pvParameters );\r
 145 \r
 146 /*\r
 147  * Simply returns the current status message for display on served WEB pages.\r
 148  */\r
 149 char *pcGetTaskStatusMessage( void );\r
 150 \r
 151 /*-----------------------------------------------------------*/\r
 152 \r
 153 /* Holds the status message displayed by the WEB server. */\r
 154 static char *pcStatusMessage = mainPASS_STATUS_MESSAGE;\r
 155 \r
 156 /*-----------------------------------------------------------*/\r
 157 \r
 158 int main( void )\r
 159 {\r
 160         /* Configure the hardware for use by this demo. */\r
 161         prvSetupHardware();\r
 162 \r
 163         /* Start the standard demo tasks.  These are just here to exercise the\r
 164         kernel port and provide examples of how the FreeRTOS API can be used. */\r
 165         vStartBlockingQueueTasks( mainBLOCK_Q_PRIORITY );\r
 166     vCreateBlockTimeTasks();\r
 167     vStartSemaphoreTasks( mainSEM_TEST_PRIORITY );\r
 168     vStartPolledQueueTasks( mainQUEUE_POLL_PRIORITY );\r
 169     vStartIntegerMathTasks( mainINTEGER_TASK_PRIORITY );\r
 170     vStartGenericQueueTasks( mainGEN_QUEUE_TASK_PRIORITY );\r
 171     vStartQueuePeekTasks();\r
 172     vStartRecursiveMutexTasks();\r
 173         vStartLEDFlashTasks( mainFLASH_TASK_PRIORITY );\r
 174 \r
 175     /* Create the USB task. */\r
 176     xTaskCreate( vUSBTask, ( signed char * ) "USB", configMINIMAL_STACK_SIZE, ( void * ) NULL, tskIDLE_PRIORITY, NULL );\r
 177         \r
 178         /* Create the uIP task.  The WEB server runs in this task. */\r
 179     xTaskCreate( vuIP_Task, ( signed char * ) "uIP", mainBASIC_WEB_STACK_SIZE, ( void * ) NULL, mainUIP_TASK_PRIORITY, NULL );\r
 180 \r
 181     /* Start the scheduler. */\r
 182         vTaskStartScheduler();\r
 183 \r
 184     /* Will only get here if there was insufficient memory to create the idle\r
 185     task.  The idle task is created within vTaskStartScheduler(). */\r
 186         for( ;; );\r
 187 }\r
 188 /*-----------------------------------------------------------*/\r
 189 \r
 190 void vApplicationTickHook( void )\r
 191 {\r
 192 static unsigned long ulTicksSinceLastDisplay = 0;\r
 193 \r
 194         /* Called from every tick interrupt as described in the comments at the top\r
 195         of this file.\r
 196 \r
 197         Have enough ticks passed to make it     time to perform our health status\r
 198         check again? */\r
 199         ulTicksSinceLastDisplay++;\r
 200         if( ulTicksSinceLastDisplay >= mainCHECK_DELAY )\r
 201         {\r
 202                 /* Reset the counter so these checks run again in mainCHECK_DELAY\r
 203                 ticks time. */\r
 204                 ulTicksSinceLastDisplay = 0;\r
 205 \r
 206                 /* Has an error been found in any task? */\r
 207                 if( xAreGenericQueueTasksStillRunning() != pdTRUE )\r
 208                 {\r
 209                         pcStatusMessage = "An error has been detected in the Generic Queue test/demo.";\r
 210                 }\r
 211                 else if( xAreQueuePeekTasksStillRunning() != pdTRUE )\r
 212                 {\r
 213                         pcStatusMessage = "An error has been detected in the Peek Queue test/demo.";\r
 214                 }\r
 215                 else if( xAreBlockingQueuesStillRunning() != pdTRUE )\r
 216                 {\r
 217                         pcStatusMessage = "An error has been detected in the Block Queue test/demo.";\r
 218                 }\r
 219                 else if( xAreBlockTimeTestTasksStillRunning() != pdTRUE )\r
 220                 {\r
 221                         pcStatusMessage = "An error has been detected in the Block Time test/demo.";\r
 222                 }\r
 223             else if( xAreSemaphoreTasksStillRunning() != pdTRUE )\r
 224             {\r
 225                 pcStatusMessage = "An error has been detected in the Semaphore test/demo.";\r
 226             }\r
 227             else if( xArePollingQueuesStillRunning() != pdTRUE )\r
 228             {\r
 229                 pcStatusMessage = "An error has been detected in the Poll Queue test/demo.";\r
 230             }\r
 231             else if( xAreIntegerMathsTaskStillRunning() != pdTRUE )\r
 232             {\r
 233                 pcStatusMessage = "An error has been detected in the Int Math test/demo.";\r
 234             }\r
 235             else if( xAreRecursiveMutexTasksStillRunning() != pdTRUE )\r
 236             {\r
 237                 pcStatusMessage = "An error has been detected in the Mutex test/demo.";\r
 238             }\r
 239         }\r
 240 }\r
 241 /*-----------------------------------------------------------*/\r
 242 \r
 243 char *pcGetTaskStatusMessage( void )\r
 244 {\r
 245         /* Not bothered about a critical section here. */\r
 246         return pcStatusMessage;\r
 247 }\r
 248 /*-----------------------------------------------------------*/\r
 249 \r
 250 void prvSetupHardware( void )\r
 251 {\r
 252         /* Disable peripherals power. */\r
 253         SC->PCONP = 0;\r
 254 \r
 255         /* Enable GPIO power. */\r
 256         SC->PCONP = PCONP_PCGPIO;\r
 257 \r
 258         /* Disable TPIU. */\r
 259         PINCON->PINSEL10 = 0;\r
 260 \r
 261         /*  Setup the peripheral bus to be the same as the PLL output (64 MHz). */\r
 262         SC->PCLKSEL0 = 0x05555555;\r
 263 \r
 264         /* Configure the LEDs. */\r
 265         vParTestInitialise();\r
 266 }\r
 267 /*-----------------------------------------------------------*/\r
 268 \r
 269 void vApplicationStackOverflowHook( xTaskHandle pxTask, signed char *pcTaskName )\r
 270 {\r
 271         /* This function will get called if a task overflows its stack. */\r
 272 \r
 273         ( void ) pxTask;\r
 274         ( void ) pcTaskName;\r
 275 \r
 276         for( ;; );\r
 277 }\r
 278 /*-----------------------------------------------------------*/\r
 279 \r
 280 void vConfigureTimerForRunTimeStats( void )\r
 281 {\r
 282 const unsigned long TCR_COUNT_RESET = 2, CTCR_CTM_TIMER = 0x00, TCR_COUNT_ENABLE = 0x01;\r
 283 \r
 284         /* This function configures a timer that is used as the time base when\r
 285         collecting run time statistical information - basically the percentage\r
 286         of CPU time that each task is utilising.  It is called automatically when\r
 287         the scheduler is started (assuming configGENERATE_RUN_TIME_STATS is set\r
 288         to 1). */\r
 289 \r
 290         /* Power up and feed the timer. */\r
 291         SC->PCONP |= 0x02UL;\r
 292         SC->PCLKSEL0 = (SC->PCLKSEL0 & (~(0x3<<2))) | (0x01 << 2);\r
 293 \r
 294         /* Reset Timer 0 */\r
 295         TIM0->TCR = TCR_COUNT_RESET;\r
 296 \r
 297         /* Just count up. */\r
 298         TIM0->CTCR = CTCR_CTM_TIMER;\r
 299 \r
 300         /* Prescale to a frequency that is good enough to get a decent resolution,\r
 301         but not too fast so as to overflow all the time. */\r
 302         TIM0->PR =  ( configCPU_CLOCK_HZ / 10000UL ) - 1UL;\r
 303 \r
 304         /* Start the counter. */\r
 305         TIM0->TCR = TCR_COUNT_ENABLE;\r
 306 }\r
 307 /*-----------------------------------------------------------*/\r
 308 \r