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