2 FreeRTOS.org V5.2.0 - Copyright (C) 2003-2009 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 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
10 FreeRTOS.org is distributed in the hope that it will be useful, but WITHOUT
\r
11 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
\r
12 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
\r
15 You should have received a copy of the GNU General Public License along
\r
16 with FreeRTOS.org; if not, write to the Free Software Foundation, Inc., 59
\r
17 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
\r
19 A special exception to the GPL is included to allow you to distribute a
\r
20 combined work that includes FreeRTOS.org without being obliged to provide
\r
21 the source code for any proprietary components. See the licensing section
\r
22 of http://www.FreeRTOS.org for full details.
\r
25 ***************************************************************************
\r
27 * Get the FreeRTOS eBook! See http://www.FreeRTOS.org/Documentation *
\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
35 ***************************************************************************
\r
39 Please ensure to read the configuration and relevant port sections of the
\r
40 online documentation.
\r
42 http://www.FreeRTOS.org - Documentation, latest information, license and
\r
45 http://www.SafeRTOS.com - A version that is certified for use in safety
\r
48 http://www.OpenRTOS.com - Commercial support, development, porting,
\r
49 licensing and training services.
\r
52 /* Scheduler includes. */
\r
53 #include "FreeRTOS.h"
\r
54 #include "portable.h"
\r
56 /* Demo app includes. */
\r
57 #include "partest.h"
\r
59 /* Hardware specific definitions. */
\r
60 #include "AT91R40008.h"
\r
64 #define partstNUM_LEDS ( 8 )
\r
65 #define partstALL_OUTPUTS_OFF ( ( unsigned portLONG ) ~(0xFFFFFFFF << partstNUM_LEDS) )
\r
67 static unsigned portLONG ulLEDReg;
\r
69 /*-----------------------------------------------------------
\r
70 * Simple parallel port IO routines.
\r
71 *-----------------------------------------------------------*/
\r
73 static void SetLeds (unsigned int leds)
\r
75 unsigned portLONG ulPIOSetReg, ulPIOClearReg;
\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
80 ulPIOSetReg = ( (leds & 0xF) << 16 ) | ( (leds & 0xF0) >> 1 );
\r
81 ulPIOClearReg = (~ulPIOSetReg) & 0x000F0078;
\r
83 AT91C_BASE_PIO->PIO_SODR = ulPIOSetReg;
\r
84 AT91C_BASE_PIO->PIO_CODR = ulPIOClearReg;
\r
86 /*-----------------------------------------------------------*/
\r
88 void vParTestInitialise( void )
\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
94 /* Enable clock to PIO... */
\r
95 AT91C_BASE_PS->PS_PCER = AT91C_PS_PIO;
\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
100 /* Configure all LED PIO lines for output... */
\r
101 AT91C_BASE_PIO->PIO_OER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19;
\r
103 /* Configure all switch PIO lines for input... */
\r
104 AT91C_BASE_PIO->PIO_ODR = P1 | P2 | P9 | P12;
\r
106 /* Set initial state of LEDs. */
\r
107 SetLeds( ulLEDReg );
\r
109 /*-----------------------------------------------------------*/
\r
111 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )
\r
113 /* Switch an LED on or off as requested. */
\r
114 if (uxLED < partstNUM_LEDS)
\r
118 ulLEDReg &= ~(1 << uxLED);
\r
122 ulLEDReg |= (1 << uxLED);
\r
125 SetLeds( ulLEDReg );
\r
128 /*-----------------------------------------------------------*/
\r
130 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )
\r
132 /* Toggle the state of the requested LED. */
\r
133 if (uxLED < partstNUM_LEDS)
\r
135 ulLEDReg ^= ( 1 << uxLED );
\r
136 SetLeds( ulLEDReg );
\r