wmbattery/wmbattery.c

   1 /* wmbattery - display laptop battery info, dockable in WindowMaker
   2  * Copyright (C) 1998-2014 Joey Hess <joey@kitenet.net>
   3  * Copyright (C) 2014 Window Maker Developers Team
   4  *                      <wmaker-dev@googlegroups.com>
   5  *
   6  * Portions of code derived from:
   7  *   wmapm - Copyright (C) 1998-1999 Chris D. Faulhaber <jedgar@fxp.org>
   8  *   wmmon - Copyright (C) 1998 Martijn Pieterse <pieterse@xs4all.nl>
   9  *           Copyright (C) 1998 Antoine Nulle <warp@xs4all.nl>
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of version 2 of the GNU General Public License
  13  * as published by the Free Software Foundation.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program.  If not, see <http://www.gnu.org/licenses/>. */
  22
  23 #include <stdio.h>
  24 #include <unistd.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <X11/xpm.h>
  28 #include <X11/extensions/shape.h>
  29 #include <stdarg.h>
  30 #include <signal.h>
  31 #include <time.h>
  32 #include <errno.h>
  33 #include <fcntl.h>
  34 #include <sys/types.h>
  35 #include <sys/stat.h>
  36 #include "wmbattery.h"
  37
  38 #ifdef HAVE_GETOPT_H
  39 #include <getopt.h>
  40 #endif
  41
  42 #include "mask.xbm"
  43 #include "mask_nodial.xbm"
  44 #include "sonypi.h"
  45 #include "acpi.h"
  46 #ifdef HAL
  47 #include "simplehal.h"
  48 #endif
  49 #ifdef UPOWER
  50 #include "upower.h"
  51 #endif
  52
  53 Pixmap images[NUM_IMAGES];
  54 Window root, iconwin, win;
  55 int screen;
  56 XpmIcon icon;
  57 Display *display;
  58 GC NormalGC;
  59 char *user_geom = NULL;
  60
  61 #ifdef HAVE__DEV_APM
  62 #define APM_STATUS_FILE "/dev/apm"
  63 #else
  64 #define APM_STATUS_FILE "/proc/apm"
  65 #endif
  66
  67 char *apm_status_file = APM_STATUS_FILE;
  68
  69 char *crit_audio_fn = NULL;
  70 char *crit_audio;
  71 int crit_audio_size;
  72 char *crit_command = NULL;
  73
  74 int battnum = 1;
  75 #ifdef HAL
  76 int use_simplehal = 0;
  77 #endif
  78 #ifdef UPOWER
  79 int use_upower = 0;
  80 #endif
  81 int use_sonypi = 0;
  82 int use_acpi = 0;
  83 int delay = 0;
  84 int always_estimate_remaining = 0;
  85 int granularity_estimate_remaining = 1;
  86 int initial_state = WithdrawnState;
  87 int use_dial = 1;
  88
  89 signed int low_pct = -1;
  90 signed int critical_pct = -1;
  91
  92 void error(const char *fmt, ...)
  93 {
  94         va_list arglist;
  95
  96         va_start(arglist, fmt);
  97         fprintf(stderr, "Error: ");
  98         vfprintf(stderr, fmt, arglist);
  99         fprintf(stderr, "\n");
 100         va_end(arglist);
 101
 102         exit(1);
 103 }
 104
 105 #if defined (HAVE_MACHINE_APM_BIOS_H) || defined (HAVE_I386_APMVAR_H) /* BSD */
 106 int apm_read(apm_info *i)
 107 {
 108         int fd;
 109 #ifdef HAVE_MACHINE_APM_BIOS_H /* FreeBSD */
 110         unsigned long request = APMIO_GETINFO;
 111         struct apm_info info;
 112 #else /* NetBSD or OpenBSD */
 113         unsigned long request= APM_IOC_GETPOWER;
 114         struct apm_power_info info;
 115 #endif
 116
 117         if ((fd = open(apm_status_file, O_RDONLY)) == -1) {
 118                 return 0;
 119         }
 120         if (ioctl(fd, request, &info) == -1) {
 121                 return 0;
 122         }
 123         close(fd);
 124
 125 #ifdef HAVE_MACHINE_APM_BIOS_H /* FreeBSD */
 126         i->ac_line_status = info.ai_acline;
 127         i->battery_status = info.ai_batt_stat;
 128         i->battery_flags = (info.ai_batt_stat == 3) ? 8: 0;
 129         i->battery_percentage = info.ai_batt_life;
 130         i->battery_time = info.ai_batt_time;
 131         i->using_minutes = 0;
 132 #else /* NetBSD or OpenBSD */
 133         i->ac_line_status = info.ac_state;
 134         i->battery_status = info.battery_state;
 135         i->battery_flags = (info.battery_state == 3) ? 8: 0;
 136         i->battery_percentage = info.battery_life;
 137         i->battery_time = info.minutes_left;
 138         i->using_minutes = 1;
 139 #endif
 140
 141         return 1;
 142 }
 143
 144 int apm_exists(void)
 145 {
 146         apm_info i;
 147
 148         if (access(apm_status_file, R_OK))
 149                 return 0;
 150         return apm_read(&i);
 151 }
 152 #elif !defined(HAVE_LIBAPM)
 153 int apm_read(apm_info *i)
 154 {
 155         return -1;
 156 }
 157 int apm_exists(void)
 158 {
 159         return -1;
 160 }
 161 #endif
 162
 163 int apm_change(apm_info *cur)
 164 {
 165         static int ac_line_status = 0, battery_status = 0, battery_flags = 0,
 166                 battery_percentage = 0, battery_time = 0, using_minutes = 0;
 167
 168         int i = cur->ac_line_status     == ac_line_status     &&
 169                 cur->battery_status     == battery_status     &&
 170                 cur->battery_flags      == battery_flags      &&
 171                 cur->battery_percentage == battery_percentage &&
 172                 cur->battery_time       == battery_time       &&
 173                 cur->using_minutes      == using_minutes;
 174
 175         ac_line_status = cur->ac_line_status;
 176         battery_status = cur->battery_status;
 177         battery_flags = cur->battery_flags;
 178         battery_percentage = cur->battery_percentage;
 179         battery_time = cur->battery_time;
 180         using_minutes = cur->using_minutes;
 181
 182         return i;
 183 }
 184
 185 /* Calculate battery estimate */
 186 void estimate_timeleft(apm_info *cur_info)
 187 {
 188         /* Time of the last estimate */
 189         static time_t estimate_time;
 190         /* Estimated time left */
 191         static time_t estimate;
 192         /* Time when we last noticed a battery level change */
 193         static time_t battery_change_time;
 194         /* The previous estimation we had before the battery level changed */
 195         static time_t prev_estimate;
 196         /* Percentage at the last estimate */
 197         static short percent;
 198         /* Where we charging or discharging the last time we were called? */
 199         static short was_charging = 1;
 200         /* Have we made a guess lately? */
 201         static short guessed_lately;
 202
 203         time_t t;
 204         int interval;
 205         short is_charging = cur_info->battery_flags & BATTERY_FLAGS_CHARGING;
 206
 207         errno = 0;
 208         if (time(&t) == ((time_t)-1) && errno != 0)
 209                 goto estim_values;
 210
 211         if ((
 212                     /* AC is on and battery is not charging anymore or ... */
 213                     (cur_info->ac_line_status == AC_LINE_STATUS_ON) && !is_charging
 214                     ) ||
 215             (
 216                     /* ... the charging state has changed */
 217                     is_charging ^ was_charging
 218                     )) {
 219                 /* Reset counters */
 220                 battery_change_time = t;
 221                 estimate = -1;
 222                 guessed_lately = 0;
 223                 estimate_time = t;
 224                 prev_estimate = 0;
 225                 goto estim_values;
 226         }
 227
 228         /* No change: decrease estimate */
 229         if ((percent - cur_info->battery_percentage)
 230             / granularity_estimate_remaining == 0) {
 231                 estimate -= t - estimate_time;
 232                 estimate_time = t;
 233                 if (guessed_lately && estimate < 0)
 234                         estimate = 0;
 235                 goto estim_values;
 236         }
 237
 238         /* The battery level changed: calculate estimate based
 239          * on change speed and previous estimate */
 240         guessed_lately = 1;
 241         estimate_time = t;
 242         interval = estimate_time - battery_change_time;
 243         prev_estimate = estimate;
 244         battery_change_time = estimate_time;
 245         estimate = (is_charging
 246                     ? (cur_info->battery_percentage - 100)
 247                     : cur_info->battery_percentage)
 248                 * interval / (percent - cur_info->battery_percentage);
 249         if (prev_estimate > 0)
 250                 estimate = (estimate * 2 + prev_estimate) / 3;
 251
 252 estim_values:
 253         percent = cur_info->battery_percentage;
 254         was_charging = is_charging;
 255         cur_info->battery_time = estimate;
 256         if (estimate < 0)
 257                 estimate = 0;
 258         cur_info->using_minutes = 0;
 259 }
 260
 261 /* Load up the images this program uses. */
 262 void load_images(void)
 263 {
 264         int x;
 265         char fn[128]; /* enough? */
 266
 267         for (x = 0; x < NUM_IMAGES; x++) {
 268                 sprintf(fn, "%s/%s.xpm", ICONDIR, image_info[x].filename);
 269                 if (XpmReadFileToPixmap(display, root, fn, &images[x], NULL, NULL)) {
 270                         /* Check in current direcotry for fallback. */
 271                         sprintf(fn, "%s.xpm", image_info[x].filename);
 272                         if (XpmReadFileToPixmap(display, root, fn, &images[x], NULL, NULL))
 273                                 error("Failed to load %s\n", fn);
 274                 }
 275         }
 276 }
 277
 278 void load_audio(void)
 279 {
 280         int fd;
 281         struct stat s;
 282
 283         crit_audio = NULL;
 284         if (crit_audio_fn == NULL)
 285                 return;
 286         fd = open(crit_audio_fn, 0);
 287         if (fd == -1)
 288                 error("unable to open audio file");
 289         if (fstat(fd, &s) == 0) {
 290                 crit_audio_size = s.st_size;
 291                 crit_audio = malloc(crit_audio_size);
 292                 /* XXX: make this more robust? (loop?) */
 293                 if (read(fd, crit_audio, crit_audio_size) != crit_audio_size) {
 294                         free(crit_audio);
 295                         crit_audio = NULL;
 296                         error("unable to read audio file");
 297                 }
 298         }
 299         close(fd);
 300 }
 301
 302 /* string replacement function by Laird Shaw, in public domain
 303  * http://creativeandcritical.net/str-replace-c */
 304 char *replace_str(const char *str, const char *old, const char *new)
 305 {
 306         char *ret, *r;
 307         const char *p, *q;
 308         size_t oldlen = strlen(old);
 309         size_t count, retlen, newlen = strlen(new);
 310
 311         if (oldlen != newlen) {
 312                 for (count = 0, p = str; (q = strstr(p, old)) != NULL; p = q + oldlen)
 313                         count++;
 314                 /* this is undefined if p - str > PTRDIFF_MAX */
 315                 retlen = p - str + strlen(p) + count * (newlen - oldlen);
 316         } else
 317                 retlen = strlen(str);
 318
 319         ret = malloc(retlen + 1);
 320         if (!ret)
 321                 return NULL;
 322
 323         for (r = ret, p = str; (q = strstr(p, old)) != NULL; p = q + oldlen) {
 324                 /* this is undefined if q - p > PTRDIFF_MAX */
 325                 ptrdiff_t l = q - p;
 326                 memcpy(r, p, l);
 327                 r += l;
 328                 memcpy(r, new, newlen);
 329                 r += newlen;
 330         }
 331         strcpy(r, p);
 332
 333         return ret;
 334 }
 335
 336 void cmd_crit(const char *cmd, int percentage, int time)
 337 {
 338         char prc_str[255] = "";
 339         char min_str[255] = "";
 340         char sec_str[255] = "";
 341         char *tmp_a = NULL;
 342         char *tmp_b = NULL;
 343         char *command = NULL;
 344         int ret;
 345
 346         if (!cmd)
 347                 return;
 348         if (percentage > 100 || percentage < 0)
 349                 return;
 350         if (time > 65535 || time < 0)
 351                 return;
 352
 353         sprintf(prc_str, "%i", percentage);
 354         sprintf(min_str, "%i", time / 60);
 355         sprintf(sec_str, "%i", time % 60);
 356
 357         tmp_a = replace_str(cmd, STR_SUB_PERCENT, prc_str);
 358         if (!tmp_a)
 359                 return;
 360         tmp_b = replace_str(tmp_a, STR_SUB_MINUTES, min_str);
 361         if (!tmp_b)
 362                 return;
 363         command = replace_str(tmp_b, STR_SUB_SECONDS, sec_str);
 364         if (!command)
 365                 return;
 366
 367         ret = system(command);
 368         if (ret == -1)
 369                 error("unable to run command: %s", command);
 370
 371         free(tmp_a);
 372         free(tmp_b);
 373         free(command);
 374 }
 375
 376 /* Returns the display to run on (or NULL for default). */
 377 char *parse_commandline(int argc, char *argv[])
 378 {
 379         int c = 0;
 380         char *ret = NULL;
 381
 382         while (c != -1) {
 383                 c = getopt(argc, argv, "hd:g:if:b:w:c:l:es:a:x:vn");
 384                 switch (c) {
 385                 case 'h':
 386                         printf("Usage: wmbattery [options]\n");
 387                         printf("\t-d <display>\tselects target display\n");
 388                         printf("\t-h\t\tdisplay this help\n");
 389                         printf("\t-g {+-}x{+-}y\tposition of the window\n");
 390                         printf("\t-i\t\tdisplay as icon\n");
 391                         printf("\t-b num\t\tnumber of battery to display\n");
 392                         printf("\t-w secs\t\tseconds between updates\n");
 393                         printf("\t-l percent\tlow percentage\n");
 394                         printf("\t-c percent\tcritical percentage\n");
 395                         printf("\t-e\t\tuse own time estimates\n");
 396                         printf("\t-s granularity\tignore fluctuations less than granularity%% (implies -e)\n");
 397                         printf("\t-a file\t\twhen critical send file to /dev/audio\n");
 398                         printf("\t-x command\twhen critical execute this command\n");
 399                         printf("\t-n\t\tdisable dial graphic\n");
 400                         printf("\t-v\t\tdisplay version number\n");
 401                         exit(0);
 402                         break;
 403                 case 'd':
 404                         ret = strdup(optarg);
 405                         break;
 406                 case 'g':
 407                         user_geom = strdup(optarg);
 408                         break;
 409                 case 'i':
 410                         initial_state = IconicState;
 411                         break;
 412                 case 'b':
 413                         battnum = atoi(optarg);
 414                         break;
 415                 case 'w':
 416                         delay = atoi(optarg);
 417                         break;
 418                 case 'l':
 419                         low_pct = atoi(optarg);
 420                         break;
 421                 case 'c':
 422                         critical_pct = atoi(optarg);
 423                         break;
 424                 case 'e':
 425                         always_estimate_remaining = 1;
 426                         break;
 427                 case 's':
 428                         always_estimate_remaining = 1;
 429                         granularity_estimate_remaining = atoi(optarg);
 430                         break;
 431                 case 'a':
 432                         crit_audio_fn = strdup(optarg);
 433                         break;
 434                 case 'x':
 435                         crit_command = strdup(optarg);
 436                         break;
 437                 case 'v':
 438                         printf("wmbattery "PACKAGE_VERSION"\n");
 439                         exit(0);
 440                         break;
 441                 case 'n':
 442                         use_dial = 0;
 443                         break;
 444                 }
 445         }
 446
 447         return ret;
 448 }
 449
 450 /* Sets up the window and icon and all the nasty X stuff. */
 451 void make_window(char *display_name, int argc, char *argv[])
 452 {
 453         XClassHint classhint;
 454         char *wname = argv[0];
 455         XTextProperty name;
 456         XGCValues gcv;
 457         int dummy = 0, borderwidth = 1;
 458         XSizeHints sizehints;
 459         XWMHints wmhints;
 460         Pixel back_pix, fore_pix;
 461         Pixmap pixmask;
 462
 463         display = XOpenDisplay(display_name);
 464         if (!display)
 465                 error("can't open display %s", XDisplayName(display_name));
 466
 467         screen = DefaultScreen(display);
 468         root = RootWindow(display, screen);
 469
 470         /* Create window. */
 471         sizehints.flags = USSize | USPosition;
 472         sizehints.x = 0;
 473         sizehints.y = 0;
 474         XWMGeometry(display, screen, user_geom, NULL, borderwidth,
 475                     &sizehints, &sizehints.x, &sizehints.y,
 476                     &sizehints.width, &sizehints.height, &dummy);
 477
 478         sizehints.width = 64;
 479         sizehints.height = 64;
 480         back_pix = WhitePixel(display, screen);
 481         fore_pix = BlackPixel(display, screen);
 482         win = XCreateSimpleWindow(display, root, sizehints.x, sizehints.y,
 483                                   sizehints.width, sizehints.height,
 484                                   borderwidth, fore_pix, back_pix);
 485         iconwin = XCreateSimpleWindow(display, win, sizehints.x,
 486                                       sizehints.y, sizehints.width,
 487                                       sizehints.height, borderwidth,
 488                                       fore_pix, back_pix);
 489
 490         /* Activate hints */
 491         XSetWMNormalHints(display, win, &sizehints);
 492         classhint.res_name = wname;
 493         classhint.res_class = wname;
 494         XSetClassHint(display, win, &classhint);
 495
 496         if (!XStringListToTextProperty(&wname, 1, &name))
 497                 error("Can't allocate window name.");
 498
 499         XSetWMName(display, win, &name);
 500
 501         /* Create GC for drawing */
 502         gcv.foreground = fore_pix;
 503         gcv.background = back_pix;
 504         gcv.graphics_exposures = 0;
 505         NormalGC = XCreateGC(display, root,
 506                              GCForeground | GCBackground | GCGraphicsExposures,
 507                              &gcv);
 508
 509         if (use_dial)
 510                 pixmask = XCreateBitmapFromData(display, win, mask_bits,
 511                                         mask_width, mask_height);
 512         else
 513                 pixmask = XCreateBitmapFromData(display, win, mask_nodial_bits,
 514                                         mask_nodial_width, mask_nodial_height);
 515         XShapeCombineMask(display, win, ShapeBounding, 0, 0,
 516                           pixmask, ShapeSet);
 517         XShapeCombineMask(display, iconwin, ShapeBounding, 0, 0,
 518                           pixmask, ShapeSet);
 519
 520         wmhints.initial_state = initial_state;
 521         wmhints.icon_window = iconwin;
 522         wmhints.icon_x = sizehints.x;
 523         wmhints.icon_y = sizehints.y;
 524         wmhints.window_group = win;
 525         wmhints.flags = StateHint | IconWindowHint |
 526                 IconPositionHint | WindowGroupHint;
 527
 528         XSetWMHints(display, win, &wmhints);
 529         XSetCommand(display, win, argv, argc);
 530
 531         XSelectInput(display, iconwin, ExposureMask);
 532         XSelectInput(display, win, ExposureMask);
 533
 534         XMapWindow(display, win);
 535 }
 536
 537 void flush_expose(Window w)
 538 {
 539         XEvent dummy;
 540
 541         while (XCheckTypedWindowEvent(display, w, Expose, &dummy))
 542                 ;
 543 }
 544
 545 void redraw_window(void)
 546 {
 547         XCopyArea(display, images[FACE], iconwin, NormalGC, 0, 0,
 548                   image_info[FACE].width, image_info[FACE].height, 0, 0);
 549         flush_expose(iconwin);
 550         XCopyArea(display, images[FACE], win, NormalGC, 0, 0,
 551                   image_info[FACE].width, image_info[FACE].height, 0, 0);
 552         flush_expose(win);
 553 }
 554
 555 /*
 556  * Display an image, using XCopyArea. Can display only part of an image,
 557  * located anywhere.
 558  */
 559 void copy_image(int image, int xoffset, int yoffset,
 560                 int width, int height, int x, int y)
 561 {
 562         XCopyArea(display, images[image], images[FACE], NormalGC,
 563                   xoffset, yoffset, width, height, x, y);
 564 }
 565
 566 /*
 567  * Display a letter in one of two fonts, at the specified x position.
 568  * Note that 10 is passed for special characters `:' or `1' at the
 569  * end of the font.
 570  */
 571 void draw_letter(int letter, int font, int x)
 572 {
 573         copy_image(font, image_info[font].charwidth * letter, 0,
 574                    image_info[font].charwidth, image_info[font].height,
 575                    x, image_info[font].y);
 576 }
 577
 578 /* Display an image at its normal location. */
 579 void draw_image(int image)
 580 {
 581         copy_image(image, 0, 0,
 582                    image_info[image].width, image_info[image].height,
 583                    image_info[image].x, image_info[image].y);
 584 }
 585
 586 void recalc_window(apm_info cur_info)
 587 {
 588         int time_left, hour_left, min_left, digit, x;
 589         static int blinked;
 590
 591         /* Display if it's plugged in. */
 592         switch (cur_info.ac_line_status) {
 593         case AC_LINE_STATUS_ON:
 594                 draw_image(PLUGGED);
 595                 break;
 596         default:
 597                 draw_image(UNPLUGGED);
 598         }
 599
 600         /* Display the appropriate color battery. */
 601         switch (cur_info.battery_status) {
 602         case BATTERY_STATUS_HIGH:
 603         case BATTERY_STATUS_CHARGING:
 604                 draw_image(BATTERY_HIGH);
 605                 break;
 606         case BATTERY_STATUS_LOW:
 607                 draw_image(BATTERY_LOW);
 608                 break;
 609         case BATTERY_STATUS_CRITICAL: /* blinking red battery */
 610                 if (blinked)
 611                         draw_image(BATTERY_CRITICAL);
 612                 else
 613                         draw_image(BATTERY_BLINK);
 614                 blinked = !blinked;
 615                 break;
 616         default:
 617                 draw_image(BATTERY_NONE);
 618         }
 619
 620         /* Show if the battery is charging. */
 621         if (cur_info.battery_flags & BATTERY_FLAGS_CHARGING)
 622                 draw_image(CHARGING);
 623         else
 624                 draw_image(NOCHARGING);
 625
 626         /*
 627          * Display the percent left dial. This has the side effect of
 628          * clearing the time left field.
 629          */
 630         x = DIAL_MULTIPLIER * cur_info.battery_percentage;
 631         if (x >= 0) {
 632                 /* Start by displaying bright on the dial. */
 633                 copy_image(DIAL_BRIGHT, 0, 0,
 634                            x, image_info[DIAL_BRIGHT].height,
 635                            image_info[DIAL_BRIGHT].x,
 636                            image_info[DIAL_BRIGHT].y);
 637         }
 638         /* Now display dim on the remainder of the dial. */
 639         copy_image(DIAL_DIM, x, 0,
 640                    image_info[DIAL_DIM].width - x,
 641                    image_info[DIAL_DIM].height,
 642                    image_info[DIAL_DIM].x + x,
 643                    image_info[DIAL_DIM].y);
 644
 645         /* Show percent remaining */
 646         if (cur_info.battery_percentage >= 0) {
 647                 digit = cur_info.battery_percentage / 10;
 648                 if (digit == 10) {
 649                         /* 11 is the `1' for the hundreds place. */
 650                         draw_letter(11, SMALLFONT, HUNDREDS_OFFSET);
 651                         digit = 0;
 652                 }
 653                 draw_letter(digit, SMALLFONT, TENS_OFFSET);
 654                 digit = cur_info.battery_percentage % 10;
 655                 draw_letter(digit, SMALLFONT, ONES_OFFSET);
 656         } else {
 657                 /* There is no battery, so we need to dim out the
 658                  * percent sign that is normally bright. */
 659                 draw_letter(10, SMALLFONT, PERCENT_OFFSET);
 660         }
 661
 662         /* Show time left */
 663
 664         /* A negative number means that it is unknown. Dim the field. */
 665         if (cur_info.battery_time < 0) {
 666                 draw_letter(10, BIGFONT, COLON_OFFSET);
 667                 redraw_window();
 668                 return;
 669         }
 670
 671         if (cur_info.using_minutes)
 672                 time_left = cur_info.battery_time;
 673         else
 674                 time_left = cur_info.battery_time / 60;
 675         hour_left = time_left / 60;
 676         min_left = time_left % 60;
 677         digit = hour_left / 10;
 678         draw_letter(digit, BIGFONT, HOURS_TENS_OFFSET);
 679         digit = hour_left % 10;
 680         draw_letter(digit, BIGFONT, HOURS_ONES_OFFSET);
 681         digit = min_left / 10;
 682         draw_letter(digit, BIGFONT, MINUTES_TENS_OFFSET);
 683         digit = min_left % 10;
 684         draw_letter(digit, BIGFONT, MINUTES_ONES_OFFSET);
 685
 686         redraw_window();
 687 }
 688
 689 void snd_crit(void)
 690 {
 691         int audio, n;
 692
 693         if (crit_audio) {
 694                 audio = open("/dev/audio", O_WRONLY);
 695                 if (audio >= 0) {
 696                         n = write(audio, crit_audio, crit_audio_size);
 697                         if (n != crit_audio_size)
 698                                 fprintf(stderr, "write failed (%d/%d bytes)\n", n, crit_audio_size);
 699                         close(audio);
 700                 }
 701         }
 702 }
 703
 704 void alarmhandler(int sig)
 705 {
 706         apm_info cur_info;
 707         int old_status;
 708
 709 #ifdef UPOWER
 710         if (use_upower) {
 711                 if (upower_read(1, &cur_info) != 0)
 712                         error("Cannot read upower information.");
 713         } else if (use_acpi) {
 714 #else
 715         if (use_acpi) {
 716 #endif
 717                 if (acpi_read(battnum, &cur_info) != 0)
 718                         error("Cannot read ACPI information.");
 719         }
 720 #ifdef HAL
 721         else if (use_simplehal) {
 722                 if (simplehal_read(battnum, &cur_info) != 0)
 723                         error("Cannot read HAL information.");
 724         }
 725 #endif
 726         else if (!use_sonypi) {
 727                 if (apm_read(&cur_info) != 0)
 728                         error("Cannot read APM information.");
 729         } else {
 730                 if (sonypi_read(&cur_info) != 0)
 731                         error("Cannot read sonypi information.");
 732         }
 733
 734         old_status = cur_info.battery_status;
 735
 736         /* Always calculate remaining lifetime? apm and acpi both use a
 737          * negative number here to indicate error, missing battery, or
 738          * cannot determine time. */
 739         if (always_estimate_remaining || cur_info.battery_time < 0)
 740                 estimate_timeleft(&cur_info);
 741
 742         /* Override the battery status? */
 743         if ((low_pct > -1 || critical_pct > -1) &&
 744             cur_info.ac_line_status != AC_LINE_STATUS_ON) {
 745                 if (cur_info.battery_percentage <= critical_pct)
 746                         cur_info.battery_status = BATTERY_STATUS_CRITICAL;
 747                 else if (cur_info.battery_percentage <= low_pct)
 748                         cur_info.battery_status = BATTERY_STATUS_LOW;
 749                 else
 750                         cur_info.battery_status = BATTERY_STATUS_HIGH;
 751         }
 752
 753         /* If APM data changes redraw and wait for next update */
 754         /* Always redraw if the status is critical, to make it blink. */
 755         if (!apm_change(&cur_info) || cur_info.battery_status == BATTERY_STATUS_CRITICAL)
 756                 recalc_window(cur_info);
 757
 758         if ((old_status == BATTERY_STATUS_HIGH) &&
 759             (cur_info.battery_status == BATTERY_STATUS_LOW)) {
 760                 snd_crit();
 761         } else if (cur_info.battery_status == BATTERY_STATUS_CRITICAL) {
 762                 snd_crit();
 763                 cmd_crit(crit_command, cur_info.battery_percentage,
 764                          cur_info.battery_time);
 765         }
 766
 767         alarm(delay);
 768 }
 769
 770 void check_battery_num(int real, int requested)
 771 {
 772         if (requested > real || requested < 1) {
 773                 error("There %s only %i batter%s, and you asked for number %i.",
 774                       real == 1 ? "is" : "are",
 775                       real,
 776                       real == 1 ? "y" : "ies",
 777                       requested);
 778         }
 779 }
 780
 781 int main(int argc, char *argv[])
 782 {
 783         make_window(parse_commandline(argc, argv), argc, argv);
 784
 785         /*  Check for APM support (returns 0 on success). */
 786         if (apm_exists() == 0) {
 787                 if (!delay)
 788                         delay = 1;
 789         }
 790 #ifdef HAL
 791         /* Check for hal support. */
 792         else if (simplehal_supported()) {
 793                 use_simplehal = 1;
 794                 if (!delay)
 795                         delay = 2;
 796         }
 797 #endif
 798 #ifdef UPOWER
 799         else if (upower_supported()) {
 800                 use_upower = 1;
 801                 delay = 2;
 802         }
 803 #endif
 804         /* Check for ACPI support. */
 805         else if (acpi_supported() && acpi_batt_count > 0) {
 806                 check_battery_num(acpi_batt_count, battnum);
 807                 use_acpi = 1;
 808                 if (!delay)
 809                         delay = 3; /* slow interface! */
 810         } else if (sonypi_supported()) {
 811                 use_sonypi = 1;
 812                 low_pct = 10;
 813                 critical_pct = 5;
 814                 if (!delay)
 815                         delay = 1;
 816         } else {
 817                 error("No APM, ACPI, UPOWER, HAL or SPIC support detected.");
 818         }
 819
 820         load_images();
 821         load_audio();
 822
 823         signal(SIGALRM, alarmhandler);
 824         alarmhandler(SIGALRM);
 825
 826         while (1) {
 827                 XEvent ev;
 828                 XNextEvent(display, &ev);
 829                 if (ev.type == Expose)
 830                         redraw_window();
 831         }
 832 }