FreeRTOS/Demo/ARM7_LPC2368_Rowley/webserver/uIP_Task.c - third_party/github/FreeRTOS/FreeRTOS-Kernel - Git at Google

 /*
     FreeRTOS V7.6.0 - Copyright (C) 2013 Real Time Engineers Ltd.
     All rights reserved

     VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.

     ***************************************************************************
      *                                                                       *
      *    FreeRTOS provides completely free yet professionally developed,    *
      *    robust, strictly quality controlled, supported, and cross          *
      *    platform software that has become a de facto standard.             *
      *                                                                       *
      *    Help yourself get started quickly and support the FreeRTOS         *
      *    project by purchasing a FreeRTOS tutorial book, reference          *
      *    manual, or both from: http://www.FreeRTOS.org/Documentation        *
      *                                                                       *
      *    Thank you!                                                         *
      *                                                                       *
     ***************************************************************************

     This file is part of the FreeRTOS distribution.

     FreeRTOS is free software; you can redistribute it and/or modify it under
     the terms of the GNU General Public License (version 2) as published by the
     Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.

     >>! NOTE: The modification to the GPL is included to allow you to distribute
     >>! a combined work that includes FreeRTOS without being obliged to provide
     >>! the source code for proprietary components outside of the FreeRTOS
     >>! kernel.

     FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY
     WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
     FOR A PARTICULAR PURPOSE.  Full license text is available from the following
     link: http://www.freertos.org/a00114.html

     1 tab == 4 spaces!

     ***************************************************************************
      *                                                                       *
      *    Having a problem?  Start by reading the FAQ "My application does   *
      *    not run, what could be wrong?"                                     *
      *                                                                       *
      *    http://www.FreeRTOS.org/FAQHelp.html                               *
      *                                                                       *
     ***************************************************************************

     http://www.FreeRTOS.org - Documentation, books, training, latest versions,
     license and Real Time Engineers Ltd. contact details.

     http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
     including FreeRTOS+Trace - an indispensable productivity tool, a DOS
     compatible FAT file system, and our tiny thread aware UDP/IP stack.

     http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
     Integrity Systems to sell under the OpenRTOS brand.  Low cost OpenRTOS
     licenses offer ticketed support, indemnification and middleware.

     http://www.SafeRTOS.com - High Integrity Systems also provide a safety
     engineered and independently SIL3 certified version for use in safety and
     mission critical applications that require provable dependability.

     1 tab == 4 spaces!
 */
 /* Standard includes. */
 #include <string.h>

 /* Scheduler includes. */
 #include "FreeRTOS.h"
 #include "task.h"
 #include "semphr.h"

 /* uip includes. */
 #include "uip.h"
 #include "uip_arp.h"
 #include "httpd.h"
 #include "timer.h"
 #include "clock-arch.h"

 /* Demo includes. */
 #include "emac.h"
 #include "partest.h"

 /*-----------------------------------------------------------*/

 /* MAC address configuration. */
 #define uipMAC_ADDR0	0x00
 #define uipMAC_ADDR1	0x12
 #define uipMAC_ADDR2	0x13
 #define uipMAC_ADDR3	0x10
 #define uipMAC_ADDR4	0x15
 #define uipMAC_ADDR5	0x11

 /* IP address configuration. */
 #define uipIP_ADDR0		192
 #define uipIP_ADDR1		168
 #define uipIP_ADDR2		0
 #define uipIP_ADDR3		200

 /* How long to wait before attempting to connect the MAC again. */
 #define uipINIT_WAIT    200

 /* Shortcut to the header within the Rx buffer. */
 #define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])

 /* Standard constant. */
 #define uipTOTAL_FRAME_HEADER_SIZE	54

 /*-----------------------------------------------------------*/

 /*
  * Send the uIP buffer to the MAC.
  */
 static void prvENET_Send(void);

 /*
  * Setup the MAC address in the MAC itself, and in the uIP stack.
  */
 static void prvSetMACAddress( void );

 /*
  * Port functions required by the uIP stack.
  */
 void clock_init( void );
 clock_time_t clock_time( void );

 /*-----------------------------------------------------------*/

 /* The semaphore used by the ISR to wake the uIP task. */
 extern xSemaphoreHandle xEMACSemaphore;

 /*-----------------------------------------------------------*/

 void clock_init(void)
 {
 	/* This is done when the scheduler starts. */
 }
 /*-----------------------------------------------------------*/

 clock_time_t clock_time( void )
 {
 	return xTaskGetTickCount();
 }
 /*-----------------------------------------------------------*/

 void vuIP_Task( void *pvParameters )
 {
 portBASE_TYPE i;
 uip_ipaddr_t xIPAddr;
 struct timer periodic_timer, arp_timer;
 extern void ( vEMAC_ISR_Wrapper )( void );

 	/* Create the semaphore used by the ISR to wake this task. */
 	vSemaphoreCreateBinary( xEMACSemaphore );

 	/* Initialise the uIP stack. */
 	timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );
 	timer_set( &arp_timer, configTICK_RATE_HZ * 10 );
 	uip_init();
 	uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );
 	uip_sethostaddr( xIPAddr );
 	httpd_init();

 	/* Initialise the MAC. */
 	while( Init_EMAC() != pdPASS )
     {
         vTaskDelay( uipINIT_WAIT );
     }

 	portENTER_CRITICAL();
 	{
         IntEnable = INT_RX_DONE;
         VICIntEnable |= 0x00200000;
         VICVectAddr21 = ( portLONG ) vEMAC_ISR_Wrapper;
 		prvSetMACAddress();
 	}
 	portEXIT_CRITICAL();


 	for( ;; )
 	{
 		/* Is there received data ready to be processed? */
 		uip_len = uiGetEMACRxData( uip_buf );

 		if( uip_len > 0 )
 		{
 			/* Standard uIP loop taken from the uIP manual. */
 			if( xHeader->type == htons( UIP_ETHTYPE_IP ) )
 			{
 				uip_arp_ipin();
 				uip_input();

 				/* If the above function invocation resulted in data that
 				should be sent out on the network, the global variable
 				uip_len is set to a value > 0. */
 				if( uip_len > 0 )
 				{
 					uip_arp_out();
 					prvENET_Send();
 				}
 			}
 			else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )
 			{
 				uip_arp_arpin();

 				/* If the above function invocation resulted in data that
 				should be sent out on the network, the global variable
 				uip_len is set to a value > 0. */
 				if( uip_len > 0 )
 				{
 					prvENET_Send();
 				}
 			}
 		}
 		else
 		{
 			if( timer_expired( &periodic_timer ) )
 			{
 				timer_reset( &periodic_timer );
 				for( i = 0; i < UIP_CONNS; i++ )
 				{
 					uip_periodic( i );

 					/* If the above function invocation resulted in data that
 					should be sent out on the network, the global variable
 					uip_len is set to a value > 0. */
 					if( uip_len > 0 )
 					{
 						uip_arp_out();
 						prvENET_Send();
 					}
 				}

 				/* Call the ARP timer function every 10 seconds. */
 				if( timer_expired( &arp_timer ) )
 				{
 					timer_reset( &arp_timer );
 					uip_arp_timer();
 				}
 			}
 			else
 			{
 				/* We did not receive a packet, and there was no periodic
 				processing to perform.  Block for a fixed period.  If a packet
 				is received during this period we will be woken by the ISR
 				giving us the Semaphore. */
 				xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );
 			}
 		}
 	}
 }
 /*-----------------------------------------------------------*/

 static void prvENET_Send(void)
 {
     RequestSend();

     /* Copy the header into the Tx buffer. */
     CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );
     if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )
     {
         CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );
     }

     DoSend_EMAC( uip_len );

     RequestSend();

     /* Copy the header into the Tx buffer. */
     CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );
     if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )
     {
         CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );
     }

     DoSend_EMAC( uip_len );
 }
 /*-----------------------------------------------------------*/

 static void prvSetMACAddress( void )
 {
 struct uip_eth_addr xAddr;

 	/* Configure the MAC address in the uIP stack. */
 	xAddr.addr[ 0 ] = uipMAC_ADDR0;
 	xAddr.addr[ 1 ] = uipMAC_ADDR1;
 	xAddr.addr[ 2 ] = uipMAC_ADDR2;
 	xAddr.addr[ 3 ] = uipMAC_ADDR3;
 	xAddr.addr[ 4 ] = uipMAC_ADDR4;
 	xAddr.addr[ 5 ] = uipMAC_ADDR5;
 	uip_setethaddr( xAddr );
 }
 /*-----------------------------------------------------------*/

 void vApplicationProcessFormInput( portCHAR *pcInputString, portBASE_TYPE xInputLength )
 {
 char *c, *pcText;
 static portCHAR cMessageForDisplay[ 32 ];
 extern xQueueHandle xLCDQueue;
 xLCDMessage xLCDMessage;

 	/* Process the form input sent by the IO page of the served HTML. */

 	c = strstr( pcInputString, "?" );
     if( c )
     {
 		/* Turn LED's on or off in accordance with the check box status. */
 		if( strstr( c, "LED0=1" ) != NULL )
 		{
 			vParTestSetLED( 5, 0 );
 		}
 		else
 		{
 			vParTestSetLED( 5, 1 );
 		}

 		if( strstr( c, "LED1=1" ) != NULL )
 		{
 			vParTestSetLED( 6, 0 );
 		}
 		else
 		{
 			vParTestSetLED( 6, 1 );
 		}

 		if( strstr( c, "LED2=1" ) != NULL )
 		{
 			vParTestSetLED( 7, 0 );
 		}
 		else
 		{
 			vParTestSetLED( 7, 1 );
 		}

 		/* Find the start of the text to be displayed on the LCD. */
         pcText = strstr( c, "LCD=" );
         pcText += strlen( "LCD=" );

         /* Terminate the file name for further processing within uIP. */
         *c = 0x00;

         /* Terminate the LCD string. */
         c = strstr( pcText, " " );
         if( c != NULL )
         {
             *c = 0x00;
         }

         /* Add required spaces. */
         while( ( c = strstr( pcText, "+" ) ) != NULL )
         {
             *c = ' ';
         }

         /* Write the message to the LCD. */
 		strcpy( cMessageForDisplay, pcText );
 		xLCDMessage.xColumn = 0;
 		xLCDMessage.pcMessage = cMessageForDisplay;
         xQueueSend( xLCDQueue, &xLCDMessage, portMAX_DELAY );
     }
 }
	/*
	FreeRTOS V7.6.0 - Copyright (C) 2013 Real Time Engineers Ltd.
	All rights reserved

	VISIT http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.

	***************************************************************************
	* *
	* FreeRTOS provides completely free yet professionally developed, *
	* robust, strictly quality controlled, supported, and cross *
	* platform software that has become a de facto standard. *
	* *
	* Help yourself get started quickly and support the FreeRTOS *
	* project by purchasing a FreeRTOS tutorial book, reference *
	* manual, or both from: http://www.FreeRTOS.org/Documentation *
	* *
	* Thank you! *
	* *
	***************************************************************************

	This file is part of the FreeRTOS distribution.

	FreeRTOS is free software; you can redistribute it and/or modify it under
	the terms of the GNU General Public License (version 2) as published by the
	Free Software Foundation >>!AND MODIFIED BY!<< the FreeRTOS exception.

	>>! NOTE: The modification to the GPL is included to allow you to distribute
	>>! a combined work that includes FreeRTOS without being obliged to provide
	>>! the source code for proprietary components outside of the FreeRTOS
	>>! kernel.

	FreeRTOS is distributed in the hope that it will be useful, but WITHOUT ANY
	WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
	FOR A PARTICULAR PURPOSE. Full license text is available from the following
	link: http://www.freertos.org/a00114.html

	1 tab == 4 spaces!

	***************************************************************************
	* *
	* Having a problem? Start by reading the FAQ "My application does *
	* not run, what could be wrong?" *
	* *
	* http://www.FreeRTOS.org/FAQHelp.html *
	* *
	***************************************************************************

	http://www.FreeRTOS.org - Documentation, books, training, latest versions,
	license and Real Time Engineers Ltd. contact details.

	http://www.FreeRTOS.org/plus - A selection of FreeRTOS ecosystem products,
	including FreeRTOS+Trace - an indispensable productivity tool, a DOS
	compatible FAT file system, and our tiny thread aware UDP/IP stack.

	http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
	Integrity Systems to sell under the OpenRTOS brand. Low cost OpenRTOS
	licenses offer ticketed support, indemnification and middleware.

	http://www.SafeRTOS.com - High Integrity Systems also provide a safety
	engineered and independently SIL3 certified version for use in safety and
	mission critical applications that require provable dependability.

	1 tab == 4 spaces!
	*/
	/* Standard includes. */
	#include <string.h>

	/* Scheduler includes. */
	#include "FreeRTOS.h"
	#include "task.h"
	#include "semphr.h"

	/* uip includes. */
	#include "uip.h"
	#include "uip_arp.h"
	#include "httpd.h"
	#include "timer.h"
	#include "clock-arch.h"

	/* Demo includes. */
	#include "emac.h"
	#include "partest.h"

	/-----------------------------------------------------------/

	/* MAC address configuration. */
	#define uipMAC_ADDR0 0x00
	#define uipMAC_ADDR1 0x12
	#define uipMAC_ADDR2 0x13
	#define uipMAC_ADDR3 0x10
	#define uipMAC_ADDR4 0x15
	#define uipMAC_ADDR5 0x11

	/* IP address configuration. */
	#define uipIP_ADDR0 192
	#define uipIP_ADDR1 168
	#define uipIP_ADDR2 0
	#define uipIP_ADDR3 200

	/* How long to wait before attempting to connect the MAC again. */
	#define uipINIT_WAIT 200

	/* Shortcut to the header within the Rx buffer. */
	#define xHeader ((struct uip_eth_hdr *) &uip_buf[ 0 ])

	/* Standard constant. */
	#define uipTOTAL_FRAME_HEADER_SIZE 54

	/-----------------------------------------------------------/

	/*
	* Send the uIP buffer to the MAC.
	*/
	static void prvENET_Send(void);

	/*
	* Setup the MAC address in the MAC itself, and in the uIP stack.
	*/
	static void prvSetMACAddress( void );

	/*
	* Port functions required by the uIP stack.
	*/
	void clock_init( void );
	clock_time_t clock_time( void );

	/-----------------------------------------------------------/

	/* The semaphore used by the ISR to wake the uIP task. */
	extern xSemaphoreHandle xEMACSemaphore;

	/-----------------------------------------------------------/

	void clock_init(void)
	{
	/* This is done when the scheduler starts. */
	}
	/-----------------------------------------------------------/

	clock_time_t clock_time( void )
	{
	return xTaskGetTickCount();
	}
	/-----------------------------------------------------------/

	void vuIP_Task( void *pvParameters )
	{
	portBASE_TYPE i;
	uip_ipaddr_t xIPAddr;
	struct timer periodic_timer, arp_timer;
	extern void ( vEMAC_ISR_Wrapper )( void );

	/* Create the semaphore used by the ISR to wake this task. */
	vSemaphoreCreateBinary( xEMACSemaphore );

	/* Initialise the uIP stack. */
	timer_set( &periodic_timer, configTICK_RATE_HZ / 2 );
	timer_set( &arp_timer, configTICK_RATE_HZ * 10 );
	uip_init();
	uip_ipaddr( xIPAddr, uipIP_ADDR0, uipIP_ADDR1, uipIP_ADDR2, uipIP_ADDR3 );
	uip_sethostaddr( xIPAddr );
	httpd_init();

	/* Initialise the MAC. */
	while( Init_EMAC() != pdPASS )
	{
	vTaskDelay( uipINIT_WAIT );
	}

	portENTER_CRITICAL();
	{
	IntEnable = INT_RX_DONE;
	VICIntEnable \|= 0x00200000;
	VICVectAddr21 = ( portLONG ) vEMAC_ISR_Wrapper;
	prvSetMACAddress();
	}
	portEXIT_CRITICAL();


	for( ;; )
	{
	/* Is there received data ready to be processed? */
	uip_len = uiGetEMACRxData( uip_buf );

	if( uip_len > 0 )
	{
	/* Standard uIP loop taken from the uIP manual. */
	if( xHeader->type == htons( UIP_ETHTYPE_IP ) )
	{
	uip_arp_ipin();
	uip_input();

	/* If the above function invocation resulted in data that
	should be sent out on the network, the global variable
	uip_len is set to a value > 0. */
	if( uip_len > 0 )
	{
	uip_arp_out();
	prvENET_Send();
	}
	}
	else if( xHeader->type == htons( UIP_ETHTYPE_ARP ) )
	{
	uip_arp_arpin();

	/* If the above function invocation resulted in data that
	should be sent out on the network, the global variable
	uip_len is set to a value > 0. */
	if( uip_len > 0 )
	{
	prvENET_Send();
	}
	}
	}
	else
	{
	if( timer_expired( &periodic_timer ) )
	{
	timer_reset( &periodic_timer );
	for( i = 0; i < UIP_CONNS; i++ )
	{
	uip_periodic( i );

	/* If the above function invocation resulted in data that
	should be sent out on the network, the global variable
	uip_len is set to a value > 0. */
	if( uip_len > 0 )
	{
	uip_arp_out();
	prvENET_Send();
	}
	}

	/* Call the ARP timer function every 10 seconds. */
	if( timer_expired( &arp_timer ) )
	{
	timer_reset( &arp_timer );
	uip_arp_timer();
	}
	}
	else
	{
	/* We did not receive a packet, and there was no periodic
	processing to perform. Block for a fixed period. If a packet
	is received during this period we will be woken by the ISR
	giving us the Semaphore. */
	xSemaphoreTake( xEMACSemaphore, configTICK_RATE_HZ / 2 );
	}
	}
	}
	}
	/-----------------------------------------------------------/

	static void prvENET_Send(void)
	{
	RequestSend();

	/* Copy the header into the Tx buffer. */
	CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );
	if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )
	{
	CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );
	}

	DoSend_EMAC( uip_len );

	RequestSend();

	/* Copy the header into the Tx buffer. */
	CopyToFrame_EMAC( uip_buf, uipTOTAL_FRAME_HEADER_SIZE );
	if( uip_len > uipTOTAL_FRAME_HEADER_SIZE )
	{
	CopyToFrame_EMAC( uip_appdata, ( uip_len - uipTOTAL_FRAME_HEADER_SIZE ) );
	}

	DoSend_EMAC( uip_len );
	}
	/-----------------------------------------------------------/

	static void prvSetMACAddress( void )
	{
	struct uip_eth_addr xAddr;

	/* Configure the MAC address in the uIP stack. */
	xAddr.addr[ 0 ] = uipMAC_ADDR0;
	xAddr.addr[ 1 ] = uipMAC_ADDR1;
	xAddr.addr[ 2 ] = uipMAC_ADDR2;
	xAddr.addr[ 3 ] = uipMAC_ADDR3;
	xAddr.addr[ 4 ] = uipMAC_ADDR4;
	xAddr.addr[ 5 ] = uipMAC_ADDR5;
	uip_setethaddr( xAddr );
	}
	/-----------------------------------------------------------/

	void vApplicationProcessFormInput( portCHAR *pcInputString, portBASE_TYPE xInputLength )
	{
	char c, pcText;
	static portCHAR cMessageForDisplay[ 32 ];
	extern xQueueHandle xLCDQueue;
	xLCDMessage xLCDMessage;

	/* Process the form input sent by the IO page of the served HTML. */

	c = strstr( pcInputString, "?" );
	if( c )
	{
	/* Turn LED's on or off in accordance with the check box status. */
	if( strstr( c, "LED0=1" ) != NULL )
	{
	vParTestSetLED( 5, 0 );
	}
	else
	{
	vParTestSetLED( 5, 1 );
	}

	if( strstr( c, "LED1=1" ) != NULL )
	{
	vParTestSetLED( 6, 0 );
	}
	else
	{
	vParTestSetLED( 6, 1 );
	}

	if( strstr( c, "LED2=1" ) != NULL )
	{
	vParTestSetLED( 7, 0 );
	}
	else
	{
	vParTestSetLED( 7, 1 );
	}

	/* Find the start of the text to be displayed on the LCD. */
	pcText = strstr( c, "LCD=" );
	pcText += strlen( "LCD=" );

	/* Terminate the file name for further processing within uIP. */
	*c = 0x00;

	/* Terminate the LCD string. */
	c = strstr( pcText, " " );
	if( c != NULL )
	{
	*c = 0x00;
	}

	/* Add required spaces. */
	while( ( c = strstr( pcText, "+" ) ) != NULL )
	{
	*c = ' ';
	}

	/* Write the message to the LCD. */
	strcpy( cMessageForDisplay, pcText );
	xLCDMessage.xColumn = 0;
	xLCDMessage.pcMessage = cMessageForDisplay;
	xQueueSend( xLCDQueue, &xLCDMessage, portMAX_DELAY );
	}
	}