Please see my note book http://mbed.org/users/kenjiArai/notebook/freertos-on-mbed-board-with-mbed-cloud-ide--never-/
This is too old.
Below is another FreeRTOS on mbed.
http://developer.mbed.org/users/rgrover1/code/FreeRTOS/
I don't know it works well or not.
I have not evaluated it.
ParTest.c@0:d4960fcea8ff, 2011-01-01 (annotated)
- Committer:
- kenjiArai
- Date:
- Sat Jan 01 11:17:45 2011 +0000
- Revision:
- 0:d4960fcea8ff
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
kenjiArai | 0:d4960fcea8ff | 1 | /* |
kenjiArai | 0:d4960fcea8ff | 2 | FreeRTOS V6.0.3 - Copyright (C) 2010 Real Time Engineers Ltd. |
kenjiArai | 0:d4960fcea8ff | 3 | |
kenjiArai | 0:d4960fcea8ff | 4 | *************************************************************************** |
kenjiArai | 0:d4960fcea8ff | 5 | * * |
kenjiArai | 0:d4960fcea8ff | 6 | * If you are: * |
kenjiArai | 0:d4960fcea8ff | 7 | * * |
kenjiArai | 0:d4960fcea8ff | 8 | * + New to FreeRTOS, * |
kenjiArai | 0:d4960fcea8ff | 9 | * + Wanting to learn FreeRTOS or multitasking in general quickly * |
kenjiArai | 0:d4960fcea8ff | 10 | * + Looking for basic training, * |
kenjiArai | 0:d4960fcea8ff | 11 | * + Wanting to improve your FreeRTOS skills and productivity * |
kenjiArai | 0:d4960fcea8ff | 12 | * * |
kenjiArai | 0:d4960fcea8ff | 13 | * then take a look at the FreeRTOS eBook * |
kenjiArai | 0:d4960fcea8ff | 14 | * * |
kenjiArai | 0:d4960fcea8ff | 15 | * "Using the FreeRTOS Real Time Kernel - a Practical Guide" * |
kenjiArai | 0:d4960fcea8ff | 16 | * http://www.FreeRTOS.org/Documentation * |
kenjiArai | 0:d4960fcea8ff | 17 | * * |
kenjiArai | 0:d4960fcea8ff | 18 | * A pdf reference manual is also available. Both are usually delivered * |
kenjiArai | 0:d4960fcea8ff | 19 | * to your inbox within 20 minutes to two hours when purchased between 8am * |
kenjiArai | 0:d4960fcea8ff | 20 | * and 8pm GMT (although please allow up to 24 hours in case of * |
kenjiArai | 0:d4960fcea8ff | 21 | * exceptional circumstances). Thank you for your support! * |
kenjiArai | 0:d4960fcea8ff | 22 | * * |
kenjiArai | 0:d4960fcea8ff | 23 | *************************************************************************** |
kenjiArai | 0:d4960fcea8ff | 24 | |
kenjiArai | 0:d4960fcea8ff | 25 | This file is part of the FreeRTOS distribution. |
kenjiArai | 0:d4960fcea8ff | 26 | |
kenjiArai | 0:d4960fcea8ff | 27 | FreeRTOS is free software; you can redistribute it and/or modify it under |
kenjiArai | 0:d4960fcea8ff | 28 | the terms of the GNU General Public License (version 2) as published by the |
kenjiArai | 0:d4960fcea8ff | 29 | Free Software Foundation AND MODIFIED BY the FreeRTOS exception. |
kenjiArai | 0:d4960fcea8ff | 30 | ***NOTE*** The exception to the GPL is included to allow you to distribute |
kenjiArai | 0:d4960fcea8ff | 31 | a combined work that includes FreeRTOS without being obliged to provide the |
kenjiArai | 0:d4960fcea8ff | 32 | source code for proprietary components outside of the FreeRTOS kernel. |
kenjiArai | 0:d4960fcea8ff | 33 | FreeRTOS is distributed in the hope that it will be useful, but WITHOUT |
kenjiArai | 0:d4960fcea8ff | 34 | ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
kenjiArai | 0:d4960fcea8ff | 35 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for |
kenjiArai | 0:d4960fcea8ff | 36 | more details. You should have received a copy of the GNU General Public |
kenjiArai | 0:d4960fcea8ff | 37 | License and the FreeRTOS license exception along with FreeRTOS; if not it |
kenjiArai | 0:d4960fcea8ff | 38 | can be viewed here: http://www.freertos.org/a00114.html and also obtained |
kenjiArai | 0:d4960fcea8ff | 39 | by writing to Richard Barry, contact details for whom are available on the |
kenjiArai | 0:d4960fcea8ff | 40 | FreeRTOS WEB site. |
kenjiArai | 0:d4960fcea8ff | 41 | |
kenjiArai | 0:d4960fcea8ff | 42 | 1 tab == 4 spaces! |
kenjiArai | 0:d4960fcea8ff | 43 | |
kenjiArai | 0:d4960fcea8ff | 44 | http://www.FreeRTOS.org - Documentation, latest information, license and |
kenjiArai | 0:d4960fcea8ff | 45 | contact details. |
kenjiArai | 0:d4960fcea8ff | 46 | |
kenjiArai | 0:d4960fcea8ff | 47 | http://www.SafeRTOS.com - A version that is certified for use in safety |
kenjiArai | 0:d4960fcea8ff | 48 | critical systems. |
kenjiArai | 0:d4960fcea8ff | 49 | |
kenjiArai | 0:d4960fcea8ff | 50 | http://www.OpenRTOS.com - Commercial support, development, porting, |
kenjiArai | 0:d4960fcea8ff | 51 | licensing and training services. |
kenjiArai | 0:d4960fcea8ff | 52 | */ |
kenjiArai | 0:d4960fcea8ff | 53 | |
kenjiArai | 0:d4960fcea8ff | 54 | /* |
kenjiArai | 0:d4960fcea8ff | 55 | * Modified for mbed NXP LPC1768 board |
kenjiArai | 0:d4960fcea8ff | 56 | * By Kenji Arai / JH1PJL on March 13th,2010 |
kenjiArai | 0:d4960fcea8ff | 57 | * April 12th, 2010 Changed LPC17xx.h then convert all "GPIO" to "LPC_GPIO" |
kenjiArai | 0:d4960fcea8ff | 58 | * August 1st, 2010 Change Port definition |
kenjiArai | 0:d4960fcea8ff | 59 | * August 28th, 2010 |
kenjiArai | 0:d4960fcea8ff | 60 | */ |
kenjiArai | 0:d4960fcea8ff | 61 | |
kenjiArai | 0:d4960fcea8ff | 62 | |
kenjiArai | 0:d4960fcea8ff | 63 | /* FreeRTOS.org includes. */ |
kenjiArai | 0:d4960fcea8ff | 64 | #include "FreeRTOS.h" |
kenjiArai | 0:d4960fcea8ff | 65 | |
kenjiArai | 0:d4960fcea8ff | 66 | /* Demo application includes. */ |
kenjiArai | 0:d4960fcea8ff | 67 | #include "partest.h" |
kenjiArai | 0:d4960fcea8ff | 68 | |
kenjiArai | 0:d4960fcea8ff | 69 | /*----------------------------------------------------------- |
kenjiArai | 0:d4960fcea8ff | 70 | * Simple parallel port IO routines. |
kenjiArai | 0:d4960fcea8ff | 71 | *-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 72 | #if (USE_XPRESSO == 1) |
kenjiArai | 0:d4960fcea8ff | 73 | void vParTestInitialise( void ) |
kenjiArai | 0:d4960fcea8ff | 74 | { |
kenjiArai | 0:d4960fcea8ff | 75 | /* LEDs on port 1. */ |
kenjiArai | 0:d4960fcea8ff | 76 | LPC_GPIO0->FIODIR = partstFIO1_BITS; |
kenjiArai | 0:d4960fcea8ff | 77 | /* Start will all LEDs off. */ |
kenjiArai | 0:d4960fcea8ff | 78 | LPC_GPIO0->FIOCLR = partstFIO1_BITS; |
kenjiArai | 0:d4960fcea8ff | 79 | |
kenjiArai | 0:d4960fcea8ff | 80 | // Switch |
kenjiArai | 0:d4960fcea8ff | 81 | LPC_GPIO2->FIODIR &= ~0x00; // Input mode |
kenjiArai | 0:d4960fcea8ff | 82 | LPC_PINCON->PINMODE4 |= 0x3f3; // Pull-down P2.0,.2,.3,.4 |
kenjiArai | 0:d4960fcea8ff | 83 | //xprintf("GPIO2 = %x\r\n", LPC_GPIO2->FIOPIN); |
kenjiArai | 0:d4960fcea8ff | 84 | //xprintf("GPIO2.DIR = %x\r\n", LPC_GPIO2->FIODIR); |
kenjiArai | 0:d4960fcea8ff | 85 | } |
kenjiArai | 0:d4960fcea8ff | 86 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 87 | |
kenjiArai | 0:d4960fcea8ff | 88 | void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue ) |
kenjiArai | 0:d4960fcea8ff | 89 | { |
kenjiArai | 0:d4960fcea8ff | 90 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 91 | { |
kenjiArai | 0:d4960fcea8ff | 92 | /* Set or clear the output. */ |
kenjiArai | 0:d4960fcea8ff | 93 | if( xValue ) |
kenjiArai | 0:d4960fcea8ff | 94 | { |
kenjiArai | 0:d4960fcea8ff | 95 | LPC_GPIO0->FIOCLR = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 96 | } |
kenjiArai | 0:d4960fcea8ff | 97 | else |
kenjiArai | 0:d4960fcea8ff | 98 | { |
kenjiArai | 0:d4960fcea8ff | 99 | LPC_GPIO0->FIOSET = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 100 | } |
kenjiArai | 0:d4960fcea8ff | 101 | } |
kenjiArai | 0:d4960fcea8ff | 102 | } |
kenjiArai | 0:d4960fcea8ff | 103 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 104 | |
kenjiArai | 0:d4960fcea8ff | 105 | void vParTestToggleLED( unsigned portBASE_TYPE uxLED ) |
kenjiArai | 0:d4960fcea8ff | 106 | { |
kenjiArai | 0:d4960fcea8ff | 107 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 108 | { |
kenjiArai | 0:d4960fcea8ff | 109 | if( LPC_GPIO0->FIOPIN & ulLEDs[ uxLED ] ) |
kenjiArai | 0:d4960fcea8ff | 110 | { |
kenjiArai | 0:d4960fcea8ff | 111 | LPC_GPIO0->FIOCLR = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 112 | } |
kenjiArai | 0:d4960fcea8ff | 113 | else |
kenjiArai | 0:d4960fcea8ff | 114 | { |
kenjiArai | 0:d4960fcea8ff | 115 | LPC_GPIO0->FIOSET = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 116 | } |
kenjiArai | 0:d4960fcea8ff | 117 | } |
kenjiArai | 0:d4960fcea8ff | 118 | } |
kenjiArai | 0:d4960fcea8ff | 119 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 120 | |
kenjiArai | 0:d4960fcea8ff | 121 | unsigned portBASE_TYPE uxParTextGetLED( unsigned portBASE_TYPE uxLED ) |
kenjiArai | 0:d4960fcea8ff | 122 | { |
kenjiArai | 0:d4960fcea8ff | 123 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 124 | { |
kenjiArai | 0:d4960fcea8ff | 125 | return ( LPC_GPIO0->FIOPIN & ulLEDs[ uxLED ] ); |
kenjiArai | 0:d4960fcea8ff | 126 | } |
kenjiArai | 0:d4960fcea8ff | 127 | else |
kenjiArai | 0:d4960fcea8ff | 128 | { |
kenjiArai | 0:d4960fcea8ff | 129 | return 0; |
kenjiArai | 0:d4960fcea8ff | 130 | } |
kenjiArai | 0:d4960fcea8ff | 131 | } |
kenjiArai | 0:d4960fcea8ff | 132 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 133 | #else |
kenjiArai | 0:d4960fcea8ff | 134 | void vParTestInitialise( void ) |
kenjiArai | 0:d4960fcea8ff | 135 | { |
kenjiArai | 0:d4960fcea8ff | 136 | /* LEDs on port 1. */ |
kenjiArai | 0:d4960fcea8ff | 137 | LPC_GPIO1->FIODIR = partstFIO1_BITS; |
kenjiArai | 0:d4960fcea8ff | 138 | /* Start will all LEDs off. */ |
kenjiArai | 0:d4960fcea8ff | 139 | LPC_GPIO1->FIOCLR = partstFIO1_BITS; |
kenjiArai | 0:d4960fcea8ff | 140 | |
kenjiArai | 0:d4960fcea8ff | 141 | // Switch |
kenjiArai | 0:d4960fcea8ff | 142 | LPC_GPIO2->FIODIR &= ~0x00; // Input mode |
kenjiArai | 0:d4960fcea8ff | 143 | LPC_PINCON->PINMODE4 |= 0x3f3; // Pull-down P2.0,.2,.3,.4 |
kenjiArai | 0:d4960fcea8ff | 144 | //xprintf("GPIO2 = %x\r\n", LPC_GPIO2->FIOPIN); |
kenjiArai | 0:d4960fcea8ff | 145 | //xprintf("GPIO2.DIR = %x\r\n", LPC_GPIO2->FIODIR); |
kenjiArai | 0:d4960fcea8ff | 146 | } |
kenjiArai | 0:d4960fcea8ff | 147 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 148 | |
kenjiArai | 0:d4960fcea8ff | 149 | void vParTestSetLED( unsigned portBASE_TYPE uxLED, signed portBASE_TYPE xValue ) |
kenjiArai | 0:d4960fcea8ff | 150 | { |
kenjiArai | 0:d4960fcea8ff | 151 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 152 | { |
kenjiArai | 0:d4960fcea8ff | 153 | /* Set or clear the output. */ |
kenjiArai | 0:d4960fcea8ff | 154 | if( xValue ) |
kenjiArai | 0:d4960fcea8ff | 155 | { |
kenjiArai | 0:d4960fcea8ff | 156 | LPC_GPIO1->FIOCLR = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 157 | } |
kenjiArai | 0:d4960fcea8ff | 158 | else |
kenjiArai | 0:d4960fcea8ff | 159 | { |
kenjiArai | 0:d4960fcea8ff | 160 | LPC_GPIO1->FIOSET = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 161 | } |
kenjiArai | 0:d4960fcea8ff | 162 | } |
kenjiArai | 0:d4960fcea8ff | 163 | } |
kenjiArai | 0:d4960fcea8ff | 164 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 165 | |
kenjiArai | 0:d4960fcea8ff | 166 | void vParTestToggleLED( unsigned portBASE_TYPE uxLED ) |
kenjiArai | 0:d4960fcea8ff | 167 | { |
kenjiArai | 0:d4960fcea8ff | 168 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 169 | { |
kenjiArai | 0:d4960fcea8ff | 170 | if( LPC_GPIO1->FIOPIN & ulLEDs[ uxLED ] ) |
kenjiArai | 0:d4960fcea8ff | 171 | { |
kenjiArai | 0:d4960fcea8ff | 172 | LPC_GPIO1->FIOCLR = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 173 | } |
kenjiArai | 0:d4960fcea8ff | 174 | else |
kenjiArai | 0:d4960fcea8ff | 175 | { |
kenjiArai | 0:d4960fcea8ff | 176 | LPC_GPIO1->FIOSET = ulLEDs[ uxLED ]; |
kenjiArai | 0:d4960fcea8ff | 177 | } |
kenjiArai | 0:d4960fcea8ff | 178 | } |
kenjiArai | 0:d4960fcea8ff | 179 | } |
kenjiArai | 0:d4960fcea8ff | 180 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 181 | |
kenjiArai | 0:d4960fcea8ff | 182 | unsigned portBASE_TYPE uxParTextGetLED( unsigned portBASE_TYPE uxLED ) |
kenjiArai | 0:d4960fcea8ff | 183 | { |
kenjiArai | 0:d4960fcea8ff | 184 | if( uxLED < partstNUM_LEDS ) |
kenjiArai | 0:d4960fcea8ff | 185 | { |
kenjiArai | 0:d4960fcea8ff | 186 | return ( LPC_GPIO1->FIOPIN & ulLEDs[ uxLED ] ); |
kenjiArai | 0:d4960fcea8ff | 187 | } |
kenjiArai | 0:d4960fcea8ff | 188 | else |
kenjiArai | 0:d4960fcea8ff | 189 | { |
kenjiArai | 0:d4960fcea8ff | 190 | return 0; |
kenjiArai | 0:d4960fcea8ff | 191 | } |
kenjiArai | 0:d4960fcea8ff | 192 | } |
kenjiArai | 0:d4960fcea8ff | 193 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 194 | #endif |
kenjiArai | 0:d4960fcea8ff | 195 | |
kenjiArai | 0:d4960fcea8ff | 196 | unsigned int vParTestSW_Rec( void ){ //Record switch = P2.3 (mbed p23) |
kenjiArai | 0:d4960fcea8ff | 197 | //xputs("mbed P23 (LPC1768 p2.3) = "); |
kenjiArai | 0:d4960fcea8ff | 198 | //if (LPC_GPIO2->FIOPIN & 0x08){ |
kenjiArai | 0:d4960fcea8ff | 199 | // xputs("ON \r\n"); |
kenjiArai | 0:d4960fcea8ff | 200 | //} else { |
kenjiArai | 0:d4960fcea8ff | 201 | // xputs("OFF \r\n"); |
kenjiArai | 0:d4960fcea8ff | 202 | //} |
kenjiArai | 0:d4960fcea8ff | 203 | if (LPC_GPIO2->FIOPIN & 0x08){ |
kenjiArai | 0:d4960fcea8ff | 204 | //xputs("ON \r\n"); |
kenjiArai | 0:d4960fcea8ff | 205 | return 0; |
kenjiArai | 0:d4960fcea8ff | 206 | } else { |
kenjiArai | 0:d4960fcea8ff | 207 | //xputs("OFF \r\n"); |
kenjiArai | 0:d4960fcea8ff | 208 | return 1; |
kenjiArai | 0:d4960fcea8ff | 209 | } |
kenjiArai | 0:d4960fcea8ff | 210 | } |
kenjiArai | 0:d4960fcea8ff | 211 | |
kenjiArai | 0:d4960fcea8ff | 212 | unsigned int vParTestSW_Mode( void ){ //Record switch = P2.4 (mbed p22) |
kenjiArai | 0:d4960fcea8ff | 213 | //xputs("mbed P22 (LPC1768 p2.4) = "); |
kenjiArai | 0:d4960fcea8ff | 214 | //if (LPC_GPIO2->FIOPIN & 0x10){ |
kenjiArai | 0:d4960fcea8ff | 215 | // xputs("ON \r\n"); |
kenjiArai | 0:d4960fcea8ff | 216 | //} else { |
kenjiArai | 0:d4960fcea8ff | 217 | // xputs("OFF \r\n"); |
kenjiArai | 0:d4960fcea8ff | 218 | //} |
kenjiArai | 0:d4960fcea8ff | 219 | if (LPC_GPIO2->FIOPIN & 0x10){ |
kenjiArai | 0:d4960fcea8ff | 220 | //xputs("ON \r\n"); |
kenjiArai | 0:d4960fcea8ff | 221 | return 0; |
kenjiArai | 0:d4960fcea8ff | 222 | } else { |
kenjiArai | 0:d4960fcea8ff | 223 | //xputs("OFF \r\n"); |
kenjiArai | 0:d4960fcea8ff | 224 | return 1; |
kenjiArai | 0:d4960fcea8ff | 225 | } |
kenjiArai | 0:d4960fcea8ff | 226 | } |
kenjiArai | 0:d4960fcea8ff | 227 | /*-----------------------------------------------------------*/ |
kenjiArai | 0:d4960fcea8ff | 228 | |
kenjiArai | 0:d4960fcea8ff | 229 | |
kenjiArai | 0:d4960fcea8ff | 230 | |
kenjiArai | 0:d4960fcea8ff | 231 | |
kenjiArai | 0:d4960fcea8ff | 232 | |
kenjiArai | 0:d4960fcea8ff | 233 | |
kenjiArai | 0:d4960fcea8ff | 234 |