You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
367 lines
12 KiB
C
367 lines
12 KiB
C
/*
|
|
FreeRTOS V7.4.2 - Copyright (C) 2013 Real Time Engineers Ltd.
|
|
|
|
FEATURES AND PORTS ARE ADDED TO FREERTOS ALL THE TIME. PLEASE VISIT
|
|
http://www.FreeRTOS.org TO ENSURE YOU ARE USING THE LATEST VERSION.
|
|
|
|
***************************************************************************
|
|
* *
|
|
* FreeRTOS tutorial books are available in pdf and paperback. *
|
|
* Complete, revised, and edited pdf reference manuals are also *
|
|
* available. *
|
|
* *
|
|
* Purchasing FreeRTOS documentation will not only help you, by *
|
|
* ensuring you get running as quickly as possible and with an *
|
|
* in-depth knowledge of how to use FreeRTOS, it will also help *
|
|
* the FreeRTOS project to continue with its mission of providing *
|
|
* professional grade, cross platform, de facto standard solutions *
|
|
* for microcontrollers - completely free of charge! *
|
|
* *
|
|
* >>> See http://www.FreeRTOS.org/Documentation for details. <<< *
|
|
* *
|
|
* Thank you for using FreeRTOS, and thank you for your support! *
|
|
* *
|
|
***************************************************************************
|
|
|
|
|
|
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. See the GNU General Public License for more
|
|
details. You should have received a copy of the GNU General Public License
|
|
and the FreeRTOS license exception along with FreeRTOS; if not it can be
|
|
viewed here: http://www.freertos.org/a00114.html and also obtained by
|
|
writing to Real Time Engineers Ltd., contact details for whom are available
|
|
on the FreeRTOS WEB site.
|
|
|
|
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, and our new
|
|
fully thread aware and reentrant UDP/IP stack.
|
|
|
|
http://www.OpenRTOS.com - Real Time Engineers ltd license FreeRTOS to High
|
|
Integrity Systems, who sell the code with commercial support,
|
|
indemnification and middleware, under the OpenRTOS brand.
|
|
|
|
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.
|
|
*/
|
|
|
|
/* Standard includes. */
|
|
#include <string.h>
|
|
|
|
/* Scheduler includes. */
|
|
#include "FreeRTOS.h"
|
|
#include "task.h"
|
|
#include "timers.h"
|
|
#include "queue.h"
|
|
|
|
/* uip includes. */
|
|
#include "net/uip.h"
|
|
#include "net/uip_arp.h"
|
|
#include "apps/httpd/httpd.h"
|
|
#include "sys/timer.h"
|
|
#include "net/clock-arch.h"
|
|
#include "r_ether.h"
|
|
|
|
/* Demo includes. */
|
|
#include "ParTest.h"
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
/* How long to wait before attempting to connect the MAC again. */
|
|
#define uipINIT_WAIT ( 100 / portTICK_RATE_MS )
|
|
|
|
/* 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
|
|
|
|
/* The ARP timer and the periodic timer share a callback function, so the
|
|
respective timer IDs are used to determine which timer actually expired. These
|
|
constants are assigned to the timer IDs. */
|
|
#define uipARP_TIMER 0
|
|
#define uipPERIODIC_TIMER 1
|
|
|
|
/* A block time of zero ticks simply means, "don't block". */
|
|
#define uipDONT_BLOCK 0UL
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
/*
|
|
* Setup the MAC address in the MAC itself, and in the uIP stack.
|
|
*/
|
|
static void prvSetMACAddress( void );
|
|
|
|
/*
|
|
* Perform any uIP initialisation necessary.
|
|
*/
|
|
static void prvInitialise_uIP( void );
|
|
|
|
/*
|
|
* The callback function that is assigned to both the periodic timer and the
|
|
* ARP timer.
|
|
*/
|
|
static void prvUIPTimerCallback( xTimerHandle xTimer );
|
|
|
|
/*
|
|
* Port functions required by the uIP stack.
|
|
*/
|
|
clock_time_t clock_time( void );
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
/* The queue used to send TCP/IP events to the uIP stack. */
|
|
xQueueHandle xEMACEventQueue = NULL;
|
|
|
|
/*-----------------------------------------------------------*/
|
|
|
|
clock_time_t clock_time( void )
|
|
{
|
|
return xTaskGetTickCount();
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
void vuIP_Task( void *pvParameters )
|
|
{
|
|
portBASE_TYPE i;
|
|
unsigned long ulNewEvent = 0UL;
|
|
unsigned long ulUIP_Events = 0UL;
|
|
|
|
( void ) pvParameters;
|
|
|
|
/* Initialise the uIP stack. */
|
|
prvInitialise_uIP();
|
|
|
|
/* Initialise the MAC. */
|
|
vInitEmac();
|
|
|
|
while( lEMACWaitForLink() != pdPASS )
|
|
{
|
|
vTaskDelay( uipINIT_WAIT );
|
|
}
|
|
|
|
for( ;; )
|
|
{
|
|
if( ( ulUIP_Events & uipETHERNET_RX_EVENT ) != 0UL )
|
|
{
|
|
/* Is there received data ready to be processed? */
|
|
uip_len = ( unsigned short ) ulEMACRead();
|
|
|
|
if( ( uip_len > 0 ) && ( uip_buf != NULL ) )
|
|
{
|
|
/* 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();
|
|
vEMACWrite();
|
|
}
|
|
}
|
|
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 )
|
|
{
|
|
vEMACWrite();
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
ulUIP_Events &= ~uipETHERNET_RX_EVENT;
|
|
}
|
|
}
|
|
|
|
if( ( ulUIP_Events & uipPERIODIC_TIMER_EVENT ) != 0UL )
|
|
{
|
|
ulUIP_Events &= ~uipPERIODIC_TIMER_EVENT;
|
|
|
|
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();
|
|
vEMACWrite();
|
|
}
|
|
}
|
|
}
|
|
|
|
/* Call the ARP timer function every 10 seconds. */
|
|
if( ( ulUIP_Events & uipARP_TIMER_EVENT ) != 0 )
|
|
{
|
|
ulUIP_Events &= ~uipARP_TIMER_EVENT;
|
|
uip_arp_timer();
|
|
}
|
|
|
|
if( ulUIP_Events == pdFALSE )
|
|
{
|
|
xQueueReceive( xEMACEventQueue, &ulNewEvent, portMAX_DELAY );
|
|
ulUIP_Events |= ulNewEvent;
|
|
}
|
|
}
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
static void prvInitialise_uIP( void )
|
|
{
|
|
xTimerHandle xARPTimer, xPeriodicTimer;
|
|
uip_ipaddr_t xIPAddr;
|
|
const unsigned long ul_uIPEventQueueLength = 10UL;
|
|
|
|
/* Initialise the uIP stack. */
|
|
uip_init();
|
|
uip_ipaddr( &xIPAddr, configIP_ADDR0, configIP_ADDR1, configIP_ADDR2, configIP_ADDR3 );
|
|
uip_sethostaddr( &xIPAddr );
|
|
uip_ipaddr( &xIPAddr, configNET_MASK0, configNET_MASK1, configNET_MASK2, configNET_MASK3 );
|
|
uip_setnetmask( &xIPAddr );
|
|
prvSetMACAddress();
|
|
httpd_init();
|
|
|
|
/* Create the queue used to sent TCP/IP events to the uIP stack. */
|
|
xEMACEventQueue = xQueueCreate( ul_uIPEventQueueLength, sizeof( unsigned long ) );
|
|
|
|
/* Create and start the uIP timers. */
|
|
xARPTimer = xTimerCreate( "ARPTimer", /* Just a name that is helpful for debugging, not used by the kernel. */
|
|
( 10000UL / portTICK_RATE_MS ), /* Timer period. */
|
|
pdTRUE, /* Autor-reload. */
|
|
( void * ) uipARP_TIMER,
|
|
prvUIPTimerCallback
|
|
);
|
|
|
|
xPeriodicTimer = xTimerCreate( "PeriodicTimer",
|
|
( 50 / portTICK_RATE_MS ),
|
|
pdTRUE, /* Autor-reload. */
|
|
( void * ) uipPERIODIC_TIMER,
|
|
prvUIPTimerCallback
|
|
);
|
|
|
|
configASSERT( xARPTimer );
|
|
configASSERT( xPeriodicTimer );
|
|
|
|
xTimerStart( xARPTimer, portMAX_DELAY );
|
|
xTimerStart( xPeriodicTimer, portMAX_DELAY );
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
static void prvUIPTimerCallback( xTimerHandle xTimer )
|
|
{
|
|
static const unsigned long ulARPTimerExpired = uipARP_TIMER_EVENT;
|
|
static const unsigned long ulPeriodicTimerExpired = uipPERIODIC_TIMER_EVENT;
|
|
|
|
/* This is a time callback, so calls to xQueueSend() must not attempt to
|
|
block. */
|
|
switch( ( int ) pvTimerGetTimerID( xTimer ) )
|
|
{
|
|
case uipARP_TIMER : xQueueSend( xEMACEventQueue, &ulARPTimerExpired, uipDONT_BLOCK );
|
|
break;
|
|
|
|
case uipPERIODIC_TIMER : xQueueSend( xEMACEventQueue, &ulPeriodicTimerExpired, uipDONT_BLOCK );
|
|
break;
|
|
|
|
default : /* Should not get here. */
|
|
break;
|
|
}
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
static void prvSetMACAddress( void )
|
|
{
|
|
struct uip_eth_addr xAddr;
|
|
|
|
/* Configure the MAC address in the uIP stack. */
|
|
xAddr.addr[ 0 ] = configMAC_ADDR0;
|
|
xAddr.addr[ 1 ] = configMAC_ADDR1;
|
|
xAddr.addr[ 2 ] = configMAC_ADDR2;
|
|
xAddr.addr[ 3 ] = configMAC_ADDR3;
|
|
xAddr.addr[ 4 ] = configMAC_ADDR4;
|
|
xAddr.addr[ 5 ] = configMAC_ADDR5;
|
|
uip_setethaddr( xAddr );
|
|
}
|
|
/*-----------------------------------------------------------*/
|
|
|
|
void vApplicationProcessFormInput( char *pcInputString )
|
|
{
|
|
char *c;
|
|
|
|
/* Only interested in processing form input if this is the IO page. */
|
|
c = strstr( pcInputString, "io.shtml" );
|
|
|
|
if( c )
|
|
{
|
|
/* Is there a command in the string? */
|
|
c = strstr( pcInputString, "?" );
|
|
if( c )
|
|
{
|
|
/* Turn the LED's on or off in accordance with the check box status. */
|
|
if( strstr( c, "LED0=1" ) != NULL )
|
|
{
|
|
/* Turn the LEDs on. */
|
|
vParTestSetLED( 7, 1 );
|
|
vParTestSetLED( 8, 1 );
|
|
vParTestSetLED( 9, 1 );
|
|
vParTestSetLED( 10, 1 );
|
|
}
|
|
else
|
|
{
|
|
/* Turn the LEDs off. */
|
|
vParTestSetLED( 7, 0 );
|
|
vParTestSetLED( 8, 0 );
|
|
vParTestSetLED( 9, 0 );
|
|
vParTestSetLED( 10, 0 );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* Commands to turn LEDs off are not always explicit. */
|
|
vParTestSetLED( 7, 0 );
|
|
vParTestSetLED( 8, 0 );
|
|
vParTestSetLED( 9, 0 );
|
|
vParTestSetLED( 10, 0 );
|
|
}
|
|
}
|
|
}
|
|
|