279 lines
7.7 KiB
C
279 lines
7.7 KiB
C
/**
|
|
* \file
|
|
*
|
|
* \brief Ethernet management for the standalone lwIP example.
|
|
*
|
|
* Copyright (c) 2012 Atmel Corporation. All rights reserved.
|
|
*
|
|
* \asf_license_start
|
|
*
|
|
* \page License
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright notice,
|
|
* this list of conditions and the following disclaimer.
|
|
*
|
|
* 2. Redistributions in binary form must reproduce the above copyright notice,
|
|
* this list of conditions and the following disclaimer in the documentation
|
|
* and/or other materials provided with the distribution.
|
|
*
|
|
* 3. The name of Atmel may not be used to endorse or promote products derived
|
|
* from this software without specific prior written permission.
|
|
*
|
|
* 4. This software may only be redistributed and used in connection with an
|
|
* Atmel microcontroller product.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY ATMEL "AS IS" AND ANY EXPRESS OR IMPLIED
|
|
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT ARE
|
|
* EXPRESSLY AND SPECIFICALLY DISCLAIMED. IN NO EVENT SHALL ATMEL BE LIABLE FOR
|
|
* ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
|
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
|
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* \asf_license_stop
|
|
*
|
|
*/
|
|
|
|
#include <string.h>
|
|
//#include "board.h"
|
|
//#include "gpio.h"
|
|
#include "ethernet_sam.h"
|
|
//#include "emac.h"
|
|
#include "ethernet_phy.h"
|
|
//#include "sysclk.h"
|
|
/* lwIP includes */
|
|
#include "lwip/src/include/lwip/sys.h"
|
|
#include "lwip/src/include/lwip/api.h"
|
|
#include "lwip/src/include/lwip/tcp.h"
|
|
#include "lwip/src/include/lwip/tcpip.h"
|
|
#include "lwip/src/include/lwip/memp.h"
|
|
#include "lwip/src/include/lwip/dhcp.h"
|
|
#include "lwip/src/include/lwip/dns.h"
|
|
#include "lwip/src/include/lwip/stats.h"
|
|
#include "lwip/src/include/lwip/init.h"
|
|
#include "lwip/src/include/ipv4/lwip/ip_frag.h"
|
|
#if ( (LWIP_VERSION) == ((1U << 24) | (3U << 16) | (2U << 8) | (LWIP_VERSION_RC)) )
|
|
#include "lwip/src/include/netif/loopif.h"
|
|
#else
|
|
#include "lwip/src/include/ipv4/lwip/inet.h"
|
|
#include "lwip/src/include/lwip/tcp_impl.h"
|
|
#endif
|
|
#include "lwip/src/include/netif/etharp.h"
|
|
#include "ethernetif.h"
|
|
|
|
#include "emac.h"
|
|
|
|
/* Global variable containing MAC Config (hw addr, IP, GW, ...) */
|
|
struct netif gs_net_if;
|
|
|
|
/* Timer for calling lwIP tmr functions without system */
|
|
typedef struct timers_info {
|
|
uint32_t timer;
|
|
uint32_t timer_interval;
|
|
void (*timer_func)(void);
|
|
} timers_info_t;
|
|
|
|
/* LwIP tmr functions list */
|
|
static timers_info_t gs_timers_table[] = {
|
|
{0, TCP_TMR_INTERVAL, tcp_tmr},
|
|
{0, IP_TMR_INTERVAL, ip_reass_tmr},
|
|
#if 0
|
|
/* LWIP_TCP */
|
|
{0, TCP_FAST_INTERVAL, tcp_fasttmr},
|
|
{0, TCP_SLOW_INTERVAL, tcp_slowtmr},
|
|
#endif
|
|
/* LWIP_ARP */
|
|
{0, ARP_TMR_INTERVAL, etharp_tmr},
|
|
/* LWIP_DHCP */
|
|
#if LWIP_DHCP
|
|
{0, DHCP_COARSE_TIMER_SECS, dhcp_coarse_tmr},
|
|
{0, DHCP_FINE_TIMER_MSECS, dhcp_fine_tmr},
|
|
#endif
|
|
};
|
|
|
|
/**
|
|
* \brief Process timing functions.
|
|
*/
|
|
void ethernet_timers_update(void)
|
|
{
|
|
static uint32_t ul_last_time;
|
|
uint32_t ul_cur_time, ul_time_diff, ul_idx_timer;
|
|
timers_info_t *p_tmr_inf;
|
|
|
|
ul_cur_time = millis();
|
|
ul_time_diff = ul_cur_time - ul_last_time; // we're using unsigned arithmetic, so this handles wrap around
|
|
|
|
if (ul_time_diff) {
|
|
ul_last_time = ul_cur_time;
|
|
for (ul_idx_timer = 0;
|
|
ul_idx_timer < (sizeof(gs_timers_table) / sizeof(timers_info_t));
|
|
ul_idx_timer++) {
|
|
p_tmr_inf = &gs_timers_table[ul_idx_timer];
|
|
p_tmr_inf->timer += ul_time_diff;
|
|
if (p_tmr_inf->timer > p_tmr_inf->timer_interval) {
|
|
if (p_tmr_inf->timer_func) {
|
|
p_tmr_inf->timer_func();
|
|
}
|
|
|
|
p_tmr_inf->timer -= p_tmr_inf->timer_interval;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
//************************************************************************************************************
|
|
|
|
// Added by AB. This must be called only once!
|
|
|
|
void start_ethernet(const uint8_t ipAddress[], const uint8_t netMask[], const uint8_t gateWay[], netif_status_callback_fn status_cb)
|
|
{
|
|
struct ip_addr x_ip_addr, x_net_mask, x_gateway;
|
|
extern err_t ethernetif_init(struct netif *netif);
|
|
|
|
IP4_ADDR(&x_ip_addr, ipAddress[0], ipAddress[1], ipAddress[2], ipAddress[3]); // set IP address
|
|
|
|
if (x_ip_addr.addr == 0)
|
|
{
|
|
x_net_mask.addr = 0;
|
|
x_gateway.addr = 0;
|
|
}
|
|
else
|
|
{
|
|
IP4_ADDR(&x_net_mask, netMask[0], netMask[1], netMask[2], netMask[3]); // set network mask
|
|
IP4_ADDR(&x_gateway, gateWay[0], gateWay[1], gateWay[2], gateWay[3]); // set gateway
|
|
}
|
|
|
|
/* Add data to netif */
|
|
netif_add(&gs_net_if, &x_ip_addr, &x_net_mask, &x_gateway, NULL, ethernetif_init, ethernet_input);
|
|
|
|
/* Make it the default interface */
|
|
netif_set_default(&gs_net_if);
|
|
|
|
/* Setup callback function for netif status change */
|
|
netif_set_status_callback(&gs_net_if, status_cb);
|
|
|
|
/* Bring it up */
|
|
if (x_ip_addr.addr == 0)
|
|
{
|
|
/* DHCP mode */
|
|
dhcp_start(&gs_net_if);
|
|
}
|
|
else
|
|
{
|
|
/* Static mode */
|
|
netif_set_up(&gs_net_if);
|
|
}
|
|
}
|
|
|
|
// This sets the IP configuration on-the-fly
|
|
void ethernet_set_configuration(const uint8_t ipAddress[], const uint8_t netMask[], const uint8_t gateWay[])
|
|
{
|
|
if ((gs_net_if.flags & NETIF_FLAG_DHCP) != 0)
|
|
{
|
|
// stop DHCP if it was used before
|
|
dhcp_stop(&gs_net_if);
|
|
}
|
|
|
|
struct ip_addr x_ip_addr, x_net_mask, x_gateway;
|
|
IP4_ADDR(&x_ip_addr, ipAddress[0], ipAddress[1], ipAddress[2], ipAddress[3]);
|
|
IP4_ADDR(&x_net_mask, netMask[0], netMask[1], netMask[2], netMask[3]);
|
|
IP4_ADDR(&x_gateway, gateWay[0], gateWay[1], gateWay[2], gateWay[3]);
|
|
|
|
if (x_ip_addr.addr == 0)
|
|
{
|
|
// start DHCP and request a dynamic IP address
|
|
dhcp_start(&gs_net_if);
|
|
}
|
|
else
|
|
{
|
|
// use static IP address
|
|
netif_set_ipaddr(&gs_net_if, &x_ip_addr);
|
|
netif_set_netmask(&gs_net_if, &x_net_mask);
|
|
netif_set_gw(&gs_net_if, &x_gateway);
|
|
|
|
// don't forget to set it up again
|
|
netif_set_up(&gs_net_if);
|
|
}
|
|
}
|
|
|
|
/** \brief Initialize the Ethernet subsystem.
|
|
*
|
|
*/
|
|
void init_ethernet()
|
|
{
|
|
ethernetif_hardware_init();
|
|
lwip_init();
|
|
}
|
|
|
|
/** \brief Configure the Ethernet subsystem. Should be called after init_ethernet()
|
|
*
|
|
*/
|
|
void ethernet_configure_interface(const u8_t macAddress[], const char *hostname)
|
|
{
|
|
ethernetif_set_mac_address(macAddress);
|
|
netif_set_hostname(&gs_net_if, hostname);
|
|
}
|
|
|
|
/* \brief Perform ethernet auto-negotiation and establish link. Returns true when ready
|
|
*
|
|
*/
|
|
bool ethernet_establish_link(void)
|
|
{
|
|
return ethernetif_establish_link();
|
|
}
|
|
|
|
/* \brief Is the link still up? Also updates the interface status if the link has gone down
|
|
*
|
|
*/
|
|
bool ethernet_link_established(void)
|
|
{
|
|
if (!ethernetif_link_established())
|
|
{
|
|
netif_set_down(&gs_net_if);
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* \brief Manage the Ethernet packets, if any received process them.
|
|
* After processing any packets, manage the lwIP timers.
|
|
*
|
|
* \return Returns true if data has been processed.
|
|
*/
|
|
void ethernet_task(void)
|
|
{
|
|
/* Run polling tasks */
|
|
while (ethernetif_input(&gs_net_if));
|
|
|
|
/* Run periodic tasks */
|
|
ethernet_timers_update();
|
|
}
|
|
|
|
/*
|
|
* \brief Sets the EMAC RX callback. It will be called when a new packet
|
|
* can be processed and should be called with a NULL parameter inside
|
|
* the actual callback.
|
|
*
|
|
* \param callback The callback to be called when a new packet is ready
|
|
*/
|
|
void ethernet_set_rx_callback(emac_dev_tx_cb_t callback)
|
|
{
|
|
ethernetif_set_rx_callback(callback);
|
|
}
|
|
|
|
/*
|
|
* \brief Returns the current IP address
|
|
*/
|
|
const uint8_t *ethernet_get_ipaddress()
|
|
{
|
|
return (uint8_t*)&gs_net_if.ip_addr.addr;
|
|
}
|