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

   1 /*\r
   2     FreeRTOS V7.1.1 - Copyright (C) 2012 Real Time Engineers Ltd.\r
   3         \r
   4 \r
   5     ***************************************************************************\r
   6      *                                                                       *\r
   7      *    FreeRTOS tutorial books are available in pdf and paperback.        *\r
   8      *    Complete, revised, and edited pdf reference manuals are also       *\r
   9      *    available.                                                         *\r
  10      *                                                                       *\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
  17      *                                                                       *\r
  18      *    >>> See http://www.FreeRTOS.org/Documentation for details. <<<     *\r
  19      *                                                                       *\r
  20      *    Thank you for using FreeRTOS, and thank you for your support!      *\r
  21      *                                                                       *\r
  22     ***************************************************************************\r
  23 \r
  24 \r
  25     This file is part of the FreeRTOS distribution.\r
  26 \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
  40     FreeRTOS WEB site.\r
  41 \r
  42     1 tab == 4 spaces!\r
  43     \r
  44     ***************************************************************************\r
  45      *                                                                       *\r
  46      *    Having a problem?  Start by reading the FAQ "My application does   *\r
  47      *    not run, what could be wrong?                                      *\r
  48      *                                                                       *\r
  49      *    http://www.FreeRTOS.org/FAQHelp.html                               *\r
  50      *                                                                       *\r
  51     ***************************************************************************\r
  52 \r
  53     \r
  54     http://www.FreeRTOS.org - Documentation, training, latest information, \r
  55     license and contact details.\r
  56     \r
  57     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,\r
  58     including FreeRTOS+Trace - an indispensable productivity tool.\r
  59 \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
  65 */\r
  66 /* Standard includes. */\r
  67 #include <string.h>\r
  68 \r
  69 /* Scheduler includes. */\r
  70 #include "FreeRTOS.h"\r
  71 #include "task.h"\r
  72 #include "semphr.h"\r
  73 \r
  74 /* uip includes. */\r
  75 #include "hw_types.h"\r
  76 #include "uip.h"\r
  77 #include "uip_arp.h"\r
  78 #include "httpd.h"\r
  79 #include "timer.h"\r
  80 #include "clock-arch.h"\r
  81 #include "hw_ethernet.h"\r
  82 #include "ethernet.h"\r
  83 #include "hw_memmap.h"\r
  84 #include "lmi_flash.h"\r
  85 #include "sysctl.h"\r
  86 \r
  87 /* Demo includes. */\r
  88 #include "emac.h"\r
  89 #include "partest.h"\r
  90 #include "lcd_message.h"\r
  91 \r
  92 struct timer {\r
  93   clock_time_t start;\r
  94   clock_time_t interval;\r
  95 };\r
  96 \r
  97 \r
  98 /*-----------------------------------------------------------*/\r
  99 \r
 100 /* IP address configuration. */\r
 101 #define uipIP_ADDR0             172\r
 102 #define uipIP_ADDR1             25\r
 103 #define uipIP_ADDR2             218\r
 104 #define uipIP_ADDR3             19      \r
 105 \r
 106 /* How long to wait before attempting to connect the MAC again. */\r
 107 #define uipINIT_WAIT    100\r
 108 \r
 109 /* Shortcut to the header within the Rx buffer. */\r
 110 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
 111 \r
 112 /* Standard constant. */\r
 113 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
 114 \r
 115 /*-----------------------------------------------------------*/\r
 116 \r
 117 /*\r
 118  * Send the uIP buffer to the MAC.\r
 119  */\r
 120 static void prvENET_Send(void);\r
 121 \r
 122 /*\r
 123  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
 124  */\r
 125 static void prvSetMACAddress( void );\r
 126 \r
 127 /*\r
 128  * Port functions required by the uIP stack.\r
 129  */\r
 130 void clock_init( void );\r
 131 clock_time_t clock_time( void );\r
 132 \r
 133 /*-----------------------------------------------------------*/\r
 134 \r
 135 /* The semaphore used by the ISR to wake the uIP task. */\r
 136 extern xSemaphoreHandle xEMACSemaphore;\r
 137 \r
 138 /*-----------------------------------------------------------*/\r
 139 \r
 140 void clock_init(void)\r
 141 {\r
 142         /* This is done when the scheduler starts. */\r
 143 }\r
 144 /*-----------------------------------------------------------*/\r
 145 \r
 146 /* Define clock functions here to avoid header file name clash between uIP\r
 147 and the Luminary Micro driver library. */\r
 148 clock_time_t clock_time( void )\r
 149 {\r
 150         return xTaskGetTickCount();\r
 151 }\r
 152 extern void timer_set(struct timer *t, clock_time_t interval);\r
 153 extern int timer_expired(struct timer *t);\r
 154 extern void timer_reset(struct timer *t);\r
 155 \r
 156 \r
 157 \r
 158 \r
 159 void vuIP_Task( void *pvParameters )\r
 160 {\r
 161 portBASE_TYPE i;\r
 162 uip_ipaddr_t xIPAddr;\r
 163 struct timer periodic_timer, arp_timer;\r
 164 extern void ( vEMAC_ISR )( void );\r
 165 \r
 166         /* Enable/Reset the Ethernet Controller */\r
 167         SysCtlPeripheralEnable( SYSCTL_PERIPH_ETH );\r
 168         SysCtlPeripheralReset( SYSCTL_PERIPH_ETH );\r
 169 \r
 170         /* Create the semaphore used by the ISR to wake this task. */\r
 171         vSemaphoreCreateBinary( xEMACSemaphore );\r
 172         \r
 173         /* Initialise the uIP stack. */\r
 174         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
 175         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
 176         uip_init();\r
 177         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
 178         uip_sethostaddr( xIPAddr );\r
 179         httpd_init();\r
 180 \r
 181         while( vInitEMAC() != pdPASS )\r
 182     {\r
 183         vTaskDelay( uipINIT_WAIT );\r
 184     }\r
 185         prvSetMACAddress();     \r
 186         \r
 187 \r
 188         for( ;; )\r
 189         {\r
 190                 /* Is there received data ready to be processed? */\r
 191                 uip_len = uiGetEMACRxData( uip_buf );\r
 192                 \r
 193                 if( uip_len > 0 )\r
 194                 {\r
 195                         /* Standard uIP loop taken from the uIP manual. */\r
 196 \r
 197                         if( xHeader->type == htons( UIP_ETHTYPE_IP ) )\r
 198                         {\r
 199                                 uip_arp_ipin();\r
 200                                 uip_input();\r
 201 \r
 202                                 /* If the above function invocation resulted in data that\r
 203                                 should be sent out on the network, the global variable\r
 204                                 uip_len is set to a value > 0. */\r
 205                                 if( uip_len > 0 )\r
 206                                 {\r
 207                                         uip_arp_out();\r
 208                                         prvENET_Send();\r
 209                                 }\r
 210                         }\r
 211                         else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )\r
 212                         {\r
 213                                 uip_arp_arpin();\r
 214 \r
 215                                 /* If the above function invocation resulted in data that\r
 216                                 should be sent out on the network, the global variable\r
 217                                 uip_len is set to a value > 0. */\r
 218                                 if( uip_len > 0 )\r
 219                                 {\r
 220                                         prvENET_Send();\r
 221                                 }\r
 222                         }\r
 223                 }\r
 224                 else\r
 225                 {\r
 226                         if( timer_expired( &periodic_timer ) )\r
 227                         {\r
 228                                 timer_reset( &periodic_timer );\r
 229                                 for( i = 0; i < UIP_CONNS; i++ )\r
 230                                 {\r
 231                                         uip_periodic( i );\r
 232         \r
 233                                         /* If the above function invocation resulted in data that\r
 234                                         should be sent out on the network, the global variable\r
 235                                         uip_len is set to a value > 0. */\r
 236                                         if( uip_len > 0 )\r
 237                                         {\r
 238                                                 uip_arp_out();\r
 239                                                 prvENET_Send();\r
 240                                         }\r
 241                                 }       \r
 242         \r
 243                                 /* Call the ARP timer function every 10 seconds. */\r
 244                                 if( timer_expired( &arp_timer ) )\r
 245                                 {\r
 246                                         timer_reset( &arp_timer );\r
 247                                         uip_arp_timer();\r
 248                                 }\r
 249                         }\r
 250                         else\r
 251                         {                       \r
 252                                 /* We did not receive a packet, and there was no periodic\r
 253                                 processing to perform.  Block for a fixed period.  If a packet\r
 254                                 is received during this period we will be woken by the ISR\r
 255                                 giving us the Semaphore. */\r
 256                                 xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );                       \r
 257                         }\r
 258                 }\r
 259         }\r
 260 }\r
 261 /*-----------------------------------------------------------*/\r
 262 \r
 263 static void prvENET_Send(void)\r
 264 {\r
 265         vInitialiseSend();\r
 266         vIncrementTxLength( uip_len );\r
 267         vSendBufferToMAC();\r
 268 }\r
 269 /*-----------------------------------------------------------*/\r
 270 \r
 271 static void prvSetMACAddress( void )\r
 272 {\r
 273 unsigned portLONG ulUser0, ulUser1;\r
 274 unsigned char pucMACArray[8];\r
 275 struct uip_eth_addr xAddr;\r
 276 \r
 277         /* Get the device MAC address from flash */\r
 278     FlashUserGet(&ulUser0, &ulUser1);\r
 279 \r
 280         /* Convert the MAC address from flash into sequence of bytes. */\r
 281     pucMACArray[0] = ((ulUser0 >>  0) & 0xff);\r
 282     pucMACArray[1] = ((ulUser0 >>  8) & 0xff);\r
 283     pucMACArray[2] = ((ulUser0 >> 16) & 0xff);\r
 284     pucMACArray[3] = ((ulUser1 >>  0) & 0xff);\r
 285     pucMACArray[4] = ((ulUser1 >>  8) & 0xff);\r
 286     pucMACArray[5] = ((ulUser1 >> 16) & 0xff);\r
 287 \r
 288         /* Program the MAC address. */\r
 289     EthernetMACAddrSet(ETH_BASE, pucMACArray);\r
 290 \r
 291         xAddr.addr[ 0 ] = pucMACArray[0];\r
 292         xAddr.addr[ 1 ] = pucMACArray[1];\r
 293         xAddr.addr[ 2 ] = pucMACArray[2];\r
 294         xAddr.addr[ 3 ] = pucMACArray[3];\r
 295         xAddr.addr[ 4 ] = pucMACArray[4];\r
 296         xAddr.addr[ 5 ] = pucMACArray[5];\r
 297         uip_setethaddr( xAddr );\r
 298 }\r
 299 /*-----------------------------------------------------------*/\r
 300 \r
 301 void vApplicationProcessFormInput( portCHAR *pcInputString, portBASE_TYPE xInputLength )\r
 302 {\r
 303 char *c, *pcText;\r
 304 static portCHAR cMessageForDisplay[ 32 ];\r
 305 extern xQueueHandle xOLEDQueue;\r
 306 xOLEDMessage xOLEDMessage;\r
 307 \r
 308         /* Process the form input sent by the IO page of the served HTML. */\r
 309 \r
 310         c = strstr( pcInputString, "?" );\r
 311 \r
 312     if( c )\r
 313     {\r
 314                 /* Turn LED's on or off in accordance with the check box status. */\r
 315                 if( strstr( c, "LED0=1" ) != NULL )\r
 316                 {\r
 317                         vParTestSetLED( 0, 1 );\r
 318                 }\r
 319                 else\r
 320                 {\r
 321                         vParTestSetLED( 0, 0 );\r
 322                 }               \r
 323                 \r
 324                 /* Find the start of the text to be displayed on the LCD. */\r
 325         pcText = strstr( c, "LCD=" );\r
 326         pcText += strlen( "LCD=" );\r
 327 \r
 328         /* Terminate the file name for further processing within uIP. */\r
 329         *c = 0x00;\r
 330 \r
 331         /* Terminate the LCD string. */\r
 332         c = strstr( pcText, " " );\r
 333         if( c != NULL )\r
 334         {\r
 335             *c = 0x00;\r
 336         }\r
 337 \r
 338         /* Add required spaces. */\r
 339         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
 340         {\r
 341             *c = ' ';\r
 342         }\r
 343 \r
 344         /* Write the message to the LCD. */\r
 345                 strcpy( cMessageForDisplay, pcText );\r
 346                 xOLEDMessage.pcMessage = ( signed portCHAR * ) cMessageForDisplay;\r
 347         xQueueSend( xOLEDQueue, &xOLEDMessage, portMAX_DELAY );\r
 348     }\r
 349 }\r
 350 \r