X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-utils.git;a=blobdiff_plain;f=cprogs%2Fxacpi-simple.c;h=180df33ff1e31ba847dd52e2a5dfd4f00fb75f51;hp=687127aa031d5212f9aa05532e45c70b3d882bfe;hb=414ea17c0481b726e985f6a5892b8e2f1f4959bf;hpb=2a6bbe44a3d18799a875a44969bf2c7934f69a3c diff --git a/cprogs/xacpi-simple.c b/cprogs/xacpi-simple.c index 687127a..180df33 100644 --- a/cprogs/xacpi-simple.c +++ b/cprogs/xacpi-simple.c @@ -1,19 +1,38 @@ /* * display outputs, per line: * - * Remaining: | Empty: | Degraded: - * green | red | black discharging - * blue | red | black charging - * cyan | red | black charged - * grey | red | black charging&discharching! - * green | yellow | black discharging - low! - * blue | yellow | black charging - low - * cyan | yellow | black charged - low [1] - * grey | yellow | black charging&discharching! - low [1] - * ... dark grey ... no batteries present + * Remaining: | Empty: | Degraded: + * blue | black | dimgrey discharging + * green | black | dimgrey charging + * cyan | black | dimgrey charged + * grey | black | dimgrey charging&discharching! + * blue | red | dimgrey discharging - low! + * green | red | dimgrey charging - low + * cyan | red | dimgrey charged - low [1] + * grey | red | dimgrey charging&discharching, low [1] + * ... darkgreen ... no batteries present + * ... yellow ... error * * [1] battery must be quite badly degraded */ +/* + * Copyright (C) 2004 Ian Jackson + * + * This is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as + * published by the Free Software Foundation; either version 3, + * or (at your option) any later version. + * + * This is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public + * License along with this file; if not, consult the Free Software + * Foundation's website at www.fsf.org, or the GNU Project website at + * www.gnu.org. + */ #include #include @@ -24,16 +43,26 @@ #include #include +#include #include #include #include +#include +#include + +#define TOP 60 +#define BOTTOM 3600 + +#define TIMEOUT 5000 /* milliseconds */ +#define TIMEOUT_ONERROR 3333 /* milliseconds */ + +static const char program_name[]= "xacpi-simple"; /*---------- general utility stuff and declarations ----------*/ static void fail(const char *m) { fprintf(stderr,"error: %s\n", m); - sleep(5); exit(-1); } static void badusage(void) { fail("bad usage"); } @@ -41,6 +70,7 @@ static void badusage(void) { fail("bad usage"); } #define CHGST_DISCHARGING 0 /* Reflects order in E(state,charging_state) */ #define CHGST_CHARGING 1 /* in fields table. Also, much code assumes */ #define CHGST_CHARGED 2 /* exactly these three possible states. */ +#define CHGST_ERROR 8 /* Except that this one is an extra bit. */ /*---------- structure of and results from /proc/acpi/battery/... ----------*/ /* variables thisbat_... are the results from readbattery(); @@ -56,7 +86,7 @@ typedef struct batinfo_field { } batinfo_field; #define QUANTITY_FIELDS \ - QF(info, design_capacity, "mWh") \ + QF(info, design_capacity, "mWh") \ QF(info, last_full_capacity, "mWh") \ QF(state, present_rate, "mW") \ QF(state, remaining_capacity, "mWh") \ @@ -66,17 +96,18 @@ typedef struct batinfo_field { QUANTITY_FIELDS #undef QF -static unsigned long thisbat_info_present, thisbat_state_present; -static unsigned long thisbat_state_charging_state; +static unsigned long thisbat_alarm_present, thisbat_info_present; +static unsigned long thisbat_state_present, thisbat_state_charging_state; #define VAL_NOTFOUND (~0UL) static const batinfo_field fields[]= { #define E(f,l) #f, #l, &thisbat_##f##_##l, 0 #define QF(f,l,u) { #f, #l, &thisbat_##f##_##l, u }, - { E(info, present), { "no", "yes" } }, - { E(state,present), { "no", "yes" } }, - { E(state,charging_state), { "discharging charging charged" } }, + { E(alarm, present), { "no", "yes" } }, + { E(info, present), { "no", "yes" } }, + { E(state,present), { "no", "yes" } }, + { E(state,charging_state), { "discharging", "charging", "charged" } }, QUANTITY_FIELDS /* take care re charging_state values order - */ { 0 } /* if you must change it, search for CHGST_... */ #undef E @@ -126,7 +157,7 @@ static void tidybattery(void) { static int readbattery(void) { /* 0=>ok, -1=>couldn't */ const batinfo_field *field; const char *const *cfilename, *const *enumsearch; - char *colon, *ep; + char *colon, *ep, *sr, *p; int r, l, missing; r= chdir(batdirname); @@ -144,10 +175,10 @@ static int readbattery(void) { /* 0=>ok, -1=>couldn't */ for (;;) { batlinevalue= 0; - fgets(batlinebuf,sizeof(batlinebuf),batfile); + sr= fgets(batlinebuf,sizeof(batlinebuf),batfile); if (ferror(batfile)) return batfaile("read",batfilename); + if (!sr && feof(batfile)) break; l= strlen(batlinebuf); - if (l==0 && feof(batfile)) break; assert(l>0); if (batlinebuf[l-1] != '\n') return batfailf("line too long"); @@ -157,7 +188,18 @@ static int readbattery(void) { /* 0=>ok, -1=>couldn't */ return batfailf("line without a colon"); *colon= 0; - for (field=fields; ; field++) { + for (batlinevalue= colon+1; + *batlinevalue && isspace((unsigned char)*batlinevalue); + batlinevalue++); + + if (!strcmp(batlinebuf,"ERROR")) + return batfailf("kernel reports error"); + + for (p=batlinebuf; pfile; field++) { if (!strcmp(field->file,batfilename) && !strcmp(field->label,batlinebuf)) goto label_interesting; @@ -165,10 +207,6 @@ static int readbattery(void) { /* 0=>ok, -1=>couldn't */ continue; label_interesting: - for (batlinevalue= colon+1; - *batlinevalue && isspace((unsigned char)*batlinevalue); - batlinevalue++); - if (field->unit) { *field->valuep= strtoul(batlinevalue,&ep,10); @@ -191,20 +229,27 @@ static int readbattery(void) { /* 0=>ok, -1=>couldn't */ batfile= 0; } - r= chdir(batdirname); - if (r) return batfaile("chdir",".."); - batdirname= 0; - - for (field=fields, missing=0; - field->file; - field++) { - if (*field->valuep == VAL_NOTFOUND) { - fprintf(stderr,"battery/%s/%s: %s: not found\n", - batdirname, field->file,field->label); - missing++; + if (!(thisbat_alarm_present==0 || + thisbat_info_present==0 || + thisbat_state_present==0)) { + if (thisbat_alarm_present == VAL_NOTFOUND) + thisbat_alarm_present= 1; + + for (field=fields, missing=0; + field->file; + field++) { + if (*field->valuep == VAL_NOTFOUND) { + fprintf(stderr,"battery/%s/%s: %s: not found\n", + batdirname, field->file,field->label); + missing++; + } } + if (missing) return -1; } - if (missing) return -1; + + r= chdir(".."); + if (r) return batfaile("chdir",".."); + batdirname= 0; return 0; } @@ -241,12 +286,10 @@ static void acquiredata(void) { r= readbattery(); tidybattery(); - if (r) continue; + if (r) { charging_state_mask |= CHGST_ERROR; continue; } - if (!thisbat_info_present || !thisbat_state_present) { - printf("battery/%s not present\n",de->d_name); + if (!thisbat_info_present || !thisbat_state_present) continue; - } charging_state_mask |= 1u << thisbat_state_charging_state; @@ -284,28 +327,103 @@ static void initacquire(void) { chdir_base(); } -/*---------- display ----------*/ - -#define TOP 60 -#define BOTTOM 3600 +/*---------- argument parsing ----------*/ #define COLOURS \ - C(black) \ - C(green) \ - C(red) \ - C(yellow) \ - C(blue) \ - C(cyan) \ - C(grey) \ - C(darkgrey) \ + C(blue, discharging) \ + C(green, charging) \ + C(cyan, charged) \ + C(grey, confusing) \ + C(black, normal) \ + C(red, low) \ + C(dimgrey, degraded) \ + C(darkgreen, absent) \ + C(yellow, error) \ + C(white, equilibrium) \ GC(remain) \ + GC(white) \ GC(empty) +static XrmDatabase xrm; static Display *disp; +static int screen; + +static const char defaultresources[]= +#define GC(g) +#define C(c,u) \ + "*" #u "Color: " #c "\n" + COLOURS +#undef GC +#undef C + ; + +#define S(s) ((char*)(s)) +static const XrmOptionDescRec optiontable[]= { + { S("-display"), S("*display"), XrmoptionSepArg }, + { S("-geometry"), S("*geometry"), XrmoptionSepArg }, +#define GC(g) +#define C(c,u) \ + { S("-" #u "Color"), S("*" #u "Color"), XrmoptionSepArg }, \ + { S("-" #u "Colour"), S("*" #u "Color"), XrmoptionSepArg }, + COLOURS +#undef GC +#undef C +}; + +static const char *getresource(const char *want) { + char name_buf[256], class_buf[256]; + XrmValue val; + char *rep_type_dummy; + int r; + + assert(strlen(want) < 128); + sprintf(name_buf,"xacpi-simple.%s",want); + sprintf(class_buf,"Xacpi-Simple.%s",want); + + r= XrmGetResource(xrm, name_buf,class_buf, &rep_type_dummy, &val); + if (!r) return 0; + + return val.addr; +} + +static void more_resources(const char *str, const char *why) { + XrmDatabase more; + + if (!str) return; + + more= XrmGetStringDatabase((char*)str); + if (!more) fail(why); + XrmCombineDatabase(more,&xrm,0); +} + +static void parseargs(int argc, char **argv) { + Screen *screenscreen; + + XrmInitialize(); + + XrmParseCommand(&xrm, (XrmOptionDescRec*)optiontable, + sizeof(optiontable)/sizeof(*optiontable), + program_name, &argc, argv); + + if (argc>1) badusage(); + + disp= XOpenDisplay(getresource("display")); + if (!disp) fail("could not open display"); + + screen= DefaultScreen(disp); + + screenscreen= ScreenOfDisplay(disp,screen); + if (!screenscreen) fail("screenofdisplay"); + more_resources(XScreenResourceString(screenscreen), "screen resources"); + more_resources(XResourceManagerString(disp), "display resources"); + more_resources(defaultresources, "default resources"); +} + +/*---------- display ----------*/ + static Window win; static int width, height; static Colormap cmap; -static int screen; static unsigned long lastbackground; typedef struct { @@ -313,7 +431,7 @@ typedef struct { unsigned long lastfg; } Gcstate; -#define C(c) static unsigned long pix_##c; +#define C(c,u) static unsigned long pix_##c; #define GC(g) static Gcstate gc_##g; COLOURS #undef C @@ -323,12 +441,17 @@ static void refresh(void); #define CHGMASK_CHG_DIS (1u<lastfg= gcv.foreground= px; r= XChangeGC(disp,g->gc,GCForeground,&gcv); - if (r) fail("XChangeGC"); + if (!r) fail("XChangeGC"); +} + +static void show_solid(unsigned long px) { + setbackground(px); + XClearWindow(disp,win); } static void show(void) { double elap, then; - int i, leftmost_lit, leftmost_nondeg; + int i, leftmost_lit, leftmost_nondeg, beyond, first_beyond; - if (!charging_state_mask) { - setbackground(pix_darkgrey); - XClearWindow(disp,win); - return; - } + if (!charging_state_mask) + return show_solid(pix_darkgreen); + + if (charging_state_mask & CHGST_ERROR) + return show_solid(pix_yellow); - setbackground(pix_black); + setbackground(pix_dimgrey); XClearWindow(disp,win); setforeground(&gc_remain, !(charging_state_mask & CHGMASK_CHG_DIS) ? pix_cyan : !(~charging_state_mask & CHGMASK_CHG_DIS) ? pix_grey : charging_state_mask & (1u<=nondegraded_norm)); + if (then <= 0.0) then= 0.0; else if (then >= nondegraded_norm) then= nondegraded_norm; leftmost_lit= width * then; leftmost_nondeg= width * nondegraded_norm; - if (leftmost_lit >= 0) - XDrawLine(disp, win, gc_remain.gc, 0,i, leftmost_lit,i); - if (leftmost_lit < leftmost_nondeg) - XDrawLine(disp, win, gc_empty.gc, - leftmost_lit+1,i, leftmost_nondeg,i); + if (beyond && first_beyond) { + XDrawLine(disp, win, gc_white.gc, 0,i, leftmost_nondeg,i); + first_beyond= 0; + } else { + if (leftmost_lit < leftmost_nondeg) + XDrawLine(disp, win, gc_empty.gc, + leftmost_lit,i, leftmost_nondeg,i); + if (leftmost_lit >= 0) + XDrawLine(disp, win, gc_remain.gc, 0,i, leftmost_lit,i); + } } } @@ -391,40 +529,83 @@ static void initgc(Gcstate *gc_r) { memset(&gcv,0,sizeof(gcv)); gcv.function= GXcopy; gcv.line_width= 1; - gc_r->lastfg= gcv.foreground= pix_black; + gc_r->lastfg= gcv.foreground= pix_white; gc_r->gc= XCreateGC(disp,win, GCFunction|GCLineWidth|GCForeground, &gcv); } -static void colour(unsigned long *pix_r, const char *name) { +static void colour(unsigned long *pix_r, const char *whichcolour) { XColor xc; + const char *name; Status st; + + name= getresource(whichcolour); + if (!name) fail("get colour resource"); st= XAllocNamedColor(disp,cmap,name,&xc,&xc); - if (!st) fail("couldn't allocate colour"); + if (!st) fail(name); *pix_r= xc.pixel; } -static void initgraphics(void) { - int r; +static void initgraphics(int argc, char **argv) { + int xwmgr, r; + const char *geom_string; + XSizeHints *normal_hints; + XWMHints *wm_hints; + XClassHint *class_hint; + int pos_x, pos_y, gravity; + char *program_name_silly; - disp= XOpenDisplay(0); if (!disp) fail("could not open display"); + program_name_silly= (char*)program_name; - screen= DefaultScreen(disp); - win= XCreateSimpleWindow(disp,DefaultRootWindow(disp),0,0,100,20,0,0,0); + normal_hints= XAllocSizeHints(); + wm_hints= XAllocWMHints(); + class_hint= XAllocClassHint(); + + if (!normal_hints || !wm_hints || !class_hint) + fail("could not alloc hint(s)"); + + geom_string= getresource("geometry"); + + xwmgr= XWMGeometry(disp,screen, geom_string,"128x32", 0, + normal_hints, + &pos_x, &pos_y, + &width, &height, + &gravity); + + win= XCreateSimpleWindow(disp,DefaultRootWindow(disp), + pos_x,pos_y,width,height,0,0,0); cmap= DefaultColormap(disp,screen); -#define C(c) colour(&pix_##c, #c); +#define C(c,u) colour(&pix_##c, #u "Color"); #define GC(g) initgc(&gc_##g); COLOURS #undef C #undef GC - r= XSetWindowBackground(disp,win,pix_black); - if (r) fail("init set background"); - lastbackground= pix_black; + r= XSetWindowBackground(disp,win,pix_dimgrey); + if (!r) fail("init set background"); + lastbackground= pix_dimgrey; + + normal_hints->flags= PWinGravity; + normal_hints->win_gravity= gravity; + normal_hints->x= pos_x; + normal_hints->y= pos_y; + normal_hints->width= width; + normal_hints->height= height; + if ((xwmgr & XValue) || (xwmgr & YValue)) + normal_hints->flags |= USPosition; + + wm_hints->flags= InputHint; + wm_hints->input= False; - XSelectInput(disp,win, ExposureMask|VisibilityChangeMask); + class_hint->res_name= program_name_silly; + class_hint->res_class= program_name_silly; + + XmbSetWMProperties(disp,win, program_name,program_name, + argv,argc, normal_hints, wm_hints, class_hint); + + XSelectInput(disp,win, ExposureMask|StructureNotifyMask); XMapWindow(disp,win); } @@ -438,26 +619,42 @@ static void newgeometry(void) { Window dummyw; XGetGeometry(disp,win, &dummyw,&dummy,&dummy, &width,&height, &dummy,&dummy); - refresh(); } static void eventloop(void) { XEvent ev; + struct pollfd pfd; + int r, timeout; newgeometry(); - + refresh(); + for (;;) { - XNextEvent(disp,&ev); - newgeometry(); + XFlush(disp); + + pfd.fd= ConnectionNumber(disp); + pfd.events= POLLIN|POLLERR; + + timeout= !(charging_state_mask & CHGST_ERROR) ? TIMEOUT : TIMEOUT_ONERROR; + r= poll(&pfd,1,timeout); + if (r==-1 && errno!=EINTR) failr("poll",errno); + + while (XPending(disp)) { + XNextEvent(disp,&ev); + if (ev.type == ConfigureNotify) { + XConfigureEvent *ce= (void*)&ev; + width= ce->width; + height= ce->height; + } + } + refresh(); } } -int main(int argc, const char *const *argv) { - if (!argv[0] || argv[1]) - badusage(); - +int main(int argc, char **argv) { + parseargs(argc,argv); initacquire(); - initgraphics(); + initgraphics(argc,argv); eventloop(); return 0; }