o Merge with Linux 2.1.116.

 o New Newport console code.
 o New G364 console code.

1 files changed, 247 insertions, 0 deletions

diff --git a/drivers/net/hplance.c b/drivers/net/hplance.c
new file mode 100644
index 000000000..fb7f61729
--- /dev/null
+++ b/drivers/net/hplance.c
@@ -0,0 +1,247 @@
+/* hplance.c  : the  Linux/hp300/lance ethernet driver
+ *
+ * Copyright (C) 05/1998 Peter Maydell <pmaydell@chiark.greenend.org.uk>
+ * Based on the Sun Lance driver and the NetBSD HP Lance driver
+ * Uses the generic 7990.c LANCE code.
+ */
+
+#include <linux/module.h>
+#include <linux/kernel.h>
+#include <linux/sched.h>
+#include <linux/types.h>
+#include <linux/interrupt.h>
+#include <linux/ptrace.h>
+#include <linux/ioport.h>
+#include <linux/malloc.h>
+#include <linux/string.h>
+#include <linux/delay.h>
+#include <linux/init.h>
+#include <linux/errno.h>
+#include <asm/system.h>
+#include <asm/io.h>
+#include <asm/pgtable.h>
+
+/* Used for the temporal inet entries and routing */
+#include <linux/socket.h>
+#include <linux/route.h>
+
+#include <linux/dio.h>
+
+#include <linux/netdevice.h>
+#include <linux/etherdevice.h>
+#include <linux/skbuff.h>
+
+#include "hplance.h"
+
+/* We have 16834 bytes of RAM for the init block and buffers. This places
+ * an upper limit on the number of buffers we can use. NetBSD uses 8 Rx
+ * buffers and 2 Tx buffers.
+ */
+#define LANCE_LOG_TX_BUFFERS 1
+#define LANCE_LOG_RX_BUFFERS 3
+
+#include "7990.h"                                 /* use generic LANCE code */
+
+/* Our private data structure */
+struct hplance_private {
+  struct lance_private lance;
+  unsigned int scode;
+  void *base;
+};
+
+/* function prototypes... This is easy because all the grot is in the
+ * generic LANCE support. All we have to support is probing for boards,
+ * plus board-specific init, open and close actions. 
+ * Oh, and we need to tell the generic code how to read and write LANCE registers...
+ */
+int hplance_probe(struct device *dev);
+static int hplance_init(struct device *dev, int scode);
+static int hplance_open(struct device *dev);
+static int hplance_close(struct device *dev);
+static void hplance_writerap(struct hplance_private *lp, unsigned short value);
+static void hplance_writerdp(struct hplance_private *lp, unsigned short value);
+static unsigned short hplance_readrdp(struct hplance_private *lp);
+
+#ifdef MODULE
+static struct hplance_private *root_hplance_dev = NULL;
+#endif
+
+/* Find all the HP Lance boards and initialise them... */
+__initfunc(int hplance_probe(struct device *dev))
+{
+        int cards = 0, called = 0;
+
+        if (!MACH_IS_HP300 || called)
+                return(ENODEV);
+        called++;
+        
+        /* Isn't DIO nice? */
+        for(;;)
+        {
+                int v, scode = dio_find(DIO_ID_LAN);
+                                
+                if (!scode)
+                        break;
+                
+                if(cards)
+                        dev = NULL;      /* don't trash previous device, make a new one */
+                cards++;
+                
+                v = hplance_init(dev, scode);
+                if (v)                            /* error, abort immediately */
+                        return v;
+        }
+        /* OK, return success, or ENODEV if we didn't find any cards */
+        if (!cards)
+                return ENODEV;
+        return 0;
+}
+
+/* Initialise a single lance board at the given select code */
+__initfunc (static int hplance_init(struct device *dev, int scode))
+{
+        /* const char *name = dio_scodetoname(scode); */
+        static const char name[] = "HP LANCE";
+        void *va = dio_scodetoviraddr(scode);
+        struct hplance_private *lp;
+        int i;
+        
+        if (dev == NULL)
+                dev = init_etherdev(0, sizeof(struct hplance_private));
+        else
+        {
+                dev->priv = kmalloc(sizeof(struct hplance_private), GFP_KERNEL);
+                if (dev->priv == NULL)
+                        return -ENOMEM;
+                memset(dev->priv, 0, sizeof(struct hplance_private));
+        }
+        printk("%s: HP LANCE; select code %d, addr", dev->name, scode);
+
+        /* reset the board */
+        writeb(0xff,va+DIO_IDOFF);
+        udelay(100);                              /* ariba! ariba! udelay! udelay! */
+
+        /* Fill the dev fields */
+        dev->base_addr = (unsigned long)va;
+        dev->open = &hplance_open;
+        dev->stop = &hplance_close;
+        dev->hard_start_xmit = &lance_start_xmit;
+        dev->get_stats = &lance_get_stats;
+        dev->set_multicast_list = &lance_set_multicast;
+        dev->dma = 0;
+        
+        for (i=0; i<6; i++)
+        {
+                /* The NVRAM holds our ethernet address, one nibble per byte,
+                 * at bytes NVRAMOFF+1,3,5,7,9...
+                 */
+                dev->dev_addr[i] = ((readb(va + HPLANCE_NVRAMOFF + i*4 + 1) & 0xF) << 4)
+                        | (readb(va + HPLANCE_NVRAMOFF + i*4 + 3) & 0xF);
+                printk("%c%2.2x", i == 0 ? ' ' : ':', dev->dev_addr[i]);
+        }
+        
+        lp = (struct hplance_private *)dev->priv;
+        lp->lance.name = (char*)name;                   /* discards const, shut up gcc */
+        lp->lance.ll = (struct lance_regs *)(va + HPLANCE_REGOFF);
+        lp->lance.init_block = (struct lance_init_block *)(va + HPLANCE_MEMOFF); /* CPU addr */
+        lp->lance.lance_init_block = 0;                 /* LANCE addr of same RAM */
+        lp->lance.busmaster_regval = LE_C3_BSWP;        /* we're bigendian */
+        lp->lance.irq = dio_scodetoipl(scode);
+        lp->lance.writerap = hplance_writerap;
+        lp->lance.writerdp = hplance_writerdp;
+        lp->lance.readrdp = hplance_readrdp;
+        lp->lance.lance_log_rx_bufs = LANCE_LOG_RX_BUFFERS;
+        lp->lance.lance_log_tx_bufs = LANCE_LOG_TX_BUFFERS;
+        lp->lance.rx_ring_mod_mask = RX_RING_MOD_MASK;
+        lp->lance.tx_ring_mod_mask = TX_RING_MOD_MASK;
+        lp->scode = scode;
+	lp->base = va;
+        ether_setup(dev);
+	printk(", irq %d\n", lp->lance.irq);
+
+#ifdef MODULE
+        dev->ifindex = dev_new_index();
+        lp->next_module = root_hplance_dev;
+        root_hplance_dev = lp;
+#endif /* MODULE */
+
+        dio_config_board(scode);                  /* tell bus scanning code this one's taken */
+        return 0;
+}
+
+/* This is disgusting. We have to check the DIO status register for ack every
+ * time we read or write the LANCE registers.
+ */
+static void hplance_writerap(struct hplance_private *lp, unsigned short value)
+{
+        struct hplance_reg *hpregs = (struct hplance_reg *)lp->base;
+        do {
+                lp->lance.ll->rap = value;
+        } while ((hpregs->status & LE_ACK) == 0);
+}
+
+static void hplance_writerdp(struct hplance_private *lp, unsigned short value)
+{
+        struct hplance_reg *hpregs = (struct hplance_reg *)lp->base;
+        do {
+                lp->lance.ll->rdp = value;
+        } while ((hpregs->status & LE_ACK) == 0);
+}
+
+static unsigned short hplance_readrdp(struct hplance_private *lp)
+{
+        unsigned short val;
+        struct hplance_reg *hpregs = (struct hplance_reg *)lp->base;
+        do {
+                val = lp->lance.ll->rdp;
+        } while ((hpregs->status & LE_ACK) == 0);
+        return val;
+}
+
+static int hplance_open(struct device *dev)
+{
+        int status;
+        struct hplance_private *lp = (struct hplance_private *)dev->priv;
+        struct hplance_reg *hpregs = (struct hplance_reg *)lp->base;
+        
+        status = lance_open(dev);                 /* call generic lance open code */
+        if (status)
+                return status;
+        /* enable interrupts at board level. */
+        writeb(LE_IE, &(hpregs->status));
+
+        MOD_INC_USE_COUNT;
+        return 0;
+}
+
+static int hplance_close(struct device *dev)
+{
+        struct hplance_private *lp = (struct hplance_private *)dev->priv;
+        struct hplance_reg *hpregs = (struct hplance_reg *)lp->base;
+        writeb(0,&(hpregs->status));              /* disable interrupts at boardlevel */
+        lance_close(dev);
+        MOD_DEC_USE_COUNT;
+        return 0;
+}
+
+#ifdef MODULE
+int init_module(void)
+{
+        root_lance_dev = NULL;
+        return hplance_probe(NULL);
+}
+
+void cleanup_module(void)
+{
+        /* Walk the chain of devices, unregistering them */
+        struct hplance_private *lp;
+        while (root_hplance_dev) {
+                lp = root_hplance_dev->next_module;
+                dio_unconfig_board(lp->scode);
+                unregister_netdev(root_lance_dev->dev);
+                kfree(root_lance_dev->dev);
+                root_lance_dev = lp;
+        }
+}
+
+#endif /* MODULE */