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