2 FreeRTOS.org V5.1.2 - 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
\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 * Get the FreeRTOS eBook! See http://www.FreeRTOS.org/Documentation *
\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
37 ***************************************************************************
\r
38 ***************************************************************************
\r
40 Please ensure to read the configuration and relevant port sections of the
\r
41 online documentation.
\r
43 http://www.FreeRTOS.org - Documentation, latest information, license and
\r
46 http://www.SafeRTOS.com - A version that is certified for use in safety
\r
49 http://www.OpenRTOS.com - Commercial support, development, porting,
\r
50 licensing and training services.
\r
53 /* Scheduler includes. */
\r
54 #include "FreeRTOS.h"
\r
55 #include "portable.h"
\r
57 /* Demo app includes. */
\r
58 #include "partest.h"
\r
60 /* Hardware specific definitions. */
\r
61 #include "AT91R40008.h"
\r
65 #define partstNUM_LEDS ( 8 )
\r
66 #define partstALL_OUTPUTS_OFF ( ( unsigned portLONG ) ~(0xFFFFFFFF << partstNUM_LEDS) )
\r
68 static unsigned portLONG ulLEDReg;
\r
70 /*-----------------------------------------------------------
\r
71 * Simple parallel port IO routines.
\r
72 *-----------------------------------------------------------*/
\r
74 static void SetLeds (unsigned int leds)
\r
76 unsigned portLONG ulPIOSetReg, ulPIOClearReg;
\r
78 /* LEDs are grouped in different port bits: P3-P6 and P16-P19.
\r
79 A port bit set to '0' turns an LED on, '1' turns it off. */
\r
81 ulPIOSetReg = ( (leds & 0xF) << 16 ) | ( (leds & 0xF0) >> 1 );
\r
82 ulPIOClearReg = (~ulPIOSetReg) & 0x000F0078;
\r
84 AT91C_BASE_PIO->PIO_SODR = ulPIOSetReg;
\r
85 AT91C_BASE_PIO->PIO_CODR = ulPIOClearReg;
\r
87 /*-----------------------------------------------------------*/
\r
89 void vParTestInitialise( void )
\r
91 /* This is performed from main() as the io bits are shared with other setup
\r
92 functions. Ensure the outputs are off to start. */
\r
93 ulLEDReg = partstALL_OUTPUTS_OFF;
\r
95 /* Enable clock to PIO... */
\r
96 AT91C_BASE_PS->PS_PCER = AT91C_PS_PIO;
\r
98 /* Enable all 8 LEDs and the four switches to be controlled by PIO... */
\r
99 AT91C_BASE_PIO->PIO_PER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19 | P1 | P2 | P9 | P12;
\r
101 /* Configure all LED PIO lines for output... */
\r
102 AT91C_BASE_PIO->PIO_OER = P3 | P4 | P5 | P6 | P16 | P17 | P18 | P19;
\r
104 /* Configure all switch PIO lines for input... */
\r
105 AT91C_BASE_PIO->PIO_ODR = P1 | P2 | P9 | P12;
\r
107 /* Set initial state of LEDs. */
\r
108 SetLeds( ulLEDReg );
\r
110 /*-----------------------------------------------------------*/
\r
112 void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue )
\r
114 /* Switch an LED on or off as requested. */
\r
115 if (uxLED < partstNUM_LEDS)
\r
119 ulLEDReg &= ~(1 << uxLED);
\r
123 ulLEDReg |= (1 << uxLED);
\r
126 SetLeds( ulLEDReg );
\r
129 /*-----------------------------------------------------------*/
\r
131 void vParTestToggleLED( unsigned portBASE_TYPE uxLED )
\r
133 /* Toggle the state of the requested LED. */
\r
134 if (uxLED < partstNUM_LEDS)
\r
136 ulLEDReg ^= ( 1 << uxLED );
\r
137 SetLeds( ulLEDReg );
\r