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