hpc.c revision 1.28 1 /* $NetBSD: hpc.c,v 1.28 2004/04/11 10:29:20 pooka Exp $ */
2
3 /*
4 * Copyright (c) 2000 Soren S. Jorvang
5 * Copyright (c) 2001 Rafal K. Boni
6 * Copyright (c) 2001 Jason R. Thorpe
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed for the
20 * NetBSD Project. See http://www.NetBSD.org/ for
21 * information about NetBSD.
22 * 4. The name of the author may not be used to endorse or promote products
23 * derived from this software without specific prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
26 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
27 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
28 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
29 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
30 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
31 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
32 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
33 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
34 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
35 */
36
37 #include <sys/cdefs.h>
38 __KERNEL_RCSID(0, "$NetBSD: hpc.c,v 1.28 2004/04/11 10:29:20 pooka Exp $");
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/kernel.h>
43 #include <sys/device.h>
44 #include <sys/reboot.h>
45 #include <sys/callout.h>
46
47 #include <machine/machtype.h>
48
49 #include <sgimips/gio/gioreg.h>
50 #include <sgimips/gio/giovar.h>
51
52 #include <sgimips/hpc/hpcvar.h>
53 #include <sgimips/hpc/hpcreg.h>
54 #include <sgimips/ioc/iocreg.h>
55
56 #include "locators.h"
57
58 const struct hpc_device {
59 const char *hd_name;
60 bus_addr_t hd_devoff;
61 bus_addr_t hd_dmaoff;
62 int hd_irq;
63 int hd_sysmask;
64 } hpc_devices[] = {
65 { "zsc",
66 /* XXX Magic numbers */
67 HPC_PBUS_CH6_DEVREGS + IOC_SERIAL_REGS, 0,
68 29,
69 HPCDEV_IP22 | HPCDEV_IP24 },
70
71 /* probe order is important for IP20 zsc */
72
73 { "zsc", /* serial 0/1 duart 1 */
74 0x0d10, 0,
75 5,
76 HPCDEV_IP12 | HPCDEV_IP20 },
77
78 { "zsc", /* serial 0/1 duart 0 */
79 0x0d00, 0,
80 5,
81 HPCDEV_IP12 | HPCDEV_IP20 },
82
83 { "pckbc",
84 HPC_PBUS_CH6_DEVREGS + IOC_KB_REGS, 0,
85 28,
86 HPCDEV_IP22 | HPCDEV_IP24 },
87
88 { "sq",
89 HPC_ENET_DEVREGS, HPC_ENET_REGS,
90 3,
91 HPCDEV_IP22 | HPCDEV_IP24 },
92
93 { "sq",
94 HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
95 3,
96 HPCDEV_IP12 | HPCDEV_IP20 },
97
98 { "wdsc",
99 HPC_SCSI0_DEVREGS, HPC_SCSI0_REGS,
100 1, /* XXX 1 = IRQ_LOCAL0 + 1 */
101 HPCDEV_IP22 | HPCDEV_IP24 },
102
103 { "wdsc",
104 HPC_SCSI1_DEVREGS, HPC_SCSI1_REGS,
105 2, /* XXX 2 = IRQ_LOCAL0 + 2 */
106 HPCDEV_IP22 },
107
108 { "wdsc",
109 HPC1_SCSI0_DEVREGS, HPC1_SCSI0_REGS,
110 2, /* XXX 1 = IRQ_LOCAL0 + 2 */
111 HPCDEV_IP12 | HPCDEV_IP20 },
112
113 { "dpclock",
114 HPC1_PBUS_BBRAM, 0,
115 -1,
116 HPCDEV_IP12 | HPCDEV_IP20 },
117
118 { "dsclock",
119 HPC_PBUS_BBRAM, 0,
120 -1,
121 HPCDEV_IP22 | HPCDEV_IP24 },
122
123 { "haltwo",
124 HPC_PBUS_CH0_DEVREGS, HPC_PBUS_DMAREGS,
125 8 + 4, /* XXX IRQ_LOCAL1 + 4 */
126 HPCDEV_IP22 | HPCDEV_IP24 },
127
128 { NULL,
129 0, 0,
130 0,
131 0
132 }
133 };
134
135 struct hpc_softc {
136 struct device sc_dev;
137
138 bus_addr_t sc_base;
139
140 bus_space_tag_t sc_ct;
141 bus_space_handle_t sc_ch;
142 };
143
144 static struct hpc_values hpc1_values = {
145 .revision = 1,
146 .scsi0_regs = HPC1_SCSI0_REGS,
147 .scsi0_regs_size = HPC1_SCSI0_REGS_SIZE,
148 .scsi0_cbp = HPC1_SCSI0_CBP,
149 .scsi0_ndbp = HPC1_SCSI0_NDBP,
150 .scsi0_bc = HPC1_SCSI0_BC,
151 .scsi0_ctl = HPC1_SCSI0_CTL,
152 .scsi0_gio = HPC1_SCSI0_GIO,
153 .scsi0_dev = HPC1_SCSI0_DEV,
154 .scsi0_dmacfg = HPC1_SCSI0_DMACFG,
155 .scsi0_piocfg = HPC1_SCSI0_PIOCFG,
156 .scsi1_regs = HPC1_SCSI1_REGS,
157 .scsi1_regs_size = HPC1_SCSI1_REGS_SIZE,
158 .scsi1_cbp = HPC1_SCSI1_CBP,
159 .scsi1_ndbp = HPC1_SCSI1_NDBP,
160 .scsi1_bc = HPC1_SCSI1_BC,
161 .scsi1_ctl = HPC1_SCSI1_CTL,
162 .scsi1_gio = HPC1_SCSI1_GIO,
163 .scsi1_dev = HPC1_SCSI1_DEV,
164 .scsi1_dmacfg = HPC1_SCSI1_DMACFG,
165 .scsi1_piocfg = HPC1_SCSI1_PIOCFG,
166 .dmactl_dir = HPC1_DMACTL_DIR,
167 .dmactl_flush = HPC1_DMACTL_FLUSH,
168 .dmactl_active = HPC1_DMACTL_ACTIVE,
169 .dmactl_reset = HPC1_DMACTL_RESET,
170 .enet_regs = HPC1_ENET_REGS,
171 .enet_regs_size = HPC1_ENET_REGS_SIZE,
172 .enet_intdelay = HPC1_ENET_INTDELAY,
173 .enet_intdelayval = HPC1_ENET_INTDELAYVAL,
174 .enetr_cbp = HPC1_ENETR_CBP,
175 .enetr_ndbp = HPC1_ENETR_NDBP,
176 .enetr_bc = HPC1_ENETR_BC,
177 .enetr_ctl = HPC1_ENETR_CTL,
178 .enetr_ctl_active = HPC1_ENETR_CTL_ACTIVE,
179 .enetr_reset = HPC1_ENETR_RESET,
180 .enetr_dmacfg = 0,
181 .enetr_piocfg = HPC1_ENETR_PIOCFG,
182 .enetx_cbp = HPC1_ENETX_CBP,
183 .enetx_ndbp = HPC1_ENETX_NDBP,
184 .enetx_bc = HPC1_ENETX_BC,
185 .enetx_ctl = HPC1_ENETX_CTL,
186 .enetx_ctl_active = HPC1_ENETX_CTL_ACTIVE,
187 .enetx_dev = HPC1_ENETX_DEV,
188 .enetr_fifo = HPC1_ENETR_FIFO,
189 .enetr_fifo_size = HPC1_ENETR_FIFO_SIZE,
190 .enetx_fifo = HPC1_ENETX_FIFO,
191 .enetx_fifo_size = HPC1_ENETX_FIFO_SIZE,
192 .scsi0_devregs_size = HPC1_SCSI0_DEVREGS_SIZE,
193 .scsi1_devregs_size = HPC1_SCSI0_DEVREGS_SIZE,
194 .enet_devregs = HPC1_ENET_DEVREGS,
195 .enet_devregs_size = HPC1_ENET_DEVREGS_SIZE,
196 .pbus_fifo = HPC1_PBUS_FIFO,
197 .pbus_fifo_size = HPC1_PBUS_FIFO_SIZE,
198 .pbus_bbram = HPC1_PBUS_BBRAM,
199 #define MAX_SCSI_XFER (512*1024)
200 .scsi_max_xfer = MAX_SCSI_XFER,
201 .scsi_dma_segs = (MAX_SCSI_XFER / 4096),
202 .scsi_dma_segs_size = 4096,
203 .clk_freq = 100,
204 .dma_datain_cmd = (HPC1_DMACTL_ACTIVE | HPC1_DMACTL_DIR),
205 .dma_dataout_cmd = HPC1_DMACTL_ACTIVE,
206 .scsi_dmactl_flush = HPC1_DMACTL_FLUSH,
207 .scsi_dmactl_active = HPC1_DMACTL_ACTIVE,
208 .scsi_dmactl_reset = HPC1_DMACTL_RESET
209 };
210
211 static struct hpc_values hpc3_values = {
212 .revision 3,
213 .scsi0_regs = HPC_SCSI0_REGS,
214 .scsi0_regs_size = HPC_SCSI0_REGS_SIZE,
215 .scsi0_cbp = HPC_SCSI0_CBP,
216 .scsi0_ndbp = HPC_SCSI0_NDBP,
217 .scsi0_bc = HPC_SCSI0_BC,
218 .scsi0_ctl = HPC_SCSI0_CTL,
219 .scsi0_gio = HPC_SCSI0_GIO,
220 .scsi0_dev = HPC_SCSI0_DEV,
221 .scsi0_dmacfg = HPC_SCSI0_DMACFG,
222 .scsi0_piocfg = HPC_SCSI0_PIOCFG,
223 .scsi1_regs = HPC_SCSI1_REGS,
224 .scsi1_regs_size = HPC_SCSI1_REGS_SIZE,
225 .scsi1_cbp = HPC_SCSI1_CBP,
226 .scsi1_ndbp = HPC_SCSI1_NDBP,
227 .scsi1_bc = HPC_SCSI1_BC,
228 .scsi1_ctl = HPC_SCSI1_CTL,
229 .scsi1_gio = HPC_SCSI1_GIO,
230 .scsi1_dev = HPC_SCSI1_DEV,
231 .scsi1_dmacfg = HPC_SCSI1_DMACFG,
232 .scsi1_piocfg = HPC_SCSI1_PIOCFG,
233 .dmactl_dir = HPC_DMACTL_DIR,
234 .dmactl_flush = HPC_DMACTL_FLUSH,
235 .dmactl_active = HPC_DMACTL_ACTIVE,
236 .dmactl_reset = HPC_DMACTL_RESET,
237 .enet_regs = HPC_ENET_REGS,
238 .enet_regs_size = HPC_ENET_REGS_SIZE,
239 .enet_intdelay = 0,
240 .enet_intdelayval = 0,
241 .enetr_cbp = HPC_ENETR_CBP,
242 .enetr_ndbp = HPC_ENETR_NDBP,
243 .enetr_bc = HPC_ENETR_BC,
244 .enetr_ctl = HPC_ENETR_CTL,
245 .enetr_ctl_active = ENETR_CTL_ACTIVE,
246 .enetr_reset = HPC_ENETR_RESET,
247 .enetr_dmacfg = HPC_ENETR_DMACFG,
248 .enetr_piocfg = HPC_ENETR_PIOCFG,
249 .enetx_cbp = HPC_ENETX_CBP,
250 .enetx_ndbp = HPC_ENETX_NDBP,
251 .enetx_bc = HPC_ENETX_BC,
252 .enetx_ctl = HPC_ENETX_CTL,
253 .enetx_ctl_active = ENETX_CTL_ACTIVE,
254 .enetx_dev = HPC_ENETX_DEV,
255 .enetr_fifo = HPC_ENETR_FIFO,
256 .enetr_fifo_size = HPC_ENETR_FIFO_SIZE,
257 .enetx_fifo = HPC_ENETX_FIFO,
258 .enetx_fifo_size = HPC_ENETX_FIFO_SIZE,
259 .scsi0_devregs_size = HPC_SCSI0_DEVREGS_SIZE,
260 .scsi1_devregs_size = HPC_SCSI1_DEVREGS_SIZE,
261 .enet_devregs = HPC_ENET_DEVREGS,
262 .enet_devregs_size = HPC_ENET_DEVREGS_SIZE,
263 .pbus_fifo = HPC_PBUS_FIFO,
264 .pbus_fifo_size = HPC_PBUS_FIFO_SIZE,
265 .pbus_bbram = HPC_PBUS_BBRAM,
266 .scsi_max_xfer = MAX_SCSI_XFER,
267 .scsi_dma_segs = (MAX_SCSI_XFER / 8192),
268 .scsi_dma_segs_size = 8192,
269 .clk_freq = 100,
270 .dma_datain_cmd = HPC_DMACTL_ACTIVE,
271 .dma_dataout_cmd = (HPC_DMACTL_ACTIVE | HPC_DMACTL_DIR),
272 .scsi_dmactl_flush = HPC_DMACTL_FLUSH,
273 .scsi_dmactl_active = HPC_DMACTL_ACTIVE,
274 .scsi_dmactl_reset = HPC_DMACTL_RESET
275 };
276
277
278 extern int mach_type; /* IPxx type */
279 extern int mach_subtype; /* subtype: eg., Guiness/Fullhouse for IP22 */
280 extern int mach_boardrev; /* machine board revision, in case it matters */
281
282 extern struct sgimips_bus_dma_tag sgimips_default_bus_dma_tag;
283
284 static int powerintr_established;
285
286 int hpc_match(struct device *, struct cfdata *, void *);
287 void hpc_attach(struct device *, struct device *, void *);
288 int hpc_print(void *, const char *);
289
290 int hpc_submatch(struct device *, struct cfdata *, void *);
291
292 int hpc_power_intr(void *);
293
294 #if defined(BLINK)
295 static struct callout hpc_blink_ch = CALLOUT_INITIALIZER;
296 static void hpc_blink(void *);
297 #endif
298
299 CFATTACH_DECL(hpc, sizeof(struct hpc_softc),
300 hpc_match, hpc_attach, NULL, NULL);
301
302 int
303 hpc_match(struct device *parent, struct cfdata *cf, void *aux)
304 {
305 struct gio_attach_args* ga = aux;
306
307 /* Make sure it's actually there and readable */
308 if (badaddr((void*)MIPS_PHYS_TO_KSEG1(ga->ga_addr), sizeof(u_int32_t)))
309 return 0;
310
311 return 1;
312 }
313
314 void
315 hpc_attach(struct device *parent, struct device *self, void *aux)
316 {
317 struct hpc_softc *sc = (struct hpc_softc *)self;
318 struct gio_attach_args* ga = aux;
319 struct hpc_attach_args ha;
320 const struct hpc_device *hd;
321 uint32_t hpctype;
322 int sysmask;
323
324 switch (mach_type) {
325 case MACH_SGI_IP12:
326 hpctype = 1;
327 sysmask = HPCDEV_IP12;
328 break;
329
330 case MACH_SGI_IP20:
331 hpctype = 15;
332 sysmask = HPCDEV_IP20;
333 break;
334
335 case MACH_SGI_IP22:
336 hpctype = 3;
337 if (mach_subtype == MACH_SGI_IP22_FULLHOUSE)
338 sysmask = HPCDEV_IP22;
339 else
340 sysmask = HPCDEV_IP24;
341 break;
342
343 default:
344 panic("hpc_attach: can't handle HPC on an IP%d", mach_type);
345 };
346
347 /*
348 * Verify HPC1 or HPC1.5
349 *
350 * For some reason the endian register isn't mapped on all
351 * machines (HPC1 machines?).
352 */
353 if (hpctype != 3 &&
354 !badaddr((void *)MIPS_PHYS_TO_KSEG1(ga->ga_addr+HPC1_BIGENDIAN),4)){
355 hpctype = *(uint32_t *)
356 MIPS_PHYS_TO_KSEG1(ga->ga_addr + HPC1_BIGENDIAN);
357
358 if (((hpctype >> HPC1_REVSHIFT) & HPC1_REVMASK) == HPC1_REV15)
359 hpctype = 15;
360 else
361 hpctype = 1;
362
363 /* force big-endian mode */
364 *(uint32_t *)MIPS_PHYS_TO_KSEG1(ga->ga_addr + HPC1_BIGENDIAN)
365 = hpctype & 0xe0;
366 }
367
368 printf(": SGI HPC%d%s\n", (hpctype == 3) ? 3 : 1,
369 (hpctype == 15) ? ".5" : "");
370
371 sc->sc_ct = 1;
372 sc->sc_ch = ga->ga_ioh;
373
374 sc->sc_base = ga->ga_addr;
375
376 for (hd = hpc_devices; hd->hd_name != NULL; hd++) {
377 if (!(hd->hd_sysmask & sysmask))
378 continue;
379
380 ha.ha_name = hd->hd_name;
381 ha.ha_devoff = hd->hd_devoff;
382 ha.ha_dmaoff = hd->hd_dmaoff;
383 ha.ha_irq = hd->hd_irq;
384
385 /* XXX This is disgusting. */
386 ha.ha_st = 1;
387 ha.ha_sh = MIPS_PHYS_TO_KSEG1(sc->sc_base);
388 ha.ha_dmat = &sgimips_default_bus_dma_tag;
389 if (hpctype == 3)
390 ha.hpc_regs = &hpc3_values;
391 else
392 ha.hpc_regs = &hpc1_values;
393 ha.hpc_regs->revision = hpctype;
394
395 (void) config_found_sm(self, &ha, hpc_print, hpc_submatch);
396 }
397
398 /*
399 * XXX: Only attach the powerfail interrupt once, since the
400 * interrupt code doesn't let you share interrupt just yet.
401 *
402 * Since the powerfail interrupt is hardcoded to read from
403 * a specific register anyway (XXX#2!), we don't care when
404 * it gets attached, as long as it only happens once.
405 */
406 if (mach_type == MACH_SGI_IP22 && !powerintr_established) {
407 cpu_intr_establish(9, IPL_NONE, hpc_power_intr, sc);
408 powerintr_established++;
409 }
410
411 #if defined(BLINK)
412 if (mach_type == MACH_SGI_IP12 || mach_type == MACH_SGI_IP20)
413 hpc_blink(sc);
414 #endif
415 }
416
417 int
418 hpc_submatch(struct device *parent, struct cfdata *cf, void *aux)
419 {
420 struct hpc_attach_args *ha = aux;
421
422 if (cf->cf_loc[HPCCF_OFFSET] != HPCCF_OFFSET_DEFAULT &&
423 (bus_addr_t) cf->cf_loc[HPCCF_OFFSET] != ha->ha_devoff)
424 return (0);
425
426 return (config_match(parent, cf, aux));
427 }
428
429 int
430 hpc_print(void *aux, const char *pnp)
431 {
432 struct hpc_attach_args *ha = aux;
433
434 if (pnp)
435 printf("%s at %s", ha->ha_name, pnp);
436
437 printf(" offset 0x%lx", ha->ha_devoff);
438
439 return (UNCONF);
440 }
441
442 int
443 hpc_power_intr(void *arg)
444 {
445 u_int32_t pwr_reg;
446
447 pwr_reg = *((volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(0x1fbd9850));
448 *((volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(0x1fbd9850)) = pwr_reg;
449
450 printf("hpc_power_intr: panel reg = %08x\n", pwr_reg);
451
452 if (pwr_reg & 2)
453 cpu_reboot(RB_HALT, NULL);
454
455 return 1;
456 }
457
458 #if defined(BLINK)
459 static void
460 hpc_blink(void *self)
461 {
462 struct hpc_softc *sc = (struct hpc_softc *) self;
463 register int s;
464 int value;
465
466 s = splhigh();
467
468 value = *(volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(HPC1_AUX_REGS);
469 value ^= HPC1_AUX_CONSLED;
470 *(volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(HPC1_AUX_REGS) = value;
471 splx(s);
472
473 /*
474 * Blink rate is:
475 * full cycle every second if completely idle (loadav = 0)
476 * full cycle every 2 seconds if loadav = 1
477 * full cycle every 3 seconds if loadav = 2
478 * etc.
479 */
480 s = (((averunnable.ldavg[0] + FSCALE) * hz) >> (FSHIFT + 1));
481 callout_reset(&hpc_blink_ch, s, hpc_blink, sc);
482 }
483 #endif
484
485