git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/msp430_IAR/ParTest/ParTest.c

   1 /*\r
   2     FreeRTOS V7.5.1 - 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  * Characters on the LCD are used to simulate LED's.  In this case the 'ParTest'\r
  67  * is really operating on the LCD display.\r
  68  *-----------------------------------------------------------*/\r
  69 \r
  70 /*\r
  71  * This demo is configured to execute on the ES449 prototyping board from\r
  72  * SoftBaugh. The ES449 has a built in LCD display and a single built in user\r
  73  * LED.  Therefore, in place of flashing an LED, the 'flash' and 'check' tasks\r
  74  * toggle '*' characters on the LCD.  The left most '*' represents LED 0, the\r
  75  * next LED 1, etc.\r
  76  *\r
  77  * There is a single genuine on board LED referenced as LED 10.\r
  78  */\r
  79 \r
  80 \r
  81 /* Scheduler includes. */\r
  82 #include "FreeRTOS.h"\r
  83 #include "task.h"\r
  84 \r
  85 /* Demo application includes. */\r
  86 #include "partest.h"\r
  87 \r
  88 /* Constants required to setup the LCD. */\r
  89 #define LCD_DIV_64 5\r
  90 \r
  91 /* Constants required to access the "LED's".  The LED segments are turned on\r
  92 and off to generate '*' characters. */\r
  93 #define partstNUM_LEDS                  ( ( unsigned portCHAR ) 6 )\r
  94 #define partstSEGMENTS_ON               ( ( unsigned portCHAR ) 0x0f )\r
  95 #define partstSEGMENTS_OFF              ( ( unsigned portCHAR ) 0x00 )\r
  96 \r
  97 /* The LED number of the real on board LED, rather than a simulated LED. */\r
  98 #define partstON_BOARD_LED              ( ( unsigned portBASE_TYPE ) 10 )\r
  99 #define mainON_BOARD_LED_BIT    ( ( unsigned portCHAR ) 0x01 )\r
 100 \r
 101 /* The LCD segments used to generate the '*' characters for LED's 0 to 5. */\r
 102 unsigned portCHAR * const ucRHSSegments[ partstNUM_LEDS ] = {   ( unsigned portCHAR * )0xa4, \r
 103                                                                                                                                 ( unsigned portCHAR * )0xa2, \r
 104                                                                                                                                 ( unsigned portCHAR * )0xa0, \r
 105                                                                                                                                 ( unsigned portCHAR * )0x9e,\r
 106                                                                                                                                 ( unsigned portCHAR * )0x9c,\r
 107                                                                                                                                 ( unsigned portCHAR * )0x9a };\r
 108 \r
 109 unsigned portCHAR * const ucLHSSegments[ partstNUM_LEDS ] = {   ( unsigned portCHAR * )0xa3, \r
 110                                                                                                                                 ( unsigned portCHAR * )0xa1, \r
 111                                                                                                                                 ( unsigned portCHAR * )0x9f, \r
 112                                                                                                                                 ( unsigned portCHAR * )0x9d,\r
 113                                                                                                                                 ( unsigned portCHAR * )0x9b,\r
 114                                                                                                                                 ( unsigned portCHAR * )0x99 };\r
 115 \r
 116 /*\r
 117  * Toggle the single genuine built in LED.\r
 118  */\r
 119 static void prvToggleOnBoardLED( void );\r
 120 \r
 121 /*-----------------------------------------------------------*/\r
 122 \r
 123 void vParTestInitialise( void )\r
 124 {\r
 125         /* Initialise the LCD hardware. */\r
 126 \r
 127         /* Used for the onboard LED. */\r
 128         P1DIR = 0x01;\r
 129 \r
 130         // Setup Basic Timer for LCD operation\r
 131         BTCTL = (LCD_DIV_64+0x23);\r
 132 \r
 133         // Setup port functions\r
 134         P1SEL = 0x32;\r
 135         P2SEL = 0x00;\r
 136         P3SEL = 0x00;\r
 137         P4SEL = 0xFC;\r
 138         P5SEL = 0xFF;\r
 139         \r
 140         /* Initialise all segments to off. */\r
 141         LCDM1 = partstSEGMENTS_OFF;     \r
 142         LCDM2 = partstSEGMENTS_OFF;     \r
 143         LCDM3 = partstSEGMENTS_OFF;     \r
 144         LCDM4 = partstSEGMENTS_OFF;     \r
 145         LCDM5 = partstSEGMENTS_OFF;     \r
 146         LCDM6 = partstSEGMENTS_OFF;     \r
 147         LCDM7 = partstSEGMENTS_OFF;     \r
 148         LCDM8 = partstSEGMENTS_OFF;     \r
 149         LCDM9 = partstSEGMENTS_OFF;     \r
 150         LCDM10 = partstSEGMENTS_OFF;    \r
 151         LCDM11 = partstSEGMENTS_OFF;    \r
 152         LCDM12 = partstSEGMENTS_OFF;    \r
 153         LCDM13 = partstSEGMENTS_OFF;    \r
 154         LCDM14 = partstSEGMENTS_OFF;    \r
 155         LCDM15 = partstSEGMENTS_OFF;    \r
 156         LCDM16 = partstSEGMENTS_OFF;    \r
 157         LCDM17 = partstSEGMENTS_OFF;    \r
 158         LCDM18 = partstSEGMENTS_OFF;    \r
 159         LCDM19 = partstSEGMENTS_OFF;    \r
 160         LCDM20 = partstSEGMENTS_OFF;    \r
 161 \r
 162         /* Setup LCD control. */\r
 163         LCDCTL = (LCDSG0_7|LCD4MUX|LCDON);\r
 164 }\r
 165 /*-----------------------------------------------------------*/\r
 166 \r
 167 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
 168 {\r
 169         /* Set or clear the output [in this case show or hide the '*' character. */\r
 170         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
 171         {\r
 172                 vTaskSuspendAll();\r
 173                 {\r
 174                         if( xValue )\r
 175                         {\r
 176                                 /* Turn on the segments required to show the '*'. */\r
 177                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 178                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 179                         }\r
 180                         else\r
 181                         {\r
 182                                 /* Turn off all the segments. */\r
 183                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 184                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 185                         }\r
 186                 }\r
 187                 xTaskResumeAll();\r
 188         }\r
 189 }\r
 190 /*-----------------------------------------------------------*/\r
 191 \r
 192 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 193 {\r
 194         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
 195         {\r
 196                 vTaskSuspendAll();\r
 197                 {\r
 198                         /* If the '*' is already showing - hide it.  If it is not already\r
 199                         showing then show it. */\r
 200                         if( *( ucRHSSegments[ uxLED ] ) )\r
 201                         {\r
 202                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 203                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 204                         }\r
 205                         else\r
 206                         {\r
 207                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 208                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 209                         }\r
 210                 }\r
 211                 xTaskResumeAll();\r
 212         }\r
 213         else\r
 214         {\r
 215                 if( uxLED == partstON_BOARD_LED )\r
 216                 {\r
 217                         /* The request related to the genuine on board LED. */\r
 218                         prvToggleOnBoardLED();\r
 219                 }\r
 220         }       \r
 221 }\r
 222 /*-----------------------------------------------------------*/\r
 223 \r
 224 static void prvToggleOnBoardLED( void )\r
 225 {\r
 226 static unsigned portSHORT sState = pdFALSE;\r
 227 \r
 228         /* Toggle the state of the single genuine on board LED. */\r
 229         if( sState )    \r
 230         {\r
 231                 P1OUT |= mainON_BOARD_LED_BIT;\r
 232         }\r
 233         else\r
 234         {\r
 235                 P1OUT &= ~mainON_BOARD_LED_BIT;\r
 236         }\r
 237 \r
 238         sState = !sState;\r
 239 }\r
 240 /*-----------------------------------------------------------*/\r
 241 \r
 242 \r