2 FreeRTOS V7.1.1 - Copyright (C) 2012 Real Time Engineers Ltd.
\r
5 ***************************************************************************
\r
7 * FreeRTOS tutorial books are available in pdf and paperback. *
\r
8 * Complete, revised, and edited pdf reference manuals are also *
\r
11 * Purchasing FreeRTOS documentation will not only help you, by *
\r
12 * ensuring you get running as quickly as possible and with an *
\r
13 * in-depth knowledge of how to use FreeRTOS, it will also help *
\r
14 * the FreeRTOS project to continue with its mission of providing *
\r
15 * professional grade, cross platform, de facto standard solutions *
\r
16 * for microcontrollers - completely free of charge! *
\r
18 * >>> See http://www.FreeRTOS.org/Documentation for details. <<< *
\r
20 * Thank you for using FreeRTOS, and thank you for your support! *
\r
22 ***************************************************************************
\r
25 This file is part of the FreeRTOS distribution.
\r
27 FreeRTOS is free software; you can redistribute it and/or modify it under
\r
28 the terms of the GNU General Public License (version 2) as published by the
\r
29 Free Software Foundation AND MODIFIED BY the FreeRTOS exception.
\r
30 >>>NOTE<<< The modification to the GPL is included to allow you to
\r
31 distribute a combined work that includes FreeRTOS without being obliged to
\r
32 provide the source code for proprietary components outside of the FreeRTOS
\r
33 kernel. FreeRTOS is distributed in the hope that it will be useful, but
\r
34 WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
\r
35 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
\r
36 more details. You should have received a copy of the GNU General Public
\r
37 License and the FreeRTOS license exception along with FreeRTOS; if not it
\r
38 can be viewed here: http://www.freertos.org/a00114.html and also obtained
\r
39 by writing to Richard Barry, contact details for whom are available on the
\r
44 ***************************************************************************
\r
46 * Having a problem? Start by reading the FAQ "My application does *
\r
47 * not run, what could be wrong? *
\r
49 * http://www.FreeRTOS.org/FAQHelp.html *
\r
51 ***************************************************************************
\r
54 http://www.FreeRTOS.org - Documentation, training, latest information,
\r
55 license and contact details.
\r
57 http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
\r
58 including FreeRTOS+Trace - an indispensable productivity tool.
\r
60 Real Time Engineers ltd license FreeRTOS to High Integrity Systems, who sell
\r
61 the code with commercial support, indemnification, and middleware, under
\r
62 the OpenRTOS brand: http://www.OpenRTOS.com. High Integrity Systems also
\r
63 provide a safety engineered and independently SIL3 certified version under
\r
64 the SafeRTOS brand: http://www.SafeRTOS.com.
\r
67 /* Standard includes. */
\r
70 /* Scheduler includes. */
\r
71 #include "FreeRTOS.h"
\r
77 #include "net/uip.h"
\r
78 #include "net/uip_arp.h"
\r
79 #include "apps/httpd/httpd.h"
\r
80 #include "sys/timer.h"
\r
81 #include "net/clock-arch.h"
\r
82 #include "r_ether.h"
\r
84 /* Demo includes. */
\r
85 #include "ParTest.h"
\r
87 /*-----------------------------------------------------------*/
\r
89 /* How long to wait before attempting to connect the MAC again. */
\r
90 #define uipINIT_WAIT ( 100 / portTICK_RATE_MS )
\r
92 /* Shortcut to the header within the Rx buffer. */
\r
93 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])
\r
95 /* Standard constant. */
\r
96 #define uipTOTAL_FRAME_HEADER_SIZE 54
\r
98 /* The ARP timer and the periodic timer share a callback function, so the
\r
99 respective timer IDs are used to determine which timer actually expired. These
\r
100 constants are assigned to the timer IDs. */
\r
101 #define uipARP_TIMER 0
\r
102 #define uipPERIODIC_TIMER 1
\r
104 /* A block time of zero ticks simply means, "don't block". */
\r
105 #define uipDONT_BLOCK 0UL
\r
107 /*-----------------------------------------------------------*/
\r
110 * Setup the MAC address in the MAC itself, and in the uIP stack.
\r
112 static void prvSetMACAddress( void );
\r
115 * Perform any uIP initialisation necessary.
\r
117 static void prvInitialise_uIP( void );
\r
120 * The callback function that is assigned to both the periodic timer and the
\r
123 static void prvUIPTimerCallback( xTimerHandle xTimer );
\r
126 * Port functions required by the uIP stack.
\r
128 clock_time_t clock_time( void );
\r
130 /*-----------------------------------------------------------*/
\r
132 /* The queue used to send TCP/IP events to the uIP stack. */
\r
133 xQueueHandle xEMACEventQueue = NULL;
\r
135 /*-----------------------------------------------------------*/
\r
137 clock_time_t clock_time( void )
\r
139 return xTaskGetTickCount();
\r
141 /*-----------------------------------------------------------*/
\r
143 void vuIP_Task( void *pvParameters )
\r
146 unsigned long ulNewEvent = 0UL;
\r
147 unsigned long ulUIP_Events = 0UL;
\r
149 ( void ) pvParameters;
\r
151 /* Initialise the uIP stack. */
\r
152 prvInitialise_uIP();
\r
154 /* Initialise the MAC. */
\r
157 while( lEMACWaitForLink() != pdPASS )
\r
159 vTaskDelay( uipINIT_WAIT );
\r
164 if( ( ulUIP_Events & uipETHERNET_RX_EVENT ) != 0UL )
\r
166 /* Is there received data ready to be processed? */
\r
167 uip_len = ( unsigned short ) ulEMACRead();
\r
169 if( ( uip_len > 0 ) && ( uip_buf != NULL ) )
\r
171 /* Standard uIP loop taken from the uIP manual. */
\r
172 if( xHeader->type == htons( UIP_ETHTYPE_IP ) )
\r
177 /* If the above function invocation resulted in data that
\r
178 should be sent out on the network, the global variable
\r
179 uip_len is set to a value > 0. */
\r
186 else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )
\r
190 /* If the above function invocation resulted in data that
\r
191 should be sent out on the network, the global variable
\r
192 uip_len is set to a value > 0. */
\r
201 ulUIP_Events &= ~uipETHERNET_RX_EVENT;
\r
205 if( ( ulUIP_Events & uipPERIODIC_TIMER_EVENT ) != 0UL )
\r
207 ulUIP_Events &= ~uipPERIODIC_TIMER_EVENT;
\r
209 for( i = 0; i < UIP_CONNS; i++ )
\r
213 /* If the above function invocation resulted in data that
\r
214 should be sent out on the network, the global variable
\r
215 uip_len is set to a value > 0. */
\r
224 /* Call the ARP timer function every 10 seconds. */
\r
225 if( ( ulUIP_Events & uipARP_TIMER_EVENT ) != 0 )
\r
227 ulUIP_Events &= ~uipARP_TIMER_EVENT;
\r
231 if( ulUIP_Events == pdFALSE )
\r
233 xQueueReceive( xEMACEventQueue, &ulNewEvent, portMAX_DELAY );
\r
234 ulUIP_Events |= ulNewEvent;
\r
238 /*-----------------------------------------------------------*/
\r
240 static void prvInitialise_uIP( void )
\r
242 xTimerHandle xARPTimer, xPeriodicTimer;
\r
243 uip_ipaddr_t xIPAddr;
\r
244 const unsigned long ul_uIPEventQueueLength = 10UL;
\r
246 /* Initialise the uIP stack. */
\r
248 uip_ipaddr( &xIPAddr, configIP_ADDR0, configIP_ADDR1, configIP_ADDR2, configIP_ADDR3 );
\r
249 uip_sethostaddr( &xIPAddr );
\r
250 uip_ipaddr( &xIPAddr, configNET_MASK0, configNET_MASK1, configNET_MASK2, configNET_MASK3 );
\r
251 uip_setnetmask( &xIPAddr );
\r
252 prvSetMACAddress();
\r
255 /* Create the queue used to sent TCP/IP events to the uIP stack. */
\r
256 xEMACEventQueue = xQueueCreate( ul_uIPEventQueueLength, sizeof( unsigned long ) );
\r
258 /* Create and start the uIP timers. */
\r
259 xARPTimer = xTimerCreate( "ARPTimer", /* Just a name that is helpful for debugging, not used by the kernel. */
\r
260 ( 10000UL / portTICK_RATE_MS ), /* Timer period. */
\r
261 pdTRUE, /* Autor-reload. */
\r
262 ( void * ) uipARP_TIMER,
\r
263 prvUIPTimerCallback
\r
266 xPeriodicTimer = xTimerCreate( "PeriodicTimer",
\r
267 ( 50 / portTICK_RATE_MS ),
\r
268 pdTRUE, /* Autor-reload. */
\r
269 ( void * ) uipPERIODIC_TIMER,
\r
270 prvUIPTimerCallback
\r
273 configASSERT( xARPTimer );
\r
274 configASSERT( xPeriodicTimer );
\r
276 xTimerStart( xARPTimer, portMAX_DELAY );
\r
277 xTimerStart( xPeriodicTimer, portMAX_DELAY );
\r
279 /*-----------------------------------------------------------*/
\r
281 static void prvUIPTimerCallback( xTimerHandle xTimer )
\r
283 static const unsigned long ulARPTimerExpired = uipARP_TIMER_EVENT;
\r
284 static const unsigned long ulPeriodicTimerExpired = uipPERIODIC_TIMER_EVENT;
\r
286 /* This is a time callback, so calls to xQueueSend() must not attempt to
\r
288 switch( ( int ) pvTimerGetTimerID( xTimer ) )
\r
290 case uipARP_TIMER : xQueueSend( xEMACEventQueue, &ulARPTimerExpired, uipDONT_BLOCK );
\r
293 case uipPERIODIC_TIMER : xQueueSend( xEMACEventQueue, &ulPeriodicTimerExpired, uipDONT_BLOCK );
\r
296 default : /* Should not get here. */
\r
300 /*-----------------------------------------------------------*/
\r
302 static void prvSetMACAddress( void )
\r
304 struct uip_eth_addr xAddr;
\r
306 /* Configure the MAC address in the uIP stack. */
\r
307 xAddr.addr[ 0 ] = configMAC_ADDR0;
\r
308 xAddr.addr[ 1 ] = configMAC_ADDR1;
\r
309 xAddr.addr[ 2 ] = configMAC_ADDR2;
\r
310 xAddr.addr[ 3 ] = configMAC_ADDR3;
\r
311 xAddr.addr[ 4 ] = configMAC_ADDR4;
\r
312 xAddr.addr[ 5 ] = configMAC_ADDR5;
\r
313 uip_setethaddr( xAddr );
\r
315 /*-----------------------------------------------------------*/
\r
317 void vApplicationProcessFormInput( char *pcInputString )
\r
321 /* Only interested in processing form input if this is the IO page. */
\r
322 c = strstr( pcInputString, "io.shtml" );
\r
326 /* Is there a command in the string? */
\r
327 c = strstr( pcInputString, "?" );
\r
330 /* Turn the LED's on or off in accordance with the check box status. */
\r
331 if( strstr( c, "LED0=1" ) != NULL )
\r
333 /* Turn the LEDs on. */
\r
334 vParTestSetLED( 7, 1 );
\r
335 vParTestSetLED( 8, 1 );
\r
336 vParTestSetLED( 9, 1 );
\r
337 vParTestSetLED( 10, 1 );
\r
341 /* Turn the LEDs off. */
\r
342 vParTestSetLED( 7, 0 );
\r
343 vParTestSetLED( 8, 0 );
\r
344 vParTestSetLED( 9, 0 );
\r
345 vParTestSetLED( 10, 0 );
\r
350 /* Commands to turn LEDs off are not always explicit. */
\r
351 vParTestSetLED( 7, 0 );
\r
352 vParTestSetLED( 8, 0 );
\r
353 vParTestSetLED( 9, 0 );
\r
354 vParTestSetLED( 10, 0 );
\r