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.

Committer:
kenjiArai
Date:
Sat Jan 01 11:17:45 2011 +0000
Revision:
0:d4960fcea8ff

        

Who changed what in which revision?

UserRevisionLine numberNew 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