removed ido-matching, changed behavior of -i meaning case insensitive matching now...
[dmenu.git] / 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 }