Merge git://git.kernel.org/pub/scm/linux/kernel/git/jejb/scsi-rc-fixes-2.6
[linux-2.6] / drivers / net / tlan.c
1 /*******************************************************************************
2  *
3  *  Linux ThunderLAN Driver
4  *
5  *  tlan.c
6  *  by James Banks
7  *
8  *  (C) 1997-1998 Caldera, Inc.
9  *  (C) 1998 James Banks
10  *  (C) 1999-2001 Torben Mathiasen
11  *  (C) 2002 Samuel Chessman
12  *
13  *  This software may be used and distributed according to the terms
14  *  of the GNU General Public License, incorporated herein by reference.
15  *
16  ** Useful (if not required) reading:
17  *
18  *              Texas Instruments, ThunderLAN Programmer's Guide,
19  *                      TI Literature Number SPWU013A
20  *                      available in PDF format from www.ti.com
21  *              Level One, LXT901 and LXT970 Data Sheets
22  *                      available in PDF format from www.level1.com
23  *              National Semiconductor, DP83840A Data Sheet
24  *                      available in PDF format from www.national.com
25  *              Microchip Technology, 24C01A/02A/04A Data Sheet
26  *                      available in PDF format from www.microchip.com
27  *
28  * Change History
29  *
30  *      Tigran Aivazian <tigran@sco.com>:       TLan_PciProbe() now uses
31  *                                              new PCI BIOS interface.
32  *      Alan Cox        <alan@lxorguk.ukuu.org.uk>:
33  *                                              Fixed the out of memory
34  *                                              handling.
35  *
36  *      Torben Mathiasen <torben.mathiasen@compaq.com> New Maintainer!
37  *
38  *      v1.1 Dec 20, 1999    - Removed linux version checking
39  *                             Patch from Tigran Aivazian.
40  *                           - v1.1 includes Alan's SMP updates.
41  *                           - We still have problems on SMP though,
42  *                             but I'm looking into that.
43  *
44  *      v1.2 Jan 02, 2000    - Hopefully fixed the SMP deadlock.
45  *                           - Removed dependency of HZ being 100.
46  *                           - We now allow higher priority timers to
47  *                             overwrite timers like TLAN_TIMER_ACTIVITY
48  *                             Patch from John Cagle <john.cagle@compaq.com>.
49  *                           - Fixed a few compiler warnings.
50  *
51  *      v1.3 Feb 04, 2000    - Fixed the remaining HZ issues.
52  *                           - Removed call to pci_present().
53  *                           - Removed SA_INTERRUPT flag from irq handler.
54  *                           - Added __init and __initdata to reduce resisdent
55  *                             code size.
56  *                           - Driver now uses module_init/module_exit.
57  *                           - Rewrote init_module and tlan_probe to
58  *                             share a lot more code. We now use tlan_probe
59  *                             with builtin and module driver.
60  *                           - Driver ported to new net API.
61  *                           - tlan.txt has been reworked to reflect current
62  *                             driver (almost)
63  *                           - Other minor stuff
64  *
65  *      v1.4 Feb 10, 2000    - Updated with more changes required after Dave's
66  *                             network cleanup in 2.3.43pre7 (Tigran & myself)
67  *                           - Minor stuff.
68  *
69  *      v1.5 March 22, 2000  - Fixed another timer bug that would hang the driver
70  *                             if no cable/link were present.
71  *                           - Cosmetic changes.
72  *                           - TODO: Port completely to new PCI/DMA API
73  *                                   Auto-Neg fallback.
74  *
75  *      v1.6 April 04, 2000  - Fixed driver support for kernel-parameters. Haven't
76  *                             tested it though, as the kernel support is currently
77  *                             broken (2.3.99p4p3).
78  *                           - Updated tlan.txt accordingly.
79  *                           - Adjusted minimum/maximum frame length.
80  *                           - There is now a TLAN website up at
81  *                             http://tlan.kernel.dk
82  *
83  *      v1.7 April 07, 2000  - Started to implement custom ioctls. Driver now
84  *                             reports PHY information when used with Donald
85  *                             Beckers userspace MII diagnostics utility.
86  *
87  *      v1.8 April 23, 2000  - Fixed support for forced speed/duplex settings.
88  *                           - Added link information to Auto-Neg and forced
89  *                             modes. When NIC operates with auto-neg the driver
90  *                             will report Link speed & duplex modes as well as
91  *                             link partner abilities. When forced link is used,
92  *                             the driver will report status of the established
93  *                             link.
94  *                             Please read tlan.txt for additional information.
95  *                           - Removed call to check_region(), and used
96  *                             return value of request_region() instead.
97  *
98  *      v1.8a May 28, 2000   - Minor updates.
99  *
100  *      v1.9 July 25, 2000   - Fixed a few remaining Full-Duplex issues.
101  *                           - Updated with timer fixes from Andrew Morton.
102  *                           - Fixed module race in TLan_Open.
103  *                           - Added routine to monitor PHY status.
104  *                           - Added activity led support for Proliant devices.
105  *
106  *      v1.10 Aug 30, 2000   - Added support for EISA based tlan controllers
107  *                             like the Compaq NetFlex3/E.
108  *                           - Rewrote tlan_probe to better handle multiple
109  *                             bus probes. Probing and device setup is now
110  *                             done through TLan_Probe and TLan_init_one. Actual
111  *                             hardware probe is done with kernel API and
112  *                             TLan_EisaProbe.
113  *                           - Adjusted debug information for probing.
114  *                           - Fixed bug that would cause general debug information
115  *                             to be printed after driver removal.
116  *                           - Added transmit timeout handling.
117  *                           - Fixed OOM return values in tlan_probe.
118  *                           - Fixed possible mem leak in tlan_exit
119  *                             (now tlan_remove_one).
120  *                           - Fixed timer bug in TLan_phyMonitor.
121  *                           - This driver version is alpha quality, please
122  *                             send me any bug issues you may encounter.
123  *
124  *      v1.11 Aug 31, 2000   - Do not try to register irq 0 if no irq line was
125  *                             set for EISA cards.
126  *                           - Added support for NetFlex3/E with nibble-rate
127  *                             10Base-T PHY. This is untestet as I haven't got
128  *                             one of these cards.
129  *                           - Fixed timer being added twice.
130  *                           - Disabled PhyMonitoring by default as this is
131  *                             work in progress. Define MONITOR to enable it.
132  *                           - Now we don't display link info with PHYs that
133  *                             doesn't support it (level1).
134  *                           - Incresed tx_timeout beacuse of auto-neg.
135  *                           - Adjusted timers for forced speeds.
136  *
137  *      v1.12 Oct 12, 2000   - Minor fixes (memleak, init, etc.)
138  *
139  *      v1.13 Nov 28, 2000   - Stop flooding console with auto-neg issues
140  *                             when link can't be established.
141  *                           - Added the bbuf option as a kernel parameter.
142  *                           - Fixed ioaddr probe bug.
143  *                           - Fixed stupid deadlock with MII interrupts.
144  *                           - Added support for speed/duplex selection with
145  *                             multiple nics.
146  *                           - Added partly fix for TX Channel lockup with
147  *                             TLAN v1.0 silicon. This needs to be investigated
148  *                             further.
149  *
150  *      v1.14 Dec 16, 2000   - Added support for servicing multiple frames per.
151  *                             interrupt. Thanks goes to
152  *                             Adam Keys <adam@ti.com>
153  *                             Denis Beaudoin <dbeaudoin@ti.com>
154  *                             for providing the patch.
155  *                           - Fixed auto-neg output when using multiple
156  *                             adapters.
157  *                           - Converted to use new taskq interface.
158  *
159  *      v1.14a Jan 6, 2001   - Minor adjustments (spinlocks, etc.)
160  *
161  *      Samuel Chessman <chessman@tux.org> New Maintainer!
162  *
163  *      v1.15 Apr 4, 2002    - Correct operation when aui=1 to be
164  *                             10T half duplex no loopback
165  *                             Thanks to Gunnar Eikman
166  *******************************************************************************/
167
168 #include <linux/module.h>
169 #include <linux/init.h>
170 #include <linux/ioport.h>
171 #include <linux/eisa.h>
172 #include <linux/pci.h>
173 #include <linux/dma-mapping.h>
174 #include <linux/netdevice.h>
175 #include <linux/etherdevice.h>
176 #include <linux/delay.h>
177 #include <linux/spinlock.h>
178 #include <linux/workqueue.h>
179 #include <linux/mii.h>
180
181 #include "tlan.h"
182
183 typedef u32 (TLanIntVectorFunc)( struct net_device *, u16 );
184
185
186 /* For removing EISA devices */
187 static  struct net_device       *TLan_Eisa_Devices;
188
189 static  int             TLanDevicesInstalled;
190
191 /* Set speed, duplex and aui settings */
192 static  int aui[MAX_TLAN_BOARDS];
193 static  int duplex[MAX_TLAN_BOARDS];
194 static  int speed[MAX_TLAN_BOARDS];
195 static  int boards_found;
196 module_param_array(aui, int, NULL, 0);
197 module_param_array(duplex, int, NULL, 0);
198 module_param_array(speed, int, NULL, 0);
199 MODULE_PARM_DESC(aui, "ThunderLAN use AUI port(s) (0-1)");
200 MODULE_PARM_DESC(duplex, "ThunderLAN duplex setting(s) (0-default, 1-half, 2-full)");
201 MODULE_PARM_DESC(speed, "ThunderLAN port speen setting(s) (0,10,100)");
202
203 MODULE_AUTHOR("Maintainer: Samuel Chessman <chessman@tux.org>");
204 MODULE_DESCRIPTION("Driver for TI ThunderLAN based ethernet PCI adapters");
205 MODULE_LICENSE("GPL");
206
207
208 /* Define this to enable Link beat monitoring */
209 #undef MONITOR
210
211 /* Turn on debugging. See Documentation/networking/tlan.txt for details */
212 static  int             debug;
213 module_param(debug, int, 0);
214 MODULE_PARM_DESC(debug, "ThunderLAN debug mask");
215
216 static  int             bbuf;
217 module_param(bbuf, int, 0);
218 MODULE_PARM_DESC(bbuf, "ThunderLAN use big buffer (0-1)");
219
220 static  const char TLanSignature[] = "TLAN";
221 static  const char tlan_banner[] = "ThunderLAN driver v1.15\n";
222 static  int tlan_have_pci;
223 static  int tlan_have_eisa;
224
225 static const char *media[] = {
226         "10BaseT-HD ", "10BaseT-FD ","100baseTx-HD ",
227         "100baseTx-FD", "100baseT4", NULL
228 };
229
230 static struct board {
231         const char      *deviceLabel;
232         u32             flags;
233         u16             addrOfs;
234 } board_info[] = {
235         { "Compaq Netelligent 10 T PCI UTP", TLAN_ADAPTER_ACTIVITY_LED, 0x83 },
236         { "Compaq Netelligent 10/100 TX PCI UTP", TLAN_ADAPTER_ACTIVITY_LED, 0x83 },
237         { "Compaq Integrated NetFlex-3/P", TLAN_ADAPTER_NONE, 0x83 },
238         { "Compaq NetFlex-3/P",
239           TLAN_ADAPTER_UNMANAGED_PHY | TLAN_ADAPTER_BIT_RATE_PHY, 0x83 },
240         { "Compaq NetFlex-3/P", TLAN_ADAPTER_NONE, 0x83 },
241         { "Compaq Netelligent Integrated 10/100 TX UTP",
242           TLAN_ADAPTER_ACTIVITY_LED, 0x83 },
243         { "Compaq Netelligent Dual 10/100 TX PCI UTP", TLAN_ADAPTER_NONE, 0x83 },
244         { "Compaq Netelligent 10/100 TX Embedded UTP", TLAN_ADAPTER_NONE, 0x83 },
245         { "Olicom OC-2183/2185", TLAN_ADAPTER_USE_INTERN_10, 0x83 },
246         { "Olicom OC-2325", TLAN_ADAPTER_UNMANAGED_PHY, 0xF8 },
247         { "Olicom OC-2326", TLAN_ADAPTER_USE_INTERN_10, 0xF8 },
248         { "Compaq Netelligent 10/100 TX UTP", TLAN_ADAPTER_ACTIVITY_LED, 0x83 },
249         { "Compaq Netelligent 10 T/2 PCI UTP/Coax", TLAN_ADAPTER_NONE, 0x83 },
250         { "Compaq NetFlex-3/E",
251           TLAN_ADAPTER_ACTIVITY_LED |   /* EISA card */
252           TLAN_ADAPTER_UNMANAGED_PHY | TLAN_ADAPTER_BIT_RATE_PHY, 0x83 },
253         { "Compaq NetFlex-3/E", TLAN_ADAPTER_ACTIVITY_LED, 0x83 }, /* EISA card */
254 };
255
256 static struct pci_device_id tlan_pci_tbl[] = {
257         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETEL10,
258                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0 },
259         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETEL100,
260                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 1 },
261         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETFLEX3I,
262                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 2 },
263         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_THUNDER,
264                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 3 },
265         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETFLEX3B,
266                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 4 },
267         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETEL100PI,
268                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 5 },
269         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETEL100D,
270                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 6 },
271         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_COMPAQ_NETEL100I,
272                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 7 },
273         { PCI_VENDOR_ID_OLICOM, PCI_DEVICE_ID_OLICOM_OC2183,
274                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 8 },
275         { PCI_VENDOR_ID_OLICOM, PCI_DEVICE_ID_OLICOM_OC2325,
276                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 9 },
277         { PCI_VENDOR_ID_OLICOM, PCI_DEVICE_ID_OLICOM_OC2326,
278                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 10 },
279         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_NETELLIGENT_10_100_WS_5100,
280                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 11 },
281         { PCI_VENDOR_ID_COMPAQ, PCI_DEVICE_ID_NETELLIGENT_10_T2,
282                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 12 },
283         { 0,}
284 };
285 MODULE_DEVICE_TABLE(pci, tlan_pci_tbl);
286
287 static void     TLan_EisaProbe( void );
288 static void     TLan_Eisa_Cleanup( void );
289 static int      TLan_Init( struct net_device * );
290 static int      TLan_Open( struct net_device *dev );
291 static int      TLan_StartTx( struct sk_buff *, struct net_device *);
292 static irqreturn_t TLan_HandleInterrupt( int, void *);
293 static int      TLan_Close( struct net_device *);
294 static struct   net_device_stats *TLan_GetStats( struct net_device *);
295 static void     TLan_SetMulticastList( struct net_device *);
296 static int      TLan_ioctl( struct net_device *dev, struct ifreq *rq, int cmd);
297 static int      TLan_probe1( struct pci_dev *pdev, long ioaddr,
298                              int irq, int rev, const struct pci_device_id *ent);
299 static void     TLan_tx_timeout( struct net_device *dev);
300 static void     TLan_tx_timeout_work(struct work_struct *work);
301 static int      tlan_init_one( struct pci_dev *pdev, const struct pci_device_id *ent);
302
303 static u32      TLan_HandleTxEOF( struct net_device *, u16 );
304 static u32      TLan_HandleStatOverflow( struct net_device *, u16 );
305 static u32      TLan_HandleRxEOF( struct net_device *, u16 );
306 static u32      TLan_HandleDummy( struct net_device *, u16 );
307 static u32      TLan_HandleTxEOC( struct net_device *, u16 );
308 static u32      TLan_HandleStatusCheck( struct net_device *, u16 );
309 static u32      TLan_HandleRxEOC( struct net_device *, u16 );
310
311 static void     TLan_Timer( unsigned long );
312
313 static void     TLan_ResetLists( struct net_device * );
314 static void     TLan_FreeLists( struct net_device * );
315 static void     TLan_PrintDio( u16 );
316 static void     TLan_PrintList( TLanList *, char *, int );
317 static void     TLan_ReadAndClearStats( struct net_device *, int );
318 static void     TLan_ResetAdapter( struct net_device * );
319 static void     TLan_FinishReset( struct net_device * );
320 static void     TLan_SetMac( struct net_device *, int areg, char *mac );
321
322 static void     TLan_PhyPrint( struct net_device * );
323 static void     TLan_PhyDetect( struct net_device * );
324 static void     TLan_PhyPowerDown( struct net_device * );
325 static void     TLan_PhyPowerUp( struct net_device * );
326 static void     TLan_PhyReset( struct net_device * );
327 static void     TLan_PhyStartLink( struct net_device * );
328 static void     TLan_PhyFinishAutoNeg( struct net_device * );
329 #ifdef MONITOR
330 static void     TLan_PhyMonitor( struct net_device * );
331 #endif
332
333 /*
334 static int      TLan_PhyNop( struct net_device * );
335 static int      TLan_PhyInternalCheck( struct net_device * );
336 static int      TLan_PhyInternalService( struct net_device * );
337 static int      TLan_PhyDp83840aCheck( struct net_device * );
338 */
339
340 static int      TLan_MiiReadReg( struct net_device *, u16, u16, u16 * );
341 static void     TLan_MiiSendData( u16, u32, unsigned );
342 static void     TLan_MiiSync( u16 );
343 static void     TLan_MiiWriteReg( struct net_device *, u16, u16, u16 );
344
345 static void     TLan_EeSendStart( u16 );
346 static int      TLan_EeSendByte( u16, u8, int );
347 static void     TLan_EeReceiveByte( u16, u8 *, int );
348 static int      TLan_EeReadByte( struct net_device *, u8, u8 * );
349
350
351 static inline void
352 TLan_StoreSKB( struct tlan_list_tag *tag, struct sk_buff *skb)
353 {
354         unsigned long addr = (unsigned long)skb;
355         tag->buffer[9].address = addr;
356         tag->buffer[8].address = upper_32_bits(addr);
357 }
358
359 static inline struct sk_buff *
360 TLan_GetSKB( const struct tlan_list_tag *tag)
361 {
362         unsigned long addr;
363
364         addr = tag->buffer[9].address;
365         addr |= (tag->buffer[8].address << 16) << 16;
366         return (struct sk_buff *) addr;
367 }
368
369
370 static TLanIntVectorFunc *TLanIntVector[TLAN_INT_NUMBER_OF_INTS] = {
371         NULL,
372         TLan_HandleTxEOF,
373         TLan_HandleStatOverflow,
374         TLan_HandleRxEOF,
375         TLan_HandleDummy,
376         TLan_HandleTxEOC,
377         TLan_HandleStatusCheck,
378         TLan_HandleRxEOC
379 };
380
381 static inline void
382 TLan_SetTimer( struct net_device *dev, u32 ticks, u32 type )
383 {
384         TLanPrivateInfo *priv = netdev_priv(dev);
385         unsigned long flags = 0;
386
387         if (!in_irq())
388                 spin_lock_irqsave(&priv->lock, flags);
389         if ( priv->timer.function != NULL &&
390                 priv->timerType != TLAN_TIMER_ACTIVITY ) {
391                 if (!in_irq())
392                         spin_unlock_irqrestore(&priv->lock, flags);
393                 return;
394         }
395         priv->timer.function = &TLan_Timer;
396         if (!in_irq())
397                 spin_unlock_irqrestore(&priv->lock, flags);
398
399         priv->timer.data = (unsigned long) dev;
400         priv->timerSetAt = jiffies;
401         priv->timerType = type;
402         mod_timer(&priv->timer, jiffies + ticks);
403
404 } /* TLan_SetTimer */
405
406
407 /*****************************************************************************
408 ******************************************************************************
409
410         ThunderLAN Driver Primary Functions
411
412         These functions are more or less common to all Linux network drivers.
413
414 ******************************************************************************
415 *****************************************************************************/
416
417
418
419
420
421         /***************************************************************
422          *      tlan_remove_one
423          *
424          *      Returns:
425          *              Nothing
426          *      Parms:
427          *              None
428          *
429          *      Goes through the TLanDevices list and frees the device
430          *      structs and memory associated with each device (lists
431          *      and buffers).  It also ureserves the IO port regions
432          *      associated with this device.
433          *
434          **************************************************************/
435
436
437 static void __devexit tlan_remove_one( struct pci_dev *pdev)
438 {
439         struct net_device *dev = pci_get_drvdata( pdev );
440         TLanPrivateInfo *priv = netdev_priv(dev);
441
442         unregister_netdev( dev );
443
444         if ( priv->dmaStorage ) {
445                 pci_free_consistent(priv->pciDev,
446                                     priv->dmaSize, priv->dmaStorage,
447                                     priv->dmaStorageDMA );
448         }
449
450 #ifdef CONFIG_PCI
451         pci_release_regions(pdev);
452 #endif
453
454         free_netdev( dev );
455
456         pci_set_drvdata( pdev, NULL );
457 }
458
459 static struct pci_driver tlan_driver = {
460         .name           = "tlan",
461         .id_table       = tlan_pci_tbl,
462         .probe          = tlan_init_one,
463         .remove         = __devexit_p(tlan_remove_one),
464 };
465
466 static int __init tlan_probe(void)
467 {
468         int rc = -ENODEV;
469
470         printk(KERN_INFO "%s", tlan_banner);
471
472         TLAN_DBG(TLAN_DEBUG_PROBE, "Starting PCI Probe....\n");
473
474         /* Use new style PCI probing. Now the kernel will
475            do most of this for us */
476         rc = pci_register_driver(&tlan_driver);
477
478         if (rc != 0) {
479                 printk(KERN_ERR "TLAN: Could not register pci driver.\n");
480                 goto err_out_pci_free;
481         }
482
483         TLAN_DBG(TLAN_DEBUG_PROBE, "Starting EISA Probe....\n");
484         TLan_EisaProbe();
485
486         printk(KERN_INFO "TLAN: %d device%s installed, PCI: %d  EISA: %d\n",
487                  TLanDevicesInstalled, TLanDevicesInstalled == 1 ? "" : "s",
488                  tlan_have_pci, tlan_have_eisa);
489
490         if (TLanDevicesInstalled == 0) {
491                 rc = -ENODEV;
492                 goto  err_out_pci_unreg;
493         }
494         return 0;
495
496 err_out_pci_unreg:
497         pci_unregister_driver(&tlan_driver);
498 err_out_pci_free:
499         return rc;
500 }
501
502
503 static int __devinit tlan_init_one( struct pci_dev *pdev,
504                                     const struct pci_device_id *ent)
505 {
506         return TLan_probe1( pdev, -1, -1, 0, ent);
507 }
508
509
510 /*
511         ***************************************************************
512          *      tlan_probe1
513          *
514          *      Returns:
515          *              0 on success, error code on error
516          *      Parms:
517          *              none
518          *
519          *      The name is lower case to fit in with all the rest of
520          *      the netcard_probe names.  This function looks for
521          *      another TLan based adapter, setting it up with the
522          *      allocated device struct if one is found.
523          *      tlan_probe has been ported to the new net API and
524          *      now allocates its own device structure. This function
525          *      is also used by modules.
526          *
527          **************************************************************/
528
529 static int __devinit TLan_probe1(struct pci_dev *pdev,
530                                  long ioaddr, int irq, int rev,
531                                  const struct pci_device_id *ent )
532 {
533
534         struct net_device  *dev;
535         TLanPrivateInfo    *priv;
536         u16                device_id;
537         int                reg, rc = -ENODEV;
538
539 #ifdef CONFIG_PCI
540         if (pdev) {
541                 rc = pci_enable_device(pdev);
542                 if (rc)
543                         return rc;
544
545                 rc = pci_request_regions(pdev, TLanSignature);
546                 if (rc) {
547                         printk(KERN_ERR "TLAN: Could not reserve IO regions\n");
548                         goto err_out;
549                 }
550         }
551 #endif  /*  CONFIG_PCI  */
552
553         dev = alloc_etherdev(sizeof(TLanPrivateInfo));
554         if (dev == NULL) {
555                 printk(KERN_ERR "TLAN: Could not allocate memory for device.\n");
556                 rc = -ENOMEM;
557                 goto err_out_regions;
558         }
559         SET_NETDEV_DEV(dev, &pdev->dev);
560
561         priv = netdev_priv(dev);
562
563         priv->pciDev = pdev;
564         priv->dev = dev;
565
566         /* Is this a PCI device? */
567         if (pdev) {
568                 u32                pci_io_base = 0;
569
570                 priv->adapter = &board_info[ent->driver_data];
571
572                 rc = pci_set_dma_mask(pdev, DMA_32BIT_MASK);
573                 if (rc) {
574                         printk(KERN_ERR "TLAN: No suitable PCI mapping available.\n");
575                         goto err_out_free_dev;
576                 }
577
578                 for ( reg= 0; reg <= 5; reg ++ ) {
579                         if (pci_resource_flags(pdev, reg) & IORESOURCE_IO) {
580                                 pci_io_base = pci_resource_start(pdev, reg);
581                                 TLAN_DBG( TLAN_DEBUG_GNRL, "IO mapping is available at %x.\n",
582                                                 pci_io_base);
583                                 break;
584                         }
585                 }
586                 if (!pci_io_base) {
587                         printk(KERN_ERR "TLAN: No IO mappings available\n");
588                         rc = -EIO;
589                         goto err_out_free_dev;
590                 }
591
592                 dev->base_addr = pci_io_base;
593                 dev->irq = pdev->irq;
594                 priv->adapterRev = pdev->revision;
595                 pci_set_master(pdev);
596                 pci_set_drvdata(pdev, dev);
597
598         } else  {     /* EISA card */
599                 /* This is a hack. We need to know which board structure
600                  * is suited for this adapter */
601                 device_id = inw(ioaddr + EISA_ID2);
602                 priv->is_eisa = 1;
603                 if (device_id == 0x20F1) {
604                         priv->adapter = &board_info[13];        /* NetFlex-3/E */
605                         priv->adapterRev = 23;                  /* TLAN 2.3 */
606                 } else {
607                         priv->adapter = &board_info[14];
608                         priv->adapterRev = 10;                  /* TLAN 1.0 */
609                 }
610                 dev->base_addr = ioaddr;
611                 dev->irq = irq;
612         }
613
614         /* Kernel parameters */
615         if (dev->mem_start) {
616                 priv->aui    = dev->mem_start & 0x01;
617                 priv->duplex = ((dev->mem_start & 0x06) == 0x06) ? 0
618                         : (dev->mem_start & 0x06) >> 1;
619                 priv->speed  = ((dev->mem_start & 0x18) == 0x18) ? 0
620                         : (dev->mem_start & 0x18) >> 3;
621
622                 if (priv->speed == 0x1) {
623                         priv->speed = TLAN_SPEED_10;
624                 } else if (priv->speed == 0x2) {
625                         priv->speed = TLAN_SPEED_100;
626                 }
627                 debug = priv->debug = dev->mem_end;
628         } else {
629                 priv->aui    = aui[boards_found];
630                 priv->speed  = speed[boards_found];
631                 priv->duplex = duplex[boards_found];
632                 priv->debug = debug;
633         }
634
635         /* This will be used when we get an adapter error from
636          * within our irq handler */
637         INIT_WORK(&priv->tlan_tqueue, TLan_tx_timeout_work);
638
639         spin_lock_init(&priv->lock);
640
641         rc = TLan_Init(dev);
642         if (rc) {
643                 printk(KERN_ERR "TLAN: Could not set up device.\n");
644                 goto err_out_free_dev;
645         }
646
647         rc = register_netdev(dev);
648         if (rc) {
649                 printk(KERN_ERR "TLAN: Could not register device.\n");
650                 goto err_out_uninit;
651         }
652
653
654         TLanDevicesInstalled++;
655         boards_found++;
656
657         /* pdev is NULL if this is an EISA device */
658         if (pdev)
659                 tlan_have_pci++;
660         else {
661                 priv->nextDevice = TLan_Eisa_Devices;
662                 TLan_Eisa_Devices = dev;
663                 tlan_have_eisa++;
664         }
665
666         printk(KERN_INFO "TLAN: %s irq=%2d, io=%04x, %s, Rev. %d\n",
667                         dev->name,
668                         (int) dev->irq,
669                         (int) dev->base_addr,
670                         priv->adapter->deviceLabel,
671                         priv->adapterRev);
672         return 0;
673
674 err_out_uninit:
675         pci_free_consistent(priv->pciDev, priv->dmaSize, priv->dmaStorage,
676                             priv->dmaStorageDMA );
677 err_out_free_dev:
678         free_netdev(dev);
679 err_out_regions:
680 #ifdef CONFIG_PCI
681         if (pdev)
682                 pci_release_regions(pdev);
683 #endif
684 err_out:
685         if (pdev)
686                 pci_disable_device(pdev);
687         return rc;
688 }
689
690
691 static void TLan_Eisa_Cleanup(void)
692 {
693         struct net_device *dev;
694         TLanPrivateInfo *priv;
695
696         while( tlan_have_eisa ) {
697                 dev = TLan_Eisa_Devices;
698                 priv = netdev_priv(dev);
699                 if (priv->dmaStorage) {
700                         pci_free_consistent(priv->pciDev, priv->dmaSize,
701                                             priv->dmaStorage, priv->dmaStorageDMA );
702                 }
703                 release_region( dev->base_addr, 0x10);
704                 unregister_netdev( dev );
705                 TLan_Eisa_Devices = priv->nextDevice;
706                 free_netdev( dev );
707                 tlan_have_eisa--;
708         }
709 }
710
711
712 static void __exit tlan_exit(void)
713 {
714         pci_unregister_driver(&tlan_driver);
715
716         if (tlan_have_eisa)
717                 TLan_Eisa_Cleanup();
718
719 }
720
721
722 /* Module loading/unloading */
723 module_init(tlan_probe);
724 module_exit(tlan_exit);
725
726
727
728         /**************************************************************
729          *      TLan_EisaProbe
730          *
731          *      Returns: 0 on success, 1 otherwise
732          *
733          *      Parms:   None
734          *
735          *
736          *      This functions probes for EISA devices and calls
737          *      TLan_probe1 when one is found.
738          *
739          *************************************************************/
740
741 static void  __init TLan_EisaProbe (void)
742 {
743         long    ioaddr;
744         int     rc = -ENODEV;
745         int     irq;
746         u16     device_id;
747
748         if (!EISA_bus) {
749                 TLAN_DBG(TLAN_DEBUG_PROBE, "No EISA bus present\n");
750                 return;
751         }
752
753         /* Loop through all slots of the EISA bus */
754         for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
755
756         TLAN_DBG(TLAN_DEBUG_PROBE,"EISA_ID 0x%4x: 0x%4x\n",
757                  (int) ioaddr + 0xC80, inw(ioaddr + EISA_ID));
758         TLAN_DBG(TLAN_DEBUG_PROBE,"EISA_ID 0x%4x: 0x%4x\n",
759                  (int) ioaddr + 0xC82, inw(ioaddr + EISA_ID2));
760
761
762                 TLAN_DBG(TLAN_DEBUG_PROBE, "Probing for EISA adapter at IO: 0x%4x : ",
763                                         (int) ioaddr);
764                 if (request_region(ioaddr, 0x10, TLanSignature) == NULL)
765                         goto out;
766
767                 if (inw(ioaddr + EISA_ID) != 0x110E) {
768                         release_region(ioaddr, 0x10);
769                         goto out;
770                 }
771
772                 device_id = inw(ioaddr + EISA_ID2);
773                 if (device_id !=  0x20F1 && device_id != 0x40F1) {
774                         release_region (ioaddr, 0x10);
775                         goto out;
776                 }
777
778                 if (inb(ioaddr + EISA_CR) != 0x1) {     /* Check if adapter is enabled */
779                         release_region (ioaddr, 0x10);
780                         goto out2;
781                 }
782
783                 if (debug == 0x10)
784                         printk("Found one\n");
785
786
787                 /* Get irq from board */
788                 switch (inb(ioaddr + 0xCC0)) {
789                         case(0x10):
790                                 irq=5;
791                                 break;
792                         case(0x20):
793                                 irq=9;
794                                 break;
795                         case(0x40):
796                                 irq=10;
797                                 break;
798                         case(0x80):
799                                 irq=11;
800                                 break;
801                         default:
802                                 goto out;
803                 }
804
805
806                 /* Setup the newly found eisa adapter */
807                 rc = TLan_probe1( NULL, ioaddr, irq,
808                                         12, NULL);
809                 continue;
810
811                 out:
812                         if (debug == 0x10)
813                                 printk("None found\n");
814                         continue;
815
816                 out2:   if (debug == 0x10)
817                                 printk("Card found but it is not enabled, skipping\n");
818                         continue;
819
820         }
821
822 } /* TLan_EisaProbe */
823
824 #ifdef CONFIG_NET_POLL_CONTROLLER
825 static void TLan_Poll(struct net_device *dev)
826 {
827         disable_irq(dev->irq);
828         TLan_HandleInterrupt(dev->irq, dev);
829         enable_irq(dev->irq);
830 }
831 #endif
832
833
834
835
836         /***************************************************************
837          *      TLan_Init
838          *
839          *      Returns:
840          *              0 on success, error code otherwise.
841          *      Parms:
842          *              dev     The structure of the device to be
843          *                      init'ed.
844          *
845          *      This function completes the initialization of the
846          *      device structure and driver.  It reserves the IO
847          *      addresses, allocates memory for the lists and bounce
848          *      buffers, retrieves the MAC address from the eeprom
849          *      and assignes the device's methods.
850          *
851          **************************************************************/
852
853 static int TLan_Init( struct net_device *dev )
854 {
855         int             dma_size;
856         int             err;
857         int             i;
858         TLanPrivateInfo *priv;
859
860         priv = netdev_priv(dev);
861
862         if ( bbuf ) {
863                 dma_size = ( TLAN_NUM_RX_LISTS + TLAN_NUM_TX_LISTS )
864                    * ( sizeof(TLanList) + TLAN_MAX_FRAME_SIZE );
865         } else {
866                 dma_size = ( TLAN_NUM_RX_LISTS + TLAN_NUM_TX_LISTS )
867                    * ( sizeof(TLanList) );
868         }
869         priv->dmaStorage = pci_alloc_consistent(priv->pciDev,
870                                                 dma_size, &priv->dmaStorageDMA);
871         priv->dmaSize = dma_size;
872
873         if ( priv->dmaStorage == NULL ) {
874                 printk(KERN_ERR "TLAN:  Could not allocate lists and buffers for %s.\n",
875                         dev->name );
876                 return -ENOMEM;
877         }
878         memset( priv->dmaStorage, 0, dma_size );
879         priv->rxList = (TLanList *) ALIGN((unsigned long)priv->dmaStorage, 8);
880         priv->rxListDMA = ALIGN(priv->dmaStorageDMA, 8);
881         priv->txList = priv->rxList + TLAN_NUM_RX_LISTS;
882         priv->txListDMA = priv->rxListDMA + sizeof(TLanList) * TLAN_NUM_RX_LISTS;
883
884         if ( bbuf ) {
885                 priv->rxBuffer = (u8 *) ( priv->txList + TLAN_NUM_TX_LISTS );
886                 priv->rxBufferDMA =priv->txListDMA
887                         + sizeof(TLanList) * TLAN_NUM_TX_LISTS;
888                 priv->txBuffer = priv->rxBuffer
889                         + ( TLAN_NUM_RX_LISTS * TLAN_MAX_FRAME_SIZE );
890                 priv->txBufferDMA = priv->rxBufferDMA
891                         + ( TLAN_NUM_RX_LISTS * TLAN_MAX_FRAME_SIZE );
892         }
893
894         err = 0;
895         for ( i = 0;  i < 6 ; i++ )
896                 err |= TLan_EeReadByte( dev,
897                                         (u8) priv->adapter->addrOfs + i,
898                                         (u8 *) &dev->dev_addr[i] );
899         if ( err ) {
900                 printk(KERN_ERR "TLAN: %s: Error reading MAC from eeprom: %d\n",
901                         dev->name,
902                         err );
903         }
904         dev->addr_len = 6;
905
906         netif_carrier_off(dev);
907
908         /* Device methods */
909         dev->open = &TLan_Open;
910         dev->hard_start_xmit = &TLan_StartTx;
911         dev->stop = &TLan_Close;
912         dev->get_stats = &TLan_GetStats;
913         dev->set_multicast_list = &TLan_SetMulticastList;
914         dev->do_ioctl = &TLan_ioctl;
915 #ifdef CONFIG_NET_POLL_CONTROLLER
916         dev->poll_controller = &TLan_Poll;
917 #endif
918         dev->tx_timeout = &TLan_tx_timeout;
919         dev->watchdog_timeo = TX_TIMEOUT;
920
921         return 0;
922
923 } /* TLan_Init */
924
925
926
927
928         /***************************************************************
929          *      TLan_Open
930          *
931          *      Returns:
932          *              0 on success, error code otherwise.
933          *      Parms:
934          *              dev     Structure of device to be opened.
935          *
936          *      This routine puts the driver and TLAN adapter in a
937          *      state where it is ready to send and receive packets.
938          *      It allocates the IRQ, resets and brings the adapter
939          *      out of reset, and allows interrupts.  It also delays
940          *      the startup for autonegotiation or sends a Rx GO
941          *      command to the adapter, as appropriate.
942          *
943          **************************************************************/
944
945 static int TLan_Open( struct net_device *dev )
946 {
947         TLanPrivateInfo *priv = netdev_priv(dev);
948         int             err;
949
950         priv->tlanRev = TLan_DioRead8( dev->base_addr, TLAN_DEF_REVISION );
951         err = request_irq( dev->irq, TLan_HandleInterrupt, IRQF_SHARED,
952                            dev->name, dev );
953
954         if ( err ) {
955                 pr_err("TLAN:  Cannot open %s because IRQ %d is already in use.\n",
956                        dev->name, dev->irq );
957                 return err;
958         }
959
960         init_timer(&priv->timer);
961         netif_start_queue(dev);
962
963         /* NOTE: It might not be necessary to read the stats before a
964                          reset if you don't care what the values are.
965         */
966         TLan_ResetLists( dev );
967         TLan_ReadAndClearStats( dev, TLAN_IGNORE );
968         TLan_ResetAdapter( dev );
969
970         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Opened.  TLAN Chip Rev: %x\n",
971                   dev->name, priv->tlanRev );
972
973         return 0;
974
975 } /* TLan_Open */
976
977
978
979         /**************************************************************
980          *      TLan_ioctl
981          *
982          *      Returns:
983          *              0 on success, error code otherwise
984          *      Params:
985          *              dev     structure of device to receive ioctl.
986          *
987          *              rq      ifreq structure to hold userspace data.
988          *
989          *              cmd     ioctl command.
990          *
991          *
992          *************************************************************/
993
994 static int TLan_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
995 {
996         TLanPrivateInfo *priv = netdev_priv(dev);
997         struct mii_ioctl_data *data = if_mii(rq);
998         u32 phy   = priv->phy[priv->phyNum];
999
1000         if (!priv->phyOnline)
1001                 return -EAGAIN;
1002
1003         switch(cmd) {
1004         case SIOCGMIIPHY:               /* Get address of MII PHY in use. */
1005                         data->phy_id = phy;
1006
1007
1008         case SIOCGMIIREG:               /* Read MII PHY register. */
1009                         TLan_MiiReadReg(dev, data->phy_id & 0x1f,
1010                                         data->reg_num & 0x1f, &data->val_out);
1011                         return 0;
1012
1013
1014         case SIOCSMIIREG:               /* Write MII PHY register. */
1015                         if (!capable(CAP_NET_ADMIN))
1016                                 return -EPERM;
1017                         TLan_MiiWriteReg(dev, data->phy_id & 0x1f,
1018                                          data->reg_num & 0x1f, data->val_in);
1019                         return 0;
1020                 default:
1021                         return -EOPNOTSUPP;
1022         }
1023 } /* tlan_ioctl */
1024
1025
1026         /***************************************************************
1027          *      TLan_tx_timeout
1028          *
1029          *      Returns: nothing
1030          *
1031          *      Params:
1032          *              dev     structure of device which timed out
1033          *                      during transmit.
1034          *
1035          **************************************************************/
1036
1037 static void TLan_tx_timeout(struct net_device *dev)
1038 {
1039
1040         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Transmit timed out.\n", dev->name);
1041
1042         /* Ok so we timed out, lets see what we can do about it...*/
1043         TLan_FreeLists( dev );
1044         TLan_ResetLists( dev );
1045         TLan_ReadAndClearStats( dev, TLAN_IGNORE );
1046         TLan_ResetAdapter( dev );
1047         dev->trans_start = jiffies;
1048         netif_wake_queue( dev );
1049
1050 }
1051
1052
1053         /***************************************************************
1054          *      TLan_tx_timeout_work
1055          *
1056          *      Returns: nothing
1057          *
1058          *      Params:
1059          *              work    work item of device which timed out
1060          *
1061          **************************************************************/
1062
1063 static void TLan_tx_timeout_work(struct work_struct *work)
1064 {
1065         TLanPrivateInfo *priv =
1066                 container_of(work, TLanPrivateInfo, tlan_tqueue);
1067
1068         TLan_tx_timeout(priv->dev);
1069 }
1070
1071
1072
1073         /***************************************************************
1074          *      TLan_StartTx
1075          *
1076          *      Returns:
1077          *              0 on success, non-zero on failure.
1078          *      Parms:
1079          *              skb     A pointer to the sk_buff containing the
1080          *                      frame to be sent.
1081          *              dev     The device to send the data on.
1082          *
1083          *      This function adds a frame to the Tx list to be sent
1084          *      ASAP.  First it verifies that the adapter is ready and
1085          *      there is room in the queue.  Then it sets up the next
1086          *      available list, copies the frame to the corresponding
1087          *      buffer.  If the adapter Tx channel is idle, it gives
1088          *      the adapter a Tx Go command on the list, otherwise it
1089          *      sets the forward address of the previous list to point
1090          *      to this one.  Then it frees the sk_buff.
1091          *
1092          **************************************************************/
1093
1094 static int TLan_StartTx( struct sk_buff *skb, struct net_device *dev )
1095 {
1096         TLanPrivateInfo *priv = netdev_priv(dev);
1097         TLanList        *tail_list;
1098         dma_addr_t      tail_list_phys;
1099         u8              *tail_buffer;
1100         unsigned long   flags;
1101         unsigned int    txlen;
1102
1103         if ( ! priv->phyOnline ) {
1104                 TLAN_DBG( TLAN_DEBUG_TX, "TRANSMIT:  %s PHY is not ready\n",
1105                           dev->name );
1106                 dev_kfree_skb_any(skb);
1107                 return 0;
1108         }
1109
1110         if (skb_padto(skb, TLAN_MIN_FRAME_SIZE))
1111                 return 0;
1112         txlen = max(skb->len, (unsigned int)TLAN_MIN_FRAME_SIZE);
1113
1114         tail_list = priv->txList + priv->txTail;
1115         tail_list_phys = priv->txListDMA + sizeof(TLanList) * priv->txTail;
1116
1117         if ( tail_list->cStat != TLAN_CSTAT_UNUSED ) {
1118                 TLAN_DBG( TLAN_DEBUG_TX,
1119                           "TRANSMIT:  %s is busy (Head=%d Tail=%d)\n",
1120                           dev->name, priv->txHead, priv->txTail );
1121                 netif_stop_queue(dev);
1122                 priv->txBusyCount++;
1123                 return 1;
1124         }
1125
1126         tail_list->forward = 0;
1127
1128         if ( bbuf ) {
1129                 tail_buffer = priv->txBuffer + ( priv->txTail * TLAN_MAX_FRAME_SIZE );
1130                 skb_copy_from_linear_data(skb, tail_buffer, txlen);
1131         } else {
1132                 tail_list->buffer[0].address = pci_map_single(priv->pciDev,
1133                                                               skb->data, txlen,
1134                                                               PCI_DMA_TODEVICE);
1135                 TLan_StoreSKB(tail_list, skb);
1136         }
1137
1138         tail_list->frameSize = (u16) txlen;
1139         tail_list->buffer[0].count = TLAN_LAST_BUFFER | (u32) txlen;
1140         tail_list->buffer[1].count = 0;
1141         tail_list->buffer[1].address = 0;
1142
1143         spin_lock_irqsave(&priv->lock, flags);
1144         tail_list->cStat = TLAN_CSTAT_READY;
1145         if ( ! priv->txInProgress ) {
1146                 priv->txInProgress = 1;
1147                 TLAN_DBG( TLAN_DEBUG_TX,
1148                           "TRANSMIT:  Starting TX on buffer %d\n", priv->txTail );
1149                 outl( tail_list_phys, dev->base_addr + TLAN_CH_PARM );
1150                 outl( TLAN_HC_GO, dev->base_addr + TLAN_HOST_CMD );
1151         } else {
1152                 TLAN_DBG( TLAN_DEBUG_TX, "TRANSMIT:  Adding buffer %d to TX channel\n",
1153                           priv->txTail );
1154                 if ( priv->txTail == 0 ) {
1155                         ( priv->txList + ( TLAN_NUM_TX_LISTS - 1 ) )->forward
1156                                 = tail_list_phys;
1157                 } else {
1158                         ( priv->txList + ( priv->txTail - 1 ) )->forward
1159                                 = tail_list_phys;
1160                 }
1161         }
1162         spin_unlock_irqrestore(&priv->lock, flags);
1163
1164         CIRC_INC( priv->txTail, TLAN_NUM_TX_LISTS );
1165
1166         if ( bbuf )
1167                 dev_kfree_skb_any(skb);
1168
1169         dev->trans_start = jiffies;
1170         return 0;
1171
1172 } /* TLan_StartTx */
1173
1174
1175
1176
1177         /***************************************************************
1178          *      TLan_HandleInterrupt
1179          *
1180          *      Returns:
1181          *              Nothing
1182          *      Parms:
1183          *              irq     The line on which the interrupt
1184          *                      occurred.
1185          *              dev_id  A pointer to the device assigned to
1186          *                      this irq line.
1187          *
1188          *      This function handles an interrupt generated by its
1189          *      assigned TLAN adapter.  The function deactivates
1190          *      interrupts on its adapter, records the type of
1191          *      interrupt, executes the appropriate subhandler, and
1192          *      acknowdges the interrupt to the adapter (thus
1193          *      re-enabling adapter interrupts.
1194          *
1195          **************************************************************/
1196
1197 static irqreturn_t TLan_HandleInterrupt(int irq, void *dev_id)
1198 {
1199         struct net_device       *dev = dev_id;
1200         TLanPrivateInfo *priv = netdev_priv(dev);
1201         u16             host_int;
1202         u16             type;
1203
1204         spin_lock(&priv->lock);
1205
1206         host_int = inw( dev->base_addr + TLAN_HOST_INT );
1207         type = ( host_int & TLAN_HI_IT_MASK ) >> 2;
1208         if ( type ) {
1209                 u32     ack;
1210                 u32     host_cmd;
1211
1212                 outw( host_int, dev->base_addr + TLAN_HOST_INT );
1213                 ack = TLanIntVector[type]( dev, host_int );
1214
1215                 if ( ack ) {
1216                         host_cmd = TLAN_HC_ACK | ack | ( type << 18 );
1217                         outl( host_cmd, dev->base_addr + TLAN_HOST_CMD );
1218                 }
1219         }
1220
1221         spin_unlock(&priv->lock);
1222
1223         return IRQ_RETVAL(type);
1224 } /* TLan_HandleInterrupts */
1225
1226
1227
1228
1229         /***************************************************************
1230          *      TLan_Close
1231          *
1232          *      Returns:
1233          *              An error code.
1234          *      Parms:
1235          *              dev     The device structure of the device to
1236          *                      close.
1237          *
1238          *      This function shuts down the adapter.  It records any
1239          *      stats, puts the adapter into reset state, deactivates
1240          *      its time as needed, and frees the irq it is using.
1241          *
1242          **************************************************************/
1243
1244 static int TLan_Close(struct net_device *dev)
1245 {
1246         TLanPrivateInfo *priv = netdev_priv(dev);
1247
1248         netif_stop_queue(dev);
1249         priv->neg_be_verbose = 0;
1250
1251         TLan_ReadAndClearStats( dev, TLAN_RECORD );
1252         outl( TLAN_HC_AD_RST, dev->base_addr + TLAN_HOST_CMD );
1253         if ( priv->timer.function != NULL ) {
1254                 del_timer_sync( &priv->timer );
1255                 priv->timer.function = NULL;
1256         }
1257
1258         free_irq( dev->irq, dev );
1259         TLan_FreeLists( dev );
1260         TLAN_DBG( TLAN_DEBUG_GNRL, "Device %s closed.\n", dev->name );
1261
1262         return 0;
1263
1264 } /* TLan_Close */
1265
1266
1267
1268
1269         /***************************************************************
1270          *      TLan_GetStats
1271          *
1272          *      Returns:
1273          *              A pointer to the device's statistics structure.
1274          *      Parms:
1275          *              dev     The device structure to return the
1276          *                      stats for.
1277          *
1278          *      This function updates the devices statistics by reading
1279          *      the TLAN chip's onboard registers.  Then it returns the
1280          *      address of the statistics structure.
1281          *
1282          **************************************************************/
1283
1284 static struct net_device_stats *TLan_GetStats( struct net_device *dev )
1285 {
1286         TLanPrivateInfo *priv = netdev_priv(dev);
1287         int i;
1288
1289         /* Should only read stats if open ? */
1290         TLan_ReadAndClearStats( dev, TLAN_RECORD );
1291
1292         TLAN_DBG( TLAN_DEBUG_RX, "RECEIVE:  %s EOC count = %d\n", dev->name,
1293                   priv->rxEocCount );
1294         TLAN_DBG( TLAN_DEBUG_TX, "TRANSMIT:  %s Busy count = %d\n", dev->name,
1295                   priv->txBusyCount );
1296         if ( debug & TLAN_DEBUG_GNRL ) {
1297                 TLan_PrintDio( dev->base_addr );
1298                 TLan_PhyPrint( dev );
1299         }
1300         if ( debug & TLAN_DEBUG_LIST ) {
1301                 for ( i = 0; i < TLAN_NUM_RX_LISTS; i++ )
1302                         TLan_PrintList( priv->rxList + i, "RX", i );
1303                 for ( i = 0; i < TLAN_NUM_TX_LISTS; i++ )
1304                         TLan_PrintList( priv->txList + i, "TX", i );
1305         }
1306
1307         return &dev->stats;
1308
1309 } /* TLan_GetStats */
1310
1311
1312
1313
1314         /***************************************************************
1315          *      TLan_SetMulticastList
1316          *
1317          *      Returns:
1318          *              Nothing
1319          *      Parms:
1320          *              dev     The device structure to set the
1321          *                      multicast list for.
1322          *
1323          *      This function sets the TLAN adaptor to various receive
1324          *      modes.  If the IFF_PROMISC flag is set, promiscuous
1325          *      mode is acitviated.  Otherwise, promiscuous mode is
1326          *      turned off.  If the IFF_ALLMULTI flag is set, then
1327          *      the hash table is set to receive all group addresses.
1328          *      Otherwise, the first three multicast addresses are
1329          *      stored in AREG_1-3, and the rest are selected via the
1330          *      hash table, as necessary.
1331          *
1332          **************************************************************/
1333
1334 static void TLan_SetMulticastList( struct net_device *dev )
1335 {
1336         struct dev_mc_list      *dmi = dev->mc_list;
1337         u32                     hash1 = 0;
1338         u32                     hash2 = 0;
1339         int                     i;
1340         u32                     offset;
1341         u8                      tmp;
1342
1343         if ( dev->flags & IFF_PROMISC ) {
1344                 tmp = TLan_DioRead8( dev->base_addr, TLAN_NET_CMD );
1345                 TLan_DioWrite8( dev->base_addr,
1346                                 TLAN_NET_CMD, tmp | TLAN_NET_CMD_CAF );
1347         } else {
1348                 tmp = TLan_DioRead8( dev->base_addr, TLAN_NET_CMD );
1349                 TLan_DioWrite8( dev->base_addr,
1350                                 TLAN_NET_CMD, tmp & ~TLAN_NET_CMD_CAF );
1351                 if ( dev->flags & IFF_ALLMULTI ) {
1352                         for ( i = 0; i < 3; i++ )
1353                                 TLan_SetMac( dev, i + 1, NULL );
1354                         TLan_DioWrite32( dev->base_addr, TLAN_HASH_1, 0xFFFFFFFF );
1355                         TLan_DioWrite32( dev->base_addr, TLAN_HASH_2, 0xFFFFFFFF );
1356                 } else {
1357                         for ( i = 0; i < dev->mc_count; i++ ) {
1358                                 if ( i < 3 ) {
1359                                         TLan_SetMac( dev, i + 1,
1360                                                      (char *) &dmi->dmi_addr );
1361                                 } else {
1362                                         offset = TLan_HashFunc( (u8 *) &dmi->dmi_addr );
1363                                         if ( offset < 32 )
1364                                                 hash1 |= ( 1 << offset );
1365                                         else
1366                                                 hash2 |= ( 1 << ( offset - 32 ) );
1367                                 }
1368                                 dmi = dmi->next;
1369                         }
1370                         for ( ; i < 3; i++ )
1371                                 TLan_SetMac( dev, i + 1, NULL );
1372                         TLan_DioWrite32( dev->base_addr, TLAN_HASH_1, hash1 );
1373                         TLan_DioWrite32( dev->base_addr, TLAN_HASH_2, hash2 );
1374                 }
1375         }
1376
1377 } /* TLan_SetMulticastList */
1378
1379
1380
1381 /*****************************************************************************
1382 ******************************************************************************
1383
1384         ThunderLAN Driver Interrupt Vectors and Table
1385
1386         Please see Chap. 4, "Interrupt Handling" of the "ThunderLAN
1387         Programmer's Guide" for more informations on handling interrupts
1388         generated by TLAN based adapters.
1389
1390 ******************************************************************************
1391 *****************************************************************************/
1392
1393
1394
1395
1396         /***************************************************************
1397          *      TLan_HandleTxEOF
1398          *
1399          *      Returns:
1400          *              1
1401          *      Parms:
1402          *              dev             Device assigned the IRQ that was
1403          *                              raised.
1404          *              host_int        The contents of the HOST_INT
1405          *                              port.
1406          *
1407          *      This function handles Tx EOF interrupts which are raised
1408          *      by the adapter when it has completed sending the
1409          *      contents of a buffer.  If detemines which list/buffer
1410          *      was completed and resets it.  If the buffer was the last
1411          *      in the channel (EOC), then the function checks to see if
1412          *      another buffer is ready to send, and if so, sends a Tx
1413          *      Go command.  Finally, the driver activates/continues the
1414          *      activity LED.
1415          *
1416          **************************************************************/
1417
1418 static u32 TLan_HandleTxEOF( struct net_device *dev, u16 host_int )
1419 {
1420         TLanPrivateInfo *priv = netdev_priv(dev);
1421         int             eoc = 0;
1422         TLanList        *head_list;
1423         dma_addr_t      head_list_phys;
1424         u32             ack = 0;
1425         u16             tmpCStat;
1426
1427         TLAN_DBG( TLAN_DEBUG_TX, "TRANSMIT:  Handling TX EOF (Head=%d Tail=%d)\n",
1428                   priv->txHead, priv->txTail );
1429         head_list = priv->txList + priv->txHead;
1430
1431         while (((tmpCStat = head_list->cStat ) & TLAN_CSTAT_FRM_CMP) && (ack < 255)) {
1432                 ack++;
1433                 if ( ! bbuf ) {
1434                         struct sk_buff *skb = TLan_GetSKB(head_list);
1435                         pci_unmap_single(priv->pciDev, head_list->buffer[0].address,
1436                                          max(skb->len,
1437                                              (unsigned int)TLAN_MIN_FRAME_SIZE),
1438                                          PCI_DMA_TODEVICE);
1439                         dev_kfree_skb_any(skb);
1440                         head_list->buffer[8].address = 0;
1441                         head_list->buffer[9].address = 0;
1442                 }
1443
1444                 if ( tmpCStat & TLAN_CSTAT_EOC )
1445                         eoc = 1;
1446
1447                 dev->stats.tx_bytes += head_list->frameSize;
1448
1449                 head_list->cStat = TLAN_CSTAT_UNUSED;
1450                 netif_start_queue(dev);
1451                 CIRC_INC( priv->txHead, TLAN_NUM_TX_LISTS );
1452                 head_list = priv->txList + priv->txHead;
1453         }
1454
1455         if (!ack)
1456                 printk(KERN_INFO "TLAN: Received interrupt for uncompleted TX frame.\n");
1457
1458         if ( eoc ) {
1459                 TLAN_DBG( TLAN_DEBUG_TX,
1460                           "TRANSMIT:  Handling TX EOC (Head=%d Tail=%d)\n",
1461                           priv->txHead, priv->txTail );
1462                 head_list = priv->txList + priv->txHead;
1463                 head_list_phys = priv->txListDMA + sizeof(TLanList) * priv->txHead;
1464                 if ( ( head_list->cStat & TLAN_CSTAT_READY ) == TLAN_CSTAT_READY ) {
1465                         outl(head_list_phys, dev->base_addr + TLAN_CH_PARM );
1466                         ack |= TLAN_HC_GO;
1467                 } else {
1468                         priv->txInProgress = 0;
1469                 }
1470         }
1471
1472         if ( priv->adapter->flags & TLAN_ADAPTER_ACTIVITY_LED ) {
1473                 TLan_DioWrite8( dev->base_addr,
1474                                 TLAN_LED_REG, TLAN_LED_LINK | TLAN_LED_ACT );
1475                 if ( priv->timer.function == NULL ) {
1476                          priv->timer.function = &TLan_Timer;
1477                          priv->timer.data = (unsigned long) dev;
1478                          priv->timer.expires = jiffies + TLAN_TIMER_ACT_DELAY;
1479                          priv->timerSetAt = jiffies;
1480                          priv->timerType = TLAN_TIMER_ACTIVITY;
1481                          add_timer(&priv->timer);
1482                 } else if ( priv->timerType == TLAN_TIMER_ACTIVITY ) {
1483                         priv->timerSetAt = jiffies;
1484                 }
1485         }
1486
1487         return ack;
1488
1489 } /* TLan_HandleTxEOF */
1490
1491
1492
1493
1494         /***************************************************************
1495          *      TLan_HandleStatOverflow
1496          *
1497          *      Returns:
1498          *              1
1499          *      Parms:
1500          *              dev             Device assigned the IRQ that was
1501          *                              raised.
1502          *              host_int        The contents of the HOST_INT
1503          *                              port.
1504          *
1505          *      This function handles the Statistics Overflow interrupt
1506          *      which means that one or more of the TLAN statistics
1507          *      registers has reached 1/2 capacity and needs to be read.
1508          *
1509          **************************************************************/
1510
1511 static u32 TLan_HandleStatOverflow( struct net_device *dev, u16 host_int )
1512 {
1513         TLan_ReadAndClearStats( dev, TLAN_RECORD );
1514
1515         return 1;
1516
1517 } /* TLan_HandleStatOverflow */
1518
1519
1520
1521
1522         /***************************************************************
1523          *      TLan_HandleRxEOF
1524          *
1525          *      Returns:
1526          *              1
1527          *      Parms:
1528          *              dev             Device assigned the IRQ that was
1529          *                              raised.
1530          *              host_int        The contents of the HOST_INT
1531          *                              port.
1532          *
1533          *      This function handles the Rx EOF interrupt which
1534          *      indicates a frame has been received by the adapter from
1535          *      the net and the frame has been transferred to memory.
1536          *      The function determines the bounce buffer the frame has
1537          *      been loaded into, creates a new sk_buff big enough to
1538          *      hold the frame, and sends it to protocol stack.  It
1539          *      then resets the used buffer and appends it to the end
1540          *      of the list.  If the frame was the last in the Rx
1541          *      channel (EOC), the function restarts the receive channel
1542          *      by sending an Rx Go command to the adapter.  Then it
1543          *      activates/continues the activity LED.
1544          *
1545          **************************************************************/
1546
1547 static u32 TLan_HandleRxEOF( struct net_device *dev, u16 host_int )
1548 {
1549         TLanPrivateInfo *priv = netdev_priv(dev);
1550         u32             ack = 0;
1551         int             eoc = 0;
1552         u8              *head_buffer;
1553         TLanList        *head_list;
1554         struct sk_buff  *skb;
1555         TLanList        *tail_list;
1556         u16             tmpCStat;
1557         dma_addr_t      head_list_phys;
1558
1559         TLAN_DBG( TLAN_DEBUG_RX, "RECEIVE:  Handling RX EOF (Head=%d Tail=%d)\n",
1560                   priv->rxHead, priv->rxTail );
1561         head_list = priv->rxList + priv->rxHead;
1562         head_list_phys = priv->rxListDMA + sizeof(TLanList) * priv->rxHead;
1563
1564         while (((tmpCStat = head_list->cStat) & TLAN_CSTAT_FRM_CMP) && (ack < 255)) {
1565                 dma_addr_t frameDma = head_list->buffer[0].address;
1566                 u32 frameSize = head_list->frameSize;
1567                 ack++;
1568                 if (tmpCStat & TLAN_CSTAT_EOC)
1569                         eoc = 1;
1570
1571                 if (bbuf) {
1572                         skb = netdev_alloc_skb(dev, frameSize + 7);
1573                         if ( !skb )
1574                                 goto drop_and_reuse;
1575
1576                         head_buffer = priv->rxBuffer
1577                                 + (priv->rxHead * TLAN_MAX_FRAME_SIZE);
1578                         skb_reserve(skb, 2);
1579                         pci_dma_sync_single_for_cpu(priv->pciDev,
1580                                                     frameDma, frameSize,
1581                                                     PCI_DMA_FROMDEVICE);
1582                         skb_copy_from_linear_data(skb, head_buffer, frameSize);
1583                         skb_put(skb, frameSize);
1584                         dev->stats.rx_bytes += frameSize;
1585
1586                         skb->protocol = eth_type_trans( skb, dev );
1587                         netif_rx( skb );
1588                 } else {
1589                         struct sk_buff *new_skb;
1590
1591                         new_skb = netdev_alloc_skb(dev, TLAN_MAX_FRAME_SIZE + 7 );
1592                         if ( !new_skb )
1593                                 goto drop_and_reuse;
1594
1595                         skb = TLan_GetSKB(head_list);
1596                         pci_unmap_single(priv->pciDev, frameDma,
1597                                          TLAN_MAX_FRAME_SIZE, PCI_DMA_FROMDEVICE);
1598                         skb_put( skb, frameSize );
1599
1600                         dev->stats.rx_bytes += frameSize;
1601
1602                         skb->protocol = eth_type_trans( skb, dev );
1603                         netif_rx( skb );
1604
1605                         skb_reserve( new_skb, NET_IP_ALIGN );
1606                         head_list->buffer[0].address = pci_map_single(priv->pciDev,
1607                                                                       new_skb->data,
1608                                                                       TLAN_MAX_FRAME_SIZE,
1609                                                                       PCI_DMA_FROMDEVICE);
1610
1611                         TLan_StoreSKB(head_list, new_skb);
1612
1613                 }
1614 drop_and_reuse:
1615                 head_list->forward = 0;
1616                 head_list->cStat = 0;
1617                 tail_list = priv->rxList + priv->rxTail;
1618                 tail_list->forward = head_list_phys;
1619
1620                 CIRC_INC( priv->rxHead, TLAN_NUM_RX_LISTS );
1621                 CIRC_INC( priv->rxTail, TLAN_NUM_RX_LISTS );
1622                 head_list = priv->rxList + priv->rxHead;
1623                 head_list_phys = priv->rxListDMA + sizeof(TLanList) * priv->rxHead;
1624         }
1625
1626         if (!ack)
1627                 printk(KERN_INFO "TLAN: Received interrupt for uncompleted RX frame.\n");
1628
1629
1630         if ( eoc ) {
1631                 TLAN_DBG( TLAN_DEBUG_RX,
1632                           "RECEIVE:  Handling RX EOC (Head=%d Tail=%d)\n",
1633                           priv->rxHead, priv->rxTail );
1634                 head_list = priv->rxList + priv->rxHead;
1635                 head_list_phys = priv->rxListDMA + sizeof(TLanList) * priv->rxHead;
1636                 outl(head_list_phys, dev->base_addr + TLAN_CH_PARM );
1637                 ack |= TLAN_HC_GO | TLAN_HC_RT;
1638                 priv->rxEocCount++;
1639         }
1640
1641         if ( priv->adapter->flags & TLAN_ADAPTER_ACTIVITY_LED ) {
1642                 TLan_DioWrite8( dev->base_addr,
1643                                 TLAN_LED_REG, TLAN_LED_LINK | TLAN_LED_ACT );
1644                 if ( priv->timer.function == NULL )  {
1645                         priv->timer.function = &TLan_Timer;
1646                         priv->timer.data = (unsigned long) dev;
1647                         priv->timer.expires = jiffies + TLAN_TIMER_ACT_DELAY;
1648                         priv->timerSetAt = jiffies;
1649                         priv->timerType = TLAN_TIMER_ACTIVITY;
1650                         add_timer(&priv->timer);
1651                 } else if ( priv->timerType == TLAN_TIMER_ACTIVITY ) {
1652                         priv->timerSetAt = jiffies;
1653                 }
1654         }
1655
1656         dev->last_rx = jiffies;
1657
1658         return ack;
1659
1660 } /* TLan_HandleRxEOF */
1661
1662
1663
1664
1665         /***************************************************************
1666          *      TLan_HandleDummy
1667          *
1668          *      Returns:
1669          *              1
1670          *      Parms:
1671          *              dev             Device assigned the IRQ that was
1672          *                              raised.
1673          *              host_int        The contents of the HOST_INT
1674          *                              port.
1675          *
1676          *      This function handles the Dummy interrupt, which is
1677          *      raised whenever a test interrupt is generated by setting
1678          *      the Req_Int bit of HOST_CMD to 1.
1679          *
1680          **************************************************************/
1681
1682 static u32 TLan_HandleDummy( struct net_device *dev, u16 host_int )
1683 {
1684         printk( "TLAN:  Test interrupt on %s.\n", dev->name );
1685         return 1;
1686
1687 } /* TLan_HandleDummy */
1688
1689
1690
1691
1692         /***************************************************************
1693          *      TLan_HandleTxEOC
1694          *
1695          *      Returns:
1696          *              1
1697          *      Parms:
1698          *              dev             Device assigned the IRQ that was
1699          *                              raised.
1700          *              host_int        The contents of the HOST_INT
1701          *                              port.
1702          *
1703          *      This driver is structured to determine EOC occurrences by
1704          *      reading the CSTAT member of the list structure.  Tx EOC
1705          *      interrupts are disabled via the DIO INTDIS register.
1706          *      However, TLAN chips before revision 3.0 didn't have this
1707          *      functionality, so process EOC events if this is the
1708          *      case.
1709          *
1710          **************************************************************/
1711
1712 static u32 TLan_HandleTxEOC( struct net_device *dev, u16 host_int )
1713 {
1714         TLanPrivateInfo *priv = netdev_priv(dev);
1715         TLanList                *head_list;
1716         dma_addr_t              head_list_phys;
1717         u32                     ack = 1;
1718
1719         host_int = 0;
1720         if ( priv->tlanRev < 0x30 ) {
1721                 TLAN_DBG( TLAN_DEBUG_TX,
1722                           "TRANSMIT:  Handling TX EOC (Head=%d Tail=%d) -- IRQ\n",
1723                           priv->txHead, priv->txTail );
1724                 head_list = priv->txList + priv->txHead;
1725                 head_list_phys = priv->txListDMA + sizeof(TLanList) * priv->txHead;
1726                 if ( ( head_list->cStat & TLAN_CSTAT_READY ) == TLAN_CSTAT_READY ) {
1727                         netif_stop_queue(dev);
1728                         outl( head_list_phys, dev->base_addr + TLAN_CH_PARM );
1729                         ack |= TLAN_HC_GO;
1730                 } else {
1731                         priv->txInProgress = 0;
1732                 }
1733         }
1734
1735         return ack;
1736
1737 } /* TLan_HandleTxEOC */
1738
1739
1740
1741
1742         /***************************************************************
1743          *      TLan_HandleStatusCheck
1744          *
1745          *      Returns:
1746          *              0 if Adapter check, 1 if Network Status check.
1747          *      Parms:
1748          *              dev             Device assigned the IRQ that was
1749          *                              raised.
1750          *              host_int        The contents of the HOST_INT
1751          *                              port.
1752          *
1753          *      This function handles Adapter Check/Network Status
1754          *      interrupts generated by the adapter.  It checks the
1755          *      vector in the HOST_INT register to determine if it is
1756          *      an Adapter Check interrupt.  If so, it resets the
1757          *      adapter.  Otherwise it clears the status registers
1758          *      and services the PHY.
1759          *
1760          **************************************************************/
1761
1762 static u32 TLan_HandleStatusCheck( struct net_device *dev, u16 host_int )
1763 {
1764         TLanPrivateInfo *priv = netdev_priv(dev);
1765         u32             ack;
1766         u32             error;
1767         u8              net_sts;
1768         u32             phy;
1769         u16             tlphy_ctl;
1770         u16             tlphy_sts;
1771
1772         ack = 1;
1773         if ( host_int & TLAN_HI_IV_MASK ) {
1774                 netif_stop_queue( dev );
1775                 error = inl( dev->base_addr + TLAN_CH_PARM );
1776                 printk( "TLAN:  %s: Adaptor Error = 0x%x\n", dev->name, error );
1777                 TLan_ReadAndClearStats( dev, TLAN_RECORD );
1778                 outl( TLAN_HC_AD_RST, dev->base_addr + TLAN_HOST_CMD );
1779
1780                 schedule_work(&priv->tlan_tqueue);
1781
1782                 netif_wake_queue(dev);
1783                 ack = 0;
1784         } else {
1785                 TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Status Check\n", dev->name );
1786                 phy = priv->phy[priv->phyNum];
1787
1788                 net_sts = TLan_DioRead8( dev->base_addr, TLAN_NET_STS );
1789                 if ( net_sts ) {
1790                         TLan_DioWrite8( dev->base_addr, TLAN_NET_STS, net_sts );
1791                         TLAN_DBG( TLAN_DEBUG_GNRL, "%s:    Net_Sts = %x\n",
1792                                   dev->name, (unsigned) net_sts );
1793                 }
1794                 if ( ( net_sts & TLAN_NET_STS_MIRQ ) &&  ( priv->phyNum == 0 ) ) {
1795                         TLan_MiiReadReg( dev, phy, TLAN_TLPHY_STS, &tlphy_sts );
1796                         TLan_MiiReadReg( dev, phy, TLAN_TLPHY_CTL, &tlphy_ctl );
1797                         if ( ! ( tlphy_sts & TLAN_TS_POLOK ) &&
1798                              ! ( tlphy_ctl & TLAN_TC_SWAPOL ) ) {
1799                                 tlphy_ctl |= TLAN_TC_SWAPOL;
1800                                 TLan_MiiWriteReg( dev, phy, TLAN_TLPHY_CTL, tlphy_ctl);
1801                         } else if ( ( tlphy_sts & TLAN_TS_POLOK )
1802                                     && ( tlphy_ctl & TLAN_TC_SWAPOL ) ) {
1803                                 tlphy_ctl &= ~TLAN_TC_SWAPOL;
1804                                 TLan_MiiWriteReg( dev, phy, TLAN_TLPHY_CTL, tlphy_ctl);
1805                         }
1806
1807                         if (debug) {
1808                                 TLan_PhyPrint( dev );
1809                         }
1810                 }
1811         }
1812
1813         return ack;
1814
1815 } /* TLan_HandleStatusCheck */
1816
1817
1818
1819
1820         /***************************************************************
1821          *      TLan_HandleRxEOC
1822          *
1823          *      Returns:
1824          *              1
1825          *      Parms:
1826          *              dev             Device assigned the IRQ that was
1827          *                              raised.
1828          *              host_int        The contents of the HOST_INT
1829          *                              port.
1830          *
1831          *      This driver is structured to determine EOC occurrences by
1832          *      reading the CSTAT member of the list structure.  Rx EOC
1833          *      interrupts are disabled via the DIO INTDIS register.
1834          *      However, TLAN chips before revision 3.0 didn't have this
1835          *      CSTAT member or a INTDIS register, so if this chip is
1836          *      pre-3.0, process EOC interrupts normally.
1837          *
1838          **************************************************************/
1839
1840 static u32 TLan_HandleRxEOC( struct net_device *dev, u16 host_int )
1841 {
1842         TLanPrivateInfo *priv = netdev_priv(dev);
1843         dma_addr_t      head_list_phys;
1844         u32             ack = 1;
1845
1846         if (  priv->tlanRev < 0x30 ) {
1847                 TLAN_DBG( TLAN_DEBUG_RX,
1848                           "RECEIVE:  Handling RX EOC (Head=%d Tail=%d) -- IRQ\n",
1849                           priv->rxHead, priv->rxTail );
1850                 head_list_phys = priv->rxListDMA + sizeof(TLanList) * priv->rxHead;
1851                 outl( head_list_phys, dev->base_addr + TLAN_CH_PARM );
1852                 ack |= TLAN_HC_GO | TLAN_HC_RT;
1853                 priv->rxEocCount++;
1854         }
1855
1856         return ack;
1857
1858 } /* TLan_HandleRxEOC */
1859
1860
1861
1862
1863 /*****************************************************************************
1864 ******************************************************************************
1865
1866         ThunderLAN Driver Timer Function
1867
1868 ******************************************************************************
1869 *****************************************************************************/
1870
1871
1872         /***************************************************************
1873          *      TLan_Timer
1874          *
1875          *      Returns:
1876          *              Nothing
1877          *      Parms:
1878          *              data    A value given to add timer when
1879          *                      add_timer was called.
1880          *
1881          *      This function handles timed functionality for the
1882          *      TLAN driver.  The two current timer uses are for
1883          *      delaying for autonegotionation and driving the ACT LED.
1884          *      -       Autonegotiation requires being allowed about
1885          *              2 1/2 seconds before attempting to transmit a
1886          *              packet.  It would be a very bad thing to hang
1887          *              the kernel this long, so the driver doesn't
1888          *              allow transmission 'til after this time, for
1889          *              certain PHYs.  It would be much nicer if all
1890          *              PHYs were interrupt-capable like the internal
1891          *              PHY.
1892          *      -       The ACT LED, which shows adapter activity, is
1893          *              driven by the driver, and so must be left on
1894          *              for a short period to power up the LED so it
1895          *              can be seen.  This delay can be changed by
1896          *              changing the TLAN_TIMER_ACT_DELAY in tlan.h,
1897          *              if desired.  100 ms  produces a slightly
1898          *              sluggish response.
1899          *
1900          **************************************************************/
1901
1902 static void TLan_Timer( unsigned long data )
1903 {
1904         struct net_device       *dev = (struct net_device *) data;
1905         TLanPrivateInfo *priv = netdev_priv(dev);
1906         u32             elapsed;
1907         unsigned long   flags = 0;
1908
1909         priv->timer.function = NULL;
1910
1911         switch ( priv->timerType ) {
1912 #ifdef MONITOR
1913                 case TLAN_TIMER_LINK_BEAT:
1914                         TLan_PhyMonitor( dev );
1915                         break;
1916 #endif
1917                 case TLAN_TIMER_PHY_PDOWN:
1918                         TLan_PhyPowerDown( dev );
1919                         break;
1920                 case TLAN_TIMER_PHY_PUP:
1921                         TLan_PhyPowerUp( dev );
1922                         break;
1923                 case TLAN_TIMER_PHY_RESET:
1924                         TLan_PhyReset( dev );
1925                         break;
1926                 case TLAN_TIMER_PHY_START_LINK:
1927                         TLan_PhyStartLink( dev );
1928                         break;
1929                 case TLAN_TIMER_PHY_FINISH_AN:
1930                         TLan_PhyFinishAutoNeg( dev );
1931                         break;
1932                 case TLAN_TIMER_FINISH_RESET:
1933                         TLan_FinishReset( dev );
1934                         break;
1935                 case TLAN_TIMER_ACTIVITY:
1936                         spin_lock_irqsave(&priv->lock, flags);
1937                         if ( priv->timer.function == NULL ) {
1938                                 elapsed = jiffies - priv->timerSetAt;
1939                                 if ( elapsed >= TLAN_TIMER_ACT_DELAY ) {
1940                                         TLan_DioWrite8( dev->base_addr,
1941                                                         TLAN_LED_REG, TLAN_LED_LINK );
1942                                 } else  {
1943                                         priv->timer.function = &TLan_Timer;
1944                                         priv->timer.expires = priv->timerSetAt
1945                                                 + TLAN_TIMER_ACT_DELAY;
1946                                         spin_unlock_irqrestore(&priv->lock, flags);
1947                                         add_timer( &priv->timer );
1948                                         break;
1949                                 }
1950                         }
1951                         spin_unlock_irqrestore(&priv->lock, flags);
1952                         break;
1953                 default:
1954                         break;
1955         }
1956
1957 } /* TLan_Timer */
1958
1959
1960
1961
1962 /*****************************************************************************
1963 ******************************************************************************
1964
1965         ThunderLAN Driver Adapter Related Routines
1966
1967 ******************************************************************************
1968 *****************************************************************************/
1969
1970
1971         /***************************************************************
1972          *      TLan_ResetLists
1973          *
1974          *      Returns:
1975          *              Nothing
1976          *      Parms:
1977          *              dev     The device structure with the list
1978          *                      stuctures to be reset.
1979          *
1980          *      This routine sets the variables associated with managing
1981          *      the TLAN lists to their initial values.
1982          *
1983          **************************************************************/
1984
1985 static void TLan_ResetLists( struct net_device *dev )
1986 {
1987         TLanPrivateInfo *priv = netdev_priv(dev);
1988         int             i;
1989         TLanList        *list;
1990         dma_addr_t      list_phys;
1991         struct sk_buff  *skb;
1992
1993         priv->txHead = 0;
1994         priv->txTail = 0;
1995         for ( i = 0; i < TLAN_NUM_TX_LISTS; i++ ) {
1996                 list = priv->txList + i;
1997                 list->cStat = TLAN_CSTAT_UNUSED;
1998                 if ( bbuf ) {
1999                         list->buffer[0].address = priv->txBufferDMA
2000                                 + ( i * TLAN_MAX_FRAME_SIZE );
2001                 } else {
2002                         list->buffer[0].address = 0;
2003                 }
2004                 list->buffer[2].count = 0;
2005                 list->buffer[2].address = 0;
2006                 list->buffer[8].address = 0;
2007                 list->buffer[9].address = 0;
2008         }
2009
2010         priv->rxHead = 0;
2011         priv->rxTail = TLAN_NUM_RX_LISTS - 1;
2012         for ( i = 0; i < TLAN_NUM_RX_LISTS; i++ ) {
2013                 list = priv->rxList + i;
2014                 list_phys = priv->rxListDMA + sizeof(TLanList) * i;
2015                 list->cStat = TLAN_CSTAT_READY;
2016                 list->frameSize = TLAN_MAX_FRAME_SIZE;
2017                 list->buffer[0].count = TLAN_MAX_FRAME_SIZE | TLAN_LAST_BUFFER;
2018                 if ( bbuf ) {
2019                         list->buffer[0].address = priv->rxBufferDMA
2020                                 + ( i * TLAN_MAX_FRAME_SIZE );
2021                 } else {
2022                         skb = netdev_alloc_skb(dev, TLAN_MAX_FRAME_SIZE + 7 );
2023                         if ( !skb ) {
2024                                 pr_err("TLAN: out of memory for received data.\n" );
2025                                 break;
2026                         }
2027
2028                         skb_reserve( skb, NET_IP_ALIGN );
2029                         list->buffer[0].address = pci_map_single(priv->pciDev,
2030                                                                  skb->data,
2031                                                                  TLAN_MAX_FRAME_SIZE,
2032                                                                  PCI_DMA_FROMDEVICE);
2033                         TLan_StoreSKB(list, skb);
2034                 }
2035                 list->buffer[1].count = 0;
2036                 list->buffer[1].address = 0;
2037                 list->forward = list_phys + sizeof(TLanList);
2038         }
2039
2040         /* in case ran out of memory early, clear bits */
2041         while (i < TLAN_NUM_RX_LISTS) {
2042                 TLan_StoreSKB(priv->rxList + i, NULL);
2043                 ++i;
2044         }
2045         list->forward = 0;
2046
2047 } /* TLan_ResetLists */
2048
2049
2050 static void TLan_FreeLists( struct net_device *dev )
2051 {
2052         TLanPrivateInfo *priv = netdev_priv(dev);
2053         int             i;
2054         TLanList        *list;
2055         struct sk_buff  *skb;
2056
2057         if ( ! bbuf ) {
2058                 for ( i = 0; i < TLAN_NUM_TX_LISTS; i++ ) {
2059                         list = priv->txList + i;
2060                         skb = TLan_GetSKB(list);
2061                         if ( skb ) {
2062                                 pci_unmap_single(
2063                                         priv->pciDev,
2064                                         list->buffer[0].address,
2065                                         max(skb->len,
2066                                             (unsigned int)TLAN_MIN_FRAME_SIZE),
2067                                         PCI_DMA_TODEVICE);
2068                                 dev_kfree_skb_any( skb );
2069                                 list->buffer[8].address = 0;
2070                                 list->buffer[9].address = 0;
2071                         }
2072                 }
2073
2074                 for ( i = 0; i < TLAN_NUM_RX_LISTS; i++ ) {
2075                         list = priv->rxList + i;
2076                         skb = TLan_GetSKB(list);
2077                         if ( skb ) {
2078                                 pci_unmap_single(priv->pciDev,
2079                                                  list->buffer[0].address,
2080                                                  TLAN_MAX_FRAME_SIZE,
2081                                                  PCI_DMA_FROMDEVICE);
2082                                 dev_kfree_skb_any( skb );
2083                                 list->buffer[8].address = 0;
2084                                 list->buffer[9].address = 0;
2085                         }
2086                 }
2087         }
2088 } /* TLan_FreeLists */
2089
2090
2091
2092
2093         /***************************************************************
2094          *      TLan_PrintDio
2095          *
2096          *      Returns:
2097          *              Nothing
2098          *      Parms:
2099          *              io_base         Base IO port of the device of
2100          *                              which to print DIO registers.
2101          *
2102          *      This function prints out all the internal (DIO)
2103          *      registers of a TLAN chip.
2104          *
2105          **************************************************************/
2106
2107 static void TLan_PrintDio( u16 io_base )
2108 {
2109         u32 data0, data1;
2110         int     i;
2111
2112         printk( "TLAN:   Contents of internal registers for io base 0x%04hx.\n",
2113                 io_base );
2114         printk( "TLAN:      Off.  +0         +4\n" );
2115         for ( i = 0; i < 0x4C; i+= 8 ) {
2116                 data0 = TLan_DioRead32( io_base, i );
2117                 data1 = TLan_DioRead32( io_base, i + 0x4 );
2118                 printk( "TLAN:      0x%02x  0x%08x 0x%08x\n", i, data0, data1 );
2119         }
2120
2121 } /* TLan_PrintDio */
2122
2123
2124
2125
2126         /***************************************************************
2127          *      TLan_PrintList
2128          *
2129          *      Returns:
2130          *              Nothing
2131          *      Parms:
2132          *              list    A pointer to the TLanList structure to
2133          *                      be printed.
2134          *              type    A string to designate type of list,
2135          *                      "Rx" or "Tx".
2136          *              num     The index of the list.
2137          *
2138          *      This function prints out the contents of the list
2139          *      pointed to by the list parameter.
2140          *
2141          **************************************************************/
2142
2143 static void TLan_PrintList( TLanList *list, char *type, int num)
2144 {
2145         int i;
2146
2147         printk( "TLAN:   %s List %d at %p\n", type, num, list );
2148         printk( "TLAN:      Forward    = 0x%08x\n",  list->forward );
2149         printk( "TLAN:      CSTAT      = 0x%04hx\n", list->cStat );
2150         printk( "TLAN:      Frame Size = 0x%04hx\n", list->frameSize );
2151         /* for ( i = 0; i < 10; i++ ) { */
2152         for ( i = 0; i < 2; i++ ) {
2153                 printk( "TLAN:      Buffer[%d].count, addr = 0x%08x, 0x%08x\n",
2154                         i, list->buffer[i].count, list->buffer[i].address );
2155         }
2156
2157 } /* TLan_PrintList */
2158
2159
2160
2161
2162         /***************************************************************
2163          *      TLan_ReadAndClearStats
2164          *
2165          *      Returns:
2166          *              Nothing
2167          *      Parms:
2168          *              dev     Pointer to device structure of adapter
2169          *                      to which to read stats.
2170          *              record  Flag indicating whether to add
2171          *
2172          *      This functions reads all the internal status registers
2173          *      of the TLAN chip, which clears them as a side effect.
2174          *      It then either adds the values to the device's status
2175          *      struct, or discards them, depending on whether record
2176          *      is TLAN_RECORD (!=0)  or TLAN_IGNORE (==0).
2177          *
2178          **************************************************************/
2179
2180 static void TLan_ReadAndClearStats( struct net_device *dev, int record )
2181 {
2182         u32             tx_good, tx_under;
2183         u32             rx_good, rx_over;
2184         u32             def_tx, crc, code;
2185         u32             multi_col, single_col;
2186         u32             excess_col, late_col, loss;
2187
2188         outw( TLAN_GOOD_TX_FRMS, dev->base_addr + TLAN_DIO_ADR );
2189         tx_good  = inb( dev->base_addr + TLAN_DIO_DATA );
2190         tx_good += inb( dev->base_addr + TLAN_DIO_DATA + 1 ) << 8;
2191         tx_good += inb( dev->base_addr + TLAN_DIO_DATA + 2 ) << 16;
2192         tx_under = inb( dev->base_addr + TLAN_DIO_DATA + 3 );
2193
2194         outw( TLAN_GOOD_RX_FRMS, dev->base_addr + TLAN_DIO_ADR );
2195         rx_good  = inb( dev->base_addr + TLAN_DIO_DATA );
2196         rx_good += inb( dev->base_addr + TLAN_DIO_DATA + 1 ) << 8;
2197         rx_good += inb( dev->base_addr + TLAN_DIO_DATA + 2 ) << 16;
2198         rx_over  = inb( dev->base_addr + TLAN_DIO_DATA + 3 );
2199
2200         outw( TLAN_DEFERRED_TX, dev->base_addr + TLAN_DIO_ADR );
2201         def_tx  = inb( dev->base_addr + TLAN_DIO_DATA );
2202         def_tx += inb( dev->base_addr + TLAN_DIO_DATA + 1 ) << 8;
2203         crc     = inb( dev->base_addr + TLAN_DIO_DATA + 2 );
2204         code    = inb( dev->base_addr + TLAN_DIO_DATA + 3 );
2205
2206         outw( TLAN_MULTICOL_FRMS, dev->base_addr + TLAN_DIO_ADR );
2207         multi_col   = inb( dev->base_addr + TLAN_DIO_DATA );
2208         multi_col  += inb( dev->base_addr + TLAN_DIO_DATA + 1 ) << 8;
2209         single_col  = inb( dev->base_addr + TLAN_DIO_DATA + 2 );
2210         single_col += inb( dev->base_addr + TLAN_DIO_DATA + 3 ) << 8;
2211
2212         outw( TLAN_EXCESSCOL_FRMS, dev->base_addr + TLAN_DIO_ADR );
2213         excess_col = inb( dev->base_addr + TLAN_DIO_DATA );
2214         late_col   = inb( dev->base_addr + TLAN_DIO_DATA + 1 );
2215         loss       = inb( dev->base_addr + TLAN_DIO_DATA + 2 );
2216
2217         if ( record ) {
2218                 dev->stats.rx_packets += rx_good;
2219                 dev->stats.rx_errors  += rx_over + crc + code;
2220                 dev->stats.tx_packets += tx_good;
2221                 dev->stats.tx_errors  += tx_under + loss;
2222                 dev->stats.collisions += multi_col + single_col + excess_col + late_col;
2223
2224                 dev->stats.rx_over_errors    += rx_over;
2225                 dev->stats.rx_crc_errors     += crc;
2226                 dev->stats.rx_frame_errors   += code;
2227
2228                 dev->stats.tx_aborted_errors += tx_under;
2229                 dev->stats.tx_carrier_errors += loss;
2230         }
2231
2232 } /* TLan_ReadAndClearStats */
2233
2234
2235
2236
2237         /***************************************************************
2238          *      TLan_Reset
2239          *
2240          *      Returns:
2241          *              0
2242          *      Parms:
2243          *              dev     Pointer to device structure of adapter
2244          *                      to be reset.
2245          *
2246          *      This function resets the adapter and it's physical
2247          *      device.  See Chap. 3, pp. 9-10 of the "ThunderLAN
2248          *      Programmer's Guide" for details.  The routine tries to
2249          *      implement what is detailed there, though adjustments
2250          *      have been made.
2251          *
2252          **************************************************************/
2253
2254 static void
2255 TLan_ResetAdapter( struct net_device *dev )
2256 {
2257         TLanPrivateInfo *priv = netdev_priv(dev);
2258         int             i;
2259         u32             addr;
2260         u32             data;
2261         u8              data8;
2262
2263         priv->tlanFullDuplex = FALSE;
2264         priv->phyOnline=0;
2265         netif_carrier_off(dev);
2266
2267 /*  1.  Assert reset bit. */
2268
2269         data = inl(dev->base_addr + TLAN_HOST_CMD);
2270         data |= TLAN_HC_AD_RST;
2271         outl(data, dev->base_addr + TLAN_HOST_CMD);
2272
2273         udelay(1000);
2274
2275 /*  2.  Turn off interrupts. ( Probably isn't necessary ) */
2276
2277         data = inl(dev->base_addr + TLAN_HOST_CMD);
2278         data |= TLAN_HC_INT_OFF;
2279         outl(data, dev->base_addr + TLAN_HOST_CMD);
2280
2281 /*  3.  Clear AREGs and HASHs. */
2282
2283         for ( i = TLAN_AREG_0; i <= TLAN_HASH_2; i += 4 ) {
2284                 TLan_DioWrite32( dev->base_addr, (u16) i, 0 );
2285         }
2286
2287 /*  4.  Setup NetConfig register. */
2288
2289         data = TLAN_NET_CFG_1FRAG | TLAN_NET_CFG_1CHAN | TLAN_NET_CFG_PHY_EN;
2290         TLan_DioWrite16( dev->base_addr, TLAN_NET_CONFIG, (u16) data );
2291
2292 /*  5.  Load Ld_Tmr and Ld_Thr in HOST_CMD. */
2293
2294         outl( TLAN_HC_LD_TMR | 0x3f, dev->base_addr + TLAN_HOST_CMD );
2295         outl( TLAN_HC_LD_THR | 0x9, dev->base_addr + TLAN_HOST_CMD );
2296
2297 /*  6.  Unreset the MII by setting NMRST (in NetSio) to 1. */
2298
2299         outw( TLAN_NET_SIO, dev->base_addr + TLAN_DIO_ADR );
2300         addr = dev->base_addr + TLAN_DIO_DATA + TLAN_NET_SIO;
2301         TLan_SetBit( TLAN_NET_SIO_NMRST, addr );
2302
2303 /*  7.  Setup the remaining registers. */
2304
2305         if ( priv->tlanRev >= 0x30 ) {
2306                 data8 = TLAN_ID_TX_EOC | TLAN_ID_RX_EOC;
2307                 TLan_DioWrite8( dev->base_addr, TLAN_INT_DIS, data8 );
2308         }
2309         TLan_PhyDetect( dev );
2310         data = TLAN_NET_CFG_1FRAG | TLAN_NET_CFG_1CHAN;
2311
2312         if ( priv->adapter->flags & TLAN_ADAPTER_BIT_RATE_PHY ) {
2313                 data |= TLAN_NET_CFG_BIT;
2314                 if ( priv->aui == 1 ) {
2315                         TLan_DioWrite8( dev->base_addr, TLAN_ACOMMIT, 0x0a );
2316                 } else if ( priv->duplex == TLAN_DUPLEX_FULL ) {
2317                         TLan_DioWrite8( dev->base_addr, TLAN_ACOMMIT, 0x00 );
2318                         priv->tlanFullDuplex = TRUE;
2319                 } else {
2320                         TLan_DioWrite8( dev->base_addr, TLAN_ACOMMIT, 0x08 );
2321                 }
2322         }
2323
2324         if ( priv->phyNum == 0 ) {
2325                 data |= TLAN_NET_CFG_PHY_EN;
2326         }
2327         TLan_DioWrite16( dev->base_addr, TLAN_NET_CONFIG, (u16) data );
2328
2329         if ( priv->adapter->flags & TLAN_ADAPTER_UNMANAGED_PHY ) {
2330                 TLan_FinishReset( dev );
2331         } else {
2332                 TLan_PhyPowerDown( dev );
2333         }
2334
2335 } /* TLan_ResetAdapter */
2336
2337
2338
2339
2340 static void
2341 TLan_FinishReset( struct net_device *dev )
2342 {
2343         TLanPrivateInfo *priv = netdev_priv(dev);
2344         u8              data;
2345         u32             phy;
2346         u8              sio;
2347         u16             status;
2348         u16             partner;
2349         u16             tlphy_ctl;
2350         u16             tlphy_par;
2351         u16             tlphy_id1, tlphy_id2;
2352         int             i;
2353
2354         phy = priv->phy[priv->phyNum];
2355
2356         data = TLAN_NET_CMD_NRESET | TLAN_NET_CMD_NWRAP;
2357         if ( priv->tlanFullDuplex ) {
2358                 data |= TLAN_NET_CMD_DUPLEX;
2359         }
2360         TLan_DioWrite8( dev->base_addr, TLAN_NET_CMD, data );
2361         data = TLAN_NET_MASK_MASK4 | TLAN_NET_MASK_MASK5;
2362         if ( priv->phyNum == 0 ) {
2363                 data |= TLAN_NET_MASK_MASK7;
2364         }
2365         TLan_DioWrite8( dev->base_addr, TLAN_NET_MASK, data );
2366         TLan_DioWrite16( dev->base_addr, TLAN_MAX_RX, ((1536)+7)&~7 );
2367         TLan_MiiReadReg( dev, phy, MII_GEN_ID_HI, &tlphy_id1 );
2368         TLan_MiiReadReg( dev, phy, MII_GEN_ID_LO, &tlphy_id2 );
2369
2370         if ( ( priv->adapter->flags & TLAN_ADAPTER_UNMANAGED_PHY ) ||
2371              ( priv->aui ) ) {
2372                 status = MII_GS_LINK;
2373                 printk( "TLAN:  %s: Link forced.\n", dev->name );
2374         } else {
2375                 TLan_MiiReadReg( dev, phy, MII_GEN_STS, &status );
2376                 udelay( 1000 );
2377                 TLan_MiiReadReg( dev, phy, MII_GEN_STS, &status );
2378                 if ( (status & MII_GS_LINK) &&
2379                      /* We only support link info on Nat.Sem. PHY's */
2380                         (tlphy_id1 == NAT_SEM_ID1) &&
2381                         (tlphy_id2 == NAT_SEM_ID2) ) {
2382                         TLan_MiiReadReg( dev, phy, MII_AN_LPA, &partner );
2383                         TLan_MiiReadReg( dev, phy, TLAN_TLPHY_PAR, &tlphy_par );
2384
2385                         printk( "TLAN: %s: Link active with ", dev->name );
2386                         if (!(tlphy_par & TLAN_PHY_AN_EN_STAT)) {
2387                                  printk( "forced 10%sMbps %s-Duplex\n",
2388                                          tlphy_par & TLAN_PHY_SPEED_100 ? "" : "0",
2389                                          tlphy_par & TLAN_PHY_DUPLEX_FULL ? "Full" : "Half");
2390                         } else {
2391                                 printk( "AutoNegotiation enabled, at 10%sMbps %s-Duplex\n",
2392                                         tlphy_par & TLAN_PHY_SPEED_100 ? "" : "0",
2393                                         tlphy_par & TLAN_PHY_DUPLEX_FULL ? "Full" : "Half");
2394                                 printk("TLAN: Partner capability: ");
2395                                         for (i = 5; i <= 10; i++)
2396                                                 if (partner & (1<<i))
2397                                                         printk("%s",media[i-5]);
2398                                 printk("\n");
2399                         }
2400
2401                         TLan_DioWrite8( dev->base_addr, TLAN_LED_REG, TLAN_LED_LINK );
2402 #ifdef MONITOR
2403                         /* We have link beat..for now anyway */
2404                         priv->link = 1;
2405                         /*Enabling link beat monitoring */
2406                         TLan_SetTimer( dev, (10*HZ), TLAN_TIMER_LINK_BEAT );
2407 #endif
2408                 } else if (status & MII_GS_LINK)  {
2409                         printk( "TLAN: %s: Link active\n", dev->name );
2410                         TLan_DioWrite8( dev->base_addr, TLAN_LED_REG, TLAN_LED_LINK );
2411                 }
2412         }
2413
2414         if ( priv->phyNum == 0 ) {
2415                 TLan_MiiReadReg( dev, phy, TLAN_TLPHY_CTL, &tlphy_ctl );
2416                 tlphy_ctl |= TLAN_TC_INTEN;
2417                 TLan_MiiWriteReg( dev, phy, TLAN_TLPHY_CTL, tlphy_ctl );
2418                 sio = TLan_DioRead8( dev->base_addr, TLAN_NET_SIO );
2419                 sio |= TLAN_NET_SIO_MINTEN;
2420                 TLan_DioWrite8( dev->base_addr, TLAN_NET_SIO, sio );
2421         }
2422
2423         if ( status & MII_GS_LINK ) {
2424                 TLan_SetMac( dev, 0, dev->dev_addr );
2425                 priv->phyOnline = 1;
2426                 outb( ( TLAN_HC_INT_ON >> 8 ), dev->base_addr + TLAN_HOST_CMD + 1 );
2427                 if ( debug >= 1 && debug != TLAN_DEBUG_PROBE ) {
2428                         outb( ( TLAN_HC_REQ_INT >> 8 ), dev->base_addr + TLAN_HOST_CMD + 1 );
2429                 }
2430                 outl( priv->rxListDMA, dev->base_addr + TLAN_CH_PARM );
2431                 outl( TLAN_HC_GO | TLAN_HC_RT, dev->base_addr + TLAN_HOST_CMD );
2432                 netif_carrier_on(dev);
2433         } else {
2434                 printk( "TLAN: %s: Link inactive, will retry in 10 secs...\n",
2435                         dev->name );
2436                 TLan_SetTimer( dev, (10*HZ), TLAN_TIMER_FINISH_RESET );
2437                 return;
2438         }
2439         TLan_SetMulticastList(dev);
2440
2441 } /* TLan_FinishReset */
2442
2443
2444
2445
2446         /***************************************************************
2447          *      TLan_SetMac
2448          *
2449          *      Returns:
2450          *              Nothing
2451          *      Parms:
2452          *              dev     Pointer to device structure of adapter
2453          *                      on which to change the AREG.
2454          *              areg    The AREG to set the address in (0 - 3).
2455          *              mac     A pointer to an array of chars.  Each
2456          *                      element stores one byte of the address.
2457          *                      IE, it isn't in ascii.
2458          *
2459          *      This function transfers a MAC address to one of the
2460          *      TLAN AREGs (address registers).  The TLAN chip locks
2461          *      the register on writing to offset 0 and unlocks the
2462          *      register after writing to offset 5.  If NULL is passed
2463          *      in mac, then the AREG is filled with 0's.
2464          *
2465          **************************************************************/
2466
2467 static void TLan_SetMac( struct net_device *dev, int areg, char *mac )
2468 {
2469         int i;
2470
2471         areg *= 6;
2472
2473         if ( mac != NULL ) {
2474                 for ( i = 0; i < 6; i++ )
2475                         TLan_DioWrite8( dev->base_addr,
2476                                         TLAN_AREG_0 + areg + i, mac[i] );
2477         } else {
2478                 for ( i = 0; i < 6; i++ )
2479                         TLan_DioWrite8( dev->base_addr,
2480                                         TLAN_AREG_0 + areg + i, 0 );
2481         }
2482
2483 } /* TLan_SetMac */
2484
2485
2486
2487
2488 /*****************************************************************************
2489 ******************************************************************************
2490
2491         ThunderLAN Driver PHY Layer Routines
2492
2493 ******************************************************************************
2494 *****************************************************************************/
2495
2496
2497
2498         /*********************************************************************
2499          *      TLan_PhyPrint
2500          *
2501          *      Returns:
2502          *              Nothing
2503          *      Parms:
2504          *              dev     A pointer to the device structure of the
2505          *                      TLAN device having the PHYs to be detailed.
2506          *
2507          *      This function prints the registers a PHY (aka transceiver).
2508          *
2509          ********************************************************************/
2510
2511 static void TLan_PhyPrint( struct net_device *dev )
2512 {
2513         TLanPrivateInfo *priv = netdev_priv(dev);
2514         u16 i, data0, data1, data2, data3, phy;
2515
2516         phy = priv->phy[priv->phyNum];
2517
2518         if ( priv->adapter->flags & TLAN_ADAPTER_UNMANAGED_PHY ) {
2519                 printk( "TLAN:   Device %s, Unmanaged PHY.\n", dev->name );
2520         } else if ( phy <= TLAN_PHY_MAX_ADDR ) {
2521                 printk( "TLAN:   Device %s, PHY 0x%02x.\n", dev->name, phy );
2522                 printk( "TLAN:      Off.  +0     +1     +2     +3 \n" );
2523                 for ( i = 0; i < 0x20; i+= 4 ) {
2524                         printk( "TLAN:      0x%02x", i );
2525                         TLan_MiiReadReg( dev, phy, i, &data0 );
2526                         printk( " 0x%04hx", data0 );
2527                         TLan_MiiReadReg( dev, phy, i + 1, &data1 );
2528                         printk( " 0x%04hx", data1 );
2529                         TLan_MiiReadReg( dev, phy, i + 2, &data2 );
2530                         printk( " 0x%04hx", data2 );
2531                         TLan_MiiReadReg( dev, phy, i + 3, &data3 );
2532                         printk( " 0x%04hx\n", data3 );
2533                 }
2534         } else {
2535                 printk( "TLAN:   Device %s, Invalid PHY.\n", dev->name );
2536         }
2537
2538 } /* TLan_PhyPrint */
2539
2540
2541
2542
2543         /*********************************************************************
2544          *      TLan_PhyDetect
2545          *
2546          *      Returns:
2547          *              Nothing
2548          *      Parms:
2549          *              dev     A pointer to the device structure of the adapter
2550          *                      for which the PHY needs determined.
2551          *
2552          *      So far I've found that adapters which have external PHYs
2553          *      may also use the internal PHY for part of the functionality.
2554          *      (eg, AUI/Thinnet).  This function finds out if this TLAN
2555          *      chip has an internal PHY, and then finds the first external
2556          *      PHY (starting from address 0) if it exists).
2557          *
2558          ********************************************************************/
2559
2560 static void TLan_PhyDetect( struct net_device *dev )
2561 {
2562         TLanPrivateInfo *priv = netdev_priv(dev);
2563         u16             control;
2564         u16             hi;
2565         u16             lo;
2566         u32             phy;
2567
2568         if ( priv->adapter->flags & TLAN_ADAPTER_UNMANAGED_PHY ) {
2569                 priv->phyNum = 0xFFFF;
2570                 return;
2571         }
2572
2573         TLan_MiiReadReg( dev, TLAN_PHY_MAX_ADDR, MII_GEN_ID_HI, &hi );
2574
2575         if ( hi != 0xFFFF ) {
2576                 priv->phy[0] = TLAN_PHY_MAX_ADDR;
2577         } else {
2578                 priv->phy[0] = TLAN_PHY_NONE;
2579         }
2580
2581         priv->phy[1] = TLAN_PHY_NONE;
2582         for ( phy = 0; phy <= TLAN_PHY_MAX_ADDR; phy++ ) {
2583                 TLan_MiiReadReg( dev, phy, MII_GEN_CTL, &control );
2584                 TLan_MiiReadReg( dev, phy, MII_GEN_ID_HI, &hi );
2585                 TLan_MiiReadReg( dev, phy, MII_GEN_ID_LO, &lo );
2586                 if ( ( control != 0xFFFF ) ||
2587                      ( hi != 0xFFFF ) || ( lo != 0xFFFF ) ) {
2588                         TLAN_DBG( TLAN_DEBUG_GNRL,
2589                                   "PHY found at %02x %04x %04x %04x\n",
2590                                   phy, control, hi, lo );
2591                         if ( ( priv->phy[1] == TLAN_PHY_NONE ) &&
2592                              ( phy != TLAN_PHY_MAX_ADDR ) ) {
2593                                 priv->phy[1] = phy;
2594                         }
2595                 }
2596         }
2597
2598         if ( priv->phy[1] != TLAN_PHY_NONE ) {
2599                 priv->phyNum = 1;
2600         } else if ( priv->phy[0] != TLAN_PHY_NONE ) {
2601                 priv->phyNum = 0;
2602         } else {
2603                 printk( "TLAN:  Cannot initialize device, no PHY was found!\n" );
2604         }
2605
2606 } /* TLan_PhyDetect */
2607
2608
2609
2610
2611 static void TLan_PhyPowerDown( struct net_device *dev )
2612 {
2613         TLanPrivateInfo *priv = netdev_priv(dev);
2614         u16             value;
2615
2616         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Powering down PHY(s).\n", dev->name );
2617         value = MII_GC_PDOWN | MII_GC_LOOPBK | MII_GC_ISOLATE;
2618         TLan_MiiSync( dev->base_addr );
2619         TLan_MiiWriteReg( dev, priv->phy[priv->phyNum], MII_GEN_CTL, value );
2620         if ( ( priv->phyNum == 0 ) &&
2621              ( priv->phy[1] != TLAN_PHY_NONE ) &&
2622              ( ! ( priv->adapter->flags & TLAN_ADAPTER_USE_INTERN_10 ) ) ) {
2623                 TLan_MiiSync( dev->base_addr );
2624                 TLan_MiiWriteReg( dev, priv->phy[1], MII_GEN_CTL, value );
2625         }
2626
2627         /* Wait for 50 ms and powerup
2628          * This is abitrary.  It is intended to make sure the
2629          * transceiver settles.
2630          */
2631         TLan_SetTimer( dev, (HZ/20), TLAN_TIMER_PHY_PUP );
2632
2633 } /* TLan_PhyPowerDown */
2634
2635
2636
2637
2638 static void TLan_PhyPowerUp( struct net_device *dev )
2639 {
2640         TLanPrivateInfo *priv = netdev_priv(dev);
2641         u16             value;
2642
2643         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Powering up PHY.\n", dev->name );
2644         TLan_MiiSync( dev->base_addr );
2645         value = MII_GC_LOOPBK;
2646         TLan_MiiWriteReg( dev, priv->phy[priv->phyNum], MII_GEN_CTL, value );
2647         TLan_MiiSync(dev->base_addr);
2648         /* Wait for 500 ms and reset the
2649          * transceiver.  The TLAN docs say both 50 ms and
2650          * 500 ms, so do the longer, just in case.
2651          */
2652         TLan_SetTimer( dev, (HZ/20), TLAN_TIMER_PHY_RESET );
2653
2654 } /* TLan_PhyPowerUp */
2655
2656
2657
2658
2659 static void TLan_PhyReset( struct net_device *dev )
2660 {
2661         TLanPrivateInfo *priv = netdev_priv(dev);
2662         u16             phy;
2663         u16             value;
2664
2665         phy = priv->phy[priv->phyNum];
2666
2667         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Reseting PHY.\n", dev->name );
2668         TLan_MiiSync( dev->base_addr );
2669         value = MII_GC_LOOPBK | MII_GC_RESET;
2670         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, value );
2671         TLan_MiiReadReg( dev, phy, MII_GEN_CTL, &value );
2672         while ( value & MII_GC_RESET ) {
2673                 TLan_MiiReadReg( dev, phy, MII_GEN_CTL, &value );
2674         }
2675
2676         /* Wait for 500 ms and initialize.
2677          * I don't remember why I wait this long.
2678          * I've changed this to 50ms, as it seems long enough.
2679          */
2680         TLan_SetTimer( dev, (HZ/20), TLAN_TIMER_PHY_START_LINK );
2681
2682 } /* TLan_PhyReset */
2683
2684
2685
2686
2687 static void TLan_PhyStartLink( struct net_device *dev )
2688 {
2689         TLanPrivateInfo *priv = netdev_priv(dev);
2690         u16             ability;
2691         u16             control;
2692         u16             data;
2693         u16             phy;
2694         u16             status;
2695         u16             tctl;
2696
2697         phy = priv->phy[priv->phyNum];
2698         TLAN_DBG( TLAN_DEBUG_GNRL, "%s: Trying to activate link.\n", dev->name );
2699         TLan_MiiReadReg( dev, phy, MII_GEN_STS, &status );
2700         TLan_MiiReadReg( dev, phy, MII_GEN_STS, &ability );
2701
2702         if ( ( status & MII_GS_AUTONEG ) &&
2703              ( ! priv->aui ) ) {
2704                 ability = status >> 11;
2705                 if ( priv->speed  == TLAN_SPEED_10 &&
2706                      priv->duplex == TLAN_DUPLEX_HALF) {
2707                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x0000);
2708                 } else if ( priv->speed == TLAN_SPEED_10 &&
2709                             priv->duplex == TLAN_DUPLEX_FULL) {
2710                         priv->tlanFullDuplex = TRUE;
2711                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x0100);
2712                 } else if ( priv->speed == TLAN_SPEED_100 &&
2713                             priv->duplex == TLAN_DUPLEX_HALF) {
2714                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x2000);
2715                 } else if ( priv->speed == TLAN_SPEED_100 &&
2716                             priv->duplex == TLAN_DUPLEX_FULL) {
2717                         priv->tlanFullDuplex = TRUE;
2718                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x2100);
2719                 } else {
2720
2721                         /* Set Auto-Neg advertisement */
2722                         TLan_MiiWriteReg( dev, phy, MII_AN_ADV, (ability << 5) | 1);
2723                         /* Enablee Auto-Neg */
2724                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x1000 );
2725                         /* Restart Auto-Neg */
2726                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, 0x1200 );
2727                         /* Wait for 4 sec for autonegotiation
2728                         * to complete.  The max spec time is less than this
2729                         * but the card need additional time to start AN.
2730                         * .5 sec should be plenty extra.
2731                         */
2732                         printk( "TLAN: %s: Starting autonegotiation.\n", dev->name );
2733                         TLan_SetTimer( dev, (2*HZ), TLAN_TIMER_PHY_FINISH_AN );
2734                         return;
2735                 }
2736
2737         }
2738
2739         if ( ( priv->aui ) && ( priv->phyNum != 0 ) ) {
2740                 priv->phyNum = 0;
2741                 data = TLAN_NET_CFG_1FRAG | TLAN_NET_CFG_1CHAN | TLAN_NET_CFG_PHY_EN;
2742                 TLan_DioWrite16( dev->base_addr, TLAN_NET_CONFIG, data );
2743                 TLan_SetTimer( dev, (40*HZ/1000), TLAN_TIMER_PHY_PDOWN );
2744                 return;
2745         }  else if ( priv->phyNum == 0 ) {
2746                 control = 0;
2747                 TLan_MiiReadReg( dev, phy, TLAN_TLPHY_CTL, &tctl );
2748                 if ( priv->aui ) {
2749                         tctl |= TLAN_TC_AUISEL;
2750                 } else {
2751                         tctl &= ~TLAN_TC_AUISEL;
2752                         if ( priv->duplex == TLAN_DUPLEX_FULL ) {
2753                                 control |= MII_GC_DUPLEX;
2754                                 priv->tlanFullDuplex = TRUE;
2755                         }
2756                         if ( priv->speed == TLAN_SPEED_100 ) {
2757                                 control |= MII_GC_SPEEDSEL;
2758                         }
2759                 }
2760                 TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, control );
2761                 TLan_MiiWriteReg( dev, phy, TLAN_TLPHY_CTL, tctl );
2762         }
2763
2764         /* Wait for 2 sec to give the transceiver time
2765          * to establish link.
2766          */
2767         TLan_SetTimer( dev, (4*HZ), TLAN_TIMER_FINISH_RESET );
2768
2769 } /* TLan_PhyStartLink */
2770
2771
2772
2773
2774 static void TLan_PhyFinishAutoNeg( struct net_device *dev )
2775 {
2776         TLanPrivateInfo *priv = netdev_priv(dev);
2777         u16             an_adv;
2778         u16             an_lpa;
2779         u16             data;
2780         u16             mode;
2781         u16             phy;
2782         u16             status;
2783
2784         phy = priv->phy[priv->phyNum];
2785
2786         TLan_MiiReadReg( dev, phy, MII_GEN_STS, &status );
2787         udelay( 1000 );
2788         TLan_MiiReadReg( dev, phy, MII_GEN_STS, &status );
2789
2790         if ( ! ( status & MII_GS_AUTOCMPLT ) ) {
2791                 /* Wait for 8 sec to give the process
2792                  * more time.  Perhaps we should fail after a while.
2793                  */
2794                  if (!priv->neg_be_verbose++) {
2795                          pr_info("TLAN:  Giving autonegotiation more time.\n");
2796                          pr_info("TLAN:  Please check that your adapter has\n");
2797                          pr_info("TLAN:  been properly connected to a HUB or Switch.\n");
2798                          pr_info("TLAN:  Trying to establish link in the background...\n");
2799                  }
2800                 TLan_SetTimer( dev, (8*HZ), TLAN_TIMER_PHY_FINISH_AN );
2801                 return;
2802         }
2803
2804         printk( "TLAN: %s: Autonegotiation complete.\n", dev->name );
2805         TLan_MiiReadReg( dev, phy, MII_AN_ADV, &an_adv );
2806         TLan_MiiReadReg( dev, phy, MII_AN_LPA, &an_lpa );
2807         mode = an_adv & an_lpa & 0x03E0;
2808         if ( mode & 0x0100 ) {
2809                 priv->tlanFullDuplex = TRUE;
2810         } else if ( ! ( mode & 0x0080 ) && ( mode & 0x0040 ) ) {
2811                 priv->tlanFullDuplex = TRUE;
2812         }
2813
2814         if ( ( ! ( mode & 0x0180 ) ) &&
2815              ( priv->adapter->flags & TLAN_ADAPTER_USE_INTERN_10 ) &&
2816              ( priv->phyNum != 0 ) ) {
2817                 priv->phyNum = 0;
2818                 data = TLAN_NET_CFG_1FRAG | TLAN_NET_CFG_1CHAN | TLAN_NET_CFG_PHY_EN;
2819                 TLan_DioWrite16( dev->base_addr, TLAN_NET_CONFIG, data );
2820                 TLan_SetTimer( dev, (400*HZ/1000), TLAN_TIMER_PHY_PDOWN );
2821                 return;
2822         }
2823
2824         if ( priv->phyNum == 0 ) {
2825                 if ( ( priv->duplex == TLAN_DUPLEX_FULL ) ||
2826                      ( an_adv & an_lpa & 0x0040 ) ) {
2827                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL,
2828                                           MII_GC_AUTOENB | MII_GC_DUPLEX );
2829                         pr_info("TLAN:  Starting internal PHY with FULL-DUPLEX\n" );
2830                 } else {
2831                         TLan_MiiWriteReg( dev, phy, MII_GEN_CTL, MII_GC_AUTOENB );
2832                         pr_info( "TLAN:  Starting internal PHY with HALF-DUPLEX\n" );
2833                 }
2834         }
2835
2836         /* Wait for 100 ms.  No reason in partiticular.
2837          */
2838         TLan_SetTimer( dev, (HZ/10), TLAN_TIMER_FINISH_RESET );
2839
2840 } /* TLan_PhyFinishAutoNeg */
2841
2842 #ifdef MONITOR
2843
2844         /*********************************************************************
2845         *
2846         *      TLan_phyMonitor
2847         *
2848         *      Returns:
2849         *              None
2850         *
2851         *      Params:
2852         *              dev             The device structure of this device.
2853         *
2854         *
2855         *      This function monitors PHY condition by reading the status
2856         *      register via the MII bus. This can be used to give info
2857         *      about link changes (up/down), and possible switch to alternate
2858         *      media.
2859         *
2860         * ******************************************************************/
2861
2862 void TLan_PhyMonitor( struct net_device *dev )
2863 {
2864         TLanPrivateInfo *priv = netdev_priv(dev);
2865         u16     phy;
2866         u16     phy_status;
2867
2868         phy = priv->phy[priv->phyNum];
2869
2870         /* Get PHY status register */
2871         TLan_MiiReadReg( dev, phy, MII_GEN_STS, &phy_status );
2872
2873         /* Check if link has been lost */
2874         if (!(phy_status & MII_GS_LINK)) {
2875                if (priv->link) {
2876                       priv->link = 0;
2877                       printk(KERN_DEBUG "TLAN: %s has lost link\n", dev->name);
2878                       netif_carrier_off(dev);
2879                       TLan_SetTimer( dev, (2*HZ), TLAN_TIMER_LINK_BEAT );
2880                       return;
2881                 }
2882         }
2883
2884         /* Link restablished? */
2885         if ((phy_status & MII_GS_LINK) && !priv->link) {
2886                 priv->link = 1;
2887                 printk(KERN_DEBUG "TLAN: %s has reestablished link\n", dev->name);
2888                 netif_carrier_on(dev);
2889         }
2890
2891         /* Setup a new monitor */
2892         TLan_SetTimer( dev, (2*HZ), TLAN_TIMER_LINK_BEAT );
2893 }
2894
2895 #endif /* MONITOR */
2896
2897
2898 /*****************************************************************************
2899 ******************************************************************************
2900
2901         ThunderLAN Driver MII Routines
2902
2903         These routines are based on the information in Chap. 2 of the
2904         "ThunderLAN Programmer's Guide", pp. 15-24.
2905
2906 ******************************************************************************
2907 *****************************************************************************/
2908
2909
2910         /***************************************************************
2911          *      TLan_MiiReadReg
2912          *
2913          *      Returns:
2914          *              0       if ack received ok
2915          *              1       otherwise.
2916          *
2917          *      Parms:
2918          *              dev             The device structure containing
2919          *                              The io address and interrupt count
2920          *                              for this device.
2921          *              phy             The address of the PHY to be queried.
2922          *              reg             The register whose contents are to be
2923          *                              retrieved.
2924          *              val             A pointer to a variable to store the
2925          *                              retrieved value.
2926          *
2927          *      This function uses the TLAN's MII bus to retrieve the contents
2928          *      of a given register on a PHY.  It sends the appropriate info
2929          *      and then reads the 16-bit register value from the MII bus via
2930          *      the TLAN SIO register.
2931          *
2932          **************************************************************/
2933
2934 static int TLan_MiiReadReg( struct net_device *dev, u16 phy, u16 reg, u16 *val )
2935 {
2936         u8      nack;
2937         u16     sio, tmp;
2938         u32     i;
2939         int     err;
2940         int     minten;
2941         TLanPrivateInfo *priv = netdev_priv(dev);
2942         unsigned long flags = 0;
2943
2944         err = FALSE;
2945         outw(TLAN_NET_SIO, dev->base_addr + TLAN_DIO_ADR);
2946         sio = dev->base_addr + TLAN_DIO_DATA + TLAN_NET_SIO;
2947
2948         if (!in_irq())
2949                 spin_lock_irqsave(&priv->lock, flags);
2950
2951         TLan_MiiSync(dev->base_addr);
2952
2953         minten = TLan_GetBit( TLAN_NET_SIO_MINTEN, sio );
2954         if ( minten )
2955                 TLan_ClearBit(TLAN_NET_SIO_MINTEN, sio);
2956
2957         TLan_MiiSendData( dev->base_addr, 0x1, 2 );     /* Start ( 01b ) */
2958         TLan_MiiSendData( dev->base_addr, 0x2, 2 );     /* Read  ( 10b ) */
2959         TLan_MiiSendData( dev->base_addr, phy, 5 );     /* Device #      */
2960         TLan_MiiSendData( dev->base_addr, reg, 5 );     /* Register #    */
2961
2962
2963         TLan_ClearBit(TLAN_NET_SIO_MTXEN, sio);         /* Change direction */
2964
2965         TLan_ClearBit(TLAN_NET_SIO_MCLK, sio);          /* Clock Idle bit */
2966         TLan_SetBit(TLAN_NET_SIO_MCLK, sio);
2967         TLan_ClearBit(TLAN_NET_SIO_MCLK, sio);          /* Wait 300ns */
2968
2969         nack = TLan_GetBit(TLAN_NET_SIO_MDATA, sio);    /* Check for ACK */
2970         TLan_SetBit(TLAN_NET_SIO_MCLK, sio);            /* Finish ACK */
2971         if (nack) {                                     /* No ACK, so fake it */
2972                 for (i = 0; i < 16; i++) {
2973                         TLan_ClearBit(TLAN_NET_SIO_MCLK, sio);
2974                         TLan_SetBit(TLAN_NET_SIO_MCLK, sio);
2975                 }
2976                 tmp = 0xffff;
2977                 err = TRUE;
2978         } else {                                        /* ACK, so read data */
2979                 for (tmp = 0, i = 0x8000; i; i >>= 1) {
2980                         TLan_ClearBit(TLAN_NET_SIO_MCLK, sio);
2981                         if (TLan_GetBit(TLAN_NET_SIO_MDATA, sio))
2982                                 tmp |= i;
2983                         TLan_SetBit(TLAN_NET_SIO_MCLK, sio);
2984                 }
2985         }
2986
2987
2988         TLan_ClearBit(TLAN_NET_SIO_MCLK, sio);          /* Idle cycle */
2989         TLan_SetBit(TLAN_NET_SIO_MCLK, sio);
2990
2991         if ( minten )
2992                 TLan_SetBit(TLAN_NET_SIO_MINTEN, sio);
2993
2994         *val = tmp;
2995
2996         if (!in_irq())
2997                 spin_unlock_irqrestore(&priv->lock, flags);
2998
2999         return err;
3000
3001 } /* TLan_MiiReadReg */
3002
3003
3004
3005
3006         /***************************************************************
3007          *      TLan_MiiSendData
3008          *
3009          *      Returns:
3010          *              Nothing
3011          *      Parms:
3012          *              base_port       The base IO port of the adapter in
3013          *                              question.
3014          *              dev             The address of the PHY to be queried.
3015          *              data            The value to be placed on the MII bus.
3016          *              num_bits        The number of bits in data that are to
3017          *                              be placed on the MII bus.
3018          *
3019          *      This function sends on sequence of bits on the MII
3020          *      configuration bus.
3021          *
3022          **************************************************************/
3023
3024 static void TLan_MiiSendData( u16 base_port, u32 data, unsigned num_bits )
3025 {
3026         u16 sio;
3027         u32 i;
3028
3029         if ( num_bits == 0 )
3030                 return;
3031
3032         outw( TLAN_NET_SIO, base_port + TLAN_DIO_ADR );
3033         sio = base_port + TLAN_DIO_DATA + TLAN_NET_SIO;
3034         TLan_SetBit( TLAN_NET_SIO_MTXEN, sio );
3035
3036         for ( i = ( 0x1 << ( num_bits - 1 ) ); i; i >>= 1 ) {
3037                 TLan_ClearBit( TLAN_NET_SIO_MCLK, sio );
3038                 (void) TLan_GetBit( TLAN_NET_SIO_MCLK, sio );
3039                 if ( data & i )
3040                         TLan_SetBit( TLAN_NET_SIO_MDATA, sio );
3041                 else
3042                         TLan_ClearBit( TLAN_NET_SIO_MDATA, sio );
3043                 TLan_SetBit( TLAN_NET_SIO_MCLK, sio );
3044                 (void) TLan_GetBit( TLAN_NET_SIO_MCLK, sio );
3045         }
3046
3047 } /* TLan_MiiSendData */
3048
3049
3050
3051
3052         /***************************************************************
3053          *      TLan_MiiSync
3054          *
3055          *      Returns:
3056          *              Nothing
3057          *      Parms:
3058          *              base_port       The base IO port of the adapter in
3059          *                              question.
3060          *
3061          *      This functions syncs all PHYs in terms of the MII configuration
3062          *      bus.
3063          *
3064          **************************************************************/
3065
3066 static void TLan_MiiSync( u16 base_port )
3067 {
3068         int i;
3069         u16 sio;
3070
3071         outw( TLAN_NET_SIO, base_port + TLAN_DIO_ADR );
3072         sio = base_port + TLAN_DIO_DATA + TLAN_NET_SIO;
3073
3074         TLan_ClearBit( TLAN_NET_SIO_MTXEN, sio );
3075         for ( i = 0; i < 32; i++ ) {
3076                 TLan_ClearBit( TLAN_NET_SIO_MCLK, sio );
3077                 TLan_SetBit( TLAN_NET_SIO_MCLK, sio );
3078         }
3079
3080 } /* TLan_MiiSync */
3081
3082
3083
3084
3085         /***************************************************************
3086          *      TLan_MiiWriteReg
3087          *
3088          *      Returns:
3089          *              Nothing
3090          *      Parms:
3091          *              dev             The device structure for the device
3092          *                              to write to.
3093          *              phy             The address of the PHY to be written to.
3094          *              reg             The register whose contents are to be
3095          *                              written.
3096          *              val             The value to be written to the register.
3097          *
3098          *      This function uses the TLAN's MII bus to write the contents of a
3099          *      given register on a PHY.  It sends the appropriate info and then
3100          *      writes the 16-bit register value from the MII configuration bus
3101          *      via the TLAN SIO register.
3102          *
3103          **************************************************************/
3104
3105 static void TLan_MiiWriteReg( struct net_device *dev, u16 phy, u16 reg, u16 val )
3106 {
3107         u16     sio;
3108         int     minten;
3109         unsigned long flags = 0;
3110         TLanPrivateInfo *priv = netdev_priv(dev);
3111
3112         outw(TLAN_NET_SIO, dev->base_addr + TLAN_DIO_ADR);
3113         sio = dev->base_addr + TLAN_DIO_DATA + TLAN_NET_SIO;
3114
3115         if (!in_irq())
3116                 spin_lock_irqsave(&priv->lock, flags);
3117
3118         TLan_MiiSync( dev->base_addr );
3119
3120         minten = TLan_GetBit( TLAN_NET_SIO_MINTEN, sio );
3121         if ( minten )
3122                 TLan_ClearBit( TLAN_NET_SIO_MINTEN, sio );
3123
3124         TLan_MiiSendData( dev->base_addr, 0x1, 2 );     /* Start ( 01b ) */
3125         TLan_MiiSendData( dev->base_addr, 0x1, 2 );     /* Write ( 01b ) */
3126         TLan_MiiSendData( dev->base_addr, phy, 5 );     /* Device #      */
3127         TLan_MiiSendData( dev->base_addr, reg, 5 );     /* Register #    */
3128
3129         TLan_MiiSendData( dev->base_addr, 0x2, 2 );     /* Send ACK */
3130         TLan_MiiSendData( dev->base_addr, val, 16 );    /* Send Data */
3131
3132         TLan_ClearBit( TLAN_NET_SIO_MCLK, sio );        /* Idle cycle */
3133         TLan_SetBit( TLAN_NET_SIO_MCLK, sio );
3134
3135         if ( minten )
3136                 TLan_SetBit( TLAN_NET_SIO_MINTEN, sio );
3137
3138         if (!in_irq())
3139                 spin_unlock_irqrestore(&priv->lock, flags);
3140
3141 } /* TLan_MiiWriteReg */
3142
3143
3144
3145
3146 /*****************************************************************************
3147 ******************************************************************************
3148
3149         ThunderLAN Driver Eeprom routines
3150
3151         The Compaq Netelligent 10 and 10/100 cards use a Microchip 24C02A
3152         EEPROM.  These functions are based on information in Microchip's
3153         data sheet.  I don't know how well this functions will work with
3154         other EEPROMs.
3155
3156 ******************************************************************************
3157 *****************************************************************************/
3158
3159
3160         /***************************************************************
3161          *      TLan_EeSendStart
3162          *
3163          *      Returns:
3164          *              Nothing
3165          *      Parms:
3166          *              io_base         The IO port base address for the
3167          *                              TLAN device with the EEPROM to
3168          *                              use.
3169          *
3170          *      This function sends a start cycle to an EEPROM attached
3171          *      to a TLAN chip.
3172          *
3173          **************************************************************/
3174
3175 static void TLan_EeSendStart( u16 io_base )
3176 {
3177         u16     sio;
3178
3179         outw( TLAN_NET_SIO, io_base + TLAN_DIO_ADR );
3180         sio = io_base + TLAN_DIO_DATA + TLAN_NET_SIO;
3181
3182         TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3183         TLan_SetBit( TLAN_NET_SIO_EDATA, sio );
3184         TLan_SetBit( TLAN_NET_SIO_ETXEN, sio );
3185         TLan_ClearBit( TLAN_NET_SIO_EDATA, sio );
3186         TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3187
3188 } /* TLan_EeSendStart */
3189
3190
3191
3192
3193         /***************************************************************
3194          *      TLan_EeSendByte
3195          *
3196          *      Returns:
3197          *              If the correct ack was received, 0, otherwise 1
3198          *      Parms:  io_base         The IO port base address for the
3199          *                              TLAN device with the EEPROM to
3200          *                              use.
3201          *              data            The 8 bits of information to
3202          *                              send to the EEPROM.
3203          *              stop            If TLAN_EEPROM_STOP is passed, a
3204          *                              stop cycle is sent after the
3205          *                              byte is sent after the ack is
3206          *                              read.
3207          *
3208          *      This function sends a byte on the serial EEPROM line,
3209          *      driving the clock to send each bit. The function then
3210          *      reverses transmission direction and reads an acknowledge
3211          *      bit.
3212          *
3213          **************************************************************/
3214
3215 static int TLan_EeSendByte( u16 io_base, u8 data, int stop )
3216 {
3217         int     err;
3218         u8      place;
3219         u16     sio;
3220
3221         outw( TLAN_NET_SIO, io_base + TLAN_DIO_ADR );
3222         sio = io_base + TLAN_DIO_DATA + TLAN_NET_SIO;
3223
3224         /* Assume clock is low, tx is enabled; */
3225         for ( place = 0x80; place != 0; place >>= 1 ) {
3226                 if ( place & data )
3227                         TLan_SetBit( TLAN_NET_SIO_EDATA, sio );
3228                 else
3229                         TLan_ClearBit( TLAN_NET_SIO_EDATA, sio );
3230                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3231                 TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3232         }
3233         TLan_ClearBit( TLAN_NET_SIO_ETXEN, sio );
3234         TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3235         err = TLan_GetBit( TLAN_NET_SIO_EDATA, sio );
3236         TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3237         TLan_SetBit( TLAN_NET_SIO_ETXEN, sio );
3238
3239         if ( ( ! err ) && stop ) {
3240                 /* STOP, raise data while clock is high */
3241                 TLan_ClearBit( TLAN_NET_SIO_EDATA, sio );
3242                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3243                 TLan_SetBit( TLAN_NET_SIO_EDATA, sio );
3244         }
3245
3246         return ( err );
3247
3248 } /* TLan_EeSendByte */
3249
3250
3251
3252
3253         /***************************************************************
3254          *      TLan_EeReceiveByte
3255          *
3256          *      Returns:
3257          *              Nothing
3258          *      Parms:
3259          *              io_base         The IO port base address for the
3260          *                              TLAN device with the EEPROM to
3261          *                              use.
3262          *              data            An address to a char to hold the
3263          *                              data sent from the EEPROM.
3264          *              stop            If TLAN_EEPROM_STOP is passed, a
3265          *                              stop cycle is sent after the
3266          *                              byte is received, and no ack is
3267          *                              sent.
3268          *
3269          *      This function receives 8 bits of data from the EEPROM
3270          *      over the serial link.  It then sends and ack bit, or no
3271          *      ack and a stop bit.  This function is used to retrieve
3272          *      data after the address of a byte in the EEPROM has been
3273          *      sent.
3274          *
3275          **************************************************************/
3276
3277 static void TLan_EeReceiveByte( u16 io_base, u8 *data, int stop )
3278 {
3279         u8  place;
3280         u16 sio;
3281
3282         outw( TLAN_NET_SIO, io_base + TLAN_DIO_ADR );
3283         sio = io_base + TLAN_DIO_DATA + TLAN_NET_SIO;
3284         *data = 0;
3285
3286         /* Assume clock is low, tx is enabled; */
3287         TLan_ClearBit( TLAN_NET_SIO_ETXEN, sio );
3288         for ( place = 0x80; place; place >>= 1 ) {
3289                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3290                 if ( TLan_GetBit( TLAN_NET_SIO_EDATA, sio ) )
3291                         *data |= place;
3292                 TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3293         }
3294
3295         TLan_SetBit( TLAN_NET_SIO_ETXEN, sio );
3296         if ( ! stop ) {
3297                 TLan_ClearBit( TLAN_NET_SIO_EDATA, sio );       /* Ack = 0 */
3298                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3299                 TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3300         } else {
3301                 TLan_SetBit( TLAN_NET_SIO_EDATA, sio );         /* No ack = 1 (?) */
3302                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3303                 TLan_ClearBit( TLAN_NET_SIO_ECLOK, sio );
3304                 /* STOP, raise data while clock is high */
3305                 TLan_ClearBit( TLAN_NET_SIO_EDATA, sio );
3306                 TLan_SetBit( TLAN_NET_SIO_ECLOK, sio );
3307                 TLan_SetBit( TLAN_NET_SIO_EDATA, sio );
3308         }
3309
3310 } /* TLan_EeReceiveByte */
3311
3312
3313
3314
3315         /***************************************************************
3316          *      TLan_EeReadByte
3317          *
3318          *      Returns:
3319          *              No error = 0, else, the stage at which the error
3320          *              occurred.
3321          *      Parms:
3322          *              io_base         The IO port base address for the
3323          *                              TLAN device with the EEPROM to
3324          *                              use.
3325          *              ee_addr         The address of the byte in the
3326          *                              EEPROM whose contents are to be
3327          *                              retrieved.
3328          *              data            An address to a char to hold the
3329          *                              data obtained from the EEPROM.
3330          *
3331          *      This function reads a byte of information from an byte
3332          *      cell in the EEPROM.
3333          *
3334          **************************************************************/
3335
3336 static int TLan_EeReadByte( struct net_device *dev, u8 ee_addr, u8 *data )
3337 {
3338         int err;
3339         TLanPrivateInfo *priv = netdev_priv(dev);
3340         unsigned long flags = 0;
3341         int ret=0;
3342
3343         spin_lock_irqsave(&priv->lock, flags);
3344
3345         TLan_EeSendStart( dev->base_addr );
3346         err = TLan_EeSendByte( dev->base_addr, 0xA0, TLAN_EEPROM_ACK );
3347         if (err)
3348         {
3349                 ret=1;
3350                 goto fail;
3351         }
3352         err = TLan_EeSendByte( dev->base_addr, ee_addr, TLAN_EEPROM_ACK );
3353         if (err)
3354         {
3355                 ret=2;
3356                 goto fail;
3357         }
3358         TLan_EeSendStart( dev->base_addr );
3359         err = TLan_EeSendByte( dev->base_addr, 0xA1, TLAN_EEPROM_ACK );
3360         if (err)
3361         {
3362                 ret=3;
3363                 goto fail;
3364         }
3365         TLan_EeReceiveByte( dev->base_addr, data, TLAN_EEPROM_STOP );
3366 fail:
3367         spin_unlock_irqrestore(&priv->lock, flags);
3368
3369         return ret;
3370
3371 } /* TLan_EeReadByte */
3372
3373
3374