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

   1 /*\r
   2         FreeRTOS.org V5.1.0 - Copyright (C) 2003-2008 Richard Barry.\r
   3 \r
   4         This file is part of the FreeRTOS.org distribution.\r
   5 \r
   6         FreeRTOS.org is free software; you can redistribute it and/or modify\r
   7         it under the terms of the GNU General Public License as published by\r
   8         the Free Software Foundation; either version 2 of the License, or\r
   9         (at your option) any later version.\r
  10 \r
  11         FreeRTOS.org is distributed in the hope that it will be useful,\r
  12         but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14         GNU General Public License for more details.\r
  15 \r
  16         You should have received a copy of the GNU General Public License\r
  17         along with FreeRTOS.org; if not, write to the Free Software\r
  18         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
  19 \r
  20         A special exception to the GPL can be applied should you wish to distribute\r
  21         a combined work that includes FreeRTOS.org, without being obliged to provide\r
  22         the source code for any proprietary components.  See the licensing section \r
  23         of http://www.FreeRTOS.org for full details of how and when the exception\r
  24         can be applied.\r
  25 \r
  26     ***************************************************************************\r
  27     ***************************************************************************\r
  28     *                                                                         *\r
  29     * SAVE TIME AND MONEY!  We can port FreeRTOS.org to your own hardware,    *\r
  30     * and even write all or part of your application on your behalf.          *\r
  31     * See http://www.OpenRTOS.com for details of the services we provide to   *\r
  32     * expedite your project.                                                  *\r
  33     *                                                                         *\r
  34     ***************************************************************************\r
  35     ***************************************************************************\r
  36 \r
  37         Please ensure to read the configuration and relevant port sections of the\r
  38         online documentation.\r
  39 \r
  40         http://www.FreeRTOS.org - Documentation, latest information, license and \r
  41         contact details.\r
  42 \r
  43         http://www.SafeRTOS.com - A version that is certified for use in safety \r
  44         critical systems.\r
  45 \r
  46         http://www.OpenRTOS.com - Commercial support, development, porting, \r
  47         licensing and training services.\r
  48 */\r
  49 \r
  50 /*\r
  51 Changes from V1.01:\r
  52 \r
  53         + Types used updated.\r
  54         + Add vParTestToggleLED();\r
  55 \r
  56 Changes from V2.0.0\r
  57 \r
  58         + Use scheduler suspends in place of critical sections.\r
  59 */\r
  60 \r
  61 \r
  62 #include "FreeRTOS.h"\r
  63 #include "task.h"\r
  64 #include "partest.h"\r
  65 \r
  66 #define partstALL_OUTPUTS_OFF                   ( ( unsigned portSHORT) 0x00 )\r
  67 #define partstMAX_OUTPUT_LED                    ( ( unsigned portCHAR ) 7 )\r
  68 #define partstPORT_F_ADDR                               ( ( unsigned portSHORT ) 0x605 )\r
  69 #define partstPORT_DIRECTION_REG                ( ( unsigned portSHORT ) 0x606 )\r
  70 #define partstPORT_F_DIR_BIT                    ( ( unsigned portSHORT ) 0x20 )\r
  71 \r
  72 /*lint -e956 File scope parameters okay here. */\r
  73 static volatile unsigned portCHAR ucCurrentOutputValue = partstALL_OUTPUTS_OFF;\r
  74 /*lint +e956 */\r
  75 \r
  76 /*-----------------------------------------------------------\r
  77  * Simple parallel port IO routines.\r
  78  *-----------------------------------------------------------*/\r
  79 \r
  80 void vParTestInitialise( void )\r
  81 {\r
  82 unsigned portSHORT usInput;\r
  83 \r
  84         ucCurrentOutputValue = partstALL_OUTPUTS_OFF;\r
  85 \r
  86         /* Set the direction to output for port F. */\r
  87         usInput = portINPUT_BYTE( partstPORT_DIRECTION_REG );\r
  88         usInput |= partstPORT_F_DIR_BIT;\r
  89         portOUTPUT_BYTE( partstPORT_DIRECTION_REG, usInput );\r
  90 \r
  91         /* Start with all outputs off. */\r
  92         portOUTPUT_BYTE( partstPORT_F_ADDR, partstALL_OUTPUTS_OFF );\r
  93 }\r
  94 /*-----------------------------------------------------------*/\r
  95 \r
  96 void vParTestSetLED( unsigned portBASE_TYPE uxLED, portBASE_TYPE xValue )\r
  97 {\r
  98 unsigned portCHAR ucBit = ( unsigned portCHAR ) 1;\r
  99 \r
 100         if( uxLED <= partstMAX_OUTPUT_LED )\r
 101         {\r
 102                 ucBit <<= uxLED;\r
 103         }       \r
 104 \r
 105         vTaskSuspendAll();\r
 106         {\r
 107                 if( xValue == pdTRUE )\r
 108                 {\r
 109                         ucBit ^= ( unsigned portCHAR ) 0xff;\r
 110                         ucCurrentOutputValue &= ucBit;\r
 111                 }\r
 112                 else\r
 113                 {\r
 114                         ucCurrentOutputValue |= ucBit;\r
 115                 }\r
 116 \r
 117                 portOUTPUT_BYTE( partstPORT_F_ADDR, ( unsigned ) ucCurrentOutputValue );\r
 118         }\r
 119         xTaskResumeAll();\r
 120 }\r
 121 /*-----------------------------------------------------------*/\r
 122 \r
 123 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 124 {\r
 125 unsigned portCHAR ucBit;\r
 126 \r
 127         if( uxLED <= partstMAX_OUTPUT_LED )\r
 128         {\r
 129                 ucBit = ( ( unsigned portCHAR ) 1 ) << uxLED;\r
 130 \r
 131                 vTaskSuspendAll();\r
 132                 {\r
 133                         if( ucCurrentOutputValue & ucBit )\r
 134                         {\r
 135                                 ucCurrentOutputValue &= ~ucBit;\r
 136                         }\r
 137                         else\r
 138                         {\r
 139                                 ucCurrentOutputValue |= ucBit;\r
 140                         }\r
 141 \r
 142                         portOUTPUT_BYTE( partstPORT_F_ADDR, ( unsigned ) ucCurrentOutputValue );\r
 143                 }\r
 144                 xTaskResumeAll();                       \r
 145         }\r
 146 }\r
 147 \r