git.sur5r.net Git - freertos/blob - Demo/CORTEX_LPC1768_GCC_RedSuite/src/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 /* Standard includes. */\r
  72 #include "stdio.h"\r
  73 \r
  74 /* Scheduler includes. */\r
  75 #include "FreeRTOS.h"\r
  76 #include "task.h"\r
  77 \r
  78 /* Demo app includes. */\r
  79 #include "BlockQ.h"\r
  80 #include "integer.h"\r
  81 #include "blocktim.h"\r
  82 #include "flash.h"\r
  83 #include "partest.h"\r
  84 #include "semtest.h"\r
  85 #include "PollQ.h"\r
  86 #include "GenQTest.h"\r
  87 #include "QPeek.h"\r
  88 #include "recmutex.h"\r
  89 \r
  90 /* Red Suite includes. */\r
  91 #include "lcd_driver.h"\r
  92 #include "lcd.h"\r
  93 \r
  94 /*-----------------------------------------------------------*/\r
  95 \r
  96 /* The time between cycles of the 'check' functionality (defined within the\r
  97 tick hook. */\r
  98 #define mainCHECK_DELAY                                         ( ( portTickType ) 5000 / portTICK_RATE_MS )\r
  99 \r
 100 /* Task priorities. */\r
 101 #define mainQUEUE_POLL_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
 102 #define mainSEM_TEST_PRIORITY                           ( tskIDLE_PRIORITY + 1 )\r
 103 #define mainBLOCK_Q_PRIORITY                            ( tskIDLE_PRIORITY + 2 )\r
 104 #define mainUIP_TASK_PRIORITY                           ( tskIDLE_PRIORITY + 3 )\r
 105 #define mainINTEGER_TASK_PRIORITY           ( tskIDLE_PRIORITY )\r
 106 #define mainGEN_QUEUE_TASK_PRIORITY                     ( tskIDLE_PRIORITY )\r
 107 #define mainFLASH_TASK_PRIORITY                         ( tskIDLE_PRIORITY + 2 )\r
 108 \r
 109 /* The WEB server has a larger stack as it utilises stack hungry string\r
 110 handling library calls. */\r
 111 #define mainBASIC_WEB_STACK_SIZE            ( configMINIMAL_STACK_SIZE * 4 )\r
 112 \r
 113 /* The message displayed by the WEB server when all tasks are executing\r
 114 without an error being reported. */\r
 115 #define mainPASS_STATUS_MESSAGE                         "All tasks are executing without error."\r
 116 \r
 117 /*-----------------------------------------------------------*/\r
 118 \r
 119 /*\r
 120  * Configure the hardware for the demo.\r
 121  */\r
 122 static void prvSetupHardware( void );\r
 123 \r
 124 /*\r
 125  * The task that handles the uIP stack.  All TCP/IP processing is performed in\r
 126  * this task.\r
 127  */\r
 128 extern void vuIP_Task( void *pvParameters );\r
 129 \r
 130 /*\r
 131  * Simply returns the current status message for display on served WEB pages.\r
 132  */\r
 133 char *pcGetTaskStatusMessage( void );\r
 134 \r
 135 /*-----------------------------------------------------------*/\r
 136 \r
 137 /* Holds the status message displayed by the WEB server. */\r
 138 static char *pcStatusMessage = mainPASS_STATUS_MESSAGE;\r
 139 \r
 140 /*-----------------------------------------------------------*/\r
 141 \r
 142 int main( void )\r
 143 {\r
 144 char cIPAddress[ 16 ]; /* Enough space for "xxx.xxx.xxx.xxx\0". */\r
 145 \r
 146         /* Configure the hardware for use by this demo. */\r
 147         prvSetupHardware();\r
 148 \r
 149         /* Start the standard demo tasks.  These are just here to exercise the\r
 150         kernel port and provide examples of how the FreeRTOS API can be used. */\r
 151         vStartBlockingQueueTasks( mainBLOCK_Q_PRIORITY );\r
 152     vCreateBlockTimeTasks();\r
 153     vStartSemaphoreTasks( mainSEM_TEST_PRIORITY );\r
 154     vStartPolledQueueTasks( mainQUEUE_POLL_PRIORITY );\r
 155     vStartIntegerMathTasks( mainINTEGER_TASK_PRIORITY );\r
 156     vStartGenericQueueTasks( mainGEN_QUEUE_TASK_PRIORITY );\r
 157     vStartQueuePeekTasks();\r
 158     vStartRecursiveMutexTasks();\r
 159         vStartLEDFlashTasks( mainFLASH_TASK_PRIORITY );\r
 160 \r
 161         /* Display the IP address, then create the uIP task.  The WEB server runs \r
 162         in this task. */\r
 163         LCDdriver_initialisation();\r
 164         LCD_PrintString( 5, 10, "FreeRTOS.org", 14, COLOR_GREEN);\r
 165         sprintf( cIPAddress, "%d.%d.%d.%d", configIP_ADDR0, configIP_ADDR1, configIP_ADDR2, configIP_ADDR3 );\r
 166         LCD_PrintString( 5, 30, cIPAddress, 14, COLOR_RED);\r
 167     xTaskCreate( vuIP_Task, ( signed char * ) "uIP", mainBASIC_WEB_STACK_SIZE, ( void * ) NULL, mainUIP_TASK_PRIORITY, NULL );\r
 168 \r
 169     /* Start the scheduler. */\r
 170         vTaskStartScheduler();\r
 171 \r
 172     /* Will only get here if there was insufficient memory to create the idle\r
 173     task.  The idle task is created within vTaskStartScheduler(). */\r
 174         for( ;; );\r
 175 }\r
 176 /*-----------------------------------------------------------*/\r
 177 \r
 178 void vApplicationTickHook( void )\r
 179 {\r
 180 static unsigned portLONG ulTicksSinceLastDisplay = 0;\r
 181 \r
 182         /* Called from every tick interrupt as described in the comments at the top\r
 183         of this file.\r
 184 \r
 185         Have enough ticks passed to make it     time to perform our health status\r
 186         check again? */\r
 187         ulTicksSinceLastDisplay++;\r
 188         if( ulTicksSinceLastDisplay >= mainCHECK_DELAY )\r
 189         {\r
 190                 /* Reset the counter so these checks run again in mainCHECK_DELAY\r
 191                 ticks time. */\r
 192                 ulTicksSinceLastDisplay = 0;\r
 193 \r
 194                 /* Has an error been found in any task? */\r
 195                 if( xAreGenericQueueTasksStillRunning() != pdTRUE )\r
 196                 {\r
 197                         pcStatusMessage = "An error has been detected in the Generic Queue test/demo.";\r
 198                 }\r
 199                 else if( xAreQueuePeekTasksStillRunning() != pdTRUE )\r
 200                 {\r
 201                         pcStatusMessage = "An error has been detected in the Peek Queue test/demo.";\r
 202                 }\r
 203                 else if( xAreBlockingQueuesStillRunning() != pdTRUE )\r
 204                 {\r
 205                         pcStatusMessage = "An error has been detected in the Block Queue test/demo.";\r
 206                 }\r
 207                 else if( xAreBlockTimeTestTasksStillRunning() != pdTRUE )\r
 208                 {\r
 209                         pcStatusMessage = "An error has been detected in the Block Time test/demo.";\r
 210                 }\r
 211             else if( xAreSemaphoreTasksStillRunning() != pdTRUE )\r
 212             {\r
 213                 pcStatusMessage = "An error has been detected in the Semaphore test/demo.";\r
 214             }\r
 215             else if( xArePollingQueuesStillRunning() != pdTRUE )\r
 216             {\r
 217                 pcStatusMessage = "An error has been detected in the Poll Queue test/demo.";\r
 218             }\r
 219             else if( xAreIntegerMathsTaskStillRunning() != pdTRUE )\r
 220             {\r
 221                 pcStatusMessage = "An error has been detected in the Int Math test/demo.";\r
 222             }\r
 223             else if( xAreRecursiveMutexTasksStillRunning() != pdTRUE )\r
 224             {\r
 225                 pcStatusMessage = "An error has been detected in the Mutex test/demo.";\r
 226             }\r
 227         }\r
 228 }\r
 229 /*-----------------------------------------------------------*/\r
 230 \r
 231 char *pcGetTaskStatusMessage( void )\r
 232 {\r
 233         /* Not bothered about a critical section here. */\r
 234         return pcStatusMessage;\r
 235 }\r
 236 /*-----------------------------------------------------------*/\r
 237 \r
 238 void prvSetupHardware( void )\r
 239 {\r
 240         /* Disable peripherals power. */\r
 241         SC->PCONP = 0;\r
 242 \r
 243         /* Enable GPIO power. */\r
 244         SC->PCONP = PCONP_PCGPIO;\r
 245 \r
 246         /* Disable TPIU. */\r
 247         PINCON->PINSEL10 = 0;\r
 248 \r
 249         /* Disconnect the main PLL. */\r
 250         SC->PLL0CON &= ~PLLCON_PLLC;\r
 251         SC->PLL0FEED = PLLFEED_FEED1;\r
 252         SC->PLL0FEED = PLLFEED_FEED2;\r
 253         while ((SC->PLL0STAT & PLLSTAT_PLLC) != 0);\r
 254 \r
 255         /* Turn off the main PLL. */\r
 256         SC->PLL0CON &= ~PLLCON_PLLE;\r
 257         SC->PLL0FEED = PLLFEED_FEED1;\r
 258         SC->PLL0FEED = PLLFEED_FEED2;\r
 259         while ((SC->PLL0STAT & PLLSTAT_PLLE) != 0);\r
 260 \r
 261         /* No CPU clock divider. */\r
 262         SC->CCLKCFG = 0;\r
 263 \r
 264         /* OSCEN. */\r
 265         SC->SCS = 0x20;\r
 266         while ((SC->SCS & 0x40) == 0);\r
 267 \r
 268         /* Use main oscillator. */\r
 269         SC->CLKSRCSEL = 1;\r
 270         SC->PLL0CFG = (PLLCFG_MUL16 | PLLCFG_DIV1);\r
 271 \r
 272         SC->PLL0FEED = PLLFEED_FEED1;\r
 273         SC->PLL0FEED = PLLFEED_FEED2;\r
 274 \r
 275         /*  Activate the PLL by turning it on then feeding the correct\r
 276         sequence of bytes. */\r
 277         SC->PLL0CON  = PLLCON_PLLE;\r
 278         SC->PLL0FEED = PLLFEED_FEED1;\r
 279         SC->PLL0FEED = PLLFEED_FEED2;\r
 280 \r
 281         /* 6x CPU clock divider (64 MHz) */\r
 282         SC->CCLKCFG = 5;\r
 283 \r
 284         /*  Wait for the PLL to lock. */\r
 285         while ((SC->PLL0STAT & PLLSTAT_PLOCK) == 0);\r
 286 \r
 287         /*  Connect the PLL. */\r
 288         SC->PLL0CON  = PLLCON_PLLC | PLLCON_PLLE;\r
 289         SC->PLL0FEED = PLLFEED_FEED1;\r
 290         SC->PLL0FEED = PLLFEED_FEED2;\r
 291 \r
 292         /*  Setup the peripheral bus to be the same as the PLL output (64 MHz). */\r
 293         SC->PCLKSEL0 = 0x05555555;\r
 294 \r
 295         /* Configure the LEDs. */\r
 296         vParTestInitialise();\r
 297 }\r
 298 /*-----------------------------------------------------------*/\r
 299 \r
 300 void vApplicationStackOverflowHook( xTaskHandle *pxTask, signed portCHAR *pcTaskName )\r
 301 {\r
 302         /* This function will get called if a task overflows its stack. */\r
 303 \r
 304         ( void ) pxTask;\r
 305         ( void ) pcTaskName;\r
 306 \r
 307         for( ;; );\r
 308 }\r
 309 /*-----------------------------------------------------------*/\r
 310 \r
 311 void vConfigureTimerForRunTimeStats( void )\r
 312 {\r
 313 const unsigned long TCR_COUNT_RESET = 2, CTCR_CTM_TIMER = 0x00, TCR_COUNT_ENABLE = 0x01;\r
 314 \r
 315         /* This function configures a timer that is used as the time base when\r
 316         collecting run time statistical information - basically the percentage\r
 317         of CPU time that each task is utilising.  It is called automatically when\r
 318         the scheduler is started (assuming configGENERATE_RUN_TIME_STATS is set\r
 319         to 1). */\r
 320 \r
 321         /* Power up and feed the timer. */\r
 322         SC->PCONP |= 0x02UL;\r
 323         SC->PCLKSEL0 = (SC->PCLKSEL0 & (~(0x3<<2))) | (0x01 << 2);\r
 324 \r
 325         /* Reset Timer 0 */\r
 326         TIM0->TCR = TCR_COUNT_RESET;\r
 327 \r
 328         /* Just count up. */\r
 329         TIM0->CTCR = CTCR_CTM_TIMER;\r
 330 \r
 331         /* Prescale to a frequency that is good enough to get a decent resolution,\r
 332         but not too fast so as to overflow all the time. */\r
 333         TIM0->PR =  ( configCPU_CLOCK_HZ / 10000UL ) - 1UL;\r
 334 \r
 335         /* Start the counter. */\r
 336         TIM0->TCR = TCR_COUNT_ENABLE;\r
 337 }\r
 338 /*-----------------------------------------------------------*/\r
 339 \r