fixed fallback
[dmenu.git] / main.c
1 /* See LICENSE file for copyright and license details. */
2 #include "dmenu.h"
3 #include <ctype.h>
4 #include <locale.h>
5 #include <stdlib.h>
6 #include <stdio.h>
7 #include <string.h>
8 #include <unistd.h>
9 #include <X11/Xutil.h>
10 #include <X11/keysym.h>
11
12 #define CLEANMASK(mask) (mask & ~(numlockmask | LockMask))
13
14 typedef struct Item Item;
15 struct Item {
16         Item *next;             /* traverses all items */
17         Item *left, *right;     /* traverses items matching current search pattern */
18         char *text;
19 };
20
21 /* static */
22
23 static char text[4096];
24 static char *prompt = NULL;
25 static int mw, mh;
26 static int ret = 0;
27 static int nitem = 0;
28 static unsigned int cmdw = 0;
29 static unsigned int promptw = 0;
30 static unsigned int numlockmask = 0;
31 static Bool running = True;
32 static Item *allitems = NULL;   /* first of all items */
33 static Item *item = NULL;       /* first of pattern matching items */
34 static Item *sel = NULL;
35 static Item *next = NULL;
36 static Item *prev = NULL;
37 static Item *curr = NULL;
38 static Window root;
39 static Window win;
40
41 static void
42 calcoffsets(void) {
43         unsigned int tw, w;
44
45         if(!curr)
46                 return;
47         w = promptw + cmdw + 2 * SPACE;
48         for(next = curr; next; next=next->right) {
49                 tw = textw(next->text);
50                 if(tw > mw / 3)
51                         tw = mw / 3;
52                 w += tw;
53                 if(w > mw)
54                         break;
55         }
56         w = promptw + cmdw + 2 * SPACE;
57         for(prev = curr; prev && prev->left; prev=prev->left) {
58                 tw = textw(prev->left->text);
59                 if(tw > mw / 3)
60                         tw = mw / 3;
61                 w += tw;
62                 if(w > mw)
63                         break;
64         }
65 }
66
67 static void
68 drawmenu(void) {
69         Item *i;
70
71         dc.x = 0;
72         dc.y = 0;
73         dc.w = mw;
74         dc.h = mh;
75         drawtext(NULL, dc.norm);
76         /* print prompt? */
77         if(promptw) {
78                 dc.w = promptw;
79                 drawtext(prompt, dc.sel);
80         }
81         dc.x += promptw;
82         dc.w = mw - promptw;
83         /* print command */
84         if(cmdw && item)
85                 dc.w = cmdw;
86         drawtext(text[0] ? text : NULL, dc.norm);
87         dc.x += cmdw;
88         if(curr) {
89                 dc.w = SPACE;
90                 drawtext((curr && curr->left) ? "<" : NULL, dc.norm);
91                 dc.x += dc.w;
92                 /* determine maximum items */
93                 for(i = curr; i != next; i=i->right) {
94                         dc.w = textw(i->text);
95                         if(dc.w > mw / 3)
96                                 dc.w = mw / 3;
97                         drawtext(i->text, (sel == i) ? dc.sel : dc.norm);
98                         dc.x += dc.w;
99                 }
100                 dc.x = mw - SPACE;
101                 dc.w = SPACE;
102                 drawtext(next ? ">" : NULL, dc.norm);
103         }
104         XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, mw, mh, 0, 0);
105         XFlush(dpy);
106 }
107
108 static Bool
109 grabkeyboard(void) {
110         unsigned int len;
111
112         for(len = 1000; len; len--) {
113                 if(XGrabKeyboard(dpy, root, True, GrabModeAsync, GrabModeAsync, CurrentTime)
114                         == GrabSuccess)
115                         break;
116                 usleep(1000);
117         }
118         return len > 0;
119 }
120
121 static unsigned long
122 initcolor(const char *colstr) {
123         Colormap cmap = DefaultColormap(dpy, screen);
124         XColor color;
125
126         if(!XAllocNamedColor(dpy, cmap, colstr, &color, &color))
127                 eprint("error, cannot allocate color '%s'\n", colstr);
128         return color.pixel;
129 }
130
131 static void
132 initfont(const char *fontstr) {
133         char *def, **missing;
134         int i, n;
135
136         if(!fontstr || fontstr[0] == '\0')
137                 eprint("error, cannot load font: '%s'\n", fontstr);
138         missing = NULL;
139         if(dc.font.set)
140                 XFreeFontSet(dpy, dc.font.set);
141         dc.font.set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
142         if(missing)
143                 XFreeStringList(missing);
144         if(dc.font.set) {
145                 XFontSetExtents *font_extents;
146                 XFontStruct **xfonts;
147                 char **font_names;
148                 dc.font.ascent = dc.font.descent = 0;
149                 font_extents = XExtentsOfFontSet(dc.font.set);
150                 n = XFontsOfFontSet(dc.font.set, &xfonts, &font_names);
151                 for(i = 0, dc.font.ascent = 0, dc.font.descent = 0; i < n; i++) {
152                         if(dc.font.ascent < (*xfonts)->ascent)
153                                 dc.font.ascent = (*xfonts)->ascent;
154                         if(dc.font.descent < (*xfonts)->descent)
155                                 dc.font.descent = (*xfonts)->descent;
156                         xfonts++;
157                 }
158         }
159         else {
160                 if(dc.font.xfont)
161                         XFreeFont(dpy, dc.font.xfont);
162                 dc.font.xfont = NULL;
163                 if(!(dc.font.xfont = XLoadQueryFont(dpy, fontstr))) {
164                         if(!(dc.font.xfont = XLoadQueryFont(dpy, "fixed")))
165                                 eprint("error, cannot load font: '%s'\n", fontstr);
166                 }
167                 dc.font.ascent = dc.font.xfont->ascent;
168                 dc.font.descent = dc.font.xfont->descent;
169         }
170         dc.font.height = dc.font.ascent + dc.font.descent;
171 }
172
173 static int
174 strido(const char *text, const char *pattern) {
175         for(; *text && *pattern; text++)
176                 if (*text == *pattern)
177                         pattern++;
178         return !*pattern;
179 }                                  
180
181 static void
182 match(char *pattern) {
183         unsigned int plen;
184         Item *i, *j;
185
186         if(!pattern)
187                 return;
188         plen = strlen(pattern);
189         item = j = NULL;
190         nitem = 0;
191         for(i = allitems; i; i=i->next)
192                 if(!plen || !strncmp(pattern, i->text, plen)) {
193                         if(!j)
194                                 item = i;
195                         else
196                                 j->right = i;
197                         i->left = j;
198                         i->right = NULL;
199                         j = i;
200                         nitem++;
201                 }
202         for(i = allitems; i; i=i->next)
203                 if(plen && strncmp(pattern, i->text, plen)
204                                 && strstr(i->text, pattern)) {
205                         if(!j)                               
206                                 item = i;                              
207                         else                                     
208                                 j->right = i;                          
209                         i->left = j;      
210                         i->right = NULL;                         
211                         j = i;                                      
212                         nitem++;                                       
213                 }                                              
214         for(i = allitems; i; i=i->next)                            
215                 if(plen && strncmp(pattern, i->text, plen)             
216                                 && !strstr(i->text, pattern)          
217                                 && strido(i->text,pattern)) { 
218                         if(!j)
219                                 item = i;
220                         else
221                                 j->right = i;
222                         i->left = j;
223                         i->right = NULL;
224                         j = i;
225                         nitem++;
226                 }
227         curr = prev = next = sel = item;
228         calcoffsets();
229 }
230
231 static void
232 kpress(XKeyEvent * e) {
233         char buf[32];
234         int i, num;
235         unsigned int len;
236         KeySym ksym;
237
238         len = strlen(text);
239         buf[0] = 0;
240         num = XLookupString(e, buf, sizeof buf, &ksym, 0);
241         if(IsKeypadKey(ksym)) { 
242                 if(ksym == XK_KP_Enter) {
243                         ksym = XK_Return;
244                 } else if(ksym >= XK_KP_0 && ksym <= XK_KP_9) {
245                         ksym = (ksym - XK_KP_0) + XK_0;
246                 }
247         }
248         if(IsFunctionKey(ksym) || IsKeypadKey(ksym)
249                         || IsMiscFunctionKey(ksym) || IsPFKey(ksym)
250                         || IsPrivateKeypadKey(ksym))
251                 return;
252         /* first check if a control mask is omitted */
253         if(e->state & ControlMask) {
254                 switch (ksym) {
255                 default:        /* ignore other control sequences */
256                         return;
257                 case XK_bracketleft:
258                         ksym = XK_Escape;
259                         break;
260                 case XK_h:
261                 case XK_H:
262                         ksym = XK_BackSpace;
263                         break;
264                 case XK_i:
265                 case XK_I:
266                         ksym = XK_Tab;
267                         break;
268                 case XK_j:
269                 case XK_J:
270                         ksym = XK_Return;
271                         break;
272                 case XK_u:
273                 case XK_U:
274                         text[0] = 0;
275                         match(text);
276                         drawmenu();
277                         return;
278                 case XK_w:
279                 case XK_W:
280                         if(len) {
281                                 i = len - 1;
282                                 while(i >= 0 && text[i] == ' ')
283                                         text[i--] = 0;
284                                 while(i >= 0 && text[i] != ' ')
285                                         text[i--] = 0;
286                                 match(text);
287                                 drawmenu();
288                         }
289                         return;
290                 }
291         }
292         if(CLEANMASK(e->state) & Mod1Mask) {
293                 switch(ksym) {
294                 default: return;
295                 case XK_h:
296                         ksym = XK_Left;
297                         break;
298                 case XK_l:
299                         ksym = XK_Right;
300                         break;
301                 case XK_j:
302                         ksym = XK_Next;
303                         break;
304                 case XK_k:
305                         ksym = XK_Prior;
306                         break;
307                 case XK_g:
308                         ksym = XK_Home;
309                         break;
310                 case XK_G:
311                         ksym = XK_End;
312                         break;
313                 }
314         }
315         switch(ksym) {
316         default:
317                 if(num && !iscntrl((int) buf[0])) {
318                         buf[num] = 0;
319                         if(len > 0)
320                                 strncat(text, buf, sizeof text);
321                         else
322                                 strncpy(text, buf, sizeof text);
323                         match(text);
324                 }
325                 break;
326         case XK_BackSpace:
327                 if(len) {
328                         text[--len] = 0;
329                         match(text);
330                 }
331                 break;
332         case XK_End:
333                 if(!item)
334                         return;
335                 while(next) {
336                         sel = curr = next;
337                         calcoffsets();
338                 }
339                 while(sel && sel->right)
340                         sel = sel->right;
341                 break;
342         case XK_Escape:
343                 ret = 1;
344                 running = False;
345                 break;
346         case XK_Home:
347                 if(!item)
348                         return;
349                 sel = curr = item;
350                 calcoffsets();
351                 break;
352         case XK_Left:
353                 if(!(sel && sel->left))
354                         return;
355                 sel=sel->left;
356                 if(sel->right == curr) {
357                         curr = prev;
358                         calcoffsets();
359                 }
360                 break;
361         case XK_Next:
362                 if(!next)
363                         return;
364                 sel = curr = next;
365                 calcoffsets();
366                 break;
367         case XK_Prior:
368                 if(!prev)
369                         return;
370                 sel = curr = prev;
371                 calcoffsets();
372                 break;
373         case XK_Return:
374                 if((e->state & ShiftMask) && text)
375                         fprintf(stdout, "%s", text);
376                 else if(sel)
377                         fprintf(stdout, "%s", sel->text);
378                 else if(text)
379                         fprintf(stdout, "%s", text);
380                 fflush(stdout);
381                 running = False;
382                 break;
383         case XK_Right:
384                 if(!(sel && sel->right))
385                         return;
386                 sel=sel->right;
387                 if(sel == next) {
388                         curr = next;
389                         calcoffsets();
390                 }
391                 break;
392         case XK_Tab:
393                 if(!sel)
394                         return;
395                 strncpy(text, sel->text, sizeof text);
396                 match(text);
397                 break;
398         }
399         drawmenu();
400 }
401
402 static char *
403 readstdin(void) {
404         static char *maxname = NULL;
405         char *p, buf[1024];
406         unsigned int len = 0, max = 0;
407         Item *i, *new;
408
409         i = 0;
410         while(fgets(buf, sizeof buf, stdin)) {
411                 len = strlen(buf);
412                 if (buf[len - 1] == '\n')
413                         buf[len - 1] = 0;
414                 p = estrdup(buf);
415                 if(max < len) {
416                         maxname = p;
417                         max = len;
418                 }
419                 new = emalloc(sizeof(Item));
420                 new->next = new->left = new->right = NULL;
421                 new->text = p;
422                 if(!i)
423                         allitems = new;
424                 else 
425                         i->next = new;
426                 i = new;
427         }
428
429         return maxname;
430 }
431
432 static void
433 usage(void) {
434         eprint("usage: dmenu [-b] [-fn <font>] [-nb <color>] [-nf <color>]\n"
435                 "             [-p <prompt>] [-sb <color>] [-sf <color>] [-v]\n");
436 }
437
438 /* extern */
439
440 int screen;
441 Display *dpy;
442 DC dc = {0};
443
444 int
445 main(int argc, char *argv[]) {
446         Bool bottom = False;
447         char *font = FONT;
448         char *maxname;
449         char *normbg = NORMBGCOLOR;
450         char *normfg = NORMFGCOLOR;
451         char *selbg = SELBGCOLOR;
452         char *selfg = SELFGCOLOR;
453         int i, j;
454         Item *itm;
455         XEvent ev;
456         XModifierKeymap *modmap;
457         XSetWindowAttributes wa;
458
459         /* command line args */
460         for(i = 1; i < argc; i++)
461                 if(!strcmp(argv[i], "-b")) {
462                         bottom = True;
463                 }
464                 else if(!strcmp(argv[i], "-fn")) {
465                         if(++i < argc) font = argv[i];
466                 }
467                 else if(!strcmp(argv[i], "-nb")) {
468                         if(++i < argc) normbg = argv[i];
469                 }
470                 else if(!strcmp(argv[i], "-nf")) {
471                         if(++i < argc) normfg = argv[i];
472                 }
473                 else if(!strcmp(argv[i], "-p")) {
474                         if(++i < argc) prompt = argv[i];
475                 }
476                 else if(!strcmp(argv[i], "-sb")) {
477                         if(++i < argc) selbg = argv[i];
478                 }
479                 else if(!strcmp(argv[i], "-sf")) {
480                         if(++i < argc) selfg = argv[i];
481                 }
482                 else if(!strcmp(argv[i], "-v"))
483                         eprint("dmenu-"VERSION", © 2006-2007 Anselm R. Garbe, Sander van Dijk\n");
484                 else
485                         usage();
486         setlocale(LC_CTYPE, "");
487         dpy = XOpenDisplay(0);
488         if(!dpy)
489                 eprint("dmenu: cannot open display\n");
490         screen = DefaultScreen(dpy);
491         root = RootWindow(dpy, screen);
492         if(isatty(STDIN_FILENO)) {
493                 maxname = readstdin();
494                 running = grabkeyboard();
495         }
496         else { /* prevent keypress loss */
497                 running = grabkeyboard();
498                 maxname = readstdin();
499         }
500         /* init modifier map */
501         modmap = XGetModifierMapping(dpy);
502         for (i = 0; i < 8; i++) {
503                 for (j = 0; j < modmap->max_keypermod; j++) {
504                         if(modmap->modifiermap[i * modmap->max_keypermod + j]
505                         == XKeysymToKeycode(dpy, XK_Num_Lock))
506                                 numlockmask = (1 << i);
507                 }
508         }
509         XFreeModifiermap(modmap);
510         /* style */
511         dc.norm[ColBG] = initcolor(normbg);
512         dc.norm[ColFG] = initcolor(normfg);
513         dc.sel[ColBG] = initcolor(selbg);
514         dc.sel[ColFG] = initcolor(selfg);
515         initfont(font);
516         /* menu window */
517         wa.override_redirect = 1;
518         wa.background_pixmap = ParentRelative;
519         wa.event_mask = ExposureMask | ButtonPressMask | KeyPressMask;
520         mw = DisplayWidth(dpy, screen);
521         mh = dc.font.height + 2;
522         win = XCreateWindow(dpy, root, 0,
523                         bottom ? DisplayHeight(dpy, screen) - mh : 0, mw, mh, 0,
524                         DefaultDepth(dpy, screen), CopyFromParent,
525                         DefaultVisual(dpy, screen),
526                         CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
527         /* pixmap */
528         dc.drawable = XCreatePixmap(dpy, root, mw, mh, DefaultDepth(dpy, screen));
529         dc.gc = XCreateGC(dpy, root, 0, 0);
530         XSetLineAttributes(dpy, dc.gc, 1, LineSolid, CapButt, JoinMiter);
531         if(!dc.font.set)
532                 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
533         if(maxname)
534                 cmdw = textw(maxname);
535         if(cmdw > mw / 3)
536                 cmdw = mw / 3;
537         if(prompt)
538                 promptw = textw(prompt);
539         if(promptw > mw / 5)
540                 promptw = mw / 5;
541         text[0] = 0;
542         match(text);
543         XMapRaised(dpy, win);
544         drawmenu();
545         XSync(dpy, False);
546
547         /* main event loop */
548         while(running && !XNextEvent(dpy, &ev))
549                 switch (ev.type) {
550                 default:        /* ignore all crap */
551                         break;
552                 case KeyPress:
553                         kpress(&ev.xkey);
554                         break;
555                 case Expose:
556                         if(ev.xexpose.count == 0)
557                                 drawmenu();
558                         break;
559                 }
560
561         /* cleanup */
562         while(allitems) {
563                 itm = allitems->next;
564                 free(allitems->text);
565                 free(allitems);
566                 allitems = itm;
567         }
568         if(dc.font.set)
569                 XFreeFontSet(dpy, dc.font.set);
570         else
571                 XFreeFont(dpy, dc.font.xfont);
572         XFreePixmap(dpy, dc.drawable);
573         XFreeGC(dpy, dc.gc);
574         XDestroyWindow(dpy, win);
575         XUngrabKeyboard(dpy, CurrentTime);
576         XCloseDisplay(dpy);
577         return ret;
578 }