]> git.kernelconcepts.de Git - karo-tx-uboot.git/blobdiff - drivers/net/fec_mxc.c
Merge branch 'master' of git://git.denx.de/u-boot-net
[karo-tx-uboot.git] / drivers / net / fec_mxc.c
index 0d0f392d1ef5aa84ed184885308051e85f853b34..3e232c7cbc171362b5e2fa15b367f4cfc818530d 100644 (file)
 #include <asm/arch/imx-regs.h>
 #include <asm/io.h>
 #include <asm/errno.h>
+#include <linux/compiler.h>
 
 DECLARE_GLOBAL_DATA_PTR;
 
+/*
+ * Timeout the transfer after 5 mS. This is usually a bit more, since
+ * the code in the tightloops this timeout is used in adds some overhead.
+ */
+#define FEC_XFER_TIMEOUT       5000
+
 #ifndef CONFIG_MII
 #error "CONFIG_MII has to be defined!"
 #endif
 
+#ifndef CONFIG_FEC_XCV_TYPE
+#define CONFIG_FEC_XCV_TYPE MII100
+#endif
+
+/*
+ * The i.MX28 operates with packets in big endian. We need to swap them before
+ * sending and after receiving.
+ */
+#ifdef CONFIG_MX28
+#define CONFIG_FEC_MXC_SWAP_PACKET
+#endif
+
+#define RXDESC_PER_CACHELINE (ARCH_DMA_MINALIGN/sizeof(struct fec_bd))
+
+/* Check various alignment issues at compile time */
+#if ((ARCH_DMA_MINALIGN < 16) || (ARCH_DMA_MINALIGN % 16 != 0))
+#error "ARCH_DMA_MINALIGN must be multiple of 16!"
+#endif
+
+#if ((PKTALIGN < ARCH_DMA_MINALIGN) || \
+       (PKTALIGN % ARCH_DMA_MINALIGN != 0))
+#error "PKTALIGN must be multiple of ARCH_DMA_MINALIGN!"
+#endif
+
 #undef DEBUG
 
 struct nbuf {
@@ -47,47 +78,43 @@ struct nbuf {
        uint8_t head[16];       /**< MAC header(6 + 6 + 2) + 2(aligned) */
 };
 
-struct fec_priv gfec = {
-       .eth       = (struct ethernet_regs *)IMX_FEC_BASE,
-       .xcv_type  = MII100,
-       .rbd_base  = NULL,
-       .rbd_index = 0,
-       .tbd_base  = NULL,
-       .tbd_index = 0,
-       .bd        = NULL,
-       .rdb_ptr   = NULL,
-       .base_ptr  = NULL,
-};
+#ifdef CONFIG_FEC_MXC_SWAP_PACKET
+static void swap_packet(uint32_t *packet, int length)
+{
+       int i;
+
+       for (i = 0; i < DIV_ROUND_UP(length, 4); i++)
+               packet[i] = __swab32(packet[i]);
+}
+#endif
 
 /*
  * MII-interface related functions
  */
-static int fec_miiphy_read(const char *dev, uint8_t phyAddr, uint8_t regAddr,
-               uint16_t *retVal)
+static int fec_mdio_read(struct ethernet_regs *eth, uint8_t phyAddr,
+               uint8_t regAddr)
 {
-       struct eth_device *edev = eth_get_dev_by_name(dev);
-       struct fec_priv *fec = (struct fec_priv *)edev->priv;
-
        uint32_t reg;           /* convenient holder for the PHY register */
        uint32_t phy;           /* convenient holder for the PHY */
        uint32_t start;
+       int val;
 
        /*
         * reading from any PHY's register is done by properly
         * programming the FEC's MII data register.
         */
-       writel(FEC_IEVENT_MII, &fec->eth->ievent);
+       writel(FEC_IEVENT_MII, &eth->ievent);
        reg = regAddr << FEC_MII_DATA_RA_SHIFT;
        phy = phyAddr << FEC_MII_DATA_PA_SHIFT;
 
        writel(FEC_MII_DATA_ST | FEC_MII_DATA_OP_RD | FEC_MII_DATA_TA |
-                       phy | reg, &fec->eth->mii_data);
+                       phy | reg, &eth->mii_data);
 
        /*
         * wait for the related interrupt
         */
-       start = get_timer_masked();
-       while (!(readl(&fec->eth->ievent) & FEC_IEVENT_MII)) {
+       start = get_timer(0);
+       while (!(readl(&eth->ievent) & FEC_IEVENT_MII)) {
                if (get_timer(start) > (CONFIG_SYS_HZ / 1000)) {
                        printf("Read MDIO failed...\n");
                        return -1;
@@ -97,15 +124,15 @@ static int fec_miiphy_read(const char *dev, uint8_t phyAddr, uint8_t regAddr,
        /*
         * clear mii interrupt bit
         */
-       writel(FEC_IEVENT_MII, &fec->eth->ievent);
+       writel(FEC_IEVENT_MII, &eth->ievent);
 
        /*
         * it's now safe to read the PHY's register
         */
-       *retVal = readl(&fec->eth->mii_data);
-       debug("fec_miiphy_read: phy: %02x reg:%02x val:%#x\n", phyAddr,
-                       regAddr, *retVal);
-       return 0;
+       val = (unsigned short)readl(&eth->mii_data);
+       debug("%s: phy: %02x reg:%02x val:%#x\n", __func__, phyAddr,
+                       regAddr, val);
+       return val;
 }
 
 static void fec_mii_setspeed(struct fec_priv *fec)
@@ -116,15 +143,12 @@ static void fec_mii_setspeed(struct fec_priv *fec)
         */
        writel((((imx_get_fecclk() / 1000000) + 2) / 5) << 1,
                        &fec->eth->mii_speed);
-       debug("fec_init: mii_speed %#lx\n",
-                       fec->eth->mii_speed);
+       debug("%s: mii_speed %08x\n", __func__, readl(&fec->eth->mii_speed));
 }
-static int fec_miiphy_write(const char *dev, uint8_t phyAddr, uint8_t regAddr,
-               uint16_t data)
-{
-       struct eth_device *edev = eth_get_dev_by_name(dev);
-       struct fec_priv *fec = (struct fec_priv *)edev->priv;
 
+static int fec_mdio_write(struct ethernet_regs *eth, uint8_t phyAddr,
+               uint8_t regAddr, uint16_t data)
+{
        uint32_t reg;           /* convenient holder for the PHY register */
        uint32_t phy;           /* convenient holder for the PHY */
        uint32_t start;
@@ -133,13 +157,13 @@ static int fec_miiphy_write(const char *dev, uint8_t phyAddr, uint8_t regAddr,
        phy = phyAddr << FEC_MII_DATA_PA_SHIFT;
 
        writel(FEC_MII_DATA_ST | FEC_MII_DATA_OP_WR |
-               FEC_MII_DATA_TA | phy | reg | data, &fec->eth->mii_data);
+               FEC_MII_DATA_TA | phy | reg | data, &eth->mii_data);
 
        /*
         * wait for the MII interrupt
         */
-       start = get_timer_masked();
-       while (!(readl(&fec->eth->ievent) & FEC_IEVENT_MII)) {
+       start = get_timer(0);
+       while (!(readl(&eth->ievent) & FEC_IEVENT_MII)) {
                if (get_timer(start) > (CONFIG_SYS_HZ / 1000)) {
                        printf("Write MDIO failed...\n");
                        return -1;
@@ -149,66 +173,90 @@ static int fec_miiphy_write(const char *dev, uint8_t phyAddr, uint8_t regAddr,
        /*
         * clear MII interrupt bit
         */
-       writel(FEC_IEVENT_MII, &fec->eth->ievent);
-       debug("fec_miiphy_write: phy: %02x reg:%02x val:%#x\n", phyAddr,
+       writel(FEC_IEVENT_MII, &eth->ievent);
+       debug("%s: phy: %02x reg:%02x val:%#x\n", __func__, phyAddr,
                        regAddr, data);
 
        return 0;
 }
 
+int fec_phy_read(struct mii_dev *bus, int phyAddr, int dev_addr, int regAddr)
+{
+       return fec_mdio_read(bus->priv, phyAddr, regAddr);
+}
+
+int fec_phy_write(struct mii_dev *bus, int phyAddr, int dev_addr, int regAddr,
+               u16 data)
+{
+       return fec_mdio_write(bus->priv, phyAddr, regAddr, data);
+}
+
+#ifndef CONFIG_PHYLIB
 static int miiphy_restart_aneg(struct eth_device *dev)
 {
+       int ret = 0;
+#if !defined(CONFIG_FEC_MXC_NO_ANEG)
+       struct fec_priv *fec = (struct fec_priv *)dev->priv;
+       struct ethernet_regs *eth = fec->bus->priv;
+
        /*
         * Wake up from sleep if necessary
         * Reset PHY, then delay 300ns
         */
 #ifdef CONFIG_MX27
-       miiphy_write(dev->name, CONFIG_FEC_MXC_PHYADDR, PHY_MIPGSR, 0x00FF);
+       fec_mdio_write(eth, fec->phy_id, MII_DCOUNTER, 0x00FF);
 #endif
-       miiphy_write(dev->name, CONFIG_FEC_MXC_PHYADDR, PHY_BMCR,
-                       PHY_BMCR_RESET);
+       fec_mdio_write(eth, fec->phy_id, MII_BMCR, BMCR_RESET);
        udelay(1000);
 
        /*
         * Set the auto-negotiation advertisement register bits
         */
-       miiphy_write(dev->name, CONFIG_FEC_MXC_PHYADDR, PHY_ANAR,
-                       PHY_ANLPAR_TXFD | PHY_ANLPAR_TX | PHY_ANLPAR_10FD |
-                       PHY_ANLPAR_10 | PHY_ANLPAR_PSB_802_3);
-       miiphy_write(dev->name, CONFIG_FEC_MXC_PHYADDR, PHY_BMCR,
-                       PHY_BMCR_AUTON | PHY_BMCR_RST_NEG);
+       fec_mdio_write(eth, fec->phy_id, MII_ADVERTISE,
+                       LPA_100FULL | LPA_100HALF | LPA_10FULL |
+                       LPA_10HALF | PHY_ANLPAR_PSB_802_3);
+       fec_mdio_write(eth, fec->phy_id, MII_BMCR,
+                       BMCR_ANENABLE | BMCR_ANRESTART);
 
-       return 0;
+       if (fec->mii_postcall)
+               ret = fec->mii_postcall(fec->phy_id);
+
+#endif
+       return ret;
 }
 
 static int miiphy_wait_aneg(struct eth_device *dev)
 {
        uint32_t start;
-       uint16_t status;
+       int status;
+       struct fec_priv *fec = (struct fec_priv *)dev->priv;
+       struct ethernet_regs *eth = fec->bus->priv;
 
        /*
         * Wait for AN completion
         */
-       start = get_timer_masked();
+       start = get_timer(0);
        do {
                if (get_timer(start) > (CONFIG_SYS_HZ * 5)) {
                        printf("%s: Autonegotiation timeout\n", dev->name);
                        return -1;
                }
 
-               if (miiphy_read(dev->name, CONFIG_FEC_MXC_PHYADDR,
-                                       PHY_BMSR, &status)) {
-                       printf("%s: Autonegotiation failed. status: 0x%04x\n",
+               status = fec_mdio_read(eth, fec->phy_id, MII_BMSR);
+               if (status < 0) {
+                       printf("%s: Autonegotiation failed. status: %d\n",
                                        dev->name, status);
                        return -1;
                }
-       } while (!(status & PHY_BMSR_LS));
+       } while (!(status & BMSR_LSTATUS));
 
        return 0;
 }
+#endif
+
 static int fec_rx_task_enable(struct fec_priv *fec)
 {
-       writel(1 << 24, &fec->eth->r_des_active);
+       writel(FEC_R_DES_ACTIVE_RDAR, &fec->eth->r_des_active);
        return 0;
 }
 
@@ -219,7 +267,7 @@ static int fec_rx_task_disable(struct fec_priv *fec)
 
 static int fec_tx_task_enable(struct fec_priv *fec)
 {
-       writel(1 << 24, &fec->eth->x_des_active);
+       writel(FEC_X_DES_ACTIVE_TDAR, &fec->eth->x_des_active);
        return 0;
 }
 
@@ -232,43 +280,52 @@ static int fec_tx_task_disable(struct fec_priv *fec)
  * Initialize receive task's buffer descriptors
  * @param[in] fec all we know about the device yet
  * @param[in] count receive buffer count to be allocated
- * @param[in] size size of each receive buffer
+ * @param[in] dsize desired size of each receive buffer
  * @return 0 on success
  *
  * For this task we need additional memory for the data buffers. And each
  * data buffer requires some alignment. Thy must be aligned to a specific
- * boundary each (DB_DATA_ALIGNMENT).
+ * boundary each.
  */
-static int fec_rbd_init(struct fec_priv *fec, int count, int size)
+static int fec_rbd_init(struct fec_priv *fec, int count, int dsize)
 {
-       int ix;
-       uint32_t p = 0;
-
-       /* reserve data memory and consider alignment */
-       if (fec->rdb_ptr == NULL)
-               fec->rdb_ptr = malloc(size * count + DB_DATA_ALIGNMENT);
-       p = (uint32_t)fec->rdb_ptr;
-       if (!p) {
-               puts("fec_mxc: not enough malloc memory\n");
-               return -ENOMEM;
-       }
-       memset((void *)p, 0, size * count + DB_DATA_ALIGNMENT);
-       p += DB_DATA_ALIGNMENT-1;
-       p &= ~(DB_DATA_ALIGNMENT-1);
-
-       for (ix = 0; ix < count; ix++) {
-               writel(p, &fec->rbd_base[ix].data_pointer);
-               p += size;
-               writew(FEC_RBD_EMPTY, &fec->rbd_base[ix].status);
-               writew(0, &fec->rbd_base[ix].data_length);
-       }
+       uint32_t size;
+       int i;
+
        /*
-        * mark the last RBD to close the ring
+        * Allocate memory for the buffers. This allocation respects the
+        * alignment
         */
-       writew(FEC_RBD_WRAP | FEC_RBD_EMPTY, &fec->rbd_base[ix - 1].status);
+       size = roundup(dsize, ARCH_DMA_MINALIGN);
+       for (i = 0; i < count; i++) {
+               uint32_t data_ptr = readl(&fec->rbd_base[i].data_pointer);
+               if (data_ptr == 0) {
+                       uint8_t *data = memalign(ARCH_DMA_MINALIGN,
+                                                size);
+                       if (!data) {
+                               printf("%s: error allocating rxbuf %d\n",
+                                      __func__, i);
+                               goto err;
+                       }
+                       writel((uint32_t)data, &fec->rbd_base[i].data_pointer);
+               } /* needs allocation */
+               writew(FEC_RBD_EMPTY, &fec->rbd_base[i].status);
+               writew(0, &fec->rbd_base[i].data_length);
+       }
+
+       /* Mark the last RBD to close the ring. */
+       writew(FEC_RBD_WRAP | FEC_RBD_EMPTY, &fec->rbd_base[i - 1].status);
        fec->rbd_index = 0;
 
        return 0;
+
+err:
+       for (; i >= 0; i--) {
+               uint32_t data_ptr = readl(&fec->rbd_base[i].data_pointer);
+               free((void *)data_ptr);
+       }
+
+       return -ENOMEM;
 }
 
 /**
@@ -285,9 +342,13 @@ static int fec_rbd_init(struct fec_priv *fec, int count, int size)
  */
 static void fec_tbd_init(struct fec_priv *fec)
 {
+       unsigned addr = (unsigned)fec->tbd_base;
+       unsigned size = roundup(2 * sizeof(struct fec_bd),
+                               ARCH_DMA_MINALIGN);
        writew(0x0000, &fec->tbd_base[0].status);
        writew(FEC_TBD_WRAP, &fec->tbd_base[1].status);
        fec->tbd_index = 0;
+       flush_dcache_range(addr, addr+size);
 }
 
 /**
@@ -297,22 +358,17 @@ static void fec_tbd_init(struct fec_priv *fec)
  */
 static void fec_rbd_clean(int last, struct fec_bd *pRbd)
 {
-       /*
-        * Reset buffer descriptor as empty
-        */
+       unsigned short flags = FEC_RBD_EMPTY;
        if (last)
-               writew(FEC_RBD_WRAP | FEC_RBD_EMPTY, &pRbd->status);
-       else
-               writew(FEC_RBD_EMPTY, &pRbd->status);
-       /*
-        * no data in it
-        */
+               flags |= FEC_RBD_WRAP;
+       writew(flags, &pRbd->status);
        writew(0, &pRbd->data_length);
 }
 
-static int fec_get_hwaddr(struct eth_device *dev, unsigned char *mac)
+static int fec_get_hwaddr(struct eth_device *dev, int dev_id,
+                                               unsigned char *mac)
 {
-       imx_get_mac_from_fuse(mac);
+       imx_get_mac_from_fuse(dev_id, mac);
        return !is_valid_ether_addr(mac);
 }
 
@@ -336,6 +392,55 @@ static int fec_set_hwaddr(struct eth_device *dev)
        return 0;
 }
 
+static void fec_eth_phy_config(struct eth_device *dev)
+{
+#ifdef CONFIG_PHYLIB
+       struct fec_priv *fec = (struct fec_priv *)dev->priv;
+       struct phy_device *phydev;
+
+       phydev = phy_connect(fec->bus, fec->phy_id, dev,
+                       PHY_INTERFACE_MODE_RGMII);
+       if (phydev) {
+               fec->phydev = phydev;
+               phy_config(phydev);
+       }
+#endif
+}
+
+/*
+ * Do initial configuration of the FEC registers
+ */
+static void fec_reg_setup(struct fec_priv *fec)
+{
+       uint32_t rcntrl;
+
+       /*
+        * Set interrupt mask register
+        */
+       writel(0x00000000, &fec->eth->imask);
+
+       /*
+        * Clear FEC-Lite interrupt event register(IEVENT)
+        */
+       writel(0xffffffff, &fec->eth->ievent);
+
+
+       /*
+        * Set FEC-Lite receive control register(R_CNTRL):
+        */
+
+       /* Start with frame length = 1518, common for all modes. */
+       rcntrl = PKTSIZE << FEC_RCNTRL_MAX_FL_SHIFT;
+       if (fec->xcv_type != SEVENWIRE)         /* xMII modes */
+               rcntrl |= FEC_RCNTRL_FCE | FEC_RCNTRL_MII_MODE;
+       if (fec->xcv_type == RGMII)
+               rcntrl |= FEC_RCNTRL_RGMII;
+       else if (fec->xcv_type == RMII)
+               rcntrl |= FEC_RCNTRL_RMII;
+
+       writel(rcntrl, &fec->eth->r_cntrl);
+}
+
 /**
  * Start the FEC engine
  * @param[in] dev Our device to handle
@@ -343,18 +448,40 @@ static int fec_set_hwaddr(struct eth_device *dev)
 static int fec_open(struct eth_device *edev)
 {
        struct fec_priv *fec = (struct fec_priv *)edev->priv;
+       int speed;
+       uint32_t addr, size;
+       int i;
 
        debug("fec_open: fec_open(dev)\n");
        /* full-duplex, heartbeat disabled */
        writel(1 << 2, &fec->eth->x_cntrl);
        fec->rbd_index = 0;
 
+       /* Invalidate all descriptors */
+       for (i = 0; i < FEC_RBD_NUM - 1; i++)
+               fec_rbd_clean(0, &fec->rbd_base[i]);
+       fec_rbd_clean(1, &fec->rbd_base[i]);
+
+       /* Flush the descriptors into RAM */
+       size = roundup(FEC_RBD_NUM * sizeof(struct fec_bd),
+                       ARCH_DMA_MINALIGN);
+       addr = (uint32_t)fec->rbd_base;
+       flush_dcache_range(addr, addr + size);
+
+#ifdef FEC_QUIRK_ENET_MAC
+       /* Enable ENET HW endian SWAP */
+       writel(readl(&fec->eth->ecntrl) | FEC_ECNTRL_DBSWAP,
+               &fec->eth->ecntrl);
+       /* Enable ENET store and forward mode */
+       writel(readl(&fec->eth->x_wmrk) | FEC_X_WMRK_STRFWD,
+               &fec->eth->x_wmrk);
+#endif
        /*
         * Enable FEC-Lite controller
         */
        writel(readl(&fec->eth->ecntrl) | FEC_ECNTRL_ETHER_EN,
                &fec->eth->ecntrl);
-#ifdef CONFIG_MX25
+#if defined(CONFIG_MX25) || defined(CONFIG_MX53)
        udelay(100);
        /*
         * setup the MII gasket for RMII mode
@@ -383,9 +510,43 @@ static int fec_open(struct eth_device *edev)
        }
 #endif
 
+#ifdef CONFIG_PHYLIB
+       if (!fec->phydev)
+               fec_eth_phy_config(edev);
+       if (fec->phydev) {
+               /* Start up the PHY */
+               int ret = phy_startup(fec->phydev);
+
+               if (ret) {
+                       printf("Could not initialize PHY %s\n",
+                              fec->phydev->dev->name);
+                       return ret;
+               }
+               speed = fec->phydev->speed;
+       } else {
+               speed = _100BASET;
+       }
+#else
        miiphy_wait_aneg(edev);
-       miiphy_speed(edev->name, CONFIG_FEC_MXC_PHYADDR);
-       miiphy_duplex(edev->name, CONFIG_FEC_MXC_PHYADDR);
+       speed = miiphy_speed(edev->name, fec->phy_id);
+       miiphy_duplex(edev->name, fec->phy_id);
+#endif
+
+#ifdef FEC_QUIRK_ENET_MAC
+       {
+               u32 ecr = readl(&fec->eth->ecntrl) & ~FEC_ECNTRL_SPEED;
+               u32 rcr = (readl(&fec->eth->r_cntrl) &
+                               ~(FEC_RCNTRL_RMII | FEC_RCNTRL_RMII_10T)) |
+                               FEC_RCNTRL_RGMII | FEC_RCNTRL_MII_MODE;
+               if (speed == _1000BASET)
+                       ecr |= FEC_ECNTRL_SPEED;
+               else if (speed != _100BASET)
+                       rcr |= FEC_RCNTRL_RMII_10T;
+               writel(ecr, &fec->eth->ecntrl);
+               writel(rcr, &fec->eth->r_cntrl);
+       }
+#endif
+       debug("%s:Speed=%i\n", __func__, speed);
 
        /*
         * Enable SmartDMA receive task
@@ -398,63 +559,60 @@ static int fec_open(struct eth_device *edev)
 
 static int fec_init(struct eth_device *dev, bd_t* bd)
 {
-       uint32_t base;
        struct fec_priv *fec = (struct fec_priv *)dev->priv;
+       uint32_t mib_ptr = (uint32_t)&fec->eth->rmon_t_drop;
+       uint32_t size;
+       int i, ret;
 
        /* Initialize MAC address */
        fec_set_hwaddr(dev);
 
        /*
-        * reserve memory for both buffer descriptor chains at once
-        * Datasheet forces the startaddress of each chain is 16 byte
-        * aligned
+        * Allocate transmit descriptors, there are two in total. This
+        * allocation respects cache alignment.
         */
-       if (fec->base_ptr == NULL)
-               fec->base_ptr = malloc((2 + FEC_RBD_NUM) *
-                               sizeof(struct fec_bd) + DB_ALIGNMENT);
-       base = (uint32_t)fec->base_ptr;
-       if (!base) {
-               puts("fec_mxc: not enough malloc memory\n");
-               return -ENOMEM;
+       if (!fec->tbd_base) {
+               size = roundup(2 * sizeof(struct fec_bd),
+                               ARCH_DMA_MINALIGN);
+               fec->tbd_base = memalign(ARCH_DMA_MINALIGN, size);
+               if (!fec->tbd_base) {
+                       ret = -ENOMEM;
+                       goto err1;
+               }
+               memset(fec->tbd_base, 0, size);
+               fec_tbd_init(fec);
+               flush_dcache_range((unsigned)fec->tbd_base, size);
        }
-       memset((void *)base, 0, (2 + FEC_RBD_NUM) *
-                       sizeof(struct fec_bd) + DB_ALIGNMENT);
-       base += (DB_ALIGNMENT-1);
-       base &= ~(DB_ALIGNMENT-1);
-
-       fec->rbd_base = (struct fec_bd *)base;
-
-       base += FEC_RBD_NUM * sizeof(struct fec_bd);
-
-       fec->tbd_base = (struct fec_bd *)base;
 
        /*
-        * Set interrupt mask register
+        * Allocate receive descriptors. This allocation respects cache
+        * alignment.
         */
-       writel(0x00000000, &fec->eth->imask);
-
-       /*
-        * Clear FEC-Lite interrupt event register(IEVENT)
-        */
-       writel(0xffffffff, &fec->eth->ievent);
-
-
-       /*
-        * Set FEC-Lite receive control register(R_CNTRL):
-        */
-       if (fec->xcv_type == SEVENWIRE) {
-               /*
-                * Frame length=1518; 7-wire mode
-                */
-               writel(0x05ee0020, &fec->eth->r_cntrl); /* FIXME 0x05ee0000 */
-       } else {
+       if (!fec->rbd_base) {
+               size = roundup(FEC_RBD_NUM * sizeof(struct fec_bd),
+                               ARCH_DMA_MINALIGN);
+               fec->rbd_base = memalign(ARCH_DMA_MINALIGN, size);
+               if (!fec->rbd_base) {
+                       ret = -ENOMEM;
+                       goto err2;
+               }
+               memset(fec->rbd_base, 0, size);
                /*
-                * Frame length=1518; MII mode;
+                * Initialize RxBD ring
                 */
-               writel(0x05ee0024, &fec->eth->r_cntrl); /* FIXME 0x05ee0004 */
+               if (fec_rbd_init(fec, FEC_RBD_NUM, FEC_MAX_PKT_SIZE) < 0) {
+                       ret = -ENOMEM;
+                       goto err3;
+               }
+               flush_dcache_range((unsigned)fec->rbd_base,
+                                  (unsigned)fec->rbd_base + size);
+       }
+
+       fec_reg_setup(fec);
 
+       if (fec->xcv_type != SEVENWIRE)
                fec_mii_setspeed(fec);
-       }
+
        /*
         * Set Opcode/Pause Duration Register
         */
@@ -468,9 +626,8 @@ static int fec_init(struct eth_device *dev, bd_t* bd)
 
 
        /* clear MIB RAM */
-       long *mib_ptr = (long *)(IMX_FEC_BASE + 0x200);
-       while (mib_ptr <= (long *)(IMX_FEC_BASE + 0x2FC))
-               *mib_ptr++ = 0;
+       for (i = mib_ptr; i <= mib_ptr + 0xfc; i += 4)
+               writel(0, i);
 
        /* FIFO receive start register */
        writel(0x520, &fec->eth->r_fstart);
@@ -480,22 +637,19 @@ static int fec_init(struct eth_device *dev, bd_t* bd)
        writel((uint32_t)fec->tbd_base, &fec->eth->etdsr);
        writel((uint32_t)fec->rbd_base, &fec->eth->erdsr);
 
-       /*
-        * Initialize RxBD/TxBD rings
-        */
-       if (fec_rbd_init(fec, FEC_RBD_NUM, FEC_MAX_PKT_SIZE) < 0) {
-               free(fec->base_ptr);
-               fec->base_ptr = NULL;
-               return -ENOMEM;
-       }
-       fec_tbd_init(fec);
-
-
+#ifndef CONFIG_PHYLIB
        if (fec->xcv_type != SEVENWIRE)
                miiphy_restart_aneg(dev);
-
+#endif
        fec_open(dev);
        return 0;
+
+err3:
+       free(fec->rbd_base);
+err2:
+       free(fec->tbd_base);
+err1:
+       return ret;
 }
 
 /**
@@ -504,7 +658,7 @@ static int fec_init(struct eth_device *dev, bd_t* bd)
  */
 static void fec_halt(struct eth_device *dev)
 {
-       struct fec_priv *fec = &gfec;
+       struct fec_priv *fec = (struct fec_priv *)dev->priv;
        int counter = 0xffff;
 
        /*
@@ -544,9 +698,13 @@ static void fec_halt(struct eth_device *dev)
  * @param[in] length Data count in bytes
  * @return 0 on success
  */
-static int fec_send(struct eth_device *dev, volatile void* packet, int length)
+static int fec_send(struct eth_device *dev, void *packet, int length)
 {
        unsigned int status;
+       uint32_t size, end;
+       uint32_t addr;
+       int timeout = FEC_XFER_TIMEOUT;
+       int ret = 0;
 
        /*
         * This routine transmits one frame.  This routine only accepts
@@ -563,12 +721,22 @@ static int fec_send(struct eth_device *dev, volatile void* packet, int length)
        }
 
        /*
-        * Setup the transmit buffer
-        * Note: We are always using the first buffer for transmission,
-        * the second will be empty and only used to stop the DMA engine
+        * Setup the transmit buffer. We are always using the first buffer for
+        * transmission, the second will be empty and only used to stop the DMA
+        * engine. We also flush the packet to RAM here to avoid cache trouble.
         */
+#ifdef CONFIG_FEC_MXC_SWAP_PACKET
+       swap_packet((uint32_t *)packet, length);
+#endif
+
+       addr = (uint32_t)packet;
+       end = roundup(addr + length, ARCH_DMA_MINALIGN);
+       addr &= ~(ARCH_DMA_MINALIGN - 1);
+       flush_dcache_range(addr, end);
+
        writew(length, &fec->tbd_base[fec->tbd_index].data_length);
-       writel((uint32_t)packet, &fec->tbd_base[fec->tbd_index].data_pointer);
+       writel(addr, &fec->tbd_base[fec->tbd_index].data_pointer);
+
        /*
         * update BD's status now
         * This block:
@@ -581,27 +749,47 @@ static int fec_send(struct eth_device *dev, volatile void* packet, int length)
        status |= FEC_TBD_LAST | FEC_TBD_TC | FEC_TBD_READY;
        writew(status, &fec->tbd_base[fec->tbd_index].status);
 
+       /*
+        * Flush data cache. This code flushes both TX descriptors to RAM.
+        * After this code, the descriptors will be safely in RAM and we
+        * can start DMA.
+        */
+       size = roundup(2 * sizeof(struct fec_bd), ARCH_DMA_MINALIGN);
+       addr = (uint32_t)fec->tbd_base;
+       flush_dcache_range(addr, addr + size);
+
        /*
         * Enable SmartDMA transmit task
         */
        fec_tx_task_enable(fec);
 
        /*
-        * wait until frame is sent .
+        * Wait until frame is sent. On each turn of the wait cycle, we must
+        * invalidate data cache to see what's really in RAM. Also, we need
+        * barrier here.
         */
-       while (readw(&fec->tbd_base[fec->tbd_index].status) & FEC_TBD_READY) {
-               udelay(1);
+       while (--timeout) {
+               if (!(readl(&fec->eth->x_des_active) & FEC_X_DES_ACTIVE_TDAR))
+                       break;
        }
-       debug("fec_send: status 0x%x index %d\n",
+
+       if (!timeout)
+               ret = -EINVAL;
+
+       invalidate_dcache_range(addr, addr + size);
+       if (readw(&fec->tbd_base[fec->tbd_index].status) & FEC_TBD_READY)
+               ret = -EINVAL;
+
+       debug("fec_send: status 0x%x index %d ret %i\n",
                        readw(&fec->tbd_base[fec->tbd_index].status),
-                       fec->tbd_index);
+                       fec->tbd_index, ret);
        /* for next transmission use the other buffer */
        if (fec->tbd_index)
                fec->tbd_index = 0;
        else
                fec->tbd_index = 1;
 
-       return 0;
+       return ret;
 }
 
 /**
@@ -617,14 +805,16 @@ static int fec_recv(struct eth_device *dev)
        int frame_length, len = 0;
        struct nbuf *frame;
        uint16_t bd_status;
-       uchar buff[FEC_MAX_PKT_SIZE];
+       uint32_t addr, size, end;
+       int i;
+       uchar buff[FEC_MAX_PKT_SIZE] __aligned(ARCH_DMA_MINALIGN);
 
        /*
         * Check if any critical events have happened
         */
        ievent = readl(&fec->eth->ievent);
        writel(ievent, &fec->eth->ievent);
-       debug("fec_recv: ievent 0x%x\n", ievent);
+       debug("fec_recv: ievent 0x%lx\n", ievent);
        if (ievent & FEC_IEVENT_BABR) {
                fec_halt(dev);
                fec_init(dev, fec->bd);
@@ -647,8 +837,23 @@ static int fec_recv(struct eth_device *dev)
        }
 
        /*
-        * ensure reading the right buffer status
+        * Read the buffer status. Before the status can be read, the data cache
+        * must be invalidated, because the data in RAM might have been changed
+        * by DMA. The descriptors are properly aligned to cachelines so there's
+        * no need to worry they'd overlap.
+        *
+        * WARNING: By invalidating the descriptor here, we also invalidate
+        * the descriptors surrounding this one. Therefore we can NOT change the
+        * contents of this descriptor nor the surrounding ones. The problem is
+        * that in order to mark the descriptor as processed, we need to change
+        * the descriptor. The solution is to mark the whole cache line when all
+        * descriptors in the cache line are processed.
         */
+       addr = (uint32_t)rbd;
+       addr &= ~(ARCH_DMA_MINALIGN - 1);
+       size = roundup(sizeof(struct fec_bd), ARCH_DMA_MINALIGN);
+       invalidate_dcache_range(addr, addr + size);
+
        bd_status = readw(&rbd->status);
        debug("fec_recv: status 0x%x\n", bd_status);
 
@@ -660,9 +865,20 @@ static int fec_recv(struct eth_device *dev)
                         */
                        frame = (struct nbuf *)readl(&rbd->data_pointer);
                        frame_length = readw(&rbd->data_length) - 4;
+                       /*
+                        * Invalidate data cache over the buffer
+                        */
+                       addr = (uint32_t)frame;
+                       end = roundup(addr + frame_length, ARCH_DMA_MINALIGN);
+                       addr &= ~(ARCH_DMA_MINALIGN - 1);
+                       invalidate_dcache_range(addr, end);
+
                        /*
                         *  Fill the buffer and pass it to upper layers
                         */
+#ifdef CONFIG_FEC_MXC_SWAP_PACKET
+                       swap_packet((uint32_t *)frame->data, frame_length);
+#endif
                        memcpy(buff, frame->data, frame_length);
                        NetReceive(buff, frame_length);
                        len = frame_length;
@@ -672,11 +888,25 @@ static int fec_recv(struct eth_device *dev)
                                                (ulong)rbd->data_pointer,
                                                bd_status);
                }
+
                /*
-                * free the current buffer, restart the engine
-                * and move forward to the next buffer
+                * Free the current buffer, restart the engine and move forward
+                * to the next buffer. Here we check if the whole cacheline of
+                * descriptors was already processed and if so, we mark it free
+                * as whole.
                 */
-               fec_rbd_clean(fec->rbd_index == (FEC_RBD_NUM - 1) ? 1 : 0, rbd);
+               size = RXDESC_PER_CACHELINE - 1;
+               if ((fec->rbd_index & size) == size) {
+                       i = fec->rbd_index - size;
+                       addr = (uint32_t)&fec->rbd_base[i];
+                       for (; i <= fec->rbd_index ; i++) {
+                               fec_rbd_clean(i == (FEC_RBD_NUM - 1),
+                                             &fec->rbd_base[i]);
+                       }
+                       flush_dcache_range(addr,
+                               addr + ARCH_DMA_MINALIGN);
+               }
+
                fec_rx_task_enable(fec);
                fec->rbd_index = (fec->rbd_index + 1) % FEC_RBD_NUM;
        }
@@ -685,19 +915,33 @@ static int fec_recv(struct eth_device *dev)
        return len;
 }
 
-static int fec_probe(bd_t *bd)
+static int fec_probe(bd_t *bd, int dev_id, int phy_id, uint32_t base_addr)
 {
        struct eth_device *edev;
-       struct fec_priv *fec = &gfec;
+       struct fec_priv *fec;
+       struct mii_dev *bus;
        unsigned char ethaddr[6];
+       uint32_t start;
+       int ret = 0;
 
        /* create and fill edev struct */
        edev = (struct eth_device *)malloc(sizeof(struct eth_device));
        if (!edev) {
-               puts("fec_mxc: not enough malloc memory\n");
-               return -ENOMEM;
+               puts("fec_mxc: not enough malloc memory for eth_device\n");
+               ret = -ENOMEM;
+               goto err1;
+       }
+
+       fec = (struct fec_priv *)malloc(sizeof(struct fec_priv));
+       if (!fec) {
+               puts("fec_mxc: not enough malloc memory for fec_priv\n");
+               ret = -ENOMEM;
+               goto err2;
        }
+
        memset(edev, 0, sizeof(*edev));
+       memset(fec, 0, sizeof(*fec));
+
        edev->priv = fec;
        edev->init = fec_init;
        edev->send = fec_send;
@@ -705,55 +949,105 @@ static int fec_probe(bd_t *bd)
        edev->halt = fec_halt;
        edev->write_hwaddr = fec_set_hwaddr;
 
-       fec->eth = (struct ethernet_regs *)IMX_FEC_BASE;
+       fec->eth = (struct ethernet_regs *)base_addr;
        fec->bd = bd;
 
-       fec->xcv_type = MII100;
+       fec->xcv_type = CONFIG_FEC_XCV_TYPE;
 
        /* Reset chip. */
        writel(readl(&fec->eth->ecntrl) | FEC_ECNTRL_RESET, &fec->eth->ecntrl);
-       while (readl(&fec->eth->ecntrl) & 1)
+       start = get_timer(0);
+       while (readl(&fec->eth->ecntrl) & FEC_ECNTRL_RESET) {
+               if (get_timer(start) > (CONFIG_SYS_HZ * 5)) {
+                       printf("FEC MXC: Timeout reseting chip\n");
+                       goto err3;
+               }
                udelay(10);
+       }
 
-       /*
-        * Set interrupt mask register
-        */
-       writel(0x00000000, &fec->eth->imask);
+       fec_reg_setup(fec);
+       fec_mii_setspeed(fec);
 
-       /*
-        * Clear FEC-Lite interrupt event register(IEVENT)
-        */
-       writel(0xffffffff, &fec->eth->ievent);
+       if (dev_id == -1) {
+               sprintf(edev->name, "FEC");
+               fec->dev_id = 0;
+       } else {
+               sprintf(edev->name, "FEC%i", dev_id);
+               fec->dev_id = dev_id;
+       }
+       fec->phy_id = phy_id;
 
+       bus = mdio_alloc();
+       if (!bus) {
+               printf("mdio_alloc failed\n");
+               ret = -ENOMEM;
+               goto err3;
+       }
+       bus->read = fec_phy_read;
+       bus->write = fec_phy_write;
+       sprintf(bus->name, edev->name);
+#ifdef CONFIG_MX28
        /*
-        * Set FEC-Lite receive control register(R_CNTRL):
-        */
-       /*
-        * Frame length=1518; MII mode;
+        * The i.MX28 has two ethernet interfaces, but they are not equal.
+        * Only the first one can access the MDIO bus.
         */
-       writel(0x05ee0024, &fec->eth->r_cntrl); /* FIXME 0x05ee0004 */
-       fec_mii_setspeed(fec);
-
-       sprintf(edev->name, "FEC");
-
-       miiphy_register(edev->name, fec_miiphy_read, fec_miiphy_write);
-
+       bus->priv = (struct ethernet_regs *)MXS_ENET0_BASE;
+#else
+       bus->priv = fec->eth;
+#endif
+       ret = mdio_register(bus);
+       if (ret) {
+               printf("mdio_register failed\n");
+               free(bus);
+               ret = -ENOMEM;
+               goto err3;
+       }
+       fec->bus = bus;
        eth_register(edev);
 
-       if (fec_get_hwaddr(edev, ethaddr) == 0) {
-               printf("got MAC address from fuse: %pM\n", ethaddr);
+       if (fec_get_hwaddr(edev, dev_id, ethaddr) == 0) {
+               debug("got MAC%d address from fuse: %pM\n", dev_id, ethaddr);
                memcpy(edev->enetaddr, ethaddr, 6);
        }
-
-       return 0;
+       /* Configure phy */
+       fec_eth_phy_config(edev);
+       return ret;
+
+err3:
+       free(fec);
+err2:
+       free(edev);
+err1:
+       return ret;
 }
 
+#ifndef CONFIG_FEC_MXC_MULTI
 int fecmxc_initialize(bd_t *bd)
 {
        int lout = 1;
 
        debug("eth_init: fec_probe(bd)\n");
-       lout = fec_probe(bd);
+       lout = fec_probe(bd, -1, CONFIG_FEC_MXC_PHYADDR, IMX_FEC_BASE);
+
+       return lout;
+}
+#endif
+
+int fecmxc_initialize_multi(bd_t *bd, int dev_id, int phy_id, uint32_t addr)
+{
+       int lout = 1;
+
+       debug("eth_init: fec_probe(bd, %i, %i) @ %08x\n", dev_id, phy_id, addr);
+       lout = fec_probe(bd, dev_id, phy_id, addr);
 
        return lout;
 }
+
+#ifndef CONFIG_PHYLIB
+int fecmxc_register_mii_postcall(struct eth_device *dev, int (*cb)(int))
+{
+       struct fec_priv *fec = (struct fec_priv *)dev->priv;
+       fec->mii_postcall = cb;
+       return 0;
+}
+#endif