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