crime.c revision 1.26 1 1.26 macallan /* $NetBSD: crime.c,v 1.26 2007/09/26 05:48:37 macallan Exp $ */
2 1.1 soren
3 1.1 soren /*
4 1.17 sekiya * Copyright (c) 2004 Christopher SEKIYA
5 1.1 soren * Copyright (c) 2000 Soren S. Jorvang
6 1.1 soren * All rights reserved.
7 1.5 simonb *
8 1.1 soren * Redistribution and use in source and binary forms, with or without
9 1.1 soren * modification, are permitted provided that the following conditions
10 1.1 soren * are met:
11 1.1 soren * 1. Redistributions of source code must retain the above copyright
12 1.1 soren * notice, this list of conditions and the following disclaimer.
13 1.1 soren * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 soren * notice, this list of conditions and the following disclaimer in the
15 1.1 soren * documentation and/or other materials provided with the distribution.
16 1.1 soren * 3. All advertising materials mentioning features or use of this software
17 1.1 soren * must display the following acknowledgement:
18 1.1 soren * This product includes software developed for the
19 1.14 keihan * NetBSD Project. See http://www.NetBSD.org/ for
20 1.1 soren * information about NetBSD.
21 1.1 soren * 4. The name of the author may not be used to endorse or promote products
22 1.1 soren * derived from this software without specific prior written permission.
23 1.5 simonb *
24 1.1 soren * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 1.1 soren * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 1.1 soren * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 1.1 soren * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 1.1 soren * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 1.1 soren * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 1.1 soren * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 1.1 soren * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 1.1 soren * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 1.1 soren * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 1.1 soren */
35 1.1 soren
36 1.1 soren /*
37 1.1 soren * O2 CRIME
38 1.1 soren */
39 1.12 lukem
40 1.12 lukem #include <sys/cdefs.h>
41 1.26 macallan __KERNEL_RCSID(0, "$NetBSD: crime.c,v 1.26 2007/09/26 05:48:37 macallan Exp $");
42 1.1 soren
43 1.1 soren #include <sys/param.h>
44 1.1 soren #include <sys/device.h>
45 1.1 soren #include <sys/systm.h>
46 1.17 sekiya #include <sys/kernel.h>
47 1.25 yamt #include <sys/cpu.h>
48 1.1 soren
49 1.1 soren #include <machine/locore.h>
50 1.1 soren #include <machine/autoconf.h>
51 1.1 soren #include <machine/bus.h>
52 1.2 soren #include <machine/intr.h>
53 1.4 thorpej #include <machine/machtype.h>
54 1.16 sekiya #include <machine/sysconf.h>
55 1.1 soren
56 1.13 tsutsui #include <sgimips/dev/crimevar.h>
57 1.1 soren #include <sgimips/dev/crimereg.h>
58 1.18 sekiya #include <sgimips/mace/macevar.h>
59 1.1 soren
60 1.1 soren #include "locators.h"
61 1.1 soren
62 1.23 jmcneill #define CRIME_DISABLE_WATCHDOG
63 1.23 jmcneill
64 1.1 soren static int crime_match(struct device *, struct cfdata *, void *);
65 1.1 soren static void crime_attach(struct device *, struct device *, void *);
66 1.17 sekiya void crime_bus_reset(void);
67 1.17 sekiya void crime_watchdog_reset(void);
68 1.17 sekiya void crime_watchdog_disable(void);
69 1.17 sekiya void crime_intr(u_int32_t, u_int32_t, u_int32_t, u_int32_t);
70 1.17 sekiya void *crime_intr_establish(int, int, int (*)(void *), void *);
71 1.17 sekiya extern void mace_intr(int); /* XXX */
72 1.1 soren
73 1.17 sekiya static bus_space_tag_t crm_iot;
74 1.17 sekiya static bus_space_handle_t crm_ioh;
75 1.13 tsutsui
76 1.13 tsutsui CFATTACH_DECL(crime, sizeof(struct crime_softc),
77 1.8 thorpej crime_match, crime_attach, NULL, NULL);
78 1.1 soren
79 1.10 rafal #define CRIME_NINTR 32 /* XXX */
80 1.10 rafal
81 1.10 rafal struct {
82 1.10 rafal int (*func)(void *);
83 1.10 rafal void *arg;
84 1.10 rafal } crime[CRIME_NINTR];
85 1.10 rafal
86 1.1 soren static int
87 1.17 sekiya crime_match(struct device *parent, struct cfdata *match, void *aux)
88 1.1 soren {
89 1.1 soren
90 1.1 soren /*
91 1.1 soren * The CRIME is in the O2.
92 1.1 soren */
93 1.4 thorpej if (mach_type == MACH_SGI_IP32)
94 1.4 thorpej return (1);
95 1.4 thorpej
96 1.4 thorpej return (0);
97 1.1 soren }
98 1.1 soren
99 1.1 soren static void
100 1.17 sekiya crime_attach(struct device *parent, struct device *self, void *aux)
101 1.1 soren {
102 1.1 soren struct mainbus_attach_args *ma = aux;
103 1.9 rafal u_int64_t crm_id;
104 1.17 sekiya u_int64_t baseline;
105 1.17 sekiya u_int32_t cps;
106 1.1 soren
107 1.17 sekiya crm_iot = SGIMIPS_BUS_SPACE_CRIME;
108 1.13 tsutsui
109 1.17 sekiya if (bus_space_map(crm_iot, ma->ma_addr, 0 /* XXX */,
110 1.17 sekiya BUS_SPACE_MAP_LINEAR, &crm_ioh))
111 1.13 tsutsui panic("crime_attach: can't map I/O space");
112 1.13 tsutsui
113 1.17 sekiya crm_id = bus_space_read_8(crm_iot, crm_ioh, CRIME_REV);
114 1.1 soren
115 1.10 rafal aprint_naive(": system ASIC");
116 1.10 rafal
117 1.11 rafal switch ((crm_id & CRIME_ID_IDBITS) >> CRIME_ID_IDSHIFT) {
118 1.9 rafal case 0x0b:
119 1.9 rafal aprint_normal(": rev 1.5");
120 1.9 rafal break;
121 1.1 soren
122 1.9 rafal case 0x0a:
123 1.9 rafal if ((crm_id >> 32) == 0)
124 1.9 rafal aprint_normal(": rev 1.1");
125 1.9 rafal else if ((crm_id >> 32) == 1)
126 1.9 rafal aprint_normal(": rev 1.3");
127 1.9 rafal else
128 1.9 rafal aprint_normal(": rev 1.4");
129 1.9 rafal break;
130 1.9 rafal
131 1.9 rafal case 0x00:
132 1.9 rafal aprint_normal(": Petty CRIME");
133 1.9 rafal break;
134 1.1 soren
135 1.9 rafal default:
136 1.9 rafal aprint_normal(": Unknown CRIME");
137 1.9 rafal break;
138 1.9 rafal }
139 1.9 rafal
140 1.9 rafal aprint_normal(" (CRIME_ID: %llx)\n", crm_id);
141 1.10 rafal
142 1.17 sekiya /* reset CRIME CPU & memory error registers */
143 1.17 sekiya crime_bus_reset();
144 1.17 sekiya
145 1.22 tsutsui bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
146 1.22 tsutsui bus_space_write_8(crm_iot, crm_ioh, CRIME_CONTROL, 0);
147 1.22 tsutsui
148 1.17 sekiya baseline = bus_space_read_8(crm_iot, crm_ioh, CRIME_TIME) & CRIME_TIME_MASK;
149 1.17 sekiya cps = mips3_cp0_count_read();
150 1.17 sekiya
151 1.17 sekiya while (((bus_space_read_8(crm_iot, crm_ioh, CRIME_TIME) & CRIME_TIME_MASK)
152 1.17 sekiya - baseline) < 50 * 1000000 / 15)
153 1.17 sekiya continue;
154 1.17 sekiya cps = mips3_cp0_count_read() - cps;
155 1.21 tsutsui cps = cps / 5;
156 1.21 tsutsui
157 1.17 sekiya /* Counter on R4k/R4400/R4600/R5k counts at half the CPU frequency */
158 1.17 sekiya curcpu()->ci_cpu_freq = cps * 2 * hz;
159 1.17 sekiya curcpu()->ci_cycles_per_hz = curcpu()->ci_cpu_freq / (2 * hz);
160 1.17 sekiya curcpu()->ci_divisor_delay = curcpu()->ci_cpu_freq / (2 * 1000000);
161 1.21 tsutsui MIPS_SET_CI_RECIPRICAL(curcpu());
162 1.17 sekiya
163 1.13 tsutsui /* Turn on memory error and crime error interrupts.
164 1.13 tsutsui All others turned on as devices are registered. */
165 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK,
166 1.13 tsutsui CRIME_INT_MEMERR |
167 1.13 tsutsui CRIME_INT_CRMERR |
168 1.13 tsutsui CRIME_INT_VICE |
169 1.13 tsutsui CRIME_INT_VID_OUT |
170 1.13 tsutsui CRIME_INT_VID_IN2 |
171 1.13 tsutsui CRIME_INT_VID_IN1);
172 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_INTSTAT, 0);
173 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_SOFTINT, 0);
174 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_HARDINT, 0);
175 1.17 sekiya
176 1.17 sekiya platform.bus_reset = crime_bus_reset;
177 1.17 sekiya platform.watchdog_reset = crime_watchdog_reset;
178 1.17 sekiya platform.watchdog_disable = crime_watchdog_disable;
179 1.17 sekiya platform.watchdog_enable = crime_watchdog_reset;
180 1.17 sekiya platform.intr_establish = crime_intr_establish;
181 1.17 sekiya platform.intr0 = crime_intr;
182 1.2 soren }
183 1.2 soren
184 1.2 soren /*
185 1.10 rafal * XXX: sharing interrupts?
186 1.2 soren */
187 1.2 soren
188 1.5 simonb void *
189 1.17 sekiya crime_intr_establish(int irq, int level, int (*func)(void *), void *arg)
190 1.2 soren {
191 1.19 sekiya if (irq < 16)
192 1.18 sekiya return mace_intr_establish(irq, level, func, arg);
193 1.21 tsutsui
194 1.10 rafal if (crime[irq].func != NULL)
195 1.10 rafal return NULL; /* panic("Cannot share CRIME interrupts!"); */
196 1.2 soren
197 1.10 rafal crime[irq].func = func;
198 1.10 rafal crime[irq].arg = arg;
199 1.2 soren
200 1.13 tsutsui crime_intr_mask(irq);
201 1.13 tsutsui
202 1.10 rafal return (void *)&crime[irq];
203 1.2 soren }
204 1.2 soren
205 1.9 rafal void
206 1.17 sekiya crime_intr(u_int32_t status, u_int32_t cause, u_int32_t pc, u_int32_t ipending)
207 1.2 soren {
208 1.17 sekiya u_int64_t crime_intmask;
209 1.17 sekiya u_int64_t crime_intstat;
210 1.17 sekiya u_int64_t crime_ipending;
211 1.2 soren int i;
212 1.2 soren
213 1.17 sekiya crime_intmask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
214 1.17 sekiya crime_intstat = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTSTAT);
215 1.17 sekiya crime_ipending = (crime_intstat & crime_intmask);
216 1.17 sekiya
217 1.19 sekiya if (crime_ipending & 0xffff)
218 1.19 sekiya mace_intr(crime_ipending & 0xffff);
219 1.17 sekiya
220 1.21 tsutsui if (crime_ipending & 0xffff0000) {
221 1.17 sekiya /*
222 1.17 sekiya * CRIME interrupts for CPU and memory errors
223 1.17 sekiya */
224 1.17 sekiya if (crime_ipending & CRIME_INT_MEMERR) {
225 1.17 sekiya u_int64_t address =
226 1.17 sekiya bus_space_read_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_ADDR);
227 1.20 martin u_int64_t status1 =
228 1.17 sekiya bus_space_read_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_STAT);
229 1.17 sekiya printf("crime: memory error address %llx"
230 1.20 martin " status %llx\n", address << 2, status1);
231 1.17 sekiya crime_bus_reset();
232 1.17 sekiya }
233 1.17 sekiya
234 1.17 sekiya if (crime_ipending & CRIME_INT_CRMERR) {
235 1.17 sekiya u_int64_t stat =
236 1.17 sekiya bus_space_read_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_STAT);
237 1.17 sekiya printf("crime: cpu error %llx at"
238 1.17 sekiya " address %llx\n", stat,
239 1.17 sekiya bus_space_read_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_ADDR));
240 1.17 sekiya crime_bus_reset();
241 1.17 sekiya }
242 1.2 soren }
243 1.17 sekiya
244 1.24 jmcneill crime_ipending &= ~0xffff;
245 1.17 sekiya
246 1.17 sekiya if (crime_ipending)
247 1.24 jmcneill for (i = 16; i < CRIME_NINTR; i++) {
248 1.17 sekiya if ((crime_ipending & (1 << i)) && crime[i].func != NULL)
249 1.17 sekiya (*crime[i].func)(crime[i].arg);
250 1.17 sekiya }
251 1.9 rafal }
252 1.2 soren
253 1.13 tsutsui void
254 1.13 tsutsui crime_intr_mask(unsigned int intr)
255 1.13 tsutsui {
256 1.13 tsutsui u_int64_t mask;
257 1.13 tsutsui
258 1.17 sekiya mask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
259 1.13 tsutsui mask |= (1 << intr);
260 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK, mask);
261 1.17 sekiya }
262 1.17 sekiya
263 1.17 sekiya void
264 1.19 sekiya crime_intr_unmask(unsigned int intr)
265 1.19 sekiya {
266 1.19 sekiya u_int64_t mask;
267 1.19 sekiya
268 1.19 sekiya mask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
269 1.19 sekiya mask &= ~(1 << intr);
270 1.19 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK, mask);
271 1.19 sekiya }
272 1.19 sekiya
273 1.19 sekiya void
274 1.17 sekiya crime_bus_reset(void)
275 1.17 sekiya {
276 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_STAT, 0);
277 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_STAT, 0);
278 1.13 tsutsui }
279 1.16 sekiya
280 1.16 sekiya void
281 1.17 sekiya crime_watchdog_reset(void)
282 1.16 sekiya {
283 1.23 jmcneill #ifdef CRIME_WATCHDOG_DISABLE
284 1.23 jmcneill bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
285 1.23 jmcneill #else
286 1.16 sekiya /* enable watchdog timer, clear it */
287 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh,
288 1.16 sekiya CRIME_CONTROL, CRIME_CONTROL_DOG_ENABLE);
289 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
290 1.23 jmcneill #endif
291 1.16 sekiya }
292 1.16 sekiya
293 1.17 sekiya void
294 1.17 sekiya crime_watchdog_disable(void)
295 1.17 sekiya {
296 1.17 sekiya u_int64_t reg;
297 1.17 sekiya
298 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
299 1.21 tsutsui reg = bus_space_read_8(crm_iot, crm_ioh, CRIME_CONTROL)
300 1.17 sekiya & ~CRIME_CONTROL_DOG_ENABLE;
301 1.17 sekiya bus_space_write_8(crm_iot, crm_ioh, CRIME_CONTROL, reg);
302 1.17 sekiya }
303 1.26 macallan
304 1.26 macallan void
305 1.26 macallan crime_reboot()
306 1.26 macallan {
307 1.26 macallan
308 1.26 macallan bus_space_write_8(crm_iot, crm_ioh, CRIME_CONTROL,
309 1.26 macallan CRIME_CONTROL_HARD_RESET);
310 1.26 macallan while(1);
311 1.26 macallan }
312