dmenu.c

   1 /* See LICENSE file for copyright and license details. */
   2 #include <ctype.h>
   3 #include <locale.h>
   4 #include <stdarg.h>
   5 #include <stdlib.h>
   6 #include <stdio.h>
   7 #include <string.h>
   8 #include <unistd.h>
   9 #include <X11/Xlib.h>
  10 #include <X11/Xutil.h>
  11 #include <X11/keysym.h>
  12
  13 /* macros */
  14 #define CLEANMASK(mask) (mask & ~(numlockmask | LockMask))
  15
  16 /* enums */
  17 enum { ColFG, ColBG, ColLast };
  18
  19 /* typedefs */
  20 typedef struct {
  21         int x, y, w, h;
  22         unsigned long norm[ColLast];
  23         unsigned long sel[ColLast];
  24         Drawable drawable;
  25         GC gc;
  26         struct {
  27                 XFontStruct *xfont;
  28                 XFontSet set;
  29                 int ascent;
  30                 int descent;
  31                 int height;
  32         } font;
  33 } DC; /* draw context */
  34
  35 typedef struct Item Item;
  36 struct Item {
  37         Item *next;             /* traverses all items */
  38         Item *left, *right;     /* traverses items matching current search pattern */
  39         char *text;
  40         Bool matched;
  41 };
  42
  43 /* forward declarations */
  44 Item *appenditem(Item *i, Item *last);
  45 void calcoffsets(void);
  46 void cleanup(void);
  47 void drawmenu(void);
  48 void drawtext(const char *text, unsigned long col[ColLast]);
  49 void *emalloc(unsigned int size);
  50 void eprint(const char *errstr, ...);
  51 char *estrdup(const char *str);
  52 unsigned long getcolor(const char *colstr);
  53 Bool grabkeyboard(void);
  54 void initfont(const char *fontstr);
  55 void kpress(XKeyEvent * e);
  56 void match(char *pattern);
  57 void readstdin(void);
  58 void run(void);
  59 void setup(int x, int y, int w);
  60 char *cistrstr(const char *s, const char *sub);
  61 unsigned int textnw(const char *text, unsigned int len);
  62 unsigned int textw(const char *text);
  63
  64 #include "config.h"
  65
  66 /* variables */
  67 char *font = FONT;
  68 char *maxname = NULL;
  69 char *normbg = NORMBGCOLOR;
  70 char *normfg = NORMFGCOLOR;
  71 char *prompt = NULL;
  72 char *selbg = SELBGCOLOR;
  73 char *selfg = SELFGCOLOR;
  74 char text[4096];
  75 int screen;
  76 int ret = 0;
  77 unsigned int cmdw = 0;
  78 unsigned int mw, mh;
  79 unsigned int promptw = 0;
  80 unsigned int nitem = 0;
  81 unsigned int numlockmask = 0;
  82 Bool running = True;
  83 Display *dpy;
  84 DC dc = {0};
  85 Item *allitems = NULL;  /* first of all items */
  86 Item *item = NULL;      /* first of pattern matching items */
  87 Item *sel = NULL;
  88 Item *next = NULL;
  89 Item *prev = NULL;
  90 Item *curr = NULL;
  91 Window root, win;
  92 char *(*fstrstr)(const char *, const char *) = strstr;
  93
  94 Item *
  95 appenditem(Item *i, Item *last) {
  96         if(!last)
  97                 item = i;
  98         else
  99                 last->right = i;
 100         i->matched = True;
 101         i->left = last;
 102         i->right = NULL;
 103         last = i;
 104         nitem++;
 105         return last;
 106 }
 107
 108 void
 109 calcoffsets(void) {
 110         unsigned int tw, w;
 111
 112         if(!curr)
 113                 return;
 114         w = promptw + cmdw + 2 * SPACE;
 115         for(next = curr; next; next=next->right) {
 116                 tw = textw(next->text);
 117                 if(tw > mw / 3)
 118                         tw = mw / 3;
 119                 w += tw;
 120                 if(w > mw)
 121                         break;
 122         }
 123         w = promptw + cmdw + 2 * SPACE;
 124         for(prev = curr; prev && prev->left; prev=prev->left) {
 125                 tw = textw(prev->left->text);
 126                 if(tw > mw / 3)
 127                         tw = mw / 3;
 128                 w += tw;
 129                 if(w > mw)
 130                         break;
 131         }
 132 }
 133
 134 void
 135 cleanup(void) {
 136         Item *itm;
 137
 138         while(allitems) {
 139                 itm = allitems->next;
 140                 free(allitems->text);
 141                 free(allitems);
 142                 allitems = itm;
 143         }
 144         if(dc.font.set)
 145                 XFreeFontSet(dpy, dc.font.set);
 146         else
 147                 XFreeFont(dpy, dc.font.xfont);
 148         XFreePixmap(dpy, dc.drawable);
 149         XFreeGC(dpy, dc.gc);
 150         XDestroyWindow(dpy, win);
 151         XUngrabKeyboard(dpy, CurrentTime);
 152 }
 153
 154 void
 155 drawmenu(void) {
 156         Item *i;
 157
 158         dc.x = 0;
 159         dc.y = 0;
 160         dc.w = mw;
 161         dc.h = mh;
 162         drawtext(NULL, dc.norm);
 163         /* print prompt? */
 164         if(promptw) {
 165                 dc.w = promptw;
 166                 drawtext(prompt, dc.sel);
 167         }
 168         dc.x += promptw;
 169         dc.w = mw - promptw;
 170         /* print command */
 171         if(cmdw && item)
 172                 dc.w = cmdw;
 173         drawtext(text[0] ? text : NULL, dc.norm);
 174         dc.x += cmdw;
 175         if(curr) {
 176                 dc.w = SPACE;
 177                 drawtext((curr && curr->left) ? "<" : NULL, dc.norm);
 178                 dc.x += dc.w;
 179                 /* determine maximum items */
 180                 for(i = curr; i != next; i=i->right) {
 181                         dc.w = textw(i->text);
 182                         if(dc.w > mw / 3)
 183                                 dc.w = mw / 3;
 184                         drawtext(i->text, (sel == i) ? dc.sel : dc.norm);
 185                         dc.x += dc.w;
 186                 }
 187                 dc.x = mw - SPACE;
 188                 dc.w = SPACE;
 189                 drawtext(next ? ">" : NULL, dc.norm);
 190         }
 191         XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, mw, mh, 0, 0);
 192         XFlush(dpy);
 193 }
 194
 195 void
 196 drawtext(const char *text, unsigned long col[ColLast]) {
 197         int x, y, w, h;
 198         static char buf[256];
 199         unsigned int len, olen;
 200         XRectangle r = { dc.x, dc.y, dc.w, dc.h };
 201
 202         XSetForeground(dpy, dc.gc, col[ColBG]);
 203         XFillRectangles(dpy, dc.drawable, dc.gc, &r, 1);
 204         if(!text)
 205                 return;
 206         w = 0;
 207         olen = len = strlen(text);
 208         if(len >= sizeof buf)
 209                 len = sizeof buf - 1;
 210         memcpy(buf, text, len);
 211         buf[len] = 0;
 212         h = dc.font.ascent + dc.font.descent;
 213         y = dc.y + (dc.h / 2) - (h / 2) + dc.font.ascent;
 214         x = dc.x + (h / 2);
 215         /* shorten text if necessary */
 216         while(len && (w = textnw(buf, len)) > dc.w - h)
 217                 buf[--len] = 0;
 218         if(len < olen) {
 219                 if(len > 1)
 220                         buf[len - 1] = '.';
 221                 if(len > 2)
 222                         buf[len - 2] = '.';
 223                 if(len > 3)
 224                         buf[len - 3] = '.';
 225         }
 226         if(w > dc.w)
 227                 return; /* too long */
 228         XSetForeground(dpy, dc.gc, col[ColFG]);
 229         if(dc.font.set)
 230                 XmbDrawString(dpy, dc.drawable, dc.font.set, dc.gc, x, y, buf, len);
 231         else
 232                 XDrawString(dpy, dc.drawable, dc.gc, x, y, buf, len);
 233 }
 234
 235 void *
 236 emalloc(unsigned int size) {
 237         void *res = malloc(size);
 238
 239         if(!res)
 240                 eprint("fatal: could not malloc() %u bytes\n", size);
 241         return res;
 242 }
 243
 244 void
 245 eprint(const char *errstr, ...) {
 246         va_list ap;
 247
 248         va_start(ap, errstr);
 249         vfprintf(stderr, errstr, ap);
 250         va_end(ap);
 251         exit(EXIT_FAILURE);
 252 }
 253
 254 char *
 255 estrdup(const char *str) {
 256         void *res = strdup(str);
 257
 258         if(!res)
 259                 eprint("fatal: could not malloc() %u bytes\n", strlen(str));
 260         return res;
 261 }
 262
 263 unsigned long
 264 getcolor(const char *colstr) {
 265         Colormap cmap = DefaultColormap(dpy, screen);
 266         XColor color;
 267
 268         if(!XAllocNamedColor(dpy, cmap, colstr, &color, &color))
 269                 eprint("error, cannot allocate color '%s'\n", colstr);
 270         return color.pixel;
 271 }
 272
 273 Bool
 274 grabkeyboard(void) {
 275         unsigned int len;
 276
 277         for(len = 1000; len; len--) {
 278                 if(XGrabKeyboard(dpy, root, True, GrabModeAsync, GrabModeAsync, CurrentTime)
 279                         == GrabSuccess)
 280                         break;
 281                 usleep(1000);
 282         }
 283         return len > 0;
 284 }
 285
 286 void
 287 initfont(const char *fontstr) {
 288         char *def, **missing;
 289         int i, n;
 290
 291         if(!fontstr || fontstr[0] == '\0')
 292                 eprint("error, cannot load font: '%s'\n", fontstr);
 293         missing = NULL;
 294         if(dc.font.set)
 295                 XFreeFontSet(dpy, dc.font.set);
 296         dc.font.set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
 297         if(missing)
 298                 XFreeStringList(missing);
 299         if(dc.font.set) {
 300                 XFontSetExtents *font_extents;
 301                 XFontStruct **xfonts;
 302                 char **font_names;
 303                 dc.font.ascent = dc.font.descent = 0;
 304                 font_extents = XExtentsOfFontSet(dc.font.set);
 305                 n = XFontsOfFontSet(dc.font.set, &xfonts, &font_names);
 306                 for(i = 0, dc.font.ascent = 0, dc.font.descent = 0; i < n; i++) {
 307                         if(dc.font.ascent < (*xfonts)->ascent)
 308                                 dc.font.ascent = (*xfonts)->ascent;
 309                         if(dc.font.descent < (*xfonts)->descent)
 310                                 dc.font.descent = (*xfonts)->descent;
 311                         xfonts++;
 312                 }
 313         }
 314         else {
 315                 if(dc.font.xfont)
 316                         XFreeFont(dpy, dc.font.xfont);
 317                 dc.font.xfont = NULL;
 318                 if(!(dc.font.xfont = XLoadQueryFont(dpy, fontstr))
 319                 && !(dc.font.xfont = XLoadQueryFont(dpy, "fixed")))
 320                         eprint("error, cannot load font: '%s'\n", fontstr);
 321                 dc.font.ascent = dc.font.xfont->ascent;
 322                 dc.font.descent = dc.font.xfont->descent;
 323         }
 324         dc.font.height = dc.font.ascent + dc.font.descent;
 325 }
 326
 327 void
 328 kpress(XKeyEvent * e) {
 329         char buf[32];
 330         int i, num;
 331         unsigned int len;
 332         KeySym ksym;
 333
 334         len = strlen(text);
 335         buf[0] = 0;
 336         num = XLookupString(e, buf, sizeof buf, &ksym, 0);
 337         if(IsKeypadKey(ksym)) {
 338                 if(ksym == XK_KP_Enter) {
 339                         ksym = XK_Return;
 340                 } else if(ksym >= XK_KP_0 && ksym <= XK_KP_9) {
 341                         ksym = (ksym - XK_KP_0) + XK_0;
 342                 }
 343         }
 344         if(IsFunctionKey(ksym) || IsKeypadKey(ksym)
 345                         || IsMiscFunctionKey(ksym) || IsPFKey(ksym)
 346                         || IsPrivateKeypadKey(ksym))
 347                 return;
 348         /* first check if a control mask is omitted */
 349         if(e->state & ControlMask) {
 350                 switch (ksym) {
 351                 default:        /* ignore other control sequences */
 352                         return;
 353                 case XK_bracketleft:
 354                         ksym = XK_Escape;
 355                         break;
 356                 case XK_h:
 357                 case XK_H:
 358                         ksym = XK_BackSpace;
 359                         break;
 360                 case XK_i:
 361                 case XK_I:
 362                         ksym = XK_Tab;
 363                         break;
 364                 case XK_j:
 365                 case XK_J:
 366                         ksym = XK_Return;
 367                         break;
 368                 case XK_u:
 369                 case XK_U:
 370                         text[0] = 0;
 371                         match(text);
 372                         drawmenu();
 373                         return;
 374                 case XK_w:
 375                 case XK_W:
 376                         if(len) {
 377                                 i = len - 1;
 378                                 while(i >= 0 && text[i] == ' ')
 379                                         text[i--] = 0;
 380                                 while(i >= 0 && text[i] != ' ')
 381                                         text[i--] = 0;
 382                                 match(text);
 383                                 drawmenu();
 384                         }
 385                         return;
 386                 }
 387         }
 388         if(CLEANMASK(e->state) & Mod1Mask) {
 389                 switch(ksym) {
 390                 default: return;
 391                 case XK_h:
 392                         ksym = XK_Left;
 393                         break;
 394                 case XK_l:
 395                         ksym = XK_Right;
 396                         break;
 397                 case XK_j:
 398                         ksym = XK_Next;
 399                         break;
 400                 case XK_k:
 401                         ksym = XK_Prior;
 402                         break;
 403                 case XK_g:
 404                         ksym = XK_Home;
 405                         break;
 406                 case XK_G:
 407                         ksym = XK_End;
 408                         break;
 409                 }
 410         }
 411         switch(ksym) {
 412         default:
 413                 if(num && !iscntrl((int) buf[0])) {
 414                         buf[num] = 0;
 415                         if(len > 0)
 416                                 strncat(text, buf, sizeof text);
 417                         else
 418                                 strncpy(text, buf, sizeof text);
 419                         match(text);
 420                 }
 421                 break;
 422         case XK_BackSpace:
 423                 if(len) {
 424                         text[--len] = 0;
 425                         match(text);
 426                 }
 427                 break;
 428         case XK_End:
 429                 if(!item)
 430                         return;
 431                 while(next) {
 432                         sel = curr = next;
 433                         calcoffsets();
 434                 }
 435                 while(sel && sel->right)
 436                         sel = sel->right;
 437                 break;
 438         case XK_Escape:
 439                 ret = 1;
 440                 running = False;
 441                 break;
 442         case XK_Home:
 443                 if(!item)
 444                         return;
 445                 sel = curr = item;
 446                 calcoffsets();
 447                 break;
 448         case XK_Left:
 449                 if(!(sel && sel->left))
 450                         return;
 451                 sel=sel->left;
 452                 if(sel->right == curr) {
 453                         curr = prev;
 454                         calcoffsets();
 455                 }
 456                 break;
 457         case XK_Next:
 458                 if(!next)
 459                         return;
 460                 sel = curr = next;
 461                 calcoffsets();
 462                 break;
 463         case XK_Prior:
 464                 if(!prev)
 465                         return;
 466                 sel = curr = prev;
 467                 calcoffsets();
 468                 break;
 469         case XK_Return:
 470                 if((e->state & ShiftMask) && text)
 471                         fprintf(stdout, "%s", text);
 472                 else if(sel)
 473                         fprintf(stdout, "%s", sel->text);
 474                 else if(text)
 475                         fprintf(stdout, "%s", text);
 476                 fflush(stdout);
 477                 running = False;
 478                 break;
 479         case XK_Right:
 480                 if(!(sel && sel->right))
 481                         return;
 482                 sel=sel->right;
 483                 if(sel == next) {
 484                         curr = next;
 485                         calcoffsets();
 486                 }
 487                 break;
 488         case XK_Tab:
 489                 if(!sel)
 490                         return;
 491                 strncpy(text, sel->text, sizeof text);
 492                 match(text);
 493                 break;
 494         }
 495         drawmenu();
 496 }
 497
 498 void
 499 match(char *pattern) {
 500         unsigned int plen;
 501         Item *i, *j;
 502
 503         if(!pattern)
 504                 return;
 505         plen = strlen(pattern);
 506         item = j = NULL;
 507         nitem = 0;
 508         for(i = allitems; i; i=i->next)
 509                 i->matched = False;
 510         for(i = allitems; i; i = i->next)
 511                 if(!i->matched && !strncasecmp(pattern, i->text, plen))
 512                         j = appenditem(i, j);
 513         for(i = allitems; i; i = i->next)
 514                 if(!i->matched && fstrstr(i->text, pattern))
 515                         j = appenditem(i, j);
 516         curr = prev = next = sel = item;
 517         calcoffsets();
 518 }
 519
 520 void
 521 readstdin(void) {
 522         char *p, buf[1024];
 523         unsigned int len = 0, max = 0;
 524         Item *i, *new;
 525
 526         i = 0;
 527         while(fgets(buf, sizeof buf, stdin)) {
 528                 len = strlen(buf);
 529                 if (buf[len - 1] == '\n')
 530                         buf[len - 1] = 0;
 531                 p = estrdup(buf);
 532                 if(max < len) {
 533                         maxname = p;
 534                         max = len;
 535                 }
 536                 new = emalloc(sizeof(Item));
 537                 new->next = new->left = new->right = NULL;
 538                 new->text = p;
 539                 if(!i)
 540                         allitems = new;
 541                 else
 542                         i->next = new;
 543                 i = new;
 544         }
 545 }
 546
 547 void
 548 run(void) {
 549         XEvent ev;
 550
 551         /* main event loop */
 552         while(running && !XNextEvent(dpy, &ev))
 553                 switch (ev.type) {
 554                 default:        /* ignore all crap */
 555                         break;
 556                 case KeyPress:
 557                         kpress(&ev.xkey);
 558                         break;
 559                 case Expose:
 560                         if(ev.xexpose.count == 0)
 561                                 drawmenu();
 562                         break;
 563                 }
 564 }
 565
 566 void
 567 setup(int x, int y, int w) {
 568         unsigned int i, j;
 569         XModifierKeymap *modmap;
 570         XSetWindowAttributes wa;
 571
 572         /* init modifier map */
 573         modmap = XGetModifierMapping(dpy);
 574         for(i = 0; i < 8; i++)
 575                 for(j = 0; j < modmap->max_keypermod; j++) {
 576                         if(modmap->modifiermap[i * modmap->max_keypermod + j]
 577                         == XKeysymToKeycode(dpy, XK_Num_Lock))
 578                                 numlockmask = (1 << i);
 579                 }
 580         XFreeModifiermap(modmap);
 581
 582         /* style */
 583         dc.norm[ColBG] = getcolor(normbg);
 584         dc.norm[ColFG] = getcolor(normfg);
 585         dc.sel[ColBG] = getcolor(selbg);
 586         dc.sel[ColFG] = getcolor(selfg);
 587         initfont(font);
 588
 589         /* menu window */
 590         wa.override_redirect = 1;
 591         wa.background_pixmap = ParentRelative;
 592         wa.event_mask = ExposureMask | ButtonPressMask | KeyPressMask;
 593         mw = w ? w : DisplayWidth(dpy, screen);
 594         mh = dc.font.height + 2;
 595         win = XCreateWindow(dpy, root, x, y, mw, mh, 0,
 596                         DefaultDepth(dpy, screen), CopyFromParent,
 597                         DefaultVisual(dpy, screen),
 598                         CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
 599
 600         /* pixmap */
 601         dc.drawable = XCreatePixmap(dpy, root, mw, mh, DefaultDepth(dpy, screen));
 602         dc.gc = XCreateGC(dpy, root, 0, 0);
 603         XSetLineAttributes(dpy, dc.gc, 1, LineSolid, CapButt, JoinMiter);
 604         if(!dc.font.set)
 605                 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
 606         if(maxname)
 607                 cmdw = textw(maxname);
 608         if(cmdw > mw / 3)
 609                 cmdw = mw / 3;
 610         if(prompt)
 611                 promptw = textw(prompt);
 612         if(promptw > mw / 5)
 613                 promptw = mw / 5;
 614         text[0] = 0;
 615         match(text);
 616         XMapRaised(dpy, win);
 617 }
 618
 619 char *
 620 cistrstr(const char *s, const char *sub) {
 621         int c, csub;
 622         unsigned int len;
 623
 624         if(!sub)
 625                 return (char *)s;
 626         if((c = *sub++) != 0) {
 627                 c = tolower(c);
 628                 len = strlen(sub);
 629                 do {
 630                         do {
 631                                 if((csub = *s++) == 0)
 632                                         return (NULL);
 633                         }
 634                         while(tolower(csub) != c);
 635                 }
 636                 while(strncasecmp(s, sub, len) != 0);
 637                 s--;
 638         }
 639         return (char *)s;
 640 }
 641
 642 unsigned int
 643 textnw(const char *text, unsigned int len) {
 644         XRectangle r;
 645
 646         if(dc.font.set) {
 647                 XmbTextExtents(dc.font.set, text, len, NULL, &r);
 648                 return r.width;
 649         }
 650         return XTextWidth(dc.font.xfont, text, len);
 651 }
 652
 653 unsigned int
 654 textw(const char *text) {
 655         return textnw(text, strlen(text)) + dc.font.height;
 656 }
 657
 658 int
 659 main(int argc, char *argv[]) {
 660         int x = 0, y = 0, w = 0;
 661         unsigned int i;
 662
 663         /* command line args */
 664         for(i = 1; i < argc; i++)
 665                 if(!strcmp(argv[i], "-i"))
 666                         fstrstr = cistrstr;
 667                 else if(!strcmp(argv[i], "-fn")) {
 668                         if(++i < argc) font = argv[i];
 669                 }
 670                 else if(!strcmp(argv[i], "-nb")) {
 671                         if(++i < argc) normbg = argv[i];
 672                 }
 673                 else if(!strcmp(argv[i], "-nf")) {
 674                         if(++i < argc) normfg = argv[i];
 675                 }
 676                 else if(!strcmp(argv[i], "-p")) {
 677                         if(++i < argc) prompt = argv[i];
 678                 }
 679                 else if(!strcmp(argv[i], "-sb")) {
 680                         if(++i < argc) selbg = argv[i];
 681                 }
 682                 else if(!strcmp(argv[i], "-sf")) {
 683                         if(++i < argc) selfg = argv[i];
 684                 }
 685                 else if(!strcmp(argv[i], "-x")) {
 686                         if(++i < argc) x = atoi(argv[i]);
 687                 }
 688                 else if(!strcmp(argv[i], "-y")) {
 689                         if(++i < argc) y = atoi(argv[i]);
 690                 }
 691                 else if(!strcmp(argv[i], "-w")) {
 692                         if(++i < argc) w = atoi(argv[i]);
 693                 }
 694                 else if(!strcmp(argv[i], "-v"))
 695                         eprint("dmenu-"VERSION", © 2006-2008 dmenu engineers, see LICENSE for details\n");
 696                 else
 697                         eprint("usage: dmenu [-i] [-fn <font>] [-nb <color>] [-nf <color>]\n"
 698                                "             [-p <prompt>] [-sb <color>] [-sf <color>]\n"
 699                                "             [-x <x>] [-y <y>] [-w <w>] [-v]\n");
 700         setlocale(LC_CTYPE, "");
 701         dpy = XOpenDisplay(0);
 702         if(!dpy)
 703                 eprint("dmenu: cannot open display\n");
 704         screen = DefaultScreen(dpy);
 705         root = RootWindow(dpy, screen);
 706
 707         if(isatty(STDIN_FILENO)) {
 708                 readstdin();
 709                 running = grabkeyboard();
 710         }
 711         else { /* prevent keypress loss */
 712                 running = grabkeyboard();
 713                 readstdin();
 714         }
 715
 716         setup(x, y, w);
 717         drawmenu();
 718         XSync(dpy, False);
 719         run();
 720         cleanup();
 721         XCloseDisplay(dpy);
 722         return ret;
 723 }