tabbed.c

   1 /*
   2  * See LICENSE file for copyright and license details.
   3  */
   4
   5 #include <sys/wait.h>
   6 #include <locale.h>
   7 #include <signal.h>
   8 #include <stdarg.h>
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include <unistd.h>
  13 #include <X11/Xatom.h>
  14 #include <X11/Xlib.h>
  15 #include <X11/Xproto.h>
  16 #include <X11/Xutil.h>
  17 #include <X11/XKBlib.h>
  18
  19 #include "arg.h"
  20
  21 /* XEMBED messages */
  22 #define XEMBED_EMBEDDED_NOTIFY          0
  23 #define XEMBED_WINDOW_ACTIVATE          1
  24 #define XEMBED_WINDOW_DEACTIVATE        2
  25 #define XEMBED_REQUEST_FOCUS            3
  26 #define XEMBED_FOCUS_IN                 4
  27 #define XEMBED_FOCUS_OUT                5
  28 #define XEMBED_FOCUS_NEXT               6
  29 #define XEMBED_FOCUS_PREV               7
  30 /* 8-9 were used for XEMBED_GRAB_KEY/XEMBED_UNGRAB_KEY */
  31 #define XEMBED_MODALITY_ON              10
  32 #define XEMBED_MODALITY_OFF             11
  33 #define XEMBED_REGISTER_ACCELERATOR     12
  34 #define XEMBED_UNREGISTER_ACCELERATOR   13
  35 #define XEMBED_ACTIVATE_ACCELERATOR     14
  36
  37 /* Details for  XEMBED_FOCUS_IN: */
  38 #define XEMBED_FOCUS_CURRENT            0
  39 #define XEMBED_FOCUS_FIRST              1
  40 #define XEMBED_FOCUS_LAST               2
  41
  42 /* Macros */
  43 #define MAX(a, b)               ((a) > (b) ? (a) : (b))
  44 #define MIN(a, b)               ((a) < (b) ? (a) : (b))
  45 #define LENGTH(x)               (sizeof((x)) / sizeof(*(x)))
  46 #define CLEANMASK(mask)         (mask & ~(numlockmask | LockMask))
  47 #define TEXTW(x)                (textnw(x, strlen(x)) + dc.font.height)
  48
  49 enum { ColFG, ColBG, ColLast };       /* color */
  50 enum { WMProtocols, WMDelete, WMName, WMState, WMFullscreen,
  51        XEmbed, WMSelectTab, WMLast }; /* default atoms */
  52
  53 typedef union {
  54         int i;
  55         const void *v;
  56 } Arg;
  57
  58 typedef struct {
  59         unsigned int mod;
  60         KeySym keysym;
  61         void (*func)(const Arg *);
  62         const Arg arg;
  63 } Key;
  64
  65 typedef struct {
  66         int x, y, w, h;
  67         unsigned long norm[ColLast];
  68         unsigned long sel[ColLast];
  69         unsigned long urg[ColLast];
  70         Drawable drawable;
  71         GC gc;
  72         struct {
  73                 int ascent;
  74                 int descent;
  75                 int height;
  76                 XFontSet set;
  77                 XFontStruct *xfont;
  78         } font;
  79 } DC; /* draw context */
  80
  81 typedef struct {
  82         char name[256];
  83         Window win;
  84         int tabx;
  85         Bool urgent;
  86         Bool closed;
  87 } Client;
  88
  89 /* function declarations */
  90 static void buttonpress(const XEvent *e);
  91 static void cleanup(void);
  92 static void clientmessage(const XEvent *e);
  93 static void configurenotify(const XEvent *e);
  94 static void configurerequest(const XEvent *e);
  95 static void createnotify(const XEvent *e);
  96 static void destroynotify(const XEvent *e);
  97 static void die(const char *errstr, ...);
  98 static void drawbar(void);
  99 static void drawtext(const char *text, unsigned long col[ColLast]);
 100 static void *ecalloc(size_t n, size_t size);
 101 static void *erealloc(void *o, size_t size);
 102 static void expose(const XEvent *e);
 103 static void focus(int c);
 104 static void focusin(const XEvent *e);
 105 static void focusonce(const Arg *arg);
 106 static void focusurgent(const Arg *arg);
 107 static void fullscreen(const Arg *arg);
 108 static char *getatom(int a);
 109 static int getclient(Window w);
 110 static unsigned long getcolor(const char *colstr);
 111 static int getfirsttab(void);
 112 static Bool gettextprop(Window w, Atom atom, char *text, unsigned int size);
 113 static void initfont(const char *fontstr);
 114 static Bool isprotodel(int c);
 115 static void keypress(const XEvent *e);
 116 static void killclient(const Arg *arg);
 117 static void manage(Window win);
 118 static void maprequest(const XEvent *e);
 119 static void move(const Arg *arg);
 120 static void movetab(const Arg *arg);
 121 static void propertynotify(const XEvent *e);
 122 static void resize(int c, int w, int h);
 123 static void rotate(const Arg *arg);
 124 static void run(void);
 125 static void sendxembed(int c, long msg, long detail, long d1, long d2);
 126 static void setcmd(int argc, char *argv[], int);
 127 static void setup(void);
 128 static void sigchld(int unused);
 129 static void spawn(const Arg *arg);
 130 static int textnw(const char *text, unsigned int len);
 131 static void toggle(const Arg *arg);
 132 static void unmanage(int c);
 133 static void unmapnotify(const XEvent *e);
 134 static void updatenumlockmask(void);
 135 static void updatetitle(int c);
 136 static int xerror(Display *dpy, XErrorEvent *ee);
 137 static void xsettitle(Window w, const char *str);
 138
 139 /* variables */
 140 static int screen;
 141 static void (*handler[LASTEvent]) (const XEvent *) = {
 142         [ButtonPress] = buttonpress,
 143         [ClientMessage] = clientmessage,
 144         [ConfigureNotify] = configurenotify,
 145         [ConfigureRequest] = configurerequest,
 146         [CreateNotify] = createnotify,
 147         [UnmapNotify] = unmapnotify,
 148         [DestroyNotify] = destroynotify,
 149         [Expose] = expose,
 150         [FocusIn] = focusin,
 151         [KeyPress] = keypress,
 152         [MapRequest] = maprequest,
 153         [PropertyNotify] = propertynotify,
 154 };
 155 static int bh, wx, wy, ww, wh;
 156 static unsigned int numlockmask;
 157 static Bool running = True, nextfocus, doinitspawn = True,
 158             fillagain = False, closelastclient = False;
 159 static Display *dpy;
 160 static DC dc;
 161 static Atom wmatom[WMLast];
 162 static Window root, win;
 163 static Client **clients;
 164 static int nclients, sel = -1, lastsel = -1;
 165 static int (*xerrorxlib)(Display *, XErrorEvent *);
 166 static int cmd_append_pos;
 167 static char winid[64];
 168 static char **cmd;
 169 static char *wmname = "tabbed";
 170 static const char *geometry;
 171
 172 char *argv0;
 173
 174 /* configuration, allows nested code to access above variables */
 175 #include "config.h"
 176
 177 void
 178 buttonpress(const XEvent *e)
 179 {
 180         const XButtonPressedEvent *ev = &e->xbutton;
 181         int i, fc;
 182         Arg arg;
 183
 184         if (ev->y < 0 || ev->y > bh)
 185                 return;
 186
 187         if (((fc = getfirsttab()) > 0 && ev->x < TEXTW(before)) || ev->x < 0)
 188                 return;
 189
 190         for (i = fc; i < nclients; i++) {
 191                 if (clients[i]->tabx > ev->x) {
 192                         switch (ev->button) {
 193                         case Button1:
 194                                 focus(i);
 195                                 break;
 196                         case Button2:
 197                                 focus(i);
 198                                 killclient(NULL);
 199                                 break;
 200                         case Button4: /* FALLTHROUGH */
 201                         case Button5:
 202                                 arg.i = ev->button == Button4 ? -1 : 1;
 203                                 rotate(&arg);
 204                                 break;
 205                         }
 206                         break;
 207                 }
 208         }
 209 }
 210
 211 void
 212 cleanup(void)
 213 {
 214         int i;
 215
 216         for (i = 0; i < nclients; i++) {
 217                 focus(i);
 218                 killclient(NULL);
 219                 killclient(NULL);
 220                 XReparentWindow(dpy, clients[i]->win, root, 0, 0);
 221                 unmanage(i);
 222         }
 223         free(clients);
 224         clients = NULL;
 225
 226         if (dc.font.set)
 227                 XFreeFontSet(dpy, dc.font.set);
 228         else
 229                 XFreeFont(dpy, dc.font.xfont);
 230
 231         XFreePixmap(dpy, dc.drawable);
 232         XFreeGC(dpy, dc.gc);
 233         XDestroyWindow(dpy, win);
 234         XSync(dpy, False);
 235         free(cmd);
 236 }
 237
 238 void
 239 clientmessage(const XEvent *e)
 240 {
 241         const XClientMessageEvent *ev = &e->xclient;
 242
 243         if (ev->message_type == wmatom[WMProtocols] &&
 244             ev->data.l[0] == wmatom[WMDelete])
 245                 running = False;
 246 }
 247
 248 void
 249 configurenotify(const XEvent *e)
 250 {
 251         const XConfigureEvent *ev = &e->xconfigure;
 252
 253         if (ev->window == win && (ev->width != ww || ev->height != wh)) {
 254                 ww = ev->width;
 255                 wh = ev->height;
 256                 XFreePixmap(dpy, dc.drawable);
 257                 dc.drawable = XCreatePixmap(dpy, root, ww, wh,
 258                               DefaultDepth(dpy, screen));
 259                 if (sel > -1)
 260                         resize(sel, ww, wh - bh);
 261                 XSync(dpy, False);
 262         }
 263 }
 264
 265 void
 266 configurerequest(const XEvent *e)
 267 {
 268         const XConfigureRequestEvent *ev = &e->xconfigurerequest;
 269         XWindowChanges wc;
 270         int c;
 271
 272         if ((c = getclient(ev->window)) > -1) {
 273                 wc.x = 0;
 274                 wc.y = bh;
 275                 wc.width = ww;
 276                 wc.height = wh - bh;
 277                 wc.border_width = 0;
 278                 wc.sibling = ev->above;
 279                 wc.stack_mode = ev->detail;
 280                 XConfigureWindow(dpy, clients[c]->win, ev->value_mask, &wc);
 281         }
 282 }
 283
 284 void
 285 createnotify(const XEvent *e)
 286 {
 287         const XCreateWindowEvent *ev = &e->xcreatewindow;
 288
 289         if (ev->window != win && getclient(ev->window) < 0)
 290                 manage(ev->window);
 291 }
 292
 293 void
 294 destroynotify(const XEvent *e)
 295 {
 296         const XDestroyWindowEvent *ev = &e->xdestroywindow;
 297         int c;
 298
 299         if ((c = getclient(ev->window)) > -1)
 300                 unmanage(c);
 301 }
 302
 303 void
 304 die(const char *errstr, ...)
 305 {
 306         va_list ap;
 307
 308         va_start(ap, errstr);
 309         vfprintf(stderr, errstr, ap);
 310         va_end(ap);
 311         exit(EXIT_FAILURE);
 312 }
 313
 314 void
 315 drawbar(void)
 316 {
 317         unsigned long *col;
 318         int c, cc, fc, width;
 319         char *name = NULL;
 320
 321         if (nclients == 0) {
 322                 dc.x = 0;
 323                 dc.w = ww;
 324                 XFetchName(dpy, win, &name);
 325                 drawtext(name ? name : "", dc.norm);
 326                 XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, ww, bh, 0, 0);
 327                 XSync(dpy, False);
 328
 329                 return;
 330         }
 331
 332         width = ww;
 333         cc = ww / tabwidth;
 334         if (nclients > cc)
 335                 cc = (ww - TEXTW(before) - TEXTW(after)) / tabwidth;
 336
 337         if ((fc = getfirsttab()) + cc < nclients) {
 338                 dc.w = TEXTW(after);
 339                 dc.x = width - dc.w;
 340                 drawtext(after, dc.sel);
 341                 width -= dc.w;
 342         }
 343         dc.x = 0;
 344
 345         if (fc > 0) {
 346                 dc.w = TEXTW(before);
 347                 drawtext(before, dc.sel);
 348                 dc.x += dc.w;
 349                 width -= dc.w;
 350         }
 351
 352         cc = MIN(cc, nclients);
 353         for (c = fc; c < fc + cc; c++) {
 354                 dc.w = width / cc;
 355                 if (c == sel) {
 356                         col = dc.sel;
 357                         dc.w += width % cc;
 358                 } else {
 359                         col = clients[c]->urgent ? dc.urg : dc.norm;
 360                 }
 361                 drawtext(clients[c]->name, col);
 362                 dc.x += dc.w;
 363                 clients[c]->tabx = dc.x;
 364         }
 365         XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, ww, bh, 0, 0);
 366         XSync(dpy, False);
 367 }
 368
 369 void
 370 drawtext(const char *text, unsigned long col[ColLast])
 371 {
 372         int i, x, y, h, len, olen;
 373         char buf[256];
 374         XRectangle r = { dc.x, dc.y, dc.w, dc.h };
 375
 376         XSetForeground(dpy, dc.gc, col[ColBG]);
 377         XFillRectangles(dpy, dc.drawable, dc.gc, &r, 1);
 378         if (!text)
 379                 return;
 380
 381         olen = strlen(text);
 382         h = dc.font.ascent + dc.font.descent;
 383         y = dc.y + (dc.h / 2) - (h / 2) + dc.font.ascent;
 384         x = dc.x + (h / 2);
 385
 386         /* shorten text if necessary */
 387         for (len = MIN(olen, sizeof(buf));
 388                 len && textnw(text, len) > dc.w - h; len--);
 389
 390         if (!len)
 391                 return;
 392
 393         memcpy(buf, text, len);
 394         if (len < olen)
 395                 for(i = len; i && i > len - 3; buf[--i] = '.');
 396
 397         XSetForeground(dpy, dc.gc, col[ColFG]);
 398         if (dc.font.set)
 399                 XmbDrawString(dpy, dc.drawable, dc.font.set,
 400                               dc.gc, x, y, buf, len);
 401         else
 402                 XDrawString(dpy, dc.drawable, dc.gc, x, y, buf, len);
 403 }
 404
 405 void *
 406 ecalloc(size_t n, size_t size)
 407 {
 408         void *p;
 409
 410         if (!(p = calloc(n, size)))
 411                 die("tabbed: cannot calloc\n");
 412         return p;
 413 }
 414
 415 void *
 416 erealloc(void *o, size_t size)
 417 {
 418         void *p;
 419
 420         if (!(p = realloc(o, size)))
 421                 die("tabbed: cannot realloc\n");
 422         return p;
 423 }
 424
 425 void
 426 expose(const XEvent *e)
 427 {
 428         const XExposeEvent *ev = &e->xexpose;
 429
 430         if (ev->count == 0 && win == ev->window)
 431                 drawbar();
 432 }
 433
 434 void
 435 focus(int c)
 436 {
 437         char buf[BUFSIZ] = "tabbed-"VERSION" ::";
 438         size_t i, n;
 439         XWMHints* wmh;
 440
 441         /* If c, sel and clients are -1, raise tabbed-win itself */
 442         if (nclients == 0) {
 443                 cmd[cmd_append_pos] = NULL;
 444                 for(i = 0, n = strlen(buf); cmd[i] && n < sizeof(buf); i++)
 445                         n += snprintf(&buf[n], sizeof(buf) - n, " %s", cmd[i]);
 446
 447                 xsettitle(win, buf);
 448                 XRaiseWindow(dpy, win);
 449
 450                 return;
 451         }
 452
 453         if (c < 0 || c >= nclients)
 454                 return;
 455
 456         resize(c, ww, wh - bh);
 457         XRaiseWindow(dpy, clients[c]->win);
 458         XSetInputFocus(dpy, clients[c]->win, RevertToParent, CurrentTime);
 459         sendxembed(c, XEMBED_FOCUS_IN, XEMBED_FOCUS_CURRENT, 0, 0);
 460         sendxembed(c, XEMBED_WINDOW_ACTIVATE, 0, 0, 0);
 461         xsettitle(win, clients[c]->name);
 462
 463         if (sel != c) {
 464                 lastsel = sel;
 465                 sel = c;
 466         }
 467
 468         if (clients[c]->urgent && (wmh = XGetWMHints(dpy, clients[c]->win))) {
 469                 wmh->flags &= ~XUrgencyHint;
 470                 XSetWMHints(dpy, clients[c]->win, wmh);
 471                 clients[c]->urgent = False;
 472                 XFree(wmh);
 473         }
 474
 475         drawbar();
 476         XSync(dpy, False);
 477 }
 478
 479 void
 480 focusin(const XEvent *e)
 481 {
 482         const XFocusChangeEvent *ev = &e->xfocus;
 483         int dummy;
 484         Window focused;
 485
 486         if (ev->mode != NotifyUngrab) {
 487                 XGetInputFocus(dpy, &focused, &dummy);
 488                 if (focused == win)
 489                         focus(sel);
 490         }
 491 }
 492
 493 void
 494 focusonce(const Arg *arg)
 495 {
 496         nextfocus = True;
 497 }
 498
 499 void
 500 focusurgent(const Arg *arg)
 501 {
 502         int c;
 503
 504         for (c = (sel + 1) % nclients; c != sel; c = (c + 1) % nclients) {
 505                 if (clients[c]->urgent) {
 506                         focus(c);
 507                         return;
 508                 }
 509         }
 510 }
 511
 512 void
 513 fullscreen(const Arg *arg)
 514 {
 515         XEvent e;
 516
 517         e.type = ClientMessage;
 518         e.xclient.window = win;
 519         e.xclient.message_type = wmatom[WMState];
 520         e.xclient.format = 32;
 521         e.xclient.data.l[0] = 2;
 522         e.xclient.data.l[1] = wmatom[WMFullscreen];
 523         e.xclient.data.l[2] = 0;
 524         XSendEvent(dpy, root, False, SubstructureNotifyMask, &e);
 525 }
 526
 527 char *
 528 getatom(int a)
 529 {
 530         static char buf[BUFSIZ];
 531         Atom adummy;
 532         int idummy;
 533         unsigned long ldummy;
 534         unsigned char *p = NULL;
 535
 536         XGetWindowProperty(dpy, win, wmatom[a], 0L, BUFSIZ, False, XA_STRING,
 537                            &adummy, &idummy, &ldummy, &ldummy, &p);
 538         if (p)
 539                 strncpy(buf, (char *)p, LENGTH(buf)-1);
 540         else
 541                 buf[0] = '\0';
 542         XFree(p);
 543
 544         return buf;
 545 }
 546
 547 int
 548 getclient(Window w)
 549 {
 550         int i;
 551
 552         for (i = 0; i < nclients; i++) {
 553                 if (clients[i]->win == w)
 554                         return i;
 555         }
 556
 557         return -1;
 558 }
 559
 560 unsigned long
 561 getcolor(const char *colstr)
 562 {
 563         Colormap cmap = DefaultColormap(dpy, screen);
 564         XColor color;
 565
 566         if (!XAllocNamedColor(dpy, cmap, colstr, &color, &color))
 567                 die("tabbed: cannot allocate color '%s'\n", colstr);
 568
 569         return color.pixel;
 570 }
 571
 572 int
 573 getfirsttab(void)
 574 {
 575         int cc, ret;
 576
 577         if (sel < 0)
 578                 return 0;
 579
 580         cc = ww / tabwidth;
 581         if (nclients > cc)
 582                 cc = (ww - TEXTW(before) - TEXTW(after)) / tabwidth;
 583
 584         ret = sel - cc / 2 + (cc + 1) % 2;
 585         return ret < 0 ? 0 :
 586                ret + cc > nclients ? MAX(0, nclients - cc) :
 587                ret;
 588 }
 589
 590 Bool
 591 gettextprop(Window w, Atom atom, char *text, unsigned int size)
 592 {
 593         char **list = NULL;
 594         int n;
 595         XTextProperty name;
 596
 597         if (!text || size == 0)
 598                 return False;
 599
 600         text[0] = '\0';
 601         XGetTextProperty(dpy, w, &name, atom);
 602         if (!name.nitems)
 603                 return False;
 604
 605         if (name.encoding == XA_STRING) {
 606                 strncpy(text, (char *)name.value, size - 1);
 607         } else if (XmbTextPropertyToTextList(dpy, &name, &list, &n) >= Success
 608                    && n > 0 && *list) {
 609                 strncpy(text, *list, size - 1);
 610                 XFreeStringList(list);
 611         }
 612         text[size - 1] = '\0';
 613         XFree(name.value);
 614
 615         return True;
 616 }
 617
 618 void
 619 initfont(const char *fontstr)
 620 {
 621         char *def, **missing, **font_names;
 622         XFontStruct **xfonts;
 623         int i, n;
 624
 625         missing = NULL;
 626         if (dc.font.set)
 627                 XFreeFontSet(dpy, dc.font.set);
 628
 629         dc.font.set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
 630         if (missing) {
 631                 while (n--)
 632                         fprintf(stderr, "tabbed: missing fontset: %s\n", missing[n]);
 633                 XFreeStringList(missing);
 634         }
 635
 636         if (dc.font.set) {
 637                 dc.font.ascent = dc.font.descent = 0;
 638                 n = XFontsOfFontSet(dc.font.set, &xfonts, &font_names);
 639                 for (i = 0, dc.font.ascent = 0, dc.font.descent = 0;
 640                      i < n; i++) {
 641                         dc.font.ascent = MAX(dc.font.ascent, (*xfonts)->ascent);
 642                         dc.font.descent = MAX(dc.font.descent,(*xfonts)->descent);
 643                         xfonts++;
 644                 }
 645         } else {
 646                 if (dc.font.xfont)
 647                         XFreeFont(dpy, dc.font.xfont);
 648                 dc.font.xfont = NULL;
 649                 if (!(dc.font.xfont = XLoadQueryFont(dpy, fontstr)) &&
 650                     !(dc.font.xfont = XLoadQueryFont(dpy, "fixed")))
 651                         die("tabbed: cannot load font: '%s'\n", fontstr);
 652
 653                 dc.font.ascent = dc.font.xfont->ascent;
 654                 dc.font.descent = dc.font.xfont->descent;
 655         }
 656         dc.font.height = dc.font.ascent + dc.font.descent;
 657 }
 658
 659 Bool
 660 isprotodel(int c)
 661 {
 662         int i, n;
 663         Atom *protocols;
 664         Bool ret = False;
 665
 666         if (XGetWMProtocols(dpy, clients[c]->win, &protocols, &n)) {
 667                 for (i = 0; !ret && i < n; i++) {
 668                         if (protocols[i] == wmatom[WMDelete])
 669                                 ret = True;
 670                 }
 671                 XFree(protocols);
 672         }
 673
 674         return ret;
 675 }
 676
 677 void
 678 keypress(const XEvent *e)
 679 {
 680         const XKeyEvent *ev = &e->xkey;
 681         unsigned int i;
 682         KeySym keysym;
 683
 684         keysym = XkbKeycodeToKeysym(dpy, (KeyCode)ev->keycode, 0, 0);
 685         for (i = 0; i < LENGTH(keys); i++) {
 686                 if (keysym == keys[i].keysym &&
 687                     CLEANMASK(keys[i].mod) == CLEANMASK(ev->state) &&
 688                     keys[i].func)
 689                         keys[i].func(&(keys[i].arg));
 690         }
 691 }
 692
 693 void
 694 killclient(const Arg *arg)
 695 {
 696         XEvent ev;
 697
 698         if (sel < 0)
 699                 return;
 700
 701         if (isprotodel(sel) && !clients[sel]->closed) {
 702                 ev.type = ClientMessage;
 703                 ev.xclient.window = clients[sel]->win;
 704                 ev.xclient.message_type = wmatom[WMProtocols];
 705                 ev.xclient.format = 32;
 706                 ev.xclient.data.l[0] = wmatom[WMDelete];
 707                 ev.xclient.data.l[1] = CurrentTime;
 708                 XSendEvent(dpy, clients[sel]->win, False, NoEventMask, &ev);
 709                 clients[sel]->closed = True;
 710         } else {
 711                 XKillClient(dpy, clients[sel]->win);
 712         }
 713 }
 714
 715 void
 716 manage(Window w)
 717 {
 718         updatenumlockmask();
 719         {
 720                 int i, j, nextpos;
 721                 unsigned int modifiers[] = { 0, LockMask, numlockmask,
 722                                              numlockmask | LockMask };
 723                 KeyCode code;
 724                 Client *c;
 725                 XEvent e;
 726
 727                 XWithdrawWindow(dpy, w, 0);
 728                 XReparentWindow(dpy, w, win, 0, bh);
 729                 XSelectInput(dpy, w, PropertyChangeMask |
 730                              StructureNotifyMask | EnterWindowMask);
 731                 XSync(dpy, False);
 732
 733                 for (i = 0; i < LENGTH(keys); i++) {
 734                         if ((code = XKeysymToKeycode(dpy, keys[i].keysym))) {
 735                                 for (j = 0; j < LENGTH(modifiers); j++) {
 736                                         XGrabKey(dpy, code, keys[i].mod |
 737                                                  modifiers[j], w, True,
 738                                                  GrabModeAsync, GrabModeAsync);
 739                                 }
 740                         }
 741                 }
 742
 743                 c = ecalloc(1, sizeof *c);
 744                 c->win = w;
 745
 746                 nclients++;
 747                 clients = erealloc(clients, sizeof(Client *) * nclients);
 748
 749                 if(npisrelative) {
 750                         nextpos = sel + newposition;
 751                 } else {
 752                         if (newposition < 0)
 753                                 nextpos = nclients - newposition;
 754                         else
 755                                 nextpos = newposition;
 756                 }
 757                 if (nextpos >= nclients)
 758                         nextpos = nclients - 1;
 759                 if (nextpos < 0)
 760                         nextpos = 0;
 761
 762                 if (nclients > 1 && nextpos < nclients - 1)
 763                         memmove(&clients[nextpos + 1], &clients[nextpos],
 764                                 sizeof(Client *) * (nclients - nextpos - 1));
 765
 766                 clients[nextpos] = c;
 767                 updatetitle(nextpos);
 768
 769                 XLowerWindow(dpy, w);
 770                 XMapWindow(dpy, w);
 771
 772                 e.xclient.window = w;
 773                 e.xclient.type = ClientMessage;
 774                 e.xclient.message_type = wmatom[XEmbed];
 775                 e.xclient.format = 32;
 776                 e.xclient.data.l[0] = CurrentTime;
 777                 e.xclient.data.l[1] = XEMBED_EMBEDDED_NOTIFY;
 778                 e.xclient.data.l[2] = 0;
 779                 e.xclient.data.l[3] = win;
 780                 e.xclient.data.l[4] = 0;
 781                 XSendEvent(dpy, root, False, NoEventMask, &e);
 782
 783                 XSync(dpy, False);
 784
 785                 /* Adjust sel before focus does set it to lastsel. */
 786                 if (sel >= nextpos)
 787                         sel++;
 788                 focus(nextfocus ? nextpos :
 789                       sel < 0 ? 0 :
 790                       sel);
 791                 nextfocus = foreground;
 792         }
 793 }
 794
 795 void
 796 maprequest(const XEvent *e)
 797 {
 798         const XMapRequestEvent *ev = &e->xmaprequest;
 799
 800         if (getclient(ev->window) < 0)
 801                 manage(ev->window);
 802 }
 803
 804 void
 805 move(const Arg *arg)
 806 {
 807         if (arg->i >= 0 && arg->i < nclients)
 808                 focus(arg->i);
 809 }
 810
 811 void
 812 movetab(const Arg *arg)
 813 {
 814         int c;
 815         Client *new;
 816
 817         c = (sel + arg->i) % nclients;
 818         if (c < 0)
 819                 c += nclients;
 820
 821         if (sel < 0 || c == sel)
 822                 return;
 823
 824         new = clients[sel];
 825         if (sel < c)
 826                 memmove(&clients[sel], &clients[sel+1],
 827                         sizeof(Client *) * (c - sel));
 828         else
 829                 memmove(&clients[c+1], &clients[c],
 830                         sizeof(Client *) * (sel - c));
 831         clients[c] = new;
 832         sel = c;
 833
 834         drawbar();
 835 }
 836
 837 void
 838 propertynotify(const XEvent *e)
 839 {
 840         const XPropertyEvent *ev = &e->xproperty;
 841         XWMHints *wmh;
 842         int c;
 843         char* selection = NULL;
 844         Arg arg;
 845
 846         if (ev->state == PropertyNewValue && ev->atom == wmatom[WMSelectTab]) {
 847                 selection = getatom(WMSelectTab);
 848                 if (!strncmp(selection, "0x", 2)) {
 849                         arg.i = getclient(strtoul(selection, NULL, 0));
 850                         move(&arg);
 851                 } else {
 852                         cmd[cmd_append_pos] = selection;
 853                         arg.v = cmd;
 854                         spawn(&arg);
 855                 }
 856         } else if (ev->state == PropertyNewValue && ev->atom == XA_WM_HINTS &&
 857                    (c = getclient(ev->window)) > -1 &&
 858                    (wmh = XGetWMHints(dpy, clients[c]->win))) {
 859                 if (wmh->flags & XUrgencyHint) {
 860                         XFree(wmh);
 861                         wmh = XGetWMHints(dpy, win);
 862                         if (c != sel) {
 863                                 if (urgentswitch && wmh &&
 864                                     !(wmh->flags & XUrgencyHint)) {
 865                                         /* only switch, if tabbed was focused
 866                                          * since last urgency hint if WMHints
 867                                          * could not be received,
 868                                          * default to no switch */
 869                                         focus(c);
 870                                 } else {
 871                                         /* if no switch should be performed,
 872                                          * mark tab as urgent */
 873                                         clients[c]->urgent = True;
 874                                         drawbar();
 875                                 }
 876                         }
 877                         if (wmh && !(wmh->flags & XUrgencyHint)) {
 878                                 /* update tabbed urgency hint
 879                                  * if not set already */
 880                                 wmh->flags |= XUrgencyHint;
 881                                 XSetWMHints(dpy, win, wmh);
 882                         }
 883                 }
 884                 XFree(wmh);
 885         } else if (ev->state != PropertyDelete && ev->atom == XA_WM_NAME &&
 886                    (c = getclient(ev->window)) > -1) {
 887                 updatetitle(c);
 888         }
 889 }
 890
 891 void
 892 resize(int c, int w, int h)
 893 {
 894         XConfigureEvent ce;
 895         XWindowChanges wc;
 896
 897         ce.x = 0;
 898         ce.y = bh;
 899         ce.width = wc.width = w;
 900         ce.height = wc.height = h;
 901         ce.type = ConfigureNotify;
 902         ce.display = dpy;
 903         ce.event = clients[c]->win;
 904         ce.window = clients[c]->win;
 905         ce.above = None;
 906         ce.override_redirect = False;
 907         ce.border_width = 0;
 908
 909         XConfigureWindow(dpy, clients[c]->win, CWWidth | CWHeight, &wc);
 910         XSendEvent(dpy, clients[c]->win, False, StructureNotifyMask,
 911                    (XEvent *)&ce);
 912 }
 913
 914 void
 915 rotate(const Arg *arg)
 916 {
 917         int nsel = -1;
 918
 919         if (sel < 0)
 920                 return;
 921
 922         if (arg->i == 0) {
 923                 if (lastsel > -1)
 924                         focus(lastsel);
 925         } else if (sel > -1) {
 926                 /* Rotating in an arg->i step around the clients. */
 927                 nsel = sel + arg->i;
 928                 while (nsel >= nclients)
 929                         nsel -= nclients;
 930                 while (nsel < 0)
 931                         nsel += nclients;
 932                 focus(nsel);
 933         }
 934 }
 935
 936 void
 937 run(void)
 938 {
 939         XEvent ev;
 940
 941         /* main event loop */
 942         XSync(dpy, False);
 943         drawbar();
 944         if (doinitspawn == True)
 945                 spawn(NULL);
 946
 947         while (running) {
 948                 XNextEvent(dpy, &ev);
 949                 if (handler[ev.type])
 950                         (handler[ev.type])(&ev); /* call handler */
 951         }
 952 }
 953
 954 void
 955 sendxembed(int c, long msg, long detail, long d1, long d2)
 956 {
 957         XEvent e = { 0 };
 958
 959         e.xclient.window = clients[c]->win;
 960         e.xclient.type = ClientMessage;
 961         e.xclient.message_type = wmatom[XEmbed];
 962         e.xclient.format = 32;
 963         e.xclient.data.l[0] = CurrentTime;
 964         e.xclient.data.l[1] = msg;
 965         e.xclient.data.l[2] = detail;
 966         e.xclient.data.l[3] = d1;
 967         e.xclient.data.l[4] = d2;
 968         XSendEvent(dpy, clients[c]->win, False, NoEventMask, &e);
 969 }
 970
 971 void
 972 setcmd(int argc, char *argv[], int replace)
 973 {
 974         int i;
 975
 976         cmd = ecalloc(argc + 3, sizeof(*cmd));
 977         if (argc == 0)
 978                 return;
 979         for (i = 0; i < argc; i++)
 980                 cmd[i] = argv[i];
 981         cmd[replace > 0 ? replace : argc] = winid;
 982         cmd_append_pos = argc + !replace;
 983         cmd[cmd_append_pos] = cmd[cmd_append_pos + 1] = NULL;
 984 }
 985
 986 void
 987 setup(void)
 988 {
 989         int bitm, tx, ty, tw, th, dh, dw, isfixed;
 990         XWMHints *wmh;
 991         XClassHint class_hint;
 992         XSizeHints *size_hint;
 993
 994         /* clean up any zombies immediately */
 995         sigchld(0);
 996
 997         /* init screen */
 998         screen = DefaultScreen(dpy);
 999         root = RootWindow(dpy, screen);
1000         initfont(font);
1001         bh = dc.h = dc.font.height + 2;
1002
1003         /* init atoms */
1004         wmatom[WMDelete] = XInternAtom(dpy, "WM_DELETE_WINDOW", False);
1005         wmatom[WMFullscreen] = XInternAtom(dpy, "_NET_WM_STATE_FULLSCREEN",
1006                                            False);
1007         wmatom[WMName] = XInternAtom(dpy, "_NET_WM_NAME", False);
1008         wmatom[WMProtocols] = XInternAtom(dpy, "WM_PROTOCOLS", False);
1009         wmatom[WMSelectTab] = XInternAtom(dpy, "_TABBED_SELECT_TAB", False);
1010         wmatom[WMState] = XInternAtom(dpy, "_NET_WM_STATE", False);
1011         wmatom[XEmbed] = XInternAtom(dpy, "_XEMBED", False);
1012
1013         /* init appearance */
1014         wx = 0;
1015         wy = 0;
1016         ww = 800;
1017         wh = 600;
1018         isfixed = 0;
1019
1020         if (geometry) {
1021                 tx = ty = tw = th = 0;
1022                 bitm = XParseGeometry(geometry, &tx, &ty, (unsigned *)&tw,
1023                                       (unsigned *)&th);
1024                 if (bitm & XValue)
1025                         wx = tx;
1026                 if (bitm & YValue)
1027                         wy = ty;
1028                 if (bitm & WidthValue)
1029                         ww = tw;
1030                 if (bitm & HeightValue)
1031                         wh = th;
1032                 if (bitm & XNegative && wx == 0)
1033                         wx = -1;
1034                 if (bitm & YNegative && wy == 0)
1035                         wy = -1;
1036                 if (bitm & (HeightValue | WidthValue))
1037                         isfixed = 1;
1038
1039                 dw = DisplayWidth(dpy, screen);
1040                 dh = DisplayHeight(dpy, screen);
1041                 if (wx < 0)
1042                         wx = dw + wx - ww - 1;
1043                 if (wy < 0)
1044                         wy = dh + wy - wh - 1;
1045         }
1046
1047         dc.norm[ColBG] = getcolor(normbgcolor);
1048         dc.norm[ColFG] = getcolor(normfgcolor);
1049         dc.sel[ColBG] = getcolor(selbgcolor);
1050         dc.sel[ColFG] = getcolor(selfgcolor);
1051         dc.urg[ColBG] = getcolor(urgbgcolor);
1052         dc.urg[ColFG] = getcolor(urgfgcolor);
1053         dc.drawable = XCreatePixmap(dpy, root, ww, wh,
1054                                     DefaultDepth(dpy, screen));
1055         dc.gc = XCreateGC(dpy, root, 0, 0);
1056         if (!dc.font.set)
1057                 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
1058
1059         win = XCreateSimpleWindow(dpy, root, wx, wy, ww, wh, 0,
1060                                   dc.norm[ColFG], dc.norm[ColBG]);
1061         XMapRaised(dpy, win);
1062         XSelectInput(dpy, win, SubstructureNotifyMask | FocusChangeMask |
1063                      ButtonPressMask | ExposureMask | KeyPressMask |
1064                      PropertyChangeMask | StructureNotifyMask |
1065                      SubstructureRedirectMask);
1066         xerrorxlib = XSetErrorHandler(xerror);
1067
1068         class_hint.res_name = wmname;
1069         class_hint.res_class = "tabbed";
1070         XSetClassHint(dpy, win, &class_hint);
1071
1072         size_hint = XAllocSizeHints();
1073         if (!isfixed) {
1074                 size_hint->flags = PSize;
1075                 size_hint->height = wh;
1076                 size_hint->width = ww;
1077         } else {
1078                 size_hint->flags = PMaxSize | PMinSize;
1079                 size_hint->min_width = size_hint->max_width = ww;
1080                 size_hint->min_height = size_hint->max_height = wh;
1081         }
1082         wmh = XAllocWMHints();
1083         XSetWMProperties(dpy, win, NULL, NULL, NULL, 0, size_hint, wmh, NULL);
1084         XFree(size_hint);
1085         XFree(wmh);
1086
1087         XSetWMProtocols(dpy, win, &wmatom[WMDelete], 1);
1088
1089         snprintf(winid, sizeof(winid), "%lu", win);
1090         setenv("XEMBED", winid, 1);
1091
1092         nextfocus = foreground;
1093         focus(-1);
1094 }
1095
1096 void
1097 sigchld(int unused)
1098 {
1099         if (signal(SIGCHLD, sigchld) == SIG_ERR)
1100                 die("tabbed: cannot install SIGCHLD handler");
1101
1102         while (0 < waitpid(-1, NULL, WNOHANG));
1103 }
1104
1105 void
1106 spawn(const Arg *arg)
1107 {
1108         if (fork() == 0) {
1109                 if(dpy)
1110                         close(ConnectionNumber(dpy));
1111
1112                 setsid();
1113                 if (arg && arg->v) {
1114                         execvp(((char **)arg->v)[0], (char **)arg->v);
1115                         fprintf(stderr, "tabbed: execvp %s",
1116                                 ((char **)arg->v)[0]);
1117                 } else {
1118                         cmd[cmd_append_pos] = NULL;
1119                         execvp(cmd[0], cmd);
1120                         fprintf(stderr, "tabbed: execvp %s", cmd[0]);
1121                 }
1122                 perror(" failed");
1123                 exit(0);
1124         }
1125 }
1126
1127 int
1128 textnw(const char *text, unsigned int len)
1129 {
1130         XRectangle r;
1131
1132         if (dc.font.set) {
1133                 XmbTextExtents(dc.font.set, text, len, NULL, &r);
1134                 return r.width;
1135         }
1136
1137         return XTextWidth(dc.font.xfont, text, len);
1138 }
1139
1140 void
1141 toggle(const Arg *arg)
1142 {
1143     *(Bool*) arg->v = !*(Bool*) arg->v;
1144 }
1145
1146 void
1147 unmanage(int c)
1148 {
1149         if (c < 0 || c >= nclients) {
1150                 drawbar();
1151                 XSync(dpy, False);
1152                 return;
1153         }
1154
1155         if (!nclients)
1156                 return;
1157
1158         if (c == 0) {
1159                 /* First client. */
1160                 nclients--;
1161                 free(clients[0]);
1162                 memmove(&clients[0], &clients[1], sizeof(Client *) * nclients);
1163         } else if (c == nclients - 1) {
1164                 /* Last client. */
1165                 nclients--;
1166                 free(clients[c]);
1167                 clients = erealloc(clients, sizeof(Client *) * nclients);
1168         } else {
1169                 /* Somewhere inbetween. */
1170                 free(clients[c]);
1171                 memmove(&clients[c], &clients[c+1],
1172                         sizeof(Client *) * (nclients - (c + 1)));
1173                 nclients--;
1174         }
1175
1176         if (nclients <= 0) {
1177                 lastsel = sel = -1;
1178
1179                 if (closelastclient)
1180                         running = False;
1181                 else if (fillagain && running)
1182                         spawn(NULL);
1183         } else {
1184                 if (lastsel >= nclients)
1185                         lastsel = nclients - 1;
1186                 else if (lastsel > c)
1187                         lastsel--;
1188
1189                 if (c == sel && lastsel >= 0) {
1190                         focus(lastsel);
1191                 } else {
1192                         if (sel > c)
1193                                 sel--;
1194                         if (sel >= nclients)
1195                                 sel = nclients - 1;
1196
1197                         focus(sel);
1198                 }
1199         }
1200
1201         drawbar();
1202         XSync(dpy, False);
1203 }
1204
1205 void
1206 unmapnotify(const XEvent *e)
1207 {
1208         const XUnmapEvent *ev = &e->xunmap;
1209         int c;
1210
1211         if ((c = getclient(ev->window)) > -1)
1212                 unmanage(c);
1213 }
1214
1215 void
1216 updatenumlockmask(void)
1217 {
1218         unsigned int i, j;
1219         XModifierKeymap *modmap;
1220
1221         numlockmask = 0;
1222         modmap = XGetModifierMapping(dpy);
1223         for (i = 0; i < 8; i++) {
1224                 for (j = 0; j < modmap->max_keypermod; j++) {
1225                         if (modmap->modifiermap[i * modmap->max_keypermod + j]
1226                             == XKeysymToKeycode(dpy, XK_Num_Lock))
1227                                 numlockmask = (1 << i);
1228                 }
1229         }
1230         XFreeModifiermap(modmap);
1231 }
1232
1233 void
1234 updatetitle(int c)
1235 {
1236         if (!gettextprop(clients[c]->win, wmatom[WMName], clients[c]->name,
1237             sizeof(clients[c]->name)))
1238                 gettextprop(clients[c]->win, XA_WM_NAME, clients[c]->name,
1239                             sizeof(clients[c]->name));
1240         if (sel == c)
1241                 xsettitle(win, clients[c]->name);
1242         drawbar();
1243 }
1244
1245 /* There's no way to check accesses to destroyed windows, thus those cases are
1246  * ignored (especially on UnmapNotify's).  Other types of errors call Xlibs
1247  * default error handler, which may call exit.  */
1248 int
1249 xerror(Display *dpy, XErrorEvent *ee)
1250 {
1251         if (ee->error_code == BadWindow
1252             || (ee->request_code == X_SetInputFocus &&
1253                 ee->error_code == BadMatch)
1254             || (ee->request_code == X_PolyText8 &&
1255                 ee->error_code == BadDrawable)
1256             || (ee->request_code == X_PolyFillRectangle &&
1257                 ee->error_code == BadDrawable)
1258             || (ee->request_code == X_PolySegment &&
1259                 ee->error_code == BadDrawable)
1260             || (ee->request_code == X_ConfigureWindow &&
1261                 ee->error_code == BadMatch)
1262             || (ee->request_code == X_GrabButton &&
1263                 ee->error_code == BadAccess)
1264             || (ee->request_code == X_GrabKey &&
1265                 ee->error_code == BadAccess)
1266             || (ee->request_code == X_CopyArea &&
1267                 ee->error_code == BadDrawable))
1268                 return 0;
1269
1270         fprintf(stderr, "tabbed: fatal error: request code=%d, error code=%d\n",
1271                 ee->request_code, ee->error_code);
1272         return xerrorxlib(dpy, ee); /* may call exit */
1273 }
1274
1275 void
1276 xsettitle(Window w, const char *str)
1277 {
1278         XTextProperty xtp;
1279
1280         if (XmbTextListToTextProperty(dpy, (char **)&str, 1,
1281             XCompoundTextStyle, &xtp) == Success) {
1282                 XSetTextProperty(dpy, w, &xtp, wmatom[WMName]);
1283                 XSetTextProperty(dpy, w, &xtp, XA_WM_NAME);
1284                 XFree(xtp.value);
1285         }
1286 }
1287
1288 void
1289 usage(void)
1290 {
1291         die("usage: %s [-dfhsv] [-g geometry] [-n name] [-p [s+/-]pos] "
1292             "[-r narg] [-o color] [-O color] [-t color] [-T color] "
1293             "[-u color] [-U color] command...\n", argv0);
1294 }
1295
1296 int
1297 main(int argc, char *argv[])
1298 {
1299         Bool detach = False;
1300         int replace = 0;
1301         char *pstr;
1302
1303         ARGBEGIN {
1304         case 'c':
1305                 closelastclient = True;
1306                 fillagain = False;
1307                 break;
1308         case 'd':
1309                 detach = True;
1310                 break;
1311         case 'f':
1312                 fillagain = True;
1313                 break;
1314         case 'g':
1315                 geometry = EARGF(usage());
1316                 break;
1317         case 'n':
1318                 wmname = EARGF(usage());
1319                 break;
1320         case 'O':
1321                 normfgcolor = EARGF(usage());
1322                 break;
1323         case 'o':
1324                 normbgcolor = EARGF(usage());
1325                 break;
1326         case 'p':
1327                 pstr = EARGF(usage());
1328                 if (pstr[0] == 's') {
1329                         npisrelative = True;
1330                         newposition = atoi(&pstr[1]);
1331                 } else {
1332                         newposition = atoi(pstr);
1333                 }
1334                 break;
1335         case 'r':
1336                 replace = atoi(EARGF(usage()));
1337                 break;
1338         case 's':
1339                 doinitspawn = False;
1340                 break;
1341         case 'T':
1342                 selfgcolor = EARGF(usage());
1343                 break;
1344         case 't':
1345                 selbgcolor = EARGF(usage());
1346                 break;
1347         case 'U':
1348                 urgfgcolor = EARGF(usage());
1349                 break;
1350         case 'u':
1351                 urgbgcolor = EARGF(usage());
1352                 break;
1353         case 'v':
1354                 die("tabbed-"VERSION", © 2009-2016"
1355                         " tabbed engineers, see LICENSE"
1356                         " for details.\n");
1357                 break;
1358         default: /* FALLTHROUGH */
1359         case 'h':
1360                 usage();
1361         } ARGEND;
1362
1363         if (argc < 1) {
1364                 doinitspawn = False;
1365                 fillagain = False;
1366         }
1367
1368         setcmd(argc, argv, replace);
1369
1370         if (!setlocale(LC_CTYPE, "") || !XSupportsLocale())
1371                 fprintf(stderr, "%s: no locale support\n", argv0);
1372         if (!(dpy = XOpenDisplay(NULL)))
1373                 die("%s: cannot open display\n", argv0);
1374
1375         setup();
1376         printf("0x%lx\n", win);
1377         fflush(NULL);
1378
1379         if (detach) {
1380                 if (fork() == 0) {
1381                         fclose(stdout);
1382                 } else {
1383                         if (dpy)
1384                                 close(ConnectionNumber(dpy));
1385                         return EXIT_SUCCESS;
1386                 }
1387         }
1388
1389         run();
1390         cleanup();
1391         XCloseDisplay(dpy);
1392
1393         return EXIT_SUCCESS;
1394 }