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