1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Sun3 i82586 Ethernet driver
4 *
5 * Cloned from ni52.c for the Sun3 by Sam Creasey (sammy@sammy.net)
6 *
7 * Original copyright follows:
8 * --------------------------
9 *
10 * net-3-driver for the NI5210 card (i82586 Ethernet chip)
11 *
12 * This is an extension to the Linux operating system, and is covered by the
13 * same Gnu Public License that covers that work.
14 *
15 * Alphacode 0.82 (96/09/29) for Linux 2.0.0 (or later)
16 * Copyrights (c) 1994,1995,1996 by M.Hipp (hippm@informatik.uni-tuebingen.de)
17 * --------------------------
18 *
19 * Consult ni52.c for further notes from the original driver.
20 *
21 * This incarnation currently supports the OBIO version of the i82586 chip
22 * used in certain sun3 models.  It should be fairly doable to expand this
23 * to support VME if I should every acquire such a board.
24 *
25 */
26
27static int debuglevel = 0; /* debug-printk 0: off 1: a few 2: more */
28static int automatic_resume = 0; /* experimental .. better should be zero */
29static int rfdadd = 0; /* rfdadd=1 may be better for 8K MEM cards */
30static int fifo=0x8;	/* don't change */
31
32#include <linux/kernel.h>
33#include <linux/module.h>
34#include <linux/string.h>
35#include <linux/errno.h>
36#include <linux/ioport.h>
37#include <linux/interrupt.h>
38#include <linux/delay.h>
39#include <linux/init.h>
40#include <linux/bitops.h>
41#include <asm/io.h>
42#include <asm/idprom.h>
43#include <asm/machines.h>
44#include <asm/sun3mmu.h>
45#include <asm/dvma.h>
46#include <asm/byteorder.h>
47
48#include <linux/netdevice.h>
49#include <linux/etherdevice.h>
50#include <linux/skbuff.h>
51
52#include "sun3_82586.h"
53
54#define DRV_NAME "sun3_82586"
55
56#define DEBUG       /* debug on */
57#define SYSBUSVAL 0 /* 16 Bit */
58#define SUN3_82586_TOTAL_SIZE	PAGE_SIZE
59
60#define sun3_attn586()  {*(volatile unsigned char *)(dev->base_addr) |= IEOB_ATTEN; *(volatile unsigned char *)(dev->base_addr) &= ~IEOB_ATTEN;}
61#define sun3_reset586() {*(volatile unsigned char *)(dev->base_addr) = 0; udelay(100); *(volatile unsigned char *)(dev->base_addr) = IEOB_NORSET;}
62#define sun3_disint()   {*(volatile unsigned char *)(dev->base_addr) &= ~IEOB_IENAB;}
63#define sun3_enaint()   {*(volatile unsigned char *)(dev->base_addr) |= IEOB_IENAB;}
64#define sun3_active()   {*(volatile unsigned char *)(dev->base_addr) |= (IEOB_IENAB|IEOB_ONAIR|IEOB_NORSET);}
65
66#define make32(ptr16) (p->memtop + (swab16((unsigned short) (ptr16))) )
67#define make24(ptr32) (char *)swab32(( ((unsigned long) (ptr32)) - p->base))
68#define make16(ptr32) (swab16((unsigned short) ((unsigned long)(ptr32) - (unsigned long) p->memtop )))
69
70/******************* how to calculate the buffers *****************************
71
72  * IMPORTANT NOTE: if you configure only one NUM_XMIT_BUFFS, the driver works
73  * --------------- in a different (more stable?) mode. Only in this mode it's
74  *                 possible to configure the driver with 'NO_NOPCOMMANDS'
75
76sizeof(scp)=12; sizeof(scb)=16; sizeof(iscp)=8;
77sizeof(scp)+sizeof(iscp)+sizeof(scb) = 36 = INIT
78sizeof(rfd) = 24; sizeof(rbd) = 12;
79sizeof(tbd) = 8; sizeof(transmit_cmd) = 16;
80sizeof(nop_cmd) = 8;
81
82  * if you don't know the driver, better do not change these values: */
83
84#define RECV_BUFF_SIZE 1536 /* slightly oversized */
85#define XMIT_BUFF_SIZE 1536 /* slightly oversized */
86#define NUM_XMIT_BUFFS 1    /* config for 32K shmem */
87#define NUM_RECV_BUFFS_8 4 /* config for 32K shared mem */
88#define NUM_RECV_BUFFS_16 9 /* config for 32K shared mem */
89#define NUM_RECV_BUFFS_32 16 /* config for 32K shared mem */
90#define NO_NOPCOMMANDS      /* only possible with NUM_XMIT_BUFFS=1 */
91
92/**************************************************************************/
93
94/* different DELAYs */
95#define DELAY(x) mdelay(32 * x);
96#define DELAY_16(); { udelay(16); }
97#define DELAY_18(); { udelay(4); }
98
99/* wait for command with timeout: */
100#define WAIT_4_SCB_CMD() \
101{ int i; \
102  for(i=0;i<16384;i++) { \
103    if(!p->scb->cmd_cuc) break; \
104    DELAY_18(); \
105    if(i == 16383) { \
106      printk("%s: scb_cmd timed out: %04x,%04x .. disabling i82586!!\n",dev->name,p->scb->cmd_cuc,p->scb->cus); \
107       if(!p->reseted) { p->reseted = 1; sun3_reset586(); } } } }
108
109#define WAIT_4_SCB_CMD_RUC() { int i; \
110  for(i=0;i<16384;i++) { \
111    if(!p->scb->cmd_ruc) break; \
112    DELAY_18(); \
113    if(i == 16383) { \
114      printk("%s: scb_cmd (ruc) timed out: %04x,%04x .. disabling i82586!!\n",dev->name,p->scb->cmd_ruc,p->scb->rus); \
115       if(!p->reseted) { p->reseted = 1; sun3_reset586(); } } } }
116
117#define WAIT_4_STAT_COMPL(addr) { int i; \
118   for(i=0;i<32767;i++) { \
119     if(swab16((addr)->cmd_status) & STAT_COMPL) break; \
120     DELAY_16(); DELAY_16(); } }
121
122static int     sun3_82586_probe1(struct net_device *dev,int ioaddr);
123static irqreturn_t sun3_82586_interrupt(int irq,void *dev_id);
124static int     sun3_82586_open(struct net_device *dev);
125static int     sun3_82586_close(struct net_device *dev);
126static netdev_tx_t     sun3_82586_send_packet(struct sk_buff *,
127					      struct net_device *);
128static struct  net_device_stats *sun3_82586_get_stats(struct net_device *dev);
129static void    set_multicast_list(struct net_device *dev);
130static void    sun3_82586_timeout(struct net_device *dev, unsigned int txqueue);
131#if 0
132static void    sun3_82586_dump(struct net_device *,void *);
133#endif
134
135/* helper-functions */
136static int     init586(struct net_device *dev);
137static int     check586(struct net_device *dev,char *where,unsigned size);
138static void    alloc586(struct net_device *dev);
139static void    startrecv586(struct net_device *dev);
140static void   *alloc_rfa(struct net_device *dev,void *ptr);
141static void    sun3_82586_rcv_int(struct net_device *dev);
142static void    sun3_82586_xmt_int(struct net_device *dev);
143static void    sun3_82586_rnr_int(struct net_device *dev);
144
145struct priv
146{
147	unsigned long base;
148	char *memtop;
149	long int lock;
150	int reseted;
151	volatile struct rfd_struct	*rfd_last,*rfd_top,*rfd_first;
152	volatile struct scp_struct	*scp;	/* volatile is important */
153	volatile struct iscp_struct	*iscp;	/* volatile is important */
154	volatile struct scb_struct	*scb;	/* volatile is important */
155	volatile struct tbd_struct	*xmit_buffs[NUM_XMIT_BUFFS];
156	volatile struct transmit_cmd_struct *xmit_cmds[NUM_XMIT_BUFFS];
157#if (NUM_XMIT_BUFFS == 1)
158	volatile struct nop_cmd_struct *nop_cmds[2];
159#else
160	volatile struct nop_cmd_struct *nop_cmds[NUM_XMIT_BUFFS];
161#endif
162	volatile int		nop_point,num_recv_buffs;
163	volatile char		*xmit_cbuffs[NUM_XMIT_BUFFS];
164	volatile int		xmit_count,xmit_last;
165};
166
167/**********************************************
168 * close device
169 */
170static int sun3_82586_close(struct net_device *dev)
171{
172	free_irq(dev->irq, dev);
173
174	sun3_reset586(); /* the hard way to stop the receiver */
175
176	netif_stop_queue(dev);
177
178	return 0;
179}
180
181/**********************************************
182 * open device
183 */
184static int sun3_82586_open(struct net_device *dev)
185{
186	int ret;
187
188	sun3_disint();
189	alloc586(dev);
190	init586(dev);
191	startrecv586(dev);
192	sun3_enaint();
193
194	ret = request_irq(dev->irq, sun3_82586_interrupt,0,dev->name,dev);
195	if (ret)
196	{
197		sun3_reset586();
198		return ret;
199	}
200
201	netif_start_queue(dev);
202
203	return 0; /* most done by init */
204}
205
206/**********************************************
207 * Check to see if there's an 82586 out there.
208 */
209static int check586(struct net_device *dev,char *where,unsigned size)
210{
211	struct priv pb;
212	struct priv *p = &pb;
213	char *iscp_addr;
214	int i;
215
216	p->base = (unsigned long) dvma_btov(0);
217	p->memtop = (char *)dvma_btov((unsigned long)where);
218	p->scp = (struct scp_struct *)(p->base + SCP_DEFAULT_ADDRESS);
219	memset((char *)p->scp,0, sizeof(struct scp_struct));
220	for(i=0;i<sizeof(struct scp_struct);i++) /* memory was writeable? */
221		if(((char *)p->scp)[i])
222			return 0;
223	p->scp->sysbus = SYSBUSVAL;				/* 1 = 8Bit-Bus, 0 = 16 Bit */
224	if(p->scp->sysbus != SYSBUSVAL)
225		return 0;
226
227	iscp_addr = (char *)dvma_btov((unsigned long)where);
228
229	p->iscp = (struct iscp_struct *) iscp_addr;
230	memset((char *)p->iscp,0, sizeof(struct iscp_struct));
231
232	p->scp->iscp = make24(p->iscp);
233	p->iscp->busy = 1;
234
235	sun3_reset586();
236	sun3_attn586();
237	DELAY(1);	/* wait a while... */
238
239	if(p->iscp->busy) /* i82586 clears 'busy' after successful init */
240		return 0;
241
242	return 1;
243}
244
245/******************************************************************
246 * set iscp at the right place, called by sun3_82586_probe1 and open586.
247 */
248static void alloc586(struct net_device *dev)
249{
250	struct priv *p = netdev_priv(dev);
251
252	sun3_reset586();
253	DELAY(1);
254
255	p->scp	= (struct scp_struct *)	(p->base + SCP_DEFAULT_ADDRESS);
256	p->iscp	= (struct iscp_struct *) dvma_btov(dev->mem_start);
257	p->scb  = (struct scb_struct *)  ((char *)p->iscp + sizeof(struct iscp_struct));
258
259	memset((char *) p->iscp,0,sizeof(struct iscp_struct));
260	memset((char *) p->scp ,0,sizeof(struct scp_struct));
261
262	p->scp->iscp = make24(p->iscp);
263	p->scp->sysbus = SYSBUSVAL;
264	p->iscp->scb_offset = make16(p->scb);
265	p->iscp->scb_base = make24(dvma_btov(dev->mem_start));
266
267	p->iscp->busy = 1;
268	sun3_reset586();
269	sun3_attn586();
270
271	DELAY(1);
272
273	if(p->iscp->busy)
274		printk("%s: Init-Problems (alloc).\n",dev->name);
275
276	p->reseted = 0;
277
278	memset((char *)p->scb,0,sizeof(struct scb_struct));
279}
280
281static int __init sun3_82586_probe(void)
282{
283	struct net_device *dev;
284	unsigned long ioaddr;
285	static int found = 0;
286	int err = -ENOMEM;
287
288	/* check that this machine has an onboard 82586 */
289	switch(idprom->id_machtype) {
290	case SM_SUN3|SM_3_160:
291	case SM_SUN3|SM_3_260:
292		/* these machines have 82586 */
293		break;
294
295	default:
296		return -ENODEV;
297	}
298
299	if (found)
300		return -ENODEV;
301
302	ioaddr = (unsigned long)ioremap(IE_OBIO, SUN3_82586_TOTAL_SIZE);
303	if (!ioaddr)
304		return -ENOMEM;
305	found = 1;
306
307	dev = alloc_etherdev(sizeof(struct priv));
308	if (!dev)
309		goto out;
310	dev->irq = IE_IRQ;
311	dev->base_addr = ioaddr;
312	err = sun3_82586_probe1(dev, ioaddr);
313	if (err)
314		goto out1;
315	err = register_netdev(dev);
316	if (err)
317		goto out2;
318	return 0;
319
320out2:
321	release_region(ioaddr, SUN3_82586_TOTAL_SIZE);
322out1:
323	free_netdev(dev);
324out:
325	iounmap((void __iomem *)ioaddr);
326	return err;
327}
328module_init(sun3_82586_probe);
329
330static const struct net_device_ops sun3_82586_netdev_ops = {
331	.ndo_open		= sun3_82586_open,
332	.ndo_stop		= sun3_82586_close,
333	.ndo_start_xmit		= sun3_82586_send_packet,
334	.ndo_set_rx_mode	= set_multicast_list,
335	.ndo_tx_timeout		= sun3_82586_timeout,
336	.ndo_get_stats		= sun3_82586_get_stats,
337	.ndo_validate_addr	= eth_validate_addr,
338	.ndo_set_mac_address	= eth_mac_addr,
339};
340
341static int __init sun3_82586_probe1(struct net_device *dev,int ioaddr)
342{
343	int size, retval;
344
345	if (!request_region(ioaddr, SUN3_82586_TOTAL_SIZE, DRV_NAME))
346		return -EBUSY;
347
348	/* copy in the ethernet address from the prom */
349	eth_hw_addr_set(dev, idprom->id_ethaddr);
350
351	printk("%s: SUN3 Intel 82586 found at %lx, ",dev->name,dev->base_addr);
352
353	/*
354	 * check (or search) IO-Memory, 32K
355	 */
356	size = 0x8000;
357
358	dev->mem_start = (unsigned long)dvma_malloc_align(0x8000, 0x1000);
359	dev->mem_end = dev->mem_start + size;
360
361	if(size != 0x2000 && size != 0x4000 && size != 0x8000) {
362		printk("\n%s: Illegal memory size %d. Allowed is 0x2000 or 0x4000 or 0x8000 bytes.\n",dev->name,size);
363		retval = -ENODEV;
364		goto out;
365	}
366	if(!check586(dev,(char *) dev->mem_start,size)) {
367		printk("?memcheck, Can't find memory at 0x%lx with size %d!\n",dev->mem_start,size);
368		retval = -ENODEV;
369		goto out;
370	}
371
372	((struct priv *)netdev_priv(dev))->memtop =
373					(char *)dvma_btov(dev->mem_start);
374	((struct priv *)netdev_priv(dev))->base = (unsigned long) dvma_btov(0);
375	alloc586(dev);
376
377	/* set number of receive-buffs according to memsize */
378	if(size == 0x2000)
379		((struct priv *)netdev_priv(dev))->num_recv_buffs =
380							NUM_RECV_BUFFS_8;
381	else if(size == 0x4000)
382		((struct priv *)netdev_priv(dev))->num_recv_buffs =
383							NUM_RECV_BUFFS_16;
384	else
385		((struct priv *)netdev_priv(dev))->num_recv_buffs =
386							NUM_RECV_BUFFS_32;
387
388	printk("Memaddr: 0x%lx, Memsize: %d, IRQ %d\n",dev->mem_start,size, dev->irq);
389
390	dev->netdev_ops		= &sun3_82586_netdev_ops;
391	dev->watchdog_timeo	= HZ/20;
392
393	dev->if_port 		= 0;
394	return 0;
395out:
396	release_region(ioaddr, SUN3_82586_TOTAL_SIZE);
397	return retval;
398}
399
400
401static int init586(struct net_device *dev)
402{
403	void *ptr;
404	int i,result=0;
405	struct priv *p = netdev_priv(dev);
406	volatile struct configure_cmd_struct	*cfg_cmd;
407	volatile struct iasetup_cmd_struct *ias_cmd;
408	volatile struct tdr_cmd_struct *tdr_cmd;
409	volatile struct mcsetup_cmd_struct *mc_cmd;
410	struct netdev_hw_addr *ha;
411	int num_addrs=netdev_mc_count(dev);
412
413	ptr = (void *) ((char *)p->scb + sizeof(struct scb_struct));
414
415	cfg_cmd = (struct configure_cmd_struct *)ptr; /* configure-command */
416	cfg_cmd->cmd_status	= 0;
417	cfg_cmd->cmd_cmd	= swab16(CMD_CONFIGURE | CMD_LAST);
418	cfg_cmd->cmd_link	= 0xffff;
419
420	cfg_cmd->byte_cnt	= 0x0a; /* number of cfg bytes */
421	cfg_cmd->fifo		= fifo; /* fifo-limit (8=tx:32/rx:64) */
422	cfg_cmd->sav_bf		= 0x40; /* hold or discard bad recv frames (bit 7) */
423	cfg_cmd->adr_len	= 0x2e; /* addr_len |!src_insert |pre-len |loopback */
424	cfg_cmd->priority	= 0x00;
425	cfg_cmd->ifs		= 0x60;
426	cfg_cmd->time_low	= 0x00;
427	cfg_cmd->time_high	= 0xf2;
428	cfg_cmd->promisc	= 0;
429	if(dev->flags & IFF_ALLMULTI) {
430		int len = ((char *) p->iscp - (char *) ptr - 8) / 6;
431		if(num_addrs > len)	{
432			printk("%s: switching to promisc. mode\n",dev->name);
433			cfg_cmd->promisc = 1;
434		}
435	}
436	if(dev->flags&IFF_PROMISC)
437		cfg_cmd->promisc = 1;
438	cfg_cmd->carr_coll	= 0x00;
439
440	p->scb->cbl_offset	= make16(cfg_cmd);
441	p->scb->cmd_ruc		= 0;
442
443	p->scb->cmd_cuc		= CUC_START; /* cmd.-unit start */
444	sun3_attn586();
445
446	WAIT_4_STAT_COMPL(cfg_cmd);
447
448	if((swab16(cfg_cmd->cmd_status) & (STAT_OK|STAT_COMPL)) != (STAT_COMPL|STAT_OK))
449	{
450		printk("%s: configure command failed: %x\n",dev->name,swab16(cfg_cmd->cmd_status));
451		return 1;
452	}
453
454	/*
455	 * individual address setup
456	 */
457
458	ias_cmd = (struct iasetup_cmd_struct *)ptr;
459
460	ias_cmd->cmd_status	= 0;
461	ias_cmd->cmd_cmd	= swab16(CMD_IASETUP | CMD_LAST);
462	ias_cmd->cmd_link	= 0xffff;
463
464	memcpy((char *)&ias_cmd->iaddr,(const char *) dev->dev_addr,ETH_ALEN);
465
466	p->scb->cbl_offset = make16(ias_cmd);
467
468	p->scb->cmd_cuc = CUC_START; /* cmd.-unit start */
469	sun3_attn586();
470
471	WAIT_4_STAT_COMPL(ias_cmd);
472
473	if((swab16(ias_cmd->cmd_status) & (STAT_OK|STAT_COMPL)) != (STAT_OK|STAT_COMPL)) {
474		printk("%s (82586): individual address setup command failed: %04x\n",dev->name,swab16(ias_cmd->cmd_status));
475		return 1;
476	}
477
478	/*
479	 * TDR, wire check .. e.g. no resistor e.t.c
480	 */
481
482	tdr_cmd = (struct tdr_cmd_struct *)ptr;
483
484	tdr_cmd->cmd_status	= 0;
485	tdr_cmd->cmd_cmd	= swab16(CMD_TDR | CMD_LAST);
486	tdr_cmd->cmd_link	= 0xffff;
487	tdr_cmd->status		= 0;
488
489	p->scb->cbl_offset = make16(tdr_cmd);
490	p->scb->cmd_cuc = CUC_START; /* cmd.-unit start */
491	sun3_attn586();
492
493	WAIT_4_STAT_COMPL(tdr_cmd);
494
495	if(!(swab16(tdr_cmd->cmd_status) & STAT_COMPL))
496	{
497		printk("%s: Problems while running the TDR.\n",dev->name);
498	}
499	else
500	{
501		DELAY_16(); /* wait for result */
502		result = swab16(tdr_cmd->status);
503
504		p->scb->cmd_cuc = p->scb->cus & STAT_MASK;
505		sun3_attn586(); /* ack the interrupts */
506
507		if(result & TDR_LNK_OK)
508			;
509		else if(result & TDR_XCVR_PRB)
510			printk("%s: TDR: Transceiver problem. Check the cable(s)!\n",dev->name);
511		else if(result & TDR_ET_OPN)
512			printk("%s: TDR: No correct termination %d clocks away.\n",dev->name,result & TDR_TIMEMASK);
513		else if(result & TDR_ET_SRT)
514		{
515			if (result & TDR_TIMEMASK) /* time == 0 -> strange :-) */
516				printk("%s: TDR: Detected a short circuit %d clocks away.\n",dev->name,result & TDR_TIMEMASK);
517		}
518		else
519			printk("%s: TDR: Unknown status %04x\n",dev->name,result);
520	}
521
522	/*
523	 * Multicast setup
524	 */
525	if(num_addrs && !(dev->flags & IFF_PROMISC) )
526	{
527		mc_cmd = (struct mcsetup_cmd_struct *) ptr;
528		mc_cmd->cmd_status = 0;
529		mc_cmd->cmd_cmd = swab16(CMD_MCSETUP | CMD_LAST);
530		mc_cmd->cmd_link = 0xffff;
531		mc_cmd->mc_cnt = swab16(num_addrs * 6);
532
533		i = 0;
534		netdev_for_each_mc_addr(ha, dev)
535			memcpy((char *) mc_cmd->mc_list[i++],
536			       ha->addr, ETH_ALEN);
537
538		p->scb->cbl_offset = make16(mc_cmd);
539		p->scb->cmd_cuc = CUC_START;
540		sun3_attn586();
541
542		WAIT_4_STAT_COMPL(mc_cmd);
543
544		if( (swab16(mc_cmd->cmd_status) & (STAT_COMPL|STAT_OK)) != (STAT_COMPL|STAT_OK) )
545			printk("%s: Can't apply multicast-address-list.\n",dev->name);
546	}
547
548	/*
549	 * alloc nop/xmit-cmds
550	 */
551#if (NUM_XMIT_BUFFS == 1)
552	for(i=0;i<2;i++)
553	{
554		p->nop_cmds[i] 			= (struct nop_cmd_struct *)ptr;
555		p->nop_cmds[i]->cmd_cmd		= swab16(CMD_NOP);
556		p->nop_cmds[i]->cmd_status 	= 0;
557		p->nop_cmds[i]->cmd_link	= make16((p->nop_cmds[i]));
558		ptr = (char *) ptr + sizeof(struct nop_cmd_struct);
559	}
560#else
561	for(i=0;i<NUM_XMIT_BUFFS;i++)
562	{
563		p->nop_cmds[i]			= (struct nop_cmd_struct *)ptr;
564		p->nop_cmds[i]->cmd_cmd		= swab16(CMD_NOP);
565		p->nop_cmds[i]->cmd_status	= 0;
566		p->nop_cmds[i]->cmd_link	= make16((p->nop_cmds[i]));
567		ptr = (char *) ptr + sizeof(struct nop_cmd_struct);
568	}
569#endif
570
571	ptr = alloc_rfa(dev,ptr); /* init receive-frame-area */
572
573	/*
574	 * alloc xmit-buffs / init xmit_cmds
575	 */
576	for(i=0;i<NUM_XMIT_BUFFS;i++)
577	{
578		p->xmit_cmds[i] = (struct transmit_cmd_struct *)ptr; /*transmit cmd/buff 0*/
579		ptr = (char *) ptr + sizeof(struct transmit_cmd_struct);
580		p->xmit_cbuffs[i] = (char *)ptr; /* char-buffs */
581		ptr = (char *) ptr + XMIT_BUFF_SIZE;
582		p->xmit_buffs[i] = (struct tbd_struct *)ptr; /* TBD */
583		ptr = (char *) ptr + sizeof(struct tbd_struct);
584		if(ptr > (void *)dev->mem_end)
585		{
586			printk("%s: not enough shared-mem for your configuration!\n",dev->name);
587			return 1;
588		}
589		memset((char *)(p->xmit_cmds[i]) ,0, sizeof(struct transmit_cmd_struct));
590		memset((char *)(p->xmit_buffs[i]),0, sizeof(struct tbd_struct));
591		p->xmit_cmds[i]->cmd_link = make16(p->nop_cmds[(i+1)%NUM_XMIT_BUFFS]);
592		p->xmit_cmds[i]->cmd_status = swab16(STAT_COMPL);
593		p->xmit_cmds[i]->cmd_cmd = swab16(CMD_XMIT | CMD_INT);
594		p->xmit_cmds[i]->tbd_offset = make16((p->xmit_buffs[i]));
595		p->xmit_buffs[i]->next = 0xffff;
596		p->xmit_buffs[i]->buffer = make24((p->xmit_cbuffs[i]));
597	}
598
599	p->xmit_count = 0;
600	p->xmit_last	= 0;
601#ifndef NO_NOPCOMMANDS
602	p->nop_point	= 0;
603#endif
604
605	 /*
606		* 'start transmitter'
607		*/
608#ifndef NO_NOPCOMMANDS
609	p->scb->cbl_offset = make16(p->nop_cmds[0]);
610	p->scb->cmd_cuc = CUC_START;
611	sun3_attn586();
612	WAIT_4_SCB_CMD();
613#else
614	p->xmit_cmds[0]->cmd_link = make16(p->xmit_cmds[0]);
615	p->xmit_cmds[0]->cmd_cmd	= swab16(CMD_XMIT | CMD_SUSPEND | CMD_INT);
616#endif
617
618	/*
619	 * ack. interrupts
620	 */
621	p->scb->cmd_cuc = p->scb->cus & STAT_MASK;
622	sun3_attn586();
623	DELAY_16();
624
625	sun3_enaint();
626	sun3_active();
627
628	return 0;
629}
630
631/******************************************************
632 * This is a helper routine for sun3_82586_rnr_int() and init586().
633 * It sets up the Receive Frame Area (RFA).
634 */
635
636static void *alloc_rfa(struct net_device *dev,void *ptr)
637{
638	volatile struct rfd_struct *rfd = (struct rfd_struct *)ptr;
639	volatile struct rbd_struct *rbd;
640	int i;
641	struct priv *p = netdev_priv(dev);
642
643	memset((char *) rfd,0,sizeof(struct rfd_struct)*(p->num_recv_buffs+rfdadd));
644	p->rfd_first = rfd;
645
646	for(i = 0; i < (p->num_recv_buffs+rfdadd); i++) {
647		rfd[i].next = make16(rfd + (i+1) % (p->num_recv_buffs+rfdadd) );
648		rfd[i].rbd_offset = 0xffff;
649	}
650	rfd[p->num_recv_buffs-1+rfdadd].last = RFD_SUSP;	 /* RU suspend */
651
652	ptr = (void *) (rfd + (p->num_recv_buffs + rfdadd) );
653
654	rbd = (struct rbd_struct *) ptr;
655	ptr = (void *) (rbd + p->num_recv_buffs);
656
657	 /* clr descriptors */
658	memset((char *) rbd,0,sizeof(struct rbd_struct)*(p->num_recv_buffs));
659
660	for(i=0;i<p->num_recv_buffs;i++)
661	{
662		rbd[i].next = make16((rbd + (i+1) % p->num_recv_buffs));
663		rbd[i].size = swab16(RECV_BUFF_SIZE);
664		rbd[i].buffer = make24(ptr);
665		ptr = (char *) ptr + RECV_BUFF_SIZE;
666	}
667
668	p->rfd_top	= p->rfd_first;
669	p->rfd_last = p->rfd_first + (p->num_recv_buffs - 1 + rfdadd);
670
671	p->scb->rfa_offset		= make16(p->rfd_first);
672	p->rfd_first->rbd_offset	= make16(rbd);
673
674	return ptr;
675}
676
677
678/**************************************************
679 * Interrupt Handler ...
680 */
681
682static irqreturn_t sun3_82586_interrupt(int irq,void *dev_id)
683{
684	struct net_device *dev = dev_id;
685	unsigned short stat;
686	int cnt=0;
687	struct priv *p;
688
689	if (!dev) {
690		printk ("sun3_82586-interrupt: irq %d for unknown device.\n",irq);
691		return IRQ_NONE;
692	}
693	p = netdev_priv(dev);
694
695	if(debuglevel > 1)
696		printk("I");
697
698	WAIT_4_SCB_CMD(); /* wait for last command	*/
699
700	while((stat=p->scb->cus & STAT_MASK))
701	{
702		p->scb->cmd_cuc = stat;
703		sun3_attn586();
704
705		if(stat & STAT_FR)	 /* received a frame */
706			sun3_82586_rcv_int(dev);
707
708		if(stat & STAT_RNR) /* RU went 'not ready' */
709		{
710			printk("(R)");
711			if(p->scb->rus & RU_SUSPEND) /* special case: RU_SUSPEND */
712			{
713				WAIT_4_SCB_CMD();
714				p->scb->cmd_ruc = RUC_RESUME;
715				sun3_attn586();
716				WAIT_4_SCB_CMD_RUC();
717			}
718			else
719			{
720				printk("%s: Receiver-Unit went 'NOT READY': %04x/%02x.\n",dev->name,(int) stat,(int) p->scb->rus);
721				sun3_82586_rnr_int(dev);
722			}
723		}
724
725		if(stat & STAT_CX)		/* command with I-bit set complete */
726			 sun3_82586_xmt_int(dev);
727
728#ifndef NO_NOPCOMMANDS
729		if(stat & STAT_CNA)	/* CU went 'not ready' */
730		{
731			if(netif_running(dev))
732				printk("%s: oops! CU has left active state. stat: %04x/%02x.\n",dev->name,(int) stat,(int) p->scb->cus);
733		}
734#endif
735
736		if(debuglevel > 1)
737			printk("%d",cnt++);
738
739		WAIT_4_SCB_CMD(); /* wait for ack. (sun3_82586_xmt_int can be faster than ack!!) */
740		if(p->scb->cmd_cuc)	 /* timed out? */
741		{
742			printk("%s: Acknowledge timed out.\n",dev->name);
743			sun3_disint();
744			break;
745		}
746	}
747
748	if(debuglevel > 1)
749		printk("i");
750	return IRQ_HANDLED;
751}
752
753/*******************************************************
754 * receive-interrupt
755 */
756
757static void sun3_82586_rcv_int(struct net_device *dev)
758{
759	int status,cnt=0;
760	unsigned short totlen;
761	struct sk_buff *skb;
762	struct rbd_struct *rbd;
763	struct priv *p = netdev_priv(dev);
764
765	if(debuglevel > 0)
766		printk("R");
767
768	for(;(status = p->rfd_top->stat_high) & RFD_COMPL;)
769	{
770			rbd = (struct rbd_struct *) make32(p->rfd_top->rbd_offset);
771
772			if(status & RFD_OK) /* frame received without error? */
773			{
774				if( (totlen = swab16(rbd->status)) & RBD_LAST) /* the first and the last buffer? */
775				{
776					totlen &= RBD_MASK; /* length of this frame */
777					rbd->status = 0;
778					skb = netdev_alloc_skb(dev, totlen + 2);
779					if(skb != NULL)
780					{
781						skb_reserve(skb,2);
782						skb_put(skb,totlen);
783						skb_copy_to_linear_data(skb,(char *) p->base+swab32((unsigned long) rbd->buffer),totlen);
784						skb->protocol=eth_type_trans(skb,dev);
785						netif_rx(skb);
786						dev->stats.rx_packets++;
787					}
788					else
789						dev->stats.rx_dropped++;
790				}
791				else
792				{
793					int rstat;
794						 /* free all RBD's until RBD_LAST is set */
795					totlen = 0;
796					while(!((rstat=swab16(rbd->status)) & RBD_LAST))
797					{
798						totlen += rstat & RBD_MASK;
799						if(!rstat)
800						{
801							printk("%s: Whoops .. no end mark in RBD list\n",dev->name);
802							break;
803						}
804						rbd->status = 0;
805						rbd = (struct rbd_struct *) make32(rbd->next);
806					}
807					totlen += rstat & RBD_MASK;
808					rbd->status = 0;
809					printk("%s: received oversized frame! length: %d\n",dev->name,totlen);
810					dev->stats.rx_dropped++;
811			 }
812		}
813		else /* frame !(ok), only with 'save-bad-frames' */
814		{
815			printk("%s: oops! rfd-error-status: %04x\n",dev->name,status);
816			dev->stats.rx_errors++;
817		}
818		p->rfd_top->stat_high = 0;
819		p->rfd_top->last = RFD_SUSP; /* maybe exchange by RFD_LAST */
820		p->rfd_top->rbd_offset = 0xffff;
821		p->rfd_last->last = 0;				/* delete RFD_SUSP	*/
822		p->rfd_last = p->rfd_top;
823		p->rfd_top = (struct rfd_struct *) make32(p->rfd_top->next); /* step to next RFD */
824		p->scb->rfa_offset = make16(p->rfd_top);
825
826		if(debuglevel > 0)
827			printk("%d",cnt++);
828	}
829
830	if(automatic_resume)
831	{
832		WAIT_4_SCB_CMD();
833		p->scb->cmd_ruc = RUC_RESUME;
834		sun3_attn586();
835		WAIT_4_SCB_CMD_RUC();
836	}
837
838#ifdef WAIT_4_BUSY
839	{
840		int i;
841		for(i=0;i<1024;i++)
842		{
843			if(p->rfd_top->status)
844				break;
845			DELAY_16();
846			if(i == 1023)
847				printk("%s: RU hasn't fetched next RFD (not busy/complete)\n",dev->name);
848		}
849	}
850#endif
851
852#if 0
853	if(!at_least_one)
854	{
855		int i;
856		volatile struct rfd_struct *rfds=p->rfd_top;
857		volatile struct rbd_struct *rbds;
858		printk("%s: received a FC intr. without having a frame: %04x %d\n",dev->name,status,old_at_least);
859		for(i=0;i< (p->num_recv_buffs+4);i++)
860		{
861			rbds = (struct rbd_struct *) make32(rfds->rbd_offset);
862			printk("%04x:%04x ",rfds->status,rbds->status);
863			rfds = (struct rfd_struct *) make32(rfds->next);
864		}
865		printk("\nerrs: %04x %04x stat: %04x\n",(int)p->scb->rsc_errs,(int)p->scb->ovrn_errs,(int)p->scb->status);
866		printk("\nerrs: %04x %04x rus: %02x, cus: %02x\n",(int)p->scb->rsc_errs,(int)p->scb->ovrn_errs,(int)p->scb->rus,(int)p->scb->cus);
867	}
868	old_at_least = at_least_one;
869#endif
870
871	if(debuglevel > 0)
872		printk("r");
873}
874
875/**********************************************************
876 * handle 'Receiver went not ready'.
877 */
878
879static void sun3_82586_rnr_int(struct net_device *dev)
880{
881	struct priv *p = netdev_priv(dev);
882
883	dev->stats.rx_errors++;
884
885	WAIT_4_SCB_CMD();		/* wait for the last cmd, WAIT_4_FULLSTAT?? */
886	p->scb->cmd_ruc = RUC_ABORT; /* usually the RU is in the 'no resource'-state .. abort it now. */
887	sun3_attn586();
888	WAIT_4_SCB_CMD_RUC();		/* wait for accept cmd. */
889
890	alloc_rfa(dev,(char *)p->rfd_first);
891/* maybe add a check here, before restarting the RU */
892	startrecv586(dev); /* restart RU */
893
894	printk("%s: Receive-Unit restarted. Status: %04x\n",dev->name,p->scb->rus);
895
896}
897
898/**********************************************************
899 * handle xmit - interrupt
900 */
901
902static void sun3_82586_xmt_int(struct net_device *dev)
903{
904	int status;
905	struct priv *p = netdev_priv(dev);
906
907	if(debuglevel > 0)
908		printk("X");
909
910	status = swab16(p->xmit_cmds[p->xmit_last]->cmd_status);
911	if(!(status & STAT_COMPL))
912		printk("%s: strange .. xmit-int without a 'COMPLETE'\n",dev->name);
913
914	if(status & STAT_OK)
915	{
916		dev->stats.tx_packets++;
917		dev->stats.collisions += (status & TCMD_MAXCOLLMASK);
918	}
919	else
920	{
921		dev->stats.tx_errors++;
922		if(status & TCMD_LATECOLL) {
923			printk("%s: late collision detected.\n",dev->name);
924			dev->stats.collisions++;
925		}
926		else if(status & TCMD_NOCARRIER) {
927			dev->stats.tx_carrier_errors++;
928			printk("%s: no carrier detected.\n",dev->name);
929		}
930		else if(status & TCMD_LOSTCTS)
931			printk("%s: loss of CTS detected.\n",dev->name);
932		else if(status & TCMD_UNDERRUN) {
933			dev->stats.tx_fifo_errors++;
934			printk("%s: DMA underrun detected.\n",dev->name);
935		}
936		else if(status & TCMD_MAXCOLL) {
937			printk("%s: Max. collisions exceeded.\n",dev->name);
938			dev->stats.collisions += 16;
939		}
940	}
941
942#if (NUM_XMIT_BUFFS > 1)
943	if( (++p->xmit_last) == NUM_XMIT_BUFFS)
944		p->xmit_last = 0;
945#endif
946	netif_wake_queue(dev);
947}
948
949/***********************************************************
950 * (re)start the receiver
951 */
952
953static void startrecv586(struct net_device *dev)
954{
955	struct priv *p = netdev_priv(dev);
956
957	WAIT_4_SCB_CMD();
958	WAIT_4_SCB_CMD_RUC();
959	p->scb->rfa_offset = make16(p->rfd_first);
960	p->scb->cmd_ruc = RUC_START;
961	sun3_attn586();		/* start cmd. */
962	WAIT_4_SCB_CMD_RUC();	/* wait for accept cmd. (no timeout!!) */
963}
964
965static void sun3_82586_timeout(struct net_device *dev, unsigned int txqueue)
966{
967	struct priv *p = netdev_priv(dev);
968#ifndef NO_NOPCOMMANDS
969	if(p->scb->cus & CU_ACTIVE) /* COMMAND-UNIT active? */
970	{
971		netif_wake_queue(dev);
972#ifdef DEBUG
973		printk("%s: strange ... timeout with CU active?!?\n",dev->name);
974		printk("%s: X0: %04x N0: %04x N1: %04x %d\n",dev->name,(int)swab16(p->xmit_cmds[0]->cmd_status),(int)swab16(p->nop_cmds[0]->cmd_status),(int)swab16(p->nop_cmds[1]->cmd_status),(int)p->nop_point);
975#endif
976		p->scb->cmd_cuc = CUC_ABORT;
977		sun3_attn586();
978		WAIT_4_SCB_CMD();
979		p->scb->cbl_offset = make16(p->nop_cmds[p->nop_point]);
980		p->scb->cmd_cuc = CUC_START;
981		sun3_attn586();
982		WAIT_4_SCB_CMD();
983		netif_trans_update(dev); /* prevent tx timeout */
984		return 0;
985	}
986#endif
987	{
988#ifdef DEBUG
989		printk("%s: xmitter timed out, try to restart! stat: %02x\n",dev->name,p->scb->cus);
990		printk("%s: command-stats: %04x\n", dev->name, swab16(p->xmit_cmds[0]->cmd_status));
991		printk("%s: check, whether you set the right interrupt number!\n",dev->name);
992#endif
993		sun3_82586_close(dev);
994		sun3_82586_open(dev);
995	}
996	netif_trans_update(dev); /* prevent tx timeout */
997}
998
999/******************************************************
1000 * send frame
1001 */
1002
1003static netdev_tx_t
1004sun3_82586_send_packet(struct sk_buff *skb, struct net_device *dev)
1005{
1006	int len,i;
1007#ifndef NO_NOPCOMMANDS
1008	int next_nop;
1009#endif
1010	struct priv *p = netdev_priv(dev);
1011
1012	if(skb->len > XMIT_BUFF_SIZE)
1013	{
1014		printk("%s: Sorry, max. framelength is %d bytes. The length of your frame is %d bytes.\n",dev->name,XMIT_BUFF_SIZE,skb->len);
1015		return NETDEV_TX_OK;
1016	}
1017
1018	netif_stop_queue(dev);
1019
1020#if(NUM_XMIT_BUFFS > 1)
1021	if(test_and_set_bit(0,(void *) &p->lock)) {
1022		printk("%s: Queue was locked\n",dev->name);
1023		return NETDEV_TX_BUSY;
1024	}
1025	else
1026#endif
1027	{
1028		len = skb->len;
1029		if (len < ETH_ZLEN) {
1030			memset((void *)p->xmit_cbuffs[p->xmit_count], 0,
1031			       ETH_ZLEN);
1032			len = ETH_ZLEN;
1033		}
1034		skb_copy_from_linear_data(skb, (void *)p->xmit_cbuffs[p->xmit_count], skb->len);
1035
1036#if (NUM_XMIT_BUFFS == 1)
1037#	ifdef NO_NOPCOMMANDS
1038
1039#ifdef DEBUG
1040		if(p->scb->cus & CU_ACTIVE)
1041		{
1042			printk("%s: Hmmm .. CU is still running and we wanna send a new packet.\n",dev->name);
1043			printk("%s: stat: %04x %04x\n",dev->name,p->scb->cus,swab16(p->xmit_cmds[0]->cmd_status));
1044		}
1045#endif
1046
1047		p->xmit_buffs[0]->size = swab16(TBD_LAST | len);
1048		for(i=0;i<16;i++)
1049		{
1050			p->xmit_cmds[0]->cmd_status = 0;
1051			WAIT_4_SCB_CMD();
1052			if( (p->scb->cus & CU_STATUS) == CU_SUSPEND)
1053				p->scb->cmd_cuc = CUC_RESUME;
1054			else
1055			{
1056				p->scb->cbl_offset = make16(p->xmit_cmds[0]);
1057				p->scb->cmd_cuc = CUC_START;
1058			}
1059
1060			sun3_attn586();
1061			if(!i)
1062				dev_kfree_skb(skb);
1063			WAIT_4_SCB_CMD();
1064			if( (p->scb->cus & CU_ACTIVE)) /* test it, because CU sometimes doesn't start immediately */
1065				break;
1066			if(p->xmit_cmds[0]->cmd_status)
1067				break;
1068			if(i==15)
1069				printk("%s: Can't start transmit-command.\n",dev->name);
1070		}
1071#	else
1072		next_nop = (p->nop_point + 1) & 0x1;
1073		p->xmit_buffs[0]->size = swab16(TBD_LAST | len);
1074
1075		p->xmit_cmds[0]->cmd_link	 = p->nop_cmds[next_nop]->cmd_link
1076			= make16((p->nop_cmds[next_nop]));
1077		p->xmit_cmds[0]->cmd_status = p->nop_cmds[next_nop]->cmd_status = 0;
1078
1079		p->nop_cmds[p->nop_point]->cmd_link = make16((p->xmit_cmds[0]));
1080		p->nop_point = next_nop;
1081		dev_kfree_skb(skb);
1082#	endif
1083#else
1084		p->xmit_buffs[p->xmit_count]->size = swab16(TBD_LAST | len);
1085		if( (next_nop = p->xmit_count + 1) == NUM_XMIT_BUFFS )
1086			next_nop = 0;
1087
1088		p->xmit_cmds[p->xmit_count]->cmd_status	= 0;
1089		/* linkpointer of xmit-command already points to next nop cmd */
1090		p->nop_cmds[next_nop]->cmd_link = make16((p->nop_cmds[next_nop]));
1091		p->nop_cmds[next_nop]->cmd_status = 0;
1092
1093		p->nop_cmds[p->xmit_count]->cmd_link = make16((p->xmit_cmds[p->xmit_count]));
1094		p->xmit_count = next_nop;
1095
1096		{
1097			unsigned long flags;
1098			local_irq_save(flags);
1099			if(p->xmit_count != p->xmit_last)
1100				netif_wake_queue(dev);
1101			p->lock = 0;
1102			local_irq_restore(flags);
1103		}
1104		dev_kfree_skb(skb);
1105#endif
1106	}
1107	return NETDEV_TX_OK;
1108}
1109
1110/*******************************************
1111 * Someone wanna have the statistics
1112 */
1113
1114static struct net_device_stats *sun3_82586_get_stats(struct net_device *dev)
1115{
1116	struct priv *p = netdev_priv(dev);
1117	unsigned short crc,aln,rsc,ovrn;
1118
1119	crc = swab16(p->scb->crc_errs); /* get error-statistic from the ni82586 */
1120	p->scb->crc_errs = 0;
1121	aln = swab16(p->scb->aln_errs);
1122	p->scb->aln_errs = 0;
1123	rsc = swab16(p->scb->rsc_errs);
1124	p->scb->rsc_errs = 0;
1125	ovrn = swab16(p->scb->ovrn_errs);
1126	p->scb->ovrn_errs = 0;
1127
1128	dev->stats.rx_crc_errors += crc;
1129	dev->stats.rx_fifo_errors += ovrn;
1130	dev->stats.rx_frame_errors += aln;
1131	dev->stats.rx_dropped += rsc;
1132
1133	return &dev->stats;
1134}
1135
1136/********************************************************
1137 * Set MC list ..
1138 */
1139
1140static void set_multicast_list(struct net_device *dev)
1141{
1142	netif_stop_queue(dev);
1143	sun3_disint();
1144	alloc586(dev);
1145	init586(dev);
1146	startrecv586(dev);
1147	sun3_enaint();
1148	netif_wake_queue(dev);
1149}
1150
1151#if 0
1152/*
1153 * DUMP .. we expect a not running CMD unit and enough space
1154 */
1155void sun3_82586_dump(struct net_device *dev,void *ptr)
1156{
1157	struct priv *p = netdev_priv(dev);
1158	struct dump_cmd_struct *dump_cmd = (struct dump_cmd_struct *) ptr;
1159	int i;
1160
1161	p->scb->cmd_cuc = CUC_ABORT;
1162	sun3_attn586();
1163	WAIT_4_SCB_CMD();
1164	WAIT_4_SCB_CMD_RUC();
1165
1166	dump_cmd->cmd_status = 0;
1167	dump_cmd->cmd_cmd = CMD_DUMP | CMD_LAST;
1168	dump_cmd->dump_offset = make16((dump_cmd + 1));
1169	dump_cmd->cmd_link = 0xffff;
1170
1171	p->scb->cbl_offset = make16(dump_cmd);
1172	p->scb->cmd_cuc = CUC_START;
1173	sun3_attn586();
1174	WAIT_4_STAT_COMPL(dump_cmd);
1175
1176	if( (dump_cmd->cmd_status & (STAT_COMPL|STAT_OK)) != (STAT_COMPL|STAT_OK) )
1177				printk("%s: Can't get dump information.\n",dev->name);
1178
1179	for(i=0;i<170;i++) {
1180		printk("%02x ",(int) ((unsigned char *) (dump_cmd + 1))[i]);
1181		if(i % 24 == 23)
1182			printk("\n");
1183	}
1184	printk("\n");
1185}
1186#endif
1187