patch-2_6_7-vs1_9_1_12
[linux-2.6.git] / drivers / net / 3c527.c
1 /* 3c527.c: 3Com Etherlink/MC32 driver for Linux 2.4 and 2.6.
2  *
3  *      (c) Copyright 1998 Red Hat Software Inc
4  *      Written by Alan Cox. 
5  *      Further debugging by Carl Drougge.
6  *      Initial SMP support by Felipe W Damasio <felipewd@terra.com.br>
7  *      Heavily modified by Richard Procter <rnp@paradise.net.nz>
8  *
9  *      Based on skeleton.c written 1993-94 by Donald Becker and ne2.c
10  *      (for the MCA stuff) written by Wim Dumon.
11  *
12  *      Thanks to 3Com for making this possible by providing me with the
13  *      documentation.
14  *
15  *      This software may be used and distributed according to the terms
16  *      of the GNU General Public License, incorporated herein by reference.
17  *
18  */
19
20 #define DRV_NAME                "3c527"
21 #define DRV_VERSION             "0.7-SMP"
22 #define DRV_RELDATE             "2003/09/21"
23
24 static const char *version =
25 DRV_NAME ".c:v" DRV_VERSION " " DRV_RELDATE " Richard Procter <rnp@paradise.net.nz>\n";
26
27 /**
28  * DOC: Traps for the unwary
29  *
30  *      The diagram (Figure 1-1) and the POS summary disagree with the
31  *      "Interrupt Level" section in the manual.
32  *
33  *      The manual contradicts itself when describing the minimum number 
34  *      buffers in the 'configure lists' command. 
35  *      My card accepts a buffer config of 4/4. 
36  *
37  *      Setting the SAV BP bit does not save bad packets, but
38  *      only enables RX on-card stats collection. 
39  *
40  *      The documentation in places seems to miss things. In actual fact
41  *      I've always eventually found everything is documented, it just
42  *      requires careful study.
43  *
44  * DOC: Theory Of Operation
45  *
46  *      The 3com 3c527 is a 32bit MCA bus mastering adapter with a large
47  *      amount of on board intelligence that housekeeps a somewhat dumber
48  *      Intel NIC. For performance we want to keep the transmit queue deep
49  *      as the card can transmit packets while fetching others from main
50  *      memory by bus master DMA. Transmission and reception are driven by
51  *      circular buffer queues.
52  *
53  *      The mailboxes can be used for controlling how the card traverses
54  *      its buffer rings, but are used only for inital setup in this
55  *      implementation.  The exec mailbox allows a variety of commands to
56  *      be executed. Each command must complete before the next is
57  *      executed. Primarily we use the exec mailbox for controlling the
58  *      multicast lists.  We have to do a certain amount of interesting
59  *      hoop jumping as the multicast list changes can occur in interrupt
60  *      state when the card has an exec command pending. We defer such
61  *      events until the command completion interrupt.
62  *
63  *      A copy break scheme (taken from 3c59x.c) is employed whereby
64  *      received frames exceeding a configurable length are passed
65  *      directly to the higher networking layers without incuring a copy,
66  *      in what amounts to a time/space trade-off.
67  *       
68  *      The card also keeps a large amount of statistical information
69  *      on-board. In a perfect world, these could be used safely at no
70  *      cost. However, lacking information to the contrary, processing
71  *      them without races would involve so much extra complexity as to
72  *      make it unworthwhile to do so. In the end, a hybrid SW/HW
73  *      implementation was made necessary --- see mc32_update_stats().  
74  *
75  * DOC: Notes
76  *      
77  *      It should be possible to use two or more cards, but at this stage
78  *      only by loading two copies of the same module.
79  *
80  *      The on-board 82586 NIC has trouble receiving multiple
81  *      back-to-back frames and so is likely to drop packets from fast
82  *      senders.
83 **/
84
85 #include <linux/module.h>
86
87 #include <linux/errno.h>
88 #include <linux/netdevice.h>
89 #include <linux/etherdevice.h>
90 #include <linux/if_ether.h>
91 #include <linux/init.h>
92 #include <linux/kernel.h>
93 #include <linux/types.h>
94 #include <linux/fcntl.h>
95 #include <linux/interrupt.h>
96 #include <linux/mca-legacy.h>
97 #include <linux/ioport.h>
98 #include <linux/in.h>
99 #include <linux/skbuff.h>
100 #include <linux/slab.h>
101 #include <linux/string.h>
102 #include <linux/wait.h>
103 #include <linux/ethtool.h>
104 #include <linux/completion.h>
105
106 #include <asm/semaphore.h>
107 #include <asm/uaccess.h>
108 #include <asm/system.h>
109 #include <asm/bitops.h>
110 #include <asm/io.h>
111 #include <asm/dma.h>
112
113 #include "3c527.h"
114
115 MODULE_LICENSE("GPL");
116
117 /*
118  * The name of the card. Is used for messages and in the requests for
119  * io regions, irqs and dma channels
120  */
121 static const char* cardname = DRV_NAME;
122
123 /* use 0 for production, 1 for verification, >2 for debug */
124 #ifndef NET_DEBUG
125 #define NET_DEBUG 2
126 #endif
127
128 #undef DEBUG_IRQ
129
130 static unsigned int mc32_debug = NET_DEBUG;
131
132 /* The number of low I/O ports used by the ethercard. */
133 #define MC32_IO_EXTENT  8
134
135 /* As implemented, values must be a power-of-2 -- 4/8/16/32 */ 
136 #define TX_RING_LEN     32       /* Typically the card supports 37  */
137 #define RX_RING_LEN     8        /*     "       "        "          */
138
139 /* Copy break point, see above for details. 
140  * Setting to > 1512 effectively disables this feature. */          
141 #define RX_COPYBREAK    200      /* Value from 3c59x.c */
142
143 /* Issue the 82586 workaround command - this is for "busy lans", but
144  * basically means for all lans now days - has a performance (latency) 
145  * cost, but best set. */ 
146 static const int WORKAROUND_82586=1;
147
148 /* Pointers to buffers and their on-card records */
149 struct mc32_ring_desc 
150 {
151         volatile struct skb_header *p;                    
152         struct sk_buff *skb;          
153 };
154
155 /* Information that needs to be kept for each board. */
156 struct mc32_local 
157 {
158         int slot;
159
160         u32 base;
161         struct net_device_stats net_stats;
162         volatile struct mc32_mailbox *rx_box;
163         volatile struct mc32_mailbox *tx_box;
164         volatile struct mc32_mailbox *exec_box;
165         volatile struct mc32_stats *stats;    /* Start of on-card statistics */
166         u16 tx_chain;           /* Transmit list start offset */
167         u16 rx_chain;           /* Receive list start offset */
168         u16 tx_len;             /* Transmit list count */ 
169         u16 rx_len;             /* Receive list count */
170
171         u16 xceiver_desired_state; /* HALTED or RUNNING */
172         u16 cmd_nonblocking;    /* Thread is uninterested in command result */
173         u16 mc_reload_wait;     /* A multicast load request is pending */
174         u32 mc_list_valid;      /* True when the mclist is set */
175
176         struct mc32_ring_desc tx_ring[TX_RING_LEN];     /* Host Transmit ring */
177         struct mc32_ring_desc rx_ring[RX_RING_LEN];     /* Host Receive ring */
178
179         atomic_t tx_count;      /* buffers left */
180         atomic_t tx_ring_head;  /* index to tx en-queue end */
181         u16 tx_ring_tail;       /* index to tx de-queue end */
182
183         u16 rx_ring_tail;       /* index to rx de-queue end */ 
184
185         struct semaphore cmd_mutex;    /* Serialises issuing of execute commands */
186         struct completion execution_cmd; /* Card has completed an execute command */
187         struct completion xceiver_cmd;   /* Card has completed a tx or rx command */
188 };
189
190 /* The station (ethernet) address prefix, used for a sanity check. */
191 #define SA_ADDR0 0x02
192 #define SA_ADDR1 0x60
193 #define SA_ADDR2 0xAC
194
195 struct mca_adapters_t {
196         unsigned int    id;
197         char            *name;
198 };
199
200 const struct mca_adapters_t mc32_adapters[] = {
201         { 0x0041, "3COM EtherLink MC/32" },
202         { 0x8EF5, "IBM High Performance Lan Adapter" },
203         { 0x0000, NULL }
204 };
205
206
207 /* Macros for ring index manipulations */ 
208 static inline u16 next_rx(u16 rx) { return (rx+1)&(RX_RING_LEN-1); };
209 static inline u16 prev_rx(u16 rx) { return (rx-1)&(RX_RING_LEN-1); };
210
211 static inline u16 next_tx(u16 tx) { return (tx+1)&(TX_RING_LEN-1); };
212
213
214 /* Index to functions, as function prototypes. */
215 static int      mc32_probe1(struct net_device *dev, int ioaddr);
216 static int      mc32_command(struct net_device *dev, u16 cmd, void *data, int len);
217 static int      mc32_open(struct net_device *dev);
218 static void     mc32_timeout(struct net_device *dev);
219 static int      mc32_send_packet(struct sk_buff *skb, struct net_device *dev);
220 static irqreturn_t mc32_interrupt(int irq, void *dev_id, struct pt_regs *regs);
221 static int      mc32_close(struct net_device *dev);
222 static struct   net_device_stats *mc32_get_stats(struct net_device *dev);
223 static void     mc32_set_multicast_list(struct net_device *dev);
224 static void     mc32_reset_multicast_list(struct net_device *dev);
225 static struct ethtool_ops netdev_ethtool_ops;
226
227 static void cleanup_card(struct net_device *dev)
228 {
229         struct mc32_local *lp = netdev_priv(dev);
230         unsigned slot = lp->slot;
231         mca_mark_as_unused(slot);
232         mca_set_adapter_name(slot, NULL);
233         free_irq(dev->irq, dev);
234         release_region(dev->base_addr, MC32_IO_EXTENT);
235 }
236
237 /**
238  * mc32_probe   -       Search for supported boards
239  * @unit: interface number to use
240  *
241  * Because MCA bus is a real bus and we can scan for cards we could do a
242  * single scan for all boards here. Right now we use the passed in device
243  * structure and scan for only one board. This needs fixing for modules
244  * in particular.
245  */
246
247 struct net_device *__init mc32_probe(int unit)
248 {
249         struct net_device *dev = alloc_etherdev(sizeof(struct mc32_local));
250         static int current_mca_slot = -1;
251         int i;
252         int err;
253
254         if (!dev)
255                 return ERR_PTR(-ENOMEM);
256
257         if (unit >= 0)
258                 sprintf(dev->name, "eth%d", unit);
259
260         SET_MODULE_OWNER(dev);
261
262         /* Do not check any supplied i/o locations. 
263            POS registers usually don't fail :) */
264
265         /* MCA cards have POS registers.  
266            Autodetecting MCA cards is extremely simple. 
267            Just search for the card. */
268
269         for(i = 0; (mc32_adapters[i].name != NULL); i++) {
270                 current_mca_slot = 
271                         mca_find_unused_adapter(mc32_adapters[i].id, 0);
272
273                 if(current_mca_slot != MCA_NOTFOUND) {
274                         if(!mc32_probe1(dev, current_mca_slot))
275                         {
276                                 mca_set_adapter_name(current_mca_slot, 
277                                                 mc32_adapters[i].name);
278                                 mca_mark_as_used(current_mca_slot);
279                                 err = register_netdev(dev);
280                                 if (err) {
281                                         cleanup_card(dev);
282                                         free_netdev(dev);
283                                         dev = ERR_PTR(err);
284                                 }
285                                 return dev;
286                         }
287                         
288                 }
289         }
290         free_netdev(dev);
291         return ERR_PTR(-ENODEV);
292 }
293
294 /**
295  * mc32_probe1  -       Check a given slot for a board and test the card
296  * @dev:  Device structure to fill in
297  * @slot: The MCA bus slot being used by this card
298  *
299  * Decode the slot data and configure the card structures. Having done this we
300  * can reset the card and configure it. The card does a full self test cycle
301  * in firmware so we have to wait for it to return and post us either a 
302  * failure case or some addresses we use to find the board internals.
303  */
304
305 static int __init mc32_probe1(struct net_device *dev, int slot)
306 {
307         static unsigned version_printed;
308         int i, err;
309         u8 POS;
310         u32 base;
311         struct mc32_local *lp = netdev_priv(dev);
312         static u16 mca_io_bases[]={
313                 0x7280,0x7290,
314                 0x7680,0x7690,
315                 0x7A80,0x7A90,
316                 0x7E80,0x7E90
317         };
318         static u32 mca_mem_bases[]={
319                 0x00C0000,
320                 0x00C4000,
321                 0x00C8000,
322                 0x00CC000,
323                 0x00D0000,
324                 0x00D4000,
325                 0x00D8000,
326                 0x00DC000
327         };
328         static char *failures[]={
329                 "Processor instruction",
330                 "Processor data bus",
331                 "Processor data bus",
332                 "Processor data bus",
333                 "Adapter bus",
334                 "ROM checksum",
335                 "Base RAM",
336                 "Extended RAM",
337                 "82586 internal loopback",
338                 "82586 initialisation failure",
339                 "Adapter list configuration error"
340         };
341
342         /* Time to play MCA games */
343
344         if (mc32_debug  &&  version_printed++ == 0)
345                 printk(KERN_DEBUG "%s", version);
346
347         printk(KERN_INFO "%s: %s found in slot %d:", dev->name, cardname, slot);
348
349         POS = mca_read_stored_pos(slot, 2);
350         
351         if(!(POS&1))
352         {
353                 printk(" disabled.\n");
354                 return -ENODEV;
355         }
356
357         /* Fill in the 'dev' fields. */
358         dev->base_addr = mca_io_bases[(POS>>1)&7];
359         dev->mem_start = mca_mem_bases[(POS>>4)&7];
360         
361         POS = mca_read_stored_pos(slot, 4);
362         if(!(POS&1))
363         {
364                 printk("memory window disabled.\n");
365                 return -ENODEV;
366         }
367
368         POS = mca_read_stored_pos(slot, 5);
369         
370         i=(POS>>4)&3;
371         if(i==3)
372         {
373                 printk("invalid memory window.\n");
374                 return -ENODEV;
375         }
376         
377         i*=16384;
378         i+=16384;
379         
380         dev->mem_end=dev->mem_start + i;
381         
382         dev->irq = ((POS>>2)&3)+9;
383         
384         if(!request_region(dev->base_addr, MC32_IO_EXTENT, cardname))
385         {
386                 printk("io 0x%3lX, which is busy.\n", dev->base_addr);
387                 return -EBUSY;
388         }
389
390         printk("io 0x%3lX irq %d mem 0x%lX (%dK)\n",
391                 dev->base_addr, dev->irq, dev->mem_start, i/1024);
392         
393         
394         /* We ought to set the cache line size here.. */
395         
396         
397         /*
398          *      Go PROM browsing
399          */
400          
401         printk("%s: Address ", dev->name);
402          
403         /* Retrieve and print the ethernet address. */
404         for (i = 0; i < 6; i++)
405         {
406                 mca_write_pos(slot, 6, i+12);
407                 mca_write_pos(slot, 7, 0);
408         
409                 printk(" %2.2x", dev->dev_addr[i] = mca_read_pos(slot,3));
410         }
411
412         mca_write_pos(slot, 6, 0);
413         mca_write_pos(slot, 7, 0);
414
415         POS = mca_read_stored_pos(slot, 4);
416         
417         if(POS&2)
418                 printk(" : BNC port selected.\n");
419         else 
420                 printk(" : AUI port selected.\n");
421                 
422         POS=inb(dev->base_addr+HOST_CTRL);
423         POS|=HOST_CTRL_ATTN|HOST_CTRL_RESET;
424         POS&=~HOST_CTRL_INTE;
425         outb(POS, dev->base_addr+HOST_CTRL);
426         /* Reset adapter */
427         udelay(100);
428         /* Reset off */
429         POS&=~(HOST_CTRL_ATTN|HOST_CTRL_RESET);
430         outb(POS, dev->base_addr+HOST_CTRL);
431         
432         udelay(300);
433         
434         /*
435          *      Grab the IRQ
436          */
437
438         err = request_irq(dev->irq, &mc32_interrupt, SA_SHIRQ | SA_SAMPLE_RANDOM, dev->name, dev);
439         if (err) {
440                 release_region(dev->base_addr, MC32_IO_EXTENT);
441                 printk(KERN_ERR "%s: unable to get IRQ %d.\n", dev->name, dev->irq);
442                 goto err_exit_ports;
443         }
444
445         memset(lp, 0, sizeof(struct mc32_local));
446         lp->slot = slot;
447
448         i=0;
449
450         base = inb(dev->base_addr);
451         
452         while(base == 0xFF)
453         {
454                 i++;
455                 if(i == 1000)
456                 {
457                         printk(KERN_ERR "%s: failed to boot adapter.\n", dev->name);
458                         err = -ENODEV; 
459                         goto err_exit_irq;
460                 }
461                 udelay(1000);
462                 if(inb(dev->base_addr+2)&(1<<5))
463                         base = inb(dev->base_addr);
464         }
465
466         if(base>0)
467         {
468                 if(base < 0x0C)
469                         printk(KERN_ERR "%s: %s%s.\n", dev->name, failures[base-1],
470                                 base<0x0A?" test failure":"");
471                 else
472                         printk(KERN_ERR "%s: unknown failure %d.\n", dev->name, base);
473                 err = -ENODEV; 
474                 goto err_exit_irq;
475         }
476         
477         base=0;
478         for(i=0;i<4;i++)
479         {
480                 int n=0;
481         
482                 while(!(inb(dev->base_addr+2)&(1<<5)))
483                 {
484                         n++;
485                         udelay(50);
486                         if(n>100)
487                         {
488                                 printk(KERN_ERR "%s: mailbox read fail (%d).\n", dev->name, i);
489                                 err = -ENODEV;
490                                 goto err_exit_irq;
491                         }
492                 }
493
494                 base|=(inb(dev->base_addr)<<(8*i));
495         }
496         
497         lp->exec_box=isa_bus_to_virt(dev->mem_start+base);
498         
499         base=lp->exec_box->data[1]<<16|lp->exec_box->data[0];  
500         
501         lp->base = dev->mem_start+base;
502         
503         lp->rx_box=isa_bus_to_virt(lp->base + lp->exec_box->data[2]); 
504         lp->tx_box=isa_bus_to_virt(lp->base + lp->exec_box->data[3]);
505         
506         lp->stats = isa_bus_to_virt(lp->base + lp->exec_box->data[5]);
507
508         /*
509          *      Descriptor chains (card relative)
510          */
511          
512         lp->tx_chain            = lp->exec_box->data[8];   /* Transmit list start offset */
513         lp->rx_chain            = lp->exec_box->data[10];  /* Receive list start offset */
514         lp->tx_len              = lp->exec_box->data[9];   /* Transmit list count */ 
515         lp->rx_len              = lp->exec_box->data[11];  /* Receive list count */
516
517         init_MUTEX_LOCKED(&lp->cmd_mutex);
518         init_completion(&lp->execution_cmd);
519         init_completion(&lp->xceiver_cmd);
520         
521         printk("%s: Firmware Rev %d. %d RX buffers, %d TX buffers. Base of 0x%08X.\n",
522                 dev->name, lp->exec_box->data[12], lp->rx_len, lp->tx_len, lp->base);
523
524         dev->open               = mc32_open;
525         dev->stop               = mc32_close;
526         dev->hard_start_xmit    = mc32_send_packet;
527         dev->get_stats          = mc32_get_stats;
528         dev->set_multicast_list = mc32_set_multicast_list;
529         dev->tx_timeout         = mc32_timeout;
530         dev->watchdog_timeo     = HZ*5; /* Board does all the work */
531         dev->ethtool_ops        = &netdev_ethtool_ops;
532
533         return 0;
534
535 err_exit_irq:
536         free_irq(dev->irq, dev);
537 err_exit_ports:
538         release_region(dev->base_addr, MC32_IO_EXTENT);
539         return err;
540 }
541
542
543 /**
544  *      mc32_ready_poll         -       wait until we can feed it a command
545  *      @dev:   The device to wait for
546  *      
547  *      Wait until the card becomes ready to accept a command via the
548  *      command register. This tells us nothing about the completion
549  *      status of any pending commands and takes very little time at all.
550  */
551  
552 static inline void mc32_ready_poll(struct net_device *dev)
553 {
554         int ioaddr = dev->base_addr;
555         while(!(inb(ioaddr+HOST_STATUS)&HOST_STATUS_CRR));
556 }
557
558
559 /**
560  *      mc32_command_nowait     -       send a command non blocking
561  *      @dev: The 3c527 to issue the command to
562  *      @cmd: The command word to write to the mailbox
563  *      @data: A data block if the command expects one
564  *      @len: Length of the data block
565  *
566  *      Send a command from interrupt state. If there is a command
567  *      currently being executed then we return an error of -1. It
568  *      simply isn't viable to wait around as commands may be
569  *      slow. This can theoretically be starved on SMP, but it's hard
570  *      to see a realistic situation.  We do not wait for the command
571  *      to complete --- we rely on the interrupt handler to tidy up
572  *      after us.
573  */
574
575 static int mc32_command_nowait(struct net_device *dev, u16 cmd, void *data, int len)
576 {
577         struct mc32_local *lp = netdev_priv(dev);
578         int ioaddr = dev->base_addr;
579         int ret = -1;
580
581         if (down_trylock(&lp->cmd_mutex) == 0)
582         {
583                 lp->cmd_nonblocking=1;
584                 lp->exec_box->mbox=0;
585                 lp->exec_box->mbox=cmd;
586                 memcpy((void *)lp->exec_box->data, data, len);
587                 barrier();      /* the memcpy forgot the volatile so be sure */
588
589                 /* Send the command */
590                 mc32_ready_poll(dev);
591                 outb(1<<6, ioaddr+HOST_CMD);
592
593                 ret = 0;
594
595                 /* Interrupt handler will signal mutex on completion */
596         }
597
598         return ret;
599 }
600
601
602 /**
603  *      mc32_command    -       send a command and sleep until completion
604  *      @dev: The 3c527 card to issue the command to
605  *      @cmd: The command word to write to the mailbox
606  *      @data: A data block if the command expects one
607  *      @len: Length of the data block
608  *
609  *      Sends exec commands in a user context. This permits us to wait around
610  *      for the replies and also to wait for the command buffer to complete
611  *      from a previous command before we execute our command. After our 
612  *      command completes we will attempt any pending multicast reload
613  *      we blocked off by hogging the exec buffer.
614  *
615  *      You feed the card a command, you wait, it interrupts you get a 
616  *      reply. All well and good. The complication arises because you use
617  *      commands for filter list changes which come in at bh level from things
618  *      like IPV6 group stuff.
619  */
620   
621 static int mc32_command(struct net_device *dev, u16 cmd, void *data, int len)
622 {
623         struct mc32_local *lp = netdev_priv(dev);
624         int ioaddr = dev->base_addr;
625         int ret = 0;
626         
627         down(&lp->cmd_mutex);
628
629         /*
630          *     My Turn
631          */
632
633         lp->cmd_nonblocking=0;
634         lp->exec_box->mbox=0;
635         lp->exec_box->mbox=cmd;
636         memcpy((void *)lp->exec_box->data, data, len);
637         barrier();      /* the memcpy forgot the volatile so be sure */
638
639         mc32_ready_poll(dev);
640         outb(1<<6, ioaddr+HOST_CMD);
641
642         wait_for_completion(&lp->execution_cmd);
643         
644         if(lp->exec_box->mbox&(1<<13))
645                 ret = -1;
646
647         up(&lp->cmd_mutex);
648
649         /*
650          *      A multicast set got blocked - try it now
651          */
652
653         if(lp->mc_reload_wait)
654         {
655                 mc32_reset_multicast_list(dev);
656         }
657
658         return ret;
659 }
660
661
662 /**
663  *      mc32_start_transceiver  -       tell board to restart tx/rx
664  *      @dev: The 3c527 card to issue the command to
665  *
666  *      This may be called from the interrupt state, where it is used
667  *      to restart the rx ring if the card runs out of rx buffers. 
668  *      
669  *      We must first check if it's ok to (re)start the transceiver. See
670  *      mc32_close for details.
671  */
672
673 static void mc32_start_transceiver(struct net_device *dev) {
674
675         struct mc32_local *lp = netdev_priv(dev);
676         int ioaddr = dev->base_addr;
677
678         /* Ignore RX overflow on device closure */ 
679         if (lp->xceiver_desired_state==HALTED)
680                 return; 
681
682         /* Give the card the offset to the post-EOL-bit RX descriptor */
683         mc32_ready_poll(dev); 
684         lp->rx_box->mbox=0;
685         lp->rx_box->data[0]=lp->rx_ring[prev_rx(lp->rx_ring_tail)].p->next; 
686         outb(HOST_CMD_START_RX, ioaddr+HOST_CMD);      
687
688         mc32_ready_poll(dev); 
689         lp->tx_box->mbox=0;
690         outb(HOST_CMD_RESTRT_TX, ioaddr+HOST_CMD);   /* card ignores this on RX restart */ 
691         
692         /* We are not interrupted on start completion */ 
693 }
694
695
696 /**
697  *      mc32_halt_transceiver   -       tell board to stop tx/rx
698  *      @dev: The 3c527 card to issue the command to
699  *
700  *      We issue the commands to halt the card's transceiver. In fact,
701  *      after some experimenting we now simply tell the card to
702  *      suspend. When issuing aborts occasionally odd things happened.
703  *
704  *      We then sleep until the card has notified us that both rx and
705  *      tx have been suspended.
706  */ 
707
708 static void mc32_halt_transceiver(struct net_device *dev) 
709 {
710         struct mc32_local *lp = netdev_priv(dev);
711         int ioaddr = dev->base_addr;
712
713         mc32_ready_poll(dev);   
714         lp->rx_box->mbox=0;
715         outb(HOST_CMD_SUSPND_RX, ioaddr+HOST_CMD);                      
716         wait_for_completion(&lp->xceiver_cmd);
717
718         mc32_ready_poll(dev); 
719         lp->tx_box->mbox=0;
720         outb(HOST_CMD_SUSPND_TX, ioaddr+HOST_CMD);      
721         wait_for_completion(&lp->xceiver_cmd);
722 }
723
724
725 /**
726  *      mc32_load_rx_ring       -       load the ring of receive buffers
727  *      @dev: 3c527 to build the ring for
728  *
729  *      This initalises the on-card and driver datastructures to
730  *      the point where mc32_start_transceiver() can be called.
731  *
732  *      The card sets up the receive ring for us. We are required to use the
733  *      ring it provides, although the size of the ring is configurable.
734  *
735  *      We allocate an sk_buff for each ring entry in turn and
736  *      initalise its house-keeping info. At the same time, we read
737  *      each 'next' pointer in our rx_ring array. This reduces slow
738  *      shared-memory reads and makes it easy to access predecessor
739  *      descriptors.
740  *
741  *      We then set the end-of-list bit for the last entry so that the
742  *      card will know when it has run out of buffers.
743  */
744          
745 static int mc32_load_rx_ring(struct net_device *dev)
746 {
747         struct mc32_local *lp = netdev_priv(dev);
748         int i;
749         u16 rx_base;
750         volatile struct skb_header *p;
751         
752         rx_base=lp->rx_chain;
753
754         for(i=0; i<RX_RING_LEN; i++)
755         {
756                 lp->rx_ring[i].skb=alloc_skb(1532, GFP_KERNEL);
757                 skb_reserve(lp->rx_ring[i].skb, 18);  
758
759                 if(lp->rx_ring[i].skb==NULL)
760                 {
761                         for(;i>=0;i--)
762                                 kfree_skb(lp->rx_ring[i].skb);
763                         return -ENOBUFS;
764                 }
765                 
766                 p=isa_bus_to_virt(lp->base+rx_base);
767                                 
768                 p->control=0;
769                 p->data=isa_virt_to_bus(lp->rx_ring[i].skb->data);
770                 p->status=0;
771                 p->length=1532;
772         
773                 lp->rx_ring[i].p=p; 
774                 rx_base=p->next; 
775         }
776
777         lp->rx_ring[i-1].p->control |= CONTROL_EOL;
778
779         lp->rx_ring_tail=0;
780
781         return 0;
782 }       
783
784
785 /**
786  *      mc32_flush_rx_ring      -       free the ring of receive buffers
787  *      @lp: Local data of 3c527 to flush the rx ring of
788  *
789  *      Free the buffer for each ring slot. This may be called 
790  *      before mc32_load_rx_ring(), eg. on error in mc32_open().
791  *      Requires rx skb pointers to point to a valid skb, or NULL.
792  */
793
794 static void mc32_flush_rx_ring(struct net_device *dev)
795 {
796         struct mc32_local *lp = netdev_priv(dev);
797         int i; 
798
799         for(i=0; i < RX_RING_LEN; i++) 
800         { 
801                 if (lp->rx_ring[i].skb) {
802                         dev_kfree_skb(lp->rx_ring[i].skb);
803                         lp->rx_ring[i].skb = NULL;
804                 }
805                 lp->rx_ring[i].p=NULL; 
806         } 
807 }
808
809
810 /**
811  *      mc32_load_tx_ring       -       load transmit ring
812  *      @dev: The 3c527 card to issue the command to
813  *
814  *      This sets up the host transmit data-structures. 
815  *
816  *      First, we obtain from the card it's current postion in the tx
817  *      ring, so that we will know where to begin transmitting
818  *      packets.
819  *      
820  *      Then, we read the 'next' pointers from the on-card tx ring into
821  *      our tx_ring array to reduce slow shared-mem reads. Finally, we
822  *      intitalise the tx house keeping variables.
823  * 
824  */ 
825
826 static void mc32_load_tx_ring(struct net_device *dev)
827
828         struct mc32_local *lp = netdev_priv(dev);
829         volatile struct skb_header *p;
830         int i; 
831         u16 tx_base;
832
833         tx_base=lp->tx_box->data[0]; 
834
835         for(i=0 ; i<TX_RING_LEN ; i++)
836         {
837                 p=isa_bus_to_virt(lp->base+tx_base);
838                 lp->tx_ring[i].p=p; 
839                 lp->tx_ring[i].skb=NULL;
840
841                 tx_base=p->next;
842         }
843
844         /* -1 so that tx_ring_head cannot "lap" tx_ring_tail */
845         /* see mc32_tx_ring */
846
847         atomic_set(&lp->tx_count, TX_RING_LEN-1); 
848         atomic_set(&lp->tx_ring_head, 0); 
849         lp->tx_ring_tail=0; 
850
851
852
853 /**
854  *      mc32_flush_tx_ring      -       free transmit ring
855  *      @lp: Local data of 3c527 to flush the tx ring of
856  *
857  *      If the ring is non-empty, zip over the it, freeing any
858  *      allocated skb_buffs.  The tx ring house-keeping variables are
859  *      then reset. Requires rx skb pointers to point to a valid skb,
860  *      or NULL.
861  */
862
863 static void mc32_flush_tx_ring(struct net_device *dev)
864 {
865         struct mc32_local *lp = netdev_priv(dev);
866         int i;
867
868         for (i=0; i < TX_RING_LEN; i++)
869         {
870                 if (lp->tx_ring[i].skb)
871                 {
872                         dev_kfree_skb(lp->tx_ring[i].skb);
873                         lp->tx_ring[i].skb = NULL;
874                 }
875         }
876
877         atomic_set(&lp->tx_count, 0); 
878         atomic_set(&lp->tx_ring_head, 0); 
879         lp->tx_ring_tail=0;
880 }
881         
882
883 /**
884  *      mc32_open       -       handle 'up' of card
885  *      @dev: device to open
886  *
887  *      The user is trying to bring the card into ready state. This requires
888  *      a brief dialogue with the card. Firstly we enable interrupts and then
889  *      'indications'. Without these enabled the card doesn't bother telling
890  *      us what it has done. This had me puzzled for a week.
891  *
892  *      We configure the number of card descriptors, then load the network
893  *      address and multicast filters. Turn on the workaround mode. This
894  *      works around a bug in the 82586 - it asks the firmware to do
895  *      so. It has a performance (latency) hit but is needed on busy
896  *      [read most] lans. We load the ring with buffers then we kick it
897  *      all off.
898  */
899
900 static int mc32_open(struct net_device *dev)
901 {
902         int ioaddr = dev->base_addr;
903         struct mc32_local *lp = netdev_priv(dev);
904         u8 one=1;
905         u8 regs;
906         u16 descnumbuffs[2] = {TX_RING_LEN, RX_RING_LEN};
907
908         /*
909          *      Interrupts enabled
910          */
911
912         regs=inb(ioaddr+HOST_CTRL);
913         regs|=HOST_CTRL_INTE;
914         outb(regs, ioaddr+HOST_CTRL);
915         
916         /*
917          *      Allow ourselves to issue commands
918          */
919
920         up(&lp->cmd_mutex);
921
922
923         /*
924          *      Send the indications on command
925          */
926
927         mc32_command(dev, 4, &one, 2);
928
929         /*
930          *      Poke it to make sure it's really dead. 
931          */
932
933         mc32_halt_transceiver(dev); 
934         mc32_flush_tx_ring(dev); 
935
936         /* 
937          *      Ask card to set up on-card descriptors to our spec 
938          */ 
939
940         if(mc32_command(dev, 8, descnumbuffs, 4)) { 
941                 printk("%s: %s rejected our buffer configuration!\n",
942                        dev->name, cardname);
943                 mc32_close(dev); 
944                 return -ENOBUFS; 
945         }
946         
947         /* Report new configuration */ 
948         mc32_command(dev, 6, NULL, 0); 
949
950         lp->tx_chain            = lp->exec_box->data[8];   /* Transmit list start offset */
951         lp->rx_chain            = lp->exec_box->data[10];  /* Receive list start offset */
952         lp->tx_len              = lp->exec_box->data[9];   /* Transmit list count */ 
953         lp->rx_len              = lp->exec_box->data[11];  /* Receive list count */
954  
955         /* Set Network Address */
956         mc32_command(dev, 1, dev->dev_addr, 6);
957         
958         /* Set the filters */
959         mc32_set_multicast_list(dev);
960                    
961         if (WORKAROUND_82586) { 
962                 u16 zero_word=0;
963                 mc32_command(dev, 0x0D, &zero_word, 2);   /* 82586 bug workaround on  */
964         }
965
966         mc32_load_tx_ring(dev);
967         
968         if(mc32_load_rx_ring(dev)) 
969         {
970                 mc32_close(dev);
971                 return -ENOBUFS;
972         }
973
974         lp->xceiver_desired_state = RUNNING;
975         
976         /* And finally, set the ball rolling... */
977         mc32_start_transceiver(dev);
978
979         netif_start_queue(dev);
980
981         return 0;
982 }
983
984
985 /**
986  *      mc32_timeout    -       handle a timeout from the network layer
987  *      @dev: 3c527 that timed out
988  *
989  *      Handle a timeout on transmit from the 3c527. This normally means
990  *      bad things as the hardware handles cable timeouts and mess for
991  *      us.
992  *
993  */
994
995 static void mc32_timeout(struct net_device *dev)
996 {
997         printk(KERN_WARNING "%s: transmit timed out?\n", dev->name);
998         /* Try to restart the adaptor. */
999         netif_wake_queue(dev);
1000 }
1001
1002
1003 /**
1004  *      mc32_send_packet        -       queue a frame for transmit
1005  *      @skb: buffer to transmit
1006  *      @dev: 3c527 to send it out of
1007  *
1008  *      Transmit a buffer. This normally means throwing the buffer onto
1009  *      the transmit queue as the queue is quite large. If the queue is
1010  *      full then we set tx_busy and return. Once the interrupt handler
1011  *      gets messages telling it to reclaim transmit queue entries, we will
1012  *      clear tx_busy and the kernel will start calling this again.
1013  *
1014  *      We do not disable interrupts or acquire any locks; this can
1015  *      run concurrently with mc32_tx_ring(), and the function itself
1016  *      is serialised at a higher layer. However, similarly for the
1017  *      card itself, we must ensure that we update tx_ring_head only
1018  *      after we've established a valid packet on the tx ring (and
1019  *      before we let the card "see" it, to prevent it racing with the
1020  *      irq handler).
1021  * 
1022  */
1023
1024 static int mc32_send_packet(struct sk_buff *skb, struct net_device *dev)
1025 {
1026         struct mc32_local *lp = netdev_priv(dev);
1027         u32 head = atomic_read(&lp->tx_ring_head);
1028         
1029         volatile struct skb_header *p, *np;
1030
1031         netif_stop_queue(dev);
1032
1033         if(atomic_read(&lp->tx_count)==0) {
1034                 return 1;
1035         }
1036
1037         skb = skb_padto(skb, ETH_ZLEN);
1038         if (skb == NULL) {
1039                 netif_wake_queue(dev);
1040                 return 0;
1041         }
1042
1043         atomic_dec(&lp->tx_count); 
1044
1045         /* P is the last sending/sent buffer as a pointer */
1046         p=lp->tx_ring[head].p;
1047                 
1048         head = next_tx(head);
1049
1050         /* NP is the buffer we will be loading */
1051         np=lp->tx_ring[head].p; 
1052         
1053         /* We will need this to flush the buffer out */
1054         lp->tx_ring[head].skb=skb;
1055
1056         np->length      = unlikely(skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;                  
1057         np->data        = isa_virt_to_bus(skb->data);
1058         np->status      = 0;
1059         np->control     = CONTROL_EOP | CONTROL_EOL;     
1060         wmb();
1061                 
1062         /*
1063          * The new frame has been setup; we can now
1064          * let the interrupt handler and card "see" it
1065          */
1066
1067         atomic_set(&lp->tx_ring_head, head); 
1068         p->control     &= ~CONTROL_EOL;
1069
1070         netif_wake_queue(dev);
1071         return 0;
1072 }
1073
1074
1075 /**
1076  *      mc32_update_stats       -       pull off the on board statistics
1077  *      @dev: 3c527 to service
1078  *
1079  * 
1080  *      Query and reset the on-card stats. There's the small possibility
1081  *      of a race here, which would result in an underestimation of
1082  *      actual errors. As such, we'd prefer to keep all our stats
1083  *      collection in software. As a rule, we do. However it can't be
1084  *      used for rx errors and collisions as, by default, the card discards
1085  *      bad rx packets. 
1086  *
1087  *      Setting the SAV BP in the rx filter command supposedly
1088  *      stops this behaviour. However, testing shows that it only seems to
1089  *      enable the collation of on-card rx statistics --- the driver
1090  *      never sees an RX descriptor with an error status set.
1091  *
1092  */
1093
1094 static void mc32_update_stats(struct net_device *dev)
1095 {
1096         struct mc32_local *lp = netdev_priv(dev);
1097         volatile struct mc32_stats *st = lp->stats; 
1098
1099         u32 rx_errors=0; 
1100       
1101         rx_errors+=lp->net_stats.rx_crc_errors   +=st->rx_crc_errors;         
1102                                                    st->rx_crc_errors=0;
1103         rx_errors+=lp->net_stats.rx_fifo_errors  +=st->rx_overrun_errors;   
1104                                                    st->rx_overrun_errors=0; 
1105         rx_errors+=lp->net_stats.rx_frame_errors +=st->rx_alignment_errors; 
1106                                                    st->rx_alignment_errors=0;
1107         rx_errors+=lp->net_stats.rx_length_errors+=st->rx_tooshort_errors; 
1108                                                    st->rx_tooshort_errors=0;
1109         rx_errors+=lp->net_stats.rx_missed_errors+=st->rx_outofresource_errors;
1110                                                    st->rx_outofresource_errors=0; 
1111         lp->net_stats.rx_errors=rx_errors; 
1112                                                    
1113         /* Number of packets which saw one collision */
1114         lp->net_stats.collisions+=st->dataC[10];
1115         st->dataC[10]=0; 
1116
1117         /* Number of packets which saw 2--15 collisions */ 
1118         lp->net_stats.collisions+=st->dataC[11]; 
1119         st->dataC[11]=0; 
1120 }       
1121
1122
1123 /**
1124  *      mc32_rx_ring    -       process the receive ring
1125  *      @dev: 3c527 that needs its receive ring processing
1126  *
1127  *
1128  *      We have received one or more indications from the card that a
1129  *      receive has completed. The buffer ring thus contains dirty
1130  *      entries. We walk the ring by iterating over the circular rx_ring
1131  *      array, starting at the next dirty buffer (which happens to be the
1132  *      one we finished up at last time around).
1133  *
1134  *      For each completed packet, we will either copy it and pass it up
1135  *      the stack or, if the packet is near MTU sized, we allocate
1136  *      another buffer and flip the old one up the stack.
1137  * 
1138  *      We must succeed in keeping a buffer on the ring. If necessary we
1139  *      will toss a received packet rather than lose a ring entry. Once
1140  *      the first uncompleted descriptor is found, we move the
1141  *      End-Of-List bit to include the buffers just processed.
1142  *
1143  */
1144
1145 static void mc32_rx_ring(struct net_device *dev)
1146 {
1147         struct mc32_local *lp = netdev_priv(dev);
1148         volatile struct skb_header *p;
1149         u16 rx_ring_tail;
1150         u16 rx_old_tail;
1151         int x=0;
1152
1153         rx_old_tail = rx_ring_tail = lp->rx_ring_tail;
1154         
1155         do
1156         { 
1157                 p=lp->rx_ring[rx_ring_tail].p; 
1158
1159                 if(!(p->status & (1<<7))) { /* Not COMPLETED */ 
1160                         break;
1161                 } 
1162                 if(p->status & (1<<6)) /* COMPLETED_OK */
1163                 {                       
1164
1165                         u16 length=p->length;
1166                         struct sk_buff *skb; 
1167                         struct sk_buff *newskb; 
1168
1169                         /* Try to save time by avoiding a copy on big frames */
1170
1171                         if ((length > RX_COPYBREAK) 
1172                             && ((newskb=dev_alloc_skb(1532)) != NULL)) 
1173                         { 
1174                                 skb=lp->rx_ring[rx_ring_tail].skb;
1175                                 skb_put(skb, length);
1176                                 
1177                                 skb_reserve(newskb,18); 
1178                                 lp->rx_ring[rx_ring_tail].skb=newskb;  
1179                                 p->data=isa_virt_to_bus(newskb->data);  
1180                         } 
1181                         else 
1182                         {
1183                                 skb=dev_alloc_skb(length+2);  
1184
1185                                 if(skb==NULL) {
1186                                         lp->net_stats.rx_dropped++; 
1187                                         goto dropped; 
1188                                 }
1189
1190                                 skb_reserve(skb,2);
1191                                 memcpy(skb_put(skb, length),
1192                                        lp->rx_ring[rx_ring_tail].skb->data, length);
1193                         }
1194                         
1195                         skb->protocol=eth_type_trans(skb,dev); 
1196                         skb->dev=dev; 
1197                         dev->last_rx = jiffies;
1198                         lp->net_stats.rx_packets++; 
1199                         lp->net_stats.rx_bytes += length; 
1200                         netif_rx(skb);
1201                 }
1202
1203         dropped:
1204                 p->length = 1532; 
1205                 p->status = 0;
1206                 
1207                 rx_ring_tail=next_rx(rx_ring_tail); 
1208         }
1209         while(x++<48);  
1210
1211         /* If there was actually a frame to be processed, place the EOL bit */ 
1212         /* at the descriptor prior to the one to be filled next */ 
1213
1214         if (rx_ring_tail != rx_old_tail) 
1215         { 
1216                 lp->rx_ring[prev_rx(rx_ring_tail)].p->control |=  CONTROL_EOL; 
1217                 lp->rx_ring[prev_rx(rx_old_tail)].p->control  &= ~CONTROL_EOL; 
1218
1219                 lp->rx_ring_tail=rx_ring_tail; 
1220         }
1221 }
1222
1223
1224 /**
1225  *      mc32_tx_ring    -       process completed transmits
1226  *      @dev: 3c527 that needs its transmit ring processing
1227  *
1228  *
1229  *      This operates in a similar fashion to mc32_rx_ring. We iterate
1230  *      over the transmit ring. For each descriptor which has been
1231  *      processed by the card, we free its associated buffer and note
1232  *      any errors. This continues until the transmit ring is emptied
1233  *      or we reach a descriptor that hasn't yet been processed by the
1234  *      card.
1235  * 
1236  */
1237
1238 static void mc32_tx_ring(struct net_device *dev) 
1239 {
1240         struct mc32_local *lp = netdev_priv(dev);
1241         volatile struct skb_header *np;
1242
1243         /*
1244          * We rely on head==tail to mean 'queue empty'.
1245          * This is why lp->tx_count=TX_RING_LEN-1: in order to prevent
1246          * tx_ring_head wrapping to tail and confusing a 'queue empty'
1247          * condition with 'queue full'
1248          */
1249
1250         while (lp->tx_ring_tail != atomic_read(&lp->tx_ring_head))  
1251         {   
1252                 u16 t; 
1253
1254                 t=next_tx(lp->tx_ring_tail); 
1255                 np=lp->tx_ring[t].p; 
1256
1257                 if(!(np->status & (1<<7))) 
1258                 {
1259                         /* Not COMPLETED */ 
1260                         break; 
1261                 } 
1262                 lp->net_stats.tx_packets++;
1263                 if(!(np->status & (1<<6))) /* Not COMPLETED_OK */
1264                 {
1265                         lp->net_stats.tx_errors++;   
1266
1267                         switch(np->status&0x0F)
1268                         {
1269                                 case 1:
1270                                         lp->net_stats.tx_aborted_errors++;
1271                                         break; /* Max collisions */ 
1272                                 case 2:
1273                                         lp->net_stats.tx_fifo_errors++;
1274                                         break;
1275                                 case 3:
1276                                         lp->net_stats.tx_carrier_errors++;
1277                                         break;
1278                                 case 4:
1279                                         lp->net_stats.tx_window_errors++;
1280                                         break;  /* CTS Lost */ 
1281                                 case 5:
1282                                         lp->net_stats.tx_aborted_errors++;
1283                                         break; /* Transmit timeout */ 
1284                         }
1285                 }
1286                 /* Packets are sent in order - this is
1287                     basically a FIFO queue of buffers matching
1288                     the card ring */
1289                 lp->net_stats.tx_bytes+=lp->tx_ring[t].skb->len;
1290                 dev_kfree_skb_irq(lp->tx_ring[t].skb);
1291                 lp->tx_ring[t].skb=NULL;
1292                 atomic_inc(&lp->tx_count);
1293                 netif_wake_queue(dev);
1294
1295                 lp->tx_ring_tail=t; 
1296         }
1297
1298
1299
1300
1301 /**
1302  *      mc32_interrupt          -       handle an interrupt from a 3c527
1303  *      @irq: Interrupt number
1304  *      @dev_id: 3c527 that requires servicing
1305  *      @regs: Registers (unused)
1306  *
1307  *
1308  *      An interrupt is raised whenever the 3c527 writes to the command
1309  *      register. This register contains the message it wishes to send us
1310  *      packed into a single byte field. We keep reading status entries
1311  *      until we have processed all the control items, but simply count
1312  *      transmit and receive reports. When all reports are in we empty the
1313  *      transceiver rings as appropriate. This saves the overhead of
1314  *      multiple command requests.
1315  *
1316  *      Because MCA is level-triggered, we shouldn't miss indications.
1317  *      Therefore, we needn't ask the card to suspend interrupts within
1318  *      this handler. The card receives an implicit acknowledgment of the
1319  *      current interrupt when we read the command register.
1320  *
1321  */
1322
1323 static irqreturn_t mc32_interrupt(int irq, void *dev_id, struct pt_regs * regs)
1324 {
1325         struct net_device *dev = dev_id;
1326         struct mc32_local *lp;
1327         int ioaddr, status, boguscount = 0;
1328         int rx_event = 0;
1329         int tx_event = 0; 
1330         
1331         if (dev == NULL) {
1332                 printk(KERN_WARNING "%s: irq %d for unknown device.\n", cardname, irq);
1333                 return IRQ_NONE;
1334         }
1335  
1336         ioaddr = dev->base_addr;
1337         lp = netdev_priv(dev);
1338
1339         /* See whats cooking */
1340
1341         while((inb(ioaddr+HOST_STATUS)&HOST_STATUS_CWR) && boguscount++<2000)
1342         {
1343                 status=inb(ioaddr+HOST_CMD);
1344
1345 #ifdef DEBUG_IRQ                
1346                 printk("Status TX%d RX%d EX%d OV%d BC%d\n",
1347                         (status&7), (status>>3)&7, (status>>6)&1,
1348                         (status>>7)&1, boguscount);
1349 #endif
1350                         
1351                 switch(status&7)
1352                 {
1353                         case 0:
1354                                 break;
1355                         case 6: /* TX fail */
1356                         case 2: /* TX ok */
1357                                 tx_event = 1; 
1358                                 break;
1359                         case 3: /* Halt */
1360                         case 4: /* Abort */
1361                                 complete(&lp->xceiver_cmd);
1362                                 break;
1363                         default:
1364                                 printk("%s: strange tx ack %d\n", dev->name, status&7);
1365                 }
1366                 status>>=3;
1367                 switch(status&7)
1368                 {
1369                         case 0:
1370                                 break;
1371                         case 2: /* RX */
1372                                 rx_event=1; 
1373                                 break;
1374                         case 3: /* Halt */
1375                         case 4: /* Abort */
1376                                 complete(&lp->xceiver_cmd);
1377                                 break;
1378                         case 6:
1379                                 /* Out of RX buffers stat */
1380                                 /* Must restart rx */
1381                                 lp->net_stats.rx_dropped++;
1382                                 mc32_rx_ring(dev); 
1383                                 mc32_start_transceiver(dev); 
1384                                 break;
1385                         default:
1386                                 printk("%s: strange rx ack %d\n", 
1387                                         dev->name, status&7);                   
1388                 }
1389                 status>>=3;
1390                 if(status&1)
1391                 {
1392                         /*
1393                          * No thread is waiting: we need to tidy
1394                          * up ourself.
1395                          */
1396                                    
1397                         if (lp->cmd_nonblocking) {
1398                                 up(&lp->cmd_mutex);
1399                                 if (lp->mc_reload_wait) 
1400                                         mc32_reset_multicast_list(dev);
1401                         }
1402                         else complete(&lp->execution_cmd);
1403                 }
1404                 if(status&2)
1405                 {
1406                         /*
1407                          *      We get interrupted once per
1408                          *      counter that is about to overflow. 
1409                          */
1410
1411                         mc32_update_stats(dev);                 
1412                 }
1413         }
1414
1415
1416         /*
1417          *      Process the transmit and receive rings 
1418          */
1419
1420         if(tx_event) 
1421                 mc32_tx_ring(dev);
1422          
1423         if(rx_event) 
1424                 mc32_rx_ring(dev);
1425
1426         return IRQ_HANDLED;
1427 }
1428
1429
1430 /**
1431  *      mc32_close      -       user configuring the 3c527 down
1432  *      @dev: 3c527 card to shut down
1433  *
1434  *      The 3c527 is a bus mastering device. We must be careful how we
1435  *      shut it down. It may also be running shared interrupt so we have
1436  *      to be sure to silence it properly
1437  *
1438  *      We indicate that the card is closing to the rest of the
1439  *      driver.  Otherwise, it is possible that the card may run out
1440  *      of receive buffers and restart the transceiver while we're
1441  *      trying to close it.
1442  * 
1443  *      We abort any receive and transmits going on and then wait until
1444  *      any pending exec commands have completed in other code threads.
1445  *      In theory we can't get here while that is true, in practice I am
1446  *      paranoid
1447  *
1448  *      We turn off the interrupt enable for the board to be sure it can't
1449  *      intefere with other devices.
1450  */
1451
1452 static int mc32_close(struct net_device *dev)
1453 {
1454         struct mc32_local *lp = netdev_priv(dev);
1455         int ioaddr = dev->base_addr;
1456
1457         u8 regs;
1458         u16 one=1;
1459         
1460         lp->xceiver_desired_state = HALTED;
1461         netif_stop_queue(dev);
1462
1463         /*
1464          *      Send the indications on command (handy debug check)
1465          */
1466
1467         mc32_command(dev, 4, &one, 2);
1468
1469         /* Shut down the transceiver */
1470
1471         mc32_halt_transceiver(dev); 
1472         
1473         /* Ensure we issue no more commands beyond this point */
1474
1475         down(&lp->cmd_mutex);
1476         
1477         /* Ok the card is now stopping */       
1478         
1479         regs=inb(ioaddr+HOST_CTRL);
1480         regs&=~HOST_CTRL_INTE;
1481         outb(regs, ioaddr+HOST_CTRL);
1482
1483         mc32_flush_rx_ring(dev);
1484         mc32_flush_tx_ring(dev);
1485                 
1486         mc32_update_stats(dev); 
1487
1488         return 0;
1489 }
1490
1491
1492 /**
1493  *      mc32_get_stats          -       hand back stats to network layer
1494  *      @dev: The 3c527 card to handle
1495  *
1496  *      We've collected all the stats we can in software already. Now
1497  *      it's time to update those kept on-card and return the lot. 
1498  * 
1499  */
1500
1501 static struct net_device_stats *mc32_get_stats(struct net_device *dev)
1502 {
1503         struct mc32_local *lp = netdev_priv(dev);
1504         
1505         mc32_update_stats(dev); 
1506         return &lp->net_stats;
1507 }
1508
1509
1510 /**
1511  *      do_mc32_set_multicast_list      -       attempt to update multicasts
1512  *      @dev: 3c527 device to load the list on
1513  *      @retry: indicates this is not the first call. 
1514  *
1515  *
1516  *      Actually set or clear the multicast filter for this adaptor. The
1517  *      locking issues are handled by this routine. We have to track
1518  *      state as it may take multiple calls to get the command sequence
1519  *      completed. We just keep trying to schedule the loads until we
1520  *      manage to process them all.
1521  * 
1522  *      num_addrs == -1 Promiscuous mode, receive all packets
1523  * 
1524  *      num_addrs == 0  Normal mode, clear multicast list
1525  * 
1526  *      num_addrs > 0   Multicast mode, receive normal and MC packets, 
1527  *                      and do best-effort filtering. 
1528  *
1529  *      See mc32_update_stats() regards setting the SAV BP bit. 
1530  *
1531  */
1532
1533 static void do_mc32_set_multicast_list(struct net_device *dev, int retry)
1534 {
1535         struct mc32_local *lp = netdev_priv(dev);
1536         u16 filt = (1<<2); /* Save Bad Packets, for stats purposes */ 
1537
1538         if (dev->flags&IFF_PROMISC)
1539                 /* Enable promiscuous mode */
1540                 filt |= 1;
1541         else if((dev->flags&IFF_ALLMULTI) || dev->mc_count > 10)
1542         {
1543                 dev->flags|=IFF_PROMISC;
1544                 filt |= 1;
1545         }
1546         else if(dev->mc_count)
1547         {
1548                 unsigned char block[62];
1549                 unsigned char *bp;
1550                 struct dev_mc_list *dmc=dev->mc_list;
1551                 
1552                 int i;
1553                
1554                 if(retry==0)
1555                         lp->mc_list_valid = 0;
1556                 if(!lp->mc_list_valid)
1557                 {
1558                         block[1]=0;
1559                         block[0]=dev->mc_count;
1560                         bp=block+2;
1561                 
1562                         for(i=0;i<dev->mc_count;i++)
1563                         {
1564                                 memcpy(bp, dmc->dmi_addr, 6);
1565                                 bp+=6;
1566                                 dmc=dmc->next;
1567                         }
1568                         if(mc32_command_nowait(dev, 2, block, 2+6*dev->mc_count)==-1)
1569                         {
1570                                 lp->mc_reload_wait = 1;
1571                                 return;
1572                         }
1573                         lp->mc_list_valid=1;
1574                 }
1575         }
1576         
1577         if(mc32_command_nowait(dev, 0, &filt, 2)==-1) 
1578         {
1579                 lp->mc_reload_wait = 1;
1580         } 
1581         else { 
1582                 lp->mc_reload_wait = 0;
1583         }
1584 }
1585
1586
1587 /**
1588  *      mc32_set_multicast_list -       queue multicast list update
1589  *      @dev: The 3c527 to use
1590  *
1591  *      Commence loading the multicast list. This is called when the kernel
1592  *      changes the lists. It will override any pending list we are trying to
1593  *      load.
1594  */
1595
1596 static void mc32_set_multicast_list(struct net_device *dev)
1597 {
1598         do_mc32_set_multicast_list(dev,0);
1599 }
1600
1601
1602 /**
1603  *      mc32_reset_multicast_list       -       reset multicast list
1604  *      @dev: The 3c527 to use
1605  *
1606  *      Attempt the next step in loading the multicast lists. If this attempt
1607  *      fails to complete then it will be scheduled and this function called
1608  *      again later from elsewhere.
1609  */
1610
1611 static void mc32_reset_multicast_list(struct net_device *dev)
1612 {
1613         do_mc32_set_multicast_list(dev,1);
1614 }
1615
1616 static void netdev_get_drvinfo(struct net_device *dev,
1617                                struct ethtool_drvinfo *info)
1618 {
1619         strcpy(info->driver, DRV_NAME);
1620         strcpy(info->version, DRV_VERSION);
1621         sprintf(info->bus_info, "MCA 0x%lx", dev->base_addr);
1622 }
1623
1624 static u32 netdev_get_msglevel(struct net_device *dev)
1625 {
1626         return mc32_debug;
1627 }
1628
1629 static void netdev_set_msglevel(struct net_device *dev, u32 level)
1630 {
1631         mc32_debug = level;
1632 }
1633
1634 static struct ethtool_ops netdev_ethtool_ops = {
1635         .get_drvinfo            = netdev_get_drvinfo,
1636         .get_msglevel           = netdev_get_msglevel,
1637         .set_msglevel           = netdev_set_msglevel,
1638 };
1639
1640 #ifdef MODULE
1641
1642 static struct net_device *this_device;
1643
1644 /**
1645  *      init_module             -       entry point
1646  *
1647  *      Probe and locate a 3c527 card. This really should probe and locate
1648  *      all the 3c527 cards in the machine not just one of them. Yes you can
1649  *      insmod multiple modules for now but it's a hack.
1650  */
1651
1652 int init_module(void)
1653 {
1654         this_device = mc32_probe(-1);
1655         if (IS_ERR(this_device))
1656                 return PTR_ERR(this_device);
1657         return 0;
1658 }
1659
1660 /**
1661  *      cleanup_module  -       free resources for an unload
1662  *
1663  *      Unloading time. We release the MCA bus resources and the interrupt
1664  *      at which point everything is ready to unload. The card must be stopped
1665  *      at this point or we would not have been called. When we unload we
1666  *      leave the card stopped but not totally shut down. When the card is
1667  *      initialized it must be rebooted or the rings reloaded before any
1668  *      transmit operations are allowed to start scribbling into memory.
1669  */
1670
1671 void cleanup_module(void)
1672 {
1673         unregister_netdev(this_device);
1674         cleanup_card(this_device);
1675         free_netdev(this_device);
1676 }
1677
1678 #endif /* MODULE */