xref: /netbsd-src/sys/dev/sbus/if_le.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: if_le.c,v 1.30 2004/03/17 17:04:58 pk 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.c,v 1.30 2004/03/17 17:04:58 pk 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 #include <machine/bus.h>
59 #include <machine/intr.h>
60 #include <machine/autoconf.h>
61 
62 #include <dev/sbus/sbusvar.h>
63 #include <dev/sbus/lebuffervar.h>	/*XXX*/
64 
65 #include <dev/ic/lancereg.h>
66 #include <dev/ic/lancevar.h>
67 #include <dev/ic/am7990reg.h>
68 #include <dev/ic/am7990var.h>
69 
70 /*
71  * LANCE registers.
72  */
73 #define LEREG1_RDP	0	/* Register Data port */
74 #define LEREG1_RAP	2	/* Register Address port */
75 
76 struct	le_softc {
77 	struct	am7990_softc	sc_am7990;	/* glue to MI code */
78 	struct	sbusdev		sc_sd;		/* sbus device */
79 	bus_space_tag_t		sc_bustag;
80 	bus_dma_tag_t		sc_dmatag;
81 	bus_dmamap_t		sc_dmamap;
82 	bus_space_handle_t	sc_reg;
83 };
84 
85 #define MEMSIZE 0x4000		/* LANCE memory size */
86 
87 int	lematch_sbus __P((struct device *, struct cfdata *, void *));
88 void	leattach_sbus __P((struct device *, struct device *, void *));
89 
90 /*
91  * Media types supported.
92  */
93 static int lemedia[] = {
94 	IFM_ETHER|IFM_10_5,
95 };
96 #define NLEMEDIA	(sizeof(lemedia) / sizeof(lemedia[0]))
97 
98 CFATTACH_DECL(le_sbus, sizeof(struct le_softc),
99     lematch_sbus, leattach_sbus, NULL, NULL);
100 
101 extern struct cfdriver le_cd;
102 
103 #if defined(_KERNEL_OPT)
104 #include "opt_ddb.h"
105 #endif
106 
107 static void lewrcsr __P((struct lance_softc *, u_int16_t, u_int16_t));
108 static u_int16_t lerdcsr __P((struct lance_softc *, u_int16_t));
109 
110 static void
111 lewrcsr(sc, port, val)
112 	struct lance_softc *sc;
113 	u_int16_t port, val;
114 {
115 	struct le_softc *lesc = (struct le_softc *)sc;
116 	bus_space_tag_t t = lesc->sc_bustag;
117 	bus_space_handle_t h = lesc->sc_reg;
118 
119 	bus_space_write_2(t, h, LEREG1_RAP, port);
120 	bus_space_write_2(t, h, LEREG1_RDP, val);
121 
122 #if defined(SUN4M)
123 	/*
124 	 * We need to flush the Sbus->Mbus write buffers. This can most
125 	 * easily be accomplished by reading back the register that we
126 	 * just wrote (thanks to Chris Torek for this solution).
127 	 */
128 	(void)bus_space_read_2(t, h, LEREG1_RDP);
129 #endif
130 }
131 
132 static u_int16_t
133 lerdcsr(sc, port)
134 	struct lance_softc *sc;
135 	u_int16_t port;
136 {
137 	struct le_softc *lesc = (struct le_softc *)sc;
138 	bus_space_tag_t t = lesc->sc_bustag;
139 	bus_space_handle_t h = lesc->sc_reg;
140 
141 	bus_space_write_2(t, h, LEREG1_RAP, port);
142 	return (bus_space_read_2(t, h, LEREG1_RDP));
143 }
144 
145 
146 int
147 lematch_sbus(parent, cf, aux)
148 	struct device *parent;
149 	struct cfdata *cf;
150 	void *aux;
151 {
152 	struct sbus_attach_args *sa = aux;
153 
154 	return (strcmp(cf->cf_name, sa->sa_name) == 0);
155 }
156 
157 void
158 leattach_sbus(parent, self, aux)
159 	struct device *parent, *self;
160 	void *aux;
161 {
162 	struct sbus_attach_args *sa = aux;
163 	struct le_softc *lesc = (struct le_softc *)self;
164 	struct lance_softc *sc = &lesc->sc_am7990.lsc;
165 	bus_dma_tag_t dmatag;
166 	struct sbusdev *sd;
167 
168 	lesc->sc_bustag = sa->sa_bustag;
169 	lesc->sc_dmatag = dmatag = sa->sa_dmatag;
170 
171 	if (sbus_bus_map(sa->sa_bustag,
172 			 sa->sa_slot,
173 			 sa->sa_offset,
174 			 sa->sa_size,
175 			 0, &lesc->sc_reg) != 0) {
176 		printf("%s @ sbus: cannot map registers\n", self->dv_xname);
177 		return;
178 	}
179 
180 	/*
181 	 * Look for an "unallocated" lebuffer and pair it with
182 	 * this `le' device on the assumption that we're on
183 	 * a pre-historic ROM that doesn't establish le<=>lebuffer
184 	 * parent-child relationships.
185 	 */
186 	for (sd = ((struct sbus_softc *)parent)->sc_sbdev; sd != NULL;
187 	     sd = sd->sd_bchain) {
188 
189 		struct lebuf_softc *lebuf = (struct lebuf_softc *)sd->sd_dev;
190 
191 		if (strncmp("lebuffer", sd->sd_dev->dv_xname, 8) != 0)
192 			continue;
193 
194 		if (lebuf->attached != 0)
195 			continue;
196 
197 		sc->sc_mem = lebuf->sc_buffer;
198 		sc->sc_memsize = lebuf->sc_bufsiz;
199 		sc->sc_addr = 0; /* Lance view is offset by buffer location */
200 		lebuf->attached = 1;
201 
202 		/* That old black magic... */
203 		sc->sc_conf3 = prom_getpropint(sa->sa_node,
204 					  "busmaster-regval",
205 					  LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON);
206 		break;
207 	}
208 
209 	lesc->sc_sd.sd_reset = (void *)lance_reset;
210 	sbus_establish(&lesc->sc_sd, &sc->sc_dev);
211 
212 	if (sc->sc_mem == 0) {
213 		bus_dma_segment_t seg;
214 		int rseg, error;
215 
216 #ifndef BUS_DMA_24BIT
217 /* XXX - This flag is not defined on all archs */
218 #define BUS_DMA_24BIT	0
219 #endif
220 		/* Get a DMA handle */
221 		if ((error = bus_dmamap_create(dmatag, MEMSIZE, 1, MEMSIZE, 0,
222 						BUS_DMA_NOWAIT|BUS_DMA_24BIT,
223 						&lesc->sc_dmamap)) != 0) {
224 			printf("%s: DMA map create error %d\n",
225 				self->dv_xname, error);
226 			return;
227 		}
228 
229 		/* Allocate DMA buffer */
230 		if ((error = bus_dmamem_alloc(dmatag, MEMSIZE, 0, 0,
231 					 &seg, 1, &rseg,
232 					 BUS_DMA_NOWAIT|BUS_DMA_24BIT)) != 0){
233 			printf("%s: DMA buffer allocation error %d\n",
234 				self->dv_xname, error);
235 			return;
236 		}
237 
238 		/* Map DMA buffer into kernel space */
239 		if ((error = bus_dmamem_map(dmatag, &seg, rseg, MEMSIZE,
240 				       (caddr_t *)&sc->sc_mem,
241 				       BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) != 0) {
242 			printf("%s: DMA buffer map error %d\n",
243 				self->dv_xname, error);
244 			bus_dmamem_free(lesc->sc_dmatag, &seg, rseg);
245 			return;
246 		}
247 
248 		/* Load DMA buffer */
249 		if ((error = bus_dmamap_load(dmatag, lesc->sc_dmamap, sc->sc_mem,
250 		    MEMSIZE, NULL, BUS_DMA_NOWAIT)) != 0) {
251 			printf("%s: DMA buffer map load error %d\n",
252 				self->dv_xname, error);
253 			bus_dmamem_free(dmatag, &seg, rseg);
254 			bus_dmamem_unmap(dmatag, sc->sc_mem, MEMSIZE);
255 			return;
256 		}
257 
258 		sc->sc_addr = lesc->sc_dmamap->dm_segs[0].ds_addr & 0xffffff;
259 		sc->sc_memsize = MEMSIZE;
260 		sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON;
261 	}
262 
263 	prom_getether(sa->sa_node, sc->sc_enaddr);
264 
265 	sc->sc_supmedia = lemedia;
266 	sc->sc_nsupmedia = NLEMEDIA;
267 	sc->sc_defaultmedia = lemedia[0];
268 
269 	sc->sc_copytodesc = lance_copytobuf_contig;
270 	sc->sc_copyfromdesc = lance_copyfrombuf_contig;
271 	sc->sc_copytobuf = lance_copytobuf_contig;
272 	sc->sc_copyfrombuf = lance_copyfrombuf_contig;
273 	sc->sc_zerobuf = lance_zerobuf_contig;
274 
275 	sc->sc_rdcsr = lerdcsr;
276 	sc->sc_wrcsr = lewrcsr;
277 
278 	am7990_config(&lesc->sc_am7990);
279 
280 	/* Establish interrupt handler */
281 	if (sa->sa_nintr != 0)
282 		(void)bus_intr_establish(lesc->sc_bustag, sa->sa_pri,
283 					 IPL_NET, am7990_intr, sc);
284 }
285