acpi.c revision 1.101 1 /* $NetBSD: acpi.c,v 1.101 2007/02/19 22:31:05 ad 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 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright 2001, 2003 Wasabi Systems, Inc.
41 * All rights reserved.
42 *
43 * Written by Jason R. Thorpe for Wasabi Systems, Inc.
44 *
45 * Redistribution and use in source and binary forms, with or without
46 * modification, are permitted provided that the following conditions
47 * are met:
48 * 1. Redistributions of source code must retain the above copyright
49 * notice, this list of conditions and the following disclaimer.
50 * 2. Redistributions in binary form must reproduce the above copyright
51 * notice, this list of conditions and the following disclaimer in the
52 * documentation and/or other materials provided with the distribution.
53 * 3. All advertising materials mentioning features or use of this software
54 * must display the following acknowledgement:
55 * This product includes software developed for the NetBSD Project by
56 * Wasabi Systems, Inc.
57 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
58 * or promote products derived from this software without specific prior
59 * written permission.
60 *
61 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
62 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
63 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
64 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
65 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
66 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
67 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
68 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
69 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
70 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
71 * POSSIBILITY OF SUCH DAMAGE.
72 */
73
74 /*
75 * Autoconfiguration support for the Intel ACPI Component Architecture
76 * ACPI reference implementation.
77 */
78
79 #include <sys/cdefs.h>
80 __KERNEL_RCSID(0, "$NetBSD: acpi.c,v 1.101 2007/02/19 22:31:05 ad Exp $");
81
82 #include "opt_acpi.h"
83 #include "opt_pcifixup.h"
84
85 #include <sys/param.h>
86 #include <sys/systm.h>
87 #include <sys/device.h>
88 #include <sys/malloc.h>
89 #include <sys/mutex.h>
90 #include <sys/kernel.h>
91 #include <sys/proc.h>
92 #include <sys/sysctl.h>
93
94 #include <dev/acpi/acpica.h>
95 #include <dev/acpi/acpireg.h>
96 #include <dev/acpi/acpivar.h>
97 #include <dev/acpi/acpi_osd.h>
98 #include <dev/acpi/acpi_timer.h>
99 #ifdef ACPIVERBOSE
100 #include <dev/acpi/acpidevs_data.h>
101 #endif
102
103 #if defined(ACPI_PCI_FIXUP)
104 #error The option ACPI_PCI_FIXUP has been obsoleted by PCI_INTR_FIXUP_DISABLED. Please adjust your kernel configuration file.
105 #endif
106
107 #ifdef PCI_INTR_FIXUP_DISABLED
108 #include <dev/pci/pcidevs.h>
109 #endif
110
111 MALLOC_DECLARE(M_ACPI);
112
113 #include <machine/acpi_machdep.h>
114
115 #ifdef ACPI_DEBUGGER
116 #define ACPI_DBGR_INIT 0x01
117 #define ACPI_DBGR_TABLES 0x02
118 #define ACPI_DBGR_ENABLE 0x04
119 #define ACPI_DBGR_PROBE 0x08
120 #define ACPI_DBGR_RUNNING 0x10
121
122 static int acpi_dbgr = 0x00;
123 #endif
124
125 static int acpi_match(struct device *, struct cfdata *, void *);
126 static void acpi_attach(struct device *, struct device *, void *);
127
128 static int acpi_print(void *aux, const char *);
129
130 static int sysctl_hw_acpi_sleepstate(SYSCTLFN_ARGS);
131
132 extern struct cfdriver acpi_cd;
133
134 CFATTACH_DECL(acpi, sizeof(struct acpi_softc),
135 acpi_match, acpi_attach, NULL, NULL);
136
137 /*
138 * This is a flag we set when the ACPI subsystem is active. Machine
139 * dependent code may wish to skip other steps (such as attaching
140 * subsystems that ACPI supercedes) when ACPI is active.
141 */
142 int acpi_active;
143 int acpi_force_load;
144
145 /*
146 * Pointer to the ACPI subsystem's state. There can be only
147 * one ACPI instance.
148 */
149 struct acpi_softc *acpi_softc;
150
151 /*
152 * Locking stuff.
153 */
154 static kmutex_t acpi_slock;
155 static int acpi_locked;
156 extern kmutex_t acpi_interrupt_list_mtx;
157
158 /*
159 * sysctl-related information
160 */
161
162 static int acpi_node = CTL_EOL;
163 static uint64_t acpi_root_pointer; /* found as hw.acpi.root */
164 static int acpi_sleepstate = ACPI_STATE_S0;
165
166 /*
167 * Prototypes.
168 */
169 static void acpi_shutdown(void *);
170 static void acpi_build_tree(struct acpi_softc *);
171 static ACPI_STATUS acpi_make_devnode(ACPI_HANDLE, UINT32, void *, void **);
172
173 static void acpi_enable_fixed_events(struct acpi_softc *);
174
175 /*
176 * acpi_probe:
177 *
178 * Probe for ACPI support. This is called by the
179 * machine-dependent ACPI front-end. All of the
180 * actual work is done by ACPICA.
181 *
182 * NOTE: This is not an autoconfiguration interface function.
183 */
184 int
185 acpi_probe(void)
186 {
187 static int beenhere;
188 ACPI_STATUS rv;
189
190 if (beenhere != 0)
191 panic("acpi_probe: ACPI has already been probed");
192 beenhere = 1;
193
194 mutex_init(&acpi_slock, MUTEX_DRIVER, IPL_NONE);
195 mutex_init(&acpi_interrupt_list_mtx, MUTEX_DRIVER, IPL_NONE);
196 acpi_locked = 0;
197
198 /*
199 * Start up ACPICA.
200 */
201 #ifdef ACPI_DEBUGGER
202 if (acpi_dbgr & ACPI_DBGR_INIT)
203 acpi_osd_debugger();
204 #endif
205
206 rv = AcpiInitializeSubsystem();
207 if (ACPI_FAILURE(rv)) {
208 printf("ACPI: unable to initialize ACPICA: %s\n",
209 AcpiFormatException(rv));
210 return 0;
211 }
212
213 #ifdef ACPI_DEBUGGER
214 if (acpi_dbgr & ACPI_DBGR_TABLES)
215 acpi_osd_debugger();
216 #endif
217
218 rv = AcpiLoadTables();
219 if (ACPI_FAILURE(rv)) {
220 printf("ACPI: unable to load tables: %s\n",
221 AcpiFormatException(rv));
222 return 0;
223 }
224
225
226 if (!acpi_force_load && (acpi_find_quirks() & ACPI_QUIRK_BROKEN)) {
227 printf("ACPI: BIOS implementation in listed as broken:\n");
228 printf("ACPI: X/RSDT: OemId <%6.6s,%8.8s,%08x>, "
229 "AslId <%4.4s,%08x>\n",
230 AcpiGbl_XSDT->OemId, AcpiGbl_XSDT->OemTableId,
231 AcpiGbl_XSDT->OemRevision,
232 AcpiGbl_XSDT->AslCompilerId,
233 AcpiGbl_XSDT->AslCompilerRevision);
234 printf("ACPI: not used. set acpi_force_load to use anyway.\n");
235 return 0;
236 }
237
238 /*
239 * Looks like we have ACPI!
240 */
241
242 return 1;
243 }
244
245 static int
246 acpi_submatch(device_t parent, cfdata_t cf, const int *locs, void *aux)
247 {
248 struct cfattach *ca;
249
250 ca = config_cfattach_lookup(cf->cf_name, cf->cf_atname);
251 return (ca == &acpi_ca);
252 }
253
254 int
255 acpi_check(device_t parent, const char *ifattr)
256 {
257 return (config_search_ia(acpi_submatch, parent, ifattr, NULL) != NULL);
258 }
259
260 ACPI_STATUS
261 acpi_OsGetRootPointer(UINT32 Flags, ACPI_POINTER *PhysicalAddress)
262 {
263 ACPI_STATUS rv;
264
265 /*
266 * IA-32: Use AcpiFindRootPointer() to locate the RSDP.
267 *
268 * IA-64: Use the EFI.
269 *
270 * We let MD code handle this since there are multiple
271 * ways to do it.
272 */
273
274 rv = acpi_md_OsGetRootPointer(Flags, PhysicalAddress);
275
276 if (acpi_root_pointer == 0 && ACPI_SUCCESS(rv))
277 acpi_root_pointer =
278 (uint64_t)PhysicalAddress->Pointer.Physical;
279
280 return rv;
281 }
282
283 /*
284 * acpi_match:
285 *
286 * Autoconfiguration `match' routine.
287 */
288 static int
289 acpi_match(struct device *parent, struct cfdata *match,
290 void *aux)
291 {
292 /*
293 * XXX Check other locators? Hard to know -- machine
294 * dependent code has already checked for the presence
295 * of ACPI by calling acpi_probe(), so I suppose we
296 * don't really have to do anything else.
297 */
298 return 1;
299 }
300
301 /*
302 * acpi_attach:
303 *
304 * Autoconfiguration `attach' routine. Finish initializing
305 * ACPICA (some initialization was done in acpi_probe(),
306 * which was required to check for the presence of ACPI),
307 * and enable the ACPI subsystem.
308 */
309 static void
310 acpi_attach(struct device *parent, struct device *self, void *aux)
311 {
312 struct acpi_softc *sc = (void *) self;
313 struct acpibus_attach_args *aa = aux;
314 ACPI_STATUS rv;
315
316 aprint_naive(": Advanced Configuration and Power Interface\n");
317 aprint_normal(": Advanced Configuration and Power Interface\n");
318
319 if (acpi_softc != NULL)
320 panic("acpi_attach: ACPI has already been attached");
321
322 sysmon_power_settype("acpi");
323
324 aprint_verbose("%s: using Intel ACPI CA subsystem version %08x\n",
325 sc->sc_dev.dv_xname, ACPI_CA_VERSION);
326
327 aprint_verbose("%s: X/RSDT: OemId <%6.6s,%8.8s,%08x>, AslId <%4.4s,%08x>\n",
328 sc->sc_dev.dv_xname,
329 AcpiGbl_XSDT->OemId, AcpiGbl_XSDT->OemTableId,
330 AcpiGbl_XSDT->OemRevision,
331 AcpiGbl_XSDT->AslCompilerId, AcpiGbl_XSDT->AslCompilerRevision);
332
333 sc->sc_quirks = acpi_find_quirks();
334
335 sc->sc_iot = aa->aa_iot;
336 sc->sc_memt = aa->aa_memt;
337 sc->sc_pc = aa->aa_pc;
338 sc->sc_pciflags = aa->aa_pciflags;
339 sc->sc_ic = aa->aa_ic;
340
341 acpi_softc = sc;
342
343 /*
344 * Bring ACPI on-line.
345 */
346 #ifdef ACPI_DEBUGGER
347 if (acpi_dbgr & ACPI_DBGR_ENABLE)
348 acpi_osd_debugger();
349 #endif
350
351 rv = AcpiEnableSubsystem(0);
352 if (ACPI_FAILURE(rv)) {
353 aprint_error("%s: unable to enable ACPI: %s\n",
354 sc->sc_dev.dv_xname, AcpiFormatException(rv));
355 return;
356 }
357
358 /* early EC handler initialization if ECDT table is available */
359 #if NACPIEC > 0
360 acpiec_early_attach(&sc->sc_dev);
361 #endif
362
363 rv = AcpiInitializeObjects(0);
364 if (ACPI_FAILURE(rv)) {
365 aprint_error("%s: unable to initialize ACPI objects: %s\n",
366 sc->sc_dev.dv_xname, AcpiFormatException(rv));
367 return;
368 }
369 acpi_active = 1;
370
371 /* Our current state is "awake". */
372 sc->sc_sleepstate = ACPI_STATE_S0;
373
374 /* Show SCI interrupt. */
375 if (AcpiGbl_FADT != NULL)
376 aprint_verbose("%s: SCI interrupting at int %d\n",
377 sc->sc_dev.dv_xname, AcpiGbl_FADT->SciInt);
378 /*
379 * Check for fixed-hardware features.
380 */
381 acpi_enable_fixed_events(sc);
382 acpitimer_init();
383
384 /*
385 * Scan the namespace and build our device tree.
386 */
387 #ifdef ACPI_DEBUGGER
388 if (acpi_dbgr & ACPI_DBGR_PROBE)
389 acpi_osd_debugger();
390 #endif
391 acpi_md_callback((struct device *)sc);
392 acpi_build_tree(sc);
393
394 if (acpi_root_pointer != 0 && acpi_node != CTL_EOL) {
395 (void)sysctl_createv(NULL, 0, NULL, NULL,
396 CTLFLAG_IMMEDIATE,
397 CTLTYPE_QUAD, "root", NULL, NULL,
398 acpi_root_pointer, NULL, 0,
399 CTL_HW, acpi_node, CTL_CREATE, CTL_EOL);
400 }
401
402
403 /*
404 * Register a shutdown hook that disables certain ACPI
405 * events that might happen and confuse us while we're
406 * trying to shut down.
407 */
408 sc->sc_sdhook = shutdownhook_establish(acpi_shutdown, sc);
409 if (sc->sc_sdhook == NULL)
410 aprint_error("%s: WARNING: unable to register shutdown hook\n",
411 sc->sc_dev.dv_xname);
412
413 #ifdef ACPI_DEBUGGER
414 if (acpi_dbgr & ACPI_DBGR_RUNNING)
415 acpi_osd_debugger();
416 #endif
417 }
418
419 /*
420 * acpi_shutdown:
421 *
422 * Shutdown hook for ACPI -- disable some events that
423 * might confuse us.
424 */
425 static void
426 acpi_shutdown(void *arg)
427 {
428 /* nothing */
429 }
430
431 #if 0
432 /*
433 * acpi_disable:
434 *
435 * Disable ACPI.
436 */
437 static ACPI_STATUS
438 acpi_disable(struct acpi_softc *sc)
439 {
440 ACPI_STATUS rv = AE_OK;
441
442 if (acpi_active) {
443 rv = AcpiDisable();
444 if (ACPI_SUCCESS(rv))
445 acpi_active = 0;
446 }
447 return rv;
448 }
449 #endif
450
451 struct acpi_make_devnode_state {
452 struct acpi_softc *softc;
453 struct acpi_scope *scope;
454 };
455
456 /*
457 * acpi_build_tree:
458 *
459 * Scan relevant portions of the ACPI namespace and attach
460 * child devices.
461 */
462 static void
463 acpi_build_tree(struct acpi_softc *sc)
464 {
465 static const char *scopes[] = {
466 "\\_PR_", /* ACPI 1.0 processor namespace */
467 "\\_SB_", /* system bus namespace */
468 "\\_SI_", /* system indicator namespace */
469 "\\_TZ_", /* ACPI 1.0 thermal zone namespace */
470 NULL,
471 };
472 struct acpi_attach_args aa;
473 struct acpi_make_devnode_state state;
474 struct acpi_scope *as;
475 struct acpi_devnode *ad;
476 ACPI_HANDLE parent;
477 ACPI_STATUS rv;
478 int i;
479
480 TAILQ_INIT(&sc->sc_scopes);
481
482 state.softc = sc;
483
484 /*
485 * Scan the namespace and build our tree.
486 */
487 for (i = 0; scopes[i] != NULL; i++) {
488 as = malloc(sizeof(*as), M_ACPI, M_WAITOK);
489 as->as_name = scopes[i];
490 TAILQ_INIT(&as->as_devnodes);
491
492 TAILQ_INSERT_TAIL(&sc->sc_scopes, as, as_list);
493
494 state.scope = as;
495
496 rv = AcpiGetHandle(ACPI_ROOT_OBJECT, scopes[i],
497 &parent);
498 if (ACPI_SUCCESS(rv)) {
499 AcpiWalkNamespace(ACPI_TYPE_ANY, parent, 100,
500 acpi_make_devnode, &state, NULL);
501 }
502
503 /* Now, for this namespace, try and attach the devices. */
504 TAILQ_FOREACH(ad, &as->as_devnodes, ad_list) {
505 aa.aa_node = ad;
506 aa.aa_iot = sc->sc_iot;
507 aa.aa_memt = sc->sc_memt;
508 aa.aa_pc = sc->sc_pc;
509 aa.aa_pciflags = sc->sc_pciflags;
510 aa.aa_ic = sc->sc_ic;
511
512 if (ad->ad_devinfo->Type == ACPI_TYPE_DEVICE) {
513 /*
514 * XXX We only attach devices which are:
515 *
516 * - present
517 * - enabled
518 * - functioning properly
519 *
520 * However, if enabled, it's decoding resources,
521 * so we should claim them, if possible.
522 * Requires changes to bus_space(9).
523 */
524 if ((ad->ad_devinfo->Valid & ACPI_VALID_STA) ==
525 ACPI_VALID_STA &&
526 (ad->ad_devinfo->CurrentStatus &
527 (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED|
528 ACPI_STA_DEV_OK)) !=
529 (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED|
530 ACPI_STA_DEV_OK))
531 continue;
532
533 /*
534 * XXX Same problem as above...
535 */
536 if ((ad->ad_devinfo->Valid & ACPI_VALID_HID)
537 == 0)
538 continue;
539 }
540
541 ad->ad_device = config_found_ia(&sc->sc_dev,
542 "acpinodebus", &aa, acpi_print);
543 }
544 }
545 config_found_ia(&sc->sc_dev, "acpiapmbus", NULL, NULL);
546 }
547
548 #ifdef ACPI_ACTIVATE_DEV
549 static void
550 acpi_activate_device(ACPI_HANDLE handle, ACPI_DEVICE_INFO **di)
551 {
552 ACPI_STATUS rv;
553 ACPI_BUFFER buf;
554
555 buf.Pointer = NULL;
556 buf.Length = ACPI_ALLOCATE_BUFFER;
557
558 #ifdef ACPI_DEBUG
559 aprint_normal("acpi_activate_device: %s, old status=%x\n",
560 (*di)->HardwareId.Value, (*di)->CurrentStatus);
561 #endif
562
563 rv = acpi_allocate_resources(handle);
564 if (ACPI_FAILURE(rv)) {
565 aprint_error("acpi: activate failed for %s\n",
566 (*di)->HardwareId.Value);
567 } else {
568 aprint_verbose("acpi: activated %s\n",
569 (*di)->HardwareId.Value);
570 }
571
572 (void)AcpiGetObjectInfo(handle, &buf);
573 AcpiOsFree(*di);
574 *di = buf.Pointer;
575
576 #ifdef ACPI_DEBUG
577 aprint_normal("acpi_activate_device: %s, new status=%x\n",
578 (*di)->HardwareId.Value, (*di)->CurrentStatus);
579 #endif
580 }
581 #endif /* ACPI_ACTIVATE_DEV */
582
583 /*
584 * acpi_make_devnode:
585 *
586 * Make an ACPI devnode.
587 */
588 static ACPI_STATUS
589 acpi_make_devnode(ACPI_HANDLE handle, UINT32 level, void *context,
590 void **status)
591 {
592 struct acpi_make_devnode_state *state = context;
593 #if defined(ACPI_DEBUG) || defined(ACPI_EXTRA_DEBUG)
594 struct acpi_softc *sc = state->softc;
595 #endif
596 struct acpi_scope *as = state->scope;
597 struct acpi_devnode *ad;
598 ACPI_OBJECT_TYPE type;
599 ACPI_BUFFER buf;
600 ACPI_DEVICE_INFO *devinfo;
601 ACPI_STATUS rv;
602
603 rv = AcpiGetType(handle, &type);
604 if (ACPI_SUCCESS(rv)) {
605 buf.Pointer = NULL;
606 buf.Length = ACPI_ALLOCATE_BUFFER;
607 rv = AcpiGetObjectInfo(handle, &buf);
608 if (ACPI_FAILURE(rv)) {
609 #ifdef ACPI_DEBUG
610 aprint_normal("%s: AcpiGetObjectInfo failed: %s\n",
611 sc->sc_dev.dv_xname, AcpiFormatException(rv));
612 #endif
613 goto out; /* XXX why return OK */
614 }
615
616 devinfo = buf.Pointer;
617
618 switch (type) {
619 case ACPI_TYPE_DEVICE:
620 #ifdef ACPI_ACTIVATE_DEV
621 if ((devinfo->Valid & (ACPI_VALID_STA|ACPI_VALID_HID)) ==
622 (ACPI_VALID_STA|ACPI_VALID_HID) &&
623 (devinfo->CurrentStatus &
624 (ACPI_STA_DEV_PRESENT|ACPI_STA_DEV_ENABLED)) ==
625 ACPI_STA_DEV_PRESENT)
626 acpi_activate_device(handle, &devinfo);
627
628 /* FALLTHROUGH */
629 #endif
630
631 case ACPI_TYPE_PROCESSOR:
632 case ACPI_TYPE_THERMAL:
633 case ACPI_TYPE_POWER:
634 ad = malloc(sizeof(*ad), M_ACPI, M_NOWAIT|M_ZERO);
635 if (ad == NULL)
636 return AE_NO_MEMORY;
637
638 ad->ad_devinfo = devinfo;
639 ad->ad_handle = handle;
640 ad->ad_level = level;
641 ad->ad_scope = as;
642 ad->ad_type = type;
643
644 TAILQ_INSERT_TAIL(&as->as_devnodes, ad, ad_list);
645
646 if ((ad->ad_devinfo->Valid & ACPI_VALID_HID) == 0)
647 goto out;
648
649 #ifdef ACPI_EXTRA_DEBUG
650 aprint_normal("%s: HID %s found in scope %s level %d\n",
651 sc->sc_dev.dv_xname,
652 ad->ad_devinfo->HardwareId.Value,
653 as->as_name, ad->ad_level);
654 if (ad->ad_devinfo->Valid & ACPI_VALID_UID)
655 aprint_normal(" UID %s\n",
656 ad->ad_devinfo->UniqueId.Value);
657 if (ad->ad_devinfo->Valid & ACPI_VALID_ADR)
658 aprint_normal(" ADR 0x%016qx\n",
659 ad->ad_devinfo->Address);
660 if (ad->ad_devinfo->Valid & ACPI_VALID_STA)
661 aprint_normal(" STA 0x%08x\n",
662 ad->ad_devinfo->CurrentStatus);
663 #endif
664 }
665 }
666 out:
667 return AE_OK;
668 }
669
670 /*
671 * acpi_print:
672 *
673 * Autoconfiguration print routine for ACPI node bus.
674 */
675 static int
676 acpi_print(void *aux, const char *pnp)
677 {
678 struct acpi_attach_args *aa = aux;
679 ACPI_STATUS rv;
680
681 if (pnp) {
682 if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_HID) {
683 char *pnpstr =
684 aa->aa_node->ad_devinfo->HardwareId.Value;
685 char *str;
686
687 aprint_normal("%s ", pnpstr);
688 rv = acpi_eval_string(aa->aa_node->ad_handle,
689 "_STR", &str);
690 if (ACPI_SUCCESS(rv)) {
691 aprint_normal("[%s] ", str);
692 AcpiOsFree(str);
693 }
694 #ifdef ACPIVERBOSE
695 else {
696 int i;
697
698 for (i = 0; i < sizeof(acpi_knowndevs) /
699 sizeof(acpi_knowndevs[0]); i++) {
700 if (strcmp(acpi_knowndevs[i].pnp,
701 pnpstr) == 0) {
702 aprint_normal("[%s] ",
703 acpi_knowndevs[i].str);
704 }
705 }
706 }
707
708 #endif
709 } else {
710 aprint_normal("ACPI Object Type '%s' (0x%02x) ",
711 AcpiUtGetTypeName(aa->aa_node->ad_devinfo->Type),
712 aa->aa_node->ad_devinfo->Type);
713 }
714 aprint_normal("at %s", pnp);
715 } else {
716 if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_HID) {
717 aprint_normal(" (%s", aa->aa_node->ad_devinfo->HardwareId.Value);
718 if (aa->aa_node->ad_devinfo->Valid & ACPI_VALID_UID) {
719 const char *uid;
720
721 uid = aa->aa_node->ad_devinfo->UniqueId.Value;
722 if (uid[0] == '\0')
723 uid = "<null>";
724 aprint_normal("-%s", uid);
725 }
726 aprint_normal(")");
727 }
728 }
729
730 return UNCONF;
731 }
732
733 /*****************************************************************************
734 * ACPI fixed-hardware feature handlers
735 *****************************************************************************/
736
737 static UINT32 acpi_fixed_button_handler(void *);
738 static void acpi_fixed_button_pressed(void *);
739
740 /*
741 * acpi_enable_fixed_events:
742 *
743 * Enable any fixed-hardware feature handlers.
744 */
745 static void
746 acpi_enable_fixed_events(struct acpi_softc *sc)
747 {
748 static int beenhere;
749 ACPI_STATUS rv;
750
751 KASSERT(beenhere == 0);
752 beenhere = 1;
753
754 /*
755 * Check for fixed-hardware buttons.
756 */
757
758 if (AcpiGbl_FADT != NULL && AcpiGbl_FADT->PwrButton == 0) {
759 aprint_verbose("%s: fixed-feature power button present\n",
760 sc->sc_dev.dv_xname);
761 sc->sc_smpsw_power.smpsw_name = sc->sc_dev.dv_xname;
762 sc->sc_smpsw_power.smpsw_type = PSWITCH_TYPE_POWER;
763 if (sysmon_pswitch_register(&sc->sc_smpsw_power) != 0) {
764 aprint_error("%s: unable to register fixed power "
765 "button with sysmon\n", sc->sc_dev.dv_xname);
766 } else {
767 rv = AcpiInstallFixedEventHandler(
768 ACPI_EVENT_POWER_BUTTON,
769 acpi_fixed_button_handler, &sc->sc_smpsw_power);
770 if (ACPI_FAILURE(rv)) {
771 aprint_error("%s: unable to install handler "
772 "for fixed power button: %s\n",
773 sc->sc_dev.dv_xname,
774 AcpiFormatException(rv));
775 }
776 }
777 }
778
779 if (AcpiGbl_FADT != NULL && AcpiGbl_FADT->SleepButton == 0) {
780 aprint_verbose("%s: fixed-feature sleep button present\n",
781 sc->sc_dev.dv_xname);
782 sc->sc_smpsw_sleep.smpsw_name = sc->sc_dev.dv_xname;
783 sc->sc_smpsw_sleep.smpsw_type = PSWITCH_TYPE_SLEEP;
784 if (sysmon_pswitch_register(&sc->sc_smpsw_power) != 0) {
785 aprint_error("%s: unable to register fixed sleep "
786 "button with sysmon\n", sc->sc_dev.dv_xname);
787 } else {
788 rv = AcpiInstallFixedEventHandler(
789 ACPI_EVENT_SLEEP_BUTTON,
790 acpi_fixed_button_handler, &sc->sc_smpsw_sleep);
791 if (ACPI_FAILURE(rv)) {
792 aprint_error("%s: unable to install handler "
793 "for fixed sleep button: %s\n",
794 sc->sc_dev.dv_xname,
795 AcpiFormatException(rv));
796 }
797 }
798 }
799 }
800
801 /*
802 * acpi_fixed_button_handler:
803 *
804 * Event handler for the fixed buttons.
805 */
806 static UINT32
807 acpi_fixed_button_handler(void *context)
808 {
809 struct sysmon_pswitch *smpsw = context;
810 int rv;
811
812 #ifdef ACPI_BUT_DEBUG
813 printf("%s: fixed button handler\n", smpsw->smpsw_name);
814 #endif
815
816 rv = AcpiOsQueueForExecution(OSD_PRIORITY_LO,
817 acpi_fixed_button_pressed, smpsw);
818 if (ACPI_FAILURE(rv))
819 printf("%s: WARNING: unable to queue fixed button pressed "
820 "callback: %s\n", smpsw->smpsw_name,
821 AcpiFormatException(rv));
822
823 return ACPI_INTERRUPT_HANDLED;
824 }
825
826 /*
827 * acpi_fixed_button_pressed:
828 *
829 * Deal with a fixed button being pressed.
830 */
831 static void
832 acpi_fixed_button_pressed(void *context)
833 {
834 struct sysmon_pswitch *smpsw = context;
835
836 #ifdef ACPI_BUT_DEBUG
837 printf("%s: fixed button pressed, calling sysmon\n",
838 smpsw->smpsw_name);
839 #endif
840
841 sysmon_pswitch_event(smpsw, PSWITCH_EVENT_PRESSED);
842 }
843
844 /*****************************************************************************
845 * ACPI utility routines.
846 *****************************************************************************/
847
848 /*
849 * acpi_eval_integer:
850 *
851 * Evaluate an integer object.
852 */
853 ACPI_STATUS
854 acpi_eval_integer(ACPI_HANDLE handle, const char *path, ACPI_INTEGER *valp)
855 {
856 ACPI_STATUS rv;
857 ACPI_BUFFER buf;
858 ACPI_OBJECT param;
859
860 if (handle == NULL)
861 handle = ACPI_ROOT_OBJECT;
862
863 buf.Pointer = ¶m;
864 buf.Length = sizeof(param);
865
866 rv = AcpiEvaluateObjectTyped(handle, path, NULL, &buf, ACPI_TYPE_INTEGER);
867 if (ACPI_SUCCESS(rv))
868 *valp = param.Integer.Value;
869
870 return rv;
871 }
872
873 /*
874 * acpi_eval_string:
875 *
876 * Evaluate a (Unicode) string object.
877 */
878 ACPI_STATUS
879 acpi_eval_string(ACPI_HANDLE handle, const char *path, char **stringp)
880 {
881 ACPI_STATUS rv;
882 ACPI_BUFFER buf;
883
884 if (handle == NULL)
885 handle = ACPI_ROOT_OBJECT;
886
887 buf.Pointer = NULL;
888 buf.Length = ACPI_ALLOCATE_BUFFER;
889
890 rv = AcpiEvaluateObjectTyped(handle, path, NULL, &buf, ACPI_TYPE_STRING);
891 if (ACPI_SUCCESS(rv)) {
892 ACPI_OBJECT *param = buf.Pointer;
893 const char *ptr = param->String.Pointer;
894 size_t len = param->String.Length;
895 if ((*stringp = AcpiOsAllocate(len)) == NULL)
896 rv = AE_NO_MEMORY;
897 else
898 (void)memcpy(*stringp, ptr, len);
899 AcpiOsFree(param);
900 }
901
902 return rv;
903 }
904
905
906 /*
907 * acpi_eval_struct:
908 *
909 * Evaluate a more complex structure.
910 * Caller must free buf.Pointer by AcpiOsFree().
911 */
912 ACPI_STATUS
913 acpi_eval_struct(ACPI_HANDLE handle, const char *path, ACPI_BUFFER *bufp)
914 {
915 ACPI_STATUS rv;
916
917 if (handle == NULL)
918 handle = ACPI_ROOT_OBJECT;
919
920 bufp->Pointer = NULL;
921 bufp->Length = ACPI_ALLOCATE_BUFFER;
922
923 rv = AcpiEvaluateObject(handle, path, NULL, bufp);
924
925 return rv;
926 }
927
928 /*
929 * acpi_foreach_package_object:
930 *
931 * Iterate over all objects in a in a packages and pass then all
932 * to a function. If the called function returns non AE_OK, the
933 * iteration is stopped and that value is returned.
934 */
935
936 ACPI_STATUS
937 acpi_foreach_package_object(ACPI_OBJECT *pkg,
938 ACPI_STATUS (*func)(ACPI_OBJECT *, void *),
939 void *arg)
940 {
941 ACPI_STATUS rv = AE_OK;
942 int i;
943
944 if (pkg == NULL || pkg->Type != ACPI_TYPE_PACKAGE)
945 return AE_BAD_PARAMETER;
946
947 for (i = 0; i < pkg->Package.Count; i++) {
948 rv = (*func)(&pkg->Package.Elements[i], arg);
949 if (ACPI_FAILURE(rv))
950 break;
951 }
952
953 return rv;
954 }
955
956 const char *
957 acpi_name(ACPI_HANDLE handle)
958 {
959 static char buffer[80];
960 ACPI_BUFFER buf;
961 ACPI_STATUS rv;
962
963 buf.Length = sizeof(buffer);
964 buf.Pointer = buffer;
965
966 rv = AcpiGetName(handle, ACPI_FULL_PATHNAME, &buf);
967 if (ACPI_FAILURE(rv))
968 return "(unknown acpi path)";
969 return buffer;
970 }
971
972 /*
973 * acpi_get:
974 *
975 * Fetch data info the specified (empty) ACPI buffer.
976 * Caller must free buf.Pointer by AcpiOsFree().
977 */
978 ACPI_STATUS
979 acpi_get(ACPI_HANDLE handle, ACPI_BUFFER *buf,
980 ACPI_STATUS (*getit)(ACPI_HANDLE, ACPI_BUFFER *))
981 {
982 buf->Pointer = NULL;
983 buf->Length = ACPI_ALLOCATE_BUFFER;
984
985 return (*getit)(handle, buf);
986 }
987
988
989 /*
990 * acpi_match_hid
991 *
992 * Match given ids against _HID and _CIDs
993 */
994 int
995 acpi_match_hid(ACPI_DEVICE_INFO *ad, const char * const *ids)
996 {
997 int i;
998
999 while (*ids) {
1000 if (ad->Valid & ACPI_VALID_HID) {
1001 if (pmatch(ad->HardwareId.Value, *ids, NULL) == 2)
1002 return 1;
1003 }
1004
1005 if (ad->Valid & ACPI_VALID_CID) {
1006 for (i = 0; i < ad->CompatibilityId.Count; i++) {
1007 if (pmatch(ad->CompatibilityId.Id[i].Value, *ids, NULL) == 2)
1008 return 1;
1009 }
1010 }
1011 ids++;
1012 }
1013
1014 return 0;
1015 }
1016
1017 /*
1018 * acpi_set_wake_gpe
1019 *
1020 * Set GPE as both Runtime and Wake
1021 */
1022 void
1023 acpi_set_wake_gpe(ACPI_HANDLE handle)
1024 {
1025 ACPI_BUFFER buf;
1026 ACPI_STATUS rv;
1027 ACPI_OBJECT *p, *elt;
1028
1029 rv = acpi_eval_struct(handle, METHOD_NAME__PRW, &buf);
1030 if (ACPI_FAILURE(rv))
1031 return; /* just ignore */
1032
1033 p = buf.Pointer;
1034 if (p->Type != ACPI_TYPE_PACKAGE || p->Package.Count < 2)
1035 goto out; /* just ignore */
1036
1037 elt = p->Package.Elements;
1038
1039 /* TBD: package support */
1040 AcpiSetGpeType(NULL, elt[0].Integer.Value, ACPI_GPE_TYPE_WAKE_RUN);
1041 AcpiEnableGpe(NULL, elt[0].Integer.Value, ACPI_NOT_ISR);
1042
1043 out:
1044 AcpiOsFree(buf.Pointer);
1045 }
1046
1047
1048 /*****************************************************************************
1049 * ACPI sleep support.
1050 *****************************************************************************/
1051
1052 static int
1053 is_available_state(struct acpi_softc *sc, int state)
1054 {
1055 UINT8 type_a, type_b;
1056
1057 return ACPI_SUCCESS(AcpiGetSleepTypeData((UINT8)state,
1058 &type_a, &type_b));
1059 }
1060
1061 /*
1062 * acpi_enter_sleep_state:
1063 *
1064 * enter to the specified sleep state.
1065 */
1066
1067 ACPI_STATUS
1068 acpi_enter_sleep_state(struct acpi_softc *sc, int state)
1069 {
1070 int s;
1071 ACPI_STATUS ret = AE_OK;
1072
1073 if (state == acpi_sleepstate)
1074 return AE_OK;
1075
1076 aprint_normal("%s: entering state %d\n", sc->sc_dev.dv_xname, state);
1077
1078 switch (state) {
1079 case ACPI_STATE_S0:
1080 break;
1081 case ACPI_STATE_S1:
1082 case ACPI_STATE_S2:
1083 case ACPI_STATE_S3:
1084 case ACPI_STATE_S4:
1085 if (!is_available_state(sc, state)) {
1086 aprint_error("%s: cannot enter the sleep state (%d).\n",
1087 sc->sc_dev.dv_xname, state);
1088 break;
1089 }
1090 ret = AcpiEnterSleepStatePrep(state);
1091 if (ACPI_FAILURE(ret)) {
1092 aprint_error("%s: failed preparing to sleep (%s)\n",
1093 sc->sc_dev.dv_xname, AcpiFormatException(ret));
1094 break;
1095 }
1096 acpi_sleepstate = state;
1097 if (state == ACPI_STATE_S1) {
1098 /* just enter the state */
1099 acpi_md_OsDisableInterrupt();
1100 AcpiEnterSleepState((UINT8)state);
1101 } else {
1102 /* XXX: powerhooks(9) framework is too poor to
1103 * support ACPI sleep state...
1104 */
1105 dopowerhooks(PWR_SOFTSUSPEND);
1106 s = splhigh();
1107 dopowerhooks(PWR_SUSPEND);
1108 acpi_md_sleep(state);
1109 dopowerhooks(PWR_RESUME);
1110 splx(s);
1111 dopowerhooks(PWR_SOFTRESUME);
1112 if (state==ACPI_STATE_S4)
1113 AcpiEnable();
1114 }
1115 AcpiLeaveSleepState((UINT8)state);
1116 break;
1117 case ACPI_STATE_S5:
1118 ret = AcpiEnterSleepStatePrep(ACPI_STATE_S5);
1119 if (ACPI_FAILURE(ret)) {
1120 aprint_error("%s: failed preparing to sleep (%s)\n",
1121 sc->sc_dev.dv_xname, AcpiFormatException(ret));
1122 break;
1123 }
1124 acpi_sleepstate = state;
1125 acpi_md_OsDisableInterrupt();
1126 AcpiEnterSleepState(ACPI_STATE_S5);
1127 aprint_error("%s: WARNING powerdown failed!\n",
1128 sc->sc_dev.dv_xname);
1129 break;
1130 }
1131
1132 aprint_normal("%s: resuming\n", sc->sc_dev.dv_xname);
1133 acpi_sleepstate = ACPI_STATE_S0;
1134 return ret;
1135 }
1136
1137 #if defined(ACPI_ACTIVATE_DEV)
1138 /* XXX This very incomplete */
1139 ACPI_STATUS
1140 acpi_allocate_resources(ACPI_HANDLE handle)
1141 {
1142 ACPI_BUFFER bufp, bufc, bufn;
1143 ACPI_RESOURCE *resp, *resc, *resn;
1144 ACPI_RESOURCE_IRQ *irq;
1145 ACPI_RESOURCE_EXTENDED_IRQ *xirq;
1146 ACPI_STATUS rv;
1147 uint delta;
1148
1149 rv = acpi_get(handle, &bufp, AcpiGetPossibleResources);
1150 if (ACPI_FAILURE(rv))
1151 goto out;
1152 rv = acpi_get(handle, &bufc, AcpiGetCurrentResources);
1153 if (ACPI_FAILURE(rv)) {
1154 goto out1;
1155 }
1156
1157 bufn.Length = 1000;
1158 bufn.Pointer = resn = malloc(bufn.Length, M_ACPI, M_WAITOK);
1159 resp = bufp.Pointer;
1160 resc = bufc.Pointer;
1161 while (resc->Type != ACPI_RESOURCE_TYPE_END_TAG &&
1162 resp->Type != ACPI_RESOURCE_TYPE_END_TAG) {
1163 while (resc->Type != resp->Type && resp->Type != ACPI_RESOURCE_TYPE_END_TAG)
1164 resp = ACPI_NEXT_RESOURCE(resp);
1165 if (resp->Type == ACPI_RESOURCE_TYPE_END_TAG)
1166 break;
1167 /* Found identical Id */
1168 resn->Type = resc->Type;
1169 switch (resc->Type) {
1170 case ACPI_RESOURCE_TYPE_IRQ:
1171 memcpy(&resn->Data, &resp->Data,
1172 sizeof(ACPI_RESOURCE_IRQ));
1173 irq = (ACPI_RESOURCE_IRQ *)&resn->Data;
1174 irq->Interrupts[0] =
1175 ((ACPI_RESOURCE_IRQ *)&resp->Data)->
1176 Interrupts[irq->InterruptCount-1];
1177 irq->InterruptCount = 1;
1178 resn->Length = ACPI_RS_SIZE(ACPI_RESOURCE_IRQ);
1179 break;
1180 case ACPI_RESOURCE_TYPE_EXTENDED_IRQ:
1181 memcpy(&resn->Data, &resp->Data,
1182 sizeof(ACPI_RESOURCE_EXTENDED_IRQ));
1183 xirq = (ACPI_RESOURCE_EXTENDED_IRQ *)&resn->Data;
1184 #if 0
1185 /*
1186 * XXX not duplicating the interrupt logic above
1187 * because its not clear what it accomplishes.
1188 */
1189 xirq->Interrupts[0] =
1190 ((ACPI_RESOURCE_EXT_IRQ *)&resp->Data)->
1191 Interrupts[irq->NumberOfInterrupts-1];
1192 xirq->NumberOfInterrupts = 1;
1193 #endif
1194 resn->Length = ACPI_RS_SIZE(ACPI_RESOURCE_EXTENDED_IRQ);
1195 break;
1196 case ACPI_RESOURCE_TYPE_IO:
1197 memcpy(&resn->Data, &resp->Data,
1198 sizeof(ACPI_RESOURCE_IO));
1199 resn->Length = resp->Length;
1200 break;
1201 default:
1202 printf("acpi_allocate_resources: res=%d\n", resc->Type);
1203 rv = AE_BAD_DATA;
1204 goto out2;
1205 }
1206 resc = ACPI_NEXT_RESOURCE(resc);
1207 resn = ACPI_NEXT_RESOURCE(resn);
1208 resp = ACPI_NEXT_RESOURCE(resp);
1209 delta = (UINT8 *)resn - (UINT8 *)bufn.Pointer;
1210 if (delta >=
1211 bufn.Length-ACPI_RS_SIZE(ACPI_RESOURCE_DATA)) {
1212 bufn.Length *= 2;
1213 bufn.Pointer = realloc(bufn.Pointer, bufn.Length,
1214 M_ACPI, M_WAITOK);
1215 resn = (ACPI_RESOURCE *)((UINT8 *)bufn.Pointer + delta);
1216 }
1217 }
1218 if (resc->Type != ACPI_RESOURCE_TYPE_END_TAG) {
1219 printf("acpi_allocate_resources: resc not exhausted\n");
1220 rv = AE_BAD_DATA;
1221 goto out3;
1222 }
1223
1224 resn->Type = ACPI_RESOURCE_TYPE_END_TAG;
1225 rv = AcpiSetCurrentResources(handle, &bufn);
1226 if (ACPI_FAILURE(rv)) {
1227 printf("acpi_allocate_resources: AcpiSetCurrentResources %s\n",
1228 AcpiFormatException(rv));
1229 }
1230
1231 out3:
1232 free(bufn.Pointer, M_ACPI);
1233 out2:
1234 AcpiOsFree(bufc.Pointer);
1235 out1:
1236 AcpiOsFree(bufp.Pointer);
1237 out:
1238 return rv;
1239 }
1240 #endif /* ACPI_ACTIVATE_DEV */
1241
1242 SYSCTL_SETUP(sysctl_acpi_setup, "sysctl hw.acpi subtree setup")
1243 {
1244 const struct sysctlnode *node;
1245 const struct sysctlnode *ssnode;
1246
1247 if (sysctl_createv(clog, 0, NULL, NULL,
1248 CTLFLAG_PERMANENT,
1249 CTLTYPE_NODE, "hw", NULL,
1250 NULL, 0, NULL, 0,
1251 CTL_HW, CTL_EOL) != 0)
1252 return;
1253
1254 if (sysctl_createv(clog, 0, NULL, &node,
1255 CTLFLAG_PERMANENT,
1256 CTLTYPE_NODE, "acpi", NULL,
1257 NULL, 0, NULL, 0,
1258 CTL_HW, CTL_CREATE, CTL_EOL) != 0)
1259 return;
1260
1261 acpi_node = node->sysctl_num;
1262
1263 /* ACPI sleepstate sysctl */
1264 if (sysctl_createv(NULL, 0, NULL, &node,
1265 CTLFLAG_PERMANENT,
1266 CTLTYPE_NODE, "machdep", NULL,
1267 NULL, 0, NULL, 0, CTL_MACHDEP, CTL_EOL) != 0)
1268 return;
1269 if (sysctl_createv(NULL, 0, &node, &ssnode,
1270 CTLFLAG_READWRITE, CTLTYPE_INT, "sleep_state",
1271 NULL, sysctl_hw_acpi_sleepstate, 0, NULL, 0, CTL_CREATE,
1272 CTL_EOL) != 0)
1273 return;
1274 }
1275
1276 static int
1277 sysctl_hw_acpi_sleepstate(SYSCTLFN_ARGS)
1278 {
1279 int error, t;
1280 struct sysctlnode node;
1281
1282 node = *rnode;
1283 t = acpi_sleepstate;
1284 node.sysctl_data = &t;
1285 error = sysctl_lookup(SYSCTLFN_CALL(&node));
1286 if (error || newp == NULL)
1287 return error;
1288
1289 if (acpi_softc == NULL)
1290 return ENOSYS;
1291
1292 acpi_enter_sleep_state(acpi_softc, t);
1293
1294 return 0;
1295 }
1296