if_qe.c revision 1.50 1 /* $NetBSD: if_qe.c,v 1.50 2002/05/22 16:03:17 wiz Exp $ */
2 /*
3 * Copyright (c) 1999 Ludd, University of Lule}, Sweden. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed at Ludd, University of
16 * Lule}, Sweden and its contributors.
17 * 4. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*
33 * Driver for DEQNA/DELQA ethernet cards.
34 * Things that is still to do:
35 * Handle ubaresets. Does not work at all right now.
36 * Fix ALLMULTI reception. But someone must tell me how...
37 * Collect statistics.
38 */
39
40 #include <sys/cdefs.h>
41 __KERNEL_RCSID(0, "$NetBSD: if_qe.c,v 1.50 2002/05/22 16:03:17 wiz Exp $");
42
43 #include "opt_inet.h"
44 #include "bpfilter.h"
45
46 #include <sys/param.h>
47 #include <sys/mbuf.h>
48 #include <sys/socket.h>
49 #include <sys/device.h>
50 #include <sys/systm.h>
51 #include <sys/sockio.h>
52
53 #include <net/if.h>
54 #include <net/if_ether.h>
55 #include <net/if_dl.h>
56
57 #include <netinet/in.h>
58 #include <netinet/if_inarp.h>
59
60 #if NBPFILTER > 0
61 #include <net/bpf.h>
62 #include <net/bpfdesc.h>
63 #endif
64
65 #include <machine/bus.h>
66
67 #include <dev/qbus/ubavar.h>
68 #include <dev/qbus/if_qereg.h>
69
70 #include "ioconf.h"
71
72 #define RXDESCS 30 /* # of receive descriptors */
73 #define TXDESCS 60 /* # transmit descs */
74
75 /*
76 * Structure containing the elements that must be in DMA-safe memory.
77 */
78 struct qe_cdata {
79 struct qe_ring qc_recv[RXDESCS+1]; /* Receive descriptors */
80 struct qe_ring qc_xmit[TXDESCS+1]; /* Transmit descriptors */
81 u_int8_t qc_setup[128]; /* Setup packet layout */
82 };
83
84 struct qe_softc {
85 struct device sc_dev; /* Configuration common part */
86 struct evcnt sc_intrcnt; /* Interrupt counting */
87 struct ethercom sc_ec; /* Ethernet common part */
88 #define sc_if sc_ec.ec_if /* network-visible interface */
89 bus_space_tag_t sc_iot;
90 bus_addr_t sc_ioh;
91 bus_dma_tag_t sc_dmat;
92 struct qe_cdata *sc_qedata; /* Descriptor struct */
93 struct qe_cdata *sc_pqedata; /* Unibus address of above */
94 struct mbuf* sc_txmbuf[TXDESCS];
95 struct mbuf* sc_rxmbuf[RXDESCS];
96 bus_dmamap_t sc_xmtmap[TXDESCS];
97 bus_dmamap_t sc_rcvmap[RXDESCS];
98 struct ubinfo sc_ui;
99 int sc_intvec; /* Interrupt vector */
100 int sc_nexttx;
101 int sc_inq;
102 int sc_lastack;
103 int sc_nextrx;
104 int sc_setup; /* Setup packet in queue */
105 };
106
107 static int qematch(struct device *, struct cfdata *, void *);
108 static void qeattach(struct device *, struct device *, void *);
109 static void qeinit(struct qe_softc *);
110 static void qestart(struct ifnet *);
111 static void qeintr(void *);
112 static int qeioctl(struct ifnet *, u_long, caddr_t);
113 static int qe_add_rxbuf(struct qe_softc *, int);
114 static void qe_setup(struct qe_softc *);
115 static void qetimeout(struct ifnet *);
116
117 struct cfattach qe_ca = {
118 sizeof(struct qe_softc), qematch, qeattach
119 };
120
121 #define QE_WCSR(csr, val) \
122 bus_space_write_2(sc->sc_iot, sc->sc_ioh, csr, val)
123 #define QE_RCSR(csr) \
124 bus_space_read_2(sc->sc_iot, sc->sc_ioh, csr)
125
126 #define LOWORD(x) ((int)(x) & 0xffff)
127 #define HIWORD(x) (((int)(x) >> 16) & 0x3f)
128
129 /*
130 * Check for present DEQNA. Done by sending a fake setup packet
131 * and wait for interrupt.
132 */
133 int
134 qematch(struct device *parent, struct cfdata *cf, void *aux)
135 {
136 struct qe_softc ssc;
137 struct qe_softc *sc = &ssc;
138 struct uba_attach_args *ua = aux;
139 struct uba_softc *ubasc = (struct uba_softc *)parent;
140 struct ubinfo ui;
141
142 #define PROBESIZE (sizeof(struct qe_ring) * 4 + 128)
143 struct qe_ring ring[15]; /* For diag purposes only */
144 struct qe_ring *rp;
145 int error;
146
147 bzero(sc, sizeof(struct qe_softc));
148 bzero(ring, PROBESIZE);
149 sc->sc_iot = ua->ua_iot;
150 sc->sc_ioh = ua->ua_ioh;
151 sc->sc_dmat = ua->ua_dmat;
152
153 ubasc->uh_lastiv -= 4;
154 QE_WCSR(QE_CSR_CSR, QE_RESET);
155 QE_WCSR(QE_CSR_VECTOR, ubasc->uh_lastiv);
156
157 /*
158 * Map the ring area. Actually this is done only to be able to
159 * send and receive a internal packet; some junk is loopbacked
160 * so that the DEQNA has a reason to interrupt.
161 */
162 ui.ui_size = PROBESIZE;
163 ui.ui_vaddr = (caddr_t)&ring[0];
164 if ((error = uballoc((void *)parent, &ui, UBA_CANTWAIT)))
165 return 0;
166
167 /*
168 * Init a simple "fake" receive and transmit descriptor that
169 * points to some unused area. Send a fake setup packet.
170 */
171 rp = (void *)ui.ui_baddr;
172 ring[0].qe_flag = ring[0].qe_status1 = QE_NOTYET;
173 ring[0].qe_addr_lo = LOWORD(&rp[4]);
174 ring[0].qe_addr_hi = HIWORD(&rp[4]) | QE_VALID | QE_EOMSG | QE_SETUP;
175 ring[0].qe_buf_len = 128;
176
177 ring[2].qe_flag = ring[2].qe_status1 = QE_NOTYET;
178 ring[2].qe_addr_lo = LOWORD(&rp[4]);
179 ring[2].qe_addr_hi = HIWORD(&rp[4]) | QE_VALID;
180 ring[2].qe_buf_len = 128;
181
182 QE_WCSR(QE_CSR_CSR, QE_RCSR(QE_CSR_CSR) & ~QE_RESET);
183 DELAY(1000);
184
185 /*
186 * Start the interface and wait for the packet.
187 */
188 QE_WCSR(QE_CSR_CSR, QE_INT_ENABLE|QE_XMIT_INT|QE_RCV_INT);
189 QE_WCSR(QE_CSR_RCLL, LOWORD(&rp[2]));
190 QE_WCSR(QE_CSR_RCLH, HIWORD(&rp[2]));
191 QE_WCSR(QE_CSR_XMTL, LOWORD(rp));
192 QE_WCSR(QE_CSR_XMTH, HIWORD(rp));
193 DELAY(10000);
194
195 /*
196 * All done with the bus resources.
197 */
198 ubfree((void *)parent, &ui);
199 return 1;
200 }
201
202 /*
203 * Interface exists: make available by filling in network interface
204 * record. System will initialize the interface when it is ready
205 * to accept packets.
206 */
207 void
208 qeattach(struct device *parent, struct device *self, void *aux)
209 {
210 struct uba_attach_args *ua = aux;
211 struct uba_softc *ubasc = (struct uba_softc *)parent;
212 struct qe_softc *sc = (struct qe_softc *)self;
213 struct ifnet *ifp = (struct ifnet *)&sc->sc_if;
214 struct qe_ring *rp;
215 u_int8_t enaddr[ETHER_ADDR_LEN];
216 int i, error;
217
218 sc->sc_iot = ua->ua_iot;
219 sc->sc_ioh = ua->ua_ioh;
220 sc->sc_dmat = ua->ua_dmat;
221
222 /*
223 * Allocate DMA safe memory for descriptors and setup memory.
224 */
225
226 sc->sc_ui.ui_size = sizeof(struct qe_cdata);
227 if ((error = ubmemalloc((struct uba_softc *)parent, &sc->sc_ui, 0))) {
228 printf(": unable to ubmemalloc(), error = %d\n", error);
229 return;
230 }
231 sc->sc_pqedata = (struct qe_cdata *)sc->sc_ui.ui_baddr;
232 sc->sc_qedata = (struct qe_cdata *)sc->sc_ui.ui_vaddr;
233
234 /*
235 * Zero the newly allocated memory.
236 */
237 bzero(sc->sc_qedata, sizeof(struct qe_cdata));
238 /*
239 * Create the transmit descriptor DMA maps. We take advantage
240 * of the fact that the Qbus address space is big, and therefore
241 * allocate map registers for all transmit descriptors also,
242 * so that we can avoid this each time we send a packet.
243 */
244 for (i = 0; i < TXDESCS; i++) {
245 if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES,
246 1, MCLBYTES, 0, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW,
247 &sc->sc_xmtmap[i]))) {
248 printf(": unable to create tx DMA map %d, error = %d\n",
249 i, error);
250 goto fail_4;
251 }
252 }
253
254 /*
255 * Create receive buffer DMA maps.
256 */
257 for (i = 0; i < RXDESCS; i++) {
258 if ((error = bus_dmamap_create(sc->sc_dmat, MCLBYTES, 1,
259 MCLBYTES, 0, BUS_DMA_NOWAIT,
260 &sc->sc_rcvmap[i]))) {
261 printf(": unable to create rx DMA map %d, error = %d\n",
262 i, error);
263 goto fail_5;
264 }
265 }
266 /*
267 * Pre-allocate the receive buffers.
268 */
269 for (i = 0; i < RXDESCS; i++) {
270 if ((error = qe_add_rxbuf(sc, i)) != 0) {
271 printf(": unable to allocate or map rx buffer %d\n,"
272 " error = %d\n", i, error);
273 goto fail_6;
274 }
275 }
276
277 /*
278 * Create ring loops of the buffer chains.
279 * This is only done once.
280 */
281
282 rp = sc->sc_qedata->qc_recv;
283 rp[RXDESCS].qe_addr_lo = LOWORD(&sc->sc_pqedata->qc_recv[0]);
284 rp[RXDESCS].qe_addr_hi = HIWORD(&sc->sc_pqedata->qc_recv[0]) |
285 QE_VALID | QE_CHAIN;
286 rp[RXDESCS].qe_flag = rp[RXDESCS].qe_status1 = QE_NOTYET;
287
288 rp = sc->sc_qedata->qc_xmit;
289 rp[TXDESCS].qe_addr_lo = LOWORD(&sc->sc_pqedata->qc_xmit[0]);
290 rp[TXDESCS].qe_addr_hi = HIWORD(&sc->sc_pqedata->qc_xmit[0]) |
291 QE_VALID | QE_CHAIN;
292 rp[TXDESCS].qe_flag = rp[TXDESCS].qe_status1 = QE_NOTYET;
293
294 /*
295 * Get the vector that were set at match time, and remember it.
296 */
297 sc->sc_intvec = ubasc->uh_lastiv;
298 QE_WCSR(QE_CSR_CSR, QE_RESET);
299 DELAY(1000);
300 QE_WCSR(QE_CSR_CSR, QE_RCSR(QE_CSR_CSR) & ~QE_RESET);
301
302 /*
303 * Read out ethernet address and tell which type this card is.
304 */
305 for (i = 0; i < 6; i++)
306 enaddr[i] = QE_RCSR(i * 2) & 0xff;
307
308 QE_WCSR(QE_CSR_VECTOR, sc->sc_intvec | 1);
309 printf("\n%s: %s, hardware address %s\n", sc->sc_dev.dv_xname,
310 QE_RCSR(QE_CSR_VECTOR) & 1 ? "delqa":"deqna",
311 ether_sprintf(enaddr));
312
313 QE_WCSR(QE_CSR_VECTOR, QE_RCSR(QE_CSR_VECTOR) & ~1); /* ??? */
314
315 uba_intr_establish(ua->ua_icookie, ua->ua_cvec, qeintr,
316 sc, &sc->sc_intrcnt);
317 evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, ua->ua_evcnt,
318 sc->sc_dev.dv_xname, "intr");
319
320 strcpy(ifp->if_xname, sc->sc_dev.dv_xname);
321 ifp->if_softc = sc;
322 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
323 ifp->if_start = qestart;
324 ifp->if_ioctl = qeioctl;
325 ifp->if_watchdog = qetimeout;
326 IFQ_SET_READY(&ifp->if_snd);
327
328 /*
329 * Attach the interface.
330 */
331 if_attach(ifp);
332 ether_ifattach(ifp, enaddr);
333
334 return;
335
336 /*
337 * Free any resources we've allocated during the failed attach
338 * attempt. Do this in reverse order and fall through.
339 */
340 fail_6:
341 for (i = 0; i < RXDESCS; i++) {
342 if (sc->sc_rxmbuf[i] != NULL) {
343 bus_dmamap_unload(sc->sc_dmat, sc->sc_xmtmap[i]);
344 m_freem(sc->sc_rxmbuf[i]);
345 }
346 }
347 fail_5:
348 for (i = 0; i < RXDESCS; i++) {
349 if (sc->sc_xmtmap[i] != NULL)
350 bus_dmamap_destroy(sc->sc_dmat, sc->sc_xmtmap[i]);
351 }
352 fail_4:
353 for (i = 0; i < TXDESCS; i++) {
354 if (sc->sc_rcvmap[i] != NULL)
355 bus_dmamap_destroy(sc->sc_dmat, sc->sc_rcvmap[i]);
356 }
357 }
358
359 /*
360 * Initialization of interface.
361 */
362 void
363 qeinit(struct qe_softc *sc)
364 {
365 struct ifnet *ifp = (struct ifnet *)&sc->sc_if;
366 struct qe_cdata *qc = sc->sc_qedata;
367 int i;
368
369
370 /*
371 * Reset the interface.
372 */
373 QE_WCSR(QE_CSR_CSR, QE_RESET);
374 DELAY(1000);
375 QE_WCSR(QE_CSR_CSR, QE_RCSR(QE_CSR_CSR) & ~QE_RESET);
376 QE_WCSR(QE_CSR_VECTOR, sc->sc_intvec);
377
378 sc->sc_nexttx = sc->sc_inq = sc->sc_lastack = 0;
379 /*
380 * Release and init transmit descriptors.
381 */
382 for (i = 0; i < TXDESCS; i++) {
383 if (sc->sc_txmbuf[i]) {
384 bus_dmamap_unload(sc->sc_dmat, sc->sc_xmtmap[i]);
385 m_freem(sc->sc_txmbuf[i]);
386 sc->sc_txmbuf[i] = 0;
387 }
388 qc->qc_xmit[i].qe_addr_hi = 0; /* Clear valid bit */
389 qc->qc_xmit[i].qe_status1 = qc->qc_xmit[i].qe_flag = QE_NOTYET;
390 }
391
392
393 /*
394 * Init receive descriptors.
395 */
396 for (i = 0; i < RXDESCS; i++)
397 qc->qc_recv[i].qe_status1 = qc->qc_recv[i].qe_flag = QE_NOTYET;
398 sc->sc_nextrx = 0;
399
400 /*
401 * Write the descriptor addresses to the device.
402 * Receiving packets will be enabled in the interrupt routine.
403 */
404 QE_WCSR(QE_CSR_CSR, QE_INT_ENABLE|QE_XMIT_INT|QE_RCV_INT);
405 QE_WCSR(QE_CSR_RCLL, LOWORD(sc->sc_pqedata->qc_recv));
406 QE_WCSR(QE_CSR_RCLH, HIWORD(sc->sc_pqedata->qc_recv));
407
408 ifp->if_flags |= IFF_RUNNING;
409 ifp->if_flags &= ~IFF_OACTIVE;
410
411 /*
412 * Send a setup frame.
413 * This will start the transmit machinery as well.
414 */
415 qe_setup(sc);
416
417 }
418
419 /*
420 * Start output on interface.
421 */
422 void
423 qestart(struct ifnet *ifp)
424 {
425 struct qe_softc *sc = ifp->if_softc;
426 struct qe_cdata *qc = sc->sc_qedata;
427 paddr_t buffer;
428 struct mbuf *m, *m0;
429 int idx, len, s, i, totlen, error;
430 short orword, csr;
431
432 if ((QE_RCSR(QE_CSR_CSR) & QE_RCV_ENABLE) == 0)
433 return;
434
435 s = splnet();
436 while (sc->sc_inq < (TXDESCS - 1)) {
437
438 if (sc->sc_setup) {
439 qe_setup(sc);
440 continue;
441 }
442 idx = sc->sc_nexttx;
443 IFQ_POLL(&ifp->if_snd, m);
444 if (m == 0)
445 goto out;
446 /*
447 * Count number of mbufs in chain.
448 * Always do DMA directly from mbufs, therefore the transmit
449 * ring is really big.
450 */
451 for (m0 = m, i = 0; m0; m0 = m0->m_next)
452 if (m0->m_len)
453 i++;
454 if (i >= TXDESCS)
455 panic("qestart");
456
457 if ((i + sc->sc_inq) >= (TXDESCS - 1)) {
458 ifp->if_flags |= IFF_OACTIVE;
459 goto out;
460 }
461
462 IFQ_DEQUEUE(&ifp->if_snd, m);
463
464 #if NBPFILTER > 0
465 if (ifp->if_bpf)
466 bpf_mtap(ifp->if_bpf, m);
467 #endif
468 /*
469 * m now points to a mbuf chain that can be loaded.
470 * Loop around and set it.
471 */
472 totlen = 0;
473 for (m0 = m; m0; m0 = m0->m_next) {
474 error = bus_dmamap_load(sc->sc_dmat, sc->sc_xmtmap[idx],
475 mtod(m0, void *), m0->m_len, 0, 0);
476 buffer = sc->sc_xmtmap[idx]->dm_segs[0].ds_addr;
477 len = m0->m_len;
478 if (len == 0)
479 continue;
480
481 totlen += len;
482 /* Word alignment calc */
483 orword = 0;
484 if (totlen == m->m_pkthdr.len) {
485 if (totlen < ETHER_MIN_LEN)
486 len += (ETHER_MIN_LEN - totlen);
487 orword |= QE_EOMSG;
488 sc->sc_txmbuf[idx] = m;
489 }
490 if ((buffer & 1) || (len & 1))
491 len += 2;
492 if (buffer & 1)
493 orword |= QE_ODDBEGIN;
494 if ((buffer + len) & 1)
495 orword |= QE_ODDEND;
496 qc->qc_xmit[idx].qe_buf_len = -(len/2);
497 qc->qc_xmit[idx].qe_addr_lo = LOWORD(buffer);
498 qc->qc_xmit[idx].qe_addr_hi = HIWORD(buffer);
499 qc->qc_xmit[idx].qe_flag =
500 qc->qc_xmit[idx].qe_status1 = QE_NOTYET;
501 qc->qc_xmit[idx].qe_addr_hi |= (QE_VALID | orword);
502 if (++idx == TXDESCS)
503 idx = 0;
504 sc->sc_inq++;
505 }
506 #ifdef DIAGNOSTIC
507 if (totlen != m->m_pkthdr.len)
508 panic("qestart: len fault");
509 #endif
510
511 /*
512 * Kick off the transmit logic, if it is stopped.
513 */
514 csr = QE_RCSR(QE_CSR_CSR);
515 if (csr & QE_XL_INVALID) {
516 QE_WCSR(QE_CSR_XMTL,
517 LOWORD(&sc->sc_pqedata->qc_xmit[sc->sc_nexttx]));
518 QE_WCSR(QE_CSR_XMTH,
519 HIWORD(&sc->sc_pqedata->qc_xmit[sc->sc_nexttx]));
520 }
521 sc->sc_nexttx = idx;
522 }
523 if (sc->sc_inq == (TXDESCS - 1))
524 ifp->if_flags |= IFF_OACTIVE;
525
526 out: if (sc->sc_inq)
527 ifp->if_timer = 5; /* If transmit logic dies */
528 splx(s);
529 }
530
531 static void
532 qeintr(void *arg)
533 {
534 struct qe_softc *sc = arg;
535 struct qe_cdata *qc = sc->sc_qedata;
536 struct ifnet *ifp = &sc->sc_if;
537 struct mbuf *m;
538 int csr, status1, status2, len;
539
540 csr = QE_RCSR(QE_CSR_CSR);
541
542 QE_WCSR(QE_CSR_CSR, QE_RCV_ENABLE | QE_INT_ENABLE | QE_XMIT_INT |
543 QE_RCV_INT | QE_ILOOP);
544
545 if (csr & QE_RCV_INT)
546 while (qc->qc_recv[sc->sc_nextrx].qe_status1 != QE_NOTYET) {
547 status1 = qc->qc_recv[sc->sc_nextrx].qe_status1;
548 status2 = qc->qc_recv[sc->sc_nextrx].qe_status2;
549
550 m = sc->sc_rxmbuf[sc->sc_nextrx];
551 len = ((status1 & QE_RBL_HI) |
552 (status2 & QE_RBL_LO)) + 60;
553 qe_add_rxbuf(sc, sc->sc_nextrx);
554 m->m_pkthdr.rcvif = ifp;
555 m->m_pkthdr.len = m->m_len = len;
556 if (++sc->sc_nextrx == RXDESCS)
557 sc->sc_nextrx = 0;
558 #if NBPFILTER > 0
559 if (ifp->if_bpf)
560 bpf_mtap(ifp->if_bpf, m);
561 #endif
562 if ((status1 & QE_ESETUP) == 0)
563 (*ifp->if_input)(ifp, m);
564 else
565 m_freem(m);
566 }
567
568 if (csr & (QE_XMIT_INT|QE_XL_INVALID)) {
569 while (qc->qc_xmit[sc->sc_lastack].qe_status1 != QE_NOTYET) {
570 int idx = sc->sc_lastack;
571
572 sc->sc_inq--;
573 if (++sc->sc_lastack == TXDESCS)
574 sc->sc_lastack = 0;
575
576 /* XXX collect statistics */
577 qc->qc_xmit[idx].qe_addr_hi &= ~QE_VALID;
578 qc->qc_xmit[idx].qe_status1 =
579 qc->qc_xmit[idx].qe_flag = QE_NOTYET;
580
581 if (qc->qc_xmit[idx].qe_addr_hi & QE_SETUP)
582 continue;
583 bus_dmamap_unload(sc->sc_dmat, sc->sc_xmtmap[idx]);
584 if (sc->sc_txmbuf[idx]) {
585 m_freem(sc->sc_txmbuf[idx]);
586 sc->sc_txmbuf[idx] = 0;
587 }
588 }
589 ifp->if_timer = 0;
590 ifp->if_flags &= ~IFF_OACTIVE;
591 qestart(ifp); /* Put in more in queue */
592 }
593 /*
594 * How can the receive list get invalid???
595 * Verified that it happens anyway.
596 */
597 if ((qc->qc_recv[sc->sc_nextrx].qe_status1 == QE_NOTYET) &&
598 (QE_RCSR(QE_CSR_CSR) & QE_RL_INVALID)) {
599 QE_WCSR(QE_CSR_RCLL,
600 LOWORD(&sc->sc_pqedata->qc_recv[sc->sc_nextrx]));
601 QE_WCSR(QE_CSR_RCLH,
602 HIWORD(&sc->sc_pqedata->qc_recv[sc->sc_nextrx]));
603 }
604 }
605
606 /*
607 * Process an ioctl request.
608 */
609 int
610 qeioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
611 {
612 struct qe_softc *sc = ifp->if_softc;
613 struct ifreq *ifr = (struct ifreq *)data;
614 struct ifaddr *ifa = (struct ifaddr *)data;
615 int s = splnet(), error = 0;
616
617 switch (cmd) {
618
619 case SIOCSIFADDR:
620 ifp->if_flags |= IFF_UP;
621 switch(ifa->ifa_addr->sa_family) {
622 #ifdef INET
623 case AF_INET:
624 qeinit(sc);
625 arp_ifinit(ifp, ifa);
626 break;
627 #endif
628 }
629 break;
630
631 case SIOCSIFFLAGS:
632 if ((ifp->if_flags & IFF_UP) == 0 &&
633 (ifp->if_flags & IFF_RUNNING) != 0) {
634 /*
635 * If interface is marked down and it is running,
636 * stop it. (by disabling receive mechanism).
637 */
638 QE_WCSR(QE_CSR_CSR,
639 QE_RCSR(QE_CSR_CSR) & ~QE_RCV_ENABLE);
640 ifp->if_flags &= ~IFF_RUNNING;
641 } else if ((ifp->if_flags & IFF_UP) != 0 &&
642 (ifp->if_flags & IFF_RUNNING) == 0) {
643 /*
644 * If interface it marked up and it is stopped, then
645 * start it.
646 */
647 qeinit(sc);
648 } else if ((ifp->if_flags & IFF_UP) != 0) {
649 /*
650 * Send a new setup packet to match any new changes.
651 * (Like IFF_PROMISC etc)
652 */
653 qe_setup(sc);
654 }
655 break;
656
657 case SIOCADDMULTI:
658 case SIOCDELMULTI:
659 /*
660 * Update our multicast list.
661 */
662 error = (cmd == SIOCADDMULTI) ?
663 ether_addmulti(ifr, &sc->sc_ec):
664 ether_delmulti(ifr, &sc->sc_ec);
665
666 if (error == ENETRESET) {
667 /*
668 * Multicast list has changed; set the hardware filter
669 * accordingly.
670 */
671 qe_setup(sc);
672 error = 0;
673 }
674 break;
675
676 default:
677 error = EINVAL;
678
679 }
680 splx(s);
681 return (error);
682 }
683
684 /*
685 * Add a receive buffer to the indicated descriptor.
686 */
687 int
688 qe_add_rxbuf(struct qe_softc *sc, int i)
689 {
690 struct mbuf *m;
691 struct qe_ring *rp;
692 vaddr_t addr;
693 int error;
694
695 MGETHDR(m, M_DONTWAIT, MT_DATA);
696 if (m == NULL)
697 return (ENOBUFS);
698
699 MCLGET(m, M_DONTWAIT);
700 if ((m->m_flags & M_EXT) == 0) {
701 m_freem(m);
702 return (ENOBUFS);
703 }
704
705 if (sc->sc_rxmbuf[i] != NULL)
706 bus_dmamap_unload(sc->sc_dmat, sc->sc_rcvmap[i]);
707
708 error = bus_dmamap_load(sc->sc_dmat, sc->sc_rcvmap[i],
709 m->m_ext.ext_buf, m->m_ext.ext_size, NULL, BUS_DMA_NOWAIT);
710 if (error)
711 panic("%s: can't load rx DMA map %d, error = %d\n",
712 sc->sc_dev.dv_xname, i, error);
713 sc->sc_rxmbuf[i] = m;
714
715 bus_dmamap_sync(sc->sc_dmat, sc->sc_rcvmap[i], 0,
716 sc->sc_rcvmap[i]->dm_mapsize, BUS_DMASYNC_PREREAD);
717
718 /*
719 * We know that the mbuf cluster is page aligned. Also, be sure
720 * that the IP header will be longword aligned.
721 */
722 m->m_data += 2;
723 addr = sc->sc_rcvmap[i]->dm_segs[0].ds_addr + 2;
724 rp = &sc->sc_qedata->qc_recv[i];
725 rp->qe_flag = rp->qe_status1 = QE_NOTYET;
726 rp->qe_addr_lo = LOWORD(addr);
727 rp->qe_addr_hi = HIWORD(addr) | QE_VALID;
728 rp->qe_buf_len = -(m->m_ext.ext_size - 2)/2;
729
730 return (0);
731 }
732
733 /*
734 * Create a setup packet and put in queue for sending.
735 */
736 void
737 qe_setup(struct qe_softc *sc)
738 {
739 struct ether_multi *enm;
740 struct ether_multistep step;
741 struct qe_cdata *qc = sc->sc_qedata;
742 struct ifnet *ifp = &sc->sc_if;
743 u_int8_t *enaddr = LLADDR(ifp->if_sadl);
744 int i, j, k, idx, s;
745
746 s = splnet();
747 if (sc->sc_inq == (TXDESCS - 1)) {
748 sc->sc_setup = 1;
749 splx(s);
750 return;
751 }
752 sc->sc_setup = 0;
753 /*
754 * Init the setup packet with valid info.
755 */
756 memset(qc->qc_setup, 0xff, sizeof(qc->qc_setup)); /* Broadcast */
757 for (i = 0; i < ETHER_ADDR_LEN; i++)
758 qc->qc_setup[i * 8 + 1] = enaddr[i]; /* Own address */
759
760 /*
761 * Multicast handling. The DEQNA can handle up to 12 direct
762 * ethernet addresses.
763 */
764 j = 3; k = 0;
765 ifp->if_flags &= ~IFF_ALLMULTI;
766 ETHER_FIRST_MULTI(step, &sc->sc_ec, enm);
767 while (enm != NULL) {
768 if (memcmp(enm->enm_addrlo, enm->enm_addrhi, 6)) {
769 ifp->if_flags |= IFF_ALLMULTI;
770 break;
771 }
772 for (i = 0; i < ETHER_ADDR_LEN; i++)
773 qc->qc_setup[i * 8 + j + k] = enm->enm_addrlo[i];
774 j++;
775 if (j == 8) {
776 j = 1; k += 64;
777 }
778 if (k > 64) {
779 ifp->if_flags |= IFF_ALLMULTI;
780 break;
781 }
782 ETHER_NEXT_MULTI(step, enm);
783 }
784 idx = sc->sc_nexttx;
785 qc->qc_xmit[idx].qe_buf_len = -64;
786
787 /*
788 * How is the DEQNA turned in ALLMULTI mode???
789 * Until someone tells me, fall back to PROMISC when more than
790 * 12 ethernet addresses.
791 */
792 if (ifp->if_flags & IFF_ALLMULTI)
793 ifp->if_flags |= IFF_PROMISC;
794 else if (ifp->if_pcount == 0)
795 ifp->if_flags &= ~IFF_PROMISC;
796 if (ifp->if_flags & IFF_PROMISC)
797 qc->qc_xmit[idx].qe_buf_len = -65;
798
799 qc->qc_xmit[idx].qe_addr_lo = LOWORD(sc->sc_pqedata->qc_setup);
800 qc->qc_xmit[idx].qe_addr_hi =
801 HIWORD(sc->sc_pqedata->qc_setup) | QE_SETUP | QE_EOMSG;
802 qc->qc_xmit[idx].qe_status1 = qc->qc_xmit[idx].qe_flag = QE_NOTYET;
803 qc->qc_xmit[idx].qe_addr_hi |= QE_VALID;
804
805 if (QE_RCSR(QE_CSR_CSR) & QE_XL_INVALID) {
806 QE_WCSR(QE_CSR_XMTL,
807 LOWORD(&sc->sc_pqedata->qc_xmit[idx]));
808 QE_WCSR(QE_CSR_XMTH,
809 HIWORD(&sc->sc_pqedata->qc_xmit[idx]));
810 }
811
812 sc->sc_inq++;
813 if (++sc->sc_nexttx == TXDESCS)
814 sc->sc_nexttx = 0;
815 splx(s);
816 }
817
818 /*
819 * Check for dead transmit logic. Not uncommon.
820 */
821 void
822 qetimeout(struct ifnet *ifp)
823 {
824 struct qe_softc *sc = ifp->if_softc;
825
826 if (sc->sc_inq == 0)
827 return;
828
829 printf("%s: xmit logic died, resetting...\n", sc->sc_dev.dv_xname);
830 /*
831 * Do a reset of interface, to get it going again.
832 * Will it work by just restart the transmit logic?
833 */
834 qeinit(sc);
835 }
836