git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_LM3Sxxxx_Rowley/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 #include "lcd_message.h"\r
  78 \r
  79 /* uip includes. */\r
  80 #include "hw_types.h"\r
  81 \r
  82 #include "uip.h"\r
  83 #include "uip_arp.h"\r
  84 #include "httpd.h"\r
  85 #include "timer.h"\r
  86 #include "clock-arch.h"\r
  87 #include "hw_ethernet.h"\r
  88 #include "ethernet.h"\r
  89 #include "hw_memmap.h"\r
  90 #include "lmi_flash.h"\r
  91 #include "sysctl.h"\r
  92 \r
  93 /* Demo includes. */\r
  94 #include "emac.h"\r
  95 #include "partest.h"\r
  96 \r
  97 /*-----------------------------------------------------------*/\r
  98 \r
  99 /* IP address configuration. */\r
 100 #define uipIP_ADDR0             192\r
 101 #define uipIP_ADDR1             168\r
 102 #define uipIP_ADDR2             0\r
 103 #define uipIP_ADDR3             201\r
 104 \r
 105 /* Netmask configuration. */\r
 106 #define uipNETMASK_0    255\r
 107 #define uipNETMASK_1    255\r
 108 #define uipNETMASK_2    255\r
 109 #define uipNETMASK_3    0\r
 110 \r
 111 /* How long to wait before attempting to connect the MAC again. */\r
 112 #define uipINIT_WAIT    100\r
 113 \r
 114 /* Shortcut to the header within the Rx buffer. */\r
 115 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
 116 \r
 117 /* Standard constant. */\r
 118 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
 119 \r
 120 /*-----------------------------------------------------------*/\r
 121 \r
 122 /*\r
 123  * Send the uIP buffer to the MAC.\r
 124  */\r
 125 static void prvENET_Send(void);\r
 126 \r
 127 /*\r
 128  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
 129  */\r
 130 static void prvSetMACAddress( void );\r
 131 \r
 132 /*\r
 133  * Port functions required by the uIP stack.\r
 134  */\r
 135 void clock_init( void );\r
 136 clock_time_t clock_time( void );\r
 137 \r
 138 /*-----------------------------------------------------------*/\r
 139 \r
 140 /* The semaphore used by the ISR to wake the uIP task. */\r
 141 extern SemaphoreHandle_t xEMACSemaphore;\r
 142 \r
 143 /*-----------------------------------------------------------*/\r
 144 \r
 145 void clock_init(void)\r
 146 {\r
 147         /* This is done when the scheduler starts. */\r
 148 }\r
 149 /*-----------------------------------------------------------*/\r
 150 \r
 151 clock_time_t clock_time( void )\r
 152 {\r
 153         return xTaskGetTickCount();\r
 154 }\r
 155 \r
 156 \r
 157 void vuIP_Task( void *pvParameters )\r
 158 {\r
 159 portBASE_TYPE i;\r
 160 uip_ipaddr_t xIPAddr;\r
 161 struct timer periodic_timer, arp_timer;\r
 162 extern void ( vEMAC_ISR )( void );\r
 163 \r
 164         /* Enable/Reset the Ethernet Controller */\r
 165         SysCtlPeripheralEnable( SYSCTL_PERIPH_ETH );\r
 166         SysCtlPeripheralReset( SYSCTL_PERIPH_ETH );\r
 167 \r
 168         /* Create the semaphore used by the ISR to wake this task. */\r
 169         vSemaphoreCreateBinary( xEMACSemaphore );\r
 170 \r
 171         /* Initialise the uIP stack. */\r
 172         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
 173         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
 174         uip_init();\r
 175         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
 176         uip_sethostaddr( xIPAddr );\r
 177         uip_ipaddr( xIPAddr, uipNETMASK_0, uipNETMASK_1, uipNETMASK_2, uipNETMASK_3 );\r
 178     uip_setnetmask( 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     vInitialiseSend();\r
 269     vIncrementTxLength( uip_len );\r
 270     vSendBufferToMAC();\r
 271 }\r
 272 /*-----------------------------------------------------------*/\r
 273 \r
 274 static void prvSetMACAddress( void )\r
 275 {\r
 276 unsigned long ulUser0, ulUser1;\r
 277 unsigned char pucMACArray[8];\r
 278 struct uip_eth_addr xAddr;\r
 279 \r
 280         /* Get the device MAC address from flash */\r
 281     FlashUserGet(&ulUser0, &ulUser1);\r
 282 \r
 283         /* Convert the MAC address from flash into sequence of bytes. */\r
 284     pucMACArray[0] = ((ulUser0 >>  0) & 0xff);\r
 285     pucMACArray[1] = ((ulUser0 >>  8) & 0xff);\r
 286     pucMACArray[2] = ((ulUser0 >> 16) & 0xff);\r
 287     pucMACArray[3] = ((ulUser1 >>  0) & 0xff);\r
 288     pucMACArray[4] = ((ulUser1 >>  8) & 0xff);\r
 289     pucMACArray[5] = ((ulUser1 >> 16) & 0xff);\r
 290 \r
 291         /* Program the MAC address. */\r
 292     EthernetMACAddrSet(ETH_BASE, pucMACArray);\r
 293 \r
 294         xAddr.addr[ 0 ] = pucMACArray[0];\r
 295         xAddr.addr[ 1 ] = pucMACArray[1];\r
 296         xAddr.addr[ 2 ] = pucMACArray[2];\r
 297         xAddr.addr[ 3 ] = pucMACArray[3];\r
 298         xAddr.addr[ 4 ] = pucMACArray[4];\r
 299         xAddr.addr[ 5 ] = pucMACArray[5];\r
 300         uip_setethaddr( xAddr );\r
 301 }\r
 302 /*-----------------------------------------------------------*/\r
 303 \r
 304 void vApplicationProcessFormInput( char *pcInputString, portBASE_TYPE xInputLength )\r
 305 {\r
 306 char *c, *pcText;\r
 307 static char cMessageForDisplay[ 32 ];\r
 308 extern QueueHandle_t xOLEDQueue;\r
 309 xOLEDMessage xOLEDMessage;\r
 310 \r
 311         /* Process the form input sent by the IO page of the served HTML. */\r
 312 \r
 313         c = strstr( pcInputString, "?" );\r
 314 \r
 315     if( c )\r
 316     {\r
 317                 /* Turn LED's on or off in accordance with the check box status. */\r
 318                 if( strstr( c, "LED0=1" ) != NULL )\r
 319                 {\r
 320                         vParTestSetLED( 0, 1 );\r
 321                 }\r
 322                 else\r
 323                 {\r
 324                         vParTestSetLED( 0, 0 );\r
 325                 }\r
 326 \r
 327                 /* Find the start of the text to be displayed on the LCD. */\r
 328         pcText = strstr( c, "LCD=" );\r
 329         pcText += strlen( "LCD=" );\r
 330 \r
 331         /* Terminate the file name for further processing within uIP. */\r
 332         *c = 0x00;\r
 333 \r
 334         /* Terminate the LCD string. */\r
 335         c = strstr( pcText, " " );\r
 336         if( c != NULL )\r
 337         {\r
 338             *c = 0x00;\r
 339         }\r
 340 \r
 341         /* Add required spaces. */\r
 342         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
 343         {\r
 344             *c = ' ';\r
 345         }\r
 346 \r
 347         /* Write the message to the LCD. */\r
 348                 strcpy( cMessageForDisplay, pcText );\r
 349                 xOLEDMessage.pcMessage = cMessageForDisplay;\r
 350         xQueueSend( xOLEDQueue, &xOLEDMessage, portMAX_DELAY );\r
 351     }\r
 352 }\r
 353 \r