Linux Audio

Check our new training course

Loading...
v6.8
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2#define VERSION "0.23"
   3/* ns83820.c by Benjamin LaHaise with contributions.
   4 *
   5 * Questions/comments/discussion to linux-ns83820@kvack.org.
   6 *
   7 * $Revision: 1.34.2.23 $
   8 *
   9 * Copyright 2001 Benjamin LaHaise.
  10 * Copyright 2001, 2002 Red Hat.
  11 *
  12 * Mmmm, chocolate vanilla mocha...
  13 *
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  14 * ChangeLog
  15 * =========
  16 *	20010414	0.1 - created
  17 *	20010622	0.2 - basic rx and tx.
  18 *	20010711	0.3 - added duplex and link state detection support.
  19 *	20010713	0.4 - zero copy, no hangs.
  20 *			0.5 - 64 bit dma support (davem will hate me for this)
  21 *			    - disable jumbo frames to avoid tx hangs
  22 *			    - work around tx deadlocks on my 1.02 card via
  23 *			      fiddling with TXCFG
  24 *	20010810	0.6 - use pci dma api for ringbuffers, work on ia64
  25 *	20010816	0.7 - misc cleanups
  26 *	20010826	0.8 - fix critical zero copy bugs
  27 *			0.9 - internal experiment
  28 *	20010827	0.10 - fix ia64 unaligned access.
  29 *	20010906	0.11 - accept all packets with checksum errors as
  30 *			       otherwise fragments get lost
  31 *			     - fix >> 32 bugs
  32 *			0.12 - add statistics counters
  33 *			     - add allmulti/promisc support
  34 *	20011009	0.13 - hotplug support, other smaller pci api cleanups
  35 *	20011204	0.13a - optical transceiver support added
  36 *				by Michael Clark <michael@metaparadigm.com>
  37 *	20011205	0.13b - call register_netdev earlier in initialization
  38 *				suppress duplicate link status messages
  39 *	20011117 	0.14 - ethtool GDRVINFO, GLINK support from jgarzik
  40 *	20011204 	0.15	get ppc (big endian) working
  41 *	20011218	0.16	various cleanups
  42 *	20020310	0.17	speedups
  43 *	20020610	0.18 -	actually use the pci dma api for highmem
  44 *			     -	remove pci latency register fiddling
  45 *			0.19 -	better bist support
  46 *			     -	add ihr and reset_phy parameters
  47 *			     -	gmii bus probing
  48 *			     -	fix missed txok introduced during performance
  49 *				tuning
  50 *			0.20 -	fix stupid RFEN thinko.  i am such a smurf.
  51 *	20040828	0.21 -	add hardware vlan accleration
  52 *				by Neil Horman <nhorman@redhat.com>
  53 *	20050406	0.22 -	improved DAC ifdefs from Andi Kleen
  54 *			     -	removal of dead code from Adrian Bunk
  55 *			     -	fix half duplex collision behaviour
  56 * Driver Overview
  57 * ===============
  58 *
  59 * This driver was originally written for the National Semiconductor
  60 * 83820 chip, a 10/100/1000 Mbps 64 bit PCI ethernet NIC.  Hopefully
  61 * this code will turn out to be a) clean, b) correct, and c) fast.
  62 * With that in mind, I'm aiming to split the code up as much as
  63 * reasonably possible.  At present there are X major sections that
  64 * break down into a) packet receive, b) packet transmit, c) link
  65 * management, d) initialization and configuration.  Where possible,
  66 * these code paths are designed to run in parallel.
  67 *
  68 * This driver has been tested and found to work with the following
  69 * cards (in no particular order):
  70 *
  71 *	Cameo		SOHO-GA2000T	SOHO-GA2500T
  72 *	D-Link		DGE-500T
  73 *	PureData	PDP8023Z-TG
  74 *	SMC		SMC9452TX	SMC9462TX
  75 *	Netgear		GA621
  76 *
  77 * Special thanks to SMC for providing hardware to test this driver on.
  78 *
  79 * Reports of success or failure would be greatly appreciated.
  80 */
  81//#define dprintk		printk
  82#define dprintk(x...)		do { } while (0)
  83
  84#include <linux/module.h>
  85#include <linux/moduleparam.h>
  86#include <linux/types.h>
  87#include <linux/pci.h>
  88#include <linux/dma-mapping.h>
  89#include <linux/netdevice.h>
  90#include <linux/etherdevice.h>
  91#include <linux/delay.h>
  92#include <linux/workqueue.h>
  93#include <linux/init.h>
  94#include <linux/interrupt.h>
  95#include <linux/ip.h>	/* for iph */
  96#include <linux/in.h>	/* for IPPROTO_... */
  97#include <linux/compiler.h>
  98#include <linux/prefetch.h>
  99#include <linux/ethtool.h>
 100#include <linux/sched.h>
 101#include <linux/timer.h>
 102#include <linux/if_vlan.h>
 103#include <linux/rtnetlink.h>
 104#include <linux/jiffies.h>
 105#include <linux/slab.h>
 106
 107#include <asm/io.h>
 108#include <linux/uaccess.h>
 109
 110#define DRV_NAME "ns83820"
 111
 112/* Global parameters.  See module_param near the bottom. */
 113static int ihr = 2;
 114static int reset_phy = 0;
 115static int lnksts = 0;		/* CFG_LNKSTS bit polarity */
 116
 117/* Dprintk is used for more interesting debug events */
 118#undef Dprintk
 119#define	Dprintk			dprintk
 120
 121/* tunables */
 122#define RX_BUF_SIZE	1500	/* 8192 */
 123#if IS_ENABLED(CONFIG_VLAN_8021Q)
 124#define NS83820_VLAN_ACCEL_SUPPORT
 125#endif
 126
 127/* Must not exceed ~65000. */
 128#define NR_RX_DESC	64
 129#define NR_TX_DESC	128
 130
 131/* not tunable */
 132#define REAL_RX_BUF_SIZE (RX_BUF_SIZE + 14)	/* rx/tx mac addr + type */
 133
 134#define MIN_TX_DESC_FREE	8
 135
 136/* register defines */
 137#define CFGCS		0x04
 138
 139#define CR_TXE		0x00000001
 140#define CR_TXD		0x00000002
 141/* Ramit : Here's a tip, don't do a RXD immediately followed by an RXE
 142 * The Receive engine skips one descriptor and moves
 143 * onto the next one!! */
 144#define CR_RXE		0x00000004
 145#define CR_RXD		0x00000008
 146#define CR_TXR		0x00000010
 147#define CR_RXR		0x00000020
 148#define CR_SWI		0x00000080
 149#define CR_RST		0x00000100
 150
 151#define PTSCR_EEBIST_FAIL       0x00000001
 152#define PTSCR_EEBIST_EN         0x00000002
 153#define PTSCR_EELOAD_EN         0x00000004
 154#define PTSCR_RBIST_FAIL        0x000001b8
 155#define PTSCR_RBIST_DONE        0x00000200
 156#define PTSCR_RBIST_EN          0x00000400
 157#define PTSCR_RBIST_RST         0x00002000
 158
 159#define MEAR_EEDI		0x00000001
 160#define MEAR_EEDO		0x00000002
 161#define MEAR_EECLK		0x00000004
 162#define MEAR_EESEL		0x00000008
 163#define MEAR_MDIO		0x00000010
 164#define MEAR_MDDIR		0x00000020
 165#define MEAR_MDC		0x00000040
 166
 167#define ISR_TXDESC3	0x40000000
 168#define ISR_TXDESC2	0x20000000
 169#define ISR_TXDESC1	0x10000000
 170#define ISR_TXDESC0	0x08000000
 171#define ISR_RXDESC3	0x04000000
 172#define ISR_RXDESC2	0x02000000
 173#define ISR_RXDESC1	0x01000000
 174#define ISR_RXDESC0	0x00800000
 175#define ISR_TXRCMP	0x00400000
 176#define ISR_RXRCMP	0x00200000
 177#define ISR_DPERR	0x00100000
 178#define ISR_SSERR	0x00080000
 179#define ISR_RMABT	0x00040000
 180#define ISR_RTABT	0x00020000
 181#define ISR_RXSOVR	0x00010000
 182#define ISR_HIBINT	0x00008000
 183#define ISR_PHY		0x00004000
 184#define ISR_PME		0x00002000
 185#define ISR_SWI		0x00001000
 186#define ISR_MIB		0x00000800
 187#define ISR_TXURN	0x00000400
 188#define ISR_TXIDLE	0x00000200
 189#define ISR_TXERR	0x00000100
 190#define ISR_TXDESC	0x00000080
 191#define ISR_TXOK	0x00000040
 192#define ISR_RXORN	0x00000020
 193#define ISR_RXIDLE	0x00000010
 194#define ISR_RXEARLY	0x00000008
 195#define ISR_RXERR	0x00000004
 196#define ISR_RXDESC	0x00000002
 197#define ISR_RXOK	0x00000001
 198
 199#define TXCFG_CSI	0x80000000
 200#define TXCFG_HBI	0x40000000
 201#define TXCFG_MLB	0x20000000
 202#define TXCFG_ATP	0x10000000
 203#define TXCFG_ECRETRY	0x00800000
 204#define TXCFG_BRST_DIS	0x00080000
 205#define TXCFG_MXDMA1024	0x00000000
 206#define TXCFG_MXDMA512	0x00700000
 207#define TXCFG_MXDMA256	0x00600000
 208#define TXCFG_MXDMA128	0x00500000
 209#define TXCFG_MXDMA64	0x00400000
 210#define TXCFG_MXDMA32	0x00300000
 211#define TXCFG_MXDMA16	0x00200000
 212#define TXCFG_MXDMA8	0x00100000
 213
 214#define CFG_LNKSTS	0x80000000
 215#define CFG_SPDSTS	0x60000000
 216#define CFG_SPDSTS1	0x40000000
 217#define CFG_SPDSTS0	0x20000000
 218#define CFG_DUPSTS	0x10000000
 219#define CFG_TBI_EN	0x01000000
 220#define CFG_MODE_1000	0x00400000
 221/* Ramit : Dont' ever use AUTO_1000, it never works and is buggy.
 222 * Read the Phy response and then configure the MAC accordingly */
 223#define CFG_AUTO_1000	0x00200000
 224#define CFG_PINT_CTL	0x001c0000
 225#define CFG_PINT_DUPSTS	0x00100000
 226#define CFG_PINT_LNKSTS	0x00080000
 227#define CFG_PINT_SPDSTS	0x00040000
 228#define CFG_TMRTEST	0x00020000
 229#define CFG_MRM_DIS	0x00010000
 230#define CFG_MWI_DIS	0x00008000
 231#define CFG_T64ADDR	0x00004000
 232#define CFG_PCI64_DET	0x00002000
 233#define CFG_DATA64_EN	0x00001000
 234#define CFG_M64ADDR	0x00000800
 235#define CFG_PHY_RST	0x00000400
 236#define CFG_PHY_DIS	0x00000200
 237#define CFG_EXTSTS_EN	0x00000100
 238#define CFG_REQALG	0x00000080
 239#define CFG_SB		0x00000040
 240#define CFG_POW		0x00000020
 241#define CFG_EXD		0x00000010
 242#define CFG_PESEL	0x00000008
 243#define CFG_BROM_DIS	0x00000004
 244#define CFG_EXT_125	0x00000002
 245#define CFG_BEM		0x00000001
 246
 247#define EXTSTS_UDPPKT	0x00200000
 248#define EXTSTS_TCPPKT	0x00080000
 249#define EXTSTS_IPPKT	0x00020000
 250#define EXTSTS_VPKT	0x00010000
 251#define EXTSTS_VTG_MASK	0x0000ffff
 252
 253#define SPDSTS_POLARITY	(CFG_SPDSTS1 | CFG_SPDSTS0 | CFG_DUPSTS | (lnksts ? CFG_LNKSTS : 0))
 254
 255#define MIBC_MIBS	0x00000008
 256#define MIBC_ACLR	0x00000004
 257#define MIBC_FRZ	0x00000002
 258#define MIBC_WRN	0x00000001
 259
 260#define PCR_PSEN	(1 << 31)
 261#define PCR_PS_MCAST	(1 << 30)
 262#define PCR_PS_DA	(1 << 29)
 263#define PCR_STHI_8	(3 << 23)
 264#define PCR_STLO_4	(1 << 23)
 265#define PCR_FFHI_8K	(3 << 21)
 266#define PCR_FFLO_4K	(1 << 21)
 267#define PCR_PAUSE_CNT	0xFFFE
 268
 269#define RXCFG_AEP	0x80000000
 270#define RXCFG_ARP	0x40000000
 271#define RXCFG_STRIPCRC	0x20000000
 272#define RXCFG_RX_FD	0x10000000
 273#define RXCFG_ALP	0x08000000
 274#define RXCFG_AIRL	0x04000000
 275#define RXCFG_MXDMA512	0x00700000
 276#define RXCFG_DRTH	0x0000003e
 277#define RXCFG_DRTH0	0x00000002
 278
 279#define RFCR_RFEN	0x80000000
 280#define RFCR_AAB	0x40000000
 281#define RFCR_AAM	0x20000000
 282#define RFCR_AAU	0x10000000
 283#define RFCR_APM	0x08000000
 284#define RFCR_APAT	0x07800000
 285#define RFCR_APAT3	0x04000000
 286#define RFCR_APAT2	0x02000000
 287#define RFCR_APAT1	0x01000000
 288#define RFCR_APAT0	0x00800000
 289#define RFCR_AARP	0x00400000
 290#define RFCR_MHEN	0x00200000
 291#define RFCR_UHEN	0x00100000
 292#define RFCR_ULM	0x00080000
 293
 294#define VRCR_RUDPE	0x00000080
 295#define VRCR_RTCPE	0x00000040
 296#define VRCR_RIPE	0x00000020
 297#define VRCR_IPEN	0x00000010
 298#define VRCR_DUTF	0x00000008
 299#define VRCR_DVTF	0x00000004
 300#define VRCR_VTREN	0x00000002
 301#define VRCR_VTDEN	0x00000001
 302
 303#define VTCR_PPCHK	0x00000008
 304#define VTCR_GCHK	0x00000004
 305#define VTCR_VPPTI	0x00000002
 306#define VTCR_VGTI	0x00000001
 307
 308#define CR		0x00
 309#define CFG		0x04
 310#define MEAR		0x08
 311#define PTSCR		0x0c
 312#define	ISR		0x10
 313#define	IMR		0x14
 314#define	IER		0x18
 315#define	IHR		0x1c
 316#define TXDP		0x20
 317#define TXDP_HI		0x24
 318#define TXCFG		0x28
 319#define GPIOR		0x2c
 320#define RXDP		0x30
 321#define RXDP_HI		0x34
 322#define RXCFG		0x38
 323#define PQCR		0x3c
 324#define WCSR		0x40
 325#define PCR		0x44
 326#define RFCR		0x48
 327#define RFDR		0x4c
 328
 329#define SRR		0x58
 330
 331#define VRCR		0xbc
 332#define VTCR		0xc0
 333#define VDR		0xc4
 334#define CCSR		0xcc
 335
 336#define TBICR		0xe0
 337#define TBISR		0xe4
 338#define TANAR		0xe8
 339#define TANLPAR		0xec
 340#define TANER		0xf0
 341#define TESR		0xf4
 342
 343#define TBICR_MR_AN_ENABLE	0x00001000
 344#define TBICR_MR_RESTART_AN	0x00000200
 345
 346#define TBISR_MR_LINK_STATUS	0x00000020
 347#define TBISR_MR_AN_COMPLETE	0x00000004
 348
 349#define TANAR_PS2 		0x00000100
 350#define TANAR_PS1 		0x00000080
 351#define TANAR_HALF_DUP 		0x00000040
 352#define TANAR_FULL_DUP 		0x00000020
 353
 354#define GPIOR_GP5_OE		0x00000200
 355#define GPIOR_GP4_OE		0x00000100
 356#define GPIOR_GP3_OE		0x00000080
 357#define GPIOR_GP2_OE		0x00000040
 358#define GPIOR_GP1_OE		0x00000020
 359#define GPIOR_GP3_OUT		0x00000004
 360#define GPIOR_GP1_OUT		0x00000001
 361
 362#define LINK_AUTONEGOTIATE	0x01
 363#define LINK_DOWN		0x02
 364#define LINK_UP			0x04
 365
 366#define HW_ADDR_LEN	sizeof(dma_addr_t)
 367#define desc_addr_set(desc, addr)				\
 368	do {							\
 369		((desc)[0] = cpu_to_le32(addr));		\
 370		if (HW_ADDR_LEN == 8)		 		\
 371			(desc)[1] = cpu_to_le32(((u64)addr) >> 32);	\
 372	} while(0)
 373#define desc_addr_get(desc)					\
 374	(le32_to_cpu((desc)[0]) | \
 375	(HW_ADDR_LEN == 8 ? ((dma_addr_t)le32_to_cpu((desc)[1]))<<32 : 0))
 376
 377#define DESC_LINK		0
 378#define DESC_BUFPTR		(DESC_LINK + HW_ADDR_LEN/4)
 379#define DESC_CMDSTS		(DESC_BUFPTR + HW_ADDR_LEN/4)
 380#define DESC_EXTSTS		(DESC_CMDSTS + 4/4)
 381
 382#define CMDSTS_OWN	0x80000000
 383#define CMDSTS_MORE	0x40000000
 384#define CMDSTS_INTR	0x20000000
 385#define CMDSTS_ERR	0x10000000
 386#define CMDSTS_OK	0x08000000
 387#define CMDSTS_RUNT	0x00200000
 388#define CMDSTS_LEN_MASK	0x0000ffff
 389
 390#define CMDSTS_DEST_MASK	0x01800000
 391#define CMDSTS_DEST_SELF	0x00800000
 392#define CMDSTS_DEST_MULTI	0x01000000
 393
 394#define DESC_SIZE	8		/* Should be cache line sized */
 395
 396struct rx_info {
 397	spinlock_t	lock;
 398	int		up;
 399	unsigned long	idle;
 400
 401	struct sk_buff	*skbs[NR_RX_DESC];
 402
 403	__le32		*next_rx_desc;
 404	u16		next_rx, next_empty;
 405
 406	__le32		*descs;
 407	dma_addr_t	phy_descs;
 408};
 409
 410
 411struct ns83820 {
 412	u8			__iomem *base;
 413
 414	struct pci_dev		*pci_dev;
 415	struct net_device	*ndev;
 416
 417	struct rx_info		rx_info;
 418	struct tasklet_struct	rx_tasklet;
 419
 420	unsigned		ihr;
 421	struct work_struct	tq_refill;
 422
 423	/* protects everything below.  irqsave when using. */
 424	spinlock_t		misc_lock;
 425
 426	u32			CFG_cache;
 427
 428	u32			MEAR_cache;
 429	u32			IMR_cache;
 430
 431	unsigned		linkstate;
 432
 433	spinlock_t	tx_lock;
 434
 435	u16		tx_done_idx;
 436	u16		tx_idx;
 437	volatile u16	tx_free_idx;	/* idx of free desc chain */
 438	u16		tx_intr_idx;
 439
 440	atomic_t	nr_tx_skbs;
 441	struct sk_buff	*tx_skbs[NR_TX_DESC];
 442
 443	char		pad[16] __attribute__((aligned(16)));
 444	__le32		*tx_descs;
 445	dma_addr_t	tx_phy_descs;
 446
 447	struct timer_list	tx_watchdog;
 448};
 449
 450static inline struct ns83820 *PRIV(struct net_device *dev)
 451{
 452	return netdev_priv(dev);
 453}
 454
 455#define __kick_rx(dev)	writel(CR_RXE, dev->base + CR)
 456
 457static inline void kick_rx(struct net_device *ndev)
 458{
 459	struct ns83820 *dev = PRIV(ndev);
 460	dprintk("kick_rx: maybe kicking\n");
 461	if (test_and_clear_bit(0, &dev->rx_info.idle)) {
 462		dprintk("actually kicking\n");
 463		writel(dev->rx_info.phy_descs +
 464			(4 * DESC_SIZE * dev->rx_info.next_rx),
 465		       dev->base + RXDP);
 466		if (dev->rx_info.next_rx == dev->rx_info.next_empty)
 467			printk(KERN_DEBUG "%s: uh-oh: next_rx == next_empty???\n",
 468				ndev->name);
 469		__kick_rx(dev);
 470	}
 471}
 472
 473//free = (tx_done_idx + NR_TX_DESC-2 - free_idx) % NR_TX_DESC
 474#define start_tx_okay(dev)	\
 475	(((NR_TX_DESC-2 + dev->tx_done_idx - dev->tx_free_idx) % NR_TX_DESC) > MIN_TX_DESC_FREE)
 476
 477/* Packet Receiver
 478 *
 479 * The hardware supports linked lists of receive descriptors for
 480 * which ownership is transferred back and forth by means of an
 481 * ownership bit.  While the hardware does support the use of a
 482 * ring for receive descriptors, we only make use of a chain in
 483 * an attempt to reduce bus traffic under heavy load scenarios.
 484 * This will also make bugs a bit more obvious.  The current code
 485 * only makes use of a single rx chain; I hope to implement
 486 * priority based rx for version 1.0.  Goal: even under overload
 487 * conditions, still route realtime traffic with as low jitter as
 488 * possible.
 489 */
 490static inline void build_rx_desc(struct ns83820 *dev, __le32 *desc, dma_addr_t link, dma_addr_t buf, u32 cmdsts, u32 extsts)
 491{
 492	desc_addr_set(desc + DESC_LINK, link);
 493	desc_addr_set(desc + DESC_BUFPTR, buf);
 494	desc[DESC_EXTSTS] = cpu_to_le32(extsts);
 495	mb();
 496	desc[DESC_CMDSTS] = cpu_to_le32(cmdsts);
 497}
 498
 499#define nr_rx_empty(dev) ((NR_RX_DESC-2 + dev->rx_info.next_rx - dev->rx_info.next_empty) % NR_RX_DESC)
 500static inline int ns83820_add_rx_skb(struct ns83820 *dev, struct sk_buff *skb)
 501{
 502	unsigned next_empty;
 503	u32 cmdsts;
 504	__le32 *sg;
 505	dma_addr_t buf;
 506
 507	next_empty = dev->rx_info.next_empty;
 508
 509	/* don't overrun last rx marker */
 510	if (unlikely(nr_rx_empty(dev) <= 2)) {
 511		kfree_skb(skb);
 512		return 1;
 513	}
 514
 515#if 0
 516	dprintk("next_empty[%d] nr_used[%d] next_rx[%d]\n",
 517		dev->rx_info.next_empty,
 518		dev->rx_info.nr_used,
 519		dev->rx_info.next_rx
 520		);
 521#endif
 522
 523	sg = dev->rx_info.descs + (next_empty * DESC_SIZE);
 524	BUG_ON(NULL != dev->rx_info.skbs[next_empty]);
 525	dev->rx_info.skbs[next_empty] = skb;
 526
 527	dev->rx_info.next_empty = (next_empty + 1) % NR_RX_DESC;
 528	cmdsts = REAL_RX_BUF_SIZE | CMDSTS_INTR;
 529	buf = dma_map_single(&dev->pci_dev->dev, skb->data, REAL_RX_BUF_SIZE,
 530			     DMA_FROM_DEVICE);
 531	build_rx_desc(dev, sg, 0, buf, cmdsts, 0);
 532	/* update link of previous rx */
 533	if (likely(next_empty != dev->rx_info.next_rx))
 534		dev->rx_info.descs[((NR_RX_DESC + next_empty - 1) % NR_RX_DESC) * DESC_SIZE] = cpu_to_le32(dev->rx_info.phy_descs + (next_empty * DESC_SIZE * 4));
 535
 536	return 0;
 537}
 538
 539static inline int rx_refill(struct net_device *ndev, gfp_t gfp)
 540{
 541	struct ns83820 *dev = PRIV(ndev);
 542	unsigned i;
 543	unsigned long flags = 0;
 544
 545	if (unlikely(nr_rx_empty(dev) <= 2))
 546		return 0;
 547
 548	dprintk("rx_refill(%p)\n", ndev);
 549	if (gfp == GFP_ATOMIC)
 550		spin_lock_irqsave(&dev->rx_info.lock, flags);
 551	for (i=0; i<NR_RX_DESC; i++) {
 552		struct sk_buff *skb;
 553		long res;
 554
 555		/* extra 16 bytes for alignment */
 556		skb = __netdev_alloc_skb(ndev, REAL_RX_BUF_SIZE+16, gfp);
 557		if (unlikely(!skb))
 558			break;
 559
 560		skb_reserve(skb, skb->data - PTR_ALIGN(skb->data, 16));
 561		if (gfp != GFP_ATOMIC)
 562			spin_lock_irqsave(&dev->rx_info.lock, flags);
 563		res = ns83820_add_rx_skb(dev, skb);
 564		if (gfp != GFP_ATOMIC)
 565			spin_unlock_irqrestore(&dev->rx_info.lock, flags);
 566		if (res) {
 567			i = 1;
 568			break;
 569		}
 570	}
 571	if (gfp == GFP_ATOMIC)
 572		spin_unlock_irqrestore(&dev->rx_info.lock, flags);
 573
 574	return i ? 0 : -ENOMEM;
 575}
 576
 577static void rx_refill_atomic(struct net_device *ndev)
 578{
 579	rx_refill(ndev, GFP_ATOMIC);
 580}
 581
 582/* REFILL */
 583static inline void queue_refill(struct work_struct *work)
 584{
 585	struct ns83820 *dev = container_of(work, struct ns83820, tq_refill);
 586	struct net_device *ndev = dev->ndev;
 587
 588	rx_refill(ndev, GFP_KERNEL);
 589	if (dev->rx_info.up)
 590		kick_rx(ndev);
 591}
 592
 593static inline void clear_rx_desc(struct ns83820 *dev, unsigned i)
 594{
 595	build_rx_desc(dev, dev->rx_info.descs + (DESC_SIZE * i), 0, 0, CMDSTS_OWN, 0);
 596}
 597
 598static void phy_intr(struct net_device *ndev)
 599{
 600	struct ns83820 *dev = PRIV(ndev);
 601	static const char *speeds[] = { "10", "100", "1000", "1000(?)", "1000F" };
 602	u32 cfg, new_cfg;
 603	u32 tanar, tanlpar;
 604	int speed, fullduplex, newlinkstate;
 605
 606	cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
 607
 608	if (dev->CFG_cache & CFG_TBI_EN) {
 609		u32 __maybe_unused tbisr;
 610
 611		/* we have an optical transceiver */
 612		tbisr = readl(dev->base + TBISR);
 613		tanar = readl(dev->base + TANAR);
 614		tanlpar = readl(dev->base + TANLPAR);
 615		dprintk("phy_intr: tbisr=%08x, tanar=%08x, tanlpar=%08x\n",
 616			tbisr, tanar, tanlpar);
 617
 618		if ( (fullduplex = (tanlpar & TANAR_FULL_DUP) &&
 619		      (tanar & TANAR_FULL_DUP)) ) {
 620
 621			/* both of us are full duplex */
 622			writel(readl(dev->base + TXCFG)
 623			       | TXCFG_CSI | TXCFG_HBI | TXCFG_ATP,
 624			       dev->base + TXCFG);
 625			writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
 626			       dev->base + RXCFG);
 627			/* Light up full duplex LED */
 628			writel(readl(dev->base + GPIOR) | GPIOR_GP1_OUT,
 629			       dev->base + GPIOR);
 630
 631		} else if (((tanlpar & TANAR_HALF_DUP) &&
 632			    (tanar & TANAR_HALF_DUP)) ||
 633			   ((tanlpar & TANAR_FULL_DUP) &&
 634			    (tanar & TANAR_HALF_DUP)) ||
 635			   ((tanlpar & TANAR_HALF_DUP) &&
 636			    (tanar & TANAR_FULL_DUP))) {
 637
 638			/* one or both of us are half duplex */
 639			writel((readl(dev->base + TXCFG)
 640				& ~(TXCFG_CSI | TXCFG_HBI)) | TXCFG_ATP,
 641			       dev->base + TXCFG);
 642			writel(readl(dev->base + RXCFG) & ~RXCFG_RX_FD,
 643			       dev->base + RXCFG);
 644			/* Turn off full duplex LED */
 645			writel(readl(dev->base + GPIOR) & ~GPIOR_GP1_OUT,
 646			       dev->base + GPIOR);
 647		}
 648
 649		speed = 4; /* 1000F */
 650
 651	} else {
 652		/* we have a copper transceiver */
 653		new_cfg = dev->CFG_cache & ~(CFG_SB | CFG_MODE_1000 | CFG_SPDSTS);
 654
 655		if (cfg & CFG_SPDSTS1)
 656			new_cfg |= CFG_MODE_1000;
 657		else
 658			new_cfg &= ~CFG_MODE_1000;
 659
 660		speed = ((cfg / CFG_SPDSTS0) & 3);
 661		fullduplex = (cfg & CFG_DUPSTS);
 662
 663		if (fullduplex) {
 664			new_cfg |= CFG_SB;
 665			writel(readl(dev->base + TXCFG)
 666					| TXCFG_CSI | TXCFG_HBI,
 667			       dev->base + TXCFG);
 668			writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
 669			       dev->base + RXCFG);
 670		} else {
 671			writel(readl(dev->base + TXCFG)
 672					& ~(TXCFG_CSI | TXCFG_HBI),
 673			       dev->base + TXCFG);
 674			writel(readl(dev->base + RXCFG) & ~(RXCFG_RX_FD),
 675			       dev->base + RXCFG);
 676		}
 677
 678		if ((cfg & CFG_LNKSTS) &&
 679		    ((new_cfg ^ dev->CFG_cache) != 0)) {
 680			writel(new_cfg, dev->base + CFG);
 681			dev->CFG_cache = new_cfg;
 682		}
 683
 684		dev->CFG_cache &= ~CFG_SPDSTS;
 685		dev->CFG_cache |= cfg & CFG_SPDSTS;
 686	}
 687
 688	newlinkstate = (cfg & CFG_LNKSTS) ? LINK_UP : LINK_DOWN;
 689
 690	if (newlinkstate & LINK_UP &&
 691	    dev->linkstate != newlinkstate) {
 692		netif_start_queue(ndev);
 693		netif_wake_queue(ndev);
 694		printk(KERN_INFO "%s: link now %s mbps, %s duplex and up.\n",
 695			ndev->name,
 696			speeds[speed],
 697			fullduplex ? "full" : "half");
 698	} else if (newlinkstate & LINK_DOWN &&
 699		   dev->linkstate != newlinkstate) {
 700		netif_stop_queue(ndev);
 701		printk(KERN_INFO "%s: link now down.\n", ndev->name);
 702	}
 703
 704	dev->linkstate = newlinkstate;
 705}
 706
 707static int ns83820_setup_rx(struct net_device *ndev)
 708{
 709	struct ns83820 *dev = PRIV(ndev);
 710	unsigned i;
 711	int ret;
 712
 713	dprintk("ns83820_setup_rx(%p)\n", ndev);
 714
 715	dev->rx_info.idle = 1;
 716	dev->rx_info.next_rx = 0;
 717	dev->rx_info.next_rx_desc = dev->rx_info.descs;
 718	dev->rx_info.next_empty = 0;
 719
 720	for (i=0; i<NR_RX_DESC; i++)
 721		clear_rx_desc(dev, i);
 722
 723	writel(0, dev->base + RXDP_HI);
 724	writel(dev->rx_info.phy_descs, dev->base + RXDP);
 725
 726	ret = rx_refill(ndev, GFP_KERNEL);
 727	if (!ret) {
 728		dprintk("starting receiver\n");
 729		/* prevent the interrupt handler from stomping on us */
 730		spin_lock_irq(&dev->rx_info.lock);
 731
 732		writel(0x0001, dev->base + CCSR);
 733		writel(0, dev->base + RFCR);
 734		writel(0x7fc00000, dev->base + RFCR);
 735		writel(0xffc00000, dev->base + RFCR);
 736
 737		dev->rx_info.up = 1;
 738
 739		phy_intr(ndev);
 740
 741		/* Okay, let it rip */
 742		spin_lock(&dev->misc_lock);
 743		dev->IMR_cache |= ISR_PHY;
 744		dev->IMR_cache |= ISR_RXRCMP;
 745		//dev->IMR_cache |= ISR_RXERR;
 746		//dev->IMR_cache |= ISR_RXOK;
 747		dev->IMR_cache |= ISR_RXORN;
 748		dev->IMR_cache |= ISR_RXSOVR;
 749		dev->IMR_cache |= ISR_RXDESC;
 750		dev->IMR_cache |= ISR_RXIDLE;
 751		dev->IMR_cache |= ISR_TXDESC;
 752		dev->IMR_cache |= ISR_TXIDLE;
 753
 754		writel(dev->IMR_cache, dev->base + IMR);
 755		writel(1, dev->base + IER);
 756		spin_unlock(&dev->misc_lock);
 757
 758		kick_rx(ndev);
 759
 760		spin_unlock_irq(&dev->rx_info.lock);
 761	}
 762	return ret;
 763}
 764
 765static void ns83820_cleanup_rx(struct ns83820 *dev)
 766{
 767	unsigned i;
 768	unsigned long flags;
 769
 770	dprintk("ns83820_cleanup_rx(%p)\n", dev);
 771
 772	/* disable receive interrupts */
 773	spin_lock_irqsave(&dev->misc_lock, flags);
 774	dev->IMR_cache &= ~(ISR_RXOK | ISR_RXDESC | ISR_RXERR | ISR_RXEARLY | ISR_RXIDLE);
 775	writel(dev->IMR_cache, dev->base + IMR);
 776	spin_unlock_irqrestore(&dev->misc_lock, flags);
 777
 778	/* synchronize with the interrupt handler and kill it */
 779	dev->rx_info.up = 0;
 780	synchronize_irq(dev->pci_dev->irq);
 781
 782	/* touch the pci bus... */
 783	readl(dev->base + IMR);
 784
 785	/* assumes the transmitter is already disabled and reset */
 786	writel(0, dev->base + RXDP_HI);
 787	writel(0, dev->base + RXDP);
 788
 789	for (i=0; i<NR_RX_DESC; i++) {
 790		struct sk_buff *skb = dev->rx_info.skbs[i];
 791		dev->rx_info.skbs[i] = NULL;
 792		clear_rx_desc(dev, i);
 793		kfree_skb(skb);
 794	}
 795}
 796
 797static void ns83820_rx_kick(struct net_device *ndev)
 798{
 799	struct ns83820 *dev = PRIV(ndev);
 800	/*if (nr_rx_empty(dev) >= NR_RX_DESC/4)*/ {
 801		if (dev->rx_info.up) {
 802			rx_refill_atomic(ndev);
 803			kick_rx(ndev);
 804		}
 805	}
 806
 807	if (dev->rx_info.up && nr_rx_empty(dev) > NR_RX_DESC*3/4)
 808		schedule_work(&dev->tq_refill);
 809	else
 810		kick_rx(ndev);
 811	if (dev->rx_info.idle)
 812		printk(KERN_DEBUG "%s: BAD\n", ndev->name);
 813}
 814
 815/* rx_irq
 816 *
 817 */
 818static void rx_irq(struct net_device *ndev)
 819{
 820	struct ns83820 *dev = PRIV(ndev);
 821	struct rx_info *info = &dev->rx_info;
 822	unsigned next_rx;
 823	int rx_rc, len;
 824	u32 cmdsts;
 825	__le32 *desc;
 826	unsigned long flags;
 827	int nr = 0;
 828
 829	dprintk("rx_irq(%p)\n", ndev);
 830	dprintk("rxdp: %08x, descs: %08lx next_rx[%d]: %p next_empty[%d]: %p\n",
 831		readl(dev->base + RXDP),
 832		(long)(dev->rx_info.phy_descs),
 833		(int)dev->rx_info.next_rx,
 834		(dev->rx_info.descs + (DESC_SIZE * dev->rx_info.next_rx)),
 835		(int)dev->rx_info.next_empty,
 836		(dev->rx_info.descs + (DESC_SIZE * dev->rx_info.next_empty))
 837		);
 838
 839	spin_lock_irqsave(&info->lock, flags);
 840	if (!info->up)
 841		goto out;
 842
 843	dprintk("walking descs\n");
 844	next_rx = info->next_rx;
 845	desc = info->next_rx_desc;
 846	while ((CMDSTS_OWN & (cmdsts = le32_to_cpu(desc[DESC_CMDSTS]))) &&
 847	       (cmdsts != CMDSTS_OWN)) {
 848		struct sk_buff *skb;
 849		u32 extsts = le32_to_cpu(desc[DESC_EXTSTS]);
 850		dma_addr_t bufptr = desc_addr_get(desc + DESC_BUFPTR);
 851
 852		dprintk("cmdsts: %08x\n", cmdsts);
 853		dprintk("link: %08x\n", cpu_to_le32(desc[DESC_LINK]));
 854		dprintk("extsts: %08x\n", extsts);
 855
 856		skb = info->skbs[next_rx];
 857		info->skbs[next_rx] = NULL;
 858		info->next_rx = (next_rx + 1) % NR_RX_DESC;
 859
 860		mb();
 861		clear_rx_desc(dev, next_rx);
 862
 863		dma_unmap_single(&dev->pci_dev->dev, bufptr, RX_BUF_SIZE,
 864				 DMA_FROM_DEVICE);
 865		len = cmdsts & CMDSTS_LEN_MASK;
 866#ifdef NS83820_VLAN_ACCEL_SUPPORT
 867		/* NH: As was mentioned below, this chip is kinda
 868		 * brain dead about vlan tag stripping.  Frames
 869		 * that are 64 bytes with a vlan header appended
 870		 * like arp frames, or pings, are flagged as Runts
 871		 * when the tag is stripped and hardware.  This
 872		 * also means that the OK bit in the descriptor
 873		 * is cleared when the frame comes in so we have
 874		 * to do a specific length check here to make sure
 875		 * the frame would have been ok, had we not stripped
 876		 * the tag.
 877		 */
 878		if (likely((CMDSTS_OK & cmdsts) ||
 879			((cmdsts & CMDSTS_RUNT) && len >= 56))) {
 880#else
 881		if (likely(CMDSTS_OK & cmdsts)) {
 882#endif
 883			skb_put(skb, len);
 884			if (unlikely(!skb))
 885				goto netdev_mangle_me_harder_failed;
 886			if (cmdsts & CMDSTS_DEST_MULTI)
 887				ndev->stats.multicast++;
 888			ndev->stats.rx_packets++;
 889			ndev->stats.rx_bytes += len;
 890			if ((extsts & 0x002a0000) && !(extsts & 0x00540000)) {
 891				skb->ip_summed = CHECKSUM_UNNECESSARY;
 892			} else {
 893				skb_checksum_none_assert(skb);
 894			}
 895			skb->protocol = eth_type_trans(skb, ndev);
 896#ifdef NS83820_VLAN_ACCEL_SUPPORT
 897			if(extsts & EXTSTS_VPKT) {
 898				unsigned short tag;
 899
 900				tag = ntohs(extsts & EXTSTS_VTG_MASK);
 901				__vlan_hwaccel_put_tag(skb, htons(ETH_P_IPV6), tag);
 902			}
 903#endif
 904			rx_rc = netif_rx(skb);
 905			if (NET_RX_DROP == rx_rc) {
 906netdev_mangle_me_harder_failed:
 907				ndev->stats.rx_dropped++;
 908			}
 909		} else {
 910			dev_kfree_skb_irq(skb);
 911		}
 912
 913		nr++;
 914		next_rx = info->next_rx;
 915		desc = info->descs + (DESC_SIZE * next_rx);
 916	}
 917	info->next_rx = next_rx;
 918	info->next_rx_desc = info->descs + (DESC_SIZE * next_rx);
 919
 920out:
 921	if (0 && !nr) {
 922		Dprintk("dazed: cmdsts_f: %08x\n", cmdsts);
 923	}
 924
 925	spin_unlock_irqrestore(&info->lock, flags);
 926}
 927
 928static void rx_action(struct tasklet_struct *t)
 929{
 930	struct ns83820 *dev = from_tasklet(dev, t, rx_tasklet);
 931	struct net_device *ndev = dev->ndev;
 932	rx_irq(ndev);
 933	writel(ihr, dev->base + IHR);
 934
 935	spin_lock_irq(&dev->misc_lock);
 936	dev->IMR_cache |= ISR_RXDESC;
 937	writel(dev->IMR_cache, dev->base + IMR);
 938	spin_unlock_irq(&dev->misc_lock);
 939
 940	rx_irq(ndev);
 941	ns83820_rx_kick(ndev);
 942}
 943
 944/* Packet Transmit code
 945 */
 946static inline void kick_tx(struct ns83820 *dev)
 947{
 948	dprintk("kick_tx(%p): tx_idx=%d free_idx=%d\n",
 949		dev, dev->tx_idx, dev->tx_free_idx);
 950	writel(CR_TXE, dev->base + CR);
 951}
 952
 953/* No spinlock needed on the transmit irq path as the interrupt handler is
 954 * serialized.
 955 */
 956static void do_tx_done(struct net_device *ndev)
 957{
 958	struct ns83820 *dev = PRIV(ndev);
 959	u32 cmdsts, tx_done_idx;
 960	__le32 *desc;
 961
 962	dprintk("do_tx_done(%p)\n", ndev);
 963	tx_done_idx = dev->tx_done_idx;
 964	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
 965
 966	dprintk("tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
 967		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
 968	while ((tx_done_idx != dev->tx_free_idx) &&
 969	       !(CMDSTS_OWN & (cmdsts = le32_to_cpu(desc[DESC_CMDSTS]))) ) {
 970		struct sk_buff *skb;
 971		unsigned len;
 972		dma_addr_t addr;
 973
 974		if (cmdsts & CMDSTS_ERR)
 975			ndev->stats.tx_errors++;
 976		if (cmdsts & CMDSTS_OK)
 977			ndev->stats.tx_packets++;
 978		if (cmdsts & CMDSTS_OK)
 979			ndev->stats.tx_bytes += cmdsts & 0xffff;
 980
 981		dprintk("tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
 982			tx_done_idx, dev->tx_free_idx, cmdsts);
 983		skb = dev->tx_skbs[tx_done_idx];
 984		dev->tx_skbs[tx_done_idx] = NULL;
 985		dprintk("done(%p)\n", skb);
 986
 987		len = cmdsts & CMDSTS_LEN_MASK;
 988		addr = desc_addr_get(desc + DESC_BUFPTR);
 989		if (skb) {
 990			dma_unmap_single(&dev->pci_dev->dev, addr, len,
 991					 DMA_TO_DEVICE);
 992			dev_consume_skb_irq(skb);
 
 
 993			atomic_dec(&dev->nr_tx_skbs);
 994		} else
 995			dma_unmap_page(&dev->pci_dev->dev, addr, len,
 996				       DMA_TO_DEVICE);
 
 
 997
 998		tx_done_idx = (tx_done_idx + 1) % NR_TX_DESC;
 999		dev->tx_done_idx = tx_done_idx;
1000		desc[DESC_CMDSTS] = cpu_to_le32(0);
1001		mb();
1002		desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1003	}
1004
1005	/* Allow network stack to resume queueing packets after we've
1006	 * finished transmitting at least 1/4 of the packets in the queue.
1007	 */
1008	if (netif_queue_stopped(ndev) && start_tx_okay(dev)) {
1009		dprintk("start_queue(%p)\n", ndev);
1010		netif_start_queue(ndev);
1011		netif_wake_queue(ndev);
1012	}
1013}
1014
1015static void ns83820_cleanup_tx(struct ns83820 *dev)
1016{
1017	unsigned i;
1018
1019	for (i=0; i<NR_TX_DESC; i++) {
1020		struct sk_buff *skb = dev->tx_skbs[i];
1021		dev->tx_skbs[i] = NULL;
1022		if (skb) {
1023			__le32 *desc = dev->tx_descs + (i * DESC_SIZE);
1024			dma_unmap_single(&dev->pci_dev->dev,
1025					 desc_addr_get(desc + DESC_BUFPTR),
1026					 le32_to_cpu(desc[DESC_CMDSTS]) & CMDSTS_LEN_MASK,
1027					 DMA_TO_DEVICE);
1028			dev_kfree_skb_irq(skb);
1029			atomic_dec(&dev->nr_tx_skbs);
1030		}
1031	}
1032
1033	memset(dev->tx_descs, 0, NR_TX_DESC * DESC_SIZE * 4);
1034}
1035
1036/* transmit routine.  This code relies on the network layer serializing
1037 * its calls in, but will run happily in parallel with the interrupt
1038 * handler.  This code currently has provisions for fragmenting tx buffers
1039 * while trying to track down a bug in either the zero copy code or
1040 * the tx fifo (hence the MAX_FRAG_LEN).
1041 */
1042static netdev_tx_t ns83820_hard_start_xmit(struct sk_buff *skb,
1043					   struct net_device *ndev)
1044{
1045	struct ns83820 *dev = PRIV(ndev);
1046	u32 free_idx, cmdsts, extsts;
1047	int nr_free, nr_frags;
1048	unsigned tx_done_idx, last_idx;
1049	dma_addr_t buf;
1050	unsigned len;
1051	skb_frag_t *frag;
1052	int stopped = 0;
1053	int do_intr = 0;
1054	volatile __le32 *first_desc;
1055
1056	dprintk("ns83820_hard_start_xmit\n");
1057
1058	nr_frags =  skb_shinfo(skb)->nr_frags;
1059again:
1060	if (unlikely(dev->CFG_cache & CFG_LNKSTS)) {
1061		netif_stop_queue(ndev);
1062		if (unlikely(dev->CFG_cache & CFG_LNKSTS))
1063			return NETDEV_TX_BUSY;
1064		netif_start_queue(ndev);
1065	}
1066
1067	last_idx = free_idx = dev->tx_free_idx;
1068	tx_done_idx = dev->tx_done_idx;
1069	nr_free = (tx_done_idx + NR_TX_DESC-2 - free_idx) % NR_TX_DESC;
1070	nr_free -= 1;
1071	if (nr_free <= nr_frags) {
1072		dprintk("stop_queue - not enough(%p)\n", ndev);
1073		netif_stop_queue(ndev);
1074
1075		/* Check again: we may have raced with a tx done irq */
1076		if (dev->tx_done_idx != tx_done_idx) {
1077			dprintk("restart queue(%p)\n", ndev);
1078			netif_start_queue(ndev);
1079			goto again;
1080		}
1081		return NETDEV_TX_BUSY;
1082	}
1083
1084	if (free_idx == dev->tx_intr_idx) {
1085		do_intr = 1;
1086		dev->tx_intr_idx = (dev->tx_intr_idx + NR_TX_DESC/4) % NR_TX_DESC;
1087	}
1088
1089	nr_free -= nr_frags;
1090	if (nr_free < MIN_TX_DESC_FREE) {
1091		dprintk("stop_queue - last entry(%p)\n", ndev);
1092		netif_stop_queue(ndev);
1093		stopped = 1;
1094	}
1095
1096	frag = skb_shinfo(skb)->frags;
1097	if (!nr_frags)
1098		frag = NULL;
1099	extsts = 0;
1100	if (skb->ip_summed == CHECKSUM_PARTIAL) {
1101		extsts |= EXTSTS_IPPKT;
1102		if (IPPROTO_TCP == ip_hdr(skb)->protocol)
1103			extsts |= EXTSTS_TCPPKT;
1104		else if (IPPROTO_UDP == ip_hdr(skb)->protocol)
1105			extsts |= EXTSTS_UDPPKT;
1106	}
1107
1108#ifdef NS83820_VLAN_ACCEL_SUPPORT
1109	if (skb_vlan_tag_present(skb)) {
1110		/* fetch the vlan tag info out of the
1111		 * ancillary data if the vlan code
1112		 * is using hw vlan acceleration
1113		 */
1114		short tag = skb_vlan_tag_get(skb);
1115		extsts |= (EXTSTS_VPKT | htons(tag));
1116	}
1117#endif
1118
1119	len = skb->len;
1120	if (nr_frags)
1121		len -= skb->data_len;
1122	buf = dma_map_single(&dev->pci_dev->dev, skb->data, len,
1123			     DMA_TO_DEVICE);
1124
1125	first_desc = dev->tx_descs + (free_idx * DESC_SIZE);
1126
1127	for (;;) {
1128		volatile __le32 *desc = dev->tx_descs + (free_idx * DESC_SIZE);
1129
1130		dprintk("frag[%3u]: %4u @ 0x%08Lx\n", free_idx, len,
1131			(unsigned long long)buf);
1132		last_idx = free_idx;
1133		free_idx = (free_idx + 1) % NR_TX_DESC;
1134		desc[DESC_LINK] = cpu_to_le32(dev->tx_phy_descs + (free_idx * DESC_SIZE * 4));
1135		desc_addr_set(desc + DESC_BUFPTR, buf);
1136		desc[DESC_EXTSTS] = cpu_to_le32(extsts);
1137
1138		cmdsts = ((nr_frags) ? CMDSTS_MORE : do_intr ? CMDSTS_INTR : 0);
1139		cmdsts |= (desc == first_desc) ? 0 : CMDSTS_OWN;
1140		cmdsts |= len;
1141		desc[DESC_CMDSTS] = cpu_to_le32(cmdsts);
1142
1143		if (!nr_frags)
1144			break;
1145
1146		buf = skb_frag_dma_map(&dev->pci_dev->dev, frag, 0,
1147				       skb_frag_size(frag), DMA_TO_DEVICE);
1148		dprintk("frag: buf=%08Lx  page=%08lx offset=%08lx\n",
1149			(long long)buf, (long) page_to_pfn(frag->page),
1150			frag->page_offset);
1151		len = skb_frag_size(frag);
1152		frag++;
1153		nr_frags--;
1154	}
1155	dprintk("done pkt\n");
1156
1157	spin_lock_irq(&dev->tx_lock);
1158	dev->tx_skbs[last_idx] = skb;
1159	first_desc[DESC_CMDSTS] |= cpu_to_le32(CMDSTS_OWN);
1160	dev->tx_free_idx = free_idx;
1161	atomic_inc(&dev->nr_tx_skbs);
1162	spin_unlock_irq(&dev->tx_lock);
1163
1164	kick_tx(dev);
1165
1166	/* Check again: we may have raced with a tx done irq */
1167	if (stopped && (dev->tx_done_idx != tx_done_idx) && start_tx_okay(dev))
1168		netif_start_queue(ndev);
1169
1170	return NETDEV_TX_OK;
1171}
1172
1173static void ns83820_update_stats(struct ns83820 *dev)
1174{
1175	struct net_device *ndev = dev->ndev;
1176	u8 __iomem *base = dev->base;
1177
1178	/* the DP83820 will freeze counters, so we need to read all of them */
1179	ndev->stats.rx_errors		+= readl(base + 0x60) & 0xffff;
1180	ndev->stats.rx_crc_errors	+= readl(base + 0x64) & 0xffff;
1181	ndev->stats.rx_missed_errors	+= readl(base + 0x68) & 0xffff;
1182	ndev->stats.rx_frame_errors	+= readl(base + 0x6c) & 0xffff;
1183	/*ndev->stats.rx_symbol_errors +=*/ readl(base + 0x70);
1184	ndev->stats.rx_length_errors	+= readl(base + 0x74) & 0xffff;
1185	ndev->stats.rx_length_errors	+= readl(base + 0x78) & 0xffff;
1186	/*ndev->stats.rx_badopcode_errors += */ readl(base + 0x7c);
1187	/*ndev->stats.rx_pause_count += */  readl(base + 0x80);
1188	/*ndev->stats.tx_pause_count += */  readl(base + 0x84);
1189	ndev->stats.tx_carrier_errors	+= readl(base + 0x88) & 0xff;
1190}
1191
1192static struct net_device_stats *ns83820_get_stats(struct net_device *ndev)
1193{
1194	struct ns83820 *dev = PRIV(ndev);
1195
1196	/* somewhat overkill */
1197	spin_lock_irq(&dev->misc_lock);
1198	ns83820_update_stats(dev);
1199	spin_unlock_irq(&dev->misc_lock);
1200
1201	return &ndev->stats;
1202}
1203
1204/* Let ethtool retrieve info */
1205static int ns83820_get_link_ksettings(struct net_device *ndev,
1206				      struct ethtool_link_ksettings *cmd)
1207{
1208	struct ns83820 *dev = PRIV(ndev);
1209	u32 cfg, tbicr;
1210	int fullduplex   = 0;
1211	u32 supported;
1212
1213	/*
1214	 * Here's the list of available ethtool commands from other drivers:
1215	 *	cmd->advertising =
1216	 *	ethtool_cmd_speed_set(cmd, ...)
1217	 *	cmd->duplex =
1218	 *	cmd->port = 0;
1219	 *	cmd->phy_address =
1220	 *	cmd->transceiver = 0;
1221	 *	cmd->autoneg =
1222	 *	cmd->maxtxpkt = 0;
1223	 *	cmd->maxrxpkt = 0;
1224	 */
1225
1226	/* read current configuration */
1227	cfg   = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1228	readl(dev->base + TANAR);
1229	tbicr = readl(dev->base + TBICR);
1230
1231	fullduplex = (cfg & CFG_DUPSTS) ? 1 : 0;
1232
1233	supported = SUPPORTED_Autoneg;
1234
1235	if (dev->CFG_cache & CFG_TBI_EN) {
1236		/* we have optical interface */
1237		supported |= SUPPORTED_1000baseT_Half |
1238					SUPPORTED_1000baseT_Full |
1239					SUPPORTED_FIBRE;
1240		cmd->base.port       = PORT_FIBRE;
1241	} else {
1242		/* we have copper */
1243		supported |= SUPPORTED_10baseT_Half |
1244			SUPPORTED_10baseT_Full | SUPPORTED_100baseT_Half |
1245			SUPPORTED_100baseT_Full | SUPPORTED_1000baseT_Half |
1246			SUPPORTED_1000baseT_Full |
1247			SUPPORTED_MII;
1248		cmd->base.port = PORT_MII;
1249	}
1250
1251	ethtool_convert_legacy_u32_to_link_mode(cmd->link_modes.supported,
1252						supported);
1253
1254	cmd->base.duplex = fullduplex ? DUPLEX_FULL : DUPLEX_HALF;
1255	switch (cfg / CFG_SPDSTS0 & 3) {
1256	case 2:
1257		cmd->base.speed = SPEED_1000;
1258		break;
1259	case 1:
1260		cmd->base.speed = SPEED_100;
1261		break;
1262	default:
1263		cmd->base.speed = SPEED_10;
1264		break;
1265	}
1266	cmd->base.autoneg = (tbicr & TBICR_MR_AN_ENABLE)
1267		? AUTONEG_ENABLE : AUTONEG_DISABLE;
1268	return 0;
1269}
1270
1271/* Let ethool change settings*/
1272static int ns83820_set_link_ksettings(struct net_device *ndev,
1273				      const struct ethtool_link_ksettings *cmd)
1274{
1275	struct ns83820 *dev = PRIV(ndev);
1276	u32 cfg, tanar;
1277	int have_optical = 0;
1278	int fullduplex   = 0;
1279
1280	/* read current configuration */
1281	cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1282	tanar = readl(dev->base + TANAR);
1283
1284	if (dev->CFG_cache & CFG_TBI_EN) {
1285		/* we have optical */
1286		have_optical = 1;
1287		fullduplex   = (tanar & TANAR_FULL_DUP);
1288
1289	} else {
1290		/* we have copper */
1291		fullduplex = cfg & CFG_DUPSTS;
1292	}
1293
1294	spin_lock_irq(&dev->misc_lock);
1295	spin_lock(&dev->tx_lock);
1296
1297	/* Set duplex */
1298	if (cmd->base.duplex != fullduplex) {
1299		if (have_optical) {
1300			/*set full duplex*/
1301			if (cmd->base.duplex == DUPLEX_FULL) {
1302				/* force full duplex */
1303				writel(readl(dev->base + TXCFG)
1304					| TXCFG_CSI | TXCFG_HBI | TXCFG_ATP,
1305					dev->base + TXCFG);
1306				writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
1307					dev->base + RXCFG);
1308				/* Light up full duplex LED */
1309				writel(readl(dev->base + GPIOR) | GPIOR_GP1_OUT,
1310					dev->base + GPIOR);
1311			} else {
1312				/*TODO: set half duplex */
1313			}
1314
1315		} else {
1316			/*we have copper*/
1317			/* TODO: Set duplex for copper cards */
1318		}
1319		printk(KERN_INFO "%s: Duplex set via ethtool\n",
1320		ndev->name);
1321	}
1322
1323	/* Set autonegotiation */
1324	if (1) {
1325		if (cmd->base.autoneg == AUTONEG_ENABLE) {
1326			/* restart auto negotiation */
1327			writel(TBICR_MR_AN_ENABLE | TBICR_MR_RESTART_AN,
1328				dev->base + TBICR);
1329			writel(TBICR_MR_AN_ENABLE, dev->base + TBICR);
1330				dev->linkstate = LINK_AUTONEGOTIATE;
1331
1332			printk(KERN_INFO "%s: autoneg enabled via ethtool\n",
1333				ndev->name);
1334		} else {
1335			/* disable auto negotiation */
1336			writel(0x00000000, dev->base + TBICR);
1337		}
1338
1339		printk(KERN_INFO "%s: autoneg %s via ethtool\n", ndev->name,
1340				cmd->base.autoneg ? "ENABLED" : "DISABLED");
1341	}
1342
1343	phy_intr(ndev);
1344	spin_unlock(&dev->tx_lock);
1345	spin_unlock_irq(&dev->misc_lock);
1346
1347	return 0;
1348}
1349/* end ethtool get/set support -df */
1350
1351static void ns83820_get_drvinfo(struct net_device *ndev, struct ethtool_drvinfo *info)
1352{
1353	struct ns83820 *dev = PRIV(ndev);
1354	strscpy(info->driver, "ns83820", sizeof(info->driver));
1355	strscpy(info->version, VERSION, sizeof(info->version));
1356	strscpy(info->bus_info, pci_name(dev->pci_dev), sizeof(info->bus_info));
1357}
1358
1359static u32 ns83820_get_link(struct net_device *ndev)
1360{
1361	struct ns83820 *dev = PRIV(ndev);
1362	u32 cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1363	return cfg & CFG_LNKSTS ? 1 : 0;
1364}
1365
1366static const struct ethtool_ops ops = {
 
 
1367	.get_drvinfo     = ns83820_get_drvinfo,
1368	.get_link        = ns83820_get_link,
1369	.get_link_ksettings = ns83820_get_link_ksettings,
1370	.set_link_ksettings = ns83820_set_link_ksettings,
1371};
1372
1373static inline void ns83820_disable_interrupts(struct ns83820 *dev)
1374{
1375	writel(0, dev->base + IMR);
1376	writel(0, dev->base + IER);
1377	readl(dev->base + IER);
1378}
1379
1380/* this function is called in irq context from the ISR */
1381static void ns83820_mib_isr(struct ns83820 *dev)
1382{
1383	unsigned long flags;
1384	spin_lock_irqsave(&dev->misc_lock, flags);
1385	ns83820_update_stats(dev);
1386	spin_unlock_irqrestore(&dev->misc_lock, flags);
1387}
1388
1389static void ns83820_do_isr(struct net_device *ndev, u32 isr);
1390static irqreturn_t ns83820_irq(int foo, void *data)
1391{
1392	struct net_device *ndev = data;
1393	struct ns83820 *dev = PRIV(ndev);
1394	u32 isr;
1395	dprintk("ns83820_irq(%p)\n", ndev);
1396
1397	dev->ihr = 0;
1398
1399	isr = readl(dev->base + ISR);
1400	dprintk("irq: %08x\n", isr);
1401	ns83820_do_isr(ndev, isr);
1402	return IRQ_HANDLED;
1403}
1404
1405static void ns83820_do_isr(struct net_device *ndev, u32 isr)
1406{
1407	struct ns83820 *dev = PRIV(ndev);
1408	unsigned long flags;
1409
1410#ifdef DEBUG
1411	if (isr & ~(ISR_PHY | ISR_RXDESC | ISR_RXEARLY | ISR_RXOK | ISR_RXERR | ISR_TXIDLE | ISR_TXOK | ISR_TXDESC))
1412		Dprintk("odd isr? 0x%08x\n", isr);
1413#endif
1414
1415	if (ISR_RXIDLE & isr) {
1416		dev->rx_info.idle = 1;
1417		Dprintk("oh dear, we are idle\n");
1418		ns83820_rx_kick(ndev);
1419	}
1420
1421	if ((ISR_RXDESC | ISR_RXOK) & isr) {
1422		prefetch(dev->rx_info.next_rx_desc);
1423
1424		spin_lock_irqsave(&dev->misc_lock, flags);
1425		dev->IMR_cache &= ~(ISR_RXDESC | ISR_RXOK);
1426		writel(dev->IMR_cache, dev->base + IMR);
1427		spin_unlock_irqrestore(&dev->misc_lock, flags);
1428
1429		tasklet_schedule(&dev->rx_tasklet);
1430		//rx_irq(ndev);
1431		//writel(4, dev->base + IHR);
1432	}
1433
1434	if ((ISR_RXIDLE | ISR_RXORN | ISR_RXDESC | ISR_RXOK | ISR_RXERR) & isr)
1435		ns83820_rx_kick(ndev);
1436
1437	if (unlikely(ISR_RXSOVR & isr)) {
1438		//printk("overrun: rxsovr\n");
1439		ndev->stats.rx_fifo_errors++;
1440	}
1441
1442	if (unlikely(ISR_RXORN & isr)) {
1443		//printk("overrun: rxorn\n");
1444		ndev->stats.rx_fifo_errors++;
1445	}
1446
1447	if ((ISR_RXRCMP & isr) && dev->rx_info.up)
1448		writel(CR_RXE, dev->base + CR);
1449
1450	if (ISR_TXIDLE & isr) {
1451		u32 txdp;
1452		txdp = readl(dev->base + TXDP);
1453		dprintk("txdp: %08x\n", txdp);
1454		txdp -= dev->tx_phy_descs;
1455		dev->tx_idx = txdp / (DESC_SIZE * 4);
1456		if (dev->tx_idx >= NR_TX_DESC) {
1457			printk(KERN_ALERT "%s: BUG -- txdp out of range\n", ndev->name);
1458			dev->tx_idx = 0;
1459		}
1460		/* The may have been a race between a pci originated read
1461		 * and the descriptor update from the cpu.  Just in case,
1462		 * kick the transmitter if the hardware thinks it is on a
1463		 * different descriptor than we are.
1464		 */
1465		if (dev->tx_idx != dev->tx_free_idx)
1466			kick_tx(dev);
1467	}
1468
1469	/* Defer tx ring processing until more than a minimum amount of
1470	 * work has accumulated
1471	 */
1472	if ((ISR_TXDESC | ISR_TXIDLE | ISR_TXOK | ISR_TXERR) & isr) {
1473		spin_lock_irqsave(&dev->tx_lock, flags);
1474		do_tx_done(ndev);
1475		spin_unlock_irqrestore(&dev->tx_lock, flags);
1476
1477		/* Disable TxOk if there are no outstanding tx packets.
1478		 */
1479		if ((dev->tx_done_idx == dev->tx_free_idx) &&
1480		    (dev->IMR_cache & ISR_TXOK)) {
1481			spin_lock_irqsave(&dev->misc_lock, flags);
1482			dev->IMR_cache &= ~ISR_TXOK;
1483			writel(dev->IMR_cache, dev->base + IMR);
1484			spin_unlock_irqrestore(&dev->misc_lock, flags);
1485		}
1486	}
1487
1488	/* The TxIdle interrupt can come in before the transmit has
1489	 * completed.  Normally we reap packets off of the combination
1490	 * of TxDesc and TxIdle and leave TxOk disabled (since it
1491	 * occurs on every packet), but when no further irqs of this
1492	 * nature are expected, we must enable TxOk.
1493	 */
1494	if ((ISR_TXIDLE & isr) && (dev->tx_done_idx != dev->tx_free_idx)) {
1495		spin_lock_irqsave(&dev->misc_lock, flags);
1496		dev->IMR_cache |= ISR_TXOK;
1497		writel(dev->IMR_cache, dev->base + IMR);
1498		spin_unlock_irqrestore(&dev->misc_lock, flags);
1499	}
1500
1501	/* MIB interrupt: one of the statistics counters is about to overflow */
1502	if (unlikely(ISR_MIB & isr))
1503		ns83820_mib_isr(dev);
1504
1505	/* PHY: Link up/down/negotiation state change */
1506	if (unlikely(ISR_PHY & isr))
1507		phy_intr(ndev);
1508
1509#if 0	/* Still working on the interrupt mitigation strategy */
1510	if (dev->ihr)
1511		writel(dev->ihr, dev->base + IHR);
1512#endif
1513}
1514
1515static void ns83820_do_reset(struct ns83820 *dev, u32 which)
1516{
1517	Dprintk("resetting chip...\n");
1518	writel(which, dev->base + CR);
1519	do {
1520		schedule();
1521	} while (readl(dev->base + CR) & which);
1522	Dprintk("okay!\n");
1523}
1524
1525static int ns83820_stop(struct net_device *ndev)
1526{
1527	struct ns83820 *dev = PRIV(ndev);
1528
1529	/* FIXME: protect against interrupt handler? */
1530	del_timer_sync(&dev->tx_watchdog);
1531
1532	ns83820_disable_interrupts(dev);
1533
1534	dev->rx_info.up = 0;
1535	synchronize_irq(dev->pci_dev->irq);
1536
1537	ns83820_do_reset(dev, CR_RST);
1538
1539	synchronize_irq(dev->pci_dev->irq);
1540
1541	spin_lock_irq(&dev->misc_lock);
1542	dev->IMR_cache &= ~(ISR_TXURN | ISR_TXIDLE | ISR_TXERR | ISR_TXDESC | ISR_TXOK);
1543	spin_unlock_irq(&dev->misc_lock);
1544
1545	ns83820_cleanup_rx(dev);
1546	ns83820_cleanup_tx(dev);
1547
1548	return 0;
1549}
1550
1551static void ns83820_tx_timeout(struct net_device *ndev, unsigned int txqueue)
1552{
1553	struct ns83820 *dev = PRIV(ndev);
1554        u32 tx_done_idx;
1555	__le32 *desc;
1556	unsigned long flags;
1557
1558	spin_lock_irqsave(&dev->tx_lock, flags);
1559
1560	tx_done_idx = dev->tx_done_idx;
1561	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1562
1563	printk(KERN_INFO "%s: tx_timeout: tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
1564		ndev->name,
1565		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
1566
1567#if defined(DEBUG)
1568	{
1569		u32 isr;
1570		isr = readl(dev->base + ISR);
1571		printk("irq: %08x imr: %08x\n", isr, dev->IMR_cache);
1572		ns83820_do_isr(ndev, isr);
1573	}
1574#endif
1575
1576	do_tx_done(ndev);
1577
1578	tx_done_idx = dev->tx_done_idx;
1579	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1580
1581	printk(KERN_INFO "%s: after: tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
1582		ndev->name,
1583		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
1584
1585	spin_unlock_irqrestore(&dev->tx_lock, flags);
1586}
1587
1588static void ns83820_tx_watch(struct timer_list *t)
1589{
1590	struct ns83820 *dev = from_timer(dev, t, tx_watchdog);
1591	struct net_device *ndev = dev->ndev;
1592
1593#if defined(DEBUG)
1594	printk("ns83820_tx_watch: %u %u %d\n",
1595		dev->tx_done_idx, dev->tx_free_idx, atomic_read(&dev->nr_tx_skbs)
1596		);
1597#endif
1598
1599	if (time_after(jiffies, dev_trans_start(ndev) + 1*HZ) &&
1600	    dev->tx_done_idx != dev->tx_free_idx) {
1601		printk(KERN_DEBUG "%s: ns83820_tx_watch: %u %u %d\n",
1602			ndev->name,
1603			dev->tx_done_idx, dev->tx_free_idx,
1604			atomic_read(&dev->nr_tx_skbs));
1605		ns83820_tx_timeout(ndev, UINT_MAX);
1606	}
1607
1608	mod_timer(&dev->tx_watchdog, jiffies + 2*HZ);
1609}
1610
1611static int ns83820_open(struct net_device *ndev)
1612{
1613	struct ns83820 *dev = PRIV(ndev);
1614	unsigned i;
1615	u32 desc;
1616	int ret;
1617
1618	dprintk("ns83820_open\n");
1619
1620	writel(0, dev->base + PQCR);
1621
1622	ret = ns83820_setup_rx(ndev);
1623	if (ret)
1624		goto failed;
1625
1626	memset(dev->tx_descs, 0, 4 * NR_TX_DESC * DESC_SIZE);
1627	for (i=0; i<NR_TX_DESC; i++) {
1628		dev->tx_descs[(i * DESC_SIZE) + DESC_LINK]
1629				= cpu_to_le32(
1630				  dev->tx_phy_descs
1631				  + ((i+1) % NR_TX_DESC) * DESC_SIZE * 4);
1632	}
1633
1634	dev->tx_idx = 0;
1635	dev->tx_done_idx = 0;
1636	desc = dev->tx_phy_descs;
1637	writel(0, dev->base + TXDP_HI);
1638	writel(desc, dev->base + TXDP);
1639
1640	timer_setup(&dev->tx_watchdog, ns83820_tx_watch, 0);
 
 
1641	mod_timer(&dev->tx_watchdog, jiffies + 2*HZ);
1642
1643	netif_start_queue(ndev);	/* FIXME: wait for phy to come up */
1644
1645	return 0;
1646
1647failed:
1648	ns83820_stop(ndev);
1649	return ret;
1650}
1651
1652static void ns83820_getmac(struct ns83820 *dev, struct net_device *ndev)
1653{
1654	u8 mac[ETH_ALEN];
1655	unsigned i;
1656
1657	for (i=0; i<3; i++) {
1658		u32 data;
1659
1660		/* Read from the perfect match memory: this is loaded by
1661		 * the chip from the EEPROM via the EELOAD self test.
1662		 */
1663		writel(i*2, dev->base + RFCR);
1664		data = readl(dev->base + RFDR);
1665
1666		mac[i * 2] = data;
1667		mac[i * 2 + 1] = data >> 8;
1668	}
1669	eth_hw_addr_set(ndev, mac);
1670}
1671
1672static void ns83820_set_multicast(struct net_device *ndev)
1673{
1674	struct ns83820 *dev = PRIV(ndev);
1675	u8 __iomem *rfcr = dev->base + RFCR;
1676	u32 and_mask = 0xffffffff;
1677	u32 or_mask = 0;
1678	u32 val;
1679
1680	if (ndev->flags & IFF_PROMISC)
1681		or_mask |= RFCR_AAU | RFCR_AAM;
1682	else
1683		and_mask &= ~(RFCR_AAU | RFCR_AAM);
1684
1685	if (ndev->flags & IFF_ALLMULTI || netdev_mc_count(ndev))
1686		or_mask |= RFCR_AAM;
1687	else
1688		and_mask &= ~RFCR_AAM;
1689
1690	spin_lock_irq(&dev->misc_lock);
1691	val = (readl(rfcr) & and_mask) | or_mask;
1692	/* Ramit : RFCR Write Fix doc says RFEN must be 0 modify other bits */
1693	writel(val & ~RFCR_RFEN, rfcr);
1694	writel(val, rfcr);
1695	spin_unlock_irq(&dev->misc_lock);
1696}
1697
1698static void ns83820_run_bist(struct net_device *ndev, const char *name, u32 enable, u32 done, u32 fail)
1699{
1700	struct ns83820 *dev = PRIV(ndev);
1701	int timed_out = 0;
1702	unsigned long start;
1703	u32 status;
1704	int loops = 0;
1705
1706	dprintk("%s: start %s\n", ndev->name, name);
1707
1708	start = jiffies;
1709
1710	writel(enable, dev->base + PTSCR);
1711	for (;;) {
1712		loops++;
1713		status = readl(dev->base + PTSCR);
1714		if (!(status & enable))
1715			break;
1716		if (status & done)
1717			break;
1718		if (status & fail)
1719			break;
1720		if (time_after_eq(jiffies, start + HZ)) {
1721			timed_out = 1;
1722			break;
1723		}
1724		schedule_timeout_uninterruptible(1);
1725	}
1726
1727	if (status & fail)
1728		printk(KERN_INFO "%s: %s failed! (0x%08x & 0x%08x)\n",
1729			ndev->name, name, status, fail);
1730	else if (timed_out)
1731		printk(KERN_INFO "%s: run_bist %s timed out! (%08x)\n",
1732			ndev->name, name, status);
1733
1734	dprintk("%s: done %s in %d loops\n", ndev->name, name, loops);
1735}
1736
1737#ifdef PHY_CODE_IS_FINISHED
1738static void ns83820_mii_write_bit(struct ns83820 *dev, int bit)
1739{
1740	/* drive MDC low */
1741	dev->MEAR_cache &= ~MEAR_MDC;
1742	writel(dev->MEAR_cache, dev->base + MEAR);
1743	readl(dev->base + MEAR);
1744
1745	/* enable output, set bit */
1746	dev->MEAR_cache |= MEAR_MDDIR;
1747	if (bit)
1748		dev->MEAR_cache |= MEAR_MDIO;
1749	else
1750		dev->MEAR_cache &= ~MEAR_MDIO;
1751
1752	/* set the output bit */
1753	writel(dev->MEAR_cache, dev->base + MEAR);
1754	readl(dev->base + MEAR);
1755
1756	/* Wait.  Max clock rate is 2.5MHz, this way we come in under 1MHz */
1757	udelay(1);
1758
1759	/* drive MDC high causing the data bit to be latched */
1760	dev->MEAR_cache |= MEAR_MDC;
1761	writel(dev->MEAR_cache, dev->base + MEAR);
1762	readl(dev->base + MEAR);
1763
1764	/* Wait again... */
1765	udelay(1);
1766}
1767
1768static int ns83820_mii_read_bit(struct ns83820 *dev)
1769{
1770	int bit;
1771
1772	/* drive MDC low, disable output */
1773	dev->MEAR_cache &= ~MEAR_MDC;
1774	dev->MEAR_cache &= ~MEAR_MDDIR;
1775	writel(dev->MEAR_cache, dev->base + MEAR);
1776	readl(dev->base + MEAR);
1777
1778	/* Wait.  Max clock rate is 2.5MHz, this way we come in under 1MHz */
1779	udelay(1);
1780
1781	/* drive MDC high causing the data bit to be latched */
1782	bit = (readl(dev->base + MEAR) & MEAR_MDIO) ? 1 : 0;
1783	dev->MEAR_cache |= MEAR_MDC;
1784	writel(dev->MEAR_cache, dev->base + MEAR);
1785
1786	/* Wait again... */
1787	udelay(1);
1788
1789	return bit;
1790}
1791
1792static unsigned ns83820_mii_read_reg(struct ns83820 *dev, unsigned phy, unsigned reg)
1793{
1794	unsigned data = 0;
1795	int i;
1796
1797	/* read some garbage so that we eventually sync up */
1798	for (i=0; i<64; i++)
1799		ns83820_mii_read_bit(dev);
1800
1801	ns83820_mii_write_bit(dev, 0);	/* start */
1802	ns83820_mii_write_bit(dev, 1);
1803	ns83820_mii_write_bit(dev, 1);	/* opcode read */
1804	ns83820_mii_write_bit(dev, 0);
1805
1806	/* write out the phy address: 5 bits, msb first */
1807	for (i=0; i<5; i++)
1808		ns83820_mii_write_bit(dev, phy & (0x10 >> i));
1809
1810	/* write out the register address, 5 bits, msb first */
1811	for (i=0; i<5; i++)
1812		ns83820_mii_write_bit(dev, reg & (0x10 >> i));
1813
1814	ns83820_mii_read_bit(dev);	/* turn around cycles */
1815	ns83820_mii_read_bit(dev);
1816
1817	/* read in the register data, 16 bits msb first */
1818	for (i=0; i<16; i++) {
1819		data <<= 1;
1820		data |= ns83820_mii_read_bit(dev);
1821	}
1822
1823	return data;
1824}
1825
1826static unsigned ns83820_mii_write_reg(struct ns83820 *dev, unsigned phy, unsigned reg, unsigned data)
1827{
1828	int i;
1829
1830	/* read some garbage so that we eventually sync up */
1831	for (i=0; i<64; i++)
1832		ns83820_mii_read_bit(dev);
1833
1834	ns83820_mii_write_bit(dev, 0);	/* start */
1835	ns83820_mii_write_bit(dev, 1);
1836	ns83820_mii_write_bit(dev, 0);	/* opcode read */
1837	ns83820_mii_write_bit(dev, 1);
1838
1839	/* write out the phy address: 5 bits, msb first */
1840	for (i=0; i<5; i++)
1841		ns83820_mii_write_bit(dev, phy & (0x10 >> i));
1842
1843	/* write out the register address, 5 bits, msb first */
1844	for (i=0; i<5; i++)
1845		ns83820_mii_write_bit(dev, reg & (0x10 >> i));
1846
1847	ns83820_mii_read_bit(dev);	/* turn around cycles */
1848	ns83820_mii_read_bit(dev);
1849
1850	/* read in the register data, 16 bits msb first */
1851	for (i=0; i<16; i++)
1852		ns83820_mii_write_bit(dev, (data >> (15 - i)) & 1);
1853
1854	return data;
1855}
1856
1857static void ns83820_probe_phy(struct net_device *ndev)
1858{
1859	struct ns83820 *dev = PRIV(ndev);
1860	int j;
1861	unsigned a, b;
 
 
1862
1863	for (j = 0; j < 0x16; j += 4) {
1864		dprintk("%s: [0x%02x] %04x %04x %04x %04x\n",
1865			ndev->name, j,
1866			ns83820_mii_read_reg(dev, 1, 0 + j),
1867			ns83820_mii_read_reg(dev, 1, 1 + j),
1868			ns83820_mii_read_reg(dev, 1, 2 + j),
1869			ns83820_mii_read_reg(dev, 1, 3 + j)
1870			);
1871	}
1872
1873	/* read firmware version: memory addr is 0x8402 and 0x8403 */
1874	ns83820_mii_write_reg(dev, 1, 0x16, 0x000d);
1875	ns83820_mii_write_reg(dev, 1, 0x1e, 0x810e);
1876	a = ns83820_mii_read_reg(dev, 1, 0x1d);
1877
1878	ns83820_mii_write_reg(dev, 1, 0x16, 0x000d);
1879	ns83820_mii_write_reg(dev, 1, 0x1e, 0x810e);
1880	b = ns83820_mii_read_reg(dev, 1, 0x1d);
1881	dprintk("version: 0x%04x 0x%04x\n", a, b);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1882}
1883#endif
1884
1885static const struct net_device_ops netdev_ops = {
1886	.ndo_open		= ns83820_open,
1887	.ndo_stop		= ns83820_stop,
1888	.ndo_start_xmit		= ns83820_hard_start_xmit,
1889	.ndo_get_stats		= ns83820_get_stats,
1890	.ndo_set_rx_mode	= ns83820_set_multicast,
1891	.ndo_validate_addr	= eth_validate_addr,
1892	.ndo_set_mac_address	= eth_mac_addr,
1893	.ndo_tx_timeout		= ns83820_tx_timeout,
1894};
1895
1896static int ns83820_init_one(struct pci_dev *pci_dev,
1897			    const struct pci_device_id *id)
1898{
1899	struct net_device *ndev;
1900	struct ns83820 *dev;
1901	long addr;
1902	int err;
1903	int using_dac = 0;
1904
1905	/* See if we can set the dma mask early on; failure is fatal. */
1906	if (sizeof(dma_addr_t) == 8 &&
1907		!dma_set_mask(&pci_dev->dev, DMA_BIT_MASK(64))) {
1908		using_dac = 1;
1909	} else if (!dma_set_mask(&pci_dev->dev, DMA_BIT_MASK(32))) {
1910		using_dac = 0;
1911	} else {
1912		dev_warn(&pci_dev->dev, "dma_set_mask failed!\n");
1913		return -ENODEV;
1914	}
1915
1916	ndev = alloc_etherdev(sizeof(struct ns83820));
1917	err = -ENOMEM;
1918	if (!ndev)
1919		goto out;
1920
1921	dev = PRIV(ndev);
1922	dev->ndev = ndev;
1923
1924	spin_lock_init(&dev->rx_info.lock);
1925	spin_lock_init(&dev->tx_lock);
1926	spin_lock_init(&dev->misc_lock);
1927	dev->pci_dev = pci_dev;
1928
1929	SET_NETDEV_DEV(ndev, &pci_dev->dev);
1930
1931	INIT_WORK(&dev->tq_refill, queue_refill);
1932	tasklet_setup(&dev->rx_tasklet, rx_action);
1933
1934	err = pci_enable_device(pci_dev);
1935	if (err) {
1936		dev_info(&pci_dev->dev, "pci_enable_dev failed: %d\n", err);
1937		goto out_free;
1938	}
1939
1940	pci_set_master(pci_dev);
1941	addr = pci_resource_start(pci_dev, 1);
1942	dev->base = ioremap(addr, PAGE_SIZE);
1943	dev->tx_descs = dma_alloc_coherent(&pci_dev->dev,
1944					   4 * DESC_SIZE * NR_TX_DESC,
1945					   &dev->tx_phy_descs, GFP_KERNEL);
1946	dev->rx_info.descs = dma_alloc_coherent(&pci_dev->dev,
1947						4 * DESC_SIZE * NR_RX_DESC,
1948						&dev->rx_info.phy_descs, GFP_KERNEL);
1949	err = -ENOMEM;
1950	if (!dev->base || !dev->tx_descs || !dev->rx_info.descs)
1951		goto out_disable;
1952
1953	dprintk("%p: %08lx  %p: %08lx\n",
1954		dev->tx_descs, (long)dev->tx_phy_descs,
1955		dev->rx_info.descs, (long)dev->rx_info.phy_descs);
1956
1957	ns83820_disable_interrupts(dev);
1958
1959	dev->IMR_cache = 0;
1960
1961	err = request_irq(pci_dev->irq, ns83820_irq, IRQF_SHARED,
1962			  DRV_NAME, ndev);
1963	if (err) {
1964		dev_info(&pci_dev->dev, "unable to register irq %d, err %d\n",
1965			pci_dev->irq, err);
1966		goto out_disable;
1967	}
1968
1969	/*
1970	 * FIXME: we are holding rtnl_lock() over obscenely long area only
1971	 * because some of the setup code uses dev->name.  It's Wrong(tm) -
1972	 * we should be using driver-specific names for all that stuff.
1973	 * For now that will do, but we really need to come back and kill
1974	 * most of the dev_alloc_name() users later.
1975	 */
1976	rtnl_lock();
1977	err = dev_alloc_name(ndev, ndev->name);
1978	if (err < 0) {
1979		dev_info(&pci_dev->dev, "unable to get netdev name: %d\n", err);
1980		goto out_free_irq;
1981	}
1982
1983	printk("%s: ns83820.c: 0x22c: %08x, subsystem: %04x:%04x\n",
1984		ndev->name, le32_to_cpu(readl(dev->base + 0x22c)),
1985		pci_dev->subsystem_vendor, pci_dev->subsystem_device);
1986
1987	ndev->netdev_ops = &netdev_ops;
1988	ndev->ethtool_ops = &ops;
1989	ndev->watchdog_timeo = 5 * HZ;
1990	pci_set_drvdata(pci_dev, ndev);
1991
1992	ns83820_do_reset(dev, CR_RST);
1993
1994	/* Must reset the ram bist before running it */
1995	writel(PTSCR_RBIST_RST, dev->base + PTSCR);
1996	ns83820_run_bist(ndev, "sram bist",   PTSCR_RBIST_EN,
1997			 PTSCR_RBIST_DONE, PTSCR_RBIST_FAIL);
1998	ns83820_run_bist(ndev, "eeprom bist", PTSCR_EEBIST_EN, 0,
1999			 PTSCR_EEBIST_FAIL);
2000	ns83820_run_bist(ndev, "eeprom load", PTSCR_EELOAD_EN, 0, 0);
2001
2002	/* I love config registers */
2003	dev->CFG_cache = readl(dev->base + CFG);
2004
2005	if ((dev->CFG_cache & CFG_PCI64_DET)) {
2006		printk(KERN_INFO "%s: detected 64 bit PCI data bus.\n",
2007			ndev->name);
2008		/*dev->CFG_cache |= CFG_DATA64_EN;*/
2009		if (!(dev->CFG_cache & CFG_DATA64_EN))
2010			printk(KERN_INFO "%s: EEPROM did not enable 64 bit bus.  Disabled.\n",
2011				ndev->name);
2012	} else
2013		dev->CFG_cache &= ~(CFG_DATA64_EN);
2014
2015	dev->CFG_cache &= (CFG_TBI_EN  | CFG_MRM_DIS   | CFG_MWI_DIS |
2016			   CFG_T64ADDR | CFG_DATA64_EN | CFG_EXT_125 |
2017			   CFG_M64ADDR);
2018	dev->CFG_cache |= CFG_PINT_DUPSTS | CFG_PINT_LNKSTS | CFG_PINT_SPDSTS |
2019			  CFG_EXTSTS_EN   | CFG_EXD         | CFG_PESEL;
2020	dev->CFG_cache |= CFG_REQALG;
2021	dev->CFG_cache |= CFG_POW;
2022	dev->CFG_cache |= CFG_TMRTEST;
2023
2024	/* When compiled with 64 bit addressing, we must always enable
2025	 * the 64 bit descriptor format.
2026	 */
2027	if (sizeof(dma_addr_t) == 8)
2028		dev->CFG_cache |= CFG_M64ADDR;
2029	if (using_dac)
2030		dev->CFG_cache |= CFG_T64ADDR;
2031
2032	/* Big endian mode does not seem to do what the docs suggest */
2033	dev->CFG_cache &= ~CFG_BEM;
2034
2035	/* setup optical transceiver if we have one */
2036	if (dev->CFG_cache & CFG_TBI_EN) {
2037		printk(KERN_INFO "%s: enabling optical transceiver\n",
2038			ndev->name);
2039		writel(readl(dev->base + GPIOR) | 0x3e8, dev->base + GPIOR);
2040
2041		/* setup auto negotiation feature advertisement */
2042		writel(readl(dev->base + TANAR)
2043		       | TANAR_HALF_DUP | TANAR_FULL_DUP,
2044		       dev->base + TANAR);
2045
2046		/* start auto negotiation */
2047		writel(TBICR_MR_AN_ENABLE | TBICR_MR_RESTART_AN,
2048		       dev->base + TBICR);
2049		writel(TBICR_MR_AN_ENABLE, dev->base + TBICR);
2050		dev->linkstate = LINK_AUTONEGOTIATE;
2051
2052		dev->CFG_cache |= CFG_MODE_1000;
2053	}
2054
2055	writel(dev->CFG_cache, dev->base + CFG);
2056	dprintk("CFG: %08x\n", dev->CFG_cache);
2057
2058	if (reset_phy) {
2059		printk(KERN_INFO "%s: resetting phy\n", ndev->name);
2060		writel(dev->CFG_cache | CFG_PHY_RST, dev->base + CFG);
2061		msleep(10);
2062		writel(dev->CFG_cache, dev->base + CFG);
2063	}
2064
2065#if 0	/* Huh?  This sets the PCI latency register.  Should be done via
2066	 * the PCI layer.  FIXME.
2067	 */
2068	if (readl(dev->base + SRR))
2069		writel(readl(dev->base+0x20c) | 0xfe00, dev->base + 0x20c);
2070#endif
2071
2072	/* Note!  The DMA burst size interacts with packet
2073	 * transmission, such that the largest packet that
2074	 * can be transmitted is 8192 - FLTH - burst size.
2075	 * If only the transmit fifo was larger...
2076	 */
2077	/* Ramit : 1024 DMA is not a good idea, it ends up banging
2078	 * some DELL and COMPAQ SMP systems */
2079	writel(TXCFG_CSI | TXCFG_HBI | TXCFG_ATP | TXCFG_MXDMA512
2080		| ((1600 / 32) * 0x100),
2081		dev->base + TXCFG);
2082
2083	/* Flush the interrupt holdoff timer */
2084	writel(0x000, dev->base + IHR);
2085	writel(0x100, dev->base + IHR);
2086	writel(0x000, dev->base + IHR);
2087
2088	/* Set Rx to full duplex, don't accept runt, errored, long or length
2089	 * range errored packets.  Use 512 byte DMA.
2090	 */
2091	/* Ramit : 1024 DMA is not a good idea, it ends up banging
2092	 * some DELL and COMPAQ SMP systems
2093	 * Turn on ALP, only we are accpeting Jumbo Packets */
2094	writel(RXCFG_AEP | RXCFG_ARP | RXCFG_AIRL | RXCFG_RX_FD
2095		| RXCFG_STRIPCRC
2096		//| RXCFG_ALP
2097		| (RXCFG_MXDMA512) | 0, dev->base + RXCFG);
2098
2099	/* Disable priority queueing */
2100	writel(0, dev->base + PQCR);
2101
2102	/* Enable IP checksum validation and detetion of VLAN headers.
2103	 * Note: do not set the reject options as at least the 0x102
2104	 * revision of the chip does not properly accept IP fragments
2105	 * at least for UDP.
2106	 */
2107	/* Ramit : Be sure to turn on RXCFG_ARP if VLAN's are enabled, since
2108	 * the MAC it calculates the packetsize AFTER stripping the VLAN
2109	 * header, and if a VLAN Tagged packet of 64 bytes is received (like
2110	 * a ping with a VLAN header) then the card, strips the 4 byte VLAN
2111	 * tag and then checks the packet size, so if RXCFG_ARP is not enabled,
2112	 * it discrards it!.  These guys......
2113	 * also turn on tag stripping if hardware acceleration is enabled
2114	 */
2115#ifdef NS83820_VLAN_ACCEL_SUPPORT
2116#define VRCR_INIT_VALUE (VRCR_IPEN|VRCR_VTDEN|VRCR_VTREN)
2117#else
2118#define VRCR_INIT_VALUE (VRCR_IPEN|VRCR_VTDEN)
2119#endif
2120	writel(VRCR_INIT_VALUE, dev->base + VRCR);
2121
2122	/* Enable per-packet TCP/UDP/IP checksumming
2123	 * and per packet vlan tag insertion if
2124	 * vlan hardware acceleration is enabled
2125	 */
2126#ifdef NS83820_VLAN_ACCEL_SUPPORT
2127#define VTCR_INIT_VALUE (VTCR_PPCHK|VTCR_VPPTI)
2128#else
2129#define VTCR_INIT_VALUE VTCR_PPCHK
2130#endif
2131	writel(VTCR_INIT_VALUE, dev->base + VTCR);
2132
2133	/* Ramit : Enable async and sync pause frames */
2134	/* writel(0, dev->base + PCR); */
2135	writel((PCR_PS_MCAST | PCR_PS_DA | PCR_PSEN | PCR_FFLO_4K |
2136		PCR_FFHI_8K | PCR_STLO_4 | PCR_STHI_8 | PCR_PAUSE_CNT),
2137		dev->base + PCR);
2138
2139	/* Disable Wake On Lan */
2140	writel(0, dev->base + WCSR);
2141
2142	ns83820_getmac(dev, ndev);
2143
2144	/* Yes, we support dumb IP checksum on transmit */
2145	ndev->features |= NETIF_F_SG;
2146	ndev->features |= NETIF_F_IP_CSUM;
2147
2148	ndev->min_mtu = 0;
2149
2150#ifdef NS83820_VLAN_ACCEL_SUPPORT
2151	/* We also support hardware vlan acceleration */
2152	ndev->features |= NETIF_F_HW_VLAN_CTAG_TX | NETIF_F_HW_VLAN_CTAG_RX;
2153#endif
2154
2155	if (using_dac) {
2156		printk(KERN_INFO "%s: using 64 bit addressing.\n",
2157			ndev->name);
2158		ndev->features |= NETIF_F_HIGHDMA;
2159	}
2160
2161	printk(KERN_INFO "%s: ns83820 v" VERSION ": DP83820 v%u.%u: %pM io=0x%08lx irq=%d f=%s\n",
2162		ndev->name,
2163		(unsigned)readl(dev->base + SRR) >> 8,
2164		(unsigned)readl(dev->base + SRR) & 0xff,
2165		ndev->dev_addr, addr, pci_dev->irq,
2166		(ndev->features & NETIF_F_HIGHDMA) ? "h,sg" : "sg"
2167		);
2168
2169#ifdef PHY_CODE_IS_FINISHED
2170	ns83820_probe_phy(ndev);
2171#endif
2172
2173	err = register_netdevice(ndev);
2174	if (err) {
2175		printk(KERN_INFO "ns83820: unable to register netdev: %d\n", err);
2176		goto out_cleanup;
2177	}
2178	rtnl_unlock();
2179
2180	return 0;
2181
2182out_cleanup:
2183	ns83820_disable_interrupts(dev); /* paranoia */
2184out_free_irq:
2185	rtnl_unlock();
2186	free_irq(pci_dev->irq, ndev);
2187out_disable:
2188	if (dev->base)
2189		iounmap(dev->base);
2190	dma_free_coherent(&pci_dev->dev, 4 * DESC_SIZE * NR_TX_DESC,
2191			  dev->tx_descs, dev->tx_phy_descs);
2192	dma_free_coherent(&pci_dev->dev, 4 * DESC_SIZE * NR_RX_DESC,
2193			  dev->rx_info.descs, dev->rx_info.phy_descs);
2194	pci_disable_device(pci_dev);
2195out_free:
2196	free_netdev(ndev);
2197out:
2198	return err;
2199}
2200
2201static void ns83820_remove_one(struct pci_dev *pci_dev)
2202{
2203	struct net_device *ndev = pci_get_drvdata(pci_dev);
2204	struct ns83820 *dev = PRIV(ndev); /* ok even if NULL */
2205
2206	if (!ndev)			/* paranoia */
2207		return;
2208
2209	ns83820_disable_interrupts(dev); /* paranoia */
2210
2211	unregister_netdev(ndev);
2212	free_irq(dev->pci_dev->irq, ndev);
2213	iounmap(dev->base);
2214	dma_free_coherent(&dev->pci_dev->dev, 4 * DESC_SIZE * NR_TX_DESC,
2215			  dev->tx_descs, dev->tx_phy_descs);
2216	dma_free_coherent(&dev->pci_dev->dev, 4 * DESC_SIZE * NR_RX_DESC,
2217			  dev->rx_info.descs, dev->rx_info.phy_descs);
2218	pci_disable_device(dev->pci_dev);
2219	free_netdev(ndev);
2220}
2221
2222static const struct pci_device_id ns83820_pci_tbl[] = {
2223	{ 0x100b, 0x0022, PCI_ANY_ID, PCI_ANY_ID, 0, .driver_data = 0, },
2224	{ 0, },
2225};
2226
2227static struct pci_driver driver = {
2228	.name		= "ns83820",
2229	.id_table	= ns83820_pci_tbl,
2230	.probe		= ns83820_init_one,
2231	.remove		= ns83820_remove_one,
2232#if 0	/* FIXME: implement */
2233	.suspend	= ,
2234	.resume		= ,
2235#endif
2236};
2237
2238
2239static int __init ns83820_init(void)
2240{
2241	printk(KERN_INFO "ns83820.c: National Semiconductor DP83820 10/100/1000 driver.\n");
2242	return pci_register_driver(&driver);
2243}
2244
2245static void __exit ns83820_exit(void)
2246{
2247	pci_unregister_driver(&driver);
2248}
2249
2250MODULE_AUTHOR("Benjamin LaHaise <bcrl@kvack.org>");
2251MODULE_DESCRIPTION("National Semiconductor DP83820 10/100/1000 driver");
2252MODULE_LICENSE("GPL");
2253
2254MODULE_DEVICE_TABLE(pci, ns83820_pci_tbl);
2255
2256module_param(lnksts, int, 0);
2257MODULE_PARM_DESC(lnksts, "Polarity of LNKSTS bit");
2258
2259module_param(ihr, int, 0);
2260MODULE_PARM_DESC(ihr, "Time in 100 us increments to delay interrupts (range 0-127)");
2261
2262module_param(reset_phy, int, 0);
2263MODULE_PARM_DESC(reset_phy, "Set to 1 to reset the PHY on startup");
2264
2265module_init(ns83820_init);
2266module_exit(ns83820_exit);
v4.10.11
 
   1#define VERSION "0.23"
   2/* ns83820.c by Benjamin LaHaise with contributions.
   3 *
   4 * Questions/comments/discussion to linux-ns83820@kvack.org.
   5 *
   6 * $Revision: 1.34.2.23 $
   7 *
   8 * Copyright 2001 Benjamin LaHaise.
   9 * Copyright 2001, 2002 Red Hat.
  10 *
  11 * Mmmm, chocolate vanilla mocha...
  12 *
  13 *
  14 * This program is free software; you can redistribute it and/or modify
  15 * it under the terms of the GNU General Public License as published by
  16 * the Free Software Foundation; either version 2 of the License, or
  17 * (at your option) any later version.
  18 *
  19 * This program is distributed in the hope that it will be useful,
  20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22 * GNU General Public License for more details.
  23 *
  24 * You should have received a copy of the GNU General Public License
  25 * along with this program; if not, see <http://www.gnu.org/licenses/>.
  26 *
  27 *
  28 * ChangeLog
  29 * =========
  30 *	20010414	0.1 - created
  31 *	20010622	0.2 - basic rx and tx.
  32 *	20010711	0.3 - added duplex and link state detection support.
  33 *	20010713	0.4 - zero copy, no hangs.
  34 *			0.5 - 64 bit dma support (davem will hate me for this)
  35 *			    - disable jumbo frames to avoid tx hangs
  36 *			    - work around tx deadlocks on my 1.02 card via
  37 *			      fiddling with TXCFG
  38 *	20010810	0.6 - use pci dma api for ringbuffers, work on ia64
  39 *	20010816	0.7 - misc cleanups
  40 *	20010826	0.8 - fix critical zero copy bugs
  41 *			0.9 - internal experiment
  42 *	20010827	0.10 - fix ia64 unaligned access.
  43 *	20010906	0.11 - accept all packets with checksum errors as
  44 *			       otherwise fragments get lost
  45 *			     - fix >> 32 bugs
  46 *			0.12 - add statistics counters
  47 *			     - add allmulti/promisc support
  48 *	20011009	0.13 - hotplug support, other smaller pci api cleanups
  49 *	20011204	0.13a - optical transceiver support added
  50 *				by Michael Clark <michael@metaparadigm.com>
  51 *	20011205	0.13b - call register_netdev earlier in initialization
  52 *				suppress duplicate link status messages
  53 *	20011117 	0.14 - ethtool GDRVINFO, GLINK support from jgarzik
  54 *	20011204 	0.15	get ppc (big endian) working
  55 *	20011218	0.16	various cleanups
  56 *	20020310	0.17	speedups
  57 *	20020610	0.18 -	actually use the pci dma api for highmem
  58 *			     -	remove pci latency register fiddling
  59 *			0.19 -	better bist support
  60 *			     -	add ihr and reset_phy parameters
  61 *			     -	gmii bus probing
  62 *			     -	fix missed txok introduced during performance
  63 *				tuning
  64 *			0.20 -	fix stupid RFEN thinko.  i am such a smurf.
  65 *	20040828	0.21 -	add hardware vlan accleration
  66 *				by Neil Horman <nhorman@redhat.com>
  67 *	20050406	0.22 -	improved DAC ifdefs from Andi Kleen
  68 *			     -	removal of dead code from Adrian Bunk
  69 *			     -	fix half duplex collision behaviour
  70 * Driver Overview
  71 * ===============
  72 *
  73 * This driver was originally written for the National Semiconductor
  74 * 83820 chip, a 10/100/1000 Mbps 64 bit PCI ethernet NIC.  Hopefully
  75 * this code will turn out to be a) clean, b) correct, and c) fast.
  76 * With that in mind, I'm aiming to split the code up as much as
  77 * reasonably possible.  At present there are X major sections that
  78 * break down into a) packet receive, b) packet transmit, c) link
  79 * management, d) initialization and configuration.  Where possible,
  80 * these code paths are designed to run in parallel.
  81 *
  82 * This driver has been tested and found to work with the following
  83 * cards (in no particular order):
  84 *
  85 *	Cameo		SOHO-GA2000T	SOHO-GA2500T
  86 *	D-Link		DGE-500T
  87 *	PureData	PDP8023Z-TG
  88 *	SMC		SMC9452TX	SMC9462TX
  89 *	Netgear		GA621
  90 *
  91 * Special thanks to SMC for providing hardware to test this driver on.
  92 *
  93 * Reports of success or failure would be greatly appreciated.
  94 */
  95//#define dprintk		printk
  96#define dprintk(x...)		do { } while (0)
  97
  98#include <linux/module.h>
  99#include <linux/moduleparam.h>
 100#include <linux/types.h>
 101#include <linux/pci.h>
 102#include <linux/dma-mapping.h>
 103#include <linux/netdevice.h>
 104#include <linux/etherdevice.h>
 105#include <linux/delay.h>
 106#include <linux/workqueue.h>
 107#include <linux/init.h>
 108#include <linux/interrupt.h>
 109#include <linux/ip.h>	/* for iph */
 110#include <linux/in.h>	/* for IPPROTO_... */
 111#include <linux/compiler.h>
 112#include <linux/prefetch.h>
 113#include <linux/ethtool.h>
 114#include <linux/sched.h>
 115#include <linux/timer.h>
 116#include <linux/if_vlan.h>
 117#include <linux/rtnetlink.h>
 118#include <linux/jiffies.h>
 119#include <linux/slab.h>
 120
 121#include <asm/io.h>
 122#include <linux/uaccess.h>
 123
 124#define DRV_NAME "ns83820"
 125
 126/* Global parameters.  See module_param near the bottom. */
 127static int ihr = 2;
 128static int reset_phy = 0;
 129static int lnksts = 0;		/* CFG_LNKSTS bit polarity */
 130
 131/* Dprintk is used for more interesting debug events */
 132#undef Dprintk
 133#define	Dprintk			dprintk
 134
 135/* tunables */
 136#define RX_BUF_SIZE	1500	/* 8192 */
 137#if IS_ENABLED(CONFIG_VLAN_8021Q)
 138#define NS83820_VLAN_ACCEL_SUPPORT
 139#endif
 140
 141/* Must not exceed ~65000. */
 142#define NR_RX_DESC	64
 143#define NR_TX_DESC	128
 144
 145/* not tunable */
 146#define REAL_RX_BUF_SIZE (RX_BUF_SIZE + 14)	/* rx/tx mac addr + type */
 147
 148#define MIN_TX_DESC_FREE	8
 149
 150/* register defines */
 151#define CFGCS		0x04
 152
 153#define CR_TXE		0x00000001
 154#define CR_TXD		0x00000002
 155/* Ramit : Here's a tip, don't do a RXD immediately followed by an RXE
 156 * The Receive engine skips one descriptor and moves
 157 * onto the next one!! */
 158#define CR_RXE		0x00000004
 159#define CR_RXD		0x00000008
 160#define CR_TXR		0x00000010
 161#define CR_RXR		0x00000020
 162#define CR_SWI		0x00000080
 163#define CR_RST		0x00000100
 164
 165#define PTSCR_EEBIST_FAIL       0x00000001
 166#define PTSCR_EEBIST_EN         0x00000002
 167#define PTSCR_EELOAD_EN         0x00000004
 168#define PTSCR_RBIST_FAIL        0x000001b8
 169#define PTSCR_RBIST_DONE        0x00000200
 170#define PTSCR_RBIST_EN          0x00000400
 171#define PTSCR_RBIST_RST         0x00002000
 172
 173#define MEAR_EEDI		0x00000001
 174#define MEAR_EEDO		0x00000002
 175#define MEAR_EECLK		0x00000004
 176#define MEAR_EESEL		0x00000008
 177#define MEAR_MDIO		0x00000010
 178#define MEAR_MDDIR		0x00000020
 179#define MEAR_MDC		0x00000040
 180
 181#define ISR_TXDESC3	0x40000000
 182#define ISR_TXDESC2	0x20000000
 183#define ISR_TXDESC1	0x10000000
 184#define ISR_TXDESC0	0x08000000
 185#define ISR_RXDESC3	0x04000000
 186#define ISR_RXDESC2	0x02000000
 187#define ISR_RXDESC1	0x01000000
 188#define ISR_RXDESC0	0x00800000
 189#define ISR_TXRCMP	0x00400000
 190#define ISR_RXRCMP	0x00200000
 191#define ISR_DPERR	0x00100000
 192#define ISR_SSERR	0x00080000
 193#define ISR_RMABT	0x00040000
 194#define ISR_RTABT	0x00020000
 195#define ISR_RXSOVR	0x00010000
 196#define ISR_HIBINT	0x00008000
 197#define ISR_PHY		0x00004000
 198#define ISR_PME		0x00002000
 199#define ISR_SWI		0x00001000
 200#define ISR_MIB		0x00000800
 201#define ISR_TXURN	0x00000400
 202#define ISR_TXIDLE	0x00000200
 203#define ISR_TXERR	0x00000100
 204#define ISR_TXDESC	0x00000080
 205#define ISR_TXOK	0x00000040
 206#define ISR_RXORN	0x00000020
 207#define ISR_RXIDLE	0x00000010
 208#define ISR_RXEARLY	0x00000008
 209#define ISR_RXERR	0x00000004
 210#define ISR_RXDESC	0x00000002
 211#define ISR_RXOK	0x00000001
 212
 213#define TXCFG_CSI	0x80000000
 214#define TXCFG_HBI	0x40000000
 215#define TXCFG_MLB	0x20000000
 216#define TXCFG_ATP	0x10000000
 217#define TXCFG_ECRETRY	0x00800000
 218#define TXCFG_BRST_DIS	0x00080000
 219#define TXCFG_MXDMA1024	0x00000000
 220#define TXCFG_MXDMA512	0x00700000
 221#define TXCFG_MXDMA256	0x00600000
 222#define TXCFG_MXDMA128	0x00500000
 223#define TXCFG_MXDMA64	0x00400000
 224#define TXCFG_MXDMA32	0x00300000
 225#define TXCFG_MXDMA16	0x00200000
 226#define TXCFG_MXDMA8	0x00100000
 227
 228#define CFG_LNKSTS	0x80000000
 229#define CFG_SPDSTS	0x60000000
 230#define CFG_SPDSTS1	0x40000000
 231#define CFG_SPDSTS0	0x20000000
 232#define CFG_DUPSTS	0x10000000
 233#define CFG_TBI_EN	0x01000000
 234#define CFG_MODE_1000	0x00400000
 235/* Ramit : Dont' ever use AUTO_1000, it never works and is buggy.
 236 * Read the Phy response and then configure the MAC accordingly */
 237#define CFG_AUTO_1000	0x00200000
 238#define CFG_PINT_CTL	0x001c0000
 239#define CFG_PINT_DUPSTS	0x00100000
 240#define CFG_PINT_LNKSTS	0x00080000
 241#define CFG_PINT_SPDSTS	0x00040000
 242#define CFG_TMRTEST	0x00020000
 243#define CFG_MRM_DIS	0x00010000
 244#define CFG_MWI_DIS	0x00008000
 245#define CFG_T64ADDR	0x00004000
 246#define CFG_PCI64_DET	0x00002000
 247#define CFG_DATA64_EN	0x00001000
 248#define CFG_M64ADDR	0x00000800
 249#define CFG_PHY_RST	0x00000400
 250#define CFG_PHY_DIS	0x00000200
 251#define CFG_EXTSTS_EN	0x00000100
 252#define CFG_REQALG	0x00000080
 253#define CFG_SB		0x00000040
 254#define CFG_POW		0x00000020
 255#define CFG_EXD		0x00000010
 256#define CFG_PESEL	0x00000008
 257#define CFG_BROM_DIS	0x00000004
 258#define CFG_EXT_125	0x00000002
 259#define CFG_BEM		0x00000001
 260
 261#define EXTSTS_UDPPKT	0x00200000
 262#define EXTSTS_TCPPKT	0x00080000
 263#define EXTSTS_IPPKT	0x00020000
 264#define EXTSTS_VPKT	0x00010000
 265#define EXTSTS_VTG_MASK	0x0000ffff
 266
 267#define SPDSTS_POLARITY	(CFG_SPDSTS1 | CFG_SPDSTS0 | CFG_DUPSTS | (lnksts ? CFG_LNKSTS : 0))
 268
 269#define MIBC_MIBS	0x00000008
 270#define MIBC_ACLR	0x00000004
 271#define MIBC_FRZ	0x00000002
 272#define MIBC_WRN	0x00000001
 273
 274#define PCR_PSEN	(1 << 31)
 275#define PCR_PS_MCAST	(1 << 30)
 276#define PCR_PS_DA	(1 << 29)
 277#define PCR_STHI_8	(3 << 23)
 278#define PCR_STLO_4	(1 << 23)
 279#define PCR_FFHI_8K	(3 << 21)
 280#define PCR_FFLO_4K	(1 << 21)
 281#define PCR_PAUSE_CNT	0xFFFE
 282
 283#define RXCFG_AEP	0x80000000
 284#define RXCFG_ARP	0x40000000
 285#define RXCFG_STRIPCRC	0x20000000
 286#define RXCFG_RX_FD	0x10000000
 287#define RXCFG_ALP	0x08000000
 288#define RXCFG_AIRL	0x04000000
 289#define RXCFG_MXDMA512	0x00700000
 290#define RXCFG_DRTH	0x0000003e
 291#define RXCFG_DRTH0	0x00000002
 292
 293#define RFCR_RFEN	0x80000000
 294#define RFCR_AAB	0x40000000
 295#define RFCR_AAM	0x20000000
 296#define RFCR_AAU	0x10000000
 297#define RFCR_APM	0x08000000
 298#define RFCR_APAT	0x07800000
 299#define RFCR_APAT3	0x04000000
 300#define RFCR_APAT2	0x02000000
 301#define RFCR_APAT1	0x01000000
 302#define RFCR_APAT0	0x00800000
 303#define RFCR_AARP	0x00400000
 304#define RFCR_MHEN	0x00200000
 305#define RFCR_UHEN	0x00100000
 306#define RFCR_ULM	0x00080000
 307
 308#define VRCR_RUDPE	0x00000080
 309#define VRCR_RTCPE	0x00000040
 310#define VRCR_RIPE	0x00000020
 311#define VRCR_IPEN	0x00000010
 312#define VRCR_DUTF	0x00000008
 313#define VRCR_DVTF	0x00000004
 314#define VRCR_VTREN	0x00000002
 315#define VRCR_VTDEN	0x00000001
 316
 317#define VTCR_PPCHK	0x00000008
 318#define VTCR_GCHK	0x00000004
 319#define VTCR_VPPTI	0x00000002
 320#define VTCR_VGTI	0x00000001
 321
 322#define CR		0x00
 323#define CFG		0x04
 324#define MEAR		0x08
 325#define PTSCR		0x0c
 326#define	ISR		0x10
 327#define	IMR		0x14
 328#define	IER		0x18
 329#define	IHR		0x1c
 330#define TXDP		0x20
 331#define TXDP_HI		0x24
 332#define TXCFG		0x28
 333#define GPIOR		0x2c
 334#define RXDP		0x30
 335#define RXDP_HI		0x34
 336#define RXCFG		0x38
 337#define PQCR		0x3c
 338#define WCSR		0x40
 339#define PCR		0x44
 340#define RFCR		0x48
 341#define RFDR		0x4c
 342
 343#define SRR		0x58
 344
 345#define VRCR		0xbc
 346#define VTCR		0xc0
 347#define VDR		0xc4
 348#define CCSR		0xcc
 349
 350#define TBICR		0xe0
 351#define TBISR		0xe4
 352#define TANAR		0xe8
 353#define TANLPAR		0xec
 354#define TANER		0xf0
 355#define TESR		0xf4
 356
 357#define TBICR_MR_AN_ENABLE	0x00001000
 358#define TBICR_MR_RESTART_AN	0x00000200
 359
 360#define TBISR_MR_LINK_STATUS	0x00000020
 361#define TBISR_MR_AN_COMPLETE	0x00000004
 362
 363#define TANAR_PS2 		0x00000100
 364#define TANAR_PS1 		0x00000080
 365#define TANAR_HALF_DUP 		0x00000040
 366#define TANAR_FULL_DUP 		0x00000020
 367
 368#define GPIOR_GP5_OE		0x00000200
 369#define GPIOR_GP4_OE		0x00000100
 370#define GPIOR_GP3_OE		0x00000080
 371#define GPIOR_GP2_OE		0x00000040
 372#define GPIOR_GP1_OE		0x00000020
 373#define GPIOR_GP3_OUT		0x00000004
 374#define GPIOR_GP1_OUT		0x00000001
 375
 376#define LINK_AUTONEGOTIATE	0x01
 377#define LINK_DOWN		0x02
 378#define LINK_UP			0x04
 379
 380#define HW_ADDR_LEN	sizeof(dma_addr_t)
 381#define desc_addr_set(desc, addr)				\
 382	do {							\
 383		((desc)[0] = cpu_to_le32(addr));		\
 384		if (HW_ADDR_LEN == 8)		 		\
 385			(desc)[1] = cpu_to_le32(((u64)addr) >> 32);	\
 386	} while(0)
 387#define desc_addr_get(desc)					\
 388	(le32_to_cpu((desc)[0]) | \
 389	(HW_ADDR_LEN == 8 ? ((dma_addr_t)le32_to_cpu((desc)[1]))<<32 : 0))
 390
 391#define DESC_LINK		0
 392#define DESC_BUFPTR		(DESC_LINK + HW_ADDR_LEN/4)
 393#define DESC_CMDSTS		(DESC_BUFPTR + HW_ADDR_LEN/4)
 394#define DESC_EXTSTS		(DESC_CMDSTS + 4/4)
 395
 396#define CMDSTS_OWN	0x80000000
 397#define CMDSTS_MORE	0x40000000
 398#define CMDSTS_INTR	0x20000000
 399#define CMDSTS_ERR	0x10000000
 400#define CMDSTS_OK	0x08000000
 401#define CMDSTS_RUNT	0x00200000
 402#define CMDSTS_LEN_MASK	0x0000ffff
 403
 404#define CMDSTS_DEST_MASK	0x01800000
 405#define CMDSTS_DEST_SELF	0x00800000
 406#define CMDSTS_DEST_MULTI	0x01000000
 407
 408#define DESC_SIZE	8		/* Should be cache line sized */
 409
 410struct rx_info {
 411	spinlock_t	lock;
 412	int		up;
 413	unsigned long	idle;
 414
 415	struct sk_buff	*skbs[NR_RX_DESC];
 416
 417	__le32		*next_rx_desc;
 418	u16		next_rx, next_empty;
 419
 420	__le32		*descs;
 421	dma_addr_t	phy_descs;
 422};
 423
 424
 425struct ns83820 {
 426	u8			__iomem *base;
 427
 428	struct pci_dev		*pci_dev;
 429	struct net_device	*ndev;
 430
 431	struct rx_info		rx_info;
 432	struct tasklet_struct	rx_tasklet;
 433
 434	unsigned		ihr;
 435	struct work_struct	tq_refill;
 436
 437	/* protects everything below.  irqsave when using. */
 438	spinlock_t		misc_lock;
 439
 440	u32			CFG_cache;
 441
 442	u32			MEAR_cache;
 443	u32			IMR_cache;
 444
 445	unsigned		linkstate;
 446
 447	spinlock_t	tx_lock;
 448
 449	u16		tx_done_idx;
 450	u16		tx_idx;
 451	volatile u16	tx_free_idx;	/* idx of free desc chain */
 452	u16		tx_intr_idx;
 453
 454	atomic_t	nr_tx_skbs;
 455	struct sk_buff	*tx_skbs[NR_TX_DESC];
 456
 457	char		pad[16] __attribute__((aligned(16)));
 458	__le32		*tx_descs;
 459	dma_addr_t	tx_phy_descs;
 460
 461	struct timer_list	tx_watchdog;
 462};
 463
 464static inline struct ns83820 *PRIV(struct net_device *dev)
 465{
 466	return netdev_priv(dev);
 467}
 468
 469#define __kick_rx(dev)	writel(CR_RXE, dev->base + CR)
 470
 471static inline void kick_rx(struct net_device *ndev)
 472{
 473	struct ns83820 *dev = PRIV(ndev);
 474	dprintk("kick_rx: maybe kicking\n");
 475	if (test_and_clear_bit(0, &dev->rx_info.idle)) {
 476		dprintk("actually kicking\n");
 477		writel(dev->rx_info.phy_descs +
 478			(4 * DESC_SIZE * dev->rx_info.next_rx),
 479		       dev->base + RXDP);
 480		if (dev->rx_info.next_rx == dev->rx_info.next_empty)
 481			printk(KERN_DEBUG "%s: uh-oh: next_rx == next_empty???\n",
 482				ndev->name);
 483		__kick_rx(dev);
 484	}
 485}
 486
 487//free = (tx_done_idx + NR_TX_DESC-2 - free_idx) % NR_TX_DESC
 488#define start_tx_okay(dev)	\
 489	(((NR_TX_DESC-2 + dev->tx_done_idx - dev->tx_free_idx) % NR_TX_DESC) > MIN_TX_DESC_FREE)
 490
 491/* Packet Receiver
 492 *
 493 * The hardware supports linked lists of receive descriptors for
 494 * which ownership is transferred back and forth by means of an
 495 * ownership bit.  While the hardware does support the use of a
 496 * ring for receive descriptors, we only make use of a chain in
 497 * an attempt to reduce bus traffic under heavy load scenarios.
 498 * This will also make bugs a bit more obvious.  The current code
 499 * only makes use of a single rx chain; I hope to implement
 500 * priority based rx for version 1.0.  Goal: even under overload
 501 * conditions, still route realtime traffic with as low jitter as
 502 * possible.
 503 */
 504static inline void build_rx_desc(struct ns83820 *dev, __le32 *desc, dma_addr_t link, dma_addr_t buf, u32 cmdsts, u32 extsts)
 505{
 506	desc_addr_set(desc + DESC_LINK, link);
 507	desc_addr_set(desc + DESC_BUFPTR, buf);
 508	desc[DESC_EXTSTS] = cpu_to_le32(extsts);
 509	mb();
 510	desc[DESC_CMDSTS] = cpu_to_le32(cmdsts);
 511}
 512
 513#define nr_rx_empty(dev) ((NR_RX_DESC-2 + dev->rx_info.next_rx - dev->rx_info.next_empty) % NR_RX_DESC)
 514static inline int ns83820_add_rx_skb(struct ns83820 *dev, struct sk_buff *skb)
 515{
 516	unsigned next_empty;
 517	u32 cmdsts;
 518	__le32 *sg;
 519	dma_addr_t buf;
 520
 521	next_empty = dev->rx_info.next_empty;
 522
 523	/* don't overrun last rx marker */
 524	if (unlikely(nr_rx_empty(dev) <= 2)) {
 525		kfree_skb(skb);
 526		return 1;
 527	}
 528
 529#if 0
 530	dprintk("next_empty[%d] nr_used[%d] next_rx[%d]\n",
 531		dev->rx_info.next_empty,
 532		dev->rx_info.nr_used,
 533		dev->rx_info.next_rx
 534		);
 535#endif
 536
 537	sg = dev->rx_info.descs + (next_empty * DESC_SIZE);
 538	BUG_ON(NULL != dev->rx_info.skbs[next_empty]);
 539	dev->rx_info.skbs[next_empty] = skb;
 540
 541	dev->rx_info.next_empty = (next_empty + 1) % NR_RX_DESC;
 542	cmdsts = REAL_RX_BUF_SIZE | CMDSTS_INTR;
 543	buf = pci_map_single(dev->pci_dev, skb->data,
 544			     REAL_RX_BUF_SIZE, PCI_DMA_FROMDEVICE);
 545	build_rx_desc(dev, sg, 0, buf, cmdsts, 0);
 546	/* update link of previous rx */
 547	if (likely(next_empty != dev->rx_info.next_rx))
 548		dev->rx_info.descs[((NR_RX_DESC + next_empty - 1) % NR_RX_DESC) * DESC_SIZE] = cpu_to_le32(dev->rx_info.phy_descs + (next_empty * DESC_SIZE * 4));
 549
 550	return 0;
 551}
 552
 553static inline int rx_refill(struct net_device *ndev, gfp_t gfp)
 554{
 555	struct ns83820 *dev = PRIV(ndev);
 556	unsigned i;
 557	unsigned long flags = 0;
 558
 559	if (unlikely(nr_rx_empty(dev) <= 2))
 560		return 0;
 561
 562	dprintk("rx_refill(%p)\n", ndev);
 563	if (gfp == GFP_ATOMIC)
 564		spin_lock_irqsave(&dev->rx_info.lock, flags);
 565	for (i=0; i<NR_RX_DESC; i++) {
 566		struct sk_buff *skb;
 567		long res;
 568
 569		/* extra 16 bytes for alignment */
 570		skb = __netdev_alloc_skb(ndev, REAL_RX_BUF_SIZE+16, gfp);
 571		if (unlikely(!skb))
 572			break;
 573
 574		skb_reserve(skb, skb->data - PTR_ALIGN(skb->data, 16));
 575		if (gfp != GFP_ATOMIC)
 576			spin_lock_irqsave(&dev->rx_info.lock, flags);
 577		res = ns83820_add_rx_skb(dev, skb);
 578		if (gfp != GFP_ATOMIC)
 579			spin_unlock_irqrestore(&dev->rx_info.lock, flags);
 580		if (res) {
 581			i = 1;
 582			break;
 583		}
 584	}
 585	if (gfp == GFP_ATOMIC)
 586		spin_unlock_irqrestore(&dev->rx_info.lock, flags);
 587
 588	return i ? 0 : -ENOMEM;
 589}
 590
 591static void rx_refill_atomic(struct net_device *ndev)
 592{
 593	rx_refill(ndev, GFP_ATOMIC);
 594}
 595
 596/* REFILL */
 597static inline void queue_refill(struct work_struct *work)
 598{
 599	struct ns83820 *dev = container_of(work, struct ns83820, tq_refill);
 600	struct net_device *ndev = dev->ndev;
 601
 602	rx_refill(ndev, GFP_KERNEL);
 603	if (dev->rx_info.up)
 604		kick_rx(ndev);
 605}
 606
 607static inline void clear_rx_desc(struct ns83820 *dev, unsigned i)
 608{
 609	build_rx_desc(dev, dev->rx_info.descs + (DESC_SIZE * i), 0, 0, CMDSTS_OWN, 0);
 610}
 611
 612static void phy_intr(struct net_device *ndev)
 613{
 614	struct ns83820 *dev = PRIV(ndev);
 615	static const char *speeds[] = { "10", "100", "1000", "1000(?)", "1000F" };
 616	u32 cfg, new_cfg;
 617	u32 tbisr, tanar, tanlpar;
 618	int speed, fullduplex, newlinkstate;
 619
 620	cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
 621
 622	if (dev->CFG_cache & CFG_TBI_EN) {
 
 
 623		/* we have an optical transceiver */
 624		tbisr = readl(dev->base + TBISR);
 625		tanar = readl(dev->base + TANAR);
 626		tanlpar = readl(dev->base + TANLPAR);
 627		dprintk("phy_intr: tbisr=%08x, tanar=%08x, tanlpar=%08x\n",
 628			tbisr, tanar, tanlpar);
 629
 630		if ( (fullduplex = (tanlpar & TANAR_FULL_DUP) &&
 631		      (tanar & TANAR_FULL_DUP)) ) {
 632
 633			/* both of us are full duplex */
 634			writel(readl(dev->base + TXCFG)
 635			       | TXCFG_CSI | TXCFG_HBI | TXCFG_ATP,
 636			       dev->base + TXCFG);
 637			writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
 638			       dev->base + RXCFG);
 639			/* Light up full duplex LED */
 640			writel(readl(dev->base + GPIOR) | GPIOR_GP1_OUT,
 641			       dev->base + GPIOR);
 642
 643		} else if (((tanlpar & TANAR_HALF_DUP) &&
 644			    (tanar & TANAR_HALF_DUP)) ||
 645			   ((tanlpar & TANAR_FULL_DUP) &&
 646			    (tanar & TANAR_HALF_DUP)) ||
 647			   ((tanlpar & TANAR_HALF_DUP) &&
 648			    (tanar & TANAR_FULL_DUP))) {
 649
 650			/* one or both of us are half duplex */
 651			writel((readl(dev->base + TXCFG)
 652				& ~(TXCFG_CSI | TXCFG_HBI)) | TXCFG_ATP,
 653			       dev->base + TXCFG);
 654			writel(readl(dev->base + RXCFG) & ~RXCFG_RX_FD,
 655			       dev->base + RXCFG);
 656			/* Turn off full duplex LED */
 657			writel(readl(dev->base + GPIOR) & ~GPIOR_GP1_OUT,
 658			       dev->base + GPIOR);
 659		}
 660
 661		speed = 4; /* 1000F */
 662
 663	} else {
 664		/* we have a copper transceiver */
 665		new_cfg = dev->CFG_cache & ~(CFG_SB | CFG_MODE_1000 | CFG_SPDSTS);
 666
 667		if (cfg & CFG_SPDSTS1)
 668			new_cfg |= CFG_MODE_1000;
 669		else
 670			new_cfg &= ~CFG_MODE_1000;
 671
 672		speed = ((cfg / CFG_SPDSTS0) & 3);
 673		fullduplex = (cfg & CFG_DUPSTS);
 674
 675		if (fullduplex) {
 676			new_cfg |= CFG_SB;
 677			writel(readl(dev->base + TXCFG)
 678					| TXCFG_CSI | TXCFG_HBI,
 679			       dev->base + TXCFG);
 680			writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
 681			       dev->base + RXCFG);
 682		} else {
 683			writel(readl(dev->base + TXCFG)
 684					& ~(TXCFG_CSI | TXCFG_HBI),
 685			       dev->base + TXCFG);
 686			writel(readl(dev->base + RXCFG) & ~(RXCFG_RX_FD),
 687			       dev->base + RXCFG);
 688		}
 689
 690		if ((cfg & CFG_LNKSTS) &&
 691		    ((new_cfg ^ dev->CFG_cache) != 0)) {
 692			writel(new_cfg, dev->base + CFG);
 693			dev->CFG_cache = new_cfg;
 694		}
 695
 696		dev->CFG_cache &= ~CFG_SPDSTS;
 697		dev->CFG_cache |= cfg & CFG_SPDSTS;
 698	}
 699
 700	newlinkstate = (cfg & CFG_LNKSTS) ? LINK_UP : LINK_DOWN;
 701
 702	if (newlinkstate & LINK_UP &&
 703	    dev->linkstate != newlinkstate) {
 704		netif_start_queue(ndev);
 705		netif_wake_queue(ndev);
 706		printk(KERN_INFO "%s: link now %s mbps, %s duplex and up.\n",
 707			ndev->name,
 708			speeds[speed],
 709			fullduplex ? "full" : "half");
 710	} else if (newlinkstate & LINK_DOWN &&
 711		   dev->linkstate != newlinkstate) {
 712		netif_stop_queue(ndev);
 713		printk(KERN_INFO "%s: link now down.\n", ndev->name);
 714	}
 715
 716	dev->linkstate = newlinkstate;
 717}
 718
 719static int ns83820_setup_rx(struct net_device *ndev)
 720{
 721	struct ns83820 *dev = PRIV(ndev);
 722	unsigned i;
 723	int ret;
 724
 725	dprintk("ns83820_setup_rx(%p)\n", ndev);
 726
 727	dev->rx_info.idle = 1;
 728	dev->rx_info.next_rx = 0;
 729	dev->rx_info.next_rx_desc = dev->rx_info.descs;
 730	dev->rx_info.next_empty = 0;
 731
 732	for (i=0; i<NR_RX_DESC; i++)
 733		clear_rx_desc(dev, i);
 734
 735	writel(0, dev->base + RXDP_HI);
 736	writel(dev->rx_info.phy_descs, dev->base + RXDP);
 737
 738	ret = rx_refill(ndev, GFP_KERNEL);
 739	if (!ret) {
 740		dprintk("starting receiver\n");
 741		/* prevent the interrupt handler from stomping on us */
 742		spin_lock_irq(&dev->rx_info.lock);
 743
 744		writel(0x0001, dev->base + CCSR);
 745		writel(0, dev->base + RFCR);
 746		writel(0x7fc00000, dev->base + RFCR);
 747		writel(0xffc00000, dev->base + RFCR);
 748
 749		dev->rx_info.up = 1;
 750
 751		phy_intr(ndev);
 752
 753		/* Okay, let it rip */
 754		spin_lock(&dev->misc_lock);
 755		dev->IMR_cache |= ISR_PHY;
 756		dev->IMR_cache |= ISR_RXRCMP;
 757		//dev->IMR_cache |= ISR_RXERR;
 758		//dev->IMR_cache |= ISR_RXOK;
 759		dev->IMR_cache |= ISR_RXORN;
 760		dev->IMR_cache |= ISR_RXSOVR;
 761		dev->IMR_cache |= ISR_RXDESC;
 762		dev->IMR_cache |= ISR_RXIDLE;
 763		dev->IMR_cache |= ISR_TXDESC;
 764		dev->IMR_cache |= ISR_TXIDLE;
 765
 766		writel(dev->IMR_cache, dev->base + IMR);
 767		writel(1, dev->base + IER);
 768		spin_unlock(&dev->misc_lock);
 769
 770		kick_rx(ndev);
 771
 772		spin_unlock_irq(&dev->rx_info.lock);
 773	}
 774	return ret;
 775}
 776
 777static void ns83820_cleanup_rx(struct ns83820 *dev)
 778{
 779	unsigned i;
 780	unsigned long flags;
 781
 782	dprintk("ns83820_cleanup_rx(%p)\n", dev);
 783
 784	/* disable receive interrupts */
 785	spin_lock_irqsave(&dev->misc_lock, flags);
 786	dev->IMR_cache &= ~(ISR_RXOK | ISR_RXDESC | ISR_RXERR | ISR_RXEARLY | ISR_RXIDLE);
 787	writel(dev->IMR_cache, dev->base + IMR);
 788	spin_unlock_irqrestore(&dev->misc_lock, flags);
 789
 790	/* synchronize with the interrupt handler and kill it */
 791	dev->rx_info.up = 0;
 792	synchronize_irq(dev->pci_dev->irq);
 793
 794	/* touch the pci bus... */
 795	readl(dev->base + IMR);
 796
 797	/* assumes the transmitter is already disabled and reset */
 798	writel(0, dev->base + RXDP_HI);
 799	writel(0, dev->base + RXDP);
 800
 801	for (i=0; i<NR_RX_DESC; i++) {
 802		struct sk_buff *skb = dev->rx_info.skbs[i];
 803		dev->rx_info.skbs[i] = NULL;
 804		clear_rx_desc(dev, i);
 805		kfree_skb(skb);
 806	}
 807}
 808
 809static void ns83820_rx_kick(struct net_device *ndev)
 810{
 811	struct ns83820 *dev = PRIV(ndev);
 812	/*if (nr_rx_empty(dev) >= NR_RX_DESC/4)*/ {
 813		if (dev->rx_info.up) {
 814			rx_refill_atomic(ndev);
 815			kick_rx(ndev);
 816		}
 817	}
 818
 819	if (dev->rx_info.up && nr_rx_empty(dev) > NR_RX_DESC*3/4)
 820		schedule_work(&dev->tq_refill);
 821	else
 822		kick_rx(ndev);
 823	if (dev->rx_info.idle)
 824		printk(KERN_DEBUG "%s: BAD\n", ndev->name);
 825}
 826
 827/* rx_irq
 828 *
 829 */
 830static void rx_irq(struct net_device *ndev)
 831{
 832	struct ns83820 *dev = PRIV(ndev);
 833	struct rx_info *info = &dev->rx_info;
 834	unsigned next_rx;
 835	int rx_rc, len;
 836	u32 cmdsts;
 837	__le32 *desc;
 838	unsigned long flags;
 839	int nr = 0;
 840
 841	dprintk("rx_irq(%p)\n", ndev);
 842	dprintk("rxdp: %08x, descs: %08lx next_rx[%d]: %p next_empty[%d]: %p\n",
 843		readl(dev->base + RXDP),
 844		(long)(dev->rx_info.phy_descs),
 845		(int)dev->rx_info.next_rx,
 846		(dev->rx_info.descs + (DESC_SIZE * dev->rx_info.next_rx)),
 847		(int)dev->rx_info.next_empty,
 848		(dev->rx_info.descs + (DESC_SIZE * dev->rx_info.next_empty))
 849		);
 850
 851	spin_lock_irqsave(&info->lock, flags);
 852	if (!info->up)
 853		goto out;
 854
 855	dprintk("walking descs\n");
 856	next_rx = info->next_rx;
 857	desc = info->next_rx_desc;
 858	while ((CMDSTS_OWN & (cmdsts = le32_to_cpu(desc[DESC_CMDSTS]))) &&
 859	       (cmdsts != CMDSTS_OWN)) {
 860		struct sk_buff *skb;
 861		u32 extsts = le32_to_cpu(desc[DESC_EXTSTS]);
 862		dma_addr_t bufptr = desc_addr_get(desc + DESC_BUFPTR);
 863
 864		dprintk("cmdsts: %08x\n", cmdsts);
 865		dprintk("link: %08x\n", cpu_to_le32(desc[DESC_LINK]));
 866		dprintk("extsts: %08x\n", extsts);
 867
 868		skb = info->skbs[next_rx];
 869		info->skbs[next_rx] = NULL;
 870		info->next_rx = (next_rx + 1) % NR_RX_DESC;
 871
 872		mb();
 873		clear_rx_desc(dev, next_rx);
 874
 875		pci_unmap_single(dev->pci_dev, bufptr,
 876				 RX_BUF_SIZE, PCI_DMA_FROMDEVICE);
 877		len = cmdsts & CMDSTS_LEN_MASK;
 878#ifdef NS83820_VLAN_ACCEL_SUPPORT
 879		/* NH: As was mentioned below, this chip is kinda
 880		 * brain dead about vlan tag stripping.  Frames
 881		 * that are 64 bytes with a vlan header appended
 882		 * like arp frames, or pings, are flagged as Runts
 883		 * when the tag is stripped and hardware.  This
 884		 * also means that the OK bit in the descriptor
 885		 * is cleared when the frame comes in so we have
 886		 * to do a specific length check here to make sure
 887		 * the frame would have been ok, had we not stripped
 888		 * the tag.
 889		 */
 890		if (likely((CMDSTS_OK & cmdsts) ||
 891			((cmdsts & CMDSTS_RUNT) && len >= 56))) {
 892#else
 893		if (likely(CMDSTS_OK & cmdsts)) {
 894#endif
 895			skb_put(skb, len);
 896			if (unlikely(!skb))
 897				goto netdev_mangle_me_harder_failed;
 898			if (cmdsts & CMDSTS_DEST_MULTI)
 899				ndev->stats.multicast++;
 900			ndev->stats.rx_packets++;
 901			ndev->stats.rx_bytes += len;
 902			if ((extsts & 0x002a0000) && !(extsts & 0x00540000)) {
 903				skb->ip_summed = CHECKSUM_UNNECESSARY;
 904			} else {
 905				skb_checksum_none_assert(skb);
 906			}
 907			skb->protocol = eth_type_trans(skb, ndev);
 908#ifdef NS83820_VLAN_ACCEL_SUPPORT
 909			if(extsts & EXTSTS_VPKT) {
 910				unsigned short tag;
 911
 912				tag = ntohs(extsts & EXTSTS_VTG_MASK);
 913				__vlan_hwaccel_put_tag(skb, htons(ETH_P_IPV6), tag);
 914			}
 915#endif
 916			rx_rc = netif_rx(skb);
 917			if (NET_RX_DROP == rx_rc) {
 918netdev_mangle_me_harder_failed:
 919				ndev->stats.rx_dropped++;
 920			}
 921		} else {
 922			dev_kfree_skb_irq(skb);
 923		}
 924
 925		nr++;
 926		next_rx = info->next_rx;
 927		desc = info->descs + (DESC_SIZE * next_rx);
 928	}
 929	info->next_rx = next_rx;
 930	info->next_rx_desc = info->descs + (DESC_SIZE * next_rx);
 931
 932out:
 933	if (0 && !nr) {
 934		Dprintk("dazed: cmdsts_f: %08x\n", cmdsts);
 935	}
 936
 937	spin_unlock_irqrestore(&info->lock, flags);
 938}
 939
 940static void rx_action(unsigned long _dev)
 941{
 942	struct net_device *ndev = (void *)_dev;
 943	struct ns83820 *dev = PRIV(ndev);
 944	rx_irq(ndev);
 945	writel(ihr, dev->base + IHR);
 946
 947	spin_lock_irq(&dev->misc_lock);
 948	dev->IMR_cache |= ISR_RXDESC;
 949	writel(dev->IMR_cache, dev->base + IMR);
 950	spin_unlock_irq(&dev->misc_lock);
 951
 952	rx_irq(ndev);
 953	ns83820_rx_kick(ndev);
 954}
 955
 956/* Packet Transmit code
 957 */
 958static inline void kick_tx(struct ns83820 *dev)
 959{
 960	dprintk("kick_tx(%p): tx_idx=%d free_idx=%d\n",
 961		dev, dev->tx_idx, dev->tx_free_idx);
 962	writel(CR_TXE, dev->base + CR);
 963}
 964
 965/* No spinlock needed on the transmit irq path as the interrupt handler is
 966 * serialized.
 967 */
 968static void do_tx_done(struct net_device *ndev)
 969{
 970	struct ns83820 *dev = PRIV(ndev);
 971	u32 cmdsts, tx_done_idx;
 972	__le32 *desc;
 973
 974	dprintk("do_tx_done(%p)\n", ndev);
 975	tx_done_idx = dev->tx_done_idx;
 976	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
 977
 978	dprintk("tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
 979		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
 980	while ((tx_done_idx != dev->tx_free_idx) &&
 981	       !(CMDSTS_OWN & (cmdsts = le32_to_cpu(desc[DESC_CMDSTS]))) ) {
 982		struct sk_buff *skb;
 983		unsigned len;
 984		dma_addr_t addr;
 985
 986		if (cmdsts & CMDSTS_ERR)
 987			ndev->stats.tx_errors++;
 988		if (cmdsts & CMDSTS_OK)
 989			ndev->stats.tx_packets++;
 990		if (cmdsts & CMDSTS_OK)
 991			ndev->stats.tx_bytes += cmdsts & 0xffff;
 992
 993		dprintk("tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
 994			tx_done_idx, dev->tx_free_idx, cmdsts);
 995		skb = dev->tx_skbs[tx_done_idx];
 996		dev->tx_skbs[tx_done_idx] = NULL;
 997		dprintk("done(%p)\n", skb);
 998
 999		len = cmdsts & CMDSTS_LEN_MASK;
1000		addr = desc_addr_get(desc + DESC_BUFPTR);
1001		if (skb) {
1002			pci_unmap_single(dev->pci_dev,
1003					addr,
1004					len,
1005					PCI_DMA_TODEVICE);
1006			dev_kfree_skb_irq(skb);
1007			atomic_dec(&dev->nr_tx_skbs);
1008		} else
1009			pci_unmap_page(dev->pci_dev,
1010					addr,
1011					len,
1012					PCI_DMA_TODEVICE);
1013
1014		tx_done_idx = (tx_done_idx + 1) % NR_TX_DESC;
1015		dev->tx_done_idx = tx_done_idx;
1016		desc[DESC_CMDSTS] = cpu_to_le32(0);
1017		mb();
1018		desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1019	}
1020
1021	/* Allow network stack to resume queueing packets after we've
1022	 * finished transmitting at least 1/4 of the packets in the queue.
1023	 */
1024	if (netif_queue_stopped(ndev) && start_tx_okay(dev)) {
1025		dprintk("start_queue(%p)\n", ndev);
1026		netif_start_queue(ndev);
1027		netif_wake_queue(ndev);
1028	}
1029}
1030
1031static void ns83820_cleanup_tx(struct ns83820 *dev)
1032{
1033	unsigned i;
1034
1035	for (i=0; i<NR_TX_DESC; i++) {
1036		struct sk_buff *skb = dev->tx_skbs[i];
1037		dev->tx_skbs[i] = NULL;
1038		if (skb) {
1039			__le32 *desc = dev->tx_descs + (i * DESC_SIZE);
1040			pci_unmap_single(dev->pci_dev,
1041					desc_addr_get(desc + DESC_BUFPTR),
1042					le32_to_cpu(desc[DESC_CMDSTS]) & CMDSTS_LEN_MASK,
1043					PCI_DMA_TODEVICE);
1044			dev_kfree_skb_irq(skb);
1045			atomic_dec(&dev->nr_tx_skbs);
1046		}
1047	}
1048
1049	memset(dev->tx_descs, 0, NR_TX_DESC * DESC_SIZE * 4);
1050}
1051
1052/* transmit routine.  This code relies on the network layer serializing
1053 * its calls in, but will run happily in parallel with the interrupt
1054 * handler.  This code currently has provisions for fragmenting tx buffers
1055 * while trying to track down a bug in either the zero copy code or
1056 * the tx fifo (hence the MAX_FRAG_LEN).
1057 */
1058static netdev_tx_t ns83820_hard_start_xmit(struct sk_buff *skb,
1059					   struct net_device *ndev)
1060{
1061	struct ns83820 *dev = PRIV(ndev);
1062	u32 free_idx, cmdsts, extsts;
1063	int nr_free, nr_frags;
1064	unsigned tx_done_idx, last_idx;
1065	dma_addr_t buf;
1066	unsigned len;
1067	skb_frag_t *frag;
1068	int stopped = 0;
1069	int do_intr = 0;
1070	volatile __le32 *first_desc;
1071
1072	dprintk("ns83820_hard_start_xmit\n");
1073
1074	nr_frags =  skb_shinfo(skb)->nr_frags;
1075again:
1076	if (unlikely(dev->CFG_cache & CFG_LNKSTS)) {
1077		netif_stop_queue(ndev);
1078		if (unlikely(dev->CFG_cache & CFG_LNKSTS))
1079			return NETDEV_TX_BUSY;
1080		netif_start_queue(ndev);
1081	}
1082
1083	last_idx = free_idx = dev->tx_free_idx;
1084	tx_done_idx = dev->tx_done_idx;
1085	nr_free = (tx_done_idx + NR_TX_DESC-2 - free_idx) % NR_TX_DESC;
1086	nr_free -= 1;
1087	if (nr_free <= nr_frags) {
1088		dprintk("stop_queue - not enough(%p)\n", ndev);
1089		netif_stop_queue(ndev);
1090
1091		/* Check again: we may have raced with a tx done irq */
1092		if (dev->tx_done_idx != tx_done_idx) {
1093			dprintk("restart queue(%p)\n", ndev);
1094			netif_start_queue(ndev);
1095			goto again;
1096		}
1097		return NETDEV_TX_BUSY;
1098	}
1099
1100	if (free_idx == dev->tx_intr_idx) {
1101		do_intr = 1;
1102		dev->tx_intr_idx = (dev->tx_intr_idx + NR_TX_DESC/4) % NR_TX_DESC;
1103	}
1104
1105	nr_free -= nr_frags;
1106	if (nr_free < MIN_TX_DESC_FREE) {
1107		dprintk("stop_queue - last entry(%p)\n", ndev);
1108		netif_stop_queue(ndev);
1109		stopped = 1;
1110	}
1111
1112	frag = skb_shinfo(skb)->frags;
1113	if (!nr_frags)
1114		frag = NULL;
1115	extsts = 0;
1116	if (skb->ip_summed == CHECKSUM_PARTIAL) {
1117		extsts |= EXTSTS_IPPKT;
1118		if (IPPROTO_TCP == ip_hdr(skb)->protocol)
1119			extsts |= EXTSTS_TCPPKT;
1120		else if (IPPROTO_UDP == ip_hdr(skb)->protocol)
1121			extsts |= EXTSTS_UDPPKT;
1122	}
1123
1124#ifdef NS83820_VLAN_ACCEL_SUPPORT
1125	if (skb_vlan_tag_present(skb)) {
1126		/* fetch the vlan tag info out of the
1127		 * ancillary data if the vlan code
1128		 * is using hw vlan acceleration
1129		 */
1130		short tag = skb_vlan_tag_get(skb);
1131		extsts |= (EXTSTS_VPKT | htons(tag));
1132	}
1133#endif
1134
1135	len = skb->len;
1136	if (nr_frags)
1137		len -= skb->data_len;
1138	buf = pci_map_single(dev->pci_dev, skb->data, len, PCI_DMA_TODEVICE);
 
1139
1140	first_desc = dev->tx_descs + (free_idx * DESC_SIZE);
1141
1142	for (;;) {
1143		volatile __le32 *desc = dev->tx_descs + (free_idx * DESC_SIZE);
1144
1145		dprintk("frag[%3u]: %4u @ 0x%08Lx\n", free_idx, len,
1146			(unsigned long long)buf);
1147		last_idx = free_idx;
1148		free_idx = (free_idx + 1) % NR_TX_DESC;
1149		desc[DESC_LINK] = cpu_to_le32(dev->tx_phy_descs + (free_idx * DESC_SIZE * 4));
1150		desc_addr_set(desc + DESC_BUFPTR, buf);
1151		desc[DESC_EXTSTS] = cpu_to_le32(extsts);
1152
1153		cmdsts = ((nr_frags) ? CMDSTS_MORE : do_intr ? CMDSTS_INTR : 0);
1154		cmdsts |= (desc == first_desc) ? 0 : CMDSTS_OWN;
1155		cmdsts |= len;
1156		desc[DESC_CMDSTS] = cpu_to_le32(cmdsts);
1157
1158		if (!nr_frags)
1159			break;
1160
1161		buf = skb_frag_dma_map(&dev->pci_dev->dev, frag, 0,
1162				       skb_frag_size(frag), DMA_TO_DEVICE);
1163		dprintk("frag: buf=%08Lx  page=%08lx offset=%08lx\n",
1164			(long long)buf, (long) page_to_pfn(frag->page),
1165			frag->page_offset);
1166		len = skb_frag_size(frag);
1167		frag++;
1168		nr_frags--;
1169	}
1170	dprintk("done pkt\n");
1171
1172	spin_lock_irq(&dev->tx_lock);
1173	dev->tx_skbs[last_idx] = skb;
1174	first_desc[DESC_CMDSTS] |= cpu_to_le32(CMDSTS_OWN);
1175	dev->tx_free_idx = free_idx;
1176	atomic_inc(&dev->nr_tx_skbs);
1177	spin_unlock_irq(&dev->tx_lock);
1178
1179	kick_tx(dev);
1180
1181	/* Check again: we may have raced with a tx done irq */
1182	if (stopped && (dev->tx_done_idx != tx_done_idx) && start_tx_okay(dev))
1183		netif_start_queue(ndev);
1184
1185	return NETDEV_TX_OK;
1186}
1187
1188static void ns83820_update_stats(struct ns83820 *dev)
1189{
1190	struct net_device *ndev = dev->ndev;
1191	u8 __iomem *base = dev->base;
1192
1193	/* the DP83820 will freeze counters, so we need to read all of them */
1194	ndev->stats.rx_errors		+= readl(base + 0x60) & 0xffff;
1195	ndev->stats.rx_crc_errors	+= readl(base + 0x64) & 0xffff;
1196	ndev->stats.rx_missed_errors	+= readl(base + 0x68) & 0xffff;
1197	ndev->stats.rx_frame_errors	+= readl(base + 0x6c) & 0xffff;
1198	/*ndev->stats.rx_symbol_errors +=*/ readl(base + 0x70);
1199	ndev->stats.rx_length_errors	+= readl(base + 0x74) & 0xffff;
1200	ndev->stats.rx_length_errors	+= readl(base + 0x78) & 0xffff;
1201	/*ndev->stats.rx_badopcode_errors += */ readl(base + 0x7c);
1202	/*ndev->stats.rx_pause_count += */  readl(base + 0x80);
1203	/*ndev->stats.tx_pause_count += */  readl(base + 0x84);
1204	ndev->stats.tx_carrier_errors	+= readl(base + 0x88) & 0xff;
1205}
1206
1207static struct net_device_stats *ns83820_get_stats(struct net_device *ndev)
1208{
1209	struct ns83820 *dev = PRIV(ndev);
1210
1211	/* somewhat overkill */
1212	spin_lock_irq(&dev->misc_lock);
1213	ns83820_update_stats(dev);
1214	spin_unlock_irq(&dev->misc_lock);
1215
1216	return &ndev->stats;
1217}
1218
1219/* Let ethtool retrieve info */
1220static int ns83820_get_settings(struct net_device *ndev,
1221				struct ethtool_cmd *cmd)
1222{
1223	struct ns83820 *dev = PRIV(ndev);
1224	u32 cfg, tanar, tbicr;
1225	int fullduplex   = 0;
 
1226
1227	/*
1228	 * Here's the list of available ethtool commands from other drivers:
1229	 *	cmd->advertising =
1230	 *	ethtool_cmd_speed_set(cmd, ...)
1231	 *	cmd->duplex =
1232	 *	cmd->port = 0;
1233	 *	cmd->phy_address =
1234	 *	cmd->transceiver = 0;
1235	 *	cmd->autoneg =
1236	 *	cmd->maxtxpkt = 0;
1237	 *	cmd->maxrxpkt = 0;
1238	 */
1239
1240	/* read current configuration */
1241	cfg   = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1242	tanar = readl(dev->base + TANAR);
1243	tbicr = readl(dev->base + TBICR);
1244
1245	fullduplex = (cfg & CFG_DUPSTS) ? 1 : 0;
1246
1247	cmd->supported = SUPPORTED_Autoneg;
1248
1249	if (dev->CFG_cache & CFG_TBI_EN) {
1250		/* we have optical interface */
1251		cmd->supported |= SUPPORTED_1000baseT_Half |
1252					SUPPORTED_1000baseT_Full |
1253					SUPPORTED_FIBRE;
1254		cmd->port       = PORT_FIBRE;
1255	} else {
1256		/* we have copper */
1257		cmd->supported |= SUPPORTED_10baseT_Half |
1258			SUPPORTED_10baseT_Full | SUPPORTED_100baseT_Half |
1259			SUPPORTED_100baseT_Full | SUPPORTED_1000baseT_Half |
1260			SUPPORTED_1000baseT_Full |
1261			SUPPORTED_MII;
1262		cmd->port = PORT_MII;
1263	}
1264
1265	cmd->duplex = fullduplex ? DUPLEX_FULL : DUPLEX_HALF;
 
 
 
1266	switch (cfg / CFG_SPDSTS0 & 3) {
1267	case 2:
1268		ethtool_cmd_speed_set(cmd, SPEED_1000);
1269		break;
1270	case 1:
1271		ethtool_cmd_speed_set(cmd, SPEED_100);
1272		break;
1273	default:
1274		ethtool_cmd_speed_set(cmd, SPEED_10);
1275		break;
1276	}
1277	cmd->autoneg = (tbicr & TBICR_MR_AN_ENABLE)
1278		? AUTONEG_ENABLE : AUTONEG_DISABLE;
1279	return 0;
1280}
1281
1282/* Let ethool change settings*/
1283static int ns83820_set_settings(struct net_device *ndev,
1284				struct ethtool_cmd *cmd)
1285{
1286	struct ns83820 *dev = PRIV(ndev);
1287	u32 cfg, tanar;
1288	int have_optical = 0;
1289	int fullduplex   = 0;
1290
1291	/* read current configuration */
1292	cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1293	tanar = readl(dev->base + TANAR);
1294
1295	if (dev->CFG_cache & CFG_TBI_EN) {
1296		/* we have optical */
1297		have_optical = 1;
1298		fullduplex   = (tanar & TANAR_FULL_DUP);
1299
1300	} else {
1301		/* we have copper */
1302		fullduplex = cfg & CFG_DUPSTS;
1303	}
1304
1305	spin_lock_irq(&dev->misc_lock);
1306	spin_lock(&dev->tx_lock);
1307
1308	/* Set duplex */
1309	if (cmd->duplex != fullduplex) {
1310		if (have_optical) {
1311			/*set full duplex*/
1312			if (cmd->duplex == DUPLEX_FULL) {
1313				/* force full duplex */
1314				writel(readl(dev->base + TXCFG)
1315					| TXCFG_CSI | TXCFG_HBI | TXCFG_ATP,
1316					dev->base + TXCFG);
1317				writel(readl(dev->base + RXCFG) | RXCFG_RX_FD,
1318					dev->base + RXCFG);
1319				/* Light up full duplex LED */
1320				writel(readl(dev->base + GPIOR) | GPIOR_GP1_OUT,
1321					dev->base + GPIOR);
1322			} else {
1323				/*TODO: set half duplex */
1324			}
1325
1326		} else {
1327			/*we have copper*/
1328			/* TODO: Set duplex for copper cards */
1329		}
1330		printk(KERN_INFO "%s: Duplex set via ethtool\n",
1331		ndev->name);
1332	}
1333
1334	/* Set autonegotiation */
1335	if (1) {
1336		if (cmd->autoneg == AUTONEG_ENABLE) {
1337			/* restart auto negotiation */
1338			writel(TBICR_MR_AN_ENABLE | TBICR_MR_RESTART_AN,
1339				dev->base + TBICR);
1340			writel(TBICR_MR_AN_ENABLE, dev->base + TBICR);
1341				dev->linkstate = LINK_AUTONEGOTIATE;
1342
1343			printk(KERN_INFO "%s: autoneg enabled via ethtool\n",
1344				ndev->name);
1345		} else {
1346			/* disable auto negotiation */
1347			writel(0x00000000, dev->base + TBICR);
1348		}
1349
1350		printk(KERN_INFO "%s: autoneg %s via ethtool\n", ndev->name,
1351				cmd->autoneg ? "ENABLED" : "DISABLED");
1352	}
1353
1354	phy_intr(ndev);
1355	spin_unlock(&dev->tx_lock);
1356	spin_unlock_irq(&dev->misc_lock);
1357
1358	return 0;
1359}
1360/* end ethtool get/set support -df */
1361
1362static void ns83820_get_drvinfo(struct net_device *ndev, struct ethtool_drvinfo *info)
1363{
1364	struct ns83820 *dev = PRIV(ndev);
1365	strlcpy(info->driver, "ns83820", sizeof(info->driver));
1366	strlcpy(info->version, VERSION, sizeof(info->version));
1367	strlcpy(info->bus_info, pci_name(dev->pci_dev), sizeof(info->bus_info));
1368}
1369
1370static u32 ns83820_get_link(struct net_device *ndev)
1371{
1372	struct ns83820 *dev = PRIV(ndev);
1373	u32 cfg = readl(dev->base + CFG) ^ SPDSTS_POLARITY;
1374	return cfg & CFG_LNKSTS ? 1 : 0;
1375}
1376
1377static const struct ethtool_ops ops = {
1378	.get_settings    = ns83820_get_settings,
1379	.set_settings    = ns83820_set_settings,
1380	.get_drvinfo     = ns83820_get_drvinfo,
1381	.get_link        = ns83820_get_link
 
 
1382};
1383
1384static inline void ns83820_disable_interrupts(struct ns83820 *dev)
1385{
1386	writel(0, dev->base + IMR);
1387	writel(0, dev->base + IER);
1388	readl(dev->base + IER);
1389}
1390
1391/* this function is called in irq context from the ISR */
1392static void ns83820_mib_isr(struct ns83820 *dev)
1393{
1394	unsigned long flags;
1395	spin_lock_irqsave(&dev->misc_lock, flags);
1396	ns83820_update_stats(dev);
1397	spin_unlock_irqrestore(&dev->misc_lock, flags);
1398}
1399
1400static void ns83820_do_isr(struct net_device *ndev, u32 isr);
1401static irqreturn_t ns83820_irq(int foo, void *data)
1402{
1403	struct net_device *ndev = data;
1404	struct ns83820 *dev = PRIV(ndev);
1405	u32 isr;
1406	dprintk("ns83820_irq(%p)\n", ndev);
1407
1408	dev->ihr = 0;
1409
1410	isr = readl(dev->base + ISR);
1411	dprintk("irq: %08x\n", isr);
1412	ns83820_do_isr(ndev, isr);
1413	return IRQ_HANDLED;
1414}
1415
1416static void ns83820_do_isr(struct net_device *ndev, u32 isr)
1417{
1418	struct ns83820 *dev = PRIV(ndev);
1419	unsigned long flags;
1420
1421#ifdef DEBUG
1422	if (isr & ~(ISR_PHY | ISR_RXDESC | ISR_RXEARLY | ISR_RXOK | ISR_RXERR | ISR_TXIDLE | ISR_TXOK | ISR_TXDESC))
1423		Dprintk("odd isr? 0x%08x\n", isr);
1424#endif
1425
1426	if (ISR_RXIDLE & isr) {
1427		dev->rx_info.idle = 1;
1428		Dprintk("oh dear, we are idle\n");
1429		ns83820_rx_kick(ndev);
1430	}
1431
1432	if ((ISR_RXDESC | ISR_RXOK) & isr) {
1433		prefetch(dev->rx_info.next_rx_desc);
1434
1435		spin_lock_irqsave(&dev->misc_lock, flags);
1436		dev->IMR_cache &= ~(ISR_RXDESC | ISR_RXOK);
1437		writel(dev->IMR_cache, dev->base + IMR);
1438		spin_unlock_irqrestore(&dev->misc_lock, flags);
1439
1440		tasklet_schedule(&dev->rx_tasklet);
1441		//rx_irq(ndev);
1442		//writel(4, dev->base + IHR);
1443	}
1444
1445	if ((ISR_RXIDLE | ISR_RXORN | ISR_RXDESC | ISR_RXOK | ISR_RXERR) & isr)
1446		ns83820_rx_kick(ndev);
1447
1448	if (unlikely(ISR_RXSOVR & isr)) {
1449		//printk("overrun: rxsovr\n");
1450		ndev->stats.rx_fifo_errors++;
1451	}
1452
1453	if (unlikely(ISR_RXORN & isr)) {
1454		//printk("overrun: rxorn\n");
1455		ndev->stats.rx_fifo_errors++;
1456	}
1457
1458	if ((ISR_RXRCMP & isr) && dev->rx_info.up)
1459		writel(CR_RXE, dev->base + CR);
1460
1461	if (ISR_TXIDLE & isr) {
1462		u32 txdp;
1463		txdp = readl(dev->base + TXDP);
1464		dprintk("txdp: %08x\n", txdp);
1465		txdp -= dev->tx_phy_descs;
1466		dev->tx_idx = txdp / (DESC_SIZE * 4);
1467		if (dev->tx_idx >= NR_TX_DESC) {
1468			printk(KERN_ALERT "%s: BUG -- txdp out of range\n", ndev->name);
1469			dev->tx_idx = 0;
1470		}
1471		/* The may have been a race between a pci originated read
1472		 * and the descriptor update from the cpu.  Just in case,
1473		 * kick the transmitter if the hardware thinks it is on a
1474		 * different descriptor than we are.
1475		 */
1476		if (dev->tx_idx != dev->tx_free_idx)
1477			kick_tx(dev);
1478	}
1479
1480	/* Defer tx ring processing until more than a minimum amount of
1481	 * work has accumulated
1482	 */
1483	if ((ISR_TXDESC | ISR_TXIDLE | ISR_TXOK | ISR_TXERR) & isr) {
1484		spin_lock_irqsave(&dev->tx_lock, flags);
1485		do_tx_done(ndev);
1486		spin_unlock_irqrestore(&dev->tx_lock, flags);
1487
1488		/* Disable TxOk if there are no outstanding tx packets.
1489		 */
1490		if ((dev->tx_done_idx == dev->tx_free_idx) &&
1491		    (dev->IMR_cache & ISR_TXOK)) {
1492			spin_lock_irqsave(&dev->misc_lock, flags);
1493			dev->IMR_cache &= ~ISR_TXOK;
1494			writel(dev->IMR_cache, dev->base + IMR);
1495			spin_unlock_irqrestore(&dev->misc_lock, flags);
1496		}
1497	}
1498
1499	/* The TxIdle interrupt can come in before the transmit has
1500	 * completed.  Normally we reap packets off of the combination
1501	 * of TxDesc and TxIdle and leave TxOk disabled (since it
1502	 * occurs on every packet), but when no further irqs of this
1503	 * nature are expected, we must enable TxOk.
1504	 */
1505	if ((ISR_TXIDLE & isr) && (dev->tx_done_idx != dev->tx_free_idx)) {
1506		spin_lock_irqsave(&dev->misc_lock, flags);
1507		dev->IMR_cache |= ISR_TXOK;
1508		writel(dev->IMR_cache, dev->base + IMR);
1509		spin_unlock_irqrestore(&dev->misc_lock, flags);
1510	}
1511
1512	/* MIB interrupt: one of the statistics counters is about to overflow */
1513	if (unlikely(ISR_MIB & isr))
1514		ns83820_mib_isr(dev);
1515
1516	/* PHY: Link up/down/negotiation state change */
1517	if (unlikely(ISR_PHY & isr))
1518		phy_intr(ndev);
1519
1520#if 0	/* Still working on the interrupt mitigation strategy */
1521	if (dev->ihr)
1522		writel(dev->ihr, dev->base + IHR);
1523#endif
1524}
1525
1526static void ns83820_do_reset(struct ns83820 *dev, u32 which)
1527{
1528	Dprintk("resetting chip...\n");
1529	writel(which, dev->base + CR);
1530	do {
1531		schedule();
1532	} while (readl(dev->base + CR) & which);
1533	Dprintk("okay!\n");
1534}
1535
1536static int ns83820_stop(struct net_device *ndev)
1537{
1538	struct ns83820 *dev = PRIV(ndev);
1539
1540	/* FIXME: protect against interrupt handler? */
1541	del_timer_sync(&dev->tx_watchdog);
1542
1543	ns83820_disable_interrupts(dev);
1544
1545	dev->rx_info.up = 0;
1546	synchronize_irq(dev->pci_dev->irq);
1547
1548	ns83820_do_reset(dev, CR_RST);
1549
1550	synchronize_irq(dev->pci_dev->irq);
1551
1552	spin_lock_irq(&dev->misc_lock);
1553	dev->IMR_cache &= ~(ISR_TXURN | ISR_TXIDLE | ISR_TXERR | ISR_TXDESC | ISR_TXOK);
1554	spin_unlock_irq(&dev->misc_lock);
1555
1556	ns83820_cleanup_rx(dev);
1557	ns83820_cleanup_tx(dev);
1558
1559	return 0;
1560}
1561
1562static void ns83820_tx_timeout(struct net_device *ndev)
1563{
1564	struct ns83820 *dev = PRIV(ndev);
1565        u32 tx_done_idx;
1566	__le32 *desc;
1567	unsigned long flags;
1568
1569	spin_lock_irqsave(&dev->tx_lock, flags);
1570
1571	tx_done_idx = dev->tx_done_idx;
1572	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1573
1574	printk(KERN_INFO "%s: tx_timeout: tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
1575		ndev->name,
1576		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
1577
1578#if defined(DEBUG)
1579	{
1580		u32 isr;
1581		isr = readl(dev->base + ISR);
1582		printk("irq: %08x imr: %08x\n", isr, dev->IMR_cache);
1583		ns83820_do_isr(ndev, isr);
1584	}
1585#endif
1586
1587	do_tx_done(ndev);
1588
1589	tx_done_idx = dev->tx_done_idx;
1590	desc = dev->tx_descs + (tx_done_idx * DESC_SIZE);
1591
1592	printk(KERN_INFO "%s: after: tx_done_idx=%d free_idx=%d cmdsts=%08x\n",
1593		ndev->name,
1594		tx_done_idx, dev->tx_free_idx, le32_to_cpu(desc[DESC_CMDSTS]));
1595
1596	spin_unlock_irqrestore(&dev->tx_lock, flags);
1597}
1598
1599static void ns83820_tx_watch(unsigned long data)
1600{
1601	struct net_device *ndev = (void *)data;
1602	struct ns83820 *dev = PRIV(ndev);
1603
1604#if defined(DEBUG)
1605	printk("ns83820_tx_watch: %u %u %d\n",
1606		dev->tx_done_idx, dev->tx_free_idx, atomic_read(&dev->nr_tx_skbs)
1607		);
1608#endif
1609
1610	if (time_after(jiffies, dev_trans_start(ndev) + 1*HZ) &&
1611	    dev->tx_done_idx != dev->tx_free_idx) {
1612		printk(KERN_DEBUG "%s: ns83820_tx_watch: %u %u %d\n",
1613			ndev->name,
1614			dev->tx_done_idx, dev->tx_free_idx,
1615			atomic_read(&dev->nr_tx_skbs));
1616		ns83820_tx_timeout(ndev);
1617	}
1618
1619	mod_timer(&dev->tx_watchdog, jiffies + 2*HZ);
1620}
1621
1622static int ns83820_open(struct net_device *ndev)
1623{
1624	struct ns83820 *dev = PRIV(ndev);
1625	unsigned i;
1626	u32 desc;
1627	int ret;
1628
1629	dprintk("ns83820_open\n");
1630
1631	writel(0, dev->base + PQCR);
1632
1633	ret = ns83820_setup_rx(ndev);
1634	if (ret)
1635		goto failed;
1636
1637	memset(dev->tx_descs, 0, 4 * NR_TX_DESC * DESC_SIZE);
1638	for (i=0; i<NR_TX_DESC; i++) {
1639		dev->tx_descs[(i * DESC_SIZE) + DESC_LINK]
1640				= cpu_to_le32(
1641				  dev->tx_phy_descs
1642				  + ((i+1) % NR_TX_DESC) * DESC_SIZE * 4);
1643	}
1644
1645	dev->tx_idx = 0;
1646	dev->tx_done_idx = 0;
1647	desc = dev->tx_phy_descs;
1648	writel(0, dev->base + TXDP_HI);
1649	writel(desc, dev->base + TXDP);
1650
1651	init_timer(&dev->tx_watchdog);
1652	dev->tx_watchdog.data = (unsigned long)ndev;
1653	dev->tx_watchdog.function = ns83820_tx_watch;
1654	mod_timer(&dev->tx_watchdog, jiffies + 2*HZ);
1655
1656	netif_start_queue(ndev);	/* FIXME: wait for phy to come up */
1657
1658	return 0;
1659
1660failed:
1661	ns83820_stop(ndev);
1662	return ret;
1663}
1664
1665static void ns83820_getmac(struct ns83820 *dev, u8 *mac)
1666{
 
1667	unsigned i;
 
1668	for (i=0; i<3; i++) {
1669		u32 data;
1670
1671		/* Read from the perfect match memory: this is loaded by
1672		 * the chip from the EEPROM via the EELOAD self test.
1673		 */
1674		writel(i*2, dev->base + RFCR);
1675		data = readl(dev->base + RFDR);
1676
1677		*mac++ = data;
1678		*mac++ = data >> 8;
1679	}
 
1680}
1681
1682static void ns83820_set_multicast(struct net_device *ndev)
1683{
1684	struct ns83820 *dev = PRIV(ndev);
1685	u8 __iomem *rfcr = dev->base + RFCR;
1686	u32 and_mask = 0xffffffff;
1687	u32 or_mask = 0;
1688	u32 val;
1689
1690	if (ndev->flags & IFF_PROMISC)
1691		or_mask |= RFCR_AAU | RFCR_AAM;
1692	else
1693		and_mask &= ~(RFCR_AAU | RFCR_AAM);
1694
1695	if (ndev->flags & IFF_ALLMULTI || netdev_mc_count(ndev))
1696		or_mask |= RFCR_AAM;
1697	else
1698		and_mask &= ~RFCR_AAM;
1699
1700	spin_lock_irq(&dev->misc_lock);
1701	val = (readl(rfcr) & and_mask) | or_mask;
1702	/* Ramit : RFCR Write Fix doc says RFEN must be 0 modify other bits */
1703	writel(val & ~RFCR_RFEN, rfcr);
1704	writel(val, rfcr);
1705	spin_unlock_irq(&dev->misc_lock);
1706}
1707
1708static void ns83820_run_bist(struct net_device *ndev, const char *name, u32 enable, u32 done, u32 fail)
1709{
1710	struct ns83820 *dev = PRIV(ndev);
1711	int timed_out = 0;
1712	unsigned long start;
1713	u32 status;
1714	int loops = 0;
1715
1716	dprintk("%s: start %s\n", ndev->name, name);
1717
1718	start = jiffies;
1719
1720	writel(enable, dev->base + PTSCR);
1721	for (;;) {
1722		loops++;
1723		status = readl(dev->base + PTSCR);
1724		if (!(status & enable))
1725			break;
1726		if (status & done)
1727			break;
1728		if (status & fail)
1729			break;
1730		if (time_after_eq(jiffies, start + HZ)) {
1731			timed_out = 1;
1732			break;
1733		}
1734		schedule_timeout_uninterruptible(1);
1735	}
1736
1737	if (status & fail)
1738		printk(KERN_INFO "%s: %s failed! (0x%08x & 0x%08x)\n",
1739			ndev->name, name, status, fail);
1740	else if (timed_out)
1741		printk(KERN_INFO "%s: run_bist %s timed out! (%08x)\n",
1742			ndev->name, name, status);
1743
1744	dprintk("%s: done %s in %d loops\n", ndev->name, name, loops);
1745}
1746
1747#ifdef PHY_CODE_IS_FINISHED
1748static void ns83820_mii_write_bit(struct ns83820 *dev, int bit)
1749{
1750	/* drive MDC low */
1751	dev->MEAR_cache &= ~MEAR_MDC;
1752	writel(dev->MEAR_cache, dev->base + MEAR);
1753	readl(dev->base + MEAR);
1754
1755	/* enable output, set bit */
1756	dev->MEAR_cache |= MEAR_MDDIR;
1757	if (bit)
1758		dev->MEAR_cache |= MEAR_MDIO;
1759	else
1760		dev->MEAR_cache &= ~MEAR_MDIO;
1761
1762	/* set the output bit */
1763	writel(dev->MEAR_cache, dev->base + MEAR);
1764	readl(dev->base + MEAR);
1765
1766	/* Wait.  Max clock rate is 2.5MHz, this way we come in under 1MHz */
1767	udelay(1);
1768
1769	/* drive MDC high causing the data bit to be latched */
1770	dev->MEAR_cache |= MEAR_MDC;
1771	writel(dev->MEAR_cache, dev->base + MEAR);
1772	readl(dev->base + MEAR);
1773
1774	/* Wait again... */
1775	udelay(1);
1776}
1777
1778static int ns83820_mii_read_bit(struct ns83820 *dev)
1779{
1780	int bit;
1781
1782	/* drive MDC low, disable output */
1783	dev->MEAR_cache &= ~MEAR_MDC;
1784	dev->MEAR_cache &= ~MEAR_MDDIR;
1785	writel(dev->MEAR_cache, dev->base + MEAR);
1786	readl(dev->base + MEAR);
1787
1788	/* Wait.  Max clock rate is 2.5MHz, this way we come in under 1MHz */
1789	udelay(1);
1790
1791	/* drive MDC high causing the data bit to be latched */
1792	bit = (readl(dev->base + MEAR) & MEAR_MDIO) ? 1 : 0;
1793	dev->MEAR_cache |= MEAR_MDC;
1794	writel(dev->MEAR_cache, dev->base + MEAR);
1795
1796	/* Wait again... */
1797	udelay(1);
1798
1799	return bit;
1800}
1801
1802static unsigned ns83820_mii_read_reg(struct ns83820 *dev, unsigned phy, unsigned reg)
1803{
1804	unsigned data = 0;
1805	int i;
1806
1807	/* read some garbage so that we eventually sync up */
1808	for (i=0; i<64; i++)
1809		ns83820_mii_read_bit(dev);
1810
1811	ns83820_mii_write_bit(dev, 0);	/* start */
1812	ns83820_mii_write_bit(dev, 1);
1813	ns83820_mii_write_bit(dev, 1);	/* opcode read */
1814	ns83820_mii_write_bit(dev, 0);
1815
1816	/* write out the phy address: 5 bits, msb first */
1817	for (i=0; i<5; i++)
1818		ns83820_mii_write_bit(dev, phy & (0x10 >> i));
1819
1820	/* write out the register address, 5 bits, msb first */
1821	for (i=0; i<5; i++)
1822		ns83820_mii_write_bit(dev, reg & (0x10 >> i));
1823
1824	ns83820_mii_read_bit(dev);	/* turn around cycles */
1825	ns83820_mii_read_bit(dev);
1826
1827	/* read in the register data, 16 bits msb first */
1828	for (i=0; i<16; i++) {
1829		data <<= 1;
1830		data |= ns83820_mii_read_bit(dev);
1831	}
1832
1833	return data;
1834}
1835
1836static unsigned ns83820_mii_write_reg(struct ns83820 *dev, unsigned phy, unsigned reg, unsigned data)
1837{
1838	int i;
1839
1840	/* read some garbage so that we eventually sync up */
1841	for (i=0; i<64; i++)
1842		ns83820_mii_read_bit(dev);
1843
1844	ns83820_mii_write_bit(dev, 0);	/* start */
1845	ns83820_mii_write_bit(dev, 1);
1846	ns83820_mii_write_bit(dev, 0);	/* opcode read */
1847	ns83820_mii_write_bit(dev, 1);
1848
1849	/* write out the phy address: 5 bits, msb first */
1850	for (i=0; i<5; i++)
1851		ns83820_mii_write_bit(dev, phy & (0x10 >> i));
1852
1853	/* write out the register address, 5 bits, msb first */
1854	for (i=0; i<5; i++)
1855		ns83820_mii_write_bit(dev, reg & (0x10 >> i));
1856
1857	ns83820_mii_read_bit(dev);	/* turn around cycles */
1858	ns83820_mii_read_bit(dev);
1859
1860	/* read in the register data, 16 bits msb first */
1861	for (i=0; i<16; i++)
1862		ns83820_mii_write_bit(dev, (data >> (15 - i)) & 1);
1863
1864	return data;
1865}
1866
1867static void ns83820_probe_phy(struct net_device *ndev)
1868{
1869	struct ns83820 *dev = PRIV(ndev);
1870	static int first;
1871	int i;
1872#define MII_PHYIDR1	0x02
1873#define MII_PHYIDR2	0x03
1874
1875#if 0
1876	if (!first) {
1877		unsigned tmp;
1878		ns83820_mii_read_reg(dev, 1, 0x09);
1879		ns83820_mii_write_reg(dev, 1, 0x10, 0x0d3e);
1880
1881		tmp = ns83820_mii_read_reg(dev, 1, 0x00);
1882		ns83820_mii_write_reg(dev, 1, 0x00, tmp | 0x8000);
1883		udelay(1300);
1884		ns83820_mii_read_reg(dev, 1, 0x09);
1885	}
1886#endif
1887	first = 1;
1888
1889	for (i=1; i<2; i++) {
1890		int j;
1891		unsigned a, b;
1892		a = ns83820_mii_read_reg(dev, i, MII_PHYIDR1);
1893		b = ns83820_mii_read_reg(dev, i, MII_PHYIDR2);
1894
1895		//printk("%s: phy %d: 0x%04x 0x%04x\n",
1896		//	ndev->name, i, a, b);
1897
1898		for (j=0; j<0x16; j+=4) {
1899			dprintk("%s: [0x%02x] %04x %04x %04x %04x\n",
1900				ndev->name, j,
1901				ns83820_mii_read_reg(dev, i, 0 + j),
1902				ns83820_mii_read_reg(dev, i, 1 + j),
1903				ns83820_mii_read_reg(dev, i, 2 + j),
1904				ns83820_mii_read_reg(dev, i, 3 + j)
1905				);
1906		}
1907	}
1908	{
1909		unsigned a, b;
1910		/* read firmware version: memory addr is 0x8402 and 0x8403 */
1911		ns83820_mii_write_reg(dev, 1, 0x16, 0x000d);
1912		ns83820_mii_write_reg(dev, 1, 0x1e, 0x810e);
1913		a = ns83820_mii_read_reg(dev, 1, 0x1d);
1914
1915		ns83820_mii_write_reg(dev, 1, 0x16, 0x000d);
1916		ns83820_mii_write_reg(dev, 1, 0x1e, 0x810e);
1917		b = ns83820_mii_read_reg(dev, 1, 0x1d);
1918		dprintk("version: 0x%04x 0x%04x\n", a, b);
1919	}
1920}
1921#endif
1922
1923static const struct net_device_ops netdev_ops = {
1924	.ndo_open		= ns83820_open,
1925	.ndo_stop		= ns83820_stop,
1926	.ndo_start_xmit		= ns83820_hard_start_xmit,
1927	.ndo_get_stats		= ns83820_get_stats,
1928	.ndo_set_rx_mode	= ns83820_set_multicast,
1929	.ndo_validate_addr	= eth_validate_addr,
1930	.ndo_set_mac_address	= eth_mac_addr,
1931	.ndo_tx_timeout		= ns83820_tx_timeout,
1932};
1933
1934static int ns83820_init_one(struct pci_dev *pci_dev,
1935			    const struct pci_device_id *id)
1936{
1937	struct net_device *ndev;
1938	struct ns83820 *dev;
1939	long addr;
1940	int err;
1941	int using_dac = 0;
1942
1943	/* See if we can set the dma mask early on; failure is fatal. */
1944	if (sizeof(dma_addr_t) == 8 &&
1945		!pci_set_dma_mask(pci_dev, DMA_BIT_MASK(64))) {
1946		using_dac = 1;
1947	} else if (!pci_set_dma_mask(pci_dev, DMA_BIT_MASK(32))) {
1948		using_dac = 0;
1949	} else {
1950		dev_warn(&pci_dev->dev, "pci_set_dma_mask failed!\n");
1951		return -ENODEV;
1952	}
1953
1954	ndev = alloc_etherdev(sizeof(struct ns83820));
1955	err = -ENOMEM;
1956	if (!ndev)
1957		goto out;
1958
1959	dev = PRIV(ndev);
1960	dev->ndev = ndev;
1961
1962	spin_lock_init(&dev->rx_info.lock);
1963	spin_lock_init(&dev->tx_lock);
1964	spin_lock_init(&dev->misc_lock);
1965	dev->pci_dev = pci_dev;
1966
1967	SET_NETDEV_DEV(ndev, &pci_dev->dev);
1968
1969	INIT_WORK(&dev->tq_refill, queue_refill);
1970	tasklet_init(&dev->rx_tasklet, rx_action, (unsigned long)ndev);
1971
1972	err = pci_enable_device(pci_dev);
1973	if (err) {
1974		dev_info(&pci_dev->dev, "pci_enable_dev failed: %d\n", err);
1975		goto out_free;
1976	}
1977
1978	pci_set_master(pci_dev);
1979	addr = pci_resource_start(pci_dev, 1);
1980	dev->base = ioremap_nocache(addr, PAGE_SIZE);
1981	dev->tx_descs = pci_alloc_consistent(pci_dev,
1982			4 * DESC_SIZE * NR_TX_DESC, &dev->tx_phy_descs);
1983	dev->rx_info.descs = pci_alloc_consistent(pci_dev,
1984			4 * DESC_SIZE * NR_RX_DESC, &dev->rx_info.phy_descs);
 
 
1985	err = -ENOMEM;
1986	if (!dev->base || !dev->tx_descs || !dev->rx_info.descs)
1987		goto out_disable;
1988
1989	dprintk("%p: %08lx  %p: %08lx\n",
1990		dev->tx_descs, (long)dev->tx_phy_descs,
1991		dev->rx_info.descs, (long)dev->rx_info.phy_descs);
1992
1993	ns83820_disable_interrupts(dev);
1994
1995	dev->IMR_cache = 0;
1996
1997	err = request_irq(pci_dev->irq, ns83820_irq, IRQF_SHARED,
1998			  DRV_NAME, ndev);
1999	if (err) {
2000		dev_info(&pci_dev->dev, "unable to register irq %d, err %d\n",
2001			pci_dev->irq, err);
2002		goto out_disable;
2003	}
2004
2005	/*
2006	 * FIXME: we are holding rtnl_lock() over obscenely long area only
2007	 * because some of the setup code uses dev->name.  It's Wrong(tm) -
2008	 * we should be using driver-specific names for all that stuff.
2009	 * For now that will do, but we really need to come back and kill
2010	 * most of the dev_alloc_name() users later.
2011	 */
2012	rtnl_lock();
2013	err = dev_alloc_name(ndev, ndev->name);
2014	if (err < 0) {
2015		dev_info(&pci_dev->dev, "unable to get netdev name: %d\n", err);
2016		goto out_free_irq;
2017	}
2018
2019	printk("%s: ns83820.c: 0x22c: %08x, subsystem: %04x:%04x\n",
2020		ndev->name, le32_to_cpu(readl(dev->base + 0x22c)),
2021		pci_dev->subsystem_vendor, pci_dev->subsystem_device);
2022
2023	ndev->netdev_ops = &netdev_ops;
2024	ndev->ethtool_ops = &ops;
2025	ndev->watchdog_timeo = 5 * HZ;
2026	pci_set_drvdata(pci_dev, ndev);
2027
2028	ns83820_do_reset(dev, CR_RST);
2029
2030	/* Must reset the ram bist before running it */
2031	writel(PTSCR_RBIST_RST, dev->base + PTSCR);
2032	ns83820_run_bist(ndev, "sram bist",   PTSCR_RBIST_EN,
2033			 PTSCR_RBIST_DONE, PTSCR_RBIST_FAIL);
2034	ns83820_run_bist(ndev, "eeprom bist", PTSCR_EEBIST_EN, 0,
2035			 PTSCR_EEBIST_FAIL);
2036	ns83820_run_bist(ndev, "eeprom load", PTSCR_EELOAD_EN, 0, 0);
2037
2038	/* I love config registers */
2039	dev->CFG_cache = readl(dev->base + CFG);
2040
2041	if ((dev->CFG_cache & CFG_PCI64_DET)) {
2042		printk(KERN_INFO "%s: detected 64 bit PCI data bus.\n",
2043			ndev->name);
2044		/*dev->CFG_cache |= CFG_DATA64_EN;*/
2045		if (!(dev->CFG_cache & CFG_DATA64_EN))
2046			printk(KERN_INFO "%s: EEPROM did not enable 64 bit bus.  Disabled.\n",
2047				ndev->name);
2048	} else
2049		dev->CFG_cache &= ~(CFG_DATA64_EN);
2050
2051	dev->CFG_cache &= (CFG_TBI_EN  | CFG_MRM_DIS   | CFG_MWI_DIS |
2052			   CFG_T64ADDR | CFG_DATA64_EN | CFG_EXT_125 |
2053			   CFG_M64ADDR);
2054	dev->CFG_cache |= CFG_PINT_DUPSTS | CFG_PINT_LNKSTS | CFG_PINT_SPDSTS |
2055			  CFG_EXTSTS_EN   | CFG_EXD         | CFG_PESEL;
2056	dev->CFG_cache |= CFG_REQALG;
2057	dev->CFG_cache |= CFG_POW;
2058	dev->CFG_cache |= CFG_TMRTEST;
2059
2060	/* When compiled with 64 bit addressing, we must always enable
2061	 * the 64 bit descriptor format.
2062	 */
2063	if (sizeof(dma_addr_t) == 8)
2064		dev->CFG_cache |= CFG_M64ADDR;
2065	if (using_dac)
2066		dev->CFG_cache |= CFG_T64ADDR;
2067
2068	/* Big endian mode does not seem to do what the docs suggest */
2069	dev->CFG_cache &= ~CFG_BEM;
2070
2071	/* setup optical transceiver if we have one */
2072	if (dev->CFG_cache & CFG_TBI_EN) {
2073		printk(KERN_INFO "%s: enabling optical transceiver\n",
2074			ndev->name);
2075		writel(readl(dev->base + GPIOR) | 0x3e8, dev->base + GPIOR);
2076
2077		/* setup auto negotiation feature advertisement */
2078		writel(readl(dev->base + TANAR)
2079		       | TANAR_HALF_DUP | TANAR_FULL_DUP,
2080		       dev->base + TANAR);
2081
2082		/* start auto negotiation */
2083		writel(TBICR_MR_AN_ENABLE | TBICR_MR_RESTART_AN,
2084		       dev->base + TBICR);
2085		writel(TBICR_MR_AN_ENABLE, dev->base + TBICR);
2086		dev->linkstate = LINK_AUTONEGOTIATE;
2087
2088		dev->CFG_cache |= CFG_MODE_1000;
2089	}
2090
2091	writel(dev->CFG_cache, dev->base + CFG);
2092	dprintk("CFG: %08x\n", dev->CFG_cache);
2093
2094	if (reset_phy) {
2095		printk(KERN_INFO "%s: resetting phy\n", ndev->name);
2096		writel(dev->CFG_cache | CFG_PHY_RST, dev->base + CFG);
2097		msleep(10);
2098		writel(dev->CFG_cache, dev->base + CFG);
2099	}
2100
2101#if 0	/* Huh?  This sets the PCI latency register.  Should be done via
2102	 * the PCI layer.  FIXME.
2103	 */
2104	if (readl(dev->base + SRR))
2105		writel(readl(dev->base+0x20c) | 0xfe00, dev->base + 0x20c);
2106#endif
2107
2108	/* Note!  The DMA burst size interacts with packet
2109	 * transmission, such that the largest packet that
2110	 * can be transmitted is 8192 - FLTH - burst size.
2111	 * If only the transmit fifo was larger...
2112	 */
2113	/* Ramit : 1024 DMA is not a good idea, it ends up banging
2114	 * some DELL and COMPAQ SMP systems */
2115	writel(TXCFG_CSI | TXCFG_HBI | TXCFG_ATP | TXCFG_MXDMA512
2116		| ((1600 / 32) * 0x100),
2117		dev->base + TXCFG);
2118
2119	/* Flush the interrupt holdoff timer */
2120	writel(0x000, dev->base + IHR);
2121	writel(0x100, dev->base + IHR);
2122	writel(0x000, dev->base + IHR);
2123
2124	/* Set Rx to full duplex, don't accept runt, errored, long or length
2125	 * range errored packets.  Use 512 byte DMA.
2126	 */
2127	/* Ramit : 1024 DMA is not a good idea, it ends up banging
2128	 * some DELL and COMPAQ SMP systems
2129	 * Turn on ALP, only we are accpeting Jumbo Packets */
2130	writel(RXCFG_AEP | RXCFG_ARP | RXCFG_AIRL | RXCFG_RX_FD
2131		| RXCFG_STRIPCRC
2132		//| RXCFG_ALP
2133		| (RXCFG_MXDMA512) | 0, dev->base + RXCFG);
2134
2135	/* Disable priority queueing */
2136	writel(0, dev->base + PQCR);
2137
2138	/* Enable IP checksum validation and detetion of VLAN headers.
2139	 * Note: do not set the reject options as at least the 0x102
2140	 * revision of the chip does not properly accept IP fragments
2141	 * at least for UDP.
2142	 */
2143	/* Ramit : Be sure to turn on RXCFG_ARP if VLAN's are enabled, since
2144	 * the MAC it calculates the packetsize AFTER stripping the VLAN
2145	 * header, and if a VLAN Tagged packet of 64 bytes is received (like
2146	 * a ping with a VLAN header) then the card, strips the 4 byte VLAN
2147	 * tag and then checks the packet size, so if RXCFG_ARP is not enabled,
2148	 * it discrards it!.  These guys......
2149	 * also turn on tag stripping if hardware acceleration is enabled
2150	 */
2151#ifdef NS83820_VLAN_ACCEL_SUPPORT
2152#define VRCR_INIT_VALUE (VRCR_IPEN|VRCR_VTDEN|VRCR_VTREN)
2153#else
2154#define VRCR_INIT_VALUE (VRCR_IPEN|VRCR_VTDEN)
2155#endif
2156	writel(VRCR_INIT_VALUE, dev->base + VRCR);
2157
2158	/* Enable per-packet TCP/UDP/IP checksumming
2159	 * and per packet vlan tag insertion if
2160	 * vlan hardware acceleration is enabled
2161	 */
2162#ifdef NS83820_VLAN_ACCEL_SUPPORT
2163#define VTCR_INIT_VALUE (VTCR_PPCHK|VTCR_VPPTI)
2164#else
2165#define VTCR_INIT_VALUE VTCR_PPCHK
2166#endif
2167	writel(VTCR_INIT_VALUE, dev->base + VTCR);
2168
2169	/* Ramit : Enable async and sync pause frames */
2170	/* writel(0, dev->base + PCR); */
2171	writel((PCR_PS_MCAST | PCR_PS_DA | PCR_PSEN | PCR_FFLO_4K |
2172		PCR_FFHI_8K | PCR_STLO_4 | PCR_STHI_8 | PCR_PAUSE_CNT),
2173		dev->base + PCR);
2174
2175	/* Disable Wake On Lan */
2176	writel(0, dev->base + WCSR);
2177
2178	ns83820_getmac(dev, ndev->dev_addr);
2179
2180	/* Yes, we support dumb IP checksum on transmit */
2181	ndev->features |= NETIF_F_SG;
2182	ndev->features |= NETIF_F_IP_CSUM;
2183
2184	ndev->min_mtu = 0;
2185
2186#ifdef NS83820_VLAN_ACCEL_SUPPORT
2187	/* We also support hardware vlan acceleration */
2188	ndev->features |= NETIF_F_HW_VLAN_CTAG_TX | NETIF_F_HW_VLAN_CTAG_RX;
2189#endif
2190
2191	if (using_dac) {
2192		printk(KERN_INFO "%s: using 64 bit addressing.\n",
2193			ndev->name);
2194		ndev->features |= NETIF_F_HIGHDMA;
2195	}
2196
2197	printk(KERN_INFO "%s: ns83820 v" VERSION ": DP83820 v%u.%u: %pM io=0x%08lx irq=%d f=%s\n",
2198		ndev->name,
2199		(unsigned)readl(dev->base + SRR) >> 8,
2200		(unsigned)readl(dev->base + SRR) & 0xff,
2201		ndev->dev_addr, addr, pci_dev->irq,
2202		(ndev->features & NETIF_F_HIGHDMA) ? "h,sg" : "sg"
2203		);
2204
2205#ifdef PHY_CODE_IS_FINISHED
2206	ns83820_probe_phy(ndev);
2207#endif
2208
2209	err = register_netdevice(ndev);
2210	if (err) {
2211		printk(KERN_INFO "ns83820: unable to register netdev: %d\n", err);
2212		goto out_cleanup;
2213	}
2214	rtnl_unlock();
2215
2216	return 0;
2217
2218out_cleanup:
2219	ns83820_disable_interrupts(dev); /* paranoia */
2220out_free_irq:
2221	rtnl_unlock();
2222	free_irq(pci_dev->irq, ndev);
2223out_disable:
2224	if (dev->base)
2225		iounmap(dev->base);
2226	pci_free_consistent(pci_dev, 4 * DESC_SIZE * NR_TX_DESC, dev->tx_descs, dev->tx_phy_descs);
2227	pci_free_consistent(pci_dev, 4 * DESC_SIZE * NR_RX_DESC, dev->rx_info.descs, dev->rx_info.phy_descs);
 
 
2228	pci_disable_device(pci_dev);
2229out_free:
2230	free_netdev(ndev);
2231out:
2232	return err;
2233}
2234
2235static void ns83820_remove_one(struct pci_dev *pci_dev)
2236{
2237	struct net_device *ndev = pci_get_drvdata(pci_dev);
2238	struct ns83820 *dev = PRIV(ndev); /* ok even if NULL */
2239
2240	if (!ndev)			/* paranoia */
2241		return;
2242
2243	ns83820_disable_interrupts(dev); /* paranoia */
2244
2245	unregister_netdev(ndev);
2246	free_irq(dev->pci_dev->irq, ndev);
2247	iounmap(dev->base);
2248	pci_free_consistent(dev->pci_dev, 4 * DESC_SIZE * NR_TX_DESC,
2249			dev->tx_descs, dev->tx_phy_descs);
2250	pci_free_consistent(dev->pci_dev, 4 * DESC_SIZE * NR_RX_DESC,
2251			dev->rx_info.descs, dev->rx_info.phy_descs);
2252	pci_disable_device(dev->pci_dev);
2253	free_netdev(ndev);
2254}
2255
2256static const struct pci_device_id ns83820_pci_tbl[] = {
2257	{ 0x100b, 0x0022, PCI_ANY_ID, PCI_ANY_ID, 0, .driver_data = 0, },
2258	{ 0, },
2259};
2260
2261static struct pci_driver driver = {
2262	.name		= "ns83820",
2263	.id_table	= ns83820_pci_tbl,
2264	.probe		= ns83820_init_one,
2265	.remove		= ns83820_remove_one,
2266#if 0	/* FIXME: implement */
2267	.suspend	= ,
2268	.resume		= ,
2269#endif
2270};
2271
2272
2273static int __init ns83820_init(void)
2274{
2275	printk(KERN_INFO "ns83820.c: National Semiconductor DP83820 10/100/1000 driver.\n");
2276	return pci_register_driver(&driver);
2277}
2278
2279static void __exit ns83820_exit(void)
2280{
2281	pci_unregister_driver(&driver);
2282}
2283
2284MODULE_AUTHOR("Benjamin LaHaise <bcrl@kvack.org>");
2285MODULE_DESCRIPTION("National Semiconductor DP83820 10/100/1000 driver");
2286MODULE_LICENSE("GPL");
2287
2288MODULE_DEVICE_TABLE(pci, ns83820_pci_tbl);
2289
2290module_param(lnksts, int, 0);
2291MODULE_PARM_DESC(lnksts, "Polarity of LNKSTS bit");
2292
2293module_param(ihr, int, 0);
2294MODULE_PARM_DESC(ihr, "Time in 100 us increments to delay interrupts (range 0-127)");
2295
2296module_param(reset_phy, int, 0);
2297MODULE_PARM_DESC(reset_phy, "Set to 1 to reset the PHY on startup");
2298
2299module_init(ns83820_init);
2300module_exit(ns83820_exit);