added draw.h
[dmenu.git] / dmenu.c
1 /* See LICENSE file for copyright and license details. */
2 #include <ctype.h>
3 #include <locale.h>
4 #include <stdarg.h>
5 #include <stdio.h>
6 #include <stdlib.h>
7 #include <string.h>
8 #include <strings.h>
9 #include <unistd.h>
10 #include <X11/keysym.h>
11 #include <X11/Xlib.h>
12 #include <X11/Xutil.h>
13 #ifdef XINERAMA
14 #include <X11/extensions/Xinerama.h>
15 #endif
16
17 /* macros */
18 #define CLEANMASK(mask)         (mask & ~(numlockmask | LockMask))
19 #define INRECT(X,Y,RX,RY,RW,RH) ((X) >= (RX) && (X) < (RX) + (RW) && (Y) >= (RY) && (Y) < (RY) + (RH))
20 #define MIN(a, b)               ((a) < (b) ? (a) : (b))
21 #define MAX(a, b)               ((a) > (b) ? (a) : (b))
22 #define IS_UTF8_1ST_CHAR(c)     ((((c) & 0xc0) == 0xc0) || !((c) & 0x80))
23
24 typedef struct Item Item;
25 struct Item {
26         char *text;
27         Item *next;         /* traverses all items */
28         Item *left, *right; /* traverses items matching current search pattern */
29 };
30
31 /* forward declarations */
32 static void appenditem(Item *i, Item **list, Item **last);
33 static void calcoffsetsh(void);
34 static void calcoffsetsv(void);
35 static char *cistrstr(const char *s, const char *sub);
36 static void cleanup(void);
37 static void drawmenu(void);
38 static void drawmenuh(void);
39 static void drawmenuv(void);
40 static void eprint(const char *errstr, ...);
41 static Bool grabkeyboard(void);
42 static void kpress(XKeyEvent * e);
43 static void match(char *pattern);
44 static void readstdin(void);
45 static void run(void);
46 static void setup(Bool topbar);
47
48 #include "config.h"
49 #include "draw.h"
50
51 /* variables */
52 static char *maxname = NULL;
53 static char *prompt = NULL;
54 static char text[4096];
55 static int cmdw = 0;
56 static int promptw = 0;
57 static int ret = 0;
58 static unsigned int numlockmask = 0;
59 static Bool running = True;
60 static Item *allitems = NULL;  /* first of all items */
61 static Item *item = NULL;      /* first of pattern matching items */
62 static Item *sel = NULL;
63 static Item *next = NULL;
64 static Item *prev = NULL;
65 static Item *curr = NULL;
66 static Window win;
67 static int (*fstrncmp)(const char *, const char *, size_t) = strncmp;
68 static char *(*fstrstr)(const char *, const char *) = strstr;
69 static unsigned int lines = 0;
70 static void (*calcoffsets)(void) = calcoffsetsh;
71
72 void
73 appenditem(Item *i, Item **list, Item **last) {
74         if(!(*last))
75                 *list = i;
76         else
77                 (*last)->right = i;
78         i->left = *last;
79         i->right = NULL;
80         *last = i;
81 }
82
83 void
84 calcoffsetsh(void) {
85         unsigned int w;
86
87         if(!curr)
88                 return;
89         w = promptw + cmdw + 2 * spaceitem;
90         for(next = curr; next && w < mw; next=next->right)
91                 w += MIN(textw(next->text), mw / 3);
92         w = promptw + cmdw + 2 * spaceitem;
93         for(prev = curr; prev && prev->left && w < mw; prev=prev->left)
94                 w += MIN(textw(prev->left->text), mw / 3);
95 }
96
97 void
98 calcoffsetsv(void) {
99         unsigned int h;
100
101         if(!curr)
102                 return;
103         h = (dc.font.height + 2) * lines;
104         for(next = curr; next && h > 0; next = next->right)
105                 h -= dc.font.height + 2;
106         h = (dc.font.height + 2) * lines;
107         for(prev = curr; prev && prev->left && h > 0; prev = prev->left)
108                 h -= dc.font.height + 2;
109 }
110
111 char *
112 cistrstr(const char *s, const char *sub) {
113         int c, csub;
114         unsigned int len;
115
116         if(!sub)
117                 return (char *)s;
118         if((c = tolower(*sub++)) != '\0') {
119                 len = strlen(sub);
120                 do {
121                         do {
122                                 if((csub = *s++) == '\0')
123                                         return NULL;
124                         }
125                         while(tolower(csub) != c);
126                 }
127                 while(strncasecmp(s, sub, len) != 0);
128                 s--;
129         }
130         return (char *)s;
131 }
132
133 void
134 cleanup(void) {
135         drawcleanup();
136         XDestroyWindow(dpy, win);
137         XUngrabKeyboard(dpy, CurrentTime);
138 }
139
140 void
141 drawmenu(void) {
142         dc.x = 0;
143         dc.y = 0;
144         dc.w = mw;
145         dc.h = mh;
146         drawtext(NULL, dc.norm);
147         /* print prompt? */
148         if(prompt) {
149                 dc.w = promptw;
150                 drawtext(prompt, dc.sel);
151                 dc.x += dc.w;
152         }
153         dc.w = mw - dc.x;
154         /* print command */
155         if(cmdw && item && lines == 0)
156                 dc.w = cmdw;
157         drawtext(*text ? text : NULL, dc.norm);
158         if(curr) {
159                 if(lines > 0)
160                         drawmenuv();
161                 else
162                         drawmenuh();
163         }
164         XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, mw, mh, 0, 0);
165         XFlush(dpy);
166 }
167
168 void
169 drawmenuh(void) {
170         Item *i;
171
172         dc.x += cmdw;
173         dc.w = spaceitem;
174         drawtext(curr->left ? "<" : NULL, dc.norm);
175         dc.x += dc.w;
176         for(i = curr; i != next; i=i->right) {
177                 dc.w = MIN(textw(i->text), mw / 3);
178                 drawtext(i->text, (sel == i) ? dc.sel : dc.norm);
179                 dc.x += dc.w;
180         }
181         dc.w = spaceitem;
182         dc.x = mw - dc.w;
183         drawtext(next ? ">" : NULL, dc.norm);
184 }
185
186 void
187 drawmenuv(void) {
188         Item *i;
189
190         dc.w = mw - dc.x;
191         dc.h = dc.font.height + 2;
192         dc.y = dc.h;
193         for(i = curr; i != next; i=i->right) {
194                 drawtext(i->text, (sel == i) ? dc.sel : dc.norm);
195                 dc.y += dc.h;
196         }
197         dc.h = mh - dc.y;
198         drawtext(NULL, dc.norm);
199 }
200
201 Bool
202 grabkeyboard(void) {
203         unsigned int len;
204
205         for(len = 1000; len; len--) {
206                 if(XGrabKeyboard(dpy, parent, True, GrabModeAsync, GrabModeAsync, CurrentTime)
207                 == GrabSuccess)
208                         break;
209                 usleep(1000);
210         }
211         return len > 0;
212 }
213
214 void
215 kpress(XKeyEvent * e) {
216         char buf[sizeof text];
217         int num;
218         unsigned int i, len;
219         KeySym ksym;
220
221         len = strlen(text);
222         num = XLookupString(e, buf, sizeof buf, &ksym, NULL);
223         if(ksym == XK_KP_Enter)
224                 ksym = XK_Return;
225         else if(ksym >= XK_KP_0 && ksym <= XK_KP_9)
226                 ksym = (ksym - XK_KP_0) + XK_0;
227         else if(IsFunctionKey(ksym) || IsKeypadKey(ksym)
228         || IsMiscFunctionKey(ksym) || IsPFKey(ksym)
229         || IsPrivateKeypadKey(ksym))
230                 return;
231         /* first check if a control mask is omitted */
232         if(e->state & ControlMask) {
233                 switch(tolower(ksym)) {
234                 default:
235                         return;
236                 case XK_a:
237                         ksym = XK_Home;
238                         break;
239                 case XK_b:
240                         ksym = XK_Left;
241                         break;
242                 case XK_c:
243                         ksym = XK_Escape;
244                         break;
245                 case XK_e:
246                         ksym = XK_End;
247                         break;
248                 case XK_f:
249                         ksym = XK_Right;
250                         break;
251                 case XK_h:
252                         ksym = XK_BackSpace;
253                         break;
254                 case XK_i:
255                         ksym = XK_Tab;
256                         break;
257                 case XK_j:
258                         ksym = XK_Return;
259                         break;
260                 case XK_n:
261                         ksym = XK_Down;
262                         break;
263                 case XK_p:
264                         ksym = XK_Up;
265                         break;
266                 case XK_u:
267                         text[0] = '\0';
268                         match(text);
269                         break;
270                 case XK_w:
271                         if(len == 0)
272                                 return;
273                         i = len;
274                         while(i-- > 0 && text[i] == ' ');
275                         while(i-- > 0 && text[i] != ' ');
276                         text[++i] = '\0';
277                         match(text);
278                         break;
279                 case XK_x:
280                         execlp("dinput", "dinput", text, NULL); /* todo: argv */
281                         eprint("dmenu: cannot exec dinput:");
282                         break;
283                 }
284         }
285         switch(ksym) {
286         default:
287                 num = MIN(num, sizeof text);
288                 if(num && !iscntrl((int) buf[0])) {
289                         memcpy(text + len, buf, num + 1);
290                         len += num;
291                         match(text);
292                 }
293                 break;
294         case XK_BackSpace:
295                 if(len == 0)
296                         return;
297                 for(i = 1; len - i > 0 && !IS_UTF8_1ST_CHAR(text[len - i]); i++);
298                 len -= i;
299                 text[len] = '\0';
300                 match(text);
301                 break;
302         case XK_End:
303                 while(next) {
304                         sel = curr = next;
305                         calcoffsets();
306                 }
307                 while(sel && sel->right)
308                         sel = sel->right;
309                 break;
310         case XK_Escape:
311                 ret = 1;
312                 running = False;
313                 return;
314         case XK_Home:
315                 sel = curr = item;
316                 calcoffsets();
317                 break;
318         case XK_Left:
319         case XK_Up:
320                 if(!sel || !sel->left)
321                         return;
322                 sel = sel->left;
323                 if(sel->right == curr) {
324                         curr = prev;
325                         calcoffsets();
326                 }
327                 break;
328         case XK_Next:
329                 if(!next)
330                         return;
331                 sel = curr = next;
332                 calcoffsets();
333                 break;
334         case XK_Prior:
335                 if(!prev)
336                         return;
337                 sel = curr = prev;
338                 calcoffsets();
339                 break;
340         case XK_Return:
341                 if((e->state & ShiftMask) || !sel)
342                         fprintf(stdout, "%s", text);
343                 else
344                         fprintf(stdout, "%s", sel->text);
345                 fflush(stdout);
346                 running = False;
347                 return;
348         case XK_Right:
349         case XK_Down:
350                 if(!sel || !sel->right)
351                         return;
352                 sel = sel->right;
353                 if(sel == next) {
354                         curr = next;
355                         calcoffsets();
356                 }
357                 break;
358         case XK_Tab:
359                 if(!sel)
360                         return;
361                 strncpy(text, sel->text, sizeof text);
362                 match(text);
363                 break;
364         }
365         drawmenu();
366 }
367
368 void
369 match(char *pattern) {
370         unsigned int plen;
371         Item *i, *itemend, *lexact, *lprefix, *lsubstr, *exactend, *prefixend, *substrend;
372
373         if(!pattern)
374                 return;
375         plen = strlen(pattern);
376         item = lexact = lprefix = lsubstr = itemend = exactend = prefixend = substrend = NULL;
377         for(i = allitems; i; i = i->next)
378                 if(!fstrncmp(pattern, i->text, plen + 1))
379                         appenditem(i, &lexact, &exactend);
380                 else if(!fstrncmp(pattern, i->text, plen))
381                         appenditem(i, &lprefix, &prefixend);
382                 else if(fstrstr(i->text, pattern))
383                         appenditem(i, &lsubstr, &substrend);
384         if(lexact) {
385                 item = lexact;
386                 itemend = exactend;
387         }
388         if(lprefix) {
389                 if(itemend) {
390                         itemend->right = lprefix;
391                         lprefix->left = itemend;
392                 }
393                 else
394                         item = lprefix;
395                 itemend = prefixend;
396         }
397         if(lsubstr) {
398                 if(itemend) {
399                         itemend->right = lsubstr;
400                         lsubstr->left = itemend;
401                 }
402                 else
403                         item = lsubstr;
404         }
405         curr = prev = next = sel = item;
406         calcoffsets();
407 }
408
409 void
410 readstdin(void) {
411         char *p, buf[sizeof text];
412         unsigned int len = 0, max = 0;
413         Item *i, *new;
414
415         i = NULL;
416         while(fgets(buf, sizeof buf, stdin)) {
417                 len = strlen(buf);
418                 if(buf[len-1] == '\n')
419                         buf[--len] = '\0';
420                 if(!(p = strdup(buf)))
421                         eprint("dmenu: cannot strdup %u bytes\n", len);
422                 if((max = MAX(max, len)) == len)
423                         maxname = p;
424                 if(!(new = malloc(sizeof *new)))
425                         eprint("dmenu: cannot malloc %u bytes\n", sizeof *new);
426                 new->next = new->left = new->right = NULL;
427                 new->text = p;
428                 if(!i)
429                         allitems = new;
430                 else 
431                         i->next = new;
432                 i = new;
433         }
434 }
435
436 void
437 run(void) {
438         XEvent ev;
439
440         /* main event loop */
441         while(running && !XNextEvent(dpy, &ev))
442                 switch (ev.type) {
443                 case KeyPress:
444                         kpress(&ev.xkey);
445                         break;
446                 case Expose:
447                         if(ev.xexpose.count == 0)
448                                 drawmenu();
449                         break;
450                 case VisibilityNotify:
451                         if (ev.xvisibility.state != VisibilityUnobscured)
452                                 XRaiseWindow(dpy, win);
453                         break;
454                 }
455 }
456
457 void
458 setup(Bool topbar) {
459         int i, j, x, y;
460 #if XINERAMA
461         int n;
462         XineramaScreenInfo *info = NULL;
463 #endif
464         XModifierKeymap *modmap;
465         XSetWindowAttributes wa;
466         XWindowAttributes pwa;
467
468         /* init modifier map */
469         modmap = XGetModifierMapping(dpy);
470         for(i = 0; i < 8; i++)
471                 for(j = 0; j < modmap->max_keypermod; j++) {
472                         if(modmap->modifiermap[i * modmap->max_keypermod + j]
473                         == XKeysymToKeycode(dpy, XK_Num_Lock))
474                                 numlockmask = (1 << i);
475                 }
476         XFreeModifiermap(modmap);
477
478         initfont(font);
479
480         /* menu window */
481         wa.override_redirect = True;
482         wa.background_pixmap = ParentRelative;
483         wa.event_mask = ExposureMask | ButtonPressMask | KeyPressMask | VisibilityChangeMask;
484
485         /* menu window geometry */
486         mh = (dc.font.height + 2) * (lines + 1);
487 #if XINERAMA
488         if(parent == RootWindow(dpy, screen) && XineramaIsActive(dpy) && (info = XineramaQueryScreens(dpy, &n))) {
489                 i = 0;
490                 if(n > 1) {
491                         int di;
492                         unsigned int dui;
493                         Window dummy;
494                         if(XQueryPointer(dpy, parent, &dummy, &dummy, &x, &y, &di, &di, &dui))
495                                 for(i = 0; i < n; i++)
496                                         if(INRECT(x, y, info[i].x_org, info[i].y_org, info[i].width, info[i].height))
497                                                 break;
498                 }
499                 x = info[i].x_org;
500                 y = topbar ? info[i].y_org : info[i].y_org + info[i].height - mh;
501                 mw = info[i].width;
502                 XFree(info);
503         }
504         else
505 #endif
506         {
507                 XGetWindowAttributes(dpy, parent, &pwa);
508                 x = 0;
509                 y = topbar ? 0 : pwa.height - mh;
510                 mw = pwa.width;
511         }
512
513         win = XCreateWindow(dpy, parent, x, y, mw, mh, 0,
514                         DefaultDepth(dpy, screen), CopyFromParent,
515                         DefaultVisual(dpy, screen),
516                         CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
517
518         drawsetup();
519         if(maxname)
520                 cmdw = MIN(textw(maxname), mw / 3);
521         if(prompt)
522                 promptw = MIN(textw(prompt), mw / 5);
523         text[0] = '\0';
524         match(text);
525         XMapRaised(dpy, win);
526 }
527
528 int
529 main(int argc, char *argv[]) {
530         unsigned int i;
531         Bool topbar = True;
532
533         /* command line args */
534         for(i = 1; i < argc; i++)
535                 if(!strcmp(argv[i], "-i")) {
536                         fstrncmp = strncasecmp;
537                         fstrstr = cistrstr;
538                 }
539                 else if(!strcmp(argv[i], "-b"))
540                         topbar = False;
541                 else if(!strcmp(argv[i], "-e")) {
542                         if(++i < argc) parent = atoi(argv[i]);
543                 }
544                 else if(!strcmp(argv[i], "-l")) {
545                         if(++i < argc) lines = atoi(argv[i]);
546                         if(lines > 0)
547                                 calcoffsets = calcoffsetsv;
548                 }
549                 else if(!strcmp(argv[i], "-fn")) {
550                         if(++i < argc) font = argv[i];
551                 }
552                 else if(!strcmp(argv[i], "-nb")) {
553                         if(++i < argc) normbgcolor = argv[i];
554                 }
555                 else if(!strcmp(argv[i], "-nf")) {
556                         if(++i < argc) normfgcolor = argv[i];
557                 }
558                 else if(!strcmp(argv[i], "-p")) {
559                         if(++i < argc) prompt = argv[i];
560                 }
561                 else if(!strcmp(argv[i], "-sb")) {
562                         if(++i < argc) selbgcolor = argv[i];
563                 }
564                 else if(!strcmp(argv[i], "-sf")) {
565                         if(++i < argc) selfgcolor = argv[i];
566                 }
567                 else if(!strcmp(argv[i], "-v"))
568                         eprint("dmenu-"VERSION", © 2006-2010 dmenu engineers, see LICENSE for details\n");
569                 else
570                         eprint("usage: dmenu [-i] [-b] [-e <xid>] [-l <lines>] [-fn <font>] [-nb <color>]\n"
571                                "             [-nf <color>] [-p <prompt>] [-sb <color>] [-sf <color>] [-v]\n");
572         if(!setlocale(LC_CTYPE, "") || !XSupportsLocale())
573                 fprintf(stderr, "dmenu: warning: no locale support\n");
574         if(!(dpy = XOpenDisplay(NULL)))
575                 eprint("dmenu: cannot open display\n");
576         screen = DefaultScreen(dpy);
577         if(!parent)
578                 parent = RootWindow(dpy, screen);
579
580         readstdin();
581         running = grabkeyboard();
582
583         setup(topbar);
584         drawmenu();
585         XSync(dpy, False);
586         run();
587         cleanup();
588         XCloseDisplay(dpy);
589         return ret;
590 }