xref: /netbsd-src/sys/dev/acpi/acpi.c (revision 3816d47b2c42fcd6e549e3407f842a5b1a1d23ad)
1 /*	$NetBSD: acpi.c,v 1.143 2010/01/09 15:43:12 jruoho Exp $	*/
2 
3 /*-
4  * Copyright (c) 2003, 2007 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Charles M. Hannum of By Noon Software, Inc.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 /*
33  * Copyright 2001, 2003 Wasabi Systems, Inc.
34  * All rights reserved.
35  *
36  * Written by Jason R. Thorpe for Wasabi Systems, Inc.
37  *
38  * Redistribution and use in source and binary forms, with or without
39  * modification, are permitted provided that the following conditions
40  * are met:
41  * 1. Redistributions of source code must retain the above copyright
42  *    notice, this list of conditions and the following disclaimer.
43  * 2. Redistributions in binary form must reproduce the above copyright
44  *    notice, this list of conditions and the following disclaimer in the
45  *    documentation and/or other materials provided with the distribution.
46  * 3. All advertising materials mentioning features or use of this software
47  *    must display the following acknowledgement:
48  *	This product includes software developed for the NetBSD Project by
49  *	Wasabi Systems, Inc.
50  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
51  *    or promote products derived from this software without specific prior
52  *    written permission.
53  *
54  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
55  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
56  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
57  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
58  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
59  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
60  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
61  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
62  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
63  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
64  * POSSIBILITY OF SUCH DAMAGE.
65  */
66 
67 /*
68  * Autoconfiguration support for the Intel ACPI Component Architecture
69  * ACPI reference implementation.
70  */
71 
72 #include <sys/cdefs.h>
73 __KERNEL_RCSID(0, "$NetBSD: acpi.c,v 1.143 2010/01/09 15:43:12 jruoho Exp $");
74 
75 #include "opt_acpi.h"
76 #include "opt_pcifixup.h"
77 
78 #include <sys/param.h>
79 #include <sys/systm.h>
80 #include <sys/device.h>
81 #include <sys/malloc.h>
82 #include <sys/mutex.h>
83 #include <sys/kernel.h>
84 #include <sys/proc.h>
85 #include <sys/sysctl.h>
86 
87 #include <dev/acpi/acpica.h>
88 #include <dev/acpi/acpireg.h>
89 #include <dev/acpi/acpivar.h>
90 #include <dev/acpi/acpi_osd.h>
91 #include <dev/acpi/acpi_timer.h>
92 #include <dev/acpi/acpi_wakedev.h>
93 #include <dev/acpi/acpi_pci.h>
94 #ifdef ACPIVERBOSE
95 #include <dev/acpi/acpidevs_data.h>
96 #endif
97 
98 #define _COMPONENT          ACPI_TOOLS
99 ACPI_MODULE_NAME            ("acpi")
100 
101 #if defined(ACPI_PCI_FIXUP)
102 #error The option ACPI_PCI_FIXUP has been obsoleted by PCI_INTR_FIXUP_DISABLED.  Please adjust your kernel configuration file.
103 #endif
104 
105 #ifdef PCI_INTR_FIXUP_DISABLED
106 #include <dev/pci/pcidevs.h>
107 #endif
108 
109 MALLOC_DECLARE(M_ACPI);
110 
111 #include <machine/acpi_machdep.h>
112 
113 #ifdef ACPI_DEBUGGER
114 #define	ACPI_DBGR_INIT		0x01
115 #define	ACPI_DBGR_TABLES	0x02
116 #define	ACPI_DBGR_ENABLE	0x04
117 #define	ACPI_DBGR_PROBE		0x08
118 #define	ACPI_DBGR_RUNNING	0x10
119 
120 static int acpi_dbgr = 0x00;
121 #endif
122 
123 static ACPI_TABLE_DESC	acpi_initial_tables[128];
124 
125 static int	acpi_match(device_t, cfdata_t, void *);
126 static void	acpi_attach(device_t, device_t, void *);
127 static void	acpi_childdet(device_t, device_t);
128 static int	acpi_detach(device_t, int);
129 
130 static int	acpi_rescan(device_t, const char *, const int *);
131 static void	acpi_rescan1(struct acpi_softc *, const char *, const int *);
132 static void	acpi_rescan_nodes(struct acpi_softc *);
133 
134 static int	acpi_print(void *aux, const char *);
135 
136 static int	sysctl_hw_acpi_sleepstate(SYSCTLFN_ARGS);
137 
138 extern struct cfdriver acpi_cd;
139 
140 CFATTACH_DECL2_NEW(acpi, sizeof(struct acpi_softc),
141     acpi_match, acpi_attach, acpi_detach, NULL, acpi_rescan, acpi_childdet);
142 
143 /*
144  * This is a flag we set when the ACPI subsystem is active.  Machine
145  * dependent code may wish to skip other steps (such as attaching
146  * subsystems that ACPI supercedes) when ACPI is active.
147  */
148 int	acpi_active;
149 int	acpi_force_load;
150 int	acpi_suspended = 0;
151 
152 /*
153  * Pointer to the ACPI subsystem's state.  There can be only
154  * one ACPI instance.
155  */
156 struct acpi_softc *acpi_softc;
157 
158 /*
159  * Locking stuff.
160  */
161 extern kmutex_t acpi_interrupt_list_mtx;
162 
163 /*
164  * Ignored HIDs
165  */
166 static const char * const acpi_ignored_ids[] = {
167 #if defined(i386) || defined(x86_64)
168 	"PNP0000",	/* AT interrupt controller is handled internally */
169 	"PNP0200",	/* AT DMA controller is handled internally */
170 	"PNP0A??",	/* PCI Busses are handled internally */
171 	"PNP0B00",	/* AT RTC is handled internally */
172 	"PNP0C01",	/* No "System Board" driver */
173 	"PNP0C02",	/* No "PnP motherboard register resources" driver */
174 	"PNP0C0B",	/* No need for "ACPI fan" driver */
175 	"PNP0C0F",	/* ACPI PCI link devices are handled internally */
176 	"INT0800",	/* Intel HW RNG is handled internally */
177 #endif
178 #if defined(x86_64)
179 	"PNP0C04",	/* FPU is handled internally */
180 #endif
181 	NULL
182 };
183 
184 /*
185  * sysctl-related information
186  */
187 
188 static uint64_t acpi_root_pointer;	/* found as hw.acpi.root */
189 static int acpi_sleepstate = ACPI_STATE_S0;
190 static char acpi_supported_states[3 * 6 + 1] = "";
191 
192 /*
193  * Prototypes.
194  */
195 static void		acpi_build_tree(struct acpi_softc *);
196 static ACPI_STATUS	acpi_make_devnode(ACPI_HANDLE, UINT32, void *, void **);
197 
198 static void		acpi_enable_fixed_events(struct acpi_softc *);
199 
200 static ACPI_TABLE_HEADER *acpi_map_rsdt(void);
201 static void		acpi_unmap_rsdt(ACPI_TABLE_HEADER *);
202 static int		is_available_state(struct acpi_softc *, int);
203 
204 static bool		acpi_suspend(device_t, pmf_qual_t);
205 static bool		acpi_resume(device_t, pmf_qual_t);
206 
207 /*
208  * acpi_probe:
209  *
210  *	Probe for ACPI support.  This is called by the
211  *	machine-dependent ACPI front-end.  All of the
212  *	actual work is done by ACPICA.
213  *
214  *	NOTE: This is not an autoconfiguration interface function.
215  */
216 int
217 acpi_probe(void)
218 {
219 	static int beenhere;
220 	ACPI_TABLE_HEADER *rsdt;
221 	ACPI_STATUS rv;
222 
223 	if (beenhere != 0)
224 		panic("acpi_probe: ACPI has already been probed");
225 	beenhere = 1;
226 
227 	mutex_init(&acpi_interrupt_list_mtx, MUTEX_DEFAULT, IPL_NONE);
228 
229 	/*
230 	 * Start up ACPICA.
231 	 */
232 #ifdef ACPI_DEBUGGER
233 	if (acpi_dbgr & ACPI_DBGR_INIT)
234 		acpi_osd_debugger();
235 #endif
236 
237 	AcpiGbl_AllMethodsSerialized = FALSE;
238 	AcpiGbl_EnableInterpreterSlack = TRUE;
239 
240 	rv = AcpiInitializeSubsystem();
241 	if (ACPI_FAILURE(rv)) {
242 		printf("ACPI: unable to initialize ACPICA: %s\n",
243 		    AcpiFormatException(rv));
244 		return 0;
245 	}
246 
247 	rv = AcpiInitializeTables(acpi_initial_tables, 128, 0);
248 	if (ACPI_FAILURE(rv)) {
249 #ifdef ACPI_DEBUG
250 		printf("ACPI: unable to initialize ACPI tables: %s\n",
251 		    AcpiFormatException(rv));
252 #endif
253 		AcpiTerminate();
254 		return 0;
255 	}
256 
257 	rv = AcpiReallocateRootTable();
258 	if (ACPI_FAILURE(rv)) {
259 		printf("ACPI: unable to reallocate root table: %s\n",
260 		    AcpiFormatException(rv));
261 		AcpiTerminate();
262 		return 0;
263 	}
264 
265 #ifdef ACPI_DEBUGGER
266 	if (acpi_dbgr & ACPI_DBGR_TABLES)
267 		acpi_osd_debugger();
268 #endif
269 
270 	rv = AcpiLoadTables();
271 	if (ACPI_FAILURE(rv)) {
272 		printf("ACPI: unable to load tables: %s\n",
273 		    AcpiFormatException(rv));
274 		AcpiTerminate();
275 		return 0;
276 	}
277 
278 	rsdt = acpi_map_rsdt();
279 	if (rsdt == NULL) {
280 		printf("ACPI: unable to map RSDT\n");
281 		AcpiTerminate();
282 		return 0;
283 	}
284 
285 	if (!acpi_force_load && (acpi_find_quirks() & ACPI_QUIRK_BROKEN)) {
286 		printf("ACPI: BIOS implementation in listed as broken:\n");
287 		printf("ACPI: X/RSDT: OemId <%6.6s,%8.8s,%08x>, "
288 		       "AslId <%4.4s,%08x>\n",
289 			rsdt->OemId, rsdt->OemTableId,
290 		        rsdt->OemRevision,
291 			rsdt->AslCompilerId,
292 		        rsdt->AslCompilerRevision);
293 		printf("ACPI: not used. set acpi_force_load to use anyway.\n");
294 		acpi_unmap_rsdt(rsdt);
295 		AcpiTerminate();
296 		return 0;
297 	}
298 
299 	acpi_unmap_rsdt(rsdt);
300 
301 #if notyet
302 	/* Install the default address space handlers. */
303 	rv = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
304 	    ACPI_ADR_SPACE_SYSTEM_MEMORY, ACPI_DEFAULT_HANDLER, NULL, NULL);
305 	if (ACPI_FAILURE(rv)) {
306 		printf("ACPI: unable to initialize SystemMemory handler: %s\n",
307 		    AcpiFormatException(rv));
308 		AcpiTerminate();
309 		return 0;
310 	}
311 	rv = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
312 	    ACPI_ADR_SPACE_SYSTEM_IO, ACPI_DEFAULT_HANDLER, NULL, NULL);
313 	if (ACPI_FAILURE(rv)) {
314 		printf("ACPI: unable to initialize SystemIO handler: %s\n",
315 		     AcpiFormatException(rv));
316 		AcpiTerminate();
317 		return 0;
318 	}
319 	rv = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
320 	    ACPI_ADR_SPACE_PCI_CONFIG, ACPI_DEFAULT_HANDLER, NULL, NULL);
321 	if (ACPI_FAILURE(rv)) {
322 		printf("ACPI: unable to initialize PciConfig handler: %s\n",
323 		    AcpiFormatException(rv));
324 		AcpiTerminate();
325 		return 0;
326 	}
327 #endif
328 
329 	rv = AcpiEnableSubsystem(~(ACPI_NO_HARDWARE_INIT|ACPI_NO_ACPI_ENABLE));
330 	if (ACPI_FAILURE(rv)) {
331 		printf("ACPI: unable to enable: %s\n", AcpiFormatException(rv));
332 		AcpiTerminate();
333 		return 0;
334 	}
335 
336 	/*
337 	 * Looks like we have ACPI!
338 	 */
339 
340 	return 1;
341 }
342 
343 static int
344 acpi_submatch(device_t parent, cfdata_t cf, const int *locs, void *aux)
345 {
346 	struct cfattach *ca;
347 
348 	ca = config_cfattach_lookup(cf->cf_name, cf->cf_atname);
349 	return (ca == &acpi_ca);
350 }
351 
352 int
353 acpi_check(device_t parent, const char *ifattr)
354 {
355 	return (config_search_ia(acpi_submatch, parent, ifattr, NULL) != NULL);
356 }
357 
358 ACPI_PHYSICAL_ADDRESS
359 acpi_OsGetRootPointer(void)
360 {
361 	ACPI_PHYSICAL_ADDRESS PhysicalAddress;
362 
363 	/*
364 	 * IA-32: Use AcpiFindRootPointer() to locate the RSDP.
365 	 *
366 	 * IA-64: Use the EFI.
367 	 *
368 	 * We let MD code handle this since there are multiple
369 	 * ways to do it.
370 	 */
371 
372 	PhysicalAddress = acpi_md_OsGetRootPointer();
373 
374 	if (acpi_root_pointer == 0)
375 		acpi_root_pointer = PhysicalAddress;
376 
377 	return PhysicalAddress;
378 }
379 
380 /*
381  * acpi_match:
382  *
383  *	Autoconfiguration `match' routine.
384  */
385 static int
386 acpi_match(device_t parent, cfdata_t match, void *aux)
387 {
388 	/*
389 	 * XXX Check other locators?  Hard to know -- machine
390 	 * dependent code has already checked for the presence
391 	 * of ACPI by calling acpi_probe(), so I suppose we
392 	 * don't really have to do anything else.
393 	 */
394 	return 1;
395 }
396 
397 /* Remove references to child devices.
398  *
399  * XXX Need to reclaim any resources?
400  */
401 static void
402 acpi_childdet(device_t self, device_t child)
403 {
404 	struct acpi_softc *sc = device_private(self);
405 	struct acpi_scope *as;
406 	struct acpi_devnode *ad;
407 
408 	if (sc->sc_apmbus == child)
409 		sc->sc_apmbus = NULL;
410 
411 	TAILQ_FOREACH(as, &sc->sc_scopes, as_list) {
412 		TAILQ_FOREACH(ad, &as->as_devnodes, ad_list) {
413 			if (ad->ad_device == child)
414 				ad->ad_device = NULL;
415 		}
416 	}
417 }
418 
419 /*
420  * acpi_attach:
421  *
422  *	Autoconfiguration `attach' routine.  Finish initializing
423  *	ACPICA (some initialization was done in acpi_probe(),
424  *	which was required to check for the presence of ACPI),
425  *	and enable the ACPI subsystem.
426  */
427 static void
428 acpi_attach(device_t parent, device_t self, void *aux)
429 {
430 	struct acpi_softc *sc = device_private(self);
431 	struct acpibus_attach_args *aa = aux;
432 	ACPI_STATUS rv;
433 	ACPI_TABLE_HEADER *rsdt;
434 
435 	aprint_naive("\n");
436 	aprint_normal(": Intel ACPICA %08x\n", ACPI_CA_VERSION);
437 
438 	if (acpi_softc != NULL)
439 		panic("acpi_attach: ACPI has already been attached");
440 
441 	sysmon_power_settype("acpi");
442 
443 	rsdt = acpi_map_rsdt();
444 	if (rsdt) {
445 		aprint_verbose_dev(
446 		    self,
447 		    "X/RSDT: OemId <%6.6s,%8.8s,%08x>, AslId <%4.4s,%08x>\n",
448 		    rsdt->OemId, rsdt->OemTableId,
449 		    rsdt->OemRevision,
450 		    rsdt->AslCompilerId, rsdt->AslCompilerRevision);
451 	} else
452 		aprint_error_dev(self, "X/RSDT: Not found\n");
453 	acpi_unmap_rsdt(rsdt);
454 
455 	sc->sc_dev = self;
456 	sc->sc_quirks = acpi_find_quirks();
457 
458 	sc->sc_iot = aa->aa_iot;
459 	sc->sc_memt = aa->aa_memt;
460 	sc->sc_pc = aa->aa_pc;
461 	sc->sc_pciflags = aa->aa_pciflags;
462 	sc->sc_ic = aa->aa_ic;
463 
464 	acpi_softc = sc;
465 
466 	/*
467 	 * Register null power management handler
468 	 */
469 	if (!pmf_device_register(self, acpi_suspend, acpi_resume))
470 		aprint_error_dev(self, "couldn't establish power handler\n");
471 
472 	/*
473 	 * Bring ACPI on-line.
474 	 */
475 #ifdef ACPI_DEBUGGER
476 	if (acpi_dbgr & ACPI_DBGR_ENABLE)
477 		acpi_osd_debugger();
478 #endif
479 
480 #define ACPI_ENABLE_PHASE1 \
481     (ACPI_NO_HANDLER_INIT | ACPI_NO_EVENT_INIT)
482 #define ACPI_ENABLE_PHASE2 \
483     (ACPI_NO_HARDWARE_INIT | ACPI_NO_ACPI_ENABLE | \
484      ACPI_NO_ADDRESS_SPACE_INIT)
485 
486 	rv = AcpiEnableSubsystem(ACPI_ENABLE_PHASE1);
487 	if (ACPI_FAILURE(rv)) {
488 		aprint_error_dev(self, "unable to enable ACPI: %s\n",
489 		    AcpiFormatException(rv));
490 		return;
491 	}
492 
493 	acpi_md_callback();
494 
495 	rv = AcpiEnableSubsystem(ACPI_ENABLE_PHASE2);
496 	if (ACPI_FAILURE(rv)) {
497 		aprint_error_dev(self, "unable to enable ACPI: %s\n",
498 		    AcpiFormatException(rv));
499 		return;
500 	}
501 
502 	/* early EC handler initialization if ECDT table is available */
503 	config_found_ia(self, "acpiecdtbus", NULL, NULL);
504 
505 	rv = AcpiInitializeObjects(ACPI_FULL_INITIALIZATION);
506 	if (ACPI_FAILURE(rv)) {
507 		aprint_error_dev(self,
508 		    "unable to initialize ACPI objects: %s\n",
509 		    AcpiFormatException(rv));
510 		return;
511 	}
512 	acpi_active = 1;
513 
514 	/* Our current state is "awake". */
515 	sc->sc_sleepstate = ACPI_STATE_S0;
516 
517 	/* Show SCI interrupt. */
518 	aprint_verbose_dev(self, "SCI interrupting at int %d\n",
519 	    AcpiGbl_FADT.SciInterrupt);
520 
521 	/*
522 	 * Check for fixed-hardware features.
523 	 */
524 	acpi_enable_fixed_events(sc);
525 	acpitimer_init();
526 
527 	/*
528 	 * Scan the namespace and build our device tree.
529 	 */
530 #ifdef ACPI_DEBUGGER
531 	if (acpi_dbgr & ACPI_DBGR_PROBE)
532 		acpi_osd_debugger();
533 #endif
534 	acpi_build_tree(sc);
535 
536 	snprintf(acpi_supported_states, sizeof(acpi_supported_states),
537 	    "%s%s%s%s%s%s",
538 	    is_available_state(sc, ACPI_STATE_S0) ? "S0 " : "",
539 	    is_available_state(sc, ACPI_STATE_S1) ? "S1 " : "",
540 	    is_available_state(sc, ACPI_STATE_S2) ? "S2 " : "",
541 	    is_available_state(sc, ACPI_STATE_S3) ? "S3 " : "",
542 	    is_available_state(sc, ACPI_STATE_S4) ? "S4 " : "",
543 	    is_available_state(sc, ACPI_STATE_S5) ? "S5 " : "");
544 
545 #ifdef ACPI_DEBUGGER
546 	if (acpi_dbgr & ACPI_DBGR_RUNNING)
547 		acpi_osd_debugger();
548 #endif
549 }
550 
551 static int
552 acpi_detach(device_t self, int flags)
553 {
554 	int rc;
555 
556 #ifdef ACPI_DEBUGGER
557 	if (acpi_dbgr & ACPI_DBGR_RUNNING)
558 		acpi_osd_debugger();
559 #endif
560 
561 	if ((rc = config_detach_children(self, flags)) != 0)
562 		return rc;
563 
564 #ifdef ACPI_DEBUGGER
565 	if (acpi_dbgr & ACPI_DBGR_PROBE)
566 		acpi_osd_debugger();
567 #endif
568 
569 	if ((rc = acpitimer_detach()) != 0)
570 		return rc;
571 
572 #if 0
573 	/*
574 	 * Bring ACPI on-line.
575 	 */
576 #ifdef ACPI_DEBUGGER
577 	if (acpi_dbgr & ACPI_DBGR_ENABLE)
578 		acpi_osd_debugger();
579 #endif
580 
581 #define ACPI_ENABLE_PHASE1 \
582     (ACPI_NO_HANDLER_INIT | ACPI_NO_EVENT_INIT)
583 #define ACPI_ENABLE_PHASE2 \
584     (ACPI_NO_HARDWARE_INIT | ACPI_NO_ACPI_ENABLE | \
585      ACPI_NO_ADDRESS_SPACE_INIT)
586 
587 	rv = AcpiEnableSubsystem(ACPI_ENABLE_PHASE1);
588 	if (ACPI_FAILURE(rv)) {
589 		aprint_error_dev(self, "unable to enable ACPI: %s\n",
590 		    AcpiFormatException(rv));
591 		return;
592 	}
593 
594 	rv = AcpiEnableSubsystem(ACPI_ENABLE_PHASE2);
595 	if (ACPI_FAILURE(rv)) {
596 		aprint_error_dev(self, "unable to enable ACPI: %s\n",
597 		    AcpiFormatException(rv));
598 		return;
599 	}
600 
601 	/* early EC handler initialization if ECDT table is available */
602 	config_found_ia(self, "acpiecdtbus", NULL, NULL);
603 
604 	rv = AcpiInitializeObjects(ACPI_FULL_INITIALIZATION);
605 	if (ACPI_FAILURE(rv)) {
606 		aprint_error_dev(self,
607 		    "unable to initialize ACPI objects: %s\n",
608 		    AcpiFormatException(rv));
609 		return;
610 	}
611 	acpi_active = 1;
612 
613 	acpi_enable_fixed_events(sc);
614 #endif
615 
616 	pmf_device_deregister(self);
617 
618 #if 0
619 	sysmon_power_settype("acpi");
620 #endif
621 	acpi_softc = NULL;
622 
623 	return 0;
624 }
625 
626 static bool
627 acpi_suspend(device_t dv, pmf_qual_t qual)
628 {
629 	acpi_suspended = 1;
630 	return true;
631 }
632 
633 static bool
634 acpi_resume(device_t dv, pmf_qual_t qual)
635 {
636 	acpi_suspended = 0;
637 	return true;
638 }
639 
640 #if 0
641 /*
642  * acpi_disable:
643  *
644  *	Disable ACPI.
645  */
646 static ACPI_STATUS
647 acpi_disable(struct acpi_softc *sc)
648 {
649 	ACPI_STATUS rv = AE_OK;
650 
651 	if (acpi_active) {
652 		rv = AcpiDisable();
653 		if (ACPI_SUCCESS(rv))
654 			acpi_active = 0;
655 	}
656 	return rv;
657 }
658 #endif
659 
660 struct acpi_make_devnode_state {
661 	struct acpi_softc *softc;
662 	struct acpi_scope *scope;
663 };
664 
665 /*
666  * acpi_build_tree:
667  *
668  *	Scan relevant portions of the ACPI namespace and attach
669  *	child devices.
670  */
671 static void
672 acpi_build_tree(struct acpi_softc *sc)
673 {
674 	static const char *scopes[] = {
675 		"\\_PR_",	/* ACPI 1.0 processor namespace */
676 		"\\_SB_",	/* system bus namespace */
677 		"\\_SI_",	/* system indicator namespace */
678 		"\\_TZ_",	/* ACPI 1.0 thermal zone namespace */
679 		NULL,
680 	};
681 	struct acpi_make_devnode_state state;
682 	struct acpi_scope *as;
683 	ACPI_HANDLE parent;
684 	ACPI_STATUS rv;
685 	int i;
686 
687 	TAILQ_INIT(&sc->sc_scopes);
688 
689 	state.softc = sc;
690 
691 	/*
692 	 * Scan the namespace and build our tree.
693 	 */
694 	for (i = 0; scopes[i] != NULL; i++) {
695 		as = malloc(sizeof(*as), M_ACPI, M_WAITOK);
696 		as->as_name = scopes[i];
697 		TAILQ_INIT(&as->as_devnodes);
698 
699 		TAILQ_INSERT_TAIL(&sc->sc_scopes, as, as_list);
700 
701 		state.scope = as;
702 
703 		rv = AcpiGetHandle(ACPI_ROOT_OBJECT, scopes[i],
704 		    &parent);
705 		if (ACPI_SUCCESS(rv)) {
706 			AcpiWalkNamespace(ACPI_TYPE_ANY, parent, 100,
707 			    acpi_make_devnode, &state, NULL);
708 		}
709 	}
710 
711 	acpi_rescan1(sc, NULL, NULL);
712 
713 	acpi_wakedev_scan(sc);
714 
715 	acpi_pcidev_scan(sc);
716 }
717 
718 static int
719 acpi_rescan(device_t self, const char *ifattr, const int *locators)
720 {
721 	struct acpi_softc *sc = device_private(self);
722 
723 	acpi_rescan1(sc, ifattr, locators);
724 	return 0;
725 }
726 
727 static void
728 acpi_rescan1(struct acpi_softc *sc, const char *ifattr, const int *locators)
729 {
730 	if (ifattr_match(ifattr, "acpinodebus"))
731 		acpi_rescan_nodes(sc);
732 
733 	if (ifattr_match(ifattr, "acpiapmbus") && sc->sc_apmbus == NULL) {
734 		sc->sc_apmbus = config_found_ia(sc->sc_dev, "acpiapmbus", NULL,
735 		    NULL);
736 	}
737 }
738 
739 static void
740 acpi_rescan_nodes(struct acpi_softc *sc)
741 {
742 	struct acpi_scope *as;
743 
744 	TAILQ_FOREACH(as, &sc->sc_scopes, as_list) {
745 		struct acpi_devnode *ad;
746 
747 		/* Now, for this namespace, try to attach the devices. */
748 		TAILQ_FOREACH(ad, &as->as_devnodes, ad_list) {
749 			struct acpi_attach_args aa;
750 
751 			if (ad->ad_device != NULL)
752 				continue;
753 
754 			aa.aa_node = ad;
755 			aa.aa_iot = sc->sc_iot;
756 			aa.aa_memt = sc->sc_memt;
757 			aa.aa_pc = sc->sc_pc;
758 			aa.aa_pciflags = sc->sc_pciflags;
759 			aa.aa_ic = sc->sc_ic;
760 
761 			if (ad->ad_devinfo->Type == ACPI_TYPE_DEVICE) {
762 				/*
763 				 * XXX We only attach devices which are:
764 				 *
765 				 *	- present
766 				 *	- enabled
767 				 *	- functioning properly
768 				 *
769 				 * However, if enabled, it's decoding resources,
770 				 * so we should claim them, if possible.
771 				 * Requires changes to bus_space(9).
772 				 */
773 				if ((ad->ad_devinfo->Valid & ACPI_VALID_STA) ==
774 				    ACPI_VALID_STA &&
775 				    (ad->ad_devinfo->CurrentStatus &
776 				     (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED|
777 				      ACPI_STA_DEV_OK)) !=
778 				    (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED|
779 				     ACPI_STA_DEV_OK))
780 					continue;
781 			}
782 
783 			/*
784 			 * XXX Same problem as above...
785 			 *
786 			 * Do this check only for devices, as e.g.
787 			 * a Thermal Zone doesn't have a HID.
788 			 */
789 			if (ad->ad_devinfo->Type == ACPI_TYPE_DEVICE &&
790 			    (ad->ad_devinfo->Valid & ACPI_VALID_HID) == 0)
791 				continue;
792 
793 			/*
794 			 * Handled internally
795 			 */
796 			if (ad->ad_devinfo->Type == ACPI_TYPE_PROCESSOR ||
797 			    ad->ad_devinfo->Type == ACPI_TYPE_POWER)
798 				continue;
799 
800 			/*
801 			 * Skip ignored HIDs
802 			 */
803 			if (acpi_match_hid(ad->ad_devinfo, acpi_ignored_ids))
804 				continue;
805 
806 			ad->ad_device = config_found_ia(sc->sc_dev,
807 			    "acpinodebus", &aa, acpi_print);
808 		}
809 	}
810 }
811 
812 #ifdef ACPI_ACTIVATE_DEV
813 static void
814 acpi_activate_device(ACPI_HANDLE handle, ACPI_DEVICE_INFO **di)
815 {
816 	ACPI_STATUS rv;
817 	ACPI_DEVICE_INFO *newdi;
818 
819 #ifdef ACPI_DEBUG
820 	aprint_normal("acpi_activate_device: %s, old status=%x\n",
821 	       (*di)->HardwareId.Value, (*di)->CurrentStatus);
822 #endif
823 
824 	rv = acpi_allocate_resources(handle);
825 	if (ACPI_FAILURE(rv)) {
826 		aprint_error("acpi: activate failed for %s\n",
827 		       (*di)->HardwareId.String);
828 	} else {
829 		aprint_verbose("acpi: activated %s\n",
830 		    (*di)->HardwareId.String);
831 	}
832 
833 	(void)AcpiGetObjectInfo(handle, &newdi);
834 	ACPI_FREE(*di);
835 	*di = newdi;
836 
837 #ifdef ACPI_DEBUG
838 	aprint_normal("acpi_activate_device: %s, new status=%x\n",
839 	       (*di)->HardwareId.Value, (*di)->CurrentStatus);
840 #endif
841 }
842 #endif /* ACPI_ACTIVATE_DEV */
843 
844 /*
845  * acpi_make_devnode:
846  *
847  *	Make an ACPI devnode.
848  */
849 static ACPI_STATUS
850 acpi_make_devnode(ACPI_HANDLE handle, UINT32 level, void *context,
851     void **status)
852 {
853 	struct acpi_make_devnode_state *state = context;
854 #if defined(ACPI_DEBUG) || defined(ACPI_EXTRA_DEBUG)
855 	struct acpi_softc *sc = state->softc;
856 #endif
857 	struct acpi_scope *as = state->scope;
858 	struct acpi_devnode *ad;
859 	ACPI_OBJECT_TYPE type;
860 	ACPI_DEVICE_INFO *devinfo;
861 	ACPI_STATUS rv;
862 	ACPI_NAME_UNION *anu;
863 	int i, clear = 0;
864 
865 	rv = AcpiGetType(handle, &type);
866 	if (ACPI_SUCCESS(rv)) {
867 		rv = AcpiGetObjectInfo(handle, &devinfo);
868 		if (ACPI_FAILURE(rv)) {
869 #ifdef ACPI_DEBUG
870 			aprint_normal_dev(sc->sc_dev,
871 			    "AcpiGetObjectInfo failed: %s\n",
872 			    AcpiFormatException(rv));
873 #endif
874 			goto out; /* XXX why return OK */
875 		}
876 
877 		switch (type) {
878 		case ACPI_TYPE_DEVICE:
879 #ifdef ACPI_ACTIVATE_DEV
880 			if ((devinfo->Valid & (ACPI_VALID_STA|ACPI_VALID_HID)) ==
881 			    (ACPI_VALID_STA|ACPI_VALID_HID) &&
882 			    (devinfo->CurrentStatus &
883 			     (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED)) ==
884 			    ACPI_STA_DEV_PRESENT)
885 				acpi_activate_device(handle, &devinfo);
886 
887 			/* FALLTHROUGH */
888 #endif
889 
890 		case ACPI_TYPE_PROCESSOR:
891 		case ACPI_TYPE_THERMAL:
892 		case ACPI_TYPE_POWER:
893 			ad = malloc(sizeof(*ad), M_ACPI, M_NOWAIT|M_ZERO);
894 			if (ad == NULL)
895 				return AE_NO_MEMORY;
896 
897 			ad->ad_devinfo = devinfo;
898 			ad->ad_handle = handle;
899 			ad->ad_level = level;
900 			ad->ad_scope = as;
901 			ad->ad_type = type;
902 
903 			anu = (ACPI_NAME_UNION *)&devinfo->Name;
904 			ad->ad_name[4] = '\0';
905 			for (i = 3, clear = 0; i >= 0; i--) {
906 				if (!clear && anu->Ascii[i] == '_')
907 					ad->ad_name[i] = '\0';
908 				else {
909 					ad->ad_name[i] = anu->Ascii[i];
910 					clear = 1;
911 				}
912 			}
913 			if (ad->ad_name[0] == '\0')
914 				ad->ad_name[0] = '_';
915 
916 			TAILQ_INSERT_TAIL(&as->as_devnodes, ad, ad_list);
917 
918 			if (type == ACPI_TYPE_DEVICE &&
919 			    (ad->ad_devinfo->Valid & ACPI_VALID_HID) == 0)
920 				goto out;
921 
922 #ifdef ACPI_EXTRA_DEBUG
923 			aprint_normal_dev(sc->sc_dev,
924 			    "HID %s found in scope %s level %d\n",
925 			    ad->ad_devinfo->HardwareId.String,
926 			    as->as_name, ad->ad_level);
927 			if (ad->ad_devinfo->Valid & ACPI_VALID_UID)
928 				aprint_normal("       UID %s\n",
929 				    ad->ad_devinfo->UniqueId.String);
930 			if (ad->ad_devinfo->Valid & ACPI_VALID_ADR)
931 				aprint_normal("       ADR 0x%016" PRIx64 "\n",
932 				    ad->ad_devinfo->Address);
933 			if (ad->ad_devinfo->Valid & ACPI_VALID_STA)
934 				aprint_normal("       STA 0x%08x\n",
935 				    ad->ad_devinfo->CurrentStatus);
936 #endif
937 		}
938 	}
939  out:
940 	return AE_OK;
941 }
942 
943 /*
944  * acpi_print:
945  *
946  *	Autoconfiguration print routine for ACPI node bus.
947  */
948 static int
949 acpi_print(void *aux, const char *pnp)
950 {
951 	struct acpi_attach_args *aa = aux;
952 	ACPI_STATUS rv;
953 
954 	if (pnp) {
955 		if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_HID) {
956 			char *pnpstr =
957 			    aa->aa_node->ad_devinfo->HardwareId.String;
958 			ACPI_BUFFER buf;
959 
960 			aprint_normal("%s (%s) ", aa->aa_node->ad_name,
961 			    pnpstr);
962 
963 			rv = acpi_eval_struct(aa->aa_node->ad_handle,
964 			    "_STR", &buf);
965 			if (ACPI_SUCCESS(rv)) {
966 				ACPI_OBJECT *obj = buf.Pointer;
967 				switch (obj->Type) {
968 				case ACPI_TYPE_STRING:
969 					aprint_normal("[%s] ", obj->String.Pointer);
970 					break;
971 				case ACPI_TYPE_BUFFER:
972 					aprint_normal("buffer %p ", obj->Buffer.Pointer);
973 					break;
974 				default:
975 					aprint_normal("type %d ",obj->Type);
976 					break;
977 				}
978 				ACPI_FREE(buf.Pointer);
979 			}
980 #ifdef ACPIVERBOSE
981 			else {
982 				int i;
983 
984 				for (i = 0; i < __arraycount(acpi_knowndevs);
985 				    i++) {
986 					if (strcmp(acpi_knowndevs[i].pnp,
987 					    pnpstr) == 0) {
988 						aprint_normal("[%s] ",
989 						    acpi_knowndevs[i].str);
990 					}
991 				}
992 			}
993 
994 #endif
995 			aprint_normal("at %s", pnp);
996 		} else if (aa->aa_node->ad_devinfo->Type != ACPI_TYPE_DEVICE) {
997 			aprint_normal("%s (ACPI Object Type '%s' "
998 			    "[0x%02x]) ", aa->aa_node->ad_name,
999 			     AcpiUtGetTypeName(aa->aa_node->ad_devinfo->Type),
1000 			     aa->aa_node->ad_devinfo->Type);
1001 			aprint_normal("at %s", pnp);
1002 		} else
1003 			return 0;
1004 	} else {
1005 		aprint_normal(" (%s", aa->aa_node->ad_name);
1006 		if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_HID) {
1007 			aprint_normal(", %s", aa->aa_node->ad_devinfo->HardwareId.String);
1008 			if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_UID) {
1009 				const char *uid;
1010 
1011 				uid = aa->aa_node->ad_devinfo->UniqueId.String;
1012 				if (uid[0] == '\0')
1013 					uid = "<null>";
1014 				aprint_normal("-%s", uid);
1015 			}
1016 		}
1017 		aprint_normal(")");
1018 	}
1019 
1020 	return UNCONF;
1021 }
1022 
1023 /*****************************************************************************
1024  * ACPI fixed-hardware feature handlers
1025  *****************************************************************************/
1026 
1027 static UINT32	acpi_fixed_button_handler(void *);
1028 static void	acpi_fixed_button_pressed(void *);
1029 
1030 /*
1031  * acpi_enable_fixed_events:
1032  *
1033  *	Enable any fixed-hardware feature handlers.
1034  */
1035 static void
1036 acpi_enable_fixed_events(struct acpi_softc *sc)
1037 {
1038 	static int beenhere;
1039 	ACPI_STATUS rv;
1040 
1041 	KASSERT(beenhere == 0);
1042 	beenhere = 1;
1043 
1044 	/*
1045 	 * Check for fixed-hardware buttons.
1046 	 */
1047 
1048 	if ((AcpiGbl_FADT.Flags & ACPI_FADT_POWER_BUTTON) == 0) {
1049 		aprint_verbose_dev(sc->sc_dev,
1050 		    "fixed-feature power button present\n");
1051 		sc->sc_smpsw_power.smpsw_name = device_xname(sc->sc_dev);
1052 		sc->sc_smpsw_power.smpsw_type = PSWITCH_TYPE_POWER;
1053 		if (sysmon_pswitch_register(&sc->sc_smpsw_power) != 0) {
1054 			aprint_error_dev(sc->sc_dev,
1055 			    "unable to register fixed power "
1056 			    "button with sysmon\n");
1057 		} else {
1058 			rv = AcpiInstallFixedEventHandler(
1059 			    ACPI_EVENT_POWER_BUTTON,
1060 			    acpi_fixed_button_handler, &sc->sc_smpsw_power);
1061 			if (ACPI_FAILURE(rv)) {
1062 				aprint_error_dev(sc->sc_dev,
1063 				    "unable to install handler "
1064 				    "for fixed power button: %s\n",
1065 				    AcpiFormatException(rv));
1066 			}
1067 		}
1068 	}
1069 
1070 	if ((AcpiGbl_FADT.Flags & ACPI_FADT_SLEEP_BUTTON) == 0) {
1071 		aprint_verbose_dev(sc->sc_dev,
1072 		    "fixed-feature sleep button present\n");
1073 		sc->sc_smpsw_sleep.smpsw_name = device_xname(sc->sc_dev);
1074 		sc->sc_smpsw_sleep.smpsw_type = PSWITCH_TYPE_SLEEP;
1075 		if (sysmon_pswitch_register(&sc->sc_smpsw_power) != 0) {
1076 			aprint_error_dev(sc->sc_dev,
1077 			    "unable to register fixed sleep "
1078 			    "button with sysmon\n");
1079 		} else {
1080 			rv = AcpiInstallFixedEventHandler(
1081 			    ACPI_EVENT_SLEEP_BUTTON,
1082 			    acpi_fixed_button_handler, &sc->sc_smpsw_sleep);
1083 			if (ACPI_FAILURE(rv)) {
1084 				aprint_error_dev(sc->sc_dev,
1085 				    "unable to install handler "
1086 				    "for fixed sleep button: %s\n",
1087 				    AcpiFormatException(rv));
1088 			}
1089 		}
1090 	}
1091 }
1092 
1093 /*
1094  * acpi_fixed_button_handler:
1095  *
1096  *	Event handler for the fixed buttons.
1097  */
1098 static UINT32
1099 acpi_fixed_button_handler(void *context)
1100 {
1101 	struct sysmon_pswitch *smpsw = context;
1102 	ACPI_STATUS rv;
1103 
1104 #ifdef ACPI_BUT_DEBUG
1105 	printf("%s: fixed button handler\n", smpsw->smpsw_name);
1106 #endif
1107 
1108 	rv = AcpiOsExecute(OSL_NOTIFY_HANDLER,
1109 	    acpi_fixed_button_pressed, smpsw);
1110 	if (ACPI_FAILURE(rv))
1111 		printf("%s: WARNING: unable to queue fixed button pressed "
1112 		    "callback: %s\n", smpsw->smpsw_name,
1113 		    AcpiFormatException(rv));
1114 
1115 	return ACPI_INTERRUPT_HANDLED;
1116 }
1117 
1118 /*
1119  * acpi_fixed_button_pressed:
1120  *
1121  *	Deal with a fixed button being pressed.
1122  */
1123 static void
1124 acpi_fixed_button_pressed(void *context)
1125 {
1126 	struct sysmon_pswitch *smpsw = context;
1127 
1128 #ifdef ACPI_BUT_DEBUG
1129 	printf("%s: fixed button pressed, calling sysmon\n",
1130 	    smpsw->smpsw_name);
1131 #endif
1132 
1133 	sysmon_pswitch_event(smpsw, PSWITCH_EVENT_PRESSED);
1134 }
1135 
1136 /*****************************************************************************
1137  * ACPI utility routines.
1138  *****************************************************************************/
1139 
1140 /*
1141  * acpi_eval_integer:
1142  *
1143  *	Evaluate an integer object.
1144  */
1145 ACPI_STATUS
1146 acpi_eval_integer(ACPI_HANDLE handle, const char *path, ACPI_INTEGER *valp)
1147 {
1148 	ACPI_STATUS rv;
1149 	ACPI_BUFFER buf;
1150 	ACPI_OBJECT param;
1151 
1152 	if (handle == NULL)
1153 		handle = ACPI_ROOT_OBJECT;
1154 
1155 	buf.Pointer = &param;
1156 	buf.Length = sizeof(param);
1157 
1158 	rv = AcpiEvaluateObjectTyped(handle, path, NULL, &buf,
1159 	    ACPI_TYPE_INTEGER);
1160 	if (ACPI_SUCCESS(rv))
1161 		*valp = param.Integer.Value;
1162 
1163 	return rv;
1164 }
1165 
1166 ACPI_STATUS
1167 acpi_eval_set_integer(ACPI_HANDLE handle, const char *path, ACPI_INTEGER arg)
1168 {
1169 	ACPI_OBJECT param_arg;
1170 	ACPI_OBJECT_LIST param_args;
1171 
1172 	if (handle == NULL)
1173 		handle = ACPI_ROOT_OBJECT;
1174 
1175 	param_arg.Type = ACPI_TYPE_INTEGER;
1176 	param_arg.Integer.Value = arg;
1177 
1178 	param_args.Count = 1;
1179 	param_args.Pointer = &param_arg;
1180 
1181 	return AcpiEvaluateObject(handle, path, &param_args, NULL);
1182 }
1183 
1184 /*
1185  * acpi_eval_string:
1186  *
1187  *	Evaluate a (Unicode) string object.
1188  */
1189 ACPI_STATUS
1190 acpi_eval_string(ACPI_HANDLE handle, const char *path, char **stringp)
1191 {
1192 	ACPI_STATUS rv;
1193 	ACPI_BUFFER buf;
1194 
1195 	if (handle == NULL)
1196 		handle = ACPI_ROOT_OBJECT;
1197 
1198 	buf.Pointer = NULL;
1199 	buf.Length = ACPI_ALLOCATE_LOCAL_BUFFER;
1200 
1201 	rv = AcpiEvaluateObjectTyped(handle, path, NULL, &buf, ACPI_TYPE_STRING);
1202 	if (ACPI_SUCCESS(rv)) {
1203 		ACPI_OBJECT *param = buf.Pointer;
1204 		const char *ptr = param->String.Pointer;
1205 		size_t len = param->String.Length;
1206 		if ((*stringp = ACPI_ALLOCATE(len)) == NULL)
1207 			rv = AE_NO_MEMORY;
1208 		else
1209 			(void)memcpy(*stringp, ptr, len);
1210 		ACPI_FREE(param);
1211 	}
1212 
1213 	return rv;
1214 }
1215 
1216 
1217 /*
1218  * acpi_eval_struct:
1219  *
1220  *	Evaluate a more complex structure.
1221  *	Caller must free buf.Pointer by ACPI_FREE().
1222  */
1223 ACPI_STATUS
1224 acpi_eval_struct(ACPI_HANDLE handle, const char *path, ACPI_BUFFER *bufp)
1225 {
1226 	ACPI_STATUS rv;
1227 
1228 	if (handle == NULL)
1229 		handle = ACPI_ROOT_OBJECT;
1230 
1231 	bufp->Pointer = NULL;
1232 	bufp->Length = ACPI_ALLOCATE_LOCAL_BUFFER;
1233 
1234 	rv = AcpiEvaluateObject(handle, path, NULL, bufp);
1235 
1236 	return rv;
1237 }
1238 
1239 /*
1240  * acpi_foreach_package_object:
1241  *
1242  *	Iterate over all objects in a in a packages and pass then all
1243  *	to a function. If the called function returns non AE_OK, the
1244  *	iteration is stopped and that value is returned.
1245  */
1246 
1247 ACPI_STATUS
1248 acpi_foreach_package_object(ACPI_OBJECT *pkg,
1249     ACPI_STATUS (*func)(ACPI_OBJECT *, void *),
1250     void *arg)
1251 {
1252 	ACPI_STATUS rv = AE_OK;
1253 	int i;
1254 
1255 	if (pkg == NULL || pkg->Type != ACPI_TYPE_PACKAGE)
1256 		return AE_BAD_PARAMETER;
1257 
1258 	for (i = 0; i < pkg->Package.Count; i++) {
1259 		rv = (*func)(&pkg->Package.Elements[i], arg);
1260 		if (ACPI_FAILURE(rv))
1261 			break;
1262 	}
1263 
1264 	return rv;
1265 }
1266 
1267 const char *
1268 acpi_name(ACPI_HANDLE handle)
1269 {
1270 	static char buffer[80];
1271 	ACPI_BUFFER buf;
1272 	ACPI_STATUS rv;
1273 
1274 	buf.Length = sizeof(buffer);
1275 	buf.Pointer = buffer;
1276 
1277 	rv = AcpiGetName(handle, ACPI_FULL_PATHNAME, &buf);
1278 	if (ACPI_FAILURE(rv))
1279 		return "(unknown acpi path)";
1280 	return buffer;
1281 }
1282 
1283 /*
1284  * acpi_get:
1285  *
1286  *	Fetch data info the specified (empty) ACPI buffer.
1287  *	Caller must free buf.Pointer by ACPI_FREE().
1288  */
1289 ACPI_STATUS
1290 acpi_get(ACPI_HANDLE handle, ACPI_BUFFER *buf,
1291     ACPI_STATUS (*getit)(ACPI_HANDLE, ACPI_BUFFER *))
1292 {
1293 	buf->Pointer = NULL;
1294 	buf->Length = ACPI_ALLOCATE_LOCAL_BUFFER;
1295 
1296 	return (*getit)(handle, buf);
1297 }
1298 
1299 
1300 /*
1301  * acpi_match_hid
1302  *
1303  *	Match given ids against _HID and _CIDs
1304  */
1305 int
1306 acpi_match_hid(ACPI_DEVICE_INFO *ad, const char * const *ids)
1307 {
1308 	int i;
1309 
1310 	while (*ids) {
1311 		if (ad->Valid & ACPI_VALID_HID) {
1312 			if (pmatch(ad->HardwareId.String, *ids, NULL) == 2)
1313 				return 1;
1314 		}
1315 
1316 		if (ad->Valid & ACPI_VALID_CID) {
1317 			for (i = 0; i < ad->CompatibleIdList.Count; i++) {
1318 				if (pmatch(ad->CompatibleIdList.Ids[i].String, *ids, NULL) == 2)
1319 					return 1;
1320 			}
1321 		}
1322 		ids++;
1323 	}
1324 
1325 	return 0;
1326 }
1327 
1328 /*
1329  * acpi_wake_gpe_helper
1330  *
1331  *	Set/unset GPE as both Runtime and Wake
1332  */
1333 static void
1334 acpi_wake_gpe_helper(ACPI_HANDLE handle, bool enable)
1335 {
1336 	ACPI_BUFFER buf;
1337 	ACPI_STATUS rv;
1338 	ACPI_OBJECT *p, *elt;
1339 
1340 	rv = acpi_eval_struct(handle, METHOD_NAME__PRW, &buf);
1341 	if (ACPI_FAILURE(rv))
1342 		return;			/* just ignore */
1343 
1344 	p = buf.Pointer;
1345 	if (p->Type != ACPI_TYPE_PACKAGE || p->Package.Count < 2)
1346 		goto out;		/* just ignore */
1347 
1348 	elt = p->Package.Elements;
1349 
1350 	/* TBD: package support */
1351 	if (enable) {
1352 		AcpiSetGpeType(NULL, elt[0].Integer.Value,
1353 		    ACPI_GPE_TYPE_WAKE_RUN);
1354 		AcpiEnableGpe(NULL, elt[0].Integer.Value, ACPI_NOT_ISR);
1355 	} else
1356 		AcpiDisableGpe(NULL, elt[0].Integer.Value, ACPI_NOT_ISR);
1357 
1358  out:
1359 	ACPI_FREE(buf.Pointer);
1360 }
1361 
1362 /*
1363  * acpi_clear_wake_gpe
1364  *
1365  *	Clear GPE as both Runtime and Wake
1366  */
1367 void
1368 acpi_clear_wake_gpe(ACPI_HANDLE handle)
1369 {
1370 	acpi_wake_gpe_helper(handle, false);
1371 }
1372 
1373 /*
1374  * acpi_set_wake_gpe
1375  *
1376  *	Set GPE as both Runtime and Wake
1377  */
1378 void
1379 acpi_set_wake_gpe(ACPI_HANDLE handle)
1380 {
1381 	acpi_wake_gpe_helper(handle, true);
1382 }
1383 
1384 
1385 /*****************************************************************************
1386  * ACPI sleep support.
1387  *****************************************************************************/
1388 
1389 static int
1390 is_available_state(struct acpi_softc *sc, int state)
1391 {
1392 	UINT8 type_a, type_b;
1393 
1394 	return ACPI_SUCCESS(AcpiGetSleepTypeData((UINT8)state,
1395 				&type_a, &type_b));
1396 }
1397 
1398 /*
1399  * acpi_enter_sleep_state:
1400  *
1401  *	enter to the specified sleep state.
1402  */
1403 
1404 ACPI_STATUS
1405 acpi_enter_sleep_state(struct acpi_softc *sc, int state)
1406 {
1407 	int err;
1408 	ACPI_STATUS ret = AE_OK;
1409 
1410 	if (state == acpi_sleepstate)
1411 		return AE_OK;
1412 
1413 	aprint_normal_dev(sc->sc_dev, "entering state %d\n", state);
1414 
1415 	switch (state) {
1416 	case ACPI_STATE_S0:
1417 		break;
1418 	case ACPI_STATE_S1:
1419 	case ACPI_STATE_S2:
1420 	case ACPI_STATE_S3:
1421 	case ACPI_STATE_S4:
1422 		if (!is_available_state(sc, state)) {
1423 			aprint_error_dev(sc->sc_dev,
1424 			    "ACPI S%d not available on this platform\n", state);
1425 			break;
1426 		}
1427 
1428 		acpi_wakedev_commit(sc);
1429 
1430 		if (state != ACPI_STATE_S1 && !pmf_system_suspend(PMF_Q_NONE)) {
1431 			aprint_error_dev(sc->sc_dev, "aborting suspend\n");
1432 			break;
1433 		}
1434 
1435 		ret = AcpiEnterSleepStatePrep(state);
1436 		if (ACPI_FAILURE(ret)) {
1437 			aprint_error_dev(sc->sc_dev,
1438 			    "failed preparing to sleep (%s)\n",
1439 			    AcpiFormatException(ret));
1440 			break;
1441 		}
1442 
1443 		acpi_sleepstate = state;
1444 		if (state == ACPI_STATE_S1) {
1445 			/* just enter the state */
1446 			acpi_md_OsDisableInterrupt();
1447 			ret = AcpiEnterSleepState((UINT8)state);
1448 			if (ACPI_FAILURE(ret))
1449 				aprint_error_dev(sc->sc_dev,
1450 				    "failed to enter sleep state S1: %s\n",
1451 				    AcpiFormatException(ret));
1452 			AcpiLeaveSleepState((UINT8)state);
1453 		} else {
1454 			err = acpi_md_sleep(state);
1455 			if (state == ACPI_STATE_S4)
1456 				AcpiEnable();
1457 			pmf_system_bus_resume(PMF_Q_NONE);
1458 			AcpiLeaveSleepState((UINT8)state);
1459 			pmf_system_resume(PMF_Q_NONE);
1460 		}
1461 
1462 		break;
1463 	case ACPI_STATE_S5:
1464 		ret = AcpiEnterSleepStatePrep(ACPI_STATE_S5);
1465 		if (ACPI_FAILURE(ret)) {
1466 			aprint_error_dev(sc->sc_dev,
1467 			    "failed preparing to sleep (%s)\n",
1468 			    AcpiFormatException(ret));
1469 			break;
1470 		}
1471 		DELAY(1000000);
1472 		acpi_sleepstate = state;
1473 		acpi_md_OsDisableInterrupt();
1474 		AcpiEnterSleepState(ACPI_STATE_S5);
1475 		aprint_error_dev(sc->sc_dev, "WARNING powerdown failed!\n");
1476 		break;
1477 	}
1478 
1479 	acpi_sleepstate = ACPI_STATE_S0;
1480 	return ret;
1481 }
1482 
1483 #if defined(ACPI_ACTIVATE_DEV)
1484 /* XXX This very incomplete */
1485 ACPI_STATUS
1486 acpi_allocate_resources(ACPI_HANDLE handle)
1487 {
1488 	ACPI_BUFFER bufp, bufc, bufn;
1489 	ACPI_RESOURCE *resp, *resc, *resn;
1490 	ACPI_RESOURCE_IRQ *irq;
1491 	ACPI_RESOURCE_EXTENDED_IRQ *xirq;
1492 	ACPI_STATUS rv;
1493 	uint delta;
1494 
1495 	rv = acpi_get(handle, &bufp, AcpiGetPossibleResources);
1496 	if (ACPI_FAILURE(rv))
1497 		goto out;
1498 	rv = acpi_get(handle, &bufc, AcpiGetCurrentResources);
1499 	if (ACPI_FAILURE(rv)) {
1500 		goto out1;
1501 	}
1502 
1503 	bufn.Length = 1000;
1504 	bufn.Pointer = resn = malloc(bufn.Length, M_ACPI, M_WAITOK);
1505 	resp = bufp.Pointer;
1506 	resc = bufc.Pointer;
1507 	while (resc->Type != ACPI_RESOURCE_TYPE_END_TAG &&
1508 	       resp->Type != ACPI_RESOURCE_TYPE_END_TAG) {
1509 		while (resc->Type != resp->Type && resp->Type != ACPI_RESOURCE_TYPE_END_TAG)
1510 			resp = ACPI_NEXT_RESOURCE(resp);
1511 		if (resp->Type == ACPI_RESOURCE_TYPE_END_TAG)
1512 			break;
1513 		/* Found identical Id */
1514 		resn->Type = resc->Type;
1515 		switch (resc->Type) {
1516 		case ACPI_RESOURCE_TYPE_IRQ:
1517 			memcpy(&resn->Data, &resp->Data,
1518 			       sizeof(ACPI_RESOURCE_IRQ));
1519 			irq = (ACPI_RESOURCE_IRQ *)&resn->Data;
1520 			irq->Interrupts[0] =
1521 			    ((ACPI_RESOURCE_IRQ *)&resp->Data)->
1522 			        Interrupts[irq->InterruptCount-1];
1523 			irq->InterruptCount = 1;
1524 			resn->Length = ACPI_RS_SIZE(ACPI_RESOURCE_IRQ);
1525 			break;
1526 		case ACPI_RESOURCE_TYPE_EXTENDED_IRQ:
1527 			memcpy(&resn->Data, &resp->Data,
1528 			       sizeof(ACPI_RESOURCE_EXTENDED_IRQ));
1529 			xirq = (ACPI_RESOURCE_EXTENDED_IRQ *)&resn->Data;
1530 #if 0
1531 			/*
1532 			 * XXX not duplicating the interrupt logic above
1533 			 * because its not clear what it accomplishes.
1534 			 */
1535 			xirq->Interrupts[0] =
1536 			    ((ACPI_RESOURCE_EXT_IRQ *)&resp->Data)->
1537 			    Interrupts[irq->NumberOfInterrupts-1];
1538 			xirq->NumberOfInterrupts = 1;
1539 #endif
1540 			resn->Length = ACPI_RS_SIZE(ACPI_RESOURCE_EXTENDED_IRQ);
1541 			break;
1542 		case ACPI_RESOURCE_TYPE_IO:
1543 			memcpy(&resn->Data, &resp->Data,
1544 			       sizeof(ACPI_RESOURCE_IO));
1545 			resn->Length = resp->Length;
1546 			break;
1547 		default:
1548 			printf("acpi_allocate_resources: res=%d\n", resc->Type);
1549 			rv = AE_BAD_DATA;
1550 			goto out2;
1551 		}
1552 		resc = ACPI_NEXT_RESOURCE(resc);
1553 		resn = ACPI_NEXT_RESOURCE(resn);
1554 		resp = ACPI_NEXT_RESOURCE(resp);
1555 		delta = (UINT8 *)resn - (UINT8 *)bufn.Pointer;
1556 		if (delta >=
1557 		    bufn.Length-ACPI_RS_SIZE(ACPI_RESOURCE_DATA)) {
1558 			bufn.Length *= 2;
1559 			bufn.Pointer = realloc(bufn.Pointer, bufn.Length,
1560 					       M_ACPI, M_WAITOK);
1561 			resn = (ACPI_RESOURCE *)((UINT8 *)bufn.Pointer + delta);
1562 		}
1563 	}
1564 	if (resc->Type != ACPI_RESOURCE_TYPE_END_TAG) {
1565 		printf("acpi_allocate_resources: resc not exhausted\n");
1566 		rv = AE_BAD_DATA;
1567 		goto out3;
1568 	}
1569 
1570 	resn->Type = ACPI_RESOURCE_TYPE_END_TAG;
1571 	rv = AcpiSetCurrentResources(handle, &bufn);
1572 	if (ACPI_FAILURE(rv)) {
1573 		printf("acpi_allocate_resources: AcpiSetCurrentResources %s\n",
1574 		       AcpiFormatException(rv));
1575 	}
1576 
1577 out3:
1578 	free(bufn.Pointer, M_ACPI);
1579 out2:
1580 	ACPI_FREE(bufc.Pointer);
1581 out1:
1582 	ACPI_FREE(bufp.Pointer);
1583 out:
1584 	return rv;
1585 }
1586 #endif /* ACPI_ACTIVATE_DEV */
1587 
1588 SYSCTL_SETUP(sysctl_acpi_setup, "sysctl hw.acpi subtree setup")
1589 {
1590 	const struct sysctlnode *node;
1591 	const struct sysctlnode *ssnode;
1592 
1593 	if (sysctl_createv(clog, 0, NULL, NULL,
1594 	    CTLFLAG_PERMANENT,
1595 	    CTLTYPE_NODE, "hw", NULL,
1596 	    NULL, 0, NULL, 0,
1597 	    CTL_HW, CTL_EOL) != 0)
1598 		return;
1599 
1600 	if (sysctl_createv(clog, 0, NULL, &node,
1601 	    CTLFLAG_PERMANENT,
1602 	    CTLTYPE_NODE, "acpi", NULL,
1603 	    NULL, 0, NULL, 0,
1604 	    CTL_HW, CTL_CREATE, CTL_EOL) != 0)
1605 		return;
1606 
1607 	sysctl_createv(NULL, 0, NULL, NULL, CTLFLAG_READONLY,
1608 	    CTLTYPE_QUAD, "root",
1609 	    SYSCTL_DESCR("ACPI root pointer"),
1610 	    NULL, 0, &acpi_root_pointer, sizeof(acpi_root_pointer),
1611 	    CTL_HW, node->sysctl_num, CTL_CREATE, CTL_EOL);
1612 	sysctl_createv(NULL, 0, NULL, NULL, CTLFLAG_READONLY,
1613 	    CTLTYPE_STRING, "supported_states",
1614 	    SYSCTL_DESCR("Supported ACPI system states"),
1615 	    NULL, 0, acpi_supported_states, 0,
1616 	    CTL_HW, node->sysctl_num, CTL_CREATE, CTL_EOL);
1617 
1618 	/* ACPI sleepstate sysctl */
1619 	if (sysctl_createv(NULL, 0, NULL, &node,
1620 	    CTLFLAG_PERMANENT,
1621 	    CTLTYPE_NODE, "machdep", NULL,
1622 	    NULL, 0, NULL, 0, CTL_MACHDEP, CTL_EOL) != 0)
1623 		return;
1624 	if (sysctl_createv(NULL, 0, &node, &ssnode,
1625 	    CTLFLAG_READWRITE, CTLTYPE_INT, "sleep_state",
1626 	    NULL, sysctl_hw_acpi_sleepstate, 0, NULL, 0, CTL_CREATE,
1627 	    CTL_EOL) != 0)
1628 		return;
1629 }
1630 
1631 static int
1632 sysctl_hw_acpi_sleepstate(SYSCTLFN_ARGS)
1633 {
1634 	int error, t;
1635 	struct sysctlnode node;
1636 
1637 	node = *rnode;
1638 	t = acpi_sleepstate;
1639 	node.sysctl_data = &t;
1640 	error = sysctl_lookup(SYSCTLFN_CALL(&node));
1641 	if (error || newp == NULL)
1642 		return error;
1643 
1644 	if (acpi_softc == NULL)
1645 		return ENOSYS;
1646 
1647 	acpi_enter_sleep_state(acpi_softc, t);
1648 
1649 	return 0;
1650 }
1651 
1652 static ACPI_TABLE_HEADER *
1653 acpi_map_rsdt(void)
1654 {
1655 	ACPI_PHYSICAL_ADDRESS paddr;
1656 	ACPI_TABLE_RSDP *rsdp;
1657 
1658 	paddr = AcpiOsGetRootPointer();
1659 	if (paddr == 0) {
1660 		printf("ACPI: couldn't get root pointer\n");
1661 		return NULL;
1662 	}
1663 	rsdp = AcpiOsMapMemory(paddr, sizeof(ACPI_TABLE_RSDP));
1664 	if (rsdp == NULL) {
1665 		printf("ACPI: couldn't map RSDP\n");
1666 		return NULL;
1667 	}
1668 	if (rsdp->Revision > 1 && rsdp->XsdtPhysicalAddress)
1669 		paddr = (ACPI_PHYSICAL_ADDRESS)rsdp->XsdtPhysicalAddress;
1670 	else
1671 		paddr = (ACPI_PHYSICAL_ADDRESS)rsdp->RsdtPhysicalAddress;
1672 	AcpiOsUnmapMemory(rsdp, sizeof(ACPI_TABLE_RSDP));
1673 
1674 	return AcpiOsMapMemory(paddr, sizeof(ACPI_TABLE_HEADER));
1675 }
1676 
1677 static void
1678 acpi_unmap_rsdt(ACPI_TABLE_HEADER *rsdt)
1679 {
1680 	if (rsdt == NULL)
1681 		return;
1682 
1683 	AcpiOsUnmapMemory(rsdt, sizeof(ACPI_TABLE_HEADER));
1684 }
1685