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