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