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