acpi_apm.c revision 168191
1/*-
2 * Copyright (c) 2001 Mitsuru IWASAKI
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
28__FBSDID("$FreeBSD: head/sys/i386/acpica/acpi_machdep.c 168191 2007-03-31 23:23:42Z jhb $");
29
30#include <sys/param.h>
31#include <sys/bus.h>
32#include <sys/condvar.h>
33#include <sys/conf.h>
34#include <sys/fcntl.h>
35#include <sys/kernel.h>
36#include <sys/sysctl.h>
37#include <sys/uio.h>
38#include <vm/vm.h>
39#include <vm/pmap.h>
40
41#include <contrib/dev/acpica/acpi.h>
42#include <dev/acpica/acpivar.h>
43#include <dev/acpica/acpiio.h>
44
45/*
46 * APM driver emulation
47 */
48
49#include <sys/selinfo.h>
50
51#include <machine/apm_bios.h>
52#include <machine/pc/bios.h>
53
54#include <i386/bios/apm.h>
55
56SYSCTL_DECL(_debug_acpi);
57
58uint32_t acpi_resume_beep;
59TUNABLE_INT("debug.acpi.resume_beep", &acpi_resume_beep);
60SYSCTL_UINT(_debug_acpi, OID_AUTO, resume_beep, CTLFLAG_RW, &acpi_resume_beep,
61    0, "Beep the PC speaker when resuming");
62uint32_t acpi_reset_video;
63TUNABLE_INT("hw.acpi.reset_video", &acpi_reset_video);
64
65static int intr_model = ACPI_INTR_PIC;
66static int apm_active;
67
68static d_open_t apmopen;
69static d_close_t apmclose;
70static d_write_t apmwrite;
71static d_ioctl_t apmioctl;
72static d_poll_t apmpoll;
73
74static struct cdevsw apm_cdevsw = {
75	.d_version =	D_VERSION,
76	.d_open =	apmopen,
77	.d_close =	apmclose,
78	.d_write =	apmwrite,
79	.d_ioctl =	apmioctl,
80	.d_poll =	apmpoll,
81	.d_name =	"apm",
82};
83
84static int
85acpi_capm_convert_battstate(struct  acpi_battinfo *battp)
86{
87	int	state;
88
89	state = APM_UNKNOWN;
90
91	if (battp->state & ACPI_BATT_STAT_DISCHARG) {
92		if (battp->cap >= 50)
93			state = 0;	/* high */
94		else
95			state = 1;	/* low */
96	}
97	if (battp->state & ACPI_BATT_STAT_CRITICAL)
98		state = 2;		/* critical */
99	if (battp->state & ACPI_BATT_STAT_CHARGING)
100		state = 3;		/* charging */
101
102	/* If still unknown, determine it based on the battery capacity. */
103	if (state == APM_UNKNOWN) {
104		if (battp->cap >= 50)
105			state = 0;	/* high */
106		else
107			state = 1;	/* low */
108	}
109
110	return (state);
111}
112
113static int
114acpi_capm_convert_battflags(struct  acpi_battinfo *battp)
115{
116	int	flags;
117
118	flags = 0;
119
120	if (battp->cap >= 50)
121		flags |= APM_BATT_HIGH;
122	else {
123		if (battp->state & ACPI_BATT_STAT_CRITICAL)
124			flags |= APM_BATT_CRITICAL;
125		else
126			flags |= APM_BATT_LOW;
127	}
128	if (battp->state & ACPI_BATT_STAT_CHARGING)
129		flags |= APM_BATT_CHARGING;
130	if (battp->state == ACPI_BATT_STAT_NOT_PRESENT)
131		flags = APM_BATT_NOT_PRESENT;
132
133	return (flags);
134}
135
136static int
137acpi_capm_get_info(apm_info_t aip)
138{
139	int	acline;
140	struct	acpi_battinfo batt;
141
142	aip->ai_infoversion = 1;
143	aip->ai_major       = 1;
144	aip->ai_minor       = 2;
145	aip->ai_status      = apm_active;
146	aip->ai_capabilities= 0xff00;	/* unknown */
147
148	if (acpi_acad_get_acline(&acline))
149		aip->ai_acline = APM_UNKNOWN;	/* unknown */
150	else
151		aip->ai_acline = acline;	/* on/off */
152
153	if (acpi_battery_get_battinfo(NULL, &batt) != 0) {
154		aip->ai_batt_stat = APM_UNKNOWN;
155		aip->ai_batt_life = APM_UNKNOWN;
156		aip->ai_batt_time = -1;		 /* unknown */
157		aip->ai_batteries = ~0U;	 /* unknown */
158	} else {
159		aip->ai_batt_stat = acpi_capm_convert_battstate(&batt);
160		aip->ai_batt_life = batt.cap;
161		aip->ai_batt_time = (batt.min == -1) ? -1 : batt.min * 60;
162		aip->ai_batteries = acpi_battery_get_units();
163	}
164
165	return (0);
166}
167
168static int
169acpi_capm_get_pwstatus(apm_pwstatus_t app)
170{
171	device_t dev;
172	int	acline, unit, error;
173	struct	acpi_battinfo batt;
174
175	if (app->ap_device != PMDV_ALLDEV &&
176	    (app->ap_device < PMDV_BATT0 || app->ap_device > PMDV_BATT_ALL))
177		return (1);
178
179	if (app->ap_device == PMDV_ALLDEV)
180		error = acpi_battery_get_battinfo(NULL, &batt);
181	else {
182		unit = app->ap_device - PMDV_BATT0;
183		dev = devclass_get_device(devclass_find("battery"), unit);
184		if (dev != NULL)
185			error = acpi_battery_get_battinfo(dev, &batt);
186		else
187			error = ENXIO;
188	}
189	if (error)
190		return (1);
191
192	app->ap_batt_stat = acpi_capm_convert_battstate(&batt);
193	app->ap_batt_flag = acpi_capm_convert_battflags(&batt);
194	app->ap_batt_life = batt.cap;
195	app->ap_batt_time = (batt.min == -1) ? -1 : batt.min * 60;
196
197	if (acpi_acad_get_acline(&acline))
198		app->ap_acline = APM_UNKNOWN;
199	else
200		app->ap_acline = acline;	/* on/off */
201
202	return (0);
203}
204
205static int
206apmopen(struct cdev *dev, int flag, int fmt, d_thread_t *td)
207{
208	return (0);
209}
210
211static int
212apmclose(struct cdev *dev, int flag, int fmt, d_thread_t *td)
213{
214	return (0);
215}
216
217static int
218apmioctl(struct cdev *dev, u_long cmd, caddr_t addr, int flag, d_thread_t *td)
219{
220	int	error = 0;
221	struct	acpi_softc *acpi_sc;
222	struct apm_info info;
223	apm_info_old_t aiop;
224
225	acpi_sc = devclass_get_softc(devclass_find("acpi"), 0);
226
227	switch (cmd) {
228	case APMIO_SUSPEND:
229		if ((flag & FWRITE) == 0)
230			return (EPERM);
231		if (apm_active)
232			acpi_SetSleepState(acpi_sc, acpi_sc->acpi_suspend_sx);
233		else
234			error = EINVAL;
235		break;
236	case APMIO_STANDBY:
237		if ((flag & FWRITE) == 0)
238			return (EPERM);
239		if (apm_active)
240			acpi_SetSleepState(acpi_sc, acpi_sc->acpi_standby_sx);
241		else
242			error = EINVAL;
243		break;
244	case APMIO_GETINFO_OLD:
245		if (acpi_capm_get_info(&info))
246			error = ENXIO;
247		aiop = (apm_info_old_t)addr;
248		aiop->ai_major = info.ai_major;
249		aiop->ai_minor = info.ai_minor;
250		aiop->ai_acline = info.ai_acline;
251		aiop->ai_batt_stat = info.ai_batt_stat;
252		aiop->ai_batt_life = info.ai_batt_life;
253		aiop->ai_status = info.ai_status;
254		break;
255	case APMIO_GETINFO:
256		if (acpi_capm_get_info((apm_info_t)addr))
257			error = ENXIO;
258		break;
259	case APMIO_GETPWSTATUS:
260		if (acpi_capm_get_pwstatus((apm_pwstatus_t)addr))
261			error = ENXIO;
262		break;
263	case APMIO_ENABLE:
264		if ((flag & FWRITE) == 0)
265			return (EPERM);
266		apm_active = 1;
267		break;
268	case APMIO_DISABLE:
269		if ((flag & FWRITE) == 0)
270			return (EPERM);
271		apm_active = 0;
272		break;
273	case APMIO_HALTCPU:
274		break;
275	case APMIO_NOTHALTCPU:
276		break;
277	case APMIO_DISPLAY:
278		if ((flag & FWRITE) == 0)
279			return (EPERM);
280		break;
281	case APMIO_BIOS:
282		if ((flag & FWRITE) == 0)
283			return (EPERM);
284		bzero(addr, sizeof(struct apm_bios_arg));
285		break;
286	default:
287		error = EINVAL;
288		break;
289	}
290
291	return (error);
292}
293
294static int
295apmwrite(struct cdev *dev, struct uio *uio, int ioflag)
296{
297	return (uio->uio_resid);
298}
299
300static int
301apmpoll(struct cdev *dev, int events, d_thread_t *td)
302{
303	return (0);
304}
305
306static void
307acpi_capm_init(struct acpi_softc *sc)
308{
309        make_dev(&apm_cdevsw, 0, 0, 5, 0664, "apm");
310}
311
312int
313acpi_machdep_init(device_t dev)
314{
315	struct	acpi_softc *sc;
316
317	sc = devclass_get_softc(devclass_find("acpi"), 0);
318	acpi_capm_init(sc);
319
320	acpi_install_wakeup_handler(sc);
321
322	if (intr_model == ACPI_INTR_PIC)
323		BUS_CONFIG_INTR(dev, AcpiGbl_FADT.SciInterrupt,
324		    INTR_TRIGGER_LEVEL, INTR_POLARITY_LOW);
325	else
326		acpi_SetIntrModel(intr_model);
327
328	SYSCTL_ADD_UINT(&sc->acpi_sysctl_ctx,
329	    SYSCTL_CHILDREN(sc->acpi_sysctl_tree), OID_AUTO,
330	    "reset_video", CTLFLAG_RW, &acpi_reset_video, 0,
331	    "Call the VESA reset BIOS vector on the resume path");
332
333	return (0);
334}
335
336void
337acpi_SetDefaultIntrModel(int model)
338{
339
340	intr_model = model;
341}
342
343/* Check BIOS date.  If 1998 or older, disable ACPI. */
344int
345acpi_machdep_quirks(int *quirks)
346{
347	char *va;
348	int year;
349
350	/* BIOS address 0xffff5 contains the date in the format mm/dd/yy. */
351	va = pmap_mapbios(0xffff0, 16);
352	sscanf(va + 11, "%2d", &year);
353	pmap_unmapbios((vm_offset_t)va, 16);
354
355	/*
356	 * Date must be >= 1/1/1999 or we don't trust ACPI.  Note that this
357	 * check must be changed by my 114th birthday.
358	 */
359	if (year > 90 && year < 99)
360		*quirks = ACPI_Q_BROKEN;
361
362	return (0);
363}
364
365void
366acpi_cpu_c1()
367{
368	__asm __volatile("sti; hlt");
369}
370