brians | 0ab60bb | 2013-01-31 02:21:51 +0000 | [diff] [blame] | 1 | /* |
| 2 | FreeRTOS V6.0.5 - Copyright (C) 2010 Real Time Engineers Ltd. |
| 3 | |
| 4 | *************************************************************************** |
| 5 | * * |
| 6 | * If you are: * |
| 7 | * * |
| 8 | * + New to FreeRTOS, * |
| 9 | * + Wanting to learn FreeRTOS or multitasking in general quickly * |
| 10 | * + Looking for basic training, * |
| 11 | * + Wanting to improve your FreeRTOS skills and productivity * |
| 12 | * * |
| 13 | * then take a look at the FreeRTOS eBook * |
| 14 | * * |
| 15 | * "Using the FreeRTOS Real Time Kernel - a Practical Guide" * |
| 16 | * http://www.FreeRTOS.org/Documentation * |
| 17 | * * |
| 18 | * A pdf reference manual is also available. Both are usually delivered * |
| 19 | * to your inbox within 20 minutes to two hours when purchased between 8am * |
| 20 | * and 8pm GMT (although please allow up to 24 hours in case of * |
| 21 | * exceptional circumstances). Thank you for your support! * |
| 22 | * * |
| 23 | *************************************************************************** |
| 24 | |
| 25 | This file is part of the FreeRTOS distribution. |
| 26 | |
| 27 | FreeRTOS is free software; you can redistribute it and/or modify it under |
| 28 | the terms of the GNU General Public License (version 2) as published by the |
| 29 | Free Software Foundation AND MODIFIED BY the FreeRTOS exception. |
| 30 | ***NOTE*** The exception to the GPL is included to allow you to distribute |
| 31 | a combined work that includes FreeRTOS without being obliged to provide the |
| 32 | source code for proprietary components outside of the FreeRTOS kernel. |
| 33 | FreeRTOS is distributed in the hope that it will be useful, but WITHOUT |
| 34 | ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| 35 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for |
| 36 | more details. You should have received a copy of the GNU General Public |
| 37 | License and the FreeRTOS license exception along with FreeRTOS; if not it |
| 38 | can be viewed here: http://www.freertos.org/a00114.html and also obtained |
| 39 | by writing to Richard Barry, contact details for whom are available on the |
| 40 | FreeRTOS WEB site. |
| 41 | |
| 42 | 1 tab == 4 spaces! |
| 43 | |
| 44 | http://www.FreeRTOS.org - Documentation, latest information, license and |
| 45 | contact details. |
| 46 | |
| 47 | http://www.SafeRTOS.com - A version that is certified for use in safety |
| 48 | critical systems. |
| 49 | |
| 50 | http://www.OpenRTOS.com - Commercial support, development, porting, |
| 51 | licensing and training services. |
| 52 | */ |
| 53 | |
| 54 | /* FreeRTOS.org includes. */ |
| 55 | #include "FreeRTOS.h" |
| 56 | |
| 57 | /* Demo application includes. */ |
| 58 | #include "partest.h" |
| 59 | |
| 60 | #define LED_1 ( 1UL << 8UL ) |
| 61 | #define LED_2 ( 1UL << 7UL ) |
| 62 | #define LED_3 ( 1UL << 6UL ) |
| 63 | |
| 64 | #define partstFIO1_BITS ( LED_2 | LED_3 | LED_1) |
| 65 | #define partstNUM_LEDS ( 3 ) |
| 66 | |
| 67 | static unsigned long ulLEDs[] = {LED_1, LED_2, LED_3}; |
| 68 | |
| 69 | /*----------------------------------------------------------- |
| 70 | * Simple parallel port IO routines. |
| 71 | *-----------------------------------------------------------*/ |
| 72 | |
| 73 | void vParTestInitialise(void) |
| 74 | { |
| 75 | /* LEDs on port 2. */ |
| 76 | GPIO2->FIODIR |= partstFIO1_BITS; |
brians | 0ab60bb | 2013-01-31 02:21:51 +0000 | [diff] [blame] | 77 | |
| 78 | /* Start will all LEDs off. */ |
| 79 | GPIO2->FIOCLR = partstFIO1_BITS; |
brians | 0ab60bb | 2013-01-31 02:21:51 +0000 | [diff] [blame] | 80 | } |
| 81 | /*-----------------------------------------------------------*/ |
| 82 | |
| 83 | void vParTestSetLED(unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue) |
| 84 | { |
| 85 | if (uxLED < partstNUM_LEDS) { |
| 86 | if (xValue) { |
| 87 | GPIO2->FIOCLR = ulLEDs[uxLED]; |
| 88 | } else { |
| 89 | GPIO2->FIOSET = ulLEDs[uxLED]; |
| 90 | } |
| 91 | } |
| 92 | } |
| 93 | /*-----------------------------------------------------------*/ |
| 94 | |
| 95 | void vParTestToggleLED(unsigned portBASE_TYPE uxLED) |
| 96 | { |
| 97 | if (uxLED < partstNUM_LEDS) { |
| 98 | if (GPIO2->FIOPIN & ulLEDs[uxLED]) { |
| 99 | GPIO2->FIOCLR = ulLEDs[uxLED]; |
| 100 | } else { |
| 101 | GPIO2->FIOSET = ulLEDs[uxLED]; |
| 102 | } |
| 103 | } |
| 104 | } |
| 105 | /*-----------------------------------------------------------*/ |
| 106 | |
| 107 | unsigned portBASE_TYPE uxParTextGetLED(unsigned portBASE_TYPE uxLED) |
| 108 | { |
| 109 | if (uxLED < partstNUM_LEDS) { |
| 110 | return (GPIO2->FIOPIN & ulLEDs[uxLED]); |
| 111 | } else { |
| 112 | return 0; |
| 113 | } |
| 114 | } |
| 115 | /*-----------------------------------------------------------*/ |