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

   1 /*\r
   2     FreeRTOS V8.1.2 - Copyright (C) 2014 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     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS provides completely free yet professionally developed,    *\r
  10      *    robust, strictly quality controlled, supported, and cross          *\r
  11      *    platform software that has become a de facto standard.             *\r
  12      *                                                                       *\r
  13      *    Help yourself get started quickly and support the FreeRTOS         *\r
  14      *    project by purchasing a FreeRTOS tutorial book, reference          *\r
  15      *    manual, or both from: http://www.FreeRTOS.org/Documentation        *\r
  16      *                                                                       *\r
  17      *    Thank you!                                                         *\r
  18      *                                                                       *\r
  19     ***************************************************************************\r
  20 \r
  21     This file is part of the FreeRTOS distribution.\r
  22 \r
  23     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  24     the terms of the GNU General Public License (version 2) as published by the\r
  25     Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.\r
  26 \r
  27     >>!   NOTE: The modification to the GPL is included to allow you to     !<<\r
  28     >>!   distribute a combined work that includes FreeRTOS without being   !<<\r
  29     >>!   obliged to provide the source code for proprietary components     !<<\r
  30     >>!   outside of the FreeRTOS kernel.                                   !<<\r
  31 \r
  32     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  33     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  34     FOR A PARTICULAR PURPOSE.  Full license text is available from the following\r
  35     link: http://www.freertos.org/a00114.html\r
  36 \r
  37     1 tab == 4 spaces!\r
  38 \r
  39     ***************************************************************************\r
  40      *                                                                       *\r
  41      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  42      *    not run, what could be wrong?"                                     *\r
  43      *                                                                       *\r
  44      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  45      *                                                                       *\r
  46     ***************************************************************************\r
  47 \r
  48     http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
  49     license and Real Time Engineers Ltd. contact details.\r
  50 \r
  51     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  52     including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
  53     compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
  54 \r
  55     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
  56     Integrity Systems to sell under the OpenRTOS brand.  Low cost OpenRTOS\r
  57     licenses offer ticketed support, indemnification and middleware.\r
  58 \r
  59     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
  60     engineered and independently SIL3 certified version for use in safety and\r
  61     mission critical applications that require provable dependability.\r
  62 \r
  63     1 tab == 4 spaces!\r
  64 */\r
  65 \r
  66 /*-----------------------------------------------------------\r
  67  * Characters on the LCD are used to simulate LED's.  In this case the 'ParTest'\r
  68  * is really operating on the LCD display.\r
  69  *-----------------------------------------------------------*/\r
  70 \r
  71 /*\r
  72  * This demo is configured to execute on the ES449 prototyping board from\r
  73  * SoftBaugh. The ES449 has a built in LCD display and a single built in user\r
  74  * LED.  Therefore, in place of flashing an LED, the 'flash' and 'check' tasks\r
  75  * toggle '*' characters on the LCD.  The left most '*' represents LED 0, the\r
  76  * next LED 1, etc.\r
  77  *\r
  78  * There is a single genuine on board LED referenced as LED 10.\r
  79  */\r
  80 \r
  81 \r
  82 /* Scheduler includes. */\r
  83 #include "FreeRTOS.h"\r
  84 #include "task.h"\r
  85 \r
  86 /* Demo application includes. */\r
  87 #include "partest.h"\r
  88 \r
  89 /* Constants required to setup the LCD. */\r
  90 #define LCD_DIV_64 5\r
  91 \r
  92 /* Constants required to access the "LED's".  The LED segments are turned on\r
  93 and off to generate '*' characters. */\r
  94 #define partstNUM_LEDS                  ( ( unsigned char ) 6 )\r
  95 #define partstSEGMENTS_ON               ( ( unsigned char ) 0x0f )\r
  96 #define partstSEGMENTS_OFF              ( ( unsigned char ) 0x00 )\r
  97 \r
  98 /* The LED number of the real on board LED, rather than a simulated LED. */\r
  99 #define partstON_BOARD_LED              ( ( unsigned portBASE_TYPE ) 10 )\r
 100 #define mainON_BOARD_LED_BIT    ( ( unsigned char ) 0x01 )\r
 101 \r
 102 /* The LCD segments used to generate the '*' characters for LED's 0 to 5. */\r
 103 unsigned char * const ucRHSSegments[ partstNUM_LEDS ] = {       ( unsigned char * )0xa4, \r
 104                                                                                                                                 ( unsigned char * )0xa2, \r
 105                                                                                                                                 ( unsigned char * )0xa0, \r
 106                                                                                                                                 ( unsigned char * )0x9e,\r
 107                                                                                                                                 ( unsigned char * )0x9c,\r
 108                                                                                                                                 ( unsigned char * )0x9a };\r
 109 \r
 110 unsigned char * const ucLHSSegments[ partstNUM_LEDS ] = {       ( unsigned char * )0xa3, \r
 111                                                                                                                                 ( unsigned char * )0xa1, \r
 112                                                                                                                                 ( unsigned char * )0x9f, \r
 113                                                                                                                                 ( unsigned char * )0x9d,\r
 114                                                                                                                                 ( unsigned char * )0x9b,\r
 115                                                                                                                                 ( unsigned char * )0x99 };\r
 116 \r
 117 /*\r
 118  * Toggle the single genuine built in LED.\r
 119  */\r
 120 static void prvToggleOnBoardLED( void );\r
 121 \r
 122 /*-----------------------------------------------------------*/\r
 123 \r
 124 void vParTestInitialise( void )\r
 125 {\r
 126         /* Initialise the LCD hardware. */\r
 127 \r
 128         /* Used for the onboard LED. */\r
 129         P1DIR = 0x01;\r
 130 \r
 131         // Setup Basic Timer for LCD operation\r
 132         BTCTL = (LCD_DIV_64+0x23);\r
 133 \r
 134         // Setup port functions\r
 135         P1SEL = 0x32;\r
 136         P2SEL = 0x00;\r
 137         P3SEL = 0x00;\r
 138         P4SEL = 0xFC;\r
 139         P5SEL = 0xFF;\r
 140         \r
 141         /* Initialise all segments to off. */\r
 142         LCDM1 = partstSEGMENTS_OFF;     \r
 143         LCDM2 = partstSEGMENTS_OFF;     \r
 144         LCDM3 = partstSEGMENTS_OFF;     \r
 145         LCDM4 = partstSEGMENTS_OFF;     \r
 146         LCDM5 = partstSEGMENTS_OFF;     \r
 147         LCDM6 = partstSEGMENTS_OFF;     \r
 148         LCDM7 = partstSEGMENTS_OFF;     \r
 149         LCDM8 = partstSEGMENTS_OFF;     \r
 150         LCDM9 = partstSEGMENTS_OFF;     \r
 151         LCDM10 = partstSEGMENTS_OFF;    \r
 152         LCDM11 = partstSEGMENTS_OFF;    \r
 153         LCDM12 = partstSEGMENTS_OFF;    \r
 154         LCDM13 = partstSEGMENTS_OFF;    \r
 155         LCDM14 = partstSEGMENTS_OFF;    \r
 156         LCDM15 = partstSEGMENTS_OFF;    \r
 157         LCDM16 = partstSEGMENTS_OFF;    \r
 158         LCDM17 = partstSEGMENTS_OFF;    \r
 159         LCDM18 = partstSEGMENTS_OFF;    \r
 160         LCDM19 = partstSEGMENTS_OFF;    \r
 161         LCDM20 = partstSEGMENTS_OFF;    \r
 162 \r
 163         /* Setup LCD control. */\r
 164         LCDCTL = (LCDSG0_7|LCD4MUX|LCDON);\r
 165 }\r
 166 /*-----------------------------------------------------------*/\r
 167 \r
 168 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
 169 {\r
 170         /* Set or clear the output [in this case show or hide the '*' character. */\r
 171         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
 172         {\r
 173                 vTaskSuspendAll();\r
 174                 {\r
 175                         if( xValue )\r
 176                         {\r
 177                                 /* Turn on the segments required to show the '*'. */\r
 178                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 179                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 180                         }\r
 181                         else\r
 182                         {\r
 183                                 /* Turn off all the segments. */\r
 184                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 185                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 186                         }\r
 187                 }\r
 188                 xTaskResumeAll();\r
 189         }\r
 190 }\r
 191 /*-----------------------------------------------------------*/\r
 192 \r
 193 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 194 {\r
 195         if( uxLED < ( portBASE_TYPE ) partstNUM_LEDS )\r
 196         {\r
 197                 vTaskSuspendAll();\r
 198                 {\r
 199                         /* If the '*' is already showing - hide it.  If it is not already\r
 200                         showing then show it. */\r
 201                         if( *( ucRHSSegments[ uxLED ] ) )\r
 202                         {\r
 203                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 204                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_OFF;\r
 205                         }\r
 206                         else\r
 207                         {\r
 208                                 *( ucRHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 209                                 *( ucLHSSegments[ uxLED ] ) = partstSEGMENTS_ON;\r
 210                         }\r
 211                 }\r
 212                 xTaskResumeAll();\r
 213         }\r
 214         else\r
 215         {\r
 216                 if( uxLED == partstON_BOARD_LED )\r
 217                 {\r
 218                         /* The request related to the genuine on board LED. */\r
 219                         prvToggleOnBoardLED();\r
 220                 }\r
 221         }       \r
 222 }\r
 223 /*-----------------------------------------------------------*/\r
 224 \r
 225 static void prvToggleOnBoardLED( void )\r
 226 {\r
 227 static unsigned short sState = pdFALSE;\r
 228 \r
 229         /* Toggle the state of the single genuine on board LED. */\r
 230         if( sState )    \r
 231         {\r
 232                 P1OUT |= mainON_BOARD_LED_BIT;\r
 233         }\r
 234         else\r
 235         {\r
 236                 P1OUT &= ~mainON_BOARD_LED_BIT;\r
 237         }\r
 238 \r
 239         sState = !sState;\r
 240 }\r
 241 /*-----------------------------------------------------------*/\r
 242 \r
 243 \r