rt-thread/bsp/zynqmp-r5-axu4ev/drivers/Zynq_HAL_Driver/xemacpsif/xemacpsif.c

/*
 * Copyright (C) 2010 - 2019 Xilinx, Inc.
 * Copyright (C) 2021 WangHuachen.
 * All rights reserved.
 *
 * 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 the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
 * SHALL THE AUTHOR 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.
 *
 * This file is part of the lwIP TCP/IP stack.
 *
 */

#include <stdio.h>
#include <string.h>

#include <xparameters.h>
#include "lwipopts.h"
#include "xlwipconfig.h"
#include "lwip/opt.h"
#include "lwip/def.h"
#include "lwip/mem.h"
#include "lwip/pbuf.h"
#include "lwip/sys.h"
#include "lwip/stats.h"
#include "lwip/igmp.h"

#include "netif/etharp.h"
#include "netif/xemacpsif.h"
#include "netif/xadapter.h"
#include "netif/xpqueue.h"
#include "xparameters.h"
// #include "xscugic.h"
#include "xemacps.h"

#if LWIP_IPV6
#include "lwip/ethip6.h"
#endif

#ifdef SYS_ARCH_DECL_PROTECT
#undef SYS_ARCH_DECL_PROTECT
#endif
#define SYS_ARCH_DECL_PROTECT(lev) rt_base_t lev;

#ifdef SYS_ARCH_PROTECT
#undef SYS_ARCH_PROTECT
#endif
#define SYS_ARCH_PROTECT(lev) lev = rt_hw_interrupt_disable();

#ifdef SYS_ARCH_UNPROTECT
#undef SYS_ARCH_UNPROTECT
#endif
#define SYS_ARCH_UNPROTECT(lev) rt_hw_interrupt_enable(lev);

/* Define those to better describe your network interface. */
#define IFNAME0 't'
#define IFNAME1 'e'

#if LWIP_IGMP
static err_t xemacpsif_mac_filter_update (struct netif *netif,
                            ip_addr_t *group, u8_t action);

static u8_t xemacps_mcast_entry_mask = 0;
#endif

#if LWIP_IPV6 && LWIP_IPV6_MLD
static err_t xemacpsif_mld6_mac_filter_update (struct netif *netif,
                            ip_addr_t *group, u8_t action);

static u8_t xemacps_mld6_mcast_entry_mask;
#endif

XEmacPs_Config *mac_config;
struct netif *NetIf;

#if defined(OS_IS_FREERTOS) && defined(__arm__) && !defined(ARMR5)
int32_t lExpireCounter = 0;
#define RESETRXTIMEOUT 10
#endif

/*
 * this function is always called with interrupts off
 * this function also assumes that there are available BD's
 */
err_t _unbuffered_low_level_output(xemacpsif_s *xemacpsif,
                                                    struct pbuf *p)
{
    XStatus status = 0;

#if ETH_PAD_SIZE
    pbuf_header(p, -ETH_PAD_SIZE);    /* drop the padding word */
#endif
    status = emacps_sgsend(xemacpsif, p);
    if (status != XST_SUCCESS) {
#if LINK_STATS
    lwip_stats.link.drop++;
#endif
    }

#if ETH_PAD_SIZE
    pbuf_header(p, ETH_PAD_SIZE);    /* reclaim the padding word */
#endif

#if LINK_STATS
    lwip_stats.link.xmit++;
#endif /* LINK_STATS */

    return ERR_OK;

}

/*
 * low_level_output():
 *
 * Should do the actual transmission of the packet. The packet is
 * contained in the pbuf that is passed to the function. This pbuf
 * might be chained.
 *
 */

static err_t low_level_output(struct netif *netif, struct pbuf *p)
{
    SYS_ARCH_DECL_PROTECT(lev);
    err_t err;
    s32_t freecnt;
    XEmacPs_BdRing *txring;

    struct xemac_s *xemac = (struct xemac_s *)(netif->state);
    xemacpsif_s *xemacpsif = (xemacpsif_s *)(xemac->state);

    SYS_ARCH_PROTECT(lev);

    /* check if space is available to send */
    freecnt = is_tx_space_available(xemacpsif);
    if (freecnt <= 5) {
    txring = &(XEmacPs_GetTxRing(&xemacpsif->emacps));
        process_sent_bds(xemacpsif, txring);
    }

    if (is_tx_space_available(xemacpsif)) {
        _unbuffered_low_level_output(xemacpsif, p);
        err = ERR_OK;
    } else {
#if LINK_STATS
        lwip_stats.link.drop++;
#endif
        rt_kprintf("pack dropped, no space\r\n");
        err = ERR_MEM;
    }

    SYS_ARCH_UNPROTECT(lev);
    return err;
}

