Merge master.kernel.org:/pub/scm/linux/kernel/git/jejb/scsi-rc-fixes-2.6
[linux-2.6] / drivers / net / lib8390.c
1 /* 8390.c: A general NS8390 ethernet driver core 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
13         410 Severn Ave., Suite 210
14         Annapolis MD 21403
15
16
17   This is the chip-specific code for many 8390-based ethernet adaptors.
18   This is not a complete driver, it must be combined with board-specific
19   code such as ne.c, wd.c, 3c503.c, etc.
20
21   Seeing how at least eight drivers use this code, (not counting the
22   PCMCIA ones either) it is easy to break some card by what seems like
23   a simple innocent change. Please contact me or Donald if you think
24   you have found something that needs changing. -- PG
25
26
27   Changelog:
28
29   Paul Gortmaker        : remove set_bit lock, other cleanups.
30   Paul Gortmaker        : add ei_get_8390_hdr() so we can pass skb's to
31                           ei_block_input() for eth_io_copy_and_sum().
32   Paul Gortmaker        : exchange static int ei_pingpong for a #define,
33                           also add better Tx error handling.
34   Paul Gortmaker        : rewrite Rx overrun handling as per NS specs.
35   Alexey Kuznetsov      : use the 8390's six bit hash multicast filter.
36   Paul Gortmaker        : tweak ANK's above multicast changes a bit.
37   Paul Gortmaker        : update packet statistics for v2.1.x
38   Alan Cox              : support arbitary stupid port mappings on the
39                           68K Macintosh. Support >16bit I/O spaces
40   Paul Gortmaker        : add kmod support for auto-loading of the 8390
41                           module by all drivers that require it.
42   Alan Cox              : Spinlocking work, added 'BUG_83C690'
43   Paul Gortmaker        : Separate out Tx timeout code from Tx path.
44   Paul Gortmaker        : Remove old unused single Tx buffer code.
45   Hayato Fujiwara       : Add m32r support.
46   Paul Gortmaker        : use skb_padto() instead of stack scratch area
47
48   Sources:
49   The National Semiconductor LAN Databook, and the 3Com 3c503 databook.
50
51   */
52
53 #include <linux/module.h>
54 #include <linux/kernel.h>
55 #include <linux/jiffies.h>
56 #include <linux/fs.h>
57 #include <linux/types.h>
58 #include <linux/string.h>
59 #include <linux/bitops.h>
60 #include <asm/system.h>
61 #include <asm/uaccess.h>
62 #include <asm/io.h>
63 #include <asm/irq.h>
64 #include <linux/delay.h>
65 #include <linux/errno.h>
66 #include <linux/fcntl.h>
67 #include <linux/in.h>
68 #include <linux/interrupt.h>
69 #include <linux/init.h>
70 #include <linux/crc32.h>
71
72 #include <linux/netdevice.h>
73 #include <linux/etherdevice.h>
74
75 #define NS8390_CORE
76 #include "8390.h"
77
78 #define BUG_83C690
79
80 /* These are the operational function interfaces to board-specific
81    routines.
82         void reset_8390(struct net_device *dev)
83                 Resets the board associated with DEV, including a hardware reset of
84                 the 8390.  This is only called when there is a transmit timeout, and
85                 it is always followed by 8390_init().
86         void block_output(struct net_device *dev, int count, const unsigned char *buf,
87                                           int start_page)
88                 Write the COUNT bytes of BUF to the packet buffer at START_PAGE.  The
89                 "page" value uses the 8390's 256-byte pages.
90         void get_8390_hdr(struct net_device *dev, struct e8390_hdr *hdr, int ring_page)
91                 Read the 4 byte, page aligned 8390 header. *If* there is a
92                 subsequent read, it will be of the rest of the packet.
93         void block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
94                 Read COUNT bytes from the packet buffer into the skb data area. Start
95                 reading from RING_OFFSET, the address as the 8390 sees it.  This will always
96                 follow the read of the 8390 header.
97 */
98 #define ei_reset_8390 (ei_local->reset_8390)
99 #define ei_block_output (ei_local->block_output)
100 #define ei_block_input (ei_local->block_input)
101 #define ei_get_8390_hdr (ei_local->get_8390_hdr)
102
103 /* use 0 for production, 1 for verification, >2 for debug */
104 #ifndef ei_debug
105 int ei_debug = 1;
106 #endif
107
108 /* Index to functions. */
109 static void ei_tx_intr(struct net_device *dev);
110 static void ei_tx_err(struct net_device *dev);
111 static void ei_tx_timeout(struct net_device *dev);
112 static void ei_receive(struct net_device *dev);
113 static void ei_rx_overrun(struct net_device *dev);
114
115 /* Routines generic to NS8390-based boards. */
116 static void NS8390_trigger_send(struct net_device *dev, unsigned int length,
117                                                                 int start_page);
118 static void set_multicast_list(struct net_device *dev);
119 static void do_set_multicast_list(struct net_device *dev);
120 static void __NS8390_init(struct net_device *dev, int startp);
121
122 /*
123  *      SMP and the 8390 setup.
124  *
125  *      The 8390 isnt exactly designed to be multithreaded on RX/TX. There is
126  *      a page register that controls bank and packet buffer access. We guard
127  *      this with ei_local->page_lock. Nobody should assume or set the page other
128  *      than zero when the lock is not held. Lock holders must restore page 0
129  *      before unlocking. Even pure readers must take the lock to protect in
130  *      page 0.
131  *
132  *      To make life difficult the chip can also be very slow. We therefore can't
133  *      just use spinlocks. For the longer lockups we disable the irq the device
134  *      sits on and hold the lock. We must hold the lock because there is a dual
135  *      processor case other than interrupts (get stats/set multicast list in
136  *      parallel with each other and transmit).
137  *
138  *      Note: in theory we can just disable the irq on the card _but_ there is
139  *      a latency on SMP irq delivery. So we can easily go "disable irq" "sync irqs"
140  *      enter lock, take the queued irq. So we waddle instead of flying.
141  *
142  *      Finally by special arrangement for the purpose of being generally
143  *      annoying the transmit function is called bh atomic. That places
144  *      restrictions on the user context callers as disable_irq won't save
145  *      them.
146  */
147
148
149
150 /**
151  * ei_open - Open/initialize the board.
152  * @dev: network device to initialize
153  *
154  * This routine goes all-out, setting everything
155  * up anew at each open, even though many of these registers should only
156  * need to be set once at boot.
157  */
158 static int __ei_open(struct net_device *dev)
159 {
160         unsigned long flags;
161         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
162
163         /* The card I/O part of the driver (e.g. 3c503) can hook a Tx timeout
164             wrapper that does e.g. media check & then calls ei_tx_timeout. */
165         if (dev->tx_timeout == NULL)
166                  dev->tx_timeout = ei_tx_timeout;
167         if (dev->watchdog_timeo <= 0)
168                  dev->watchdog_timeo = TX_TIMEOUT;
169
170         /*
171          *      Grab the page lock so we own the register set, then call
172          *      the init function.
173          */
174
175         spin_lock_irqsave(&ei_local->page_lock, flags);
176         __NS8390_init(dev, 1);
177         /* Set the flag before we drop the lock, That way the IRQ arrives
178            after its set and we get no silly warnings */
179         netif_start_queue(dev);
180         spin_unlock_irqrestore(&ei_local->page_lock, flags);
181         ei_local->irqlock = 0;
182         return 0;
183 }
184
185 /**
186  * ei_close - shut down network device
187  * @dev: network device to close
188  *
189  * Opposite of ei_open(). Only used when "ifconfig <devname> down" is done.
190  */
191 static int __ei_close(struct net_device *dev)
192 {
193         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
194         unsigned long flags;
195
196         /*
197          *      Hold the page lock during close
198          */
199
200         spin_lock_irqsave(&ei_local->page_lock, flags);
201         __NS8390_init(dev, 0);
202         spin_unlock_irqrestore(&ei_local->page_lock, flags);
203         netif_stop_queue(dev);
204         return 0;
205 }
206
207 /**
208  * ei_tx_timeout - handle transmit time out condition
209  * @dev: network device which has apparently fallen asleep
210  *
211  * Called by kernel when device never acknowledges a transmit has
212  * completed (or failed) - i.e. never posted a Tx related interrupt.
213  */
214
215 static void ei_tx_timeout(struct net_device *dev)
216 {
217         unsigned long e8390_base = dev->base_addr;
218         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
219         int txsr, isr, tickssofar = jiffies - dev->trans_start;
220         unsigned long flags;
221
222         ei_local->stat.tx_errors++;
223
224         spin_lock_irqsave(&ei_local->page_lock, flags);
225         txsr = ei_inb(e8390_base+EN0_TSR);
226         isr = ei_inb(e8390_base+EN0_ISR);
227         spin_unlock_irqrestore(&ei_local->page_lock, flags);
228
229         printk(KERN_DEBUG "%s: Tx timed out, %s TSR=%#2x, ISR=%#2x, t=%d.\n",
230                 dev->name, (txsr & ENTSR_ABT) ? "excess collisions." :
231                 (isr) ? "lost interrupt?" : "cable problem?", txsr, isr, tickssofar);
232
233         if (!isr && !ei_local->stat.tx_packets)
234         {
235                 /* The 8390 probably hasn't gotten on the cable yet. */
236                 ei_local->interface_num ^= 1;   /* Try a different xcvr.  */
237         }
238
239         /* Ugly but a reset can be slow, yet must be protected */
240
241         disable_irq_nosync_lockdep(dev->irq);
242         spin_lock(&ei_local->page_lock);
243
244         /* Try to restart the card.  Perhaps the user has fixed something. */
245         ei_reset_8390(dev);
246         __NS8390_init(dev, 1);
247
248         spin_unlock(&ei_local->page_lock);
249         enable_irq_lockdep(dev->irq);
250         netif_wake_queue(dev);
251 }
252
253 /**
254  * ei_start_xmit - begin packet transmission
255  * @skb: packet to be sent
256  * @dev: network device to which packet is sent
257  *
258  * Sends a packet to an 8390 network device.
259  */
260
261 static int ei_start_xmit(struct sk_buff *skb, struct net_device *dev)
262 {
263         unsigned long e8390_base = dev->base_addr;
264         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
265         int send_length = skb->len, output_page;
266         unsigned long flags;
267         char buf[ETH_ZLEN];
268         char *data = skb->data;
269
270         if (skb->len < ETH_ZLEN) {
271                 memset(buf, 0, ETH_ZLEN);       /* more efficient than doing just the needed bits */
272                 memcpy(buf, data, skb->len);
273                 send_length = ETH_ZLEN;
274                 data = buf;
275         }
276
277         /* Mask interrupts from the ethercard.
278            SMP: We have to grab the lock here otherwise the IRQ handler
279            on another CPU can flip window and race the IRQ mask set. We end
280            up trashing the mcast filter not disabling irqs if we don't lock */
281
282         spin_lock_irqsave(&ei_local->page_lock, flags);
283         ei_outb_p(0x00, e8390_base + EN0_IMR);
284         spin_unlock_irqrestore(&ei_local->page_lock, flags);
285
286
287         /*
288          *      Slow phase with lock held.
289          */
290
291         disable_irq_nosync_lockdep_irqsave(dev->irq, &flags);
292
293         spin_lock(&ei_local->page_lock);
294
295         ei_local->irqlock = 1;
296
297         /*
298          * We have two Tx slots available for use. Find the first free
299          * slot, and then perform some sanity checks. With two Tx bufs,
300          * you get very close to transmitting back-to-back packets. With
301          * only one Tx buf, the transmitter sits idle while you reload the
302          * card, leaving a substantial gap between each transmitted packet.
303          */
304
305         if (ei_local->tx1 == 0)
306         {
307                 output_page = ei_local->tx_start_page;
308                 ei_local->tx1 = send_length;
309                 if (ei_debug  &&  ei_local->tx2 > 0)
310                         printk(KERN_DEBUG "%s: idle transmitter tx2=%d, lasttx=%d, txing=%d.\n",
311                                 dev->name, ei_local->tx2, ei_local->lasttx, ei_local->txing);
312         }
313         else if (ei_local->tx2 == 0)
314         {
315                 output_page = ei_local->tx_start_page + TX_PAGES/2;
316                 ei_local->tx2 = send_length;
317                 if (ei_debug  &&  ei_local->tx1 > 0)
318                         printk(KERN_DEBUG "%s: idle transmitter, tx1=%d, lasttx=%d, txing=%d.\n",
319                                 dev->name, ei_local->tx1, ei_local->lasttx, ei_local->txing);
320         }
321         else
322         {       /* We should never get here. */
323                 if (ei_debug)
324                         printk(KERN_DEBUG "%s: No Tx buffers free! tx1=%d tx2=%d last=%d\n",
325                                 dev->name, ei_local->tx1, ei_local->tx2, ei_local->lasttx);
326                 ei_local->irqlock = 0;
327                 netif_stop_queue(dev);
328                 ei_outb_p(ENISR_ALL, e8390_base + EN0_IMR);
329                 spin_unlock(&ei_local->page_lock);
330                 enable_irq_lockdep_irqrestore(dev->irq, &flags);
331                 ei_local->stat.tx_errors++;
332                 return 1;
333         }
334
335         /*
336          * Okay, now upload the packet and trigger a send if the transmitter
337          * isn't already sending. If it is busy, the interrupt handler will
338          * trigger the send later, upon receiving a Tx done interrupt.
339          */
340
341         ei_block_output(dev, send_length, data, output_page);
342
343         if (! ei_local->txing)
344         {
345                 ei_local->txing = 1;
346                 NS8390_trigger_send(dev, send_length, output_page);
347                 dev->trans_start = jiffies;
348                 if (output_page == ei_local->tx_start_page)
349                 {
350                         ei_local->tx1 = -1;
351                         ei_local->lasttx = -1;
352                 }
353                 else
354                 {
355                         ei_local->tx2 = -1;
356                         ei_local->lasttx = -2;
357                 }
358         }
359         else ei_local->txqueue++;
360
361         if (ei_local->tx1  &&  ei_local->tx2)
362                 netif_stop_queue(dev);
363         else
364                 netif_start_queue(dev);
365
366         /* Turn 8390 interrupts back on. */
367         ei_local->irqlock = 0;
368         ei_outb_p(ENISR_ALL, e8390_base + EN0_IMR);
369
370         spin_unlock(&ei_local->page_lock);
371         enable_irq_lockdep_irqrestore(dev->irq, &flags);
372
373         dev_kfree_skb (skb);
374         ei_local->stat.tx_bytes += send_length;
375
376         return 0;
377 }
378
379 /**
380  * ei_interrupt - handle the interrupts from an 8390
381  * @irq: interrupt number
382  * @dev_id: a pointer to the net_device
383  *
384  * Handle the ether interface interrupts. We pull packets from
385  * the 8390 via the card specific functions and fire them at the networking
386  * stack. We also handle transmit completions and wake the transmit path if
387  * necessary. We also update the counters and do other housekeeping as
388  * needed.
389  */
390
391 static irqreturn_t __ei_interrupt(int irq, void *dev_id)
392 {
393         struct net_device *dev = dev_id;
394         unsigned long e8390_base = dev->base_addr;
395         int interrupts, nr_serviced = 0;
396         struct ei_device *ei_local = netdev_priv(dev);
397
398         /*
399          *      Protect the irq test too.
400          */
401
402         spin_lock(&ei_local->page_lock);
403
404         if (ei_local->irqlock)
405         {
406 #if 1 /* This might just be an interrupt for a PCI device sharing this line */
407                 /* The "irqlock" check is only for testing. */
408                 printk(ei_local->irqlock
409                            ? "%s: Interrupted while interrupts are masked! isr=%#2x imr=%#2x.\n"
410                            : "%s: Reentering the interrupt handler! isr=%#2x imr=%#2x.\n",
411                            dev->name, ei_inb_p(e8390_base + EN0_ISR),
412                            ei_inb_p(e8390_base + EN0_IMR));
413 #endif
414                 spin_unlock(&ei_local->page_lock);
415                 return IRQ_NONE;
416         }
417
418         /* Change to page 0 and read the intr status reg. */
419         ei_outb_p(E8390_NODMA+E8390_PAGE0, e8390_base + E8390_CMD);
420         if (ei_debug > 3)
421                 printk(KERN_DEBUG "%s: interrupt(isr=%#2.2x).\n", dev->name,
422                            ei_inb_p(e8390_base + EN0_ISR));
423
424         /* !!Assumption!! -- we stay in page 0.  Don't break this. */
425         while ((interrupts = ei_inb_p(e8390_base + EN0_ISR)) != 0
426                    && ++nr_serviced < MAX_SERVICE)
427         {
428                 if (!netif_running(dev)) {
429                         printk(KERN_WARNING "%s: interrupt from stopped card\n", dev->name);
430                         /* rmk - acknowledge the interrupts */
431                         ei_outb_p(interrupts, e8390_base + EN0_ISR);
432                         interrupts = 0;
433                         break;
434                 }
435                 if (interrupts & ENISR_OVER)
436                         ei_rx_overrun(dev);
437                 else if (interrupts & (ENISR_RX+ENISR_RX_ERR))
438                 {
439                         /* Got a good (?) packet. */
440                         ei_receive(dev);
441                 }
442                 /* Push the next to-transmit packet through. */
443                 if (interrupts & ENISR_TX)
444                         ei_tx_intr(dev);
445                 else if (interrupts & ENISR_TX_ERR)
446                         ei_tx_err(dev);
447
448                 if (interrupts & ENISR_COUNTERS)
449                 {
450                         ei_local->stat.rx_frame_errors += ei_inb_p(e8390_base + EN0_COUNTER0);
451                         ei_local->stat.rx_crc_errors   += ei_inb_p(e8390_base + EN0_COUNTER1);
452                         ei_local->stat.rx_missed_errors+= ei_inb_p(e8390_base + EN0_COUNTER2);
453                         ei_outb_p(ENISR_COUNTERS, e8390_base + EN0_ISR); /* Ack intr. */
454                 }
455
456                 /* Ignore any RDC interrupts that make it back to here. */
457                 if (interrupts & ENISR_RDC)
458                 {
459                         ei_outb_p(ENISR_RDC, e8390_base + EN0_ISR);
460                 }
461
462                 ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, e8390_base + E8390_CMD);
463         }
464
465         if (interrupts && ei_debug)
466         {
467                 ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, e8390_base + E8390_CMD);
468                 if (nr_serviced >= MAX_SERVICE)
469                 {
470                         /* 0xFF is valid for a card removal */
471                         if(interrupts!=0xFF)
472                                 printk(KERN_WARNING "%s: Too much work at interrupt, status %#2.2x\n",
473                                    dev->name, interrupts);
474                         ei_outb_p(ENISR_ALL, e8390_base + EN0_ISR); /* Ack. most intrs. */
475                 } else {
476                         printk(KERN_WARNING "%s: unknown interrupt %#2x\n", dev->name, interrupts);
477                         ei_outb_p(0xff, e8390_base + EN0_ISR); /* Ack. all intrs. */
478                 }
479         }
480         spin_unlock(&ei_local->page_lock);
481         return IRQ_RETVAL(nr_serviced > 0);
482 }
483
484 #ifdef CONFIG_NET_POLL_CONTROLLER
485 static void __ei_poll(struct net_device *dev)
486 {
487         disable_irq_lockdep(dev->irq);
488         __ei_interrupt(dev->irq, dev);
489         enable_irq_lockdep(dev->irq);
490 }
491 #endif
492
493 /**
494  * ei_tx_err - handle transmitter error
495  * @dev: network device which threw the exception
496  *
497  * A transmitter error has happened. Most likely excess collisions (which
498  * is a fairly normal condition). If the error is one where the Tx will
499  * have been aborted, we try and send another one right away, instead of
500  * letting the failed packet sit and collect dust in the Tx buffer. This
501  * is a much better solution as it avoids kernel based Tx timeouts, and
502  * an unnecessary card reset.
503  *
504  * Called with lock held.
505  */
506
507 static void ei_tx_err(struct net_device *dev)
508 {
509         unsigned long e8390_base = dev->base_addr;
510         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
511         unsigned char txsr = ei_inb_p(e8390_base+EN0_TSR);
512         unsigned char tx_was_aborted = txsr & (ENTSR_ABT+ENTSR_FU);
513
514 #ifdef VERBOSE_ERROR_DUMP
515         printk(KERN_DEBUG "%s: transmitter error (%#2x): ", dev->name, txsr);
516         if (txsr & ENTSR_ABT)
517                 printk("excess-collisions ");
518         if (txsr & ENTSR_ND)
519                 printk("non-deferral ");
520         if (txsr & ENTSR_CRS)
521                 printk("lost-carrier ");
522         if (txsr & ENTSR_FU)
523                 printk("FIFO-underrun ");
524         if (txsr & ENTSR_CDH)
525                 printk("lost-heartbeat ");
526         printk("\n");
527 #endif
528
529         ei_outb_p(ENISR_TX_ERR, e8390_base + EN0_ISR); /* Ack intr. */
530
531         if (tx_was_aborted)
532                 ei_tx_intr(dev);
533         else
534         {
535                 ei_local->stat.tx_errors++;
536                 if (txsr & ENTSR_CRS) ei_local->stat.tx_carrier_errors++;
537                 if (txsr & ENTSR_CDH) ei_local->stat.tx_heartbeat_errors++;
538                 if (txsr & ENTSR_OWC) ei_local->stat.tx_window_errors++;
539         }
540 }
541
542 /**
543  * ei_tx_intr - transmit interrupt handler
544  * @dev: network device for which tx intr is handled
545  *
546  * We have finished a transmit: check for errors and then trigger the next
547  * packet to be sent. Called with lock held.
548  */
549
550 static void ei_tx_intr(struct net_device *dev)
551 {
552         unsigned long e8390_base = dev->base_addr;
553         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
554         int status = ei_inb(e8390_base + EN0_TSR);
555
556         ei_outb_p(ENISR_TX, e8390_base + EN0_ISR); /* Ack intr. */
557
558         /*
559          * There are two Tx buffers, see which one finished, and trigger
560          * the send of another one if it exists.
561          */
562         ei_local->txqueue--;
563
564         if (ei_local->tx1 < 0)
565         {
566                 if (ei_local->lasttx != 1 && ei_local->lasttx != -1)
567                         printk(KERN_ERR "%s: bogus last_tx_buffer %d, tx1=%d.\n",
568                                 ei_local->name, ei_local->lasttx, ei_local->tx1);
569                 ei_local->tx1 = 0;
570                 if (ei_local->tx2 > 0)
571                 {
572                         ei_local->txing = 1;
573                         NS8390_trigger_send(dev, ei_local->tx2, ei_local->tx_start_page + 6);
574                         dev->trans_start = jiffies;
575                         ei_local->tx2 = -1,
576                         ei_local->lasttx = 2;
577                 }
578                 else ei_local->lasttx = 20, ei_local->txing = 0;
579         }
580         else if (ei_local->tx2 < 0)
581         {
582                 if (ei_local->lasttx != 2  &&  ei_local->lasttx != -2)
583                         printk("%s: bogus last_tx_buffer %d, tx2=%d.\n",
584                                 ei_local->name, ei_local->lasttx, ei_local->tx2);
585                 ei_local->tx2 = 0;
586                 if (ei_local->tx1 > 0)
587                 {
588                         ei_local->txing = 1;
589                         NS8390_trigger_send(dev, ei_local->tx1, ei_local->tx_start_page);
590                         dev->trans_start = jiffies;
591                         ei_local->tx1 = -1;
592                         ei_local->lasttx = 1;
593                 }
594                 else
595                         ei_local->lasttx = 10, ei_local->txing = 0;
596         }
597 //      else printk(KERN_WARNING "%s: unexpected TX-done interrupt, lasttx=%d.\n",
598 //                      dev->name, ei_local->lasttx);
599
600         /* Minimize Tx latency: update the statistics after we restart TXing. */
601         if (status & ENTSR_COL)
602                 ei_local->stat.collisions++;
603         if (status & ENTSR_PTX)
604                 ei_local->stat.tx_packets++;
605         else
606         {
607                 ei_local->stat.tx_errors++;
608                 if (status & ENTSR_ABT)
609                 {
610                         ei_local->stat.tx_aborted_errors++;
611                         ei_local->stat.collisions += 16;
612                 }
613                 if (status & ENTSR_CRS)
614                         ei_local->stat.tx_carrier_errors++;
615                 if (status & ENTSR_FU)
616                         ei_local->stat.tx_fifo_errors++;
617                 if (status & ENTSR_CDH)
618                         ei_local->stat.tx_heartbeat_errors++;
619                 if (status & ENTSR_OWC)
620                         ei_local->stat.tx_window_errors++;
621         }
622         netif_wake_queue(dev);
623 }
624
625 /**
626  * ei_receive - receive some packets
627  * @dev: network device with which receive will be run
628  *
629  * We have a good packet(s), get it/them out of the buffers.
630  * Called with lock held.
631  */
632
633 static void ei_receive(struct net_device *dev)
634 {
635         unsigned long e8390_base = dev->base_addr;
636         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
637         unsigned char rxing_page, this_frame, next_frame;
638         unsigned short current_offset;
639         int rx_pkt_count = 0;
640         struct e8390_pkt_hdr rx_frame;
641         int num_rx_pages = ei_local->stop_page-ei_local->rx_start_page;
642
643         while (++rx_pkt_count < 10)
644         {
645                 int pkt_len, pkt_stat;
646
647                 /* Get the rx page (incoming packet pointer). */
648                 ei_outb_p(E8390_NODMA+E8390_PAGE1, e8390_base + E8390_CMD);
649                 rxing_page = ei_inb_p(e8390_base + EN1_CURPAG);
650                 ei_outb_p(E8390_NODMA+E8390_PAGE0, e8390_base + E8390_CMD);
651
652                 /* Remove one frame from the ring.  Boundary is always a page behind. */
653                 this_frame = ei_inb_p(e8390_base + EN0_BOUNDARY) + 1;
654                 if (this_frame >= ei_local->stop_page)
655                         this_frame = ei_local->rx_start_page;
656
657                 /* Someday we'll omit the previous, iff we never get this message.
658                    (There is at least one clone claimed to have a problem.)
659
660                    Keep quiet if it looks like a card removal. One problem here
661                    is that some clones crash in roughly the same way.
662                  */
663                 if (ei_debug > 0  &&  this_frame != ei_local->current_page && (this_frame!=0x0 || rxing_page!=0xFF))
664                         printk(KERN_ERR "%s: mismatched read page pointers %2x vs %2x.\n",
665                                    dev->name, this_frame, ei_local->current_page);
666
667                 if (this_frame == rxing_page)   /* Read all the frames? */
668                         break;                          /* Done for now */
669
670                 current_offset = this_frame << 8;
671                 ei_get_8390_hdr(dev, &rx_frame, this_frame);
672
673                 pkt_len = rx_frame.count - sizeof(struct e8390_pkt_hdr);
674                 pkt_stat = rx_frame.status;
675
676                 next_frame = this_frame + 1 + ((pkt_len+4)>>8);
677
678                 /* Check for bogosity warned by 3c503 book: the status byte is never
679                    written.  This happened a lot during testing! This code should be
680                    cleaned up someday. */
681                 if (rx_frame.next != next_frame
682                         && rx_frame.next != next_frame + 1
683                         && rx_frame.next != next_frame - num_rx_pages
684                         && rx_frame.next != next_frame + 1 - num_rx_pages) {
685                         ei_local->current_page = rxing_page;
686                         ei_outb(ei_local->current_page-1, e8390_base+EN0_BOUNDARY);
687                         ei_local->stat.rx_errors++;
688                         continue;
689                 }
690
691                 if (pkt_len < 60  ||  pkt_len > 1518)
692                 {
693                         if (ei_debug)
694                                 printk(KERN_DEBUG "%s: bogus packet size: %d, status=%#2x nxpg=%#2x.\n",
695                                            dev->name, rx_frame.count, rx_frame.status,
696                                            rx_frame.next);
697                         ei_local->stat.rx_errors++;
698                         ei_local->stat.rx_length_errors++;
699                 }
700                  else if ((pkt_stat & 0x0F) == ENRSR_RXOK)
701                 {
702                         struct sk_buff *skb;
703
704                         skb = dev_alloc_skb(pkt_len+2);
705                         if (skb == NULL)
706                         {
707                                 if (ei_debug > 1)
708                                         printk(KERN_DEBUG "%s: Couldn't allocate a sk_buff of size %d.\n",
709                                                    dev->name, pkt_len);
710                                 ei_local->stat.rx_dropped++;
711                                 break;
712                         }
713                         else
714                         {
715                                 skb_reserve(skb,2);     /* IP headers on 16 byte boundaries */
716                                 skb_put(skb, pkt_len);  /* Make room */
717                                 ei_block_input(dev, pkt_len, skb, current_offset + sizeof(rx_frame));
718                                 skb->protocol=eth_type_trans(skb,dev);
719                                 netif_rx(skb);
720                                 dev->last_rx = jiffies;
721                                 ei_local->stat.rx_packets++;
722                                 ei_local->stat.rx_bytes += pkt_len;
723                                 if (pkt_stat & ENRSR_PHY)
724                                         ei_local->stat.multicast++;
725                         }
726                 }
727                 else
728                 {
729                         if (ei_debug)
730                                 printk(KERN_DEBUG "%s: bogus packet: status=%#2x nxpg=%#2x size=%d\n",
731                                            dev->name, rx_frame.status, rx_frame.next,
732                                            rx_frame.count);
733                         ei_local->stat.rx_errors++;
734                         /* NB: The NIC counts CRC, frame and missed errors. */
735                         if (pkt_stat & ENRSR_FO)
736                                 ei_local->stat.rx_fifo_errors++;
737                 }
738                 next_frame = rx_frame.next;
739
740                 /* This _should_ never happen: it's here for avoiding bad clones. */
741                 if (next_frame >= ei_local->stop_page) {
742                         printk("%s: next frame inconsistency, %#2x\n", dev->name,
743                                    next_frame);
744                         next_frame = ei_local->rx_start_page;
745                 }
746                 ei_local->current_page = next_frame;
747                 ei_outb_p(next_frame-1, e8390_base+EN0_BOUNDARY);
748         }
749
750         /* We used to also ack ENISR_OVER here, but that would sometimes mask
751            a real overrun, leaving the 8390 in a stopped state with rec'vr off. */
752         ei_outb_p(ENISR_RX+ENISR_RX_ERR, e8390_base+EN0_ISR);
753         return;
754 }
755
756 /**
757  * ei_rx_overrun - handle receiver overrun
758  * @dev: network device which threw exception
759  *
760  * We have a receiver overrun: we have to kick the 8390 to get it started
761  * again. Problem is that you have to kick it exactly as NS prescribes in
762  * the updated datasheets, or "the NIC may act in an unpredictable manner."
763  * This includes causing "the NIC to defer indefinitely when it is stopped
764  * on a busy network."  Ugh.
765  * Called with lock held. Don't call this with the interrupts off or your
766  * computer will hate you - it takes 10ms or so.
767  */
768
769 static void ei_rx_overrun(struct net_device *dev)
770 {
771         unsigned long e8390_base = dev->base_addr;
772         unsigned char was_txing, must_resend = 0;
773         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
774
775         /*
776          * Record whether a Tx was in progress and then issue the
777          * stop command.
778          */
779         was_txing = ei_inb_p(e8390_base+E8390_CMD) & E8390_TRANS;
780         ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_STOP, e8390_base+E8390_CMD);
781
782         if (ei_debug > 1)
783                 printk(KERN_DEBUG "%s: Receiver overrun.\n", dev->name);
784         ei_local->stat.rx_over_errors++;
785
786         /*
787          * Wait a full Tx time (1.2ms) + some guard time, NS says 1.6ms total.
788          * Early datasheets said to poll the reset bit, but now they say that
789          * it "is not a reliable indicator and subsequently should be ignored."
790          * We wait at least 10ms.
791          */
792
793         mdelay(10);
794
795         /*
796          * Reset RBCR[01] back to zero as per magic incantation.
797          */
798         ei_outb_p(0x00, e8390_base+EN0_RCNTLO);
799         ei_outb_p(0x00, e8390_base+EN0_RCNTHI);
800
801         /*
802          * See if any Tx was interrupted or not. According to NS, this
803          * step is vital, and skipping it will cause no end of havoc.
804          */
805
806         if (was_txing)
807         {
808                 unsigned char tx_completed = ei_inb_p(e8390_base+EN0_ISR) & (ENISR_TX+ENISR_TX_ERR);
809                 if (!tx_completed)
810                         must_resend = 1;
811         }
812
813         /*
814          * Have to enter loopback mode and then restart the NIC before
815          * you are allowed to slurp packets up off the ring.
816          */
817         ei_outb_p(E8390_TXOFF, e8390_base + EN0_TXCR);
818         ei_outb_p(E8390_NODMA + E8390_PAGE0 + E8390_START, e8390_base + E8390_CMD);
819
820         /*
821          * Clear the Rx ring of all the debris, and ack the interrupt.
822          */
823         ei_receive(dev);
824         ei_outb_p(ENISR_OVER, e8390_base+EN0_ISR);
825
826         /*
827          * Leave loopback mode, and resend any packet that got stopped.
828          */
829         ei_outb_p(E8390_TXCONFIG, e8390_base + EN0_TXCR);
830         if (must_resend)
831                 ei_outb_p(E8390_NODMA + E8390_PAGE0 + E8390_START + E8390_TRANS, e8390_base + E8390_CMD);
832 }
833
834 /*
835  *      Collect the stats. This is called unlocked and from several contexts.
836  */
837
838 static struct net_device_stats *get_stats(struct net_device *dev)
839 {
840         unsigned long ioaddr = dev->base_addr;
841         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
842         unsigned long flags;
843
844         /* If the card is stopped, just return the present stats. */
845         if (!netif_running(dev))
846                 return &ei_local->stat;
847
848         spin_lock_irqsave(&ei_local->page_lock,flags);
849         /* Read the counter registers, assuming we are in page 0. */
850         ei_local->stat.rx_frame_errors += ei_inb_p(ioaddr + EN0_COUNTER0);
851         ei_local->stat.rx_crc_errors   += ei_inb_p(ioaddr + EN0_COUNTER1);
852         ei_local->stat.rx_missed_errors+= ei_inb_p(ioaddr + EN0_COUNTER2);
853         spin_unlock_irqrestore(&ei_local->page_lock, flags);
854
855         return &ei_local->stat;
856 }
857
858 /*
859  * Form the 64 bit 8390 multicast table from the linked list of addresses
860  * associated with this dev structure.
861  */
862
863 static inline void make_mc_bits(u8 *bits, struct net_device *dev)
864 {
865         struct dev_mc_list *dmi;
866
867         for (dmi=dev->mc_list; dmi; dmi=dmi->next)
868         {
869                 u32 crc;
870                 if (dmi->dmi_addrlen != ETH_ALEN)
871                 {
872                         printk(KERN_INFO "%s: invalid multicast address length given.\n", dev->name);
873                         continue;
874                 }
875                 crc = ether_crc(ETH_ALEN, dmi->dmi_addr);
876                 /*
877                  * The 8390 uses the 6 most significant bits of the
878                  * CRC to index the multicast table.
879                  */
880                 bits[crc>>29] |= (1<<((crc>>26)&7));
881         }
882 }
883
884 /**
885  * do_set_multicast_list - set/clear multicast filter
886  * @dev: net device for which multicast filter is adjusted
887  *
888  *      Set or clear the multicast filter for this adaptor. May be called
889  *      from a BH in 2.1.x. Must be called with lock held.
890  */
891
892 static void do_set_multicast_list(struct net_device *dev)
893 {
894         unsigned long e8390_base = dev->base_addr;
895         int i;
896         struct ei_device *ei_local = (struct ei_device*)netdev_priv(dev);
897
898         if (!(dev->flags&(IFF_PROMISC|IFF_ALLMULTI)))
899         {
900                 memset(ei_local->mcfilter, 0, 8);
901                 if (dev->mc_list)
902                         make_mc_bits(ei_local->mcfilter, dev);
903         }
904         else
905                 memset(ei_local->mcfilter, 0xFF, 8);    /* mcast set to accept-all */
906
907         /*
908          * DP8390 manuals don't specify any magic sequence for altering
909          * the multicast regs on an already running card. To be safe, we
910          * ensure multicast mode is off prior to loading up the new hash
911          * table. If this proves to be not enough, we can always resort
912          * to stopping the NIC, loading the table and then restarting.
913          *
914          * Bug Alert!  The MC regs on the SMC 83C690 (SMC Elite and SMC
915          * Elite16) appear to be write-only. The NS 8390 data sheet lists
916          * them as r/w so this is a bug.  The SMC 83C790 (SMC Ultra and
917          * Ultra32 EISA) appears to have this bug fixed.
918          */
919
920         if (netif_running(dev))
921                 ei_outb_p(E8390_RXCONFIG, e8390_base + EN0_RXCR);
922         ei_outb_p(E8390_NODMA + E8390_PAGE1, e8390_base + E8390_CMD);
923         for(i = 0; i < 8; i++)
924         {
925                 ei_outb_p(ei_local->mcfilter[i], e8390_base + EN1_MULT_SHIFT(i));
926 #ifndef BUG_83C690
927                 if(ei_inb_p(e8390_base + EN1_MULT_SHIFT(i))!=ei_local->mcfilter[i])
928                         printk(KERN_ERR "Multicast filter read/write mismap %d\n",i);
929 #endif
930         }
931         ei_outb_p(E8390_NODMA + E8390_PAGE0, e8390_base + E8390_CMD);
932
933         if(dev->flags&IFF_PROMISC)
934                 ei_outb_p(E8390_RXCONFIG | 0x18, e8390_base + EN0_RXCR);
935         else if(dev->flags&IFF_ALLMULTI || dev->mc_list)
936                 ei_outb_p(E8390_RXCONFIG | 0x08, e8390_base + EN0_RXCR);
937         else
938                 ei_outb_p(E8390_RXCONFIG, e8390_base + EN0_RXCR);
939  }
940
941 /*
942  *      Called without lock held. This is invoked from user context and may
943  *      be parallel to just about everything else. Its also fairly quick and
944  *      not called too often. Must protect against both bh and irq users
945  */
946
947 static void set_multicast_list(struct net_device *dev)
948 {
949         unsigned long flags;
950         struct ei_device *ei_local = (struct ei_device*)netdev_priv(dev);
951
952         spin_lock_irqsave(&ei_local->page_lock, flags);
953         do_set_multicast_list(dev);
954         spin_unlock_irqrestore(&ei_local->page_lock, flags);
955 }
956
957 /**
958  * ethdev_setup - init rest of 8390 device struct
959  * @dev: network device structure to init
960  *
961  * Initialize the rest of the 8390 device structure.  Do NOT __init
962  * this, as it is used by 8390 based modular drivers too.
963  */
964
965 static void ethdev_setup(struct net_device *dev)
966 {
967         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
968         if (ei_debug > 1)
969                 printk(version);
970
971         dev->hard_start_xmit = &ei_start_xmit;
972         dev->get_stats  = get_stats;
973         dev->set_multicast_list = &set_multicast_list;
974
975         ether_setup(dev);
976
977         spin_lock_init(&ei_local->page_lock);
978 }
979
980 /**
981  * alloc_ei_netdev - alloc_etherdev counterpart for 8390
982  * @size: extra bytes to allocate
983  *
984  * Allocate 8390-specific net_device.
985  */
986 static struct net_device *____alloc_ei_netdev(int size)
987 {
988         return alloc_netdev(sizeof(struct ei_device) + size, "eth%d",
989                                 ethdev_setup);
990 }
991
992
993
994
995 /* This page of functions should be 8390 generic */
996 /* Follow National Semi's recommendations for initializing the "NIC". */
997
998 /**
999  * NS8390_init - initialize 8390 hardware
1000  * @dev: network device to initialize
1001  * @startp: boolean.  non-zero value to initiate chip processing
1002  *
1003  *      Must be called with lock held.
1004  */
1005
1006 static void __NS8390_init(struct net_device *dev, int startp)
1007 {
1008         unsigned long e8390_base = dev->base_addr;
1009         struct ei_device *ei_local = (struct ei_device *) netdev_priv(dev);
1010         int i;
1011         int endcfg = ei_local->word16
1012             ? (0x48 | ENDCFG_WTS | (ei_local->bigendian ? ENDCFG_BOS : 0))
1013             : 0x48;
1014
1015         if(sizeof(struct e8390_pkt_hdr)!=4)
1016                 panic("8390.c: header struct mispacked\n");
1017         /* Follow National Semi's recommendations for initing the DP83902. */
1018         ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_STOP, e8390_base+E8390_CMD); /* 0x21 */
1019         ei_outb_p(endcfg, e8390_base + EN0_DCFG);       /* 0x48 or 0x49 */
1020         /* Clear the remote byte count registers. */
1021         ei_outb_p(0x00,  e8390_base + EN0_RCNTLO);
1022         ei_outb_p(0x00,  e8390_base + EN0_RCNTHI);
1023         /* Set to monitor and loopback mode -- this is vital!. */
1024         ei_outb_p(E8390_RXOFF, e8390_base + EN0_RXCR); /* 0x20 */
1025         ei_outb_p(E8390_TXOFF, e8390_base + EN0_TXCR); /* 0x02 */
1026         /* Set the transmit page and receive ring. */
1027         ei_outb_p(ei_local->tx_start_page, e8390_base + EN0_TPSR);
1028         ei_local->tx1 = ei_local->tx2 = 0;
1029         ei_outb_p(ei_local->rx_start_page, e8390_base + EN0_STARTPG);
1030         ei_outb_p(ei_local->stop_page-1, e8390_base + EN0_BOUNDARY);    /* 3c503 says 0x3f,NS0x26*/
1031         ei_local->current_page = ei_local->rx_start_page;               /* assert boundary+1 */
1032         ei_outb_p(ei_local->stop_page, e8390_base + EN0_STOPPG);
1033         /* Clear the pending interrupts and mask. */
1034         ei_outb_p(0xFF, e8390_base + EN0_ISR);
1035         ei_outb_p(0x00,  e8390_base + EN0_IMR);
1036
1037         /* Copy the station address into the DS8390 registers. */
1038
1039         ei_outb_p(E8390_NODMA + E8390_PAGE1 + E8390_STOP, e8390_base+E8390_CMD); /* 0x61 */
1040         for(i = 0; i < 6; i++)
1041         {
1042                 ei_outb_p(dev->dev_addr[i], e8390_base + EN1_PHYS_SHIFT(i));
1043                 if (ei_debug > 1 && ei_inb_p(e8390_base + EN1_PHYS_SHIFT(i))!=dev->dev_addr[i])
1044                         printk(KERN_ERR "Hw. address read/write mismap %d\n",i);
1045         }
1046
1047         ei_outb_p(ei_local->rx_start_page, e8390_base + EN1_CURPAG);
1048         ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_STOP, e8390_base+E8390_CMD);
1049
1050         netif_start_queue(dev);
1051         ei_local->tx1 = ei_local->tx2 = 0;
1052         ei_local->txing = 0;
1053
1054         if (startp)
1055         {
1056                 ei_outb_p(0xff,  e8390_base + EN0_ISR);
1057                 ei_outb_p(ENISR_ALL,  e8390_base + EN0_IMR);
1058                 ei_outb_p(E8390_NODMA+E8390_PAGE0+E8390_START, e8390_base+E8390_CMD);
1059                 ei_outb_p(E8390_TXCONFIG, e8390_base + EN0_TXCR); /* xmit on. */
1060                 /* 3c503 TechMan says rxconfig only after the NIC is started. */
1061                 ei_outb_p(E8390_RXCONFIG, e8390_base + EN0_RXCR); /* rx on,  */
1062                 do_set_multicast_list(dev);     /* (re)load the mcast table */
1063         }
1064 }
1065
1066 /* Trigger a transmit start, assuming the length is valid.
1067    Always called with the page lock held */
1068
1069 static void NS8390_trigger_send(struct net_device *dev, unsigned int length,
1070                                                                 int start_page)
1071 {
1072         unsigned long e8390_base = dev->base_addr;
1073         struct ei_device *ei_local __attribute((unused)) = (struct ei_device *) netdev_priv(dev);
1074
1075         ei_outb_p(E8390_NODMA+E8390_PAGE0, e8390_base+E8390_CMD);
1076
1077         if (ei_inb_p(e8390_base + E8390_CMD) & E8390_TRANS)
1078         {
1079                 printk(KERN_WARNING "%s: trigger_send() called with the transmitter busy.\n",
1080                         dev->name);
1081                 return;
1082         }
1083         ei_outb_p(length & 0xff, e8390_base + EN0_TCNTLO);
1084         ei_outb_p(length >> 8, e8390_base + EN0_TCNTHI);
1085         ei_outb_p(start_page, e8390_base + EN0_TPSR);
1086         ei_outb_p(E8390_NODMA+E8390_TRANS+E8390_START, e8390_base+E8390_CMD);
1087 }