ondemand: Solve a big performance issue by counting IOWAIT time as busy
[linux/fpc-iii.git] / drivers / net / smc-ultra.c
blob0291ea098a06ca2fe365cb90ed347f1a7ae7ebfb
1 /* smc-ultra.c: A SMC Ultra ethernet driver for linux. */
2 /*
3 This is a driver for the SMC Ultra and SMC EtherEZ ISA ethercards.
5 Written 1993-1998 by Donald Becker.
7 Copyright 1993 United States Government as represented by the
8 Director, National Security Agency.
10 This software may be used and distributed according to the terms
11 of the GNU General Public License, incorporated herein by reference.
13 The author may be reached as becker@scyld.com, or C/O
14 Scyld Computing Corporation
15 410 Severn Ave., Suite 210
16 Annapolis MD 21403
18 This driver uses the cards in the 8390-compatible mode.
19 Most of the run-time complexity is handled by the generic code in
20 8390.c. The code in this file is responsible for
22 ultra_probe() Detecting and initializing the card.
23 ultra_probe1()
24 ultra_probe_isapnp()
26 ultra_open() The card-specific details of starting, stopping
27 ultra_reset_8390() and resetting the 8390 NIC core.
28 ultra_close()
30 ultra_block_input() Routines for reading and writing blocks of
31 ultra_block_output() packet buffer memory.
32 ultra_pio_input()
33 ultra_pio_output()
35 This driver enables the shared memory only when doing the actual data
36 transfers to avoid a bug in early version of the card that corrupted
37 data transferred by a AHA1542.
39 This driver now supports the programmed-I/O (PIO) data transfer mode of
40 the EtherEZ. It does not use the non-8390-compatible "Altego" mode.
41 That support (if available) is in smc-ez.c.
43 Changelog:
45 Paul Gortmaker : multiple card support for module users.
46 Donald Becker : 4/17/96 PIO support, minor potential problems avoided.
47 Donald Becker : 6/6/96 correctly set auto-wrap bit.
48 Alexander Sotirov : 1/20/01 Added support for ISAPnP cards
50 Note about the ISA PnP support:
52 This driver can not autoprobe for more than one SMC EtherEZ PnP card.
53 You have to configure the second card manually through the /proc/isapnp
54 interface and then load the module with an explicit io=0x___ option.
57 static const char version[] =
58 "smc-ultra.c:v2.02 2/3/98 Donald Becker (becker@cesdis.gsfc.nasa.gov)\n";
60 #include <linux/module.h>
61 #include <linux/kernel.h>
62 #include <linux/errno.h>
63 #include <linux/string.h>
64 #include <linux/init.h>
65 #include <linux/isapnp.h>
66 #include <linux/netdevice.h>
67 #include <linux/etherdevice.h>
69 #include <asm/io.h>
70 #include <asm/irq.h>
71 #include <asm/system.h>
73 #include "8390.h"
75 #define DRV_NAME "smc-ultra"
77 /* A zero-terminated list of I/O addresses to be probed. */
78 static unsigned int ultra_portlist[] __initdata =
79 {0x200, 0x220, 0x240, 0x280, 0x300, 0x340, 0x380, 0};
81 static int ultra_probe1(struct net_device *dev, int ioaddr);
83 #ifdef __ISAPNP__
84 static int ultra_probe_isapnp(struct net_device *dev);
85 #endif
87 static int ultra_open(struct net_device *dev);
88 static void ultra_reset_8390(struct net_device *dev);
89 static void ultra_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
90 int ring_page);
91 static void ultra_block_input(struct net_device *dev, int count,
92 struct sk_buff *skb, int ring_offset);
93 static void ultra_block_output(struct net_device *dev, int count,
94 const unsigned char *buf, const int start_page);
95 static void ultra_pio_get_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
96 int ring_page);
97 static void ultra_pio_input(struct net_device *dev, int count,
98 struct sk_buff *skb, int ring_offset);
99 static void ultra_pio_output(struct net_device *dev, int count,
100 const unsigned char *buf, const int start_page);
101 static int ultra_close_card(struct net_device *dev);
103 #ifdef __ISAPNP__
104 static struct isapnp_device_id ultra_device_ids[] __initdata = {
105 { ISAPNP_VENDOR('S','M','C'), ISAPNP_FUNCTION(0x8416),
106 ISAPNP_VENDOR('S','M','C'), ISAPNP_FUNCTION(0x8416),
107 (long) "SMC EtherEZ (8416)" },
108 { } /* terminate list */
111 MODULE_DEVICE_TABLE(isapnp, ultra_device_ids);
112 #endif
115 #define START_PG 0x00 /* First page of TX buffer */
117 #define ULTRA_CMDREG 0 /* Offset to ASIC command register. */
118 #define ULTRA_RESET 0x80 /* Board reset, in ULTRA_CMDREG. */
119 #define ULTRA_MEMENB 0x40 /* Enable the shared memory. */
120 #define IOPD 0x02 /* I/O Pipe Data (16 bits), PIO operation. */
121 #define IOPA 0x07 /* I/O Pipe Address for PIO operation. */
122 #define ULTRA_NIC_OFFSET 16 /* NIC register offset from the base_addr. */
123 #define ULTRA_IO_EXTENT 32
124 #define EN0_ERWCNT 0x08 /* Early receive warning count. */
126 #ifdef CONFIG_NET_POLL_CONTROLLER
127 static void ultra_poll(struct net_device *dev)
129 disable_irq(dev->irq);
130 ei_interrupt(dev->irq, dev);
131 enable_irq(dev->irq);
133 #endif
134 /* Probe for the Ultra. This looks like a 8013 with the station
135 address PROM at I/O ports <base>+8 to <base>+13, with a checksum
136 following.
139 static int __init do_ultra_probe(struct net_device *dev)
141 int i;
142 int base_addr = dev->base_addr;
143 int irq = dev->irq;
145 if (base_addr > 0x1ff) /* Check a single specified location. */
146 return ultra_probe1(dev, base_addr);
147 else if (base_addr != 0) /* Don't probe at all. */
148 return -ENXIO;
150 #ifdef __ISAPNP__
151 /* Look for any installed ISAPnP cards */
152 if (isapnp_present() && (ultra_probe_isapnp(dev) == 0))
153 return 0;
154 #endif
156 for (i = 0; ultra_portlist[i]; i++) {
157 dev->irq = irq;
158 if (ultra_probe1(dev, ultra_portlist[i]) == 0)
159 return 0;
162 return -ENODEV;
165 #ifndef MODULE
166 struct net_device * __init ultra_probe(int unit)
168 struct net_device *dev = alloc_ei_netdev();
169 int err;
171 if (!dev)
172 return ERR_PTR(-ENOMEM);
174 sprintf(dev->name, "eth%d", unit);
175 netdev_boot_setup_check(dev);
177 err = do_ultra_probe(dev);
178 if (err)
179 goto out;
180 return dev;
181 out:
182 free_netdev(dev);
183 return ERR_PTR(err);
185 #endif
187 static const struct net_device_ops ultra_netdev_ops = {
188 .ndo_open = ultra_open,
189 .ndo_stop = ultra_close_card,
191 .ndo_start_xmit = ei_start_xmit,
192 .ndo_tx_timeout = ei_tx_timeout,
193 .ndo_get_stats = ei_get_stats,
194 .ndo_set_multicast_list = ei_set_multicast_list,
195 .ndo_validate_addr = eth_validate_addr,
196 .ndo_set_mac_address = eth_mac_addr,
197 .ndo_change_mtu = eth_change_mtu,
198 #ifdef CONFIG_NET_POLL_CONTROLLER
199 .ndo_poll_controller = ultra_poll,
200 #endif
203 static int __init ultra_probe1(struct net_device *dev, int ioaddr)
205 int i, retval;
206 int checksum = 0;
207 const char *model_name;
208 unsigned char eeprom_irq = 0;
209 static unsigned version_printed;
210 /* Values from various config regs. */
211 unsigned char num_pages, irqreg, addr, piomode;
212 unsigned char idreg = inb(ioaddr + 7);
213 unsigned char reg4 = inb(ioaddr + 4) & 0x7f;
215 if (!request_region(ioaddr, ULTRA_IO_EXTENT, DRV_NAME))
216 return -EBUSY;
218 /* Check the ID nibble. */
219 if ((idreg & 0xF0) != 0x20 /* SMC Ultra */
220 && (idreg & 0xF0) != 0x40) { /* SMC EtherEZ */
221 retval = -ENODEV;
222 goto out;
225 /* Select the station address register set. */
226 outb(reg4, ioaddr + 4);
228 for (i = 0; i < 8; i++)
229 checksum += inb(ioaddr + 8 + i);
230 if ((checksum & 0xff) != 0xFF) {
231 retval = -ENODEV;
232 goto out;
235 if (ei_debug && version_printed++ == 0)
236 printk(version);
238 model_name = (idreg & 0xF0) == 0x20 ? "SMC Ultra" : "SMC EtherEZ";
240 for (i = 0; i < 6; i++)
241 dev->dev_addr[i] = inb(ioaddr + 8 + i);
243 printk("%s: %s at %#3x, %pM", dev->name, model_name,
244 ioaddr, dev->dev_addr);
246 /* Switch from the station address to the alternate register set and
247 read the useful registers there. */
248 outb(0x80 | reg4, ioaddr + 4);
250 /* Enabled FINE16 mode to avoid BIOS ROM width mismatches @ reboot. */
251 outb(0x80 | inb(ioaddr + 0x0c), ioaddr + 0x0c);
252 piomode = inb(ioaddr + 0x8);
253 addr = inb(ioaddr + 0xb);
254 irqreg = inb(ioaddr + 0xd);
256 /* Switch back to the station address register set so that the MS-DOS driver
257 can find the card after a warm boot. */
258 outb(reg4, ioaddr + 4);
260 if (dev->irq < 2) {
261 unsigned char irqmap[] = {0, 9, 3, 5, 7, 10, 11, 15};
262 int irq;
264 /* The IRQ bits are split. */
265 irq = irqmap[((irqreg & 0x40) >> 4) + ((irqreg & 0x0c) >> 2)];
267 if (irq == 0) {
268 printk(", failed to detect IRQ line.\n");
269 retval = -EAGAIN;
270 goto out;
272 dev->irq = irq;
273 eeprom_irq = 1;
276 /* The 8390 isn't at the base address, so fake the offset */
277 dev->base_addr = ioaddr+ULTRA_NIC_OFFSET;
280 int addr_tbl[4] = {0x0C0000, 0x0E0000, 0xFC0000, 0xFE0000};
281 short num_pages_tbl[4] = {0x20, 0x40, 0x80, 0xff};
283 dev->mem_start = ((addr & 0x0f) << 13) + addr_tbl[(addr >> 6) & 3] ;
284 num_pages = num_pages_tbl[(addr >> 4) & 3];
287 ei_status.name = model_name;
288 ei_status.word16 = 1;
289 ei_status.tx_start_page = START_PG;
290 ei_status.rx_start_page = START_PG + TX_PAGES;
291 ei_status.stop_page = num_pages;
293 ei_status.mem = ioremap(dev->mem_start, (ei_status.stop_page - START_PG)*256);
294 if (!ei_status.mem) {
295 printk(", failed to ioremap.\n");
296 retval = -ENOMEM;
297 goto out;
300 dev->mem_end = dev->mem_start + (ei_status.stop_page - START_PG)*256;
302 if (piomode) {
303 printk(",%s IRQ %d programmed-I/O mode.\n",
304 eeprom_irq ? "EEPROM" : "assigned ", dev->irq);
305 ei_status.block_input = &ultra_pio_input;
306 ei_status.block_output = &ultra_pio_output;
307 ei_status.get_8390_hdr = &ultra_pio_get_hdr;
308 } else {
309 printk(",%s IRQ %d memory %#lx-%#lx.\n", eeprom_irq ? "" : "assigned ",
310 dev->irq, dev->mem_start, dev->mem_end-1);
311 ei_status.block_input = &ultra_block_input;
312 ei_status.block_output = &ultra_block_output;
313 ei_status.get_8390_hdr = &ultra_get_8390_hdr;
315 ei_status.reset_8390 = &ultra_reset_8390;
317 dev->netdev_ops = &ultra_netdev_ops;
318 NS8390_init(dev, 0);
320 retval = register_netdev(dev);
321 if (retval)
322 goto out;
323 return 0;
324 out:
325 release_region(ioaddr, ULTRA_IO_EXTENT);
326 return retval;
329 #ifdef __ISAPNP__
330 static int __init ultra_probe_isapnp(struct net_device *dev)
332 int i;
334 for (i = 0; ultra_device_ids[i].vendor != 0; i++) {
335 struct pnp_dev *idev = NULL;
337 while ((idev = pnp_find_dev(NULL,
338 ultra_device_ids[i].vendor,
339 ultra_device_ids[i].function,
340 idev))) {
341 /* Avoid already found cards from previous calls */
342 if (pnp_device_attach(idev) < 0)
343 continue;
344 if (pnp_activate_dev(idev) < 0) {
345 __again:
346 pnp_device_detach(idev);
347 continue;
349 /* if no io and irq, search for next */
350 if (!pnp_port_valid(idev, 0) || !pnp_irq_valid(idev, 0))
351 goto __again;
352 /* found it */
353 dev->base_addr = pnp_port_start(idev, 0);
354 dev->irq = pnp_irq(idev, 0);
355 printk(KERN_INFO "smc-ultra.c: ISAPnP reports %s at i/o %#lx, irq %d.\n",
356 (char *) ultra_device_ids[i].driver_data,
357 dev->base_addr, dev->irq);
358 if (ultra_probe1(dev, dev->base_addr) != 0) { /* Shouldn't happen. */
359 printk(KERN_ERR "smc-ultra.c: Probe of ISAPnP card at %#lx failed.\n", dev->base_addr);
360 pnp_device_detach(idev);
361 return -ENXIO;
363 ei_status.priv = (unsigned long)idev;
364 break;
366 if (!idev)
367 continue;
368 return 0;
371 return -ENODEV;
373 #endif
375 static int
376 ultra_open(struct net_device *dev)
378 int retval;
379 int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */
380 unsigned char irq2reg[] = {0, 0, 0x04, 0x08, 0, 0x0C, 0, 0x40,
381 0, 0x04, 0x44, 0x48, 0, 0, 0, 0x4C, };
383 retval = request_irq(dev->irq, ei_interrupt, 0, dev->name, dev);
384 if (retval)
385 return retval;
387 outb(0x00, ioaddr); /* Disable shared memory for safety. */
388 outb(0x80, ioaddr + 5);
389 /* Set the IRQ line. */
390 outb(inb(ioaddr + 4) | 0x80, ioaddr + 4);
391 outb((inb(ioaddr + 13) & ~0x4C) | irq2reg[dev->irq], ioaddr + 13);
392 outb(inb(ioaddr + 4) & 0x7f, ioaddr + 4);
394 if (ei_status.block_input == &ultra_pio_input) {
395 outb(0x11, ioaddr + 6); /* Enable interrupts and PIO. */
396 outb(0x01, ioaddr + 0x19); /* Enable ring read auto-wrap. */
397 } else
398 outb(0x01, ioaddr + 6); /* Enable interrupts and memory. */
399 /* Set the early receive warning level in window 0 high enough not
400 to receive ERW interrupts. */
401 outb_p(E8390_NODMA+E8390_PAGE0, dev->base_addr);
402 outb(0xff, dev->base_addr + EN0_ERWCNT);
403 ei_open(dev);
404 return 0;
407 static void
408 ultra_reset_8390(struct net_device *dev)
410 int cmd_port = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC base addr */
412 outb(ULTRA_RESET, cmd_port);
413 if (ei_debug > 1) printk("resetting Ultra, t=%ld...", jiffies);
414 ei_status.txing = 0;
416 outb(0x00, cmd_port); /* Disable shared memory for safety. */
417 outb(0x80, cmd_port + 5);
418 if (ei_status.block_input == &ultra_pio_input)
419 outb(0x11, cmd_port + 6); /* Enable interrupts and PIO. */
420 else
421 outb(0x01, cmd_port + 6); /* Enable interrupts and memory. */
423 if (ei_debug > 1) printk("reset done\n");
424 return;
427 /* Grab the 8390 specific header. Similar to the block_input routine, but
428 we don't need to be concerned with ring wrap as the header will be at
429 the start of a page, so we optimize accordingly. */
431 static void
432 ultra_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
434 void __iomem *hdr_start = ei_status.mem + ((ring_page - START_PG)<<8);
436 outb(ULTRA_MEMENB, dev->base_addr - ULTRA_NIC_OFFSET); /* shmem on */
437 #ifdef __BIG_ENDIAN
438 /* Officially this is what we are doing, but the readl() is faster */
439 /* unfortunately it isn't endian aware of the struct */
440 memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
441 hdr->count = le16_to_cpu(hdr->count);
442 #else
443 ((unsigned int*)hdr)[0] = readl(hdr_start);
444 #endif
445 outb(0x00, dev->base_addr - ULTRA_NIC_OFFSET); /* shmem off */
448 /* Block input and output are easy on shared memory ethercards, the only
449 complication is when the ring buffer wraps. */
451 static void
452 ultra_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
454 void __iomem *xfer_start = ei_status.mem + ring_offset - (START_PG<<8);
456 /* Enable shared memory. */
457 outb(ULTRA_MEMENB, dev->base_addr - ULTRA_NIC_OFFSET);
459 if (ring_offset + count > ei_status.stop_page*256) {
460 /* We must wrap the input move. */
461 int semi_count = ei_status.stop_page*256 - ring_offset;
462 memcpy_fromio(skb->data, xfer_start, semi_count);
463 count -= semi_count;
464 memcpy_fromio(skb->data + semi_count, ei_status.mem + TX_PAGES * 256, count);
465 } else {
466 memcpy_fromio(skb->data, xfer_start, count);
469 outb(0x00, dev->base_addr - ULTRA_NIC_OFFSET); /* Disable memory. */
472 static void
473 ultra_block_output(struct net_device *dev, int count, const unsigned char *buf,
474 int start_page)
476 void __iomem *shmem = ei_status.mem + ((start_page - START_PG)<<8);
478 /* Enable shared memory. */
479 outb(ULTRA_MEMENB, dev->base_addr - ULTRA_NIC_OFFSET);
481 memcpy_toio(shmem, buf, count);
483 outb(0x00, dev->base_addr - ULTRA_NIC_OFFSET); /* Disable memory. */
486 /* The identical operations for programmed I/O cards.
487 The PIO model is trivial to use: the 16 bit start address is written
488 byte-sequentially to IOPA, with no intervening I/O operations, and the
489 data is read or written to the IOPD data port.
490 The only potential complication is that the address register is shared
491 and must be always be rewritten between each read/write direction change.
492 This is no problem for us, as the 8390 code ensures that we are single
493 threaded. */
494 static void ultra_pio_get_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
495 int ring_page)
497 int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */
498 outb(0x00, ioaddr + IOPA); /* Set the address, LSB first. */
499 outb(ring_page, ioaddr + IOPA);
500 insw(ioaddr + IOPD, hdr, sizeof(struct e8390_pkt_hdr)>>1);
503 static void ultra_pio_input(struct net_device *dev, int count,
504 struct sk_buff *skb, int ring_offset)
506 int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */
507 char *buf = skb->data;
509 /* For now set the address again, although it should already be correct. */
510 outb(ring_offset, ioaddr + IOPA); /* Set the address, LSB first. */
511 outb(ring_offset >> 8, ioaddr + IOPA);
512 /* We know skbuffs are padded to at least word alignment. */
513 insw(ioaddr + IOPD, buf, (count+1)>>1);
516 static void ultra_pio_output(struct net_device *dev, int count,
517 const unsigned char *buf, const int start_page)
519 int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* ASIC addr */
520 outb(0x00, ioaddr + IOPA); /* Set the address, LSB first. */
521 outb(start_page, ioaddr + IOPA);
522 /* An extra odd byte is OK here as well. */
523 outsw(ioaddr + IOPD, buf, (count+1)>>1);
526 static int
527 ultra_close_card(struct net_device *dev)
529 int ioaddr = dev->base_addr - ULTRA_NIC_OFFSET; /* CMDREG */
531 netif_stop_queue(dev);
533 if (ei_debug > 1)
534 printk("%s: Shutting down ethercard.\n", dev->name);
536 outb(0x00, ioaddr + 6); /* Disable interrupts. */
537 free_irq(dev->irq, dev);
539 NS8390_init(dev, 0);
541 /* We should someday disable shared memory and change to 8-bit mode
542 "just in case"... */
544 return 0;
548 #ifdef MODULE
549 #define MAX_ULTRA_CARDS 4 /* Max number of Ultra cards per module */
550 static struct net_device *dev_ultra[MAX_ULTRA_CARDS];
551 static int io[MAX_ULTRA_CARDS];
552 static int irq[MAX_ULTRA_CARDS];
554 module_param_array(io, int, NULL, 0);
555 module_param_array(irq, int, NULL, 0);
556 MODULE_PARM_DESC(io, "I/O base address(es)");
557 MODULE_PARM_DESC(irq, "IRQ number(s) (assigned)");
558 MODULE_DESCRIPTION("SMC Ultra/EtherEZ ISA/PnP Ethernet driver");
559 MODULE_LICENSE("GPL");
561 /* This is set up so that only a single autoprobe takes place per call.
562 ISA device autoprobes on a running machine are not recommended. */
563 int __init
564 init_module(void)
566 struct net_device *dev;
567 int this_dev, found = 0;
569 for (this_dev = 0; this_dev < MAX_ULTRA_CARDS; this_dev++) {
570 if (io[this_dev] == 0) {
571 if (this_dev != 0) break; /* only autoprobe 1st one */
572 printk(KERN_NOTICE "smc-ultra.c: Presently autoprobing (not recommended) for a single card.\n");
574 dev = alloc_ei_netdev();
575 if (!dev)
576 break;
577 dev->irq = irq[this_dev];
578 dev->base_addr = io[this_dev];
579 if (do_ultra_probe(dev) == 0) {
580 dev_ultra[found++] = dev;
581 continue;
583 free_netdev(dev);
584 printk(KERN_WARNING "smc-ultra.c: No SMC Ultra card found (i/o = 0x%x).\n", io[this_dev]);
585 break;
587 if (found)
588 return 0;
589 return -ENXIO;
592 static void cleanup_card(struct net_device *dev)
594 /* NB: ultra_close_card() does free_irq */
595 #ifdef __ISAPNP__
596 struct pnp_dev *idev = (struct pnp_dev *)ei_status.priv;
597 if (idev)
598 pnp_device_detach(idev);
599 #endif
600 release_region(dev->base_addr - ULTRA_NIC_OFFSET, ULTRA_IO_EXTENT);
601 iounmap(ei_status.mem);
604 void __exit
605 cleanup_module(void)
607 int this_dev;
609 for (this_dev = 0; this_dev < MAX_ULTRA_CARDS; this_dev++) {
610 struct net_device *dev = dev_ultra[this_dev];
611 if (dev) {
612 unregister_netdev(dev);
613 cleanup_card(dev);
614 free_netdev(dev);
618 #endif /* MODULE */