xref: /netbsd/sys/arch/alpha/pci/sio.c (revision c4a72b64)
1 /* $NetBSD: sio.c,v 1.35 2002/10/02 04:06:39 thorpej Exp $ */
2 
3 /*-
4  * Copyright (c) 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Jason R. Thorpe.
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 /*
40  * Copyright (c) 1995, 1996 Carnegie-Mellon University.
41  * All rights reserved.
42  *
43  * Author: Chris G. Demetriou
44  *
45  * Permission to use, copy, modify and distribute this software and
46  * its documentation is hereby granted, provided that both the copyright
47  * notice and this permission notice appear in all copies of the
48  * software, derivative works or modified versions, and any portions
49  * thereof, and that both notices appear in supporting documentation.
50  *
51  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
52  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
53  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
54  *
55  * Carnegie Mellon requests users of this software to return to
56  *
57  *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
58  *  School of Computer Science
59  *  Carnegie Mellon University
60  *  Pittsburgh PA 15213-3890
61  *
62  * any improvements or extensions that they make and grant Carnegie the
63  * rights to redistribute these changes.
64  */
65 
66 #include "opt_dec_2100_a500.h"
67 #include "opt_dec_2100a_a500.h"
68 #include "eisa.h"
69 
70 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
71 
72 __KERNEL_RCSID(0, "$NetBSD: sio.c,v 1.35 2002/10/02 04:06:39 thorpej Exp $");
73 
74 #include <sys/param.h>
75 #include <sys/systm.h>
76 #include <sys/kernel.h>
77 #include <sys/device.h>
78 #include <sys/malloc.h>
79 
80 #include <machine/intr.h>
81 #include <machine/bus.h>
82 #include <machine/rpb.h>
83 
84 #include <dev/isa/isavar.h>
85 #include <dev/eisa/eisavar.h>
86 
87 #include <dev/pci/pcireg.h>
88 #include <dev/pci/pcivar.h>
89 #include <dev/pci/pcidevs.h>
90 
91 #include <alpha/pci/siovar.h>
92 
93 #if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
94 #include <alpha/pci/pci_2100_a500.h>
95 #include <alpha/sableio/sableiovar.h>
96 #endif
97 
98 struct sio_softc {
99 	struct device	sc_dv;
100 
101 	pci_chipset_tag_t sc_pc;
102 
103 	bus_space_tag_t sc_iot, sc_memt;
104 	bus_dma_tag_t	sc_parent_dmat;
105 	int		sc_haseisa;
106 	int		sc_is82c693;
107 
108 	/* ISA chipset must persist; it's used after autoconfig. */
109 	isa_chipset_tag_t sc_ic;
110 };
111 
112 int	siomatch __P((struct device *, struct cfdata *, void *));
113 void	sioattach __P((struct device *, struct device *, void *));
114 
115 CFATTACH_DECL(sio, sizeof(struct sio_softc),
116     siomatch, sioattach, NULL, NULL);
117 
118 int	pcebmatch __P((struct device *, struct cfdata *, void *));
119 
120 CFATTACH_DECL(pceb, sizeof(struct sio_softc),
121     pcebmatch, sioattach, NULL, NULL);
122 
123 union sio_attach_args {
124 	const char *sa_name;			/* XXX should be common */
125 	struct isabus_attach_args sa_iba;
126 	struct eisabus_attach_args sa_eba;
127 };
128 
129 int	sioprint __P((void *, const char *pnp));
130 void	sio_isa_attach_hook __P((struct device *, struct device *,
131 	    struct isabus_attach_args *));
132 void	sio_eisa_attach_hook __P((struct device *, struct device *,
133 	    struct eisabus_attach_args *));
134 int	sio_eisa_maxslots __P((void *));
135 int	sio_eisa_intr_map __P((void *, u_int, eisa_intr_handle_t *));
136 
137 void	sio_bridge_callback __P((struct device *));
138 
139 int
140 siomatch(parent, match, aux)
141 	struct device *parent;
142 	struct cfdata *match;
143 	void *aux;
144 {
145 	struct pci_attach_args *pa = aux;
146 
147 	/*
148 	 * The Cypress 82C693 is more-or-less an SIO, but with
149 	 * indirect register access.  (XXX for everything, or
150 	 * just the ELCR?)
151 	 */
152 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_CONTAQ &&
153 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_CONTAQ_82C693 &&
154 	    pa->pa_function == 0)
155 		return (1);
156 
157 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
158 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_SIO)
159 		return (1);
160 
161 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_ALI &&
162 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ALI_M1543)
163 		return (1);
164 
165 	return (0);
166 }
167 
168 int
169 pcebmatch(parent, match, aux)
170 	struct device *parent;
171 	struct cfdata *match;
172 	void *aux;
173 {
174 	struct pci_attach_args *pa = aux;
175 
176 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
177 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_PCEB)
178 		return (1);
179 
180 	return (0);
181 }
182 
183 void
184 sioattach(parent, self, aux)
185 	struct device *parent, *self;
186 	void *aux;
187 {
188 	struct sio_softc *sc = (struct sio_softc *)self;
189 	struct pci_attach_args *pa = aux;
190 	char devinfo[256];
191 
192 	pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo);
193 	printf(": %s (rev. 0x%02x)\n", devinfo,
194 	    PCI_REVISION(pa->pa_class));
195 
196 	sc->sc_pc = pa->pa_pc;
197 	sc->sc_iot = pa->pa_iot;
198 	sc->sc_memt = pa->pa_memt;
199 	sc->sc_parent_dmat = pa->pa_dmat;
200 	sc->sc_haseisa = (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
201 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_PCEB);
202 	sc->sc_is82c693 = (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_CONTAQ &&
203 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_CONTAQ_82C693);
204 
205 	config_defer(self, sio_bridge_callback);
206 }
207 
208 void
209 sio_bridge_callback(self)
210 	struct device *self;
211 {
212 	struct sio_softc *sc = (struct sio_softc *)self;
213 	struct alpha_eisa_chipset ec;
214 	union sio_attach_args sa;
215 
216 	if (sc->sc_haseisa) {
217 		ec.ec_v = NULL;
218 		ec.ec_attach_hook = sio_eisa_attach_hook;
219 		ec.ec_maxslots = sio_eisa_maxslots;
220 
221 		/*
222 		 * Deal with platforms that hook EISA interrupts
223 		 * up differently.
224 		 */
225 		switch (cputype) {
226 #if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
227 		case ST_DEC_2100_A500:
228 		case ST_DEC_2100A_A500:
229 			pci_2100_a500_eisa_pickintr(sc->sc_pc, &ec);
230 			break;
231 #endif
232 		default:
233 			ec.ec_intr_map = sio_eisa_intr_map;
234 			ec.ec_intr_string = sio_intr_string;
235 			ec.ec_intr_evcnt = sio_intr_evcnt;
236 			ec.ec_intr_establish = sio_intr_establish;
237 			ec.ec_intr_disestablish = sio_intr_disestablish;
238 		}
239 
240 		sa.sa_eba.eba_busname = "eisa";
241 		sa.sa_eba.eba_iot = sc->sc_iot;
242 		sa.sa_eba.eba_memt = sc->sc_memt;
243 		sa.sa_eba.eba_dmat =
244 		    alphabus_dma_get_tag(sc->sc_parent_dmat, ALPHA_BUS_EISA);
245 		sa.sa_eba.eba_ec = &ec;
246 		config_found(&sc->sc_dv, &sa.sa_eba, sioprint);
247 	}
248 
249 	/*
250 	 * Deal with platforms which have Odd ISA DMA needs.
251 	 */
252 	switch (cputype) {
253 #if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
254 	case ST_DEC_2100_A500:
255 	case ST_DEC_2100A_A500:
256 		sc->sc_ic = sableio_pickisa();
257 		break;
258 #endif
259 	default:
260 		sc->sc_ic = malloc(sizeof(*sc->sc_ic), M_DEVBUF, M_WAITOK);
261 		memset(sc->sc_ic, 0, sizeof(*sc->sc_ic));
262 	}
263 
264 	sc->sc_ic->ic_v = NULL;
265 	sc->sc_ic->ic_attach_hook = sio_isa_attach_hook;
266 
267 	/*
268 	 * Deal with platforms that hook up ISA interrupts differently.
269 	 */
270 	switch (cputype) {
271 #if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
272 	case ST_DEC_2100_A500:
273 	case ST_DEC_2100A_A500:
274 		pci_2100_a500_isa_pickintr(sc->sc_pc, sc->sc_ic);
275 		break;
276 #endif
277 	default:
278 		sc->sc_ic->ic_intr_evcnt = sio_intr_evcnt;
279 		sc->sc_ic->ic_intr_establish = sio_intr_establish;
280 		sc->sc_ic->ic_intr_disestablish = sio_intr_disestablish;
281 		sc->sc_ic->ic_intr_alloc = sio_intr_alloc;
282 	}
283 
284 	sa.sa_iba.iba_busname = "isa";
285 	sa.sa_iba.iba_iot = sc->sc_iot;
286 	sa.sa_iba.iba_memt = sc->sc_memt;
287 	sa.sa_iba.iba_dmat =
288 	    alphabus_dma_get_tag(sc->sc_parent_dmat, ALPHA_BUS_ISA);
289 	sa.sa_iba.iba_ic = sc->sc_ic;
290 	config_found(&sc->sc_dv, &sa.sa_iba, sioprint);
291 }
292 
293 int
294 sioprint(aux, pnp)
295 	void *aux;
296 	const char *pnp;
297 {
298         register union sio_attach_args *sa = aux;
299 
300         if (pnp)
301                 printf("%s at %s", sa->sa_name, pnp);
302         return (UNCONF);
303 }
304 
305 void
306 sio_isa_attach_hook(parent, self, iba)
307 	struct device *parent, *self;
308 	struct isabus_attach_args *iba;
309 {
310 
311 	/* Nothing to do. */
312 }
313 
314 void
315 sio_eisa_attach_hook(parent, self, eba)
316 	struct device *parent, *self;
317 	struct eisabus_attach_args *eba;
318 {
319 
320 #if NEISA > 0
321 	eisa_init();
322 #endif
323 }
324 
325 int
326 sio_eisa_maxslots(v)
327 	void *v;
328 {
329 
330 	return 16;		/* as good a number as any.  only 8, maybe? */
331 }
332 
333 int
334 sio_eisa_intr_map(v, irq, ihp)
335 	void *v;
336 	u_int irq;
337 	eisa_intr_handle_t *ihp;
338 {
339 
340 #define	ICU_LEN		16	/* number of ISA IRQs (XXX) */
341 
342 	if (irq >= ICU_LEN) {
343 		printf("sio_eisa_intr_map: bad IRQ %d\n", irq);
344 		*ihp = -1;
345 		return 1;
346 	}
347 	if (irq == 2) {
348 		printf("sio_eisa_intr_map: changed IRQ 2 to IRQ 9\n");
349 		irq = 9;
350 	}
351 
352 	*ihp = irq;
353 	return 0;
354 }
355