xref: /linux/drivers/net/ethernet/seeq/sgiseeq.c (revision f3a8b6645dc2e60d11f20c1c23afd964ff4e55ae)
1 /*
2  * sgiseeq.c: Seeq8003 ethernet driver for SGI machines.
3  *
4  * Copyright (C) 1996 David S. Miller (davem@davemloft.net)
5  */
6 
7 #undef DEBUG
8 
9 #include <linux/dma-mapping.h>
10 #include <linux/kernel.h>
11 #include <linux/module.h>
12 #include <linux/slab.h>
13 #include <linux/errno.h>
14 #include <linux/types.h>
15 #include <linux/interrupt.h>
16 #include <linux/string.h>
17 #include <linux/delay.h>
18 #include <linux/netdevice.h>
19 #include <linux/platform_device.h>
20 #include <linux/etherdevice.h>
21 #include <linux/skbuff.h>
22 
23 #include <asm/sgi/hpc3.h>
24 #include <asm/sgi/ip22.h>
25 #include <asm/sgi/seeq.h>
26 
27 #include "sgiseeq.h"
28 
29 static char *sgiseeqstr = "SGI Seeq8003";
30 
31 /*
32  * If you want speed, you do something silly, it always has worked for me.  So,
33  * with that in mind, I've decided to make this driver look completely like a
34  * stupid Lance from a driver architecture perspective.  Only difference is that
35  * here our "ring buffer" looks and acts like a real Lance one does but is
36  * laid out like how the HPC DMA and the Seeq want it to.  You'd be surprised
37  * how a stupid idea like this can pay off in performance, not to mention
38  * making this driver 2,000 times easier to write. ;-)
39  */
40 
41 /* Tune these if we tend to run out often etc. */
42 #define SEEQ_RX_BUFFERS  16
43 #define SEEQ_TX_BUFFERS  16
44 
45 #define PKT_BUF_SZ       1584
46 
47 #define NEXT_RX(i)  (((i) + 1) & (SEEQ_RX_BUFFERS - 1))
48 #define NEXT_TX(i)  (((i) + 1) & (SEEQ_TX_BUFFERS - 1))
49 #define PREV_RX(i)  (((i) - 1) & (SEEQ_RX_BUFFERS - 1))
50 #define PREV_TX(i)  (((i) - 1) & (SEEQ_TX_BUFFERS - 1))
51 
52 #define TX_BUFFS_AVAIL(sp) ((sp->tx_old <= sp->tx_new) ? \
53 			    sp->tx_old + (SEEQ_TX_BUFFERS - 1) - sp->tx_new : \
54 			    sp->tx_old - sp->tx_new - 1)
55 
56 #define VIRT_TO_DMA(sp, v) ((sp)->srings_dma +                                 \
57 				  (dma_addr_t)((unsigned long)(v) -            \
58 					       (unsigned long)((sp)->rx_desc)))
59 
60 /* Copy frames shorter than rx_copybreak, otherwise pass on up in
61  * a full sized sk_buff.  Value of 100 stolen from tulip.c (!alpha).
62  */
63 static int rx_copybreak = 100;
64 
65 #define PAD_SIZE    (128 - sizeof(struct hpc_dma_desc) - sizeof(void *))
66 
67 struct sgiseeq_rx_desc {
68 	volatile struct hpc_dma_desc rdma;
69 	u8 padding[PAD_SIZE];
70 	struct sk_buff *skb;
71 };
72 
73 struct sgiseeq_tx_desc {
74 	volatile struct hpc_dma_desc tdma;
75 	u8 padding[PAD_SIZE];
76 	struct sk_buff *skb;
77 };
78 
79 /*
80  * Warning: This structure is laid out in a certain way because HPC dma
81  *          descriptors must be 8-byte aligned.  So don't touch this without
82  *          some care.
83  */
84 struct sgiseeq_init_block { /* Note the name ;-) */
85 	struct sgiseeq_rx_desc rxvector[SEEQ_RX_BUFFERS];
86 	struct sgiseeq_tx_desc txvector[SEEQ_TX_BUFFERS];
87 };
88 
89 struct sgiseeq_private {
90 	struct sgiseeq_init_block *srings;
91 	dma_addr_t srings_dma;
92 
93 	/* Ptrs to the descriptors in uncached space. */
94 	struct sgiseeq_rx_desc *rx_desc;
95 	struct sgiseeq_tx_desc *tx_desc;
96 
97 	char *name;
98 	struct hpc3_ethregs *hregs;
99 	struct sgiseeq_regs *sregs;
100 
101 	/* Ring entry counters. */
102 	unsigned int rx_new, tx_new;
103 	unsigned int rx_old, tx_old;
104 
105 	int is_edlc;
106 	unsigned char control;
107 	unsigned char mode;
108 
109 	spinlock_t tx_lock;
110 };
111 
112 static inline void dma_sync_desc_cpu(struct net_device *dev, void *addr)
113 {
114 	dma_cache_sync(dev->dev.parent, addr, sizeof(struct sgiseeq_rx_desc),
115 		       DMA_FROM_DEVICE);
116 }
117 
118 static inline void dma_sync_desc_dev(struct net_device *dev, void *addr)
119 {
120 	dma_cache_sync(dev->dev.parent, addr, sizeof(struct sgiseeq_rx_desc),
121 		       DMA_TO_DEVICE);
122 }
123 
124 static inline void hpc3_eth_reset(struct hpc3_ethregs *hregs)
125 {
126 	hregs->reset = HPC3_ERST_CRESET | HPC3_ERST_CLRIRQ;
127 	udelay(20);
128 	hregs->reset = 0;
129 }
130 
131 static inline void reset_hpc3_and_seeq(struct hpc3_ethregs *hregs,
132 				       struct sgiseeq_regs *sregs)
133 {
134 	hregs->rx_ctrl = hregs->tx_ctrl = 0;
135 	hpc3_eth_reset(hregs);
136 }
137 
138 #define RSTAT_GO_BITS (SEEQ_RCMD_IGOOD | SEEQ_RCMD_IEOF | SEEQ_RCMD_ISHORT | \
139 		       SEEQ_RCMD_IDRIB | SEEQ_RCMD_ICRC)
140 
141 static inline void seeq_go(struct sgiseeq_private *sp,
142 			   struct hpc3_ethregs *hregs,
143 			   struct sgiseeq_regs *sregs)
144 {
145 	sregs->rstat = sp->mode | RSTAT_GO_BITS;
146 	hregs->rx_ctrl = HPC3_ERXCTRL_ACTIVE;
147 }
148 
149 static inline void __sgiseeq_set_mac_address(struct net_device *dev)
150 {
151 	struct sgiseeq_private *sp = netdev_priv(dev);
152 	struct sgiseeq_regs *sregs = sp->sregs;
153 	int i;
154 
155 	sregs->tstat = SEEQ_TCMD_RB0;
156 	for (i = 0; i < 6; i++)
157 		sregs->rw.eth_addr[i] = dev->dev_addr[i];
158 }
159 
160 static int sgiseeq_set_mac_address(struct net_device *dev, void *addr)
161 {
162 	struct sgiseeq_private *sp = netdev_priv(dev);
163 	struct sockaddr *sa = addr;
164 
165 	memcpy(dev->dev_addr, sa->sa_data, dev->addr_len);
166 
167 	spin_lock_irq(&sp->tx_lock);
168 	__sgiseeq_set_mac_address(dev);
169 	spin_unlock_irq(&sp->tx_lock);
170 
171 	return 0;
172 }
173 
174 #define TCNTINFO_INIT (HPCDMA_EOX | HPCDMA_ETXD)
175 #define RCNTCFG_INIT  (HPCDMA_OWN | HPCDMA_EORP | HPCDMA_XIE)
176 #define RCNTINFO_INIT (RCNTCFG_INIT | (PKT_BUF_SZ & HPCDMA_BCNT))
177 
178 static int seeq_init_ring(struct net_device *dev)
179 {
180 	struct sgiseeq_private *sp = netdev_priv(dev);
181 	int i;
182 
183 	netif_stop_queue(dev);
184 	sp->rx_new = sp->tx_new = 0;
185 	sp->rx_old = sp->tx_old = 0;
186 
187 	__sgiseeq_set_mac_address(dev);
188 
189 	/* Setup tx ring. */
190 	for(i = 0; i < SEEQ_TX_BUFFERS; i++) {
191 		sp->tx_desc[i].tdma.cntinfo = TCNTINFO_INIT;
192 		dma_sync_desc_dev(dev, &sp->tx_desc[i]);
193 	}
194 
195 	/* And now the rx ring. */
196 	for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
197 		if (!sp->rx_desc[i].skb) {
198 			dma_addr_t dma_addr;
199 			struct sk_buff *skb = netdev_alloc_skb(dev, PKT_BUF_SZ);
200 
201 			if (skb == NULL)
202 				return -ENOMEM;
203 			skb_reserve(skb, 2);
204 			dma_addr = dma_map_single(dev->dev.parent,
205 						  skb->data - 2,
206 						  PKT_BUF_SZ, DMA_FROM_DEVICE);
207 			sp->rx_desc[i].skb = skb;
208 			sp->rx_desc[i].rdma.pbuf = dma_addr;
209 		}
210 		sp->rx_desc[i].rdma.cntinfo = RCNTINFO_INIT;
211 		dma_sync_desc_dev(dev, &sp->rx_desc[i]);
212 	}
213 	sp->rx_desc[i - 1].rdma.cntinfo |= HPCDMA_EOR;
214 	dma_sync_desc_dev(dev, &sp->rx_desc[i - 1]);
215 	return 0;
216 }
217 
218 static void seeq_purge_ring(struct net_device *dev)
219 {
220 	struct sgiseeq_private *sp = netdev_priv(dev);
221 	int i;
222 
223 	/* clear tx ring. */
224 	for (i = 0; i < SEEQ_TX_BUFFERS; i++) {
225 		if (sp->tx_desc[i].skb) {
226 			dev_kfree_skb(sp->tx_desc[i].skb);
227 			sp->tx_desc[i].skb = NULL;
228 		}
229 	}
230 
231 	/* And now the rx ring. */
232 	for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
233 		if (sp->rx_desc[i].skb) {
234 			dev_kfree_skb(sp->rx_desc[i].skb);
235 			sp->rx_desc[i].skb = NULL;
236 		}
237 	}
238 }
239 
240 #ifdef DEBUG
241 static struct sgiseeq_private *gpriv;
242 static struct net_device *gdev;
243 
244 static void sgiseeq_dump_rings(void)
245 {
246 	static int once;
247 	struct sgiseeq_rx_desc *r = gpriv->rx_desc;
248 	struct sgiseeq_tx_desc *t = gpriv->tx_desc;
249 	struct hpc3_ethregs *hregs = gpriv->hregs;
250 	int i;
251 
252 	if (once)
253 		return;
254 	once++;
255 	printk("RING DUMP:\n");
256 	for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
257 		printk("RX [%d]: @(%p) [%08x,%08x,%08x] ",
258 		       i, (&r[i]), r[i].rdma.pbuf, r[i].rdma.cntinfo,
259 		       r[i].rdma.pnext);
260 		i += 1;
261 		printk("-- [%d]: @(%p) [%08x,%08x,%08x]\n",
262 		       i, (&r[i]), r[i].rdma.pbuf, r[i].rdma.cntinfo,
263 		       r[i].rdma.pnext);
264 	}
265 	for (i = 0; i < SEEQ_TX_BUFFERS; i++) {
266 		printk("TX [%d]: @(%p) [%08x,%08x,%08x] ",
267 		       i, (&t[i]), t[i].tdma.pbuf, t[i].tdma.cntinfo,
268 		       t[i].tdma.pnext);
269 		i += 1;
270 		printk("-- [%d]: @(%p) [%08x,%08x,%08x]\n",
271 		       i, (&t[i]), t[i].tdma.pbuf, t[i].tdma.cntinfo,
272 		       t[i].tdma.pnext);
273 	}
274 	printk("INFO: [rx_new = %d rx_old=%d] [tx_new = %d tx_old = %d]\n",
275 	       gpriv->rx_new, gpriv->rx_old, gpriv->tx_new, gpriv->tx_old);
276 	printk("RREGS: rx_cbptr[%08x] rx_ndptr[%08x] rx_ctrl[%08x]\n",
277 	       hregs->rx_cbptr, hregs->rx_ndptr, hregs->rx_ctrl);
278 	printk("TREGS: tx_cbptr[%08x] tx_ndptr[%08x] tx_ctrl[%08x]\n",
279 	       hregs->tx_cbptr, hregs->tx_ndptr, hregs->tx_ctrl);
280 }
281 #endif
282 
283 #define TSTAT_INIT_SEEQ (SEEQ_TCMD_IPT|SEEQ_TCMD_I16|SEEQ_TCMD_IC|SEEQ_TCMD_IUF)
284 #define TSTAT_INIT_EDLC ((TSTAT_INIT_SEEQ) | SEEQ_TCMD_RB2)
285 
286 static int init_seeq(struct net_device *dev, struct sgiseeq_private *sp,
287 		     struct sgiseeq_regs *sregs)
288 {
289 	struct hpc3_ethregs *hregs = sp->hregs;
290 	int err;
291 
292 	reset_hpc3_and_seeq(hregs, sregs);
293 	err = seeq_init_ring(dev);
294 	if (err)
295 		return err;
296 
297 	/* Setup to field the proper interrupt types. */
298 	if (sp->is_edlc) {
299 		sregs->tstat = TSTAT_INIT_EDLC;
300 		sregs->rw.wregs.control = sp->control;
301 		sregs->rw.wregs.frame_gap = 0;
302 	} else {
303 		sregs->tstat = TSTAT_INIT_SEEQ;
304 	}
305 
306 	hregs->rx_ndptr = VIRT_TO_DMA(sp, sp->rx_desc);
307 	hregs->tx_ndptr = VIRT_TO_DMA(sp, sp->tx_desc);
308 
309 	seeq_go(sp, hregs, sregs);
310 	return 0;
311 }
312 
313 static void record_rx_errors(struct net_device *dev, unsigned char status)
314 {
315 	if (status & SEEQ_RSTAT_OVERF ||
316 	    status & SEEQ_RSTAT_SFRAME)
317 		dev->stats.rx_over_errors++;
318 	if (status & SEEQ_RSTAT_CERROR)
319 		dev->stats.rx_crc_errors++;
320 	if (status & SEEQ_RSTAT_DERROR)
321 		dev->stats.rx_frame_errors++;
322 	if (status & SEEQ_RSTAT_REOF)
323 		dev->stats.rx_errors++;
324 }
325 
326 static inline void rx_maybe_restart(struct sgiseeq_private *sp,
327 				    struct hpc3_ethregs *hregs,
328 				    struct sgiseeq_regs *sregs)
329 {
330 	if (!(hregs->rx_ctrl & HPC3_ERXCTRL_ACTIVE)) {
331 		hregs->rx_ndptr = VIRT_TO_DMA(sp, sp->rx_desc + sp->rx_new);
332 		seeq_go(sp, hregs, sregs);
333 	}
334 }
335 
336 static inline void sgiseeq_rx(struct net_device *dev, struct sgiseeq_private *sp,
337 			      struct hpc3_ethregs *hregs,
338 			      struct sgiseeq_regs *sregs)
339 {
340 	struct sgiseeq_rx_desc *rd;
341 	struct sk_buff *skb = NULL;
342 	struct sk_buff *newskb;
343 	unsigned char pkt_status;
344 	int len = 0;
345 	unsigned int orig_end = PREV_RX(sp->rx_new);
346 
347 	/* Service every received packet. */
348 	rd = &sp->rx_desc[sp->rx_new];
349 	dma_sync_desc_cpu(dev, rd);
350 	while (!(rd->rdma.cntinfo & HPCDMA_OWN)) {
351 		len = PKT_BUF_SZ - (rd->rdma.cntinfo & HPCDMA_BCNT) - 3;
352 		dma_unmap_single(dev->dev.parent, rd->rdma.pbuf,
353 				 PKT_BUF_SZ, DMA_FROM_DEVICE);
354 		pkt_status = rd->skb->data[len];
355 		if (pkt_status & SEEQ_RSTAT_FIG) {
356 			/* Packet is OK. */
357 			/* We don't want to receive our own packets */
358 			if (!ether_addr_equal(rd->skb->data + 6, dev->dev_addr)) {
359 				if (len > rx_copybreak) {
360 					skb = rd->skb;
361 					newskb = netdev_alloc_skb(dev, PKT_BUF_SZ);
362 					if (!newskb) {
363 						newskb = skb;
364 						skb = NULL;
365 						goto memory_squeeze;
366 					}
367 					skb_reserve(newskb, 2);
368 				} else {
369 					skb = netdev_alloc_skb_ip_align(dev, len);
370 					if (skb)
371 						skb_copy_to_linear_data(skb, rd->skb->data, len);
372 
373 					newskb = rd->skb;
374 				}
375 memory_squeeze:
376 				if (skb) {
377 					skb_put(skb, len);
378 					skb->protocol = eth_type_trans(skb, dev);
379 					netif_rx(skb);
380 					dev->stats.rx_packets++;
381 					dev->stats.rx_bytes += len;
382 				} else {
383 					dev->stats.rx_dropped++;
384 				}
385 			} else {
386 				/* Silently drop my own packets */
387 				newskb = rd->skb;
388 			}
389 		} else {
390 			record_rx_errors(dev, pkt_status);
391 			newskb = rd->skb;
392 		}
393 		rd->skb = newskb;
394 		rd->rdma.pbuf = dma_map_single(dev->dev.parent,
395 					       newskb->data - 2,
396 					       PKT_BUF_SZ, DMA_FROM_DEVICE);
397 
398 		/* Return the entry to the ring pool. */
399 		rd->rdma.cntinfo = RCNTINFO_INIT;
400 		sp->rx_new = NEXT_RX(sp->rx_new);
401 		dma_sync_desc_dev(dev, rd);
402 		rd = &sp->rx_desc[sp->rx_new];
403 		dma_sync_desc_cpu(dev, rd);
404 	}
405 	dma_sync_desc_cpu(dev, &sp->rx_desc[orig_end]);
406 	sp->rx_desc[orig_end].rdma.cntinfo &= ~(HPCDMA_EOR);
407 	dma_sync_desc_dev(dev, &sp->rx_desc[orig_end]);
408 	dma_sync_desc_cpu(dev, &sp->rx_desc[PREV_RX(sp->rx_new)]);
409 	sp->rx_desc[PREV_RX(sp->rx_new)].rdma.cntinfo |= HPCDMA_EOR;
410 	dma_sync_desc_dev(dev, &sp->rx_desc[PREV_RX(sp->rx_new)]);
411 	rx_maybe_restart(sp, hregs, sregs);
412 }
413 
414 static inline void tx_maybe_reset_collisions(struct sgiseeq_private *sp,
415 					     struct sgiseeq_regs *sregs)
416 {
417 	if (sp->is_edlc) {
418 		sregs->rw.wregs.control = sp->control & ~(SEEQ_CTRL_XCNT);
419 		sregs->rw.wregs.control = sp->control;
420 	}
421 }
422 
423 static inline void kick_tx(struct net_device *dev,
424 			   struct sgiseeq_private *sp,
425 			   struct hpc3_ethregs *hregs)
426 {
427 	struct sgiseeq_tx_desc *td;
428 	int i = sp->tx_old;
429 
430 	/* If the HPC aint doin nothin, and there are more packets
431 	 * with ETXD cleared and XIU set we must make very certain
432 	 * that we restart the HPC else we risk locking up the
433 	 * adapter.  The following code is only safe iff the HPCDMA
434 	 * is not active!
435 	 */
436 	td = &sp->tx_desc[i];
437 	dma_sync_desc_cpu(dev, td);
438 	while ((td->tdma.cntinfo & (HPCDMA_XIU | HPCDMA_ETXD)) ==
439 	      (HPCDMA_XIU | HPCDMA_ETXD)) {
440 		i = NEXT_TX(i);
441 		td = &sp->tx_desc[i];
442 		dma_sync_desc_cpu(dev, td);
443 	}
444 	if (td->tdma.cntinfo & HPCDMA_XIU) {
445 		hregs->tx_ndptr = VIRT_TO_DMA(sp, td);
446 		hregs->tx_ctrl = HPC3_ETXCTRL_ACTIVE;
447 	}
448 }
449 
450 static inline void sgiseeq_tx(struct net_device *dev, struct sgiseeq_private *sp,
451 			      struct hpc3_ethregs *hregs,
452 			      struct sgiseeq_regs *sregs)
453 {
454 	struct sgiseeq_tx_desc *td;
455 	unsigned long status = hregs->tx_ctrl;
456 	int j;
457 
458 	tx_maybe_reset_collisions(sp, sregs);
459 
460 	if (!(status & (HPC3_ETXCTRL_ACTIVE | SEEQ_TSTAT_PTRANS))) {
461 		/* Oops, HPC detected some sort of error. */
462 		if (status & SEEQ_TSTAT_R16)
463 			dev->stats.tx_aborted_errors++;
464 		if (status & SEEQ_TSTAT_UFLOW)
465 			dev->stats.tx_fifo_errors++;
466 		if (status & SEEQ_TSTAT_LCLS)
467 			dev->stats.collisions++;
468 	}
469 
470 	/* Ack 'em... */
471 	for (j = sp->tx_old; j != sp->tx_new; j = NEXT_TX(j)) {
472 		td = &sp->tx_desc[j];
473 
474 		dma_sync_desc_cpu(dev, td);
475 		if (!(td->tdma.cntinfo & (HPCDMA_XIU)))
476 			break;
477 		if (!(td->tdma.cntinfo & (HPCDMA_ETXD))) {
478 			if (!(status & HPC3_ETXCTRL_ACTIVE)) {
479 				hregs->tx_ndptr = VIRT_TO_DMA(sp, td);
480 				hregs->tx_ctrl = HPC3_ETXCTRL_ACTIVE;
481 			}
482 			break;
483 		}
484 		dev->stats.tx_packets++;
485 		sp->tx_old = NEXT_TX(sp->tx_old);
486 		td->tdma.cntinfo &= ~(HPCDMA_XIU | HPCDMA_XIE);
487 		td->tdma.cntinfo |= HPCDMA_EOX;
488 		if (td->skb) {
489 			dev_kfree_skb_any(td->skb);
490 			td->skb = NULL;
491 		}
492 		dma_sync_desc_dev(dev, td);
493 	}
494 }
495 
496 static irqreturn_t sgiseeq_interrupt(int irq, void *dev_id)
497 {
498 	struct net_device *dev = (struct net_device *) dev_id;
499 	struct sgiseeq_private *sp = netdev_priv(dev);
500 	struct hpc3_ethregs *hregs = sp->hregs;
501 	struct sgiseeq_regs *sregs = sp->sregs;
502 
503 	spin_lock(&sp->tx_lock);
504 
505 	/* Ack the IRQ and set software state. */
506 	hregs->reset = HPC3_ERST_CLRIRQ;
507 
508 	/* Always check for received packets. */
509 	sgiseeq_rx(dev, sp, hregs, sregs);
510 
511 	/* Only check for tx acks if we have something queued. */
512 	if (sp->tx_old != sp->tx_new)
513 		sgiseeq_tx(dev, sp, hregs, sregs);
514 
515 	if ((TX_BUFFS_AVAIL(sp) > 0) && netif_queue_stopped(dev)) {
516 		netif_wake_queue(dev);
517 	}
518 	spin_unlock(&sp->tx_lock);
519 
520 	return IRQ_HANDLED;
521 }
522 
523 static int sgiseeq_open(struct net_device *dev)
524 {
525 	struct sgiseeq_private *sp = netdev_priv(dev);
526 	struct sgiseeq_regs *sregs = sp->sregs;
527 	unsigned int irq = dev->irq;
528 	int err;
529 
530 	if (request_irq(irq, sgiseeq_interrupt, 0, sgiseeqstr, dev)) {
531 		printk(KERN_ERR "Seeq8003: Can't get irq %d\n", dev->irq);
532 		return -EAGAIN;
533 	}
534 
535 	err = init_seeq(dev, sp, sregs);
536 	if (err)
537 		goto out_free_irq;
538 
539 	netif_start_queue(dev);
540 
541 	return 0;
542 
543 out_free_irq:
544 	free_irq(irq, dev);
545 
546 	return err;
547 }
548 
549 static int sgiseeq_close(struct net_device *dev)
550 {
551 	struct sgiseeq_private *sp = netdev_priv(dev);
552 	struct sgiseeq_regs *sregs = sp->sregs;
553 	unsigned int irq = dev->irq;
554 
555 	netif_stop_queue(dev);
556 
557 	/* Shutdown the Seeq. */
558 	reset_hpc3_and_seeq(sp->hregs, sregs);
559 	free_irq(irq, dev);
560 	seeq_purge_ring(dev);
561 
562 	return 0;
563 }
564 
565 static inline int sgiseeq_reset(struct net_device *dev)
566 {
567 	struct sgiseeq_private *sp = netdev_priv(dev);
568 	struct sgiseeq_regs *sregs = sp->sregs;
569 	int err;
570 
571 	err = init_seeq(dev, sp, sregs);
572 	if (err)
573 		return err;
574 
575 	netif_trans_update(dev); /* prevent tx timeout */
576 	netif_wake_queue(dev);
577 
578 	return 0;
579 }
580 
581 static int sgiseeq_start_xmit(struct sk_buff *skb, struct net_device *dev)
582 {
583 	struct sgiseeq_private *sp = netdev_priv(dev);
584 	struct hpc3_ethregs *hregs = sp->hregs;
585 	unsigned long flags;
586 	struct sgiseeq_tx_desc *td;
587 	int len, entry;
588 
589 	spin_lock_irqsave(&sp->tx_lock, flags);
590 
591 	/* Setup... */
592 	len = skb->len;
593 	if (len < ETH_ZLEN) {
594 		if (skb_padto(skb, ETH_ZLEN)) {
595 			spin_unlock_irqrestore(&sp->tx_lock, flags);
596 			return NETDEV_TX_OK;
597 		}
598 		len = ETH_ZLEN;
599 	}
600 
601 	dev->stats.tx_bytes += len;
602 	entry = sp->tx_new;
603 	td = &sp->tx_desc[entry];
604 	dma_sync_desc_cpu(dev, td);
605 
606 	/* Create entry.  There are so many races with adding a new
607 	 * descriptor to the chain:
608 	 * 1) Assume that the HPC is off processing a DMA chain while
609 	 *    we are changing all of the following.
610 	 * 2) Do no allow the HPC to look at a new descriptor until
611 	 *    we have completely set up it's state.  This means, do
612 	 *    not clear HPCDMA_EOX in the current last descritptor
613 	 *    until the one we are adding looks consistent and could
614 	 *    be processes right now.
615 	 * 3) The tx interrupt code must notice when we've added a new
616 	 *    entry and the HPC got to the end of the chain before we
617 	 *    added this new entry and restarted it.
618 	 */
619 	td->skb = skb;
620 	td->tdma.pbuf = dma_map_single(dev->dev.parent, skb->data,
621 				       len, DMA_TO_DEVICE);
622 	td->tdma.cntinfo = (len & HPCDMA_BCNT) |
623 	                   HPCDMA_XIU | HPCDMA_EOXP | HPCDMA_XIE | HPCDMA_EOX;
624 	dma_sync_desc_dev(dev, td);
625 	if (sp->tx_old != sp->tx_new) {
626 		struct sgiseeq_tx_desc *backend;
627 
628 		backend = &sp->tx_desc[PREV_TX(sp->tx_new)];
629 		dma_sync_desc_cpu(dev, backend);
630 		backend->tdma.cntinfo &= ~HPCDMA_EOX;
631 		dma_sync_desc_dev(dev, backend);
632 	}
633 	sp->tx_new = NEXT_TX(sp->tx_new); /* Advance. */
634 
635 	/* Maybe kick the HPC back into motion. */
636 	if (!(hregs->tx_ctrl & HPC3_ETXCTRL_ACTIVE))
637 		kick_tx(dev, sp, hregs);
638 
639 	if (!TX_BUFFS_AVAIL(sp))
640 		netif_stop_queue(dev);
641 	spin_unlock_irqrestore(&sp->tx_lock, flags);
642 
643 	return NETDEV_TX_OK;
644 }
645 
646 static void timeout(struct net_device *dev)
647 {
648 	printk(KERN_NOTICE "%s: transmit timed out, resetting\n", dev->name);
649 	sgiseeq_reset(dev);
650 
651 	netif_trans_update(dev); /* prevent tx timeout */
652 	netif_wake_queue(dev);
653 }
654 
655 static void sgiseeq_set_multicast(struct net_device *dev)
656 {
657 	struct sgiseeq_private *sp = netdev_priv(dev);
658 	unsigned char oldmode = sp->mode;
659 
660 	if(dev->flags & IFF_PROMISC)
661 		sp->mode = SEEQ_RCMD_RANY;
662 	else if ((dev->flags & IFF_ALLMULTI) || !netdev_mc_empty(dev))
663 		sp->mode = SEEQ_RCMD_RBMCAST;
664 	else
665 		sp->mode = SEEQ_RCMD_RBCAST;
666 
667 	/* XXX I know this sucks, but is there a better way to reprogram
668 	 * XXX the receiver? At least, this shouldn't happen too often.
669 	 */
670 
671 	if (oldmode != sp->mode)
672 		sgiseeq_reset(dev);
673 }
674 
675 static inline void setup_tx_ring(struct net_device *dev,
676 				 struct sgiseeq_tx_desc *buf,
677 				 int nbufs)
678 {
679 	struct sgiseeq_private *sp = netdev_priv(dev);
680 	int i = 0;
681 
682 	while (i < (nbufs - 1)) {
683 		buf[i].tdma.pnext = VIRT_TO_DMA(sp, buf + i + 1);
684 		buf[i].tdma.pbuf = 0;
685 		dma_sync_desc_dev(dev, &buf[i]);
686 		i++;
687 	}
688 	buf[i].tdma.pnext = VIRT_TO_DMA(sp, buf);
689 	dma_sync_desc_dev(dev, &buf[i]);
690 }
691 
692 static inline void setup_rx_ring(struct net_device *dev,
693 				 struct sgiseeq_rx_desc *buf,
694 				 int nbufs)
695 {
696 	struct sgiseeq_private *sp = netdev_priv(dev);
697 	int i = 0;
698 
699 	while (i < (nbufs - 1)) {
700 		buf[i].rdma.pnext = VIRT_TO_DMA(sp, buf + i + 1);
701 		buf[i].rdma.pbuf = 0;
702 		dma_sync_desc_dev(dev, &buf[i]);
703 		i++;
704 	}
705 	buf[i].rdma.pbuf = 0;
706 	buf[i].rdma.pnext = VIRT_TO_DMA(sp, buf);
707 	dma_sync_desc_dev(dev, &buf[i]);
708 }
709 
710 static const struct net_device_ops sgiseeq_netdev_ops = {
711 	.ndo_open		= sgiseeq_open,
712 	.ndo_stop		= sgiseeq_close,
713 	.ndo_start_xmit		= sgiseeq_start_xmit,
714 	.ndo_tx_timeout		= timeout,
715 	.ndo_set_rx_mode	= sgiseeq_set_multicast,
716 	.ndo_set_mac_address	= sgiseeq_set_mac_address,
717 	.ndo_change_mtu		= eth_change_mtu,
718 	.ndo_validate_addr	= eth_validate_addr,
719 };
720 
721 static int sgiseeq_probe(struct platform_device *pdev)
722 {
723 	struct sgiseeq_platform_data *pd = dev_get_platdata(&pdev->dev);
724 	struct hpc3_regs *hpcregs = pd->hpc;
725 	struct sgiseeq_init_block *sr;
726 	unsigned int irq = pd->irq;
727 	struct sgiseeq_private *sp;
728 	struct net_device *dev;
729 	int err;
730 
731 	dev = alloc_etherdev(sizeof (struct sgiseeq_private));
732 	if (!dev) {
733 		err = -ENOMEM;
734 		goto err_out;
735 	}
736 
737 	platform_set_drvdata(pdev, dev);
738 	sp = netdev_priv(dev);
739 
740 	/* Make private data page aligned */
741 	sr = dma_alloc_noncoherent(&pdev->dev, sizeof(*sp->srings),
742 				&sp->srings_dma, GFP_KERNEL);
743 	if (!sr) {
744 		printk(KERN_ERR "Sgiseeq: Page alloc failed, aborting.\n");
745 		err = -ENOMEM;
746 		goto err_out_free_dev;
747 	}
748 	sp->srings = sr;
749 	sp->rx_desc = sp->srings->rxvector;
750 	sp->tx_desc = sp->srings->txvector;
751 	spin_lock_init(&sp->tx_lock);
752 
753 	/* A couple calculations now, saves many cycles later. */
754 	setup_rx_ring(dev, sp->rx_desc, SEEQ_RX_BUFFERS);
755 	setup_tx_ring(dev, sp->tx_desc, SEEQ_TX_BUFFERS);
756 
757 	memcpy(dev->dev_addr, pd->mac, ETH_ALEN);
758 
759 #ifdef DEBUG
760 	gpriv = sp;
761 	gdev = dev;
762 #endif
763 	sp->sregs = (struct sgiseeq_regs *) &hpcregs->eth_ext[0];
764 	sp->hregs = &hpcregs->ethregs;
765 	sp->name = sgiseeqstr;
766 	sp->mode = SEEQ_RCMD_RBCAST;
767 
768 	/* Setup PIO and DMA transfer timing */
769 	sp->hregs->pconfig = 0x161;
770 	sp->hregs->dconfig = HPC3_EDCFG_FIRQ | HPC3_EDCFG_FEOP |
771 			     HPC3_EDCFG_FRXDC | HPC3_EDCFG_PTO | 0x026;
772 
773 	/* Setup PIO and DMA transfer timing */
774 	sp->hregs->pconfig = 0x161;
775 	sp->hregs->dconfig = HPC3_EDCFG_FIRQ | HPC3_EDCFG_FEOP |
776 			     HPC3_EDCFG_FRXDC | HPC3_EDCFG_PTO | 0x026;
777 
778 	/* Reset the chip. */
779 	hpc3_eth_reset(sp->hregs);
780 
781 	sp->is_edlc = !(sp->sregs->rw.rregs.collision_tx[0] & 0xff);
782 	if (sp->is_edlc)
783 		sp->control = SEEQ_CTRL_XCNT | SEEQ_CTRL_ACCNT |
784 			      SEEQ_CTRL_SFLAG | SEEQ_CTRL_ESHORT |
785 			      SEEQ_CTRL_ENCARR;
786 
787 	dev->netdev_ops		= &sgiseeq_netdev_ops;
788 	dev->watchdog_timeo	= (200 * HZ) / 1000;
789 	dev->irq		= irq;
790 
791 	if (register_netdev(dev)) {
792 		printk(KERN_ERR "Sgiseeq: Cannot register net device, "
793 		       "aborting.\n");
794 		err = -ENODEV;
795 		goto err_out_free_page;
796 	}
797 
798 	printk(KERN_INFO "%s: %s %pM\n", dev->name, sgiseeqstr, dev->dev_addr);
799 
800 	return 0;
801 
802 err_out_free_page:
803 	free_page((unsigned long) sp->srings);
804 err_out_free_dev:
805 	free_netdev(dev);
806 
807 err_out:
808 	return err;
809 }
810 
811 static int __exit sgiseeq_remove(struct platform_device *pdev)
812 {
813 	struct net_device *dev = platform_get_drvdata(pdev);
814 	struct sgiseeq_private *sp = netdev_priv(dev);
815 
816 	unregister_netdev(dev);
817 	dma_free_noncoherent(&pdev->dev, sizeof(*sp->srings), sp->srings,
818 			     sp->srings_dma);
819 	free_netdev(dev);
820 
821 	return 0;
822 }
823 
824 static struct platform_driver sgiseeq_driver = {
825 	.probe	= sgiseeq_probe,
826 	.remove	= __exit_p(sgiseeq_remove),
827 	.driver = {
828 		.name	= "sgiseeq",
829 	}
830 };
831 
832 module_platform_driver(sgiseeq_driver);
833 
834 MODULE_DESCRIPTION("SGI Seeq 8003 driver");
835 MODULE_AUTHOR("Linux/MIPS Mailing List <linux-mips@linux-mips.org>");
836 MODULE_LICENSE("GPL");
837 MODULE_ALIAS("platform:sgiseeq");
838