/* smc-mca.c: A SMC Ultra ethernet driver for linux. */ /* Most of this driver, except for ultramca_probe is nearly verbatim from smc-ultra.c by Donald Becker. The rest is written and copyright 1996 by David Weis, weisd3458@uni.edu This is a driver for the SMC Ultra and SMC EtherEZ ethercards. This driver uses the cards in the 8390-compatible, shared memory mode. Most of the run-time complexity is handled by the generic code in 8390.c. This driver enables the shared memory only when doing the actual data transfers to avoid a bug in early version of the card that corrupted data transferred by a AHA1542. This driver does not support the programmed-I/O data transfer mode of the EtherEZ. That support (if available) is smc-ez.c. Nor does it use the non-8390-compatible "Altego" mode. (No support currently planned.) Changelog: Paul Gortmaker : multiple card support for module users. David Weis : Micro Channel-ized it. Tom Sightler : Added support for IBM PS/2 Ethernet Adapter/A Christopher Turcksin : Changed MCA-probe so that multiple adapters are found correctly (Jul 16, 1997) Chris Beauregard : Tried to merge the two changes above (Dec 15, 1997) Tom Sightler : Fixed minor detection bug caused by above merge Tom Sightler : Added support for three more Western Digital MCA-adapters Tom Sightler : Added support for 2.2.x mca_find_unused_adapter Hartmut Schmidt : - Modified parameter detection to handle each card differently depending on a switch-list - 'card_ver' removed from the adapter list - Some minor bug fixes */ #include <linux/mca.h> #include <linux/module.h> #include <linux/kernel.h> #include <linux/errno.h> #include <linux/string.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 "smc-mca" static int ultramca_open(struct net_device *dev); static void ultramca_reset_8390(struct net_device *dev); static void ultramca_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page); static void ultramca_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset); static void ultramca_block_output(struct net_device *dev, int count, const unsigned char *buf, const int start_page); static int ultramca_close_card(struct net_device *dev); #define START_PG 0x00 /* First page of TX buffer */ #define ULTRA_CMDREG 0 /* Offset to ASIC command register. */ #define ULTRA_RESET 0x80 /* Board reset, in ULTRA_CMDREG. */ #define ULTRA_MEMENB 0x40 /* Enable the shared memory. */ #define ULTRA_NIC_OFFSET 16 /* NIC register offset from the base_addr. */ #define ULTRA_IO_EXTENT 32 #define EN0_ERWCNT 0x08 /* Early receive warning count. */ #define _61c8_SMC_Ethercard_PLUS_Elite_A_BNC_AUI_WD8013EP_A 0 #define _61c9_SMC_Ethercard_PLUS_Elite_A_UTP_AUI_WD8013EP_A 1 #define _6fc0_WD_Ethercard_PLUS_A_WD8003E_A_OR_WD8003ET_A 2 #define _6fc1_WD_Starcard_PLUS_A_WD8003ST_A 3 #define _6fc2_WD_Ethercard_PLUS_10T_A_WD8003W_A 4 #define _efd4_IBM_PS2_Adapter_A_for_Ethernet_UTP_AUI_WD8013WP_A 5 #define _efd5_IBM_PS2_Adapter_A_for_Ethernet_BNC_AUI_WD8013WP_A 6 #define _efe5_IBM_PS2_Adapter_A_for_Ethernet 7 struct smc_mca_adapters_t { unsigned int id; char *name; }; #define MAX_ULTRAMCA_CARDS 4 /* Max number of Ultra cards per module */ static int ultra_io[MAX_ULTRAMCA_CARDS]; static int ultra_irq[MAX_ULTRAMCA_CARDS]; MODULE_LICENSE("GPL"); module_param_array(ultra_io, int, NULL, 0); module_param_array(ultra_irq, int, NULL, 0); MODULE_PARM_DESC(ultra_io, "SMC Ultra/EtherEZ MCA I/O base address(es)"); MODULE_PARM_DESC(ultra_irq, "SMC Ultra/EtherEZ MCA IRQ number(s)"); static const struct { unsigned int base_addr; } addr_table[] = { { 0x0800 }, { 0x1800 }, { 0x2800 }, { 0x3800 }, { 0x4800 }, { 0x5800 }, { 0x6800 }, { 0x7800 }, { 0x8800 }, { 0x9800 }, { 0xa800 }, { 0xb800 }, { 0xc800 }, { 0xd800 }, { 0xe800 }, { 0xf800 } }; #define MEM_MASK 64 static const struct { unsigned char mem_index; unsigned long mem_start; unsigned char num_pages; } mem_table[] = { { 16, 0x0c0000, 40 }, { 18, 0x0c4000, 40 }, { 20, 0x0c8000, 40 }, { 22, 0x0cc000, 40 }, { 24, 0x0d0000, 40 }, { 26, 0x0d4000, 40 }, { 28, 0x0d8000, 40 }, { 30, 0x0dc000, 40 }, {144, 0xfc0000, 40 }, {148, 0xfc8000, 40 }, {154, 0xfd0000, 40 }, {156, 0xfd8000, 40 }, { 0, 0x0c0000, 20 }, { 1, 0x0c2000, 20 }, { 2, 0x0c4000, 20 }, { 3, 0x0c6000, 20 } }; #define IRQ_MASK 243 static const struct { unsigned char new_irq; unsigned char old_irq; } irq_table[] = { { 3, 3 }, { 4, 4 }, { 10, 10 }, { 14, 15 } }; static short smc_mca_adapter_ids[] __initdata = { 0x61c8, 0x61c9, 0x6fc0, 0x6fc1, 0x6fc2, 0xefd4, 0xefd5, 0xefe5, 0x0000 }; static char *smc_mca_adapter_names[] __initdata = { "SMC Ethercard PLUS Elite/A BNC/AUI (WD8013EP/A)", "SMC Ethercard PLUS Elite/A UTP/AUI (WD8013WP/A)", "WD Ethercard PLUS/A (WD8003E/A or WD8003ET/A)", "WD Starcard PLUS/A (WD8003ST/A)", "WD Ethercard PLUS 10T/A (WD8003W/A)", "IBM PS/2 Adapter/A for Ethernet UTP/AUI (WD8013WP/A)", "IBM PS/2 Adapter/A for Ethernet BNC/AUI (WD8013EP/A)", "IBM PS/2 Adapter/A for Ethernet", NULL }; static int ultra_found = 0; static int __init ultramca_probe(struct device *gen_dev) { unsigned short ioaddr; struct net_device *dev; unsigned char reg4, num_pages; struct mca_device *mca_dev = to_mca_device(gen_dev); char slot = mca_dev->slot; unsigned char pos2 = 0xff, pos3 = 0xff, pos4 = 0xff, pos5 = 0xff; int i, rc; int adapter = mca_dev->index; int tbase = 0; int tirq = 0; int base_addr = ultra_io[ultra_found]; int irq = ultra_irq[ultra_found]; if (base_addr || irq) { printk(KERN_INFO "Probing for SMC MCA adapter"); if (base_addr) { printk(KERN_INFO " at I/O address 0x%04x%c", base_addr, irq ? ' ' : '\n'); } if (irq) { printk(KERN_INFO "using irq %d\n", irq); } } tirq = 0; tbase = 0; /* If we're trying to match a specificied irq or io address, * we'll reject the adapter found unless it's the one we're * looking for */ pos2 = mca_device_read_stored_pos(mca_dev, 2); /* io_addr */ pos3 = mca_device_read_stored_pos(mca_dev, 3); /* shared mem */ pos4 = mca_device_read_stored_pos(mca_dev, 4); /* ROM bios addr range */ pos5 = mca_device_read_stored_pos(mca_dev, 5); /* irq, media and RIPL */ /* Test the following conditions: * - If an irq parameter is supplied, compare it * with the irq of the adapter we found * - If a base_addr paramater is given, compare it * with the base_addr of the adapter we found * - Check that the irq and the base_addr of the * adapter we found is not already in use by * this driver */ switch (mca_dev->index) { case _61c8_SMC_Ethercard_PLUS_Elite_A_BNC_AUI_WD8013EP_A: case _61c9_SMC_Ethercard_PLUS_Elite_A_UTP_AUI_WD8013EP_A: case _efd4_IBM_PS2_Adapter_A_for_Ethernet_UTP_AUI_WD8013WP_A: case _efd5_IBM_PS2_Adapter_A_for_Ethernet_BNC_AUI_WD8013WP_A: { tbase = addr_table[(pos2 & 0xf0) >> 4].base_addr; tirq = irq_table[(pos5 & 0xc) >> 2].new_irq; break; } case _6fc0_WD_Ethercard_PLUS_A_WD8003E_A_OR_WD8003ET_A: case _6fc1_WD_Starcard_PLUS_A_WD8003ST_A: case _6fc2_WD_Ethercard_PLUS_10T_A_WD8003W_A: case _efe5_IBM_PS2_Adapter_A_for_Ethernet: { tbase = ((pos2 & 0x0fe) * 0x10); tirq = irq_table[(pos5 & 3)].old_irq; break; } } if(!tirq || !tbase || (irq && irq != tirq) || (base_addr && tbase != base_addr)) /* FIXME: we're trying to force the ordering of the * devices here, there should be a way of getting this * to happen */ return -ENXIO; /* Adapter found. */ dev = alloc_ei_netdev(); if(!dev) return -ENODEV; SET_MODULE_OWNER(dev); SET_NETDEV_DEV(dev, gen_dev); mca_device_set_name(mca_dev, smc_mca_adapter_names[adapter]); mca_device_set_claim(mca_dev, 1); printk(KERN_INFO "smc_mca: %s found in slot %d\n", smc_mca_adapter_names[adapter], slot + 1); ultra_found++; dev->base_addr = ioaddr = mca_device_transform_ioport(mca_dev, tbase); dev->irq = mca_device_transform_irq(mca_dev, tirq); dev->mem_start = 0; num_pages = 40; switch (adapter) { /* card-# in const array above [hs] */ case _61c8_SMC_Ethercard_PLUS_Elite_A_BNC_AUI_WD8013EP_A: case _61c9_SMC_Ethercard_PLUS_Elite_A_UTP_AUI_WD8013EP_A: { for (i = 0; i < 16; i++) { /* taking 16 counts * up to 15 [hs] */ if (mem_table[i].mem_index == (pos3 & ~MEM_MASK)) { dev->mem_start = (unsigned long) mca_device_transform_memory(mca_dev, (void *)mem_table[i].mem_start); num_pages = mem_table[i].num_pages; } } break; } case _6fc0_WD_Ethercard_PLUS_A_WD8003E_A_OR_WD8003ET_A: case _6fc1_WD_Starcard_PLUS_A_WD8003ST_A: case _6fc2_WD_Ethercard_PLUS_10T_A_WD8003W_A: case _efe5_IBM_PS2_Adapter_A_for_Ethernet: { dev->mem_start = (unsigned long) mca_device_transform_memory(mca_dev, (void *)((pos3 & 0xfc) * 0x1000)); num_pages = 0x40; break; } case _efd4_IBM_PS2_Adapter_A_for_Ethernet_UTP_AUI_WD8013WP_A: case _efd5_IBM_PS2_Adapter_A_for_Ethernet_BNC_AUI_WD8013WP_A: { /* courtesy of gamera@quartz.ocn.ne.jp, pos3 indicates * the index of the 0x2000 step. * beware different number of pages [hs] */ dev->mem_start = (unsigned long) mca_device_transform_memory(mca_dev, (void *)(0xc0000 + (0x2000 * (pos3 & 0xf)))); num_pages = 0x20 + (2 * (pos3 & 0x10)); break; } } /* sanity check, shouldn't happen */ if (dev->mem_start == 0) { rc = -ENODEV; goto err_unclaim; } if (!request_region(ioaddr, ULTRA_IO_EXTENT, DRV_NAME)) { rc = -ENODEV; goto err_unclaim; } reg4 = inb(ioaddr + 4) & 0x7f; outb(reg4, ioaddr + 4); printk(KERN_INFO "smc_mca[%d]: Parameters: %#3x,", slot + 1, ioaddr); for (i = 0; i < 6; i++) printk(" %2.2X", dev->dev_addr[i] = inb(ioaddr + 8 + i)); /* Switch from the station address to the alternate register set * and read the useful registers there. */ outb(0x80 | reg4, ioaddr + 4); /* Enable FINE16 mode to avoid BIOS ROM width mismatches @ reboot. */ outb(0x80 | inb(ioaddr + 0x0c), ioaddr + 0x0c); /* Switch back to the station address register set so that * the MS-DOS driver can find the card after a warm boot. */ outb(reg4, ioaddr + 4); gen_dev->driver_data = dev; /* The 8390 isn't at the base address, so fake the offset */ dev->base_addr = ioaddr + ULTRA_NIC_OFFSET; ei_status.name = "SMC Ultra MCA"; ei_status.word16 = 1; ei_status.tx_start_page = START_PG; ei_status.rx_start_page = START_PG + TX_PAGES; ei_status.stop_page = num_pages; ei_status.mem = ioremap(dev->mem_start, (ei_status.stop_page - START_PG) * 256); if (!ei_status.mem) { rc = -ENOMEM; goto err_release_region; } dev->mem_end = dev->mem_start + (ei_status.stop_page - START_PG) * 256; printk(", IRQ %d memory %#lx-%#lx.\n", dev->irq, dev->mem_start, dev->mem_end - 1); ei_status.reset_8390 = &ultramca_reset_8390; ei_status.block_input = &ultramca_block_input; ei_status.block_output = &ultramca_block_output; ei_status.get_8390_hdr = &ultramca_get_8390_hdr; ei_status.priv = slot; dev->open = &ultramca_open; dev->stop = &ultramca_close_card; #ifdef CONFIG_NET_POLL_CONTROLLER dev->poll_controller = ei_poll; #endif NS8390_init(dev, 0); rc = register_netdev(dev); if (rc) goto err_unmap; return 0; err_unmap: iounmap(ei_status.mem); err_release_region: release_region(ioaddr, ULTRA_IO_EXTENT); err_unclaim: mca_device_set_claim(mca_dev, 0); free_netdev(dev); return rc; } static int ultramca_open(struct net_device *dev) { int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */ int retval; if ((retval = request_irq(dev->irq, ei_interrupt, 0, dev->name, dev))) return retval; outb(ULTRA_MEMENB, ioaddr); /* Enable memory */ outb(0x80, ioaddr + 5); /* ??? */ outb(0x01, ioaddr + 6); /* Enable interrupts and memory. */ outb(0x04, ioaddr + 5); /* ??? */ /* Set the early receive warning level in window 0 high enough not * to receive ERW interrupts. */ /* outb_p(E8390_NODMA + E8390_PAGE0, dev->base_addr); * outb(0xff, dev->base_addr + EN0_ERWCNT); */ ei_open(dev); return 0; } static void ultramca_reset_8390(struct net_device *dev) { int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */ outb(ULTRA_RESET, ioaddr); if (ei_debug > 1) printk("resetting Ultra, t=%ld...", jiffies); ei_status.txing = 0; outb(0x80, ioaddr + 5); /* ??? */ outb(0x01, ioaddr + 6); /* Enable interrupts and memory. */ if (ei_debug > 1) printk("reset done\n"); return; } /* 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. */ static void ultramca_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page) { void __iomem *hdr_start = ei_status.mem + ((ring_page - START_PG) << 8); #ifdef notdef /* Officially this is what we are doing, but the readl() is faster */ memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr)); #else ((unsigned int*)hdr)[0] = readl(hdr_start); #endif } /* Block input and output are easy on shared memory ethercards, the only * complication is when the ring buffer wraps. */ static void ultramca_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset) { void __iomem *xfer_start = ei_status.mem + ring_offset - START_PG * 256; if (ring_offset + count > ei_status.stop_page * 256) { /* We must wrap the input move. */ int semi_count = ei_status.stop_page * 256 - ring_offset; memcpy_fromio(skb->data, xfer_start, semi_count); count -= semi_count; memcpy_fromio(skb->data + semi_count, ei_status.mem + TX_PAGES * 256, count); } else { /* Packet is in one chunk -- we can copy + cksum. */ eth_io_copy_and_sum(skb, xfer_start, count, 0); } } static void ultramca_block_output(struct net_device *dev, int count, const unsigned char *buf, int start_page) { void __iomem *shmem = ei_status.mem + ((start_page - START_PG) << 8); memcpy_toio(shmem, buf, count); } static int ultramca_close_card(struct net_device *dev) { int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */ netif_stop_queue(dev); if (ei_debug > 1) printk("%s: Shutting down ethercard.\n", dev->name); outb(0x00, ioaddr + 6); /* Disable interrupts. */ free_irq(dev->irq, dev); NS8390_init(dev, 0); /* We should someday disable shared memory and change to 8-bit mode * "just in case"... */ return 0; } static int ultramca_remove(struct device *gen_dev) { struct mca_device *mca_dev = to_mca_device(gen_dev); struct net_device *dev = (struct net_device *)gen_dev->driver_data; if (dev) { /* NB: ultra_close_card() does free_irq */ int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; unregister_netdev(dev); mca_device_set_claim(mca_dev, 0); release_region(ioaddr, ULTRA_IO_EXTENT); iounmap(ei_status.mem); free_netdev(dev); } return 0; } static struct mca_driver ultra_driver = { .id_table = smc_mca_adapter_ids, .driver = { .name = "smc-mca", .bus = &mca_bus_type, .probe = ultramca_probe, .remove = ultramca_remove, } }; static int __init ultramca_init_module(void) { if(!MCA_bus) return -ENXIO; mca_register_driver(&ultra_driver); return ultra_found ? 0 : -ENXIO; } static void __exit ultramca_cleanup_module(void) { mca_unregister_driver(&ultra_driver); } module_init(ultramca_init_module); module_exit(ultramca_cleanup_module);