[PATCH] e100: Handle the return values from pci_* functions
[linux-2.6] / drivers / net / ne2.c
1 /* ne2.c: A NE/2 Ethernet Driver for Linux. */
2 /*
3    Based on the NE2000 driver written by Donald Becker (1992-94).
4    modified by Wim Dumon (Apr 1996)
5
6    This software may be used and distributed according to the terms
7    of the GNU General Public License, incorporated herein by reference.
8
9    The author may be reached as wimpie@linux.cc.kuleuven.ac.be
10
11    Currently supported: NE/2
12    This patch was never tested on other MCA-ethernet adapters, but it
13    might work. Just give it a try and let me know if you have problems.
14    Also mail me if it really works, please!
15
16    Changelog:
17    Mon Feb  3 16:26:02 MET 1997
18    - adapted the driver to work with the 2.1.25 kernel
19    - multiple ne2 support (untested)
20    - module support (untested)
21
22    Fri Aug 28 00:18:36 CET 1998 (David Weinehall)
23    - fixed a few minor typos
24    - made the MODULE_PARM conditional (it only works with the v2.1.x kernels)
25    - fixed the module support (Now it's working...)
26
27    Mon Sep  7 19:01:44 CET 1998 (David Weinehall)
28    - added support for Arco Electronics AE/2-card (experimental)
29
30    Mon Sep 14 09:53:42 CET 1998 (David Weinehall)
31    - added support for Compex ENET-16MC/P (experimental) 
32
33    Tue Sep 15 16:21:12 CET 1998 (David Weinehall, Magnus Jonsson, Tomas Ogren)
34    - Miscellaneous bugfixes
35
36    Tue Sep 19 16:21:12 CET 1998 (Magnus Jonsson)
37    - Cleanup
38
39    Wed Sep 23 14:33:34 CET 1998 (David Weinehall)
40    - Restructuring and rewriting for v2.1.x compliance
41
42    Wed Oct 14 17:19:21 CET 1998 (David Weinehall)
43    - Added code that unregisters irq and proc-info
44    - Version# bump
45
46    Mon Nov 16 15:28:23 CET 1998 (Wim Dumon)
47    - pass 'dev' as last parameter of request_irq in stead of 'NULL'   
48
49    Wed Feb  7 21:24:00 CET 2001 (Alfred Arnold)
50    - added support for the D-Link DE-320CT
51    
52    *    WARNING
53         -------
54         This is alpha-test software.  It is not guaranteed to work. As a
55         matter of fact, I'm quite sure there are *LOTS* of bugs in here. I
56         would like to hear from you if you use this driver, even if it works.
57         If it doesn't work, be sure to send me a mail with the problems !
58 */
59
60 static const char *version = "ne2.c:v0.91 Nov 16 1998 Wim Dumon <wimpie@kotnet.org>\n";
61
62 #include <linux/module.h>
63 #include <linux/kernel.h>
64 #include <linux/types.h>
65 #include <linux/fcntl.h>
66 #include <linux/interrupt.h>
67 #include <linux/ioport.h>
68 #include <linux/in.h>
69 #include <linux/slab.h>
70 #include <linux/string.h>
71 #include <linux/errno.h>
72 #include <linux/init.h>
73 #include <linux/mca-legacy.h>
74 #include <linux/netdevice.h>
75 #include <linux/etherdevice.h>
76 #include <linux/skbuff.h>
77 #include <linux/bitops.h>
78
79 #include <asm/system.h>
80 #include <asm/io.h>
81 #include <asm/dma.h>
82
83 #include "8390.h"
84
85 #define DRV_NAME "ne2"
86
87 /* Some defines that people can play with if so inclined. */
88
89 /* Do we perform extra sanity checks on stuff ? */
90 /* #define NE_SANITY_CHECK */
91
92 /* Do we implement the read before write bugfix ? */
93 /* #define NE_RW_BUGFIX */
94
95 /* Do we have a non std. amount of memory? (in units of 256 byte pages) */
96 /* #define PACKETBUF_MEMSIZE    0x40 */
97
98
99 /* ---- No user-serviceable parts below ---- */
100
101 #define NE_BASE  (dev->base_addr)
102 #define NE_CMD          0x00
103 #define NE_DATAPORT     0x10    /* NatSemi-defined port window offset. */
104 #define NE_RESET        0x20    /* Issue a read to reset, a write to clear. */
105 #define NE_IO_EXTENT    0x30
106
107 #define NE1SM_START_PG  0x20    /* First page of TX buffer */
108 #define NE1SM_STOP_PG   0x40    /* Last page +1 of RX ring */
109 #define NESM_START_PG   0x40    /* First page of TX buffer */
110 #define NESM_STOP_PG    0x80    /* Last page +1 of RX ring */
111
112 /* From the .ADF file: */
113 static unsigned int addresses[7] __initdata =
114                 {0x1000, 0x2020, 0x8020, 0xa0a0, 0xb0b0, 0xc0c0, 0xc3d0};
115 static int irqs[4] __initdata = {3, 4, 5, 9};
116
117 /* From the D-Link ADF file: */
118 static unsigned int dlink_addresses[4] __initdata =
119                 {0x300, 0x320, 0x340, 0x360};
120 static int dlink_irqs[8] __initdata = {3, 4, 5, 9, 10, 11, 14, 15};
121
122 struct ne2_adapters_t {
123         unsigned int    id;
124         char            *name;
125 };
126
127 static struct ne2_adapters_t ne2_adapters[] __initdata = {
128         { 0x6354, "Arco Ethernet Adapter AE/2" },
129         { 0x70DE, "Compex ENET-16 MC/P" },
130         { 0x7154, "Novell Ethernet Adapter NE/2" },
131         { 0x56ea, "D-Link DE-320CT" },
132         { 0x0000, NULL }
133 };
134
135 extern int netcard_probe(struct net_device *dev);
136
137 static int ne2_probe1(struct net_device *dev, int slot);
138
139 static int ne_open(struct net_device *dev);
140 static int ne_close(struct net_device *dev);
141
142 static void ne_reset_8390(struct net_device *dev);
143 static void ne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
144                 int ring_page);
145 static void ne_block_input(struct net_device *dev, int count,
146                 struct sk_buff *skb, int ring_offset);
147 static void ne_block_output(struct net_device *dev, const int count,
148                 const unsigned char *buf, const int start_page);
149
150
151 /*
152  * special code to read the DE-320's MAC address EEPROM.  In contrast to a 
153  * standard NE design, this is a serial EEPROM (93C46) that has to be read
154  * bit by bit.  The EEPROM cotrol port at base + 0x1e has the following 
155  * layout:
156  *
157  * Bit 0 = Data out (read from EEPROM)
158  * Bit 1 = Data in  (write to EEPROM)
159  * Bit 2 = Clock
160  * Bit 3 = Chip Select
161  * Bit 7 = ~50 kHz clock for defined delays
162  *
163  */
164
165 static void __init dlink_put_eeprom(unsigned char value, unsigned int addr)
166 {
167         int z;
168         unsigned char v1, v2;
169
170         /* write the value to the NIC EEPROM register */
171
172         outb(value, addr + 0x1e);
173
174         /* now wait the clock line to toggle twice.  Effectively, we are
175            waiting (at least) for one clock cycle */
176
177         for (z = 0; z < 2; z++) {
178                 do {
179                         v1 = inb(addr + 0x1e);
180                         v2 = inb(addr + 0x1e);
181                 }
182                 while (!((v1 ^ v2) & 0x80));
183         }
184 }
185
186 static void __init dlink_send_eeprom_bit(unsigned int bit, unsigned int addr)
187 {
188         /* shift data bit into correct position */
189
190         bit = bit << 1;
191
192         /* write value, keep clock line high for two cycles */
193
194         dlink_put_eeprom(0x09 | bit, addr);
195         dlink_put_eeprom(0x0d | bit, addr);
196         dlink_put_eeprom(0x0d | bit, addr);
197         dlink_put_eeprom(0x09 | bit, addr);
198 }
199
200 static void __init dlink_send_eeprom_word(unsigned int value, unsigned int len, unsigned int addr)
201 {
202         int z;
203
204         /* adjust bits so that they are left-aligned in a 16-bit-word */
205
206         value = value << (16 - len);
207
208         /* shift bits out to the EEPROM */
209
210         for (z = 0; z < len; z++) {
211                 dlink_send_eeprom_bit((value & 0x8000) >> 15, addr);
212                 value = value << 1;
213         }
214 }
215
216 static unsigned int __init dlink_get_eeprom(unsigned int eeaddr, unsigned int addr)
217 {
218         int z;
219         unsigned int value = 0;
220  
221         /* pull the CS line low for a moment.  This resets the EEPROM-
222            internal logic, and makes it ready for a new command. */
223
224         dlink_put_eeprom(0x01, addr);
225         dlink_put_eeprom(0x09, addr);
226
227         /* send one start bit, read command (1 - 0), plus the address to
228            the EEPROM */
229
230         dlink_send_eeprom_word(0x0180 | (eeaddr & 0x3f), 9, addr);
231
232         /* get the data word.  We clock by sending 0s to the EEPROM, which
233            get ignored during the read process */
234
235         for (z = 0; z < 16; z++) {
236                 dlink_send_eeprom_bit(0, addr);
237                 value = (value << 1) | (inb(addr + 0x1e) & 0x01);
238         }
239
240         return value;
241 }
242
243 /*
244  * Note that at boot, this probe only picks up one card at a time.
245  */
246
247 static int __init do_ne2_probe(struct net_device *dev)
248 {
249         static int current_mca_slot = -1;
250         int i;
251         int adapter_found = 0;
252
253         SET_MODULE_OWNER(dev);
254
255         /* Do not check any supplied i/o locations. 
256            POS registers usually don't fail :) */
257
258         /* MCA cards have POS registers.  
259            Autodetecting MCA cards is extremely simple. 
260            Just search for the card. */
261
262         for(i = 0; (ne2_adapters[i].name != NULL) && !adapter_found; i++) {
263                 current_mca_slot = 
264                         mca_find_unused_adapter(ne2_adapters[i].id, 0);
265
266                 if((current_mca_slot != MCA_NOTFOUND) && !adapter_found) {
267                         int res;
268                         mca_set_adapter_name(current_mca_slot, 
269                                         ne2_adapters[i].name);
270                         mca_mark_as_used(current_mca_slot);
271                         
272                         res = ne2_probe1(dev, current_mca_slot);
273                         if (res)
274                                 mca_mark_as_unused(current_mca_slot);
275                         return res;
276                 }
277         }
278         return -ENODEV;
279 }
280
281 #ifndef MODULE
282 struct net_device * __init ne2_probe(int unit)
283 {
284         struct net_device *dev = alloc_ei_netdev();
285         int err;
286
287         if (!dev)
288                 return ERR_PTR(-ENOMEM);
289
290         sprintf(dev->name, "eth%d", unit);
291         netdev_boot_setup_check(dev);
292
293         err = do_ne2_probe(dev);
294         if (err)
295                 goto out;
296         return dev;
297 out:
298         free_netdev(dev);
299         return ERR_PTR(err);
300 }
301 #endif
302
303 static int ne2_procinfo(char *buf, int slot, struct net_device *dev)
304 {
305         int len=0;
306
307         len += sprintf(buf+len, "The NE/2 Ethernet Adapter\n" );
308         len += sprintf(buf+len, "Driver written by Wim Dumon ");
309         len += sprintf(buf+len, "<wimpie@kotnet.org>\n"); 
310         len += sprintf(buf+len, "Modified by ");
311         len += sprintf(buf+len, "David Weinehall <tao@acc.umu.se>\n");
312         len += sprintf(buf+len, "and by Magnus Jonsson <bigfoot@acc.umu.se>\n");
313         len += sprintf(buf+len, "Based on the original NE2000 drivers\n" );
314         len += sprintf(buf+len, "Base IO: %#x\n", (unsigned int)dev->base_addr);
315         len += sprintf(buf+len, "IRQ    : %d\n", dev->irq);
316
317 #define HW_ADDR(i) dev->dev_addr[i]
318         len += sprintf(buf+len, "HW addr : %x:%x:%x:%x:%x:%x\n", 
319                         HW_ADDR(0), HW_ADDR(1), HW_ADDR(2), 
320                         HW_ADDR(3), HW_ADDR(4), HW_ADDR(5) );
321 #undef HW_ADDR
322
323         return len;
324 }
325
326 static int __init ne2_probe1(struct net_device *dev, int slot)
327 {
328         int i, base_addr, irq, retval;
329         unsigned char POS;
330         unsigned char SA_prom[32];
331         const char *name = "NE/2";
332         int start_page, stop_page;
333         static unsigned version_printed;
334
335         if (ei_debug && version_printed++ == 0)
336                 printk(version);
337
338         printk("NE/2 ethercard found in slot %d:", slot);
339
340         /* Read base IO and IRQ from the POS-registers */
341         POS = mca_read_stored_pos(slot, 2);
342         if(!(POS % 2)) {
343                 printk(" disabled.\n");
344                 return -ENODEV;
345         }
346
347         /* handle different POS register structure for D-Link card */
348
349         if (mca_read_stored_pos(slot, 0) == 0xea) {
350                 base_addr = dlink_addresses[(POS >> 5) & 0x03];
351                 irq = dlink_irqs[(POS >> 2) & 0x07];
352         }
353         else {
354                 i = (POS & 0xE)>>1;
355                 /* printk("Halleluja sdog, als er na de pijl een 1 staat is 1 - 1 == 0"
356                 " en zou het moeten werken -> %d\n", i);
357                 The above line was for remote testing, thanx to sdog ... */
358                 base_addr = addresses[i - 1];
359                 irq = irqs[(POS & 0x60)>>5];
360         }
361
362         if (!request_region(base_addr, NE_IO_EXTENT, DRV_NAME))
363                 return -EBUSY;
364
365 #ifdef DEBUG
366         printk("POS info : pos 2 = %#x ; base = %#x ; irq = %ld\n", POS,
367                         base_addr, irq);
368 #endif
369
370 #ifndef CRYNWR_WAY
371         /* Reset the card the way they do it in the Crynwr packet driver */
372         for (i=0; i<8; i++) 
373                 outb(0x0, base_addr + NE_RESET);
374         inb(base_addr + NE_RESET);
375         outb(0x21, base_addr + NE_CMD);
376         if (inb(base_addr + NE_CMD) != 0x21) {
377                 printk("NE/2 adapter not responding\n");
378                 retval = -ENODEV;
379                 goto out;
380         }
381
382         /* In the crynwr sources they do a RAM-test here. I skip it. I suppose
383            my RAM is okay.  Suppose your memory is broken.  Then this test
384            should fail and you won't be able to use your card.  But if I do not
385            test, you won't be able to use your card, neither.  So this test
386            won't help you. */
387
388 #else  /* _I_ never tested it this way .. Go ahead and try ...*/
389         /* Reset card. Who knows what dain-bramaged state it was left in. */
390         { 
391                 unsigned long reset_start_time = jiffies;
392
393                 /* DON'T change these to inb_p/outb_p or reset will fail on 
394                    clones.. */
395                 outb(inb(base_addr + NE_RESET), base_addr + NE_RESET);
396
397                 while ((inb_p(base_addr + EN0_ISR) & ENISR_RESET) == 0)
398                         if (jiffies - reset_start_time > 2*HZ/100) {
399                                 printk(" not found (no reset ack).\n");
400                                 retval = -ENODEV;
401                                 goto out;
402                         }
403
404                 outb_p(0xff, base_addr + EN0_ISR);         /* Ack all intr. */
405         }
406 #endif
407
408
409         /* Read the 16 bytes of station address PROM.
410            We must first initialize registers, similar to 
411            NS8390_init(eifdev, 0).
412            We can't reliably read the SAPROM address without this.
413            (I learned the hard way!). */
414         {
415                 struct { 
416                         unsigned char value, offset; 
417                 } program_seq[] = {
418                                                 /* Select page 0 */
419                         {E8390_NODMA+E8390_PAGE0+E8390_STOP, E8390_CMD}, 
420                         {0x49,  EN0_DCFG},  /* Set WORD-wide (0x49) access. */
421                         {0x00,  EN0_RCNTLO},  /* Clear the count regs. */
422                         {0x00,  EN0_RCNTHI},
423                         {0x00,  EN0_IMR},  /* Mask completion irq. */
424                         {0xFF,  EN0_ISR},
425                         {E8390_RXOFF, EN0_RXCR},  /* 0x20  Set to monitor */
426                         {E8390_TXOFF, EN0_TXCR},  /* 0x02  and loopback mode. */
427                         {32,    EN0_RCNTLO},
428                         {0x00,  EN0_RCNTHI},
429                         {0x00,  EN0_RSARLO},  /* DMA starting at 0x0000. */
430                         {0x00,  EN0_RSARHI},
431                         {E8390_RREAD+E8390_START, E8390_CMD},
432                 };
433
434                 for (i = 0; i < sizeof(program_seq)/sizeof(program_seq[0]); i++)
435                         outb_p(program_seq[i].value, base_addr + 
436                                 program_seq[i].offset);
437
438         }
439         for(i = 0; i < 6 /*sizeof(SA_prom)*/; i+=1) {
440                 SA_prom[i] = inb(base_addr + NE_DATAPORT);
441         }
442
443         /* I don't know whether the previous sequence includes the general
444            board reset procedure, so better don't omit it and just overwrite
445            the garbage read from a DE-320 with correct stuff. */
446
447         if (mca_read_stored_pos(slot, 0) == 0xea) {
448                 unsigned int v;
449
450                 for (i = 0; i < 3; i++) {
451                         v = dlink_get_eeprom(i, base_addr);
452                         SA_prom[(i << 1)    ] = v & 0xff;
453                         SA_prom[(i << 1) + 1] = (v >> 8) & 0xff;
454                 }
455         }
456
457         start_page = NESM_START_PG;
458         stop_page = NESM_STOP_PG;
459
460         dev->irq=irq;
461
462         /* Snarf the interrupt now.  There's no point in waiting since we cannot
463            share and the board will usually be enabled. */
464         retval = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev);
465         if (retval) {
466                 printk (" unable to get IRQ %d (irqval=%d).\n", 
467                                 dev->irq, retval);
468                 goto out;
469         }
470
471         dev->base_addr = base_addr;
472
473         for(i = 0; i < ETHER_ADDR_LEN; i++) {
474                 printk(" %2.2x", SA_prom[i]);
475                 dev->dev_addr[i] = SA_prom[i];
476         }
477
478         printk("\n%s: %s found at %#x, using IRQ %d.\n",
479                         dev->name, name, base_addr, dev->irq);
480
481         mca_set_adapter_procfn(slot, (MCA_ProcFn) ne2_procinfo, dev);
482
483         ei_status.name = name;
484         ei_status.tx_start_page = start_page;
485         ei_status.stop_page = stop_page;
486         ei_status.word16 = (2 == 2);
487
488         ei_status.rx_start_page = start_page + TX_PAGES;
489 #ifdef PACKETBUF_MEMSIZE
490         /* Allow the packet buffer size to be overridden by know-it-alls. */
491         ei_status.stop_page = ei_status.tx_start_page + PACKETBUF_MEMSIZE;
492 #endif
493
494         ei_status.reset_8390 = &ne_reset_8390;
495         ei_status.block_input = &ne_block_input;
496         ei_status.block_output = &ne_block_output;
497         ei_status.get_8390_hdr = &ne_get_8390_hdr;
498         
499         ei_status.priv = slot;
500         
501         dev->open = &ne_open;
502         dev->stop = &ne_close;
503 #ifdef CONFIG_NET_POLL_CONTROLLER
504         dev->poll_controller = ei_poll;
505 #endif
506         NS8390_init(dev, 0);
507
508         retval = register_netdev(dev);
509         if (retval)
510                 goto out1;
511         return 0;
512 out1:
513         mca_set_adapter_procfn( ei_status.priv, NULL, NULL);
514         free_irq(dev->irq, dev);
515 out:
516         release_region(base_addr, NE_IO_EXTENT);
517         return retval;
518 }
519
520 static int ne_open(struct net_device *dev)
521 {
522         ei_open(dev);
523         return 0;
524 }
525
526 static int ne_close(struct net_device *dev)
527 {
528         if (ei_debug > 1)
529                 printk("%s: Shutting down ethercard.\n", dev->name);
530         ei_close(dev);
531         return 0;
532 }
533
534 /* Hard reset the card.  This used to pause for the same period that a
535    8390 reset command required, but that shouldn't be necessary. */
536 static void ne_reset_8390(struct net_device *dev)
537 {
538         unsigned long reset_start_time = jiffies;
539
540         if (ei_debug > 1) 
541                 printk("resetting the 8390 t=%ld...", jiffies);
542
543         /* DON'T change these to inb_p/outb_p or reset will fail on clones. */
544         outb(inb(NE_BASE + NE_RESET), NE_BASE + NE_RESET);
545
546         ei_status.txing = 0;
547         ei_status.dmaing = 0;
548
549         /* This check _should_not_ be necessary, omit eventually. */
550         while ((inb_p(NE_BASE+EN0_ISR) & ENISR_RESET) == 0)
551                 if (jiffies - reset_start_time > 2*HZ/100) {
552                         printk("%s: ne_reset_8390() did not complete.\n", 
553                                         dev->name);
554                         break;
555                 }
556         outb_p(ENISR_RESET, NE_BASE + EN0_ISR); /* Ack intr. */
557 }
558
559 /* Grab the 8390 specific header. Similar to the block_input routine, but
560    we don't need to be concerned with ring wrap as the header will be at
561    the start of a page, so we optimize accordingly. */
562
563 static void ne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, 
564                 int ring_page)
565 {
566
567         int nic_base = dev->base_addr;
568
569         /* This *shouldn't* happen. 
570            If it does, it's the last thing you'll see */
571         if (ei_status.dmaing) {
572                 printk("%s: DMAing conflict in ne_get_8390_hdr "
573                                 "[DMAstat:%d][irqlock:%d].\n",
574                                 dev->name, ei_status.dmaing, ei_status.irqlock);
575                 return;
576         }
577
578         ei_status.dmaing |= 0x01;
579         outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
580         outb_p(sizeof(struct e8390_pkt_hdr), nic_base + EN0_RCNTLO);
581         outb_p(0, nic_base + EN0_RCNTHI);
582         outb_p(0, nic_base + EN0_RSARLO);               /* On page boundary */
583         outb_p(ring_page, nic_base + EN0_RSARHI);
584         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
585
586         if (ei_status.word16)
587                 insw(NE_BASE + NE_DATAPORT, hdr, 
588                                 sizeof(struct e8390_pkt_hdr)>>1);
589         else
590                 insb(NE_BASE + NE_DATAPORT, hdr, 
591                                 sizeof(struct e8390_pkt_hdr));
592
593         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
594         ei_status.dmaing &= ~0x01;
595 }
596
597 /* Block input and output, similar to the Crynwr packet driver.  If you
598    are porting to a new ethercard, look at the packet driver source for
599    hints. The NEx000 doesn't share the on-board packet memory -- you have
600    to put the packet out through the "remote DMA" dataport using outb. */
601
602 static void ne_block_input(struct net_device *dev, int count, struct sk_buff *skb, 
603                 int ring_offset)
604 {
605 #ifdef NE_SANITY_CHECK
606         int xfer_count = count;
607 #endif
608         int nic_base = dev->base_addr;
609         char *buf = skb->data;
610
611         /* This *shouldn't* happen. 
612            If it does, it's the last thing you'll see */
613         if (ei_status.dmaing) {
614                 printk("%s: DMAing conflict in ne_block_input "
615                                 "[DMAstat:%d][irqlock:%d].\n",
616                                 dev->name, ei_status.dmaing, ei_status.irqlock);
617                 return;
618         }
619         ei_status.dmaing |= 0x01;
620         outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
621         outb_p(count & 0xff, nic_base + EN0_RCNTLO);
622         outb_p(count >> 8, nic_base + EN0_RCNTHI);
623         outb_p(ring_offset & 0xff, nic_base + EN0_RSARLO);
624         outb_p(ring_offset >> 8, nic_base + EN0_RSARHI);
625         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
626         if (ei_status.word16) {
627                 insw(NE_BASE + NE_DATAPORT,buf,count>>1);
628                 if (count & 0x01) {
629                         buf[count-1] = inb(NE_BASE + NE_DATAPORT);
630 #ifdef NE_SANITY_CHECK
631                         xfer_count++;
632 #endif
633                 }
634         } else {
635                 insb(NE_BASE + NE_DATAPORT, buf, count);
636         }
637
638 #ifdef NE_SANITY_CHECK
639         /* This was for the ALPHA version only, but enough people have
640            been encountering problems so it is still here.  If you see
641            this message you either 1) have a slightly incompatible clone
642            or 2) have noise/speed problems with your bus. */
643         if (ei_debug > 1) {     /* DMA termination address check... */
644                 int addr, tries = 20;
645                 do {
646                         /* DON'T check for 'inb_p(EN0_ISR) & ENISR_RDC' here
647                            -- it's broken for Rx on some cards! */
648                         int high = inb_p(nic_base + EN0_RSARHI);
649                         int low = inb_p(nic_base + EN0_RSARLO);
650                         addr = (high << 8) + low;
651                         if (((ring_offset + xfer_count) & 0xff) == low)
652                                 break;
653                 } while (--tries > 0);
654                 if (tries <= 0)
655                         printk("%s: RX transfer address mismatch,"
656                                 "%#4.4x (expected) vs. %#4.4x (actual).\n",
657                                 dev->name, ring_offset + xfer_count, addr);
658         }
659 #endif
660         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
661         ei_status.dmaing &= ~0x01;
662 }
663
664 static void ne_block_output(struct net_device *dev, int count,
665                 const unsigned char *buf, const int start_page)
666 {
667         int nic_base = NE_BASE;
668         unsigned long dma_start;
669 #ifdef NE_SANITY_CHECK
670         int retries = 0;
671 #endif
672
673         /* Round the count up for word writes. Do we need to do this?
674            What effect will an odd byte count have on the 8390?
675            I should check someday. */
676         if (ei_status.word16 && (count & 0x01))
677                 count++;
678
679         /* This *shouldn't* happen. 
680            If it does, it's the last thing you'll see */
681         if (ei_status.dmaing) {
682                 printk("%s: DMAing conflict in ne_block_output."
683                                 "[DMAstat:%d][irqlock:%d]\n",
684                                 dev->name, ei_status.dmaing, ei_status.irqlock);
685                 return;
686         }
687         ei_status.dmaing |= 0x01;
688         /* We should already be in page 0, but to be safe... */
689         outb_p(E8390_PAGE0+E8390_START+E8390_NODMA, nic_base + NE_CMD);
690
691 #ifdef NE_SANITY_CHECK
692 retry:
693 #endif
694
695 #ifdef NE8390_RW_BUGFIX
696         /* Handle the read-before-write bug the same way as the
697            Crynwr packet driver -- the NatSemi method doesn't work.
698            Actually this doesn't always work either, but if you have
699            problems with your NEx000 this is better than nothing! */
700         outb_p(0x42, nic_base + EN0_RCNTLO);
701         outb_p(0x00, nic_base + EN0_RCNTHI);
702         outb_p(0x42, nic_base + EN0_RSARLO);
703         outb_p(0x00, nic_base + EN0_RSARHI);
704         outb_p(E8390_RREAD+E8390_START, nic_base + NE_CMD);
705         /* Make certain that the dummy read has occurred. */
706         SLOW_DOWN_IO;
707         SLOW_DOWN_IO;
708         SLOW_DOWN_IO;
709 #endif
710
711         outb_p(ENISR_RDC, nic_base + EN0_ISR);
712
713         /* Now the normal output. */
714         outb_p(count & 0xff, nic_base + EN0_RCNTLO);
715         outb_p(count >> 8,   nic_base + EN0_RCNTHI);
716         outb_p(0x00, nic_base + EN0_RSARLO);
717         outb_p(start_page, nic_base + EN0_RSARHI);
718
719         outb_p(E8390_RWRITE+E8390_START, nic_base + NE_CMD);
720         if (ei_status.word16) {
721                 outsw(NE_BASE + NE_DATAPORT, buf, count>>1);
722         } else {
723                 outsb(NE_BASE + NE_DATAPORT, buf, count);
724         }
725
726         dma_start = jiffies;
727
728 #ifdef NE_SANITY_CHECK
729         /* This was for the ALPHA version only, but enough people have
730            been encountering problems so it is still here. */
731
732         if (ei_debug > 1) {             /* DMA termination address check... */
733                 int addr, tries = 20;
734                 do {
735                         int high = inb_p(nic_base + EN0_RSARHI);
736                         int low = inb_p(nic_base + EN0_RSARLO);
737                         addr = (high << 8) + low;
738                         if ((start_page << 8) + count == addr)
739                                 break;
740                 } while (--tries > 0);
741                 if (tries <= 0) {
742                         printk("%s: Tx packet transfer address mismatch,"
743                                         "%#4.4x (expected) vs. %#4.4x (actual).\n",
744                                         dev->name, (start_page << 8) + count, addr);
745                         if (retries++ == 0)
746                                 goto retry;
747                 }
748         }
749 #endif
750
751         while ((inb_p(nic_base + EN0_ISR) & ENISR_RDC) == 0)
752                 if (jiffies - dma_start > 2*HZ/100) {           /* 20ms */
753                         printk("%s: timeout waiting for Tx RDC.\n", dev->name);
754                         ne_reset_8390(dev);
755                         NS8390_init(dev,1);
756                         break;
757                 }
758
759         outb_p(ENISR_RDC, nic_base + EN0_ISR);  /* Ack intr. */
760         ei_status.dmaing &= ~0x01;
761         return;
762 }
763
764
765 #ifdef MODULE
766 #define MAX_NE_CARDS    4       /* Max number of NE cards per module */
767 static struct net_device *dev_ne[MAX_NE_CARDS];
768 static int io[MAX_NE_CARDS];
769 static int irq[MAX_NE_CARDS];
770 static int bad[MAX_NE_CARDS];   /* 0xbad = bad sig or no reset ack */
771 MODULE_LICENSE("GPL");
772
773 module_param_array(io, int, NULL, 0);
774 module_param_array(irq, int, NULL, 0);
775 module_param_array(bad, int, NULL, 0);
776 MODULE_PARM_DESC(io, "(ignored)");
777 MODULE_PARM_DESC(irq, "(ignored)");
778 MODULE_PARM_DESC(bad, "(ignored)");
779
780 /* Module code fixed by David Weinehall */
781
782 int init_module(void)
783 {
784         struct net_device *dev;
785         int this_dev, found = 0;
786
787         for (this_dev = 0; this_dev < MAX_NE_CARDS; this_dev++) {
788                 dev = alloc_ei_netdev();
789                 if (!dev)
790                         break;
791                 dev->irq = irq[this_dev];
792                 dev->mem_end = bad[this_dev];
793                 dev->base_addr = io[this_dev];
794                 if (do_ne2_probe(dev) == 0) {
795                         dev_ne[found++] = dev;
796                         continue;
797                 }
798                 free_netdev(dev);
799                 break;
800         }
801         if (found)
802                 return 0;
803         printk(KERN_WARNING "ne2.c: No NE/2 card found\n");
804         return -ENXIO;
805 }
806
807 static void cleanup_card(struct net_device *dev)
808 {
809         mca_mark_as_unused(ei_status.priv);
810         mca_set_adapter_procfn( ei_status.priv, NULL, NULL);
811         free_irq(dev->irq, dev);
812         release_region(dev->base_addr, NE_IO_EXTENT);
813 }
814
815 void cleanup_module(void)
816 {
817         int this_dev;
818
819         for (this_dev = 0; this_dev < MAX_NE_CARDS; this_dev++) {
820                 struct net_device *dev = dev_ne[this_dev];
821                 if (dev) {
822                         unregister_netdev(dev);
823                         cleanup_card(dev);
824                         free_netdev(dev);
825                 }
826         }
827 }
828 #endif /* MODULE */