xref: /netbsd-src/sys/dev/acpi/acpi_ec.c (revision 7f21db1c0118155e0dd40b75182e30c589d9f63e)
1 /*	$NetBSD: acpi_ec.c,v 1.59 2010/01/18 18:36:49 jruoho Exp $	*/
2 
3 /*-
4  * Copyright (c) 2007 Joerg Sonnenberger <joerg@NetBSD.org>.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
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
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
21  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
22  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
23  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
24  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
26  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
27  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
28  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 /*
33  * The ACPI Embedded Controller (EC) driver serves two different purposes:
34  * - read and write access from ASL, e.g. to read battery state
35  * - notification of ASL of System Control Interrupts.
36  *
37  * Access to the EC is serialised by sc_access_mtx and optionally the
38  * ACPI global mutex.  Both locks are held until the request is fulfilled.
39  * All access to the softc has to hold sc_mtx to serialise against the GPE
40  * handler and the callout.  sc_mtx is also used for wakeup conditions.
41  *
42  * SCIs are processed in a kernel thread. Handling gets a bit complicated
43  * by the lock order (sc_mtx must be acquired after sc_access_mtx and the
44  * ACPI global mutex).
45  *
46  * Read and write requests spin around for a short time as many requests
47  * can be handled instantly by the EC.  During normal processing interrupt
48  * mode is used exclusively.  At boot and resume time interrupts are not
49  * working and the handlers just busy loop.
50  *
51  * A callout is scheduled to compensate for missing interrupts on some
52  * hardware.  If the EC doesn't process a request for 5s, it is most likely
53  * in a wedged state.  No method to reset the EC is currently known.
54  *
55  * Special care has to be taken to not poll the EC in a busy loop without
56  * delay.  This can prevent processing of Power Button events. At least some
57  * Lenovo Thinkpads seem to be implement the Power Button Override in the EC
58  * and the only option to recover on those models is to cut off all power.
59  */
60 
61 #include <sys/cdefs.h>
62 __KERNEL_RCSID(0, "$NetBSD: acpi_ec.c,v 1.59 2010/01/18 18:36:49 jruoho Exp $");
63 
64 #include <sys/param.h>
65 #include <sys/systm.h>
66 #include <sys/condvar.h>
67 #include <sys/device.h>
68 #include <sys/kernel.h>
69 #include <sys/kthread.h>
70 #include <sys/mutex.h>
71 
72 #include <sys/bus.h>
73 
74 #include <dev/acpi/acpireg.h>
75 #include <dev/acpi/acpivar.h>
76 #include <dev/acpi/acpi_ecvar.h>
77 
78 #define _COMPONENT          ACPI_EC_COMPONENT
79 ACPI_MODULE_NAME            ("acpi_ec")
80 
81 /* Maximum time to wait for global ACPI lock in ms */
82 #define	EC_LOCK_TIMEOUT		5
83 
84 /* Maximum time to poll for completion of a command  in ms */
85 #define	EC_POLL_TIMEOUT		5
86 
87 /* Maximum time to give a single EC command in s */
88 #define EC_CMD_TIMEOUT		10
89 
90 /* From ACPI 3.0b, chapter 12.3 */
91 #define EC_COMMAND_READ		0x80
92 #define	EC_COMMAND_WRITE	0x81
93 #define	EC_COMMAND_BURST_EN	0x82
94 #define	EC_COMMAND_BURST_DIS	0x83
95 #define	EC_COMMAND_QUERY	0x84
96 
97 /* From ACPI 3.0b, chapter 12.2.1 */
98 #define	EC_STATUS_OBF		0x01
99 #define	EC_STATUS_IBF		0x02
100 #define	EC_STATUS_CMD		0x08
101 #define	EC_STATUS_BURST		0x10
102 #define	EC_STATUS_SCI		0x20
103 #define	EC_STATUS_SMI		0x40
104 
105 static const char *ec_hid[] = {
106 	"PNP0C09",
107 	NULL,
108 };
109 
110 enum ec_state_t {
111 	EC_STATE_QUERY,
112 	EC_STATE_QUERY_VAL,
113 	EC_STATE_READ,
114 	EC_STATE_READ_ADDR,
115 	EC_STATE_READ_VAL,
116 	EC_STATE_WRITE,
117 	EC_STATE_WRITE_ADDR,
118 	EC_STATE_WRITE_VAL,
119 	EC_STATE_FREE
120 };
121 
122 struct acpiec_softc {
123 	ACPI_HANDLE sc_ech;
124 
125 	ACPI_HANDLE sc_gpeh;
126 	UINT8 sc_gpebit;
127 
128 	bus_space_tag_t sc_data_st;
129 	bus_space_handle_t sc_data_sh;
130 
131 	bus_space_tag_t sc_csr_st;
132 	bus_space_handle_t sc_csr_sh;
133 
134 	bool sc_need_global_lock;
135 	UINT32 sc_global_lock;
136 
137 	kmutex_t sc_mtx, sc_access_mtx;
138 	kcondvar_t sc_cv, sc_cv_sci;
139 	enum ec_state_t sc_state;
140 	bool sc_got_sci;
141 	callout_t sc_pseudo_intr;
142 
143 	uint8_t sc_cur_addr, sc_cur_val;
144 };
145 
146 static int acpiecdt_match(device_t, cfdata_t, void *);
147 static void acpiecdt_attach(device_t, device_t, void *);
148 
149 static int acpiec_match(device_t, cfdata_t, void *);
150 static void acpiec_attach(device_t, device_t, void *);
151 
152 static void acpiec_common_attach(device_t, device_t, ACPI_HANDLE,
153     bus_addr_t, bus_addr_t, ACPI_HANDLE, uint8_t);
154 
155 static bool acpiec_suspend(device_t, pmf_qual_t);
156 static bool acpiec_resume(device_t, pmf_qual_t);
157 static bool acpiec_shutdown(device_t, int);
158 
159 static bool acpiec_parse_gpe_package(device_t, ACPI_HANDLE,
160     ACPI_HANDLE *, uint8_t *);
161 
162 static void acpiec_callout(void *);
163 static void acpiec_gpe_query(void *);
164 static UINT32 acpiec_gpe_handler(void *);
165 static ACPI_STATUS acpiec_space_setup(ACPI_HANDLE, UINT32, void *, void **);
166 static ACPI_STATUS acpiec_space_handler(UINT32, ACPI_PHYSICAL_ADDRESS,
167     UINT32, ACPI_INTEGER *, void *, void *);
168 
169 static void acpiec_gpe_state_machine(device_t);
170 
171 CFATTACH_DECL_NEW(acpiec, sizeof(struct acpiec_softc),
172     acpiec_match, acpiec_attach, NULL, NULL);
173 
174 CFATTACH_DECL_NEW(acpiecdt, sizeof(struct acpiec_softc),
175     acpiecdt_match, acpiecdt_attach, NULL, NULL);
176 
177 static device_t ec_singleton = NULL;
178 static bool acpiec_cold = false;
179 
180 static bool
181 acpiecdt_find(device_t parent, ACPI_HANDLE *ec_handle,
182     bus_addr_t *cmd_reg, bus_addr_t *data_reg, uint8_t *gpebit)
183 {
184 	ACPI_TABLE_ECDT *ecdt;
185 	ACPI_STATUS rv;
186 
187 	rv = AcpiGetTable(ACPI_SIG_ECDT, 1, (ACPI_TABLE_HEADER **)&ecdt);
188 	if (ACPI_FAILURE(rv))
189 		return false;
190 
191 	if (ecdt->Control.BitWidth != 8 || ecdt->Data.BitWidth != 8) {
192 		aprint_error_dev(parent,
193 		    "ECDT register width invalid (%d/%d)\n",
194 		    ecdt->Control.BitWidth, ecdt->Data.BitWidth);
195 		return false;
196 	}
197 
198 	rv = AcpiGetHandle(ACPI_ROOT_OBJECT, ecdt->Id, ec_handle);
199 	if (ACPI_FAILURE(rv)) {
200 		aprint_error_dev(parent,
201 		    "failed to look up EC object %s: %s\n",
202 		    ecdt->Id, AcpiFormatException(rv));
203 		return false;
204 	}
205 
206 	*cmd_reg = ecdt->Control.Address;
207 	*data_reg = ecdt->Data.Address;
208 	*gpebit = ecdt->Gpe;
209 
210 	return true;
211 }
212 
213 static int
214 acpiecdt_match(device_t parent, cfdata_t match, void *aux)
215 {
216 	ACPI_HANDLE ec_handle;
217 	bus_addr_t cmd_reg, data_reg;
218 	uint8_t gpebit;
219 
220 	if (acpiecdt_find(parent, &ec_handle, &cmd_reg, &data_reg, &gpebit))
221 		return 1;
222 	else
223 		return 0;
224 }
225 
226 static void
227 acpiecdt_attach(device_t parent, device_t self, void *aux)
228 {
229 	ACPI_HANDLE ec_handle;
230 	bus_addr_t cmd_reg, data_reg;
231 	uint8_t gpebit;
232 
233 	if (!acpiecdt_find(parent, &ec_handle, &cmd_reg, &data_reg, &gpebit))
234 		panic("ECDT disappeared");
235 
236 	aprint_naive("\n");
237 	aprint_normal(": ACPI Embedded Controller via ECDT\n");
238 
239 	acpiec_common_attach(parent, self, ec_handle, cmd_reg, data_reg,
240 	    NULL, gpebit);
241 }
242 
243 static int
244 acpiec_match(device_t parent, cfdata_t match, void *aux)
245 {
246 	struct acpi_attach_args *aa = aux;
247 
248 	if (aa->aa_node->ad_type != ACPI_TYPE_DEVICE)
249 		return 0;
250 
251 	return acpi_match_hid(aa->aa_node->ad_devinfo, ec_hid);
252 }
253 
254 static void
255 acpiec_attach(device_t parent, device_t self, void *aux)
256 {
257 	struct acpi_attach_args *aa = aux;
258 	struct acpi_resources ec_res;
259 	struct acpi_io *io0, *io1;
260 	ACPI_HANDLE gpe_handle;
261 	uint8_t gpebit;
262 	ACPI_STATUS rv;
263 
264 	if (ec_singleton != NULL) {
265 		aprint_naive(": using %s\n", device_xname(ec_singleton));
266 		aprint_normal(": using %s\n", device_xname(ec_singleton));
267 		if (!pmf_device_register(self, NULL, NULL))
268 			aprint_error_dev(self, "couldn't establish power handler\n");
269 		return;
270 	}
271 
272 	if (!acpiec_parse_gpe_package(self, aa->aa_node->ad_handle,
273 				      &gpe_handle, &gpebit))
274 		return;
275 
276 	rv = acpi_resource_parse(self, aa->aa_node->ad_handle, "_CRS",
277 	    &ec_res, &acpi_resource_parse_ops_default);
278 	if (rv != AE_OK) {
279 		aprint_error_dev(self, "resource parsing failed: %s\n",
280 		    AcpiFormatException(rv));
281 		return;
282 	}
283 
284 	if ((io0 = acpi_res_io(&ec_res, 0)) == NULL) {
285 		aprint_error_dev(self, "no data register resource\n");
286 		goto free_res;
287 	}
288 	if ((io1 = acpi_res_io(&ec_res, 1)) == NULL) {
289 		aprint_error_dev(self, "no CSR register resource\n");
290 		goto free_res;
291 	}
292 
293 	acpiec_common_attach(parent, self, aa->aa_node->ad_handle,
294 	    io1->ar_base, io0->ar_base, gpe_handle, gpebit);
295 
296 free_res:
297 	acpi_resource_cleanup(&ec_res);
298 }
299 
300 static void
301 acpiec_common_attach(device_t parent, device_t self,
302     ACPI_HANDLE ec_handle, bus_addr_t cmd_reg, bus_addr_t data_reg,
303     ACPI_HANDLE gpe_handle, uint8_t gpebit)
304 {
305 	struct acpiec_softc *sc = device_private(self);
306 	ACPI_STATUS rv;
307 	ACPI_INTEGER val;
308 
309 	sc->sc_ech = ec_handle;
310 	sc->sc_gpeh = gpe_handle;
311 	sc->sc_gpebit = gpebit;
312 
313 	sc->sc_state = EC_STATE_FREE;
314 	mutex_init(&sc->sc_mtx, MUTEX_DRIVER, IPL_TTY);
315 	mutex_init(&sc->sc_access_mtx, MUTEX_DEFAULT, IPL_NONE);
316 	cv_init(&sc->sc_cv, "eccv");
317 	cv_init(&sc->sc_cv_sci, "ecsci");
318 
319 	if (bus_space_map(sc->sc_data_st, data_reg, 1, 0,
320 	    &sc->sc_data_sh) != 0) {
321 		aprint_error_dev(self, "unable to map data register\n");
322 		return;
323 	}
324 
325 	if (bus_space_map(sc->sc_csr_st, cmd_reg, 1, 0, &sc->sc_csr_sh) != 0) {
326 		aprint_error_dev(self, "unable to map CSR register\n");
327 		goto post_data_map;
328 	}
329 
330 	rv = acpi_eval_integer(sc->sc_ech, "_GLK", &val);
331 	if (rv == AE_OK) {
332 		sc->sc_need_global_lock = val != 0;
333 	} else if (rv != AE_NOT_FOUND) {
334 		aprint_error_dev(self, "unable to evaluate _GLK: %s\n",
335 		    AcpiFormatException(rv));
336 		goto post_csr_map;
337 	} else {
338 		sc->sc_need_global_lock = false;
339 	}
340 	if (sc->sc_need_global_lock)
341 		aprint_normal_dev(self, "using global ACPI lock\n");
342 
343 	callout_init(&sc->sc_pseudo_intr, CALLOUT_MPSAFE);
344 	callout_setfunc(&sc->sc_pseudo_intr, acpiec_callout, self);
345 
346 	rv = AcpiInstallAddressSpaceHandler(sc->sc_ech, ACPI_ADR_SPACE_EC,
347 	    acpiec_space_handler, acpiec_space_setup, self);
348 	if (rv != AE_OK) {
349 		aprint_error_dev(self,
350 		    "unable to install address space handler: %s\n",
351 		    AcpiFormatException(rv));
352 		goto post_csr_map;
353 	}
354 
355 	rv = AcpiInstallGpeHandler(sc->sc_gpeh, sc->sc_gpebit,
356 	    ACPI_GPE_EDGE_TRIGGERED, acpiec_gpe_handler, self);
357 	if (rv != AE_OK) {
358 		aprint_error_dev(self, "unable to install GPE handler: %s\n",
359 		    AcpiFormatException(rv));
360 		goto post_csr_map;
361 	}
362 
363 	rv = AcpiSetGpeType(sc->sc_gpeh, sc->sc_gpebit, ACPI_GPE_TYPE_RUNTIME);
364 	if (rv != AE_OK) {
365 		aprint_error_dev(self, "unable to set GPE type: %s\n",
366 		    AcpiFormatException(rv));
367 		goto post_csr_map;
368 	}
369 
370 	rv = AcpiEnableGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_ISR);
371 	if (rv != AE_OK) {
372 		aprint_error_dev(self, "unable to enable GPE: %s\n",
373 		    AcpiFormatException(rv));
374 		goto post_csr_map;
375 	}
376 
377 	if (kthread_create(PRI_NONE, KTHREAD_MPSAFE, NULL, acpiec_gpe_query,
378 		           self, NULL, "acpiec sci thread")) {
379 		aprint_error_dev(self, "unable to create query kthread\n");
380 		goto post_csr_map;
381 	}
382 
383 	ec_singleton = self;
384 
385 	if (!pmf_device_register1(self, acpiec_suspend, acpiec_resume,
386 	    acpiec_shutdown))
387 		aprint_error_dev(self, "couldn't establish power handler\n");
388 
389 	return;
390 
391 post_csr_map:
392 	(void)AcpiRemoveGpeHandler(sc->sc_gpeh, sc->sc_gpebit,
393 	    acpiec_gpe_handler);
394 	(void)AcpiRemoveAddressSpaceHandler(sc->sc_ech,
395 	    ACPI_ADR_SPACE_EC, acpiec_space_handler);
396 	bus_space_unmap(sc->sc_csr_st, sc->sc_csr_sh, 1);
397 post_data_map:
398 	bus_space_unmap(sc->sc_data_st, sc->sc_data_sh, 1);
399 }
400 
401 static bool
402 acpiec_suspend(device_t dv, pmf_qual_t qual)
403 {
404 	acpiec_cold = true;
405 
406 	return true;
407 }
408 
409 static bool
410 acpiec_resume(device_t dv, pmf_qual_t qual)
411 {
412 	acpiec_cold = false;
413 
414 	return true;
415 }
416 
417 static bool
418 acpiec_shutdown(device_t dv, int how)
419 {
420 
421 	acpiec_cold = true;
422 	return true;
423 }
424 
425 static bool
426 acpiec_parse_gpe_package(device_t self, ACPI_HANDLE ec_handle,
427     ACPI_HANDLE *gpe_handle, uint8_t *gpebit)
428 {
429 	ACPI_BUFFER buf;
430 	ACPI_OBJECT *p, *c;
431 	ACPI_STATUS rv;
432 
433 	rv = acpi_eval_struct(ec_handle, "_GPE", &buf);
434 	if (rv != AE_OK) {
435 		aprint_error_dev(self, "unable to evaluate _GPE: %s\n",
436 		    AcpiFormatException(rv));
437 		return false;
438 	}
439 
440 	p = buf.Pointer;
441 
442 	if (p->Type == ACPI_TYPE_INTEGER) {
443 		*gpe_handle = NULL;
444 		*gpebit = p->Integer.Value;
445 		ACPI_FREE(p);
446 		return true;
447 	}
448 
449 	if (p->Type != ACPI_TYPE_PACKAGE) {
450 		aprint_error_dev(self, "_GPE is neither integer nor package\n");
451 		ACPI_FREE(p);
452 		return false;
453 	}
454 
455 	if (p->Package.Count != 2) {
456 		aprint_error_dev(self, "_GPE package does not contain 2 elements\n");
457 		ACPI_FREE(p);
458 		return false;
459 	}
460 
461 	c = &p->Package.Elements[0];
462 	rv = acpi_eval_reference_handle(c, gpe_handle);
463 
464 	if (ACPI_FAILURE(rv)) {
465 		aprint_error_dev(self, "failed to evaluate _GPE handle\n");
466 		ACPI_FREE(p);
467 		return false;
468 	}
469 
470 	c = &p->Package.Elements[1];
471 
472 	if (c->Type != ACPI_TYPE_INTEGER) {
473 		aprint_error_dev(self,
474 		    "_GPE package needs integer as 2nd field\n");
475 		ACPI_FREE(p);
476 		return false;
477 	}
478 	*gpebit = c->Integer.Value;
479 	ACPI_FREE(p);
480 	return true;
481 }
482 
483 static uint8_t
484 acpiec_read_data(struct acpiec_softc *sc)
485 {
486 	return bus_space_read_1(sc->sc_data_st, sc->sc_data_sh, 0);
487 }
488 
489 static void
490 acpiec_write_data(struct acpiec_softc *sc, uint8_t val)
491 {
492 	bus_space_write_1(sc->sc_data_st, sc->sc_data_sh, 0, val);
493 }
494 
495 static uint8_t
496 acpiec_read_status(struct acpiec_softc *sc)
497 {
498 	return bus_space_read_1(sc->sc_csr_st, sc->sc_csr_sh, 0);
499 }
500 
501 static void
502 acpiec_write_command(struct acpiec_softc *sc, uint8_t cmd)
503 {
504 	bus_space_write_1(sc->sc_csr_st, sc->sc_csr_sh, 0, cmd);
505 }
506 
507 static ACPI_STATUS
508 acpiec_space_setup(ACPI_HANDLE region, UINT32 func, void *arg,
509     void **region_arg)
510 {
511 	if (func == ACPI_REGION_DEACTIVATE)
512 		*region_arg = NULL;
513 	else
514 		*region_arg = arg;
515 
516 	return AE_OK;
517 }
518 
519 static void
520 acpiec_lock(device_t dv)
521 {
522 	struct acpiec_softc *sc = device_private(dv);
523 	ACPI_STATUS rv;
524 
525 	mutex_enter(&sc->sc_access_mtx);
526 
527 	if (sc->sc_need_global_lock) {
528 		rv = AcpiAcquireGlobalLock(EC_LOCK_TIMEOUT, &sc->sc_global_lock);
529 		if (rv != AE_OK) {
530 			aprint_error_dev(dv, "failed to acquire global lock: %s\n",
531 			    AcpiFormatException(rv));
532 			return;
533 		}
534 	}
535 }
536 
537 static void
538 acpiec_unlock(device_t dv)
539 {
540 	struct acpiec_softc *sc = device_private(dv);
541 	ACPI_STATUS rv;
542 
543 	if (sc->sc_need_global_lock) {
544 		rv = AcpiReleaseGlobalLock(sc->sc_global_lock);
545 		if (rv != AE_OK) {
546 			aprint_error_dev(dv, "failed to release global lock: %s\n",
547 			    AcpiFormatException(rv));
548 		}
549 	}
550 	mutex_exit(&sc->sc_access_mtx);
551 }
552 
553 static ACPI_STATUS
554 acpiec_read(device_t dv, uint8_t addr, uint8_t *val)
555 {
556 	struct acpiec_softc *sc = device_private(dv);
557 	int i, timeo = 1000 * EC_CMD_TIMEOUT;
558 
559 	acpiec_lock(dv);
560 	mutex_enter(&sc->sc_mtx);
561 
562 	sc->sc_cur_addr = addr;
563 	sc->sc_state = EC_STATE_READ;
564 
565 	for (i = 0; i < EC_POLL_TIMEOUT; ++i) {
566 		acpiec_gpe_state_machine(dv);
567 		if (sc->sc_state == EC_STATE_FREE)
568 			goto done;
569 		delay(1);
570 	}
571 
572 	if (cold || acpiec_cold) {
573 		while (sc->sc_state != EC_STATE_FREE && timeo-- > 0) {
574 			delay(1000);
575 			acpiec_gpe_state_machine(dv);
576 		}
577 		if (sc->sc_state != EC_STATE_FREE) {
578 			mutex_exit(&sc->sc_mtx);
579 			AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_NOT_ISR);
580 			acpiec_unlock(dv);
581 			aprint_error_dev(dv, "command timed out, state %d\n",
582 			    sc->sc_state);
583 			return AE_ERROR;
584 		}
585 	} else if (cv_timedwait(&sc->sc_cv, &sc->sc_mtx, EC_CMD_TIMEOUT * hz)) {
586 		mutex_exit(&sc->sc_mtx);
587 		AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_NOT_ISR);
588 		acpiec_unlock(dv);
589 		aprint_error_dev(dv, "command takes over %d sec...\n", EC_CMD_TIMEOUT);
590 		return AE_ERROR;
591 	}
592 
593 done:
594 	*val = sc->sc_cur_val;
595 
596 	mutex_exit(&sc->sc_mtx);
597 	acpiec_unlock(dv);
598 	return AE_OK;
599 }
600 
601 static ACPI_STATUS
602 acpiec_write(device_t dv, uint8_t addr, uint8_t val)
603 {
604 	struct acpiec_softc *sc = device_private(dv);
605 	int i, timeo = 1000 * EC_CMD_TIMEOUT;
606 
607 	acpiec_lock(dv);
608 	mutex_enter(&sc->sc_mtx);
609 
610 	sc->sc_cur_addr = addr;
611 	sc->sc_cur_val = val;
612 	sc->sc_state = EC_STATE_WRITE;
613 
614 	for (i = 0; i < EC_POLL_TIMEOUT; ++i) {
615 		acpiec_gpe_state_machine(dv);
616 		if (sc->sc_state == EC_STATE_FREE)
617 			goto done;
618 		delay(1);
619 	}
620 
621 	if (cold || acpiec_cold) {
622 		while (sc->sc_state != EC_STATE_FREE && timeo-- > 0) {
623 			delay(1000);
624 			acpiec_gpe_state_machine(dv);
625 		}
626 		if (sc->sc_state != EC_STATE_FREE) {
627 			mutex_exit(&sc->sc_mtx);
628 			AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_NOT_ISR);
629 			acpiec_unlock(dv);
630 			aprint_error_dev(dv, "command timed out, state %d\n",
631 			    sc->sc_state);
632 			return AE_ERROR;
633 		}
634 	} else if (cv_timedwait(&sc->sc_cv, &sc->sc_mtx, EC_CMD_TIMEOUT * hz)) {
635 		mutex_exit(&sc->sc_mtx);
636 		AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_NOT_ISR);
637 		acpiec_unlock(dv);
638 		aprint_error_dev(dv, "command takes over %d sec...\n", EC_CMD_TIMEOUT);
639 		return AE_ERROR;
640 	}
641 
642 done:
643 	mutex_exit(&sc->sc_mtx);
644 	acpiec_unlock(dv);
645 	return AE_OK;
646 }
647 
648 static ACPI_STATUS
649 acpiec_space_handler(UINT32 func, ACPI_PHYSICAL_ADDRESS paddr,
650     UINT32 width, ACPI_INTEGER *value, void *arg, void *region_arg)
651 {
652 	device_t dv;
653 	struct acpiec_softc *sc;
654 	ACPI_STATUS rv;
655 	uint8_t addr, reg;
656 	unsigned int i;
657 
658 	if (paddr > 0xff || width % 8 != 0 || value == NULL || arg == NULL ||
659 	    paddr + width / 8 > 0xff)
660 		return AE_BAD_PARAMETER;
661 
662 	addr = paddr;
663 	dv = arg;
664 	sc = device_private(dv);
665 
666 	rv = AE_OK;
667 
668 	switch (func) {
669 	case ACPI_READ:
670 		*value = 0;
671 		for (i = 0; i < width; i += 8, ++addr) {
672 			rv = acpiec_read(dv, addr, &reg);
673 			if (rv != AE_OK)
674 				break;
675 			*value |= (ACPI_INTEGER)reg << i;
676 		}
677 		break;
678 	case ACPI_WRITE:
679 		for (i = 0; i < width; i += 8, ++addr) {
680 			reg = (*value >>i) & 0xff;
681 			rv = acpiec_write(dv, addr, reg);
682 			if (rv != AE_OK)
683 				break;
684 		}
685 		break;
686 	default:
687 		aprint_error("%s: invalid Address Space function called: %x\n",
688 		    device_xname(dv), (unsigned int)func);
689 		return AE_BAD_PARAMETER;
690 	}
691 
692 	return rv;
693 }
694 
695 static void
696 acpiec_gpe_query(void *arg)
697 {
698 	device_t dv = arg;
699 	struct acpiec_softc *sc = device_private(dv);
700 	uint8_t reg;
701 	char qxx[5];
702 	ACPI_STATUS rv;
703 	int i;
704 
705 loop:
706 	mutex_enter(&sc->sc_mtx);
707 
708 	if (sc->sc_got_sci == false)
709 		cv_wait(&sc->sc_cv_sci, &sc->sc_mtx);
710 	mutex_exit(&sc->sc_mtx);
711 
712 	acpiec_lock(dv);
713 	mutex_enter(&sc->sc_mtx);
714 
715 	/* The Query command can always be issued, so be defensive here. */
716 	sc->sc_got_sci = false;
717 	sc->sc_state = EC_STATE_QUERY;
718 
719 	for (i = 0; i < EC_POLL_TIMEOUT; ++i) {
720 		acpiec_gpe_state_machine(dv);
721 		if (sc->sc_state == EC_STATE_FREE)
722 			goto done;
723 		delay(1);
724 	}
725 
726 	cv_wait(&sc->sc_cv, &sc->sc_mtx);
727 
728 done:
729 	reg = sc->sc_cur_val;
730 
731 	mutex_exit(&sc->sc_mtx);
732 	acpiec_unlock(dv);
733 
734 	if (reg == 0)
735 		goto loop; /* Spurious query result */
736 
737 	/*
738 	 * Evaluate _Qxx to respond to the controller.
739 	 */
740 	snprintf(qxx, sizeof(qxx), "_Q%02X", (unsigned int)reg);
741 	rv = AcpiEvaluateObject(sc->sc_ech, qxx, NULL, NULL);
742 	if (rv != AE_OK && rv != AE_NOT_FOUND) {
743 		aprint_error("%s: GPE query method %s failed: %s",
744 		    device_xname(dv), qxx, AcpiFormatException(rv));
745 	}
746 
747 	goto loop;
748 }
749 
750 static void
751 acpiec_gpe_state_machine(device_t dv)
752 {
753 	struct acpiec_softc *sc = device_private(dv);
754 	uint8_t reg;
755 
756 	reg = acpiec_read_status(sc);
757 
758 	if (reg & EC_STATUS_SCI)
759 		sc->sc_got_sci = true;
760 
761 	switch (sc->sc_state) {
762 	case EC_STATE_QUERY:
763 		if ((reg & EC_STATUS_IBF) != 0)
764 			break; /* Nothing of interest here. */
765 		acpiec_write_command(sc, EC_COMMAND_QUERY);
766 		sc->sc_state = EC_STATE_QUERY_VAL;
767 		break;
768 
769 	case EC_STATE_QUERY_VAL:
770 		if ((reg & EC_STATUS_OBF) == 0)
771 			break; /* Nothing of interest here. */
772 
773 		sc->sc_cur_val = acpiec_read_data(sc);
774 		sc->sc_state = EC_STATE_FREE;
775 
776 		cv_signal(&sc->sc_cv);
777 		break;
778 
779 	case EC_STATE_READ:
780 		if ((reg & EC_STATUS_IBF) != 0)
781 			break; /* Nothing of interest here. */
782 
783 		acpiec_write_command(sc, EC_COMMAND_READ);
784 		sc->sc_state = EC_STATE_READ_ADDR;
785 		break;
786 
787 	case EC_STATE_READ_ADDR:
788 		if ((reg & EC_STATUS_IBF) != 0)
789 			break; /* Nothing of interest here. */
790 
791 		acpiec_write_data(sc, sc->sc_cur_addr);
792 		sc->sc_state = EC_STATE_READ_VAL;
793 		break;
794 
795 	case EC_STATE_READ_VAL:
796 		if ((reg & EC_STATUS_OBF) == 0)
797 			break; /* Nothing of interest here. */
798 		sc->sc_cur_val = acpiec_read_data(sc);
799 		sc->sc_state = EC_STATE_FREE;
800 
801 		cv_signal(&sc->sc_cv);
802 		break;
803 
804 	case EC_STATE_WRITE:
805 		if ((reg & EC_STATUS_IBF) != 0)
806 			break; /* Nothing of interest here. */
807 
808 		acpiec_write_command(sc, EC_COMMAND_WRITE);
809 		sc->sc_state = EC_STATE_WRITE_ADDR;
810 		break;
811 
812 	case EC_STATE_WRITE_ADDR:
813 		if ((reg & EC_STATUS_IBF) != 0)
814 			break; /* Nothing of interest here. */
815 		acpiec_write_data(sc, sc->sc_cur_addr);
816 		sc->sc_state = EC_STATE_WRITE_VAL;
817 		break;
818 
819 	case EC_STATE_WRITE_VAL:
820 		if ((reg & EC_STATUS_IBF) != 0)
821 			break; /* Nothing of interest here. */
822 		sc->sc_state = EC_STATE_FREE;
823 		cv_signal(&sc->sc_cv);
824 
825 		acpiec_write_data(sc, sc->sc_cur_val);
826 		break;
827 
828 	case EC_STATE_FREE:
829 		if (sc->sc_got_sci)
830 			cv_signal(&sc->sc_cv_sci);
831 		break;
832 	default:
833 		panic("invalid state");
834 	}
835 
836 	if (sc->sc_state != EC_STATE_FREE)
837 		callout_schedule(&sc->sc_pseudo_intr, 1);
838 }
839 
840 static void
841 acpiec_callout(void *arg)
842 {
843 	device_t dv = arg;
844 	struct acpiec_softc *sc = device_private(dv);
845 
846 	AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_NOT_ISR);
847 
848 	mutex_enter(&sc->sc_mtx);
849 	acpiec_gpe_state_machine(dv);
850 	mutex_exit(&sc->sc_mtx);
851 }
852 
853 static UINT32
854 acpiec_gpe_handler(void *arg)
855 {
856 	device_t dv = arg;
857 	struct acpiec_softc *sc = device_private(dv);
858 
859 	AcpiClearGpe(sc->sc_gpeh, sc->sc_gpebit, ACPI_ISR);
860 
861 	mutex_enter(&sc->sc_mtx);
862 	acpiec_gpe_state_machine(dv);
863 	mutex_exit(&sc->sc_mtx);
864 
865 	return 0;
866 }
867 
868 ACPI_STATUS
869 acpiec_bus_read(device_t dv, u_int addr, ACPI_INTEGER *val, int width)
870 {
871 	return acpiec_space_handler(ACPI_READ, addr, width * 8, val, dv, NULL);
872 }
873 
874 ACPI_STATUS
875 acpiec_bus_write(device_t dv, u_int addr, ACPI_INTEGER val, int width)
876 {
877 	return acpiec_space_handler(ACPI_WRITE, addr, width * 8, &val, dv, NULL);
878 }
879 
880 ACPI_HANDLE
881 acpiec_get_handle(device_t dv)
882 {
883 	struct acpiec_softc *sc = device_private(dv);
884 
885 	return sc->sc_ech;
886 }
887