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