Add FreeRTOS-Plus directory.

git-svn-id: http://svn.code.sf.net/p/freertos/code/trunk@1765 1d2547de-c912-0410-9cb9-b8ca96c0e9e2

1 files changed, 186 insertions, 0 deletions

diff --git a/FreeRTOS/Demo/MicroBlaze/ParTest/ParTest.c b/FreeRTOS/Demo/MicroBlaze/ParTest/ParTest.c
new file mode 100644
index 000000000..fb8ce3357
--- /dev/null
+++ b/FreeRTOS/Demo/MicroBlaze/ParTest/ParTest.c
@@ -0,0 +1,186 @@
+/*

+    FreeRTOS V7.1.1 - Copyright (C) 2012 Real Time Engineers Ltd.

+	

+

+    ***************************************************************************

+     *                                                                       *

+     *    FreeRTOS tutorial books are available in pdf and paperback.        *

+     *    Complete, revised, and edited pdf reference manuals are also       *

+     *    available.                                                         *

+     *                                                                       *

+     *    Purchasing FreeRTOS documentation will not only help you, by       *

+     *    ensuring you get running as quickly as possible and with an        *

+     *    in-depth knowledge of how to use FreeRTOS, it will also help       *

+     *    the FreeRTOS project to continue with its mission of providing     *

+     *    professional grade, cross platform, de facto standard solutions    *

+     *    for microcontrollers - completely free of charge!                  *

+     *                                                                       *

+     *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *

+     *                                                                       *

+     *    Thank you for using FreeRTOS, and thank you for your support!      *

+     *                                                                       *

+    ***************************************************************************

+

+

+    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.  See the GNU General Public License for

+    more details. You should have received a copy of the GNU General Public

+    License and the FreeRTOS license exception along with FreeRTOS; if not it

+    can be viewed here: http://www.freertos.org/a00114.html and also obtained

+    by writing to Richard Barry, contact details for whom are available on the

+    FreeRTOS WEB site.

+

+    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, training, latest information, 

+    license and contact details.

+    

+    http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,

+    including FreeRTOS+Trace - an indispensable productivity tool.

+

+    Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell 

+    the code with commercial support, indemnification, and middleware, under 

+    the OpenRTOS brand: http://www.OpenRTOS.com.  High Integrity Systems also

+    provide a safety engineered and independently SIL3 certified version under 

+    the SafeRTOS brand: http://www.SafeRTOS.com.

+*/

+

+/*-----------------------------------------------------------

+ * Simple parallel port IO routines.

+ *-----------------------------------------------------------*/

+

+/* Kernel includes. */

+#include "FreeRTOS.h"

+

+/* Demo application includes. */

+#include "partest.h"

+

+/* Library includes. */

+#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 = &uxCurrentOutput4Bit;

+		}	

+		else

+		{

+			uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR;

+			puxCurrentValue = &uxCurrentOutput5Bit;

+			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 = &uxCurrentOutput4Bit;

+		}	

+		else

+		{

+			uxBaseAddress = XPAR_LEDS_POSITIONS_BASEADDR;

+			puxCurrentValue = &uxCurrentOutput5Bit;

+			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();

+}

+

+