/*
 * low_level_input():
 *
 * Should allocate a pbuf and transfer the bytes of the incoming
 * packet from the interface into the pbuf.
 *
 */
static struct pbuf * low_level_input(struct netif *netif)
{
    struct xemac_s *xemac = (struct xemac_s *)(netif->state);
    xemacpsif_s *xemacpsif = (xemacpsif_s *)(xemac->state);
    struct pbuf *p;

    /* see if there is data to process */
    if (pq_qlength(xemacpsif->recv_q) == 0)
        return NULL;

    /* return one packet from receive q */
    p = (struct pbuf *)pq_dequeue(xemacpsif->recv_q);
    return p;
}

/*
 * xemacpsif_output():
 *
 * This function is called by the TCP/IP stack when an IP packet
 * should be sent. It calls the function called low_level_output() to
 * do the actual transmission of the packet.
 *
 */

static err_t xemacpsif_output(struct netif *netif, struct pbuf *p,
        const ip_addr_t *ipaddr)
{
    /* resolve hardware address, then send (or queue) packet */
    return etharp_output(netif, p, ipaddr);
}

/*
 * xemacpsif_input():
 *
 * This function should be called when a packet is ready to be read
 * from the interface. It uses the function low_level_input() that
 * should handle the actual reception of bytes from the network
 * interface.
 *
 * Returns the number of packets read (max 1 packet on success,
 * 0 if there are no packets)
 *
 */

s32_t xemacpsif_input(struct netif *netif)
{
    struct eth_hdr *ethhdr;
    struct pbuf *p;
    SYS_ARCH_DECL_PROTECT(lev);

#ifdef OS_IS_FREERTOS
    while (1)
#endif
    {
        /* move received packet into a new pbuf */
        SYS_ARCH_PROTECT(lev);
        p = low_level_input(netif);
        SYS_ARCH_UNPROTECT(lev);

        /* no packet could be read, silently ignore this */
        if (p == NULL) {
            return 0;
        }

        /* points to packet payload, which starts with an Ethernet header */
        ethhdr = p->payload;

    #if LINK_STATS
        lwip_stats.link.recv++;
    #endif /* LINK_STATS */

        switch (htons(ethhdr->type)) {
            /* IP or ARP packet? */
            case ETHTYPE_IP:
            case ETHTYPE_ARP:
    #if LWIP_IPV6
            /*IPv6 Packet?*/
            case ETHTYPE_IPV6:
    #endif
    #if PPPOE_SUPPORT
                /* PPPoE packet? */
            case ETHTYPE_PPPOEDISC:
            case ETHTYPE_PPPOE:
    #endif /* PPPOE_SUPPORT */
                /* full packet send to tcpip_thread to process */
                if (netif->input(p, netif) != ERR_OK) {
                    LWIP_DEBUGF(NETIF_DEBUG, ("xemacpsif_input: IP input error\r\n"));
                    pbuf_free(p);
                    p = NULL;
                }
                break;

            default:
                pbuf_free(p);
                p = NULL;
                break;
        }
    }

    return 1;
}


#if defined(OS_IS_FREERTOS) && defined(__arm__) && !defined(ARMR5)
void vTimerCallback( TimerHandle_t pxTimer )
{
    /* Do something if the pxTimer parameter is NULL */
    configASSERT(pxTimer);

    lExpireCounter++;
    /* If the timer has expired 100 times then reset RX */
    if(lExpireCounter >= RESETRXTIMEOUT) {
        lExpireCounter = 0;
        xemacpsif_resetrx_on_no_rxdata(NetIf);
    }
}
 #endif

