/* * linux/drivers/acorn/net/etherh.c * * Copyright (C) 2000 Russell King * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License version 2 as * published by the Free Software Foundation. * * NS8390 ANT etherh specific driver * For Acorn machines * * Thanks to I-Cubed for information on their cards. * * Changelog: * 08-12-1996 RMK 1.00 Created * RMK 1.03 Added support for EtherLan500 cards * 23-11-1997 RMK 1.04 Added media autodetection * 16-04-1998 RMK 1.05 Improved media autodetection * 10-02-2000 RMK 1.06 Updated for 2.3.43 * 13-05-2000 RMK 1.07 Updated for 2.3.99-pre8 * * Insmod Module Parameters * ------------------------ * io= * irq= * xcvr=<0|1> 0 = 10bT, 1=10b2 (Lan600/600A only) */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "../../net/8390.h" #define NET_DEBUG 0 #define DEBUG_INIT 2 static unsigned int net_debug = NET_DEBUG; static const card_ids __init etherh_cids[] = { { MANU_I3, PROD_I3_ETHERLAN500 }, { MANU_I3, PROD_I3_ETHERLAN600 }, { MANU_I3, PROD_I3_ETHERLAN600A }, { 0xffff, 0xffff } }; MODULE_AUTHOR("Russell King"); MODULE_DESCRIPTION("i3 EtherH driver"); static const char version[] __initdata = "etherh [500/600/600A] ethernet driver (c) 2000 R.M.King v1.07\n"; #define ETHERH500_DATAPORT 0x200 /* MEMC */ #define ETHERH500_NS8390 0x000 /* MEMC */ #define ETHERH500_CTRLPORT 0x200 /* IOC */ #define ETHERH600_DATAPORT 16 /* MEMC */ #define ETHERH600_NS8390 0x200 /* MEMC */ #define ETHERH600_CTRLPORT 0x080 /* MEMC */ #define ETHERH_CP_IE 1 #define ETHERH_CP_IF 2 #define ETHERH_CP_HEARTBEAT 2 #define ETHERH_TX_START_PAGE 1 #define ETHERH_STOP_PAGE 0x7f /* --------------------------------------------------------------------------- */ static void etherh_setif(struct net_device *dev) { unsigned long addr, flags; save_flags_cli(flags); /* set the interface type */ switch (dev->mem_end) { case PROD_I3_ETHERLAN600: case PROD_I3_ETHERLAN600A: addr = dev->base_addr + EN0_RCNTHI; switch (dev->if_port) { case IF_PORT_10BASE2: outb((inb(addr) & 0xf8) | 1, addr); break; case IF_PORT_10BASET: outb((inb(addr) & 0xf8), addr); break; } break; case PROD_I3_ETHERLAN500: addr = dev->rmem_start; switch (dev->if_port) { case IF_PORT_10BASE2: outb(inb(addr) & ~ETHERH_CP_IF, addr); break; case IF_PORT_10BASET: outb(inb(addr) | ETHERH_CP_IF, addr); break; } break; default: break; } restore_flags(flags); } static int etherh_getifstat(struct net_device *dev) { int stat = 0; switch (dev->mem_end) { case PROD_I3_ETHERLAN600: case PROD_I3_ETHERLAN600A: switch (dev->if_port) { case IF_PORT_10BASE2: stat = 1; break; case IF_PORT_10BASET: stat = inb(dev->base_addr+EN0_RCNTHI) & 4; break; } break; case PROD_I3_ETHERLAN500: switch (dev->if_port) { case IF_PORT_10BASE2: stat = 1; break; case IF_PORT_10BASET: stat = inb(dev->rmem_start) & ETHERH_CP_HEARTBEAT; break; } break; default: stat = 0; break; } return stat != 0; } /* * Configure the interface. Note that we ignore the other * parts of ifmap, since its mostly meaningless for this driver. */ static int etherh_set_config(struct net_device *dev, struct ifmap *map) { switch (map->port) { case IF_PORT_10BASE2: case IF_PORT_10BASET: /* * If the user explicitly sets the interface * media type, turn off automedia detection. */ dev->flags &= ~IFF_AUTOMEDIA; dev->if_port = map->port; break; default: return -EINVAL; } etherh_setif(dev); return 0; } /* * Reset the 8390 (hard reset). Note that we can't actually do this. */ static void etherh_reset(struct net_device *dev) { outb_p(E8390_NODMA+E8390_PAGE0+E8390_STOP, dev->base_addr); /* * See if we need to change the interface type. * Note that we use 'interface_num' as a flag * to indicate that we need to change the media. */ if (dev->flags & IFF_AUTOMEDIA && ei_status.interface_num) { ei_status.interface_num = 0; if (dev->if_port == IF_PORT_10BASET) dev->if_port = IF_PORT_10BASE2; else dev->if_port = IF_PORT_10BASET; etherh_setif(dev); } } /* * Write a block of data out to the 8390 */ static void etherh_block_output (struct net_device *dev, int count, const unsigned char *buf, int start_page) { unsigned int addr, dma_addr; unsigned long dma_start; if (ei_status.dmaing) { printk ("%s: DMAing conflict in etherh_block_input: " " DMAstat %d irqlock %d\n", dev->name, ei_status.dmaing, ei_status.irqlock); return; } ei_status.dmaing |= 1; addr = dev->base_addr; dma_addr = dev->mem_start; count = (count + 1) & ~1; outb (E8390_NODMA | E8390_PAGE0 | E8390_START, addr + E8390_CMD); outb (0x42, addr + EN0_RCNTLO); outb (0x00, addr + EN0_RCNTHI); outb (0x42, addr + EN0_RSARLO); outb (0x00, addr + EN0_RSARHI); outb (E8390_RREAD | E8390_START, addr + E8390_CMD); udelay (1); outb (ENISR_RDC, addr + EN0_ISR); outb (count, addr + EN0_RCNTLO); outb (count >> 8, addr + EN0_RCNTHI); outb (0, addr + EN0_RSARLO); outb (start_page, addr + EN0_RSARHI); outb (E8390_RWRITE | E8390_START, addr + E8390_CMD); if (ei_status.word16) outsw (dma_addr, buf, count >> 1); else outsb (dma_addr, buf, count); dma_start = jiffies; while ((inb (addr + EN0_ISR) & ENISR_RDC) == 0) if (jiffies - dma_start > 2*HZ/100) { /* 20ms */ printk ("%s: timeout waiting for TX RDC\n", dev->name); etherh_reset (dev); NS8390_init (dev, 1); break; } outb (ENISR_RDC, addr + EN0_ISR); ei_status.dmaing &= ~1; } /* * Read a block of data from the 8390 */ static void etherh_block_input (struct net_device *dev, int count, struct sk_buff *skb, int ring_offset) { unsigned int addr, dma_addr; unsigned char *buf; if (ei_status.dmaing) { printk ("%s: DMAing conflict in etherh_block_input: " " DMAstat %d irqlock %d\n", dev->name, ei_status.dmaing, ei_status.irqlock); return; } ei_status.dmaing |= 1; addr = dev->base_addr; dma_addr = dev->mem_start; buf = skb->data; outb (E8390_NODMA | E8390_PAGE0 | E8390_START, addr + E8390_CMD); outb (count, addr + EN0_RCNTLO); outb (count >> 8, addr + EN0_RCNTHI); outb (ring_offset, addr + EN0_RSARLO); outb (ring_offset >> 8, addr + EN0_RSARHI); outb (E8390_RREAD | E8390_START, addr + E8390_CMD); if (ei_status.word16) { insw (dma_addr, buf, count >> 1); if (count & 1) buf[count - 1] = inb (dma_addr); } else insb (dma_addr, buf, count); outb (ENISR_RDC, addr + EN0_ISR); ei_status.dmaing &= ~1; } /* * Read a header from the 8390 */ static void etherh_get_header (struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page) { unsigned int addr, dma_addr; if (ei_status.dmaing) { printk ("%s: DMAing conflict in etherh_get_header: " " DMAstat %d irqlock %d\n", dev->name, ei_status.dmaing, ei_status.irqlock); return; } ei_status.dmaing |= 1; addr = dev->base_addr; dma_addr = dev->mem_start; outb (E8390_NODMA | E8390_PAGE0 | E8390_START, addr + E8390_CMD); outb (sizeof (*hdr), addr + EN0_RCNTLO); outb (0, addr + EN0_RCNTHI); outb (0, addr + EN0_RSARLO); outb (ring_page, addr + EN0_RSARHI); outb (E8390_RREAD | E8390_START, addr + E8390_CMD); if (ei_status.word16) insw (dma_addr, hdr, sizeof (*hdr) >> 1); else insb (dma_addr, hdr, sizeof (*hdr)); outb (ENISR_RDC, addr + EN0_ISR); ei_status.dmaing &= ~1; } /* * Open/initialize the board. This is called (in the current kernel) * sometime after booting when the 'ifconfig' program is run. * * This routine should set everything up anew at each open, even * registers that "should" only need to be set once at boot, so that * there is non-reboot way to recover if something goes wrong. */ static int etherh_open(struct net_device *dev) { if (request_irq(dev->irq, ei_interrupt, 0, "etherh", dev)) return -EAGAIN; /* * Make sure that we aren't going to change the * media type on the next reset - we are about to * do automedia manually now. */ ei_status.interface_num = 0; /* * If we are doing automedia detection, do it now. * This is more reliable than the 8390's detection. */ if (dev->flags & IFF_AUTOMEDIA) { dev->if_port = IF_PORT_10BASET; etherh_setif(dev); mdelay(1); if (!etherh_getifstat(dev)) { dev->if_port = IF_PORT_10BASE2; etherh_setif(dev); } } else etherh_setif(dev); etherh_reset(dev); ei_open(dev); return 0; } /* * The inverse routine to etherh_open(). */ static int etherh_close(struct net_device *dev) { ei_close (dev); free_irq (dev->irq, dev); return 0; } static void etherh_irq_enable(ecard_t *ec, int irqnr) { unsigned int ctrl_addr = (unsigned int)ec->irq_data; outb(inb(ctrl_addr) | ETHERH_CP_IE, ctrl_addr); } static void etherh_irq_disable(ecard_t *ec, int irqnr) { unsigned int ctrl_addr = (unsigned int)ec->irq_data; outb(inb(ctrl_addr) & ~ETHERH_CP_IE, ctrl_addr); } static expansioncard_ops_t etherh_ops = { irqenable: etherh_irq_enable, irqdisable: etherh_irq_disable, }; /* * Initialisation */ static void __init etherh_banner(void) { static int version_printed; if (net_debug && version_printed++ == 0) printk(version); } static int __init etherh_check_presence(struct net_device *dev) { unsigned int addr = dev->base_addr, reg0, tmp; reg0 = inb(addr); if (reg0 == 0xff) { if (net_debug & DEBUG_INIT) printk("%s: etherh error: NS8390 command register wrong\n", dev->name); return -ENODEV; } outb(E8390_NODMA | E8390_PAGE1 | E8390_STOP, addr + E8390_CMD); tmp = inb(addr + 13); outb(0xff, addr + 13); outb(E8390_NODMA | E8390_PAGE0, addr + E8390_CMD); inb(addr + EN0_COUNTER0); if (inb(addr + EN0_COUNTER0) != 0) { if (net_debug & DEBUG_INIT) printk("%s: etherh error: NS8390 not found\n", dev->name); outb(reg0, addr); outb(tmp, addr + 13); return -ENODEV; } return 0; } /* * Read the ethernet address string from the on board rom. * This is an ascii string... */ static int __init etherh_addr(char *addr, struct expansion_card *ec) { struct in_chunk_dir cd; char *s; if (ecard_readchunk(&cd, ec, 0xf5, 0) && (s = strchr(cd.d.string, '('))) { int i; for (i = 0; i < 6; i++) { addr[i] = simple_strtoul(s + 1, &s, 0x10); if (*s != (i == 5? ')' : ':')) break; } if (i == 6) return 0; } return ENODEV; } static struct net_device * __init etherh_init_one(struct expansion_card *ec) { struct net_device *dev; const char *dev_type; int i; etherh_banner(); ecard_claim(ec); dev = init_etherdev(NULL, 0); if (!dev) goto out; SET_MODULE_OWNER(dev); etherh_addr(dev->dev_addr, ec); dev->open = etherh_open; dev->stop = etherh_close; dev->set_config = etherh_set_config; dev->irq = ec->irq; dev->base_addr = ecard_address(ec, ECARD_MEMC, 0); dev->mem_end = ec->cid.product; ec->ops = ðerh_ops; switch (ec->cid.product) { case PROD_I3_ETHERLAN500: dev->base_addr += ETHERH500_NS8390; dev->mem_start = dev->base_addr + ETHERH500_DATAPORT; dev->rmem_start = (unsigned long) ec->irq_data = (void *)ecard_address (ec, ECARD_IOC, ECARD_FAST) + ETHERH500_CTRLPORT; break; case PROD_I3_ETHERLAN600: case PROD_I3_ETHERLAN600A: dev->base_addr += ETHERH600_NS8390; dev->mem_start = dev->base_addr + ETHERH600_DATAPORT; ec->irq_data = (void *)(dev->base_addr + ETHERH600_CTRLPORT); break; default: printk("%s: etherh error: unknown card type %x\n", dev->name, ec->cid.product); goto out; } if (!request_region(dev->base_addr, 16, dev->name)) goto region_not_free; if (etherh_check_presence(dev) || ethdev_init(dev)) goto release; switch (ec->cid.product) { case PROD_I3_ETHERLAN500: dev_type = "500"; break; case PROD_I3_ETHERLAN600: dev_type = "600"; break; case PROD_I3_ETHERLAN600A: dev_type = "600A"; break; default: dev_type = "unknown"; break; } printk("%s: etherh %s at %lx, IRQ%d, ether address ", dev->name, dev_type, dev->base_addr, dev->irq); for (i = 0; i < 6; i++) printk(i == 5 ? "%2.2x\n" : "%2.2x:", dev->dev_addr[i]); /* * Unfortunately, ethdev_init eventually calls * ether_setup, which re-writes dev->flags. */ switch (ec->cid.product) { case PROD_I3_ETHERLAN500: dev->if_port = IF_PORT_UNKNOWN; break; case PROD_I3_ETHERLAN600: case PROD_I3_ETHERLAN600A: dev->flags |= IFF_PORTSEL | IFF_AUTOMEDIA; dev->if_port = IF_PORT_10BASET; break; } ei_status.name = dev->name; ei_status.word16 = 1; ei_status.tx_start_page = ETHERH_TX_START_PAGE; ei_status.rx_start_page = ei_status.tx_start_page + TX_PAGES; ei_status.stop_page = ETHERH_STOP_PAGE; ei_status.reset_8390 = etherh_reset; ei_status.block_input = etherh_block_input; ei_status.block_output = etherh_block_output; ei_status.get_8390_hdr = etherh_get_header; ei_status.interface_num = 0; etherh_reset(dev); NS8390_init(dev, 0); return dev; release: release_region(dev->base_addr, 16); region_not_free: unregister_netdev(dev); kfree(dev); out: ecard_release(ec); return NULL; } #define MAX_ETHERH_CARDS 2 static struct net_device *e_dev[MAX_ETHERH_CARDS]; static struct expansion_card *e_card[MAX_ETHERH_CARDS]; static int __init etherh_init(void) { int i, ret = -ENODEV; ecard_startfind(); for (i = 0; i < MAX_ECARDS; i++) { struct expansion_card *ec; struct net_device *dev; ec = ecard_find(0, etherh_cids); if (!ec) break; dev = etherh_init_one(ec); if (!dev) break; e_card[i] = ec; e_dev[i] = dev; ret = 0; } return ret; } static void __exit etherh_exit(void) { int i; for (i = 0; i < MAX_ETHERH_CARDS; i++) { if (e_dev[i]) { unregister_netdev(e_dev[i]); release_region(e_dev[i]->base_addr, 16); kfree(e_dev[i]); e_dev[i] = NULL; } if (e_card[i]) { e_card[i]->ops = NULL; ecard_release(e_card[i]); e_card[i] = NULL; } } } module_init(etherh_init); module_exit(etherh_exit);