git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/H8S/RTOSDemo/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 /* Scheduler include files. */\r
  67 #include "FreeRTOS.h"\r
  68 #include "portable.h"\r
  69 \r
  70 /* Demo application include files. */\r
  71 #include "partest.h"\r
  72 \r
  73 /*-----------------------------------------------------------\r
  74  * Simple parallel port IO routines.\r
  75  *\r
  76  * This is for the demo application which uses port 2 for LED outputs.\r
  77  *-----------------------------------------------------------*/\r
  78 \r
  79 /* Value for the LED to be off. */\r
  80 #define partstLED_OUTPUTS               ( ( unsigned char ) 0xff )\r
  81 \r
  82 /* P2.0 is not used as an output so there are only 7 LEDs on port 2. */\r
  83 #define partstMAX_LEDs                  ( 7 )\r
  84 #define partstALL_OUTPUTS_OFF   ( ( unsigned char ) 0 )\r
  85 \r
  86 /* Maps the LED outputs used by the standard demo application files to\r
  87 convenient outputs for the EDK2329.  Mainly this insures that the LED\r
  88 used by the Check task is one of the on board LEDs so the demo can be\r
  89 executed on an EDK without any modification. */\r
  90 static inline unsigned char prvMapLED( unsigned portBASE_TYPE uxLED );\r
  91 \r
  92 /*-----------------------------------------------------------*/\r
  93 \r
  94 void vParTestInitialise( void )\r
  95 {\r
  96         /* LED's are connected to port 2.  P2.1 and P2.2 are built onto the EDK.\r
  97         P2.3 to P2.7 are soldered onto the expansion port. */\r
  98         P2DDR = partstLED_OUTPUTS;\r
  99         P2DR = partstALL_OUTPUTS_OFF;\r
 100 }\r
 101 /*-----------------------------------------------------------*/\r
 102 \r
 103 /*\r
 104  * Described at the top of the file.\r
 105  */\r
 106 static inline unsigned char prvMapLED( unsigned portBASE_TYPE uxLED )\r
 107 {\r
 108         switch( uxLED )\r
 109         {\r
 110                 case 0  :       return ( unsigned char ) 2;\r
 111                 case 1  :       return ( unsigned char ) 3;\r
 112                 case 2  :       return ( unsigned char ) 4;\r
 113                 case 3  :       return ( unsigned char ) 5;\r
 114                 case 4  :       return ( unsigned char ) 6;\r
 115                 case 5  :       return ( unsigned char ) 0;\r
 116                 case 6  :       return ( unsigned char ) 1;\r
 117                 default :       return 0;\r
 118         }\r
 119 }\r
 120 /*-----------------------------------------------------------*/\r
 121 \r
 122 /*\r
 123  * Turn an LED on or off.\r
 124  */\r
 125 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
 126 {\r
 127 unsigned char ucLED;\r
 128 \r
 129         if( uxLED < partstMAX_LEDs )\r
 130         {\r
 131                 ucLED = prvMapLED( uxLED );\r
 132 \r
 133                 /* Set a bit in the required LED position.  LED 0 is bit 1. */\r
 134                 ucLED = ( unsigned char ) 1 << ( ucLED + 1 );\r
 135 \r
 136                 if( xValue )\r
 137                 {\r
 138                         portENTER_CRITICAL();\r
 139                                 P2DR |= ucLED;\r
 140                         portEXIT_CRITICAL();\r
 141                 }\r
 142                 else\r
 143                 {\r
 144                         portENTER_CRITICAL();\r
 145                                 P2DR &= ~ucLED;\r
 146                         portEXIT_CRITICAL();\r
 147                 }               \r
 148         }\r
 149 }\r
 150 /*-----------------------------------------------------------*/\r
 151 \r
 152 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 153 {\r
 154 unsigned char ucLED;\r
 155 \r
 156         if( uxLED < partstMAX_LEDs )\r
 157         {\r
 158                 ucLED = prvMapLED( uxLED );\r
 159 \r
 160                 /* Set a bit in the required LED position.  LED 0 is bit 1. */\r
 161                 ucLED = ( unsigned char ) 1 << ( ucLED + 1 );\r
 162 \r
 163                 portENTER_CRITICAL();\r
 164                 {\r
 165                         if( P2DR & ucLED )\r
 166                         {\r
 167                                 P2DR &= ~ucLED;\r
 168                         }\r
 169                         else\r
 170                         {\r
 171                                 P2DR |= ucLED;\r
 172                         }\r
 173                 }\r
 174                 portEXIT_CRITICAL();\r
 175         }       \r
 176 }\r
 177 \r
 178 \r
 179 \r