]> git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/ARM7_LPC2368_Eclipse/RTOSDemo/webserver/uIP_Task.c
Update version number to 9.0.0rc2.
[freertos] / FreeRTOS / Demo / ARM7_LPC2368_Eclipse / RTOSDemo / webserver / uIP_Task.c
1 /*\r
2     FreeRTOS V9.0.0rc2 - Copyright (C) 2016 Real Time Engineers Ltd.\r
3     All rights reserved\r
4 \r
5     VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.\r
6 \r
7     This file is part of the FreeRTOS distribution.\r
8 \r
9     FreeRTOS is free software; you can redistribute it and/or modify it under\r
10     the terms of the GNU General Public License (version 2) as published by the\r
11     Free Software Foundation >>>> AND MODIFIED BY <<<< the FreeRTOS exception.\r
12 \r
13     ***************************************************************************\r
14     >>!   NOTE: The modification to the GPL is included to allow you to     !<<\r
15     >>!   distribute a combined work that includes FreeRTOS without being   !<<\r
16     >>!   obliged to provide the source code for proprietary components     !<<\r
17     >>!   outside of the FreeRTOS kernel.                                   !<<\r
18     ***************************************************************************\r
19 \r
20     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
21     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
22     FOR A PARTICULAR PURPOSE.  Full license text is available on the following\r
23     link: http://www.freertos.org/a00114.html\r
24 \r
25     ***************************************************************************\r
26      *                                                                       *\r
27      *    FreeRTOS provides completely free yet professionally developed,    *\r
28      *    robust, strictly quality controlled, supported, and cross          *\r
29      *    platform software that is more than just the market leader, it     *\r
30      *    is the industry's de facto standard.                               *\r
31      *                                                                       *\r
32      *    Help yourself get started quickly while simultaneously helping     *\r
33      *    to support the FreeRTOS project by purchasing a FreeRTOS           *\r
34      *    tutorial book, reference manual, or both:                          *\r
35      *    http://www.FreeRTOS.org/Documentation                              *\r
36      *                                                                       *\r
37     ***************************************************************************\r
38 \r
39     http://www.FreeRTOS.org/FAQHelp.html - Having a problem?  Start by reading\r
40     the FAQ page "My application does not run, what could be wrong?".  Have you\r
41     defined configASSERT()?\r
42 \r
43     http://www.FreeRTOS.org/support - In return for receiving this top quality\r
44     embedded software for free we request you assist our global community by\r
45     participating in the support forum.\r
46 \r
47     http://www.FreeRTOS.org/training - Investing in training allows your team to\r
48     be as productive as possible as early as possible.  Now you can receive\r
49     FreeRTOS training directly from Richard Barry, CEO of Real Time Engineers\r
50     Ltd, and the world's leading authority on the world's leading RTOS.\r
51 \r
52     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
53     including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
54     compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
55 \r
56     http://www.FreeRTOS.org/labs - Where new FreeRTOS products go to incubate.\r
57     Come and try FreeRTOS+TCP, our new open source TCP/IP stack for FreeRTOS.\r
58 \r
59     http://www.OpenRTOS.com - Real Time Engineers ltd. license FreeRTOS to High\r
60     Integrity Systems ltd. to sell under the OpenRTOS brand.  Low cost OpenRTOS\r
61     licenses offer ticketed support, indemnification and commercial middleware.\r
62 \r
63     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
64     engineered and independently SIL3 certified version for use in safety and\r
65     mission critical applications that require provable dependability.\r
66 \r
67     1 tab == 4 spaces!\r
68 */\r
69 /* Standard includes. */\r
70 #include <string.h>\r
71 \r
72 /* Scheduler includes. */\r
73 #include "FreeRTOS.h"\r
74 #include "task.h"\r
75 #include "semphr.h"\r
76 \r
77 /* uip includes. */\r
78 #include "uip.h"\r
79 #include "uip_arp.h"\r
80 #include "httpd.h"\r
81 #include "timer.h"\r
82 #include "clock-arch.h"\r
83 \r
84 /* Demo includes. */\r
85 #include "emac.h"\r
86 #include "partest.h"\r
87 \r
88 /*-----------------------------------------------------------*/\r
89 \r
90 /* MAC address configuration. */\r
91 #define uipMAC_ADDR0    0x00\r
92 #define uipMAC_ADDR1    0x12\r
93 #define uipMAC_ADDR2    0x13\r
94 #define uipMAC_ADDR3    0x10\r
95 #define uipMAC_ADDR4    0x15\r
96 #define uipMAC_ADDR5    0x11\r
97 \r
98 /* IP address configuration. */\r
99 #define uipIP_ADDR0             172\r
100 #define uipIP_ADDR1             25\r
101 #define uipIP_ADDR2             218\r
102 #define uipIP_ADDR3             16      \r
103 \r
104 /* How long to wait before attempting to connect the MAC again. */\r
105 #define uipINIT_WAIT    100\r
106 \r
107 /* Shortcut to the header within the Rx buffer. */\r
108 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
109 \r
110 /* Standard constant. */\r
111 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
112 \r
113 /*-----------------------------------------------------------*/\r
114 \r
115 /* \r
116  * Send the uIP buffer to the MAC. \r
117  */\r
118 static void prvENET_Send(void);\r
119 \r
120 /*\r
121  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
122  */\r
123 static void prvSetMACAddress( void );\r
124 \r
125 /*\r
126  * Port functions required by the uIP stack.\r
127  */\r
128 void clock_init( void );\r
129 clock_time_t clock_time( void );\r
130 \r
131 /*-----------------------------------------------------------*/\r
132 \r
133 /* The semaphore used by the ISR to wake the uIP task. */\r
134 extern SemaphoreHandle_t xEMACSemaphore;\r
135 \r
136 /*-----------------------------------------------------------*/\r
137 \r
138 void clock_init(void)\r
139 {\r
140         /* This is done when the scheduler starts. */\r
141 }\r
142 /*-----------------------------------------------------------*/\r
143 \r
144 clock_time_t clock_time( void )\r
145 {\r
146         return xTaskGetTickCount();\r
147 }\r
148 /*-----------------------------------------------------------*/\r
149 \r
150 void vuIP_Task( void *pvParameters )\r
151 {\r
152 portBASE_TYPE i;\r
153 uip_ipaddr_t xIPAddr;\r
154 struct timer periodic_timer, arp_timer;\r
155 extern void ( vEMAC_ISR_Wrapper )( void );\r
156 \r
157         /* Create the semaphore used by the ISR to wake this task. */\r
158         vSemaphoreCreateBinary( xEMACSemaphore );\r
159         \r
160         /* Initialise the uIP stack. */\r
161         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
162         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
163         uip_init();\r
164         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
165         uip_sethostaddr( xIPAddr );\r
166         httpd_init();\r
167 \r
168         /* Initialise the MAC. */\r
169         while( Init_EMAC() != pdPASS )\r
170     {\r
171         vTaskDelay( uipINIT_WAIT );\r
172     }\r
173 \r
174         portENTER_CRITICAL();\r
175         {\r
176                 MAC_INTENABLE = INT_RX_DONE;\r
177         VICIntEnable |= 0x00200000;\r
178         VICVectAddr21 = ( long ) vEMAC_ISR_Wrapper;\r
179                 prvSetMACAddress();\r
180         }\r
181         portEXIT_CRITICAL();\r
182         \r
183 \r
184         for( ;; )\r
185         {\r
186                 /* Is there received data ready to be processed? */\r
187                 uip_len = uiGetEMACRxData( uip_buf );\r
188                 \r
189                 if( uip_len > 0 )\r
190                 {\r
191                         /* Standard uIP loop taken from the uIP manual. */\r
192                         if( xHeader->type == htons( UIP_ETHTYPE_IP ) )\r
193                         {\r
194                                 uip_arp_ipin();\r
195                                 uip_input();\r
196 \r
197                                 /* If the above function invocation resulted in data that \r
198                                 should be sent out on the network, the global variable \r
199                                 uip_len is set to a value > 0. */\r
200                                 if( uip_len > 0 )\r
201                                 {\r
202                                         uip_arp_out();\r
203                                         prvENET_Send();\r
204                                 }\r
205                         }\r
206                         else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )\r
207                         {\r
208                                 uip_arp_arpin();\r
209 \r
210                                 /* If the above function invocation resulted in data that \r
211                                 should be sent out on the network, the global variable \r
212                                 uip_len is set to a value > 0. */\r
213                                 if( uip_len > 0 )\r
214                                 {\r
215                                         prvENET_Send();\r
216                                 }\r
217                         }\r
218                 }\r
219                 else\r
220                 {\r
221                         if( timer_expired( &periodic_timer ) )\r
222                         {\r
223                                 timer_reset( &periodic_timer );\r
224                                 for( i = 0; i < UIP_CONNS; i++ )\r
225                                 {\r
226                                         uip_periodic( i );\r
227         \r
228                                         /* If the above function invocation resulted in data that \r
229                                         should be sent out on the network, the global variable \r
230                                         uip_len is set to a value > 0. */\r
231                                         if( uip_len > 0 )\r
232                                         {\r
233                                                 uip_arp_out();\r
234                                                 prvENET_Send();\r
235                                         }\r
236                                 }       \r
237         \r
238                                 /* Call the ARP timer function every 10 seconds. */\r
239                                 if( timer_expired( &arp_timer ) )\r
240                                 {\r
241                                         timer_reset( &arp_timer );\r
242                                         uip_arp_timer();\r
243                                 }\r
244                         }\r
245                         else\r
246                         {                       \r
247                                 /* We did not receive a packet, and there was no periodic\r
248                                 processing to perform.  Block for a fixed period.  If a packet\r
249                                 is received during this period we will be woken by the ISR\r
250                                 giving us the Semaphore. */\r
251                                 xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );                       \r
252                         }\r
253                 }\r
254         }\r
255 }\r
256 /*-----------------------------------------------------------*/\r
257 \r
258 static void prvENET_Send(void)\r
259 {\r
260     RequestSend();\r
261 \r
262     /* Copy the header into the Tx buffer. */\r
263     CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );\r
264     if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )\r
265     {\r
266         CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );\r
267     }\r
268 \r
269     DoSend_EMAC( uip_len );\r
270 }\r
271 /*-----------------------------------------------------------*/\r
272 \r
273 static void prvSetMACAddress( void )\r
274 {\r
275 struct uip_eth_addr xAddr;\r
276 \r
277         /* Configure the MAC address in the uIP stack. */\r
278         xAddr.addr[ 0 ] = uipMAC_ADDR0;\r
279         xAddr.addr[ 1 ] = uipMAC_ADDR1;\r
280         xAddr.addr[ 2 ] = uipMAC_ADDR2;\r
281         xAddr.addr[ 3 ] = uipMAC_ADDR3;\r
282         xAddr.addr[ 4 ] = uipMAC_ADDR4;\r
283         xAddr.addr[ 5 ] = uipMAC_ADDR5;\r
284         uip_setethaddr( xAddr );\r
285 }\r
286 /*-----------------------------------------------------------*/\r
287 \r
288 void vApplicationProcessFormInput( char *pcInputString, portBASE_TYPE xInputLength )\r
289 {\r
290 char *c, *pcText;\r
291 static char cMessageForDisplay[ 32 ];\r
292 extern QueueHandle_t xLCDQueue;\r
293 xLCDMessage xLCDMessage;\r
294 \r
295         /* Process the form input sent by the IO page of the served HTML. */\r
296 \r
297         c = strstr( pcInputString, "?" );\r
298     if( c )\r
299     {\r
300                 /* Turn LED's on or off in accordance with the check box status. */\r
301                 if( strstr( c, "LED0=1" ) != NULL )\r
302                 {\r
303                         vParTestSetLED( 5, 0 );\r
304                 }\r
305                 else\r
306                 {\r
307                         vParTestSetLED( 5, 1 );\r
308                 }               \r
309                 \r
310                 if( strstr( c, "LED1=1" ) != NULL )\r
311                 {\r
312                         vParTestSetLED( 6, 0 );\r
313                 }\r
314                 else\r
315                 {\r
316                         vParTestSetLED( 6, 1 );\r
317                 }               \r
318 \r
319                 if( strstr( c, "LED2=1" ) != NULL )\r
320                 {\r
321                         vParTestSetLED( 7, 0 );\r
322                 }\r
323                 else\r
324                 {\r
325                         vParTestSetLED( 7, 1 );\r
326                 }\r
327 \r
328                 /* Find the start of the text to be displayed on the LCD. */\r
329         pcText = strstr( c, "LCD=" );\r
330         pcText += strlen( "LCD=" );\r
331 \r
332         /* Terminate the file name for further processing within uIP. */\r
333         *c = 0x00;\r
334 \r
335         /* Terminate the LCD string. */\r
336         c = strstr( pcText, " " );\r
337         if( c != NULL )\r
338         {\r
339             *c = 0x00;\r
340         }\r
341 \r
342         /* Add required spaces. */\r
343         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
344         {\r
345             *c = ' ';\r
346         }\r
347     \r
348         /* Write the message to the LCD. */\r
349                 strcpy( cMessageForDisplay, pcText );\r
350                 xLCDMessage.xColumn = 0;\r
351                 xLCDMessage.pcMessage = cMessageForDisplay;\r
352         xQueueSend( xLCDQueue, &xLCDMessage, portMAX_DELAY );\r
353     }\r
354 }\r
355 \r