* green | red | dimgrey charging - low
* cyan | red | dimgrey charged - low [1]
* grey | red | dimgrey charging&discharching, low [1]
- * ... darkmagenta ... no batteries present
+ * ... darkgreen ... no batteries present
+ * ... yellow ... error
*
* [1] battery must be quite badly degraded
*/
#include <dirent.h>
#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xresource.h>
-#define TIMEOUT 5000 /* milliseconds */
+#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 ----------*/
#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();
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(alarm, present), { "no", "yes" } },
{ E(info, present), { "no", "yes" } },
{ E(state,present), { "no", "yes" } },
{ E(state,charging_state), { "discharging", "charging", "charged" } },
return batfailf("line without a colon");
*colon= 0;
+ for (batlinevalue= colon+1;
+ *batlinevalue && isspace((unsigned char)*batlinevalue);
+ batlinevalue++);
+
+ if (!strcmp(batlinebuf,"ERROR"))
+ return batfailf("kernel reports error");
+
for (p=batlinebuf; p<colon; p++)
if (*p == ' ')
*p= '_';
continue;
label_interesting:
- for (batlinevalue= colon+1;
- *batlinevalue && isspace((unsigned char)*batlinevalue);
- batlinevalue++);
-
if (field->unit) {
*field->valuep= strtoul(batlinevalue,&ep,10);
batfile= 0;
}
+ 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;
+ }
+
r= chdir("..");
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 (missing) return -1;
-
return 0;
}
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;
chdir_base();
}
-/*---------- display ----------*/
-
-#define TOP 60
-#define BOTTOM 3600
+/*---------- argument parsing ----------*/
#define COLOURS \
- C(dimgrey) \
- C(blue) \
- C(black) \
- C(red) \
- C(green) \
- C(cyan) \
- C(grey) \
- C(darkmagenta) \
- C(white) \
+ 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 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 void parseargs(int argc, char **argv) {
+ XrmInitialize();
+
+ xrm= XrmGetStringDatabase((char*)defaultresources);
+ if (!xrm) fail("xrmgetstringdatabase");
+
+ XrmParseCommand(&xrm, (XrmOptionDescRec*)optiontable,
+ sizeof(optiontable)/sizeof(*optiontable),
+ program_name, &argc, argv);
+
+ /* if (argc>0) badusage();*/
+}
+
+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;
+}
+
+/*---------- display ----------*/
+
static Display *disp;
static Window win;
static int width, height;
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
if (newbg == lastbackground) return;
r= XSetWindowBackground(disp,win,newbg);
- if (r) failr("XSetWindowBackground",r);
+ if (!r) fail("XSetWindowBackground");
lastbackground= newbg;
}
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, beyond, first_beyond;
- if (!charging_state_mask) {
- setbackground(pix_darkmagenta);
- 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_dimgrey);
XClearWindow(disp,win);
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(name);
*pix_r= xc.pixel;
}
-static void initgraphics(void) {
+static void initgraphics(int argc, char **argv) {
int 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;
+
+ disp= XOpenDisplay(getresource("display"));
+ if (!disp) fail("could not open display");
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");
+
+ r= 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
if (!r) fail("init set background");
lastbackground= pix_dimgrey;
- XSelectInput(disp,win, ExposureMask|VisibilityChangeMask);
+ 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 (geom_string) normal_hints->flags |= USPosition;
+
+ wm_hints->flags= InputHint;
+ wm_hints->input= False;
+
+ 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);
}
static void eventloop(void) {
XEvent ev;
- int *fds, nfds, npfds, *fdp, i, r;
- struct pollfd *pfds, *pfd;
+ struct pollfd pfd;
+ int r, timeout;
newgeometry();
+ refresh();
- npfds= 0;
- pfds= 0;
for (;;) {
- r= XInternalConnectionNumbers(disp, &fds, &nfds);
- if (!r) fail("XInternalConnectionNumbers");
-
- if (npfds != nfds) {
- pfds= realloc(pfds, sizeof(*pfds) * nfds);
- if (!pfds) failr("realloc for pollfds",errno);
- npfds= nfds;
- }
- for (i=0, pfd=pfds, fdp=fds;
- i<nfds;
- i++, pfd++, fdp++) {
- pfd->fd= *fdp;
- pfd->events= POLLIN|POLLERR;
- }
- XFree(fds);
+ XFlush(disp);
- r= poll(pfds,npfds,TIMEOUT);
- if (r==-1) failr("poll",errno);
+ pfd.fd= ConnectionNumber(disp);
+ pfd.events= POLLIN|POLLERR;
- for (i=0, pfd=pfds;
- i<nfds;
- i++, pfd++) {
- if (pfd->revents)
- XProcessInternalConnection(disp,pfd->fd);
- }
+ 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)
- newgeometry();
+ 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;
}