Add qemu 2.4.0
[kvmfornfv.git] / qemu / roms / u-boot / drivers / net / lan91c96.c
diff --git a/qemu/roms/u-boot/drivers/net/lan91c96.c b/qemu/roms/u-boot/drivers/net/lan91c96.c
new file mode 100644 (file)
index 0000000..229658a
--- /dev/null
@@ -0,0 +1,804 @@
+/*------------------------------------------------------------------------
+ * lan91c96.c
+ * This is a driver for SMSC's LAN91C96 single-chip Ethernet device, based
+ * on the SMC91111 driver from U-boot.
+ *
+ * (C) Copyright 2002
+ * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
+ * Rolf Offermanns <rof@sysgo.de>
+ *
+ * Copyright (C) 2001 Standard Microsystems Corporation (SMSC)
+ *       Developed by Simple Network Magic Corporation (SNMC)
+ * Copyright (C) 1996 by Erik Stahlman (ES)
+ *
+ * SPDX-License-Identifier:    GPL-2.0+
+ *
+ * Information contained in this file was obtained from the LAN91C96
+ * manual from SMC.  To get a copy, if you really want one, you can find
+ * information under www.smsc.com.
+ *
+ * "Features" of the SMC chip:
+ *   6144 byte packet memory. ( for the 91C96 )
+ *   EEPROM for configuration
+ *   AUI/TP selection  ( mine has 10Base2/10BaseT select )
+ *
+ * Arguments:
+ *     io      = for the base address
+ *     irq     = for the IRQ
+ *
+ * author:
+ *     Erik Stahlman                           ( erik@vt.edu )
+ *     Daris A Nevil                           ( dnevil@snmc.com )
+ *
+ *
+ * Hardware multicast code from Peter Cammaert ( pc@denkart.be )
+ *
+ * Sources:
+ *    o   SMSC LAN91C96 databook (www.smsc.com)
+ *    o   smc91111.c (u-boot driver)
+ *    o   smc9194.c (linux kernel driver)
+ *    o   lan91c96.c (Intel Diagnostic Manager driver)
+ *
+ * History:
+ *     04/30/03  Mathijs Haarman       Modified smc91111.c (u-boot version)
+ *                                     for lan91c96
+ *---------------------------------------------------------------------------
+ */
+
+#include <common.h>
+#include <command.h>
+#include <malloc.h>
+#include "lan91c96.h"
+#include <net.h>
+#include <linux/compiler.h>
+
+/*------------------------------------------------------------------------
+ *
+ * Configuration options, for the experienced user to change.
+ *
+ -------------------------------------------------------------------------*/
+
+/* Use power-down feature of the chip */
+#define POWER_DOWN     0
+
+/*
+ * Wait time for memory to be free.  This probably shouldn't be
+ * tuned that much, as waiting for this means nothing else happens
+ * in the system
+*/
+#define MEMORY_WAIT_TIME 16
+
+#define SMC_DEBUG 0
+
+#if (SMC_DEBUG > 2 )
+#define PRINTK3(args...) printf(args)
+#else
+#define PRINTK3(args...)
+#endif
+
+#if SMC_DEBUG > 1
+#define PRINTK2(args...) printf(args)
+#else
+#define PRINTK2(args...)
+#endif
+
+#ifdef SMC_DEBUG
+#define PRINTK(args...) printf(args)
+#else
+#define PRINTK(args...)
+#endif
+
+
+/*------------------------------------------------------------------------
+ *
+ * The internal workings of the driver.  If you are changing anything
+ * here with the SMC stuff, you should have the datasheet and know
+ * what you are doing.
+ *
+ *------------------------------------------------------------------------
+ */
+#define DRIVER_NAME "LAN91C96"
+#define SMC_ALLOC_MAX_TRY 5
+#define SMC_TX_TIMEOUT 30
+
+#define ETH_ZLEN 60
+
+#ifdef  CONFIG_LAN91C96_USE_32_BIT
+#define USE_32_BIT  1
+#else
+#undef USE_32_BIT
+#endif
+
+/* See if a MAC address is defined in the current environment. If so use it. If not
+ . print a warning and set the environment and other globals with the default.
+ . If an EEPROM is present it really should be consulted.
+*/
+static int smc_get_ethaddr(bd_t *bd, struct eth_device *dev);
+static int get_rom_mac(struct eth_device *dev, unsigned char *v_rom_mac);
+
+/* ------------------------------------------------------------
+ * Internal routines
+ * ------------------------------------------------------------
+ */
+
+static unsigned char smc_mac_addr[] = { 0xc0, 0x00, 0x00, 0x1b, 0x62, 0x9c };
+
+/*
+ * This function must be called before smc_open() if you want to override
+ * the default mac address.
+ */
+
+static void smc_set_mac_addr(const unsigned char *addr)
+{
+       int i;
+
+       for (i = 0; i < sizeof (smc_mac_addr); i++) {
+               smc_mac_addr[i] = addr[i];
+       }
+}
+
+/***********************************************
+ * Show available memory                       *
+ ***********************************************/
+void dump_memory_info(struct eth_device *dev)
+{
+       __maybe_unused word mem_info;
+       word old_bank;
+
+       old_bank = SMC_inw(dev, LAN91C96_BANK_SELECT) & 0xF;
+
+       SMC_SELECT_BANK(dev, 0);
+       mem_info = SMC_inw(dev, LAN91C96_MIR);
+       PRINTK2 ("Memory: %4d available\n", (mem_info >> 8) * 2048);
+
+       SMC_SELECT_BANK(dev, old_bank);
+}
+
+/*
+ * A rather simple routine to print out a packet for debugging purposes.
+ */
+#if SMC_DEBUG > 2
+static void print_packet (byte *, int);
+#endif
+
+static int poll4int (struct eth_device *dev, byte mask, int timeout)
+{
+       int tmo = get_timer (0) + timeout * CONFIG_SYS_HZ;
+       int is_timeout = 0;
+       word old_bank = SMC_inw(dev, LAN91C96_BANK_SELECT);
+
+       PRINTK2 ("Polling...\n");
+       SMC_SELECT_BANK(dev, 2);
+       while ((SMC_inw(dev, LAN91C96_INT_STATS) & mask) == 0) {
+               if (get_timer (0) >= tmo) {
+                       is_timeout = 1;
+                       break;
+               }
+       }
+
+       /* restore old bank selection */
+       SMC_SELECT_BANK(dev, old_bank);
+
+       if (is_timeout)
+               return 1;
+       else
+               return 0;
+}
+
+/*
+ * Function: smc_reset
+ * Purpose:
+ *     This sets the SMC91111 chip to its normal state, hopefully from whatever
+ *     mess that any other DOS driver has put it in.
+ *
+ * Maybe I should reset more registers to defaults in here?  SOFTRST  should
+ * do that for me.
+ *
+ * Method:
+ *     1.  send a SOFT RESET
+ *     2.  wait for it to finish
+ *     3.  enable autorelease mode
+ *     4.  reset the memory management unit
+ *     5.  clear all interrupts
+ *
+*/
+static void smc_reset(struct eth_device *dev)
+{
+       PRINTK2("%s:smc_reset\n", dev->name);
+
+       /* This resets the registers mostly to defaults, but doesn't
+          affect EEPROM.  That seems unnecessary */
+       SMC_SELECT_BANK(dev, 0);
+       SMC_outw(dev, LAN91C96_RCR_SOFT_RST, LAN91C96_RCR);
+
+       udelay (10);
+
+       /* Disable transmit and receive functionality */
+       SMC_outw(dev, 0, LAN91C96_RCR);
+       SMC_outw(dev, 0, LAN91C96_TCR);
+
+       /* set the control register */
+       SMC_SELECT_BANK(dev, 1);
+       SMC_outw(dev, SMC_inw(dev, LAN91C96_CONTROL) | LAN91C96_CTR_BIT_8,
+                         LAN91C96_CONTROL);
+
+       /* Disable all interrupts */
+       SMC_outb(dev, 0, LAN91C96_INT_MASK);
+}
+
+/*
+ * Function: smc_enable
+ * Purpose: let the chip talk to the outside work
+ * Method:
+ *     1.  Initialize the Memory Configuration Register
+ *     2.  Enable the transmitter
+ *     3.  Enable the receiver
+*/
+static void smc_enable(struct eth_device *dev)
+{
+       PRINTK2("%s:smc_enable\n", dev->name);
+       SMC_SELECT_BANK(dev, 0);
+
+       /* Initialize the Memory Configuration Register. See page
+          49 of the LAN91C96 data sheet for details. */
+       SMC_outw(dev, LAN91C96_MCR_TRANSMIT_PAGES, LAN91C96_MCR);
+
+       /* Initialize the Transmit Control Register */
+       SMC_outw(dev, LAN91C96_TCR_TXENA, LAN91C96_TCR);
+       /* Initialize the Receive Control Register
+        * FIXME:
+        * The promiscuous bit set because I could not receive ARP reply
+        * packets from the server when I send a ARP request. It only works
+        * when I set the promiscuous bit
+        */
+       SMC_outw(dev, LAN91C96_RCR_RXEN | LAN91C96_RCR_PRMS, LAN91C96_RCR);
+}
+
+/*
+ * Function: smc_shutdown
+ * Purpose:  closes down the SMC91xxx chip.
+ * Method:
+ *     1. zero the interrupt mask
+ *     2. clear the enable receive flag
+ *     3. clear the enable xmit flags
+ *
+ * TODO:
+ *   (1) maybe utilize power down mode.
+ *     Why not yet?  Because while the chip will go into power down mode,
+ *     the manual says that it will wake up in response to any I/O requests
+ *     in the register space.   Empirical results do not show this working.
+ */
+static void smc_shutdown(struct eth_device *dev)
+{
+       PRINTK2("%s:smc_shutdown\n", dev->name);
+
+       /* no more interrupts for me */
+       SMC_SELECT_BANK(dev, 2);
+       SMC_outb(dev, 0, LAN91C96_INT_MASK);
+
+       /* and tell the card to stay away from that nasty outside world */
+       SMC_SELECT_BANK(dev, 0);
+       SMC_outb(dev, 0, LAN91C96_RCR);
+       SMC_outb(dev, 0, LAN91C96_TCR);
+}
+
+
+/*
+ * Function:  smc_hardware_send_packet(struct net_device * )
+ * Purpose:
+ *     This sends the actual packet to the SMC9xxx chip.
+ *
+ * Algorithm:
+ *     First, see if a saved_skb is available.
+ *             ( this should NOT be called if there is no 'saved_skb'
+ *     Now, find the packet number that the chip allocated
+ *     Point the data pointers at it in memory
+ *     Set the length word in the chip's memory
+ *     Dump the packet to chip memory
+ *     Check if a last byte is needed ( odd length packet )
+ *             if so, set the control flag right
+ *     Tell the card to send it
+ *     Enable the transmit interrupt, so I know if it failed
+ *     Free the kernel data if I actually sent it.
+ */
+static int smc_send_packet(struct eth_device *dev, void *packet,
+               int packet_length)
+{
+       byte packet_no;
+       byte *buf;
+       int length;
+       int numPages;
+       int try = 0;
+       int time_out;
+       byte status;
+
+
+       PRINTK3("%s:smc_hardware_send_packet\n", dev->name);
+
+       length = ETH_ZLEN < packet_length ? packet_length : ETH_ZLEN;
+
+       /* allocate memory
+        ** The MMU wants the number of pages to be the number of 256 bytes
+        ** 'pages', minus 1 ( since a packet can't ever have 0 pages :) )
+        **
+        ** The 91C111 ignores the size bits, but the code is left intact
+        ** for backwards and future compatibility.
+        **
+        ** Pkt size for allocating is data length +6 (for additional status
+        ** words, length and ctl!)
+        **
+        ** If odd size then last byte is included in this header.
+        */
+       numPages = ((length & 0xfffe) + 6);
+       numPages >>= 8;                         /* Divide by 256 */
+
+       if (numPages > 7) {
+               printf("%s: Far too big packet error. \n", dev->name);
+               return 0;
+       }
+
+       /* now, try to allocate the memory */
+
+       SMC_SELECT_BANK(dev, 2);
+       SMC_outw(dev, LAN91C96_MMUCR_ALLOC_TX | numPages, LAN91C96_MMU);
+
+  again:
+       try++;
+       time_out = MEMORY_WAIT_TIME;
+       do {
+               status = SMC_inb(dev, LAN91C96_INT_STATS);
+               if (status & LAN91C96_IST_ALLOC_INT) {
+
+                       SMC_outb(dev, LAN91C96_IST_ALLOC_INT,
+                                       LAN91C96_INT_STATS);
+                       break;
+               }
+       } while (--time_out);
+
+       if (!time_out) {
+               PRINTK2 ("%s: memory allocation, try %d failed ...\n",
+                                dev->name, try);
+               if (try < SMC_ALLOC_MAX_TRY)
+                       goto again;
+               else
+                       return 0;
+       }
+
+       PRINTK2 ("%s: memory allocation, try %d succeeded ...\n",
+                        dev->name, try);
+
+       /* I can send the packet now.. */
+       buf = (byte *) packet;
+
+       /* If I get here, I _know_ there is a packet slot waiting for me */
+       packet_no = SMC_inb(dev, LAN91C96_ARR);
+       if (packet_no & LAN91C96_ARR_FAILED) {
+               /* or isn't there?  BAD CHIP! */
+               printf("%s: Memory allocation failed. \n", dev->name);
+               return 0;
+       }
+
+       /* we have a packet address, so tell the card to use it */
+       SMC_outb(dev, packet_no, LAN91C96_PNR);
+
+       /* point to the beginning of the packet */
+       SMC_outw(dev, LAN91C96_PTR_AUTO_INCR, LAN91C96_POINTER);
+
+       PRINTK3("%s: Trying to xmit packet of length %x\n",
+                        dev->name, length);
+
+#if SMC_DEBUG > 2
+       printf ("Transmitting Packet\n");
+       print_packet (buf, length);
+#endif
+
+       /* send the packet length ( +6 for status, length and ctl byte )
+          and the status word ( set to zeros ) */
+#ifdef USE_32_BIT
+       SMC_outl(dev, (length + 6) << 16, LAN91C96_DATA_HIGH);
+#else
+       SMC_outw(dev, 0, LAN91C96_DATA_HIGH);
+       /* send the packet length ( +6 for status words, length, and ctl */
+       SMC_outw(dev, (length + 6), LAN91C96_DATA_HIGH);
+#endif /* USE_32_BIT */
+
+       /* send the actual data
+        * I _think_ it's faster to send the longs first, and then
+        * mop up by sending the last word.  It depends heavily
+        * on alignment, at least on the 486.  Maybe it would be
+        * a good idea to check which is optimal?  But that could take
+        * almost as much time as is saved?
+        */
+#ifdef USE_32_BIT
+       SMC_outsl(dev, LAN91C96_DATA_HIGH, buf, length >> 2);
+       if (length & 0x2)
+               SMC_outw(dev, *((word *) (buf + (length & 0xFFFFFFFC))),
+                                 LAN91C96_DATA_HIGH);
+#else
+       SMC_outsw(dev, LAN91C96_DATA_HIGH, buf, (length) >> 1);
+#endif /* USE_32_BIT */
+
+       /* Send the last byte, if there is one.   */
+       if ((length & 1) == 0) {
+               SMC_outw(dev, 0, LAN91C96_DATA_HIGH);
+       } else {
+               SMC_outw(dev, buf[length - 1] | 0x2000, LAN91C96_DATA_HIGH);
+       }
+
+       /* and let the chipset deal with it */
+       SMC_outw(dev, LAN91C96_MMUCR_ENQUEUE, LAN91C96_MMU);
+
+       /* poll for TX INT */
+       if (poll4int (dev, LAN91C96_MSK_TX_INT, SMC_TX_TIMEOUT)) {
+               /* sending failed */
+               PRINTK2("%s: TX timeout, sending failed...\n", dev->name);
+
+               /* release packet */
+               SMC_outw(dev, LAN91C96_MMUCR_RELEASE_TX, LAN91C96_MMU);
+
+               /* wait for MMU getting ready (low) */
+               while (SMC_inw(dev, LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
+                       udelay (10);
+
+               PRINTK2("MMU ready\n");
+
+
+               return 0;
+       } else {
+               /* ack. int */
+               SMC_outw(dev, LAN91C96_IST_TX_INT, LAN91C96_INT_STATS);
+
+               PRINTK2("%s: Sent packet of length %d \n", dev->name, length);
+
+               /* release packet */
+               SMC_outw(dev, LAN91C96_MMUCR_RELEASE_TX, LAN91C96_MMU);
+
+               /* wait for MMU getting ready (low) */
+               while (SMC_inw(dev, LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
+                       udelay (10);
+
+               PRINTK2 ("MMU ready\n");
+       }
+
+       return length;
+}
+
+
+/*
+ * Open and Initialize the board
+ *
+ * Set up everything, reset the card, etc ..
+ *
+ */
+static int smc_open(bd_t *bd, struct eth_device *dev)
+{
+       int i, err;                     /* used to set hw ethernet address */
+
+       PRINTK2("%s:smc_open\n", dev->name);
+
+       /* reset the hardware */
+
+       smc_reset(dev);
+       smc_enable(dev);
+
+       SMC_SELECT_BANK(dev, 1);
+       /* set smc_mac_addr, and sync it with u-boot globals */
+       err = smc_get_ethaddr(bd, dev);
+       if (err < 0)
+               return -1;
+#ifdef USE_32_BIT
+       for (i = 0; i < 6; i += 2) {
+               word address;
+
+               address = smc_mac_addr[i + 1] << 8;
+               address |= smc_mac_addr[i];
+               SMC_outw(dev, address, LAN91C96_IA0 + i);
+       }
+#else
+       for (i = 0; i < 6; i++)
+               SMC_outb(dev, smc_mac_addr[i], LAN91C96_IA0 + i);
+#endif
+       return 0;
+}
+
+/*-------------------------------------------------------------
+ *
+ * smc_rcv -  receive a packet from the card
+ *
+ * There is ( at least ) a packet waiting to be read from
+ * chip-memory.
+ *
+ * o Read the status
+ * o If an error, record it
+ * o otherwise, read in the packet
+ *-------------------------------------------------------------
+ */
+static int smc_rcv(struct eth_device *dev)
+{
+       int packet_number;
+       word status;
+       word packet_length;
+       int is_error = 0;
+
+#ifdef USE_32_BIT
+       dword stat_len;
+#endif
+
+
+       SMC_SELECT_BANK(dev, 2);
+       packet_number = SMC_inw(dev, LAN91C96_FIFO);
+
+       if (packet_number & LAN91C96_FIFO_RXEMPTY) {
+               return 0;
+       }
+
+       PRINTK3("%s:smc_rcv\n", dev->name);
+       /*  start reading from the start of the packet */
+       SMC_outw(dev, LAN91C96_PTR_READ | LAN91C96_PTR_RCV |
+                         LAN91C96_PTR_AUTO_INCR, LAN91C96_POINTER);
+
+       /* First two words are status and packet_length */
+#ifdef USE_32_BIT
+       stat_len = SMC_inl(dev, LAN91C96_DATA_HIGH);
+       status = stat_len & 0xffff;
+       packet_length = stat_len >> 16;
+#else
+       status = SMC_inw(dev, LAN91C96_DATA_HIGH);
+       packet_length = SMC_inw(dev, LAN91C96_DATA_HIGH);
+#endif
+
+       packet_length &= 0x07ff;        /* mask off top bits */
+
+       PRINTK2 ("RCV: STATUS %4x LENGTH %4x\n", status, packet_length);
+
+       if (!(status & FRAME_FILTER)) {
+               /* Adjust for having already read the first two words */
+               packet_length -= 4;             /*4; */
+
+
+               /* set odd length for bug in LAN91C111, */
+               /* which never sets RS_ODDFRAME */
+               /* TODO ? */
+
+
+#ifdef USE_32_BIT
+               PRINTK3 (" Reading %d dwords (and %d bytes) \n",
+                        packet_length >> 2, packet_length & 3);
+               /* QUESTION:  Like in the TX routine, do I want
+                  to send the DWORDs or the bytes first, or some
+                  mixture.  A mixture might improve already slow PIO
+                  performance  */
+               SMC_insl(dev, LAN91C96_DATA_HIGH, NetRxPackets[0],
+                               packet_length >> 2);
+               /* read the left over bytes */
+               if (packet_length & 3) {
+                       int i;
+
+                       byte *tail = (byte *) (NetRxPackets[0] + (packet_length & ~3));
+                       dword leftover = SMC_inl(dev, LAN91C96_DATA_HIGH);
+
+                       for (i = 0; i < (packet_length & 3); i++)
+                               *tail++ = (byte) (leftover >> (8 * i)) & 0xff;
+               }
+#else
+               PRINTK3 (" Reading %d words and %d byte(s) \n",
+                                (packet_length >> 1), packet_length & 1);
+               SMC_insw(dev, LAN91C96_DATA_HIGH, NetRxPackets[0],
+                               packet_length >> 1);
+
+#endif /* USE_32_BIT */
+
+#if    SMC_DEBUG > 2
+               printf ("Receiving Packet\n");
+               print_packet((byte *)NetRxPackets[0], packet_length);
+#endif
+       } else {
+               /* error ... */
+               /* TODO ? */
+               is_error = 1;
+       }
+
+       while (SMC_inw(dev, LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
+               udelay (1);             /* Wait until not busy */
+
+       /*  error or good, tell the card to get rid of this packet */
+       SMC_outw(dev, LAN91C96_MMUCR_RELEASE_RX, LAN91C96_MMU);
+
+       while (SMC_inw(dev, LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
+               udelay (1);             /* Wait until not busy */
+
+       if (!is_error) {
+               /* Pass the packet up to the protocol layers. */
+               NetReceive (NetRxPackets[0], packet_length);
+               return packet_length;
+       } else {
+               return 0;
+       }
+
+}
+
+/*----------------------------------------------------
+ * smc_close
+ *
+ * this makes the board clean up everything that it can
+ * and not talk to the outside world.   Caused by
+ * an 'ifconfig ethX down'
+ *
+ -----------------------------------------------------*/
+static int smc_close(struct eth_device *dev)
+{
+       PRINTK2("%s:smc_close\n", dev->name);
+
+       /* clear everything */
+       smc_shutdown(dev);
+
+       return 0;
+}
+
+#if SMC_DEBUG > 2
+static void print_packet(byte *buf, int length)
+{
+#if 0
+       int i;
+       int remainder;
+       int lines;
+
+       printf ("Packet of length %d \n", length);
+
+       lines = length / 16;
+       remainder = length % 16;
+
+       for (i = 0; i < lines; i++) {
+               int cur;
+
+               for (cur = 0; cur < 8; cur++) {
+                       byte a, b;
+
+                       a = *(buf++);
+                       b = *(buf++);
+                       printf ("%02x%02x ", a, b);
+               }
+               printf ("\n");
+       }
+       for (i = 0; i < remainder / 2; i++) {
+               byte a, b;
+
+               a = *(buf++);
+               b = *(buf++);
+               printf ("%02x%02x ", a, b);
+       }
+       printf ("\n");
+#endif /* 0 */
+}
+#endif /* SMC_DEBUG > 2 */
+
+static int  lan91c96_init(struct eth_device *dev, bd_t *bd)
+{
+       return smc_open(bd, dev);
+}
+
+static void lan91c96_halt(struct eth_device *dev)
+{
+       smc_close(dev);
+}
+
+static int lan91c96_recv(struct eth_device *dev)
+{
+       return smc_rcv(dev);
+}
+
+static int lan91c96_send(struct eth_device *dev, void *packet,
+               int length)
+{
+       return smc_send_packet(dev, packet, length);
+}
+
+/* smc_get_ethaddr
+ *
+ * This checks both the environment and the ROM for an ethernet address. If
+ * found, the environment takes precedence.
+ */
+
+static int smc_get_ethaddr(bd_t *bd, struct eth_device *dev)
+{
+       uchar v_mac[6];
+
+       if (!eth_getenv_enetaddr("ethaddr", v_mac)) {
+               /* get ROM mac value if any */
+               if (!get_rom_mac(dev, v_mac)) {
+                       printf("\n*** ERROR: ethaddr is NOT set !!\n");
+                       return -1;
+               }
+               eth_setenv_enetaddr("ethaddr", v_mac);
+       }
+
+       smc_set_mac_addr(v_mac); /* use old function to update smc default */
+       PRINTK("Using MAC Address %pM\n", v_mac);
+       return 0;
+}
+
+/*
+ * get_rom_mac()
+ * Note, this has omly been tested for the OMAP730 P2.
+ */
+
+static int get_rom_mac(struct eth_device *dev, unsigned char *v_rom_mac)
+{
+#ifdef HARDCODE_MAC    /* used for testing or to supress run time warnings */
+       char hw_mac_addr[] = { 0x02, 0x80, 0xad, 0x20, 0x31, 0xb8 };
+
+       memcpy (v_rom_mac, hw_mac_addr, 6);
+       return (1);
+#else
+       int i;
+       SMC_SELECT_BANK(dev, 1);
+       for (i=0; i<6; i++)
+       {
+               v_rom_mac[i] = SMC_inb(dev, LAN91C96_IA0 + i);
+       }
+       return (1);
+#endif
+}
+
+/* Structure to detect the device IDs */
+struct id_type {
+       u8 id;
+       char *name;
+};
+static struct id_type supported_chips[] = {
+       {0, ""}, /* Dummy entry to prevent id check failure */
+       {9, "LAN91C110"},
+       {8, "LAN91C100FD"},
+       {7, "LAN91C100"},
+       {5, "LAN91C95"},
+       {4, "LAN91C94/96"},
+       {3, "LAN91C90/92"},
+};
+/* lan91c96_detect_chip
+ * See:
+ * http://www.embeddedsys.com/subpages/resources/images/documents/LAN91C96_datasheet.pdf
+ * page 71 - that is the closest we get to detect this device
+ */
+static int lan91c96_detect_chip(struct eth_device *dev)
+{
+       u8 chip_id;
+       int r;
+       SMC_SELECT_BANK(dev, 3);
+       chip_id = (SMC_inw(dev, 0xA) & LAN91C96_REV_CHIPID) >> 4;
+       SMC_SELECT_BANK(dev, 0);
+       for (r = 0; r < ARRAY_SIZE(supported_chips); r++)
+               if (chip_id == supported_chips[r].id)
+                       return r;
+       return 0;
+}
+
+int lan91c96_initialize(u8 dev_num, int base_addr)
+{
+       struct eth_device *dev;
+       int r = 0;
+
+       dev = malloc(sizeof(*dev));
+       if (!dev) {
+               return 0;
+       }
+       memset(dev, 0, sizeof(*dev));
+
+       dev->iobase = base_addr;
+
+       /* Try to detect chip. Will fail if not present. */
+       r = lan91c96_detect_chip(dev);
+       if (!r) {
+               free(dev);
+               return 0;
+       }
+       get_rom_mac(dev, dev->enetaddr);
+
+       dev->init = lan91c96_init;
+       dev->halt = lan91c96_halt;
+       dev->send = lan91c96_send;
+       dev->recv = lan91c96_recv;
+       sprintf(dev->name, "%s-%hu", supported_chips[r].name, dev_num);
+
+       eth_register(dev);
+       return 0;
+}