static err_t low_level_init(struct netif *netif)
{
    UINTPTR mac_address = (UINTPTR)(netif->state);
    struct xemac_s *xemac;
    xemacpsif_s *xemacpsif;
    u32 dmacrreg;

    s32_t status = XST_SUCCESS;

    NetIf = netif;

    xemacpsif = mem_malloc(sizeof *xemacpsif);
    if (xemacpsif == NULL) {
        LWIP_DEBUGF(NETIF_DEBUG, ("xemacpsif_init: out of memory\r\n"));
        return ERR_MEM;
    }

    xemac = mem_malloc(sizeof *xemac);
    if (xemac == NULL) {
        LWIP_DEBUGF(NETIF_DEBUG, ("xemacpsif_init: out of memory\r\n"));
        return ERR_MEM;
    }

    xemac->state = (void *)xemacpsif;
    xemac->topology_index = xtopology_find_index(mac_address);
    xemac->type = xemac_type_emacps;

    xemacpsif->send_q = NULL;
    xemacpsif->recv_q = pq_create_queue();
    if (!xemacpsif->recv_q)
        return ERR_MEM;

    /* maximum transfer unit */
#ifdef ZYNQMP_USE_JUMBO
    netif->mtu = XEMACPS_MTU_JUMBO - XEMACPS_HDR_SIZE;
#else
    netif->mtu = XEMACPS_MTU - XEMACPS_HDR_SIZE;
#endif

#if LWIP_IGMP
    netif->igmp_mac_filter = xemacpsif_mac_filter_update;
#endif

#if LWIP_IPV6 && LWIP_IPV6_MLD
 netif->mld_mac_filter = xemacpsif_mld6_mac_filter_update;
#endif

    netif->flags = NETIF_FLAG_BROADCAST | NETIF_FLAG_ETHARP |
                                            NETIF_FLAG_LINK_UP;

#if LWIP_IPV6 && LWIP_IPV6_MLD
    netif->flags |= NETIF_FLAG_MLD6;
#endif

#if LWIP_IGMP
    netif->flags |= NETIF_FLAG_IGMP;
#endif

    /* obtain config of this emac */
    mac_config = (XEmacPs_Config *)xemacps_lookup_config((unsigned)(UINTPTR)netif->state);

#if EL1_NONSECURE
    /* Request device to indicate that this library is using it */
    if (mac_config->BaseAddress == VERSAL_EMACPS_0_BASEADDR) {
        Xil_Smc(PM_REQUEST_DEVICE_SMC_FID, DEV_GEM_0, 1, 0, 100, 1, 0, 0);
    }
    if (mac_config->BaseAddress == VERSAL_EMACPS_0_BASEADDR) {
        Xil_Smc(PM_REQUEST_DEVICE_SMC_FID, DEV_GEM_1, 1, 0, 100, 1, 0, 0);
    }
#endif

    status = XEmacPs_CfgInitialize(&xemacpsif->emacps, mac_config,
                        mac_config->BaseAddress);
    if (status != XST_SUCCESS) {
        xil_printf("In %s:EmacPs Configuration Failed....\r\n", __func__);
    }

    /* initialize the mac */
    init_emacps(xemacpsif, netif);

    dmacrreg = XEmacPs_ReadReg(xemacpsif->emacps.Config.BaseAddress,
                                                        XEMACPS_DMACR_OFFSET);
    dmacrreg = dmacrreg | (0x00000010);
    XEmacPs_WriteReg(xemacpsif->emacps.Config.BaseAddress,
                                            XEMACPS_DMACR_OFFSET, dmacrreg);

#if defined(OS_IS_FREERTOS) && defined(__arm__) && !defined(ARMR5)
    /* Freertos tick is 10ms by default; set period to the same */
    xemac->xTimer = xTimerCreate("Timer", 10, pdTRUE, ( void * ) 1, vTimerCallback);
    if (xemac->xTimer == NULL) {
        xil_printf("In %s:Timer creation failed....\r\n", __func__);
    } else {
        if(xTimerStart(xemac->xTimer, 0) != pdPASS) {
            xil_printf("In %s:Timer start failed....\r\n", __func__);
        }
    }
#endif
    setup_isr(xemac);
    init_dma(xemac);
    start_emacps(xemacpsif);

    /* replace the state in netif (currently the emac baseaddress)
     * with the mac instance pointer.
     */
    netif->state = (void *)xemac;

    return ERR_OK;
}

