if_le_ledma.c revision 1.22.6.2 1 /* $NetBSD: if_le_ledma.c,v 1.22.6.2 2004/09/18 14:51:16 skrll Exp $ */
2
3 /*-
4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Charles M. Hannum; Jason R. Thorpe of the Numerical Aerospace
9 * Simulation Facility, NASA Ames Research Center; Paul Kranenburg.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the NetBSD
22 * Foundation, Inc. and its contributors.
23 * 4. Neither the name of The NetBSD Foundation nor the names of its
24 * contributors may be used to endorse or promote products derived
25 * from this software without specific prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 * POSSIBILITY OF SUCH DAMAGE.
38 */
39
40 #include <sys/cdefs.h>
41 __KERNEL_RCSID(0, "$NetBSD: if_le_ledma.c,v 1.22.6.2 2004/09/18 14:51:16 skrll Exp $");
42
43 #include "opt_inet.h"
44 #include "bpfilter.h"
45
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/mbuf.h>
49 #include <sys/syslog.h>
50 #include <sys/socket.h>
51 #include <sys/device.h>
52 #include <sys/malloc.h>
53
54 #include <net/if.h>
55 #include <net/if_ether.h>
56 #include <net/if_media.h>
57
58 #ifdef INET
59 #include <netinet/in.h>
60 #include <netinet/if_inarp.h>
61 #endif
62
63 #include <machine/bus.h>
64 #include <machine/intr.h>
65 #include <machine/autoconf.h>
66
67 #include <dev/sbus/sbusvar.h>
68
69 #include <dev/ic/lsi64854reg.h>
70 #include <dev/ic/lsi64854var.h>
71
72 #include <dev/ic/lancereg.h>
73 #include <dev/ic/lancevar.h>
74 #include <dev/ic/am7990reg.h>
75 #include <dev/ic/am7990var.h>
76
77 /*
78 * LANCE registers.
79 */
80 #define LEREG1_RDP 0 /* Register Data port */
81 #define LEREG1_RAP 2 /* Register Address port */
82
83 struct le_softc {
84 struct am7990_softc sc_am7990; /* glue to MI code */
85 struct sbusdev sc_sd; /* sbus device */
86 bus_space_tag_t sc_bustag;
87 bus_dmamap_t sc_dmamap;
88 bus_space_handle_t sc_reg; /* LANCE registers */
89 struct lsi64854_softc *sc_dma; /* pointer to my dma */
90 u_int sc_laddr; /* LANCE DMA address */
91 };
92
93 #define MEMSIZE (16*1024) /* LANCE memory size */
94 #define LEDMA_BOUNDARY (16*1024*1024) /* must not cross 16MB boundary */
95
96 int lematch_ledma __P((struct device *, struct cfdata *, void *));
97 void leattach_ledma __P((struct device *, struct device *, void *));
98
99 /*
100 * Media types supported by the Sun4m.
101 */
102 static int lemedia[] = {
103 IFM_ETHER|IFM_10_T,
104 IFM_ETHER|IFM_10_5,
105 IFM_ETHER|IFM_AUTO,
106 };
107 #define NLEMEDIA (sizeof(lemedia) / sizeof(lemedia[0]))
108
109 void lesetutp __P((struct lance_softc *));
110 void lesetaui __P((struct lance_softc *));
111
112 int lemediachange __P((struct lance_softc *));
113 void lemediastatus __P((struct lance_softc *, struct ifmediareq *));
114
115 CFATTACH_DECL(le_ledma, sizeof(struct le_softc),
116 lematch_ledma, leattach_ledma, NULL, NULL);
117
118 extern struct cfdriver le_cd;
119
120 #if defined(_KERNEL_OPT)
121 #include "opt_ddb.h"
122 #endif
123
124 static void lewrcsr __P((struct lance_softc *, u_int16_t, u_int16_t));
125 static u_int16_t lerdcsr __P((struct lance_softc *, u_int16_t));
126 static void lehwreset __P((struct lance_softc *));
127 static void lehwinit __P((struct lance_softc *));
128 static void lenocarrier __P((struct lance_softc *));
129
130 static void
131 lewrcsr(sc, port, val)
132 struct lance_softc *sc;
133 u_int16_t port, val;
134 {
135 struct le_softc *lesc = (struct le_softc *)sc;
136 bus_space_tag_t t = lesc->sc_bustag;
137 bus_space_handle_t h = lesc->sc_reg;
138
139 bus_space_write_2(t, h, LEREG1_RAP, port);
140 bus_space_write_2(t, h, LEREG1_RDP, val);
141
142 #if defined(SUN4M)
143 /*
144 * We need to flush the Sbus->Mbus write buffers. This can most
145 * easily be accomplished by reading back the register that we
146 * just wrote (thanks to Chris Torek for this solution).
147 */
148 (void)bus_space_read_2(t, h, LEREG1_RDP);
149 #endif
150 }
151
152 static u_int16_t
153 lerdcsr(sc, port)
154 struct lance_softc *sc;
155 u_int16_t port;
156 {
157 struct le_softc *lesc = (struct le_softc *)sc;
158 bus_space_tag_t t = lesc->sc_bustag;
159 bus_space_handle_t h = lesc->sc_reg;
160
161 bus_space_write_2(t, h, LEREG1_RAP, port);
162 return (bus_space_read_2(t, h, LEREG1_RDP));
163 }
164
165 void
166 lesetutp(sc)
167 struct lance_softc *sc;
168 {
169 struct lsi64854_softc *dma = ((struct le_softc *)sc)->sc_dma;
170 u_int32_t csr;
171
172 csr = L64854_GCSR(dma);
173 csr |= E_TP_AUI;
174 L64854_SCSR(dma, csr);
175 delay(20000); /* must not touch le for 20ms */
176 }
177
178 void
179 lesetaui(sc)
180 struct lance_softc *sc;
181 {
182 struct lsi64854_softc *dma = ((struct le_softc *)sc)->sc_dma;
183 u_int32_t csr;
184
185 csr = L64854_GCSR(dma);
186 csr &= ~E_TP_AUI;
187 L64854_SCSR(dma, csr);
188 delay(20000); /* must not touch le for 20ms */
189 }
190
191 int
192 lemediachange(sc)
193 struct lance_softc *sc;
194 {
195 struct ifmedia *ifm = &sc->sc_media;
196
197 if (IFM_TYPE(ifm->ifm_media) != IFM_ETHER)
198 return (EINVAL);
199
200 /*
201 * Switch to the selected media. If autoselect is
202 * set, we don't really have to do anything. We'll
203 * switch to the other media when we detect loss of
204 * carrier.
205 */
206 switch (IFM_SUBTYPE(ifm->ifm_media)) {
207 case IFM_10_T:
208 lesetutp(sc);
209 break;
210
211 case IFM_10_5:
212 lesetaui(sc);
213 break;
214
215 case IFM_AUTO:
216 break;
217
218 default:
219 return (EINVAL);
220 }
221
222 return (0);
223 }
224
225 void
226 lemediastatus(sc, ifmr)
227 struct lance_softc *sc;
228 struct ifmediareq *ifmr;
229 {
230 struct lsi64854_softc *dma = ((struct le_softc *)sc)->sc_dma;
231
232 /*
233 * Notify the world which media we're currently using.
234 */
235 if (L64854_GCSR(dma) & E_TP_AUI)
236 ifmr->ifm_active = IFM_ETHER|IFM_10_T;
237 else
238 ifmr->ifm_active = IFM_ETHER|IFM_10_5;
239 }
240
241 static void
242 lehwreset(sc)
243 struct lance_softc *sc;
244 {
245 struct le_softc *lesc = (struct le_softc *)sc;
246 struct lsi64854_softc *dma = lesc->sc_dma;
247 u_int32_t csr;
248 u_int aui_bit;
249
250 /*
251 * Reset DMA channel.
252 */
253 csr = L64854_GCSR(dma);
254 aui_bit = csr & E_TP_AUI;
255 DMA_RESET(dma);
256
257 /* Write bits 24-31 of Lance address */
258 bus_space_write_4(dma->sc_bustag, dma->sc_regs, L64854_REG_ENBAR,
259 lesc->sc_laddr & 0xff000000);
260
261 DMA_ENINTR(dma);
262
263 /*
264 * Disable E-cache invalidates on chip writes.
265 * Retain previous cable selection bit.
266 */
267 csr = L64854_GCSR(dma);
268 csr |= (E_DSBL_WR_INVAL | aui_bit);
269 L64854_SCSR(dma, csr);
270 delay(20000); /* must not touch le for 20ms */
271 }
272
273 static void
274 lehwinit(sc)
275 struct lance_softc *sc;
276 {
277
278 /*
279 * Make sure we're using the currently-enabled media type.
280 * XXX Actually, this is probably unnecessary, now.
281 */
282 switch (IFM_SUBTYPE(sc->sc_media.ifm_cur->ifm_media)) {
283 case IFM_10_T:
284 lesetutp(sc);
285 break;
286
287 case IFM_10_5:
288 lesetaui(sc);
289 break;
290 }
291 }
292
293 static void
294 lenocarrier(sc)
295 struct lance_softc *sc;
296 {
297 struct le_softc *lesc = (struct le_softc *)sc;
298
299 /*
300 * Check if the user has requested a certain cable type, and
301 * if so, honor that request.
302 */
303 printf("%s: lost carrier on ", sc->sc_dev.dv_xname);
304
305 if (L64854_GCSR(lesc->sc_dma) & E_TP_AUI) {
306 printf("UTP port");
307 switch (IFM_SUBTYPE(sc->sc_media.ifm_media)) {
308 case IFM_10_5:
309 case IFM_AUTO:
310 printf(", switching to AUI port");
311 lesetaui(sc);
312 }
313 } else {
314 printf("AUI port");
315 switch (IFM_SUBTYPE(sc->sc_media.ifm_media)) {
316 case IFM_10_T:
317 case IFM_AUTO:
318 printf(", switching to UTP port");
319 lesetutp(sc);
320 }
321 }
322 printf("\n");
323 }
324
325 int
326 lematch_ledma(parent, cf, aux)
327 struct device *parent;
328 struct cfdata *cf;
329 void *aux;
330 {
331 struct sbus_attach_args *sa = aux;
332
333 return (strcmp(cf->cf_name, sa->sa_name) == 0);
334 }
335
336
337 void
338 leattach_ledma(parent, self, aux)
339 struct device *parent, *self;
340 void *aux;
341 {
342 struct sbus_attach_args *sa = aux;
343 struct le_softc *lesc = (struct le_softc *)self;
344 struct lsi64854_softc *lsi = (struct lsi64854_softc *)parent;
345 struct lance_softc *sc = &lesc->sc_am7990.lsc;
346 bus_dma_tag_t dmatag = sa->sa_dmatag;
347 bus_dma_segment_t seg;
348 int rseg, error;
349
350 lesc->sc_bustag = sa->sa_bustag;
351
352 /* Establish link to `ledma' device */
353 lesc->sc_dma = lsi;
354 lesc->sc_dma->sc_client = lesc;
355
356 /* Map device registers */
357 if (sbus_bus_map(sa->sa_bustag,
358 sa->sa_slot,
359 sa->sa_offset,
360 sa->sa_size,
361 0, &lesc->sc_reg) != 0) {
362 printf("%s @ ledma: cannot map registers\n", self->dv_xname);
363 return;
364 }
365
366 /* Allocate buffer memory */
367 sc->sc_memsize = MEMSIZE;
368
369 /* Get a DMA handle */
370 if ((error = bus_dmamap_create(dmatag, MEMSIZE, 1, MEMSIZE,
371 LEDMA_BOUNDARY, BUS_DMA_NOWAIT,
372 &lesc->sc_dmamap)) != 0) {
373 printf("%s: DMA map create error %d\n", self->dv_xname, error);
374 return;
375 }
376
377 /* Allocate DMA buffer */
378 if ((error = bus_dmamem_alloc(dmatag, MEMSIZE, 0, LEDMA_BOUNDARY,
379 &seg, 1, &rseg, BUS_DMA_NOWAIT)) != 0) {
380 printf("%s @ ledma: DMA buffer alloc error %d\n",
381 self->dv_xname, error);
382 return;
383 }
384
385 /* Map DMA buffer into kernel space */
386 if ((error = bus_dmamem_map(dmatag, &seg, rseg, MEMSIZE,
387 (caddr_t *)&sc->sc_mem,
388 BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) {
389 printf("%s @ ledma: DMA buffer map error %d\n",
390 self->dv_xname, error);
391 bus_dmamem_free(dmatag, &seg, rseg);
392 return;
393 }
394
395 /* Load DMA buffer */
396 if ((error = bus_dmamap_load(dmatag, lesc->sc_dmamap, sc->sc_mem,
397 MEMSIZE, NULL, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) {
398 printf("%s: DMA buffer map load error %d\n",
399 self->dv_xname, error);
400 bus_dmamem_free(dmatag, &seg, rseg);
401 bus_dmamem_unmap(dmatag, sc->sc_mem, MEMSIZE);
402 return;
403 }
404
405 lesc->sc_laddr = lesc->sc_dmamap->dm_segs[0].ds_addr;
406 sc->sc_addr = lesc->sc_laddr & 0xffffff;
407 sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON;
408
409
410 /* Assume SBus is grandparent */
411 lesc->sc_sd.sd_reset = (void *)lance_reset;
412 sbus_establish(&lesc->sc_sd, parent);
413
414 sc->sc_mediachange = lemediachange;
415 sc->sc_mediastatus = lemediastatus;
416 sc->sc_supmedia = lemedia;
417 sc->sc_nsupmedia = NLEMEDIA;
418 sc->sc_defaultmedia = IFM_ETHER|IFM_AUTO;
419
420 prom_getether(sa->sa_node, sc->sc_enaddr);
421
422 sc->sc_copytodesc = lance_copytobuf_contig;
423 sc->sc_copyfromdesc = lance_copyfrombuf_contig;
424 sc->sc_copytobuf = lance_copytobuf_contig;
425 sc->sc_copyfrombuf = lance_copyfrombuf_contig;
426 sc->sc_zerobuf = lance_zerobuf_contig;
427
428 sc->sc_rdcsr = lerdcsr;
429 sc->sc_wrcsr = lewrcsr;
430 sc->sc_hwinit = lehwinit;
431 sc->sc_nocarrier = lenocarrier;
432 sc->sc_hwreset = lehwreset;
433
434 /* Establish interrupt handler */
435 if (sa->sa_nintr != 0)
436 (void)bus_intr_establish(sa->sa_bustag, sa->sa_pri, IPL_NET,
437 am7990_intr, sc);
438
439 am7990_config(&lesc->sc_am7990);
440
441 /* now initialize DMA */
442 lehwreset(sc);
443 }
444