diff --git a/ChangeLog b/ChangeLog index 025eb8d9e3..f891c48fa0 100644 --- a/ChangeLog +++ b/ChangeLog @@ -604,4 +604,6 @@ * Fixed several compilation errors in fixed precision math library when built against toolchains that do not support 64-bit type 'long long'. * Fix errors in some function prototypes in dirent.h + * Add eZ80F91 EMAC driver + * Fix recvfrom() compilation error -- only noted under ZDS diff --git a/Documentation/NuttX.html b/Documentation/NuttX.html index 8f816601ad..bb3284f603 100644 --- a/Documentation/NuttX.html +++ b/Documentation/NuttX.html @@ -8,7 +8,7 @@

NuttX RTOS

-

Last Updated: December 7 2008

+

Last Updated: December 12, 2008

@@ -1292,6 +1292,8 @@ nuttx-0.4.1 2008-xx-xx Gregory Nutt <spudmonkey@racsa.co.cr> * Fixed several compilation errors in fixed precision math library when built against toolchains that do not support 64-bit type 'long long'. * Fix errors in some function prototypes in dirent.h + * Add eZ80F91 EMAC driver + * Fix recvfrom() compilation error -- only noted under ZDS pascal-0.1.3 2008-xx-xx Gregory Nutt <spudmonkey@racsa.co.cr> diff --git a/arch/z80/src/common/up_internal.h b/arch/z80/src/common/up_internal.h index d359b25edf..cb1a4d2b01 100644 --- a/arch/z80/src/common/up_internal.h +++ b/arch/z80/src/common/up_internal.h @@ -165,9 +165,17 @@ EXTERN void up_timerhook(void); /* Defined in board/up_network.c */ #ifdef CONFIG_NET -EXTERN void up_netinitialize(void); +EXTERN int up_netinitialize(void); +EXTERN void up_netuninitialize(void); +# ifdef CONFIG_ARCH_MCFILTER +EXTERN int up_multicastfilter(FAR struct uip_driver_s *dev, FAR ubyte *mac, boolean enable); +# else +# define up_multicastfilter(dev, mac, enable) +# endif #else # define up_netinitialize() +# define up_netuninitialize() +# define up_multicastfilter(dev, mac, enable) #endif /* Return the current value of the stack pointer (used in stack dump logic) */ diff --git a/arch/z80/src/ez80/Make.defs b/arch/z80/src/ez80/Make.defs index 9273735e12..5d8153da56 100644 --- a/arch/z80/src/ez80/Make.defs +++ b/arch/z80/src/ez80/Make.defs @@ -48,7 +48,13 @@ CHIP_ASRCS = ez80_startup.asm ez80_io.asm ez80_irqsave.asm \ ifeq ($(CONFIG_ARCH_CHIP_EZ80F91),y) CHIP_ASRCS += ez80f91_init.asm endif + CHIP_SSRCS = CHIP_CSRCS = ez80_initialstate.c ez80_irq.c ez80_copystate.c \ ez80_schedulesigaction.c ez80_sigdeliver.c ez80_timerisr.c \ ez80_lowuart.c ez80_serial.c ez80_registerdump.c +ifeq ($(CONFIG_ARCH_CHIP_EZ80F91),y) +ifeq ($(CONFIG_EZ80_EMAC),y) +CHIP_CSRCS += ez80_emac.c +endif +endif diff --git a/arch/z80/src/ez80/ez80_emac.c b/arch/z80/src/ez80/ez80_emac.c new file mode 100644 index 0000000000..42430be8fd --- /dev/null +++ b/arch/z80/src/ez80/ez80_emac.c @@ -0,0 +1,1803 @@ +/**************************************************************************** + * drivers/net/ez80_emac.c + * + * Copyright (C) 2007 Gregory Nutt. All rights reserved. + * Author: Gregory Nutt + * + * References: + * eZ80F91 MCU Product Specification, PS019214-0808, Zilig, Inc., 2008. + * + * 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. Neither the name NuttX nor the names of its contributors may be + * used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS + * "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 + * COPYRIGHT OWNER OR CONTRIBUTORS 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. + * + ****************************************************************************/ + +/**************************************************************************** + * Included Files + ****************************************************************************/ + +#include +#if defined(CONFIG_NET) && defined(CONFIG_EZ80_EMAC) + +#include +#include +#include +#include +#include + +#include +#include +#include + +#include + +#include +#include +#include + +#include "chip.h" +#include "up_internal.h" + +/**************************************************************************** + * Definitions + ****************************************************************************/ + +#if CONFIG_NET_BUFSIZE > 1518 +# error "MAXF size too big for this device" +#endif + +/* The memory region shared between this driver and the EMAC hardware + * is subdivided into a Transmit buffer and the Receive buffer. + * The Transmit and Receive buffers are subdivided into packet buffers + * of 32, 64, 128, or 256 bytes in size. + */ + +#ifndef CONFIG_EZ80_PKTBUFSIZE +# define CONFIG_EZ80_PKTBUFSIZE 64 +#endif + +#ifndef CONFIG_EZ80_NTXPKTBUFS +# define CONFIG_EZ80_NTXPKTBUFS 64 +#endif + +#ifndef CONFIG_EZ80_NRXPKTBUFS +# define CONFIG_EZ80_NRXPKTBUFS 64 +#endif + +#define EMAC_TXBUFSIZE (CONFIG_EZ80_PKTBUFSIZE * CONFIG_EZ80_NTXPKTBUFS) +#if EMAC_TXBUFSIZE > 8192 +# error "Too many TX buffers" +#endif + +#define EMAC_RXBUFSIZE (CONFIG_EZ80_PKTBUFSIZE * CONFIG_EZ80_NRXPKTBUFS) +#if EMAC_RXBUFSIZE > 8192 +# error "Too many TX buffers" +#endif + +#define EMAC_TOTAL_BUFSIZE (EMAC_TXBUFSIZE + EMAC_RXBUFSIZE) +#if EMAC_TOTAL_BUFSIZE > 8192 +# error "Too many TX+RX buffers" +#elif EMAC_TOTAL_BUFSIZE < 8192 +# error "Unused buffers!" +#endif + +#if CONFIG_EZ80_PKTBUFSIZE == 256 +# define EMAC_BUFSZ EMAC_BUFSZ_256b +#elif CONFIG_EZ80_PKTBUFSIZE == 128 +# define EMAC_BUFSZ EMAC_BUFSZ_128b +#elif CONFIG_EZ80_PKTBUFSIZE == 64 +# define EMAC_BUFSZ EMAC_BUFSZ_64b +#elif CONFIG_EZ80_PKTBUFSIZE == 32 +# define EMAC_BUFSZ EMAC_BUFSZ_32b +#else +# error "Unsupported CONFIG_EZ80_PKTBUFSIZE value" +#endif + +/* The system clock frequency is defined in the linkcmd file */ + +extern unsigned long SYS_CLK_FREQ; +#define _DEFCLK ((unsigned long)&SYS_CLK_FREQ) + +/* Select the fastest MDC clock that does not exceed 25MHz. The MDC + * clock derives from the SCLK divided by 4, 6, 8, 10, 14, 20, or 28. + */ + +#ifndef CONFIG_EZ80_MDCDIV +# define CONFIG_EZ80_MDCDIV EMAC_MDC_DIV4 +#endif + +/* Select the Tx poll timer. If not specified, a 10MS timer is set */ + +#ifndef CONFIG_EZ80_TXPOLLTIMERMS +# define CONFIG_EZ80_TXPOLLTIMERMS 10 +#endif + +/* Misc. timing values and settings */ + +#define EMAC_MXPOLLLOOPS 100000 +#define EMAC_CRCPOLY2 0xedb88320; + +/* Default register settings */ + +#define EMAC_TPTV 0x1000 /* TPTV: Default 0x1000 slot time (1slot:512bit) */ +#define EMAC_IPGT 0x12 /* IPGT: Back-to-back IPG default value */ +#define EMAC_IPGR1 0x0c /* IPGR1: Non-back-to-back IPG default value */ +#define EMAC_IPGR2 0x12 /* IPGR2: Non-back-to-back IPG default value */ +#define EMAC_MAXF CONFIG_NET_BUFSIZE /* Maximum packet length value */ +#define EMAC_LCOL 0x37 /* CFG2: Late collision window default value */ +#define EMAC_RETRY 0x0f /* CFG3: Maximum number of retry default value */ + +/* Poll timer setting. The transmit poll timer is set in increments of + * SYSCLCK / 256 + */ + +#define EMAC_PTMR ((CONFIG_EZ80_TXPOLLTIMERMS * (_DEFCLK / 1000) >> 8)) + + /* EMAC system interrupts : + * + * EMAC_ISTAT_TXFSMERR - Bit 7: 1=Transmit state machine error interrupt + * A Transmit State Machine Error should never occur. However, if this + * bit is set, the entire transmitter module must be reset. + * EMAC_ISTAT_MGTDONE - Bit 6: 1=MII Mgmt done interrupt + * This bit is set when communicating to the PHY over the MII during + * a Read or Write operation. + * EMAC_ISTAT_RXOVR - Bit 2: 1=Receive overrun interrupt + * If this bit is set, all incoming packets are ignored until + * this bit is cleared by software. + */ + +#define EMAC_ISTAT_SYSEVENTS (EMAC_ISTAT_TXFSMERR|EMAC_ISTAT_MGTDONE|EMAC_ISTAT_RXOVR) + + /* EMAC Tx interrupts: + * + * EMAC_ISTAT_TXDONE - Bit 0: 1=Transmit done interrupt + * Denotes when packet transmission is complete. + * EMAC_ISTAT_TXCF - Bit 1: 1=Transmit control frame interrupt + * Denotes when control frame transmission is complete. + */ + +#define EMAC_ISTAT_TXEVENTS (EMAC_ISTAT_TXDONE|EMAC_ISTAT_TXCF) + + /* EMAC Rx interrupts: + * + * EMAC_ISTAT_RXDONE - Bit 3: 1=Receive done interrupt + * Denotes when packet reception is complete. + * EMAC_ISTAT_RXPCF - Bit 4: 1=Receive pause control frame interrupt + * Denotes when pause control frame reception is complete. + * EMAC_ISTAT_RXCF - Bit 5: 1=Receive control frame interrupt + * Denotes when control frame reception is complete. + */ + +#define EMAC_ISTAT_RXEVENTS (EMAC_ISTAT_RXDONE|EMAC_ISTAT_RXPCF|EMAC_ISTAT_RXCF) +#define EMAC_EIN_HANDLED (EMAC_ISTAT_RXEVENTS|EMAC_ISTAT_TXEVENTS|EMAC_ISTAT_SYSEVENTS) + +/* TX poll deley = 1 seconds. CLK_TCK is the number of clock ticks per second */ + +#define EMAC_WDDELAY (1*CLK_TCK) +#define EMAC_POLLHSEC (1*2) + +/* TX timeout = 1 minute */ + +#define EMAC_TXTIMEOUT (60*CLK_TCK) + +/* This is a helper pointer for accessing the contents of the Ethernet header */ + +#define ETHBUF ((struct uip_eth_hdr *)priv->dev.d_buf) + +/**************************************************************************** + * Private Types + ****************************************************************************/ + +/* EMAC statistics (debug only) */ + +#if defined(CONFIG_DEBUG) && defined(CONFIG_DEBUG_NET) +struct ez80mac_statistics_s +{ + uint32 rx_int; /* Number of Rx interrupts received */ + uint32 rx_ip; /* Number of Rx IP packets received */ + uint32 rx_arp; /* Number of Rx ARP packets received */ + uint32 rx_dropped; /* Number of dropped, unsupported Rx packets */ + uint32 rx_errors; /* Number of Rx errors (all types) */ + uint32 rx_ovrerrors; /* Number of FIFO overrun errors */ + uint32 tx_queued; /* Number of Tx descriptors queued */ + uint32 tx_int; /* Number of Tx interrupts received */ + uint32 tx_errors; /* Number of Tx errors (all types) */ + uint32 tx_abterrors; /* Number of aborted Tx descriptors */ + uint32 tx_fsmerrors; /* Number of Tx state machine errors */ + uint32 tx_timeouts; /* Number of Tx timeout errors */ + uint32 sys_int; /* Number of system interrupts received */ +}; +# define EMAC_STAT(priv,name) (((priv)->stat.(name))++) +#else +# define EMAC_STAT(priv,name) +#endif + +/* Private driver data. The ez80emac_driver_s encapsulates all state information + * for a single hardware interface + */ + +struct ez80emac_driver_s +{ + /* Tx buffer management + * + * txstart: The beginning of the Rx descriptor list (and also the beginning of + * Tx/Rx memory). + * txhead: Points to the oldest Tx descriptor queued for output (but for + * which output has not yet completed. Initialized to NULL; set + * by ez80emac_transmit() when Tx is started and by ez80emac_reclaimtxdesc() + * when Tx processing completes. txhead == NULL is also a sure + * indication that there is no Tx in progress. + * txtail: Points to the last Tx descriptor queued for output. Initialized + * to NULL. Set by ez80emac_transmit() when a new Tx descriptor is added. + * txnext: Points to the next free Tx descriptor. Initialized to txstart; set + * when ez80emac_transmit() adds the descriptor; reset to txstart when the + * last Tx packet is sent. + */ + + FAR struct ez80emac_desc_s *txstart; + FAR struct ez80emac_desc_s *txhead; + FAR struct ez80emac_desc_s *txtail; + FAR struct ez80emac_desc_s *txnext; + + /* Rx buffer management + * + * rxstart: The beginning of the Rx descriptor list (and also the end of + * Tx buffer + 1). + * rxnext: The next of Rx descriptor available for receipt of a packet. + * Initialized to rxstart; rxnext is incremented by rmac_rxinterrupt() + * as part of Rx interrupt processing. rxnext wraps back to rxstart + * when rxnext exceeds rxendp1. + * rxendp1: The end of the Rx descriptor list + 1. + */ + + FAR struct ez80emac_desc_s *rxstart; + FAR struct ez80emac_desc_s *rxnext; + FAR struct ez80emac_desc_s *rxendp1; + + boolean bifup; /* TRUE:ifup FALSE:ifdown */ + boolean blinkok; /* TRUE:successful MII autonegotiation */ + boolean bfullduplex; /* TRUE:full duplex */ + boolean b100mbs; /* TRUE:100Mbp */ + + WDOG_ID txpoll; /* TX poll timer */ + WDOG_ID txtimeout; /* TX timeout timer */ + +#if defined(CONFIG_DEBUG) && defined(CONFIG_DEBUG_NET) + struct ez80mac_statistics_s stat; +#endif + + /* This holds the information visible to uIP/NuttX */ + + struct uip_driver_s dev; /* Interface understood by uIP */ +}; + +/**************************************************************************** + * Private Data + ****************************************************************************/ + +/* There is only a single instance of driver private data (because there is + * only one EMAC interface. + */ + +static struct ez80emac_driver_s g_emac; + +/**************************************************************************** + * Private Function Prototypes + ****************************************************************************/ + +/* MII logic */ + +static void ez80emac_miiwrite(FAR struct ez80emac_driver_s *priv, ubyte offset, + uint16 value); +static uint16 ez80emac_miiread(FAR struct ez80emac_driver_s *priv, uint32 offset); +static boolean ez80emac_miipoll(FAR struct ez80emac_driver_s *priv, uint32 offset, + uint16 bits, boolean bclear); +static void ez80emac_miiautonegotiate(FAR struct ez80emac_driver_s *priv); + +/* Multi-cast filtering */ + +#ifdef CONFIG_EZ80_MCFILTER +static void ez80emac_machash(FAR ubyte *mac, int *ndx, int *bitno) +#endif + +/* Common TX logic */ + +static int ez80emac_transmit(struct ez80emac_driver_s *priv); +static int ez80emac_uiptxpoll(struct uip_driver_s *dev); + +/* Interrupt handling */ + +static int ez80emac_txinterrupt(int irq, FAR void *context); +static int ez80emac_rxinterrupt(int irq, FAR void *context); +static int ez80emac_sysinterrupt(int irq, FAR void *context); + +/* Watchdog timer expirations */ + +static void ez80emac_polltimer(int argc, uint32 arg, ...); +static void ez80emac_txtimeout(int argc, uint32 arg, ...); + +/* NuttX callback functions */ + +static int ez80emac_ifup(struct uip_driver_s *dev); +static int ez80emac_ifdown(struct uip_driver_s *dev); +static int ez80emac_txavail(struct uip_driver_s *dev); + +/**************************************************************************** + * Private Functions + ****************************************************************************/ + +/**************************************************************************** + * Function: ez80emac_miiwrite + * + * Description: + * Write a signel MII register + * + * Parameters: + * priv - Reference to the driver state structure + * offset - Register offset in PMD + * value - Value to write + * + * Returned Value: + * None + * + ****************************************************************************/ + +static void ez80emac_miiwrite(FAR struct ez80emac_driver_s *priv, ubyte offset, uint16 value) +{ + ubyte regval; + + /* Wait for MII management operation to complete */ + + while (inp(EZ80_EMAC_MIISTAT) & EMAC_MIISTAT_BUSY); + + /* Set up PHY addressing */ + + outp(EZ80_EMAC_FIAD, CONFIG_EZ80_FIAD & EMAC_FIAD_MASK); + outp(EZ80_EMAC_RGAD, offset & EMAC_RGAD_MASK); + + /* Write the control data */ + + outp(EZ80_EMAC_CTLD_H, value >> 8); + outp(EZ80_EMAC_CTLD_L, value & 0xff); + + /* Send control data to PHY */ + + regval = inp(EZ80_EMAC_MIIMGT); + regval |= EMAC_MIIMGMT_LCTLD; + outp(EZ80_EMAC_MIIMGT, regval); +} + +/**************************************************************************** + * Function: ez80emac_miiread + * + * Description: + * Read a single MII register + * + * Parameters: + * priv - Reference to the driver state structure + * offset - Register offset in PMD + * + * Returned Value: + * Value read from the register + * + ****************************************************************************/ + +static uint16 ez80emac_miiread(FAR struct ez80emac_driver_s *priv, uint32 offset) +{ + ubyte regval; + + /* Wait for MII management operation to complete */ + + while (inp(EZ80_EMAC_MIISTAT) & EMAC_MIISTAT_BUSY); + + /* Set up PHY addressing */ + + outp(EZ80_EMAC_FIAD, CONFIG_EZ80_FIAD & EMAC_FIAD_MASK); + outp(EZ80_EMAC_RGAD, offset & EMAC_RGAD_MASK); + + /* Read status from PHY */ + + regval = inp(EZ80_EMAC_MIIMGT); + regval |= EMAC_MIIMGMT_RSTAT; + outp(EZ80_EMAC_MIIMGT, regval); + + /* Wait for MII management operation to complete */ + + while (inp(EZ80_EMAC_MIISTAT) & EMAC_MIISTAT_BUSY); + return ((uint16)inp(EZ80_EMAC_PRSD_H) << 8 | inp(EZ80_EMAC_PRSD_L)); +} + +/**************************************************************************** + * Function: ez80emac_miipoll + * + * Description: + * Read an MII register until the bit has the specified polarity (or until + * the maximum number of retries occurs + * + * Parameters: + * priv - Reference to the driver state structure + * offset - Register offset in PMD + * bits - Selects set of bits to wait for + * bclear - TRUE:Return true when all bits in 'bits' are 0 + * FALSE:Return true when one or more bits in 'bits' are 1 + * + * Returned Value: + * TRUE:Bit has requested polarity; FALSE: EMAC_MXPOLLLOOPS exceeded + * + ****************************************************************************/ + +static boolean ez80emac_miipoll(FAR struct ez80emac_driver_s *priv, uint32 offset, + uint16 bits, boolean bclear) +{ + uint16 value; + int i; + + for (i = 0; i < EMAC_MXPOLLLOOPS; i++) + { + value = ez80emac_miiread(priv, offset); + if (bclear) + { + if ((value & bits) == 0) + { + return TRUE; + } + } + else + { + if ((value & bits) != 0) + { + return TRUE; + } + } + } + return FALSE; +} + +/**************************************************************************** + * Function: ez80emac_miiautonegotiate + * + * Description: + * Dump all MII registers + * + * Parameters: + * priv - Reference to the driver state structure + * offset - Register offset in PMD + * bits - Selects set of bits to wait for + * bclear - TRUE:Return true when all bits in 'bits' are 0 + * FALSE:Return true when one or more bits in 'bits' are 1 + * + * Returned Value: + * TRUE:Bit has requested polarity; FALSE: EMAC_MXPOLLLOOPS exceeded + * + ****************************************************************************/ + +static void ez80emac_miiautonegotiate(FAR struct ez80emac_driver_s *priv) +{ + uint16 advertise; + uint16 lpa; + uint16 mcr; + ubyte regval; + + /* Start auto-negotiation */ + + ez80emac_miiwrite(priv, MII_MCR, 0); + ez80emac_miiwrite(priv, + MII_MCR, + MII_MCR_ANENABLE | MII_MCR_ANRESTART | MII_MCR_FULLDPLX | MII_MCR_SPEED100); + + /* Wait for auto-negotiation to start */ + + if (!ez80emac_miipoll(priv, MII_MCR, MII_MCR_ANRESTART, FALSE)) + { + ndbg("Autonegotiation didn't start.\n"); + } + + /* Wait for auto-negotiation to complete */ + + if (!ez80emac_miipoll(priv, MII_MSR, MII_MSR_ANEGCOMPLETE, TRUE)) + { + ndbg("Autonegotiation didn't complete.\n"); + } + + /* Wait link */ + + if (!ez80emac_miipoll(priv, MII_MSR, MII_MSR_LINKSTATUS, TRUE)) + { + ndbg("Link is down!\n"); + priv->blinkok = FALSE; + } + else + { + priv->blinkok = TRUE; + } + + /* Read capable media type */ + + up_udelay(500); + advertise = ez80emac_miiread(priv, MII_ADVERTISE); + lpa = ez80emac_miiread(priv, MII_LPA); + + /* Check for 100BASETX full duplex */ + + if ((advertise & MII_ADVERTISE_100BASETXFULL) && (lpa & MII_LPA_100BASETXFULL)) + { + ndbg("100BASETX full duplex\n"); + regval = inp(EZ80_EMAC_CFG1); + regval |= EMAC_CFG1_FULLHD; /* Enable full duplex mode */ + outp(EZ80_EMAC_CFG1, regval); + priv->b100mbs = TRUE; + priv->bfullduplex = TRUE; + } + + /* Check for 100BASETX half duplex */ + + else if ((advertise & MII_ADVERTISE_100BASETXHALF) && (lpa & MII_LPA_100BASETXHALF)) + { + ndbg("100BASETX half duplex\n"); + regval = inp(EZ80_EMAC_CFG1); + regval &= ~EMAC_CFG1_FULLHD; /* Disable full duplex mode */ + outp(EZ80_EMAC_CFG1, regval); + priv->b100mbs = TRUE; + priv->bfullduplex = FALSE; + } + + /* Check for 10BASETX full duplex */ + + else if ((advertise & MII_ADVERTISE_10BASETXFULL) && (lpa & MII_LPA_10BASETXFULL)) + { + ndbg("10BASETX full duplex\n"); + regval = inp(EZ80_EMAC_CFG1); + regval |= EMAC_CFG1_FULLHD; /* Enable full duplex mode */ + outp(EZ80_EMAC_CFG1, regval); + priv->b100mbs = FALSE; + priv->bfullduplex = TRUE; + } + + /* Check for 10BASETX half duplex */ + + else if ((advertise & MII_ADVERTISE_10BASETXHALF) && (lpa & MII_LPA_10BASETXHALF)) + { + ndbg("10BASETX half duplex\n"); + regval = inp(EZ80_EMAC_CFG1); + regval &= ~EMAC_CFG1_FULLHD; /* Disable full duplex mode */ + outp(EZ80_EMAC_CFG1, regval); + priv->b100mbs = FALSE; + priv->bfullduplex = FALSE; + } + else + { + ndbg("No valid connection; force 10Mbps half-duplex.\n"); + regval = inp(EZ80_EMAC_CFG1); + regval &= ~EMAC_CFG1_FULLHD; /* Disable full duplex mode */ + outp(EZ80_EMAC_CFG1, regval); + priv->b100mbs = FALSE; + priv->bfullduplex = FALSE; + } + + /* set MII control */ + + mcr = ez80emac_miiread(priv, MII_MCR); + if (priv->bfullduplex) + { + mcr |= MII_MCR_FULLDPLX; + } + else + { + mcr &= ~MII_MCR_FULLDPLX; + } + if (priv->b100mbs) + { + mcr |= MII_MCR_SPEED100; + } + else + { + mcr &= ~MII_MCR_SPEED100; + } + mcr |= MII_MCR_ANENABLE; + ez80emac_miiwrite(priv, MII_MCR, mcr); + + nvdbg("MII registers (FIAD=%lx)\n", CONFIG_EZ80_FIAD); + nvdbg(" %-10s: %04x\n", "MII_MCR", ez80emac_miiread(priv, MII_MCR)); + nvdbg(" %-10s: %04x\n", "MII_MSR", ez80emac_miiread(priv, MII_MSR)); + nvdbg(" %-10s: %04x\n", "MII_PHYID1", ez80emac_miiread(priv, MII_PHYID1)); + nvdbg(" %-10s: %04x\n", "MII_PHYID2", ez80emac_miiread(priv, MII_PHYID2)); + nvdbg(" %-10s: %04x\n", "MII_ADVERTISE", ez80emac_miiread(priv, MII_ADVERTISE)); + nvdbg(" %-10s: %04x\n", "MII_LPA", ez80emac_miiread(priv, MII_LPA)); + nvdbg(" %-10s: %04x\n", "MII_EXPANSION", ez80emac_miiread(priv, MII_EXPANSION)); + nvdbg(" %-10s: %04x\n", "MII_LBRERROR", ez80emac_miiread(priv, MII_LBRERROR)); + nvdbg(" %-10s: %04x\n", "MII_PHYADDR", ez80emac_miiread(priv, MII_PHYADDR)); +} + +/**************************************************************************** + * Function: ez80emac_machash + * + * Description: + * Given a MAC address, perform the CRC32 calculation and return the + * index and bit number for the multi-cast hash table. + * + * Parameters: + * priv - Reference to the driver state structure + * mac - The MAC address to add + * enable - TRUE: Enable filtering on this address; FALSE: disable + * + * Returned Value: + * None + * + ****************************************************************************/ + +#ifdef CONFIG_EZ80_MCFILTER +static void ez80emac_machash(FAR ubyte *mac, int *ndx, int *bitno) +{ + uint32 hash; + uint32 crc32; + int i; + int j; + + /* Calculate the CRC32 value on the MAC address */ + + crc32 = 0xffffffff; + for (i = 0; i < 6; i++) + { + crc32 ^= (uint32)mac[i] & 0x0f; + for (j = 0; j < 4; j++) + { + if (crc32 & 1) + { + crc32 = (crc32 >> 1) ^ EMAC_CRCPOLY2; + } + else + { + crc32 >>= 1; + } + } + + crc32 ^= (uint32)mac[i] >> 4; + for (j = 0; j < 4; j++) + { + if (crc32 & 1) + { + crc32 = (crc32 >> 1) ^ EMAC_CRCPOLY2; + } + else + { + crc32 >>= 1; + } + } + } + + /* The normal CRC result would be the complement of crc32, + * the following calculates the EMAC hash value + * + * This loop changes the bit ordering the for bits [23:28] of + * the CRC32 value to -> [0:5] + */ + + crc32 &= 0x000001f8; + hash = 0; + + for (j = 31; j >= 23; j--) + { + hash = (hash << 1) + (crc32 & 1); + crc32 >>= 1; + } + + *ndx = (hash >> 3) & 7; + *bitno = hash & 7; +} +#endif + +/**************************************************************************** + * Function: ez80emac_transmit + * + * Description: + * Start hardware transmission. Called either from the txdone interrupt + * handling or from watchdog based polling. + * + * Parameters: + * priv - Reference to the driver state structure + * + * Returned Value: + * OK on success; a negated errno on failure + * + * Assumptions: + * + ****************************************************************************/ + +static int ez80emac_transmit(struct ez80emac_driver_s *priv) +{ + FAR struct ez80emac_desc_s *txdesc; + irqstate_t flags; + ubyte regval; + + /* Increment statistics */ + + EMAC_STAT(priv, tx_queued); + + /* Copy the data to the next packet in the Tx buffer */ + + flags = irqsave(); + txdesc = priv->txnext; + txdesc->np = 0; + txdesc->pktsize = priv->dev.d_len; + txdesc->stat = 0; + memcpy((ubyte*)txdesc + SIZEOF_EMACSDESC, priv->dev.d_buf, priv->dev.d_len); + + /* Add the new Tx descriptor to the tail of the chain. Is there a + * descriptor queued before this one? + */ + + if (priv->txtail) + { + /* Yes, link it to this one */ + + priv->txtail->np = (uint24)txdesc; + } + else + { + /* No.. then there are no pending Tx actions. This + * descriptor is both the new head and tail. + */ + + priv->txhead = txdesc; + } + + /* In any event, this descriptor is the new tail */ + + priv->txtail = txdesc; + + /* Caculate the address of the next, available Tx descriptor. + * Hmmm... need some way to determine if the next descriptor + * is in use or not. + */ + + priv->txnext = (FAR struct ez80emac_desc_s *) + ((FAR ubyte*)txdesc + txdesc->pktsize + SIZEOF_EMACSDESC); + if (priv->txnext >= priv->rxstart) + { + priv->txnext = priv->txstart; + } + + /* Setup the new 'next' Tx descriptor (very dangerous with + * no check for overrun!) + */ + + priv->txnext->np = 0; + priv->txnext->pktsize = 0; + priv->txnext->stat = 0; + + /* Then, give ownership of the descriptor to the hardware. It should + * perform the transmission on its next polling cycle. + */ + + txdesc->np = (uint24)priv->txnext; + txdesc->stat = EMAC_TXDESC_OWNER; + irqrestore(flags); + + /* Setup the TX timeout watchdog (perhaps restarting the timer) */ + + (void)wd_start(priv->txtimeout, EMAC_TXTIMEOUT, ez80emac_txtimeout, 1, (uint32)priv); + return OK; +} + +/**************************************************************************** + * Function: ez80emac_uiptxpoll + * + * Description: + * The transmitter is available, check if uIP has any outgoing packets ready + * to send. This is a callback from uip_poll(). uip_poll() may be called: + * + * 1. When the preceding TX packet send is complete, + * 2. When the preceding TX packet send timesout and the interface is reset + * 3. During normal TX polling + * + * Parameters: + * dev - Reference to the NuttX driver state structure + * + * Returned Value: + * OK on success; a negated errno on failure + * + * Assumptions: + * + ****************************************************************************/ + +static int ez80emac_uiptxpoll(struct uip_driver_s *dev) +{ + struct ez80emac_driver_s *priv = (struct ez80emac_driver_s *)dev->d_private; + + /* If the polling resulted in data that should be sent out on the network, + * the field d_len is set to a value > 0. + */ + + if (priv->dev.d_len > 0) + { + uip_arp_out(&priv->dev); + ez80emac_transmit(priv); + + /* Check if there is room in the DM90x0 to hold another packet. If not, + * return a non-zero value to terminate the poll. + */ + } + + /* If zero is returned, the polling will continue until all connections have + * been examined. + */ + + return 0; +} + +/**************************************************************************** + * Function: ez80emac_txinterrupt + * + * Description: + * Process Rx-related interrupt events + * + * Parameters: + * priv - Driver data instance + * istat - Snapshot of ISTAT register containing Rx events to provess + * + * Returned Value: + * None + * + ****************************************************************************/ + +static int ez80emac_txinterrupt(int irq, FAR void *context) +{ + FAR struct ez80emac_driver_s *priv = &g_emac; + FAR struct ez80emac_desc_s *txdesc = priv->txhead; + ubyte regval; + ubyte istat; + + /* EMAC Tx interrupts: + * + * EMAC_ISTAT_TXDONE - Bit 0: 1=Transmit done interrupt + * Denotes when packet transmission is complete. + * EMAC_ISTAT_TXCF - Bit 1: 1=Transmit control frame interrupt + * Denotes when control frame transmission is complete. + */ + + /* Get and clear Tx interrupt status bits */ + + istat = inp(EZ80_EMAC_ISTAT) & EMAC_ISTAT_TXEVENTS; + outp(EZ80_EMAC_ISTAT, istat); + + /* All events are packet/control frame transmit complete events */ + + nvdbg("txhead=%p {%06x, %u, %04x} trp=%02x%02x istat=%02x\n", + txdesc, txdesc->np, txdesc->pktsize, txdesc->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L), istat); + + EMAC_STAT(priv, tx_int); + + /* Check if the packet is still owned by the hardware */ + + if ((txdesc->stat & EMAC_TXDESC_OWNER) != 0) + { + ndbg("Descriptor %p still owned by H/W {%06x, %u, %04x} trp=%02x%02x istat=%02x\n", + txdesc, txdesc->np, txdesc->pktsize, txdesc->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L), istat); + return OK; + } + + /* Handle errors */ + + else if ((txdesc->stat & EMAC_TXDESC_ABORT) != 0) + { + ndbg("Descriptor %p aborted {%06x, %u, %04x} trp=%02x%02x istat=%02x\n", + txdesc, txdesc->np, txdesc->pktsize, txdesc->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L), istat); + + EMAC_STAT(priv, tx_errors); + EMAC_STAT(priv, tx_abterrors); + } + + /* Get the address of the next Tx descriptor in the list (if any) */ + + priv->txhead = (FAR struct ez80emac_desc_s *)txdesc->np; + if (!priv->txhead) + { + /* If there is no new head, then there is no tail either */ + + priv->txnext = priv->txstart; + priv->txtail = NULL; + + /* Reset the transmit function. That should force the TRP to be + * the same as TDLP which is the set to txstart. + */ + + regval = inp(EZ80_EMAC_RST); + regval |= EMAC_RST_HRTFN; + outp(EZ80_EMAC_RST, regval); + regval &= ~EMAC_RST_HRTFN; + outp(EZ80_EMAC_RST, regval); + + /* If no further xmits are pending, then cancel the TX timeout */ + + wd_cancel(priv->txtimeout); + } + + /* Clean up the old Tx descriptor -- not really necessary */ + + txdesc->np = 0; + txdesc->pktsize = 0; + txdesc->stat = 0; + + nvdbg("New txhead=%p {%06x, %u, %04x} trp=%02x%02x istat=%02x\n", + priv->txhead, priv->txhead->np, priv->txhead->pktsize, priv->txhead->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L), istat); + return OK; +} + +/**************************************************************************** + * Function: ez80emac_rxinterrupt + * + * Description: + * Process Rx-related interrupt events + * + * Parameters: + * priv - Driver data instance + * istat - Snapshot of ISTAT register containing Rx events to provess + * + * Returned Value: + * None + * + ****************************************************************************/ + +static int ez80emac_rxinterrupt(int irq, FAR void *context) +{ + FAR struct ez80emac_driver_s *priv = &g_emac; + FAR struct ez80emac_desc_s *rxdesc = priv->rxnext; + ubyte istat; + int pktlen; + + /* EMAC Rx interrupts: + * + * EMAC_ISTAT_RXDONE - Bit 3: 1=Receive done interrupt + * Denotes when packet reception is complete. + * EMAC_ISTAT_RXPCF - Bit 4: 1=Receive pause control frame interrupt + * Denotes when pause control frame reception is complete. + * EMAC_ISTAT_RXCF - Bit 5: 1=Receive control frame interrupt + * Denotes when control frame reception is complete. + */ + + /* Get and clear Rx interrupt status bits */ + + istat = inp(EZ80_EMAC_ISTAT) & EMAC_ISTAT_RXEVENTS; + outp(EZ80_EMAC_ISTAT, istat); + + EMAC_STAT(priv, rx_int); + + /* The RRP register points to where the next Receive packet is read from. + * The read-only EMAC Receive Write Pointer (RWP) egisters reports the + * current RxDMA Receive Write pointer. The RxDMA block uses the RRP[12:5] + * to compare to RWP[12:5] for determining how many buffers remain. The + * result is the BLKSLFT register. + */ + + nvdbg("rxnext=%p {%06x, %u, %04x} rrp=%02x%02x rwp=%02%02 blkslft=%02x istat=%02x\n", + rxdesc, rxdesc->np, rxdesc->pktsize, rxdesc->stat, + inp(EZ80_EMAC_RRP_H), inp(EZ80_EMAC_RRP_L), + inp(EZ80_EMAC_RWP_H), inp(EZ80_EMAC_RWP_L), + inp(EZ80_EMAC_BLKSLFT_H), inp(EZ80_EMAC_BLKSLFT_L), + istat); + + /* The RxDMA reads the data from the RxFIFO and stores it in the EMAC + * memory Receive buffer. When the end of the packet is detected, the + * RxDMA reads the next two bytes from the RxFIFO and writes them into + * the Rx descriptor status LSB and MSB. The packet length counter is + * stored into the descriptor table packet length field, the descriptor + * table next pointer is written into the Rx descriptor table and finally + * the Rx_DONE_STAT bit in the EMAC Interrupt Status Register register is + * set to 1. + */ + + /* Check if this packet was received intact */ + + if ((rxdesc->stat & EMAC_RXDESC_OK) == 0) + { + /* No frame received in this descriptor yet */ + + return OK; + } + + /* We have a good packet. Check if the packet is a valid size + * for the uIP buffer configuration + */ + + if (rxdesc->pktsize > CONFIG_NET_BUFSIZE) + { + nvdbg("receive oversize pkt\n"); + pktlen = CONFIG_NET_BUFSIZE; + } + else + { + pktlen = rxdesc->pktsize; + } + + /* Copy the data data from the hardware to priv->dev.d_buf. Set + * amount of data in priv->dev.d_len + */ + + memcpy(priv->dev.d_buf, (FAR ubyte*)priv->rxnext + SIZEOF_EMACSDESC, pktlen); + priv->dev.d_len = pktlen; + + /* Reclaim the Rx descriptor */ + + priv->rxnext = (FAR struct ez80emac_desc_s *)rxdesc->np; + + rxdesc->np = 0; + rxdesc->pktsize = 0; + rxdesc->stat = 0; + + nvdbg("rxnext=%p {%06x, %u, %04x} rrp=%02x%02x rwp=%02%02 blkslft=%02x istat=%02x\n", + rxdesc, rxdesc->np, rxdesc->pktsize, rxdesc->stat, + inp(EZ80_EMAC_RRP_H), inp(EZ80_EMAC_RRP_L), + inp(EZ80_EMAC_RWP_H), inp(EZ80_EMAC_RWP_L), + inp(EZ80_EMAC_BLKSLFT_H), inp(EZ80_EMAC_BLKSLFT_L), + istat); + + /* We only accept IP packets of the configured type and ARP packets */ + +#ifdef CONFIG_NET_IPv6 + if (ETHBUF->type == HTONS(UIP_ETHTYPE_IP6)) +#else + if (ETHBUF->type == HTONS(UIP_ETHTYPE_IP)) +#endif + { + nvdbg("IP packet received (%02x)\n", ETHBUF->type); + EMAC_STAT(priv, rx_ip); + + uip_arp_ipin(); + uip_input(&priv->dev); + + /* If the above function invocation resulted in data that should be + * sent out on the network, the field d_len will set to a value > 0. + */ + + if (priv->dev.d_len > 0) + { + uip_arp_out(&priv->dev); + ez80emac_transmit(priv); + } + } + else if (ETHBUF->type == htons(UIP_ETHTYPE_ARP)) + { + nvdbg("ARP packet received (%02x)\n", ETHBUF->type); + EMAC_STAT(priv, rx_arp); + + uip_arp_arpin(&priv->dev); + + /* If the above function invocation resulted in data that should be + * sent out on the network, the field d_len will set to a value > 0. + */ + + if (priv->dev.d_len > 0) + { + ez80emac_transmit(priv); + } + } +#ifdef CONFIG_DEBUG + else + { + ndbg("Unsupported packet type dropped (%02x)\n", ETHBUF->type); + EMAC_STAT(priv, rx_dropped); + } +#endif + return OK; +} + +/**************************************************************************** + * Function: ez80emac_sysinterrupt + * + * Description: + * Hardware interrupt handler + * + * Parameters: + * irq - Number of the IRQ that generated the interrupt + * context - Interrupt register state save info (architecture-specific) + * + * Returned Value: + * OK on success + * + * Assumptions: + * + ****************************************************************************/ + +static int ez80emac_sysinterrupt(int irq, FAR void *context) +{ + FAR struct ez80emac_driver_s *priv = &g_emac; + ubyte events; + ubyte istat; + + /* EMAC system interrupts : + * + * EMAC_ISTAT_TXFSMERR - Bit 7: 1=Transmit state machine error interrupt + * A Transmit State Machine Error should never occur. However, if this + * bit is set, the entire transmitter module must be reset. + * EMAC_ISTAT_MGTDONE - Bit 6: 1=MII Mgmt done interrupt + * This bit is set when communicating to the PHY over the MII during + * a Read or Write operation. + * EMAC_ISTAT_RXOVR - Bit 2: 1=Receive overrun interrupt + * If this bit is set, all incoming packets are ignored until + * this bit is cleared by software. + */ + + EMAC_STAT(priv, sys_int); + + /* Get and clear system interrupt status bits */ + + istat = inp(EZ80_EMAC_ISTAT) & EMAC_ISTAT_SYSEVENTS; + outp(EZ80_EMAC_ISTAT, istat); + + /* Check for transmit state machine error */ + + if ((istat & EMAC_ISTAT_TXFSMERR) != 0) + { + ndbg("Tx FSMERR txhead=%p {%06x, %u, %04x} trp=%02x%02x istat=%02x\n", + priv->txhead, priv->txhead->np, priv->txhead->pktsize, priv->txhead->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L), istat); + + /* Increment statistics */ + + EMAC_STAT(priv, tx_errors); + EMAC_STAT(priv, tx_fsmerrors); + + /* Really need to reset the transmitter module here */ + } + + /* Check for Rx overrun error */ + + if ((istat & EMAC_ISTAT_RXOVR) != 0) + { + ndbg("Rx OVR rxnext=%p {%06x, %u, %04x} rrp=%02x%02x rwp=%02%02 blkslft=%02x istat=%02x\n", + priv->rxnext, priv->rxnext->np, priv->rxnext->pktsize, priv->rxnext->stat, + inp(EZ80_EMAC_RRP_H), inp(EZ80_EMAC_RRP_L), + inp(EZ80_EMAC_RWP_H), inp(EZ80_EMAC_RWP_L), + inp(EZ80_EMAC_BLKSLFT_H), inp(EZ80_EMAC_BLKSLFT_L), + istat); + + /* Increment statistics */ + + EMAC_STAT(priv, rx_errors); + EMAC_STAT(priv, rx_ovrerrors); + } + return OK; +} + +/**************************************************************************** + * Function: ez80emac_txtimeout + * + * Description: + * Our TX watchdog timed out. Called from the timer interrupt handler. + * The last TX never completed. Reset the hardware and start again. + * + * Parameters: + * argc - The number of available arguments + * arg - The first argument + * + * Returned Value: + * None + * + * Assumptions: + * + ****************************************************************************/ + +static void ez80emac_txtimeout(int argc, uint32 arg, ...) +{ + FAR struct ez80emac_driver_s *priv = (FAR struct ez80emac_driver_s *)arg; + irqstate_t flags; + + /* Increment statistics and dump debug info */ + + EMAC_STAT(priv, tx_errors); + EMAC_STAT(priv, tx_timeouts); + + /* Then reset the hardware */ + + flags = irqsave(); + ez80emac_ifdown(&priv->dev); + ez80emac_ifup(&priv->dev); + irqrestore(flags); + + /* Then poll uIP for new XMIT data */ + + (void)uip_poll(&priv->dev, ez80emac_uiptxpoll); +} + +/**************************************************************************** + * Function: ez80emac_polltimer + * + * Description: + * Periodic timer handler. Called from the timer interrupt handler. + * + * Parameters: + * argc - The number of available arguments + * arg - The first argument + * + * Returned Value: + * None + * + * Assumptions: + * + ****************************************************************************/ + +static void ez80emac_polltimer(int argc, uint32 arg, ...) +{ + struct ez80emac_driver_s *priv = (struct ez80emac_driver_s *)arg; + + /* Check if there is room in the send another TXr packet. */ + + /* If so, update TCP timing states and poll uIP for new XMIT data */ + + (void)uip_timer(&priv->dev, ez80emac_uiptxpoll, EMAC_POLLHSEC); + + /* Setup the watchdog poll timer again */ + + (void)wd_start(priv->txpoll, EMAC_WDDELAY, ez80emac_polltimer, 1, arg); +} + +/**************************************************************************** + * Function: ez80emac_ifup + * + * Description: + * NuttX Callback: Bring up the Ethernet interface when an IP address is + * provided + * + * Parameters: + * dev - Reference to the NuttX driver state structure + * + * Returned Value: + * None + * + * Assumptions: + * + ****************************************************************************/ + +static int ez80emac_ifup(FAR struct uip_driver_s *dev) +{ + FAR struct ez80emac_driver_s *priv = (FAR struct ez80emac_driver_s *)dev->d_private; + ubyte regval; + + ndbg("Bringing up: %d.%d.%d.%d\n", + dev->d_ipaddr & 0xff, (dev->d_ipaddr >> 8) & 0xff, + (dev->d_ipaddr >> 16) & 0xff, dev->d_ipaddr >> 24 ); + + /* Bring up the interface -- Must be down right now */ + + DEBUGASSERT((inp(EZ80_EMAC_PTMR) == 0)); + DEBUGASSERT((inp(EZ80_EMAC_CFG4) & EMAC_CFG4_RXEN) == 0); + + /* Soft reset Rx/Tx */ + + regval = inp(EZ80_EMAC_RST); + regval |= (EMAC_RST_HRRFN|EMAC_RST_HRTFN); + outp(EZ80_EMAC_RST, regval); + regval &= ~(EMAC_RST_HRRFN|EMAC_RST_HRTFN); + outp(EZ80_EMAC_RST, regval); + + /* EMAC_AFR_BC - Accept broadcast messages + * EMAC_AFR_MC - Accept any multicast message + * EMAC_AFR_QMC - Accept only qualified multicast messages + */ + +#ifdef CONFIG_EZ80_MCFILTER + outp(EZ80_EMAC_AFR, EMAC_AFR_BC|EMAC_AFR_QMC|EMAC_AFR_MC); +#else + outp(EZ80_EMAC_AFR, EMAC_AFR_BC|EMAC_AFR_MC); +#endif + + /* Set the MAC address */ + + outp(EZ80_EMAC_STAD_0, priv->dev.d_mac.ether_addr_octet[0]); + outp(EZ80_EMAC_STAD_1, priv->dev.d_mac.ether_addr_octet[1]); + outp(EZ80_EMAC_STAD_2, priv->dev.d_mac.ether_addr_octet[2]); + outp(EZ80_EMAC_STAD_3, priv->dev.d_mac.ether_addr_octet[3]); + outp(EZ80_EMAC_STAD_4, priv->dev.d_mac.ether_addr_octet[4]); + outp(EZ80_EMAC_STAD_5, priv->dev.d_mac.ether_addr_octet[5]); + + /* Enable/disable promiscuous mode */ + + regval = inp(EZ80_EMAC_AFR); +#if defined(CONFIG_EZ80_EMACPROMISC) + regval |= EMAC_AFR_PROM; +#else + regval &= ~EMAC_AFR_PROM; +#endif + outp(EZ80_EMAC_AFR, regval); + + /* Enable Rx */ + + regval = inp(EZ80_EMAC_CFG4); + regval |= EMAC_CFG4_RXEN; + outp(EZ80_EMAC_CFG4, regval); + + /* Enable the Tx poll timer */ + + outp(EZ80_EMAC_PTMR, EMAC_PTMR); + + /* Turn on interrupts */ + + outp(EZ80_EMAC_ISTAT, 0xff); /* Clear all pending interrupts */ + outp(EZ80_EMAC_IEN, EMAC_EIN_HANDLED); /* Enable all interrupts */ + + /* Set and activate a timer process */ + + (void)wd_start(priv->txpoll, EMAC_WDDELAY, ez80emac_polltimer, 1, (uint32)priv); + + /* Enable the Ethernet interrupt */ + + priv->bifup = TRUE; + up_enable_irq(EZ80_EMACRX_IRQ); + up_enable_irq(EZ80_EMACTX_IRQ); + up_enable_irq(EZ80_EMACSYS_IRQ); + return OK; +} + +/**************************************************************************** + * Function: ez80emac_ifdown + * + * Description: + * NuttX Callback: Stop the interface. + * + * Parameters: + * dev - Reference to the NuttX driver state structure + * + * Returned Value: + * None + * + * Assumptions: + * + ****************************************************************************/ + +static int ez80emac_ifdown(struct uip_driver_s *dev) +{ + struct ez80emac_driver_s *priv = (struct ez80emac_driver_s *)dev->d_private; + irqstate_t flags; + ubyte regval; + + /* Disable the Ethernet interrupt */ + + flags = irqsave(); + up_disable_irq(EZ80_EMACRX_IRQ); + up_disable_irq(EZ80_EMACTX_IRQ); + up_disable_irq(EZ80_EMACSYS_IRQ); + + /* Cancel the TX poll timer and TX timeout timers */ + + wd_cancel(priv->txpoll); + wd_cancel(priv->txtimeout); + + /* Disable Rx */ + + regval = inp(EZ80_EMAC_CFG4); + regval &= ~EMAC_CFG4_RXEN; + outp(EZ80_EMAC_CFG4, regval); + + /* Disable the Tx poll timer */ + + outp(EZ80_EMAC_PTMR, 0); + + priv->bifup = FALSE; + irqrestore(flags); + return OK; +} + +/**************************************************************************** + * Function: ez80emac_txavail + * + * Description: + * Driver callback invoked when new TX data is available. This is a + * stimulus perform an out-of-cycle poll and, thereby, reduce the TX + * latency. + * + * Parameters: + * dev - Reference to the NuttX driver state structure + * + * Returned Value: + * None + * + * Assumptions: + * Called in normal user mode + * + ****************************************************************************/ + +static int ez80emac_txavail(struct uip_driver_s *dev) +{ + struct ez80emac_driver_s *priv = (struct ez80emac_driver_s *)dev->d_private; + irqstate_t flags; + + flags = irqsave(); + + /* Ignore the notification if the interface is not yet up */ + + if (priv->bifup) + { + + /* Check if there is room in the hardware to hold another outgoing packet. */ + + /* If so, then poll uIP for new XMIT data */ + + (void)uip_poll(&priv->dev, ez80emac_uiptxpoll); + } + + irqrestore(flags); + return OK; +} + +/**************************************************************************** + * Public Functions + ****************************************************************************/ + +/**************************************************************************** + * Function: ez80emac_initialize + * + * Description: + * Initialize the Ethernet driver + * + * Parameters: + * None + * + * Returned Value: + * OK on success; Negated errno on failure. + * + ****************************************************************************/ + +int up_netinitialize(void) +{ + struct ez80emac_driver_s *priv = &g_emac; + uint24 addr; + ubyte regval; + int ret; + + /* Initialize the hardware + * + * The ez80 has a fixed 8kb of EMAC SRAM memory located in the high + * address space (we don't need to know where, we can get then from + * the EZ80_EMAC_BP_U register). The EMAC memory is broken into + * two parts: the Tx buffer and the Rx buffer. + * + * The TX buffer lies at the beginning of the EMAC memory. + * The Transmit Lower Boundary Pointer Register, TLBP, holds the + * least significant 12-bits of the starting address of the Tx buffer. + */ + + outp(EZ80_EMAC_TLBP_L, 0); /* Bits 0-7 set to zero */ + outp(EZ80_EMAC_TLBP_H, 0); /* Bits 8-12 set to zero */ + + addr = (uint24)inp(EZ80_EMAC_BP_U) << 16 | + (uint24)inp(EZ80_EMAC_TLBP_H) << 8 | + (uint24)inp(EZ80_EMAC_TLBP_L); + + priv->txstart = (FAR struct ez80emac_desc_s *)(addr); + priv->txnext = priv->txstart; + priv->txhead = NULL; + priv->txtail = NULL; + + priv->txnext->np = 0; + priv->txnext->pktsize = 0; + priv->txnext->stat = 0; + + nvdbg("txnext=%p {%06x, %u, %04x} trp=%02x%02x\n", + priv->txnext, priv->txnext->np, priv->txnext->pktsize, priv->txnext->stat, + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L)); + + /* The Boundary Pointer Register, EMAC_BP, points to the start of the Rx + * buffer (end of Tx buffer + 1). Only bits EMAC_BP[12:5] of are + * write-able. + */ + + outp(EZ80_EMAC_BP_L, EMAC_TXBUFSIZE & 0xe0); + outp(EZ80_EMAC_BP_H, (EMAC_TXBUFSIZE >> 8) & 0x1f); + + addr = (uint24)inp(EZ80_EMAC_BP_U) << 16 | + (uint24)inp(EZ80_EMAC_BP_H) << 8 | + (uint24)inp(EZ80_EMAC_BP_L); + priv->rxstart = (FAR struct ez80emac_desc_s *)(addr); + priv->rxnext = priv->rxstart; + + priv->rxnext->np = 0; + priv->rxnext->pktsize = 0; + priv->rxnext->stat = 0; + + nvdbg("rxnext=%p {%06x, %u, %04x} bp=%06x\n", + priv->rxnext, priv->rxnext->np, priv->rxnext->pktsize, + priv->rxnext->stat, addr); + + /* The EMAC Receive Read Pointer (RRP) register(s) should be initialized + * to the EMAC_BEZ80_EMAC_RRP_HP value (start of the Receive buffer). The RRP register + * points to where the next Receive packet is read from. The EMAC_BP[12:5] + * is loaded into this register whenever the EMAC_RST [(HRRFN) is set to 1. + * The RxDMA block uses the RRP[12:5] to compare to RWP[12:5] for determining + * how many buffers remain. The result equates to the BLKSLFT register. + * + * The read-only EMAC Receive Write Pointer (RWP) egisters reports the + * current RxDMA Receive Write pointer. This pointer gets initialized to EMAC_BP + * whenever EMAC_RST bits SRST or HRRTN are set. Because the size of the packet + * is limited to a minimum of 32 bytes, the last five bits are always zero. + */ + + outp(EZ80_EMAC_RRP_H, inp(EZ80_EMAC_BP_H)); + outp(EZ80_EMAC_RRP_L, inp(EZ80_EMAC_BP_L)); + + nvdbg("rrp=%02x%02x rwp=%02%02\n", + inp(EZ80_EMAC_RRP_H), inp(EZ80_EMAC_RRP_L), + inp(EZ80_EMAC_RWP_H), inp(EZ80_EMAC_RWP_L)); + + /* The Receive High Boundary Pointer Register, EMAC_RHBP, points to the end + * of the Rx buffer + 1. Only bits EMAC_RHBP[12:5] are write-able. + */ + + outp(EZ80_EMAC_RHBP_L, EMAC_TOTAL_BUFSIZE & 0xe0); + outp(EZ80_EMAC_RHBP_H, (EMAC_TOTAL_BUFSIZE >> 8) & 0x1f); + + addr = (uint24)inp(EZ80_EMAC_BP_U) << 16 | + (uint24)inp(EZ80_EMAC_RHBP_H) << 8 | + (uint24)inp(EZ80_EMAC_RHBP_L); + priv->rxendp1 = (FAR struct ez80emac_desc_s *)addr; + + nvdbg("rxendp1=%p bp=%06x\n", priv->rxendp1, addr); + + /* The Tx and Receive buffers are divided into packet buffers of either + * 256, 128, 64, or 32 bytes selected by BufSize register bits 7 and 6. + */ + + outp(EZ80_EMAC_BUFSZ, EMAC_BUFSZ); + nvdbg("bufsz=%02x blksleft=%02x%02x\n", + inp(EZ80_EMAC_BUFSZ), inp(EZ80_EMAC_BLKSLFT_H), inp(EZ80_EMAC_BLKSLFT_L)); + + /* Software reset */ + + outp(EZ80_EMAC_ISTAT, 0xff); /* Clear any pending interupts */ + regval = inp(EZ80_EMAC_RST); + regval |= EMAC_RST_SRST; + outp(EZ80_EMAC_RST, regval); + regval &= ~EMAC_RST_SRST; + outp(EZ80_EMAC_RST, regval); + + nvdbg("After soft reset: rwp=%02%02 trp=%02x%02x\n", + inp(EZ80_EMAC_RWP_H), inp(EZ80_EMAC_RWP_L), + inp(EZ80_EMAC_TRP_H), inp(EZ80_EMAC_TRP_L)); + + /* PHY reset */ + + up_udelay(500); + ez80emac_miiwrite(priv, MII_MCR, MII_MCR_RESET); + if (!ez80emac_miipoll(priv, MII_MCR, MII_MCR_RESET, FALSE)) + { + ndbg("PHY reset error.\n"); + } + + /* Initialize MAC */ + + /* Set only the default late collision bytes in CFG2 */ + + outp(EZ80_EMAC_CFG3, EMAC_LCOL); + + /* Set only the retry count in CFG3 */ + + outp(EZ80_EMAC_CFG3, EMAC_RETRY); + + /* EMAC_CFG4_TXFC - Pause control frames are allowed to be transmitted + * EMAC_CFG4_RXFC - Act on received pause control frames + */ + + outp(EZ80_EMAC_CFG4, EMAC_CFG4_TXFC|EMAC_CFG4_RXFC); + + /* EMAC_CFG1_CRCEN + EMAC_CFG1_PADEN + EMAC_CFG1_VLPAD + EMAC_CFG1_ADPADN = + * if VLAN not detected, pad to 60, add CRC + * if VLAN detected, pad to 64, add CRC + */ + + outp(EZ80_EMAC_CFG1, EMAC_CFG1_CRCEN|EMAC_CFG1_PADEN|EMAC_CFG1_ADPADN|EMAC_CFG1_VLPAD); + + outp(EZ80_EMAC_IPGT, EMAC_IPGT); + outp(EZ80_EMAC_IPGR1, EMAC_IPGR1); + outp(EZ80_EMAC_IPGR2, EMAC_IPGR2); + + outp(EZ80_EMAC_MAXF_L, EMAC_MAXF & 0xff); + outp(EZ80_EMAC_MAXF_H, EMAC_MAXF >> 8); + + /* Select the fastest MDC clock divider. The MDC clock derives + * from the SCLK divided by 4, 6, 8, 10, 14, 20, or 28. + */ + + outp(EZ80_EMAC_MIIMGT, CONFIG_EZ80_MDCDIV); + + /* Clear the new hash table */ + + outp(EZ80_EMAC_HTBL_0, 0); + outp(EZ80_EMAC_HTBL_1, 0); + outp(EZ80_EMAC_HTBL_2, 0); + outp(EZ80_EMAC_HTBL_3, 0); + outp(EZ80_EMAC_HTBL_4, 0); + outp(EZ80_EMAC_HTBL_5, 0); + outp(EZ80_EMAC_HTBL_6, 0); + outp(EZ80_EMAC_HTBL_7, 0); + + /* PHY reset */ + + ez80emac_miiwrite(priv, MII_MCR, MII_MCR_RESET); + if (!ez80emac_miipoll(priv, MII_MCR, MII_MCR_RESET, FALSE)) + { + ndbg("PHY reset error.\n"); + ret = -EIO; + goto errout; + } + + /* Set auto-negotion */ + + ez80emac_miiautonegotiate(priv); + + /* Initialize DMA / FIFO */ + + outp(EZ80_EMAC_TPTV_L, EMAC_TPTV & 0xff); + outp(EZ80_EMAC_TPTV_H, EMAC_TPTV >> 8); + + /* Disable all interrupts */ + + outp(EZ80_EMAC_IEN, 0); + + /* Attach IRQs */ + + ret = irq_attach(EZ80_EMACSYS_IRQ, ez80emac_sysinterrupt); + if (ret < 0) + { + ndbg("Unable to attach IRQ %d\n", EZ80_EMACSYS_IRQ); + ret = -EAGAIN; + goto errout; + } + + ret = irq_attach(EZ80_EMACRX_IRQ, ez80emac_rxinterrupt); + if (ret < 0) + { + ndbg("Unable to attach IRQ %d\n", EZ80_EMACRX_IRQ); + ret = -EAGAIN; + goto errout; + } + + ret = irq_attach(EZ80_EMACTX_IRQ, ez80emac_txinterrupt); + if (ret < 0) + { + ndbg("Unable to attach IRQ %d\n", EZ80_EMACTX_IRQ); + ret = -EAGAIN; + goto errout; + } + + /* Initialize the driver structure */ + + memset(&g_emac, 0, sizeof(struct ez80emac_driver_s)); + priv->dev.d_ifup = ez80emac_ifup; /* I/F down callback */ + priv->dev.d_ifdown = ez80emac_ifdown; /* I/F up (new IP address) callback */ + priv->dev.d_txavail = ez80emac_txavail; /* New TX data callback */ + priv->dev.d_private = (FAR void*)&g_emac; /* Used to recover private state from dev */ + + /* Create a watchdog for timing polling for and timing of transmisstions */ + + priv->txpoll = wd_create(); /* Create periodic poll timer */ + priv->txtimeout = wd_create(); /* Create TX timeout timer */ + + /* Read the MAC address from the hardware into priv->dev.d_mac.ether_addr_octet */ + + /* Register the device with the OS so that socket IOCTLs can be performed */ + + (void)netdev_register(&priv->dev); + return OK; + +errout: + up_netuninitialize(); + return ERROR; +} + +/**************************************************************************** + * Function: up_multicastfilter + * + * Description: + * Add one MAC address to the multi-cast hash table + * + * Parameters: + * dev - Reference to the uIP driver state structure + * mac - The MAC address to add + * enable - TRUE: Enable filtering on this address; FALSE: disable + * + * Returned Value: + * OK on success; Negated errno on failure. + * + ****************************************************************************/ + +#ifdef CONFIG_ARCH_MCFILTER +int up_multicastfilter(FAR struct uip_driver_s *dev, FAR ubyte *mac, boolean enable) +{ + FAR struct ez80emac_driver_s *priv = (FAR struct ez80emac_driver_s *)dev->priv; + ubyte regval; + int ndx; + int bit; + int i; + + /* The EMAC Hash Table Registers represent an 8x8 hash table matrix. + * This table is used as an option to select between different multi-cast + * addresses. If a multicast address is received, the first 6 bits of the CRC + * decoded and to a table that points to a single bit in the hash table matrix. + * if the selected bit is '1', then multicast packet is accepted. If the bit + * is '0', the multicast packet is rejected. + */ + + /* Apply the hash algorithm to the the hash table index and bit number + * corresponding to this MAC + */ + + ez80emac_machash(mclist->dmi_addr, &ndx, &bit); + + /* And set/clear that bit in that array element */ + + regval = inp(EZ80_EMAC_HTBL_0 + ndx); + if (enable) + { + regval |= (1 << bit); + } + else + { + regval &= ~(1 << bit); + } + outp(EZ80_EMAC_HTBL_0 + ndx, regval); + return OK; +} +#endif + +/**************************************************************************** + * Function: up_netuninitialize + * + * Description: + * Un-initialize the Ethernet driver + * + * Parameters: + * None + * + * Returned Value: + * None + * + * Assumptions: + * + ****************************************************************************/ + +void up_netuninitialize(void) +{ + FAR struct ez80emac_driver_s *priv = &g_emac; + int i; + + ez80emac_ifdown(&priv->dev); + /* netdev_unregister(priv->dev); No such API yet */ + + priv->txnext = priv->txstart; + priv->txhead = NULL; + priv->txtail = NULL; + + irq_detach(EZ80_EMACRX_IRQ); + irq_detach(EZ80_EMACTX_IRQ); + irq_detach(EZ80_EMACSYS_IRQ); +} + +#endif /* CONFIG_NET && CONFIG_EZ80_EMAC */ + diff --git a/arch/z80/src/ez80/ez80f91_emac.h b/arch/z80/src/ez80/ez80f91_emac.h index 4684b78015..538ced1ebf 100644 --- a/arch/z80/src/ez80/ez80f91_emac.h +++ b/arch/z80/src/ez80/ez80f91_emac.h @@ -123,12 +123,12 @@ /* EMAC bufsize register bit settings ***********************************************/ -#define EMAC_BUFSIZ_BUFSZMASK 0xc0 /* Bits 6-6: Rx/Tx buffer size */ -# define EMAC_BUFSIZ_256b 0x00 /* EMAC Rx/Tx buffer size = 256 bytes */ -# define EMAC_BUFSIZ_128b 0x40 /* EMAC Rx/Tx buffer size = 128 bytes */ -# define EMAC_BUFSIZ_64b 0x80 /* EMAC Rx/Tx buffer size = 64 bytes */ -# define EMAC_BUFSIZ_32b 0xc0 /* EMAC Rx/Tx buffer size = 32 bytes */ -#define EMAC_BUFSIZ_TPCFLMASK 0x3f /* Bits 0-5: Tranmsit pause frame level */ +#define EMAC_BUFSZ_BUFSZMASK 0xc0 /* Bits 6-6: Rx/Tx buffer size */ +# define EMAC_BUFSZ_256b 0x00 /* EMAC Rx/Tx buffer size = 256 bytes */ +# define EMAC_BUFSZ_128b 0x40 /* EMAC Rx/Tx buffer size = 128 bytes */ +# define EMAC_BUFSZ_64b 0x80 /* EMAC Rx/Tx buffer size = 64 bytes */ +# define EMAC_BUFSZ_32b 0xc0 /* EMAC Rx/Tx buffer size = 32 bytes */ +#define EMAC_BUFSZ_TPCFLMASK 0x3f /* Bits 0-5: Tranmsit pause frame level */ /* EMAC interrupt enable register bit settings **************************************/ diff --git a/configs/ez80f910200zco/ostest/defconfig b/configs/ez80f910200zco/ostest/defconfig index d244bc68bd..8a8d8fe0e7 100644 --- a/configs/ez80f910200zco/ostest/defconfig +++ b/configs/ez80f910200zco/ostest/defconfig @@ -74,7 +74,7 @@ CONFIG_ARCH_CHIP_EZ80F92=n CONFIG_ARCH_CHIP_EZ80F93=n CONFIG_ARCH_BOARD=ez80f910200zco CONFIG_ARCH_BOARD_EZ80F910200ZCO=y -CONFIG_ARCH_NOINTC=y +CONFIG_ARCH_NOINTC=n CONFIG_ARCH_IRQPRIO=n CONFIG_BOARD_LOOPSPERMSEC=1250 CONFIG_ENDIAN_BIG=y @@ -109,6 +109,31 @@ CONFIG_UART1_PARITY=0 CONFIG_UART0_2STOP=0 CONFIG_UART1_2STOP=0 +# +# ez80 EMAC +# +# CONFIG_EZ80_EMAC - Enables support for ez80 EMAC driver. +# CONFIG_EZ80_FIAD - Provides the MII address of the PHY device +# CONFIG_EZ80_PKTBUFSIZE, CONFIG_EZ80_NTXPKTBUFS, and CONFIG_EZ80_NRXPKTBUFS - +# The size of one packet buffer and the number of Rx and Tx packet +# buffers. This must add up to exactly 8192 bytes. +# CONFIG_EZ80_MDCDIV=1 - The value to use for the divider to derive +# the MII MDC clock from SLCK. Options are 1->4; 2->6; 3->8; 4->10; +# 5->14; 6->20; and 7->28 +# CONFIG_EZ80_TXPOLLTIMERMS - Specifies how often the EMAC controller +# should poll for a Tx packet (milliseconds) +# CONFIG_ARCH_MCFILTER - Enalbes multicast MAC address filtering (not +# fully implemented +CONFIG_EZ80_EMAC=n +CONFIG_EZ80_FIAD=0x1f +CONFIG_EZ80_PKTBUFSIZE=64 +CONFIG_EZ80_NTXPKTBUFS=64 +CONFIG_EZ80_NRXPKTBUFS=64 +CONFIG_EZ80_PKTBUFSIZE=64 +CONFIG_EZ80_MDCDIV=0 +CONFIG_EZ80_TXPOLLTIMERMS=10 +CONFIG_ARCH_MCFILTER=n + # # General build options # diff --git a/configs/ez80f910200zco/ostest/ostest.zdsproj b/configs/ez80f910200zco/ostest/ostest.zdsproj index 08247148bd..30cb49a54d 100755 --- a/configs/ez80f910200zco/ostest/ostest.zdsproj +++ b/configs/ez80f910200zco/ostest/ostest.zdsproj @@ -42,7 +42,7 @@ - + @@ -244,4 +244,4 @@ - + \ No newline at end of file