git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_LM3Sxxxx_Eclipse/RTOSDemo/webserver/uIP_Task.c

   1 /*\r
   2     FreeRTOS V7.5.3 - Copyright (C) 2013 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     ***************************************************************************\r
   8      *                                                                       *\r
   9      *    FreeRTOS provides completely free yet professionally developed,    *\r
  10      *    robust, strictly quality controlled, supported, and cross          *\r
  11      *    platform software that has become a de facto standard.             *\r
  12      *                                                                       *\r
  13      *    Help yourself get started quickly and support the FreeRTOS         *\r
  14      *    project by purchasing a FreeRTOS tutorial book, reference          *\r
  15      *    manual, or both from: http://www.FreeRTOS.org/Documentation        *\r
  16      *                                                                       *\r
  17      *    Thank you!                                                         *\r
  18      *                                                                       *\r
  19     ***************************************************************************\r
  20 \r
  21     This file is part of the FreeRTOS distribution.\r
  22 \r
  23     FreeRTOS is free software; you can redistribute it and/or modify it under\r
  24     the terms of the GNU General Public License (version 2) as published by the\r
  25     Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.\r
  26 \r
  27     >>! NOTE: The modification to the GPL is included to allow you to distribute\r
  28     >>! a combined work that includes FreeRTOS without being obliged to provide\r
  29     >>! the source code for proprietary components outside of the FreeRTOS\r
  30     >>! kernel.\r
  31 \r
  32     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY\r
  33     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS\r
  34     FOR A PARTICULAR PURPOSE.  Full license text is available from the following\r
  35     link: http://www.freertos.org/a00114.html\r
  36 \r
  37     1 tab == 4 spaces!\r
  38 \r
  39     ***************************************************************************\r
  40      *                                                                       *\r
  41      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  42      *    not run, what could be wrong?"                                     *\r
  43      *                                                                       *\r
  44      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  45      *                                                                       *\r
  46     ***************************************************************************\r
  47 \r
  48     http://www.FreeRTOS.org - Documentation, books, training, latest versions,\r
  49     license and Real Time Engineers Ltd. contact details.\r
  50 \r
  51     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  52     including FreeRTOS+Trace - an indispensable productivity tool, a DOS\r
  53     compatible FAT file system, and our tiny thread aware UDP/IP stack.\r
  54 \r
  55     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High\r
  56     Integrity Systems to sell under the OpenRTOS brand.  Low cost OpenRTOS\r
  57     licenses offer ticketed support, indemnification and middleware.\r
  58 \r
  59     http://www.SafeRTOS.com - High Integrity Systems also provide a safety\r
  60     engineered and independently SIL3 certified version for use in safety and\r
  61     mission critical applications that require provable dependability.\r
  62 \r
  63     1 tab == 4 spaces!\r
  64 */\r
  65 /* Standard includes. */\r
  66 #include <string.h>\r
  67 \r
  68 /* Scheduler includes. */\r
  69 #include "FreeRTOS.h"\r
  70 #include "task.h"\r
  71 #include "semphr.h"\r
  72 \r
  73 #include "lcd_message.h"\r
  74 \r
  75 /* uip includes. */\r
  76 #include "hw_types.h"\r
  77 \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 #include "hw_ethernet.h"\r
  84 #include "ethernet.h"\r
  85 #include "hw_memmap.h"\r
  86 #include "lmi_flash.h"\r
  87 #include "sysctl.h"\r
  88 \r
  89 /* Demo includes. */\r
  90 #include "emac.h"\r
  91 #include "partest.h"\r
  92 \r
  93 /*-----------------------------------------------------------*/\r
  94 \r
  95 /* IP address configuration. */\r
  96 #define uipIP_ADDR0             172\r
  97 #define uipIP_ADDR1             25\r
  98 #define uipIP_ADDR2             218\r
  99 #define uipIP_ADDR3             19      \r
 100 \r
 101 /* How long to wait before attempting to connect the MAC again. */\r
 102 #define uipINIT_WAIT    100\r
 103 \r
 104 /* Shortcut to the header within the Rx buffer. */\r
 105 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
 106 \r
 107 /* Standard constant. */\r
 108 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
 109 \r
 110 /*-----------------------------------------------------------*/\r
 111 \r
 112 /*\r
 113  * Send the uIP buffer to the MAC.\r
 114  */\r
 115 static void prvENET_Send(void);\r
 116 \r
 117 /*\r
 118  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
 119  */\r
 120 static void prvSetMACAddress( void );\r
 121 \r
 122 /*\r
 123  * Port functions required by the uIP stack.\r
 124  */\r
 125 void clock_init( void );\r
 126 clock_time_t clock_time( void );\r
 127 \r
 128 /*-----------------------------------------------------------*/\r
 129 \r
 130 /* The semaphore used by the ISR to wake the uIP task. */\r
 131 extern xSemaphoreHandle xEMACSemaphore;\r
 132 \r
 133 /*-----------------------------------------------------------*/\r
 134 \r
 135 void clock_init(void)\r
 136 {\r
 137         /* This is done when the scheduler starts. */\r
 138 }\r
 139 /*-----------------------------------------------------------*/\r
 140 \r
 141 clock_time_t clock_time( void )\r
 142 {\r
 143         return xTaskGetTickCount();\r
 144 }\r
 145 \r
 146 \r
 147 void vuIP_Task( void *pvParameters )\r
 148 {\r
 149 portBASE_TYPE i;\r
 150 uip_ipaddr_t xIPAddr;\r
 151 struct timer periodic_timer, arp_timer;\r
 152 extern void ( vEMAC_ISR )( void );\r
 153 \r
 154         /* Enable/Reset the Ethernet Controller */\r
 155         SysCtlPeripheralEnable( SYSCTL_PERIPH_ETH );\r
 156         SysCtlPeripheralReset( SYSCTL_PERIPH_ETH );\r
 157 \r
 158         /* Create the semaphore used by the ISR to wake this task. */\r
 159         vSemaphoreCreateBinary( xEMACSemaphore );\r
 160         \r
 161         /* Initialise the uIP stack. */\r
 162         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
 163         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
 164         uip_init();\r
 165         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
 166         uip_sethostaddr( xIPAddr );\r
 167         httpd_init();\r
 168 \r
 169         while( vInitEMAC() != pdPASS )\r
 170     {\r
 171         vTaskDelay( uipINIT_WAIT );\r
 172     }\r
 173         prvSetMACAddress();     \r
 174         \r
 175 \r
 176         for( ;; )\r
 177         {\r
 178                 /* Is there received data ready to be processed? */\r
 179                 uip_len = uiGetEMACRxData( uip_buf );\r
 180                 \r
 181                 if( uip_len > 0 )\r
 182                 {\r
 183                         /* Standard uIP loop taken from the uIP manual. */\r
 184 \r
 185                         if( xHeader->type == htons( UIP_ETHTYPE_IP ) )\r
 186                         {\r
 187                                 uip_arp_ipin();\r
 188                                 uip_input();\r
 189 \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
 193                                 if( uip_len > 0 )\r
 194                                 {\r
 195                                         uip_arp_out();\r
 196                                         prvENET_Send();\r
 197                                 }\r
 198                         }\r
 199                         else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )\r
 200                         {\r
 201                                 uip_arp_arpin();\r
 202 \r
 203                                 /* If the above function invocation resulted in data that\r
 204                                 should be sent out on the network, the global variable\r
 205                                 uip_len is set to a value > 0. */\r
 206                                 if( uip_len > 0 )\r
 207                                 {\r
 208                                         prvENET_Send();\r
 209                                 }\r
 210                         }\r
 211                 }\r
 212                 else\r
 213                 {\r
 214                         if( timer_expired( &periodic_timer ) )\r
 215                         {\r
 216                                 timer_reset( &periodic_timer );\r
 217                                 for( i = 0; i < UIP_CONNS; i++ )\r
 218                                 {\r
 219                                         uip_periodic( i );\r
 220         \r
 221                                         /* If the above function invocation resulted in data that\r
 222                                         should be sent out on the network, the global variable\r
 223                                         uip_len is set to a value > 0. */\r
 224                                         if( uip_len > 0 )\r
 225                                         {\r
 226                                                 uip_arp_out();\r
 227                                                 prvENET_Send();\r
 228                                         }\r
 229                                 }       \r
 230         \r
 231                                 /* Call the ARP timer function every 10 seconds. */\r
 232                                 if( timer_expired( &arp_timer ) )\r
 233                                 {\r
 234                                         timer_reset( &arp_timer );\r
 235                                         uip_arp_timer();\r
 236                                 }\r
 237                         }\r
 238                         else\r
 239                         {                       \r
 240                                 /* We did not receive a packet, and there was no periodic\r
 241                                 processing to perform.  Block for a fixed period.  If a packet\r
 242                                 is received during this period we will be woken by the ISR\r
 243                                 giving us the Semaphore. */\r
 244                                 xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );                       \r
 245                         }\r
 246                 }\r
 247         }\r
 248 }\r
 249 /*-----------------------------------------------------------*/\r
 250 \r
 251 static void prvENET_Send(void)\r
 252 {\r
 253     vInitialiseSend();\r
 254     vIncrementTxLength( uip_len );\r
 255     vSendBufferToMAC();\r
 256 }\r
 257 /*-----------------------------------------------------------*/\r
 258 \r
 259 static void prvSetMACAddress( void )\r
 260 {\r
 261 unsigned portLONG ulUser0, ulUser1;\r
 262 unsigned char pucMACArray[8];\r
 263 struct uip_eth_addr xAddr;\r
 264 \r
 265         /* Get the device MAC address from flash */\r
 266     FlashUserGet(&ulUser0, &ulUser1);\r
 267 \r
 268         /* Convert the MAC address from flash into sequence of bytes. */\r
 269     pucMACArray[0] = ((ulUser0 >>  0) & 0xff);\r
 270     pucMACArray[1] = ((ulUser0 >>  8) & 0xff);\r
 271     pucMACArray[2] = ((ulUser0 >> 16) & 0xff);\r
 272     pucMACArray[3] = ((ulUser1 >>  0) & 0xff);\r
 273     pucMACArray[4] = ((ulUser1 >>  8) & 0xff);\r
 274     pucMACArray[5] = ((ulUser1 >> 16) & 0xff);\r
 275 \r
 276         /* Program the MAC address. */\r
 277     EthernetMACAddrSet(ETH_BASE, pucMACArray);\r
 278 \r
 279         xAddr.addr[ 0 ] = pucMACArray[0];\r
 280         xAddr.addr[ 1 ] = pucMACArray[1];\r
 281         xAddr.addr[ 2 ] = pucMACArray[2];\r
 282         xAddr.addr[ 3 ] = pucMACArray[3];\r
 283         xAddr.addr[ 4 ] = pucMACArray[4];\r
 284         xAddr.addr[ 5 ] = pucMACArray[5];\r
 285         uip_setethaddr( xAddr );\r
 286 }\r
 287 /*-----------------------------------------------------------*/\r
 288 \r
 289 void vApplicationProcessFormInput( portCHAR *pcInputString, portBASE_TYPE xInputLength )\r
 290 {\r
 291 char *c, *pcText;\r
 292 static portCHAR cMessageForDisplay[ 32 ];\r
 293 extern xQueueHandle xOLEDQueue;\r
 294 xOLEDMessage xOLEDMessage;\r
 295 \r
 296         /* Process the form input sent by the IO page of the served HTML. */\r
 297 \r
 298         c = strstr( pcInputString, "?" );\r
 299 \r
 300     if( c )\r
 301     {\r
 302                 /* Turn LED's on or off in accordance with the check box status. */\r
 303                 if( strstr( c, "LED0=1" ) != NULL )\r
 304                 {\r
 305                         vParTestSetLED( 0, 1 );\r
 306                 }\r
 307                 else\r
 308                 {\r
 309                         vParTestSetLED( 0, 0 );\r
 310                 }               \r
 311                 \r
 312                 /* Find the start of the text to be displayed on the LCD. */\r
 313         pcText = strstr( c, "LCD=" );\r
 314         pcText += strlen( "LCD=" );\r
 315 \r
 316         /* Terminate the file name for further processing within uIP. */\r
 317         *c = 0x00;\r
 318 \r
 319         /* Terminate the LCD string. */\r
 320         c = strstr( pcText, " " );\r
 321         if( c != NULL )\r
 322         {\r
 323             *c = 0x00;\r
 324         }\r
 325 \r
 326         /* Add required spaces. */\r
 327         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
 328         {\r
 329             *c = ' ';\r
 330         }\r
 331 \r
 332         /* Write the message to the LCD. */\r
 333                 strcpy( cMessageForDisplay, pcText );\r
 334                 xOLEDMessage.pcMessage = cMessageForDisplay;\r
 335         xQueueSend( xOLEDQueue, &xOLEDMessage, portMAX_DELAY );\r
 336     }\r
 337 }\r
 338 \r