void HandleEmacPsError(struct xemac_s *xemac)
{
    xemacpsif_s   *xemacpsif;
    s32_t status = XST_SUCCESS;
    u32 dmacrreg;

    SYS_ARCH_DECL_PROTECT(lev);
    SYS_ARCH_PROTECT(lev);

    xemacpsif = (xemacpsif_s *)(xemac->state);
    free_txrx_pbufs(xemacpsif);
    status = XEmacPs_CfgInitialize(&xemacpsif->emacps, mac_config,
                        mac_config->BaseAddress);
    if (status != XST_SUCCESS) {
        xil_printf("In %s:EmacPs Configuration Failed....\r\n", __func__);
    }
    /* initialize the mac */
    init_emacps_on_error(xemacpsif, NetIf);
    dmacrreg = XEmacPs_ReadReg(xemacpsif->emacps.Config.BaseAddress,
                                                        XEMACPS_DMACR_OFFSET);
    dmacrreg = dmacrreg | (0x01000000);
    XEmacPs_WriteReg(xemacpsif->emacps.Config.BaseAddress,
                                            XEMACPS_DMACR_OFFSET, dmacrreg);
    setup_isr(xemac);
    init_dma(xemac);
    start_emacps(xemacpsif);

    SYS_ARCH_UNPROTECT(lev);
}

void HandleTxErrors(struct xemac_s *xemac)
{
    xemacpsif_s   *xemacpsif;
    u32 netctrlreg;

    SYS_ARCH_DECL_PROTECT(lev);
    SYS_ARCH_PROTECT(lev);
    xemacpsif = (xemacpsif_s *)(xemac->state);
    netctrlreg = XEmacPs_ReadReg(xemacpsif->emacps.Config.BaseAddress,
                                                XEMACPS_NWCTRL_OFFSET);
    netctrlreg = netctrlreg & (~XEMACPS_NWCTRL_TXEN_MASK);
    XEmacPs_WriteReg(xemacpsif->emacps.Config.BaseAddress,
                                    XEMACPS_NWCTRL_OFFSET, netctrlreg);
    free_onlytx_pbufs(xemacpsif);

    clean_dma_txdescs(xemac);
    netctrlreg = XEmacPs_ReadReg(xemacpsif->emacps.Config.BaseAddress,
                                                    XEMACPS_NWCTRL_OFFSET);
    netctrlreg = netctrlreg | (XEMACPS_NWCTRL_TXEN_MASK);
    XEmacPs_WriteReg(xemacpsif->emacps.Config.BaseAddress,
                                        XEMACPS_NWCTRL_OFFSET, netctrlreg);
    SYS_ARCH_UNPROTECT(lev);
}

#if LWIP_IPV6 && LWIP_IPV6_MLD
static u8_t xemacpsif_ip6_addr_ismulticast(ip6_addr_t* ip_addr)
{
    if(ip6_addr_ismulticast_linklocal(ip_addr)||
           ip6_addr_ismulticast_iflocal(ip_addr)   ||
           ip6_addr_ismulticast_adminlocal(ip_addr)||
           ip6_addr_ismulticast_sitelocal(ip_addr) ||
           ip6_addr_ismulticast_orglocal(ip_addr)  ||
           ip6_addr_ismulticast_global(ip_addr)) {
    /*Return TRUE if IPv6 is Multicast type*/
    return TRUE;
    } else {
    return FALSE;
    }
}

static void xemacpsif_mld6_mac_hash_update (struct netif *netif, u8_t *ip_addr,
        u8_t action)
{
    u8_t multicast_mac_addr[6];
    struct xemac_s *xemac = (struct xemac_s *) (netif->state);
    xemacpsif_s *xemacpsif = (xemacpsif_s *) (xemac->state);
    XEmacPs_BdRing *txring;
    txring = &(XEmacPs_GetTxRing(&xemacpsif->emacps));

    multicast_mac_addr[0] = LL_IP6_MULTICAST_ADDR_0;
    multicast_mac_addr[1] = LL_IP6_MULTICAST_ADDR_1;
    multicast_mac_addr[2] = ip_addr[12];
    multicast_mac_addr[3] = ip_addr[13];
    multicast_mac_addr[4] = ip_addr[14];
    multicast_mac_addr[5] = ip_addr[15];

    /* Wait till all sent packets are acknowledged from HW */
    while(txring->HwCnt);

    SYS_ARCH_DECL_PROTECT(lev);

    SYS_ARCH_PROTECT(lev);

    /* Stop Ethernet */
    XEmacPs_Stop(&xemacpsif->emacps);

    if (action == NETIF_ADD_MAC_FILTER) {
        /* Set Mulitcast mac address in hash table */
        XEmacPs_SetHash(&xemacpsif->emacps, multicast_mac_addr);

    } else if (action == NETIF_DEL_MAC_FILTER) {
        /* Remove Mulitcast mac address in hash table */
        XEmacPs_DeleteHash(&xemacpsif->emacps, multicast_mac_addr);
    }

    /* Reset DMA */
    reset_dma(xemac);

    /* Start Ethernet */
    XEmacPs_Start(&xemacpsif->emacps);

    SYS_ARCH_UNPROTECT(lev);
}

