begriffs open source - freertos/blob - Demo/PPC405_Xilinx_Virtex4_GCC/RTOSDemo/partest/partest.c

   1 /*\r
   2         FreeRTOS.org V5.1.2 - Copyright (C) 2003-2009 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     * Get the FreeRTOS eBook!  See http://www.FreeRTOS.org/Documentation      *\r
  30         *                                                                         *\r
  31         * This is a concise, step by step, 'hands on' guide that describes both   *\r
  32         * general multitasking concepts and FreeRTOS specifics. It presents and   *\r
  33         * explains numerous examples that are written using the FreeRTOS API.     *\r
  34         * Full source code for all the examples is provided in an accompanying    *\r
  35         * .zip file.                                                              *\r
  36     *                                                                         *\r
  37     ***************************************************************************\r
  38     ***************************************************************************\r
  39 \r
  40         Please ensure to read the configuration and relevant port sections of the\r
  41         online documentation.\r
  42 \r
  43         http://www.FreeRTOS.org - Documentation, latest information, license and \r
  44         contact details.\r
  45 \r
  46         http://www.SafeRTOS.com - A version that is certified for use in safety \r
  47         critical systems.\r
  48 \r
  49         http://www.OpenRTOS.com - Commercial support, development, porting, \r
  50         licensing and training services.\r
  51 */\r
  52 \r
  53 \r
  54 /* Scheduler includes. */\r
  55 #include "FreeRTOS.h"\r
  56 \r
  57 /* Demo application includes. */\r
  58 #include "partest.h"\r
  59 \r
  60 /* Library includes. */\r
  61 #include "xparameters.h"\r
  62 #include "xgpio_l.h"\r
  63 \r
  64 /* Misc hardware specific definitions. */\r
  65 #define partstALL_AS_OUTPUT     0x00\r
  66 #define partstCHANNEL_1         0x01\r
  67 #define partstMAX_4BIT_LED      0x03\r
  68 \r
  69 /* The outputs are split into two IO sections, these variables maintain the \r
  70 current value of either section. */\r
  71 static unsigned portBASE_TYPE uxCurrentOutput4Bit, uxCurrentOutput5Bit;\r
  72 \r
  73 /*-----------------------------------------------------------*/\r
  74 /*\r
  75  * Setup the IO for the LED outputs.\r
  76  */\r
  77 void vParTestInitialise( void )\r
  78 {\r
  79         /* Set both sets of LED's on the demo board to outputs. */\r
  80         XGpio_mSetDataDirection( XPAR_LEDS_4BIT_BASEADDR, partstCHANNEL_1, partstALL_AS_OUTPUT );\r
  81         XGpio_mSetDataDirection( XPAR_LEDS_POSITIONS_BASEADDR, partstCHANNEL_1, partstALL_AS_OUTPUT );\r
  82 \r
  83         /* Start with all outputs off. */\r
  84         uxCurrentOutput4Bit = 0;\r
  85         XGpio_mSetDataReg( XPAR_LEDS_4BIT_BASEADDR, partstCHANNEL_1, 0x00 );\r
  86         uxCurrentOutput5Bit = 0;\r
  87         XGpio_mSetDataReg( XPAR_LEDS_POSITIONS_BASEADDR, partstCHANNEL_1, 0x00 );\r
  88 }\r
  89 /*-----------------------------------------------------------*/\r
  90 \r
  91 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
  92 {\r
  93 unsigned portBASE_TYPE uxBaseAddress, *puxCurrentValue;\r
  94 \r
  95         portENTER_CRITICAL();\r
  96         {\r
  97                 /* Which IO section does the LED being set/cleared belong to?  The\r
  98                 4 bit or 5 bit outputs? */\r
  99                 if( uxLED <= partstMAX_4BIT_LED )\r
 100                 {\r
 101                         uxBaseAddress = XPAR_LEDS_4BIT_BASEADDR;\r
 102                         puxCurrentValue = &uxCurrentOutput5Bit;\r
 103                 }       \r
 104                 else\r
 105                 {\r
 106                         uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR;\r
 107                         puxCurrentValue = &uxCurrentOutput4Bit;\r
 108                         uxLED -= partstMAX_4BIT_LED;\r
 109                 }\r
 110 \r
 111                 /* Setup the bit mask accordingly. */\r
 112                 uxLED = 0x01 << uxLED;\r
 113 \r
 114                 /* Maintain the current output value. */\r
 115                 if( xValue )\r
 116                 {\r
 117                         *puxCurrentValue |= uxLED;\r
 118                 }\r
 119                 else\r
 120                 {\r
 121                         *puxCurrentValue &= ~uxLED;\r
 122                 }\r
 123 \r
 124                 /* Write the value to the port. */\r
 125                 XGpio_mSetDataReg( uxBaseAddress, partstCHANNEL_1, *puxCurrentValue );\r
 126         }\r
 127         portEXIT_CRITICAL();\r
 128 }\r
 129 /*-----------------------------------------------------------*/\r
 130 \r
 131 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 132 {\r
 133 unsigned portBASE_TYPE uxBaseAddress, *puxCurrentValue;\r
 134 \r
 135         portENTER_CRITICAL();\r
 136         {\r
 137                 /* Which IO section does the LED being toggled belong to?  The\r
 138                 4 bit or 5 bit outputs? */\r
 139                 if( uxLED <= partstMAX_4BIT_LED )\r
 140                 {\r
 141 \r
 142                         uxBaseAddress = XPAR_LEDS_4BIT_BASEADDR;\r
 143                         puxCurrentValue = &uxCurrentOutput5Bit;\r
 144                 }       \r
 145                 else\r
 146                 {\r
 147                         uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR;\r
 148                         puxCurrentValue = &uxCurrentOutput4Bit;\r
 149                         uxLED -= partstMAX_4BIT_LED;\r
 150                 }\r
 151 \r
 152                 /* Setup the bit mask accordingly. */\r
 153                 uxLED = 0x01 << uxLED;\r
 154 \r
 155                 /* Maintain the current output value. */\r
 156                 if( *puxCurrentValue & uxLED )\r
 157                 {\r
 158                         *puxCurrentValue &= ~uxLED;\r
 159                 }\r
 160                 else\r
 161                 {\r
 162                         *puxCurrentValue |= uxLED;\r
 163                 }\r
 164 \r
 165                 /* Write the value to the port. */\r
 166                 XGpio_mSetDataReg(uxBaseAddress, partstCHANNEL_1, *puxCurrentValue );\r
 167         }\r
 168         portEXIT_CRITICAL();\r
 169 }\r
 170 \r
 171 \r