xref: /netbsd-src/sys/arch/sgimips/dev/imc.c (revision d20841bb642898112fe68f0ad3f7b26dddf56f07)
1 /*	$NetBSD: imc.c,v 1.16 2004/01/18 13:11:18 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.16 2004/01/18 13:11:18 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 : 1;
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 void		imc_bus_reset(void);
61 void		imc_bus_error(void);
62 void		imc_watchdog_reset(void);
63 void		imc_watchdog_disable(void);
64 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(parent, match, aux)
87 	struct device *parent;
88 	struct cfdata *match;
89 	void *aux;
90 {
91 
92 	if ( (mach_type == MACH_SGI_IP22) || (mach_type == MACH_SGI_IP20) )
93 		return (1);
94 
95 	return (0);
96 }
97 
98 static void
99 imc_attach(parent, self, aux)
100 	struct device *parent;
101 	struct device *self;
102 	void *aux;
103 {
104 	u_int32_t reg;
105 	struct imc_attach_args iaa;
106 	struct mainbus_attach_args *ma = aux;
107 	u_int32_t sysid;
108 
109 	isc.iot = SGIMIPS_BUS_SPACE_HPC;
110 	if (bus_space_map(isc.iot, ma->ma_addr, 0,
111             BUS_SPACE_MAP_LINEAR, &isc.ioh))
112                 panic("imc_attach: could not allocate memory\n");
113 
114 	platform.bus_reset = imc_bus_reset;
115 	platform.watchdog_reset = imc_watchdog_reset;
116 	platform.watchdog_disable = imc_watchdog_disable;
117 	platform.watchdog_enable = imc_watchdog_enable;
118 
119 	sysid = bus_space_read_4(isc.iot, isc.ioh, IMC_SYSID);
120 
121 	/* EISA present bit is on even on Indys, so don't trust it! */
122 	if (mach_subtype == MACH_SGI_IP22_FULLHOUSE)
123 		isc.eisa_present = (sysid & IMC_SYSID_HAVEISA);
124 	else
125 		isc.eisa_present = 0;
126 
127 	printf(": revision %d", (sysid & IMC_SYSID_REVMASK));
128 
129 	if (isc.eisa_present)
130 		printf(", EISA bus present");
131 
132 	printf("\n");
133 
134 	/* Clear CPU/GIO error status registers to clear any leftover bits. */
135 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPU_ERRSTAT, 0);
136 	bus_space_write_4(isc.iot, isc.ioh, IMC_GIO_ERRSTAT, 0);
137 
138 	/*
139 	 * Enable parity reporting on GIO/main memory transactions.
140 	 * Disable parity checking on CPU bus transactions (as turning
141 	 * it on seems to cause spurious bus errors), but enable parity
142 	 * checking on CPU reads from main memory (note that this bit
143 	 * has the opposite sense... Turning it on turns the checks off!).
144 	 * Finally, turn on interrupt writes to the CPU from the MC.
145 	 */
146 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
147 	reg &= ~IMC_CPUCTRL0_NCHKMEMPAR;
148 	reg |= (IMC_CPUCTRL0_GPR | IMC_CPUCTRL0_MPR | IMC_CPUCTRL0_INTENA);
149 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
150 
151 	/* Setup the MC write buffer depth */
152 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL1);
153 	reg = (reg & ~IMC_CPUCTRL1_MCHWMSK) | 13;
154 	if (mach_type == MACH_SGI_IP20)
155 		reg = (reg & ~IMC_CPUCTRL1_HPCLITTLE) | IMC_CPUCTRL1_HPCFX;
156 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL1, reg);
157 
158 
159 	/*
160 	 * Set GIO64 arbitrator configuration register:
161 	 *
162 	 * Preserve PROM-set graphics-related bits, as they seem to depend
163 	 * on the graphics variant present and I'm not sure how to figure
164 	 * that out or 100% sure what the correct settings are for each.
165 	 */
166 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_GIO64ARB);
167 	reg &= (IMC_GIO64ARB_GRX64 | IMC_GIO64ARB_GRXRT | IMC_GIO64ARB_GRXMST);
168 
169 	/* GIO64 invariant for all IP22 platforms: one GIO bus, HPC1 @ 64 */
170 	reg |= IMC_GIO64ARB_ONEGIO | IMC_GIO64ARB_HPC64;
171 
172 	/* Rest of settings are machine/board dependant */
173 	if (mach_type == MACH_SGI_IP20)
174 	{
175 	        reg |= (IMC_GIO64ARB_ONEGIO |
176 			 IMC_GIO64ARB_EXP1RT | IMC_GIO64ARB_EXP0RT);
177                 reg &= ~(IMC_GIO64ARB_HPC64 |
178                          IMC_GIO64ARB_HPCEXP64 | IMC_GIO64ARB_EISA64 |
179                          IMC_GIO64ARB_EXP064   | IMC_GIO64ARB_EXP164 |
180                          IMC_GIO64ARB_EXP0PIPE | IMC_GIO64ARB_EXP1PIPE |
181                          IMC_GIO64ARB_EXP0MST | IMC_GIO64ARB_EXP1MST);
182 /* XXX second ethernet adapter */
183                 reg |= IMC_GIO64ARB_EXP0MST;
184 	}
185 	else
186 	{
187 		switch (mach_subtype) {
188 		case MACH_SGI_IP22_GUINESS:
189 			/* EISA can bus-master, is 64-bit */
190 			reg |= (IMC_GIO64ARB_EISAMST | IMC_GIO64ARB_EISA64);
191 			break;
192 
193 		case MACH_SGI_IP22_FULLHOUSE:
194 		/*
195 		 * All Fullhouse boards have a 64-bit HPC2 and pipelined
196 		 * EXP0 slot.
197 		 */
198 			reg |= (IMC_GIO64ARB_HPCEXP64 | IMC_GIO64ARB_EXP0PIPE);
199 
200 			if (mach_boardrev < 2) {
201 			/* EXP0 realtime, EXP1 can master */
202 				reg |= (IMC_GIO64ARB_EXP0RT | IMC_GIO64ARB_EXP1MST);
203 			} else {
204 				/* EXP1 pipelined as well, EISA masters */
205 				reg |= (IMC_GIO64ARB_EXP1PIPE | IMC_GIO64ARB_EISAMST);
206 			}
207 			break;
208 		}
209 	}
210 
211 	bus_space_write_4(isc.iot, isc.ioh, IMC_GIO64ARB, reg);
212 
213 	if (isc.eisa_present) {
214 #if notyet
215 		memset(&iaa, 0, sizeof(iaa));
216 
217 		iaa.iaa_name = "eisa";
218 		(void)config_found(self, (void*)&iaa, imc_print);
219 #endif
220 	}
221 
222 	memset(&iaa, 0, sizeof(iaa));
223 
224 	iaa.iaa_name = "gio";
225 	(void)config_found(self, (void*)&iaa, imc_print);
226 
227 	imc_watchdog_enable();
228 }
229 
230 
231 static int
232 imc_print(aux, name)
233 	void *aux;
234 	const char *name;
235 {
236 	struct imc_attach_args* iaa = aux;
237 
238 	if (name)
239 		aprint_normal("%s at %s", iaa->iaa_name, name);
240 
241 	return UNCONF;
242 }
243 
244 void
245 imc_bus_reset(void)
246 {
247 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPU_ERRSTAT, 0);
248 	bus_space_write_4(isc.iot, isc.ioh, IMC_GIO_ERRSTAT, 0);
249 }
250 
251 void
252 imc_bus_error(void)
253 {
254 	printf("bus error: cpu_stat %08x addr %08x, gio_stat %08x addr %08x\n",
255 			bus_space_read_4(isc.iot, isc.ioh, IMC_CPU_ERRSTAT),
256 			bus_space_read_4(isc.iot, isc.ioh, IMC_CPU_ERRADDR),
257 			bus_space_read_4(isc.iot, isc.ioh, IMC_GIO_ERRSTAT),
258 			bus_space_read_4(isc.iot, isc.ioh, IMC_GIO_ERRADDR) );
259 	imc_bus_reset();
260 }
261 
262 void
263 imc_watchdog_reset(void)
264 {
265 	bus_space_write_4(isc.iot, isc.ioh, IMC_WDOG, 0);
266 }
267 void
268 imc_watchdog_disable(void)
269 {
270 	u_int32_t reg;
271 
272 	bus_space_write_4(isc.iot, isc.ioh, IMC_WDOG, 0);
273 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
274 	reg &= ~(IMC_CPUCTRL0_WDOG);
275         bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
276 }
277 
278 void
279 imc_watchdog_enable(void)
280 {
281 	u_int32_t reg;
282 
283 	/* enable watchdog and clear it */
284 	reg = bus_space_read_4(isc.iot, isc.ioh, IMC_CPUCTRL0);
285 	reg |= IMC_CPUCTRL0_WDOG;
286 	bus_space_write_4(isc.iot, isc.ioh, IMC_CPUCTRL0, reg);
287 	imc_watchdog_reset();
288 }
289