git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/Common/Full/flash.c

   1 /*\r
   2     FreeRTOS V7.1.1 - Copyright (C) 2012 Real Time Engineers Ltd.\r
   3         \r
   4 \r
   5     ***************************************************************************\r
   6      *                                                                       *\r
   7      *    FreeRTOS tutorial books are available in pdf and paperback.        *\r
   8      *    Complete, revised, and edited pdf reference manuals are also       *\r
   9      *    available.                                                         *\r
  10      *                                                                       *\r
  11      *    Purchasing FreeRTOS documentation will not only help you, by       *\r
  12      *    ensuring you get running as quickly as possible and with an        *\r
  13      *    in-depth knowledge of how to use FreeRTOS, it will also help       *\r
  14      *    the FreeRTOS project to continue with its mission of providing     *\r
  15      *    professional grade, cross platform, de facto standard solutions    *\r
  16      *    for microcontrollers - completely free of charge!                  *\r
  17      *                                                                       *\r
  18      *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *\r
  19      *                                                                       *\r
  20      *    Thank you for using FreeRTOS, and thank you for your support!      *\r
  21      *                                                                       *\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 modification to the GPL is included to allow you to\r
  31     distribute a combined work that includes FreeRTOS without being obliged to\r
  32     provide the source code for proprietary components outside of the FreeRTOS\r
  33     kernel.  FreeRTOS is distributed in the hope that it will be useful, but\r
  34     WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY\r
  35     or 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     ***************************************************************************\r
  45      *                                                                       *\r
  46      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  47      *    not run, what could be wrong?                                      *\r
  48      *                                                                       *\r
  49      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  50      *                                                                       *\r
  51     ***************************************************************************\r
  52 \r
  53     \r
  54     http://www.FreeRTOS.org - Documentation, training, latest information, \r
  55     license and contact details.\r
  56     \r
  57     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  58     including FreeRTOS+Trace - an indispensable productivity tool.\r
  59 \r
  60     Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell \r
  61     the code with commercial support, indemnification, and middleware, under \r
  62     the OpenRTOS brand: http://www.OpenRTOS.com.  High Integrity Systems also\r
  63     provide a safety engineered and independently SIL3 certified version under \r
  64     the SafeRTOS brand: http://www.SafeRTOS.com.\r
  65 */\r
  66 \r
  67 \r
  68 /**\r
  69  * Creates eight tasks, each of which flash an LED at a different rate.  The first \r
  70  * LED flashes every 125ms, the second every 250ms, the third every 375ms, etc.\r
  71  *\r
  72  * The LED flash tasks provide instant visual feedback.  They show that the scheduler \r
  73  * is still operational.\r
  74  *\r
  75  * The PC port uses the standard parallel port for outputs, the Flashlite 186 port \r
  76  * uses IO port F.\r
  77  *\r
  78  * \page flashC flash.c\r
  79  * \ingroup DemoFiles\r
  80  * <HR>\r
  81  */\r
  82 \r
  83 /*\r
  84 Changes from V2.0.0\r
  85 \r
  86         + Delay periods are now specified using variables and constants of\r
  87           portTickType rather than unsigned long.\r
  88 \r
  89 Changes from V2.1.1\r
  90 \r
  91         + The stack size now uses configMINIMAL_STACK_SIZE.\r
  92         + String constants made file scope to decrease stack depth on 8051 port.\r
  93 */\r
  94 \r
  95 #include <stdlib.h>\r
  96 \r
  97 /* Scheduler include files. */\r
  98 #include "FreeRTOS.h"\r
  99 #include "task.h"\r
 100 \r
 101 /* Demo program include files. */\r
 102 #include "partest.h"\r
 103 #include "flash.h"\r
 104 #include "print.h"\r
 105 \r
 106 #define ledSTACK_SIZE           configMINIMAL_STACK_SIZE\r
 107 \r
 108 /* Structure used to pass parameters to the LED tasks. */\r
 109 typedef struct LED_PARAMETERS\r
 110 {\r
 111         unsigned portBASE_TYPE uxLED;           /*< The output the task should use. */\r
 112         portTickType xFlashRate;        /*< The rate at which the LED should flash. */\r
 113 } xLEDParameters;\r
 114 \r
 115 /* The task that is created eight times - each time with a different xLEDParaemtes \r
 116 structure passed in as the parameter. */\r
 117 static void vLEDFlashTask( void *pvParameters );\r
 118 \r
 119 /* String to print if USE_STDIO is defined. */\r
 120 const char * const pcTaskStartMsg = "LED flash task started.\r\n";\r
 121 \r
 122 /*-----------------------------------------------------------*/\r
 123 \r
 124 void vStartLEDFlashTasks( unsigned portBASE_TYPE uxPriority )\r
 125 {\r
 126 unsigned portBASE_TYPE uxLEDTask;\r
 127 xLEDParameters *pxLEDParameters;\r
 128 const unsigned portBASE_TYPE uxNumOfLEDs = 8;\r
 129 const portTickType xFlashRate = 125;\r
 130 \r
 131         /* Create the eight tasks. */\r
 132         for( uxLEDTask = 0; uxLEDTask < uxNumOfLEDs; ++uxLEDTask )\r
 133         {\r
 134                 /* Create and complete the structure used to pass parameters to the next \r
 135                 created task. */\r
 136                 pxLEDParameters = ( xLEDParameters * ) pvPortMalloc( sizeof( xLEDParameters ) );\r
 137                 pxLEDParameters->uxLED = uxLEDTask;\r
 138                 pxLEDParameters->xFlashRate = ( xFlashRate + ( xFlashRate * ( portTickType ) uxLEDTask ) );\r
 139                 pxLEDParameters->xFlashRate /= portTICK_RATE_MS;\r
 140 \r
 141                 /* Spawn the task. */\r
 142                 xTaskCreate( vLEDFlashTask, "LEDx", ledSTACK_SIZE, ( void * ) pxLEDParameters, uxPriority, ( xTaskHandle * ) NULL );\r
 143         }\r
 144 }\r
 145 /*-----------------------------------------------------------*/\r
 146 \r
 147 static void vLEDFlashTask( void *pvParameters )\r
 148 {\r
 149 xLEDParameters *pxParameters;\r
 150 \r
 151         /* Queue a message for printing to say the task has started. */\r
 152         vPrintDisplayMessage( &pcTaskStartMsg );\r
 153 \r
 154         pxParameters = ( xLEDParameters * ) pvParameters;\r
 155 \r
 156         for(;;)\r
 157         {\r
 158                 /* Delay for half the flash period then turn the LED on. */\r
 159                 vTaskDelay( pxParameters->xFlashRate / ( portTickType ) 2 );\r
 160                 vParTestToggleLED( pxParameters->uxLED );\r
 161 \r
 162                 /* Delay for half the flash period then turn the LED off. */\r
 163                 vTaskDelay( pxParameters->xFlashRate / ( portTickType ) 2 );\r
 164                 vParTestToggleLED( pxParameters->uxLED );\r
 165         }\r
 166 }\r
 167 \r