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(irq: dev->irq, handler: sun3_82586_interrupt,flags: 0,name: 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(addr: (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, addr: 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,where: (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, length: totlen + 2);
779 if(skb != NULL)
780 {
781 skb_reserve(skb,len: 2);
782 skb_put(skb,len: totlen);
783 skb_copy_to_linear_data(skb,from: (char *) p->base+swab32((unsigned long) rbd->buffer),len: 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,ptr: (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 %04x\n",dev->name,swab16(p->xmit_cmds[0]->cmd_status),swab16(p->xmit_cmds[1]->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, to: (void *)p->xmit_cbuffs[p->xmit_count], len: 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

source code of linux/drivers/net/ethernet/i825xx/sun3_82586.c