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