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

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