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