ref: 8e3e0e3960fb900dbff04dae52c3bc7d83e1150c
parent: 9e8b2bef252b18322aa341e1995d8ae70ea22938
author: qwx <qwx@sciops.net>
date: Sat Aug 19 05:20:06 EDT 2023
winwatch: themeshit
--- /dev/null
+++ b/sys/src/cmd/winwatch.c
@@ -1,0 +1,388 @@
+#include <u.h>
+#include <libc.h>
+#include <draw.h>
+#include <cursor.h>
+#include <event.h>
+#include <regexp.h>
+#include <keyboard.h>
+
+enum {+ VISIBLE = 1,
+ CURRENT = 2,
+};
+
+typedef struct Win Win;
+struct Win {+ int n;
+ int dirty;
+ int state;
+ char *label;
+ Rectangle r;
+};
+
+Reprog *exclude = nil;
+Win *win;
+int nwin;
+int mwin;
+int onwin;
+int rows, cols;
+
+enum{+ Cback,
+ Ctext,
+ Cstate0,
+ Cstate1,
+ Cstate2,
+ Cstate3,
+ Ncols,
+};
+Image *col[Ncols];
+
+enum {+ PAD = 3,
+ MARGIN = 5
+};
+
+void*
+erealloc(void *v, ulong n)
+{+ v = realloc(v, n);
+ if(v == nil)
+ sysfatal("out of memory reallocating %lud", n);+ return v;
+}
+
+void*
+emalloc(ulong n)
+{+ void *v;
+
+ v = malloc(n);
+ if(v == nil)
+ sysfatal("out of memory allocating %lud", n);+ memset(v, 0, n);
+ return v;
+}
+
+char*
+estrdup(char *s)
+{+ int l;
+ char *t;
+
+ if (s == nil)
+ return nil;
+ l = strlen(s)+1;
+ t = emalloc(l);
+ memcpy(t, s, l);
+
+ return t;
+}
+
+int
+readfile(char *buf, int nbuf, char *file, ...)
+{+ va_list arg;
+ int n, fd;
+
+ va_start(arg, file);
+ vsnprint(buf, nbuf, file, arg);
+ va_end(arg);
+
+ if((fd = open(buf, OREAD)) < 0){+ buf[0] = 0;
+ return -1;
+ }
+ n = read(fd, buf, nbuf-1);
+ close(fd);
+ if(n < 0){+ buf[0] = 0;
+ return -1;
+ }
+ buf[n] = 0;
+ return n;
+}
+
+void
+refreshwin(void)
+{+ char label[128], wctl[128], *tok[8];
+ int i, fd, n, nr, nw, state;
+ static int mywinid = -1;
+ Dir *pd;
+
+ if(mywinid < 0){+ if(readfile(wctl, sizeof(wctl), "/dev/winid") > 0)
+ mywinid = atoi(wctl);
+ }
+
+ if((fd = open("/dev/wsys", OREAD)) < 0)+ return;
+
+ nw = 0;
+/* i'd rather read one at a time but rio won't let me */
+ while((nr=dirread(fd, &pd)) > 0){+ for(i=0; i<nr; i++){+ n = atoi(pd[i].name);
+ if(n == mywinid)
+ continue;
+ if(readfile(label, sizeof(label), "/dev/wsys/%d/label", n) < 0)
+ continue;
+ if(exclude != nil && regexec(exclude,label,nil,0))
+ continue;
+ if(readfile(wctl, sizeof(wctl), "/dev/wsys/%d/wctl", n) <= 0)
+ continue;
+ if(tokenize(wctl, tok, nelem(tok)) != 6)
+ continue;
+ state = 0;
+ if(strcmp(tok[4], "current") == 0)
+ state |= CURRENT;
+ if(strcmp(tok[5], "visible") == 0)
+ state |= VISIBLE;
+ if(nw < nwin && win[nw].n == n && win[nw].state == state &&
+ strcmp(win[nw].label, label)==0){+ nw++;
+ continue;
+ }
+
+ if(nw < nwin){+ free(win[nw].label);
+ win[nw].label = nil;
+ }
+
+ if(nw >= mwin){+ mwin += 8;
+ win = erealloc(win, mwin*sizeof(win[0]));
+ }
+ win[nw].n = n;
+ win[nw].label = estrdup(label);
+ win[nw].state = state;
+ win[nw].dirty = 1;
+ win[nw].r = Rect(0,0,0,0);
+ nw++;
+ }
+ free(pd);
+ }
+ while(nwin > nw)
+ free(win[--nwin].label);
+ nwin = nw;
+ close(fd);
+}
+
+void
+drawnowin(int i)
+{+ Rectangle r;
+
+ r = Rect(0,0,(Dx(screen->r)-2*MARGIN+PAD)/cols-PAD, font->height);
+ r = rectaddpt(rectaddpt(r, Pt(MARGIN+(PAD+Dx(r))*(i/rows),
+ MARGIN+(PAD+Dy(r))*(i%rows))), screen->r.min);
+ draw(screen, insetrect(r, -1), col[Cback], nil, ZP);
+}
+
+void
+drawwin(int i)
+{+ draw(screen, win[i].r, col[Cstate0+win[i].state], nil, ZP);
+ _string(screen, addpt(win[i].r.min, Pt(2,0)), col[Ctext], ZP,
+ font, win[i].label, nil, strlen(win[i].label),
+ win[i].r, nil, ZP, SoverD);
+ border(screen, win[i].r, 1, col[Ctext], ZP);
+ win[i].dirty = 0;
+}
+
+int
+geometry(void)
+{+ int i, nrows, ncols, z;
+ Rectangle r;
+
+ z = 0;
+ nrows = (Dy(screen->r)-2*MARGIN+PAD)/(font->height+PAD);
+ if(nrows <= 0)
+ nrows = 1;
+ if(nrows != rows){+ rows = nrows;
+ z = 1;
+ }
+ ncols = nwin <= 0 ? 1 : (nwin+rows-1)/rows;
+ if(ncols != cols){+ cols = ncols;
+ z = 1;
+ }
+
+ r = Rect(0,0,(Dx(screen->r)-2*MARGIN+PAD)/cols-PAD, font->height);
+ for(i=0; i<nwin; i++)
+ win[i].r = rectaddpt(rectaddpt(r, Pt(MARGIN+(PAD+Dx(r))*(i/rows),
+ MARGIN+(PAD+Dy(r))*(i%rows))), screen->r.min);
+
+ return z;
+}
+
+void
+redraw(Image *screen, int all)
+{+ int i;
+
+ all |= geometry();
+ if(all)
+ draw(screen, screen->r, col[Cback], nil, ZP);
+ for(i=0; i<nwin; i++)
+ if(all || win[i].dirty)
+ drawwin(i);
+ if(!all)
+ for(; i<onwin; i++)
+ drawnowin(i);
+
+ onwin = nwin;
+}
+
+void
+eresized(int new)
+{+ if(new && getwindow(display, Refmesg) < 0)
+ fprint(2,"can't reattach to window");
+ geometry();
+ redraw(screen, 1);
+}
+
+int
+label(Win w, Mouse m)
+{+ char buf[512], fname[128];
+ int n, fd;
+
+ snprint(buf, sizeof(buf), "%s", w.label);
+ n = eenter(nil, buf, sizeof(buf), &m);
+ if(n <= 0)
+ return 0;
+ sprint(fname, "/dev/wsys/%d/label", w.n);
+ if((fd = open(fname, OWRITE)) < 0)
+ return 0;
+ write(fd, buf, n);
+ close(fd);
+ refreshwin();
+ redraw(screen, 1);
+ return 1;
+}
+
+int
+unhide(Win w)
+{+ char buf[128];
+ int fd;
+
+ sprint(buf, "/dev/wsys/%d/wctl", w.n);
+ if((fd = open(buf, OWRITE)) < 0)
+ return 0;
+ if(w.state == (CURRENT|VISIBLE))
+ write(fd, "hide\n", 5);
+ else {+ write(fd, "unhide\n", 7);
+ write(fd, "top\n", 4);
+ write(fd, "current\n", 8);
+ }
+ close(fd);
+ return 1;
+}
+
+int
+click(Mouse m)
+{+ int i, b;
+
+ b = m.buttons & 7;
+ if(b != 2 && b != 4)
+ return 0;
+ for(i=0; i<nwin; i++)
+ if(ptinrect(m.xy, win[i].r))
+ break;
+ if(i == nwin)
+ return 0;
+ do
+ m = emouse();
+ while((m.buttons & 7) == b);
+ if((m.buttons & 7) || !ptinrect(m.xy, win[i].r))
+ return 0;
+
+ switch(b) {+ case 2:
+ return label(win[i], m);
+ case 4:
+ return unhide(win[i]);
+ default:
+ return 0;
+ }
+}
+
+void
+usage(void)
+{+ fprint(2, "usage: winwatch [-e exclude] [-f font]\n");
+ exits("usage");+}
+
+void
+main(int argc, char **argv)
+{+ char *fontname = nil;
+ int Etimer;
+ Event e;
+ int i;
+
+ ARGBEGIN{+ case 'f':
+ fontname = EARGF(usage());
+ break;
+ case 'e':
+ exclude = regcomp(EARGF(usage()));
+ if(exclude == nil)
+ sysfatal("Bad regexp");+ break;
+ default:
+ usage();
+ }ARGEND
+
+ if(argc)
+ usage();
+
+ if(initdraw(0, fontname, "winwatch") < 0)
+ sysfatal("initdraw: %r");+
+ Theme th[nelem(col)] = {+ [Cback] { "back", 0xEAFFFFFF },+ [Ctext] { "text", DBlack },+ [Cstate0] { "htext", 0xCCCCCCFF },+ [Cstate1] { "rioback", 0xEAFFFFFF },+ [Cstate2] { "palehold", 0xEAFFFFFF },+ [Cstate3] { "hold", 0x9EEEEEFF },+ };
+ readtheme(th, nelem(th), nil);
+ for(i=0; i<nelem(col); i++){+ if((col[i] = allocimage(display, Rect(0,0,1,1),
+ screen->chan, 1, th[i].c)) == nil)
+ sysfatal("allocimage: %r");+ }
+
+ refreshwin();
+ redraw(screen, 1);
+ einit(Emouse|Ekeyboard);
+ Etimer = etimer(0, 2500);
+
+ for(;;){+ switch(eread(Emouse|Ekeyboard|Etimer, &e)){+ case Ekeyboard:
+ if(e.kbdc==Kdel || e.kbdc=='q')
+ exits(0);
+ break;
+ case Emouse:
+ if(click(e.mouse) == 0)
+ continue;
+ /* fall through */
+ default: /* Etimer */
+ refreshwin();
+ redraw(screen, 0);
+ break;
+ }
+ }
+}