static err_t xemacpsif_mld6_mac_filter_update (struct netif *netif, ip_addr_t *group,
        u8_t action)
{
    u8_t temp_mask;
    unsigned int i;
    u8_t * ip_addr = (u8_t *) group;

    if(!(xemacpsif_ip6_addr_ismulticast((ip6_addr_t*) ip_addr))) {
        LWIP_DEBUGF(NETIF_DEBUG,
                                ("%s: The requested MAC address is not a multicast address.\r\n", __func__));                                 LWIP_DEBUGF(NETIF_DEBUG,
                        ("Multicast address add operation failure !!\r\n"));
                        return ERR_ARG;
    }
    if (action == NETIF_ADD_MAC_FILTER) {
        for (i = 0; i < XEMACPS_MAX_MAC_ADDR; i++) {
            temp_mask = (0x01) << i;
            if ((xemacps_mld6_mcast_entry_mask & temp_mask) == temp_mask) {
                continue;
            }
            xemacps_mld6_mcast_entry_mask |= temp_mask;

            /* Update mac address in hash table */
            xemacpsif_mld6_mac_hash_update(netif, ip_addr, action);

            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: Multicast MAC address successfully added.\r\n", __func__));

            return ERR_OK;
        }
        LWIP_DEBUGF(NETIF_DEBUG,
                ("%s: No multicast address registers left.\r\n", __func__));
        LWIP_DEBUGF(NETIF_DEBUG,
                ("Multicast MAC address add operation failure !!\r\n"));
        return ERR_MEM;
    } else if (action == NETIF_DEL_MAC_FILTER) {
        for (i = 0; i < XEMACPS_MAX_MAC_ADDR; i++) {
            temp_mask = (0x01) << i;
            if ((xemacps_mld6_mcast_entry_mask & temp_mask) != temp_mask) {
                continue;
            }
            xemacps_mld6_mcast_entry_mask &= (~temp_mask);

            /* Update mac address in hash table */
            xemacpsif_mld6_mac_hash_update(netif, ip_addr, action);

            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: Multicast MAC address successfully removed.\r\n", __func__));

            return ERR_OK;
        }
        LWIP_DEBUGF(NETIF_DEBUG,
                ("%s: No multicast address registers present with\r\n", __func__));
        LWIP_DEBUGF(NETIF_DEBUG,
                ("the requested Multicast MAC address.\r\n"));
        LWIP_DEBUGF(NETIF_DEBUG,
                ("Multicast MAC address removal failure!!.\r\n"));
        return ERR_MEM;
    }
    return ERR_ARG;
}
#endif

#if LWIP_IGMP
static void xemacpsif_mac_hash_update (struct netif *netif, u8_t *ip_addr,
        u8_t action)
{
    u8_t multicast_mac_addr[6];
    struct xemac_s *xemac = (struct xemac_s *) (netif->state);
    xemacpsif_s *xemacpsif = (xemacpsif_s *) (xemac->state);
    XEmacPs_BdRing *txring;
    txring = &(XEmacPs_GetTxRing(&xemacpsif->emacps));

    multicast_mac_addr[0] = 0x01;
    multicast_mac_addr[1] = 0x00;
    multicast_mac_addr[2] = 0x5E;
    multicast_mac_addr[3] = ip_addr[1] & 0x7F;
    multicast_mac_addr[4] = ip_addr[2];
    multicast_mac_addr[5] = ip_addr[3];

    /* Wait till all sent packets are acknowledged from HW */
    while(txring->HwCnt);

    SYS_ARCH_DECL_PROTECT(lev);

    SYS_ARCH_PROTECT(lev);

    /* Stop Ethernet */
    XEmacPs_Stop(&xemacpsif->emacps);

    if (action == IGMP_ADD_MAC_FILTER) {
        /* Set Mulitcast mac address in hash table */
        XEmacPs_SetHash(&xemacpsif->emacps, multicast_mac_addr);

    } else if (action == IGMP_DEL_MAC_FILTER) {
        /* Remove Mulitcast mac address in hash table */
        XEmacPs_DeleteHash(&xemacpsif->emacps, multicast_mac_addr);
    }

    /* Reset DMA */
    reset_dma(xemac);

    /* Start Ethernet */
    XEmacPs_Start(&xemacpsif->emacps);

    SYS_ARCH_UNPROTECT(lev);
}

