dmenu.c

   1 /* See LICENSE file for copyright and license details. */
   2 #include <ctype.h>
   3 #include <stdio.h>
   4 #include <stdlib.h>
   5 #include <string.h>
   6 #include <unistd.h>
   7 #include <X11/Xlib.h>
   8 #include <X11/Xatom.h>
   9 #include <X11/Xutil.h>
  10 #ifdef XINERAMA
  11 #include <X11/extensions/Xinerama.h>
  12 #endif
  13 #include <dc.h>
  14
  15 #define INRECT(x,y,rx,ry,rw,rh) ((x) >= (rx) && (x) < (rx)+(rw) && (y) >= (ry) && (y) < (ry)+(rh))
  16 #define MIN(a,b)                ((a) < (b) ? (a) : (b))
  17 #define MAX(a,b)                ((a) > (b) ? (a) : (b))
  18
  19 typedef struct Item Item;
  20 struct Item {
  21         char *text;
  22         Item *next;          /* traverses all items */
  23         Item *left, *right;  /* traverses matching items */
  24 };
  25
  26 static void appenditem(Item *item, Item **list, Item **last);
  27 static void calcoffsets(void);
  28 static void drawmenu(void);
  29 static char *fstrstr(const char *s, const char *sub);
  30 static void grabkeyboard(void);
  31 static void insert(const char *s, ssize_t n);
  32 static void keypress(XKeyEvent *ev);
  33 static void match(void);
  34 static size_t nextrune(int incr);
  35 static void paste(void);
  36 static void readstdin(void);
  37 static void run(void);
  38 static void setup(void);
  39 static void usage(void);
  40
  41 static char text[BUFSIZ];
  42 static int bh, mw, mh;
  43 static int inputw = 0;
  44 static int lines = 0;
  45 static int monitor = -1;
  46 static int promptw;
  47 static size_t cursor = 0;
  48 static const char *font = NULL;
  49 static const char *prompt = NULL;
  50 static const char *normbgcolor = "#cccccc";
  51 static const char *normfgcolor = "#000000";
  52 static const char *selbgcolor  = "#0066ff";
  53 static const char *selfgcolor  = "#ffffff";
  54 static unsigned long normcol[ColLast];
  55 static unsigned long selcol[ColLast];
  56 static Atom utf8;
  57 static Bool topbar = True;
  58 static DC *dc;
  59 static Item *items = NULL;
  60 static Item *matches, *sel;
  61 static Item *prev, *curr, *next;
  62 static Window root, win;
  63
  64 static int (*fstrncmp)(const char *, const char *, size_t) = strncmp;
  65
  66 void
  67 appenditem(Item *item, Item **list, Item **last) {
  68         if(!*last)
  69                 *list = item;
  70         else
  71                 (*last)->right = item;
  72         item->left = *last;
  73         item->right = NULL;
  74         *last = item;
  75 }
  76
  77 void
  78 calcoffsets(void) {
  79         unsigned int i, n;
  80
  81         if(lines > 0)
  82                 n = lines * bh;
  83         else
  84                 n = mw - (promptw + inputw + dc_textw(dc, "<") + dc_textw(dc, ">"));
  85
  86         for(i = 0, next = curr; next; next = next->right)
  87                 if((i += (lines > 0) ? bh : MIN(dc_textw(dc, next->text), n)) > n)
  88                         break;
  89         for(i = 0, prev = curr; prev && prev->left; prev = prev->left)
  90                 if((i += (lines > 0) ? bh : MIN(dc_textw(dc, prev->left->text), n)) > n)
  91                         break;
  92 }
  93
  94 void
  95 drawmenu(void) {
  96         int curpos;
  97         Item *item;
  98
  99         dc->x = 0;
 100         dc->y = 0;
 101         dc->h = bh;
 102         dc_drawrect(dc, 0, 0, mw, mh, True, BG(dc, normcol));
 103
 104         if(prompt) {
 105                 dc->w = promptw;
 106                 dc_drawtext(dc, prompt, selcol);
 107                 dc->x = dc->w;
 108         }
 109         dc->w = (lines > 0 || !matches) ? mw - dc->x : inputw;
 110         dc_drawtext(dc, text, normcol);
 111         if((curpos = dc_textnw(dc, text, cursor) + dc->h/2 - 2) < dc->w)
 112                 dc_drawrect(dc, curpos, 2, 1, dc->h - 4, True, FG(dc, normcol));
 113
 114         if(lines > 0) {
 115                 dc->w = mw - dc->x;
 116                 for(item = curr; item != next; item = item->right) {
 117                         dc->y += dc->h;
 118                         dc_drawtext(dc, item->text, (item == sel) ? selcol : normcol);
 119                 }
 120         }
 121         else if(matches) {
 122                 dc->x += inputw;
 123                 dc->w = dc_textw(dc, "<");
 124                 if(curr->left)
 125                         dc_drawtext(dc, "<", normcol);
 126                 for(item = curr; item != next; item = item->right) {
 127                         dc->x += dc->w;
 128                         dc->w = MIN(dc_textw(dc, item->text), mw - dc->x - dc_textw(dc, ">"));
 129                         dc_drawtext(dc, item->text, (item == sel) ? selcol : normcol);
 130                 }
 131                 dc->w = dc_textw(dc, ">");
 132                 dc->x = mw - dc->w;
 133                 if(next)
 134                         dc_drawtext(dc, ">", normcol);
 135         }
 136         dc_map(dc, win, mw, mh);
 137 }
 138
 139 char *
 140 fstrstr(const char *s, const char *sub) {
 141         size_t len;
 142
 143         for(len = strlen(sub); *s; s++)
 144                 if(!fstrncmp(s, sub, len))
 145                         return (char *)s;
 146         return NULL;
 147 }
 148
 149 void
 150 grabkeyboard(void) {
 151         int i;
 152
 153         for(i = 0; i < 1000; i++) {
 154                 if(!XGrabKeyboard(dc->dpy, root, True, GrabModeAsync, GrabModeAsync, CurrentTime))
 155                         return;
 156                 usleep(1000);
 157         }
 158         eprintf("cannot grab keyboard\n");
 159 }
 160
 161 void
 162 insert(const char *s, ssize_t n) {
 163         if(strlen(text) + n > sizeof text - 1)
 164                 return;
 165         memmove(text + cursor + n, text + cursor, sizeof text - cursor - MAX(n, 0));
 166         if(n > 0)
 167                 memcpy(text + cursor, s, n);
 168         cursor += n;
 169         match();
 170 }
 171
 172 void
 173 keypress(XKeyEvent *ev) {
 174         char buf[32];
 175         size_t len;
 176         KeySym ksym;
 177
 178         len = strlen(text);
 179         XLookupString(ev, buf, sizeof buf, &ksym, NULL);
 180         if(ev->state & ControlMask) {
 181                 switch(tolower(ksym)) {
 182                 default:
 183                         return;
 184                 case XK_a:
 185                         ksym = XK_Home;
 186                         break;
 187                 case XK_b:
 188                         ksym = XK_Left;
 189                         break;
 190                 case XK_c:
 191                         ksym = XK_Escape;
 192                         break;
 193                 case XK_d:
 194                         ksym = XK_Delete;
 195                         break;
 196                 case XK_e:
 197                         ksym = XK_End;
 198                         break;
 199                 case XK_f:
 200                         ksym = XK_Right;
 201                         break;
 202                 case XK_h:
 203                         ksym = XK_BackSpace;
 204                         break;
 205                 case XK_i:
 206                         ksym = XK_Tab;
 207                         break;
 208                 case XK_j:
 209                         ksym = XK_Return;
 210                         break;
 211                 case XK_k:  /* delete right */
 212                         text[cursor] = '\0';
 213                         match();
 214                         break;
 215                 case XK_n:
 216                         ksym = XK_Down;
 217                         break;
 218                 case XK_p:
 219                         ksym = XK_Up;
 220                         break;
 221                 case XK_u:  /* delete left */
 222                         insert(NULL, 0 - cursor);
 223                         break;
 224                 case XK_w:  /* delete word */
 225                         while(cursor > 0 && text[nextrune(-1)] == ' ')
 226                                 insert(NULL, nextrune(-1) - cursor);
 227                         while(cursor > 0 && text[nextrune(-1)] != ' ')
 228                                 insert(NULL, nextrune(-1) - cursor);
 229                         break;
 230                 }
 231         }
 232         switch(ksym) {
 233         default:
 234                 if(!iscntrl(*buf))
 235                         insert(buf, strlen(buf));
 236                 break;
 237         case XK_Delete:
 238                 if(cursor == len)
 239                         return;
 240                 cursor = nextrune(+1);
 241         case XK_BackSpace:
 242                 if(cursor > 0)
 243                         insert(NULL, nextrune(-1) - cursor);
 244                 break;
 245         case XK_End:
 246                 if(cursor < len) {
 247                         cursor = len;
 248                         break;
 249                 }
 250                 while(next) {
 251                         sel = curr = next;
 252                         calcoffsets();
 253                 }
 254                 while(sel && sel->right)
 255                         sel = sel->right;
 256                 break;
 257         case XK_Escape:
 258                 exit(EXIT_FAILURE);
 259         case XK_Home:
 260                 if(sel == matches) {
 261                         cursor = 0;
 262                         break;
 263                 }
 264                 sel = curr = matches;
 265                 calcoffsets();
 266                 break;
 267         case XK_Insert:  /* paste selection */
 268                 if(ev->state & ShiftMask)
 269                         XConvertSelection(dc->dpy, XA_PRIMARY, utf8, utf8, win, CurrentTime);
 270                 return;
 271         case XK_Left:
 272                 if(cursor > 0 && (!sel || !sel->left || lines > 0)) {
 273                         cursor = nextrune(-1);
 274                         break;
 275                 }
 276                 else if(lines > 0)
 277                         return;
 278         case XK_Up:
 279                 if(sel && sel->left && (sel = sel->left)->right == curr) {
 280                         curr = prev;
 281                         calcoffsets();
 282                 }
 283                 break;
 284         case XK_Next:
 285                 if(!next)
 286                         return;
 287                 sel = curr = next;
 288                 calcoffsets();
 289                 break;
 290         case XK_Prior:
 291                 if(!prev)
 292                         return;
 293                 sel = curr = prev;
 294                 calcoffsets();
 295                 break;
 296         case XK_Return:
 297         case XK_KP_Enter:
 298                 fputs((sel && !(ev->state & ShiftMask)) ? sel->text : text, stdout);
 299                 fflush(stdout);
 300                 exit(EXIT_SUCCESS);
 301         case XK_Right:
 302                 if(cursor < len) {
 303                         cursor = nextrune(+1);
 304                         break;
 305                 }
 306                 else if(lines > 0)
 307                         return;
 308         case XK_Down:
 309                 if(sel && sel->right && (sel = sel->right) == next) {
 310                         curr = next;
 311                         calcoffsets();
 312                 }
 313                 break;
 314         case XK_Tab:
 315                 if(!sel)
 316                         return;
 317                 strncpy(text, sel->text, sizeof text);
 318                 cursor = strlen(text);
 319                 match();
 320                 break;
 321         }
 322         drawmenu();
 323 }
 324
 325 void
 326 match(void) {
 327         size_t len;
 328         Item *item, *itemend, *lexact, *lprefix, *lsubstr, *exactend, *prefixend, *substrend;
 329
 330         len = strlen(text);
 331         matches = lexact = lprefix = lsubstr = itemend = exactend = prefixend = substrend = NULL;
 332         for(item = items; item; item = item->next)
 333                 if(!fstrncmp(text, item->text, len + 1))
 334                         appenditem(item, &lexact, &exactend);
 335                 else if(!fstrncmp(text, item->text, len))
 336                         appenditem(item, &lprefix, &prefixend);
 337                 else if(fstrstr(item->text, text))
 338                         appenditem(item, &lsubstr, &substrend);
 339
 340         if(lexact) {
 341                 matches = lexact;
 342                 itemend = exactend;
 343         }
 344         if(lprefix) {
 345                 if(itemend) {
 346                         itemend->right = lprefix;
 347                         lprefix->left = itemend;
 348                 }
 349                 else
 350                         matches = lprefix;
 351                 itemend = prefixend;
 352         }
 353         if(lsubstr) {
 354                 if(itemend) {
 355                         itemend->right = lsubstr;
 356                         lsubstr->left = itemend;
 357                 }
 358                 else
 359                         matches = lsubstr;
 360         }
 361         curr = prev = next = sel = matches;
 362         calcoffsets();
 363 }
 364
 365 size_t
 366 nextrune(int incr) {
 367         size_t n, len;
 368
 369         len = strlen(text);
 370         for(n = cursor + incr; n >= 0 && n < len && (text[n] & 0xc0) == 0x80; n += incr);
 371         return n;
 372 }
 373
 374 void
 375 paste(void) {
 376         char *p, *q;
 377         int di;
 378         unsigned long dl;
 379         Atom da;
 380
 381         XGetWindowProperty(dc->dpy, win, utf8, 0, (sizeof text / 4) + 1, False,
 382                            utf8, &da, &di, &dl, &dl, (unsigned char **)&p);
 383         insert(p, (q = strchr(p, '\n')) ? q-p : strlen(p));
 384         XFree(p);
 385         drawmenu();
 386 }
 387
 388 void
 389 readstdin(void) {
 390         char buf[sizeof text], *p;
 391         Item *item, **end;
 392
 393         for(end = &items; fgets(buf, sizeof buf, stdin); *end = item, end = &item->next) {
 394                 if((p = strchr(buf, '\n')))
 395                         *p = '\0';
 396                 if(!(item = malloc(sizeof *item)))
 397                         eprintf("cannot malloc %u bytes\n", sizeof *item);
 398                 if(!(item->text = strdup(buf)))
 399                         eprintf("cannot strdup %u bytes\n", strlen(buf)+1);
 400                 item->next = item->left = item->right = NULL;
 401                 inputw = MAX(inputw, dc_textw(dc, item->text));
 402         }
 403 }
 404
 405 void
 406 run(void) {
 407         XEvent ev;
 408
 409         while(!XNextEvent(dc->dpy, &ev))
 410                 switch(ev.type) {
 411                 case Expose:
 412                         if(ev.xexpose.count == 0)
 413                                 drawmenu();
 414                         break;
 415                 case KeyPress:
 416                         keypress(&ev.xkey);
 417                         break;
 418                 case SelectionNotify:
 419                         if(ev.xselection.property == utf8)
 420                                 paste();
 421                         break;
 422                 case VisibilityNotify:
 423                         if(ev.xvisibility.state != VisibilityUnobscured)
 424                                 XRaiseWindow(dc->dpy, win);
 425                         break;
 426                 }
 427 }
 428
 429 void
 430 setup(void) {
 431         int x, y, screen;
 432         XSetWindowAttributes wa;
 433 #ifdef XINERAMA
 434         int n;
 435         XineramaScreenInfo *info;
 436 #endif
 437
 438         screen = DefaultScreen(dc->dpy);
 439         root = RootWindow(dc->dpy, screen);
 440         utf8 = XInternAtom(dc->dpy, "UTF8_STRING", False);
 441
 442         normcol[ColBG] = dc_color(dc, normbgcolor);
 443         normcol[ColFG] = dc_color(dc, normfgcolor);
 444         selcol[ColBG] = dc_color(dc, selbgcolor);
 445         selcol[ColFG] = dc_color(dc, selfgcolor);
 446
 447         /* menu geometry */
 448         bh = dc->font.height + 2;
 449         lines = MAX(lines, 0);
 450         mh = (lines + 1) * bh;
 451 #ifdef XINERAMA
 452         if((info = XineramaQueryScreens(dc->dpy, &n))) {
 453                 int i, di;
 454                 unsigned int du;
 455                 Window dw;
 456
 457                 XQueryPointer(dc->dpy, root, &dw, &dw, &x, &y, &di, &di, &du);
 458                 for(i = 0; i < n; i++)
 459                         if((monitor == info[i].screen_number)
 460                         || (monitor < 0 && INRECT(x, y, info[i].x_org, info[i].y_org, info[i].width, info[i].height)))
 461                                 break;
 462                 x = info[i].x_org;
 463                 y = info[i].y_org + (topbar ? 0 : info[i].height - mh);
 464                 mw = info[i].width;
 465                 XFree(info);
 466         }
 467         else
 468 #endif
 469         {
 470                 x = 0;
 471                 y = topbar ? 0 : DisplayHeight(dc->dpy, screen) - mh;
 472                 mw = DisplayWidth(dc->dpy, screen);
 473         }
 474         /* menu window */
 475         wa.override_redirect = True;
 476         wa.background_pixmap = ParentRelative;
 477         wa.event_mask = ExposureMask | KeyPressMask | VisibilityChangeMask;
 478         win = XCreateWindow(dc->dpy, root, x, y, mw, mh, 0,
 479                             DefaultDepth(dc->dpy, screen), CopyFromParent,
 480                             DefaultVisual(dc->dpy, screen),
 481                             CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
 482
 483         grabkeyboard();
 484         dc_resize(dc, mw, mh);
 485         inputw = MIN(inputw, mw/3);
 486         promptw = prompt ? dc_textw(dc, prompt) : 0;
 487         XMapRaised(dc->dpy, win);
 488         text[0] = '\0';
 489         match();
 490 }
 491
 492 void
 493 usage(void) {
 494         fputs("usage: dmenu [-b] [-i] [-l lines] [-p prompt] [-fn font] [-nb color]\n"
 495               "             [-nf color] [-sb color] [-sf color] [-v]\n", stderr);
 496         exit(EXIT_FAILURE);
 497 }
 498
 499 int
 500 main(int argc, char *argv[]) {
 501         int i;
 502
 503         progname = "dmenu";
 504         for(i = 1; i < argc; i++)
 505                 /* single flags */
 506                 if(!strcmp(argv[i], "-v")) {
 507                         fputs("dmenu-"VERSION", © 2006-2010 dmenu engineers, see LICENSE for details\n", stdout);
 508                         exit(EXIT_SUCCESS);
 509                 }
 510                 else if(!strcmp(argv[i], "-b"))
 511                         topbar = False;
 512                 else if(!strcmp(argv[i], "-i"))
 513                         fstrncmp = strncasecmp;
 514                 else if(i == argc-1)
 515                         usage();
 516                 /* double flags */
 517                 else if(!strcmp(argv[i], "-l"))
 518                         lines = atoi(argv[++i]);
 519                 else if(!strcmp(argv[i], "-m"))
 520                         monitor = atoi(argv[++i]);
 521                 else if(!strcmp(argv[i], "-p"))
 522                         prompt = argv[++i];
 523                 else if(!strcmp(argv[i], "-fn"))
 524                         font = argv[++i];
 525                 else if(!strcmp(argv[i], "-nb"))
 526                         normbgcolor = argv[++i];
 527                 else if(!strcmp(argv[i], "-nf"))
 528                         normfgcolor = argv[++i];
 529                 else if(!strcmp(argv[i], "-sb"))
 530                         selbgcolor = argv[++i];
 531                 else if(!strcmp(argv[i], "-sf"))
 532                         selfgcolor = argv[++i];
 533                 else
 534                         usage();
 535
 536         dc = dc_init();
 537         dc_font(dc, font);
 538         readstdin();
 539         setup();
 540         run();
 541
 542         return EXIT_FAILURE;  /* should not reach */
 543 }