sbus.c revision 1.56 1 1.56 thorpej /* $NetBSD: sbus.c,v 1.56 2003/01/01 02:20:47 thorpej 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.1 deraadt * 3. All advertising materials mentioning features or use of this software
61 1.1 deraadt * must display the following acknowledgement:
62 1.1 deraadt * This product includes software developed by the University of
63 1.1 deraadt * California, Berkeley and its contributors.
64 1.1 deraadt * 4. Neither the name of the University nor the names of its contributors
65 1.1 deraadt * may be used to endorse or promote products derived from this software
66 1.1 deraadt * without specific prior written permission.
67 1.1 deraadt *
68 1.1 deraadt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
69 1.1 deraadt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
70 1.1 deraadt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
71 1.1 deraadt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
72 1.1 deraadt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
73 1.1 deraadt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
74 1.1 deraadt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
75 1.1 deraadt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
76 1.1 deraadt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
77 1.1 deraadt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
78 1.1 deraadt * SUCH DAMAGE.
79 1.1 deraadt *
80 1.1 deraadt * @(#)sbus.c 8.1 (Berkeley) 6/11/93
81 1.1 deraadt */
82 1.1 deraadt
83 1.1 deraadt /*
84 1.1 deraadt * Sbus stuff.
85 1.1 deraadt */
86 1.1 deraadt
87 1.1 deraadt #include <sys/param.h>
88 1.16 pk #include <sys/malloc.h>
89 1.32 pk #include <sys/kernel.h>
90 1.7 christos #include <sys/systm.h>
91 1.1 deraadt #include <sys/device.h>
92 1.37 mrg
93 1.37 mrg #include <uvm/uvm_extern.h>
94 1.1 deraadt
95 1.47 thorpej #include <machine/autoconf.h>
96 1.19 pk #include <machine/bus.h>
97 1.19 pk #include <sparc/dev/sbusreg.h>
98 1.25 pk #include <dev/sbus/sbusvar.h>
99 1.25 pk #include <dev/sbus/xboxvar.h>
100 1.19 pk
101 1.19 pk #include <sparc/sparc/iommuvar.h>
102 1.1 deraadt
103 1.8 thorpej void sbusreset __P((int));
104 1.8 thorpej
105 1.19 pk static bus_space_tag_t sbus_alloc_bustag __P((struct sbus_softc *));
106 1.26 pk static int sbus_get_intr __P((struct sbus_softc *, int,
107 1.46 thorpej struct openprom_intr **, int *));
108 1.23 pk static void *sbus_intr_establish __P((
109 1.23 pk bus_space_tag_t,
110 1.38 pk int, /*Sbus interrupt level*/
111 1.38 pk int, /*`device class' priority*/
112 1.23 pk int (*) __P((void *)), /*handler*/
113 1.54 pk void *, /*handler arg*/
114 1.54 pk void (*) __P((void)))); /*fast handler*/
115 1.19 pk
116 1.19 pk
117 1.1 deraadt /* autoconfiguration driver */
118 1.19 pk int sbus_match_mainbus __P((struct device *, struct cfdata *, void *));
119 1.19 pk int sbus_match_iommu __P((struct device *, struct cfdata *, void *));
120 1.24 pk int sbus_match_xbox __P((struct device *, struct cfdata *, void *));
121 1.19 pk void sbus_attach_mainbus __P((struct device *, struct device *, void *));
122 1.19 pk void sbus_attach_iommu __P((struct device *, struct device *, void *));
123 1.24 pk void sbus_attach_xbox __P((struct device *, struct device *, void *));
124 1.8 thorpej
125 1.32 pk static int sbus_error __P((void));
126 1.32 pk int (*sbuserr_handler) __P((void));
127 1.32 pk
128 1.51 thorpej CFATTACH_DECL(sbus_mainbus, sizeof(struct sbus_softc),
129 1.52 thorpej sbus_match_mainbus, sbus_attach_mainbus, NULL, NULL);
130 1.51 thorpej
131 1.51 thorpej CFATTACH_DECL(sbus_iommu, sizeof(struct sbus_softc),
132 1.52 thorpej sbus_match_iommu, sbus_attach_iommu, NULL, NULL);
133 1.51 thorpej
134 1.51 thorpej CFATTACH_DECL(sbus_xbox, sizeof(struct sbus_softc),
135 1.52 thorpej sbus_match_xbox, sbus_attach_xbox, NULL, NULL);
136 1.7 christos
137 1.18 thorpej extern struct cfdriver sbus_cd;
138 1.1 deraadt
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.19 pk if (CPU_ISSUN4)
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.1 deraadt /*
266 1.1 deraadt * XXX there is only one Sbus, for now -- do not know how to
267 1.1 deraadt * address children on others
268 1.1 deraadt */
269 1.1 deraadt if (sc->sc_dev.dv_unit > 0) {
270 1.13 christos printf(" unsupported\n");
271 1.1 deraadt return;
272 1.1 deraadt }
273 1.1 deraadt
274 1.19 pk sc->sc_bustag = ma->ma_bustag;
275 1.19 pk sc->sc_dmatag = ma->ma_dmatag;
276 1.19 pk
277 1.33 pk #if 0 /* sbus at mainbus (sun4c): `reg' prop is not control space */
278 1.32 pk if (ma->ma_size == 0)
279 1.32 pk printf("%s: no Sbus registers", self->dv_xname);
280 1.32 pk
281 1.45 pk if (bus_space_map(ma->ma_bustag,
282 1.45 pk ma->ma_paddr,
283 1.45 pk ma->ma_size,
284 1.32 pk BUS_SPACE_MAP_LINEAR,
285 1.45 pk &sc->sc_bh) != 0) {
286 1.32 pk panic("%s: can't map sbusbusreg", self->dv_xname);
287 1.32 pk }
288 1.33 pk #endif
289 1.32 pk
290 1.19 pk /* Setup interrupt translation tables */
291 1.19 pk sc->sc_intr2ipl = CPU_ISSUN4C
292 1.19 pk ? intr_sbus2ipl_4c
293 1.19 pk : intr_sbus2ipl_4m;
294 1.19 pk
295 1.19 pk /*
296 1.19 pk * Record clock frequency for synchronous SCSI.
297 1.19 pk * IS THIS THE CORRECT DEFAULT??
298 1.19 pk */
299 1.41 eeh sc->sc_clockfreq = PROM_getpropint(node, "clock-frequency", 25*1000*1000);
300 1.19 pk printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
301 1.19 pk
302 1.32 pk sbus_sc = sc;
303 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
304 1.19 pk }
305 1.19 pk
306 1.32 pk
307 1.19 pk void
308 1.19 pk sbus_attach_iommu(parent, self, aux)
309 1.19 pk struct device *parent;
310 1.19 pk struct device *self;
311 1.19 pk void *aux;
312 1.19 pk {
313 1.19 pk struct sbus_softc *sc = (struct sbus_softc *)self;
314 1.19 pk struct iommu_attach_args *ia = aux;
315 1.19 pk int node = ia->iom_node;
316 1.19 pk
317 1.19 pk sc->sc_bustag = ia->iom_bustag;
318 1.19 pk sc->sc_dmatag = ia->iom_dmatag;
319 1.19 pk
320 1.32 pk if (ia->iom_nreg == 0)
321 1.32 pk panic("%s: no Sbus registers", self->dv_xname);
322 1.32 pk
323 1.45 pk if (bus_space_map(ia->iom_bustag,
324 1.46 thorpej BUS_ADDR(ia->iom_reg[0].oa_space,
325 1.46 thorpej ia->iom_reg[0].oa_base),
326 1.46 thorpej (bus_size_t)ia->iom_reg[0].oa_size,
327 1.32 pk BUS_SPACE_MAP_LINEAR,
328 1.45 pk &sc->sc_bh) != 0) {
329 1.32 pk panic("%s: can't map sbusbusreg", self->dv_xname);
330 1.32 pk }
331 1.32 pk
332 1.19 pk /* Setup interrupt translation tables */
333 1.19 pk sc->sc_intr2ipl = CPU_ISSUN4C ? intr_sbus2ipl_4c : intr_sbus2ipl_4m;
334 1.19 pk
335 1.1 deraadt /*
336 1.1 deraadt * Record clock frequency for synchronous SCSI.
337 1.1 deraadt * IS THIS THE CORRECT DEFAULT??
338 1.1 deraadt */
339 1.41 eeh sc->sc_clockfreq = PROM_getpropint(node, "clock-frequency", 25*1000*1000);
340 1.13 christos printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
341 1.10 abrown
342 1.32 pk sbus_sc = sc;
343 1.32 pk sbuserr_handler = sbus_error;
344 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
345 1.24 pk }
346 1.24 pk
347 1.24 pk void
348 1.24 pk sbus_attach_xbox(parent, self, aux)
349 1.24 pk struct device *parent;
350 1.24 pk struct device *self;
351 1.24 pk void *aux;
352 1.24 pk {
353 1.24 pk struct sbus_softc *sc = (struct sbus_softc *)self;
354 1.24 pk struct xbox_attach_args *xa = aux;
355 1.24 pk int node = xa->xa_node;
356 1.24 pk
357 1.24 pk sc->sc_bustag = xa->xa_bustag;
358 1.24 pk sc->sc_dmatag = xa->xa_dmatag;
359 1.24 pk
360 1.24 pk /* Setup interrupt translation tables */
361 1.24 pk sc->sc_intr2ipl = CPU_ISSUN4C ? intr_sbus2ipl_4c : intr_sbus2ipl_4m;
362 1.24 pk
363 1.24 pk /*
364 1.24 pk * Record clock frequency for synchronous SCSI.
365 1.24 pk * IS THIS THE CORRECT DEFAULT??
366 1.24 pk */
367 1.41 eeh sc->sc_clockfreq = PROM_getpropint(node, "clock-frequency", 25*1000*1000);
368 1.24 pk printf(": clock = %s MHz\n", clockfreq(sc->sc_clockfreq));
369 1.24 pk
370 1.36 pk sbus_attach_common(sc, "sbus", node, NULL);
371 1.19 pk }
372 1.19 pk
373 1.19 pk void
374 1.36 pk sbus_attach_common(sc, busname, busnode, specials)
375 1.19 pk struct sbus_softc *sc;
376 1.19 pk char *busname;
377 1.19 pk int busnode;
378 1.19 pk const char * const *specials;
379 1.19 pk {
380 1.19 pk int node0, node, error;
381 1.19 pk const char *sp;
382 1.19 pk const char *const *ssp;
383 1.19 pk bus_space_tag_t sbt;
384 1.19 pk struct sbus_attach_args sa;
385 1.19 pk
386 1.19 pk sbt = sbus_alloc_bustag(sc);
387 1.19 pk
388 1.10 abrown /*
389 1.10 abrown * Get the SBus burst transfer size if burst transfers are supported
390 1.10 abrown */
391 1.41 eeh sc->sc_burst = PROM_getpropint(busnode, "burst-sizes", 0);
392 1.35 pk
393 1.35 pk
394 1.35 pk if (CPU_ISSUN4M) {
395 1.35 pk /*
396 1.35 pk * Some models (e.g. SS20) erroneously report 64-bit
397 1.35 pk * burst capability. We mask it out here for all SUN4Ms,
398 1.35 pk * since probably no member of that class supports
399 1.35 pk * 64-bit Sbus bursts.
400 1.35 pk */
401 1.35 pk sc->sc_burst &= ~SBUS_BURST_64;
402 1.35 pk }
403 1.1 deraadt
404 1.19 pk /*
405 1.19 pk * Collect address translations from the OBP.
406 1.19 pk */
407 1.41 eeh error = PROM_getprop(busnode, "ranges", sizeof(struct rom_range),
408 1.48 thorpej &sbt->nranges, (void **) &sbt->ranges);
409 1.19 pk switch (error) {
410 1.19 pk case 0:
411 1.19 pk break;
412 1.19 pk case ENOENT:
413 1.19 pk /* Fall back to our own `range' construction */
414 1.48 thorpej sbt->ranges = sbus_translations;
415 1.48 thorpej sbt->nranges =
416 1.19 pk sizeof(sbus_translations)/sizeof(sbus_translations[0]);
417 1.19 pk break;
418 1.19 pk default:
419 1.19 pk panic("%s: error getting ranges property", sc->sc_dev.dv_xname);
420 1.16 pk }
421 1.9 pk
422 1.1 deraadt /*
423 1.1 deraadt * Loop through ROM children, fixing any relative addresses
424 1.1 deraadt * and then configuring each device.
425 1.19 pk * `specials' is an array of device names that are treated
426 1.19 pk * specially:
427 1.1 deraadt */
428 1.19 pk node0 = firstchild(busnode);
429 1.19 pk for (ssp = specials ; ssp != NULL && *(sp = *ssp) != 0; ssp++) {
430 1.19 pk if ((node = findnode(node0, sp)) == 0) {
431 1.19 pk panic("could not find %s amongst %s devices",
432 1.19 pk sp, busname);
433 1.19 pk }
434 1.19 pk
435 1.19 pk if (sbus_setup_attach_args(sc, sbt, sc->sc_dmatag,
436 1.36 pk node, &sa) != 0) {
437 1.19 pk panic("sbus_attach: %s: incomplete", sp);
438 1.19 pk }
439 1.19 pk (void) config_found(&sc->sc_dev, (void *)&sa, sbus_print);
440 1.26 pk sbus_destroy_attach_args(&sa);
441 1.19 pk }
442 1.19 pk
443 1.19 pk for (node = node0; node; node = nextsibling(node)) {
444 1.41 eeh char *name = PROM_getpropstring(node, "name");
445 1.19 pk for (ssp = specials, sp = NULL;
446 1.19 pk ssp != NULL && (sp = *ssp) != NULL;
447 1.19 pk ssp++)
448 1.19 pk if (strcmp(name, sp) == 0)
449 1.19 pk break;
450 1.19 pk
451 1.19 pk if (sp != NULL)
452 1.19 pk /* Already configured as an "early" device */
453 1.19 pk continue;
454 1.19 pk
455 1.19 pk if (sbus_setup_attach_args(sc, sbt, sc->sc_dmatag,
456 1.36 pk node, &sa) != 0) {
457 1.19 pk printf("sbus_attach: %s: incomplete\n", name);
458 1.1 deraadt continue;
459 1.19 pk }
460 1.19 pk (void) config_found(&sc->sc_dev, (void *)&sa, sbus_print);
461 1.26 pk sbus_destroy_attach_args(&sa);
462 1.19 pk }
463 1.19 pk }
464 1.9 pk
465 1.19 pk int
466 1.36 pk sbus_setup_attach_args(sc, bustag, dmatag, node, sa)
467 1.19 pk struct sbus_softc *sc;
468 1.19 pk bus_space_tag_t bustag;
469 1.19 pk bus_dma_tag_t dmatag;
470 1.19 pk int node;
471 1.19 pk struct sbus_attach_args *sa;
472 1.19 pk {
473 1.32 pk int n, error;
474 1.19 pk
475 1.19 pk bzero(sa, sizeof(struct sbus_attach_args));
476 1.41 eeh error = PROM_getprop(node, "name", 1, &n, (void **)&sa->sa_name);
477 1.26 pk if (error != 0)
478 1.26 pk return (error);
479 1.26 pk sa->sa_name[n] = '\0';
480 1.26 pk
481 1.19 pk sa->sa_bustag = bustag;
482 1.19 pk sa->sa_dmatag = dmatag;
483 1.19 pk sa->sa_node = node;
484 1.39 eeh sa->sa_frequency = sc->sc_clockfreq;
485 1.19 pk
486 1.46 thorpej error = PROM_getprop(node, "reg", sizeof(struct openprom_addr),
487 1.28 pk &sa->sa_nreg, (void **)&sa->sa_reg);
488 1.26 pk if (error != 0) {
489 1.26 pk char buf[32];
490 1.26 pk if (error != ENOENT ||
491 1.26 pk !node_has_property(node, "device_type") ||
492 1.41 eeh strcmp(PROM_getpropstringA(node, "device_type", buf, sizeof buf),
493 1.26 pk "hierarchical") != 0)
494 1.26 pk return (error);
495 1.26 pk }
496 1.26 pk for (n = 0; n < sa->sa_nreg; n++) {
497 1.26 pk /* Convert to relative addressing, if necessary */
498 1.46 thorpej u_int32_t base = sa->sa_reg[n].oa_base;
499 1.26 pk if (SBUS_ABS(base)) {
500 1.46 thorpej sa->sa_reg[n].oa_space = SBUS_ABS_TO_SLOT(base);
501 1.46 thorpej sa->sa_reg[n].oa_base = SBUS_ABS_TO_OFFSET(base);
502 1.26 pk }
503 1.9 pk }
504 1.19 pk
505 1.26 pk if ((error = sbus_get_intr(sc, node, &sa->sa_intr, &sa->sa_nintr)) != 0)
506 1.19 pk return (error);
507 1.19 pk
508 1.41 eeh error = PROM_getprop(node, "address", sizeof(u_int32_t),
509 1.31 pk &sa->sa_npromvaddrs, (void **)&sa->sa_promvaddrs);
510 1.26 pk if (error != 0 && error != ENOENT)
511 1.19 pk return (error);
512 1.19 pk
513 1.19 pk return (0);
514 1.9 pk }
515 1.9 pk
516 1.26 pk void
517 1.26 pk sbus_destroy_attach_args(sa)
518 1.26 pk struct sbus_attach_args *sa;
519 1.26 pk {
520 1.26 pk if (sa->sa_name != NULL)
521 1.26 pk free(sa->sa_name, M_DEVBUF);
522 1.26 pk
523 1.26 pk if (sa->sa_nreg != 0)
524 1.26 pk free(sa->sa_reg, M_DEVBUF);
525 1.26 pk
526 1.26 pk if (sa->sa_intr)
527 1.26 pk free(sa->sa_intr, M_DEVBUF);
528 1.26 pk
529 1.26 pk if (sa->sa_promvaddrs)
530 1.26 pk free(sa->sa_promvaddrs, M_DEVBUF);
531 1.26 pk
532 1.26 pk bzero(sa, sizeof(struct sbus_attach_args));/*DEBUG*/
533 1.26 pk }
534 1.26 pk
535 1.40 eeh bus_addr_t
536 1.40 eeh sbus_bus_addr(t, btype, offset)
537 1.40 eeh bus_space_tag_t t;
538 1.40 eeh u_int btype;
539 1.40 eeh u_int offset;
540 1.40 eeh {
541 1.40 eeh
542 1.44 uwe /* XXX: sbus_bus_addr should be g/c'ed */
543 1.44 uwe return (BUS_ADDR(btype, offset));
544 1.1 deraadt }
545 1.1 deraadt
546 1.19 pk
547 1.1 deraadt /*
548 1.1 deraadt * Each attached device calls sbus_establish after it initializes
549 1.1 deraadt * its sbusdev portion.
550 1.1 deraadt */
551 1.1 deraadt void
552 1.1 deraadt sbus_establish(sd, dev)
553 1.1 deraadt register struct sbusdev *sd;
554 1.1 deraadt register struct device *dev;
555 1.1 deraadt {
556 1.9 pk register struct sbus_softc *sc;
557 1.9 pk register struct device *curdev;
558 1.9 pk
559 1.9 pk /*
560 1.9 pk * We have to look for the sbus by name, since it is not necessarily
561 1.9 pk * our immediate parent (i.e. sun4m /iommu/sbus/espdma/esp)
562 1.9 pk * We don't just use the device structure of the above-attached
563 1.9 pk * sbus, since we might (in the future) support multiple sbus's.
564 1.9 pk */
565 1.9 pk for (curdev = dev->dv_parent; ; curdev = curdev->dv_parent) {
566 1.9 pk if (!curdev || !curdev->dv_xname)
567 1.15 pk panic("sbus_establish: can't find sbus parent for %s",
568 1.15 pk sd->sd_dev->dv_xname
569 1.15 pk ? sd->sd_dev->dv_xname
570 1.15 pk : "<unknown>" );
571 1.9 pk
572 1.9 pk if (strncmp(curdev->dv_xname, "sbus", 4) == 0)
573 1.15 pk break;
574 1.9 pk }
575 1.9 pk sc = (struct sbus_softc *) curdev;
576 1.1 deraadt
577 1.1 deraadt sd->sd_dev = dev;
578 1.1 deraadt sd->sd_bchain = sc->sc_sbdev;
579 1.1 deraadt sc->sc_sbdev = sd;
580 1.1 deraadt }
581 1.1 deraadt
582 1.1 deraadt /*
583 1.1 deraadt * Reset the given sbus. (???)
584 1.1 deraadt */
585 1.1 deraadt void
586 1.1 deraadt sbusreset(sbus)
587 1.1 deraadt int sbus;
588 1.1 deraadt {
589 1.1 deraadt register struct sbusdev *sd;
590 1.8 thorpej struct sbus_softc *sc = sbus_cd.cd_devs[sbus];
591 1.1 deraadt struct device *dev;
592 1.1 deraadt
593 1.13 christos printf("reset %s:", sc->sc_dev.dv_xname);
594 1.1 deraadt for (sd = sc->sc_sbdev; sd != NULL; sd = sd->sd_bchain) {
595 1.1 deraadt if (sd->sd_reset) {
596 1.1 deraadt dev = sd->sd_dev;
597 1.1 deraadt (*sd->sd_reset)(dev);
598 1.13 christos printf(" %s", dev->dv_xname);
599 1.1 deraadt }
600 1.1 deraadt }
601 1.1 deraadt }
602 1.19 pk
603 1.19 pk
604 1.19 pk /*
605 1.19 pk * Get interrupt attributes for an Sbus device.
606 1.19 pk */
607 1.19 pk int
608 1.26 pk sbus_get_intr(sc, node, ipp, np)
609 1.19 pk struct sbus_softc *sc;
610 1.19 pk int node;
611 1.46 thorpej struct openprom_intr **ipp;
612 1.26 pk int *np;
613 1.19 pk {
614 1.26 pk int error, n;
615 1.26 pk u_int32_t *ipl = NULL;
616 1.19 pk
617 1.19 pk /*
618 1.19 pk * The `interrupts' property contains the Sbus interrupt level.
619 1.19 pk */
620 1.46 thorpej if (PROM_getprop(node, "interrupts", sizeof(int), np,
621 1.46 thorpej (void **)&ipl) == 0) {
622 1.46 thorpej /* Change format to an `struct openprom_intr' array */
623 1.46 thorpej struct openprom_intr *ip;
624 1.46 thorpej ip = malloc(*np * sizeof(struct openprom_intr), M_DEVBUF,
625 1.46 thorpej M_NOWAIT);
626 1.42 mrg if (ip == NULL) {
627 1.42 mrg free(ipl, M_DEVBUF);
628 1.26 pk return (ENOMEM);
629 1.42 mrg }
630 1.26 pk for (n = 0; n < *np; n++) {
631 1.46 thorpej ip[n].oi_pri = ipl[n];
632 1.46 thorpej ip[n].oi_vec = 0;
633 1.26 pk }
634 1.19 pk free(ipl, M_DEVBUF);
635 1.26 pk *ipp = ip;
636 1.19 pk return (0);
637 1.19 pk }
638 1.19 pk
639 1.19 pk /*
640 1.19 pk * Fall back on `intr' property.
641 1.19 pk */
642 1.26 pk *ipp = NULL;
643 1.46 thorpej error = PROM_getprop(node, "intr", sizeof(struct openprom_intr),
644 1.28 pk np, (void **)ipp);
645 1.26 pk switch (error) {
646 1.19 pk case 0:
647 1.26 pk for (n = *np; n-- > 0;) {
648 1.46 thorpej (*ipp)[n].oi_pri &= 0xf;
649 1.46 thorpej (*ipp)[n].oi_pri |= SBUS_INTR_COMPAT;
650 1.26 pk }
651 1.26 pk break;
652 1.19 pk case ENOENT:
653 1.26 pk error = 0;
654 1.26 pk break;
655 1.19 pk }
656 1.19 pk
657 1.26 pk return (error);
658 1.19 pk }
659 1.19 pk
660 1.19 pk
661 1.19 pk /*
662 1.19 pk * Install an interrupt handler for an Sbus device.
663 1.19 pk */
664 1.19 pk void *
665 1.55 pk sbus_intr_establish(t, pri, level, handler, arg, fastvec)
666 1.22 pk bus_space_tag_t t;
667 1.38 pk int pri;
668 1.19 pk int level;
669 1.19 pk int (*handler) __P((void *));
670 1.19 pk void *arg;
671 1.54 pk void (*fastvec) __P((void));
672 1.19 pk {
673 1.22 pk struct sbus_softc *sc = t->cookie;
674 1.19 pk struct intrhand *ih;
675 1.38 pk int pil;
676 1.19 pk
677 1.19 pk ih = (struct intrhand *)
678 1.19 pk malloc(sizeof(struct intrhand), M_DEVBUF, M_NOWAIT);
679 1.19 pk if (ih == NULL)
680 1.19 pk return (NULL);
681 1.19 pk
682 1.38 pk /*
683 1.38 pk * Translate Sbus interrupt priority to CPU interrupt level
684 1.38 pk */
685 1.54 pk if ((pri & SBUS_INTR_COMPAT) != 0)
686 1.38 pk pil = pri & ~SBUS_INTR_COMPAT;
687 1.19 pk else
688 1.38 pk pil = sc->sc_intr2ipl[pri];
689 1.19 pk
690 1.19 pk ih->ih_fun = handler;
691 1.19 pk ih->ih_arg = arg;
692 1.54 pk intr_establish(pil, level, ih, fastvec);
693 1.19 pk return (ih);
694 1.19 pk }
695 1.19 pk
696 1.19 pk static bus_space_tag_t
697 1.19 pk sbus_alloc_bustag(sc)
698 1.19 pk struct sbus_softc *sc;
699 1.19 pk {
700 1.19 pk bus_space_tag_t sbt;
701 1.19 pk
702 1.19 pk sbt = (bus_space_tag_t)
703 1.19 pk malloc(sizeof(struct sparc_bus_space_tag), M_DEVBUF, M_NOWAIT);
704 1.19 pk if (sbt == NULL)
705 1.19 pk return (NULL);
706 1.19 pk
707 1.19 pk bzero(sbt, sizeof *sbt);
708 1.19 pk sbt->cookie = sc;
709 1.22 pk sbt->parent = sc->sc_bustag;
710 1.48 thorpej sbt->sparc_bus_map = sc->sc_bustag->sparc_bus_map;
711 1.48 thorpej sbt->sparc_bus_mmap = sc->sc_bustag->sparc_bus_mmap;
712 1.19 pk sbt->sparc_intr_establish = sbus_intr_establish;
713 1.19 pk return (sbt);
714 1.32 pk }
715 1.32 pk
716 1.32 pk int
717 1.32 pk sbus_error()
718 1.32 pk {
719 1.32 pk struct sbus_softc *sc = sbus_sc;
720 1.32 pk bus_space_handle_t bh = sc->sc_bh;
721 1.32 pk u_int32_t afsr, afva;
722 1.32 pk char bits[64];
723 1.32 pk static int straytime, nstray;
724 1.32 pk int timesince;
725 1.32 pk
726 1.32 pk afsr = bus_space_read_4(sc->sc_bustag, bh, SBUS_AFSR_REG);
727 1.32 pk afva = bus_space_read_4(sc->sc_bustag, bh, SBUS_AFAR_REG);
728 1.32 pk printf("sbus error:\n\tAFSR %s\n",
729 1.32 pk bitmask_snprintf(afsr, SBUS_AFSR_BITS, bits, sizeof(bits)));
730 1.32 pk printf("\taddress: 0x%x%x\n", afsr & SBUS_AFSR_PAH, afva);
731 1.32 pk
732 1.32 pk /* For now, do the same dance as on stray interrupts */
733 1.32 pk timesince = time.tv_sec - straytime;
734 1.32 pk if (timesince <= 10) {
735 1.32 pk if (++nstray > 9)
736 1.32 pk panic("too many SBus errors");
737 1.32 pk } else {
738 1.32 pk straytime = time.tv_sec;
739 1.32 pk nstray = 1;
740 1.32 pk }
741 1.32 pk
742 1.32 pk /* Unlock registers and clear interrupt */
743 1.32 pk bus_space_write_4(sc->sc_bustag, bh, SBUS_AFSR_REG, afsr);
744 1.32 pk
745 1.32 pk return (0);
746 1.19 pk }
747