add paste from clipboard
[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 <strings.h>
7 #include <unistd.h>
8 #include <X11/Xlib.h>
9 #include <X11/Xatom.h>
10 #include <X11/Xutil.h>
11 #ifdef XINERAMA
12 #include <X11/extensions/Xinerama.h>
13 #endif
14 #include "draw.h"
15
16 #define INTERSECT(x,y,w,h,r)  (MAX(0, MIN((x)+(w),(r).x_org+(r).width)  - MAX((x),(r).x_org)) \
17                              * MAX(0, MIN((y)+(h),(r).y_org+(r).height) - MAX((y),(r).y_org)))
18 #define MIN(a,b)              ((a) < (b) ? (a) : (b))
19 #define MAX(a,b)              ((a) > (b) ? (a) : (b))
20
21 typedef struct Item Item;
22 struct Item {
23         char *text;
24         Item *left, *right;
25 };
26
27 static void appenditem(Item *item, Item **list, Item **last);
28 static void calcoffsets(void);
29 static char *cistrstr(const char *s, const char *sub);
30 static void drawmenu(void);
31 static void grabkeyboard(void);
32 static void insert(const char *str, ssize_t n);
33 static void keypress(XKeyEvent *ev);
34 static void match(void);
35 static size_t nextrune(int inc);
36 static void paste(void);
37 static void readstdin(void);
38 static void run(void);
39 static void setup(void);
40 static void usage(void);
41
42 static char text[BUFSIZ] = "";
43 static int bh, mw, mh;
44 static int inputw, promptw;
45 static size_t cursor = 0;
46 static const char *font = NULL;
47 static const char *prompt = NULL;
48 static const char *normbgcolor = "#cccccc";
49 static const char *normfgcolor = "#000000";
50 static const char *selbgcolor  = "#0066ff";
51 static const char *selfgcolor  = "#ffffff";
52 static unsigned int lines = 0;
53 static unsigned long normcol[ColLast];
54 static unsigned long selcol[ColLast];
55 static Atom clip, utf8;
56 static Bool topbar = True;
57 static DC *dc;
58 static Item *items = NULL;
59 static Item *matches, *matchend;
60 static Item *prev, *curr, *next, *sel;
61 static Window win;
62 static XIC xic;
63
64 static int (*fstrncmp)(const char *, const char *, size_t) = strncmp;
65 static char *(*fstrstr)(const char *, const char *) = strstr;
66
67 int
68 main(int argc, char *argv[]) {
69         Bool fast = False;
70         int i;
71
72         for(i = 1; i < argc; i++)
73                 /* these options take no arguments */
74                 if(!strcmp(argv[i], "-v")) {      /* prints version information */
75                         puts("dmenu-"VERSION", © 2006-2011 dmenu engineers, see LICENSE for details");
76                         exit(EXIT_SUCCESS);
77                 }
78                 else if(!strcmp(argv[i], "-b"))   /* appears at the bottom of the screen */
79                         topbar = False;
80                 else if(!strcmp(argv[i], "-f"))   /* grabs keyboard before reading stdin */
81                         fast = True;
82                 else if(!strcmp(argv[i], "-i")) { /* case-insensitive item matching */
83                         fstrncmp = strncasecmp;
84                         fstrstr = cistrstr;
85                 }
86                 else if(i+1 == argc)
87                         usage();
88                 /* these options take one argument */
89                 else if(!strcmp(argv[i], "-l"))   /* number of lines in vertical list */
90                         lines = atoi(argv[++i]);
91                 else if(!strcmp(argv[i], "-p"))   /* adds prompt to left of input field */
92                         prompt = argv[++i];
93                 else if(!strcmp(argv[i], "-fn"))  /* font or font set */
94                         font = argv[++i];
95                 else if(!strcmp(argv[i], "-nb"))  /* normal background color */
96                         normbgcolor = argv[++i];
97                 else if(!strcmp(argv[i], "-nf"))  /* normal foreground color */
98                         normfgcolor = argv[++i];
99                 else if(!strcmp(argv[i], "-sb"))  /* selected background color */
100                         selbgcolor = argv[++i];
101                 else if(!strcmp(argv[i], "-sf"))  /* selected foreground color */
102                         selfgcolor = argv[++i];
103                 else
104                         usage();
105
106         dc = initdc();
107         initfont(dc, font);
108
109         if(fast) {
110                 grabkeyboard();
111                 readstdin();
112         }
113         else {
114                 readstdin();
115                 grabkeyboard();
116         }
117         setup();
118         run();
119
120         return EXIT_FAILURE; /* unreachable */
121 }
122
123 void
124 appenditem(Item *item, Item **list, Item **last) {
125         if(*last)
126                 (*last)->right = item;
127         else
128                 *list = item;
129
130         item->left = *last;
131         item->right = NULL;
132         *last = item;
133 }
134
135 void
136 calcoffsets(void) {
137         int i, n;
138
139         if(lines > 0)
140                 n = lines * bh;
141         else
142                 n = mw - (promptw + inputw + textw(dc, "<") + textw(dc, ">"));
143         /* calculate which items will begin the next page and previous page */
144         for(i = 0, next = curr; next; next = next->right)
145                 if((i += (lines > 0) ? bh : MIN(textw(dc, next->text), n)) > n)
146                         break;
147         for(i = 0, prev = curr; prev && prev->left; prev = prev->left)
148                 if((i += (lines > 0) ? bh : MIN(textw(dc, prev->left->text), n)) > n)
149                         break;
150 }
151
152 char *
153 cistrstr(const char *s, const char *sub) {
154         size_t len;
155
156         for(len = strlen(sub); *s; s++)
157                 if(!strncasecmp(s, sub, len))
158                         return (char *)s;
159         return NULL;
160 }
161
162 void
163 drawmenu(void) {
164         int curpos;
165         Item *item;
166
167         dc->x = 0;
168         dc->y = 0;
169         dc->h = bh;
170         drawrect(dc, 0, 0, mw, mh, True, BG(dc, normcol));
171
172         if(prompt) {
173                 dc->w = promptw;
174                 drawtext(dc, prompt, selcol);
175                 dc->x = dc->w;
176         }
177         /* draw input field */
178         dc->w = (lines > 0 || !matches) ? mw - dc->x : inputw;
179         drawtext(dc, text, normcol);
180         if((curpos = textnw(dc, text, cursor) + dc->h/2 - 2) < dc->w)
181                 drawrect(dc, curpos, 2, 1, dc->h - 4, True, FG(dc, normcol));
182
183         if(lines > 0) {
184                 /* draw vertical list */
185                 dc->w = mw - dc->x;
186                 for(item = curr; item != next; item = item->right) {
187                         dc->y += dc->h;
188                         drawtext(dc, item->text, (item == sel) ? selcol : normcol);
189                 }
190         }
191         else if(matches) {
192                 /* draw horizontal list */
193                 dc->x += inputw;
194                 dc->w = textw(dc, "<");
195                 if(curr->left)
196                         drawtext(dc, "<", normcol);
197                 for(item = curr; item != next; item = item->right) {
198                         dc->x += dc->w;
199                         dc->w = MIN(textw(dc, item->text), mw - dc->x - textw(dc, ">"));
200                         drawtext(dc, item->text, (item == sel) ? selcol : normcol);
201                 }
202                 dc->w = textw(dc, ">");
203                 dc->x = mw - dc->w;
204                 if(next)
205                         drawtext(dc, ">", normcol);
206         }
207         mapdc(dc, win, mw, mh);
208 }
209
210 void
211 grabkeyboard(void) {
212         int i;
213
214         /* try to grab keyboard, we may have to wait for another process to ungrab */
215         for(i = 0; i < 1000; i++) {
216                 if(XGrabKeyboard(dc->dpy, DefaultRootWindow(dc->dpy), True,
217                                  GrabModeAsync, GrabModeAsync, CurrentTime) == GrabSuccess)
218                         return;
219                 usleep(1000);
220         }
221         eprintf("cannot grab keyboard\n");
222 }
223
224 void
225 insert(const char *str, ssize_t n) {
226         if(strlen(text) + n > sizeof text - 1)
227                 return;
228         /* move existing text out of the way, insert new text, and update cursor */
229         memmove(&text[cursor + n], &text[cursor], sizeof text - cursor - MAX(n, 0));
230         if(n > 0)
231                 memcpy(&text[cursor], str, n);
232         cursor += n;
233         match();
234 }
235
236 void
237 keypress(XKeyEvent *ev) {
238         char buf[32];
239         int len;
240         KeySym ksym = NoSymbol;
241         Status status;
242
243         len = XmbLookupString(xic, ev, buf, sizeof buf, &ksym, &status);
244         if(status == XBufferOverflow)
245                 return;
246         if(ev->state & ControlMask) {
247                 KeySym lower, upper;
248
249                 XConvertCase(ksym, &lower, &upper);
250                 switch(lower) {
251                 case XK_a: ksym = XK_Home;      break;
252                 case XK_b: ksym = XK_Left;      break;
253                 case XK_c: ksym = XK_Escape;    break;
254                 case XK_d: ksym = XK_Delete;    break;
255                 case XK_e: ksym = XK_End;       break;
256                 case XK_f: ksym = XK_Right;     break;
257                 case XK_h: ksym = XK_BackSpace; break;
258                 case XK_i: ksym = XK_Tab;       break;
259                 case XK_j: ksym = XK_Return;    break;
260                 case XK_m: ksym = XK_Return;    break;
261                 case XK_n: ksym = XK_Up;        break;
262                 case XK_p: ksym = XK_Down;      break;
263
264                 case XK_k: /* delete right */
265                         text[cursor] = '\0';
266                         match();
267                         break;
268                 case XK_u: /* delete left */
269                         insert(NULL, 0 - cursor);
270                         break;
271                 case XK_w: /* delete word */
272                         while(cursor > 0 && text[nextrune(-1)] == ' ')
273                                 insert(NULL, nextrune(-1) - cursor);
274                         while(cursor > 0 && text[nextrune(-1)] != ' ')
275                                 insert(NULL, nextrune(-1) - cursor);
276                         break;
277                 case XK_y: /* paste selection */
278                         XConvertSelection(dc->dpy, (ev->state & ShiftMask) ? clip : XA_PRIMARY,
279                                           utf8, utf8, win, CurrentTime);
280                         return;
281                 default:
282                         return;
283                 }
284         }
285         switch(ksym) {
286         default:
287                 if(!iscntrl(*buf))
288                         insert(buf, len);
289                 break;
290         case XK_Delete:
291                 if(text[cursor] == '\0')
292                         return;
293                 cursor = nextrune(+1);
294                 /* fallthrough */
295         case XK_BackSpace:
296                 if(cursor == 0)
297                         return;
298                 insert(NULL, nextrune(-1) - cursor);
299                 break;
300         case XK_End:
301                 if(text[cursor] != '\0') {
302                         cursor = strlen(text);
303                         break;
304                 }
305                 if(next) {
306                         /* jump to end of list and position items in reverse */
307                         curr = matchend;
308                         calcoffsets();
309                         curr = prev;
310                         calcoffsets();
311                         while(next && (curr = curr->right))
312                                 calcoffsets();
313                 }
314                 sel = matchend;
315                 break;
316         case XK_Escape:
317                 exit(EXIT_FAILURE);
318         case XK_Home:
319                 if(sel == matches) {
320                         cursor = 0;
321                         break;
322                 }
323                 sel = curr = matches;
324                 calcoffsets();
325                 break;
326         case XK_Left:
327                 if(cursor > 0 && (!sel || !sel->left || lines > 0)) {
328                         cursor = nextrune(-1);
329                         break;
330                 }
331                 /* fallthrough */
332         case XK_Up:
333                 if(sel && sel->left && (sel = sel->left)->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         case XK_KP_Enter:
352                 puts((sel && !(ev->state & ShiftMask)) ? sel->text : text);
353                 exit(EXIT_SUCCESS);
354         case XK_Right:
355                 if(text[cursor] != '\0') {
356                         cursor = nextrune(+1);
357                         break;
358                 }
359                 /* fallthrough */
360         case XK_Down:
361                 if(sel && sel->right && (sel = sel->right) == next) {
362                         curr = next;
363                         calcoffsets();
364                 }
365                 break;
366         case XK_Tab:
367                 if(!sel)
368                         return;
369                 strncpy(text, sel->text, sizeof text);
370                 cursor = strlen(text);
371                 match();
372                 break;
373         }
374         drawmenu();
375 }
376
377 void
378 match(void) {
379         static char **tokv = NULL;
380         static int tokn = 0;
381
382         char buf[sizeof text], *s;
383         int i, tokc = 0;
384         size_t len;
385         Item *item, *lprefix, *lsubstr, *prefixend, *substrend;
386
387         strcpy(buf, text);
388         /* separate input text into tokens to be matched individually */
389         for(s = strtok(buf, " "); s; tokv[tokc-1] = s, s = strtok(NULL, " "))
390                 if(++tokc > tokn && !(tokv = realloc(tokv, ++tokn * sizeof *tokv)))
391                         eprintf("cannot realloc %u bytes\n", tokn * sizeof *tokv);
392         len = tokc ? strlen(tokv[0]) : 0;
393
394         matches = lprefix = lsubstr = matchend = prefixend = substrend = NULL;
395         for(item = items; item && item->text; item++) {
396                 for(i = 0; i < tokc; i++)
397                         if(!fstrstr(item->text, tokv[i]))
398                                 break;
399                 if(i != tokc) /* not all tokens match */
400                         continue;
401                 /* exact matches go first, then prefixes, then substrings */
402                 if(!tokc || !fstrncmp(tokv[0], item->text, len+1))
403                         appenditem(item, &matches, &matchend);
404                 else if(!fstrncmp(tokv[0], item->text, len))
405                         appenditem(item, &lprefix, &prefixend);
406                 else
407                         appenditem(item, &lsubstr, &substrend);
408         }
409         if(lprefix) {
410                 if(matches) {
411                         matchend->right = lprefix;
412                         lprefix->left = matchend;
413                 }
414                 else
415                         matches = lprefix;
416                 matchend = prefixend;
417         }
418         if(lsubstr) {
419                 if(matches) {
420                         matchend->right = lsubstr;
421                         lsubstr->left = matchend;
422                 }
423                 else
424                         matches = lsubstr;
425                 matchend = substrend;
426         }
427         curr = sel = matches;
428         calcoffsets();
429 }
430
431 size_t
432 nextrune(int inc) {
433         ssize_t n;
434
435         /* return location of next utf8 rune in the given direction (+1 or -1) */
436         for(n = cursor + inc; n + inc >= 0 && (text[n] & 0xc0) == 0x80; n += inc);
437         return n;
438 }
439
440 void
441 paste(void) {
442         char *p, *q;
443         int di;
444         unsigned long dl;
445         Atom da;
446
447         /* we have been given the current selection, now insert it into input */
448         XGetWindowProperty(dc->dpy, win, utf8, 0, (sizeof text / 4) + 1, False,
449                            utf8, &da, &di, &dl, &dl, (unsigned char **)&p);
450         insert(p, (q = strchr(p, '\n')) ? q-p : (ssize_t)strlen(p));
451         XFree(p);
452         drawmenu();
453 }
454
455 void
456 readstdin(void) {
457         char buf[sizeof text], *p, *maxstr = NULL;
458         size_t i, max = 0, size = 0;
459
460         /* read each line from stdin and add it to the item list */
461         for(i = 0; fgets(buf, sizeof buf, stdin); i++) {
462                 if(i+1 >= size / sizeof *items)
463                         if(!(items = realloc(items, (size += BUFSIZ))))
464                                 eprintf("cannot realloc %u bytes:", size);
465                 if((p = strchr(buf, '\n')))
466                         *p = '\0';
467                 if(!(items[i].text = strdup(buf)))
468                         eprintf("cannot strdup %u bytes:", strlen(buf)+1);
469                 if(strlen(items[i].text) > max)
470                         max = strlen(maxstr = items[i].text);
471         }
472         if(items)
473                 items[i].text = NULL;
474         inputw = maxstr ? textw(dc, maxstr) : 0;
475         lines = MIN(lines, i);
476 }
477
478 void
479 run(void) {
480         XEvent ev;
481
482         while(!XNextEvent(dc->dpy, &ev)) {
483                 if(XFilterEvent(&ev, win))
484                         continue;
485                 switch(ev.type) {
486                 case Expose:
487                         if(ev.xexpose.count == 0)
488                                 mapdc(dc, win, mw, mh);
489                         break;
490                 case KeyPress:
491                         keypress(&ev.xkey);
492                         break;
493                 case SelectionNotify:
494                         if(ev.xselection.property == utf8)
495                                 paste();
496                         break;
497                 case VisibilityNotify:
498                         if(ev.xvisibility.state != VisibilityUnobscured)
499                                 XRaiseWindow(dc->dpy, win);
500                         break;
501                 }
502         }
503 }
504
505 void
506 setup(void) {
507         int x, y, screen = DefaultScreen(dc->dpy);
508         Window root = RootWindow(dc->dpy, screen);
509         XSetWindowAttributes swa;
510         XIM xim;
511 #ifdef XINERAMA
512         int n;
513         XineramaScreenInfo *info;
514 #endif
515
516         normcol[ColBG] = getcolor(dc, normbgcolor);
517         normcol[ColFG] = getcolor(dc, normfgcolor);
518         selcol[ColBG]  = getcolor(dc, selbgcolor);
519         selcol[ColFG]  = getcolor(dc, selfgcolor);
520
521         clip = XInternAtom(dc->dpy, "CLIPBOARD",   False);
522         utf8 = XInternAtom(dc->dpy, "UTF8_STRING", False);
523
524         /* calculate menu geometry */
525         bh = dc->font.height + 2;
526         lines = MAX(lines, 0);
527         mh = (lines + 1) * bh;
528 #ifdef XINERAMA
529         if((info = XineramaQueryScreens(dc->dpy, &n))) {
530                 int a, j, di, i = 0, area = 0;
531                 unsigned int du;
532                 Window w, pw, dw, *dws;
533                 XWindowAttributes wa;
534
535                 XGetInputFocus(dc->dpy, &w, &di);
536                 if(w != root && w != PointerRoot && w != None) {
537                         /* find top-level window containing current input focus */
538                         do {
539                                 if(XQueryTree(dc->dpy, (pw = w), &dw, &w, &dws, &du) && dws)
540                                         XFree(dws);
541                         } while(w != root && w != pw);
542                         /* find xinerama screen with which the window intersects most */
543                         if(XGetWindowAttributes(dc->dpy, pw, &wa))
544                                 for(j = 0; j < n; j++)
545                                         if((a = INTERSECT(wa.x, wa.y, wa.width, wa.height, info[j])) > area) {
546                                                 area = a;
547                                                 i = j;
548                                         }
549                 }
550                 /* no focused window is on screen, so use pointer location instead */
551                 if(!area && XQueryPointer(dc->dpy, root, &dw, &dw, &x, &y, &di, &di, &du))
552                         for(i = 0; i < n; i++)
553                                 if(INTERSECT(x, y, 1, 1, info[i]))
554                                         break;
555
556                 x = info[i].x_org;
557                 y = info[i].y_org + (topbar ? 0 : info[i].height - mh);
558                 mw = info[i].width;
559                 XFree(info);
560         }
561         else
562 #endif
563         {
564                 x = 0;
565                 y = topbar ? 0 : DisplayHeight(dc->dpy, screen) - mh;
566                 mw = DisplayWidth(dc->dpy, screen);
567         }
568         promptw = prompt ? textw(dc, prompt) : 0;
569         inputw = MIN(inputw, mw/3);
570         match();
571
572         /* create menu window */
573         swa.override_redirect = True;
574         swa.background_pixmap = ParentRelative;
575         swa.event_mask = ExposureMask | KeyPressMask | VisibilityChangeMask;
576         win = XCreateWindow(dc->dpy, root, x, y, mw, mh, 0,
577                             DefaultDepth(dc->dpy, screen), CopyFromParent,
578                             DefaultVisual(dc->dpy, screen),
579                             CWOverrideRedirect | CWBackPixmap | CWEventMask, &swa);
580
581         /* open input methods */
582         xim = XOpenIM(dc->dpy, NULL, NULL, NULL);
583         xic = XCreateIC(xim, XNInputStyle, XIMPreeditNothing | XIMStatusNothing,
584                         XNClientWindow, win, XNFocusWindow, win, NULL);
585
586         XMapRaised(dc->dpy, win);
587         resizedc(dc, mw, mh);
588         drawmenu();
589 }
590
591 void
592 usage(void) {
593         fputs("usage: dmenu [-b] [-f] [-i] [-l lines] [-p prompt] [-fn font]\n"
594               "             [-nb color] [-nf color] [-sb color] [-sf color] [-v]\n", stderr);
595         exit(EXIT_FAILURE);
596 }