[IB] mthca: Fix memory leak on device close
[linux-2.6] / drivers / net / ne.c
1 /* ne.c: A general non-shared-memory NS8390 ethernet driver for linux. */
2 /*
3     Written 1992-94 by Donald Becker.
4
5     Copyright 1993 United States Government as represented by the
6     Director, National Security Agency.
7
8     This software may be used and distributed according to the terms
9     of the GNU General Public License, incorporated herein by reference.
10
11     The author may be reached as becker@scyld.com, or C/O
12     Scyld Computing Corporation, 410 Severn Ave., Suite 210, Annapolis MD 21403
13
14     This driver should work with many programmed-I/O 8390-based ethernet
15     boards.  Currently it supports the NE1000, NE2000, many clones,
16     and some Cabletron products.
17
18     Changelog:
19
20     Paul Gortmaker      : use ENISR_RDC to monitor Tx PIO uploads, made
21                           sanity checks and bad clone support optional.
22     Paul Gortmaker      : new reset code, reset card after probe at boot.
23     Paul Gortmaker      : multiple card support for module users.
24     Paul Gortmaker      : Support for PCI ne2k clones, similar to lance.c
25     Paul Gortmaker      : Allow users with bad cards to avoid full probe.
26     Paul Gortmaker      : PCI probe changes, more PCI cards supported.
27     rjohnson@analogic.com : Changed init order so an interrupt will only
28     occur after memory is allocated for dev->priv. Deallocated memory
29     last in cleanup_modue()
30     Richard Guenther    : Added support for ISAPnP cards
31     Paul Gortmaker      : Discontinued PCI support - use ne2k-pci.c instead.
32     Hayato Fujiwara     : Add m32r support.
33
34 */
35
36 /* Routines for the NatSemi-based designs (NE[12]000). */
37
38 static const char version1[] =
39 "ne.c:v1.10 9/23/94 Donald Becker (becker@scyld.com)\n";
40 static const char version2[] =
41 "Last modified Nov 1, 2000 by Paul Gortmaker\n";
42
43
44 #include <linux/module.h>
45 #include <linux/kernel.h>
46 #include <linux/errno.h>
47 #include <linux/isapnp.h>
48 #include <linux/init.h>
49 #include <linux/interrupt.h>
50 #include <linux/delay.h>
51 #include <linux/netdevice.h>
52 #include <linux/etherdevice.h>
53
54 #include <asm/system.h>
55 #include <asm/io.h>
56
57 #include "8390.h"
58
59 #define DRV_NAME "ne"
60
61 /* Some defines that people can play with if so inclined. */
62
63 /* Do we support clones that don't adhere to 14,15 of the SAprom ? */
64 #define SUPPORT_NE_BAD_CLONES
65
66 /* Do we perform extra sanity checks on stuff ? */
67 /* #define NE_SANITY_CHECK */
68
69 /* Do we implement the read before write bugfix ? */
70 /* #define NE_RW_BUGFIX */
71
72 /* Do we have a non std. amount of memory? (in units of 256 byte pages) */
73 /* #define PACKETBUF_MEMSIZE    0x40 */
74
75 /* A zero-terminated list of I/O addresses to be probed at boot. */
76 #ifndef MODULE
77 static unsigned int netcard_portlist[] __initdata = {
78         0x300, 0x280, 0x320, 0x340, 0x360, 0x380, 0
79 };
80 #endif
81
82 static struct isapnp_device_id isapnp_clone_list[] __initdata = {
83         {       ISAPNP_CARD_ID('A','X','E',0x2011),
84                 ISAPNP_VENDOR('A','X','E'), ISAPNP_FUNCTION(0x2011),
85                 (long) "NetGear EA201" },
86         {       ISAPNP_ANY_ID, ISAPNP_ANY_ID,
87                 ISAPNP_VENDOR('E','D','I'), ISAPNP_FUNCTION(0x0216),
88                 (long) "NN NE2000" },
89         {       ISAPNP_ANY_ID, ISAPNP_ANY_ID,
90                 ISAPNP_VENDOR('P','N','P'), ISAPNP_FUNCTION(0x80d6),
91                 (long) "Generic PNP" },
92         { }     /* terminate list */
93 };
94
95 MODULE_DEVICE_TABLE(isapnp, isapnp_clone_list);
96
97 #ifdef SUPPORT_NE_BAD_CLONES
98 /* A list of bad clones that we none-the-less recognize. */
99 static struct { const char *name8, *name16; unsigned char SAprefix[4];}
100 bad_clone_list[] __initdata = {
101     {"DE100", "DE200", {0x00, 0xDE, 0x01,}},
102     {"DE120", "DE220", {0x00, 0x80, 0xc8,}},
103     {"DFI1000", "DFI2000", {'D', 'F', 'I',}}, /* Original, eh?  */
104     {"EtherNext UTP8", "EtherNext UTP16", {0x00, 0x00, 0x79}},
105     {"NE1000","NE2000-invalid", {0x00, 0x00, 0xd8}}, /* Ancient real NE1000. */
106     {"NN1000", "NN2000",  {0x08, 0x03, 0x08}}, /* Outlaw no-name clone. */
107     {"4-DIM8","4-DIM16", {0x00,0x00,0x4d,}},  /* Outlaw 4-Dimension cards. */
108     {"Con-Intl_8", "Con-Intl_16", {0x00, 0x00, 0x24}}, /* Connect Int'nl */
109     {"ET-100","ET-200", {0x00, 0x45, 0x54}}, /* YANG and YA clone */
110     {"COMPEX","COMPEX16",{0x00,0x80,0x48}}, /* Broken ISA Compex cards */
111     {"E-LAN100", "E-LAN200", {0x00, 0x00, 0x5d}}, /* Broken ne1000 clones */
112     {"PCM-4823", "PCM-4823", {0x00, 0xc0, 0x6c}}, /* Broken Advantech MoBo */
113     {"REALTEK", "RTL8019", {0x00, 0x00, 0xe8}}, /* no-name with Realtek chip */
114     {"LCS-8834", "LCS-8836", {0x04, 0x04, 0x37}}, /* ShinyNet (SET) */
115     {NULL,}
116 };
117 #endif
118
119 /* ---- No user-serviceable parts below ---- */
120
121 #define NE_BASE  (dev->base_addr)
122 #define NE_CMD          0x00
123 #define NE_DATAPORT     0x10    /* NatSemi-defined port window offset. */
124 #define NE_RESET        0x1f    /* Issue a read to reset, a write to clear. */
125 #define NE_IO_EXTENT    0x20
126
127 #define NE1SM_START_PG  0x20    /* First page of TX buffer */
128 #define NE1SM_STOP_PG   0x40    /* Last page +1 of RX ring */
129 #define NESM_START_PG   0x40    /* First page of TX buffer */
130 #define NESM_STOP_PG    0x80    /* Last page +1 of RX ring */
131
132 #if defined(CONFIG_PLAT_MAPPI)
133 #  define DCR_VAL 0x4b
134 #elif defined(CONFIG_PLAT_OAKS32R)
135 #  define DCR_VAL 0x48
136 #else
137 #  define DCR_VAL 0x49
138 #endif
139
140 static int ne_probe1(struct net_device *dev, int ioaddr);
141 static int ne_probe_isapnp(struct net_device *dev);
142
143 static int ne_open(struct net_device *dev);
144 static int ne_close(struct net_device *dev);
145
146 static void ne_reset_8390(struct net_device *dev);
147 static void ne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
148                           int ring_page);
149 static void ne_block_input(struct net_device *dev, int count,
150                           struct sk_buff *skb, int ring_offset);
151 static void ne_block_output(struct net_device *dev, const int count,
152                 const unsigned char *buf, const int start_page);
153
154 \f
155 /*  Probe for various non-shared-memory ethercards.
156
157    NEx000-clone boards have a Station Address PROM (SAPROM) in the packet
158    buffer memory space.  NE2000 clones have 0x57,0x57 in bytes 0x0e,0x0f of
159    the SAPROM, while other supposed NE2000 clones must be detected by their
160    SA prefix.
161
162    Reading the SAPROM from a word-wide card with the 8390 set in byte-wide
163    mode results in doubled values, which can be detected and compensated for.
164
165    The probe is also responsible for initializing the card and filling
166    in the 'dev' and 'ei_status' structures.
167
168    We use the minimum memory size for some ethercard product lines, iff we can't
169    distinguish models.  You can increase the packet buffer size by setting
170    PACKETBUF_MEMSIZE.  Reported Cabletron packet buffer locations are:
171         E1010   starts at 0x100 and ends at 0x2000.
172         E1010-x starts at 0x100 and ends at 0x8000. ("-x" means "more memory")
173         E2010    starts at 0x100 and ends at 0x4000.
174         E2010-x starts at 0x100 and ends at 0xffff.  */
175
176 static int __init do_ne_probe(struct net_device *dev)
177 {
178         unsigned int base_addr = dev->base_addr;
179 #ifndef MODULE
180         int orig_irq = dev->irq;
181 #endif
182
183         SET_MODULE_OWNER(dev);
184
185         /* First check any supplied i/o locations. User knows best. <cough> */
186         if (base_addr > 0x1ff)  /* Check a single specified location. */
187                 return ne_probe1(dev, base_addr);
188         else if (base_addr != 0)        /* Don't probe at all. */
189                 return -ENXIO;
190
191         /* Then look for any installed ISAPnP clones */
192         if (isapnp_present() && (ne_probe_isapnp(dev) == 0))
193                 return 0;
194
195 #ifndef MODULE
196         /* Last resort. The semi-risky ISA auto-probe. */
197         for (base_addr = 0; netcard_portlist[base_addr] != 0; base_addr++) {
198                 int ioaddr = netcard_portlist[base_addr];
199                 dev->irq = orig_irq;
200                 if (ne_probe1(dev, ioaddr) == 0)
201                         return 0;
202         }
203 #endif
204
205         return -ENODEV;
206 }
207
208 static void cleanup_card(struct net_device *dev)
209 {
210         struct pnp_dev *idev = (struct pnp_dev *)ei_status.priv;
211         if (idev)
212                 pnp_device_detach(idev);
213         free_irq(dev->irq, dev);
214         release_region(dev->base_addr, NE_IO_EXTENT);
215 }
216
217 #ifndef MODULE
218 struct net_device * __init ne_probe(int unit)
219 {
220         struct net_device *dev = alloc_ei_netdev();
221         int err;
222
223         if (!dev)
224                 return ERR_PTR(-ENOMEM);
225
226         sprintf(dev->name, "eth%d", unit);
227         netdev_boot_setup_check(dev);
228
229         err = do_ne_probe(dev);
230         if (err)
231                 goto out;
232         return dev;
233 out:
234         free_netdev(dev);
235         return ERR_PTR(err);
236 }
237 #endif
238
239 static int __init ne_probe_isapnp(struct net_device *dev)
240 {
241         int i;
242
243         for (i = 0; isapnp_clone_list[i].vendor != 0; i++) {
244                 struct pnp_dev *idev = NULL;
245
246                 while ((idev = pnp_find_dev(NULL,
247                                             isapnp_clone_list[i].vendor,
248                                             isapnp_clone_list[i].function,
249                                             idev))) {
250                         /* Avoid already found cards from previous calls */
251                         if (pnp_device_attach(idev) < 0)
252                                 continue;
253                         if (pnp_activate_dev(idev) < 0) {
254                                 pnp_device_detach(idev);
255                                 continue;
256                         }
257                         /* if no io and irq, search for next */
258                         if (!pnp_port_valid(idev, 0) || !pnp_irq_valid(idev, 0)) {
259                                 pnp_device_detach(idev);
260                                 continue;
261                         }
262                         /* found it */
263                         dev->base_addr = pnp_port_start(idev, 0);
264                         dev->irq = pnp_irq(idev, 0);
265                         printk(KERN_INFO "ne.c: ISAPnP reports %s at i/o %#lx, irq %d.\n",
266                                 (char *) isapnp_clone_list[i].driver_data,
267                                 dev->base_addr, dev->irq);
268                         if (ne_probe1(dev, dev->base_addr) != 0) {      /* Shouldn't happen. */
269                                 printk(KERN_ERR "ne.c: Probe of ISAPnP card at %#lx failed.\n", dev->base_addr);
270                                 pnp_device_detach(idev);
271                                 return -ENXIO;
272                         }
273                         ei_status.priv = (unsigned long)idev;
274                         break;
275                 }
276                 if (!idev)
277                         continue;
278                 return 0;
279         }
280
281         return -ENODEV;
282 }
283
284 static int __init ne_probe1(struct net_device *dev, int ioaddr)
285 {
286         int i;
287         unsigned char SA_prom[32];
288         int wordlength = 2;
289         const char *name = NULL;
290         int start_page, stop_page;
291         int neX000, ctron, copam, bad_card;
292         int reg0, ret;
293         static unsigned version_printed;
294
295         if (!request_region(ioaddr, NE_IO_EXTENT, DRV_NAME))
296                 return -EBUSY;
297
298         reg0 = inb_p(ioaddr);
299         if (reg0 == 0xFF) {
300                 ret = -ENODEV;
301                 goto err_out;
302         }
303
304         /* Do a preliminary verification that we have a 8390. */
305         {
306                 int regd;
307                 outb_p(E8390_NODMA+E8390_PAGE1+E8390_STOP, ioaddr + E8390_CMD);
308                 regd = inb_p(ioaddr + 0x0d);
309                 outb_p(0xff, ioaddr + 0x0d);
310                 outb_p(E8390_NODMA+E8390_PAGE0, ioaddr + E8390_CMD);
311                 inb_p(ioaddr + EN0_COUNTER0); /* Clear the counter by reading. */
312                 if (inb_p(ioaddr + EN0_COUNTER0) != 0) {
313                         outb_p(reg0, ioaddr);
314                         outb_p(regd, ioaddr + 0x0d);    /* Restore the old values. */
315                         ret = -ENODEV;
316                         goto err_out;
317                 }
318         }
319
320         if (ei_debug  &&  version_printed++ == 0)
321                 printk(KERN_INFO "%s" KERN_INFO "%s", version1, version2);
322
323         printk(KERN_INFO "NE*000 ethercard probe at %#3x:", ioaddr);
324
325         /* A user with a poor card that fails to ack the reset, or that
326            does not have a valid 0x57,0x57 signature can still use this
327            without having to recompile. Specifying an i/o address along
328            with an otherwise unused dev->mem_end value of "0xBAD" will
329            cause the driver to skip these parts of the probe. */
330
331         bad_card = ((dev->base_addr != 0) && (dev->mem_end == 0xbad));
332
333         /* Reset card. Who knows what dain-bramaged state it was left in. */
334
335         {
336                 unsigned long reset_start_time = jiffies;
337
338                 /* DON'T change these to inb_p/outb_p or reset will fail on clones. */
339                 outb(inb(ioaddr + NE_RESET), ioaddr + NE_RESET);
340
341                 while ((inb_p(ioaddr + EN0_ISR) & ENISR_RESET) == 0)
342                 if (jiffies - reset_start_time > 2*HZ/100) {
343                         if (bad_card) {
344                                 printk(" (warning: no reset ack)");
345                                 break;
346                         } else {
347                                 printk(" not found (no reset ack).\n");
348                                 ret = -ENODEV;
349                                 goto err_out;
350                         }
351                 }
352
353                 outb_p(0xff, ioaddr + EN0_ISR);         /* Ack all intr. */
354         }
355
356         /* Read the 16 bytes of station address PROM.
357            We must first initialize registers, similar to NS8390_init(eifdev, 0).
358            We can't reliably read the SAPROM address without this.
359            (I learned the hard way!). */
360         {
361                 struct {unsigned char value, offset; } program_seq[] =
362                 {
363                         {E8390_NODMA+E8390_PAGE0+E8390_STOP, E8390_CMD}, /* Select page 0*/
364                         {0x48,  EN0_DCFG},      /* Set byte-wide (0x48) access. */
365                         {0x00,  EN0_RCNTLO},    /* Clear the count regs. */
366                         {0x00,  EN0_RCNTHI},
367                         {0x00,  EN0_IMR},       /* Mask completion irq. */
368                         {0xFF,  EN0_ISR},
369                         {E8390_RXOFF, EN0_RXCR},        /* 0x20  Set to monitor */
370                         {E8390_TXOFF, EN0_TXCR},        /* 0x02  and loopback mode. */
371                         {32,    EN0_RCNTLO},
372                         {0x00,  EN0_RCNTHI},
373                         {0x00,  EN0_RSARLO},    /* DMA starting at 0x0000. */
374                         {0x00,  EN0_RSARHI},
375                         {E8390_RREAD+E8390_START, E8390_CMD},
376                 };
377
378                 for (i = 0; i < sizeof(program_seq)/sizeof(program_seq[0]); i++)
379                         outb_p(program_seq[i].value, ioaddr + program_seq[i].offset);
380
381         }
382         for(i = 0; i < 32 /*sizeof(SA_prom)*/; i+=2) {
383                 SA_prom[i] = inb(ioaddr + NE_DATAPORT);
384                 SA_prom[i+1] = inb(ioaddr + NE_DATAPORT);
385                 if (SA_prom[i] != SA_prom[i+1])
386                         wordlength = 1;
387         }
388
389         if (wordlength == 2)
390         {
391                 for (i = 0; i < 16; i++)
392                         SA_prom[i] = SA_prom[i+i];
393                 /* We must set the 8390 for word mode. */
394                 outb_p(DCR_VAL, ioaddr + EN0_DCFG);
395                 start_page = NESM_START_PG;
396                 stop_page = NESM_STOP_PG;
397         } else {
398                 start_page = NE1SM_START_PG;
399                 stop_page = NE1SM_STOP_PG;
400         }
401
402 #if  defined(CONFIG_PLAT_MAPPI) || defined(CONFIG_PLAT_OAKS32R)
403         neX000 = ((SA_prom[14] == 0x57  &&  SA_prom[15] == 0x57)
404                 || (SA_prom[14] == 0x42 && SA_prom[15] == 0x42));
405 #else
406         neX000 = (SA_prom[14] == 0x57  &&  SA_prom[15] == 0x57);
407 #endif
408         ctron =  (SA_prom[0] == 0x00 && SA_prom[1] == 0x00 && SA_prom[2] == 0x1d);
409         copam =  (SA_prom[14] == 0x49 && SA_prom[15] == 0x00);
410
411         /* Set up the rest of the parameters. */
412         if (neX000 || bad_card || copam) {
413                 name = (wordlength == 2) ? "NE2000" : "NE1000";
414         }
415         else if (ctron)
416         {
417                 name = (wordlength == 2) ? "Ctron-8" : "Ctron-16";
418                 start_page = 0x01;
419                 stop_page = (wordlength == 2) ? 0x40 : 0x20;
420         }
421         else
422         {
423 #ifdef SUPPORT_NE_BAD_CLONES
424                 /* Ack!  Well, there might be a *bad* NE*000 clone there.
425                    Check for total bogus addresses. */
426                 for (i = 0; bad_clone_list[i].name8; i++)
427                 {
428                         if (SA_prom[0] == bad_clone_list[i].SAprefix[0] &&
429                                 SA_prom[1] == bad_clone_list[i].SAprefix[1] &&
430                                 SA_prom[2] == bad_clone_list[i].SAprefix[2])
431                         {
432                                 if (wordlength == 2)
433                                 {
434                                         name = bad_clone_list[i].name16;
435                                 } else {
436                                         name = bad_clone_list[i].name8;
437                                 }
438                                 break;
439                         }
440                 }
441                 if (bad_clone_list[i].name8 == NULL)
442                 {
443                         printk(" not found (invalid signature %2.2x %2.2x).\n",
444                                 SA_prom[14], SA_prom[15]);
445                         ret = -ENXIO;
446                         goto err_out;
447                 }
448 #else
449                 printk(" not found.\n");
450                 ret = -ENXIO;
451                 goto err_out;
452 #endif
453         }
454
455         if (dev->irq < 2)
456         {
457                 unsigned long cookie = probe_irq_on();
458                 outb_p(0x50, ioaddr + EN0_IMR); /* Enable one interrupt. */
459                 outb_p(0x00, ioaddr + EN0_RCNTLO);
460                 outb_p(0x00, ioaddr + EN0_RCNTHI);
461                 outb_p(E8390_RREAD+E8390_START, ioaddr); /* Trigger it... */
462                 mdelay(10);             /* wait 10ms for interrupt to propagate */
463                 outb_p(0x00, ioaddr + EN0_IMR);                 /* Mask it again. */
464                 dev->irq = probe_irq_off(cookie);
465                 if (ei_debug > 2)
466                         printk(" autoirq is %d\n", dev->irq);
467         } else if (dev->irq == 2)
468                 /* Fixup for users that don't know that IRQ 2 is really IRQ 9,
469                    or don't know which one to set. */
470                 dev->irq = 9;
471
472         if (! dev->irq) {
473                 printk(" failed to detect IRQ line.\n");
474                 ret = -EAGAIN;
475                 goto err_out;
476         }
477
478         /* Snarf the interrupt now.  There's no point in waiting since we cannot
479            share and the board will usually be enabled. */
480         ret = request_irq(dev->irq, ei_interrupt, 0, name, dev);
481         if (ret) {
482                 printk (" unable to get IRQ %d (errno=%d).\n", dev->irq, ret);
483                 goto err_out;
484         }
485
486         dev->base_addr = ioaddr;
487
488 #ifdef CONFIG_PLAT_MAPPI
489         outb_p(E8390_NODMA + E8390_PAGE1 + E8390_STOP,
490                 ioaddr + E8390_CMD); /* 0x61 */
491         for (i = 0 ; i < ETHER_ADDR_LEN ; i++) {
492                 dev->dev_addr[i] = SA_prom[i]
493                         = inb_p(ioaddr + EN1_PHYS_SHIFT(i));
494                 printk(" %2.2x", SA_prom[i]);
495         }
496 #else
497         for(i = 0; i < ETHER_ADDR_LEN; i++) {
498                 printk(" %2.2x", SA_prom[i]);
499                 dev->dev_addr[i] = SA_prom[i];
500         }
501 #endif
502
503         printk("\n%s: %s found at %#x, using IRQ %d.\n",
504                 dev->name, name, ioaddr, dev->irq);
505
506         ei_status.name = name;
507         ei_status.tx_start_page = start_page;
508         ei_status.stop_page = stop_page;
509 #ifdef CONFIG_PLAT_OAKS32R
510         ei_status.word16 = 0;
511 #else
512         ei_status.word16 = (wordlength == 2);
513 #endif
514
515         ei_status.rx_start_page = start_page + TX_PAGES;
516 #ifdef PACKETBUF_MEMSIZE
517          /* Allow the packet buffer size to be overridden by know-it-alls. */
518         ei_status.stop_page = ei_status.tx_start_page + PACKETBUF_MEMSIZE;
519 #endif
520
521         ei_status.reset_8390 = &ne_reset_8390;
522         ei_status.block_input = &ne_block_input;
523         ei_status.block_output = &ne_block_output;
524         ei_status.get_8390_hdr = &ne_get_8390_hdr;
525         ei_status.priv = 0;
526         dev->open = &ne_open;
527         dev->stop = &ne_close;
528 #ifdef CONFIG_NET_POLL_CONTROLLER
529         dev->poll_controller = ei_poll;
530 #endif
531         NS8390_init(dev, 0);
532
533         ret = register_netdev(dev);
534         if (ret)
535                 goto out_irq;
536         return 0;
537
538 out_irq:
539         free_irq(dev->irq, dev);
540 err_out:
541         release_region(ioaddr, NE_IO_EXTENT);
542         return ret;
543 }
544
545 static int ne_open(struct net_device *dev)
546 {
547         ei_open(dev);
548         return 0;
549 }
550
551 static int ne_close(struct net_device *dev)
552 {
553         if (ei_debug > 1)
554                 printk(KERN_DEBUG "%s: Shutting down ethercard.\n", dev->name);
555         ei_close(dev);
556         return 0;
557 }
558
559 /* Hard reset the card.  This used to pause for the same period that a
560    8390 reset command required, but that shouldn't be necessary. */
561
562 static void ne_reset_8390(struct net_device *dev)
563 {
564         unsigned long reset_start_time = jiffies;
565
566         if (ei_debug > 1)
567                 printk(KERN_DEBUG "resetting the 8390 t=%ld...", jiffies);
568
569         /* DON'T change these to inb_p/outb_p or reset will fail on clones. */
570         outb(inb(NE_BASE + NE_RESET), NE_BASE + NE_RESET);
571
572         ei_status.txing = 0;
573         ei_status.dmaing = 0;
574
575         /* This check _should_not_ be necessary, omit eventually. */
576         while ((inb_p(NE_BASE+EN0_ISR) & ENISR_RESET) == 0)
577                 if (jiffies - reset_start_time > 2*HZ/100) {
578                         printk(KERN_WARNING "%s: ne_reset_8390() did not complete.\n", dev->name);
579                         break;
580                 }
581         outb_p(ENISR_RESET, NE_BASE + EN0_ISR); /* Ack intr. */
582 }
583
584 /* Grab the 8390 specific header. Similar to the block_input routine, but
585    we don't need to be concerned with ring wrap as the header will be at
586    the start of a page, so we optimize accordingly. */
587
588 static void ne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
589 {
590         int nic_base = dev->base_addr;
591
592         /* This *shouldn't* happen. If it does, it's the last thing you'll see */
593
594         if (ei_status.dmaing)
595         {
596                 printk(KERN_EMERG "%s: DMAing conflict in ne_get_8390_hdr "
597                         "[DMAstat:%d][irqlock:%d].\n",
598                         dev->name, ei_status.dmaing, ei_status.irqlock);
599                 return;
600         }
601
602         ei_status.dmaing |= 0x01;
603         outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
604         outb_p(sizeof(struct e8390_pkt_hdr), nic_base + EN0_RCNTLO);
605         outb_p(0, nic_base + EN0_RCNTHI);
606         outb_p(0, nic_base + EN0_RSARLO);               /* On page boundary */
607         outb_p(ring_page, nic_base + EN0_RSARHI);
608         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
609
610         if (ei_status.word16)
611                 insw(NE_BASE + NE_DATAPORT, hdr, sizeof(struct e8390_pkt_hdr)>>1);
612         else
613                 insb(NE_BASE + NE_DATAPORT, hdr, sizeof(struct e8390_pkt_hdr));
614
615         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
616         ei_status.dmaing &= ~0x01;
617
618         le16_to_cpus(&hdr->count);
619 }
620
621 /* Block input and output, similar to the Crynwr packet driver.  If you
622    are porting to a new ethercard, look at the packet driver source for hints.
623    The NEx000 doesn't share the on-board packet memory -- you have to put
624    the packet out through the "remote DMA" dataport using outb. */
625
626 static void ne_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
627 {
628 #ifdef NE_SANITY_CHECK
629         int xfer_count = count;
630 #endif
631         int nic_base = dev->base_addr;
632         char *buf = skb->data;
633
634         /* This *shouldn't* happen. If it does, it's the last thing you'll see */
635         if (ei_status.dmaing)
636         {
637                 printk(KERN_EMERG "%s: DMAing conflict in ne_block_input "
638                         "[DMAstat:%d][irqlock:%d].\n",
639                         dev->name, ei_status.dmaing, ei_status.irqlock);
640                 return;
641         }
642         ei_status.dmaing |= 0x01;
643         outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
644         outb_p(count & 0xff, nic_base + EN0_RCNTLO);
645         outb_p(count >> 8, nic_base + EN0_RCNTHI);
646         outb_p(ring_offset & 0xff, nic_base + EN0_RSARLO);
647         outb_p(ring_offset >> 8, nic_base + EN0_RSARHI);
648         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
649         if (ei_status.word16)
650         {
651                 insw(NE_BASE + NE_DATAPORT,buf,count>>1);
652                 if (count & 0x01)
653                 {
654                         buf[count-1] = inb(NE_BASE + NE_DATAPORT);
655 #ifdef NE_SANITY_CHECK
656                         xfer_count++;
657 #endif
658                 }
659         } else {
660                 insb(NE_BASE + NE_DATAPORT, buf, count);
661         }
662
663 #ifdef NE_SANITY_CHECK
664         /* This was for the ALPHA version only, but enough people have
665            been encountering problems so it is still here.  If you see
666            this message you either 1) have a slightly incompatible clone
667            or 2) have noise/speed problems with your bus. */
668
669         if (ei_debug > 1)
670         {
671                 /* DMA termination address check... */
672                 int addr, tries = 20;
673                 do {
674                         /* DON'T check for 'inb_p(EN0_ISR) & ENISR_RDC' here
675                            -- it's broken for Rx on some cards! */
676                         int high = inb_p(nic_base + EN0_RSARHI);
677                         int low = inb_p(nic_base + EN0_RSARLO);
678                         addr = (high << 8) + low;
679                         if (((ring_offset + xfer_count) & 0xff) == low)
680                                 break;
681                 } while (--tries > 0);
682                 if (tries <= 0)
683                         printk(KERN_WARNING "%s: RX transfer address mismatch,"
684                                 "%#4.4x (expected) vs. %#4.4x (actual).\n",
685                                 dev->name, ring_offset + xfer_count, addr);
686         }
687 #endif
688         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
689         ei_status.dmaing &= ~0x01;
690 }
691
692 static void ne_block_output(struct net_device *dev, int count,
693                 const unsigned char *buf, const int start_page)
694 {
695         int nic_base = NE_BASE;
696         unsigned long dma_start;
697 #ifdef NE_SANITY_CHECK
698         int retries = 0;
699 #endif
700
701         /* Round the count up for word writes.  Do we need to do this?
702            What effect will an odd byte count have on the 8390?
703            I should check someday. */
704
705         if (ei_status.word16 && (count & 0x01))
706                 count++;
707
708         /* This *shouldn't* happen. If it does, it's the last thing you'll see */
709         if (ei_status.dmaing)
710         {
711                 printk(KERN_EMERG "%s: DMAing conflict in ne_block_output."
712                         "[DMAstat:%d][irqlock:%d]\n",
713                         dev->name, ei_status.dmaing, ei_status.irqlock);
714                 return;
715         }
716         ei_status.dmaing |= 0x01;
717         /* We should already be in page 0, but to be safe... */
718         outb_p(E8390_PAGE0+E8390_START+E8390_NODMA, nic_base + NE_CMD);
719
720 #ifdef NE_SANITY_CHECK
721 retry:
722 #endif
723
724 #ifdef NE8390_RW_BUGFIX
725         /* Handle the read-before-write bug the same way as the
726            Crynwr packet driver -- the NatSemi method doesn't work.
727            Actually this doesn't always work either, but if you have
728            problems with your NEx000 this is better than nothing! */
729
730         outb_p(0x42, nic_base + EN0_RCNTLO);
731         outb_p(0x00,   nic_base + EN0_RCNTHI);
732         outb_p(0x42, nic_base + EN0_RSARLO);
733         outb_p(0x00, nic_base + EN0_RSARHI);
734         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
735         /* Make certain that the dummy read has occurred. */
736         udelay(6);
737 #endif
738
739         outb_p(ENISR_RDC, nic_base + EN0_ISR);
740
741         /* Now the normal output. */
742         outb_p(count & 0xff, nic_base + EN0_RCNTLO);
743         outb_p(count >> 8,   nic_base + EN0_RCNTHI);
744         outb_p(0x00, nic_base + EN0_RSARLO);
745         outb_p(start_page, nic_base + EN0_RSARHI);
746
747         outb_p(E8390_RWRITE+E8390_START, nic_base + NE_CMD);
748         if (ei_status.word16) {
749                 outsw(NE_BASE + NE_DATAPORT, buf, count>>1);
750         } else {
751                 outsb(NE_BASE + NE_DATAPORT, buf, count);
752         }
753
754         dma_start = jiffies;
755
756 #ifdef NE_SANITY_CHECK
757         /* This was for the ALPHA version only, but enough people have
758            been encountering problems so it is still here. */
759
760         if (ei_debug > 1)
761         {
762                 /* DMA termination address check... */
763                 int addr, tries = 20;
764                 do {
765                         int high = inb_p(nic_base + EN0_RSARHI);
766                         int low = inb_p(nic_base + EN0_RSARLO);
767                         addr = (high << 8) + low;
768                         if ((start_page << 8) + count == addr)
769                                 break;
770                 } while (--tries > 0);
771
772                 if (tries <= 0)
773                 {
774                         printk(KERN_WARNING "%s: Tx packet transfer address mismatch,"
775                                 "%#4.4x (expected) vs. %#4.4x (actual).\n",
776                                 dev->name, (start_page << 8) + count, addr);
777                         if (retries++ == 0)
778                                 goto retry;
779                 }
780         }
781 #endif
782
783         while ((inb_p(nic_base + EN0_ISR) & ENISR_RDC) == 0)
784                 if (jiffies - dma_start > 2*HZ/100) {           /* 20ms */
785                         printk(KERN_WARNING "%s: timeout waiting for Tx RDC.\n", dev->name);
786                         ne_reset_8390(dev);
787                         NS8390_init(dev,1);
788                         break;
789                 }
790
791         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
792         ei_status.dmaing &= ~0x01;
793         return;
794 }
795
796 \f
797 #ifdef MODULE
798 #define MAX_NE_CARDS    4       /* Max number of NE cards per module */
799 static struct net_device *dev_ne[MAX_NE_CARDS];
800 static int io[MAX_NE_CARDS];
801 static int irq[MAX_NE_CARDS];
802 static int bad[MAX_NE_CARDS];   /* 0xbad = bad sig or no reset ack */
803
804 module_param_array(io, int, NULL, 0);
805 module_param_array(irq, int, NULL, 0);
806 module_param_array(bad, int, NULL, 0);
807 MODULE_PARM_DESC(io, "I/O base address(es),required");
808 MODULE_PARM_DESC(irq, "IRQ number(s)");
809 MODULE_PARM_DESC(bad, "Accept card(s) with bad signatures");
810 MODULE_DESCRIPTION("NE1000/NE2000 ISA/PnP Ethernet driver");
811 MODULE_LICENSE("GPL");
812
813 /* This is set up so that no ISA autoprobe takes place. We can't guarantee
814 that the ne2k probe is the last 8390 based probe to take place (as it
815 is at boot) and so the probe will get confused by any other 8390 cards.
816 ISA device autoprobes on a running machine are not recommended anyway. */
817
818 int init_module(void)
819 {
820         int this_dev, found = 0;
821
822         for (this_dev = 0; this_dev < MAX_NE_CARDS; this_dev++) {
823                 struct net_device *dev = alloc_ei_netdev();
824                 if (!dev)
825                         break;
826                 dev->irq = irq[this_dev];
827                 dev->mem_end = bad[this_dev];
828                 dev->base_addr = io[this_dev];
829                 if (do_ne_probe(dev) == 0) {
830                         dev_ne[found++] = dev;
831                         continue;
832                 }
833                 free_netdev(dev);
834                 if (found)
835                         break;
836                 if (io[this_dev] != 0)
837                         printk(KERN_WARNING "ne.c: No NE*000 card found at i/o = %#x\n", io[this_dev]);
838                 else
839                         printk(KERN_NOTICE "ne.c: You must supply \"io=0xNNN\" value(s) for ISA cards.\n");
840                 return -ENXIO;
841         }
842         if (found)
843                 return 0;
844         return -ENODEV;
845 }
846
847 void cleanup_module(void)
848 {
849         int this_dev;
850
851         for (this_dev = 0; this_dev < MAX_NE_CARDS; this_dev++) {
852                 struct net_device *dev = dev_ne[this_dev];
853                 if (dev) {
854                         unregister_netdev(dev);
855                         cleanup_card(dev);
856                         free_netdev(dev);
857                 }
858         }
859 }
860 #endif /* MODULE */