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

   1 /*\r
   2     FreeRTOS V8.1.2 - Copyright (C) 2014 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     !<<\r
  28     >>!   distribute a combined work that includes FreeRTOS without being   !<<\r
  29     >>!   obliged to provide the source code for proprietary components     !<<\r
  30     >>!   outside of the FreeRTOS 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             192\r
  97 #define uipIP_ADDR1             168\r
  98 #define uipIP_ADDR2             0\r
  99 #define uipIP_ADDR3             201\r
 100 \r
 101 /* Netmask configuration. */\r
 102 #define uipNETMASK_0    255\r
 103 #define uipNETMASK_1    255\r
 104 #define uipNETMASK_2    255\r
 105 #define uipNETMASK_3    0\r
 106 \r
 107 /* How long to wait before attempting to connect the MAC again. */\r
 108 #define uipINIT_WAIT    100\r
 109 \r
 110 /* Shortcut to the header within the Rx buffer. */\r
 111 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
 112 \r
 113 /* Standard constant. */\r
 114 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
 115 \r
 116 /*-----------------------------------------------------------*/\r
 117 \r
 118 /*\r
 119  * Send the uIP buffer to the MAC.\r
 120  */\r
 121 static void prvENET_Send(void);\r
 122 \r
 123 /*\r
 124  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
 125  */\r
 126 static void prvSetMACAddress( void );\r
 127 \r
 128 /*\r
 129  * Port functions required by the uIP stack.\r
 130  */\r
 131 void clock_init( void );\r
 132 clock_time_t clock_time( void );\r
 133 \r
 134 /*-----------------------------------------------------------*/\r
 135 \r
 136 /* The semaphore used by the ISR to wake the uIP task. */\r
 137 extern SemaphoreHandle_t xEMACSemaphore;\r
 138 \r
 139 /*-----------------------------------------------------------*/\r
 140 \r
 141 void clock_init(void)\r
 142 {\r
 143         /* This is done when the scheduler starts. */\r
 144 }\r
 145 /*-----------------------------------------------------------*/\r
 146 \r
 147 clock_time_t clock_time( void )\r
 148 {\r
 149         return xTaskGetTickCount();\r
 150 }\r
 151 \r
 152 \r
 153 void vuIP_Task( void *pvParameters )\r
 154 {\r
 155 portBASE_TYPE i;\r
 156 uip_ipaddr_t xIPAddr;\r
 157 struct timer periodic_timer, arp_timer;\r
 158 extern void ( vEMAC_ISR )( void );\r
 159 \r
 160         /* Enable/Reset the Ethernet Controller */\r
 161         SysCtlPeripheralEnable( SYSCTL_PERIPH_ETH );\r
 162         SysCtlPeripheralReset( SYSCTL_PERIPH_ETH );\r
 163 \r
 164         /* Create the semaphore used by the ISR to wake this task. */\r
 165         vSemaphoreCreateBinary( xEMACSemaphore );\r
 166 \r
 167         /* Initialise the uIP stack. */\r
 168         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
 169         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
 170         uip_init();\r
 171         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
 172         uip_sethostaddr( xIPAddr );\r
 173         uip_ipaddr( xIPAddr, uipNETMASK_0, uipNETMASK_1, uipNETMASK_2, uipNETMASK_3 );\r
 174     uip_setnetmask( xIPAddr );\r
 175         httpd_init();\r
 176 \r
 177         while( vInitEMAC() != pdPASS )\r
 178     {\r
 179         vTaskDelay( uipINIT_WAIT );\r
 180     }\r
 181         prvSetMACAddress();\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 \r
 193                         if( xHeader->type == htons( UIP_ETHTYPE_IP ) )\r
 194                         {\r
 195                                 uip_arp_ipin();\r
 196                                 uip_input();\r
 197 \r
 198                                 /* If the above function invocation resulted in data that\r
 199                                 should be sent out on the network, the global variable\r
 200                                 uip_len is set to a value > 0. */\r
 201                                 if( uip_len > 0 )\r
 202                                 {\r
 203                                         uip_arp_out();\r
 204                                         prvENET_Send();\r
 205                                 }\r
 206                         }\r
 207                         else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )\r
 208                         {\r
 209                                 uip_arp_arpin();\r
 210 \r
 211                                 /* If the above function invocation resulted in data that\r
 212                                 should be sent out on the network, the global variable\r
 213                                 uip_len is set to a value > 0. */\r
 214                                 if( uip_len > 0 )\r
 215                                 {\r
 216                                         prvENET_Send();\r
 217                                 }\r
 218                         }\r
 219                 }\r
 220                 else\r
 221                 {\r
 222                         if( timer_expired( &periodic_timer ) )\r
 223                         {\r
 224                                 timer_reset( &periodic_timer );\r
 225                                 for( i = 0; i < UIP_CONNS; i++ )\r
 226                                 {\r
 227                                         uip_periodic( i );\r
 228 \r
 229                                         /* If the above function invocation resulted in data that\r
 230                                         should be sent out on the network, the global variable\r
 231                                         uip_len is set to a value > 0. */\r
 232                                         if( uip_len > 0 )\r
 233                                         {\r
 234                                                 uip_arp_out();\r
 235                                                 prvENET_Send();\r
 236                                         }\r
 237                                 }\r
 238 \r
 239                                 /* Call the ARP timer function every 10 seconds. */\r
 240                                 if( timer_expired( &arp_timer ) )\r
 241                                 {\r
 242                                         timer_reset( &arp_timer );\r
 243                                         uip_arp_timer();\r
 244                                 }\r
 245                         }\r
 246                         else\r
 247                         {\r
 248                                 /* We did not receive a packet, and there was no periodic\r
 249                                 processing to perform.  Block for a fixed period.  If a packet\r
 250                                 is received during this period we will be woken by the ISR\r
 251                                 giving us the Semaphore. */\r
 252                                 xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );\r
 253                         }\r
 254                 }\r
 255         }\r
 256 }\r
 257 /*-----------------------------------------------------------*/\r
 258 \r
 259 static void prvENET_Send(void)\r
 260 {\r
 261     vInitialiseSend();\r
 262     vIncrementTxLength( uip_len );\r
 263     vSendBufferToMAC();\r
 264     vInitialiseSend();\r
 265     vIncrementTxLength( uip_len );\r
 266     vSendBufferToMAC();\r
 267 }\r
 268 /*-----------------------------------------------------------*/\r
 269 \r
 270 static void prvSetMACAddress( void )\r
 271 {\r
 272 unsigned long ulUser0, ulUser1;\r
 273 unsigned char pucMACArray[8];\r
 274 struct uip_eth_addr xAddr;\r
 275 \r
 276         /* Get the device MAC address from flash */\r
 277     FlashUserGet(&ulUser0, &ulUser1);\r
 278 \r
 279         /* Convert the MAC address from flash into sequence of bytes. */\r
 280     pucMACArray[0] = ((ulUser0 >>  0) & 0xff);\r
 281     pucMACArray[1] = ((ulUser0 >>  8) & 0xff);\r
 282     pucMACArray[2] = ((ulUser0 >> 16) & 0xff);\r
 283     pucMACArray[3] = ((ulUser1 >>  0) & 0xff);\r
 284     pucMACArray[4] = ((ulUser1 >>  8) & 0xff);\r
 285     pucMACArray[5] = ((ulUser1 >> 16) & 0xff);\r
 286 \r
 287         /* Program the MAC address. */\r
 288     EthernetMACAddrSet(ETH_BASE, pucMACArray);\r
 289 \r
 290         xAddr.addr[ 0 ] = pucMACArray[0];\r
 291         xAddr.addr[ 1 ] = pucMACArray[1];\r
 292         xAddr.addr[ 2 ] = pucMACArray[2];\r
 293         xAddr.addr[ 3 ] = pucMACArray[3];\r
 294         xAddr.addr[ 4 ] = pucMACArray[4];\r
 295         xAddr.addr[ 5 ] = pucMACArray[5];\r
 296         uip_setethaddr( xAddr );\r
 297 }\r
 298 /*-----------------------------------------------------------*/\r
 299 \r
 300 void vApplicationProcessFormInput( char *pcInputString, portBASE_TYPE xInputLength )\r
 301 {\r
 302 char *c, *pcText;\r
 303 static char cMessageForDisplay[ 32 ];\r
 304 extern QueueHandle_t xOLEDQueue;\r
 305 xOLEDMessage xOLEDMessage;\r
 306 \r
 307         /* Process the form input sent by the IO page of the served HTML. */\r
 308 \r
 309         c = strstr( pcInputString, "?" );\r
 310 \r
 311     if( c )\r
 312     {\r
 313                 /* Turn LED's on or off in accordance with the check box status. */\r
 314                 if( strstr( c, "LED0=1" ) != NULL )\r
 315                 {\r
 316                         vParTestSetLED( 0, 1 );\r
 317                 }\r
 318                 else\r
 319                 {\r
 320                         vParTestSetLED( 0, 0 );\r
 321                 }\r
 322 \r
 323                 /* Find the start of the text to be displayed on the LCD. */\r
 324         pcText = strstr( c, "LCD=" );\r
 325         pcText += strlen( "LCD=" );\r
 326 \r
 327         /* Terminate the file name for further processing within uIP. */\r
 328         *c = 0x00;\r
 329 \r
 330         /* Terminate the LCD string. */\r
 331         c = strstr( pcText, " " );\r
 332         if( c != NULL )\r
 333         {\r
 334             *c = 0x00;\r
 335         }\r
 336 \r
 337         /* Add required spaces. */\r
 338         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
 339         {\r
 340             *c = ' ';\r
 341         }\r
 342 \r
 343         /* Write the message to the LCD. */\r
 344                 strcpy( cMessageForDisplay, pcText );\r
 345                 xOLEDMessage.pcMessage = cMessageForDisplay;\r
 346         xQueueSend( xOLEDQueue, &xOLEDMessage, portMAX_DELAY );\r
 347     }\r
 348 }\r
 349 \r