/*
* APM events can be requested direclty from /dev/apm
*/
static int
bsdPMGetEventFromOS(int kq, pmEvent *events, int num)
{
struct kevent ev;
int i, result;
struct timespec ts = { 0, 0 };
for (i = 0; i < num; i++) {
result = kevent(kq, NULL, 0, &ev, 1, &ts);
if (result == 0 || APM_EVENT_TYPE(ev.data) == APM_NOEVENT) {
/* no event */
break;
} else if (result < 0) {
xf86Msg(X_WARNING, "bsdPMGetEventFromOS: kevent returns"
" errno = %d\n", errno);
break;
}
events[i] = bsdToXF86(APM_EVENT_TYPE(ev.data));
}
return i;
}
/* thread doing kqueue() on apm device */
static gpointer
up_backend_apm_event_thread(gpointer object)
{
int kq, nevents;
struct kevent ev;
struct timespec ts = {600, 0}, sts = {0, 0};
UpBackend *backend;
g_return_val_if_fail (UP_IS_BACKEND (object), NULL);
backend = UP_BACKEND (object);
g_debug("setting up apm thread");
kq = kqueue();
if (kq <= 0)
g_error("kqueue");
EV_SET(&ev, up_apm_get_fd(), EVFILT_READ, EV_ADD | EV_ENABLE | EV_CLEAR,
0, 0, NULL);
nevents = 1;
if (kevent(kq, &ev, nevents, NULL, 0, &sts) < 0)
g_error("kevent");
/* blocking wait on kqueue */
for (;;) {
int rv;
/* 10mn timeout */
sts = ts;
if ((rv = kevent(kq, NULL, 0, &ev, 1, &sts)) < 0)
break;
if (!rv)
continue;
if (ev.ident == (guint) up_apm_get_fd() && APM_EVENT_TYPE(ev.data) == APM_POWER_CHANGE ) {
/* g_idle_add the callback */
g_idle_add((GSourceFunc) up_backend_apm_powerchange_event_cb, backend);
}
}
return NULL;
/* shouldnt be reached ? */
}
int
main(int argc, char *argv[])
{
const char *fname = apmdev;
int ctl_fd, sock_fd, ch, suspends, standbys, resumes;
int statonly = 0;
int powerstatus = 0, powerbak = 0, powerchange = 0;
int noacsleep = 0;
struct timespec ts = {TIMO, 0}, sts = {0, 0};
struct apm_power_info pinfo;
time_t apmtimeout = 0;
const char *sockname = sockfile;
int kq, nchanges;
struct kevent ev[2];
int ncpu_mib[2] = { CTL_HW, HW_NCPU };
int ncpu;
size_t ncpu_sz = sizeof(ncpu);
while ((ch = getopt(argc, argv, "aACdHLsf:t:S:")) != -1)
switch(ch) {
case 'a':
noacsleep = 1;
break;
case 'd':
debug = 1;
break;
case 'f':
fname = optarg;
break;
case 'S':
sockname = optarg;
break;
case 't':
ts.tv_sec = strtoul(optarg, NULL, 0);
if (ts.tv_sec == 0)
usage();
break;
case 's': /* status only */
statonly = 1;
break;
case 'A':
if (doperf != PERF_NONE)
usage();
doperf = PERF_AUTO;
break;
case 'C':
if (doperf != PERF_NONE)
usage();
doperf = PERF_COOL;
break;
case 'L':
if (doperf != PERF_NONE)
usage();
doperf = PERF_MANUAL;
setperf(PERFMIN);
break;
case 'H':
if (doperf != PERF_NONE)
usage();
doperf = PERF_MANUAL;
setperf(PERFMAX);
break;
case '?':
default:
usage();
}
argc -= optind;
argv += optind;
if (argc != 0)
usage();
if (doperf == PERF_NONE)
doperf = PERF_MANUAL;
if (debug)
openlog(__progname, LOG_CONS, LOG_LOCAL1);
else {
if (daemon(0, 0) < 0)
error("failed to daemonize", NULL);
openlog(__progname, LOG_CONS, LOG_DAEMON);
setlogmask(LOG_UPTO(LOG_NOTICE));
}
(void) signal(SIGTERM, sigexit);
(void) signal(SIGHUP, sigexit);
(void) signal(SIGINT, sigexit);
if ((ctl_fd = open(fname, O_RDWR)) == -1) {
if (errno != ENXIO && errno != ENOENT)
error("cannot open device file `%s'", fname);
} else if (fcntl(ctl_fd, F_SETFD, FD_CLOEXEC) == -1)
error("cannot set close-on-exec for `%s'", fname);
sock_fd = bind_socket(sockname);
if (fcntl(sock_fd, F_SETFD, FD_CLOEXEC) == -1)
error("cannot set close-on-exec for the socket", NULL);
power_status(ctl_fd, 1, &pinfo);
if (statonly)
exit(0);
set_driver_messages(ctl_fd, APM_PRINT_OFF);
kq = kqueue();
if (kq <= 0)
error("kqueue", NULL);
EV_SET(&ev[0], sock_fd, EVFILT_READ, EV_ADD | EV_ENABLE | EV_CLEAR,
0, 0, NULL);
if (ctl_fd == -1)
nchanges = 1;
else {
EV_SET(&ev[1], ctl_fd, EVFILT_READ, EV_ADD | EV_ENABLE |
EV_CLEAR, 0, 0, NULL);
nchanges = 2;
}
if (kevent(kq, ev, nchanges, NULL, 0, &sts) < 0)
error("kevent", NULL);
if (sysctl(ncpu_mib, 2, &ncpu, &ncpu_sz, NULL, 0) < 0)
error("cannot read hw.ncpu", NULL);
if (doperf == PERF_AUTO || doperf == PERF_COOL) {
setperf(0);
setperf(100);
}
for (;;) {
int rv;
sts = ts;
if (doperf == PERF_AUTO || doperf == PERF_COOL) {
sts.tv_sec = 1;
perf_status(&pinfo, ncpu);
}
apmtimeout += sts.tv_sec;
if ((rv = kevent(kq, NULL, 0, ev, 1, &sts)) < 0)
break;
if (apmtimeout >= ts.tv_sec) {
apmtimeout = 0;
/* wakeup for timeout: take status */
powerbak = power_status(ctl_fd, 0, &pinfo);
if (powerstatus != powerbak) {
powerstatus = powerbak;
powerchange = 1;
}
}
if (!rv)
continue;
if (ev->ident == ctl_fd) {
suspends = standbys = resumes = 0;
syslog(LOG_DEBUG, "apmevent %04x index %d",
(int)APM_EVENT_TYPE(ev->data),
(int)APM_EVENT_INDEX(ev->data));
switch (APM_EVENT_TYPE(ev->data)) {
case APM_SUSPEND_REQ:
case APM_USER_SUSPEND_REQ:
case APM_CRIT_SUSPEND_REQ:
case APM_BATTERY_LOW:
suspends++;
break;
case APM_USER_STANDBY_REQ:
case APM_STANDBY_REQ:
standbys++;
break;
#if 0
case APM_CANCEL:
suspends = standbys = 0;
break;
#endif
case APM_NORMAL_RESUME:
case APM_CRIT_RESUME:
case APM_SYS_STANDBY_RESUME:
powerbak = power_status(ctl_fd, 0, &pinfo);
if (powerstatus != powerbak) {
powerstatus = powerbak;
powerchange = 1;
}
resumes++;
break;
case APM_POWER_CHANGE:
powerbak = power_status(ctl_fd, 0, &pinfo);
if (powerstatus != powerbak) {
powerstatus = powerbak;
powerchange = 1;
}
break;
default:
;
}
if ((standbys || suspends) && noacsleep &&
power_status(ctl_fd, 0, &pinfo))
syslog(LOG_DEBUG, "no! sleep! till brooklyn!");
else if (suspends)
suspend(ctl_fd);
else if (standbys)
stand_by(ctl_fd);
else if (resumes) {
do_etc_file(_PATH_APM_ETC_RESUME);
syslog(LOG_NOTICE,
"system resumed from sleep");
}
if (powerchange) {
if (powerstatus)
do_etc_file(_PATH_APM_ETC_POWERUP);
else
do_etc_file(_PATH_APM_ETC_POWERDOWN);
powerchange = 0;
}
} else if (ev->ident == sock_fd)
switch (handle_client(sock_fd, ctl_fd)) {
case NORMAL:
break;
case SUSPENDING:
suspend(ctl_fd);
break;
case STANDING_BY:
stand_by(ctl_fd);
break;
case HIBERNATING:
hibernate(ctl_fd);
break;
}
}
error("kevent loop", NULL);
return 1;
}