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, j, 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, j = strlen(titletrim); j && i;
 396                      buf[--i] = titletrim[--j])
 397                         ;
 398         }
 399
 400         XSetForeground(dpy, dc.gc, col[ColFG]);
 401         if (dc.font.set)
 402                 XmbDrawString(dpy, dc.drawable, dc.font.set,
 403                               dc.gc, x, y, buf, len);
 404         else
 405                 XDrawString(dpy, dc.drawable, dc.gc, x, y, buf, len);
 406 }
 407
 408 void *
 409 ecalloc(size_t n, size_t size)
 410 {
 411         void *p;
 412
 413         if (!(p = calloc(n, size)))
 414                 die("%s: cannot calloc\n", argv0);
 415         return p;
 416 }
 417
 418 void *
 419 erealloc(void *o, size_t size)
 420 {
 421         void *p;
 422
 423         if (!(p = realloc(o, size)))
 424                 die("%s: cannot realloc\n", argv0);
 425         return p;
 426 }
 427
 428 void
 429 expose(const XEvent *e)
 430 {
 431         const XExposeEvent *ev = &e->xexpose;
 432
 433         if (ev->count == 0 && win == ev->window)
 434                 drawbar();
 435 }
 436
 437 void
 438 focus(int c)
 439 {
 440         char buf[BUFSIZ] = "tabbed-"VERSION" ::";
 441         size_t i, n;
 442         XWMHints* wmh;
 443
 444         /* If c, sel and clients are -1, raise tabbed-win itself */
 445         if (nclients == 0) {
 446                 cmd[cmd_append_pos] = NULL;
 447                 for(i = 0, n = strlen(buf); cmd[i] && n < sizeof(buf); i++)
 448                         n += snprintf(&buf[n], sizeof(buf) - n, " %s", cmd[i]);
 449
 450                 xsettitle(win, buf);
 451                 XRaiseWindow(dpy, win);
 452
 453                 return;
 454         }
 455
 456         if (c < 0 || c >= nclients)
 457                 return;
 458
 459         resize(c, ww, wh - bh);
 460         XRaiseWindow(dpy, clients[c]->win);
 461         XSetInputFocus(dpy, clients[c]->win, RevertToParent, CurrentTime);
 462         sendxembed(c, XEMBED_FOCUS_IN, XEMBED_FOCUS_CURRENT, 0, 0);
 463         sendxembed(c, XEMBED_WINDOW_ACTIVATE, 0, 0, 0);
 464         xsettitle(win, clients[c]->name);
 465
 466         if (sel != c) {
 467                 lastsel = sel;
 468                 sel = c;
 469         }
 470
 471         if (clients[c]->urgent && (wmh = XGetWMHints(dpy, clients[c]->win))) {
 472                 wmh->flags &= ~XUrgencyHint;
 473                 XSetWMHints(dpy, clients[c]->win, wmh);
 474                 clients[c]->urgent = False;
 475                 XFree(wmh);
 476         }
 477
 478         drawbar();
 479         XSync(dpy, False);
 480 }
 481
 482 void
 483 focusin(const XEvent *e)
 484 {
 485         const XFocusChangeEvent *ev = &e->xfocus;
 486         int dummy;
 487         Window focused;
 488
 489         if (ev->mode != NotifyUngrab) {
 490                 XGetInputFocus(dpy, &focused, &dummy);
 491                 if (focused == win)
 492                         focus(sel);
 493         }
 494 }
 495
 496 void
 497 focusonce(const Arg *arg)
 498 {
 499         nextfocus = True;
 500 }
 501
 502 void
 503 focusurgent(const Arg *arg)
 504 {
 505         int c;
 506
 507         for (c = (sel + 1) % nclients; c != sel; c = (c + 1) % nclients) {
 508                 if (clients[c]->urgent) {
 509                         focus(c);
 510                         return;
 511                 }
 512         }
 513 }
 514
 515 void
 516 fullscreen(const Arg *arg)
 517 {
 518         XEvent e;
 519
 520         e.type = ClientMessage;
 521         e.xclient.window = win;
 522         e.xclient.message_type = wmatom[WMState];
 523         e.xclient.format = 32;
 524         e.xclient.data.l[0] = 2;
 525         e.xclient.data.l[1] = wmatom[WMFullscreen];
 526         e.xclient.data.l[2] = 0;
 527         XSendEvent(dpy, root, False, SubstructureNotifyMask, &e);
 528 }
 529
 530 char *
 531 getatom(int a)
 532 {
 533         static char buf[BUFSIZ];
 534         Atom adummy;
 535         int idummy;
 536         unsigned long ldummy;
 537         unsigned char *p = NULL;
 538
 539         XGetWindowProperty(dpy, win, wmatom[a], 0L, BUFSIZ, False, XA_STRING,
 540                            &adummy, &idummy, &ldummy, &ldummy, &p);
 541         if (p)
 542                 strncpy(buf, (char *)p, LENGTH(buf)-1);
 543         else
 544                 buf[0] = '\0';
 545         XFree(p);
 546
 547         return buf;
 548 }
 549
 550 int
 551 getclient(Window w)
 552 {
 553         int i;
 554
 555         for (i = 0; i < nclients; i++) {
 556                 if (clients[i]->win == w)
 557                         return i;
 558         }
 559
 560         return -1;
 561 }
 562
 563 unsigned long
 564 getcolor(const char *colstr)
 565 {
 566         Colormap cmap = DefaultColormap(dpy, screen);
 567         XColor color;
 568
 569         if (!XAllocNamedColor(dpy, cmap, colstr, &color, &color))
 570                 die("%s: cannot allocate color '%s'\n", argv0, colstr);
 571
 572         return color.pixel;
 573 }
 574
 575 int
 576 getfirsttab(void)
 577 {
 578         int cc, ret;
 579
 580         if (sel < 0)
 581                 return 0;
 582
 583         cc = ww / tabwidth;
 584         if (nclients > cc)
 585                 cc = (ww - TEXTW(before) - TEXTW(after)) / tabwidth;
 586
 587         ret = sel - cc / 2 + (cc + 1) % 2;
 588         return ret < 0 ? 0 :
 589                ret + cc > nclients ? MAX(0, nclients - cc) :
 590                ret;
 591 }
 592
 593 Bool
 594 gettextprop(Window w, Atom atom, char *text, unsigned int size)
 595 {
 596         char **list = NULL;
 597         int n;
 598         XTextProperty name;
 599
 600         if (!text || size == 0)
 601                 return False;
 602
 603         text[0] = '\0';
 604         XGetTextProperty(dpy, w, &name, atom);
 605         if (!name.nitems)
 606                 return False;
 607
 608         if (name.encoding == XA_STRING) {
 609                 strncpy(text, (char *)name.value, size - 1);
 610         } else if (XmbTextPropertyToTextList(dpy, &name, &list, &n) >= Success
 611                    && n > 0 && *list) {
 612                 strncpy(text, *list, size - 1);
 613                 XFreeStringList(list);
 614         }
 615         text[size - 1] = '\0';
 616         XFree(name.value);
 617
 618         return True;
 619 }
 620
 621 void
 622 initfont(const char *fontstr)
 623 {
 624         char *def, **missing, **font_names;
 625         XFontStruct **xfonts;
 626         int i, n;
 627
 628         missing = NULL;
 629         if (dc.font.set)
 630                 XFreeFontSet(dpy, dc.font.set);
 631
 632         dc.font.set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
 633         if (missing) {
 634                 while (n--)
 635                         fprintf(stderr, "%s: missing fontset: %s\n",
 636                                 argv0, missing[n]);
 637                 XFreeStringList(missing);
 638         }
 639
 640         if (dc.font.set) {
 641                 dc.font.ascent = dc.font.descent = 0;
 642                 n = XFontsOfFontSet(dc.font.set, &xfonts, &font_names);
 643                 for (i = 0, dc.font.ascent = 0, dc.font.descent = 0;
 644                      i < n; i++) {
 645                         dc.font.ascent = MAX(dc.font.ascent, (*xfonts)->ascent);
 646                         dc.font.descent = MAX(dc.font.descent,(*xfonts)->descent);
 647                         xfonts++;
 648                 }
 649         } else {
 650                 if (dc.font.xfont)
 651                         XFreeFont(dpy, dc.font.xfont);
 652                 dc.font.xfont = NULL;
 653                 if (!(dc.font.xfont = XLoadQueryFont(dpy, fontstr)) &&
 654                     !(dc.font.xfont = XLoadQueryFont(dpy, "fixed")))
 655                         die("%s: cannot load font: '%s'\n", argv0, fontstr);
 656
 657                 dc.font.ascent = dc.font.xfont->ascent;
 658                 dc.font.descent = dc.font.xfont->descent;
 659         }
 660         dc.font.height = dc.font.ascent + dc.font.descent;
 661 }
 662
 663 Bool
 664 isprotodel(int c)
 665 {
 666         int i, n;
 667         Atom *protocols;
 668         Bool ret = False;
 669
 670         if (XGetWMProtocols(dpy, clients[c]->win, &protocols, &n)) {
 671                 for (i = 0; !ret && i < n; i++) {
 672                         if (protocols[i] == wmatom[WMDelete])
 673                                 ret = True;
 674                 }
 675                 XFree(protocols);
 676         }
 677
 678         return ret;
 679 }
 680
 681 void
 682 keypress(const XEvent *e)
 683 {
 684         const XKeyEvent *ev = &e->xkey;
 685         unsigned int i;
 686         KeySym keysym;
 687
 688         keysym = XkbKeycodeToKeysym(dpy, (KeyCode)ev->keycode, 0, 0);
 689         for (i = 0; i < LENGTH(keys); i++) {
 690                 if (keysym == keys[i].keysym &&
 691                     CLEANMASK(keys[i].mod) == CLEANMASK(ev->state) &&
 692                     keys[i].func)
 693                         keys[i].func(&(keys[i].arg));
 694         }
 695 }
 696
 697 void
 698 killclient(const Arg *arg)
 699 {
 700         XEvent ev;
 701
 702         if (sel < 0)
 703                 return;
 704
 705         if (isprotodel(sel) && !clients[sel]->closed) {
 706                 ev.type = ClientMessage;
 707                 ev.xclient.window = clients[sel]->win;
 708                 ev.xclient.message_type = wmatom[WMProtocols];
 709                 ev.xclient.format = 32;
 710                 ev.xclient.data.l[0] = wmatom[WMDelete];
 711                 ev.xclient.data.l[1] = CurrentTime;
 712                 XSendEvent(dpy, clients[sel]->win, False, NoEventMask, &ev);
 713                 clients[sel]->closed = True;
 714         } else {
 715                 XKillClient(dpy, clients[sel]->win);
 716         }
 717 }
 718
 719 void
 720 manage(Window w)
 721 {
 722         updatenumlockmask();
 723         {
 724                 int i, j, nextpos;
 725                 unsigned int modifiers[] = { 0, LockMask, numlockmask,
 726                                              numlockmask | LockMask };
 727                 KeyCode code;
 728                 Client *c;
 729                 XEvent e;
 730
 731                 XWithdrawWindow(dpy, w, 0);
 732                 XReparentWindow(dpy, w, win, 0, bh);
 733                 XSelectInput(dpy, w, PropertyChangeMask |
 734                              StructureNotifyMask | EnterWindowMask);
 735                 XSync(dpy, False);
 736
 737                 for (i = 0; i < LENGTH(keys); i++) {
 738                         if ((code = XKeysymToKeycode(dpy, keys[i].keysym))) {
 739                                 for (j = 0; j < LENGTH(modifiers); j++) {
 740                                         XGrabKey(dpy, code, keys[i].mod |
 741                                                  modifiers[j], w, True,
 742                                                  GrabModeAsync, GrabModeAsync);
 743                                 }
 744                         }
 745                 }
 746
 747                 c = ecalloc(1, sizeof *c);
 748                 c->win = w;
 749
 750                 nclients++;
 751                 clients = erealloc(clients, sizeof(Client *) * nclients);
 752
 753                 if(npisrelative) {
 754                         nextpos = sel + newposition;
 755                 } else {
 756                         if (newposition < 0)
 757                                 nextpos = nclients - newposition;
 758                         else
 759                                 nextpos = newposition;
 760                 }
 761                 if (nextpos >= nclients)
 762                         nextpos = nclients - 1;
 763                 if (nextpos < 0)
 764                         nextpos = 0;
 765
 766                 if (nclients > 1 && nextpos < nclients - 1)
 767                         memmove(&clients[nextpos + 1], &clients[nextpos],
 768                                 sizeof(Client *) * (nclients - nextpos - 1));
 769
 770                 clients[nextpos] = c;
 771                 updatetitle(nextpos);
 772
 773                 XLowerWindow(dpy, w);
 774                 XMapWindow(dpy, w);
 775
 776                 e.xclient.window = w;
 777                 e.xclient.type = ClientMessage;
 778                 e.xclient.message_type = wmatom[XEmbed];
 779                 e.xclient.format = 32;
 780                 e.xclient.data.l[0] = CurrentTime;
 781                 e.xclient.data.l[1] = XEMBED_EMBEDDED_NOTIFY;
 782                 e.xclient.data.l[2] = 0;
 783                 e.xclient.data.l[3] = win;
 784                 e.xclient.data.l[4] = 0;
 785                 XSendEvent(dpy, root, False, NoEventMask, &e);
 786
 787                 XSync(dpy, False);
 788
 789                 /* Adjust sel before focus does set it to lastsel. */
 790                 if (sel >= nextpos)
 791                         sel++;
 792                 focus(nextfocus ? nextpos :
 793                       sel < 0 ? 0 :
 794                       sel);
 795                 nextfocus = foreground;
 796         }
 797 }
 798
 799 void
 800 maprequest(const XEvent *e)
 801 {
 802         const XMapRequestEvent *ev = &e->xmaprequest;
 803
 804         if (getclient(ev->window) < 0)
 805                 manage(ev->window);
 806 }
 807
 808 void
 809 move(const Arg *arg)
 810 {
 811         if (arg->i >= 0 && arg->i < nclients)
 812                 focus(arg->i);
 813 }
 814
 815 void
 816 movetab(const Arg *arg)
 817 {
 818         int c;
 819         Client *new;
 820
 821         c = (sel + arg->i) % nclients;
 822         if (c < 0)
 823                 c += nclients;
 824
 825         if (sel < 0 || c == sel)
 826                 return;
 827
 828         new = clients[sel];
 829         if (sel < c)
 830                 memmove(&clients[sel], &clients[sel+1],
 831                         sizeof(Client *) * (c - sel));
 832         else
 833                 memmove(&clients[c+1], &clients[c],
 834                         sizeof(Client *) * (sel - c));
 835         clients[c] = new;
 836         sel = c;
 837
 838         drawbar();
 839 }
 840
 841 void
 842 propertynotify(const XEvent *e)
 843 {
 844         const XPropertyEvent *ev = &e->xproperty;
 845         XWMHints *wmh;
 846         int c;
 847         char* selection = NULL;
 848         Arg arg;
 849
 850         if (ev->state == PropertyNewValue && ev->atom == wmatom[WMSelectTab]) {
 851                 selection = getatom(WMSelectTab);
 852                 if (!strncmp(selection, "0x", 2)) {
 853                         arg.i = getclient(strtoul(selection, NULL, 0));
 854                         move(&arg);
 855                 } else {
 856                         cmd[cmd_append_pos] = selection;
 857                         arg.v = cmd;
 858                         spawn(&arg);
 859                 }
 860         } else if (ev->state == PropertyNewValue && ev->atom == XA_WM_HINTS &&
 861                    (c = getclient(ev->window)) > -1 &&
 862                    (wmh = XGetWMHints(dpy, clients[c]->win))) {
 863                 if (wmh->flags & XUrgencyHint) {
 864                         XFree(wmh);
 865                         wmh = XGetWMHints(dpy, win);
 866                         if (c != sel) {
 867                                 if (urgentswitch && wmh &&
 868                                     !(wmh->flags & XUrgencyHint)) {
 869                                         /* only switch, if tabbed was focused
 870                                          * since last urgency hint if WMHints
 871                                          * could not be received,
 872                                          * default to no switch */
 873                                         focus(c);
 874                                 } else {
 875                                         /* if no switch should be performed,
 876                                          * mark tab as urgent */
 877                                         clients[c]->urgent = True;
 878                                         drawbar();
 879                                 }
 880                         }
 881                         if (wmh && !(wmh->flags & XUrgencyHint)) {
 882                                 /* update tabbed urgency hint
 883                                  * if not set already */
 884                                 wmh->flags |= XUrgencyHint;
 885                                 XSetWMHints(dpy, win, wmh);
 886                         }
 887                 }
 888                 XFree(wmh);
 889         } else if (ev->state != PropertyDelete && ev->atom == XA_WM_NAME &&
 890                    (c = getclient(ev->window)) > -1) {
 891                 updatetitle(c);
 892         }
 893 }
 894
 895 void
 896 resize(int c, int w, int h)
 897 {
 898         XConfigureEvent ce;
 899         XWindowChanges wc;
 900
 901         ce.x = 0;
 902         ce.y = bh;
 903         ce.width = wc.width = w;
 904         ce.height = wc.height = h;
 905         ce.type = ConfigureNotify;
 906         ce.display = dpy;
 907         ce.event = clients[c]->win;
 908         ce.window = clients[c]->win;
 909         ce.above = None;
 910         ce.override_redirect = False;
 911         ce.border_width = 0;
 912
 913         XConfigureWindow(dpy, clients[c]->win, CWWidth | CWHeight, &wc);
 914         XSendEvent(dpy, clients[c]->win, False, StructureNotifyMask,
 915                    (XEvent *)&ce);
 916 }
 917
 918 void
 919 rotate(const Arg *arg)
 920 {
 921         int nsel = -1;
 922
 923         if (sel < 0)
 924                 return;
 925
 926         if (arg->i == 0) {
 927                 if (lastsel > -1)
 928                         focus(lastsel);
 929         } else if (sel > -1) {
 930                 /* Rotating in an arg->i step around the clients. */
 931                 nsel = sel + arg->i;
 932                 while (nsel >= nclients)
 933                         nsel -= nclients;
 934                 while (nsel < 0)
 935                         nsel += nclients;
 936                 focus(nsel);
 937         }
 938 }
 939
 940 void
 941 run(void)
 942 {
 943         XEvent ev;
 944
 945         /* main event loop */
 946         XSync(dpy, False);
 947         drawbar();
 948         if (doinitspawn == True)
 949                 spawn(NULL);
 950
 951         while (running) {
 952                 XNextEvent(dpy, &ev);
 953                 if (handler[ev.type])
 954                         (handler[ev.type])(&ev); /* call handler */
 955         }
 956 }
 957
 958 void
 959 sendxembed(int c, long msg, long detail, long d1, long d2)
 960 {
 961         XEvent e = { 0 };
 962
 963         e.xclient.window = clients[c]->win;
 964         e.xclient.type = ClientMessage;
 965         e.xclient.message_type = wmatom[XEmbed];
 966         e.xclient.format = 32;
 967         e.xclient.data.l[0] = CurrentTime;
 968         e.xclient.data.l[1] = msg;
 969         e.xclient.data.l[2] = detail;
 970         e.xclient.data.l[3] = d1;
 971         e.xclient.data.l[4] = d2;
 972         XSendEvent(dpy, clients[c]->win, False, NoEventMask, &e);
 973 }
 974
 975 void
 976 setcmd(int argc, char *argv[], int replace)
 977 {
 978         int i;
 979
 980         cmd = ecalloc(argc + 3, sizeof(*cmd));
 981         if (argc == 0)
 982                 return;
 983         for (i = 0; i < argc; i++)
 984                 cmd[i] = argv[i];
 985         cmd[replace > 0 ? replace : argc] = winid;
 986         cmd_append_pos = argc + !replace;
 987         cmd[cmd_append_pos] = cmd[cmd_append_pos + 1] = NULL;
 988 }
 989
 990 void
 991 setup(void)
 992 {
 993         int bitm, tx, ty, tw, th, dh, dw, isfixed;
 994         XWMHints *wmh;
 995         XClassHint class_hint;
 996         XSizeHints *size_hint;
 997
 998         /* clean up any zombies immediately */
 999         sigchld(0);
1000
1001         /* init screen */
1002         screen = DefaultScreen(dpy);
1003         root = RootWindow(dpy, screen);
1004         initfont(font);
1005         bh = dc.h = dc.font.height + 2;
1006
1007         /* init atoms */
1008         wmatom[WMDelete] = XInternAtom(dpy, "WM_DELETE_WINDOW", False);
1009         wmatom[WMFullscreen] = XInternAtom(dpy, "_NET_WM_STATE_FULLSCREEN",
1010                                            False);
1011         wmatom[WMName] = XInternAtom(dpy, "_NET_WM_NAME", False);
1012         wmatom[WMProtocols] = XInternAtom(dpy, "WM_PROTOCOLS", False);
1013         wmatom[WMSelectTab] = XInternAtom(dpy, "_TABBED_SELECT_TAB", False);
1014         wmatom[WMState] = XInternAtom(dpy, "_NET_WM_STATE", False);
1015         wmatom[XEmbed] = XInternAtom(dpy, "_XEMBED", False);
1016
1017         /* init appearance */
1018         wx = 0;
1019         wy = 0;
1020         ww = 800;
1021         wh = 600;
1022         isfixed = 0;
1023
1024         if (geometry) {
1025                 tx = ty = tw = th = 0;
1026                 bitm = XParseGeometry(geometry, &tx, &ty, (unsigned *)&tw,
1027                                       (unsigned *)&th);
1028                 if (bitm & XValue)
1029                         wx = tx;
1030                 if (bitm & YValue)
1031                         wy = ty;
1032                 if (bitm & WidthValue)
1033                         ww = tw;
1034                 if (bitm & HeightValue)
1035                         wh = th;
1036                 if (bitm & XNegative && wx == 0)
1037                         wx = -1;
1038                 if (bitm & YNegative && wy == 0)
1039                         wy = -1;
1040                 if (bitm & (HeightValue | WidthValue))
1041                         isfixed = 1;
1042
1043                 dw = DisplayWidth(dpy, screen);
1044                 dh = DisplayHeight(dpy, screen);
1045                 if (wx < 0)
1046                         wx = dw + wx - ww - 1;
1047                 if (wy < 0)
1048                         wy = dh + wy - wh - 1;
1049         }
1050
1051         dc.norm[ColBG] = getcolor(normbgcolor);
1052         dc.norm[ColFG] = getcolor(normfgcolor);
1053         dc.sel[ColBG] = getcolor(selbgcolor);
1054         dc.sel[ColFG] = getcolor(selfgcolor);
1055         dc.urg[ColBG] = getcolor(urgbgcolor);
1056         dc.urg[ColFG] = getcolor(urgfgcolor);
1057         dc.drawable = XCreatePixmap(dpy, root, ww, wh,
1058                                     DefaultDepth(dpy, screen));
1059         dc.gc = XCreateGC(dpy, root, 0, 0);
1060         if (!dc.font.set)
1061                 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
1062
1063         win = XCreateSimpleWindow(dpy, root, wx, wy, ww, wh, 0,
1064                                   dc.norm[ColFG], dc.norm[ColBG]);
1065         XMapRaised(dpy, win);
1066         XSelectInput(dpy, win, SubstructureNotifyMask | FocusChangeMask |
1067                      ButtonPressMask | ExposureMask | KeyPressMask |
1068                      PropertyChangeMask | StructureNotifyMask |
1069                      SubstructureRedirectMask);
1070         xerrorxlib = XSetErrorHandler(xerror);
1071
1072         class_hint.res_name = wmname;
1073         class_hint.res_class = "tabbed";
1074         XSetClassHint(dpy, win, &class_hint);
1075
1076         size_hint = XAllocSizeHints();
1077         if (!isfixed) {
1078                 size_hint->flags = PSize;
1079                 size_hint->height = wh;
1080                 size_hint->width = ww;
1081         } else {
1082                 size_hint->flags = PMaxSize | PMinSize;
1083                 size_hint->min_width = size_hint->max_width = ww;
1084                 size_hint->min_height = size_hint->max_height = wh;
1085         }
1086         wmh = XAllocWMHints();
1087         XSetWMProperties(dpy, win, NULL, NULL, NULL, 0, size_hint, wmh, NULL);
1088         XFree(size_hint);
1089         XFree(wmh);
1090
1091         XSetWMProtocols(dpy, win, &wmatom[WMDelete], 1);
1092
1093         snprintf(winid, sizeof(winid), "%lu", win);
1094         setenv("XEMBED", winid, 1);
1095
1096         nextfocus = foreground;
1097         focus(-1);
1098 }
1099
1100 void
1101 sigchld(int unused)
1102 {
1103         if (signal(SIGCHLD, sigchld) == SIG_ERR)
1104                 die("%s: cannot install SIGCHLD handler", argv0);
1105
1106         while (0 < waitpid(-1, NULL, WNOHANG));
1107 }
1108
1109 void
1110 spawn(const Arg *arg)
1111 {
1112         if (fork() == 0) {
1113                 if(dpy)
1114                         close(ConnectionNumber(dpy));
1115
1116                 setsid();
1117                 if (arg && arg->v) {
1118                         execvp(((char **)arg->v)[0], (char **)arg->v);
1119                         fprintf(stderr, "%s: execvp %s", argv0,
1120                                 ((char **)arg->v)[0]);
1121                 } else {
1122                         cmd[cmd_append_pos] = NULL;
1123                         execvp(cmd[0], cmd);
1124                         fprintf(stderr, "%s: execvp %s", argv0, cmd[0]);
1125                 }
1126                 perror(" failed");
1127                 exit(0);
1128         }
1129 }
1130
1131 int
1132 textnw(const char *text, unsigned int len)
1133 {
1134         XRectangle r;
1135
1136         if (dc.font.set) {
1137                 XmbTextExtents(dc.font.set, text, len, NULL, &r);
1138                 return r.width;
1139         }
1140
1141         return XTextWidth(dc.font.xfont, text, len);
1142 }
1143
1144 void
1145 toggle(const Arg *arg)
1146 {
1147     *(Bool*) arg->v = !*(Bool*) arg->v;
1148 }
1149
1150 void
1151 unmanage(int c)
1152 {
1153         if (c < 0 || c >= nclients) {
1154                 drawbar();
1155                 XSync(dpy, False);
1156                 return;
1157         }
1158
1159         if (!nclients)
1160                 return;
1161
1162         if (c == 0) {
1163                 /* First client. */
1164                 nclients--;
1165                 free(clients[0]);
1166                 memmove(&clients[0], &clients[1], sizeof(Client *) * nclients);
1167         } else if (c == nclients - 1) {
1168                 /* Last client. */
1169                 nclients--;
1170                 free(clients[c]);
1171                 clients = erealloc(clients, sizeof(Client *) * nclients);
1172         } else {
1173                 /* Somewhere inbetween. */
1174                 free(clients[c]);
1175                 memmove(&clients[c], &clients[c+1],
1176                         sizeof(Client *) * (nclients - (c + 1)));
1177                 nclients--;
1178         }
1179
1180         if (nclients <= 0) {
1181                 lastsel = sel = -1;
1182
1183                 if (closelastclient)
1184                         running = False;
1185                 else if (fillagain && running)
1186                         spawn(NULL);
1187         } else {
1188                 if (lastsel >= nclients)
1189                         lastsel = nclients - 1;
1190                 else if (lastsel > c)
1191                         lastsel--;
1192
1193                 if (c == sel && lastsel >= 0) {
1194                         focus(lastsel);
1195                 } else {
1196                         if (sel > c)
1197                                 sel--;
1198                         if (sel >= nclients)
1199                                 sel = nclients - 1;
1200
1201                         focus(sel);
1202                 }
1203         }
1204
1205         drawbar();
1206         XSync(dpy, False);
1207 }
1208
1209 void
1210 unmapnotify(const XEvent *e)
1211 {
1212         const XUnmapEvent *ev = &e->xunmap;
1213         int c;
1214
1215         if ((c = getclient(ev->window)) > -1)
1216                 unmanage(c);
1217 }
1218
1219 void
1220 updatenumlockmask(void)
1221 {
1222         unsigned int i, j;
1223         XModifierKeymap *modmap;
1224
1225         numlockmask = 0;
1226         modmap = XGetModifierMapping(dpy);
1227         for (i = 0; i < 8; i++) {
1228                 for (j = 0; j < modmap->max_keypermod; j++) {
1229                         if (modmap->modifiermap[i * modmap->max_keypermod + j]
1230                             == XKeysymToKeycode(dpy, XK_Num_Lock))
1231                                 numlockmask = (1 << i);
1232                 }
1233         }
1234         XFreeModifiermap(modmap);
1235 }
1236
1237 void
1238 updatetitle(int c)
1239 {
1240         if (!gettextprop(clients[c]->win, wmatom[WMName], clients[c]->name,
1241             sizeof(clients[c]->name)))
1242                 gettextprop(clients[c]->win, XA_WM_NAME, clients[c]->name,
1243                             sizeof(clients[c]->name));
1244         if (sel == c)
1245                 xsettitle(win, clients[c]->name);
1246         drawbar();
1247 }
1248
1249 /* There's no way to check accesses to destroyed windows, thus those cases are
1250  * ignored (especially on UnmapNotify's).  Other types of errors call Xlibs
1251  * default error handler, which may call exit.  */
1252 int
1253 xerror(Display *dpy, XErrorEvent *ee)
1254 {
1255         if (ee->error_code == BadWindow
1256             || (ee->request_code == X_SetInputFocus &&
1257                 ee->error_code == BadMatch)
1258             || (ee->request_code == X_PolyText8 &&
1259                 ee->error_code == BadDrawable)
1260             || (ee->request_code == X_PolyFillRectangle &&
1261                 ee->error_code == BadDrawable)
1262             || (ee->request_code == X_PolySegment &&
1263                 ee->error_code == BadDrawable)
1264             || (ee->request_code == X_ConfigureWindow &&
1265                 ee->error_code == BadMatch)
1266             || (ee->request_code == X_GrabButton &&
1267                 ee->error_code == BadAccess)
1268             || (ee->request_code == X_GrabKey &&
1269                 ee->error_code == BadAccess)
1270             || (ee->request_code == X_CopyArea &&
1271                 ee->error_code == BadDrawable))
1272                 return 0;
1273
1274         fprintf(stderr, "%s: fatal error: request code=%d, error code=%d\n",
1275                 argv0, ee->request_code, ee->error_code);
1276         return xerrorxlib(dpy, ee); /* may call exit */
1277 }
1278
1279 void
1280 xsettitle(Window w, const char *str)
1281 {
1282         XTextProperty xtp;
1283
1284         if (XmbTextListToTextProperty(dpy, (char **)&str, 1,
1285             XCompoundTextStyle, &xtp) == Success) {
1286                 XSetTextProperty(dpy, w, &xtp, wmatom[WMName]);
1287                 XSetTextProperty(dpy, w, &xtp, XA_WM_NAME);
1288                 XFree(xtp.value);
1289         }
1290 }
1291
1292 void
1293 usage(void)
1294 {
1295         die("usage: %s [-dfsv] [-g geometry] [-n name] [-p [s+/-]pos]\n"
1296             "       [-r narg] [-o color] [-O color] [-t color] [-T color]\n"
1297             "       [-u color] [-U color] command...\n", argv0);
1298 }
1299
1300 int
1301 main(int argc, char *argv[])
1302 {
1303         Bool detach = False;
1304         int replace = 0;
1305         char *pstr;
1306
1307         ARGBEGIN {
1308         case 'c':
1309                 closelastclient = True;
1310                 fillagain = False;
1311                 break;
1312         case 'd':
1313                 detach = True;
1314                 break;
1315         case 'f':
1316                 fillagain = True;
1317                 break;
1318         case 'g':
1319                 geometry = EARGF(usage());
1320                 break;
1321         case 'n':
1322                 wmname = EARGF(usage());
1323                 break;
1324         case 'O':
1325                 normfgcolor = EARGF(usage());
1326                 break;
1327         case 'o':
1328                 normbgcolor = EARGF(usage());
1329                 break;
1330         case 'p':
1331                 pstr = EARGF(usage());
1332                 if (pstr[0] == 's') {
1333                         npisrelative = True;
1334                         newposition = atoi(&pstr[1]);
1335                 } else {
1336                         newposition = atoi(pstr);
1337                 }
1338                 break;
1339         case 'r':
1340                 replace = atoi(EARGF(usage()));
1341                 break;
1342         case 's':
1343                 doinitspawn = False;
1344                 break;
1345         case 'T':
1346                 selfgcolor = EARGF(usage());
1347                 break;
1348         case 't':
1349                 selbgcolor = EARGF(usage());
1350                 break;
1351         case 'U':
1352                 urgfgcolor = EARGF(usage());
1353                 break;
1354         case 'u':
1355                 urgbgcolor = EARGF(usage());
1356                 break;
1357         case 'v':
1358                 die("tabbed-"VERSION", © 2009-2016 tabbed engineers, "
1359                     "see LICENSE for details.\n");
1360                 break;
1361         default:
1362                 usage();
1363                 break;
1364         } ARGEND;
1365
1366         if (argc < 1) {
1367                 doinitspawn = False;
1368                 fillagain = False;
1369         }
1370
1371         setcmd(argc, argv, replace);
1372
1373         if (!setlocale(LC_CTYPE, "") || !XSupportsLocale())
1374                 fprintf(stderr, "%s: no locale support\n", argv0);
1375         if (!(dpy = XOpenDisplay(NULL)))
1376                 die("%s: cannot open display\n", argv0);
1377
1378         setup();
1379         printf("0x%lx\n", win);
1380         fflush(NULL);
1381
1382         if (detach) {
1383                 if (fork() == 0) {
1384                         fclose(stdout);
1385                 } else {
1386                         if (dpy)
1387                                 close(ConnectionNumber(dpy));
1388                         return EXIT_SUCCESS;
1389                 }
1390         }
1391
1392         run();
1393         cleanup();
1394         XCloseDisplay(dpy);
1395
1396         return EXIT_SUCCESS;
1397 }