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