xref: /netbsd-src/sys/arch/sgimips/hpc/hpc.c (revision 2c7e45820a734ea6542d2e97af8ccf9ccbd42c4f)
1 /*	$NetBSD: hpc.c,v 1.52 2007/02/19 20:14:30 rumble 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.52 2007/02/19 20:14:30 rumble 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 #define _SGIMIPS_BUS_DMA_PRIVATE
48 #include <machine/bus.h>
49 #include <machine/machtype.h>
50 #include <machine/sysconf.h>
51 
52 #include <sgimips/gio/gioreg.h>
53 #include <sgimips/gio/giovar.h>
54 
55 #include <sgimips/hpc/hpcvar.h>
56 #include <sgimips/hpc/hpcreg.h>
57 #include <sgimips/ioc/iocreg.h>
58 
59 #include <dev/ic/smc93cx6var.h>
60 
61 #include "locators.h"
62 
63 struct hpc_device {
64 	const char *hd_name;
65 	bus_addr_t hd_base;
66 	bus_addr_t hd_devoff;
67 	bus_addr_t hd_dmaoff;
68 	int hd_irq;
69 	int hd_sysmask;
70 };
71 
72 static const struct hpc_device hpc1_devices[] = {
73 	/* probe order is important for IP20 zsc */
74 
75 	{ "zsc",        /* Personal Iris/Indigo serial 0/1 duart 1 */
76 	  HPC_BASE_ADDRESS_0,
77 	  0x0d10, 0,
78 	  5,
79 	  HPCDEV_IP12 | HPCDEV_IP20 },
80 
81 	{ "zsc",        /* Personal Iris/Indigo kbd/ms duart 0 */
82 	  HPC_BASE_ADDRESS_0,
83 	  0x0d00, 0,
84 	  5,
85 	  HPCDEV_IP12 | HPCDEV_IP20 },
86 
87 	{ "sq",		/* Personal Iris/Indigo onboard ethernet */
88 	  HPC_BASE_ADDRESS_0,
89 	  HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
90 	  3,
91 	  HPCDEV_IP12 | HPCDEV_IP20 },
92 
93 	{ "sq",		/* E++ GIO adapter slot 0 (Indigo) */
94 	  HPC_BASE_ADDRESS_1,
95 	  HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
96 	  6,
97 	  HPCDEV_IP12 | HPCDEV_IP20 },
98 
99 	{ "sq",		/* E++ GIO adapter slot 0 (Indy) */
100 	  HPC_BASE_ADDRESS_1,
101 	  HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
102 	  22,
103 	  HPCDEV_IP24 },
104 
105 	{ "sq",		/* E++ GIO adapter slot 1 (Indigo) */
106 	  HPC_BASE_ADDRESS_2,
107 	  HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
108 	  6,
109 	  HPCDEV_IP12 | HPCDEV_IP20 },
110 
111 	{ "sq",		/* E++ GIO adapter slot 1 (Indy/Challenge S) */
112 	  HPC_BASE_ADDRESS_2,
113 	  HPC1_ENET_DEVREGS, HPC1_ENET_REGS,
114 	  23,
115 	  HPCDEV_IP24 },
116 
117 	{ "wdsc",	/* Personal Iris/Indigo onboard SCSI */
118 	  HPC_BASE_ADDRESS_0,
119 	  HPC1_SCSI0_DEVREGS, HPC1_SCSI0_REGS,
120 	  2,    /* XXX 1 = IRQ_LOCAL0 + 2 */
121 	  HPCDEV_IP12 | HPCDEV_IP20 },
122 
123 	{ "dpclock",	/* Personal Iris/Indigo clock */
124 	  HPC_BASE_ADDRESS_0,
125 	  HPC1_PBUS_BBRAM, 0,
126 	  -1,
127 	  HPCDEV_IP12 | HPCDEV_IP20 },
128 
129 	{ NULL,
130 	  0,
131 	  0, 0,
132 	  0,
133 	  0
134 	}
135 };
136 
137 static const struct hpc_device hpc3_devices[] = {
138 	{ "zsc",	/* serial 0/1 duart 0 */
139 	  HPC_BASE_ADDRESS_0,
140 	  /* XXX Magic numbers */
141 	  HPC3_PBUS_CH6_DEVREGS + IOC_SERIAL_REGS, 0,
142 	  29,
143 	  HPCDEV_IP22 | HPCDEV_IP24 },
144 
145 	{ "pckbc",	/* Indigo2/Indy ps2 keyboard/mouse controller */
146 	  HPC_BASE_ADDRESS_0,
147 	  HPC3_PBUS_CH6_DEVREGS + IOC_KB_REGS, 0,
148 	  28,
149 	  HPCDEV_IP22 | HPCDEV_IP24 },
150 
151 	{ "sq",		/* Indigo2/Indy/Challenge S/Challenge M onboard enet */
152 	  HPC_BASE_ADDRESS_0,
153 	  HPC3_ENET_DEVREGS, HPC3_ENET_REGS,
154 	  3,
155 	  HPCDEV_IP22 | HPCDEV_IP24 },
156 
157 	{ "sq",		/* Challenge S IOPLUS secondary ethernet */
158 	  HPC_BASE_ADDRESS_1,
159 	  HPC3_ENET_DEVREGS, HPC3_ENET_REGS,
160 	  0,
161 	  HPCDEV_IP24 },
162 
163 	{ "wdsc",	/* Indigo2/Indy/Challenge S/Challenge M onboard SCSI */
164 	  HPC_BASE_ADDRESS_0,
165 	  HPC3_SCSI0_DEVREGS, HPC3_SCSI0_REGS,
166 	  1,	/* XXX 1 = IRQ_LOCAL0 + 1 */
167 	  HPCDEV_IP22 | HPCDEV_IP24 },
168 
169 	{ "wdsc",	/* Indigo2/Challenge M secondary onboard SCSI */
170 	  HPC_BASE_ADDRESS_0,
171 	  HPC3_SCSI1_DEVREGS, HPC3_SCSI1_REGS,
172 	  2,	/* XXX 2 = IRQ_LOCAL0 + 2 */
173 	  HPCDEV_IP22 },
174 
175 	{ "dsclock",	/* Indigo2/Indy/Challenge S/Challenge M clock */
176 	  HPC_BASE_ADDRESS_0,
177 	  HPC3_PBUS_BBRAM, 0,
178 	  -1,
179 	  HPCDEV_IP22 | HPCDEV_IP24 },
180 
181 	{ "haltwo",	/* Indigo2/Indy onboard audio */
182 	  HPC_BASE_ADDRESS_0,
183 	  HPC3_PBUS_CH0_DEVREGS, HPC3_PBUS_DMAREGS,
184 	  8 + 4, /* XXX IRQ_LOCAL1 + 4 */
185 	  HPCDEV_IP22 | HPCDEV_IP24 },
186 
187 	{ "pi1ppc",	/* Indigo2/Indy/Challenge S/Challenge M onboard pport */
188 	  HPC_BASE_ADDRESS_0,
189 	  HPC3_PBUS_CH6_DEVREGS + IOC_PLP_REGS, 0,
190 	  -1,
191 	  HPCDEV_IP22 | HPCDEV_IP24 },
192 
193 	{ NULL,
194 	  0,
195 	  0, 0,
196 	  0,
197 	  0
198 	}
199 };
200 
201 struct hpc_softc {
202 	struct device 		sc_dev;
203 
204 	bus_addr_t		sc_base;
205 
206 	bus_space_tag_t		sc_ct;
207 	bus_space_handle_t	sc_ch;
208 };
209 
210 static struct hpc_values hpc1_values = {
211 	.revision =		1,
212 	.scsi0_regs =		HPC1_SCSI0_REGS,
213 	.scsi0_regs_size =	HPC1_SCSI0_REGS_SIZE,
214 	.scsi0_cbp =		HPC1_SCSI0_CBP,
215 	.scsi0_ndbp = 		HPC1_SCSI0_NDBP,
216 	.scsi0_bc =		HPC1_SCSI0_BC,
217 	.scsi0_ctl =		HPC1_SCSI0_CTL,
218 	.scsi0_gio =		HPC1_SCSI0_GIO,
219 	.scsi0_dev =		HPC1_SCSI0_DEV,
220 	.scsi0_dmacfg =		HPC1_SCSI0_DMACFG,
221 	.scsi0_piocfg =		HPC1_SCSI0_PIOCFG,
222 	.scsi1_regs =		0,
223 	.scsi1_regs_size =	0,
224 	.scsi1_cbp =		0,
225 	.scsi1_ndbp =		0,
226 	.scsi1_bc =		0,
227 	.scsi1_ctl =		0,
228 	.scsi1_gio =		0,
229 	.scsi1_dev =		0,
230 	.scsi1_dmacfg =		0,
231 	.scsi1_piocfg =		0,
232 	.enet_regs =		HPC1_ENET_REGS,
233 	.enet_regs_size =	HPC1_ENET_REGS_SIZE,
234 	.enet_intdelay =	HPC1_ENET_INTDELAY,
235 	.enet_intdelayval =	HPC1_ENET_INTDELAY_OFF,
236 	.enetr_cbp =		HPC1_ENETR_CBP,
237 	.enetr_ndbp =		HPC1_ENETR_NDBP,
238 	.enetr_bc =		HPC1_ENETR_BC,
239 	.enetr_ctl =		HPC1_ENETR_CTL,
240 	.enetr_ctl_active =	HPC1_ENETR_CTL_ACTIVE,
241 	.enetr_reset =		HPC1_ENETR_RESET,
242 	.enetr_dmacfg =		0,
243 	.enetr_piocfg =		0,
244 	.enetx_cbp =		HPC1_ENETX_CBP,
245 	.enetx_ndbp =		HPC1_ENETX_NDBP,
246 	.enetx_bc =		HPC1_ENETX_BC,
247 	.enetx_ctl =		HPC1_ENETX_CTL,
248 	.enetx_ctl_active =	HPC1_ENETX_CTL_ACTIVE,
249 	.enetx_dev =		0,
250 	.enetr_fifo =		HPC1_ENETR_FIFO,
251 	.enetr_fifo_size =	HPC1_ENETR_FIFO_SIZE,
252 	.enetx_fifo =		HPC1_ENETX_FIFO,
253 	.enetx_fifo_size =	HPC1_ENETX_FIFO_SIZE,
254 	.scsi0_devregs_size =	HPC1_SCSI0_DEVREGS_SIZE,
255 	.scsi1_devregs_size =	0,
256 	.enet_devregs =		HPC1_ENET_DEVREGS,
257 	.enet_devregs_size =	HPC1_ENET_DEVREGS_SIZE,
258 	.pbus_fifo =		0,
259 	.pbus_fifo_size =	0,
260 	.pbus_bbram =		0,
261 #define MAX_SCSI_XFER   (512*1024)
262 	.scsi_max_xfer =	MAX_SCSI_XFER,
263 	.scsi_dma_segs =       (MAX_SCSI_XFER / 4096),
264 	.scsi_dma_segs_size =	4096,
265 	.scsi_dma_datain_cmd = (HPC1_SCSI_DMACTL_ACTIVE | HPC1_SCSI_DMACTL_DIR),
266 	.scsi_dma_dataout_cmd =	HPC1_SCSI_DMACTL_ACTIVE,
267 	.scsi_dmactl_flush =	HPC1_SCSI_DMACTL_FLUSH,
268 	.scsi_dmactl_active =	HPC1_SCSI_DMACTL_ACTIVE,
269 	.scsi_dmactl_reset =	HPC1_SCSI_DMACTL_RESET
270 };
271 
272 static struct hpc_values hpc3_values = {
273 	.revision =		3,
274 	.scsi0_regs =		HPC3_SCSI0_REGS,
275 	.scsi0_regs_size =	HPC3_SCSI0_REGS_SIZE,
276 	.scsi0_cbp =		HPC3_SCSI0_CBP,
277 	.scsi0_ndbp =		HPC3_SCSI0_NDBP,
278 	.scsi0_bc =		HPC3_SCSI0_BC,
279 	.scsi0_ctl =		HPC3_SCSI0_CTL,
280 	.scsi0_gio =		HPC3_SCSI0_GIO,
281 	.scsi0_dev =		HPC3_SCSI0_DEV,
282 	.scsi0_dmacfg =		HPC3_SCSI0_DMACFG,
283 	.scsi0_piocfg =		HPC3_SCSI0_PIOCFG,
284 	.scsi1_regs =		HPC3_SCSI1_REGS,
285 	.scsi1_regs_size =	HPC3_SCSI1_REGS_SIZE,
286 	.scsi1_cbp =		HPC3_SCSI1_CBP,
287 	.scsi1_ndbp =		HPC3_SCSI1_NDBP,
288 	.scsi1_bc =		HPC3_SCSI1_BC,
289 	.scsi1_ctl =		HPC3_SCSI1_CTL,
290 	.scsi1_gio =		HPC3_SCSI1_GIO,
291 	.scsi1_dev =		HPC3_SCSI1_DEV,
292 	.scsi1_dmacfg =		HPC3_SCSI1_DMACFG,
293 	.scsi1_piocfg =		HPC3_SCSI1_PIOCFG,
294 	.enet_regs =		HPC3_ENET_REGS,
295 	.enet_regs_size =	HPC3_ENET_REGS_SIZE,
296 	.enet_intdelay =	0,
297 	.enet_intdelayval =	0,
298 	.enetr_cbp =		HPC3_ENETR_CBP,
299 	.enetr_ndbp =		HPC3_ENETR_NDBP,
300 	.enetr_bc =		HPC3_ENETR_BC,
301 	.enetr_ctl =		HPC3_ENETR_CTL,
302 	.enetr_ctl_active =	HPC3_ENETR_CTL_ACTIVE,
303 	.enetr_reset =		HPC3_ENETR_RESET,
304 	.enetr_dmacfg =		HPC3_ENETR_DMACFG,
305 	.enetr_piocfg =		HPC3_ENETR_PIOCFG,
306 	.enetx_cbp =		HPC3_ENETX_CBP,
307 	.enetx_ndbp =		HPC3_ENETX_NDBP,
308 	.enetx_bc =		HPC3_ENETX_BC,
309 	.enetx_ctl =		HPC3_ENETX_CTL,
310 	.enetx_ctl_active =	HPC3_ENETX_CTL_ACTIVE,
311 	.enetx_dev =		HPC3_ENETX_DEV,
312 	.enetr_fifo =		HPC3_ENETR_FIFO,
313 	.enetr_fifo_size =	HPC3_ENETR_FIFO_SIZE,
314 	.enetx_fifo =		HPC3_ENETX_FIFO,
315 	.enetx_fifo_size =	HPC3_ENETX_FIFO_SIZE,
316 	.scsi0_devregs_size =	HPC3_SCSI0_DEVREGS_SIZE,
317 	.scsi1_devregs_size =	HPC3_SCSI1_DEVREGS_SIZE,
318 	.enet_devregs =		HPC3_ENET_DEVREGS,
319 	.enet_devregs_size =	HPC3_ENET_DEVREGS_SIZE,
320 	.pbus_fifo =		HPC3_PBUS_FIFO,
321 	.pbus_fifo_size =	HPC3_PBUS_FIFO_SIZE,
322 	.pbus_bbram =		HPC3_PBUS_BBRAM,
323 	.scsi_max_xfer =	MAX_SCSI_XFER,
324 	.scsi_dma_segs =       (MAX_SCSI_XFER / 8192),
325 	.scsi_dma_segs_size =	8192,
326 	.scsi_dma_datain_cmd =	HPC3_SCSI_DMACTL_ACTIVE,
327 	.scsi_dma_dataout_cmd =(HPC3_SCSI_DMACTL_ACTIVE | HPC3_SCSI_DMACTL_DIR),
328 	.scsi_dmactl_flush =	HPC3_SCSI_DMACTL_FLUSH,
329 	.scsi_dmactl_active =	HPC3_SCSI_DMACTL_ACTIVE,
330 	.scsi_dmactl_reset =	HPC3_SCSI_DMACTL_RESET
331 };
332 
333 
334 static int powerintr_established;
335 
336 static int	hpc_match(struct device *, struct cfdata *, void *);
337 static void	hpc_attach(struct device *, struct device *, void *);
338 static int	hpc_print(void *, const char *);
339 
340 static int	hpc_revision(struct hpc_softc *, struct gio_attach_args *);
341 
342 static int	hpc_submatch(struct device *, struct cfdata *,
343 		     const int *, void *);
344 
345 static int	hpc_power_intr(void *);
346 
347 #if defined(BLINK)
348 static struct callout hpc_blink_ch = CALLOUT_INITIALIZER;
349 static void	hpc_blink(void *);
350 #endif
351 
352 static int	hpc_read_eeprom(int, bus_space_tag_t, bus_space_handle_t,
353 		    uint8_t *, size_t);
354 
355 CFATTACH_DECL(hpc, sizeof(struct hpc_softc),
356     hpc_match, hpc_attach, NULL, NULL);
357 
358 static int
359 hpc_match(struct device *parent, struct cfdata *cf, void *aux)
360 {
361 	struct gio_attach_args* ga = aux;
362 
363 	/* Make sure it's actually there and readable */
364 	if (platform.badaddr((void*)MIPS_PHYS_TO_KSEG1(ga->ga_addr),
365 	    sizeof(u_int32_t)))
366 		return 0;
367 
368 	return 1;
369 }
370 
371 static void
372 hpc_attach(struct device *parent, struct device *self, void *aux)
373 {
374 	struct hpc_softc *sc = (struct hpc_softc *)self;
375 	struct gio_attach_args* ga = aux;
376 	struct hpc_attach_args ha;
377 	const struct hpc_device *hd;
378 	uint32_t hpctype;
379 	int isonboard;
380 	int isioplus;
381 	int sysmask;
382 
383 	switch (mach_type) {
384 	case MACH_SGI_IP12:
385 		sysmask = HPCDEV_IP12;
386 		break;
387 
388 	case MACH_SGI_IP20:
389 		sysmask = HPCDEV_IP20;
390 		break;
391 
392 	case MACH_SGI_IP22:
393 		if (mach_subtype == MACH_SGI_IP22_FULLHOUSE)
394 			sysmask = HPCDEV_IP22;
395 		else
396 			sysmask = HPCDEV_IP24;
397 		break;
398 
399 	default:
400 		panic("hpc_attach: can't handle HPC on an IP%d", mach_type);
401 	};
402 
403 	if ((hpctype = hpc_revision(sc, ga)) == 0)
404 		panic("hpc_attach: could not identify HPC revision\n");
405 
406 	/* force big-endian mode */
407 	if (hpctype == 15)
408 		*(uint32_t *)MIPS_PHYS_TO_KSEG1(ga->ga_addr+HPC1_BIGENDIAN) = 0;
409 
410 	/*
411 	 * All machines have only one HPC on the mainboard itself. ''Extra''
412 	 * HPCs require bus arbiter and other magic to run happily.
413 	 */
414 	isonboard = (ga->ga_addr == HPC_BASE_ADDRESS_0);
415 	isioplus = (ga->ga_addr == HPC_BASE_ADDRESS_1 && hpctype == 3 &&
416 	    sysmask == HPCDEV_IP24);
417 
418 	printf(": SGI HPC%d%s (%s)\n", (hpctype ==  3) ? 3 : 1,
419 	    (hpctype == 15) ? ".5" : "", (isonboard) ? "onboard" :
420 	    (isioplus) ? "IOPLUS mezzanine" : "GIO slot");
421 
422 	/*
423 	 * Configure the bus arbiter appropriately.
424 	 *
425 	 * In the case of Challenge S, we must tell the IOPLUS board which
426 	 * DMA channel to use (we steal it from one of the slots). SGI permits
427 	 * an HPC1.5 in slot 1, in which case IOPLUS must use EXP0, or any
428 	 * other DMA-capable board in slot 0, which leaves us to use EXP1. Of
429 	 * course, this means that only one GIO board may use DMA.
430 	 *
431 	 * Note that this never happens on Indigo2.
432 	 */
433 	if (isioplus) {
434 		int arb_slot;
435 
436 		if (platform.badaddr(
437 		    (void *)MIPS_PHYS_TO_KSEG1(HPC_BASE_ADDRESS_2), 4))
438 			arb_slot = GIO_SLOT_EXP1;
439 		else
440 			arb_slot = GIO_SLOT_EXP0;
441 
442 		if (gio_arb_config(arb_slot, GIO_ARB_LB | GIO_ARB_MST |
443 		    GIO_ARB_64BIT | GIO_ARB_HPC2_64BIT)) {
444 			printf("%s: failed to configure GIO bus arbiter\n",
445 			    sc->sc_dev.dv_xname);
446 			return;
447 		}
448 
449 		printf("%s: using EXP%d's DMA channel\n", sc->sc_dev.dv_xname,
450 		    (arb_slot == GIO_SLOT_EXP0) ? 0 : 1);
451 
452 		bus_space_write_4(ga->ga_iot, ga->ga_ioh,
453 		    HPC3_PBUS_CFGPIO_REGS, 0x0003ffff);
454 
455 		if (arb_slot == GIO_SLOT_EXP0)
456 			bus_space_write_4(ga->ga_iot, ga->ga_ioh,
457 			    HPC3_PBUS_CH0_DEVREGS, 0x20202020);
458 		else
459 			bus_space_write_4(ga->ga_iot, ga->ga_ioh,
460 			    HPC3_PBUS_CH0_DEVREGS, 0x30303030);
461 	} else if (!isonboard) {
462 		int arb_slot;
463 
464 		arb_slot = (ga->ga_addr == HPC_BASE_ADDRESS_1) ?
465 		    GIO_SLOT_EXP0 : GIO_SLOT_EXP1;
466 
467 		if (gio_arb_config(arb_slot, GIO_ARB_RT | GIO_ARB_MST)) {
468 			printf("%s: failed to configure GIO bus arbiter\n",
469 			    sc->sc_dev.dv_xname);
470 			return;
471 		}
472 	}
473 
474 	sc->sc_ct = SGIMIPS_BUS_SPACE_HPC;
475 	sc->sc_ch = ga->ga_ioh;
476 
477 	sc->sc_base = ga->ga_addr;
478 
479 	hd = (hpctype == 3) ? hpc3_devices : hpc1_devices;
480 	for (; hd->hd_name != NULL; hd++) {
481 		if (!(hd->hd_sysmask & sysmask) || hd->hd_base != sc->sc_base)
482 			continue;
483 
484 		ha.ha_name = hd->hd_name;
485 		ha.ha_devoff = hd->hd_devoff;
486 		ha.ha_dmaoff = hd->hd_dmaoff;
487 		ha.ha_irq = hd->hd_irq;
488 
489 		/* XXX This is disgusting. */
490 		ha.ha_st = SGIMIPS_BUS_SPACE_HPC;
491 		ha.ha_sh = MIPS_PHYS_TO_KSEG1(sc->sc_base);
492 		ha.ha_dmat = &sgimips_default_bus_dma_tag;
493 		if (hpctype == 3)
494 			ha.hpc_regs = &hpc3_values;
495 		else
496 			ha.hpc_regs = &hpc1_values;
497 		ha.hpc_regs->revision = hpctype;
498 		hpc_read_eeprom(hpctype, ha.ha_st, ha.ha_sh, ha.hpc_eeprom,
499 		    sizeof(ha.hpc_eeprom));
500 
501 		(void) config_found_sm_loc(self, "hpc", NULL, &ha, hpc_print,
502 					   hpc_submatch);
503 	}
504 
505 	/*
506 	 * XXX: Only attach the powerfail interrupt once, since the
507 	 * interrupt code doesn't let you share interrupt just yet.
508 	 *
509 	 * Since the powerfail interrupt is hardcoded to read from
510 	 * a specific register anyway (XXX#2!), we don't care when
511 	 * it gets attached, as long as it only happens once.
512 	 */
513 	if (mach_type == MACH_SGI_IP22 && !powerintr_established) {
514 		cpu_intr_establish(9, IPL_NONE, hpc_power_intr, sc);
515 		powerintr_established++;
516 	}
517 
518 #if defined(BLINK)
519 	if (mach_type == MACH_SGI_IP12 || mach_type == MACH_SGI_IP20)
520 		hpc_blink(sc);
521 #endif
522 }
523 
524 /*
525  * HPC revision detection isn't as simple as it should be. Devices probe
526  * differently depending on their slots, but luckily there is only one
527  * instance in which we have to decide the major revision (HPC1 vs HPC3).
528  *
529  * The HPC is found in the following configurations:
530  *	o Personal Iris 4D/3x:
531  *		One on-board HPC1 or HPC1.5.
532  *
533  *	o Indigo R3k/R4k:
534  * 		One on-board HPC1 or HPC1.5.
535  * 		Up to two additional HPC1.5's in GIO slots 0 and 1.
536  *
537  *	o Indy:
538  * 		One on-board HPC3.
539  *		Up to two additional HPC1.5's in GIO slots 0 and 1.
540  *
541  *	o Challenge S
542  * 		One on-board HPC3.
543  * 		Up to one additional HPC3 on the IOPLUS board (if installed).
544  *		Up to one additional HPC1.5 in slot 1 of the IOPLUS board.
545  *
546  *	o Indigo2, Challenge M
547  *		One on-board HPC3.
548  *
549  * All we really have to worry about is the IP22 case.
550  */
551 static int
552 hpc_revision(struct hpc_softc *sc, struct gio_attach_args *ga)
553 {
554 
555 	/* No hardware ever supported the last hpc base address. */
556 	if (ga->ga_addr == HPC_BASE_ADDRESS_3)
557 		return (0);
558 
559 	if (mach_type == MACH_SGI_IP12 || mach_type == MACH_SGI_IP20) {
560 		u_int32_t reg;
561 
562 		if (!platform.badaddr((void *)MIPS_PHYS_TO_KSEG1(ga->ga_addr +
563 		    HPC1_BIGENDIAN), 4)) {
564 			reg = *(uint32_t *)MIPS_PHYS_TO_KSEG1(ga->ga_addr +
565 			    HPC1_BIGENDIAN);
566 
567 			if (((reg >> HPC1_REVSHIFT) & HPC1_REVMASK) ==
568 			    HPC1_REV15)
569 				return (15);
570 			else
571 				return (1);
572 		}
573 
574 		return (1);
575 	}
576 
577 	/*
578 	 * If IP22, probe slot 0 to determine if HPC1.5 or HPC3. Slot 1 must
579 	 * be HPC1.5.
580 	 */
581 	if (mach_type == MACH_SGI_IP22) {
582 		if (ga->ga_addr == HPC_BASE_ADDRESS_0)
583 			return (3);
584 
585 		if (ga->ga_addr == HPC_BASE_ADDRESS_2)
586 			return (15);
587 
588 		/*
589 		 * Probe for it. We use one of the PBUS registers. Note
590 		 * that this probe succeeds with my E++ adapter in slot 1
591 		 * (bad), but it appears to always do the right thing in
592 		 * slot 0 (good!) and we're only worried about that one
593 		 * anyhow.
594 		 */
595 		if (platform.badaddr((void *)MIPS_PHYS_TO_KSEG1(ga->ga_addr +
596 		    HPC3_PBUS_CH7_BP), 4))
597 			return (15);
598 		else
599 			return (3);
600 	}
601 
602 	return (0);
603 }
604 
605 static int
606 hpc_submatch(struct device *parent, struct cfdata *cf,
607 	     const int *ldesc, void *aux)
608 {
609 	struct hpc_attach_args *ha = aux;
610 
611 	if (cf->cf_loc[HPCCF_OFFSET] != HPCCF_OFFSET_DEFAULT &&
612 	    (bus_addr_t) cf->cf_loc[HPCCF_OFFSET] != ha->ha_devoff)
613 		return (0);
614 
615 	return (config_match(parent, cf, aux));
616 }
617 
618 static int
619 hpc_print(void *aux, const char *pnp)
620 {
621 	struct hpc_attach_args *ha = aux;
622 
623 	if (pnp)
624 		printf("%s at %s", ha->ha_name, pnp);
625 
626 	printf(" offset 0x%lx", ha->ha_devoff);
627 
628 	return (UNCONF);
629 }
630 
631 static int
632 hpc_power_intr(void *arg)
633 {
634 	u_int32_t pwr_reg;
635 
636 	pwr_reg = *((volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(0x1fbd9850));
637 	*((volatile u_int32_t *)MIPS_PHYS_TO_KSEG1(0x1fbd9850)) = pwr_reg;
638 
639 	printf("hpc_power_intr: panel reg = %08x\n", pwr_reg);
640 
641 	if (pwr_reg & 2)
642 		cpu_reboot(RB_HALT, NULL);
643 
644 	return 1;
645 }
646 
647 #if defined(BLINK)
648 static void
649 hpc_blink(void *self)
650 {
651 	struct hpc_softc *sc = (struct hpc_softc *) self;
652 	register int	s;
653 	int	value;
654 
655 	s = splhigh();
656 
657 	value = *(volatile uint8_t *)MIPS_PHYS_TO_KSEG1(HPC_BASE_ADDRESS_0 +
658 	    HPC1_AUX_REGS);
659 	value ^= HPC1_AUX_CONSLED;
660 	*(volatile u_int8_t *)MIPS_PHYS_TO_KSEG1(HPC_BASE_ADDRESS_0 +
661 	    HPC1_AUX_REGS) = value;
662 	splx(s);
663 
664 	/*
665 	 * Blink rate is:
666 	 *      full cycle every second if completely idle (loadav = 0)
667 	 *      full cycle every 2 seconds if loadav = 1
668 	 *      full cycle every 3 seconds if loadav = 2
669 	 * etc.
670 	 */
671 	s = (((averunnable.ldavg[0] + FSCALE) * hz) >> (FSHIFT + 1));
672 	callout_reset(&hpc_blink_ch, s, hpc_blink, sc);
673 }
674 #endif
675 
676 /*
677  * Read the eeprom associated with one of the HPC's.
678  *
679  * NB: An eeprom is not always present, but the HPC should be able to
680  *     handle this gracefully. Any consumers should validate the data to
681  *     ensure it's reasonable.
682  */
683 static int
684 hpc_read_eeprom(int hpctype, bus_space_tag_t t, bus_space_handle_t h,
685     uint8_t *buf, size_t len)
686 {
687 	struct seeprom_descriptor sd;
688 	bus_space_handle_t bsh;
689 	bus_space_tag_t tag;
690 	bus_size_t offset;
691 
692 	if (!len || len & 0x1)
693 		return (1);
694 
695 	offset = (hpctype == 3) ? HPC3_EEPROM_DATA : HPC1_AUX_REGS;
696 
697 	tag = SGIMIPS_BUS_SPACE_NORMAL;
698 	if (bus_space_subregion(t, h, offset, 1, &bsh) != 0)
699 		return (1);
700 
701 	sd.sd_chip = C56_66;
702 	sd.sd_tag = tag;
703 	sd.sd_bsh = bsh;
704 	sd.sd_regsize = 1;
705 	sd.sd_control_offset = 0;
706 	sd.sd_status_offset = 0;
707 	sd.sd_dataout_offset = 0;
708 	sd.sd_DI = 0x10;	/* EEPROM -> CPU */
709 	sd.sd_DO = 0x08;	/* CPU -> EEPROM */
710 	sd.sd_CK = 0x04;
711 	sd.sd_CS = 0x02;
712 	sd.sd_MS = 0;
713 	sd.sd_RDY = 0;
714 
715 	if (read_seeprom(&sd, (uint16_t *)buf, 0, len / 2) != 1)
716 		return (1);
717 
718 	bus_space_unmap(t, bsh, 1);
719 
720 	return (0);
721 }
722