if_qn.c revision 1.17 1 /* $NetBSD: if_qn.c,v 1.17 1999/03/25 23:10:53 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1995 Mika Kortelainen
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Mika Kortelainen
18 * 4. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 *
32 * Thanks for Aspecs Oy (Finland) for the data book for the NIC used
33 * in this card and also many thanks for the Resource Management Force
34 * (QuickNet card manufacturer) and especially Daniel Koch for providing
35 * me with the necessary 'inside' information to write the driver.
36 *
37 * This is partly based on other code:
38 * - if_ed.c: basic function structure for Ethernet driver and now also
39 * qn_put() is done similarly, i.e. no extra packet buffers.
40 *
41 * Device driver for National Semiconductor DS8390/WD83C690 based ethernet
42 * adapters.
43 *
44 * Copyright (c) 1994, 1995 Charles M. Hannum. All rights reserved.
45 *
46 * Copyright (C) 1993, David Greenman. This software may be used,
47 * modified, copied, distributed, and sold, in both source and binary
48 * form provided that the above copyright and these terms are retained.
49 * Under no circumstances is the author responsible for the proper
50 * functioning of this software, nor does the author assume any
51 * responsibility for damages incurred with its use.
52 *
53 * - if_es.c: used as an example of -current driver
54 *
55 * Copyright (c) 1995 Michael L. Hitch
56 * All rights reserved.
57 *
58 * - if_fe.c: some ideas for error handling for qn_rint() which might
59 * have fixed those random lock ups, too.
60 *
61 * All Rights Reserved, Copyright (C) Fujitsu Limited 1995
62 *
63 *
64 * TODO:
65 * - add multicast support
66 */
67
68 #include "qn.h"
69 #if NQN > 0
70
71 #define QN_DEBUG
72 #define QN_DEBUG1_no /* hides some old tests */
73 #define QN_CHECKS_no /* adds some checks (not needed in normal situations) */
74
75 #include "bpfilter.h"
76
77 /*
78 * Fujitsu MB86950 Ethernet Controller (as used in the QuickNet QN2000
79 * Ethernet card)
80 */
81
82 #include "opt_inet.h"
83 #include "opt_ns.h"
84
85 #include <sys/param.h>
86 #include <sys/systm.h>
87 #include <sys/mbuf.h>
88 #include <sys/buf.h>
89 #include <sys/device.h>
90 #include <sys/protosw.h>
91 #include <sys/socket.h>
92 #include <sys/syslog.h>
93 #include <sys/ioctl.h>
94 #include <sys/errno.h>
95
96 #include <net/if.h>
97 #include <net/if_dl.h>
98 #include <net/if_ether.h>
99
100 #ifdef INET
101 #include <netinet/in.h>
102 #include <netinet/in_systm.h>
103 #include <netinet/in_var.h>
104 #include <netinet/ip.h>
105 #include <netinet/if_inarp.h>
106 #endif
107
108 #ifdef NS
109 #include <netns/ns.h>
110 #include <netns/ns_if.h>
111 #endif
112
113 #include <machine/cpu.h>
114 #include <machine/mtpr.h>
115 #include <amiga/amiga/device.h>
116 #include <amiga/amiga/isr.h>
117 #include <amiga/dev/zbusvar.h>
118 #include <amiga/dev/if_qnreg.h>
119
120
121 #define NIC_R_MASK (R_INT_PKT_RDY | R_INT_ALG_ERR |\
122 R_INT_CRC_ERR | R_INT_OVR_FLO)
123 #define MAX_PACKETS 30 /* max number of packets read per interrupt */
124
125 /*
126 * Ethernet software status per interface
127 *
128 * Each interface is referenced by a network interface structure,
129 * qn_if, which the routing code uses to locate the interface.
130 * This structure contains the output queue for the interface, its address, ...
131 */
132 struct qn_softc {
133 struct device sc_dev;
134 struct isr sc_isr;
135 struct ethercom sc_ethercom; /* Common ethernet structures */
136 u_char volatile *sc_base;
137 u_char volatile *sc_nic_base;
138 u_short volatile *nic_fifo;
139 u_short volatile *nic_r_status;
140 u_short volatile *nic_t_status;
141 u_short volatile *nic_r_mask;
142 u_short volatile *nic_t_mask;
143 u_short volatile *nic_r_mode;
144 u_short volatile *nic_t_mode;
145 u_short volatile *nic_reset;
146 u_short volatile *nic_len;
147 u_char transmit_pending;
148 #if NBPFILTER > 0
149 caddr_t sc_bpf;
150 #endif
151 } qn_softc[NQN];
152
153 #if NBPFILTER > 0
154 #include <net/bpf.h>
155 #include <net/bpfdesc.h>
156 #endif
157
158
159 int qnmatch __P((struct device *, struct cfdata *, void *));
160 void qnattach __P((struct device *, struct device *, void *));
161 int qnintr __P((void *));
162 int qnioctl __P((struct ifnet *, u_long, caddr_t));
163 void qnstart __P((struct ifnet *));
164 void qnwatchdog __P((struct ifnet *));
165 void qnreset __P((struct qn_softc *));
166 void qninit __P((struct qn_softc *));
167 void qnstop __P((struct qn_softc *));
168 static u_short qn_put __P((u_short volatile *, struct mbuf *));
169 static void qn_rint __P((struct qn_softc *, u_short));
170 static void qn_flush __P((struct qn_softc *));
171 static void inline word_copy_from_card __P((u_short volatile *, u_short *, u_short));
172 static void inline word_copy_to_card __P((u_short *, u_short volatile *, register u_short));
173 static void qn_get_packet __P((struct qn_softc *, u_short));
174 #ifdef QN_DEBUG1
175 static void qn_dump __P((struct qn_softc *));
176 #endif
177
178 struct cfattach qn_ca = {
179 sizeof(struct qn_softc), qnmatch, qnattach
180 };
181
182 int
183 qnmatch(parent, cfp, aux)
184 struct device *parent;
185 struct cfdata *cfp;
186 void *aux;
187 {
188 struct zbus_args *zap;
189
190 zap = (struct zbus_args *)aux;
191
192 /* RMF QuickNet QN2000 EtherNet card */
193 if (zap->manid == 2011 && zap->prodid == 2)
194 return (1);
195
196 return (0);
197 }
198
199 /*
200 * Interface exists: make available by filling in network interface
201 * record. System will initialize the interface when it is ready
202 * to accept packets.
203 */
204 void
205 qnattach(parent, self, aux)
206 struct device *parent, *self;
207 void *aux;
208 {
209 struct zbus_args *zap;
210 struct qn_softc *sc = (struct qn_softc *)self;
211 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
212 u_int8_t myaddr[ETHER_ADDR_LEN];
213
214 zap = (struct zbus_args *)aux;
215
216 sc->sc_base = zap->va;
217 sc->sc_nic_base = sc->sc_base + QUICKNET_NIC_BASE;
218 sc->nic_fifo = (u_short volatile *)(sc->sc_nic_base + NIC_BMPR0);
219 sc->nic_len = (u_short volatile *)(sc->sc_nic_base + NIC_BMPR2);
220 sc->nic_t_status = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR0);
221 sc->nic_r_status = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR2);
222 sc->nic_t_mask = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR1);
223 sc->nic_r_mask = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR3);
224 sc->nic_t_mode = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR4);
225 sc->nic_r_mode = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR5);
226 sc->nic_reset = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR6);
227 sc->transmit_pending = 0;
228
229 /*
230 * The ethernet address of the board (1st three bytes are the vendor
231 * address, the rest is the serial number of the board).
232 */
233 myaddr[0] = 0x5c;
234 myaddr[1] = 0x5c;
235 myaddr[2] = 0x00;
236 myaddr[3] = (zap->serno >> 16) & 0xff;
237 myaddr[4] = (zap->serno >> 8) & 0xff;
238 myaddr[5] = zap->serno & 0xff;
239
240 /* set interface to stopped condition (reset) */
241 qnstop(sc);
242
243 bcopy(sc->sc_dev.dv_xname, ifp->if_xname, IFNAMSIZ);
244 ifp->if_softc = sc;
245 ifp->if_ioctl = qnioctl;
246 ifp->if_watchdog = qnwatchdog;
247 ifp->if_output = ether_output;
248 ifp->if_start = qnstart;
249 /* XXX IFF_MULTICAST */
250 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS;
251 ifp->if_mtu = ETHERMTU;
252
253 /* Attach the interface. */
254 if_attach(ifp);
255 ether_ifattach(ifp, myaddr);
256
257 #ifdef QN_DEBUG
258 printf(": hardware address %s\n", ether_sprintf(myaddr));
259 #endif
260
261 #if NBPFILTER > 0
262 bpfattach(&sc->sc_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header));
263 #endif
264
265 sc->sc_isr.isr_intr = qnintr;
266 sc->sc_isr.isr_arg = sc;
267 sc->sc_isr.isr_ipl = 2;
268 add_isr(&sc->sc_isr);
269 }
270
271 /*
272 * Initialize device
273 *
274 */
275 void
276 qninit(sc)
277 struct qn_softc *sc;
278 {
279 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
280 u_short i;
281 static int retry = 0;
282
283 *sc->nic_r_mask = NIC_R_MASK;
284 *sc->nic_t_mode = NO_LOOPBACK;
285
286 if (sc->sc_ethercom.ec_if.if_flags & IFF_PROMISC) {
287 *sc->nic_r_mode = PROMISCUOUS_MODE;
288 log(LOG_INFO, "qn: Promiscuous mode (not tested)\n");
289 } else
290 *sc->nic_r_mode = NORMAL_MODE;
291
292 /* Set physical ethernet address. */
293 for (i = 0; i < ETHER_ADDR_LEN; i++)
294 *((u_short volatile *)(sc->sc_nic_base+
295 QNET_HARDWARE_ADDRESS+2*i)) =
296 ((((u_short)LLADDR(ifp->if_sadl)[i]) << 8) |
297 LLADDR(ifp->if_sadl)[i]);
298
299 ifp->if_flags |= IFF_RUNNING;
300 ifp->if_flags &= ~IFF_OACTIVE;
301 sc->transmit_pending = 0;
302
303 qn_flush(sc);
304
305 /* QuickNet magic. Done ONLY once, otherwise a lockup occurs. */
306 if (retry == 0) {
307 *((u_short volatile *)(sc->sc_nic_base + QNET_MAGIC)) = 0;
308 retry = 1;
309 }
310
311 /* Enable data link controller. */
312 *sc->nic_reset = ENABLE_DLC;
313
314 /* Attempt to start output, if any. */
315 qnstart(ifp);
316 }
317
318 /*
319 * Device timeout/watchdog routine. Entered if the device neglects to
320 * generate an interrupt after a transmit has been started on it.
321 */
322 void
323 qnwatchdog(ifp)
324 struct ifnet *ifp;
325 {
326 struct qn_softc *sc = ifp->if_softc;
327
328 log(LOG_INFO, "qn: device timeout (watchdog)\n");
329 ++sc->sc_ethercom.ec_if.if_oerrors;
330
331 qnreset(sc);
332 }
333
334 /*
335 * Flush card's buffer RAM.
336 */
337 static void
338 qn_flush(sc)
339 struct qn_softc *sc;
340 {
341 #if 1
342 /* Read data until bus read error (i.e. buffer empty). */
343 while (!(*sc->nic_r_status & R_BUS_RD_ERR))
344 (void)(*sc->nic_fifo);
345 #else
346 /* Read data twice to clear some internal pipelines. */
347 (void)(*sc->nic_fifo);
348 (void)(*sc->nic_fifo);
349 #endif
350
351 /* Clear bus read error. */
352 *sc->nic_r_status = R_BUS_RD_ERR;
353 }
354
355 /*
356 * Reset the interface.
357 *
358 */
359 void
360 qnreset(sc)
361 struct qn_softc *sc;
362 {
363 int s;
364
365 s = splnet();
366 qnstop(sc);
367 qninit(sc);
368 splx(s);
369 }
370
371 /*
372 * Take interface offline.
373 */
374 void
375 qnstop(sc)
376 struct qn_softc *sc;
377 {
378
379 /* Stop the interface. */
380 *sc->nic_reset = DISABLE_DLC;
381 delay(200);
382 *sc->nic_t_status = CLEAR_T_ERR;
383 *sc->nic_t_mask = CLEAR_T_MASK;
384 *sc->nic_r_status = CLEAR_R_ERR;
385 *sc->nic_r_mask = CLEAR_R_MASK;
386
387 /* Turn DMA off */
388 *((u_short volatile *)(sc->sc_nic_base + NIC_BMPR4)) = 0;
389
390 /* Accept no packets. */
391 *sc->nic_r_mode = 0;
392 *sc->nic_t_mode = 0;
393
394 qn_flush(sc);
395 }
396
397 /*
398 * Start output on interface. Get another datagram to send
399 * off the interface queue, and copy it to the
400 * interface before starting the output.
401 *
402 * This assumes that it is called inside a critical section...
403 *
404 */
405 void
406 qnstart(ifp)
407 struct ifnet *ifp;
408 {
409 struct qn_softc *sc = ifp->if_softc;
410 struct mbuf *m;
411 u_short len;
412 int timout = 60000;
413
414
415 if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
416 return;
417
418 IF_DEQUEUE(&ifp->if_snd, m);
419 if (m == 0)
420 return;
421
422 #if NBPFILTER > 0
423 /*
424 * If bpf is listening on this interface, let it
425 * see the packet before we commit it to the wire
426 *
427 * (can't give the copy in QuickNet card RAM to bpf, because
428 * that RAM is not visible to the host but is read from FIFO)
429 *
430 */
431 if (sc->sc_bpf)
432 bpf_mtap(sc->sc_bpf, m);
433 #endif
434 len = qn_put(sc->nic_fifo, m);
435 m_freem(m);
436
437 /*
438 * Really transmit the packet.
439 */
440
441 /* Set packet length (byte-swapped). */
442 len = ((len >> 8) & 0x0007) | TRANSMIT_START | ((len & 0x00ff) << 8);
443 *sc->nic_len = len;
444
445 /* Wait for the packet to really leave. */
446 while (!(*sc->nic_t_status & T_TMT_OK) && --timout) {
447 if ((timout % 10000) == 0)
448 log(LOG_INFO, "qn: timout...\n");
449 }
450
451 if (timout == 0)
452 /* Maybe we should try to recover from this one? */
453 /* But now, let's just fall thru and hope the best... */
454 log(LOG_INFO, "qn: transmit timout (fatal?)\n");
455
456 sc->transmit_pending = 1;
457 *sc->nic_t_mask = INT_TMT_OK | INT_SIXTEEN_COL;
458
459 ifp->if_flags |= IFF_OACTIVE;
460 ifp->if_timer = 2;
461 }
462
463 /*
464 * Memory copy, copies word at a time
465 */
466 static void inline
467 word_copy_from_card(card, b, len)
468 u_short volatile *card;
469 u_short *b, len;
470 {
471 register u_short l = len/2;
472
473 while (l--)
474 *b++ = *card;
475 }
476
477 static void inline
478 word_copy_to_card(a, card, len)
479 u_short *a;
480 u_short volatile *card;
481 register u_short len;
482 {
483 /*register u_short l = len/2;*/
484
485 while (len--)
486 *card = *a++;
487 }
488
489 /*
490 * Copy packet from mbuf to the board memory
491 *
492 */
493 static u_short
494 qn_put(addr, m)
495 u_short volatile *addr;
496 struct mbuf *m;
497 {
498 u_short *data;
499 u_char savebyte[2];
500 int len, len1, wantbyte;
501 u_short totlen;
502
503 totlen = wantbyte = 0;
504
505 for (; m != NULL; m = m->m_next) {
506 data = mtod(m, u_short *);
507 len = m->m_len;
508 if (len > 0) {
509 totlen += len;
510
511 /* Finish the last word. */
512 if (wantbyte) {
513 savebyte[1] = *((u_char *)data);
514 *addr = *((u_short *)savebyte);
515 ((u_char *)data)++;
516 len--;
517 wantbyte = 0;
518 }
519 /* Output contiguous words. */
520 if (len > 1) {
521 len1 = len/2;
522 word_copy_to_card(data, addr, len1);
523 data += len1;
524 len &= 1;
525 }
526 /* Save last byte, if necessary. */
527 if (len == 1) {
528 savebyte[0] = *((u_char *)data);
529 wantbyte = 1;
530 }
531 }
532 }
533
534 if (wantbyte) {
535 savebyte[1] = 0;
536 *addr = *((u_short *)savebyte);
537 }
538
539 if(totlen < (ETHER_MIN_LEN - ETHER_CRC_LEN)) {
540 /*
541 * Fill the rest of the packet with zeros.
542 * N.B.: This is required! Otherwise MB86950 fails.
543 */
544 for(len = totlen + 1; len < (ETHER_MIN_LEN - ETHER_CRC_LEN);
545 len += 2)
546 *addr = (u_short)0x0000;
547 totlen = (ETHER_MIN_LEN - ETHER_CRC_LEN);
548 }
549
550 return (totlen);
551 }
552
553 /*
554 * Copy packet from board RAM.
555 *
556 * Trailers not supported.
557 *
558 */
559 static void
560 qn_get_packet(sc, len)
561 struct qn_softc *sc;
562 u_short len;
563 {
564 register u_short volatile *nic_fifo_ptr = sc->nic_fifo;
565 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
566 struct ether_header *eh;
567 struct mbuf *m, *dst, *head = NULL;
568 register u_short len1;
569 u_short amount;
570
571 /* Allocate header mbuf. */
572 MGETHDR(m, M_DONTWAIT, MT_DATA);
573 if (m == NULL)
574 goto bad;
575
576 /*
577 * Round len to even value.
578 */
579 if (len & 1)
580 len++;
581
582 m->m_pkthdr.rcvif = &sc->sc_ethercom.ec_if;
583 m->m_pkthdr.len = len;
584 m->m_len = 0;
585 head = m;
586
587 eh = mtod(head, struct ether_header *);
588
589 word_copy_from_card(nic_fifo_ptr,
590 mtod(head, u_short *),
591 sizeof(struct ether_header));
592
593 head->m_len += sizeof(struct ether_header);
594 len -= sizeof(struct ether_header);
595
596 while (len > 0) {
597 len1 = len;
598
599 amount = M_TRAILINGSPACE(m);
600 if (amount == 0) {
601 /* Allocate another mbuf. */
602 dst = m;
603 MGET(m, M_DONTWAIT, MT_DATA);
604 if (m == NULL)
605 goto bad;
606
607 if (len1 >= MINCLSIZE)
608 MCLGET(m, M_DONTWAIT);
609
610 m->m_len = 0;
611 dst->m_next = m;
612
613 amount = M_TRAILINGSPACE(m);
614 }
615
616 if (amount < len1)
617 len1 = amount;
618
619 word_copy_from_card(nic_fifo_ptr,
620 (u_short *)(mtod(m, caddr_t) + m->m_len),
621 len1);
622 m->m_len += len1;
623 len -= len1;
624 }
625
626 #if NBPFILTER > 0
627 if (sc->sc_bpf) {
628 bpf_mtap(sc->sc_bpf, head);
629
630 /*
631 * The interface cannot be in promiscuous mode if there are
632 * no BPF listeners. And in prom. mode we have to check
633 * if the packet is really ours...
634 */
635 if ((ifp->if_flags & IFF_PROMISC) &&
636 (eh->ether_dhost[0] & 1) == 0 && /* not bcast or mcast */
637 bcmp(eh->ether_dhost,
638 LLADDR(ifp->if_sadl),
639 ETHER_ADDR_LEN) != 0) {
640 m_freem(head);
641 return;
642 }
643 }
644 #endif
645
646 m_adj(head, sizeof(struct ether_header));
647 ether_input(ifp, eh, head);
648 return;
649
650 bad:
651 if (head) {
652 m_freem(head);
653 log(LOG_INFO, "qn_get_packet: mbuf alloc failed\n");
654 }
655 }
656
657 /*
658 * Ethernet interface receiver interrupt.
659 */
660 static void
661 qn_rint(sc, rstat)
662 struct qn_softc *sc;
663 u_short rstat;
664 {
665 int i;
666 u_short len, status;
667
668 /* Clear the status register. */
669 *sc->nic_r_status = CLEAR_R_ERR;
670
671 /*
672 * Was there some error?
673 * Some of them are senseless because they are masked off.
674 * XXX
675 */
676 if (rstat & R_INT_OVR_FLO) {
677 #ifdef QN_DEBUG
678 log(LOG_INFO, "Overflow\n");
679 #endif
680 ++sc->sc_ethercom.ec_if.if_ierrors;
681 }
682 if (rstat & R_INT_CRC_ERR) {
683 #ifdef QN_DEBUG
684 log(LOG_INFO, "CRC Error\n");
685 #endif
686 ++sc->sc_ethercom.ec_if.if_ierrors;
687 }
688 if (rstat & R_INT_ALG_ERR) {
689 #ifdef QN_DEBUG
690 log(LOG_INFO, "Alignment error\n");
691 #endif
692 ++sc->sc_ethercom.ec_if.if_ierrors;
693 }
694 if (rstat & R_INT_SRT_PKT) {
695 /* Short packet (these may occur and are
696 * no reason to worry about - or maybe
697 * they are?).
698 */
699 #ifdef QN_DEBUG
700 log(LOG_INFO, "Short packet\n");
701 #endif
702 ++sc->sc_ethercom.ec_if.if_ierrors;
703 }
704 if (rstat & 0x4040) {
705 #ifdef QN_DEBUG
706 log(LOG_INFO, "Bus read error\n");
707 #endif
708 ++sc->sc_ethercom.ec_if.if_ierrors;
709 qnreset(sc);
710 }
711
712 /*
713 * Read at most MAX_PACKETS packets per interrupt
714 */
715 for (i = 0; i < MAX_PACKETS; i++) {
716 if (*sc->nic_r_mode & RM_BUF_EMP)
717 /* Buffer empty. */
718 break;
719
720 /*
721 * Read the first word: upper byte contains useful
722 * information.
723 */
724 status = *sc->nic_fifo;
725 if ((status & 0x7000) != 0x2000) {
726 log(LOG_INFO, "qn: ERROR: status=%04x\n", status);
727 continue;
728 }
729
730 /*
731 * Read packet length (byte-swapped).
732 * CRC is stripped off by the NIC.
733 */
734 len = *sc->nic_fifo;
735 len = ((len << 8) & 0xff00) | ((len >> 8) & 0x00ff);
736
737 #ifdef QN_CHECKS
738 if (len > (ETHER_MAX_LEN - ETHER_CRC_LEN) ||
739 len < ETHER_HDR_LEN) {
740 log(LOG_WARNING,
741 "%s: received a %s packet? (%u bytes)\n",
742 sc->sc_dev.dv_xname,
743 len < ETHER_HDR_LEN ? "partial" : "big", len);
744 ++sc->sc_ethercom.ec_if.if_ierrors;
745 continue;
746 }
747 #endif
748 #ifdef QN_CHECKS
749 if (len < (ETHER_MIN_LEN - ETHER_CRC_LEN))
750 log(LOG_WARNING,
751 "%s: received a short packet? (%u bytes)\n",
752 sc->sc_dev.dv_xname, len);
753 #endif
754
755 /* Read the packet. */
756 qn_get_packet(sc, len);
757
758 ++sc->sc_ethercom.ec_if.if_ipackets;
759 }
760
761 #ifdef QN_DEBUG
762 /* This print just to see whether MAX_PACKETS is large enough. */
763 if (i == MAX_PACKETS)
764 log(LOG_INFO, "used all the %d loops\n", MAX_PACKETS);
765 #endif
766 }
767
768 /*
769 * Our interrupt routine
770 */
771 int
772 qnintr(arg)
773 void *arg;
774 {
775 struct qn_softc *sc = arg;
776 u_short tint, rint, tintmask;
777 char return_tintmask = 0;
778
779 /*
780 * If the driver has not been initialized, just return immediately.
781 * This also happens if there is no QuickNet board present.
782 */
783 if (sc->sc_base == NULL)
784 return (0);
785
786 /* Get interrupt statuses and masks. */
787 rint = (*sc->nic_r_status) & NIC_R_MASK;
788 tintmask = *sc->nic_t_mask;
789 tint = (*sc->nic_t_status) & tintmask;
790 if (tint == 0 && rint == 0)
791 return (0);
792
793 /* Disable interrupts so that we won't miss anything. */
794 *sc->nic_r_mask = CLEAR_R_MASK;
795 *sc->nic_t_mask = CLEAR_T_MASK;
796
797 /*
798 * Handle transmitter interrupts. Some of them are not asked for
799 * but do happen, anyway.
800 */
801
802 if (tint != 0) {
803 /* Clear transmit interrupt status. */
804 *sc->nic_t_status = CLEAR_T_ERR;
805
806 if (sc->transmit_pending && (tint & T_TMT_OK)) {
807 sc->transmit_pending = 0;
808 /*
809 * Update total number of successfully
810 * transmitted packets.
811 */
812 sc->sc_ethercom.ec_if.if_opackets++;
813 }
814
815 if (tint & T_SIXTEEN_COL) {
816 /*
817 * 16 collision (i.e., packet lost).
818 */
819 log(LOG_INFO, "qn: 16 collision - packet lost\n");
820 #ifdef QN_DEBUG1
821 qn_dump(sc);
822 #endif
823 sc->sc_ethercom.ec_if.if_oerrors++;
824 sc->sc_ethercom.ec_if.if_collisions += 16;
825 sc->transmit_pending = 0;
826 }
827
828 if (sc->transmit_pending) {
829 log(LOG_INFO, "qn:still pending...\n");
830
831 /* Must return transmission interrupt mask. */
832 return_tintmask = 1;
833 } else {
834 sc->sc_ethercom.ec_if.if_flags &= ~IFF_OACTIVE;
835
836 /* Clear watchdog timer. */
837 sc->sc_ethercom.ec_if.if_timer = 0;
838 }
839 } else
840 return_tintmask = 1;
841
842 /*
843 * Handle receiver interrupts.
844 */
845 if (rint != 0)
846 qn_rint(sc, rint);
847
848 if ((sc->sc_ethercom.ec_if.if_flags & IFF_OACTIVE) == 0)
849 qnstart(&sc->sc_ethercom.ec_if);
850 else if (return_tintmask == 1)
851 *sc->nic_t_mask = tintmask;
852
853 /* Set receive interrupt mask back. */
854 *sc->nic_r_mask = NIC_R_MASK;
855
856 return (1);
857 }
858
859 /*
860 * Process an ioctl request. This code needs some work - it looks pretty ugly.
861 * I somehow think that this is quite a common excuse... ;-)
862 */
863 int
864 qnioctl(ifp, command, data)
865 register struct ifnet *ifp;
866 u_long command;
867 caddr_t data;
868 {
869 struct qn_softc *sc = ifp->if_softc;
870 register struct ifaddr *ifa = (struct ifaddr *)data;
871 #if 0
872 struct ifreg *ifr = (struct ifreg *)data;
873 #endif
874 int s, error = 0;
875
876 s = splnet();
877
878 switch (command) {
879
880 case SIOCSIFADDR:
881 ifp->if_flags |= IFF_UP;
882
883 switch (ifa->ifa_addr->sa_family) {
884 #ifdef INET
885 case AF_INET:
886 qnstop(sc);
887 qninit(sc);
888 arp_ifinit(ifp, ifa);
889 break;
890 #endif
891 #ifdef NS
892 case AF_NS:
893 {
894 register struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr);
895
896 if (ns_nullhost(*ina))
897 ina->x_host =
898 *(union ns_host *)LLADDR(ifp->if_sadl);
899 else
900 bcopy(ina->x_host.c_host,
901 LLADDR(ifp->if_sadl), ETHER_ADDR_LEN);
902 qnstop(sc);
903 qninit(sc);
904 break;
905 }
906 #endif
907 default:
908 log(LOG_INFO, "qn:sa_family:default (not tested)\n");
909 qnstop(sc);
910 qninit(sc);
911 break;
912 }
913 break;
914
915 case SIOCSIFFLAGS:
916 if ((ifp->if_flags & IFF_UP) == 0 &&
917 (ifp->if_flags & IFF_RUNNING) != 0) {
918 /*
919 * If interface is marked down and it is running, then
920 * stop it.
921 */
922 #ifdef QN_DEBUG1
923 qn_dump(sc);
924 #endif
925 qnstop(sc);
926 ifp->if_flags &= ~IFF_RUNNING;
927 } else if ((ifp->if_flags & IFF_UP) != 0 &&
928 (ifp->if_flags & IFF_RUNNING) == 0) {
929 /*
930 * If interface is marked up and it is stopped, then
931 * start it.
932 */
933 qninit(sc);
934 } else {
935 /*
936 * Something else... we won't do anything so we won't
937 * break anything (hope so).
938 */
939 #ifdef QN_DEBUG1
940 log(LOG_INFO, "Else branch...\n");
941 #endif
942 }
943 break;
944
945 case SIOCADDMULTI:
946 case SIOCDELMULTI:
947 log(LOG_INFO, "qnioctl: multicast not done yet\n");
948 #if 0
949 error = (command == SIOCADDMULTI) ?
950 ether_addmulti(ifr, &sc->sc_ethercom) :
951 ether_delmulti(ifr, &sc->sc_ethercom);
952
953 if (error == ENETRESET) {
954 /*
955 * Multicast list has changed; set the hardware filter
956 * accordingly.
957 */
958 log(LOG_INFO, "qnioctl: multicast not done yet\n");
959 error = 0;
960 }
961 #else
962 error = EINVAL;
963 #endif
964 break;
965
966 default:
967 log(LOG_INFO, "qnioctl: default\n");
968 error = EINVAL;
969 }
970
971 splx(s);
972 return (error);
973 }
974
975 /*
976 * Dump some register information.
977 */
978 #ifdef QN_DEBUG1
979 static void
980 qn_dump(sc)
981 struct qn_softc *sc;
982 {
983
984 log(LOG_INFO, "t_status : %04x\n", *sc->nic_t_status);
985 log(LOG_INFO, "t_mask : %04x\n", *sc->nic_t_mask);
986 log(LOG_INFO, "t_mode : %04x\n", *sc->nic_t_mode);
987 log(LOG_INFO, "r_status : %04x\n", *sc->nic_r_status);
988 log(LOG_INFO, "r_mask : %04x\n", *sc->nic_r_mask);
989 log(LOG_INFO, "r_mode : %04x\n", *sc->nic_r_mode);
990 log(LOG_INFO, "pending : %02x\n", sc->transmit_pending);
991 log(LOG_INFO, "if_flags : %04x\n", sc->sc_ethercom.ec_if.if_flags);
992 }
993 #endif
994
995 #endif /* NQN > 0 */
996