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