b43: Add hooks for firmware debugging
[linux-2.6] / drivers / net / 3c515.c
1 /*
2         Written 1997-1998 by Donald Becker.
3
4         This software may be used and distributed according to the terms
5         of the GNU General Public License, incorporated herein by reference.
6
7         This driver is for the 3Com ISA EtherLink XL "Corkscrew" 3c515 ethercard.
8
9         The author may be reached as becker@scyld.com, or C/O
10         Scyld Computing Corporation
11         410 Severn Ave., Suite 210
12         Annapolis MD 21403
13
14
15         2000/2/2- Added support for kernel-level ISAPnP
16                 by Stephen Frost <sfrost@snowman.net> and Alessandro Zummo
17         Cleaned up for 2.3.x/softnet by Jeff Garzik and Alan Cox.
18
19         2001/11/17 - Added ethtool support (jgarzik)
20
21         2002/10/28 - Locking updates for 2.5 (alan@redhat.com)
22
23 */
24
25 #define DRV_NAME                "3c515"
26 #define DRV_VERSION             "0.99t-ac"
27 #define DRV_RELDATE             "28-Oct-2002"
28
29 static char *version =
30 DRV_NAME ".c:v" DRV_VERSION " " DRV_RELDATE " becker@scyld.com and others\n";
31
32 #define CORKSCREW 1
33
34 /* "Knobs" that adjust features and parameters. */
35 /* Set the copy breakpoint for the copy-only-tiny-frames scheme.
36    Setting to > 1512 effectively disables this feature. */
37 static int rx_copybreak = 200;
38
39 /* Allow setting MTU to a larger size, bypassing the normal ethernet setup. */
40 static const int mtu = 1500;
41
42 /* Maximum events (Rx packets, etc.) to handle at each interrupt. */
43 static int max_interrupt_work = 20;
44
45 /* Enable the automatic media selection code -- usually set. */
46 #define AUTOMEDIA 1
47
48 /* Allow the use of fragment bus master transfers instead of only
49    programmed-I/O for Vortex cards.  Full-bus-master transfers are always
50    enabled by default on Boomerang cards.  If VORTEX_BUS_MASTER is defined,
51    the feature may be turned on using 'options'. */
52 #define VORTEX_BUS_MASTER
53
54 /* A few values that may be tweaked. */
55 /* Keep the ring sizes a power of two for efficiency. */
56 #define TX_RING_SIZE    16
57 #define RX_RING_SIZE    16
58 #define PKT_BUF_SZ              1536    /* Size of each temporary Rx buffer. */
59
60 #include <linux/module.h>
61 #include <linux/isapnp.h>
62 #include <linux/kernel.h>
63 #include <linux/netdevice.h>
64 #include <linux/string.h>
65 #include <linux/errno.h>
66 #include <linux/in.h>
67 #include <linux/ioport.h>
68 #include <linux/slab.h>
69 #include <linux/skbuff.h>
70 #include <linux/etherdevice.h>
71 #include <linux/interrupt.h>
72 #include <linux/timer.h>
73 #include <linux/ethtool.h>
74 #include <linux/bitops.h>
75
76 #include <asm/uaccess.h>
77 #include <asm/io.h>
78 #include <asm/dma.h>
79
80 #define NEW_MULTICAST
81 #include <linux/delay.h>
82
83 #define MAX_UNITS 8
84
85 MODULE_AUTHOR("Donald Becker <becker@scyld.com>");
86 MODULE_DESCRIPTION("3Com 3c515 Corkscrew driver");
87 MODULE_LICENSE("GPL");
88 MODULE_VERSION(DRV_VERSION);
89
90 /* "Knobs" for adjusting internal parameters. */
91 /* Put out somewhat more debugging messages. (0 - no msg, 1 minimal msgs). */
92 #define DRIVER_DEBUG 1
93 /* Some values here only for performance evaluation and path-coverage
94    debugging. */
95 static int rx_nocopy, rx_copy, queued_packet;
96
97 /* Number of times to check to see if the Tx FIFO has space, used in some
98    limited cases. */
99 #define WAIT_TX_AVAIL 200
100
101 /* Operational parameter that usually are not changed. */
102 #define TX_TIMEOUT  40          /* Time in jiffies before concluding Tx hung */
103
104 /* The size here is somewhat misleading: the Corkscrew also uses the ISA
105    aliased registers at <base>+0x400.
106    */
107 #define CORKSCREW_TOTAL_SIZE 0x20
108
109 #ifdef DRIVER_DEBUG
110 static int corkscrew_debug = DRIVER_DEBUG;
111 #else
112 static int corkscrew_debug = 1;
113 #endif
114
115 #define CORKSCREW_ID 10
116
117 /*
118                                 Theory of Operation
119
120 I. Board Compatibility
121
122 This device driver is designed for the 3Com 3c515 ISA Fast EtherLink XL,
123 3Com's ISA bus adapter for Fast Ethernet.  Due to the unique I/O port layout,
124 it's not practical to integrate this driver with the other EtherLink drivers.
125
126 II. Board-specific settings
127
128 The Corkscrew has an EEPROM for configuration, but no special settings are
129 needed for Linux.
130
131 III. Driver operation
132
133 The 3c515 series use an interface that's very similar to the 3c900 "Boomerang"
134 PCI cards, with the bus master interface extensively modified to work with
135 the ISA bus.
136
137 The card is capable of full-bus-master transfers with separate
138 lists of transmit and receive descriptors, similar to the AMD LANCE/PCnet,
139 DEC Tulip and Intel Speedo3.
140
141 This driver uses a "RX_COPYBREAK" scheme rather than a fixed intermediate
142 receive buffer.  This scheme allocates full-sized skbuffs as receive
143 buffers.  The value RX_COPYBREAK is used as the copying breakpoint: it is
144 chosen to trade-off the memory wasted by passing the full-sized skbuff to
145 the queue layer for all frames vs. the copying cost of copying a frame to a
146 correctly-sized skbuff.
147
148
149 IIIC. Synchronization
150 The driver runs as two independent, single-threaded flows of control.  One
151 is the send-packet routine, which enforces single-threaded use by the netif
152 layer.  The other thread is the interrupt handler, which is single
153 threaded by the hardware and other software.
154
155 IV. Notes
156
157 Thanks to Terry Murphy of 3Com for providing documentation and a development
158 board.
159
160 The names "Vortex", "Boomerang" and "Corkscrew" are the internal 3Com
161 project names.  I use these names to eliminate confusion -- 3Com product
162 numbers and names are very similar and often confused.
163
164 The new chips support both ethernet (1.5K) and FDDI (4.5K) frame sizes!
165 This driver only supports ethernet frames because of the recent MTU limit
166 of 1.5K, but the changes to support 4.5K are minimal.
167 */
168
169 /* Operational definitions.
170    These are not used by other compilation units and thus are not
171    exported in a ".h" file.
172
173    First the windows.  There are eight register windows, with the command
174    and status registers available in each.
175    */
176 #define EL3WINDOW(win_num) outw(SelectWindow + (win_num), ioaddr + EL3_CMD)
177 #define EL3_CMD 0x0e
178 #define EL3_STATUS 0x0e
179
180 /* The top five bits written to EL3_CMD are a command, the lower
181    11 bits are the parameter, if applicable.
182    Note that 11 parameters bits was fine for ethernet, but the new chips
183    can handle FDDI length frames (~4500 octets) and now parameters count
184    32-bit 'Dwords' rather than octets. */
185
186 enum corkscrew_cmd {
187         TotalReset = 0 << 11, SelectWindow = 1 << 11, StartCoax = 2 << 11,
188         RxDisable = 3 << 11, RxEnable = 4 << 11, RxReset = 5 << 11,
189         UpStall = 6 << 11, UpUnstall = (6 << 11) + 1, DownStall = (6 << 11) + 2,
190         DownUnstall = (6 << 11) + 3, RxDiscard = 8 << 11, TxEnable = 9 << 11,
191         TxDisable = 10 << 11, TxReset = 11 << 11, FakeIntr = 12 << 11,
192         AckIntr = 13 << 11, SetIntrEnb = 14 << 11, SetStatusEnb = 15 << 11,
193         SetRxFilter = 16 << 11, SetRxThreshold = 17 << 11,
194         SetTxThreshold = 18 << 11, SetTxStart = 19 << 11, StartDMAUp = 20 << 11,
195         StartDMADown = (20 << 11) + 1, StatsEnable = 21 << 11,
196         StatsDisable = 22 << 11, StopCoax = 23 << 11,
197 };
198
199 /* The SetRxFilter command accepts the following classes: */
200 enum RxFilter {
201         RxStation = 1, RxMulticast = 2, RxBroadcast = 4, RxProm = 8
202 };
203
204 /* Bits in the general status register. */
205 enum corkscrew_status {
206         IntLatch = 0x0001, AdapterFailure = 0x0002, TxComplete = 0x0004,
207         TxAvailable = 0x0008, RxComplete = 0x0010, RxEarly = 0x0020,
208         IntReq = 0x0040, StatsFull = 0x0080,
209         DMADone = 1 << 8, DownComplete = 1 << 9, UpComplete = 1 << 10,
210         DMAInProgress = 1 << 11,        /* DMA controller is still busy. */
211         CmdInProgress = 1 << 12,        /* EL3_CMD is still busy. */
212 };
213
214 /* Register window 1 offsets, the window used in normal operation.
215    On the Corkscrew this window is always mapped at offsets 0x10-0x1f. */
216 enum Window1 {
217         TX_FIFO = 0x10, RX_FIFO = 0x10, RxErrors = 0x14,
218         RxStatus = 0x18, Timer = 0x1A, TxStatus = 0x1B,
219         TxFree = 0x1C,          /* Remaining free bytes in Tx buffer. */
220 };
221 enum Window0 {
222         Wn0IRQ = 0x08,
223 #if defined(CORKSCREW)
224         Wn0EepromCmd = 0x200A,  /* Corkscrew EEPROM command register. */
225         Wn0EepromData = 0x200C, /* Corkscrew EEPROM results register. */
226 #else
227         Wn0EepromCmd = 10,      /* Window 0: EEPROM command register. */
228         Wn0EepromData = 12,     /* Window 0: EEPROM results register. */
229 #endif
230 };
231 enum Win0_EEPROM_bits {
232         EEPROM_Read = 0x80, EEPROM_WRITE = 0x40, EEPROM_ERASE = 0xC0,
233         EEPROM_EWENB = 0x30,    /* Enable erasing/writing for 10 msec. */
234         EEPROM_EWDIS = 0x00,    /* Disable EWENB before 10 msec timeout. */
235 };
236
237 /* EEPROM locations. */
238 enum eeprom_offset {
239         PhysAddr01 = 0, PhysAddr23 = 1, PhysAddr45 = 2, ModelID = 3,
240         EtherLink3ID = 7,
241 };
242
243 enum Window3 {                  /* Window 3: MAC/config bits. */
244         Wn3_Config = 0, Wn3_MAC_Ctrl = 6, Wn3_Options = 8,
245 };
246 enum wn3_config {
247         Ram_size = 7,
248         Ram_width = 8,
249         Ram_speed = 0x30,
250         Rom_size = 0xc0,
251         Ram_split_shift = 16,
252         Ram_split = 3 << Ram_split_shift,
253         Xcvr_shift = 20,
254         Xcvr = 7 << Xcvr_shift,
255         Autoselect = 0x1000000,
256 };
257
258 enum Window4 {
259         Wn4_NetDiag = 6, Wn4_Media = 10,        /* Window 4: Xcvr/media bits. */
260 };
261 enum Win4_Media_bits {
262         Media_SQE = 0x0008,     /* Enable SQE error counting for AUI. */
263         Media_10TP = 0x00C0,    /* Enable link beat and jabber for 10baseT. */
264         Media_Lnk = 0x0080,     /* Enable just link beat for 100TX/100FX. */
265         Media_LnkBeat = 0x0800,
266 };
267 enum Window7 {                  /* Window 7: Bus Master control. */
268         Wn7_MasterAddr = 0, Wn7_MasterLen = 6, Wn7_MasterStatus = 12,
269 };
270
271 /* Boomerang-style bus master control registers.  Note ISA aliases! */
272 enum MasterCtrl {
273         PktStatus = 0x400, DownListPtr = 0x404, FragAddr = 0x408, FragLen =
274             0x40c,
275         TxFreeThreshold = 0x40f, UpPktStatus = 0x410, UpListPtr = 0x418,
276 };
277
278 /* The Rx and Tx descriptor lists.
279    Caution Alpha hackers: these types are 32 bits!  Note also the 8 byte
280    alignment contraint on tx_ring[] and rx_ring[]. */
281 struct boom_rx_desc {
282         u32 next;
283         s32 status;
284         u32 addr;
285         s32 length;
286 };
287
288 /* Values for the Rx status entry. */
289 enum rx_desc_status {
290         RxDComplete = 0x00008000, RxDError = 0x4000,
291         /* See boomerang_rx() for actual error bits */
292 };
293
294 struct boom_tx_desc {
295         u32 next;
296         s32 status;
297         u32 addr;
298         s32 length;
299 };
300
301 struct corkscrew_private {
302         const char *product_name;
303         struct list_head list;
304         struct net_device *our_dev;
305         /* The Rx and Tx rings are here to keep them quad-word-aligned. */
306         struct boom_rx_desc rx_ring[RX_RING_SIZE];
307         struct boom_tx_desc tx_ring[TX_RING_SIZE];
308         /* The addresses of transmit- and receive-in-place skbuffs. */
309         struct sk_buff *rx_skbuff[RX_RING_SIZE];
310         struct sk_buff *tx_skbuff[TX_RING_SIZE];
311         unsigned int cur_rx, cur_tx;    /* The next free ring entry */
312         unsigned int dirty_rx, dirty_tx;/* The ring entries to be free()ed. */
313         struct sk_buff *tx_skb; /* Packet being eaten by bus master ctrl.  */
314         struct timer_list timer;        /* Media selection timer. */
315         int capabilities        ;       /* Adapter capabilities word. */
316         int options;                    /* User-settable misc. driver options. */
317         int last_rx_packets;            /* For media autoselection. */
318         unsigned int available_media:8, /* From Wn3_Options */
319                 media_override:3,       /* Passed-in media type. */
320                 default_media:3,        /* Read from the EEPROM. */
321                 full_duplex:1, autoselect:1, bus_master:1,      /* Vortex can only do a fragment bus-m. */
322                 full_bus_master_tx:1, full_bus_master_rx:1,     /* Boomerang  */
323                 tx_full:1;
324         spinlock_t lock;
325         struct device *dev;
326 };
327
328 /* The action to take with a media selection timer tick.
329    Note that we deviate from the 3Com order by checking 10base2 before AUI.
330  */
331 enum xcvr_types {
332         XCVR_10baseT = 0, XCVR_AUI, XCVR_10baseTOnly, XCVR_10base2, XCVR_100baseTx,
333         XCVR_100baseFx, XCVR_MII = 6, XCVR_Default = 8,
334 };
335
336 static struct media_table {
337         char *name;
338         unsigned int media_bits:16,     /* Bits to set in Wn4_Media register. */
339                 mask:8,                 /* The transceiver-present bit in Wn3_Config. */
340                 next:8;                 /* The media type to try next. */
341         short wait;                     /* Time before we check media status. */
342 } media_tbl[] = {
343         { "10baseT", Media_10TP, 0x08, XCVR_10base2, (14 * HZ) / 10 },
344         { "10Mbs AUI", Media_SQE, 0x20, XCVR_Default, (1 * HZ) / 10},
345         { "undefined", 0, 0x80, XCVR_10baseT, 10000},
346         { "10base2", 0, 0x10, XCVR_AUI, (1 * HZ) / 10},
347         { "100baseTX", Media_Lnk, 0x02, XCVR_100baseFx, (14 * HZ) / 10},
348         { "100baseFX", Media_Lnk, 0x04, XCVR_MII, (14 * HZ) / 10},
349         { "MII", 0, 0x40, XCVR_10baseT, 3 * HZ},
350         { "undefined", 0, 0x01, XCVR_10baseT, 10000},
351         { "Default", 0, 0xFF, XCVR_10baseT, 10000},
352 };
353
354 #ifdef __ISAPNP__
355 static struct isapnp_device_id corkscrew_isapnp_adapters[] = {
356         {       ISAPNP_ANY_ID, ISAPNP_ANY_ID,
357                 ISAPNP_VENDOR('T', 'C', 'M'), ISAPNP_FUNCTION(0x5051),
358                 (long) "3Com Fast EtherLink ISA" },
359         { }     /* terminate list */
360 };
361
362 MODULE_DEVICE_TABLE(isapnp, corkscrew_isapnp_adapters);
363
364 static int nopnp;
365 #endif /* __ISAPNP__ */
366
367 static struct net_device *corkscrew_scan(int unit);
368 static int corkscrew_setup(struct net_device *dev, int ioaddr,
369                             struct pnp_dev *idev, int card_number);
370 static int corkscrew_open(struct net_device *dev);
371 static void corkscrew_timer(unsigned long arg);
372 static int corkscrew_start_xmit(struct sk_buff *skb,
373                                 struct net_device *dev);
374 static int corkscrew_rx(struct net_device *dev);
375 static void corkscrew_timeout(struct net_device *dev);
376 static int boomerang_rx(struct net_device *dev);
377 static irqreturn_t corkscrew_interrupt(int irq, void *dev_id);
378 static int corkscrew_close(struct net_device *dev);
379 static void update_stats(int addr, struct net_device *dev);
380 static struct net_device_stats *corkscrew_get_stats(struct net_device *dev);
381 static void set_rx_mode(struct net_device *dev);
382 static const struct ethtool_ops netdev_ethtool_ops;
383
384
385 /*
386    Unfortunately maximizing the shared code between the integrated and
387    module version of the driver results in a complicated set of initialization
388    procedures.
389    init_module() -- modules /  tc59x_init()  -- built-in
390                 The wrappers for corkscrew_scan()
391    corkscrew_scan()              The common routine that scans for PCI and EISA cards
392    corkscrew_found_device() Allocate a device structure when we find a card.
393                                         Different versions exist for modules and built-in.
394    corkscrew_probe1()           Fill in the device structure -- this is separated
395                                         so that the modules code can put it in dev->init.
396 */
397 /* This driver uses 'options' to pass the media type, full-duplex flag, etc. */
398 /* Note: this is the only limit on the number of cards supported!! */
399 static int options[MAX_UNITS] = { -1, -1, -1, -1, -1, -1, -1, -1, };
400
401 #ifdef MODULE
402 static int debug = -1;
403
404 module_param(debug, int, 0);
405 module_param_array(options, int, NULL, 0);
406 module_param(rx_copybreak, int, 0);
407 module_param(max_interrupt_work, int, 0);
408 MODULE_PARM_DESC(debug, "3c515 debug level (0-6)");
409 MODULE_PARM_DESC(options, "3c515: Bits 0-2: media type, bit 3: full duplex, bit 4: bus mastering");
410 MODULE_PARM_DESC(rx_copybreak, "3c515 copy breakpoint for copy-only-tiny-frames");
411 MODULE_PARM_DESC(max_interrupt_work, "3c515 maximum events handled per interrupt");
412
413 /* A list of all installed Vortex devices, for removing the driver module. */
414 /* we will need locking (and refcounting) if we ever use it for more */
415 static LIST_HEAD(root_corkscrew_dev);
416
417 int init_module(void)
418 {
419         int found = 0;
420         if (debug >= 0)
421                 corkscrew_debug = debug;
422         if (corkscrew_debug)
423                 printk(version);
424         while (corkscrew_scan(-1))
425                 found++;
426         return found ? 0 : -ENODEV;
427 }
428
429 #else
430 struct net_device *tc515_probe(int unit)
431 {
432         struct net_device *dev = corkscrew_scan(unit);
433         static int printed;
434
435         if (!dev)
436                 return ERR_PTR(-ENODEV);
437
438         if (corkscrew_debug > 0 && !printed) {
439                 printed = 1;
440                 printk(version);
441         }
442
443         return dev;
444 }
445 #endif                          /* not MODULE */
446
447 static int check_device(unsigned ioaddr)
448 {
449         int timer;
450
451         if (!request_region(ioaddr, CORKSCREW_TOTAL_SIZE, "3c515"))
452                 return 0;
453         /* Check the resource configuration for a matching ioaddr. */
454         if ((inw(ioaddr + 0x2002) & 0x1f0) != (ioaddr & 0x1f0)) {
455                 release_region(ioaddr, CORKSCREW_TOTAL_SIZE);
456                 return 0;
457         }
458         /* Verify by reading the device ID from the EEPROM. */
459         outw(EEPROM_Read + 7, ioaddr + Wn0EepromCmd);
460         /* Pause for at least 162 us. for the read to take place. */
461         for (timer = 4; timer >= 0; timer--) {
462                 udelay(162);
463                 if ((inw(ioaddr + Wn0EepromCmd) & 0x0200) == 0)
464                         break;
465         }
466         if (inw(ioaddr + Wn0EepromData) != 0x6d50) {
467                 release_region(ioaddr, CORKSCREW_TOTAL_SIZE);
468                 return 0;
469         }
470         return 1;
471 }
472
473 static void cleanup_card(struct net_device *dev)
474 {
475         struct corkscrew_private *vp = netdev_priv(dev);
476         list_del_init(&vp->list);
477         if (dev->dma)
478                 free_dma(dev->dma);
479         outw(TotalReset, dev->base_addr + EL3_CMD);
480         release_region(dev->base_addr, CORKSCREW_TOTAL_SIZE);
481         if (vp->dev)
482                 pnp_device_detach(to_pnp_dev(vp->dev));
483 }
484
485 static struct net_device *corkscrew_scan(int unit)
486 {
487         struct net_device *dev;
488         static int cards_found = 0;
489         static int ioaddr;
490         int err;
491 #ifdef __ISAPNP__
492         short i;
493         static int pnp_cards;
494 #endif
495
496         dev = alloc_etherdev(sizeof(struct corkscrew_private));
497         if (!dev)
498                 return ERR_PTR(-ENOMEM);
499
500         if (unit >= 0) {
501                 sprintf(dev->name, "eth%d", unit);
502                 netdev_boot_setup_check(dev);
503         }
504
505 #ifdef __ISAPNP__
506         if(nopnp == 1)
507                 goto no_pnp;
508         for(i=0; corkscrew_isapnp_adapters[i].vendor != 0; i++) {
509                 struct pnp_dev *idev = NULL;
510                 int irq;
511                 while((idev = pnp_find_dev(NULL,
512                                            corkscrew_isapnp_adapters[i].vendor,
513                                            corkscrew_isapnp_adapters[i].function,
514                                            idev))) {
515
516                         if (pnp_device_attach(idev) < 0)
517                                 continue;
518                         if (pnp_activate_dev(idev) < 0) {
519                                 printk("pnp activate failed (out of resources?)\n");
520                                 pnp_device_detach(idev);
521                                 continue;
522                         }
523                         if (!pnp_port_valid(idev, 0) || !pnp_irq_valid(idev, 0)) {
524                                 pnp_device_detach(idev);
525                                 continue;
526                         }
527                         ioaddr = pnp_port_start(idev, 0);
528                         irq = pnp_irq(idev, 0);
529                         if (!check_device(ioaddr)) {
530                                 pnp_device_detach(idev);
531                                 continue;
532                         }
533                         if(corkscrew_debug)
534                                 printk ("ISAPNP reports %s at i/o 0x%x, irq %d\n",
535                                         (char*) corkscrew_isapnp_adapters[i].driver_data, ioaddr, irq);
536                         printk(KERN_INFO "3c515 Resource configuration register %#4.4x, DCR %4.4x.\n",
537                                 inl(ioaddr + 0x2002), inw(ioaddr + 0x2000));
538                         /* irq = inw(ioaddr + 0x2002) & 15; */ /* Use the irq from isapnp */
539                         SET_NETDEV_DEV(dev, &idev->dev);
540                         pnp_cards++;
541                         err = corkscrew_setup(dev, ioaddr, idev, cards_found++);
542                         if (!err)
543                                 return dev;
544                         cleanup_card(dev);
545                 }
546         }
547 no_pnp:
548 #endif /* __ISAPNP__ */
549
550         /* Check all locations on the ISA bus -- evil! */
551         for (ioaddr = 0x100; ioaddr < 0x400; ioaddr += 0x20) {
552                 if (!check_device(ioaddr))
553                         continue;
554
555                 printk(KERN_INFO "3c515 Resource configuration register %#4.4x, DCR %4.4x.\n",
556                      inl(ioaddr + 0x2002), inw(ioaddr + 0x2000));
557                 err = corkscrew_setup(dev, ioaddr, NULL, cards_found++);
558                 if (!err)
559                         return dev;
560                 cleanup_card(dev);
561         }
562         free_netdev(dev);
563         return NULL;
564 }
565
566 static int corkscrew_setup(struct net_device *dev, int ioaddr,
567                             struct pnp_dev *idev, int card_number)
568 {
569         struct corkscrew_private *vp = netdev_priv(dev);
570         unsigned int eeprom[0x40], checksum = 0;        /* EEPROM contents */
571         int i;
572         int irq;
573         DECLARE_MAC_BUF(mac);
574
575         if (idev) {
576                 irq = pnp_irq(idev, 0);
577                 vp->dev = &idev->dev;
578         } else {
579                 irq = inw(ioaddr + 0x2002) & 15;
580         }
581
582         dev->base_addr = ioaddr;
583         dev->irq = irq;
584         dev->dma = inw(ioaddr + 0x2000) & 7;
585         vp->product_name = "3c515";
586         vp->options = dev->mem_start;
587         vp->our_dev = dev;
588
589         if (!vp->options) {
590                  if (card_number >= MAX_UNITS)
591                         vp->options = -1;
592                 else
593                         vp->options = options[card_number];
594         }
595
596         if (vp->options >= 0) {
597                 vp->media_override = vp->options & 7;
598                 if (vp->media_override == 2)
599                         vp->media_override = 0;
600                 vp->full_duplex = (vp->options & 8) ? 1 : 0;
601                 vp->bus_master = (vp->options & 16) ? 1 : 0;
602         } else {
603                 vp->media_override = 7;
604                 vp->full_duplex = 0;
605                 vp->bus_master = 0;
606         }
607 #ifdef MODULE
608         list_add(&vp->list, &root_corkscrew_dev);
609 #endif
610
611         printk(KERN_INFO "%s: 3Com %s at %#3x,", dev->name, vp->product_name, ioaddr);
612
613         spin_lock_init(&vp->lock);
614
615         /* Read the station address from the EEPROM. */
616         EL3WINDOW(0);
617         for (i = 0; i < 0x18; i++) {
618                 __be16 *phys_addr = (__be16 *) dev->dev_addr;
619                 int timer;
620                 outw(EEPROM_Read + i, ioaddr + Wn0EepromCmd);
621                 /* Pause for at least 162 us. for the read to take place. */
622                 for (timer = 4; timer >= 0; timer--) {
623                         udelay(162);
624                         if ((inw(ioaddr + Wn0EepromCmd) & 0x0200) == 0)
625                                 break;
626                 }
627                 eeprom[i] = inw(ioaddr + Wn0EepromData);
628                 checksum ^= eeprom[i];
629                 if (i < 3)
630                         phys_addr[i] = htons(eeprom[i]);
631         }
632         checksum = (checksum ^ (checksum >> 8)) & 0xff;
633         if (checksum != 0x00)
634                 printk(" ***INVALID CHECKSUM %4.4x*** ", checksum);
635         printk(" %s", print_mac(mac, dev->dev_addr));
636         if (eeprom[16] == 0x11c7) {     /* Corkscrew */
637                 if (request_dma(dev->dma, "3c515")) {
638                         printk(", DMA %d allocation failed", dev->dma);
639                         dev->dma = 0;
640                 } else
641                         printk(", DMA %d", dev->dma);
642         }
643         printk(", IRQ %d\n", dev->irq);
644         /* Tell them about an invalid IRQ. */
645         if (corkscrew_debug && (dev->irq <= 0 || dev->irq > 15))
646                 printk(KERN_WARNING " *** Warning: this IRQ is unlikely to work! ***\n");
647
648         {
649                 char *ram_split[] = { "5:3", "3:1", "1:1", "3:5" };
650                 __u32 config;
651                 EL3WINDOW(3);
652                 vp->available_media = inw(ioaddr + Wn3_Options);
653                 config = inl(ioaddr + Wn3_Config);
654                 if (corkscrew_debug > 1)
655                         printk(KERN_INFO "  Internal config register is %4.4x, transceivers %#x.\n",
656                                 config, inw(ioaddr + Wn3_Options));
657                 printk(KERN_INFO "  %dK %s-wide RAM %s Rx:Tx split, %s%s interface.\n",
658                         8 << config & Ram_size,
659                         config & Ram_width ? "word" : "byte",
660                         ram_split[(config & Ram_split) >> Ram_split_shift],
661                         config & Autoselect ? "autoselect/" : "",
662                         media_tbl[(config & Xcvr) >> Xcvr_shift].name);
663                 vp->default_media = (config & Xcvr) >> Xcvr_shift;
664                 vp->autoselect = config & Autoselect ? 1 : 0;
665                 dev->if_port = vp->default_media;
666         }
667         if (vp->media_override != 7) {
668                 printk(KERN_INFO "  Media override to transceiver type %d (%s).\n",
669                        vp->media_override,
670                        media_tbl[vp->media_override].name);
671                 dev->if_port = vp->media_override;
672         }
673
674         vp->capabilities = eeprom[16];
675         vp->full_bus_master_tx = (vp->capabilities & 0x20) ? 1 : 0;
676         /* Rx is broken at 10mbps, so we always disable it. */
677         /* vp->full_bus_master_rx = 0; */
678         vp->full_bus_master_rx = (vp->capabilities & 0x20) ? 1 : 0;
679
680         /* The 3c51x-specific entries in the device structure. */
681         dev->open = &corkscrew_open;
682         dev->hard_start_xmit = &corkscrew_start_xmit;
683         dev->tx_timeout = &corkscrew_timeout;
684         dev->watchdog_timeo = (400 * HZ) / 1000;
685         dev->stop = &corkscrew_close;
686         dev->get_stats = &corkscrew_get_stats;
687         dev->set_multicast_list = &set_rx_mode;
688         dev->ethtool_ops = &netdev_ethtool_ops;
689
690         return register_netdev(dev);
691 }
692
693
694 static int corkscrew_open(struct net_device *dev)
695 {
696         int ioaddr = dev->base_addr;
697         struct corkscrew_private *vp = netdev_priv(dev);
698         __u32 config;
699         int i;
700
701         /* Before initializing select the active media port. */
702         EL3WINDOW(3);
703         if (vp->full_duplex)
704                 outb(0x20, ioaddr + Wn3_MAC_Ctrl);      /* Set the full-duplex bit. */
705         config = inl(ioaddr + Wn3_Config);
706
707         if (vp->media_override != 7) {
708                 if (corkscrew_debug > 1)
709                         printk(KERN_INFO "%s: Media override to transceiver %d (%s).\n",
710                                 dev->name, vp->media_override,
711                                 media_tbl[vp->media_override].name);
712                 dev->if_port = vp->media_override;
713         } else if (vp->autoselect) {
714                 /* Find first available media type, starting with 100baseTx. */
715                 dev->if_port = 4;
716                 while (!(vp->available_media & media_tbl[dev->if_port].mask))
717                         dev->if_port = media_tbl[dev->if_port].next;
718
719                 if (corkscrew_debug > 1)
720                         printk("%s: Initial media type %s.\n",
721                                dev->name, media_tbl[dev->if_port].name);
722
723                 init_timer(&vp->timer);
724                 vp->timer.expires = jiffies + media_tbl[dev->if_port].wait;
725                 vp->timer.data = (unsigned long) dev;
726                 vp->timer.function = &corkscrew_timer;  /* timer handler */
727                 add_timer(&vp->timer);
728         } else
729                 dev->if_port = vp->default_media;
730
731         config = (config & ~Xcvr) | (dev->if_port << Xcvr_shift);
732         outl(config, ioaddr + Wn3_Config);
733
734         if (corkscrew_debug > 1) {
735                 printk("%s: corkscrew_open() InternalConfig %8.8x.\n",
736                        dev->name, config);
737         }
738
739         outw(TxReset, ioaddr + EL3_CMD);
740         for (i = 20; i >= 0; i--)
741                 if (!(inw(ioaddr + EL3_STATUS) & CmdInProgress))
742                         break;
743
744         outw(RxReset, ioaddr + EL3_CMD);
745         /* Wait a few ticks for the RxReset command to complete. */
746         for (i = 20; i >= 0; i--)
747                 if (!(inw(ioaddr + EL3_STATUS) & CmdInProgress))
748                         break;
749
750         outw(SetStatusEnb | 0x00, ioaddr + EL3_CMD);
751
752         /* Use the now-standard shared IRQ implementation. */
753         if (vp->capabilities == 0x11c7) {
754                 /* Corkscrew: Cannot share ISA resources. */
755                 if (dev->irq == 0
756                     || dev->dma == 0
757                     || request_irq(dev->irq, &corkscrew_interrupt, 0,
758                                    vp->product_name, dev)) return -EAGAIN;
759                 enable_dma(dev->dma);
760                 set_dma_mode(dev->dma, DMA_MODE_CASCADE);
761         } else if (request_irq(dev->irq, &corkscrew_interrupt, IRQF_SHARED,
762                                vp->product_name, dev)) {
763                 return -EAGAIN;
764         }
765
766         if (corkscrew_debug > 1) {
767                 EL3WINDOW(4);
768                 printk("%s: corkscrew_open() irq %d media status %4.4x.\n",
769                        dev->name, dev->irq, inw(ioaddr + Wn4_Media));
770         }
771
772         /* Set the station address and mask in window 2 each time opened. */
773         EL3WINDOW(2);
774         for (i = 0; i < 6; i++)
775                 outb(dev->dev_addr[i], ioaddr + i);
776         for (; i < 12; i += 2)
777                 outw(0, ioaddr + i);
778
779         if (dev->if_port == 3)
780                 /* Start the thinnet transceiver. We should really wait 50ms... */
781                 outw(StartCoax, ioaddr + EL3_CMD);
782         EL3WINDOW(4);
783         outw((inw(ioaddr + Wn4_Media) & ~(Media_10TP | Media_SQE)) |
784              media_tbl[dev->if_port].media_bits, ioaddr + Wn4_Media);
785
786         /* Switch to the stats window, and clear all stats by reading. */
787         outw(StatsDisable, ioaddr + EL3_CMD);
788         EL3WINDOW(6);
789         for (i = 0; i < 10; i++)
790                 inb(ioaddr + i);
791         inw(ioaddr + 10);
792         inw(ioaddr + 12);
793         /* New: On the Vortex we must also clear the BadSSD counter. */
794         EL3WINDOW(4);
795         inb(ioaddr + 12);
796         /* ..and on the Boomerang we enable the extra statistics bits. */
797         outw(0x0040, ioaddr + Wn4_NetDiag);
798
799         /* Switch to register set 7 for normal use. */
800         EL3WINDOW(7);
801
802         if (vp->full_bus_master_rx) {   /* Boomerang bus master. */
803                 vp->cur_rx = vp->dirty_rx = 0;
804                 if (corkscrew_debug > 2)
805                         printk("%s:  Filling in the Rx ring.\n",
806                                dev->name);
807                 for (i = 0; i < RX_RING_SIZE; i++) {
808                         struct sk_buff *skb;
809                         if (i < (RX_RING_SIZE - 1))
810                                 vp->rx_ring[i].next =
811                                     isa_virt_to_bus(&vp->rx_ring[i + 1]);
812                         else
813                                 vp->rx_ring[i].next = 0;
814                         vp->rx_ring[i].status = 0;      /* Clear complete bit. */
815                         vp->rx_ring[i].length = PKT_BUF_SZ | 0x80000000;
816                         skb = dev_alloc_skb(PKT_BUF_SZ);
817                         vp->rx_skbuff[i] = skb;
818                         if (skb == NULL)
819                                 break;  /* Bad news!  */
820                         skb->dev = dev; /* Mark as being used by this device. */
821                         skb_reserve(skb, 2);    /* Align IP on 16 byte boundaries */
822                         vp->rx_ring[i].addr = isa_virt_to_bus(skb->data);
823                 }
824                 vp->rx_ring[i - 1].next = isa_virt_to_bus(&vp->rx_ring[0]);     /* Wrap the ring. */
825                 outl(isa_virt_to_bus(&vp->rx_ring[0]), ioaddr + UpListPtr);
826         }
827         if (vp->full_bus_master_tx) {   /* Boomerang bus master Tx. */
828                 vp->cur_tx = vp->dirty_tx = 0;
829                 outb(PKT_BUF_SZ >> 8, ioaddr + TxFreeThreshold);        /* Room for a packet. */
830                 /* Clear the Tx ring. */
831                 for (i = 0; i < TX_RING_SIZE; i++)
832                         vp->tx_skbuff[i] = NULL;
833                 outl(0, ioaddr + DownListPtr);
834         }
835         /* Set receiver mode: presumably accept b-case and phys addr only. */
836         set_rx_mode(dev);
837         outw(StatsEnable, ioaddr + EL3_CMD);    /* Turn on statistics. */
838
839         netif_start_queue(dev);
840
841         outw(RxEnable, ioaddr + EL3_CMD);       /* Enable the receiver. */
842         outw(TxEnable, ioaddr + EL3_CMD);       /* Enable transmitter. */
843         /* Allow status bits to be seen. */
844         outw(SetStatusEnb | AdapterFailure | IntReq | StatsFull |
845              (vp->full_bus_master_tx ? DownComplete : TxAvailable) |
846              (vp->full_bus_master_rx ? UpComplete : RxComplete) |
847              (vp->bus_master ? DMADone : 0), ioaddr + EL3_CMD);
848         /* Ack all pending events, and set active indicator mask. */
849         outw(AckIntr | IntLatch | TxAvailable | RxEarly | IntReq,
850              ioaddr + EL3_CMD);
851         outw(SetIntrEnb | IntLatch | TxAvailable | RxComplete | StatsFull
852              | (vp->bus_master ? DMADone : 0) | UpComplete | DownComplete,
853              ioaddr + EL3_CMD);
854
855         return 0;
856 }
857
858 static void corkscrew_timer(unsigned long data)
859 {
860 #ifdef AUTOMEDIA
861         struct net_device *dev = (struct net_device *) data;
862         struct corkscrew_private *vp = netdev_priv(dev);
863         int ioaddr = dev->base_addr;
864         unsigned long flags;
865         int ok = 0;
866
867         if (corkscrew_debug > 1)
868                 printk("%s: Media selection timer tick happened, %s.\n",
869                        dev->name, media_tbl[dev->if_port].name);
870
871         spin_lock_irqsave(&vp->lock, flags);
872
873         {
874                 int old_window = inw(ioaddr + EL3_CMD) >> 13;
875                 int media_status;
876                 EL3WINDOW(4);
877                 media_status = inw(ioaddr + Wn4_Media);
878                 switch (dev->if_port) {
879                 case 0:
880                 case 4:
881                 case 5: /* 10baseT, 100baseTX, 100baseFX  */
882                         if (media_status & Media_LnkBeat) {
883                                 ok = 1;
884                                 if (corkscrew_debug > 1)
885                                         printk("%s: Media %s has link beat, %x.\n",
886                                                 dev->name,
887                                                 media_tbl[dev->if_port].name,
888                                                 media_status);
889                         } else if (corkscrew_debug > 1)
890                                 printk("%s: Media %s is has no link beat, %x.\n",
891                                         dev->name,
892                                         media_tbl[dev->if_port].name,
893                                         media_status);
894
895                         break;
896                 default:        /* Other media types handled by Tx timeouts. */
897                         if (corkscrew_debug > 1)
898                                 printk("%s: Media %s is has no indication, %x.\n",
899                                         dev->name,
900                                         media_tbl[dev->if_port].name,
901                                         media_status);
902                         ok = 1;
903                 }
904                 if (!ok) {
905                         __u32 config;
906
907                         do {
908                                 dev->if_port =
909                                     media_tbl[dev->if_port].next;
910                         }
911                         while (!(vp->available_media & media_tbl[dev->if_port].mask));
912
913                         if (dev->if_port == 8) {        /* Go back to default. */
914                                 dev->if_port = vp->default_media;
915                                 if (corkscrew_debug > 1)
916                                         printk("%s: Media selection failing, using default %s port.\n",
917                                                 dev->name,
918                                                 media_tbl[dev->if_port].name);
919                         } else {
920                                 if (corkscrew_debug > 1)
921                                         printk("%s: Media selection failed, now trying %s port.\n",
922                                                 dev->name,
923                                                 media_tbl[dev->if_port].name);
924                                 vp->timer.expires = jiffies + media_tbl[dev->if_port].wait;
925                                 add_timer(&vp->timer);
926                         }
927                         outw((media_status & ~(Media_10TP | Media_SQE)) |
928                              media_tbl[dev->if_port].media_bits,
929                              ioaddr + Wn4_Media);
930
931                         EL3WINDOW(3);
932                         config = inl(ioaddr + Wn3_Config);
933                         config = (config & ~Xcvr) | (dev->if_port << Xcvr_shift);
934                         outl(config, ioaddr + Wn3_Config);
935
936                         outw(dev->if_port == 3 ? StartCoax : StopCoax,
937                              ioaddr + EL3_CMD);
938                 }
939                 EL3WINDOW(old_window);
940         }
941
942         spin_unlock_irqrestore(&vp->lock, flags);
943         if (corkscrew_debug > 1)
944                 printk("%s: Media selection timer finished, %s.\n",
945                        dev->name, media_tbl[dev->if_port].name);
946
947 #endif                          /* AUTOMEDIA */
948         return;
949 }
950
951 static void corkscrew_timeout(struct net_device *dev)
952 {
953         int i;
954         struct corkscrew_private *vp = netdev_priv(dev);
955         int ioaddr = dev->base_addr;
956
957         printk(KERN_WARNING
958                "%s: transmit timed out, tx_status %2.2x status %4.4x.\n",
959                dev->name, inb(ioaddr + TxStatus),
960                inw(ioaddr + EL3_STATUS));
961         /* Slight code bloat to be user friendly. */
962         if ((inb(ioaddr + TxStatus) & 0x88) == 0x88)
963                 printk(KERN_WARNING
964                        "%s: Transmitter encountered 16 collisions -- network"
965                        " network cable problem?\n", dev->name);
966 #ifndef final_version
967         printk("  Flags; bus-master %d, full %d; dirty %d current %d.\n",
968                vp->full_bus_master_tx, vp->tx_full, vp->dirty_tx,
969                vp->cur_tx);
970         printk("  Down list %8.8x vs. %p.\n", inl(ioaddr + DownListPtr),
971                &vp->tx_ring[0]);
972         for (i = 0; i < TX_RING_SIZE; i++) {
973                 printk("  %d: %p  length %8.8x status %8.8x\n", i,
974                        &vp->tx_ring[i],
975                        vp->tx_ring[i].length, vp->tx_ring[i].status);
976         }
977 #endif
978         /* Issue TX_RESET and TX_START commands. */
979         outw(TxReset, ioaddr + EL3_CMD);
980         for (i = 20; i >= 0; i--)
981                 if (!(inw(ioaddr + EL3_STATUS) & CmdInProgress))
982                         break;
983         outw(TxEnable, ioaddr + EL3_CMD);
984         dev->trans_start = jiffies;
985         dev->stats.tx_errors++;
986         dev->stats.tx_dropped++;
987         netif_wake_queue(dev);
988 }
989
990 static int corkscrew_start_xmit(struct sk_buff *skb,
991                                 struct net_device *dev)
992 {
993         struct corkscrew_private *vp = netdev_priv(dev);
994         int ioaddr = dev->base_addr;
995
996         /* Block a timer-based transmit from overlapping. */
997
998         netif_stop_queue(dev);
999
1000         if (vp->full_bus_master_tx) {   /* BOOMERANG bus-master */
1001                 /* Calculate the next Tx descriptor entry. */
1002                 int entry = vp->cur_tx % TX_RING_SIZE;
1003                 struct boom_tx_desc *prev_entry;
1004                 unsigned long flags;
1005                 int i;
1006
1007                 if (vp->tx_full)        /* No room to transmit with */
1008                         return 1;
1009                 if (vp->cur_tx != 0)
1010                         prev_entry = &vp->tx_ring[(vp->cur_tx - 1) % TX_RING_SIZE];
1011                 else
1012                         prev_entry = NULL;
1013                 if (corkscrew_debug > 3)
1014                         printk("%s: Trying to send a packet, Tx index %d.\n",
1015                                 dev->name, vp->cur_tx);
1016                 /* vp->tx_full = 1; */
1017                 vp->tx_skbuff[entry] = skb;
1018                 vp->tx_ring[entry].next = 0;
1019                 vp->tx_ring[entry].addr = isa_virt_to_bus(skb->data);
1020                 vp->tx_ring[entry].length = skb->len | 0x80000000;
1021                 vp->tx_ring[entry].status = skb->len | 0x80000000;
1022
1023                 spin_lock_irqsave(&vp->lock, flags);
1024                 outw(DownStall, ioaddr + EL3_CMD);
1025                 /* Wait for the stall to complete. */
1026                 for (i = 20; i >= 0; i--)
1027                         if ((inw(ioaddr + EL3_STATUS) & CmdInProgress) == 0)
1028                                 break;
1029                 if (prev_entry)
1030                         prev_entry->next = isa_virt_to_bus(&vp->tx_ring[entry]);
1031                 if (inl(ioaddr + DownListPtr) == 0) {
1032                         outl(isa_virt_to_bus(&vp->tx_ring[entry]),
1033                              ioaddr + DownListPtr);
1034                         queued_packet++;
1035                 }
1036                 outw(DownUnstall, ioaddr + EL3_CMD);
1037                 spin_unlock_irqrestore(&vp->lock, flags);
1038
1039                 vp->cur_tx++;
1040                 if (vp->cur_tx - vp->dirty_tx > TX_RING_SIZE - 1)
1041                         vp->tx_full = 1;
1042                 else {          /* Clear previous interrupt enable. */
1043                         if (prev_entry)
1044                                 prev_entry->status &= ~0x80000000;
1045                         netif_wake_queue(dev);
1046                 }
1047                 dev->trans_start = jiffies;
1048                 return 0;
1049         }
1050         /* Put out the doubleword header... */
1051         outl(skb->len, ioaddr + TX_FIFO);
1052         dev->stats.tx_bytes += skb->len;
1053 #ifdef VORTEX_BUS_MASTER
1054         if (vp->bus_master) {
1055                 /* Set the bus-master controller to transfer the packet. */
1056                 outl((int) (skb->data), ioaddr + Wn7_MasterAddr);
1057                 outw((skb->len + 3) & ~3, ioaddr + Wn7_MasterLen);
1058                 vp->tx_skb = skb;
1059                 outw(StartDMADown, ioaddr + EL3_CMD);
1060                 /* queue will be woken at the DMADone interrupt. */
1061         } else {
1062                 /* ... and the packet rounded to a doubleword. */
1063                 outsl(ioaddr + TX_FIFO, skb->data, (skb->len + 3) >> 2);
1064                 dev_kfree_skb(skb);
1065                 if (inw(ioaddr + TxFree) > 1536) {
1066                         netif_wake_queue(dev);
1067                 } else
1068                         /* Interrupt us when the FIFO has room for max-sized packet. */
1069                         outw(SetTxThreshold + (1536 >> 2),
1070                              ioaddr + EL3_CMD);
1071         }
1072 #else
1073         /* ... and the packet rounded to a doubleword. */
1074         outsl(ioaddr + TX_FIFO, skb->data, (skb->len + 3) >> 2);
1075         dev_kfree_skb(skb);
1076         if (inw(ioaddr + TxFree) > 1536) {
1077                 netif_wake_queue(dev);
1078         } else
1079                 /* Interrupt us when the FIFO has room for max-sized packet. */
1080                 outw(SetTxThreshold + (1536 >> 2), ioaddr + EL3_CMD);
1081 #endif                          /* bus master */
1082
1083         dev->trans_start = jiffies;
1084
1085         /* Clear the Tx status stack. */
1086         {
1087                 short tx_status;
1088                 int i = 4;
1089
1090                 while (--i > 0 && (tx_status = inb(ioaddr + TxStatus)) > 0) {
1091                         if (tx_status & 0x3C) { /* A Tx-disabling error occurred.  */
1092                                 if (corkscrew_debug > 2)
1093                                         printk("%s: Tx error, status %2.2x.\n",
1094                                                 dev->name, tx_status);
1095                                 if (tx_status & 0x04)
1096                                         dev->stats.tx_fifo_errors++;
1097                                 if (tx_status & 0x38)
1098                                         dev->stats.tx_aborted_errors++;
1099                                 if (tx_status & 0x30) {
1100                                         int j;
1101                                         outw(TxReset, ioaddr + EL3_CMD);
1102                                         for (j = 20; j >= 0; j--)
1103                                                 if (!(inw(ioaddr + EL3_STATUS) & CmdInProgress))
1104                                                         break;
1105                                 }
1106                                 outw(TxEnable, ioaddr + EL3_CMD);
1107                         }
1108                         outb(0x00, ioaddr + TxStatus);  /* Pop the status stack. */
1109                 }
1110         }
1111         return 0;
1112 }
1113
1114 /* The interrupt handler does all of the Rx thread work and cleans up
1115    after the Tx thread. */
1116
1117 static irqreturn_t corkscrew_interrupt(int irq, void *dev_id)
1118 {
1119         /* Use the now-standard shared IRQ implementation. */
1120         struct net_device *dev = dev_id;
1121         struct corkscrew_private *lp = netdev_priv(dev);
1122         int ioaddr, status;
1123         int latency;
1124         int i = max_interrupt_work;
1125
1126         ioaddr = dev->base_addr;
1127         latency = inb(ioaddr + Timer);
1128
1129         spin_lock(&lp->lock);
1130
1131         status = inw(ioaddr + EL3_STATUS);
1132
1133         if (corkscrew_debug > 4)
1134                 printk("%s: interrupt, status %4.4x, timer %d.\n",
1135                         dev->name, status, latency);
1136         if ((status & 0xE000) != 0xE000) {
1137                 static int donedidthis;
1138                 /* Some interrupt controllers store a bogus interrupt from boot-time.
1139                    Ignore a single early interrupt, but don't hang the machine for
1140                    other interrupt problems. */
1141                 if (donedidthis++ > 100) {
1142                         printk(KERN_ERR "%s: Bogus interrupt, bailing. Status %4.4x, start=%d.\n",
1143                                    dev->name, status, netif_running(dev));
1144                         free_irq(dev->irq, dev);
1145                         dev->irq = -1;
1146                 }
1147         }
1148
1149         do {
1150                 if (corkscrew_debug > 5)
1151                         printk("%s: In interrupt loop, status %4.4x.\n",
1152                                dev->name, status);
1153                 if (status & RxComplete)
1154                         corkscrew_rx(dev);
1155
1156                 if (status & TxAvailable) {
1157                         if (corkscrew_debug > 5)
1158                                 printk("        TX room bit was handled.\n");
1159                         /* There's room in the FIFO for a full-sized packet. */
1160                         outw(AckIntr | TxAvailable, ioaddr + EL3_CMD);
1161                         netif_wake_queue(dev);
1162                 }
1163                 if (status & DownComplete) {
1164                         unsigned int dirty_tx = lp->dirty_tx;
1165
1166                         while (lp->cur_tx - dirty_tx > 0) {
1167                                 int entry = dirty_tx % TX_RING_SIZE;
1168                                 if (inl(ioaddr + DownListPtr) == isa_virt_to_bus(&lp->tx_ring[entry]))
1169                                         break;  /* It still hasn't been processed. */
1170                                 if (lp->tx_skbuff[entry]) {
1171                                         dev_kfree_skb_irq(lp->tx_skbuff[entry]);
1172                                         lp->tx_skbuff[entry] = NULL;
1173                                 }
1174                                 dirty_tx++;
1175                         }
1176                         lp->dirty_tx = dirty_tx;
1177                         outw(AckIntr | DownComplete, ioaddr + EL3_CMD);
1178                         if (lp->tx_full && (lp->cur_tx - dirty_tx <= TX_RING_SIZE - 1)) {
1179                                 lp->tx_full = 0;
1180                                 netif_wake_queue(dev);
1181                         }
1182                 }
1183 #ifdef VORTEX_BUS_MASTER
1184                 if (status & DMADone) {
1185                         outw(0x1000, ioaddr + Wn7_MasterStatus);        /* Ack the event. */
1186                         dev_kfree_skb_irq(lp->tx_skb);  /* Release the transferred buffer */
1187                         netif_wake_queue(dev);
1188                 }
1189 #endif
1190                 if (status & UpComplete) {
1191                         boomerang_rx(dev);
1192                         outw(AckIntr | UpComplete, ioaddr + EL3_CMD);
1193                 }
1194                 if (status & (AdapterFailure | RxEarly | StatsFull)) {
1195                         /* Handle all uncommon interrupts at once. */
1196                         if (status & RxEarly) { /* Rx early is unused. */
1197                                 corkscrew_rx(dev);
1198                                 outw(AckIntr | RxEarly, ioaddr + EL3_CMD);
1199                         }
1200                         if (status & StatsFull) {       /* Empty statistics. */
1201                                 static int DoneDidThat;
1202                                 if (corkscrew_debug > 4)
1203                                         printk("%s: Updating stats.\n", dev->name);
1204                                 update_stats(ioaddr, dev);
1205                                 /* DEBUG HACK: Disable statistics as an interrupt source. */
1206                                 /* This occurs when we have the wrong media type! */
1207                                 if (DoneDidThat == 0 && inw(ioaddr + EL3_STATUS) & StatsFull) {
1208                                         int win, reg;
1209                                         printk("%s: Updating stats failed, disabling stats as an"
1210                                              " interrupt source.\n", dev->name);
1211                                         for (win = 0; win < 8; win++) {
1212                                                 EL3WINDOW(win);
1213                                                 printk("\n Vortex window %d:", win);
1214                                                 for (reg = 0; reg < 16; reg++)
1215                                                         printk(" %2.2x", inb(ioaddr + reg));
1216                                         }
1217                                         EL3WINDOW(7);
1218                                         outw(SetIntrEnb | TxAvailable |
1219                                              RxComplete | AdapterFailure |
1220                                              UpComplete | DownComplete |
1221                                              TxComplete, ioaddr + EL3_CMD);
1222                                         DoneDidThat++;
1223                                 }
1224                         }
1225                         if (status & AdapterFailure) {
1226                                 /* Adapter failure requires Rx reset and reinit. */
1227                                 outw(RxReset, ioaddr + EL3_CMD);
1228                                 /* Set the Rx filter to the current state. */
1229                                 set_rx_mode(dev);
1230                                 outw(RxEnable, ioaddr + EL3_CMD);       /* Re-enable the receiver. */
1231                                 outw(AckIntr | AdapterFailure,
1232                                      ioaddr + EL3_CMD);
1233                         }
1234                 }
1235
1236                 if (--i < 0) {
1237                         printk(KERN_ERR "%s: Too much work in interrupt, status %4.4x.  "
1238                              "Disabling functions (%4.4x).\n", dev->name,
1239                              status, SetStatusEnb | ((~status) & 0x7FE));
1240                         /* Disable all pending interrupts. */
1241                         outw(SetStatusEnb | ((~status) & 0x7FE), ioaddr + EL3_CMD);
1242                         outw(AckIntr | 0x7FF, ioaddr + EL3_CMD);
1243                         break;
1244                 }
1245                 /* Acknowledge the IRQ. */
1246                 outw(AckIntr | IntReq | IntLatch, ioaddr + EL3_CMD);
1247
1248         } while ((status = inw(ioaddr + EL3_STATUS)) & (IntLatch | RxComplete));
1249
1250         spin_unlock(&lp->lock);
1251
1252         if (corkscrew_debug > 4)
1253                 printk("%s: exiting interrupt, status %4.4x.\n", dev->name, status);
1254         return IRQ_HANDLED;
1255 }
1256
1257 static int corkscrew_rx(struct net_device *dev)
1258 {
1259         int ioaddr = dev->base_addr;
1260         int i;
1261         short rx_status;
1262
1263         if (corkscrew_debug > 5)
1264                 printk("   In rx_packet(), status %4.4x, rx_status %4.4x.\n",
1265                      inw(ioaddr + EL3_STATUS), inw(ioaddr + RxStatus));
1266         while ((rx_status = inw(ioaddr + RxStatus)) > 0) {
1267                 if (rx_status & 0x4000) {       /* Error, update stats. */
1268                         unsigned char rx_error = inb(ioaddr + RxErrors);
1269                         if (corkscrew_debug > 2)
1270                                 printk(" Rx error: status %2.2x.\n",
1271                                        rx_error);
1272                         dev->stats.rx_errors++;
1273                         if (rx_error & 0x01)
1274                                 dev->stats.rx_over_errors++;
1275                         if (rx_error & 0x02)
1276                                 dev->stats.rx_length_errors++;
1277                         if (rx_error & 0x04)
1278                                 dev->stats.rx_frame_errors++;
1279                         if (rx_error & 0x08)
1280                                 dev->stats.rx_crc_errors++;
1281                         if (rx_error & 0x10)
1282                                 dev->stats.rx_length_errors++;
1283                 } else {
1284                         /* The packet length: up to 4.5K!. */
1285                         short pkt_len = rx_status & 0x1fff;
1286                         struct sk_buff *skb;
1287
1288                         skb = dev_alloc_skb(pkt_len + 5 + 2);
1289                         if (corkscrew_debug > 4)
1290                                 printk("Receiving packet size %d status %4.4x.\n",
1291                                      pkt_len, rx_status);
1292                         if (skb != NULL) {
1293                                 skb_reserve(skb, 2);    /* Align IP on 16 byte boundaries */
1294                                 /* 'skb_put()' points to the start of sk_buff data area. */
1295                                 insl(ioaddr + RX_FIFO,
1296                                      skb_put(skb, pkt_len),
1297                                      (pkt_len + 3) >> 2);
1298                                 outw(RxDiscard, ioaddr + EL3_CMD);      /* Pop top Rx packet. */
1299                                 skb->protocol = eth_type_trans(skb, dev);
1300                                 netif_rx(skb);
1301                                 dev->last_rx = jiffies;
1302                                 dev->stats.rx_packets++;
1303                                 dev->stats.rx_bytes += pkt_len;
1304                                 /* Wait a limited time to go to next packet. */
1305                                 for (i = 200; i >= 0; i--)
1306                                         if (! (inw(ioaddr + EL3_STATUS) & CmdInProgress))
1307                                                 break;
1308                                 continue;
1309                         } else if (corkscrew_debug)
1310                                 printk("%s: Couldn't allocate a sk_buff of size %d.\n", dev->name, pkt_len);
1311                 }
1312                 outw(RxDiscard, ioaddr + EL3_CMD);
1313                 dev->stats.rx_dropped++;
1314                 /* Wait a limited time to skip this packet. */
1315                 for (i = 200; i >= 0; i--)
1316                         if (!(inw(ioaddr + EL3_STATUS) & CmdInProgress))
1317                                 break;
1318         }
1319         return 0;
1320 }
1321
1322 static int boomerang_rx(struct net_device *dev)
1323 {
1324         struct corkscrew_private *vp = netdev_priv(dev);
1325         int entry = vp->cur_rx % RX_RING_SIZE;
1326         int ioaddr = dev->base_addr;
1327         int rx_status;
1328
1329         if (corkscrew_debug > 5)
1330                 printk("   In boomerang_rx(), status %4.4x, rx_status %4.4x.\n",
1331                         inw(ioaddr + EL3_STATUS), inw(ioaddr + RxStatus));
1332         while ((rx_status = vp->rx_ring[entry].status) & RxDComplete) {
1333                 if (rx_status & RxDError) {     /* Error, update stats. */
1334                         unsigned char rx_error = rx_status >> 16;
1335                         if (corkscrew_debug > 2)
1336                                 printk(" Rx error: status %2.2x.\n",
1337                                        rx_error);
1338                         dev->stats.rx_errors++;
1339                         if (rx_error & 0x01)
1340                                 dev->stats.rx_over_errors++;
1341                         if (rx_error & 0x02)
1342                                 dev->stats.rx_length_errors++;
1343                         if (rx_error & 0x04)
1344                                 dev->stats.rx_frame_errors++;
1345                         if (rx_error & 0x08)
1346                                 dev->stats.rx_crc_errors++;
1347                         if (rx_error & 0x10)
1348                                 dev->stats.rx_length_errors++;
1349                 } else {
1350                         /* The packet length: up to 4.5K!. */
1351                         short pkt_len = rx_status & 0x1fff;
1352                         struct sk_buff *skb;
1353
1354                         dev->stats.rx_bytes += pkt_len;
1355                         if (corkscrew_debug > 4)
1356                                 printk("Receiving packet size %d status %4.4x.\n",
1357                                      pkt_len, rx_status);
1358
1359                         /* Check if the packet is long enough to just accept without
1360                            copying to a properly sized skbuff. */
1361                         if (pkt_len < rx_copybreak
1362                             && (skb = dev_alloc_skb(pkt_len + 4)) != NULL) {
1363                                 skb_reserve(skb, 2);    /* Align IP on 16 byte boundaries */
1364                                 /* 'skb_put()' points to the start of sk_buff data area. */
1365                                 memcpy(skb_put(skb, pkt_len),
1366                                        isa_bus_to_virt(vp->rx_ring[entry].
1367                                                    addr), pkt_len);
1368                                 rx_copy++;
1369                         } else {
1370                                 void *temp;
1371                                 /* Pass up the skbuff already on the Rx ring. */
1372                                 skb = vp->rx_skbuff[entry];
1373                                 vp->rx_skbuff[entry] = NULL;
1374                                 temp = skb_put(skb, pkt_len);
1375                                 /* Remove this checking code for final release. */
1376                                 if (isa_bus_to_virt(vp->rx_ring[entry].addr) != temp)
1377                                             printk("%s: Warning -- the skbuff addresses do not match"
1378                                              " in boomerang_rx: %p vs. %p / %p.\n",
1379                                              dev->name,
1380                                              isa_bus_to_virt(vp->
1381                                                          rx_ring[entry].
1382                                                          addr), skb->head,
1383                                              temp);
1384                                 rx_nocopy++;
1385                         }
1386                         skb->protocol = eth_type_trans(skb, dev);
1387                         netif_rx(skb);
1388                         dev->last_rx = jiffies;
1389                         dev->stats.rx_packets++;
1390                 }
1391                 entry = (++vp->cur_rx) % RX_RING_SIZE;
1392         }
1393         /* Refill the Rx ring buffers. */
1394         for (; vp->cur_rx - vp->dirty_rx > 0; vp->dirty_rx++) {
1395                 struct sk_buff *skb;
1396                 entry = vp->dirty_rx % RX_RING_SIZE;
1397                 if (vp->rx_skbuff[entry] == NULL) {
1398                         skb = dev_alloc_skb(PKT_BUF_SZ);
1399                         if (skb == NULL)
1400                                 break;  /* Bad news!  */
1401                         skb->dev = dev; /* Mark as being used by this device. */
1402                         skb_reserve(skb, 2);    /* Align IP on 16 byte boundaries */
1403                         vp->rx_ring[entry].addr = isa_virt_to_bus(skb->data);
1404                         vp->rx_skbuff[entry] = skb;
1405                 }
1406                 vp->rx_ring[entry].status = 0;  /* Clear complete bit. */
1407         }
1408         return 0;
1409 }
1410
1411 static int corkscrew_close(struct net_device *dev)
1412 {
1413         struct corkscrew_private *vp = netdev_priv(dev);
1414         int ioaddr = dev->base_addr;
1415         int i;
1416
1417         netif_stop_queue(dev);
1418
1419         if (corkscrew_debug > 1) {
1420                 printk("%s: corkscrew_close() status %4.4x, Tx status %2.2x.\n",
1421                      dev->name, inw(ioaddr + EL3_STATUS),
1422                      inb(ioaddr + TxStatus));
1423                 printk("%s: corkscrew close stats: rx_nocopy %d rx_copy %d"
1424                        " tx_queued %d.\n", dev->name, rx_nocopy, rx_copy,
1425                        queued_packet);
1426         }
1427
1428         del_timer(&vp->timer);
1429
1430         /* Turn off statistics ASAP.  We update lp->stats below. */
1431         outw(StatsDisable, ioaddr + EL3_CMD);
1432
1433         /* Disable the receiver and transmitter. */
1434         outw(RxDisable, ioaddr + EL3_CMD);
1435         outw(TxDisable, ioaddr + EL3_CMD);
1436
1437         if (dev->if_port == XCVR_10base2)
1438                 /* Turn off thinnet power.  Green! */
1439                 outw(StopCoax, ioaddr + EL3_CMD);
1440
1441         free_irq(dev->irq, dev);
1442
1443         outw(SetIntrEnb | 0x0000, ioaddr + EL3_CMD);
1444
1445         update_stats(ioaddr, dev);
1446         if (vp->full_bus_master_rx) {   /* Free Boomerang bus master Rx buffers. */
1447                 outl(0, ioaddr + UpListPtr);
1448                 for (i = 0; i < RX_RING_SIZE; i++)
1449                         if (vp->rx_skbuff[i]) {
1450                                 dev_kfree_skb(vp->rx_skbuff[i]);
1451                                 vp->rx_skbuff[i] = NULL;
1452                         }
1453         }
1454         if (vp->full_bus_master_tx) {   /* Free Boomerang bus master Tx buffers. */
1455                 outl(0, ioaddr + DownListPtr);
1456                 for (i = 0; i < TX_RING_SIZE; i++)
1457                         if (vp->tx_skbuff[i]) {
1458                                 dev_kfree_skb(vp->tx_skbuff[i]);
1459                                 vp->tx_skbuff[i] = NULL;
1460                         }
1461         }
1462
1463         return 0;
1464 }
1465
1466 static struct net_device_stats *corkscrew_get_stats(struct net_device *dev)
1467 {
1468         struct corkscrew_private *vp = netdev_priv(dev);
1469         unsigned long flags;
1470
1471         if (netif_running(dev)) {
1472                 spin_lock_irqsave(&vp->lock, flags);
1473                 update_stats(dev->base_addr, dev);
1474                 spin_unlock_irqrestore(&vp->lock, flags);
1475         }
1476         return &dev->stats;
1477 }
1478
1479 /*  Update statistics.
1480         Unlike with the EL3 we need not worry about interrupts changing
1481         the window setting from underneath us, but we must still guard
1482         against a race condition with a StatsUpdate interrupt updating the
1483         table.  This is done by checking that the ASM (!) code generated uses
1484         atomic updates with '+='.
1485         */
1486 static void update_stats(int ioaddr, struct net_device *dev)
1487 {
1488         /* Unlike the 3c5x9 we need not turn off stats updates while reading. */
1489         /* Switch to the stats window, and read everything. */
1490         EL3WINDOW(6);
1491         dev->stats.tx_carrier_errors += inb(ioaddr + 0);
1492         dev->stats.tx_heartbeat_errors += inb(ioaddr + 1);
1493         /* Multiple collisions. */ inb(ioaddr + 2);
1494         dev->stats.collisions += inb(ioaddr + 3);
1495         dev->stats.tx_window_errors += inb(ioaddr + 4);
1496         dev->stats.rx_fifo_errors += inb(ioaddr + 5);
1497         dev->stats.tx_packets += inb(ioaddr + 6);
1498         dev->stats.tx_packets += (inb(ioaddr + 9) & 0x30) << 4;
1499                                                 /* Rx packets   */ inb(ioaddr + 7);
1500                                                 /* Must read to clear */
1501         /* Tx deferrals */ inb(ioaddr + 8);
1502         /* Don't bother with register 9, an extension of registers 6&7.
1503            If we do use the 6&7 values the atomic update assumption above
1504            is invalid. */
1505         inw(ioaddr + 10);       /* Total Rx and Tx octets. */
1506         inw(ioaddr + 12);
1507         /* New: On the Vortex we must also clear the BadSSD counter. */
1508         EL3WINDOW(4);
1509         inb(ioaddr + 12);
1510
1511         /* We change back to window 7 (not 1) with the Vortex. */
1512         EL3WINDOW(7);
1513         return;
1514 }
1515
1516 /* This new version of set_rx_mode() supports v1.4 kernels.
1517    The Vortex chip has no documented multicast filter, so the only
1518    multicast setting is to receive all multicast frames.  At least
1519    the chip has a very clean way to set the mode, unlike many others. */
1520 static void set_rx_mode(struct net_device *dev)
1521 {
1522         int ioaddr = dev->base_addr;
1523         short new_mode;
1524
1525         if (dev->flags & IFF_PROMISC) {
1526                 if (corkscrew_debug > 3)
1527                         printk("%s: Setting promiscuous mode.\n",
1528                                dev->name);
1529                 new_mode = SetRxFilter | RxStation | RxMulticast | RxBroadcast | RxProm;
1530         } else if ((dev->mc_list) || (dev->flags & IFF_ALLMULTI)) {
1531                 new_mode = SetRxFilter | RxStation | RxMulticast | RxBroadcast;
1532         } else
1533                 new_mode = SetRxFilter | RxStation | RxBroadcast;
1534
1535         outw(new_mode, ioaddr + EL3_CMD);
1536 }
1537
1538 static void netdev_get_drvinfo(struct net_device *dev,
1539                                struct ethtool_drvinfo *info)
1540 {
1541         strcpy(info->driver, DRV_NAME);
1542         strcpy(info->version, DRV_VERSION);
1543         sprintf(info->bus_info, "ISA 0x%lx", dev->base_addr);
1544 }
1545
1546 static u32 netdev_get_msglevel(struct net_device *dev)
1547 {
1548         return corkscrew_debug;
1549 }
1550
1551 static void netdev_set_msglevel(struct net_device *dev, u32 level)
1552 {
1553         corkscrew_debug = level;
1554 }
1555
1556 static const struct ethtool_ops netdev_ethtool_ops = {
1557         .get_drvinfo            = netdev_get_drvinfo,
1558         .get_msglevel           = netdev_get_msglevel,
1559         .set_msglevel           = netdev_set_msglevel,
1560 };
1561
1562
1563 #ifdef MODULE
1564 void cleanup_module(void)
1565 {
1566         while (!list_empty(&root_corkscrew_dev)) {
1567                 struct net_device *dev;
1568                 struct corkscrew_private *vp;
1569
1570                 vp = list_entry(root_corkscrew_dev.next,
1571                                 struct corkscrew_private, list);
1572                 dev = vp->our_dev;
1573                 unregister_netdev(dev);
1574                 cleanup_card(dev);
1575                 free_netdev(dev);
1576         }
1577 }
1578 #endif                          /* MODULE */
1579
1580 /*
1581  * Local variables:
1582  *  compile-command: "gcc -DMODULE -D__KERNEL__ -Wall -Wstrict-prototypes -O6 -c 3c515.c"
1583  *  c-indent-level: 4
1584  *  tab-width: 4
1585  * End:
1586  */