xref: /freebsd/sys/dev/acpica/acpi.c (revision bfe691b2f75de2224c7ceb304ebcdef2b42d4179)
1 /*-
2  * Copyright (c) 2000 Takanori Watanabe <takawata@jp.freebsd.org>
3  * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@jp.freebsd.org>
4  * Copyright (c) 2000, 2001 Michael Smith
5  * Copyright (c) 2000 BSDi
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
32 
33 #include "opt_acpi.h"
34 #include <sys/param.h>
35 #include <sys/kernel.h>
36 #include <sys/proc.h>
37 #include <sys/fcntl.h>
38 #include <sys/malloc.h>
39 #include <sys/module.h>
40 #include <sys/bus.h>
41 #include <sys/conf.h>
42 #include <sys/ioccom.h>
43 #include <sys/reboot.h>
44 #include <sys/sysctl.h>
45 #include <sys/ctype.h>
46 #include <sys/linker.h>
47 #include <sys/power.h>
48 #include <sys/sbuf.h>
49 #include <sys/smp.h>
50 
51 #include <machine/resource.h>
52 #include <machine/bus.h>
53 #include <sys/rman.h>
54 #include <isa/isavar.h>
55 #include <isa/pnpvar.h>
56 
57 #include <contrib/dev/acpica/acpi.h>
58 #include <dev/acpica/acpivar.h>
59 #include <dev/acpica/acpiio.h>
60 #include <contrib/dev/acpica/achware.h>
61 #include <contrib/dev/acpica/acnamesp.h>
62 
63 #include "pci_if.h"
64 #include <dev/pci/pcivar.h>
65 #include <dev/pci/pci_private.h>
66 
67 #include <vm/vm_param.h>
68 
69 MALLOC_DEFINE(M_ACPIDEV, "acpidev", "ACPI devices");
70 
71 /* Hooks for the ACPI CA debugging infrastructure */
72 #define _COMPONENT	ACPI_BUS
73 ACPI_MODULE_NAME("ACPI")
74 
75 static d_open_t		acpiopen;
76 static d_close_t	acpiclose;
77 static d_ioctl_t	acpiioctl;
78 
79 static struct cdevsw acpi_cdevsw = {
80 	.d_version =	D_VERSION,
81 	.d_open =	acpiopen,
82 	.d_close =	acpiclose,
83 	.d_ioctl =	acpiioctl,
84 	.d_name =	"acpi",
85 };
86 
87 /* Global mutex for locking access to the ACPI subsystem. */
88 struct mtx	acpi_mutex;
89 
90 /* Bitmap of device quirks. */
91 int		acpi_quirks;
92 
93 static int	acpi_modevent(struct module *mod, int event, void *junk);
94 static void	acpi_identify(driver_t *driver, device_t parent);
95 static int	acpi_probe(device_t dev);
96 static int	acpi_attach(device_t dev);
97 static int	acpi_suspend(device_t dev);
98 static int	acpi_resume(device_t dev);
99 static int	acpi_shutdown(device_t dev);
100 static device_t	acpi_add_child(device_t bus, int order, const char *name,
101 			int unit);
102 static int	acpi_print_child(device_t bus, device_t child);
103 static void	acpi_probe_nomatch(device_t bus, device_t child);
104 static void	acpi_driver_added(device_t dev, driver_t *driver);
105 static int	acpi_read_ivar(device_t dev, device_t child, int index,
106 			uintptr_t *result);
107 static int	acpi_write_ivar(device_t dev, device_t child, int index,
108 			uintptr_t value);
109 static struct resource_list *acpi_get_rlist(device_t dev, device_t child);
110 static int	acpi_sysres_alloc(device_t dev);
111 static struct resource *acpi_alloc_resource(device_t bus, device_t child,
112 			int type, int *rid, u_long start, u_long end,
113 			u_long count, u_int flags);
114 static int	acpi_release_resource(device_t bus, device_t child, int type,
115 			int rid, struct resource *r);
116 static void	acpi_delete_resource(device_t bus, device_t child, int type,
117 		    int rid);
118 static uint32_t	acpi_isa_get_logicalid(device_t dev);
119 static int	acpi_isa_get_compatid(device_t dev, uint32_t *cids, int count);
120 static char	*acpi_device_id_probe(device_t bus, device_t dev, char **ids);
121 static ACPI_STATUS acpi_device_eval_obj(device_t bus, device_t dev,
122 		    ACPI_STRING pathname, ACPI_OBJECT_LIST *parameters,
123 		    ACPI_BUFFER *ret);
124 static int	acpi_device_pwr_for_sleep(device_t bus, device_t dev,
125 		    int *dstate);
126 static ACPI_STATUS acpi_device_scan_cb(ACPI_HANDLE h, UINT32 level,
127 		    void *context, void **retval);
128 static ACPI_STATUS acpi_device_scan_children(device_t bus, device_t dev,
129 		    int max_depth, acpi_scan_cb_t user_fn, void *arg);
130 static int	acpi_set_powerstate_method(device_t bus, device_t child,
131 		    int state);
132 static int	acpi_isa_pnp_probe(device_t bus, device_t child,
133 		    struct isa_pnp_id *ids);
134 static void	acpi_probe_children(device_t bus);
135 static int	acpi_probe_order(ACPI_HANDLE handle, int *order);
136 static ACPI_STATUS acpi_probe_child(ACPI_HANDLE handle, UINT32 level,
137 		    void *context, void **status);
138 static BOOLEAN	acpi_MatchHid(ACPI_HANDLE h, const char *hid);
139 static void	acpi_shutdown_final(void *arg, int howto);
140 static void	acpi_enable_fixed_events(struct acpi_softc *sc);
141 static int	acpi_wake_sleep_prep(ACPI_HANDLE handle, int sstate);
142 static int	acpi_wake_run_prep(ACPI_HANDLE handle, int sstate);
143 static int	acpi_wake_prep_walk(int sstate);
144 static int	acpi_wake_sysctl_walk(device_t dev);
145 static int	acpi_wake_set_sysctl(SYSCTL_HANDLER_ARGS);
146 static void	acpi_system_eventhandler_sleep(void *arg, int state);
147 static void	acpi_system_eventhandler_wakeup(void *arg, int state);
148 static int	acpi_supported_sleep_state_sysctl(SYSCTL_HANDLER_ARGS);
149 static int	acpi_sleep_state_sysctl(SYSCTL_HANDLER_ARGS);
150 static int	acpi_pm_func(u_long cmd, void *arg, ...);
151 static int	acpi_child_location_str_method(device_t acdev, device_t child,
152 					       char *buf, size_t buflen);
153 static int	acpi_child_pnpinfo_str_method(device_t acdev, device_t child,
154 					      char *buf, size_t buflen);
155 
156 static device_method_t acpi_methods[] = {
157     /* Device interface */
158     DEVMETHOD(device_identify,		acpi_identify),
159     DEVMETHOD(device_probe,		acpi_probe),
160     DEVMETHOD(device_attach,		acpi_attach),
161     DEVMETHOD(device_shutdown,		acpi_shutdown),
162     DEVMETHOD(device_detach,		bus_generic_detach),
163     DEVMETHOD(device_suspend,		acpi_suspend),
164     DEVMETHOD(device_resume,		acpi_resume),
165 
166     /* Bus interface */
167     DEVMETHOD(bus_add_child,		acpi_add_child),
168     DEVMETHOD(bus_print_child,		acpi_print_child),
169     DEVMETHOD(bus_probe_nomatch,	acpi_probe_nomatch),
170     DEVMETHOD(bus_driver_added,		acpi_driver_added),
171     DEVMETHOD(bus_read_ivar,		acpi_read_ivar),
172     DEVMETHOD(bus_write_ivar,		acpi_write_ivar),
173     DEVMETHOD(bus_get_resource_list,	acpi_get_rlist),
174     DEVMETHOD(bus_set_resource,		bus_generic_rl_set_resource),
175     DEVMETHOD(bus_get_resource,		bus_generic_rl_get_resource),
176     DEVMETHOD(bus_alloc_resource,	acpi_alloc_resource),
177     DEVMETHOD(bus_release_resource,	acpi_release_resource),
178     DEVMETHOD(bus_delete_resource,	acpi_delete_resource),
179     DEVMETHOD(bus_child_pnpinfo_str,	acpi_child_pnpinfo_str_method),
180     DEVMETHOD(bus_child_location_str,	acpi_child_location_str_method),
181     DEVMETHOD(bus_activate_resource,	bus_generic_activate_resource),
182     DEVMETHOD(bus_deactivate_resource,	bus_generic_deactivate_resource),
183     DEVMETHOD(bus_setup_intr,		bus_generic_setup_intr),
184     DEVMETHOD(bus_teardown_intr,	bus_generic_teardown_intr),
185 
186     /* ACPI bus */
187     DEVMETHOD(acpi_id_probe,		acpi_device_id_probe),
188     DEVMETHOD(acpi_evaluate_object,	acpi_device_eval_obj),
189     DEVMETHOD(acpi_pwr_for_sleep,	acpi_device_pwr_for_sleep),
190     DEVMETHOD(acpi_scan_children,	acpi_device_scan_children),
191 
192     /* PCI emulation */
193     DEVMETHOD(pci_set_powerstate,	acpi_set_powerstate_method),
194 
195     /* ISA emulation */
196     DEVMETHOD(isa_pnp_probe,		acpi_isa_pnp_probe),
197 
198     {0, 0}
199 };
200 
201 static driver_t acpi_driver = {
202     "acpi",
203     acpi_methods,
204     sizeof(struct acpi_softc),
205 };
206 
207 static devclass_t acpi_devclass;
208 DRIVER_MODULE(acpi, nexus, acpi_driver, acpi_devclass, acpi_modevent, 0);
209 MODULE_VERSION(acpi, 1);
210 
211 ACPI_SERIAL_DECL(acpi, "ACPI root bus");
212 
213 /* Local pools for managing system resources for ACPI child devices. */
214 static struct rman acpi_rman_io, acpi_rman_mem;
215 
216 #define ACPI_MINIMUM_AWAKETIME	5
217 
218 static const char* sleep_state_names[] = {
219     "S0", "S1", "S2", "S3", "S4", "S5", "NONE"};
220 
221 SYSCTL_NODE(_debug, OID_AUTO, acpi, CTLFLAG_RD, NULL, "ACPI debugging");
222 static char acpi_ca_version[12];
223 SYSCTL_STRING(_debug_acpi, OID_AUTO, acpi_ca_version, CTLFLAG_RD,
224 	      acpi_ca_version, 0, "Version of Intel ACPI-CA");
225 
226 /*
227  * Allow override of whether methods execute in parallel or not.
228  * Enable this for serial behavior, which fixes "AE_ALREADY_EXISTS"
229  * errors for AML that really can't handle parallel method execution.
230  * It is off by default since this breaks recursive methods and
231  * some IBMs use such code.
232  */
233 static int acpi_serialize_methods;
234 TUNABLE_INT("hw.acpi.serialize_methods", &acpi_serialize_methods);
235 
236 /* Power devices off and on in suspend and resume.  XXX Remove once tested. */
237 static int acpi_do_powerstate = 1;
238 TUNABLE_INT("debug.acpi.do_powerstate", &acpi_do_powerstate);
239 SYSCTL_INT(_debug_acpi, OID_AUTO, do_powerstate, CTLFLAG_RW,
240     &acpi_do_powerstate, 1, "Turn off devices when suspending.");
241 
242 /* Allow users to override quirks. */
243 TUNABLE_INT("debug.acpi.quirks", &acpi_quirks);
244 
245 /*
246  * ACPI can only be loaded as a module by the loader; activating it after
247  * system bootstrap time is not useful, and can be fatal to the system.
248  * It also cannot be unloaded, since the entire system bus heirarchy hangs
249  * off it.
250  */
251 static int
252 acpi_modevent(struct module *mod, int event, void *junk)
253 {
254     switch (event) {
255     case MOD_LOAD:
256 	if (!cold) {
257 	    printf("The ACPI driver cannot be loaded after boot.\n");
258 	    return (EPERM);
259 	}
260 	break;
261     case MOD_UNLOAD:
262 	if (!cold && power_pm_get_type() == POWER_PM_TYPE_ACPI)
263 	    return (EBUSY);
264 	break;
265     default:
266 	break;
267     }
268     return (0);
269 }
270 
271 /*
272  * Perform early initialization.
273  */
274 ACPI_STATUS
275 acpi_Startup(void)
276 {
277     static int started = 0;
278     ACPI_STATUS status;
279     int val;
280 
281     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
282 
283     /* Only run the startup code once.  The MADT driver also calls this. */
284     if (started)
285 	return_VALUE (AE_OK);
286     started = 1;
287 
288     /*
289      * Pre-allocate space for RSDT/XSDT and DSDT tables and allow resizing
290      * if more tables exist.
291      */
292     if (ACPI_FAILURE(status = AcpiInitializeTables(NULL, 2, TRUE))) {
293 	printf("ACPI: Table initialisation failed: %s\n",
294 	    AcpiFormatException(status));
295 	return_VALUE (status);
296     }
297 
298     /* Set up any quirks we have for this system. */
299     if (acpi_quirks == ACPI_Q_OK)
300 	acpi_table_quirks(&acpi_quirks);
301 
302     /* If the user manually set the disabled hint to 0, force-enable ACPI. */
303     if (resource_int_value("acpi", 0, "disabled", &val) == 0 && val == 0)
304 	acpi_quirks &= ~ACPI_Q_BROKEN;
305     if (acpi_quirks & ACPI_Q_BROKEN) {
306 	printf("ACPI disabled by blacklist.  Contact your BIOS vendor.\n");
307 	status = AE_SUPPORT;
308     }
309 
310     return_VALUE (status);
311 }
312 
313 /*
314  * Detect ACPI, perform early initialisation
315  */
316 static void
317 acpi_identify(driver_t *driver, device_t parent)
318 {
319     device_t	child;
320 
321     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
322 
323     if (!cold)
324 	return_VOID;
325 
326     /* Check that we haven't been disabled with a hint. */
327     if (resource_disabled("acpi", 0))
328 	return_VOID;
329 
330     /* Make sure we're not being doubly invoked. */
331     if (device_find_child(parent, "acpi", 0) != NULL)
332 	return_VOID;
333 
334     /* Initialize root tables. */
335     if (ACPI_FAILURE(acpi_Startup())) {
336 	printf("ACPI: Try disabling either ACPI or apic support.\n");
337 	return_VOID;
338     }
339 
340     snprintf(acpi_ca_version, sizeof(acpi_ca_version), "%x", ACPI_CA_VERSION);
341 
342     /* Attach the actual ACPI device. */
343     if ((child = BUS_ADD_CHILD(parent, 10, "acpi", 0)) == NULL) {
344 	device_printf(parent, "device_identify failed\n");
345 	return_VOID;
346     }
347 }
348 
349 /*
350  * Fetch some descriptive data from ACPI to put in our attach message.
351  */
352 static int
353 acpi_probe(device_t dev)
354 {
355     ACPI_TABLE_RSDP	*rsdp;
356     ACPI_TABLE_HEADER	*rsdt;
357     ACPI_PHYSICAL_ADDRESS paddr;
358     char		buf[ACPI_OEM_ID_SIZE + ACPI_OEM_TABLE_ID_SIZE + 2];
359     struct sbuf		sb;
360 
361     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
362 
363     if (power_pm_get_type() != POWER_PM_TYPE_NONE &&
364 	power_pm_get_type() != POWER_PM_TYPE_ACPI) {
365 	device_printf(dev, "probe failed, other PM system enabled.\n");
366 	return_VALUE (ENXIO);
367     }
368 
369     if ((paddr = AcpiOsGetRootPointer()) == 0 ||
370 	(rsdp = AcpiOsMapMemory(paddr, sizeof(ACPI_TABLE_RSDP))) == NULL)
371 	return_VALUE (ENXIO);
372     if (rsdp->Revision > 1 && rsdp->XsdtPhysicalAddress != 0)
373 	paddr = (ACPI_PHYSICAL_ADDRESS)rsdp->XsdtPhysicalAddress;
374     else
375 	paddr = (ACPI_PHYSICAL_ADDRESS)rsdp->RsdtPhysicalAddress;
376     AcpiOsUnmapMemory(rsdp, sizeof(ACPI_TABLE_RSDP));
377 
378     if ((rsdt = AcpiOsMapMemory(paddr, sizeof(ACPI_TABLE_HEADER))) == NULL)
379 	return_VALUE (ENXIO);
380     sbuf_new(&sb, buf, sizeof(buf), SBUF_FIXEDLEN);
381     sbuf_bcat(&sb, rsdt->OemId, ACPI_OEM_ID_SIZE);
382     sbuf_trim(&sb);
383     sbuf_putc(&sb, ' ');
384     sbuf_bcat(&sb, rsdt->OemTableId, ACPI_OEM_TABLE_ID_SIZE);
385     sbuf_trim(&sb);
386     sbuf_finish(&sb);
387     device_set_desc_copy(dev, sbuf_data(&sb));
388     sbuf_delete(&sb);
389     AcpiOsUnmapMemory(rsdt, sizeof(ACPI_TABLE_HEADER));
390 
391     return_VALUE (0);
392 }
393 
394 static int
395 acpi_attach(device_t dev)
396 {
397     struct acpi_softc	*sc;
398     ACPI_TABLE_FACS	*facs;
399     ACPI_STATUS		status;
400     int			error, state;
401     UINT32		flags;
402     UINT8		TypeA, TypeB;
403     char		*env;
404 
405     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
406 
407     sc = device_get_softc(dev);
408     sc->acpi_dev = dev;
409 
410     error = ENXIO;
411 
412     /* Initialize resource manager. */
413     acpi_rman_io.rm_type = RMAN_ARRAY;
414     acpi_rman_io.rm_start = 0;
415     acpi_rman_io.rm_end = 0xffff;
416     acpi_rman_io.rm_descr = "ACPI I/O ports";
417     if (rman_init(&acpi_rman_io) != 0)
418 	panic("acpi rman_init IO ports failed");
419     acpi_rman_mem.rm_type = RMAN_ARRAY;
420     acpi_rman_mem.rm_start = 0;
421     acpi_rman_mem.rm_end = ~0ul;
422     acpi_rman_mem.rm_descr = "ACPI I/O memory addresses";
423     if (rman_init(&acpi_rman_mem) != 0)
424 	panic("acpi rman_init memory failed");
425 
426     /* Initialise the ACPI mutex */
427     mtx_init(&acpi_mutex, "ACPI global lock", NULL, MTX_DEF);
428 
429     /*
430      * Set the globals from our tunables.  This is needed because ACPI-CA
431      * uses UINT8 for some values and we have no tunable_byte.
432      */
433     AcpiGbl_AllMethodsSerialized = acpi_serialize_methods;
434     AcpiGbl_EnableInterpreterSlack = TRUE;
435 
436     /* Start up the ACPI CA subsystem. */
437     status = AcpiInitializeSubsystem();
438     if (ACPI_FAILURE(status)) {
439 	device_printf(dev, "Could not initialize Subsystem: %s\n",
440 		      AcpiFormatException(status));
441 	goto out;
442     }
443 
444     /* Load ACPI name space. */
445     status = AcpiLoadTables();
446     if (ACPI_FAILURE(status)) {
447 	device_printf(dev, "Could not load Namespace: %s\n",
448 		      AcpiFormatException(status));
449 	goto out;
450     }
451 
452     /* Install the default address space handlers. */
453     status = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
454 		ACPI_ADR_SPACE_SYSTEM_MEMORY, ACPI_DEFAULT_HANDLER, NULL, NULL);
455     if (ACPI_FAILURE(status)) {
456 	device_printf(dev, "Could not initialise SystemMemory handler: %s\n",
457 		      AcpiFormatException(status));
458 	goto out;
459     }
460     status = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
461 		ACPI_ADR_SPACE_SYSTEM_IO, ACPI_DEFAULT_HANDLER, NULL, NULL);
462     if (ACPI_FAILURE(status)) {
463 	device_printf(dev, "Could not initialise SystemIO handler: %s\n",
464 		      AcpiFormatException(status));
465 	goto out;
466     }
467     status = AcpiInstallAddressSpaceHandler(ACPI_ROOT_OBJECT,
468 		ACPI_ADR_SPACE_PCI_CONFIG, ACPI_DEFAULT_HANDLER, NULL, NULL);
469     if (ACPI_FAILURE(status)) {
470 	device_printf(dev, "could not initialise PciConfig handler: %s\n",
471 		      AcpiFormatException(status));
472 	goto out;
473     }
474 
475     /*
476      * Note that some systems (specifically, those with namespace evaluation
477      * issues that require the avoidance of parts of the namespace) must
478      * avoid running _INI and _STA on everything, as well as dodging the final
479      * object init pass.
480      *
481      * For these devices, we set ACPI_NO_DEVICE_INIT and ACPI_NO_OBJECT_INIT).
482      *
483      * XXX We should arrange for the object init pass after we have attached
484      *     all our child devices, but on many systems it works here.
485      */
486     flags = 0;
487     if (testenv("debug.acpi.avoid"))
488 	flags = ACPI_NO_DEVICE_INIT | ACPI_NO_OBJECT_INIT;
489 
490     /* Bring the hardware and basic handlers online. */
491     if (ACPI_FAILURE(status = AcpiEnableSubsystem(flags))) {
492 	device_printf(dev, "Could not enable ACPI: %s\n",
493 		      AcpiFormatException(status));
494 	goto out;
495     }
496 
497     /*
498      * Call the ECDT probe function to provide EC functionality before
499      * the namespace has been evaluated.
500      *
501      * XXX This happens before the sysresource devices have been probed and
502      * attached so its resources come from nexus0.  In practice, this isn't
503      * a problem but should be addressed eventually.
504      */
505     acpi_ec_ecdt_probe(dev);
506 
507     /* Bring device objects and regions online. */
508     if (ACPI_FAILURE(status = AcpiInitializeObjects(flags))) {
509 	device_printf(dev, "Could not initialize ACPI objects: %s\n",
510 		      AcpiFormatException(status));
511 	goto out;
512     }
513 
514     /*
515      * Setup our sysctl tree.
516      *
517      * XXX: This doesn't check to make sure that none of these fail.
518      */
519     sysctl_ctx_init(&sc->acpi_sysctl_ctx);
520     sc->acpi_sysctl_tree = SYSCTL_ADD_NODE(&sc->acpi_sysctl_ctx,
521 			       SYSCTL_STATIC_CHILDREN(_hw), OID_AUTO,
522 			       device_get_name(dev), CTLFLAG_RD, 0, "");
523     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
524 	OID_AUTO, "supported_sleep_state", CTLTYPE_STRING | CTLFLAG_RD,
525 	0, 0, acpi_supported_sleep_state_sysctl, "A", "");
526     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
527 	OID_AUTO, "power_button_state", CTLTYPE_STRING | CTLFLAG_RW,
528 	&sc->acpi_power_button_sx, 0, acpi_sleep_state_sysctl, "A", "");
529     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
530 	OID_AUTO, "sleep_button_state", CTLTYPE_STRING | CTLFLAG_RW,
531 	&sc->acpi_sleep_button_sx, 0, acpi_sleep_state_sysctl, "A", "");
532     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
533 	OID_AUTO, "lid_switch_state", CTLTYPE_STRING | CTLFLAG_RW,
534 	&sc->acpi_lid_switch_sx, 0, acpi_sleep_state_sysctl, "A", "");
535     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
536 	OID_AUTO, "standby_state", CTLTYPE_STRING | CTLFLAG_RW,
537 	&sc->acpi_standby_sx, 0, acpi_sleep_state_sysctl, "A", "");
538     SYSCTL_ADD_PROC(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
539 	OID_AUTO, "suspend_state", CTLTYPE_STRING | CTLFLAG_RW,
540 	&sc->acpi_suspend_sx, 0, acpi_sleep_state_sysctl, "A", "");
541     SYSCTL_ADD_INT(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
542 	OID_AUTO, "sleep_delay", CTLFLAG_RW, &sc->acpi_sleep_delay, 0,
543 	"sleep delay");
544     SYSCTL_ADD_INT(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
545 	OID_AUTO, "s4bios", CTLFLAG_RW, &sc->acpi_s4bios, 0, "S4BIOS mode");
546     SYSCTL_ADD_INT(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
547 	OID_AUTO, "verbose", CTLFLAG_RW, &sc->acpi_verbose, 0, "verbose mode");
548     SYSCTL_ADD_INT(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
549 	OID_AUTO, "disable_on_reboot", CTLFLAG_RW,
550 	&sc->acpi_do_disable, 0, "Disable ACPI when rebooting/halting system");
551     SYSCTL_ADD_INT(&sc->acpi_sysctl_ctx, SYSCTL_CHILDREN(sc->acpi_sysctl_tree),
552 	OID_AUTO, "handle_reboot", CTLFLAG_RW,
553 	&sc->acpi_handle_reboot, 0, "Use ACPI Reset Register to reboot");
554 
555     /*
556      * Default to 1 second before sleeping to give some machines time to
557      * stabilize.
558      */
559     sc->acpi_sleep_delay = 1;
560     if (bootverbose)
561 	sc->acpi_verbose = 1;
562     if ((env = getenv("hw.acpi.verbose")) != NULL) {
563 	if (strcmp(env, "0") != 0)
564 	    sc->acpi_verbose = 1;
565 	freeenv(env);
566     }
567 
568     /* Only enable S4BIOS by default if the FACS says it is available. */
569     status = AcpiGetTable(ACPI_SIG_FACS, 0, (ACPI_TABLE_HEADER **)&facs);
570     if (ACPI_FAILURE(status)) {
571 	device_printf(dev, "couldn't get FACS: %s\n",
572 		      AcpiFormatException(status));
573 	error = ENXIO;
574 	goto out;
575     }
576     if (facs->Flags & ACPI_FACS_S4_BIOS_PRESENT)
577 	sc->acpi_s4bios = 1;
578 
579     /*
580      * Dispatch the default sleep state to devices.  The lid switch is set
581      * to NONE by default to avoid surprising users.
582      */
583     sc->acpi_power_button_sx = ACPI_STATE_S5;
584     sc->acpi_lid_switch_sx = ACPI_S_STATES_MAX + 1;
585     sc->acpi_standby_sx = ACPI_STATE_S1;
586     sc->acpi_suspend_sx = ACPI_STATE_S3;
587 
588     /* Pick the first valid sleep state for the sleep button default. */
589     sc->acpi_sleep_button_sx = ACPI_S_STATES_MAX + 1;
590     for (state = ACPI_STATE_S1; state < ACPI_STATE_S5; state++)
591 	if (ACPI_SUCCESS(AcpiGetSleepTypeData(state, &TypeA, &TypeB))) {
592 	    sc->acpi_sleep_button_sx = state;
593 	    break;
594 	}
595 
596     acpi_enable_fixed_events(sc);
597 
598     /*
599      * Scan the namespace and attach/initialise children.
600      */
601 
602     /* Register our shutdown handler. */
603     EVENTHANDLER_REGISTER(shutdown_final, acpi_shutdown_final, sc,
604 	SHUTDOWN_PRI_LAST);
605 
606     /*
607      * Register our acpi event handlers.
608      * XXX should be configurable eg. via userland policy manager.
609      */
610     EVENTHANDLER_REGISTER(acpi_sleep_event, acpi_system_eventhandler_sleep,
611 	sc, ACPI_EVENT_PRI_LAST);
612     EVENTHANDLER_REGISTER(acpi_wakeup_event, acpi_system_eventhandler_wakeup,
613 	sc, ACPI_EVENT_PRI_LAST);
614 
615     /* Flag our initial states. */
616     sc->acpi_enabled = 1;
617     sc->acpi_sstate = ACPI_STATE_S0;
618     sc->acpi_sleep_disabled = 0;
619 
620     /* Create the control device */
621     sc->acpi_dev_t = make_dev(&acpi_cdevsw, 0, UID_ROOT, GID_WHEEL, 0644,
622 			      "acpi");
623     sc->acpi_dev_t->si_drv1 = sc;
624 
625     if ((error = acpi_machdep_init(dev)))
626 	goto out;
627 
628     /* Register ACPI again to pass the correct argument of pm_func. */
629     power_pm_register(POWER_PM_TYPE_ACPI, acpi_pm_func, sc);
630 
631     if (!acpi_disabled("bus"))
632 	acpi_probe_children(dev);
633 
634     error = 0;
635 
636  out:
637     return_VALUE (error);
638 }
639 
640 static int
641 acpi_suspend(device_t dev)
642 {
643     device_t child, *devlist;
644     int error, i, numdevs, pstate;
645 
646     GIANT_REQUIRED;
647 
648     /* First give child devices a chance to suspend. */
649     error = bus_generic_suspend(dev);
650     if (error)
651 	return (error);
652 
653     /*
654      * Now, set them into the appropriate power state, usually D3.  If the
655      * device has an _SxD method for the next sleep state, use that power
656      * state instead.
657      */
658     device_get_children(dev, &devlist, &numdevs);
659     for (i = 0; i < numdevs; i++) {
660 	/* If the device is not attached, we've powered it down elsewhere. */
661 	child = devlist[i];
662 	if (!device_is_attached(child))
663 	    continue;
664 
665 	/*
666 	 * Default to D3 for all sleep states.  The _SxD method is optional
667 	 * so set the powerstate even if it's absent.
668 	 */
669 	pstate = PCI_POWERSTATE_D3;
670 	error = acpi_device_pwr_for_sleep(device_get_parent(child),
671 	    child, &pstate);
672 	if ((error == 0 || error == ESRCH) && acpi_do_powerstate)
673 	    pci_set_powerstate(child, pstate);
674     }
675     free(devlist, M_TEMP);
676     error = 0;
677 
678     return (error);
679 }
680 
681 static int
682 acpi_resume(device_t dev)
683 {
684     ACPI_HANDLE handle;
685     int i, numdevs;
686     device_t child, *devlist;
687 
688     GIANT_REQUIRED;
689 
690     /*
691      * Put all devices in D0 before resuming them.  Call _S0D on each one
692      * since some systems expect this.
693      */
694     device_get_children(dev, &devlist, &numdevs);
695     for (i = 0; i < numdevs; i++) {
696 	child = devlist[i];
697 	handle = acpi_get_handle(child);
698 	if (handle)
699 	    AcpiEvaluateObject(handle, "_S0D", NULL, NULL);
700 	if (device_is_attached(child) && acpi_do_powerstate)
701 	    pci_set_powerstate(child, PCI_POWERSTATE_D0);
702     }
703     free(devlist, M_TEMP);
704 
705     return (bus_generic_resume(dev));
706 }
707 
708 static int
709 acpi_shutdown(device_t dev)
710 {
711 
712     GIANT_REQUIRED;
713 
714     /* Allow children to shutdown first. */
715     bus_generic_shutdown(dev);
716 
717     /*
718      * Enable any GPEs that are able to power-on the system (i.e., RTC).
719      * Also, disable any that are not valid for this state (most).
720      */
721     acpi_wake_prep_walk(ACPI_STATE_S5);
722 
723     return (0);
724 }
725 
726 /*
727  * Handle a new device being added
728  */
729 static device_t
730 acpi_add_child(device_t bus, int order, const char *name, int unit)
731 {
732     struct acpi_device	*ad;
733     device_t		child;
734 
735     if ((ad = malloc(sizeof(*ad), M_ACPIDEV, M_NOWAIT | M_ZERO)) == NULL)
736 	return (NULL);
737 
738     resource_list_init(&ad->ad_rl);
739 
740     child = device_add_child_ordered(bus, order, name, unit);
741     if (child != NULL)
742 	device_set_ivars(child, ad);
743     else
744 	free(ad, M_ACPIDEV);
745     return (child);
746 }
747 
748 static int
749 acpi_print_child(device_t bus, device_t child)
750 {
751     struct acpi_device	 *adev = device_get_ivars(child);
752     struct resource_list *rl = &adev->ad_rl;
753     int retval = 0;
754 
755     retval += bus_print_child_header(bus, child);
756     retval += resource_list_print_type(rl, "port",  SYS_RES_IOPORT, "%#lx");
757     retval += resource_list_print_type(rl, "iomem", SYS_RES_MEMORY, "%#lx");
758     retval += resource_list_print_type(rl, "irq",   SYS_RES_IRQ,    "%ld");
759     retval += resource_list_print_type(rl, "drq",   SYS_RES_DRQ,    "%ld");
760     if (device_get_flags(child))
761 	retval += printf(" flags %#x", device_get_flags(child));
762     retval += bus_print_child_footer(bus, child);
763 
764     return (retval);
765 }
766 
767 /*
768  * If this device is an ACPI child but no one claimed it, attempt
769  * to power it off.  We'll power it back up when a driver is added.
770  *
771  * XXX Disabled for now since many necessary devices (like fdc and
772  * ATA) don't claim the devices we created for them but still expect
773  * them to be powered up.
774  */
775 static void
776 acpi_probe_nomatch(device_t bus, device_t child)
777 {
778 
779     /* pci_set_powerstate(child, PCI_POWERSTATE_D3); */
780 }
781 
782 /*
783  * If a new driver has a chance to probe a child, first power it up.
784  *
785  * XXX Disabled for now (see acpi_probe_nomatch for details).
786  */
787 static void
788 acpi_driver_added(device_t dev, driver_t *driver)
789 {
790     device_t child, *devlist;
791     int i, numdevs;
792 
793     DEVICE_IDENTIFY(driver, dev);
794     device_get_children(dev, &devlist, &numdevs);
795     for (i = 0; i < numdevs; i++) {
796 	child = devlist[i];
797 	if (device_get_state(child) == DS_NOTPRESENT) {
798 	    /* pci_set_powerstate(child, PCI_POWERSTATE_D0); */
799 	    if (device_probe_and_attach(child) != 0)
800 		; /* pci_set_powerstate(child, PCI_POWERSTATE_D3); */
801 	}
802     }
803     free(devlist, M_TEMP);
804 }
805 
806 /* Location hint for devctl(8) */
807 static int
808 acpi_child_location_str_method(device_t cbdev, device_t child, char *buf,
809     size_t buflen)
810 {
811     struct acpi_device *dinfo = device_get_ivars(child);
812 
813     if (dinfo->ad_handle)
814 	snprintf(buf, buflen, "handle=%s", acpi_name(dinfo->ad_handle));
815     else
816 	snprintf(buf, buflen, "unknown");
817     return (0);
818 }
819 
820 /* PnP information for devctl(8) */
821 static int
822 acpi_child_pnpinfo_str_method(device_t cbdev, device_t child, char *buf,
823     size_t buflen)
824 {
825     ACPI_BUFFER adbuf = {ACPI_ALLOCATE_BUFFER, NULL};
826     ACPI_DEVICE_INFO *adinfo;
827     struct acpi_device *dinfo = device_get_ivars(child);
828     char *end;
829     int error;
830 
831     error = AcpiGetObjectInfo(dinfo->ad_handle, &adbuf);
832     adinfo = (ACPI_DEVICE_INFO *) adbuf.Pointer;
833     if (error)
834 	snprintf(buf, buflen, "unknown");
835     else
836 	snprintf(buf, buflen, "_HID=%s _UID=%lu",
837 		 (adinfo->Valid & ACPI_VALID_HID) ?
838 		 adinfo->HardwareId.Value : "none",
839 		 (adinfo->Valid & ACPI_VALID_UID) ?
840 		 strtoul(adinfo->UniqueId.Value, &end, 10) : 0);
841     if (adinfo)
842 	AcpiOsFree(adinfo);
843 
844     return (0);
845 }
846 
847 /*
848  * Handle per-device ivars
849  */
850 static int
851 acpi_read_ivar(device_t dev, device_t child, int index, uintptr_t *result)
852 {
853     struct acpi_device	*ad;
854 
855     if ((ad = device_get_ivars(child)) == NULL) {
856 	printf("device has no ivars\n");
857 	return (ENOENT);
858     }
859 
860     /* ACPI and ISA compatibility ivars */
861     switch(index) {
862     case ACPI_IVAR_HANDLE:
863 	*(ACPI_HANDLE *)result = ad->ad_handle;
864 	break;
865     case ACPI_IVAR_MAGIC:
866 	*(int *)result = ad->ad_magic;
867 	break;
868     case ACPI_IVAR_PRIVATE:
869 	*(void **)result = ad->ad_private;
870 	break;
871     case ACPI_IVAR_FLAGS:
872 	*(int *)result = ad->ad_flags;
873 	break;
874     case ISA_IVAR_VENDORID:
875     case ISA_IVAR_SERIAL:
876     case ISA_IVAR_COMPATID:
877 	*(int *)result = -1;
878 	break;
879     case ISA_IVAR_LOGICALID:
880 	*(int *)result = acpi_isa_get_logicalid(child);
881 	break;
882     default:
883 	return (ENOENT);
884     }
885 
886     return (0);
887 }
888 
889 static int
890 acpi_write_ivar(device_t dev, device_t child, int index, uintptr_t value)
891 {
892     struct acpi_device	*ad;
893 
894     if ((ad = device_get_ivars(child)) == NULL) {
895 	printf("device has no ivars\n");
896 	return (ENOENT);
897     }
898 
899     switch(index) {
900     case ACPI_IVAR_HANDLE:
901 	ad->ad_handle = (ACPI_HANDLE)value;
902 	break;
903     case ACPI_IVAR_MAGIC:
904 	ad->ad_magic = (int)value;
905 	break;
906     case ACPI_IVAR_PRIVATE:
907 	ad->ad_private = (void *)value;
908 	break;
909     case ACPI_IVAR_FLAGS:
910 	ad->ad_flags = (int)value;
911 	break;
912     default:
913 	panic("bad ivar write request (%d)", index);
914 	return (ENOENT);
915     }
916 
917     return (0);
918 }
919 
920 /*
921  * Handle child resource allocation/removal
922  */
923 static struct resource_list *
924 acpi_get_rlist(device_t dev, device_t child)
925 {
926     struct acpi_device		*ad;
927 
928     ad = device_get_ivars(child);
929     return (&ad->ad_rl);
930 }
931 
932 /*
933  * Pre-allocate/manage all memory and IO resources.  Since rman can't handle
934  * duplicates, we merge any in the sysresource attach routine.
935  */
936 static int
937 acpi_sysres_alloc(device_t dev)
938 {
939     struct resource *res;
940     struct resource_list *rl;
941     struct resource_list_entry *rle;
942     struct rman *rm;
943     char *sysres_ids[] = { "PNP0C01", "PNP0C02", NULL };
944     device_t *children;
945     int child_count, i;
946 
947     /*
948      * Probe/attach any sysresource devices.  This would be unnecessary if we
949      * had multi-pass probe/attach.
950      */
951     if (device_get_children(dev, &children, &child_count) != 0)
952 	return (ENXIO);
953     for (i = 0; i < child_count; i++) {
954 	if (ACPI_ID_PROBE(dev, children[i], sysres_ids) != NULL)
955 	    device_probe_and_attach(children[i]);
956     }
957     free(children, M_TEMP);
958 
959     rl = BUS_GET_RESOURCE_LIST(device_get_parent(dev), dev);
960     STAILQ_FOREACH(rle, rl, link) {
961 	if (rle->res != NULL) {
962 	    device_printf(dev, "duplicate resource for %lx\n", rle->start);
963 	    continue;
964 	}
965 
966 	/* Only memory and IO resources are valid here. */
967 	switch (rle->type) {
968 	case SYS_RES_IOPORT:
969 	    rm = &acpi_rman_io;
970 	    break;
971 	case SYS_RES_MEMORY:
972 	    rm = &acpi_rman_mem;
973 	    break;
974 	default:
975 	    continue;
976 	}
977 
978 	/* Pre-allocate resource and add to our rman pool. */
979 	res = BUS_ALLOC_RESOURCE(device_get_parent(dev), dev, rle->type,
980 	    &rle->rid, rle->start, rle->start + rle->count - 1, rle->count, 0);
981 	if (res != NULL) {
982 	    rman_manage_region(rm, rman_get_start(res), rman_get_end(res));
983 	    rle->res = res;
984 	} else
985 	    device_printf(dev, "reservation of %lx, %lx (%d) failed\n",
986 		rle->start, rle->count, rle->type);
987     }
988     return (0);
989 }
990 
991 static struct resource *
992 acpi_alloc_resource(device_t bus, device_t child, int type, int *rid,
993     u_long start, u_long end, u_long count, u_int flags)
994 {
995     ACPI_RESOURCE ares;
996     struct acpi_device *ad = device_get_ivars(child);
997     struct resource_list *rl = &ad->ad_rl;
998     struct resource_list_entry *rle;
999     struct resource *res;
1000     struct rman *rm;
1001 
1002     res = NULL;
1003 
1004     /* We only handle memory and IO resources through rman. */
1005     switch (type) {
1006     case SYS_RES_IOPORT:
1007 	rm = &acpi_rman_io;
1008 	break;
1009     case SYS_RES_MEMORY:
1010 	rm = &acpi_rman_mem;
1011 	break;
1012     default:
1013 	rm = NULL;
1014     }
1015 
1016     ACPI_SERIAL_BEGIN(acpi);
1017 
1018     /*
1019      * If this is an allocation of the "default" range for a given RID, and
1020      * we know what the resources for this device are (i.e., they're on the
1021      * child's resource list), use those start/end values.
1022      */
1023     if (bus == device_get_parent(child) && start == 0UL && end == ~0UL) {
1024 	rle = resource_list_find(rl, type, *rid);
1025 	if (rle == NULL)
1026 	    goto out;
1027 	start = rle->start;
1028 	end = rle->end;
1029 	count = rle->count;
1030     }
1031 
1032     /*
1033      * If this is an allocation of a specific range, see if we can satisfy
1034      * the request from our system resource regions.  If we can't, pass the
1035      * request up to the parent.
1036      */
1037     if (!(start == 0UL && end == ~0UL) && rm != NULL)
1038 	res = rman_reserve_resource(rm, start, end, count, flags & ~RF_ACTIVE,
1039 	    child);
1040     if (res == NULL) {
1041 	res = BUS_ALLOC_RESOURCE(device_get_parent(bus), child, type, rid,
1042 	    start, end, count, flags);
1043     } else {
1044 	rman_set_rid(res, *rid);
1045 
1046 	/* If requested, activate the resource using the parent's method. */
1047 	if (flags & RF_ACTIVE)
1048 	    if (bus_activate_resource(child, type, *rid, res) != 0) {
1049 		rman_release_resource(res);
1050 		res = NULL;
1051 		goto out;
1052 	    }
1053     }
1054 
1055     if (res != NULL && device_get_parent(child) == bus)
1056 	switch (type) {
1057 	case SYS_RES_IRQ:
1058 	    /*
1059 	     * Since bus_config_intr() takes immediate effect, we cannot
1060 	     * configure the interrupt associated with a device when we
1061 	     * parse the resources but have to defer it until a driver
1062 	     * actually allocates the interrupt via bus_alloc_resource().
1063 	     *
1064 	     * XXX: Should we handle the lookup failing?
1065 	     */
1066 	    if (ACPI_SUCCESS(acpi_lookup_irq_resource(child, *rid, res, &ares)))
1067 		acpi_config_intr(child, &ares);
1068 	    break;
1069 	}
1070 
1071 out:
1072     ACPI_SERIAL_END(acpi);
1073     return (res);
1074 }
1075 
1076 static int
1077 acpi_release_resource(device_t bus, device_t child, int type, int rid,
1078     struct resource *r)
1079 {
1080     struct rman *rm;
1081     int ret;
1082 
1083     /* We only handle memory and IO resources through rman. */
1084     switch (type) {
1085     case SYS_RES_IOPORT:
1086 	rm = &acpi_rman_io;
1087 	break;
1088     case SYS_RES_MEMORY:
1089 	rm = &acpi_rman_mem;
1090 	break;
1091     default:
1092 	rm = NULL;
1093     }
1094 
1095     ACPI_SERIAL_BEGIN(acpi);
1096 
1097     /*
1098      * If this resource belongs to one of our internal managers,
1099      * deactivate it and release it to the local pool.  If it doesn't,
1100      * pass this request up to the parent.
1101      */
1102     if (rm != NULL && rman_is_region_manager(r, rm)) {
1103 	if (rman_get_flags(r) & RF_ACTIVE) {
1104 	    ret = bus_deactivate_resource(child, type, rid, r);
1105 	    if (ret != 0)
1106 		goto out;
1107 	}
1108 	ret = rman_release_resource(r);
1109     } else
1110 	ret = BUS_RELEASE_RESOURCE(device_get_parent(bus), child, type, rid, r);
1111 
1112 out:
1113     ACPI_SERIAL_END(acpi);
1114     return (ret);
1115 }
1116 
1117 static void
1118 acpi_delete_resource(device_t bus, device_t child, int type, int rid)
1119 {
1120     struct resource_list *rl;
1121 
1122     rl = acpi_get_rlist(bus, child);
1123     resource_list_delete(rl, type, rid);
1124 }
1125 
1126 /* Allocate an IO port or memory resource, given its GAS. */
1127 int
1128 acpi_bus_alloc_gas(device_t dev, int *type, int *rid, ACPI_GENERIC_ADDRESS *gas,
1129     struct resource **res, u_int flags)
1130 {
1131     int error, res_type;
1132 
1133     error = ENOMEM;
1134     if (type == NULL || rid == NULL || gas == NULL || res == NULL)
1135 	return (EINVAL);
1136 
1137     /* We only support memory and IO spaces. */
1138     switch (gas->SpaceId) {
1139     case ACPI_ADR_SPACE_SYSTEM_MEMORY:
1140 	res_type = SYS_RES_MEMORY;
1141 	break;
1142     case ACPI_ADR_SPACE_SYSTEM_IO:
1143 	res_type = SYS_RES_IOPORT;
1144 	break;
1145     default:
1146 	return (EOPNOTSUPP);
1147     }
1148 
1149     /*
1150      * If the register width is less than 8, assume the BIOS author means
1151      * it is a bit field and just allocate a byte.
1152      */
1153     if (gas->BitWidth && gas->BitWidth < 8)
1154 	gas->BitWidth = 8;
1155 
1156     /* Validate the address after we're sure we support the space. */
1157     if (gas->Address == 0 || gas->BitWidth == 0)
1158 	return (EINVAL);
1159 
1160     bus_set_resource(dev, res_type, *rid, gas->Address,
1161 	gas->BitWidth / 8);
1162     *res = bus_alloc_resource_any(dev, res_type, rid, RF_ACTIVE | flags);
1163     if (*res != NULL) {
1164 	*type = res_type;
1165 	error = 0;
1166     } else
1167 	bus_delete_resource(dev, res_type, *rid);
1168 
1169     return (error);
1170 }
1171 
1172 /* Probe _HID and _CID for compatible ISA PNP ids. */
1173 static uint32_t
1174 acpi_isa_get_logicalid(device_t dev)
1175 {
1176     ACPI_DEVICE_INFO	*devinfo;
1177     ACPI_BUFFER		buf;
1178     ACPI_HANDLE		h;
1179     ACPI_STATUS		error;
1180     u_int32_t		pnpid;
1181 
1182     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
1183 
1184     pnpid = 0;
1185     buf.Pointer = NULL;
1186     buf.Length = ACPI_ALLOCATE_BUFFER;
1187 
1188     /* Fetch and validate the HID. */
1189     if ((h = acpi_get_handle(dev)) == NULL)
1190 	goto out;
1191     error = AcpiGetObjectInfo(h, &buf);
1192     if (ACPI_FAILURE(error))
1193 	goto out;
1194     devinfo = (ACPI_DEVICE_INFO *)buf.Pointer;
1195 
1196     if ((devinfo->Valid & ACPI_VALID_HID) != 0)
1197 	pnpid = PNP_EISAID(devinfo->HardwareId.Value);
1198 
1199 out:
1200     if (buf.Pointer != NULL)
1201 	AcpiOsFree(buf.Pointer);
1202     return_VALUE (pnpid);
1203 }
1204 
1205 static int
1206 acpi_isa_get_compatid(device_t dev, uint32_t *cids, int count)
1207 {
1208     ACPI_DEVICE_INFO	*devinfo;
1209     ACPI_BUFFER		buf;
1210     ACPI_HANDLE		h;
1211     ACPI_STATUS		error;
1212     uint32_t		*pnpid;
1213     int			valid, i;
1214 
1215     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
1216 
1217     pnpid = cids;
1218     valid = 0;
1219     buf.Pointer = NULL;
1220     buf.Length = ACPI_ALLOCATE_BUFFER;
1221 
1222     /* Fetch and validate the CID */
1223     if ((h = acpi_get_handle(dev)) == NULL)
1224 	goto out;
1225     error = AcpiGetObjectInfo(h, &buf);
1226     if (ACPI_FAILURE(error))
1227 	goto out;
1228     devinfo = (ACPI_DEVICE_INFO *)buf.Pointer;
1229     if ((devinfo->Valid & ACPI_VALID_CID) == 0)
1230 	goto out;
1231 
1232     if (devinfo->CompatibilityId.Count < count)
1233 	count = devinfo->CompatibilityId.Count;
1234     for (i = 0; i < count; i++) {
1235 	if (strncmp(devinfo->CompatibilityId.Id[i].Value, "PNP", 3) != 0)
1236 	    continue;
1237 	*pnpid++ = PNP_EISAID(devinfo->CompatibilityId.Id[i].Value);
1238 	valid++;
1239     }
1240 
1241 out:
1242     if (buf.Pointer != NULL)
1243 	AcpiOsFree(buf.Pointer);
1244     return_VALUE (valid);
1245 }
1246 
1247 static char *
1248 acpi_device_id_probe(device_t bus, device_t dev, char **ids)
1249 {
1250     ACPI_HANDLE h;
1251     int i;
1252 
1253     h = acpi_get_handle(dev);
1254     if (ids == NULL || h == NULL || acpi_get_type(dev) != ACPI_TYPE_DEVICE)
1255 	return (NULL);
1256 
1257     /* Try to match one of the array of IDs with a HID or CID. */
1258     for (i = 0; ids[i] != NULL; i++) {
1259 	if (acpi_MatchHid(h, ids[i]))
1260 	    return (ids[i]);
1261     }
1262     return (NULL);
1263 }
1264 
1265 static ACPI_STATUS
1266 acpi_device_eval_obj(device_t bus, device_t dev, ACPI_STRING pathname,
1267     ACPI_OBJECT_LIST *parameters, ACPI_BUFFER *ret)
1268 {
1269     ACPI_HANDLE h;
1270 
1271     if (dev == NULL)
1272 	h = ACPI_ROOT_OBJECT;
1273     else if ((h = acpi_get_handle(dev)) == NULL)
1274 	return (AE_BAD_PARAMETER);
1275     return (AcpiEvaluateObject(h, pathname, parameters, ret));
1276 }
1277 
1278 static int
1279 acpi_device_pwr_for_sleep(device_t bus, device_t dev, int *dstate)
1280 {
1281     struct acpi_softc *sc;
1282     ACPI_HANDLE handle;
1283     ACPI_STATUS status;
1284     char sxd[8];
1285     int error;
1286 
1287     sc = device_get_softc(bus);
1288     handle = acpi_get_handle(dev);
1289 
1290     /*
1291      * XXX If we find these devices, don't try to power them down.
1292      * The serial and IRDA ports on my T23 hang the system when
1293      * set to D3 and it appears that such legacy devices may
1294      * need special handling in their drivers.
1295      */
1296     if (handle == NULL ||
1297 	acpi_MatchHid(handle, "PNP0500") ||
1298 	acpi_MatchHid(handle, "PNP0501") ||
1299 	acpi_MatchHid(handle, "PNP0502") ||
1300 	acpi_MatchHid(handle, "PNP0510") ||
1301 	acpi_MatchHid(handle, "PNP0511"))
1302 	return (ENXIO);
1303 
1304     /*
1305      * Override next state with the value from _SxD, if present.  If no
1306      * dstate argument was provided, don't fetch the return value.
1307      */
1308     snprintf(sxd, sizeof(sxd), "_S%dD", sc->acpi_sstate);
1309     if (dstate)
1310 	status = acpi_GetInteger(handle, sxd, dstate);
1311     else
1312 	status = AcpiEvaluateObject(handle, sxd, NULL, NULL);
1313 
1314     switch (status) {
1315     case AE_OK:
1316 	error = 0;
1317 	break;
1318     case AE_NOT_FOUND:
1319 	error = ESRCH;
1320 	break;
1321     default:
1322 	error = ENXIO;
1323 	break;
1324     }
1325 
1326     return (error);
1327 }
1328 
1329 /* Callback arg for our implementation of walking the namespace. */
1330 struct acpi_device_scan_ctx {
1331     acpi_scan_cb_t	user_fn;
1332     void		*arg;
1333     ACPI_HANDLE		parent;
1334 };
1335 
1336 static ACPI_STATUS
1337 acpi_device_scan_cb(ACPI_HANDLE h, UINT32 level, void *arg, void **retval)
1338 {
1339     struct acpi_device_scan_ctx *ctx;
1340     device_t dev, old_dev;
1341     ACPI_STATUS status;
1342     ACPI_OBJECT_TYPE type;
1343 
1344     /*
1345      * Skip this device if we think we'll have trouble with it or it is
1346      * the parent where the scan began.
1347      */
1348     ctx = (struct acpi_device_scan_ctx *)arg;
1349     if (acpi_avoid(h) || h == ctx->parent)
1350 	return (AE_OK);
1351 
1352     /* If this is not a valid device type (e.g., a method), skip it. */
1353     if (ACPI_FAILURE(AcpiGetType(h, &type)))
1354 	return (AE_OK);
1355     if (type != ACPI_TYPE_DEVICE && type != ACPI_TYPE_PROCESSOR &&
1356 	type != ACPI_TYPE_THERMAL && type != ACPI_TYPE_POWER)
1357 	return (AE_OK);
1358 
1359     /*
1360      * Call the user function with the current device.  If it is unchanged
1361      * afterwards, return.  Otherwise, we update the handle to the new dev.
1362      */
1363     old_dev = acpi_get_device(h);
1364     dev = old_dev;
1365     status = ctx->user_fn(h, &dev, level, ctx->arg);
1366     if (ACPI_FAILURE(status) || old_dev == dev)
1367 	return (status);
1368 
1369     /* Remove the old child and its connection to the handle. */
1370     if (old_dev != NULL) {
1371 	device_delete_child(device_get_parent(old_dev), old_dev);
1372 	AcpiDetachData(h, acpi_fake_objhandler);
1373     }
1374 
1375     /* Recreate the handle association if the user created a device. */
1376     if (dev != NULL)
1377 	AcpiAttachData(h, acpi_fake_objhandler, dev);
1378 
1379     return (AE_OK);
1380 }
1381 
1382 static ACPI_STATUS
1383 acpi_device_scan_children(device_t bus, device_t dev, int max_depth,
1384     acpi_scan_cb_t user_fn, void *arg)
1385 {
1386     ACPI_HANDLE h;
1387     struct acpi_device_scan_ctx ctx;
1388 
1389     if (acpi_disabled("children"))
1390 	return (AE_OK);
1391 
1392     if (dev == NULL)
1393 	h = ACPI_ROOT_OBJECT;
1394     else if ((h = acpi_get_handle(dev)) == NULL)
1395 	return (AE_BAD_PARAMETER);
1396     ctx.user_fn = user_fn;
1397     ctx.arg = arg;
1398     ctx.parent = h;
1399     return (AcpiWalkNamespace(ACPI_TYPE_ANY, h, max_depth,
1400 	acpi_device_scan_cb, &ctx, NULL));
1401 }
1402 
1403 /*
1404  * Even though ACPI devices are not PCI, we use the PCI approach for setting
1405  * device power states since it's close enough to ACPI.
1406  */
1407 static int
1408 acpi_set_powerstate_method(device_t bus, device_t child, int state)
1409 {
1410     ACPI_HANDLE h;
1411     ACPI_STATUS status;
1412     int error;
1413 
1414     error = 0;
1415     h = acpi_get_handle(child);
1416     if (state < ACPI_STATE_D0 || state > ACPI_STATE_D3)
1417 	return (EINVAL);
1418     if (h == NULL)
1419 	return (0);
1420 
1421     /* Ignore errors if the power methods aren't present. */
1422     status = acpi_pwr_switch_consumer(h, state);
1423     if (ACPI_FAILURE(status) && status != AE_NOT_FOUND
1424 	&& status != AE_BAD_PARAMETER)
1425 	device_printf(bus, "failed to set ACPI power state D%d on %s: %s\n",
1426 	    state, acpi_name(h), AcpiFormatException(status));
1427 
1428     return (error);
1429 }
1430 
1431 static int
1432 acpi_isa_pnp_probe(device_t bus, device_t child, struct isa_pnp_id *ids)
1433 {
1434     int			result, cid_count, i;
1435     uint32_t		lid, cids[8];
1436 
1437     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
1438 
1439     /*
1440      * ISA-style drivers attached to ACPI may persist and
1441      * probe manually if we return ENOENT.  We never want
1442      * that to happen, so don't ever return it.
1443      */
1444     result = ENXIO;
1445 
1446     /* Scan the supplied IDs for a match */
1447     lid = acpi_isa_get_logicalid(child);
1448     cid_count = acpi_isa_get_compatid(child, cids, 8);
1449     while (ids && ids->ip_id) {
1450 	if (lid == ids->ip_id) {
1451 	    result = 0;
1452 	    goto out;
1453 	}
1454 	for (i = 0; i < cid_count; i++) {
1455 	    if (cids[i] == ids->ip_id) {
1456 		result = 0;
1457 		goto out;
1458 	    }
1459 	}
1460 	ids++;
1461     }
1462 
1463  out:
1464     if (result == 0 && ids->ip_desc)
1465 	device_set_desc(child, ids->ip_desc);
1466 
1467     return_VALUE (result);
1468 }
1469 
1470 /*
1471  * Scan all of the ACPI namespace and attach child devices.
1472  *
1473  * We should only expect to find devices in the \_PR, \_TZ, \_SI, and
1474  * \_SB scopes, and \_PR and \_TZ became obsolete in the ACPI 2.0 spec.
1475  * However, in violation of the spec, some systems place their PCI link
1476  * devices in \, so we have to walk the whole namespace.  We check the
1477  * type of namespace nodes, so this should be ok.
1478  */
1479 static void
1480 acpi_probe_children(device_t bus)
1481 {
1482 
1483     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
1484 
1485     /*
1486      * Scan the namespace and insert placeholders for all the devices that
1487      * we find.  We also probe/attach any early devices.
1488      *
1489      * Note that we use AcpiWalkNamespace rather than AcpiGetDevices because
1490      * we want to create nodes for all devices, not just those that are
1491      * currently present. (This assumes that we don't want to create/remove
1492      * devices as they appear, which might be smarter.)
1493      */
1494     ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "namespace scan\n"));
1495     AcpiWalkNamespace(ACPI_TYPE_ANY, ACPI_ROOT_OBJECT, 100, acpi_probe_child,
1496 	bus, NULL);
1497 
1498     /* Pre-allocate resources for our rman from any sysresource devices. */
1499     acpi_sysres_alloc(bus);
1500 
1501     /* Create any static children by calling device identify methods. */
1502     ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "device identify routines\n"));
1503     bus_generic_probe(bus);
1504 
1505     /* Probe/attach all children, created staticly and from the namespace. */
1506     ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "first bus_generic_attach\n"));
1507     bus_generic_attach(bus);
1508 
1509     /*
1510      * Some of these children may have attached others as part of their attach
1511      * process (eg. the root PCI bus driver), so rescan.
1512      */
1513     ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "second bus_generic_attach\n"));
1514     bus_generic_attach(bus);
1515 
1516     /* Attach wake sysctls. */
1517     acpi_wake_sysctl_walk(bus);
1518 
1519     ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "done attaching children\n"));
1520     return_VOID;
1521 }
1522 
1523 /*
1524  * Determine the probe order for a given device and return non-zero if it
1525  * should be attached immediately.
1526  */
1527 static int
1528 acpi_probe_order(ACPI_HANDLE handle, int *order)
1529 {
1530 
1531     /*
1532      * 1. I/O port and memory system resource holders
1533      * 2. Embedded controllers (to handle early accesses)
1534      * 3. PCI Link Devices
1535      */
1536     if (acpi_MatchHid(handle, "PNP0C01") || acpi_MatchHid(handle, "PNP0C02"))
1537 	*order = 1;
1538     else if (acpi_MatchHid(handle, "PNP0C09"))
1539 	*order = 2;
1540     else if (acpi_MatchHid(handle, "PNP0C0F"))
1541 	*order = 3;
1542     return (0);
1543 }
1544 
1545 /*
1546  * Evaluate a child device and determine whether we might attach a device to
1547  * it.
1548  */
1549 static ACPI_STATUS
1550 acpi_probe_child(ACPI_HANDLE handle, UINT32 level, void *context, void **status)
1551 {
1552     ACPI_OBJECT_TYPE type;
1553     ACPI_HANDLE h;
1554     device_t bus, child;
1555     int order;
1556     char *handle_str, **search;
1557     static char *scopes[] = {"\\_PR_", "\\_TZ_", "\\_SI_", "\\_SB_", NULL};
1558 
1559     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
1560 
1561     /* Skip this device if we think we'll have trouble with it. */
1562     if (acpi_avoid(handle))
1563 	return_ACPI_STATUS (AE_OK);
1564 
1565     bus = (device_t)context;
1566     if (ACPI_SUCCESS(AcpiGetType(handle, &type))) {
1567 	switch (type) {
1568 	case ACPI_TYPE_DEVICE:
1569 	case ACPI_TYPE_PROCESSOR:
1570 	case ACPI_TYPE_THERMAL:
1571 	case ACPI_TYPE_POWER:
1572 	    if (acpi_disabled("children"))
1573 		break;
1574 
1575 	    /*
1576 	     * Since we scan from \, be sure to skip system scope objects.
1577 	     * At least \_SB and \_TZ are detected as devices (ACPI-CA bug?)
1578 	     */
1579 	    handle_str = acpi_name(handle);
1580 	    for (search = scopes; *search != NULL; search++) {
1581 		if (strcmp(handle_str, *search) == 0)
1582 		    break;
1583 	    }
1584 	    if (*search != NULL)
1585 		break;
1586 
1587 	    /*
1588 	     * Create a placeholder device for this node.  Sort the placeholder
1589 	     * so that the probe/attach passes will run breadth-first.  Orders
1590 	     * less than 10 are reserved for special objects (i.e., system
1591 	     * resources).  Larger values are used for all other devices.
1592 	     */
1593 	    ACPI_DEBUG_PRINT((ACPI_DB_OBJECTS, "scanning '%s'\n", handle_str));
1594 	    order = (level + 1) * 10;
1595 	    acpi_probe_order(handle, &order);
1596 	    child = BUS_ADD_CHILD(bus, order, NULL, -1);
1597 	    if (child == NULL)
1598 		break;
1599 
1600 	    /* Associate the handle with the device_t and vice versa. */
1601 	    acpi_set_handle(child, handle);
1602 	    AcpiAttachData(handle, acpi_fake_objhandler, child);
1603 
1604 	    /*
1605 	     * Check that the device is present.  If it's not present,
1606 	     * leave it disabled (so that we have a device_t attached to
1607 	     * the handle, but we don't probe it).
1608 	     *
1609 	     * XXX PCI link devices sometimes report "present" but not
1610 	     * "functional" (i.e. if disabled).  Go ahead and probe them
1611 	     * anyway since we may enable them later.
1612 	     */
1613 	    if (type == ACPI_TYPE_DEVICE && !acpi_DeviceIsPresent(child)) {
1614 		/* Never disable PCI link devices. */
1615 		if (acpi_MatchHid(handle, "PNP0C0F"))
1616 		    break;
1617 		/*
1618 		 * Docking stations should remain enabled since the system
1619 		 * may be undocked at boot.
1620 		 */
1621 		if (ACPI_SUCCESS(AcpiGetHandle(handle, "_DCK", &h)))
1622 		    break;
1623 
1624 		device_disable(child);
1625 		break;
1626 	    }
1627 
1628 	    /*
1629 	     * Get the device's resource settings and attach them.
1630 	     * Note that if the device has _PRS but no _CRS, we need
1631 	     * to decide when it's appropriate to try to configure the
1632 	     * device.  Ignore the return value here; it's OK for the
1633 	     * device not to have any resources.
1634 	     */
1635 	    acpi_parse_resources(child, handle, &acpi_res_parse_set, NULL);
1636 	    break;
1637 	}
1638     }
1639 
1640     return_ACPI_STATUS (AE_OK);
1641 }
1642 
1643 /*
1644  * AcpiAttachData() requires an object handler but never uses it.  This is a
1645  * placeholder object handler so we can store a device_t in an ACPI_HANDLE.
1646  */
1647 void
1648 acpi_fake_objhandler(ACPI_HANDLE h, UINT32 fn, void *data)
1649 {
1650 }
1651 
1652 static void
1653 acpi_shutdown_final(void *arg, int howto)
1654 {
1655     struct acpi_softc *sc;
1656     ACPI_STATUS status;
1657 
1658     /*
1659      * XXX Shutdown code should only run on the BSP (cpuid 0).
1660      * Some chipsets do not power off the system correctly if called from
1661      * an AP.
1662      */
1663     sc = arg;
1664     if ((howto & RB_POWEROFF) != 0) {
1665 	status = AcpiEnterSleepStatePrep(ACPI_STATE_S5);
1666 	if (ACPI_FAILURE(status)) {
1667 	    printf("AcpiEnterSleepStatePrep failed - %s\n",
1668 		   AcpiFormatException(status));
1669 	    return;
1670 	}
1671 	printf("Powering system off using ACPI\n");
1672 	ACPI_DISABLE_IRQS();
1673 	status = AcpiEnterSleepState(ACPI_STATE_S5);
1674 	if (ACPI_FAILURE(status)) {
1675 	    printf("ACPI power-off failed - %s\n", AcpiFormatException(status));
1676 	} else {
1677 	    DELAY(1000000);
1678 	    printf("ACPI power-off failed - timeout\n");
1679 	}
1680     } else if ((howto & RB_HALT) == 0 &&
1681 	(AcpiGbl_FADT.Flags & ACPI_FADT_RESET_REGISTER) &&
1682 	sc->acpi_handle_reboot) {
1683 	/* Reboot using the reset register. */
1684 	status = AcpiHwLowLevelWrite(
1685 	    AcpiGbl_FADT.ResetRegister.BitWidth,
1686 	    AcpiGbl_FADT.ResetValue, &AcpiGbl_FADT.ResetRegister);
1687 	if (ACPI_FAILURE(status)) {
1688 	    printf("ACPI reset failed - %s\n", AcpiFormatException(status));
1689 	} else {
1690 	    DELAY(1000000);
1691 	    printf("ACPI reset failed - timeout\n");
1692 	}
1693     } else if (sc->acpi_do_disable && panicstr == NULL) {
1694 	/*
1695 	 * Only disable ACPI if the user requested.  On some systems, writing
1696 	 * the disable value to SMI_CMD hangs the system.
1697 	 */
1698 	printf("Shutting down ACPI\n");
1699 	AcpiTerminate();
1700     }
1701 }
1702 
1703 static void
1704 acpi_enable_fixed_events(struct acpi_softc *sc)
1705 {
1706     static int	first_time = 1;
1707 
1708     /* Enable and clear fixed events and install handlers. */
1709     if ((AcpiGbl_FADT.Flags & ACPI_FADT_POWER_BUTTON) == 0) {
1710 	AcpiClearEvent(ACPI_EVENT_POWER_BUTTON);
1711 	AcpiInstallFixedEventHandler(ACPI_EVENT_POWER_BUTTON,
1712 				     acpi_event_power_button_sleep, sc);
1713 	if (first_time)
1714 	    device_printf(sc->acpi_dev, "Power Button (fixed)\n");
1715     }
1716     if ((AcpiGbl_FADT.Flags & ACPI_FADT_SLEEP_BUTTON) == 0) {
1717 	AcpiClearEvent(ACPI_EVENT_SLEEP_BUTTON);
1718 	AcpiInstallFixedEventHandler(ACPI_EVENT_SLEEP_BUTTON,
1719 				     acpi_event_sleep_button_sleep, sc);
1720 	if (first_time)
1721 	    device_printf(sc->acpi_dev, "Sleep Button (fixed)\n");
1722     }
1723 
1724     first_time = 0;
1725 }
1726 
1727 /*
1728  * Returns true if the device is actually present and should
1729  * be attached to.  This requires the present, enabled, UI-visible
1730  * and diagnostics-passed bits to be set.
1731  */
1732 BOOLEAN
1733 acpi_DeviceIsPresent(device_t dev)
1734 {
1735     ACPI_DEVICE_INFO	*devinfo;
1736     ACPI_HANDLE		h;
1737     ACPI_BUFFER		buf;
1738     ACPI_STATUS		error;
1739     int			ret;
1740 
1741     ret = FALSE;
1742     if ((h = acpi_get_handle(dev)) == NULL)
1743 	return (FALSE);
1744     buf.Pointer = NULL;
1745     buf.Length = ACPI_ALLOCATE_BUFFER;
1746     error = AcpiGetObjectInfo(h, &buf);
1747     if (ACPI_FAILURE(error))
1748 	return (FALSE);
1749     devinfo = (ACPI_DEVICE_INFO *)buf.Pointer;
1750 
1751     /* If no _STA method, must be present */
1752     if ((devinfo->Valid & ACPI_VALID_STA) == 0)
1753 	ret = TRUE;
1754 
1755     /* Return true for 'present' and 'functioning' */
1756     if (ACPI_DEVICE_PRESENT(devinfo->CurrentStatus))
1757 	ret = TRUE;
1758 
1759     AcpiOsFree(buf.Pointer);
1760     return (ret);
1761 }
1762 
1763 /*
1764  * Returns true if the battery is actually present and inserted.
1765  */
1766 BOOLEAN
1767 acpi_BatteryIsPresent(device_t dev)
1768 {
1769     ACPI_DEVICE_INFO	*devinfo;
1770     ACPI_HANDLE		h;
1771     ACPI_BUFFER		buf;
1772     ACPI_STATUS		error;
1773     int			ret;
1774 
1775     ret = FALSE;
1776     if ((h = acpi_get_handle(dev)) == NULL)
1777 	return (FALSE);
1778     buf.Pointer = NULL;
1779     buf.Length = ACPI_ALLOCATE_BUFFER;
1780     error = AcpiGetObjectInfo(h, &buf);
1781     if (ACPI_FAILURE(error))
1782 	return (FALSE);
1783     devinfo = (ACPI_DEVICE_INFO *)buf.Pointer;
1784 
1785     /* If no _STA method, must be present */
1786     if ((devinfo->Valid & ACPI_VALID_STA) == 0)
1787 	ret = TRUE;
1788 
1789     /* Return true for 'present', 'battery present', and 'functioning' */
1790     if (ACPI_BATTERY_PRESENT(devinfo->CurrentStatus))
1791 	ret = TRUE;
1792 
1793     AcpiOsFree(buf.Pointer);
1794     return (ret);
1795 }
1796 
1797 /*
1798  * Match a HID string against a handle
1799  */
1800 static BOOLEAN
1801 acpi_MatchHid(ACPI_HANDLE h, const char *hid)
1802 {
1803     ACPI_DEVICE_INFO	*devinfo;
1804     ACPI_BUFFER		buf;
1805     ACPI_STATUS		error;
1806     int			ret, i;
1807 
1808     ret = FALSE;
1809     if (hid == NULL || h == NULL)
1810 	return (ret);
1811     buf.Pointer = NULL;
1812     buf.Length = ACPI_ALLOCATE_BUFFER;
1813     error = AcpiGetObjectInfo(h, &buf);
1814     if (ACPI_FAILURE(error))
1815 	return (ret);
1816     devinfo = (ACPI_DEVICE_INFO *)buf.Pointer;
1817 
1818     if ((devinfo->Valid & ACPI_VALID_HID) != 0 &&
1819 	strcmp(hid, devinfo->HardwareId.Value) == 0)
1820 	    ret = TRUE;
1821     else if ((devinfo->Valid & ACPI_VALID_CID) != 0) {
1822 	for (i = 0; i < devinfo->CompatibilityId.Count; i++) {
1823 	    if (strcmp(hid, devinfo->CompatibilityId.Id[i].Value) == 0) {
1824 		ret = TRUE;
1825 		break;
1826 	    }
1827 	}
1828     }
1829 
1830     AcpiOsFree(buf.Pointer);
1831     return (ret);
1832 }
1833 
1834 /*
1835  * Return the handle of a named object within our scope, ie. that of (parent)
1836  * or one if its parents.
1837  */
1838 ACPI_STATUS
1839 acpi_GetHandleInScope(ACPI_HANDLE parent, char *path, ACPI_HANDLE *result)
1840 {
1841     ACPI_HANDLE		r;
1842     ACPI_STATUS		status;
1843 
1844     /* Walk back up the tree to the root */
1845     for (;;) {
1846 	status = AcpiGetHandle(parent, path, &r);
1847 	if (ACPI_SUCCESS(status)) {
1848 	    *result = r;
1849 	    return (AE_OK);
1850 	}
1851 	/* XXX Return error here? */
1852 	if (status != AE_NOT_FOUND)
1853 	    return (AE_OK);
1854 	if (ACPI_FAILURE(AcpiGetParent(parent, &r)))
1855 	    return (AE_NOT_FOUND);
1856 	parent = r;
1857     }
1858 }
1859 
1860 /* Find the difference between two PM tick counts. */
1861 uint32_t
1862 acpi_TimerDelta(uint32_t end, uint32_t start)
1863 {
1864     uint32_t delta;
1865 
1866     if (end >= start)
1867 	delta = end - start;
1868     else if (AcpiGbl_FADT.Flags & ACPI_FADT_32BIT_TIMER)
1869 	delta = ((0xFFFFFFFF - start) + end + 1);
1870     else
1871 	delta = ((0x00FFFFFF - start) + end + 1) & 0x00FFFFFF;
1872     return (delta);
1873 }
1874 
1875 /*
1876  * Allocate a buffer with a preset data size.
1877  */
1878 ACPI_BUFFER *
1879 acpi_AllocBuffer(int size)
1880 {
1881     ACPI_BUFFER	*buf;
1882 
1883     if ((buf = malloc(size + sizeof(*buf), M_ACPIDEV, M_NOWAIT)) == NULL)
1884 	return (NULL);
1885     buf->Length = size;
1886     buf->Pointer = (void *)(buf + 1);
1887     return (buf);
1888 }
1889 
1890 ACPI_STATUS
1891 acpi_SetInteger(ACPI_HANDLE handle, char *path, UINT32 number)
1892 {
1893     ACPI_OBJECT arg1;
1894     ACPI_OBJECT_LIST args;
1895 
1896     arg1.Type = ACPI_TYPE_INTEGER;
1897     arg1.Integer.Value = number;
1898     args.Count = 1;
1899     args.Pointer = &arg1;
1900 
1901     return (AcpiEvaluateObject(handle, path, &args, NULL));
1902 }
1903 
1904 /*
1905  * Evaluate a path that should return an integer.
1906  */
1907 ACPI_STATUS
1908 acpi_GetInteger(ACPI_HANDLE handle, char *path, UINT32 *number)
1909 {
1910     ACPI_STATUS	status;
1911     ACPI_BUFFER	buf;
1912     ACPI_OBJECT	param;
1913 
1914     if (handle == NULL)
1915 	handle = ACPI_ROOT_OBJECT;
1916 
1917     /*
1918      * Assume that what we've been pointed at is an Integer object, or
1919      * a method that will return an Integer.
1920      */
1921     buf.Pointer = &param;
1922     buf.Length = sizeof(param);
1923     status = AcpiEvaluateObject(handle, path, NULL, &buf);
1924     if (ACPI_SUCCESS(status)) {
1925 	if (param.Type == ACPI_TYPE_INTEGER)
1926 	    *number = param.Integer.Value;
1927 	else
1928 	    status = AE_TYPE;
1929     }
1930 
1931     /*
1932      * In some applications, a method that's expected to return an Integer
1933      * may instead return a Buffer (probably to simplify some internal
1934      * arithmetic).  We'll try to fetch whatever it is, and if it's a Buffer,
1935      * convert it into an Integer as best we can.
1936      *
1937      * This is a hack.
1938      */
1939     if (status == AE_BUFFER_OVERFLOW) {
1940 	if ((buf.Pointer = AcpiOsAllocate(buf.Length)) == NULL) {
1941 	    status = AE_NO_MEMORY;
1942 	} else {
1943 	    status = AcpiEvaluateObject(handle, path, NULL, &buf);
1944 	    if (ACPI_SUCCESS(status))
1945 		status = acpi_ConvertBufferToInteger(&buf, number);
1946 	    AcpiOsFree(buf.Pointer);
1947 	}
1948     }
1949     return (status);
1950 }
1951 
1952 ACPI_STATUS
1953 acpi_ConvertBufferToInteger(ACPI_BUFFER *bufp, UINT32 *number)
1954 {
1955     ACPI_OBJECT	*p;
1956     UINT8	*val;
1957     int		i;
1958 
1959     p = (ACPI_OBJECT *)bufp->Pointer;
1960     if (p->Type == ACPI_TYPE_INTEGER) {
1961 	*number = p->Integer.Value;
1962 	return (AE_OK);
1963     }
1964     if (p->Type != ACPI_TYPE_BUFFER)
1965 	return (AE_TYPE);
1966     if (p->Buffer.Length > sizeof(int))
1967 	return (AE_BAD_DATA);
1968 
1969     *number = 0;
1970     val = p->Buffer.Pointer;
1971     for (i = 0; i < p->Buffer.Length; i++)
1972 	*number += val[i] << (i * 8);
1973     return (AE_OK);
1974 }
1975 
1976 /*
1977  * Iterate over the elements of an a package object, calling the supplied
1978  * function for each element.
1979  *
1980  * XXX possible enhancement might be to abort traversal on error.
1981  */
1982 ACPI_STATUS
1983 acpi_ForeachPackageObject(ACPI_OBJECT *pkg,
1984 	void (*func)(ACPI_OBJECT *comp, void *arg), void *arg)
1985 {
1986     ACPI_OBJECT	*comp;
1987     int		i;
1988 
1989     if (pkg == NULL || pkg->Type != ACPI_TYPE_PACKAGE)
1990 	return (AE_BAD_PARAMETER);
1991 
1992     /* Iterate over components */
1993     i = 0;
1994     comp = pkg->Package.Elements;
1995     for (; i < pkg->Package.Count; i++, comp++)
1996 	func(comp, arg);
1997 
1998     return (AE_OK);
1999 }
2000 
2001 /*
2002  * Find the (index)th resource object in a set.
2003  */
2004 ACPI_STATUS
2005 acpi_FindIndexedResource(ACPI_BUFFER *buf, int index, ACPI_RESOURCE **resp)
2006 {
2007     ACPI_RESOURCE	*rp;
2008     int			i;
2009 
2010     rp = (ACPI_RESOURCE *)buf->Pointer;
2011     i = index;
2012     while (i-- > 0) {
2013 	/* Range check */
2014 	if (rp > (ACPI_RESOURCE *)((u_int8_t *)buf->Pointer + buf->Length))
2015 	    return (AE_BAD_PARAMETER);
2016 
2017 	/* Check for terminator */
2018 	if (rp->Type == ACPI_RESOURCE_TYPE_END_TAG || rp->Length == 0)
2019 	    return (AE_NOT_FOUND);
2020 	rp = ACPI_NEXT_RESOURCE(rp);
2021     }
2022     if (resp != NULL)
2023 	*resp = rp;
2024 
2025     return (AE_OK);
2026 }
2027 
2028 /*
2029  * Append an ACPI_RESOURCE to an ACPI_BUFFER.
2030  *
2031  * Given a pointer to an ACPI_RESOURCE structure, expand the ACPI_BUFFER
2032  * provided to contain it.  If the ACPI_BUFFER is empty, allocate a sensible
2033  * backing block.  If the ACPI_RESOURCE is NULL, return an empty set of
2034  * resources.
2035  */
2036 #define ACPI_INITIAL_RESOURCE_BUFFER_SIZE	512
2037 
2038 ACPI_STATUS
2039 acpi_AppendBufferResource(ACPI_BUFFER *buf, ACPI_RESOURCE *res)
2040 {
2041     ACPI_RESOURCE	*rp;
2042     void		*newp;
2043 
2044     /* Initialise the buffer if necessary. */
2045     if (buf->Pointer == NULL) {
2046 	buf->Length = ACPI_INITIAL_RESOURCE_BUFFER_SIZE;
2047 	if ((buf->Pointer = AcpiOsAllocate(buf->Length)) == NULL)
2048 	    return (AE_NO_MEMORY);
2049 	rp = (ACPI_RESOURCE *)buf->Pointer;
2050 	rp->Type = ACPI_RESOURCE_TYPE_END_TAG;
2051 	rp->Length = 0;
2052     }
2053     if (res == NULL)
2054 	return (AE_OK);
2055 
2056     /*
2057      * Scan the current buffer looking for the terminator.
2058      * This will either find the terminator or hit the end
2059      * of the buffer and return an error.
2060      */
2061     rp = (ACPI_RESOURCE *)buf->Pointer;
2062     for (;;) {
2063 	/* Range check, don't go outside the buffer */
2064 	if (rp >= (ACPI_RESOURCE *)((u_int8_t *)buf->Pointer + buf->Length))
2065 	    return (AE_BAD_PARAMETER);
2066 	if (rp->Type == ACPI_RESOURCE_TYPE_END_TAG || rp->Length == 0)
2067 	    break;
2068 	rp = ACPI_NEXT_RESOURCE(rp);
2069     }
2070 
2071     /*
2072      * Check the size of the buffer and expand if required.
2073      *
2074      * Required size is:
2075      *	size of existing resources before terminator +
2076      *	size of new resource and header +
2077      * 	size of terminator.
2078      *
2079      * Note that this loop should really only run once, unless
2080      * for some reason we are stuffing a *really* huge resource.
2081      */
2082     while ((((u_int8_t *)rp - (u_int8_t *)buf->Pointer) +
2083 	    res->Length + ACPI_RS_SIZE_NO_DATA +
2084 	    ACPI_RS_SIZE_MIN) >= buf->Length) {
2085 	if ((newp = AcpiOsAllocate(buf->Length * 2)) == NULL)
2086 	    return (AE_NO_MEMORY);
2087 	bcopy(buf->Pointer, newp, buf->Length);
2088 	rp = (ACPI_RESOURCE *)((u_int8_t *)newp +
2089 			       ((u_int8_t *)rp - (u_int8_t *)buf->Pointer));
2090 	AcpiOsFree(buf->Pointer);
2091 	buf->Pointer = newp;
2092 	buf->Length += buf->Length;
2093     }
2094 
2095     /* Insert the new resource. */
2096     bcopy(res, rp, res->Length + ACPI_RS_SIZE_NO_DATA);
2097 
2098     /* And add the terminator. */
2099     rp = ACPI_NEXT_RESOURCE(rp);
2100     rp->Type = ACPI_RESOURCE_TYPE_END_TAG;
2101     rp->Length = 0;
2102 
2103     return (AE_OK);
2104 }
2105 
2106 /*
2107  * Set interrupt model.
2108  */
2109 ACPI_STATUS
2110 acpi_SetIntrModel(int model)
2111 {
2112 
2113     return (acpi_SetInteger(ACPI_ROOT_OBJECT, "_PIC", model));
2114 }
2115 
2116 static void
2117 acpi_sleep_enable(void *arg)
2118 {
2119 
2120     ((struct acpi_softc *)arg)->acpi_sleep_disabled = 0;
2121 }
2122 
2123 enum acpi_sleep_state {
2124     ACPI_SS_NONE,
2125     ACPI_SS_GPE_SET,
2126     ACPI_SS_DEV_SUSPEND,
2127     ACPI_SS_SLP_PREP,
2128     ACPI_SS_SLEPT,
2129 };
2130 
2131 /*
2132  * Set the system sleep state
2133  *
2134  * Currently we support S1-S5 but S4 is only S4BIOS
2135  */
2136 ACPI_STATUS
2137 acpi_SetSleepState(struct acpi_softc *sc, int state)
2138 {
2139     ACPI_STATUS	status;
2140     UINT8	TypeA;
2141     UINT8	TypeB;
2142     enum acpi_sleep_state slp_state;
2143 
2144     ACPI_FUNCTION_TRACE_U32((char *)(uintptr_t)__func__, state);
2145 
2146     status = AE_OK;
2147     ACPI_LOCK(acpi);
2148     if (sc->acpi_sleep_disabled) {
2149 	if (sc->acpi_sstate != ACPI_STATE_S0)
2150 	    status = AE_ERROR;
2151 	ACPI_UNLOCK(acpi);
2152 	printf("acpi: suspend request ignored (not ready yet)\n");
2153 	return (status);
2154     }
2155     sc->acpi_sleep_disabled = 1;
2156     ACPI_UNLOCK(acpi);
2157 
2158     /*
2159      * Be sure to hold Giant across DEVICE_SUSPEND/RESUME since non-MPSAFE
2160      * drivers need this.
2161      */
2162     mtx_lock(&Giant);
2163     slp_state = ACPI_SS_NONE;
2164     switch (state) {
2165     case ACPI_STATE_S1:
2166     case ACPI_STATE_S2:
2167     case ACPI_STATE_S3:
2168     case ACPI_STATE_S4:
2169 	status = AcpiGetSleepTypeData(state, &TypeA, &TypeB);
2170 	if (status == AE_NOT_FOUND) {
2171 	    device_printf(sc->acpi_dev,
2172 			  "Sleep state S%d not supported by BIOS\n", state);
2173 	    break;
2174 	} else if (ACPI_FAILURE(status)) {
2175 	    device_printf(sc->acpi_dev, "AcpiGetSleepTypeData failed - %s\n",
2176 			  AcpiFormatException(status));
2177 	    break;
2178 	}
2179 
2180 	sc->acpi_sstate = state;
2181 
2182 	/* Enable any GPEs as appropriate and requested by the user. */
2183 	acpi_wake_prep_walk(state);
2184 	slp_state = ACPI_SS_GPE_SET;
2185 
2186 	/*
2187 	 * Inform all devices that we are going to sleep.  If at least one
2188 	 * device fails, DEVICE_SUSPEND() automatically resumes the tree.
2189 	 *
2190 	 * XXX Note that a better two-pass approach with a 'veto' pass
2191 	 * followed by a "real thing" pass would be better, but the current
2192 	 * bus interface does not provide for this.
2193 	 */
2194 	if (DEVICE_SUSPEND(root_bus) != 0) {
2195 	    device_printf(sc->acpi_dev, "device_suspend failed\n");
2196 	    break;
2197 	}
2198 	slp_state = ACPI_SS_DEV_SUSPEND;
2199 
2200 	status = AcpiEnterSleepStatePrep(state);
2201 	if (ACPI_FAILURE(status)) {
2202 	    device_printf(sc->acpi_dev, "AcpiEnterSleepStatePrep failed - %s\n",
2203 			  AcpiFormatException(status));
2204 	    break;
2205 	}
2206 	slp_state = ACPI_SS_SLP_PREP;
2207 
2208 	if (sc->acpi_sleep_delay > 0)
2209 	    DELAY(sc->acpi_sleep_delay * 1000000);
2210 
2211 	if (state != ACPI_STATE_S1) {
2212 	    acpi_sleep_machdep(sc, state);
2213 
2214 	    /* Re-enable ACPI hardware on wakeup from sleep state 4. */
2215 	    if (state == ACPI_STATE_S4)
2216 		AcpiEnable();
2217 	} else {
2218 	    ACPI_DISABLE_IRQS();
2219 	    status = AcpiEnterSleepState(state);
2220 	    if (ACPI_FAILURE(status)) {
2221 		device_printf(sc->acpi_dev, "AcpiEnterSleepState failed - %s\n",
2222 			      AcpiFormatException(status));
2223 		break;
2224 	    }
2225 	}
2226 	slp_state = ACPI_SS_SLEPT;
2227 	break;
2228     case ACPI_STATE_S5:
2229 	/*
2230 	 * Shut down cleanly and power off.  This will call us back through the
2231 	 * shutdown handlers.
2232 	 */
2233 	shutdown_nice(RB_POWEROFF);
2234 	break;
2235     case ACPI_STATE_S0:
2236     default:
2237 	status = AE_BAD_PARAMETER;
2238 	break;
2239     }
2240 
2241     /*
2242      * Back out state according to how far along we got in the suspend
2243      * process.  This handles both the error and success cases.
2244      */
2245     if (slp_state >= ACPI_SS_GPE_SET) {
2246 	acpi_wake_prep_walk(state);
2247 	sc->acpi_sstate = ACPI_STATE_S0;
2248     }
2249     if (slp_state >= ACPI_SS_SLP_PREP)
2250 	AcpiLeaveSleepState(state);
2251     if (slp_state >= ACPI_SS_DEV_SUSPEND)
2252 	DEVICE_RESUME(root_bus);
2253     if (slp_state >= ACPI_SS_SLEPT)
2254 	acpi_enable_fixed_events(sc);
2255 
2256     /* Allow another sleep request after a while. */
2257     if (state != ACPI_STATE_S5)
2258 	timeout(acpi_sleep_enable, (caddr_t)sc, hz * ACPI_MINIMUM_AWAKETIME);
2259 
2260     mtx_unlock(&Giant);
2261     return_ACPI_STATUS (status);
2262 }
2263 
2264 /* Initialize a device's wake GPE. */
2265 int
2266 acpi_wake_init(device_t dev, int type)
2267 {
2268     struct acpi_prw_data prw;
2269 
2270     /* Evaluate _PRW to find the GPE. */
2271     if (acpi_parse_prw(acpi_get_handle(dev), &prw) != 0)
2272 	return (ENXIO);
2273 
2274     /* Set the requested type for the GPE (runtime, wake, or both). */
2275     if (ACPI_FAILURE(AcpiSetGpeType(prw.gpe_handle, prw.gpe_bit, type))) {
2276 	device_printf(dev, "set GPE type failed\n");
2277 	return (ENXIO);
2278     }
2279 
2280     return (0);
2281 }
2282 
2283 /* Enable or disable the device's wake GPE. */
2284 int
2285 acpi_wake_set_enable(device_t dev, int enable)
2286 {
2287     struct acpi_prw_data prw;
2288     ACPI_STATUS status;
2289     int flags;
2290 
2291     /* Make sure the device supports waking the system and get the GPE. */
2292     if (acpi_parse_prw(acpi_get_handle(dev), &prw) != 0)
2293 	return (ENXIO);
2294 
2295     flags = acpi_get_flags(dev);
2296     if (enable) {
2297 	status = AcpiEnableGpe(prw.gpe_handle, prw.gpe_bit, ACPI_NOT_ISR);
2298 	if (ACPI_FAILURE(status)) {
2299 	    device_printf(dev, "enable wake failed\n");
2300 	    return (ENXIO);
2301 	}
2302 	acpi_set_flags(dev, flags | ACPI_FLAG_WAKE_ENABLED);
2303     } else {
2304 	status = AcpiDisableGpe(prw.gpe_handle, prw.gpe_bit, ACPI_NOT_ISR);
2305 	if (ACPI_FAILURE(status)) {
2306 	    device_printf(dev, "disable wake failed\n");
2307 	    return (ENXIO);
2308 	}
2309 	acpi_set_flags(dev, flags & ~ACPI_FLAG_WAKE_ENABLED);
2310     }
2311 
2312     return (0);
2313 }
2314 
2315 static int
2316 acpi_wake_sleep_prep(ACPI_HANDLE handle, int sstate)
2317 {
2318     struct acpi_prw_data prw;
2319     device_t dev;
2320 
2321     /* Check that this is a wake-capable device and get its GPE. */
2322     if (acpi_parse_prw(handle, &prw) != 0)
2323 	return (ENXIO);
2324     dev = acpi_get_device(handle);
2325 
2326     /*
2327      * The destination sleep state must be less than (i.e., higher power)
2328      * or equal to the value specified by _PRW.  If this GPE cannot be
2329      * enabled for the next sleep state, then disable it.  If it can and
2330      * the user requested it be enabled, turn on any required power resources
2331      * and set _PSW.
2332      */
2333     if (sstate > prw.lowest_wake) {
2334 	AcpiDisableGpe(prw.gpe_handle, prw.gpe_bit, ACPI_NOT_ISR);
2335 	if (bootverbose)
2336 	    device_printf(dev, "wake_prep disabled wake for %s (S%d)\n",
2337 		acpi_name(handle), sstate);
2338     } else if (dev && (acpi_get_flags(dev) & ACPI_FLAG_WAKE_ENABLED) != 0) {
2339 	acpi_pwr_wake_enable(handle, 1);
2340 	acpi_SetInteger(handle, "_PSW", 1);
2341 	if (bootverbose)
2342 	    device_printf(dev, "wake_prep enabled for %s (S%d)\n",
2343 		acpi_name(handle), sstate);
2344     }
2345 
2346     return (0);
2347 }
2348 
2349 static int
2350 acpi_wake_run_prep(ACPI_HANDLE handle, int sstate)
2351 {
2352     struct acpi_prw_data prw;
2353     device_t dev;
2354 
2355     /*
2356      * Check that this is a wake-capable device and get its GPE.  Return
2357      * now if the user didn't enable this device for wake.
2358      */
2359     if (acpi_parse_prw(handle, &prw) != 0)
2360 	return (ENXIO);
2361     dev = acpi_get_device(handle);
2362     if (dev == NULL || (acpi_get_flags(dev) & ACPI_FLAG_WAKE_ENABLED) == 0)
2363 	return (0);
2364 
2365     /*
2366      * If this GPE couldn't be enabled for the previous sleep state, it was
2367      * disabled before going to sleep so re-enable it.  If it was enabled,
2368      * clear _PSW and turn off any power resources it used.
2369      */
2370     if (sstate > prw.lowest_wake) {
2371 	AcpiEnableGpe(prw.gpe_handle, prw.gpe_bit, ACPI_NOT_ISR);
2372 	if (bootverbose)
2373 	    device_printf(dev, "run_prep re-enabled %s\n", acpi_name(handle));
2374     } else {
2375 	acpi_SetInteger(handle, "_PSW", 0);
2376 	acpi_pwr_wake_enable(handle, 0);
2377 	if (bootverbose)
2378 	    device_printf(dev, "run_prep cleaned up for %s\n",
2379 		acpi_name(handle));
2380     }
2381 
2382     return (0);
2383 }
2384 
2385 static ACPI_STATUS
2386 acpi_wake_prep(ACPI_HANDLE handle, UINT32 level, void *context, void **status)
2387 {
2388     int sstate;
2389 
2390     /* If suspending, run the sleep prep function, otherwise wake. */
2391     sstate = *(int *)context;
2392     if (AcpiGbl_SystemAwakeAndRunning)
2393 	acpi_wake_sleep_prep(handle, sstate);
2394     else
2395 	acpi_wake_run_prep(handle, sstate);
2396     return (AE_OK);
2397 }
2398 
2399 /* Walk the tree rooted at acpi0 to prep devices for suspend/resume. */
2400 static int
2401 acpi_wake_prep_walk(int sstate)
2402 {
2403     ACPI_HANDLE sb_handle;
2404 
2405     if (ACPI_SUCCESS(AcpiGetHandle(ACPI_ROOT_OBJECT, "\\_SB_", &sb_handle)))
2406 	AcpiWalkNamespace(ACPI_TYPE_DEVICE, sb_handle, 100,
2407 	    acpi_wake_prep, &sstate, NULL);
2408     return (0);
2409 }
2410 
2411 /* Walk the tree rooted at acpi0 to attach per-device wake sysctls. */
2412 static int
2413 acpi_wake_sysctl_walk(device_t dev)
2414 {
2415     int error, i, numdevs;
2416     device_t *devlist;
2417     device_t child;
2418     ACPI_STATUS status;
2419 
2420     error = device_get_children(dev, &devlist, &numdevs);
2421     if (error != 0 || numdevs == 0) {
2422 	if (numdevs == 0)
2423 	    free(devlist, M_TEMP);
2424 	return (error);
2425     }
2426     for (i = 0; i < numdevs; i++) {
2427 	child = devlist[i];
2428 	acpi_wake_sysctl_walk(child);
2429 	if (!device_is_attached(child))
2430 	    continue;
2431 	status = AcpiEvaluateObject(acpi_get_handle(child), "_PRW", NULL, NULL);
2432 	if (ACPI_SUCCESS(status)) {
2433 	    SYSCTL_ADD_PROC(device_get_sysctl_ctx(child),
2434 		SYSCTL_CHILDREN(device_get_sysctl_tree(child)), OID_AUTO,
2435 		"wake", CTLTYPE_INT | CTLFLAG_RW, child, 0,
2436 		acpi_wake_set_sysctl, "I", "Device set to wake the system");
2437 	}
2438     }
2439     free(devlist, M_TEMP);
2440 
2441     return (0);
2442 }
2443 
2444 /* Enable or disable wake from userland. */
2445 static int
2446 acpi_wake_set_sysctl(SYSCTL_HANDLER_ARGS)
2447 {
2448     int enable, error;
2449     device_t dev;
2450 
2451     dev = (device_t)arg1;
2452     enable = (acpi_get_flags(dev) & ACPI_FLAG_WAKE_ENABLED) ? 1 : 0;
2453 
2454     error = sysctl_handle_int(oidp, &enable, 0, req);
2455     if (error != 0 || req->newptr == NULL)
2456 	return (error);
2457     if (enable != 0 && enable != 1)
2458 	return (EINVAL);
2459 
2460     return (acpi_wake_set_enable(dev, enable));
2461 }
2462 
2463 /* Parse a device's _PRW into a structure. */
2464 int
2465 acpi_parse_prw(ACPI_HANDLE h, struct acpi_prw_data *prw)
2466 {
2467     ACPI_STATUS			status;
2468     ACPI_BUFFER			prw_buffer;
2469     ACPI_OBJECT			*res, *res2;
2470     int				error, i, power_count;
2471 
2472     if (h == NULL || prw == NULL)
2473 	return (EINVAL);
2474 
2475     /*
2476      * The _PRW object (7.2.9) is only required for devices that have the
2477      * ability to wake the system from a sleeping state.
2478      */
2479     error = EINVAL;
2480     prw_buffer.Pointer = NULL;
2481     prw_buffer.Length = ACPI_ALLOCATE_BUFFER;
2482     status = AcpiEvaluateObject(h, "_PRW", NULL, &prw_buffer);
2483     if (ACPI_FAILURE(status))
2484 	return (ENOENT);
2485     res = (ACPI_OBJECT *)prw_buffer.Pointer;
2486     if (res == NULL)
2487 	return (ENOENT);
2488     if (!ACPI_PKG_VALID(res, 2))
2489 	goto out;
2490 
2491     /*
2492      * Element 1 of the _PRW object:
2493      * The lowest power system sleeping state that can be entered while still
2494      * providing wake functionality.  The sleeping state being entered must
2495      * be less than (i.e., higher power) or equal to this value.
2496      */
2497     if (acpi_PkgInt32(res, 1, &prw->lowest_wake) != 0)
2498 	goto out;
2499 
2500     /*
2501      * Element 0 of the _PRW object:
2502      */
2503     switch (res->Package.Elements[0].Type) {
2504     case ACPI_TYPE_INTEGER:
2505 	/*
2506 	 * If the data type of this package element is numeric, then this
2507 	 * _PRW package element is the bit index in the GPEx_EN, in the
2508 	 * GPE blocks described in the FADT, of the enable bit that is
2509 	 * enabled for the wake event.
2510 	 */
2511 	prw->gpe_handle = NULL;
2512 	prw->gpe_bit = res->Package.Elements[0].Integer.Value;
2513 	error = 0;
2514 	break;
2515     case ACPI_TYPE_PACKAGE:
2516 	/*
2517 	 * If the data type of this package element is a package, then this
2518 	 * _PRW package element is itself a package containing two
2519 	 * elements.  The first is an object reference to the GPE Block
2520 	 * device that contains the GPE that will be triggered by the wake
2521 	 * event.  The second element is numeric and it contains the bit
2522 	 * index in the GPEx_EN, in the GPE Block referenced by the
2523 	 * first element in the package, of the enable bit that is enabled for
2524 	 * the wake event.
2525 	 *
2526 	 * For example, if this field is a package then it is of the form:
2527 	 * Package() {\_SB.PCI0.ISA.GPE, 2}
2528 	 */
2529 	res2 = &res->Package.Elements[0];
2530 	if (!ACPI_PKG_VALID(res2, 2))
2531 	    goto out;
2532 	prw->gpe_handle = acpi_GetReference(NULL, &res2->Package.Elements[0]);
2533 	if (prw->gpe_handle == NULL)
2534 	    goto out;
2535 	if (acpi_PkgInt32(res2, 1, &prw->gpe_bit) != 0)
2536 	    goto out;
2537 	error = 0;
2538 	break;
2539     default:
2540 	goto out;
2541     }
2542 
2543     /* Elements 2 to N of the _PRW object are power resources. */
2544     power_count = res->Package.Count - 2;
2545     if (power_count > ACPI_PRW_MAX_POWERRES) {
2546 	printf("ACPI device %s has too many power resources\n", acpi_name(h));
2547 	power_count = 0;
2548     }
2549     prw->power_res_count = power_count;
2550     for (i = 0; i < power_count; i++)
2551 	prw->power_res[i] = res->Package.Elements[i];
2552 
2553 out:
2554     if (prw_buffer.Pointer != NULL)
2555 	AcpiOsFree(prw_buffer.Pointer);
2556     return (error);
2557 }
2558 
2559 /*
2560  * ACPI Event Handlers
2561  */
2562 
2563 /* System Event Handlers (registered by EVENTHANDLER_REGISTER) */
2564 
2565 static void
2566 acpi_system_eventhandler_sleep(void *arg, int state)
2567 {
2568 
2569     ACPI_FUNCTION_TRACE_U32((char *)(uintptr_t)__func__, state);
2570 
2571     if (state >= ACPI_STATE_S0 && state <= ACPI_S_STATES_MAX)
2572 	acpi_SetSleepState((struct acpi_softc *)arg, state);
2573 
2574     return_VOID;
2575 }
2576 
2577 static void
2578 acpi_system_eventhandler_wakeup(void *arg, int state)
2579 {
2580 
2581     ACPI_FUNCTION_TRACE_U32((char *)(uintptr_t)__func__, state);
2582 
2583     /* Currently, nothing to do for wakeup. */
2584 
2585     return_VOID;
2586 }
2587 
2588 /*
2589  * ACPICA Event Handlers (FixedEvent, also called from button notify handler)
2590  */
2591 UINT32
2592 acpi_event_power_button_sleep(void *context)
2593 {
2594     struct acpi_softc	*sc = (struct acpi_softc *)context;
2595 
2596     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
2597 
2598     EVENTHANDLER_INVOKE(acpi_sleep_event, sc->acpi_power_button_sx);
2599 
2600     return_VALUE (ACPI_INTERRUPT_HANDLED);
2601 }
2602 
2603 UINT32
2604 acpi_event_power_button_wake(void *context)
2605 {
2606     struct acpi_softc	*sc = (struct acpi_softc *)context;
2607 
2608     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
2609 
2610     EVENTHANDLER_INVOKE(acpi_wakeup_event, sc->acpi_power_button_sx);
2611 
2612     return_VALUE (ACPI_INTERRUPT_HANDLED);
2613 }
2614 
2615 UINT32
2616 acpi_event_sleep_button_sleep(void *context)
2617 {
2618     struct acpi_softc	*sc = (struct acpi_softc *)context;
2619 
2620     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
2621 
2622     EVENTHANDLER_INVOKE(acpi_sleep_event, sc->acpi_sleep_button_sx);
2623 
2624     return_VALUE (ACPI_INTERRUPT_HANDLED);
2625 }
2626 
2627 UINT32
2628 acpi_event_sleep_button_wake(void *context)
2629 {
2630     struct acpi_softc	*sc = (struct acpi_softc *)context;
2631 
2632     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
2633 
2634     EVENTHANDLER_INVOKE(acpi_wakeup_event, sc->acpi_sleep_button_sx);
2635 
2636     return_VALUE (ACPI_INTERRUPT_HANDLED);
2637 }
2638 
2639 /*
2640  * XXX This static buffer is suboptimal.  There is no locking so only
2641  * use this for single-threaded callers.
2642  */
2643 char *
2644 acpi_name(ACPI_HANDLE handle)
2645 {
2646     ACPI_BUFFER buf;
2647     static char data[256];
2648 
2649     buf.Length = sizeof(data);
2650     buf.Pointer = data;
2651 
2652     if (handle && ACPI_SUCCESS(AcpiGetName(handle, ACPI_FULL_PATHNAME, &buf)))
2653 	return (data);
2654     return ("(unknown)");
2655 }
2656 
2657 /*
2658  * Debugging/bug-avoidance.  Avoid trying to fetch info on various
2659  * parts of the namespace.
2660  */
2661 int
2662 acpi_avoid(ACPI_HANDLE handle)
2663 {
2664     char	*cp, *env, *np;
2665     int		len;
2666 
2667     np = acpi_name(handle);
2668     if (*np == '\\')
2669 	np++;
2670     if ((env = getenv("debug.acpi.avoid")) == NULL)
2671 	return (0);
2672 
2673     /* Scan the avoid list checking for a match */
2674     cp = env;
2675     for (;;) {
2676 	while (*cp != 0 && isspace(*cp))
2677 	    cp++;
2678 	if (*cp == 0)
2679 	    break;
2680 	len = 0;
2681 	while (cp[len] != 0 && !isspace(cp[len]))
2682 	    len++;
2683 	if (!strncmp(cp, np, len)) {
2684 	    freeenv(env);
2685 	    return(1);
2686 	}
2687 	cp += len;
2688     }
2689     freeenv(env);
2690 
2691     return (0);
2692 }
2693 
2694 /*
2695  * Debugging/bug-avoidance.  Disable ACPI subsystem components.
2696  */
2697 int
2698 acpi_disabled(char *subsys)
2699 {
2700     char	*cp, *env;
2701     int		len;
2702 
2703     if ((env = getenv("debug.acpi.disabled")) == NULL)
2704 	return (0);
2705     if (strcmp(env, "all") == 0) {
2706 	freeenv(env);
2707 	return (1);
2708     }
2709 
2710     /* Scan the disable list, checking for a match. */
2711     cp = env;
2712     for (;;) {
2713 	while (*cp != '\0' && isspace(*cp))
2714 	    cp++;
2715 	if (*cp == '\0')
2716 	    break;
2717 	len = 0;
2718 	while (cp[len] != '\0' && !isspace(cp[len]))
2719 	    len++;
2720 	if (strncmp(cp, subsys, len) == 0) {
2721 	    freeenv(env);
2722 	    return (1);
2723 	}
2724 	cp += len;
2725     }
2726     freeenv(env);
2727 
2728     return (0);
2729 }
2730 
2731 /*
2732  * Control interface.
2733  *
2734  * We multiplex ioctls for all participating ACPI devices here.  Individual
2735  * drivers wanting to be accessible via /dev/acpi should use the
2736  * register/deregister interface to make their handlers visible.
2737  */
2738 struct acpi_ioctl_hook
2739 {
2740     TAILQ_ENTRY(acpi_ioctl_hook) link;
2741     u_long			 cmd;
2742     acpi_ioctl_fn		 fn;
2743     void			 *arg;
2744 };
2745 
2746 static TAILQ_HEAD(,acpi_ioctl_hook)	acpi_ioctl_hooks;
2747 static int				acpi_ioctl_hooks_initted;
2748 
2749 int
2750 acpi_register_ioctl(u_long cmd, acpi_ioctl_fn fn, void *arg)
2751 {
2752     struct acpi_ioctl_hook	*hp;
2753 
2754     if ((hp = malloc(sizeof(*hp), M_ACPIDEV, M_NOWAIT)) == NULL)
2755 	return (ENOMEM);
2756     hp->cmd = cmd;
2757     hp->fn = fn;
2758     hp->arg = arg;
2759 
2760     ACPI_LOCK(acpi);
2761     if (acpi_ioctl_hooks_initted == 0) {
2762 	TAILQ_INIT(&acpi_ioctl_hooks);
2763 	acpi_ioctl_hooks_initted = 1;
2764     }
2765     TAILQ_INSERT_TAIL(&acpi_ioctl_hooks, hp, link);
2766     ACPI_UNLOCK(acpi);
2767 
2768     return (0);
2769 }
2770 
2771 void
2772 acpi_deregister_ioctl(u_long cmd, acpi_ioctl_fn fn)
2773 {
2774     struct acpi_ioctl_hook	*hp;
2775 
2776     ACPI_LOCK(acpi);
2777     TAILQ_FOREACH(hp, &acpi_ioctl_hooks, link)
2778 	if (hp->cmd == cmd && hp->fn == fn)
2779 	    break;
2780 
2781     if (hp != NULL) {
2782 	TAILQ_REMOVE(&acpi_ioctl_hooks, hp, link);
2783 	free(hp, M_ACPIDEV);
2784     }
2785     ACPI_UNLOCK(acpi);
2786 }
2787 
2788 static int
2789 acpiopen(struct cdev *dev, int flag, int fmt, d_thread_t *td)
2790 {
2791     return (0);
2792 }
2793 
2794 static int
2795 acpiclose(struct cdev *dev, int flag, int fmt, d_thread_t *td)
2796 {
2797     return (0);
2798 }
2799 
2800 static int
2801 acpiioctl(struct cdev *dev, u_long cmd, caddr_t addr, int flag, d_thread_t *td)
2802 {
2803     struct acpi_softc		*sc;
2804     struct acpi_ioctl_hook	*hp;
2805     int				error, state;
2806 
2807     error = 0;
2808     hp = NULL;
2809     sc = dev->si_drv1;
2810 
2811     /*
2812      * Scan the list of registered ioctls, looking for handlers.
2813      */
2814     ACPI_LOCK(acpi);
2815     if (acpi_ioctl_hooks_initted)
2816 	TAILQ_FOREACH(hp, &acpi_ioctl_hooks, link) {
2817 	    if (hp->cmd == cmd)
2818 		break;
2819 	}
2820     ACPI_UNLOCK(acpi);
2821     if (hp)
2822 	return (hp->fn(cmd, addr, hp->arg));
2823 
2824     /*
2825      * Core ioctls are not permitted for non-writable user.
2826      * Currently, other ioctls just fetch information.
2827      * Not changing system behavior.
2828      */
2829     if ((flag & FWRITE) == 0)
2830 	return (EPERM);
2831 
2832     /* Core system ioctls. */
2833     switch (cmd) {
2834     case ACPIIO_SETSLPSTATE:
2835 	error = EINVAL;
2836 	state = *(int *)addr;
2837 	if (state >= ACPI_STATE_S0 && state <= ACPI_S_STATES_MAX)
2838 	    if (ACPI_SUCCESS(acpi_SetSleepState(sc, state)))
2839 		error = 0;
2840 	break;
2841     default:
2842 	error = ENXIO;
2843 	break;
2844     }
2845 
2846     return (error);
2847 }
2848 
2849 static int
2850 acpi_supported_sleep_state_sysctl(SYSCTL_HANDLER_ARGS)
2851 {
2852     int error;
2853     struct sbuf sb;
2854     UINT8 state, TypeA, TypeB;
2855 
2856     sbuf_new(&sb, NULL, 32, SBUF_AUTOEXTEND);
2857     for (state = ACPI_STATE_S1; state < ACPI_S_STATES_MAX + 1; state++)
2858 	if (ACPI_SUCCESS(AcpiGetSleepTypeData(state, &TypeA, &TypeB)))
2859 	    sbuf_printf(&sb, "S%d ", state);
2860     sbuf_trim(&sb);
2861     sbuf_finish(&sb);
2862     error = sysctl_handle_string(oidp, sbuf_data(&sb), sbuf_len(&sb), req);
2863     sbuf_delete(&sb);
2864     return (error);
2865 }
2866 
2867 static int
2868 acpi_sleep_state_sysctl(SYSCTL_HANDLER_ARGS)
2869 {
2870     char sleep_state[10];
2871     int error;
2872     u_int new_state, old_state;
2873 
2874     old_state = *(u_int *)oidp->oid_arg1;
2875     if (old_state > ACPI_S_STATES_MAX + 1)
2876 	strlcpy(sleep_state, "unknown", sizeof(sleep_state));
2877     else
2878 	strlcpy(sleep_state, sleep_state_names[old_state], sizeof(sleep_state));
2879     error = sysctl_handle_string(oidp, sleep_state, sizeof(sleep_state), req);
2880     if (error == 0 && req->newptr != NULL) {
2881 	new_state = ACPI_STATE_S0;
2882 	for (; new_state <= ACPI_S_STATES_MAX + 1; new_state++)
2883 	    if (strcmp(sleep_state, sleep_state_names[new_state]) == 0)
2884 		break;
2885 	if (new_state <= ACPI_S_STATES_MAX + 1) {
2886 	    if (new_state != old_state)
2887 		*(u_int *)oidp->oid_arg1 = new_state;
2888 	} else
2889 	    error = EINVAL;
2890     }
2891 
2892     return (error);
2893 }
2894 
2895 /* Inform devctl(4) when we receive a Notify. */
2896 void
2897 acpi_UserNotify(const char *subsystem, ACPI_HANDLE h, uint8_t notify)
2898 {
2899     char		notify_buf[16];
2900     ACPI_BUFFER		handle_buf;
2901     ACPI_STATUS		status;
2902 
2903     if (subsystem == NULL)
2904 	return;
2905 
2906     handle_buf.Pointer = NULL;
2907     handle_buf.Length = ACPI_ALLOCATE_BUFFER;
2908     status = AcpiNsHandleToPathname(h, &handle_buf);
2909     if (ACPI_FAILURE(status))
2910 	return;
2911     snprintf(notify_buf, sizeof(notify_buf), "notify=0x%02x", notify);
2912     devctl_notify("ACPI", subsystem, handle_buf.Pointer, notify_buf);
2913     AcpiOsFree(handle_buf.Pointer);
2914 }
2915 
2916 #ifdef ACPI_DEBUG
2917 /*
2918  * Support for parsing debug options from the kernel environment.
2919  *
2920  * Bits may be set in the AcpiDbgLayer and AcpiDbgLevel debug registers
2921  * by specifying the names of the bits in the debug.acpi.layer and
2922  * debug.acpi.level environment variables.  Bits may be unset by
2923  * prefixing the bit name with !.
2924  */
2925 struct debugtag
2926 {
2927     char	*name;
2928     UINT32	value;
2929 };
2930 
2931 static struct debugtag	dbg_layer[] = {
2932     {"ACPI_UTILITIES",		ACPI_UTILITIES},
2933     {"ACPI_HARDWARE",		ACPI_HARDWARE},
2934     {"ACPI_EVENTS",		ACPI_EVENTS},
2935     {"ACPI_TABLES",		ACPI_TABLES},
2936     {"ACPI_NAMESPACE",		ACPI_NAMESPACE},
2937     {"ACPI_PARSER",		ACPI_PARSER},
2938     {"ACPI_DISPATCHER",		ACPI_DISPATCHER},
2939     {"ACPI_EXECUTER",		ACPI_EXECUTER},
2940     {"ACPI_RESOURCES",		ACPI_RESOURCES},
2941     {"ACPI_CA_DEBUGGER",	ACPI_CA_DEBUGGER},
2942     {"ACPI_OS_SERVICES",	ACPI_OS_SERVICES},
2943     {"ACPI_CA_DISASSEMBLER",	ACPI_CA_DISASSEMBLER},
2944     {"ACPI_ALL_COMPONENTS",	ACPI_ALL_COMPONENTS},
2945 
2946     {"ACPI_AC_ADAPTER",		ACPI_AC_ADAPTER},
2947     {"ACPI_BATTERY",		ACPI_BATTERY},
2948     {"ACPI_BUS",		ACPI_BUS},
2949     {"ACPI_BUTTON",		ACPI_BUTTON},
2950     {"ACPI_EC", 		ACPI_EC},
2951     {"ACPI_FAN",		ACPI_FAN},
2952     {"ACPI_POWERRES",		ACPI_POWERRES},
2953     {"ACPI_PROCESSOR",		ACPI_PROCESSOR},
2954     {"ACPI_THERMAL",		ACPI_THERMAL},
2955     {"ACPI_TIMER",		ACPI_TIMER},
2956     {"ACPI_ALL_DRIVERS",	ACPI_ALL_DRIVERS},
2957     {NULL, 0}
2958 };
2959 
2960 static struct debugtag dbg_level[] = {
2961     {"ACPI_LV_ERROR",		ACPI_LV_ERROR},
2962     {"ACPI_LV_WARN",		ACPI_LV_WARN},
2963     {"ACPI_LV_INIT",		ACPI_LV_INIT},
2964     {"ACPI_LV_DEBUG_OBJECT",	ACPI_LV_DEBUG_OBJECT},
2965     {"ACPI_LV_INFO",		ACPI_LV_INFO},
2966     {"ACPI_LV_ALL_EXCEPTIONS",	ACPI_LV_ALL_EXCEPTIONS},
2967 
2968     /* Trace verbosity level 1 [Standard Trace Level] */
2969     {"ACPI_LV_INIT_NAMES",	ACPI_LV_INIT_NAMES},
2970     {"ACPI_LV_PARSE",		ACPI_LV_PARSE},
2971     {"ACPI_LV_LOAD",		ACPI_LV_LOAD},
2972     {"ACPI_LV_DISPATCH",	ACPI_LV_DISPATCH},
2973     {"ACPI_LV_EXEC",		ACPI_LV_EXEC},
2974     {"ACPI_LV_NAMES",		ACPI_LV_NAMES},
2975     {"ACPI_LV_OPREGION",	ACPI_LV_OPREGION},
2976     {"ACPI_LV_BFIELD",		ACPI_LV_BFIELD},
2977     {"ACPI_LV_TABLES",		ACPI_LV_TABLES},
2978     {"ACPI_LV_VALUES",		ACPI_LV_VALUES},
2979     {"ACPI_LV_OBJECTS",		ACPI_LV_OBJECTS},
2980     {"ACPI_LV_RESOURCES",	ACPI_LV_RESOURCES},
2981     {"ACPI_LV_USER_REQUESTS",	ACPI_LV_USER_REQUESTS},
2982     {"ACPI_LV_PACKAGE",		ACPI_LV_PACKAGE},
2983     {"ACPI_LV_VERBOSITY1",	ACPI_LV_VERBOSITY1},
2984 
2985     /* Trace verbosity level 2 [Function tracing and memory allocation] */
2986     {"ACPI_LV_ALLOCATIONS",	ACPI_LV_ALLOCATIONS},
2987     {"ACPI_LV_FUNCTIONS",	ACPI_LV_FUNCTIONS},
2988     {"ACPI_LV_OPTIMIZATIONS",	ACPI_LV_OPTIMIZATIONS},
2989     {"ACPI_LV_VERBOSITY2",	ACPI_LV_VERBOSITY2},
2990     {"ACPI_LV_ALL",		ACPI_LV_ALL},
2991 
2992     /* Trace verbosity level 3 [Threading, I/O, and Interrupts] */
2993     {"ACPI_LV_MUTEX",		ACPI_LV_MUTEX},
2994     {"ACPI_LV_THREADS",		ACPI_LV_THREADS},
2995     {"ACPI_LV_IO",		ACPI_LV_IO},
2996     {"ACPI_LV_INTERRUPTS",	ACPI_LV_INTERRUPTS},
2997     {"ACPI_LV_VERBOSITY3",	ACPI_LV_VERBOSITY3},
2998 
2999     /* Exceptionally verbose output -- also used in the global "DebugLevel"  */
3000     {"ACPI_LV_AML_DISASSEMBLE",	ACPI_LV_AML_DISASSEMBLE},
3001     {"ACPI_LV_VERBOSE_INFO",	ACPI_LV_VERBOSE_INFO},
3002     {"ACPI_LV_FULL_TABLES",	ACPI_LV_FULL_TABLES},
3003     {"ACPI_LV_EVENTS",		ACPI_LV_EVENTS},
3004     {"ACPI_LV_VERBOSE",		ACPI_LV_VERBOSE},
3005     {NULL, 0}
3006 };
3007 
3008 static void
3009 acpi_parse_debug(char *cp, struct debugtag *tag, UINT32 *flag)
3010 {
3011     char	*ep;
3012     int		i, l;
3013     int		set;
3014 
3015     while (*cp) {
3016 	if (isspace(*cp)) {
3017 	    cp++;
3018 	    continue;
3019 	}
3020 	ep = cp;
3021 	while (*ep && !isspace(*ep))
3022 	    ep++;
3023 	if (*cp == '!') {
3024 	    set = 0;
3025 	    cp++;
3026 	    if (cp == ep)
3027 		continue;
3028 	} else {
3029 	    set = 1;
3030 	}
3031 	l = ep - cp;
3032 	for (i = 0; tag[i].name != NULL; i++) {
3033 	    if (!strncmp(cp, tag[i].name, l)) {
3034 		if (set)
3035 		    *flag |= tag[i].value;
3036 		else
3037 		    *flag &= ~tag[i].value;
3038 	    }
3039 	}
3040 	cp = ep;
3041     }
3042 }
3043 
3044 static void
3045 acpi_set_debugging(void *junk)
3046 {
3047     char	*layer, *level;
3048 
3049     if (cold) {
3050 	AcpiDbgLayer = 0;
3051 	AcpiDbgLevel = 0;
3052     }
3053 
3054     layer = getenv("debug.acpi.layer");
3055     level = getenv("debug.acpi.level");
3056     if (layer == NULL && level == NULL)
3057 	return;
3058 
3059     printf("ACPI set debug");
3060     if (layer != NULL) {
3061 	if (strcmp("NONE", layer) != 0)
3062 	    printf(" layer '%s'", layer);
3063 	acpi_parse_debug(layer, &dbg_layer[0], &AcpiDbgLayer);
3064 	freeenv(layer);
3065     }
3066     if (level != NULL) {
3067 	if (strcmp("NONE", level) != 0)
3068 	    printf(" level '%s'", level);
3069 	acpi_parse_debug(level, &dbg_level[0], &AcpiDbgLevel);
3070 	freeenv(level);
3071     }
3072     printf("\n");
3073 }
3074 
3075 SYSINIT(acpi_debugging, SI_SUB_TUNABLES, SI_ORDER_ANY, acpi_set_debugging,
3076 	NULL);
3077 
3078 static int
3079 acpi_debug_sysctl(SYSCTL_HANDLER_ARGS)
3080 {
3081     int		 error, *dbg;
3082     struct	 debugtag *tag;
3083     struct	 sbuf sb;
3084 
3085     if (sbuf_new(&sb, NULL, 128, SBUF_AUTOEXTEND) == NULL)
3086 	return (ENOMEM);
3087     if (strcmp(oidp->oid_arg1, "debug.acpi.layer") == 0) {
3088 	tag = &dbg_layer[0];
3089 	dbg = &AcpiDbgLayer;
3090     } else {
3091 	tag = &dbg_level[0];
3092 	dbg = &AcpiDbgLevel;
3093     }
3094 
3095     /* Get old values if this is a get request. */
3096     ACPI_SERIAL_BEGIN(acpi);
3097     if (*dbg == 0) {
3098 	sbuf_cpy(&sb, "NONE");
3099     } else if (req->newptr == NULL) {
3100 	for (; tag->name != NULL; tag++) {
3101 	    if ((*dbg & tag->value) == tag->value)
3102 		sbuf_printf(&sb, "%s ", tag->name);
3103 	}
3104     }
3105     sbuf_trim(&sb);
3106     sbuf_finish(&sb);
3107 
3108     /* Copy out the old values to the user. */
3109     error = SYSCTL_OUT(req, sbuf_data(&sb), sbuf_len(&sb));
3110     sbuf_delete(&sb);
3111 
3112     /* If the user is setting a string, parse it. */
3113     if (error == 0 && req->newptr != NULL) {
3114 	*dbg = 0;
3115 	setenv((char *)oidp->oid_arg1, (char *)req->newptr);
3116 	acpi_set_debugging(NULL);
3117     }
3118     ACPI_SERIAL_END(acpi);
3119 
3120     return (error);
3121 }
3122 
3123 SYSCTL_PROC(_debug_acpi, OID_AUTO, layer, CTLFLAG_RW | CTLTYPE_STRING,
3124 	    "debug.acpi.layer", 0, acpi_debug_sysctl, "A", "");
3125 SYSCTL_PROC(_debug_acpi, OID_AUTO, level, CTLFLAG_RW | CTLTYPE_STRING,
3126 	    "debug.acpi.level", 0, acpi_debug_sysctl, "A", "");
3127 #endif /* ACPI_DEBUG */
3128 
3129 static int
3130 acpi_pm_func(u_long cmd, void *arg, ...)
3131 {
3132 	int	state, acpi_state;
3133 	int	error;
3134 	struct	acpi_softc *sc;
3135 	va_list	ap;
3136 
3137 	error = 0;
3138 	switch (cmd) {
3139 	case POWER_CMD_SUSPEND:
3140 		sc = (struct acpi_softc *)arg;
3141 		if (sc == NULL) {
3142 			error = EINVAL;
3143 			goto out;
3144 		}
3145 
3146 		va_start(ap, arg);
3147 		state = va_arg(ap, int);
3148 		va_end(ap);
3149 
3150 		switch (state) {
3151 		case POWER_SLEEP_STATE_STANDBY:
3152 			acpi_state = sc->acpi_standby_sx;
3153 			break;
3154 		case POWER_SLEEP_STATE_SUSPEND:
3155 			acpi_state = sc->acpi_suspend_sx;
3156 			break;
3157 		case POWER_SLEEP_STATE_HIBERNATE:
3158 			acpi_state = ACPI_STATE_S4;
3159 			break;
3160 		default:
3161 			error = EINVAL;
3162 			goto out;
3163 		}
3164 
3165 		acpi_SetSleepState(sc, acpi_state);
3166 		break;
3167 	default:
3168 		error = EINVAL;
3169 		goto out;
3170 	}
3171 
3172 out:
3173 	return (error);
3174 }
3175 
3176 static void
3177 acpi_pm_register(void *arg)
3178 {
3179     if (!cold || resource_disabled("acpi", 0))
3180 	return;
3181 
3182     power_pm_register(POWER_PM_TYPE_ACPI, acpi_pm_func, NULL);
3183 }
3184 
3185 SYSINIT(power, SI_SUB_KLD, SI_ORDER_ANY, acpi_pm_register, 0);
3186