diff options
Diffstat (limited to 'drivers/net/lne390.c')
| -rw-r--r-- | drivers/net/lne390.c | 458 |
1 files changed, 458 insertions, 0 deletions
diff --git a/drivers/net/lne390.c b/drivers/net/lne390.c new file mode 100644 index 00000000000..179a97c0af6 --- /dev/null +++ b/drivers/net/lne390.c @@ -0,0 +1,458 @@ +/* + lne390.c + + Linux driver for Mylex LNE390 EISA Network Adapter + + Copyright (C) 1996-1998, Paul Gortmaker. + + This software may be used and distributed according to the terms + of the GNU General Public License, incorporated herein by reference. + + Information and Code Sources: + + 1) Based upon framework of es3210 driver. + 2) The existing myriad of other Linux 8390 drivers by Donald Becker. + 3) Russ Nelson's asm packet driver provided additional info. + 4) Info for getting IRQ and sh-mem gleaned from the EISA cfg files. + + The LNE390 is an EISA shared memory NS8390 implementation. Note + that all memory copies to/from the board must be 32bit transfers. + There are two versions of the card: the lne390a and the lne390b. + Going by the EISA cfg files, the "a" has jumpers to select between + BNC/AUI, but the "b" also has RJ-45 and selection is via the SCU. + The shared memory address selection is also slightly different. + Note that shared memory address > 1MB are supported with this driver. + + You can try <http://www.mylex.com> if you want more info, as I've + never even seen one of these cards. :) + + Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 2000/09/01 + - get rid of check_region + - no need to check if dev == NULL in lne390_probe1 +*/ + +static const char *version = + "lne390.c: Driver revision v0.99.1, 01/09/2000\n"; + +#include <linux/module.h> +#include <linux/eisa.h> +#include <linux/kernel.h> +#include <linux/errno.h> +#include <linux/string.h> +#include <linux/delay.h> +#include <linux/init.h> +#include <linux/netdevice.h> +#include <linux/etherdevice.h> + +#include <asm/io.h> +#include <asm/system.h> + +#include "8390.h" + +#define DRV_NAME "lne390" + +static int lne390_probe1(struct net_device *dev, int ioaddr); + +static int lne390_open(struct net_device *dev); +static int lne390_close(struct net_device *dev); + +static void lne390_reset_8390(struct net_device *dev); + +static void lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page); +static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset); +static void lne390_block_output(struct net_device *dev, int count, const unsigned char *buf, const int start_page); + +#define LNE390_START_PG 0x00 /* First page of TX buffer */ +#define LNE390_STOP_PG 0x80 /* Last page +1 of RX ring */ + +#define LNE390_ID_PORT 0xc80 /* Same for all EISA cards */ +#define LNE390_IO_EXTENT 0x20 +#define LNE390_SA_PROM 0x16 /* Start of e'net addr. */ +#define LNE390_RESET_PORT 0xc84 /* From the pkt driver source */ +#define LNE390_NIC_OFFSET 0x00 /* Hello, the 8390 is *here* */ + +#define LNE390_ADDR0 0x00 /* 3 byte vendor prefix */ +#define LNE390_ADDR1 0x80 +#define LNE390_ADDR2 0xe5 + +#define LNE390_ID0 0x10009835 /* 0x3598 = 01101 01100 11000 = mlx */ +#define LNE390_ID1 0x11009835 /* above is the 390A, this is 390B */ + +#define LNE390_CFG1 0xc84 /* NB: 0xc84 is also "reset" port. */ +#define LNE390_CFG2 0xc90 + +/* + * You can OR any of the following bits together and assign it + * to LNE390_DEBUG to get verbose driver info during operation. + * Currently only the probe one is implemented. + */ + +#define LNE390_D_PROBE 0x01 +#define LNE390_D_RX_PKT 0x02 +#define LNE390_D_TX_PKT 0x04 +#define LNE390_D_IRQ 0x08 + +#define LNE390_DEBUG 0 + +static unsigned char irq_map[] __initdata = {15, 12, 11, 10, 9, 7, 5, 3}; +static unsigned int shmem_mapA[] __initdata = {0xff, 0xfe, 0xfd, 0xfff, 0xffe, 0xffc, 0x0d, 0x0}; +static unsigned int shmem_mapB[] __initdata = {0xff, 0xfe, 0x0e, 0xfff, 0xffe, 0xffc, 0x0d, 0x0}; + +/* + * Probe for the card. The best way is to read the EISA ID if it + * is known. Then we can check the prefix of the station address + * PROM for a match against the value assigned to Mylex. + */ + +static int __init do_lne390_probe(struct net_device *dev) +{ + unsigned short ioaddr = dev->base_addr; + int irq = dev->irq; + int mem_start = dev->mem_start; + int ret; + + SET_MODULE_OWNER(dev); + + if (ioaddr > 0x1ff) { /* Check a single specified location. */ + if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME)) + return -EBUSY; + ret = lne390_probe1(dev, ioaddr); + if (ret) + release_region(ioaddr, LNE390_IO_EXTENT); + return ret; + } + else if (ioaddr > 0) /* Don't probe at all. */ + return -ENXIO; + + if (!EISA_bus) { +#if LNE390_DEBUG & LNE390_D_PROBE + printk("lne390-debug: Not an EISA bus. Not probing high ports.\n"); +#endif + return -ENXIO; + } + + /* EISA spec allows for up to 16 slots, but 8 is typical. */ + for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) { + if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME)) + continue; + if (lne390_probe1(dev, ioaddr) == 0) + return 0; + release_region(ioaddr, LNE390_IO_EXTENT); + dev->irq = irq; + dev->mem_start = mem_start; + } + + return -ENODEV; +} + +static void cleanup_card(struct net_device *dev) +{ + free_irq(dev->irq, dev); + release_region(dev->base_addr, LNE390_IO_EXTENT); + iounmap(ei_status.mem); +} + +#ifndef MODULE +struct net_device * __init lne390_probe(int unit) +{ + struct net_device *dev = alloc_ei_netdev(); + int err; + + if (!dev) + return ERR_PTR(-ENOMEM); + + sprintf(dev->name, "eth%d", unit); + netdev_boot_setup_check(dev); + + err = do_lne390_probe(dev); + if (err) + goto out; + err = register_netdev(dev); + if (err) + goto out1; + return dev; +out1: + cleanup_card(dev); +out: + free_netdev(dev); + return ERR_PTR(err); +} +#endif + +static int __init lne390_probe1(struct net_device *dev, int ioaddr) +{ + int i, revision, ret; + unsigned long eisa_id; + + if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV; + +#if LNE390_DEBUG & LNE390_D_PROBE + printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT)); + printk("lne390-debug: config regs: %#x %#x\n", + inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2)); +#endif + + +/* Check the EISA ID of the card. */ + eisa_id = inl(ioaddr + LNE390_ID_PORT); + if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) { + return -ENODEV; + } + + revision = (eisa_id >> 24) & 0x01; /* 0 = rev A, 1 rev B */ + +#if 0 +/* Check the Mylex vendor ID as well. Not really required. */ + if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0 + || inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1 + || inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) { + printk("lne390.c: card not found"); + for(i = 0; i < ETHER_ADDR_LEN; i++) + printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i)); + printk(" (invalid prefix).\n"); + return -ENODEV; + } +#endif + + printk("lne390.c: LNE390%X in EISA slot %d, address", 0xa+revision, ioaddr/0x1000); + for(i = 0; i < ETHER_ADDR_LEN; i++) + printk(" %02x", (dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i))); + printk(".\nlne390.c: "); + + /* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */ + if (dev->irq == 0) { + unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3; + dev->irq = irq_map[irq_reg & 0x07]; + printk("using"); + } else { + /* This is useless unless we reprogram the card here too */ + if (dev->irq == 2) dev->irq = 9; /* Doh! */ + printk("assigning"); + } + printk(" IRQ %d,", dev->irq); + + if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) { + printk (" unable to get IRQ %d.\n", dev->irq); + return ret; + } + + if (dev->mem_start == 0) { + unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07; + + if (revision) /* LNE390B */ + dev->mem_start = shmem_mapB[mem_reg] * 0x10000; + else /* LNE390A */ + dev->mem_start = shmem_mapA[mem_reg] * 0x10000; + printk(" using "); + } else { + /* Should check for value in shmem_map and reprogram the card to use it */ + dev->mem_start &= 0xfff0000; + printk(" assigning "); + } + + printk("%dkB memory at physical address %#lx\n", + LNE390_STOP_PG/4, dev->mem_start); + + /* + BEWARE!! Some dain-bramaged EISA SCUs will allow you to put + the card mem within the region covered by `normal' RAM !!! + + ioremap() will fail in that case. + */ + ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100); + if (!ei_status.mem) { + printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n"); + printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n"); + printk(KERN_ERR "lne390.c: Driver NOT installed.\n"); + ret = -EAGAIN; + goto cleanup; + } + printk("lne390.c: remapped %dkB card memory to virtual address %p\n", + LNE390_STOP_PG/4, ei_status.mem); + + dev->mem_start = (unsigned long)ei_status.mem; + dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256; + + /* The 8390 offset is zero for the LNE390 */ + dev->base_addr = ioaddr; + + ei_status.name = "LNE390"; + ei_status.tx_start_page = LNE390_START_PG; + ei_status.rx_start_page = LNE390_START_PG + TX_PAGES; + ei_status.stop_page = LNE390_STOP_PG; + ei_status.word16 = 1; + + if (ei_debug > 0) + printk(version); + + ei_status.reset_8390 = &lne390_reset_8390; + ei_status.block_input = &lne390_block_input; + ei_status.block_output = &lne390_block_output; + ei_status.get_8390_hdr = &lne390_get_8390_hdr; + + dev->open = &lne390_open; + dev->stop = &lne390_close; +#ifdef CONFIG_NET_POLL_CONTROLLER + dev->poll_controller = ei_poll; +#endif + NS8390_init(dev, 0); + return 0; +cleanup: + free_irq(dev->irq, dev); + return ret; +} + +/* + * Reset as per the packet driver method. Judging by the EISA cfg + * file, this just toggles the "Board Enable" bits (bit 2 and 0). + */ + +static void lne390_reset_8390(struct net_device *dev) +{ + unsigned short ioaddr = dev->base_addr; + + outb(0x04, ioaddr + LNE390_RESET_PORT); + if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name); + + mdelay(2); + + ei_status.txing = 0; + outb(0x01, ioaddr + LNE390_RESET_PORT); + if (ei_debug > 1) printk("reset done\n"); + + return; +} + +/* + * Note: In the following three functions is the implicit assumption + * that the associated memcpy will only use "rep; movsl" as long as + * we keep the counts as some multiple of doublewords. This is a + * requirement of the hardware, and also prevents us from using + * eth_io_copy_and_sum() since we can't guarantee it will limit + * itself to doubleword access. + */ + +/* + * Grab the 8390 specific header. Similar to the block_input routine, but + * we don't need to be concerned with ring wrap as the header will be at + * the start of a page, so we optimize accordingly. (A single doubleword.) + */ + +static void +lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page) +{ + void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8); + memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr)); + hdr->count = (hdr->count + 3) & ~3; /* Round up allocation. */ +} + +/* + * Block input and output are easy on shared memory ethercards, the only + * complication is when the ring buffer wraps. The count will already + * be rounded up to a doubleword value via lne390_get_8390_hdr() above. + */ + +static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb, + int ring_offset) +{ + void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8); + + if (ring_offset + count > (LNE390_STOP_PG<<8)) { + /* Packet wraps over end of ring buffer. */ + int semi_count = (LNE390_STOP_PG<<8) - ring_offset; + memcpy_fromio(skb->data, xfer_start, semi_count); + count -= semi_count; + memcpy_fromio(skb->data + semi_count, + ei_status.mem + (TX_PAGES<<8), count); + } else { + /* Packet is in one chunk. */ + memcpy_fromio(skb->data, xfer_start, count); + } +} + +static void lne390_block_output(struct net_device *dev, int count, + const unsigned char *buf, int start_page) +{ + void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8); + + count = (count + 3) & ~3; /* Round up to doubleword */ + memcpy_toio(shmem, buf, count); +} + +static int lne390_open(struct net_device *dev) +{ + ei_open(dev); + return 0; +} + +static int lne390_close(struct net_device *dev) +{ + + if (ei_debug > 1) + printk("%s: Shutting down ethercard.\n", dev->name); + + ei_close(dev); + return 0; +} + +#ifdef MODULE +#define MAX_LNE_CARDS 4 /* Max number of LNE390 cards per module */ +static struct net_device *dev_lne[MAX_LNE_CARDS]; +static int io[MAX_LNE_CARDS]; +static int irq[MAX_LNE_CARDS]; +static int mem[MAX_LNE_CARDS]; + +module_param_array(io, int, NULL, 0); +module_param_array(irq, int, NULL, 0); +module_param_array(mem, int, NULL, 0); +MODULE_PARM_DESC(io, "I/O base address(es)"); +MODULE_PARM_DESC(irq, "IRQ number(s)"); +MODULE_PARM_DESC(mem, "memory base address(es)"); +MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver"); +MODULE_LICENSE("GPL"); + +int init_module(void) +{ + struct net_device *dev; + int this_dev, found = 0; + + for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) { + if (io[this_dev] == 0 && this_dev != 0) + break; + dev = alloc_ei_netdev(); + if (!dev) + break; + dev->irq = irq[this_dev]; + dev->base_addr = io[this_dev]; + dev->mem_start = mem[this_dev]; + if (do_lne390_probe(dev) == 0) { + if (register_netdev(dev) == 0) { + dev_lne[found++] = dev; + continue; + } + cleanup_card(dev); + } + free_netdev(dev); + printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]); + break; + } + if (found) + return 0; + return -ENXIO; +} + +void cleanup_module(void) +{ + int this_dev; + + for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) { + struct net_device *dev = dev_lne[this_dev]; + if (dev) { + unregister_netdev(dev); + cleanup_card(dev); + free_netdev(dev); + } + } +} +#endif /* MODULE */ + |