xref: /netbsd-src/sys/dev/isa/isa.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: isa.c,v 1.119 2004/09/14 17:38:30 drochner Exp $	*/
2 
3 /*-
4  * Copyright (c) 1998, 2001 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; by Jason R. Thorpe of Wasabi Systems, Inc.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *        This product includes software developed by the NetBSD
21  *        Foundation, Inc. and its contributors.
22  * 4. Neither the name of The NetBSD Foundation nor the names of its
23  *    contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  */
38 
39 #include <sys/cdefs.h>
40 __KERNEL_RCSID(0, "$NetBSD: isa.c,v 1.119 2004/09/14 17:38:30 drochner Exp $");
41 
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/malloc.h>
46 #include <sys/device.h>
47 
48 #include <machine/intr.h>
49 
50 #include <dev/isa/isareg.h>
51 #include <dev/isa/isavar.h>
52 #include <dev/isa/isadmareg.h>
53 
54 #include "isadma.h"
55 
56 #include "isapnp.h"
57 #if NISAPNP > 0
58 #include <dev/isapnp/isapnpreg.h>
59 #include <dev/isapnp/isapnpvar.h>
60 #endif
61 
62 #include "locators.h"
63 
64 int	isamatch(struct device *, struct cfdata *, void *);
65 void	isaattach(struct device *, struct device *, void *);
66 int	isarescan(struct device *, const char *, const int *);
67 void	isachilddetached(struct device *, struct device *);
68 int	isaprint(void *, const char *);
69 
70 CFATTACH_DECL2(isa, sizeof(struct isa_softc),
71     isamatch, isaattach, NULL, NULL, isarescan, isachilddetached);
72 
73 void	isa_attach_knowndevs(struct isa_softc *);
74 void	isa_free_knowndevs(struct isa_softc *);
75 
76 int	isasubmatch(struct device *, struct cfdata *, const locdesc_t *, void *);
77 int	isasearch(struct device *, struct cfdata *, const locdesc_t *, void *);
78 
79 int
80 isamatch(struct device *parent, struct cfdata *cf, void *aux)
81 {
82 	/* XXX check other indicators */
83 
84         return (1);
85 }
86 
87 void
88 isaattach(struct device *parent, struct device *self, void *aux)
89 {
90 	struct isa_softc *sc = (struct isa_softc *)self;
91 	struct isabus_attach_args *iba = aux;
92 	static const int wildcard[7] = {
93 		ISACF_PORT_DEFAULT, ISACF_SIZE_DEFAULT,
94 		ISACF_IOMEM_DEFAULT, ISACF_IOSIZ_DEFAULT,
95 		ISACF_IRQ_DEFAULT, ISACF_DRQ_DEFAULT, ISACF_DRQ2_DEFAULT
96 	};
97 
98 	TAILQ_INIT(&sc->sc_knowndevs);
99 	sc->sc_dynamicdevs = 0;
100 
101 	isa_attach_hook(parent, self, iba);
102 	printf("\n");
103 
104 	/* XXX Add code to fetch known-devices. */
105 
106 	sc->sc_iot = iba->iba_iot;
107 	sc->sc_memt = iba->iba_memt;
108 	sc->sc_dmat = iba->iba_dmat;
109 	sc->sc_ic = iba->iba_ic;
110 
111 #if NISAPNP > 0
112 	/*
113 	 * Reset isapnp cards that the bios configured for us
114 	 */
115 	isapnp_isa_attach_hook(sc);
116 #endif
117 
118 #if NISADMA > 0
119 	/*
120 	 * Initialize our DMA state.
121 	 */
122 	isa_dmainit(sc->sc_ic, sc->sc_iot, sc->sc_dmat, self);
123 #endif
124 
125 	/* Attach all direct-config children. */
126 	isa_attach_knowndevs(sc);
127 
128 	/*
129 	 * If we don't support dynamic hello/goodbye of devices,
130 	 * then free the knowndevs info now.
131 	 */
132 	if (sc->sc_dynamicdevs == 0)
133 		isa_free_knowndevs(sc);
134 
135 	/* Attach all indrect-config children. */
136 	isarescan(self, "isa", wildcard);
137 }
138 
139 int
140 isarescan(struct device *self, const char *ifattr, const int *locators)
141 {
142 	int help[8];
143 	locdesc_t *ldesc = (void *)help; /* XXX */;
144 
145 	ldesc->len = 7;
146 	memcpy(&ldesc->locs, locators, 7 * sizeof(int));
147 
148 	/*
149 	 * XXX Bus independant code calling this function does not
150 	 * know the locator default values. It assumes "-1" for now.
151 	 * (should be made available by "config" one day)
152 	 * So fixup where the "-1" is not correct.
153 	 */
154 	if (ldesc->locs[ISACF_SIZE] == -1)
155 		ldesc->locs[ISACF_SIZE] = ISACF_SIZE_DEFAULT;
156 	if (ldesc->locs[ISACF_IOSIZ] == -1)
157 		ldesc->locs[ISACF_IOSIZ] = ISACF_IOSIZ_DEFAULT;
158 
159 	config_search_loc(isasearch, self, ifattr, ldesc, NULL);
160 	return (0);
161 }
162 
163 void
164 isachilddetached(struct device *self, struct device *child)
165 {
166 	/* nothing to do */
167 }
168 
169 void
170 isa_attach_knowndevs(struct isa_softc *sc)
171 {
172 	struct isa_attach_args ia;
173 	struct isa_knowndev *ik;
174 
175 	if (TAILQ_EMPTY(&sc->sc_knowndevs))
176 		return;
177 
178 	TAILQ_FOREACH(ik, &sc->sc_knowndevs, ik_list) {
179 		if (ik->ik_claimed != NULL)
180 			continue;
181 
182 		ia.ia_iot = sc->sc_iot;
183 		ia.ia_memt = sc->sc_memt;
184 		ia.ia_dmat = sc->sc_dmat;
185 		ia.ia_ic = sc->sc_ic;
186 
187 		ia.ia_pnpname = ik->ik_pnpname;
188 		ia.ia_pnpcompatnames = ik->ik_pnpcompatnames;
189 
190 		ia.ia_io = ik->ik_io;
191 		ia.ia_nio = ik->ik_nio;
192 
193 		ia.ia_iomem = ik->ik_iomem;
194 		ia.ia_niomem = ik->ik_niomem;
195 
196 		ia.ia_irq = ik->ik_irq;
197 		ia.ia_nirq = ik->ik_nirq;
198 
199 		ia.ia_drq = ik->ik_drq;
200 		ia.ia_ndrq = ik->ik_ndrq;
201 
202 		ia.ia_aux = NULL;
203 
204 		/* XXX should setup locator array */
205 
206 		ik->ik_claimed = config_found_sm_loc(&sc->sc_dev,
207 		    "isa", 0, &ia, isaprint, isasubmatch);
208 	}
209 }
210 
211 void
212 isa_free_knowndevs(struct isa_softc *sc)
213 {
214 	struct isa_knowndev *ik;
215 	struct isa_pnpname *ipn;
216 
217 #define	FREEIT(x)	if (x != NULL) free(x, M_DEVBUF)
218 
219 	while ((ik = TAILQ_FIRST(&sc->sc_knowndevs)) != NULL) {
220 		TAILQ_REMOVE(&sc->sc_knowndevs, ik, ik_list);
221 		FREEIT(ik->ik_pnpname);
222 		while ((ipn = ik->ik_pnpcompatnames) != NULL) {
223 			ik->ik_pnpcompatnames = ipn->ipn_next;
224 			free(ipn->ipn_name, M_DEVBUF);
225 			free(ipn, M_DEVBUF);
226 		}
227 		FREEIT(ik->ik_io);
228 		FREEIT(ik->ik_iomem);
229 		FREEIT(ik->ik_irq);
230 		FREEIT(ik->ik_drq);
231 		free(ik, M_DEVBUF);
232 	}
233 
234 #undef FREEIT
235 }
236 
237 static int
238 checkattachargs(struct isa_attach_args *ia, const int *loc)
239 {
240 	int i;
241 
242 	if (ia->ia_nio == 0) {
243 		if (loc[ISACF_PORT] != ISACF_PORT_DEFAULT)
244 			return (0);
245 	} else {
246 		if (loc[ISACF_PORT] != ISACF_PORT_DEFAULT &&
247 		    loc[ISACF_PORT] != ia->ia_io[0].ir_addr)
248 			return (0);
249 	}
250 
251 	if (ia->ia_niomem == 0) {
252 		if (loc[ISACF_IOMEM] != ISACF_IOMEM_DEFAULT)
253 			return (0);
254 	} else {
255 		if (loc[ISACF_IOMEM] != ISACF_IOMEM_DEFAULT &&
256 		    loc[ISACF_IOMEM] != ia->ia_iomem[0].ir_addr)
257 			return (0);
258 	}
259 
260 	if (ia->ia_nirq == 0) {
261 		if (loc[ISACF_IRQ] != ISACF_IRQ_DEFAULT)
262 			return (0);
263 	} else {
264 		if (loc[ISACF_IRQ] != ISACF_IRQ_DEFAULT &&
265 		    loc[ISACF_IRQ] != ia->ia_irq[0].ir_irq)
266 			return (0);
267 	}
268 
269 	if (ia->ia_ndrq == 0) {
270 		if (loc[ISACF_DRQ] != ISACF_DRQ_DEFAULT)
271 			return (0);
272 		if (loc[ISACF_DRQ2] != ISACF_DRQ2_DEFAULT)
273 			return (0);
274 	} else {
275 		for (i = 0; i < 2; i++) {
276 			if (i == ia->ia_ndrq)
277 				break;
278 			if (loc[ISACF_DRQ + i] != ISACF_DRQ_DEFAULT &&
279 			    loc[ISACF_DRQ + i] != ia->ia_drq[i].ir_drq)
280 				return (0);
281 		}
282 		for (; i < 2; i++) {
283 			if (loc[ISACF_DRQ + i] != ISACF_DRQ_DEFAULT)
284 				return (0);
285 		}
286 	}
287 
288 	return (1);
289 }
290 
291 int
292 isasubmatch(struct device *parent, struct cfdata *cf,
293 	    const locdesc_t *ldesc, void *aux)
294 {
295 	struct isa_attach_args *ia = aux;
296 
297 	if (!checkattachargs(ia, cf->cf_loc))
298 		return (0);
299 
300 	return (config_match(parent, cf, aux));
301 }
302 
303 int
304 isaprint(void *aux, const char *isa)
305 {
306 	struct isa_attach_args *ia = aux;
307 	const char *sep;
308 	int i;
309 
310 	/*
311 	 * This block of code only fires if we have a direct-config'd
312 	 * device for which there is no driver match.
313 	 */
314 	if (isa != NULL) {
315 		struct isa_pnpname *ipn;
316 
317 		if (ia->ia_pnpname != NULL)
318 			aprint_normal("%s", ia->ia_pnpname);
319 		if ((ipn = ia->ia_pnpcompatnames) != NULL) {
320 			aprint_normal(" (");	/* ) */
321 			for (sep = ""; ipn != NULL;
322 			     ipn = ipn->ipn_next, sep = " ") {
323 				aprint_normal("%s%s", sep, ipn->ipn_name);
324 			}
325 	/* ( */		aprint_normal(")");
326 		}
327 		aprint_normal(" at %s", isa);
328 	}
329 
330 	if (ia->ia_nio) {
331 		sep = "";
332 		aprint_normal(" port ");
333 		for (i = 0; i < ia->ia_nio; i++) {
334 			if (ia->ia_io[i].ir_size == 0)
335 				continue;
336 			aprint_normal("%s0x%x", sep, ia->ia_io[i].ir_addr);
337 			if (ia->ia_io[i].ir_size > 1)
338 				aprint_normal("-0x%x", ia->ia_io[i].ir_addr +
339 				    ia->ia_io[i].ir_size - 1);
340 			sep = ",";
341 		}
342 	}
343 
344 	if (ia->ia_niomem) {
345 		sep = "";
346 		aprint_normal(" iomem ");
347 		for (i = 0; i < ia->ia_niomem; i++) {
348 			if (ia->ia_iomem[i].ir_size == 0)
349 				continue;
350 			aprint_normal("%s0x%x", sep, ia->ia_iomem[i].ir_addr);
351 			if (ia->ia_iomem[i].ir_size > 1)
352 				aprint_normal("-0x%x", ia->ia_iomem[i].ir_addr +
353 				    ia->ia_iomem[i].ir_size - 1);
354 			sep = ",";
355 		}
356 	}
357 
358 	if (ia->ia_nirq) {
359 		sep = "";
360 		aprint_normal(" irq ");
361 		for (i = 0; i < ia->ia_nirq; i++) {
362 			if (ia->ia_irq[i].ir_irq == ISACF_IRQ_DEFAULT)
363 				continue;
364 			aprint_normal("%s%d", sep, ia->ia_irq[i].ir_irq);
365 			sep = ",";
366 		}
367 	}
368 
369 	if (ia->ia_ndrq) {
370 		sep = "";
371 		aprint_normal(" drq ");
372 		for (i = 0; i < ia->ia_ndrq; i++) {
373 			if (ia->ia_drq[i].ir_drq == ISACF_DRQ_DEFAULT)
374 				continue;
375 			aprint_normal("%s%d", sep, ia->ia_drq[i].ir_drq);
376 			sep = ",";
377 		}
378 	}
379 
380 	return (UNCONF);
381 }
382 
383 int
384 isasearch(struct device *parent, struct cfdata *cf,
385 	  const locdesc_t *ldesc, void *aux)
386 {
387 	struct isa_io res_io[1];
388 	struct isa_iomem res_mem[1];
389 	struct isa_irq res_irq[1];
390 	struct isa_drq res_drq[2];
391 	struct isa_softc *sc = (struct isa_softc *)parent;
392 	struct isa_attach_args ia;
393 	int help[8];
394 	locdesc_t *locs = (void *)&help; /* XXX */
395 	int tryagain;
396 
397 	do {
398 		ia.ia_pnpname = NULL;
399 		ia.ia_pnpcompatnames = NULL;
400 
401 		res_io[0].ir_addr = cf->cf_loc[ISACF_PORT];
402 		res_io[0].ir_size = 0;
403 
404 		res_mem[0].ir_addr = cf->cf_loc[ISACF_IOMEM];
405 		res_mem[0].ir_size = cf->cf_loc[ISACF_IOSIZ];
406 
407 		res_irq[0].ir_irq =
408 		    cf->cf_loc[ISACF_IRQ] == 2 ? 9 : cf->cf_loc[ISACF_IRQ];
409 
410 		res_drq[0].ir_drq = cf->cf_loc[ISACF_DRQ];
411 		res_drq[1].ir_drq = cf->cf_loc[ISACF_DRQ2];
412 
413 		ia.ia_iot = sc->sc_iot;
414 		ia.ia_memt = sc->sc_memt;
415 		ia.ia_dmat = sc->sc_dmat;
416 		ia.ia_ic = sc->sc_ic;
417 
418 		ia.ia_io = res_io;
419 		ia.ia_nio = 1;
420 
421 		ia.ia_iomem = res_mem;
422 		ia.ia_niomem = 1;
423 
424 		ia.ia_irq = res_irq;
425 		ia.ia_nirq = 1;
426 
427 		ia.ia_drq = res_drq;
428 		ia.ia_ndrq = 2;
429 
430 		if (!checkattachargs(&ia, ldesc->locs))
431 			return (0);
432 
433 		tryagain = 0;
434 		if (config_match(parent, cf, &ia) > 0) {
435 			/*
436 			 * This is not necessary for detach, but might
437 			 * still be useful to collect device information.
438 			 */
439 			locs->len = 7;
440 			locs->locs[ISACF_PORT] = ia.ia_io[0].ir_addr;
441 			locs->locs[ISACF_SIZE] = ia.ia_io[0].ir_size;
442 			locs->locs[ISACF_IOMEM] = ia.ia_iomem[0].ir_addr;
443 			locs->locs[ISACF_IOSIZ] = ia.ia_iomem[0].ir_size;
444 			locs->locs[ISACF_IRQ] = ia.ia_irq[0].ir_irq;
445 			locs->locs[ISACF_DRQ] = ia.ia_drq[0].ir_drq;
446 			locs->locs[ISACF_DRQ2] = ia.ia_drq[1].ir_drq;
447 			config_attach_loc(parent, cf, locs, &ia, isaprint);
448 			tryagain = (cf->cf_fstate == FSTATE_STAR);
449 		}
450 	} while (tryagain);
451 
452 	return (0);
453 }
454 
455 char *
456 isa_intr_typename(int type)
457 {
458 
459 	switch (type) {
460         case IST_NONE :
461 		return ("none");
462         case IST_PULSE:
463 		return ("pulsed");
464         case IST_EDGE:
465 		return ("edge-triggered");
466         case IST_LEVEL:
467 		return ("level-triggered");
468 	default:
469 		panic("isa_intr_typename: invalid type %d", type);
470 	}
471 }
472