apmdev.c revision 1.30 1 1.30 dholland /* $NetBSD: apmdev.c,v 1.30 2014/07/25 08:10:37 dholland Exp $ */
2 1.1 uch
3 1.1 uch /*-
4 1.1 uch * Copyright (c) 1996, 1997 The NetBSD Foundation, Inc.
5 1.1 uch * All rights reserved.
6 1.1 uch *
7 1.1 uch * This code is derived from software contributed to The NetBSD Foundation
8 1.1 uch * by John Kohl and Christopher G. Demetriou.
9 1.1 uch *
10 1.1 uch * Redistribution and use in source and binary forms, with or without
11 1.1 uch * modification, are permitted provided that the following conditions
12 1.1 uch * are met:
13 1.1 uch * 1. Redistributions of source code must retain the above copyright
14 1.1 uch * notice, this list of conditions and the following disclaimer.
15 1.1 uch * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 uch * notice, this list of conditions and the following disclaimer in the
17 1.1 uch * documentation and/or other materials provided with the distribution.
18 1.1 uch *
19 1.1 uch * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 uch * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 uch * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 uch * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 uch * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 uch * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 uch * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 uch * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 uch * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 uch * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 uch * POSSIBILITY OF SUCH DAMAGE.
30 1.1 uch */
31 1.1 uch /*
32 1.1 uch * from: sys/arch/i386/i386/apm.c,v 1.49 2000/05/08
33 1.1 uch */
34 1.1 uch
35 1.1 uch #include <sys/cdefs.h>
36 1.30 dholland __KERNEL_RCSID(0, "$NetBSD: apmdev.c,v 1.30 2014/07/25 08:10:37 dholland Exp $");
37 1.1 uch
38 1.7 peter #ifdef _KERNEL_OPT
39 1.23 uwe #include "opt_apm.h"
40 1.7 peter #endif
41 1.1 uch
42 1.1 uch #if defined(DEBUG) && !defined(APMDEBUG)
43 1.1 uch #define APMDEBUG
44 1.1 uch #endif
45 1.1 uch
46 1.1 uch #include <sys/param.h>
47 1.1 uch #include <sys/systm.h>
48 1.1 uch #include <sys/signalvar.h>
49 1.1 uch #include <sys/kernel.h>
50 1.1 uch #include <sys/proc.h>
51 1.1 uch #include <sys/kthread.h>
52 1.1 uch #include <sys/malloc.h>
53 1.1 uch #include <sys/device.h>
54 1.1 uch #include <sys/fcntl.h>
55 1.1 uch #include <sys/ioctl.h>
56 1.1 uch #include <sys/select.h>
57 1.1 uch #include <sys/poll.h>
58 1.1 uch #include <sys/conf.h>
59 1.1 uch
60 1.1 uch #include <dev/hpc/apm/apmvar.h>
61 1.1 uch
62 1.20 uwe #ifdef APMDEBUG
63 1.20 uwe #define DPRINTF(f, x) do { if (apmdebug & (f)) printf x; } while (0)
64 1.1 uch
65 1.1 uch
66 1.1 uch #ifdef APMDEBUG_VALUE
67 1.1 uch int apmdebug = APMDEBUG_VALUE;
68 1.1 uch #else
69 1.1 uch int apmdebug = 0;
70 1.20 uwe #endif /* APMDEBUG_VALUE */
71 1.20 uwe
72 1.1 uch #else
73 1.1 uch #define DPRINTF(f, x) /**/
74 1.20 uwe #endif /* APMDEBUG */
75 1.1 uch
76 1.1 uch #define SCFLAG_OREAD 0x0000001
77 1.1 uch #define SCFLAG_OWRITE 0x0000002
78 1.1 uch #define SCFLAG_OPEN (SCFLAG_OREAD|SCFLAG_OWRITE)
79 1.1 uch
80 1.1 uch #define APMUNIT(dev) (minor(dev)&0xf0)
81 1.21 uwe #define APM(dev) (minor(dev)&0x0f)
82 1.21 uwe #define APM_NORMAL 0
83 1.21 uwe #define APM_CTL 8
84 1.1 uch
85 1.1 uch /*
86 1.1 uch * A brief note on the locking protocol: it's very simple; we
87 1.1 uch * assert an exclusive lock any time thread context enters the
88 1.1 uch * APM module. This is both the APM thread itself, as well as
89 1.1 uch * user context.
90 1.1 uch */
91 1.20 uwe #define APM_LOCK(apmsc) \
92 1.20 uwe (void) mutex_enter(&(apmsc)->sc_lock)
93 1.20 uwe #define APM_UNLOCK(apmsc) \
94 1.20 uwe (void) mutex_exit(&(apmsc)->sc_lock)
95 1.1 uch
96 1.21 uwe static void apmdevattach(device_t, device_t, void *);
97 1.21 uwe static int apmdevmatch(device_t, cfdata_t, void *);
98 1.1 uch
99 1.1 uch static void apm_event_handle(struct apm_softc *, u_int, u_int);
100 1.1 uch static void apm_periodic_check(struct apm_softc *);
101 1.1 uch static void apm_thread(void *);
102 1.1 uch static void apm_perror(const char *, int, ...)
103 1.1 uch __attribute__((__format__(__printf__,1,3)));
104 1.1 uch #ifdef APM_POWER_PRINT
105 1.1 uch static void apm_power_print(struct apm_softc *, struct apm_power_info *);
106 1.1 uch #endif
107 1.1 uch static int apm_record_event(struct apm_softc *, u_int);
108 1.20 uwe static void apm_set_ver(struct apm_softc *);
109 1.1 uch static void apm_standby(struct apm_softc *);
110 1.1 uch static void apm_suspend(struct apm_softc *);
111 1.1 uch static void apm_resume(struct apm_softc *, u_int, u_int);
112 1.1 uch
113 1.20 uwe CFATTACH_DECL_NEW(apmdev, sizeof(struct apm_softc),
114 1.21 uwe apmdevmatch, apmdevattach, NULL, NULL);
115 1.1 uch
116 1.1 uch extern struct cfdriver apmdev_cd;
117 1.1 uch
118 1.1 uch dev_type_open(apmdevopen);
119 1.1 uch dev_type_close(apmdevclose);
120 1.1 uch dev_type_ioctl(apmdevioctl);
121 1.1 uch dev_type_poll(apmdevpoll);
122 1.1 uch dev_type_kqfilter(apmdevkqfilter);
123 1.1 uch
124 1.1 uch const struct cdevsw apmdev_cdevsw = {
125 1.29 dholland .d_open = apmdevopen,
126 1.29 dholland .d_close = apmdevclose,
127 1.29 dholland .d_read = noread,
128 1.29 dholland .d_write = nowrite,
129 1.29 dholland .d_ioctl = apmdevioctl,
130 1.29 dholland .d_stop = nostop,
131 1.29 dholland .d_tty = notty,
132 1.29 dholland .d_poll = apmdevpoll,
133 1.29 dholland .d_mmap = nommap,
134 1.29 dholland .d_kqfilter = apmdevkqfilter,
135 1.30 dholland .d_discard = nodiscard,
136 1.29 dholland .d_flag = D_OTHER
137 1.1 uch };
138 1.1 uch
139 1.1 uch /* configurable variables */
140 1.1 uch int apm_bogus_bios = 0;
141 1.1 uch #ifdef APM_NO_STANDBY
142 1.1 uch int apm_do_standby = 0;
143 1.1 uch #else
144 1.1 uch int apm_do_standby = 1;
145 1.1 uch #endif
146 1.1 uch #ifdef APM_V10_ONLY
147 1.1 uch int apm_v11_enabled = 0;
148 1.1 uch #else
149 1.1 uch int apm_v11_enabled = 1;
150 1.1 uch #endif
151 1.1 uch #ifdef APM_NO_V12
152 1.1 uch int apm_v12_enabled = 0;
153 1.1 uch #else
154 1.1 uch int apm_v12_enabled = 1;
155 1.1 uch #endif
156 1.1 uch
157 1.1 uch /* variables used during operation (XXX cgd) */
158 1.1 uch u_char apm_majver, apm_minver;
159 1.1 uch int apm_inited;
160 1.1 uch int apm_standbys, apm_userstandbys, apm_suspends, apm_battlow;
161 1.1 uch int apm_damn_fool_bios, apm_op_inprog;
162 1.1 uch int apm_evindex;
163 1.1 uch
164 1.1 uch static int apm_spl; /* saved spl while suspended */
165 1.1 uch
166 1.21 uwe const char *
167 1.1 uch apm_strerror(int code)
168 1.1 uch {
169 1.1 uch switch (code) {
170 1.1 uch case APM_ERR_PM_DISABLED:
171 1.1 uch return ("power management disabled");
172 1.1 uch case APM_ERR_REALALREADY:
173 1.1 uch return ("real mode interface already connected");
174 1.1 uch case APM_ERR_NOTCONN:
175 1.1 uch return ("interface not connected");
176 1.1 uch case APM_ERR_16ALREADY:
177 1.1 uch return ("16-bit interface already connected");
178 1.1 uch case APM_ERR_16NOTSUPP:
179 1.1 uch return ("16-bit interface not supported");
180 1.1 uch case APM_ERR_32ALREADY:
181 1.1 uch return ("32-bit interface already connected");
182 1.1 uch case APM_ERR_32NOTSUPP:
183 1.1 uch return ("32-bit interface not supported");
184 1.1 uch case APM_ERR_UNRECOG_DEV:
185 1.1 uch return ("unrecognized device ID");
186 1.1 uch case APM_ERR_ERANGE:
187 1.1 uch return ("parameter out of range");
188 1.1 uch case APM_ERR_NOTENGAGED:
189 1.1 uch return ("interface not engaged");
190 1.1 uch case APM_ERR_UNABLE:
191 1.1 uch return ("unable to enter requested state");
192 1.1 uch case APM_ERR_NOEVENTS:
193 1.1 uch return ("no pending events");
194 1.1 uch case APM_ERR_NOT_PRESENT:
195 1.1 uch return ("no APM present");
196 1.1 uch default:
197 1.1 uch return ("unknown error code");
198 1.1 uch }
199 1.1 uch }
200 1.1 uch
201 1.1 uch static void
202 1.1 uch apm_perror(const char *str, int errinfo, ...) /* XXX cgd */
203 1.1 uch {
204 1.1 uch va_list ap;
205 1.1 uch
206 1.1 uch printf("APM ");
207 1.1 uch
208 1.1 uch va_start(ap, errinfo);
209 1.1 uch vprintf(str, ap); /* XXX cgd */
210 1.1 uch va_end(ap);
211 1.1 uch
212 1.1 uch printf(": %s\n", apm_strerror(errinfo));
213 1.1 uch }
214 1.1 uch
215 1.1 uch #ifdef APM_POWER_PRINT
216 1.1 uch static void
217 1.1 uch apm_power_print(struct apm_softc *sc, struct apm_power_info *pi)
218 1.1 uch {
219 1.1 uch
220 1.1 uch if (pi->battery_life != APM_BATT_LIFE_UNKNOWN) {
221 1.20 uwe aprint_normal_dev(sc->sc_dev,
222 1.20 uwe "battery life expectancy: %d%%\n",
223 1.20 uwe pi->battery_life);
224 1.1 uch }
225 1.20 uwe aprint_normal_dev(sc->sc_dev, "A/C state: ");
226 1.1 uch switch (pi->ac_state) {
227 1.1 uch case APM_AC_OFF:
228 1.1 uch printf("off\n");
229 1.1 uch break;
230 1.1 uch case APM_AC_ON:
231 1.1 uch printf("on\n");
232 1.1 uch break;
233 1.1 uch case APM_AC_BACKUP:
234 1.1 uch printf("backup power\n");
235 1.1 uch break;
236 1.1 uch default:
237 1.1 uch case APM_AC_UNKNOWN:
238 1.1 uch printf("unknown\n");
239 1.1 uch break;
240 1.1 uch }
241 1.20 uwe aprint_normal_dev(sc->sc_dev, "battery charge state:");
242 1.20 uwe if (apm_minver == 0)
243 1.1 uch switch (pi->battery_state) {
244 1.1 uch case APM_BATT_HIGH:
245 1.1 uch printf("high\n");
246 1.1 uch break;
247 1.1 uch case APM_BATT_LOW:
248 1.1 uch printf("low\n");
249 1.1 uch break;
250 1.1 uch case APM_BATT_CRITICAL:
251 1.1 uch printf("critical\n");
252 1.1 uch break;
253 1.1 uch case APM_BATT_CHARGING:
254 1.1 uch printf("charging\n");
255 1.1 uch break;
256 1.1 uch case APM_BATT_UNKNOWN:
257 1.1 uch printf("unknown\n");
258 1.1 uch break;
259 1.1 uch default:
260 1.1 uch printf("undecoded state %x\n", pi->battery_state);
261 1.1 uch break;
262 1.1 uch }
263 1.20 uwe else if (apm_minver >= 1) {
264 1.20 uwe if (pi->battery_flags & APM_BATT_FLAG_NO_SYSTEM_BATTERY)
265 1.20 uwe printf(" no battery");
266 1.20 uwe else {
267 1.20 uwe if (pi->battery_flags & APM_BATT_FLAG_HIGH)
268 1.20 uwe printf(" high");
269 1.20 uwe if (pi->battery_flags & APM_BATT_FLAG_LOW)
270 1.20 uwe printf(" low");
271 1.20 uwe if (pi->battery_flags & APM_BATT_FLAG_CRITICAL)
272 1.20 uwe printf(" critical");
273 1.20 uwe if (pi->battery_flags & APM_BATT_FLAG_CHARGING)
274 1.20 uwe printf(" charging");
275 1.20 uwe }
276 1.20 uwe printf("\n");
277 1.20 uwe if (pi->minutes_valid) {
278 1.20 uwe aprint_normal_dev(sc->sc_dev, "estimated ");
279 1.20 uwe if (pi->minutes_left / 60)
280 1.20 uwe printf("%dh ", pi->minutes_left / 60);
281 1.20 uwe printf("%dm\n", pi->minutes_left % 60);
282 1.1 uch }
283 1.1 uch }
284 1.1 uch return;
285 1.1 uch }
286 1.1 uch #endif
287 1.1 uch
288 1.1 uch static void
289 1.1 uch apm_suspend(struct apm_softc *sc)
290 1.1 uch {
291 1.20 uwe int error;
292 1.1 uch
293 1.1 uch if (sc->sc_power_state == PWR_SUSPEND) {
294 1.1 uch #ifdef APMDEBUG
295 1.20 uwe aprint_debug_dev(sc->sc_dev,
296 1.20 uwe "apm_suspend: already suspended?\n");
297 1.1 uch #endif
298 1.1 uch return;
299 1.1 uch }
300 1.1 uch sc->sc_power_state = PWR_SUSPEND;
301 1.1 uch
302 1.1 uch dopowerhooks(PWR_SOFTSUSPEND);
303 1.1 uch (void) tsleep(sc, PWAIT, "apmsuspend", hz/2);
304 1.1 uch
305 1.1 uch apm_spl = splhigh();
306 1.1 uch
307 1.1 uch dopowerhooks(PWR_SUSPEND);
308 1.1 uch
309 1.20 uwe error = (*sc->sc_ops->aa_set_powstate)(sc->sc_cookie, APM_DEV_ALLDEVS,
310 1.20 uwe APM_SYS_SUSPEND);
311 1.21 uwe
312 1.21 uwe if (error)
313 1.21 uwe apm_resume(sc, 0, 0);
314 1.1 uch }
315 1.1 uch
316 1.1 uch static void
317 1.1 uch apm_standby(struct apm_softc *sc)
318 1.1 uch {
319 1.20 uwe int error;
320 1.1 uch
321 1.1 uch if (sc->sc_power_state == PWR_STANDBY) {
322 1.1 uch #ifdef APMDEBUG
323 1.20 uwe aprint_debug_dev(sc->sc_dev,
324 1.20 uwe "apm_standby: already standing by?\n");
325 1.1 uch #endif
326 1.1 uch return;
327 1.1 uch }
328 1.1 uch sc->sc_power_state = PWR_STANDBY;
329 1.1 uch
330 1.1 uch dopowerhooks(PWR_SOFTSTANDBY);
331 1.1 uch (void) tsleep(sc, PWAIT, "apmstandby", hz/2);
332 1.1 uch
333 1.1 uch apm_spl = splhigh();
334 1.1 uch
335 1.1 uch dopowerhooks(PWR_STANDBY);
336 1.20 uwe
337 1.20 uwe error = (*sc->sc_ops->aa_set_powstate)(sc->sc_cookie, APM_DEV_ALLDEVS,
338 1.20 uwe APM_SYS_STANDBY);
339 1.21 uwe if (error)
340 1.21 uwe apm_resume(sc, 0, 0);
341 1.1 uch }
342 1.1 uch
343 1.1 uch static void
344 1.9 christos apm_resume(struct apm_softc *sc, u_int event_type, u_int event_info)
345 1.1 uch {
346 1.1 uch
347 1.1 uch if (sc->sc_power_state == PWR_RESUME) {
348 1.1 uch #ifdef APMDEBUG
349 1.20 uwe aprint_debug_dev(sc->sc_dev, "apm_resume: already running?\n");
350 1.1 uch #endif
351 1.1 uch return;
352 1.1 uch }
353 1.1 uch sc->sc_power_state = PWR_RESUME;
354 1.1 uch
355 1.20 uwe #if 0 /* XXX: def TIME_FREQ */
356 1.1 uch /*
357 1.1 uch * Some system requires its clock to be initialized after hybernation.
358 1.1 uch */
359 1.20 uwe initrtclock(TIMER_FREQ);
360 1.20 uwe #endif
361 1.1 uch
362 1.6 gdamore inittodr(time_second);
363 1.1 uch dopowerhooks(PWR_RESUME);
364 1.1 uch
365 1.1 uch splx(apm_spl);
366 1.1 uch
367 1.1 uch dopowerhooks(PWR_SOFTRESUME);
368 1.1 uch
369 1.1 uch apm_record_event(sc, event_type);
370 1.1 uch }
371 1.1 uch
372 1.1 uch /*
373 1.1 uch * return 0 if the user will notice and handle the event,
374 1.1 uch * return 1 if the kernel driver should do so.
375 1.1 uch */
376 1.1 uch static int
377 1.1 uch apm_record_event(struct apm_softc *sc, u_int event_type)
378 1.1 uch {
379 1.1 uch struct apm_event_info *evp;
380 1.1 uch
381 1.1 uch if ((sc->sc_flags & SCFLAG_OPEN) == 0)
382 1.1 uch return 1; /* no user waiting */
383 1.20 uwe if (sc->sc_event_count == APM_NEVENTS)
384 1.1 uch return 1; /* overflow */
385 1.20 uwe evp = &sc->sc_event_list[sc->sc_event_ptr];
386 1.20 uwe sc->sc_event_count++;
387 1.20 uwe sc->sc_event_ptr++;
388 1.20 uwe sc->sc_event_ptr %= APM_NEVENTS;
389 1.1 uch evp->type = event_type;
390 1.1 uch evp->index = ++apm_evindex;
391 1.16 rmind selnotify(&sc->sc_rsel, 0, 0);
392 1.1 uch return (sc->sc_flags & SCFLAG_OWRITE) ? 0 : 1; /* user may handle */
393 1.1 uch }
394 1.1 uch
395 1.1 uch static void
396 1.1 uch apm_event_handle(struct apm_softc *sc, u_int event_code, u_int event_info)
397 1.1 uch {
398 1.1 uch int error;
399 1.3 uwe const char *code;
400 1.1 uch struct apm_power_info pi;
401 1.1 uch
402 1.1 uch switch (event_code) {
403 1.1 uch case APM_USER_STANDBY_REQ:
404 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: user standby request\n"));
405 1.1 uch if (apm_do_standby) {
406 1.21 uwe if (apm_op_inprog == 0 && apm_record_event(sc, event_code))
407 1.1 uch apm_userstandbys++;
408 1.1 uch apm_op_inprog++;
409 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
410 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_INPROG);
411 1.1 uch } else {
412 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
413 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_REJECTED);
414 1.1 uch /* in case BIOS hates being spurned */
415 1.20 uwe (*sc->sc_ops->aa_enable)(sc->sc_cookie, 1);
416 1.1 uch }
417 1.1 uch break;
418 1.1 uch
419 1.1 uch case APM_STANDBY_REQ:
420 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: system standby request\n"));
421 1.1 uch if (apm_standbys || apm_suspends) {
422 1.1 uch DPRINTF(APMDEBUG_EVENTS | APMDEBUG_ANOM,
423 1.1 uch ("damn fool BIOS did not wait for answer\n"));
424 1.1 uch /* just give up the fight */
425 1.1 uch apm_damn_fool_bios = 1;
426 1.1 uch }
427 1.1 uch if (apm_do_standby) {
428 1.21 uwe if (apm_op_inprog == 0 &&
429 1.21 uwe apm_record_event(sc, event_code))
430 1.1 uch apm_standbys++;
431 1.1 uch apm_op_inprog++;
432 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
433 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_INPROG);
434 1.1 uch } else {
435 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
436 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_REJECTED);
437 1.1 uch /* in case BIOS hates being spurned */
438 1.20 uwe (*sc->sc_ops->aa_enable)(sc->sc_cookie, 1);
439 1.1 uch }
440 1.1 uch break;
441 1.1 uch
442 1.1 uch case APM_USER_SUSPEND_REQ:
443 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: user suspend request\n"));
444 1.21 uwe if (apm_op_inprog == 0 && apm_record_event(sc, event_code))
445 1.1 uch apm_suspends++;
446 1.1 uch apm_op_inprog++;
447 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
448 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_INPROG);
449 1.1 uch break;
450 1.1 uch
451 1.1 uch case APM_SUSPEND_REQ:
452 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: system suspend request\n"));
453 1.1 uch if (apm_standbys || apm_suspends) {
454 1.1 uch DPRINTF(APMDEBUG_EVENTS | APMDEBUG_ANOM,
455 1.1 uch ("damn fool BIOS did not wait for answer\n"));
456 1.1 uch /* just give up the fight */
457 1.1 uch apm_damn_fool_bios = 1;
458 1.1 uch }
459 1.21 uwe if (apm_op_inprog == 0 && apm_record_event(sc, event_code))
460 1.1 uch apm_suspends++;
461 1.1 uch apm_op_inprog++;
462 1.20 uwe (void)(*sc->sc_ops->aa_set_powstate)(sc->sc_cookie,
463 1.20 uwe APM_DEV_ALLDEVS, APM_LASTREQ_INPROG);
464 1.1 uch break;
465 1.1 uch
466 1.1 uch case APM_POWER_CHANGE:
467 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: power status change\n"));
468 1.22 uwe error = (*sc->sc_ops->aa_get_powstat)(sc->sc_cookie, 0, &pi);
469 1.1 uch #ifdef APM_POWER_PRINT
470 1.1 uch /* only print if nobody is catching events. */
471 1.1 uch if (error == 0 &&
472 1.1 uch (sc->sc_flags & (SCFLAG_OREAD|SCFLAG_OWRITE)) == 0)
473 1.1 uch apm_power_print(sc, &pi);
474 1.28 christos #else
475 1.28 christos __USE(error);
476 1.1 uch #endif
477 1.1 uch apm_record_event(sc, event_code);
478 1.1 uch break;
479 1.1 uch
480 1.1 uch case APM_NORMAL_RESUME:
481 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: resume system\n"));
482 1.1 uch apm_resume(sc, event_code, event_info);
483 1.1 uch break;
484 1.1 uch
485 1.1 uch case APM_CRIT_RESUME:
486 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: critical resume system"));
487 1.1 uch apm_resume(sc, event_code, event_info);
488 1.1 uch break;
489 1.1 uch
490 1.1 uch case APM_SYS_STANDBY_RESUME:
491 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: system standby resume\n"));
492 1.1 uch apm_resume(sc, event_code, event_info);
493 1.1 uch break;
494 1.1 uch
495 1.1 uch case APM_UPDATE_TIME:
496 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: update time\n"));
497 1.1 uch apm_resume(sc, event_code, event_info);
498 1.1 uch break;
499 1.1 uch
500 1.1 uch case APM_CRIT_SUSPEND_REQ:
501 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: critical system suspend\n"));
502 1.1 uch apm_record_event(sc, event_code);
503 1.1 uch apm_suspend(sc);
504 1.1 uch break;
505 1.1 uch
506 1.1 uch case APM_BATTERY_LOW:
507 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: battery low\n"));
508 1.1 uch apm_battlow++;
509 1.1 uch apm_record_event(sc, event_code);
510 1.1 uch break;
511 1.1 uch
512 1.1 uch case APM_CAP_CHANGE:
513 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apmev: capability change\n"));
514 1.1 uch if (apm_minver < 2) {
515 1.1 uch DPRINTF(APMDEBUG_EVENTS, ("apm: unexpected event\n"));
516 1.1 uch } else {
517 1.1 uch u_int numbatts, capflags;
518 1.20 uwe (*sc->sc_ops->aa_get_capabilities)(sc->sc_cookie,
519 1.20 uwe &numbatts, &capflags);
520 1.22 uwe (*sc->sc_ops->aa_get_powstat)(sc->sc_cookie, 0, &pi);
521 1.1 uch }
522 1.1 uch break;
523 1.1 uch
524 1.1 uch default:
525 1.1 uch switch (event_code >> 8) {
526 1.1 uch case 0:
527 1.1 uch code = "reserved system";
528 1.1 uch break;
529 1.1 uch case 1:
530 1.1 uch code = "reserved device";
531 1.1 uch break;
532 1.1 uch case 2:
533 1.1 uch code = "OEM defined";
534 1.1 uch break;
535 1.1 uch default:
536 1.1 uch code = "reserved";
537 1.1 uch break;
538 1.2 perry }
539 1.1 uch printf("APM: %s event code %x\n", code, event_code);
540 1.1 uch }
541 1.1 uch }
542 1.1 uch
543 1.1 uch static void
544 1.1 uch apm_periodic_check(struct apm_softc *sc)
545 1.1 uch {
546 1.1 uch int error;
547 1.1 uch u_int event_code, event_info;
548 1.2 perry
549 1.1 uch
550 1.1 uch /*
551 1.1 uch * tell the BIOS we're working on it, if asked to do a
552 1.1 uch * suspend/standby
553 1.1 uch */
554 1.1 uch if (apm_op_inprog)
555 1.20 uwe (*sc->sc_ops->aa_set_powstate)(sc->sc_cookie, APM_DEV_ALLDEVS,
556 1.20 uwe APM_LASTREQ_INPROG);
557 1.1 uch
558 1.20 uwe while ((error = (*sc->sc_ops->aa_get_event)(sc->sc_cookie, &event_code,
559 1.20 uwe &event_info)) == 0 && !apm_damn_fool_bios)
560 1.1 uch apm_event_handle(sc, event_code, event_info);
561 1.1 uch
562 1.1 uch if (error != APM_ERR_NOEVENTS)
563 1.1 uch apm_perror("get event", error);
564 1.1 uch if (apm_suspends) {
565 1.1 uch apm_op_inprog = 0;
566 1.1 uch apm_suspend(sc);
567 1.1 uch } else if (apm_standbys || apm_userstandbys) {
568 1.1 uch apm_op_inprog = 0;
569 1.1 uch apm_standby(sc);
570 1.1 uch }
571 1.1 uch apm_suspends = apm_standbys = apm_battlow = apm_userstandbys = 0;
572 1.1 uch apm_damn_fool_bios = 0;
573 1.1 uch }
574 1.1 uch
575 1.1 uch static void
576 1.20 uwe apm_set_ver(struct apm_softc *sc)
577 1.1 uch {
578 1.1 uch
579 1.1 uch if (apm_v12_enabled &&
580 1.20 uwe APM_MAJOR_VERS(sc->sc_vers) == 1 &&
581 1.20 uwe APM_MINOR_VERS(sc->sc_vers) == 2) {
582 1.1 uch apm_majver = 1;
583 1.1 uch apm_minver = 2;
584 1.1 uch goto ok;
585 1.1 uch }
586 1.1 uch
587 1.1 uch if (apm_v11_enabled &&
588 1.20 uwe APM_MAJOR_VERS(sc->sc_vers) == 1 &&
589 1.20 uwe APM_MINOR_VERS(sc->sc_vers) == 1) {
590 1.1 uch apm_majver = 1;
591 1.1 uch apm_minver = 1;
592 1.1 uch } else {
593 1.1 uch apm_majver = 1;
594 1.1 uch apm_minver = 0;
595 1.1 uch }
596 1.1 uch ok:
597 1.20 uwe aprint_normal("Power Management spec V%d.%d", apm_majver, apm_minver);
598 1.1 uch apm_inited = 1;
599 1.1 uch }
600 1.1 uch
601 1.1 uch static int
602 1.21 uwe apmdevmatch(device_t parent, cfdata_t match, void *aux)
603 1.1 uch {
604 1.21 uwe
605 1.21 uwe return apm_match();
606 1.1 uch }
607 1.1 uch
608 1.1 uch static void
609 1.21 uwe apmdevattach(device_t parent, device_t self, void *aux)
610 1.1 uch {
611 1.20 uwe struct apm_softc *sc;
612 1.1 uch struct apmdev_attach_args *aaa = aux;
613 1.1 uch
614 1.20 uwe sc = device_private(self);
615 1.20 uwe sc->sc_dev = self;
616 1.20 uwe
617 1.20 uwe sc->sc_detail = aaa->apm_detail;
618 1.20 uwe sc->sc_vers = aaa->apm_detail & 0xffff; /* XXX: magic */
619 1.20 uwe
620 1.20 uwe sc->sc_ops = aaa->accessops;
621 1.20 uwe sc->sc_cookie = aaa->accesscookie;
622 1.1 uch
623 1.21 uwe apm_attach(sc);
624 1.21 uwe }
625 1.21 uwe
626 1.21 uwe /*
627 1.21 uwe * Print function (for parent devices).
628 1.21 uwe */
629 1.21 uwe int
630 1.21 uwe apmprint(void *aux, const char *pnp)
631 1.21 uwe {
632 1.21 uwe if (pnp)
633 1.21 uwe aprint_normal("apm at %s", pnp);
634 1.21 uwe
635 1.21 uwe return (UNCONF);
636 1.21 uwe }
637 1.21 uwe
638 1.21 uwe int
639 1.21 uwe apm_match(void)
640 1.21 uwe {
641 1.21 uwe static int got;
642 1.21 uwe return !got++;
643 1.21 uwe }
644 1.21 uwe
645 1.21 uwe void
646 1.21 uwe apm_attach(struct apm_softc *sc)
647 1.21 uwe {
648 1.21 uwe struct apm_power_info pinfo;
649 1.21 uwe u_int numbatts, capflags;
650 1.21 uwe int error;
651 1.21 uwe
652 1.20 uwe aprint_naive("\n");
653 1.20 uwe aprint_normal(": ");
654 1.1 uch
655 1.20 uwe switch ((APM_MAJOR_VERS(sc->sc_vers) << 8) + APM_MINOR_VERS(sc->sc_vers)) {
656 1.1 uch case 0x0100:
657 1.1 uch apm_v11_enabled = 0;
658 1.1 uch apm_v12_enabled = 0;
659 1.1 uch break;
660 1.1 uch case 0x0101:
661 1.1 uch apm_v12_enabled = 0;
662 1.1 uch /* fall through */
663 1.1 uch case 0x0102:
664 1.1 uch default:
665 1.1 uch break;
666 1.1 uch }
667 1.1 uch
668 1.20 uwe apm_set_ver(sc); /* prints version info */
669 1.20 uwe aprint_normal("\n");
670 1.1 uch if (apm_minver >= 2)
671 1.20 uwe (*sc->sc_ops->aa_get_capabilities)(sc->sc_cookie, &numbatts,
672 1.20 uwe &capflags);
673 1.1 uch
674 1.1 uch /*
675 1.1 uch * enable power management
676 1.1 uch */
677 1.20 uwe (*sc->sc_ops->aa_enable)(sc->sc_cookie, 1);
678 1.1 uch
679 1.22 uwe error = (*sc->sc_ops->aa_get_powstat)(sc->sc_cookie, 0, &pinfo);
680 1.1 uch if (error == 0) {
681 1.1 uch #ifdef APM_POWER_PRINT
682 1.20 uwe apm_power_print(sc, &pinfo);
683 1.1 uch #endif
684 1.1 uch } else
685 1.1 uch apm_perror("get power status", error);
686 1.1 uch
687 1.20 uwe if (sc->sc_ops->aa_cpu_busy)
688 1.20 uwe (*sc->sc_ops->aa_cpu_busy)(sc->sc_cookie);
689 1.20 uwe
690 1.20 uwe mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
691 1.1 uch
692 1.1 uch /* Initial state is `resumed'. */
693 1.1 uch sc->sc_power_state = PWR_RESUME;
694 1.20 uwe selinit(&sc->sc_rsel);
695 1.20 uwe selinit(&sc->sc_xsel);
696 1.1 uch
697 1.1 uch /* Do an initial check. */
698 1.1 uch apm_periodic_check(sc);
699 1.1 uch
700 1.1 uch /*
701 1.1 uch * Create a kernel thread to periodically check for APM events,
702 1.1 uch * and notify other subsystems when they occur.
703 1.1 uch */
704 1.11 ad if (kthread_create(PRI_NONE, 0, NULL, apm_thread, sc,
705 1.20 uwe &sc->sc_thread, "%s", device_xname(sc->sc_dev)) != 0) {
706 1.11 ad /*
707 1.11 ad * We were unable to create the APM thread; bail out.
708 1.11 ad */
709 1.20 uwe if (sc->sc_ops->aa_disconnect)
710 1.20 uwe (*sc->sc_ops->aa_disconnect)(sc->sc_cookie);
711 1.20 uwe aprint_error_dev(sc->sc_dev, "unable to create thread, "
712 1.17 cegger "kernel APM support disabled\n");
713 1.11 ad }
714 1.1 uch }
715 1.1 uch
716 1.1 uch void
717 1.1 uch apm_thread(void *arg)
718 1.1 uch {
719 1.1 uch struct apm_softc *apmsc = arg;
720 1.1 uch
721 1.1 uch /*
722 1.1 uch * Loop forever, doing a periodic check for APM events.
723 1.1 uch */
724 1.1 uch for (;;) {
725 1.1 uch APM_LOCK(apmsc);
726 1.1 uch apm_periodic_check(apmsc);
727 1.1 uch APM_UNLOCK(apmsc);
728 1.1 uch (void) tsleep(apmsc, PWAIT, "apmev", (8 * hz) / 7);
729 1.1 uch }
730 1.1 uch }
731 1.1 uch
732 1.1 uch int
733 1.9 christos apmdevopen(dev_t dev, int flag, int mode, struct lwp *l)
734 1.1 uch {
735 1.21 uwe int ctl = APM(dev);
736 1.1 uch int error = 0;
737 1.1 uch struct apm_softc *sc;
738 1.1 uch
739 1.19 rafal sc = device_lookup_private(&apmdev_cd, APMUNIT(dev));
740 1.1 uch if (!sc)
741 1.1 uch return ENXIO;
742 1.1 uch
743 1.1 uch if (!apm_inited)
744 1.1 uch return ENXIO;
745 1.2 perry
746 1.1 uch DPRINTF(APMDEBUG_DEVICE,
747 1.4 christos ("apmopen: pid %d flag %x mode %x\n", l->l_proc->p_pid, flag, mode));
748 1.1 uch
749 1.1 uch APM_LOCK(sc);
750 1.1 uch switch (ctl) {
751 1.21 uwe case APM_CTL:
752 1.1 uch if (!(flag & FWRITE)) {
753 1.1 uch error = EINVAL;
754 1.1 uch break;
755 1.1 uch }
756 1.1 uch if (sc->sc_flags & SCFLAG_OWRITE) {
757 1.1 uch error = EBUSY;
758 1.1 uch break;
759 1.1 uch }
760 1.1 uch sc->sc_flags |= SCFLAG_OWRITE;
761 1.1 uch break;
762 1.21 uwe case APM_NORMAL:
763 1.1 uch if (!(flag & FREAD) || (flag & FWRITE)) {
764 1.1 uch error = EINVAL;
765 1.1 uch break;
766 1.1 uch }
767 1.1 uch sc->sc_flags |= SCFLAG_OREAD;
768 1.1 uch break;
769 1.1 uch default:
770 1.1 uch error = ENXIO;
771 1.1 uch break;
772 1.1 uch }
773 1.1 uch APM_UNLOCK(sc);
774 1.1 uch
775 1.1 uch return (error);
776 1.1 uch }
777 1.1 uch
778 1.1 uch int
779 1.9 christos apmdevclose(dev_t dev, int flag, int mode,
780 1.9 christos struct lwp *l)
781 1.1 uch {
782 1.19 rafal struct apm_softc *sc = device_lookup_private(&apmdev_cd, APMUNIT(dev));
783 1.21 uwe int ctl = APM(dev);
784 1.1 uch
785 1.1 uch DPRINTF(APMDEBUG_DEVICE,
786 1.4 christos ("apmclose: pid %d flag %x mode %x\n", l->l_proc->p_pid, flag, mode));
787 1.1 uch
788 1.1 uch APM_LOCK(sc);
789 1.1 uch switch (ctl) {
790 1.21 uwe case APM_CTL:
791 1.1 uch sc->sc_flags &= ~SCFLAG_OWRITE;
792 1.1 uch break;
793 1.21 uwe case APM_NORMAL:
794 1.1 uch sc->sc_flags &= ~SCFLAG_OREAD;
795 1.1 uch break;
796 1.1 uch }
797 1.1 uch if ((sc->sc_flags & SCFLAG_OPEN) == 0) {
798 1.20 uwe sc->sc_event_count = 0;
799 1.20 uwe sc->sc_event_ptr = 0;
800 1.1 uch }
801 1.1 uch APM_UNLOCK(sc);
802 1.1 uch return 0;
803 1.1 uch }
804 1.1 uch
805 1.1 uch int
806 1.10 christos apmdevioctl(dev_t dev, u_long cmd, void *data, int flag,
807 1.9 christos struct lwp *l)
808 1.1 uch {
809 1.19 rafal struct apm_softc *sc = device_lookup_private(&apmdev_cd, APMUNIT(dev));
810 1.1 uch struct apm_power_info *powerp;
811 1.1 uch struct apm_event_info *evp;
812 1.1 uch #if 0
813 1.1 uch struct apm_ctl *actl;
814 1.1 uch #endif
815 1.1 uch int i, error = 0;
816 1.1 uch int batt_flags;
817 1.1 uch
818 1.1 uch APM_LOCK(sc);
819 1.1 uch switch (cmd) {
820 1.1 uch case APM_IOC_STANDBY:
821 1.1 uch if (!apm_do_standby) {
822 1.1 uch error = EOPNOTSUPP;
823 1.1 uch break;
824 1.1 uch }
825 1.1 uch
826 1.1 uch if ((flag & FWRITE) == 0) {
827 1.1 uch error = EBADF;
828 1.1 uch break;
829 1.1 uch }
830 1.1 uch apm_userstandbys++;
831 1.1 uch break;
832 1.1 uch
833 1.1 uch case APM_IOC_SUSPEND:
834 1.1 uch if ((flag & FWRITE) == 0) {
835 1.1 uch error = EBADF;
836 1.1 uch break;
837 1.1 uch }
838 1.1 uch apm_suspends++;
839 1.1 uch break;
840 1.1 uch
841 1.1 uch case APM_IOC_NEXTEVENT:
842 1.20 uwe if (!sc->sc_event_count)
843 1.1 uch error = EAGAIN;
844 1.1 uch else {
845 1.1 uch evp = (struct apm_event_info *)data;
846 1.20 uwe i = sc->sc_event_ptr + APM_NEVENTS - sc->sc_event_count;
847 1.1 uch i %= APM_NEVENTS;
848 1.20 uwe *evp = sc->sc_event_list[i];
849 1.20 uwe sc->sc_event_count--;
850 1.1 uch }
851 1.1 uch break;
852 1.1 uch
853 1.5 cube case OAPM_IOC_GETPOWER:
854 1.1 uch case APM_IOC_GETPOWER:
855 1.1 uch powerp = (struct apm_power_info *)data;
856 1.22 uwe if ((error = (*sc->sc_ops->aa_get_powstat)(sc->sc_cookie, 0,
857 1.20 uwe powerp)) != 0) {
858 1.1 uch apm_perror("ioctl get power status", error);
859 1.1 uch error = EIO;
860 1.1 uch break;
861 1.1 uch }
862 1.1 uch switch (apm_minver) {
863 1.1 uch case 0:
864 1.1 uch break;
865 1.1 uch case 1:
866 1.1 uch default:
867 1.20 uwe batt_flags = powerp->battery_flags;
868 1.1 uch powerp->battery_state = APM_BATT_UNKNOWN;
869 1.1 uch if (batt_flags & APM_BATT_FLAG_HIGH)
870 1.1 uch powerp->battery_state = APM_BATT_HIGH;
871 1.1 uch else if (batt_flags & APM_BATT_FLAG_LOW)
872 1.1 uch powerp->battery_state = APM_BATT_LOW;
873 1.1 uch else if (batt_flags & APM_BATT_FLAG_CRITICAL)
874 1.1 uch powerp->battery_state = APM_BATT_CRITICAL;
875 1.1 uch else if (batt_flags & APM_BATT_FLAG_CHARGING)
876 1.1 uch powerp->battery_state = APM_BATT_CHARGING;
877 1.1 uch else if (batt_flags & APM_BATT_FLAG_NO_SYSTEM_BATTERY)
878 1.1 uch powerp->battery_state = APM_BATT_ABSENT;
879 1.1 uch break;
880 1.1 uch }
881 1.1 uch break;
882 1.2 perry
883 1.1 uch default:
884 1.1 uch error = ENOTTY;
885 1.1 uch }
886 1.1 uch APM_UNLOCK(sc);
887 1.1 uch
888 1.1 uch return (error);
889 1.1 uch }
890 1.1 uch
891 1.1 uch int
892 1.4 christos apmdevpoll(dev_t dev, int events, struct lwp *l)
893 1.1 uch {
894 1.19 rafal struct apm_softc *sc = device_lookup_private(&apmdev_cd, APMUNIT(dev));
895 1.1 uch int revents = 0;
896 1.1 uch
897 1.1 uch APM_LOCK(sc);
898 1.1 uch if (events & (POLLIN | POLLRDNORM)) {
899 1.20 uwe if (sc->sc_event_count)
900 1.1 uch revents |= events & (POLLIN | POLLRDNORM);
901 1.1 uch else
902 1.4 christos selrecord(l, &sc->sc_rsel);
903 1.1 uch }
904 1.1 uch APM_UNLOCK(sc);
905 1.1 uch
906 1.1 uch return (revents);
907 1.1 uch }
908 1.1 uch
909 1.1 uch static void
910 1.1 uch filt_apmrdetach(struct knote *kn)
911 1.1 uch {
912 1.1 uch struct apm_softc *sc = kn->kn_hook;
913 1.1 uch
914 1.2 perry APM_LOCK(sc);
915 1.1 uch SLIST_REMOVE(&sc->sc_rsel.sel_klist, kn, knote, kn_selnext);
916 1.1 uch APM_UNLOCK(sc);
917 1.1 uch }
918 1.1 uch
919 1.1 uch static int
920 1.9 christos filt_apmread(struct knote *kn, long hint)
921 1.1 uch {
922 1.1 uch struct apm_softc *sc = kn->kn_hook;
923 1.1 uch
924 1.20 uwe kn->kn_data = sc->sc_event_count;
925 1.1 uch return (kn->kn_data > 0);
926 1.1 uch }
927 1.1 uch
928 1.1 uch static const struct filterops apmread_filtops =
929 1.1 uch { 1, NULL, filt_apmrdetach, filt_apmread };
930 1.1 uch
931 1.1 uch int
932 1.1 uch apmdevkqfilter(dev_t dev, struct knote *kn)
933 1.1 uch {
934 1.19 rafal struct apm_softc *sc = device_lookup_private(&apmdev_cd, APMUNIT(dev));
935 1.1 uch struct klist *klist;
936 1.1 uch
937 1.1 uch switch (kn->kn_filter) {
938 1.1 uch case EVFILT_READ:
939 1.1 uch klist = &sc->sc_rsel.sel_klist;
940 1.1 uch kn->kn_fop = &apmread_filtops;
941 1.1 uch break;
942 1.1 uch
943 1.1 uch default:
944 1.14 pooka return (EINVAL);
945 1.1 uch }
946 1.1 uch
947 1.1 uch kn->kn_hook = sc;
948 1.1 uch
949 1.1 uch APM_LOCK(sc);
950 1.1 uch SLIST_INSERT_HEAD(klist, kn, kn_selnext);
951 1.1 uch APM_UNLOCK(sc);
952 1.1 uch
953 1.1 uch return (0);
954 1.1 uch }
955