referred to LICENSE file
[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                         eprint("error, cannot load font: '%s'\n", fontstr);
165                 dc.font.ascent = dc.font.xfont->ascent;
166                 dc.font.descent = dc.font.xfont->descent;
167         }
168         dc.font.height = dc.font.ascent + dc.font.descent;
169 }
170
171 static void
172 match(char *pattern) {
173         unsigned int plen;
174         Item *i, *j;
175
176         if(!pattern)
177                 return;
178         plen = strlen(pattern);
179         item = j = NULL;
180         nitem = 0;
181         for(i = allitems; i; i=i->next)
182                 if(!plen || !strncmp(pattern, i->text, plen)) {
183                         if(!j)
184                                 item = i;
185                         else
186                                 j->right = i;
187                         i->left = j;
188                         i->right = NULL;
189                         j = i;
190                         nitem++;
191                 }
192         for(i = allitems; i; i=i->next)
193                 if(plen && strncmp(pattern, i->text, plen)
194                                 && strstr(i->text, pattern)) {
195                         if(!j)
196                                 item = i;
197                         else
198                                 j->right = i;
199                         i->left = j;
200                         i->right = NULL;
201                         j = i;
202                         nitem++;
203                 }
204         curr = prev = next = sel = item;
205         calcoffsets();
206 }
207
208 static void
209 kpress(XKeyEvent * e) {
210         char buf[32];
211         int i, num;
212         unsigned int len;
213         KeySym ksym;
214
215         len = strlen(text);
216         buf[0] = 0;
217         num = XLookupString(e, buf, sizeof buf, &ksym, 0);
218         if(IsKeypadKey(ksym)) { 
219                 if(ksym == XK_KP_Enter) {
220                         ksym = XK_Return;
221                 } else if(ksym >= XK_KP_0 && ksym <= XK_KP_9) {
222                         ksym = (ksym - XK_KP_0) + XK_0;
223                 }
224         }
225         if(IsFunctionKey(ksym) || IsKeypadKey(ksym)
226                         || IsMiscFunctionKey(ksym) || IsPFKey(ksym)
227                         || IsPrivateKeypadKey(ksym))
228                 return;
229         /* first check if a control mask is omitted */
230         if(e->state & ControlMask) {
231                 switch (ksym) {
232                 default:        /* ignore other control sequences */
233                         return;
234                 case XK_bracketleft:
235                         ksym = XK_Escape;
236                         break;
237                 case XK_h:
238                 case XK_H:
239                         ksym = XK_BackSpace;
240                         break;
241                 case XK_i:
242                 case XK_I:
243                         ksym = XK_Tab;
244                         break;
245                 case XK_j:
246                 case XK_J:
247                         ksym = XK_Return;
248                         break;
249                 case XK_u:
250                 case XK_U:
251                         text[0] = 0;
252                         match(text);
253                         drawmenu();
254                         return;
255                 case XK_w:
256                 case XK_W:
257                         if(len) {
258                                 i = len - 1;
259                                 while(i >= 0 && text[i] == ' ')
260                                         text[i--] = 0;
261                                 while(i >= 0 && text[i] != ' ')
262                                         text[i--] = 0;
263                                 match(text);
264                                 drawmenu();
265                         }
266                         return;
267                 }
268         }
269         if(CLEANMASK(e->state) & Mod1Mask) {
270                 switch(ksym) {
271                 default: return;
272                 case XK_h:
273                         ksym = XK_Left;
274                         break;
275                 case XK_l:
276                         ksym = XK_Right;
277                         break;
278                 case XK_j:
279                         ksym = XK_Next;
280                         break;
281                 case XK_k:
282                         ksym = XK_Prior;
283                         break;
284                 case XK_g:
285                         ksym = XK_Home;
286                         break;
287                 case XK_G:
288                         ksym = XK_End;
289                         break;
290                 }
291         }
292         switch(ksym) {
293         default:
294                 if(num && !iscntrl((int) buf[0])) {
295                         buf[num] = 0;
296                         if(len > 0)
297                                 strncat(text, buf, sizeof text);
298                         else
299                                 strncpy(text, buf, sizeof text);
300                         match(text);
301                 }
302                 break;
303         case XK_BackSpace:
304                 if(len) {
305                         text[--len] = 0;
306                         match(text);
307                 }
308                 break;
309         case XK_End:
310                 if(!item)
311                         return;
312                 while(next) {
313                         sel = curr = next;
314                         calcoffsets();
315                 }
316                 while(sel && sel->right)
317                         sel = sel->right;
318                 break;
319         case XK_Escape:
320                 ret = 1;
321                 running = False;
322                 break;
323         case XK_Home:
324                 if(!item)
325                         return;
326                 sel = curr = item;
327                 calcoffsets();
328                 break;
329         case XK_Left:
330                 if(!(sel && sel->left))
331                         return;
332                 sel=sel->left;
333                 if(sel->right == curr) {
334                         curr = prev;
335                         calcoffsets();
336                 }
337                 break;
338         case XK_Next:
339                 if(!next)
340                         return;
341                 sel = curr = next;
342                 calcoffsets();
343                 break;
344         case XK_Prior:
345                 if(!prev)
346                         return;
347                 sel = curr = prev;
348                 calcoffsets();
349                 break;
350         case XK_Return:
351                 if((e->state & ShiftMask) && text)
352                         fprintf(stdout, "%s", text);
353                 else if(sel)
354                         fprintf(stdout, "%s", sel->text);
355                 else if(text)
356                         fprintf(stdout, "%s", text);
357                 fflush(stdout);
358                 running = False;
359                 break;
360         case XK_Right:
361                 if(!(sel && sel->right))
362                         return;
363                 sel=sel->right;
364                 if(sel == next) {
365                         curr = next;
366                         calcoffsets();
367                 }
368                 break;
369         case XK_Tab:
370                 if(!sel)
371                         return;
372                 strncpy(text, sel->text, sizeof text);
373                 match(text);
374                 break;
375         }
376         drawmenu();
377 }
378
379 static char *
380 readstdin(void) {
381         static char *maxname = NULL;
382         char *p, buf[1024];
383         unsigned int len = 0, max = 0;
384         Item *i, *new;
385
386         i = 0;
387         while(fgets(buf, sizeof buf, stdin)) {
388                 len = strlen(buf);
389                 if (buf[len - 1] == '\n')
390                         buf[len - 1] = 0;
391                 p = estrdup(buf);
392                 if(max < len) {
393                         maxname = p;
394                         max = len;
395                 }
396                 new = emalloc(sizeof(Item));
397                 new->next = new->left = new->right = NULL;
398                 new->text = p;
399                 if(!i)
400                         allitems = new;
401                 else 
402                         i->next = new;
403                 i = new;
404         }
405
406         return maxname;
407 }
408
409 static void
410 usage(void) {
411         eprint("usage: dmenu [-b] [-fn <font>] [-nb <color>] [-nf <color>]\n"
412                 "             [-p <prompt>] [-sb <color>] [-sf <color>] [-v]\n");
413 }
414
415 /* extern */
416
417 int screen;
418 Display *dpy;
419 DC dc = {0};
420
421 int
422 main(int argc, char *argv[]) {
423         Bool bottom = False;
424         char *font = FONT;
425         char *maxname;
426         char *normbg = NORMBGCOLOR;
427         char *normfg = NORMFGCOLOR;
428         char *selbg = SELBGCOLOR;
429         char *selfg = SELFGCOLOR;
430         int i, j;
431         Item *itm;
432         XEvent ev;
433         XModifierKeymap *modmap;
434         XSetWindowAttributes wa;
435
436         /* command line args */
437         for(i = 1; i < argc; i++)
438                 if(!strcmp(argv[i], "-b")) {
439                         bottom = True;
440                 }
441                 else if(!strcmp(argv[i], "-fn")) {
442                         if(++i < argc) font = argv[i];
443                 }
444                 else if(!strcmp(argv[i], "-nb")) {
445                         if(++i < argc) normbg = argv[i];
446                 }
447                 else if(!strcmp(argv[i], "-nf")) {
448                         if(++i < argc) normfg = argv[i];
449                 }
450                 else if(!strcmp(argv[i], "-p")) {
451                         if(++i < argc) prompt = argv[i];
452                 }
453                 else if(!strcmp(argv[i], "-sb")) {
454                         if(++i < argc) selbg = argv[i];
455                 }
456                 else if(!strcmp(argv[i], "-sf")) {
457                         if(++i < argc) selfg = argv[i];
458                 }
459                 else if(!strcmp(argv[i], "-v"))
460                         eprint("dmenu-"VERSION", © 2006-2007 Anselm R. Garbe, Sander van Dijk\n");
461                 else
462                         usage();
463         setlocale(LC_CTYPE, "");
464         dpy = XOpenDisplay(0);
465         if(!dpy)
466                 eprint("dmenu: cannot open display\n");
467         screen = DefaultScreen(dpy);
468         root = RootWindow(dpy, screen);
469         if(isatty(STDIN_FILENO)) {
470                 maxname = readstdin();
471                 running = grabkeyboard();
472         }
473         else { /* prevent keypress loss */
474                 running = grabkeyboard();
475                 maxname = readstdin();
476         }
477         /* init modifier map */
478         modmap = XGetModifierMapping(dpy);
479         for (i = 0; i < 8; i++) {
480                 for (j = 0; j < modmap->max_keypermod; j++) {
481                         if(modmap->modifiermap[i * modmap->max_keypermod + j]
482                         == XKeysymToKeycode(dpy, XK_Num_Lock))
483                                 numlockmask = (1 << i);
484                 }
485         }
486         XFreeModifiermap(modmap);
487         /* style */
488         dc.norm[ColBG] = initcolor(normbg);
489         dc.norm[ColFG] = initcolor(normfg);
490         dc.sel[ColBG] = initcolor(selbg);
491         dc.sel[ColFG] = initcolor(selfg);
492         initfont(font);
493         /* menu window */
494         wa.override_redirect = 1;
495         wa.background_pixmap = ParentRelative;
496         wa.event_mask = ExposureMask | ButtonPressMask | KeyPressMask;
497         mw = DisplayWidth(dpy, screen);
498         mh = dc.font.height + 2;
499         win = XCreateWindow(dpy, root, 0,
500                         bottom ? DisplayHeight(dpy, screen) - mh : 0, mw, mh, 0,
501                         DefaultDepth(dpy, screen), CopyFromParent,
502                         DefaultVisual(dpy, screen),
503                         CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
504         /* pixmap */
505         dc.drawable = XCreatePixmap(dpy, root, mw, mh, DefaultDepth(dpy, screen));
506         dc.gc = XCreateGC(dpy, root, 0, 0);
507         XSetLineAttributes(dpy, dc.gc, 1, LineSolid, CapButt, JoinMiter);
508         if(!dc.font.set)
509                 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
510         if(maxname)
511                 cmdw = textw(maxname);
512         if(cmdw > mw / 3)
513                 cmdw = mw / 3;
514         if(prompt)
515                 promptw = textw(prompt);
516         if(promptw > mw / 5)
517                 promptw = mw / 5;
518         text[0] = 0;
519         match(text);
520         XMapRaised(dpy, win);
521         drawmenu();
522         XSync(dpy, False);
523
524         /* main event loop */
525         while(running && !XNextEvent(dpy, &ev))
526                 switch (ev.type) {
527                 default:        /* ignore all crap */
528                         break;
529                 case KeyPress:
530                         kpress(&ev.xkey);
531                         break;
532                 case Expose:
533                         if(ev.xexpose.count == 0)
534                                 drawmenu();
535                         break;
536                 }
537
538         /* cleanup */
539         while(allitems) {
540                 itm = allitems->next;
541                 free(allitems->text);
542                 free(allitems);
543                 allitems = itm;
544         }
545         if(dc.font.set)
546                 XFreeFontSet(dpy, dc.font.set);
547         else
548                 XFreeFont(dpy, dc.font.xfont);
549         XFreePixmap(dpy, dc.drawable);
550         XFreeGC(dpy, dc.gc);
551         XDestroyWindow(dpy, win);
552         XUngrabKeyboard(dpy, CurrentTime);
553         XCloseDisplay(dpy);
554         return ret;
555 }