xref: /netbsd-src/sys/arch/sgimips/dev/imc.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: imc.c,v 1.23 2004/09/29 03:11:28 sekiya Exp $	*/
2 
3 /*
4  * Copyright (c) 2001 Rafal K. Boni
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 #include <sys/cdefs.h>
31 __KERNEL_RCSID(0, "$NetBSD: imc.c,v 1.23 2004/09/29 03:11:28 sekiya Exp $");
32 
33 #include <sys/param.h>
34 #include <sys/device.h>
35 #include <sys/systm.h>
36 
37 #include <machine/cpu.h>
38 #include <machine/locore.h>
39 #include <machine/autoconf.h>
40 #include <machine/bus.h>
41 #include <machine/machtype.h>
42 #include <machine/sysconf.h>
43 
44 #include <sgimips/dev/imcreg.h>
45 
46 #include "locators.h"
47 
48 struct imc_softc {
49 	struct device sc_dev;
50 
51 	bus_space_tag_t iot;
52 	bus_space_handle_t ioh;
53 
54 	int eisa_present;
55 };
56 
57 static int	imc_match(struct device *, struct cfdata *, void *);
58 static void	imc_attach(struct device *, struct device *, void *);
59 static int	imc_print(void *, const char *);
60 static void	imc_bus_reset(void);
61 static void	imc_bus_error(u_int32_t, u_int32_t, u_int32_t, u_int32_t);
62 static void	imc_watchdog_reset(void);
63 static void	imc_watchdog_disable(void);
64 static void	imc_watchdog_enable(void);
65 
66 CFATTACH_DECL(imc, sizeof(struct imc_softc),
67     imc_match, imc_attach, NULL, NULL);
68 
69 struct imc_attach_args {
70 	const char* iaa_name;
71 
72 	bus_space_tag_t iaa_st;
73 	bus_space_handle_t iaa_sh;
74 
75 /* ? */
76 	long	iaa_offset;
77 	int	iaa_intr;
78 #if 0
79 	int	iaa_stride;
80 #endif
81 };
82 
83 struct imc_softc isc;
84 
85 static int
86 imc_match(struct device *parent, struct cfdata *match, void *aux)
87 {
88 
89 	if ( (mach_type == MACH_SGI_IP22) || (mach_type == MACH_SGI_IP20) )
90 		return (1);
91 
92 	return (0);
93 }
94 
95 static void
96 imc_attach(struct device *parent, struct device *self, void *aux)
97 {
98 	u_int32_t reg;
99 	struct imc_attach_args iaa;
100 	struct mainbus_attach_args *ma = aux;
101 	u_int32_t sysid;
102 
103 	isc.iot = SGIMIPS_BUS_SPACE_HPC;
104 	if (bus_space_map(isc.iot, ma->ma_addr, 0,
105             BUS_SPACE_MAP_LINEAR, &isc.ioh))
106                 panic("imc_attach: could not allocate memory\n");
107 
108 	platform.bus_reset = imc_bus_reset;
109 	platform.watchdog_reset = imc_watchdog_reset;
110 	platform.watchdog_disable = imc_watchdog_disable;
111 	platform.watchdog_enable = imc_watchdog_enable;
112 
113 	sysid = bus_space_read_4(isc.iot, isc.ioh, IMC_SYSID);
114 
115 	/* EISA exists on IP22 only */
116 	if (mach_subtype == MACH_SGI_IP22_FULLHOUSE)
117 		isc.eisa_present = (sysid & IMC_SYSID_HAVEISA);
118 	else
119 		isc.eisa_present = 0;
120 
121 	printf(": revision %d", (sysid & IMC_SYSID_REVMASK));
122 
123 	if (isc.eisa_present)
124 		printf(", EISA bus present");
125 
126 	printf("\n");
127 
128 	/* Clear CPU/GIO error status registers to clear any leftover bits. */
129 	imc_bus_reset();
130 
131 	/* Hook the bus error handler into the ISR */
132 	platform.intr4 = imc_bus_error;
133 
134 	/*
135 	 * Enable parity reporting on GIO/main memory transactions.
136 	 * Disable parity checking on CPU bus transactions (as turning
137 	 * it on seems to cause spurious bus errors), but enable parity
138 	 * checking on CPU reads from main memory (note that this bit
139 	 * has the opposite sense... Turning it on turns the checks off!).
140 	 * Finally, turn on interrupt writes to the CPU from the MC.
141 	 */
142 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
143 	reg &= ~IMC_CPUCTRL0_NCHKMEMPAR;
144 	reg |= (IMC_CPUCTRL0_GPR | IMC_CPUCTRL0_MPR | IMC_CPUCTRL0_INTENA);
145 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
146 
147 	/* Setup the MC write buffer depth */
148 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL1);
149 	reg = (reg & ~IMC_CPUCTRL1_MCHWMSK) | 13;
150 
151 	/*
152 	 * Force endianness on the onboard HPC and both slots.
153 	 * This should be safe for Fullhouse, but leave it conditional
154 	 * for now.
155 	 */
156 	if (mach_type == MACH_SGI_IP20 || (mach_type == MACH_SGI_IP22 &&
157 	    mach_subtype == MACH_SGI_IP22_GUINESS)) {
158 		reg |=  IMC_CPUCTRL1_HPCFX;
159 		reg |=  IMC_CPUCTRL1_EXP0FX;
160 		reg |=  IMC_CPUCTRL1_EXP1FX;
161 		reg &= ~IMC_CPUCTRL1_HPCLITTLE;
162 		reg &= ~IMC_CPUCTRL1_EXP0LITTLE;
163 		reg &= ~IMC_CPUCTRL1_EXP1LITTLE;
164 	}
165 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL1, reg);
166 
167 
168 	/*
169 	 * Set GIO64 arbitrator configuration register:
170 	 *
171 	 * Preserve PROM-set graphics-related bits, as they seem to depend
172 	 * on the graphics variant present and I'm not sure how to figure
173 	 * that out or 100% sure what the correct settings are for each.
174 	 */
175 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_GIO64ARB);
176 	reg &= (IMC_GIO64ARB_GRX64 | IMC_GIO64ARB_GRXRT | IMC_GIO64ARB_GRXMST);
177 
178 	/* Rest of settings are machine/board dependant */
179 	if (mach_type == MACH_SGI_IP20)
180 	{
181 		reg |=   IMC_GIO64ARB_ONEGIO;
182 	        reg |=  (IMC_GIO64ARB_EXP0RT	| IMC_GIO64ARB_EXP1RT);
183 		reg |=  (IMC_GIO64ARB_EXP0MST	| IMC_GIO64ARB_EXP1MST);
184                 reg &= ~(IMC_GIO64ARB_HPC64	|
185                          IMC_GIO64ARB_HPCEXP64	| IMC_GIO64ARB_EISA64 |
186                          IMC_GIO64ARB_EXP064	| IMC_GIO64ARB_EXP164 |
187                          IMC_GIO64ARB_EXP0PIPE	| IMC_GIO64ARB_EXP1PIPE);
188 	}
189 	else
190 	{
191 		/*
192 		 * GIO64 invariant for all IP22 platforms: one GIO bus,
193 		 * HPC1 @ 64
194 		 */
195 		reg |= IMC_GIO64ARB_ONEGIO | IMC_GIO64ARB_HPC64;
196 
197 		switch (mach_subtype) {
198 		case MACH_SGI_IP22_GUINESS:
199 			/* XXX is MST mutually exclusive? */
200 	        	reg |=  (IMC_GIO64ARB_EXP0RT	| IMC_GIO64ARB_EXP1RT);
201 			reg |=  (IMC_GIO64ARB_EXP0MST	| IMC_GIO64ARB_EXP1MST);
202 
203 			/* EISA can bus-master, is 64-bit */
204 			reg |= (IMC_GIO64ARB_EISAMST | IMC_GIO64ARB_EISA64);
205 			break;
206 
207 		case MACH_SGI_IP22_FULLHOUSE:
208 		/*
209 		 * All Fullhouse boards have a 64-bit HPC2 and pipelined
210 		 * EXP0 slot.
211 		 */
212 			reg |= (IMC_GIO64ARB_HPCEXP64 | IMC_GIO64ARB_EXP0PIPE);
213 
214 			if (mach_boardrev < 2) {
215 			/* EXP0 realtime, EXP1 can master */
216 				reg |= (IMC_GIO64ARB_EXP0RT | IMC_GIO64ARB_EXP1MST);
217 			} else {
218 				/* EXP1 pipelined as well, EISA masters */
219 				reg |= (IMC_GIO64ARB_EXP1PIPE | IMC_GIO64ARB_EISAMST);
220 			}
221 			break;
222 		}
223 	}
224 
225 	bus_space_write_4(isc.iot, isc.ioh, IMC_GIO64ARB, reg);
226 
227 	if (isc.eisa_present) {
228 #if notyet
229 		memset(&iaa, 0, sizeof(iaa));
230 
231 		config_found_ia(self, "eisabus", (void*)&iaa, eisabusprint);
232 #endif
233 	}
234 
235 	memset(&iaa, 0, sizeof(iaa));
236 
237 	config_found_ia(self, "giobus", (void*)&iaa, imc_print);
238 
239 	imc_watchdog_enable();
240 }
241 
242 
243 static int
244 imc_print(void *aux, const char *name)
245 {
246 	if (name)
247 		aprint_normal("gio at %s", name);
248 
249 	return UNCONF;
250 }
251 
252 static void
253 imc_bus_reset(void)
254 {
255 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPU_ERRSTAT, 0);
256 	bus_space_write_4(isc.iot, isc.ioh, IMC_GIO_ERRSTAT, 0);
257 }
258 
259 static void
260 imc_bus_error(u_int32_t status, u_int32_t cause, u_int32_t pc, u_int32_t ipending)
261 {
262 	printf("bus error: cpu_stat %08x addr %08x, gio_stat %08x addr %08x\n",
263 			bus_space_read_4(isc.iot, isc.ioh, IMC_CPU_ERRSTAT),
264 			bus_space_read_4(isc.iot, isc.ioh, IMC_CPU_ERRADDR),
265 			bus_space_read_4(isc.iot, isc.ioh, IMC_GIO_ERRSTAT),
266 			bus_space_read_4(isc.iot, isc.ioh, IMC_GIO_ERRADDR) );
267 	imc_bus_reset();
268 }
269 
270 static void
271 imc_watchdog_reset(void)
272 {
273 	bus_space_write_4(isc.iot, isc.ioh, IMC_WDOG, 0);
274 }
275 
276 static void
277 imc_watchdog_disable(void)
278 {
279 	u_int32_t reg;
280 
281 	bus_space_write_4(isc.iot, isc.ioh, IMC_WDOG, 0);
282 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
283 	reg &= ~(IMC_CPUCTRL0_WDOG);
284         bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
285 }
286 
287 static void
288 imc_watchdog_enable(void)
289 {
290 	u_int32_t reg;
291 
292 	/* enable watchdog and clear it */
293 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
294 	reg |= IMC_CPUCTRL0_WDOG;
295 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
296 	imc_watchdog_reset();
297 }
298