2 FreeRTOS.org V5.1.1 - Copyright (C) 2003-2008 Richard Barry.
\r
4 This file is part of the FreeRTOS.org distribution.
\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
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
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
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
26 ***************************************************************************
\r
27 ***************************************************************************
\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
34 ***************************************************************************
\r
35 ***************************************************************************
\r
37 Please ensure to read the configuration and relevant port sections of the
\r
38 online documentation.
\r
40 http://www.FreeRTOS.org - Documentation, latest information, license and
\r
43 http://www.SafeRTOS.com - A version that is certified for use in safety
\r
46 http://www.OpenRTOS.com - Commercial support, development, porting,
\r
47 licensing and training services.
\r
50 /* Scheduler includes. */
\r
51 #include "FreeRTOS.h"
\r
52 #include "portable.h"
\r
54 /* Demo app includes. */
\r
55 #include "partest.h"
\r
57 /* Hardware specific definitions. */
\r
58 #include "AT91R40008.h"
\r
62 #define partstNUM_LEDS ( 8 )
\r
63 #define partstALL_OUTPUTS_OFF ( ( unsigned portLONG ) ~(0xFFFFFFFF << partstNUM_LEDS) )
\r
65 static unsigned portLONG ulLEDReg;
\r
67 /*-----------------------------------------------------------
\r
68 * Simple parallel port IO routines.
\r
69 *-----------------------------------------------------------*/
\r
71 static void SetLeds (unsigned int leds)
\r
73 unsigned portLONG ulPIOSetReg, ulPIOClearReg;
\r
75 /* LEDs are grouped in different port bits: P3-P6 and P16-P19.
\r
76 A port bit set to '0' turns an LED on, '1' turns it off. */
\r
78 ulPIOSetReg = ( (leds & 0xF) << 16 ) | ( (leds & 0xF0) >> 1 );
\r
79 ulPIOClearReg = (~ulPIOSetReg) & 0x000F0078;
\r
81 AT91C_BASE_PIO->PIO_SODR = ulPIOSetReg;
\r
82 AT91C_BASE_PIO->PIO_CODR = ulPIOClearReg;
\r
84 /*-----------------------------------------------------------*/
\r
86 void vParTestInitialise( void )
\r
88 /* This is performed from main() as the io bits are shared with other setup
\r
89 functions. Ensure the outputs are off to start. */
\r
90 ulLEDReg = partstALL_OUTPUTS_OFF;
\r
92 /* Enable clock to PIO... */
\r
93 AT91C_BASE_PS->PS_PCER = AT91C_PS_PIO;
\r
95 /* Enable all 8 LEDs and the four switches to be controlled by PIO... */
\r
96 AT91C_BASE_PIO->PIO_PER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19 | P1 | P2 | P9 | P12;
\r
98 /* Configure all LED PIO lines for output... */
\r
99 AT91C_BASE_PIO->PIO_OER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19;
\r
101 /* Configure all switch PIO lines for input... */
\r
102 AT91C_BASE_PIO->PIO_ODR = P1 | P2 | P9 | P12;
\r
104 /* Set initial state of LEDs. */
\r
105 SetLeds( ulLEDReg );
\r
107 /*-----------------------------------------------------------*/
\r
109 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )
\r
111 /* Switch an LED on or off as requested. */
\r
112 if (uxLED < partstNUM_LEDS)
\r
116 ulLEDReg &= ~(1 << uxLED);
\r
120 ulLEDReg |= (1 << uxLED);
\r
123 SetLeds( ulLEDReg );
\r
126 /*-----------------------------------------------------------*/
\r
128 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )
\r
130 /* Toggle the state of the requested LED. */
\r
131 if (uxLED < partstNUM_LEDS)
\r
133 ulLEDReg ^= ( 1 << uxLED );
\r
134 SetLeds( ulLEDReg );
\r