static err_t xemacpsif_mac_filter_update (struct netif *netif, ip_addr_t *group,
        u8_t action)
{
    u8_t temp_mask;
    unsigned int i;
    u8_t * ip_addr = (u8_t *) group;

    if ((ip_addr[0] < 224) && (ip_addr[0] > 239)) {
        LWIP_DEBUGF(NETIF_DEBUG,
                ("%s: The requested MAC address is not a multicast address.\r\n", __func__));
        LWIP_DEBUGF(NETIF_DEBUG,
                ("Multicast address add operation failure !!\r\n"));

        return ERR_ARG;
    }

    if (action == IGMP_ADD_MAC_FILTER) {

        for (i = 0; i < XEMACPS_MAX_MAC_ADDR; i++) {
            temp_mask = (0x01) << i;
            if ((xemacps_mcast_entry_mask & temp_mask) == temp_mask) {
                continue;
            }
            xemacps_mcast_entry_mask |= temp_mask;

            /* Update mac address in hash table */
            xemacpsif_mac_hash_update(netif, ip_addr, action);

            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: Multicast MAC address successfully added.\r\n", __func__));

            return ERR_OK;
        }
        if (i == XEMACPS_MAX_MAC_ADDR) {
            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: No multicast address registers left.\r\n", __func__));
            LWIP_DEBUGF(NETIF_DEBUG,
                    ("Multicast MAC address add operation failure !!\r\n"));

            return ERR_MEM;
        }
    } else if (action == IGMP_DEL_MAC_FILTER) {
        for (i = 0; i < XEMACPS_MAX_MAC_ADDR; i++) {
            temp_mask = (0x01) << i;
            if ((xemacps_mcast_entry_mask & temp_mask) != temp_mask) {
                continue;
            }
            xemacps_mcast_entry_mask &= (~temp_mask);

            /* Update mac address in hash table */
            xemacpsif_mac_hash_update(netif, ip_addr, action);

            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: Multicast MAC address successfully removed.\r\n", __func__));

            return ERR_OK;
        }
        if (i == XEMACPS_MAX_MAC_ADDR) {
            LWIP_DEBUGF(NETIF_DEBUG,
                    ("%s: No multicast address registers present with\r\n", __func__));
            LWIP_DEBUGF(NETIF_DEBUG,
                    ("the requested Multicast MAC address.\r\n"));
            LWIP_DEBUGF(NETIF_DEBUG,
                    ("Multicast MAC address removal failure!!.\r\n"));

            return ERR_MEM;
        }
    }
    return ERR_OK;
}
#endif

/*
 * xemacpsif_init():
 *
 * Should be called at the beginning of the program to set up the
 * network interface. It calls the function low_level_init() to do the
 * actual setup of the hardware.
 *
 */

err_t xemacpsif_init(struct netif *netif)
{
#if LWIP_SNMP
    /* ifType ethernetCsmacd(6) @see RFC1213 */
    netif->link_type = 6;
    /* your link speed here */
    netif->link_speed = ;
    netif->ts = 0;
    netif->ifinoctets = 0;
    netif->ifinucastpkts = 0;
    netif->ifinnucastpkts = 0;
    netif->ifindiscards = 0;
    netif->ifoutoctets = 0;
    netif->ifoutucastpkts = 0;
    netif->ifoutnucastpkts = 0;
    netif->ifoutdiscards = 0;
#endif

    netif->name[0] = IFNAME0;
    netif->name[1] = IFNAME1;
    netif->output = xemacpsif_output;
    netif->linkoutput = low_level_output;
#if LWIP_IPV6
    netif->output_ip6 = ethip6_output;
#endif

    low_level_init(netif);
    return ERR_OK;
}

/*
 * xemacpsif_resetrx_on_no_rxdata():
 *
 * Should be called by the user at regular intervals, typically
 * from a timer (100 msecond). This is to provide a SW workaround
 * for the HW bug (SI #692601). Please refer to the function header
 * for the function resetrx_on_no_rxdata in xemacpsif_dma.c to
 * know more about the SI.
 *
 */

void xemacpsif_resetrx_on_no_rxdata(struct netif *netif)
{
    struct xemac_s *xemac = (struct xemac_s *)(netif->state);
    xemacpsif_s *xemacpsif = (xemacpsif_s *)(xemac->state);

    resetrx_on_no_rxdata(xemacpsif);
}