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

   1 /*\r
   2         FreeRTOS.org V5.3.0 - 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 it\r
   7         under the terms of the GNU General Public License (version 2) as published\r
   8         by the Free Software Foundation and modified by the FreeRTOS exception.\r
   9         **NOTE** The exception to the GPL is included to allow you to distribute a\r
  10         combined work that includes FreeRTOS.org without being obliged to provide\r
  11         the source code for any proprietary components.  Alternative commercial\r
  12         license and support terms are also available upon request.  See the \r
  13         licensing section of http://www.FreeRTOS.org for full details.\r
  14 \r
  15         FreeRTOS.org is distributed in the hope that it will be useful, but WITHOUT\r
  16         ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or\r
  17         FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for\r
  18         more details.\r
  19 \r
  20         You should have received a copy of the GNU General Public License along\r
  21         with FreeRTOS.org; if not, write to the Free Software Foundation, Inc., 59\r
  22         Temple Place, Suite 330, Boston, MA  02111-1307  USA.\r
  23 \r
  24 \r
  25         ***************************************************************************\r
  26         *                                                                         *\r
  27         * Get the FreeRTOS eBook!  See http://www.FreeRTOS.org/Documentation      *\r
  28         *                                                                         *\r
  29         * This is a concise, step by step, 'hands on' guide that describes both   *\r
  30         * general multitasking concepts and FreeRTOS specifics. It presents and   *\r
  31         * explains numerous examples that are written using the FreeRTOS API.     *\r
  32         * Full source code for all the examples is provided in an accompanying    *\r
  33         * .zip file.                                                              *\r
  34         *                                                                         *\r
  35         ***************************************************************************\r
  36 \r
  37         1 tab == 4 spaces!\r
  38 \r
  39         Please ensure to read the configuration and relevant port sections of the\r
  40         online documentation.\r
  41 \r
  42         http://www.FreeRTOS.org - Documentation, latest information, license and\r
  43         contact details.\r
  44 \r
  45         http://www.SafeRTOS.com - A version that is certified for use in safety\r
  46         critical systems.\r
  47 \r
  48         http://www.OpenRTOS.com - Commercial support, development, porting,\r
  49         licensing and training services.\r
  50 */\r
  51 \r
  52 /* Scheduler includes. */\r
  53 #include "FreeRTOS.h"\r
  54 #include "portable.h"\r
  55 \r
  56 /* Demo app includes. */\r
  57 #include "partest.h"\r
  58 \r
  59 /* Hardware specific definitions. */\r
  60 #include "AT91R40008.h"\r
  61 #include "pio.h"\r
  62 #include "aic.h"\r
  63 \r
  64 #define partstNUM_LEDS                  ( 8 )\r
  65 #define partstALL_OUTPUTS_OFF   ( ( unsigned portLONG ) ~(0xFFFFFFFF << partstNUM_LEDS) )\r
  66 \r
  67 static unsigned portLONG ulLEDReg;\r
  68 \r
  69 /*-----------------------------------------------------------\r
  70  * Simple parallel port IO routines.\r
  71  *-----------------------------------------------------------*/\r
  72 \r
  73 static void SetLeds (unsigned int leds)\r
  74 {\r
  75 unsigned portLONG ulPIOSetReg, ulPIOClearReg;\r
  76 \r
  77         /* LEDs are grouped in different port bits: P3-P6 and P16-P19.\r
  78         A port bit set to '0' turns an LED on, '1' turns it off. */\r
  79 \r
  80         ulPIOSetReg = ( (leds & 0xF) << 16 ) | ( (leds & 0xF0) >> 1 );\r
  81         ulPIOClearReg = (~ulPIOSetReg) & 0x000F0078;\r
  82 \r
  83         AT91C_BASE_PIO->PIO_SODR = ulPIOSetReg;\r
  84         AT91C_BASE_PIO->PIO_CODR = ulPIOClearReg;\r
  85 }\r
  86 /*-----------------------------------------------------------*/\r
  87 \r
  88 void vParTestInitialise( void )\r
  89 {\r
  90         /* This is performed from main() as the io bits are shared with other setup\r
  91         functions.  Ensure the outputs are off to start. */\r
  92         ulLEDReg = partstALL_OUTPUTS_OFF;  \r
  93 \r
  94         /* Enable clock to PIO... */\r
  95         AT91C_BASE_PS->PS_PCER = AT91C_PS_PIO;\r
  96 \r
  97         /* Enable all 8 LEDs and the four switches to be controlled by PIO... */\r
  98         AT91C_BASE_PIO->PIO_PER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19 | P1 | P2 | P9 | P12;\r
  99 \r
 100         /* Configure all LED PIO lines for output... */\r
 101         AT91C_BASE_PIO->PIO_OER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19;\r
 102 \r
 103         /* Configure all switch PIO lines for input... */\r
 104         AT91C_BASE_PIO->PIO_ODR = P1 | P2 | P9 | P12;\r
 105 \r
 106         /* Set initial state of LEDs. */\r
 107         SetLeds( ulLEDReg );\r
 108 }\r
 109 /*-----------------------------------------------------------*/\r
 110 \r
 111 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )\r
 112 {\r
 113         /* Switch an LED on or off as requested. */\r
 114         if (uxLED < partstNUM_LEDS)\r
 115         {\r
 116                 if( xValue )\r
 117                 {\r
 118                         ulLEDReg &= ~(1 << uxLED);\r
 119                 }\r
 120                 else\r
 121                 {\r
 122                         ulLEDReg |= (1 << uxLED);\r
 123                 }\r
 124 \r
 125                 SetLeds( ulLEDReg );\r
 126         }\r
 127 }\r
 128 /*-----------------------------------------------------------*/\r
 129 \r
 130 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )\r
 131 {\r
 132         /* Toggle the state of the requested LED. */\r
 133         if (uxLED < partstNUM_LEDS)\r
 134         {\r
 135                 ulLEDReg ^= ( 1 << uxLED );\r
 136                 SetLeds( ulLEDReg );\r
 137         }\r
 138 }\r
 139 \r