/* FreeRTOS V8.1.1 - Copyright (C) 2014 Real Time Engineers Ltd. All rights reserved VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION. *************************************************************************** * * * FreeRTOS provides completely free yet professionally developed, * * robust, strictly quality controlled, supported, and cross * * platform software that has become a de facto standard. * * * * Help yourself get started quickly and support the FreeRTOS * * project by purchasing a FreeRTOS tutorial book, reference * * manual, or both from: http://www.FreeRTOS.org/Documentation * * * * Thank you! * * * *************************************************************************** This file is part of the FreeRTOS distribution. FreeRTOS is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License (version 2) as published by the Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception. >>! NOTE: The modification to the GPL is included to allow you to !<< >>! distribute a combined work that includes FreeRTOS without being !<< >>! obliged to provide the source code for proprietary components !<< >>! outside of the FreeRTOS kernel. !<< FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Full license text is available from the following link: http://www.freertos.org/a00114.html 1 tab == 4 spaces! *************************************************************************** * * * Having a problem? Start by reading the FAQ "My application does * * not run, what could be wrong?" * * * * http://www.FreeRTOS.org/FAQHelp.html * * * *************************************************************************** http://www.FreeRTOS.org - Documentation, books, training, latest versions, license and Real Time Engineers Ltd. contact details. http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products, including FreeRTOS+Trace - an indispensable productivity tool, a DOS compatible FAT file system, and our tiny thread aware UDP/IP stack. http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS licenses offer ticketed support, indemnification and middleware. http://www.SafeRTOS.com - High Integrity Systems also provide a safety engineered and independently SIL3 certified version for use in safety and mission critical applications that require provable dependability. 1 tab == 4 spaces! */ /* Scheduler includes. */ #include "FreeRTOS.h" /* Demo application includes. */ #include "partest.h" /* Library includes. */ #include "xparameters.h" #include "xgpio_l.h" /* Misc hardware specific definitions. */ #define partstALL_AS_OUTPUT 0x00 #define partstCHANNEL_1 0x01 #define partstMAX_4BIT_LED 0x03 /* The outputs are split into two IO sections, these variables maintain the current value of either section. */ static unsigned portBASE_TYPE uxCurrentOutput4Bit, uxCurrentOutput5Bit; /*-----------------------------------------------------------*/ /* * Setup the IO for the LED outputs. */ void vParTestInitialise( void ) { /* Set both sets of LED's on the demo board to outputs. */ XGpio_mSetDataDirection( XPAR_LEDS_4BIT_BASEADDR, partstCHANNEL_1, partstALL_AS_OUTPUT ); XGpio_mSetDataDirection( XPAR_LEDS_POSITIONS_BASEADDR, partstCHANNEL_1, partstALL_AS_OUTPUT ); /* Start with all outputs off. */ uxCurrentOutput4Bit = 0; XGpio_mSetDataReg( XPAR_LEDS_4BIT_BASEADDR, partstCHANNEL_1, 0x00 ); uxCurrentOutput5Bit = 0; XGpio_mSetDataReg( XPAR_LEDS_POSITIONS_BASEADDR, partstCHANNEL_1, 0x00 ); } /*-----------------------------------------------------------*/ void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue ) { unsigned portBASE_TYPE uxBaseAddress, *puxCurrentValue; portENTER_CRITICAL(); { /* Which IO section does the LED being set/cleared belong to? The 4 bit or 5 bit outputs? */ if( uxLED <= partstMAX_4BIT_LED ) { uxBaseAddress = XPAR_LEDS_4BIT_BASEADDR; puxCurrentValue = &uxCurrentOutput5Bit; } else { uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR; puxCurrentValue = &uxCurrentOutput4Bit; uxLED -= partstMAX_4BIT_LED; } /* Setup the bit mask accordingly. */ uxLED = 0x01 << uxLED; /* Maintain the current output value. */ if( xValue ) { *puxCurrentValue |= uxLED; } else { *puxCurrentValue &= ~uxLED; } /* Write the value to the port. */ XGpio_mSetDataReg( uxBaseAddress, partstCHANNEL_1, *puxCurrentValue ); } portEXIT_CRITICAL(); } /*-----------------------------------------------------------*/ void vParTestToggleLED( unsigned portBASE_TYPE uxLED ) { unsigned portBASE_TYPE uxBaseAddress, *puxCurrentValue; portENTER_CRITICAL(); { /* Which IO section does the LED being toggled belong to? The 4 bit or 5 bit outputs? */ if( uxLED <= partstMAX_4BIT_LED ) { uxBaseAddress = XPAR_LEDS_4BIT_BASEADDR; puxCurrentValue = &uxCurrentOutput5Bit; } else { uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR; puxCurrentValue = &uxCurrentOutput4Bit; uxLED -= partstMAX_4BIT_LED; } /* Setup the bit mask accordingly. */ uxLED = 0x01 << uxLED; /* Maintain the current output value. */ if( *puxCurrentValue & uxLED ) { *puxCurrentValue &= ~uxLED; } else { *puxCurrentValue |= uxLED; } /* Write the value to the port. */ XGpio_mSetDataReg(uxBaseAddress, partstCHANNEL_1, *puxCurrentValue ); } portEXIT_CRITICAL(); }