git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/ARM7_LPC2368_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 /* uip includes. */\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 \r
  84 /* Demo includes. */\r
  85 #include "emac.h"\r
  86 #include "partest.h"\r
  87 \r
  88 /*-----------------------------------------------------------*/\r
  89 \r
  90 /* MAC address configuration. */\r
  91 #define uipMAC_ADDR0    0x00\r
  92 #define uipMAC_ADDR1    0x12\r
  93 #define uipMAC_ADDR2    0x13\r
  94 #define uipMAC_ADDR3    0x10\r
  95 #define uipMAC_ADDR4    0x15\r
  96 #define uipMAC_ADDR5    0x11\r
  97 \r
  98 /* IP address configuration. */\r
  99 #define uipIP_ADDR0             192\r
 100 #define uipIP_ADDR1             168\r
 101 #define uipIP_ADDR2             0\r
 102 #define uipIP_ADDR3             200     \r
 103 \r
 104 /* How long to wait before attempting to connect the MAC again. */\r
 105 #define uipINIT_WAIT    200\r
 106 \r
 107 /* Shortcut to the header within the Rx buffer. */\r
 108 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])\r
 109 \r
 110 /* Standard constant. */\r
 111 #define uipTOTAL_FRAME_HEADER_SIZE      54\r
 112 \r
 113 /*-----------------------------------------------------------*/\r
 114 \r
 115 /* \r
 116  * Send the uIP buffer to the MAC. \r
 117  */\r
 118 static void prvENET_Send(void);\r
 119 \r
 120 /*\r
 121  * Setup the MAC address in the MAC itself, and in the uIP stack.\r
 122  */\r
 123 static void prvSetMACAddress( void );\r
 124 \r
 125 /*\r
 126  * Port functions required by the uIP stack.\r
 127  */\r
 128 void clock_init( void );\r
 129 clock_time_t clock_time( void );\r
 130 \r
 131 /*-----------------------------------------------------------*/\r
 132 \r
 133 /* The semaphore used by the ISR to wake the uIP task. */\r
 134 extern SemaphoreHandle_t xEMACSemaphore;\r
 135 \r
 136 /*-----------------------------------------------------------*/\r
 137 \r
 138 void clock_init(void)\r
 139 {\r
 140         /* This is done when the scheduler starts. */\r
 141 }\r
 142 /*-----------------------------------------------------------*/\r
 143 \r
 144 clock_time_t clock_time( void )\r
 145 {\r
 146         return xTaskGetTickCount();\r
 147 }\r
 148 /*-----------------------------------------------------------*/\r
 149 \r
 150 void vuIP_Task( void *pvParameters )\r
 151 {\r
 152 portBASE_TYPE i;\r
 153 uip_ipaddr_t xIPAddr;\r
 154 struct timer periodic_timer, arp_timer;\r
 155 extern void ( vEMAC_ISR_Wrapper )( void );\r
 156 \r
 157         /* Create the semaphore used by the ISR to wake this task. */\r
 158         vSemaphoreCreateBinary( xEMACSemaphore );\r
 159         \r
 160         /* Initialise the uIP stack. */\r
 161         timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );\r
 162         timer_set( &arp_timer, configTICK_RATE_HZ * 10 );\r
 163         uip_init();\r
 164         uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );\r
 165         uip_sethostaddr( xIPAddr );\r
 166         httpd_init();\r
 167 \r
 168         /* Initialise the MAC. */\r
 169         while( Init_EMAC() != pdPASS )\r
 170     {\r
 171         vTaskDelay( uipINIT_WAIT );\r
 172     }\r
 173 \r
 174         portENTER_CRITICAL();\r
 175         {\r
 176         IntEnable = INT_RX_DONE;\r
 177         VICIntEnable |= 0x00200000;\r
 178         VICVectAddr21 = ( long ) vEMAC_ISR_Wrapper;\r
 179                 prvSetMACAddress();\r
 180         }\r
 181         portEXIT_CRITICAL();\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                         if( xHeader->type == htons( UIP_ETHTYPE_IP ) )\r
 193                         {\r
 194                                 uip_arp_ipin();\r
 195                                 uip_input();\r
 196 \r
 197                                 /* If the above function invocation resulted in data that \r
 198                                 should be sent out on the network, the global variable \r
 199                                 uip_len is set to a value > 0. */\r
 200                                 if( uip_len > 0 )\r
 201                                 {\r
 202                                         uip_arp_out();\r
 203                                         prvENET_Send();\r
 204                                 }\r
 205                         }\r
 206                         else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )\r
 207                         {\r
 208                                 uip_arp_arpin();\r
 209 \r
 210                                 /* If the above function invocation resulted in data that \r
 211                                 should be sent out on the network, the global variable \r
 212                                 uip_len is set to a value > 0. */\r
 213                                 if( uip_len > 0 )\r
 214                                 {\r
 215                                         prvENET_Send();\r
 216                                 }\r
 217                         }\r
 218                 }\r
 219                 else\r
 220                 {\r
 221                         if( timer_expired( &periodic_timer ) )\r
 222                         {\r
 223                                 timer_reset( &periodic_timer );\r
 224                                 for( i = 0; i < UIP_CONNS; i++ )\r
 225                                 {\r
 226                                         uip_periodic( i );\r
 227         \r
 228                                         /* If the above function invocation resulted in data that \r
 229                                         should be sent out on the network, the global variable \r
 230                                         uip_len is set to a value > 0. */\r
 231                                         if( uip_len > 0 )\r
 232                                         {\r
 233                                                 uip_arp_out();\r
 234                                                 prvENET_Send();\r
 235                                         }\r
 236                                 }       \r
 237         \r
 238                                 /* Call the ARP timer function every 10 seconds. */\r
 239                                 if( timer_expired( &arp_timer ) )\r
 240                                 {\r
 241                                         timer_reset( &arp_timer );\r
 242                                         uip_arp_timer();\r
 243                                 }\r
 244                         }\r
 245                         else\r
 246                         {                       \r
 247                                 /* We did not receive a packet, and there was no periodic\r
 248                                 processing to perform.  Block for a fixed period.  If a packet\r
 249                                 is received during this period we will be woken by the ISR\r
 250                                 giving us the Semaphore. */\r
 251                                 xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );                       \r
 252                         }\r
 253                 }\r
 254         }\r
 255 }\r
 256 /*-----------------------------------------------------------*/\r
 257 \r
 258 static void prvENET_Send(void)\r
 259 {\r
 260     RequestSend();\r
 261 \r
 262     /* Copy the header into the Tx buffer. */\r
 263     CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );\r
 264     if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )\r
 265     {\r
 266         CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );\r
 267     }\r
 268 \r
 269     DoSend_EMAC( uip_len );\r
 270 \r
 271     RequestSend();\r
 272 \r
 273     /* Copy the header into the Tx buffer. */\r
 274     CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );\r
 275     if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )\r
 276     {\r
 277         CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );\r
 278     }\r
 279 \r
 280     DoSend_EMAC( uip_len );\r
 281 }\r
 282 /*-----------------------------------------------------------*/\r
 283 \r
 284 static void prvSetMACAddress( void )\r
 285 {\r
 286 struct uip_eth_addr xAddr;\r
 287 \r
 288         /* Configure the MAC address in the uIP stack. */\r
 289         xAddr.addr[ 0 ] = uipMAC_ADDR0;\r
 290         xAddr.addr[ 1 ] = uipMAC_ADDR1;\r
 291         xAddr.addr[ 2 ] = uipMAC_ADDR2;\r
 292         xAddr.addr[ 3 ] = uipMAC_ADDR3;\r
 293         xAddr.addr[ 4 ] = uipMAC_ADDR4;\r
 294         xAddr.addr[ 5 ] = uipMAC_ADDR5;\r
 295         uip_setethaddr( xAddr );\r
 296 }\r
 297 /*-----------------------------------------------------------*/\r
 298 \r
 299 void vApplicationProcessFormInput( char *pcInputString, portBASE_TYPE xInputLength )\r
 300 {\r
 301 char *c, *pcText;\r
 302 static char cMessageForDisplay[ 32 ];\r
 303 extern QueueHandle_t xLCDQueue;\r
 304 xLCDMessage xLCDMessage;\r
 305 \r
 306         /* Process the form input sent by the IO page of the served HTML. */\r
 307 \r
 308         c = strstr( pcInputString, "?" );\r
 309     if( c )\r
 310     {\r
 311                 /* Turn LED's on or off in accordance with the check box status. */\r
 312                 if( strstr( c, "LED0=1" ) != NULL )\r
 313                 {\r
 314                         vParTestSetLED( 5, 0 );\r
 315                 }\r
 316                 else\r
 317                 {\r
 318                         vParTestSetLED( 5, 1 );\r
 319                 }               \r
 320                 \r
 321                 if( strstr( c, "LED1=1" ) != NULL )\r
 322                 {\r
 323                         vParTestSetLED( 6, 0 );\r
 324                 }\r
 325                 else\r
 326                 {\r
 327                         vParTestSetLED( 6, 1 );\r
 328                 }               \r
 329 \r
 330                 if( strstr( c, "LED2=1" ) != NULL )\r
 331                 {\r
 332                         vParTestSetLED( 7, 0 );\r
 333                 }\r
 334                 else\r
 335                 {\r
 336                         vParTestSetLED( 7, 1 );\r
 337                 }\r
 338 \r
 339                 /* Find the start of the text to be displayed on the LCD. */\r
 340         pcText = strstr( c, "LCD=" );\r
 341         pcText += strlen( "LCD=" );\r
 342 \r
 343         /* Terminate the file name for further processing within uIP. */\r
 344         *c = 0x00;\r
 345 \r
 346         /* Terminate the LCD string. */\r
 347         c = strstr( pcText, " " );\r
 348         if( c != NULL )\r
 349         {\r
 350             *c = 0x00;\r
 351         }\r
 352 \r
 353         /* Add required spaces. */\r
 354         while( ( c = strstr( pcText, "+" ) ) != NULL )\r
 355         {\r
 356             *c = ' ';\r
 357         }\r
 358     \r
 359         /* Write the message to the LCD. */\r
 360                 strcpy( cMessageForDisplay, pcText );\r
 361                 xLCDMessage.xColumn = 0;\r
 362                 xLCDMessage.pcMessage = cMessageForDisplay;\r
 363         xQueueSend( xLCDQueue, &xLCDMessage, portMAX_DELAY );\r
 364     }\r
 365 }\r
 366 \r