/* FreeRTOS V7.5.2 - Copyright (C) 2013 Real Time Engineers Ltd. 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 /* 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 ); } }