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

   1 /*\r
   2     FreeRTOS V6.1.0 - Copyright (C) 2010 Real Time Engineers Ltd.\r
   3 \r
   4     ***************************************************************************\r
   5     *                                                                         *\r
   6     * If you are:                                                             *\r
   7     *                                                                         *\r
   8     *    + New to FreeRTOS,                                                   *\r
   9     *    + Wanting to learn FreeRTOS or multitasking in general quickly       *\r
  10     *    + Looking for basic training,                                        *\r
  11     *    + Wanting to improve your FreeRTOS skills and productivity           *\r
  12     *                                                                         *\r
  13     * then take a look at the FreeRTOS books - available as PDF or paperback  *\r
  14     *                                                                         *\r
  15     *        "Using the FreeRTOS Real Time Kernel - a Practical Guide"        *\r
  16     *                  http://www.FreeRTOS.org/Documentation                  *\r
  17     *                                                                         *\r
  18     * A pdf reference manual is also available.  Both are usually delivered   *\r
  19     * to your inbox within 20 minutes to two hours when purchased between 8am *\r
  20     * and 8pm GMT (although please allow up to 24 hours in case of            *\r
  21     * exceptional circumstances).  Thank you for your support!                *\r
  22     *                                                                         *\r
  23     ***************************************************************************\r
  24 \r
  25     This file is part of the FreeRTOS distribution.\r
  26 \r
  27     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  28     the terms of the GNU General Public License (version 2) as published by the\r
  29     Free Software Foundation AND MODIFIED BY the FreeRTOS exception.\r
  30     ***NOTE*** The exception to the GPL is included to allow you to distribute\r
  31     a combined work that includes FreeRTOS without being obliged to provide the\r
  32     source code for proprietary components outside of the FreeRTOS kernel.\r
  33     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT\r
  34     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
  35     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  36     more details. You should have received a copy of the GNU General Public\r
  37     License and the FreeRTOS license exception along with FreeRTOS; if not it\r
  38     can be viewed here: http://www.freertos.org/a00114.html and also obtained\r
  39     by writing to Richard Barry, contact details for whom are available on the\r
  40     FreeRTOS WEB site.\r
  41 \r
  42     1 tab == 4 spaces!\r
  43 \r
  44     http://www.FreeRTOS.org - Documentation, latest information, license and\r
  45     contact details.\r
  46 \r
  47     http://www.SafeRTOS.com - A version that is certified for use in safety\r
  48     critical systems.\r
  49 \r
  50     http://www.OpenRTOS.com - Commercial support, development, porting,\r
  51     licensing and training services.\r
  52 */\r
  53 \r
  54 /* Standard includes. */\r
  55 #include <stdio.h>\r
  56 \r
  57 /* Kernel includes. */\r
  58 #include "FreeRTOS.h"\r
  59 #include "task.h"\r
  60 #include "queue.h"\r
  61 \r
  62 /* Demo application includes. */\r
  63 #include "partest.h"\r
  64 #include "flash.h"\r
  65 #include "dynamic.h"\r
  66 \r
  67 /* ST driver includes. */\r
  68 #include "stm32l1xx_usart.h"\r
  69 \r
  70 /* Eval board includes. */\r
  71 #include "stm32_eval.h"\r
  72 #include "stm32l152_eval_lcd.h"\r
  73 \r
  74 #define mainFLASH_TASK_PRIORITY                 ( tskIDLE_PRIORITY + 1 )\r
  75 #define mainLCD_TASK_PRIORITY                   ( tskIDLE_PRIORITY + 1 )\r
  76 \r
  77 #define mainLCD_TASK_STACK_SIZE                 ( configMINIMAL_STACK_SIZE * 2 )\r
  78 \r
  79 #define mainQUEUE_LENGTH                                ( 5 )\r
  80 \r
  81 #define mainMESSAGE_BUTTON_UP                   ( 1 )\r
  82 #define mainMESSAGE_BUTTON_DOWN                 ( 2 )\r
  83 #define mainMESSAGE_BUTTON_LEFT                 ( 3 )\r
  84 #define mainMESSAGE_BUTTON_RIGHT                ( 4 )\r
  85 #define mainMESSAGE_BUTTON_SEL                  ( 5 )\r
  86 #define mainMESSAGE_STATUS                              ( 6 )\r
  87 \r
  88 /*\r
  89  * System configuration is performed prior to main() being called, this function\r
  90  * configures the peripherals used by the demo application.\r
  91  */\r
  92 static void prvSetupHardware( void );\r
  93 static void prvLCDTask( void *pvParameters );\r
  94 static void vTempTask( void *pv );\r
  95 \r
  96 unsigned long ulTIM6_OverflowCount = 0UL;\r
  97 \r
  98 static xQueueHandle xLCDQueue = NULL;\r
  99 \r
 100 typedef struct\r
 101 {\r
 102         char cMessageID;\r
 103         long lMessageValue;\r
 104 } xQueueMessage;\r
 105 \r
 106 void main( void )\r
 107 {\r
 108         prvSetupHardware();\r
 109         \r
 110         /* Create the queue used by tasks and interrupts to send strings to the LCD\r
 111         task. */\r
 112         xLCDQueue = xQueueCreate( mainQUEUE_LENGTH, sizeof( xQueueMessage ) );\r
 113         \r
 114         if( xLCDQueue != NULL )\r
 115         {\r
 116                 vQueueAddToRegistry( xLCDQueue, "LCDQueue" );\r
 117                 xTaskCreate( prvLCDTask, ( signed char * ) "LCD", mainLCD_TASK_STACK_SIZE, NULL, mainLCD_TASK_PRIORITY, NULL );\r
 118                 xTaskCreate( vTempTask, ( signed char * ) "Temp", configMINIMAL_STACK_SIZE, NULL, tskIDLE_PRIORITY, NULL );\r
 119                 vStartDynamicPriorityTasks();\r
 120                 vStartLEDFlashTasks( mainFLASH_TASK_PRIORITY );\r
 121                 \r
 122                 vTaskStartScheduler();\r
 123         }\r
 124         \r
 125         for( ;; );\r
 126 }\r
 127 /*-----------------------------------------------------------*/\r
 128 unsigned long ulTempArray[ 10 ], ulx = 0;\r
 129 static void prvLCDTask( void *pvParameters )\r
 130 {\r
 131 xQueueMessage xReceivedMessage;\r
 132 long lLine = Line1;\r
 133 const long lFontHeight = (((sFONT *)LCD_GetFont())->Height);\r
 134 static char cBuffer[ 256 ];\r
 135 \r
 136         for( ;; )\r
 137         {\r
 138                 xQueueReceive( xLCDQueue, &xReceivedMessage, portMAX_DELAY );\r
 139 \r
 140                 if( lLine > Line9 )\r
 141                 {\r
 142                         LCD_Clear( Blue );\r
 143                         lLine = 0;\r
 144                 }\r
 145                 \r
 146 if( ulx < 10 )\r
 147 {\r
 148         ulTempArray[ ulx++ ] = portGET_RUN_TIME_COUNTER_VALUE();\r
 149 }\r
 150 else\r
 151 {\r
 152         ulx = 0;\r
 153 }\r
 154                 \r
 155                 switch( xReceivedMessage.cMessageID )\r
 156                 {\r
 157                         case mainMESSAGE_BUTTON_UP              :       sprintf( cBuffer, "Button up = %d", xReceivedMessage.lMessageValue );\r
 158                                                                                                 break;\r
 159                         case mainMESSAGE_BUTTON_DOWN    :       sprintf( cBuffer, "Button down = %d", xReceivedMessage.lMessageValue );\r
 160                                                                                                 break;\r
 161                         case mainMESSAGE_BUTTON_LEFT    :       sprintf( cBuffer, "Button left = %d", xReceivedMessage.lMessageValue );\r
 162                                                                                                 break;\r
 163                         case mainMESSAGE_BUTTON_RIGHT   :       sprintf( cBuffer, "Button right = %d", xReceivedMessage.lMessageValue );\r
 164                                                                                                 break;\r
 165                         case mainMESSAGE_BUTTON_SEL             :       printf( "\nTask\t     Abs Time\t     %%Time\n*****************************************\n" );\r
 166                                                                                                 vTaskGetRunTimeStats( ( signed char * ) cBuffer );\r
 167                                                                                                 printf( cBuffer );\r
 168                                                                                                 sprintf( cBuffer, "Select interrupt!" );\r
 169                                                                                                 break;\r
 170                         case mainMESSAGE_STATUS                 :       sprintf( cBuffer, "Task status = %s", ( ( xReceivedMessage.lMessageValue ) ? "PASS" : "FAIL" ) );\r
 171                                                                                                 break;\r
 172                         default                                                 :       sprintf( cBuffer, "Unknown message" );\r
 173                                                                                                 break;\r
 174                 }\r
 175                 \r
 176                 LCD_DisplayStringLine( lLine, ( uint8_t * ) cBuffer );\r
 177                 lLine += lFontHeight;\r
 178         }\r
 179 }\r
 180 /*-----------------------------------------------------------*/\r
 181 \r
 182 void EXTI9_5_IRQHandler( void )\r
 183 {\r
 184 const xQueueMessage xMessage = { mainMESSAGE_BUTTON_SEL, 0 };\r
 185 long lHigherPriorityTaskWoken = pdFALSE;\r
 186 \r
 187         xQueueSendFromISR( xLCDQueue, &xMessage, &lHigherPriorityTaskWoken );\r
 188         EXTI_ClearITPendingBit( SEL_BUTTON_EXTI_LINE );\r
 189         portEND_SWITCHING_ISR( lHigherPriorityTaskWoken );\r
 190 }\r
 191 /*-----------------------------------------------------------*/\r
 192 \r
 193 void vApplicationTickHook( void )\r
 194 {\r
 195 static unsigned long ulCounter = 0;\r
 196 static const unsigned long ulCheckFrequency = 5000UL / portTICK_RATE_MS;\r
 197 static xQueueMessage xStatusMessage = { mainMESSAGE_STATUS, pdPASS };\r
 198 long lHigherPriorityTaskWoken = pdFALSE; /* Not used in this case as this is the tick hook. */\r
 199 \r
 200         ulCounter++;\r
 201         if( ulCounter >= ulCheckFrequency )\r
 202         {\r
 203                 if( xAreDynamicPriorityTasksStillRunning() != pdPASS )\r
 204                 {\r
 205                         xStatusMessage.lMessageValue = pdFAIL;\r
 206                 }\r
 207                 \r
 208                 xQueueSendFromISR( xLCDQueue, &xStatusMessage, &lHigherPriorityTaskWoken );\r
 209                 ulCounter = 0;\r
 210         }\r
 211 }\r
 212 /*-----------------------------------------------------------*/\r
 213 \r
 214 static void vTempTask( void *pv )\r
 215 {\r
 216 long lLastState = pdTRUE;\r
 217 long lState;\r
 218 xQueueMessage xMessage;\r
 219 \r
 220         for( ;; )\r
 221         {\r
 222                 lState = STM_EVAL_PBGetState( BUTTON_UP );\r
 223                 if( lState != lLastState )\r
 224                 {\r
 225                         xMessage.cMessageID = mainMESSAGE_BUTTON_UP;\r
 226                         xMessage.lMessageValue = lState;\r
 227                         lLastState = lState;\r
 228                         xQueueSend( xLCDQueue, &xMessage, portMAX_DELAY );\r
 229                         vTaskDelay( 10 );\r
 230                 }\r
 231         }\r
 232 }\r
 233 /*-----------------------------------------------------------*/\r
 234 \r
 235 static void prvSetupHardware( void )\r
 236 {\r
 237         /* Initialise the LEDs. */\r
 238         vParTestInitialise();\r
 239 \r
 240         //\r
 241         /* Initialise the joystick inputs. */\r
 242         STM_EVAL_PBInit( BUTTON_UP, BUTTON_MODE_GPIO );\r
 243         STM_EVAL_PBInit( BUTTON_DOWN, BUTTON_MODE_GPIO );\r
 244         STM_EVAL_PBInit( BUTTON_LEFT, BUTTON_MODE_GPIO );\r
 245         STM_EVAL_PBInit( BUTTON_RIGHT, BUTTON_MODE_GPIO );\r
 246         \r
 247         /* The select button in the middle of the joystick is configured to generate\r
 248         an interrupt.  The Eval board library will configure the interrupt\r
 249         priority to be the lowest priority available - this is important as the\r
 250         interrupt service routine makes use of a FreeRTOS API function so must\r
 251         therefore use a priority equal to or below that set by the\r
 252         configMAX_SYSCALL_INTERRUPT_PRIORITY() value set in FreeRTOSConfig.h. */\r
 253         STM_EVAL_PBInit( BUTTON_SEL, BUTTON_MODE_EXTI );\r
 254 \r
 255 #if 0   \r
 256 USART_InitTypeDef USART_InitStructure;\r
 257 \r
 258         USART_InitStructure.USART_BaudRate = 115200;\r
 259         USART_InitStructure.USART_WordLength = USART_WordLength_8b;\r
 260         USART_InitStructure.USART_StopBits = USART_StopBits_1;\r
 261         USART_InitStructure.USART_Parity = USART_Parity_No;\r
 262         USART_InitStructure.USART_HardwareFlowControl = USART_HardwareFlowControl_None;\r
 263         USART_InitStructure.USART_Mode = USART_Mode_Rx | USART_Mode_Tx;\r
 264         \r
 265         STM_EVAL_COMInit( COM1, &USART_InitStructure );\r
 266 #endif\r
 267         \r
 268         /* Initialize the LCD */\r
 269         STM32L152_LCD_Init();\r
 270         \r
 271         LCD_Clear(Blue);\r
 272         LCD_SetBackColor(Blue);\r
 273         LCD_SetTextColor(White);\r
 274         LCD_DisplayStringLine(Line0, "  www.FreeRTOS.org");\r
 275 }\r
 276 /*-----------------------------------------------------------*/\r
 277 \r
 278 void vConfigureTimerForRunTimeStats( void )\r
 279 {\r
 280 TIM_TimeBaseInitTypeDef  TIM_TimeBaseStructure;\r
 281 NVIC_InitTypeDef NVIC_InitStructure;\r
 282 \r
 283         /* TIM6 clock enable */\r
 284         RCC_APB1PeriphClockCmd(RCC_APB1Periph_TIM6, ENABLE);\r
 285 \r
 286         /* The 32MHz clock divided by 5000 should tick (very) approximately every\r
 287         150uS and overflow a 16bit timer (very) approximately every 10 seconds. */\r
 288         TIM_TimeBaseStructure.TIM_Period = 65535;\r
 289         TIM_TimeBaseStructure.TIM_Prescaler = 5000;\r
 290         TIM_TimeBaseStructure.TIM_ClockDivision = TIM_CKD_DIV1;\r
 291         TIM_TimeBaseStructure.TIM_CounterMode = TIM_CounterMode_Up;\r
 292         \r
 293         TIM_TimeBaseInit( TIM6, &TIM_TimeBaseStructure );\r
 294         \r
 295         /* Only interrupt on overflow events. */\r
 296         TIM_UpdateRequestConfig( TIM6, TIM_UpdateSource_Regular );\r
 297         \r
 298         TIM_ITConfig( TIM6, TIM_IT_Update, ENABLE );\r
 299         \r
 300         /* Enable the TIM6 gloabal Interrupt */\r
 301         NVIC_InitStructure.NVIC_IRQChannel = TIM6_IRQn;\r
 302         NVIC_InitStructure.NVIC_IRQChannelPreemptionPriority = 0x0f;\r
 303         NVIC_InitStructure.NVIC_IRQChannelSubPriority = 0x0f;\r
 304         NVIC_InitStructure.NVIC_IRQChannelCmd = ENABLE;\r
 305         \r
 306         NVIC_Init(&NVIC_InitStructure);\r
 307         TIM_Cmd( TIM6, ENABLE );\r
 308 }\r
 309 /*-----------------------------------------------------------*/\r
 310 \r
 311 void TIM6_IRQHandler( void )\r
 312 {\r
 313         ulTIM6_OverflowCount++;\r
 314         TIM_ClearITPendingBit( TIM6, TIM_IT_Update );\r
 315 }\r
 316 \r
 317 \r