sbus.c revision 1.63 1 1.63 chs /* $NetBSD: sbus.c,v 1.63 2004/12/13 02:39:07 chs Exp $ */
2 1.20 pk
3 1.20 pk /*-
4 1.20 pk * Copyright (c) 1998 The NetBSD Foundation, Inc.
5 1.20 pk * All rights reserved.
6 1.20 pk *
7 1.20 pk * This code is derived from software contributed to The NetBSD Foundation
8 1.20 pk * by Paul Kranenburg.
9 1.20 pk *
10 1.20 pk * Redistribution and use in source and binary forms, with or without
11 1.20 pk * modification, are permitted provided that the following conditions
12 1.20 pk * are met:
13 1.20 pk * 1. Redistributions of source code must retain the above copyright
14 1.20 pk * notice, this list of conditions and the following disclaimer.
15 1.20 pk * 2. Redistributions in binary form must reproduce the above copyright
16 1.20 pk * notice, this list of conditions and the following disclaimer in the
17 1.20 pk * documentation and/or other materials provided with the distribution.
18 1.20 pk * 3. All advertising materials mentioning features or use of this software
19 1.20 pk * must display the following acknowledgement:
20 1.20 pk * This product includes software developed by the NetBSD
21 1.20 pk * Foundation, Inc. and its contributors.
22 1.20 pk * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.20 pk * contributors may be used to endorse or promote products derived
24 1.20 pk * from this software without specific prior written permission.
25 1.20 pk *
26 1.20 pk * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.20 pk * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.20 pk * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.20 pk * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.20 pk * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.20 pk * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.20 pk * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.20 pk * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.20 pk * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.20 pk * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.20 pk * POSSIBILITY OF SUCH DAMAGE.
37 1.20 pk */
38 1.4 deraadt
39 1.1 deraadt /*
40 1.1 deraadt * Copyright (c) 1992, 1993
41 1.1 deraadt * The Regents of the University of California. All rights reserved.
42 1.1 deraadt *
43 1.1 deraadt * This software was developed by the Computer Systems Engineering group
44 1.1 deraadt * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
45 1.1 deraadt * contributed to Berkeley.
46 1.1 deraadt *
47 1.1 deraadt * All advertising materials mentioning features or use of this software
48 1.1 deraadt * must display the following acknowledgement:
49 1.1 deraadt * This product includes software developed by the University of
50 1.1 deraadt * California, Lawrence Berkeley Laboratory.
51 1.1 deraadt *
52 1.1 deraadt * Redistribution and use in source and binary forms, with or without
53 1.1 deraadt * modification, are permitted provided that the following conditions
54 1.1 deraadt * are met:
55 1.1 deraadt * 1. Redistributions of source code must retain the above copyright
56 1.1 deraadt * notice, this list of conditions and the following disclaimer.
57 1.1 deraadt * 2. Redistributions in binary form must reproduce the above copyright
58 1.1 deraadt * notice, this list of conditions and the following disclaimer in the
59 1.1 deraadt * documentation and/or other materials provided with the distribution.
60 1.58 agc * 3. Neither the name of the University nor the names of its contributors
61 1.1 deraadt * may be used to endorse or promote products derived from this software
62 1.1 deraadt * without specific prior written permission.
63 1.1 deraadt *
64 1.1 deraadt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
65 1.1 deraadt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
66 1.1 deraadt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
67 1.1 deraadt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
68 1.1 deraadt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
69 1.1 deraadt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
70 1.1 deraadt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
71 1.1 deraadt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
72 1.1 deraadt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
73 1.1 deraadt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
74 1.1 deraadt * SUCH DAMAGE.
75 1.1 deraadt *
76 1.1 deraadt * @(#)sbus.c 8.1 (Berkeley) 6/11/93
77 1.1 deraadt */
78 1.1 deraadt
79 1.1 deraadt /*
80 1.1 deraadt * Sbus stuff.
81 1.1 deraadt */
82 1.57 lukem
83 1.57 lukem #include <sys/cdefs.h>
84 1.63 chs __KERNEL_RCSID(0, "$NetBSD: sbus.c,v 1.63 2004/12/13 02:39:07 chs Exp $");
85 1.1 deraadt
86 1.1 deraadt #include <sys/param.h>
87 1.16 pk #include <sys/malloc.h>
88 1.32 pk #include <sys/kernel.h>
89 1.7 christos #include <sys/systm.h>
90 1.1 deraadt #include <sys/device.h>
91 1.37 mrg
92 1.37 mrg #include <uvm/uvm_extern.h>
93 1.1 deraadt
94 1.47 thorpej #include <machine/autoconf.h>
95 1.19 pk #include <machine/bus.h>
96 1.19 pk #include <sparc/dev/sbusreg.h>
97 1.25 pk #include <dev/sbus/sbusvar.h>
98 1.25 pk #include <dev/sbus/xboxvar.h>
99 1.19 pk
100 1.19 pk #include <sparc/sparc/iommuvar.h>
101 1.1 deraadt
102 1.8 thorpej void sbusreset __P((int));
103 1.8 thorpej
104 1.26 pk static int sbus_get_intr __P((struct sbus_softc *, int,
105 1.46 thorpej struct openprom_intr **, int *));
106 1.23 pk static void *sbus_intr_establish __P((
107 1.23 pk bus_space_tag_t,
108 1.38 pk int, /*Sbus interrupt level*/
109 1.38 pk int, /*`device class' priority*/
110 1.23 pk int (*) __P((void *)), /*handler*/
111 1.54 pk void *, /*handler arg*/
112 1.54 pk void (*) __P((void)))); /*fast handler*/
113 1.19 pk
114 1.19 pk
115 1.1 deraadt /* autoconfiguration driver */
116 1.19 pk int sbus_match_mainbus __P((struct device *, struct cfdata *, void *));
117 1.19 pk int sbus_match_iommu __P((struct device *, struct cfdata *, void *));
118 1.24 pk int sbus_match_xbox __P((struct device *, struct cfdata *, void *));
119 1.19 pk void sbus_attach_mainbus __P((struct device *, struct device *, void *));
120 1.19 pk void sbus_attach_iommu __P((struct device *, struct device *, void *));
121 1.24 pk void sbus_attach_xbox __P((struct device *, struct device *, void *));
122 1.8 thorpej
123 1.32 pk static int sbus_error __P((void));
124 1.32 pk int (*sbuserr_handler) __P((void));
125 1.32 pk
126 1.51 thorpej CFATTACH_DECL(sbus_mainbus, sizeof(struct sbus_softc),
127 1.52 thorpej sbus_match_mainbus, sbus_attach_mainbus, NULL, NULL);
128 1.51 thorpej
129 1.51 thorpej CFATTACH_DECL(sbus_iommu, sizeof(struct sbus_softc),
130 1.52 thorpej sbus_match_iommu, sbus_attach_iommu, NULL, NULL);
131 1.51 thorpej
132 1.51 thorpej CFATTACH_DECL(sbus_xbox, sizeof(struct sbus_softc),
133 1.52 thorpej sbus_match_xbox, sbus_attach_xbox, NULL, NULL);
134 1.7 christos
135 1.18 thorpej extern struct cfdriver sbus_cd;
136 1.1 deraadt
137 1.63 chs static int sbus_mainbus_attached;
138 1.63 chs
139 1.32 pk /* The "primary" Sbus */
140 1.32 pk struct sbus_softc *sbus_sc;
141 1.32 pk
142 1.19 pk /* If the PROM does not provide the `ranges' property, we make up our own */
143 1.46 thorpej struct openprom_range sbus_translations[] = {
144 1.19 pk /* Assume a maximum of 4 Sbus slots, all mapped to on-board io space */
145 1.19 pk { 0, 0, PMAP_OBIO, SBUS_ADDR(0,0), 1 << 25 },
146 1.19 pk { 1, 0, PMAP_OBIO, SBUS_ADDR(1,0), 1 << 25 },
147 1.19 pk { 2, 0, PMAP_OBIO, SBUS_ADDR(2,0), 1 << 25 },
148 1.19 pk { 3, 0, PMAP_OBIO, SBUS_ADDR(3,0), 1 << 25 }
149 1.19 pk };
150 1.19 pk
151 1.19 pk /*
152 1.19 pk * Child devices receive the Sbus interrupt level in their attach
153 1.19 pk * arguments. We translate these to CPU IPLs using the following
154 1.19 pk * tables. Note: obio bus interrupt levels are identical to the
155 1.19 pk * processor IPL.
156 1.19 pk *
157 1.19 pk * The second set of tables is used when the Sbus interrupt level
158 1.19 pk * cannot be had from the PROM as an `interrupt' property. We then
159 1.19 pk * fall back on the `intr' property which contains the CPU IPL.
160 1.19 pk */
161 1.19 pk
162 1.19 pk /* Translate Sbus interrupt level to processor IPL */
163 1.19 pk static int intr_sbus2ipl_4c[] = {
164 1.19 pk 0, 1, 2, 3, 5, 7, 8, 9
165 1.19 pk };
166 1.19 pk static int intr_sbus2ipl_4m[] = {
167 1.19 pk 0, 2, 3, 5, 7, 9, 11, 13
168 1.19 pk };
169 1.19 pk
170 1.20 pk /*
171 1.20 pk * This value is or'ed into the attach args' interrupt level cookie
172 1.20 pk * if the interrupt level comes from an `intr' property, i.e. it is
173 1.20 pk * not an Sbus interrupt level.
174 1.20 pk */
175 1.19 pk #define SBUS_INTR_COMPAT 0x80000000
176 1.19 pk
177 1.19 pk
178 1.1 deraadt /*
179 1.1 deraadt * Print the location of some sbus-attached device (called just
180 1.1 deraadt * before attaching that device). If `sbus' is not NULL, the
181 1.1 deraadt * device was found but not configured; print the sbus as well.
182 1.1 deraadt * Return UNCONF (config_find ignores this if the device was configured).
183 1.1 deraadt */
184 1.1 deraadt int
185 1.19 pk sbus_print(args, busname)
186 1.1 deraadt void *args;
187 1.19 pk const char *busname;
188 1.1 deraadt {
189 1.19 pk struct sbus_attach_args *sa = args;
190 1.26 pk int i;
191 1.1 deraadt
192 1.19 pk if (busname)
193 1.56 thorpej aprint_normal("%s at %s", sa->sa_name, busname);
194 1.56 thorpej aprint_normal(" slot %d offset 0x%x", sa->sa_slot, sa->sa_offset);
195 1.26 pk for (i = 0; i < sa->sa_nintr; i++) {
196 1.46 thorpej u_int32_t level = sa->sa_intr[i].oi_pri;
197 1.19 pk struct sbus_softc *sc =
198 1.19 pk (struct sbus_softc *) sa->sa_bustag->cookie;
199 1.19 pk
200 1.56 thorpej aprint_normal(" level %d", level & ~SBUS_INTR_COMPAT);
201 1.19 pk if ((level & SBUS_INTR_COMPAT) == 0) {
202 1.19 pk int ipl = sc->sc_intr2ipl[level];
203 1.19 pk if (ipl != level)
204 1.56 thorpej aprint_normal(" (ipl %d)", ipl);
205 1.19 pk }
206 1.19 pk }
207 1.1 deraadt return (UNCONF);
208 1.1 deraadt }
209 1.1 deraadt
210 1.3 deraadt int
211 1.19 pk sbus_match_mainbus(parent, cf, aux)
212 1.19 pk struct device *parent;
213 1.19 pk struct cfdata *cf;
214 1.19 pk void *aux;
215 1.19 pk {
216 1.19 pk struct mainbus_attach_args *ma = aux;
217 1.19 pk
218 1.63 chs if (CPU_ISSUN4 || sbus_mainbus_attached)
219 1.19 pk return (0);
220 1.19 pk
221 1.49 thorpej return (strcmp(cf->cf_name, ma->ma_name) == 0);
222 1.19 pk }
223 1.19 pk
224 1.19 pk int
225 1.19 pk sbus_match_iommu(parent, cf, aux)
226 1.3 deraadt struct device *parent;
227 1.14 pk struct cfdata *cf;
228 1.14 pk void *aux;
229 1.3 deraadt {
230 1.19 pk struct iommu_attach_args *ia = aux;
231 1.3 deraadt
232 1.9 pk if (CPU_ISSUN4)
233 1.3 deraadt return (0);
234 1.9 pk
235 1.49 thorpej return (strcmp(cf->cf_name, ia->iom_name) == 0);
236 1.3 deraadt }
237 1.3 deraadt
238 1.24 pk int
239 1.24 pk sbus_match_xbox(parent, cf, aux)
240 1.24 pk struct device *parent;
241 1.24 pk struct cfdata *cf;
242 1.24 pk void *aux;
243 1.24 pk {
244 1.24 pk struct xbox_attach_args *xa = aux;
245 1.24 pk
246 1.24 pk if (CPU_ISSUN4)
247 1.24 pk return (0);
248 1.24 pk
249 1.49 thorpej return (strcmp(cf->cf_name, xa->xa_name) == 0);
250 1.24 pk }
251 1.24 pk
252 1.1 deraadt /*
253 1.1 deraadt * Attach an Sbus.
254 1.1 deraadt */
255 1.1 deraadt void
256 1.19 pk sbus_attach_mainbus(parent, self, aux)
257 1.1 deraadt struct device *parent;
258 1.1 deraadt struct device *self;
259 1.1 deraadt void *aux;
260 1.1 deraadt {
261 1.19 pk struct sbus_softc *sc = (struct sbus_softc *)self;
262 1.19 pk struct mainbus_attach_args *ma = aux;
263 1.19 pk int node = ma->ma_node;
264 1.1 deraadt
265 1.63 chs sbus_mainbus_attached = 1;
266 1.1 deraadt
267 1.19 pk sc->sc_bustag = ma->ma_bustag;
268 1.19 pk sc->sc_dmatag = ma->ma_dmatag;
269 1.19 pk
270 1.33 pk #if 0 /* sbus at mainbus (sun4c): `reg' prop is not control space */
271 1.32 pk if (ma->ma_size == 0)
272 1.32 pk printf("%s: no Sbus registers", self->dv_xname);
273 1.32 pk
274 1.45 pk if (bus_space_map(ma->ma_bustag,
275 1.45 pk ma->ma_paddr,
276 1.45 pk ma->ma_size,
277 1.32 pk BUS_SPACE_MAP_LINEAR,
278 1.45 pk &sc->sc_bh) != 0) {
279 1.32 pk panic("%s: can't map sbusbusreg", self->dv_xname);
280 1.32 pk }
281 1.33 pk #endif
282 1.32 pk
283 1.19 pk /* Setup interrupt translation tables */
284 1.19 pk sc->sc_intr2ipl = CPU_ISSUN4C
285 1.19 pk ? intr_sbus2ipl_4c
286 1.19 pk : intr_sbus2ipl_4m;
287 1.19 pk
288 1.19 pk /*
289 1.19 pk * Record clock frequency for synchronous SCSI.
290 1.19 pk * IS THIS THE CORRECT DEFAULT??
291 1.19 pk */
292 1.60 pk sc->sc_clockfreq = prom_getpropint(node, "clock-frequency", 25*1000*1000);
293 1.19 pk printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
294 1.19 pk
295 1.32 pk sbus_sc = sc;
296 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
297 1.19 pk }
298 1.19 pk
299 1.32 pk
300 1.19 pk void
301 1.19 pk sbus_attach_iommu(parent, self, aux)
302 1.19 pk struct device *parent;
303 1.19 pk struct device *self;
304 1.19 pk void *aux;
305 1.19 pk {
306 1.19 pk struct sbus_softc *sc = (struct sbus_softc *)self;
307 1.19 pk struct iommu_attach_args *ia = aux;
308 1.19 pk int node = ia->iom_node;
309 1.19 pk
310 1.19 pk sc->sc_bustag = ia->iom_bustag;
311 1.19 pk sc->sc_dmatag = ia->iom_dmatag;
312 1.19 pk
313 1.32 pk if (ia->iom_nreg == 0)
314 1.32 pk panic("%s: no Sbus registers", self->dv_xname);
315 1.32 pk
316 1.45 pk if (bus_space_map(ia->iom_bustag,
317 1.46 thorpej BUS_ADDR(ia->iom_reg[0].oa_space,
318 1.46 thorpej ia->iom_reg[0].oa_base),
319 1.46 thorpej (bus_size_t)ia->iom_reg[0].oa_size,
320 1.32 pk BUS_SPACE_MAP_LINEAR,
321 1.45 pk &sc->sc_bh) != 0) {
322 1.32 pk panic("%s: can't map sbusbusreg", self->dv_xname);
323 1.32 pk }
324 1.32 pk
325 1.19 pk /* Setup interrupt translation tables */
326 1.19 pk sc->sc_intr2ipl = CPU_ISSUN4C ? intr_sbus2ipl_4c : intr_sbus2ipl_4m;
327 1.19 pk
328 1.1 deraadt /*
329 1.1 deraadt * Record clock frequency for synchronous SCSI.
330 1.1 deraadt * IS THIS THE CORRECT DEFAULT??
331 1.1 deraadt */
332 1.60 pk sc->sc_clockfreq = prom_getpropint(node, "clock-frequency", 25*1000*1000);
333 1.13 christos printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
334 1.10 abrown
335 1.32 pk sbus_sc = sc;
336 1.32 pk sbuserr_handler = sbus_error;
337 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
338 1.24 pk }
339 1.24 pk
340 1.24 pk void
341 1.24 pk sbus_attach_xbox(parent, self, aux)
342 1.24 pk struct device *parent;
343 1.24 pk struct device *self;
344 1.24 pk void *aux;
345 1.24 pk {
346 1.24 pk struct sbus_softc *sc = (struct sbus_softc *)self;
347 1.24 pk struct xbox_attach_args *xa = aux;
348 1.24 pk int node = xa->xa_node;
349 1.24 pk
350 1.24 pk sc->sc_bustag = xa->xa_bustag;
351 1.24 pk sc->sc_dmatag = xa->xa_dmatag;
352 1.24 pk
353 1.24 pk /* Setup interrupt translation tables */
354 1.24 pk sc->sc_intr2ipl = CPU_ISSUN4C ? intr_sbus2ipl_4c : intr_sbus2ipl_4m;
355 1.24 pk
356 1.24 pk /*
357 1.24 pk * Record clock frequency for synchronous SCSI.
358 1.24 pk * IS THIS THE CORRECT DEFAULT??
359 1.24 pk */
360 1.60 pk sc->sc_clockfreq = prom_getpropint(node, "clock-frequency", 25*1000*1000);
361 1.24 pk printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
362 1.24 pk
363 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
364 1.19 pk }
365 1.19 pk
366 1.19 pk void
367 1.36 pk sbus_attach_common(sc, busname, busnode, specials)
368 1.19 pk struct sbus_softc *sc;
369 1.19 pk char *busname;
370 1.19 pk int busnode;
371 1.19 pk const char * const *specials;
372 1.19 pk {
373 1.19 pk int node0, node, error;
374 1.19 pk const char *sp;
375 1.19 pk const char *const *ssp;
376 1.19 pk bus_space_tag_t sbt;
377 1.19 pk struct sbus_attach_args sa;
378 1.19 pk
379 1.62 pk if ((sbt = bus_space_tag_alloc(sc->sc_bustag, sc)) == NULL) {
380 1.62 pk printf("%s: attach: out of memory\n", sc->sc_dev.dv_xname);
381 1.62 pk return;
382 1.62 pk }
383 1.62 pk sbt->sparc_intr_establish = sbus_intr_establish;
384 1.19 pk
385 1.10 abrown /*
386 1.10 abrown * Get the SBus burst transfer size if burst transfers are supported
387 1.10 abrown */
388 1.60 pk sc->sc_burst = prom_getpropint(busnode, "burst-sizes", 0);
389 1.35 pk
390 1.35 pk
391 1.35 pk if (CPU_ISSUN4M) {
392 1.35 pk /*
393 1.35 pk * Some models (e.g. SS20) erroneously report 64-bit
394 1.35 pk * burst capability. We mask it out here for all SUN4Ms,
395 1.35 pk * since probably no member of that class supports
396 1.35 pk * 64-bit Sbus bursts.
397 1.35 pk */
398 1.35 pk sc->sc_burst &= ~SBUS_BURST_64;
399 1.35 pk }
400 1.1 deraadt
401 1.19 pk /*
402 1.19 pk * Collect address translations from the OBP.
403 1.19 pk */
404 1.60 pk error = prom_getprop(busnode, "ranges", sizeof(struct rom_range),
405 1.59 mrg &sbt->nranges, &sbt->ranges);
406 1.19 pk switch (error) {
407 1.19 pk case 0:
408 1.19 pk break;
409 1.19 pk case ENOENT:
410 1.19 pk /* Fall back to our own `range' construction */
411 1.48 thorpej sbt->ranges = sbus_translations;
412 1.48 thorpej sbt->nranges =
413 1.19 pk sizeof(sbus_translations)/sizeof(sbus_translations[0]);
414 1.19 pk break;
415 1.19 pk default:
416 1.19 pk panic("%s: error getting ranges property", sc->sc_dev.dv_xname);
417 1.16 pk }
418 1.9 pk
419 1.1 deraadt /*
420 1.1 deraadt * Loop through ROM children, fixing any relative addresses
421 1.1 deraadt * and then configuring each device.
422 1.19 pk * `specials' is an array of device names that are treated
423 1.19 pk * specially:
424 1.1 deraadt */
425 1.19 pk node0 = firstchild(busnode);
426 1.19 pk for (ssp = specials ; ssp != NULL && *(sp = *ssp) != 0; ssp++) {
427 1.19 pk if ((node = findnode(node0, sp)) == 0) {
428 1.19 pk panic("could not find %s amongst %s devices",
429 1.19 pk sp, busname);
430 1.19 pk }
431 1.19 pk
432 1.19 pk if (sbus_setup_attach_args(sc, sbt, sc->sc_dmatag,
433 1.36 pk node, &sa) != 0) {
434 1.19 pk panic("sbus_attach: %s: incomplete", sp);
435 1.19 pk }
436 1.19 pk (void) config_found(&sc->sc_dev, (void *)&sa, sbus_print);
437 1.26 pk sbus_destroy_attach_args(&sa);
438 1.19 pk }
439 1.19 pk
440 1.19 pk for (node = node0; node; node = nextsibling(node)) {
441 1.60 pk char *name = prom_getpropstring(node, "name");
442 1.19 pk for (ssp = specials, sp = NULL;
443 1.19 pk ssp != NULL && (sp = *ssp) != NULL;
444 1.19 pk ssp++)
445 1.19 pk if (strcmp(name, sp) == 0)
446 1.19 pk break;
447 1.19 pk
448 1.19 pk if (sp != NULL)
449 1.19 pk /* Already configured as an "early" device */
450 1.19 pk continue;
451 1.19 pk
452 1.19 pk if (sbus_setup_attach_args(sc, sbt, sc->sc_dmatag,
453 1.36 pk node, &sa) != 0) {
454 1.19 pk printf("sbus_attach: %s: incomplete\n", name);
455 1.1 deraadt continue;
456 1.19 pk }
457 1.19 pk (void) config_found(&sc->sc_dev, (void *)&sa, sbus_print);
458 1.26 pk sbus_destroy_attach_args(&sa);
459 1.19 pk }
460 1.19 pk }
461 1.9 pk
462 1.19 pk int
463 1.36 pk sbus_setup_attach_args(sc, bustag, dmatag, node, sa)
464 1.19 pk struct sbus_softc *sc;
465 1.19 pk bus_space_tag_t bustag;
466 1.19 pk bus_dma_tag_t dmatag;
467 1.19 pk int node;
468 1.19 pk struct sbus_attach_args *sa;
469 1.19 pk {
470 1.32 pk int n, error;
471 1.19 pk
472 1.19 pk bzero(sa, sizeof(struct sbus_attach_args));
473 1.60 pk error = prom_getprop(node, "name", 1, &n, &sa->sa_name);
474 1.26 pk if (error != 0)
475 1.26 pk return (error);
476 1.26 pk sa->sa_name[n] = '\0';
477 1.26 pk
478 1.19 pk sa->sa_bustag = bustag;
479 1.19 pk sa->sa_dmatag = dmatag;
480 1.19 pk sa->sa_node = node;
481 1.39 eeh sa->sa_frequency = sc->sc_clockfreq;
482 1.19 pk
483 1.60 pk error = prom_getprop(node, "reg", sizeof(struct openprom_addr),
484 1.59 mrg &sa->sa_nreg, &sa->sa_reg);
485 1.26 pk if (error != 0) {
486 1.26 pk char buf[32];
487 1.26 pk if (error != ENOENT ||
488 1.26 pk !node_has_property(node, "device_type") ||
489 1.60 pk strcmp(prom_getpropstringA(node, "device_type", buf, sizeof buf),
490 1.26 pk "hierarchical") != 0)
491 1.26 pk return (error);
492 1.26 pk }
493 1.26 pk for (n = 0; n < sa->sa_nreg; n++) {
494 1.26 pk /* Convert to relative addressing, if necessary */
495 1.46 thorpej u_int32_t base = sa->sa_reg[n].oa_base;
496 1.26 pk if (SBUS_ABS(base)) {
497 1.46 thorpej sa->sa_reg[n].oa_space = SBUS_ABS_TO_SLOT(base);
498 1.46 thorpej sa->sa_reg[n].oa_base = SBUS_ABS_TO_OFFSET(base);
499 1.26 pk }
500 1.9 pk }
501 1.19 pk
502 1.26 pk if ((error = sbus_get_intr(sc, node, &sa->sa_intr, &sa->sa_nintr)) != 0)
503 1.19 pk return (error);
504 1.19 pk
505 1.60 pk error = prom_getprop(node, "address", sizeof(u_int32_t),
506 1.59 mrg &sa->sa_npromvaddrs, &sa->sa_promvaddrs);
507 1.26 pk if (error != 0 && error != ENOENT)
508 1.19 pk return (error);
509 1.19 pk
510 1.19 pk return (0);
511 1.9 pk }
512 1.9 pk
513 1.26 pk void
514 1.26 pk sbus_destroy_attach_args(sa)
515 1.26 pk struct sbus_attach_args *sa;
516 1.26 pk {
517 1.26 pk if (sa->sa_name != NULL)
518 1.26 pk free(sa->sa_name, M_DEVBUF);
519 1.26 pk
520 1.26 pk if (sa->sa_nreg != 0)
521 1.26 pk free(sa->sa_reg, M_DEVBUF);
522 1.26 pk
523 1.26 pk if (sa->sa_intr)
524 1.26 pk free(sa->sa_intr, M_DEVBUF);
525 1.26 pk
526 1.26 pk if (sa->sa_promvaddrs)
527 1.26 pk free(sa->sa_promvaddrs, M_DEVBUF);
528 1.26 pk
529 1.26 pk bzero(sa, sizeof(struct sbus_attach_args));/*DEBUG*/
530 1.26 pk }
531 1.26 pk
532 1.40 eeh bus_addr_t
533 1.40 eeh sbus_bus_addr(t, btype, offset)
534 1.40 eeh bus_space_tag_t t;
535 1.40 eeh u_int btype;
536 1.40 eeh u_int offset;
537 1.40 eeh {
538 1.40 eeh
539 1.44 uwe /* XXX: sbus_bus_addr should be g/c'ed */
540 1.44 uwe return (BUS_ADDR(btype, offset));
541 1.1 deraadt }
542 1.1 deraadt
543 1.19 pk
544 1.1 deraadt /*
545 1.1 deraadt * Each attached device calls sbus_establish after it initializes
546 1.1 deraadt * its sbusdev portion.
547 1.1 deraadt */
548 1.1 deraadt void
549 1.1 deraadt sbus_establish(sd, dev)
550 1.1 deraadt register struct sbusdev *sd;
551 1.1 deraadt register struct device *dev;
552 1.1 deraadt {
553 1.9 pk register struct sbus_softc *sc;
554 1.9 pk register struct device *curdev;
555 1.9 pk
556 1.9 pk /*
557 1.9 pk * We have to look for the sbus by name, since it is not necessarily
558 1.9 pk * our immediate parent (i.e. sun4m /iommu/sbus/espdma/esp)
559 1.9 pk * We don't just use the device structure of the above-attached
560 1.9 pk * sbus, since we might (in the future) support multiple sbus's.
561 1.9 pk */
562 1.9 pk for (curdev = dev->dv_parent; ; curdev = curdev->dv_parent) {
563 1.9 pk if (!curdev || !curdev->dv_xname)
564 1.15 pk panic("sbus_establish: can't find sbus parent for %s",
565 1.15 pk sd->sd_dev->dv_xname
566 1.15 pk ? sd->sd_dev->dv_xname
567 1.15 pk : "<unknown>" );
568 1.9 pk
569 1.9 pk if (strncmp(curdev->dv_xname, "sbus", 4) == 0)
570 1.15 pk break;
571 1.9 pk }
572 1.9 pk sc = (struct sbus_softc *) curdev;
573 1.1 deraadt
574 1.1 deraadt sd->sd_dev = dev;
575 1.1 deraadt sd->sd_bchain = sc->sc_sbdev;
576 1.1 deraadt sc->sc_sbdev = sd;
577 1.1 deraadt }
578 1.1 deraadt
579 1.1 deraadt /*
580 1.1 deraadt * Reset the given sbus. (???)
581 1.1 deraadt */
582 1.1 deraadt void
583 1.1 deraadt sbusreset(sbus)
584 1.1 deraadt int sbus;
585 1.1 deraadt {
586 1.1 deraadt register struct sbusdev *sd;
587 1.8 thorpej struct sbus_softc *sc = sbus_cd.cd_devs[sbus];
588 1.1 deraadt struct device *dev;
589 1.1 deraadt
590 1.13 christos printf("reset %s:", sc->sc_dev.dv_xname);
591 1.1 deraadt for (sd = sc->sc_sbdev; sd != NULL; sd = sd->sd_bchain) {
592 1.1 deraadt if (sd->sd_reset) {
593 1.1 deraadt dev = sd->sd_dev;
594 1.1 deraadt (*sd->sd_reset)(dev);
595 1.13 christos printf(" %s", dev->dv_xname);
596 1.1 deraadt }
597 1.1 deraadt }
598 1.1 deraadt }
599 1.19 pk
600 1.19 pk
601 1.19 pk /*
602 1.19 pk * Get interrupt attributes for an Sbus device.
603 1.19 pk */
604 1.19 pk int
605 1.26 pk sbus_get_intr(sc, node, ipp, np)
606 1.19 pk struct sbus_softc *sc;
607 1.19 pk int node;
608 1.46 thorpej struct openprom_intr **ipp;
609 1.26 pk int *np;
610 1.19 pk {
611 1.26 pk int error, n;
612 1.26 pk u_int32_t *ipl = NULL;
613 1.19 pk
614 1.19 pk /*
615 1.19 pk * The `interrupts' property contains the Sbus interrupt level.
616 1.19 pk */
617 1.60 pk if (prom_getprop(node, "interrupts", sizeof(int), np,
618 1.59 mrg &ipl) == 0) {
619 1.46 thorpej /* Change format to an `struct openprom_intr' array */
620 1.46 thorpej struct openprom_intr *ip;
621 1.46 thorpej ip = malloc(*np * sizeof(struct openprom_intr), M_DEVBUF,
622 1.46 thorpej M_NOWAIT);
623 1.42 mrg if (ip == NULL) {
624 1.42 mrg free(ipl, M_DEVBUF);
625 1.26 pk return (ENOMEM);
626 1.42 mrg }
627 1.26 pk for (n = 0; n < *np; n++) {
628 1.46 thorpej ip[n].oi_pri = ipl[n];
629 1.46 thorpej ip[n].oi_vec = 0;
630 1.26 pk }
631 1.19 pk free(ipl, M_DEVBUF);
632 1.26 pk *ipp = ip;
633 1.19 pk return (0);
634 1.19 pk }
635 1.19 pk
636 1.19 pk /*
637 1.19 pk * Fall back on `intr' property.
638 1.19 pk */
639 1.26 pk *ipp = NULL;
640 1.60 pk error = prom_getprop(node, "intr", sizeof(struct openprom_intr),
641 1.59 mrg np, ipp);
642 1.26 pk switch (error) {
643 1.19 pk case 0:
644 1.26 pk for (n = *np; n-- > 0;) {
645 1.46 thorpej (*ipp)[n].oi_pri &= 0xf;
646 1.46 thorpej (*ipp)[n].oi_pri |= SBUS_INTR_COMPAT;
647 1.26 pk }
648 1.26 pk break;
649 1.19 pk case ENOENT:
650 1.26 pk error = 0;
651 1.26 pk break;
652 1.19 pk }
653 1.19 pk
654 1.26 pk return (error);
655 1.19 pk }
656 1.19 pk
657 1.19 pk
658 1.19 pk /*
659 1.19 pk * Install an interrupt handler for an Sbus device.
660 1.19 pk */
661 1.19 pk void *
662 1.55 pk sbus_intr_establish(t, pri, level, handler, arg, fastvec)
663 1.22 pk bus_space_tag_t t;
664 1.38 pk int pri;
665 1.19 pk int level;
666 1.19 pk int (*handler) __P((void *));
667 1.19 pk void *arg;
668 1.54 pk void (*fastvec) __P((void));
669 1.19 pk {
670 1.22 pk struct sbus_softc *sc = t->cookie;
671 1.19 pk struct intrhand *ih;
672 1.38 pk int pil;
673 1.19 pk
674 1.19 pk ih = (struct intrhand *)
675 1.19 pk malloc(sizeof(struct intrhand), M_DEVBUF, M_NOWAIT);
676 1.19 pk if (ih == NULL)
677 1.19 pk return (NULL);
678 1.19 pk
679 1.38 pk /*
680 1.38 pk * Translate Sbus interrupt priority to CPU interrupt level
681 1.38 pk */
682 1.54 pk if ((pri & SBUS_INTR_COMPAT) != 0)
683 1.38 pk pil = pri & ~SBUS_INTR_COMPAT;
684 1.19 pk else
685 1.38 pk pil = sc->sc_intr2ipl[pri];
686 1.19 pk
687 1.19 pk ih->ih_fun = handler;
688 1.19 pk ih->ih_arg = arg;
689 1.54 pk intr_establish(pil, level, ih, fastvec);
690 1.19 pk return (ih);
691 1.19 pk }
692 1.19 pk
693 1.32 pk int
694 1.32 pk sbus_error()
695 1.32 pk {
696 1.32 pk struct sbus_softc *sc = sbus_sc;
697 1.32 pk bus_space_handle_t bh = sc->sc_bh;
698 1.32 pk u_int32_t afsr, afva;
699 1.32 pk char bits[64];
700 1.32 pk static int straytime, nstray;
701 1.32 pk int timesince;
702 1.32 pk
703 1.32 pk afsr = bus_space_read_4(sc->sc_bustag, bh, SBUS_AFSR_REG);
704 1.32 pk afva = bus_space_read_4(sc->sc_bustag, bh, SBUS_AFAR_REG);
705 1.32 pk printf("sbus error:\n\tAFSR %s\n",
706 1.32 pk bitmask_snprintf(afsr, SBUS_AFSR_BITS, bits, sizeof(bits)));
707 1.32 pk printf("\taddress: 0x%x%x\n", afsr & SBUS_AFSR_PAH, afva);
708 1.32 pk
709 1.32 pk /* For now, do the same dance as on stray interrupts */
710 1.32 pk timesince = time.tv_sec - straytime;
711 1.32 pk if (timesince <= 10) {
712 1.32 pk if (++nstray > 9)
713 1.32 pk panic("too many SBus errors");
714 1.32 pk } else {
715 1.32 pk straytime = time.tv_sec;
716 1.32 pk nstray = 1;
717 1.32 pk }
718 1.32 pk
719 1.32 pk /* Unlock registers and clear interrupt */
720 1.32 pk bus_space_write_4(sc->sc_bustag, bh, SBUS_AFSR_REG, afsr);
721 1.32 pk
722 1.32 pk return (0);
723 1.19 pk }
724