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

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