xref: /netbsd-src/sys/arch/hpcmips/tx/txcsbus.c (revision 4d342c046e3288fb5a1edcd33cfec48c41c80664)
1 /*	$NetBSD: txcsbus.c,v 1.22 2012/10/27 17:17:54 chs Exp $ */
2 
3 /*-
4  * Copyright (c) 1999 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by UCHIYAMA Yasushi.
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  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: txcsbus.c,v 1.22 2012/10/27 17:17:54 chs Exp $");
34 
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/device.h>
38 
39 #include <machine/intr.h>
40 #include <machine/bus.h>
41 #include <machine/bus_space_hpcmips.h>
42 
43 #include <machine/platid.h>
44 #include <machine/platid_mask.h>
45 
46 #include <hpcmips/tx/tx39var.h>
47 #include <hpcmips/tx/txcsbusvar.h>
48 #include <hpcmips/tx/tx39biuvar.h>
49 #include <hpcmips/tx/tx39biureg.h>
50 
51 #include "locators.h"
52 
53 /* TX39 CS mapping. (nonconfigurationable) */
54 const struct csmap {
55 	const char *cs_name;
56 	paddr_t	cs_addr;
57 	psize_t	cs_size;
58 } __csmap[] = {
59 	[TX39_CS0]	= {"CS0(ROM)"	, TX39_SYSADDR_CS0	,
60 			   TX39_SYSADDR_CS_SIZE},
61 	[TX39_CS1]	= {"CS1"	, TX39_SYSADDR_CS1	,
62 			   TX39_SYSADDR_CS_SIZE},
63 	[TX39_CS2]	= {"CS2"	, TX39_SYSADDR_CS2	,
64 			   TX39_SYSADDR_CS_SIZE},
65 	[TX39_CS3]	= {"CS3"	, TX39_SYSADDR_CS3	,
66 			   TX39_SYSADDR_CS_SIZE},
67 	[TX39_MCS0]	= {"MCS0"	, TX39_SYSADDR_MCS0	,
68 			   TX39_SYSADDR_MCS_SIZE},
69 	[TX39_MCS1]	= {"MCS1"	, TX39_SYSADDR_MCS1	,
70 			   TX39_SYSADDR_MCS_SIZE},
71 #ifdef TX391X
72 	[TX39_MCS2]	= {"MCS2"	, TX39_SYSADDR_MCS2	,
73 			   TX39_SYSADDR_MCS_SIZE},
74 	[TX39_MCS3]	= {"MCS3"	, TX39_SYSADDR_MCS3	,
75 			   TX39_SYSADDR_MCS_SIZE},
76 #endif /* TX391X */
77 	[TX39_CARD1]	= {"CARD1(io/attr)", TX39_SYSADDR_CARD1	,
78 			   TX39_SYSADDR_CARD_SIZE},
79 	[TX39_CARD2]	= {"CARD2(io/attr)", TX39_SYSADDR_CARD2	,
80 			   TX39_SYSADDR_CARD_SIZE},
81 	[TX39_CARD1MEM]	= {"CARD1(mem)"	, TX39_SYSADDR_CARD1MEM	,
82 			   TX39_SYSADDR_CARD_SIZE},
83 	[TX39_CARD2MEM]	= {"CARD2(mem)"	, TX39_SYSADDR_CARD2MEM	,
84 			   TX39_SYSADDR_CARD_SIZE},
85 	[TX39_KUCS0]	= {"KUCS0"	, TX39_SYSADDR_KUSEG_CS0,
86 			   TX39_SYSADDR_KUCS_SIZE},
87 	[TX39_KUCS1]	= {"KUCS1"	, TX39_SYSADDR_KUSEG_CS1,
88 			   TX39_SYSADDR_KUCS_SIZE},
89 	[TX39_KUCS2]	= {"KUCS2"	, TX39_SYSADDR_KUSEG_CS2,
90 			   TX39_SYSADDR_KUCS_SIZE},
91 	[TX39_KUCS3]	= {"KUCS3"	, TX39_SYSADDR_KUSEG_CS3,
92 			   TX39_SYSADDR_KUCS_SIZE},
93 };
94 
95 int	txcsbus_match(device_t, cfdata_t, void *);
96 void	txcsbus_attach(device_t, device_t, void *);
97 int	txcsbus_print(void *, const char *);
98 int	txcsbus_search(device_t, cfdata_t, const int *, void *);
99 
100 struct txcsbus_softc {
101 	tx_chipset_tag_t sc_tc;
102 	/* chip select space tag */
103 	struct bus_space_tag_hpcmips *sc_cst[TX39_MAXCS];
104 	int sc_pri;
105 };
106 
107 CFATTACH_DECL_NEW(txcsbus, sizeof(struct txcsbus_softc),
108     txcsbus_match, txcsbus_attach, NULL, NULL);
109 
110 static bus_space_tag_t __txcsbus_alloc_cstag(struct txcsbus_softc *,
111     struct cs_handle *);
112 
113 int
114 txcsbus_match(device_t parent, cfdata_t cf, void *aux)
115 {
116 	struct csbus_attach_args *cba = aux;
117 	platid_mask_t mask;
118 
119 	if (strcmp(cba->cba_busname, cf->cf_name))
120 		return (0);
121 
122 	if (cf->cf_loc[TXCSBUSIFCF_PLATFORM] == TXCSBUSIFCF_PLATFORM_DEFAULT)
123 		return (1);
124 
125 	mask = PLATID_DEREF(cf->cf_loc[TXCSBUSIFCF_PLATFORM]);
126 	if (platid_match(&platid, &mask))
127 		return (2);
128 
129 	return (0);
130 }
131 
132 void
133 txcsbus_attach(device_t parent, device_t self, void *aux)
134 {
135 	struct csbus_attach_args *cba = aux;
136 	struct txcsbus_softc *sc = device_private(self);
137 
138 	sc->sc_tc = cba->cba_tc;
139 	printf("\n");
140 
141 	/*
142 	 *	Attach external chip.
143 	 */
144 	/* higher priority devices attach first */
145 	sc->sc_pri = 2;
146 	config_search_ia(txcsbus_search, self, "txcsbus", txcsbus_print);
147 	/* then, normal priority devices */
148 	sc->sc_pri = 1;
149 	config_search_ia(txcsbus_search, self, "txcsbus", txcsbus_print);
150 }
151 
152 int
153 txcsbus_print(void *aux, const char *pnp)
154 {
155 #define PRINTIRQ(i) i, (i) / 32, (i) % 32
156 	struct cs_attach_args *ca = aux;
157 
158 	if (ca->ca_csreg.cs != TXCSBUSCF_REGCS_DEFAULT) {
159 		aprint_normal(" regcs %s %dbit %#x+%#x",
160 		    __csmap[ca->ca_csreg.cs].cs_name,
161 		    ca->ca_csreg.cswidth,
162 		    ca->ca_csreg.csbase,
163 		    ca->ca_csreg.cssize);
164 	}
165 
166 	if (ca->ca_csio.cs != TXCSBUSCF_IOCS_DEFAULT) {
167 		aprint_normal(" iocs %s %dbit %#x+%#x",
168 		    __csmap[ca->ca_csio.cs].cs_name,
169 		    ca->ca_csio.cswidth,
170 		    ca->ca_csio.csbase,
171 		    ca->ca_csio.cssize);
172 	}
173 
174 	if (ca->ca_csmem.cs != TXCSBUSCF_MEMCS_DEFAULT) {
175 		aprint_normal(" memcs %s %dbit %#x+%#x",
176 		    __csmap[ca->ca_csmem.cs].cs_name,
177 		    ca->ca_csmem.cswidth,
178 		    ca->ca_csmem.csbase,
179 		    ca->ca_csmem.cssize);
180 	}
181 
182 	if (ca->ca_irq1 != TXCSBUSCF_IRQ1_DEFAULT) {
183 		aprint_normal(" irq1 %d(%d:%d)", PRINTIRQ(ca->ca_irq1));
184 	}
185 
186 	if (ca->ca_irq2 != TXCSBUSCF_IRQ2_DEFAULT) {
187 		aprint_normal(" irq2 %d(%d:%d)", PRINTIRQ(ca->ca_irq2));
188 	}
189 
190 	if (ca->ca_irq3 != TXCSBUSCF_IRQ3_DEFAULT) {
191 		aprint_normal(" irq3 %d(%d:%d)", PRINTIRQ(ca->ca_irq3));
192 	}
193 
194 	return (UNCONF);
195 }
196 
197 int
198 txcsbus_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
199 {
200 	struct txcsbus_softc *sc = device_private(parent);
201 	struct cs_attach_args ca;
202 
203 	ca.ca_tc		= sc->sc_tc;
204 
205 	ca.ca_csreg.cs		= cf->cf_loc[TXCSBUSCF_REGCS];
206 	ca.ca_csreg.csbase	= cf->cf_loc[TXCSBUSCF_REGCSBASE];
207 	ca.ca_csreg.cssize	= cf->cf_loc[TXCSBUSCF_REGCSSIZE];
208 	ca.ca_csreg.cswidth	= cf->cf_loc[TXCSBUSCF_REGCSWIDTH];
209 
210 	if (ca.ca_csreg.cs != TXCSBUSCF_REGCS_DEFAULT) {
211 		ca.ca_csreg.cstag = __txcsbus_alloc_cstag(sc, &ca.ca_csreg);
212 	}
213 
214 	ca.ca_csio.cs		= cf->cf_loc[TXCSBUSCF_IOCS];
215 	ca.ca_csio.csbase	= cf->cf_loc[TXCSBUSCF_IOCSBASE];
216 	ca.ca_csio.cssize	= cf->cf_loc[TXCSBUSCF_IOCSSIZE];
217 	ca.ca_csio.cswidth	= cf->cf_loc[TXCSBUSCF_IOCSWIDTH];
218 
219 	if (ca.ca_csio.cs != TXCSBUSCF_IOCS_DEFAULT) {
220 		ca.ca_csio.cstag = __txcsbus_alloc_cstag(sc, &ca.ca_csio);
221 	}
222 
223 	ca.ca_csmem.cs		= cf->cf_loc[TXCSBUSCF_MEMCS];
224 	ca.ca_csmem.csbase	= cf->cf_loc[TXCSBUSCF_MEMCSBASE];
225 	ca.ca_csmem.cssize	= cf->cf_loc[TXCSBUSCF_MEMCSSIZE];
226 	ca.ca_csmem.cswidth	= cf->cf_loc[TXCSBUSCF_MEMCSWIDTH];
227 
228 	if (ca.ca_csmem.cs != TXCSBUSCF_MEMCS_DEFAULT) {
229 		ca.ca_csmem.cstag = __txcsbus_alloc_cstag(sc, &ca.ca_csmem);
230 	}
231 
232 	ca.ca_irq1		= cf->cf_loc[TXCSBUSCF_IRQ1];
233 	ca.ca_irq2		= cf->cf_loc[TXCSBUSCF_IRQ2];
234 	ca.ca_irq3		= cf->cf_loc[TXCSBUSCF_IRQ3];
235 
236 	if (config_match(parent, cf, &ca) == sc->sc_pri) {
237 		config_attach(parent, cf, &ca, txcsbus_print);
238 	}
239 
240 	return (0);
241 }
242 
243 bus_space_tag_t
244 __txcsbus_alloc_cstag(struct txcsbus_softc *sc, struct cs_handle *csh)
245 {
246 
247 	tx_chipset_tag_t tc = sc->sc_tc;
248 	int cs = csh->cs;
249 	int width = csh->cswidth;
250 	struct bus_space_tag_hpcmips *iot;
251 	txreg_t reg;
252 
253  	if (!TX39_ISCS(cs) && !TX39_ISMCS(cs) && !TX39_ISCARD(cs) &&
254 	    !TX39_ISKUCS(cs)) {
255 		panic("txcsbus_alloc_tag: bogus chip select %d", cs);
256 	}
257 
258 	/* Already setuped chip select */
259 	if (sc->sc_cst[cs]) {
260 		return (&sc->sc_cst[cs]->bst);
261 	}
262 
263 	iot = hpcmips_alloc_bus_space_tag();
264 	hpcmips_init_bus_space(iot, hpcmips_system_bus_space_hpcmips(),
265 	    __csmap[cs].cs_name, __csmap[cs].cs_addr, __csmap[cs].cs_size);
266 	sc->sc_cst[cs] = iot;
267 
268 	/* CS bus-width (configurationable) */
269 	switch (width) {
270 	default:
271 		panic("txcsbus_alloc_tag: bogus bus width %d", width);
272 
273 	case 32:
274 		if (TX39_ISCS(cs)) {
275 			reg = tx_conf_read(tc, TX39_MEMCONFIG0_REG);
276 			reg |= (1 << cs);
277 			tx_conf_write(tc, TX39_MEMCONFIG0_REG, reg);
278 		} else if(TX39_ISMCS(cs)) {
279 #ifdef TX391X
280 			panic("txcsbus_alloc_tag: MCS is 16bit only");
281 #endif /* TX391X */
282 #ifdef TX392X
283 			reg = tx_conf_read(tc, TX39_MEMCONFIG1_REG);
284 			reg |= ((cs == TX39_MCS0) ?
285 			    TX39_MEMCONFIG1_MCS0_32 :
286 			    TX39_MEMCONFIG1_MCS1_32);
287 			tx_conf_write(tc, TX39_MEMCONFIG1_REG, reg);
288 #endif /* TX392X */
289 		}
290 		break;
291 
292 	case 16:
293 		if (TX39_ISCS(cs)) {
294 			reg = tx_conf_read(tc, TX39_MEMCONFIG0_REG);
295 			reg &= ~(1 << cs);
296 			tx_conf_write(tc, TX39_MEMCONFIG0_REG, reg);
297 		} else if(TX39_ISMCS(cs)) {
298 			/* TX391X always 16bit port */
299 #ifdef TX392X
300 			reg = tx_conf_read(tc, TX39_MEMCONFIG1_REG);
301 			reg &= ~((cs == TX39_MCS0) ?
302 			    TX39_MEMCONFIG1_MCS0_32 :
303 			    TX39_MEMCONFIG1_MCS1_32);
304 			tx_conf_write(tc, TX39_MEMCONFIG1_REG, reg);
305 #endif /* TX392X */
306 		} else if (TX39_ISCARD(cs)) {
307 			/* CARD io/attr or mem */
308 			reg = tx_conf_read(tc, TX39_MEMCONFIG3_REG);
309 
310 			/* enable I/O access */
311 			reg |= (cs == TX39_CARD1) ?
312 			    TX39_MEMCONFIG3_CARD1IOEN :
313 			    TX39_MEMCONFIG3_CARD2IOEN;
314 			/* disable 8bit access */
315 #ifdef TX392X
316 			reg &= ~((cs == TX39_CARD1) ?
317 			    TX39_MEMCONFIG3_CARD1_8SEL :
318 			    TX39_MEMCONFIG3_CARD2_8SEL);
319 #endif /* TX392X */
320 #ifdef TX391X
321 			reg &= ~TX39_MEMCONFIG3_PORT8SEL;
322 #endif /* TX391X */
323 			tx_conf_write(tc, TX39_MEMCONFIG3_REG, reg);
324 		}
325 		break;
326 
327 	case 8:
328 		if (TX39_ISCARD(cs)) {
329 			reg = tx_conf_read(tc, TX39_MEMCONFIG3_REG);
330 
331 			/* enable I/O access */
332 			reg |= (cs == TX39_CARD1) ?
333 			    TX39_MEMCONFIG3_CARD1IOEN :
334 			    TX39_MEMCONFIG3_CARD2IOEN;
335 			/* disable 8bit access */
336 #ifdef TX392X
337 			reg |= (cs == TX39_CARD1) ?
338 			    TX39_MEMCONFIG3_CARD1_8SEL :
339 			    TX39_MEMCONFIG3_CARD2_8SEL;
340 #endif /* TX392X */
341 #ifdef TX391X
342 			reg |= TX39_MEMCONFIG3_PORT8SEL;
343 #endif /* TX391X */
344 			tx_conf_write(tc, TX39_MEMCONFIG3_REG, reg);
345 
346 		} else {
347 			panic("__txcsbus_alloc_cstag: CS%d 8bit mode is"
348 			    "not allowed", cs);
349 		}
350 	}
351 
352 	return (&iot->bst);
353 }
354