Xinqi Bao's Git

die() on calloc failure
[dmenu.git] / dmenu.c
1 /* See LICENSE file for copyright and license details. */
2 #include <ctype.h>
3 #include <locale.h>
4 #include <stdio.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <strings.h>
8 #include <time.h>
9
10 #include <X11/Xlib.h>
11 #include <X11/Xatom.h>
12 #include <X11/Xutil.h>
13 #ifdef XINERAMA
14 #include <X11/extensions/Xinerama.h>
15 #endif
16 #include <X11/Xft/Xft.h>
17
18 #include "drw.h"
19 #include "util.h"
20
21 /* macros */
22 #define INTERSECT(x,y,w,h,r) (MAX(0, MIN((x)+(w),(r).x_org+(r).width) - MAX((x),(r).x_org)) \
23 * MAX(0, MIN((y)+(h),(r).y_org+(r).height) - MAX((y),(r).y_org)))
24 #define LENGTH(X) (sizeof X / sizeof X[0])
25 #define TEXTW(X) (drw_fontset_getwidth(drw, (X)) + lrpad)
26
27 /* enums */
28 enum { SchemeNorm, SchemeSel, SchemeOut, SchemeLast }; /* color schemes */
29
30 struct item {
31 char *text;
32 struct item *left, *right;
33 int out;
34 };
35
36 static char text[BUFSIZ] = "";
37 static char *embed;
38 static int bh, mw, mh;
39 static int inputw = 0, promptw;
40 static int lrpad; /* sum of left and right padding */
41 static size_t cursor;
42 static struct item *items = NULL;
43 static struct item *matches, *matchend;
44 static struct item *prev, *curr, *next, *sel;
45 static int mon = -1, screen;
46
47 static Atom clip, utf8;
48 static Display *dpy;
49 static Window root, parentwin, win;
50 static XIC xic;
51
52 static Drw *drw;
53 static Clr *scheme[SchemeLast];
54
55 #include "config.h"
56
57 static int (*fstrncmp)(const char *, const char *, size_t) = strncmp;
58 static char *(*fstrstr)(const char *, const char *) = strstr;
59
60 static void
61 appenditem(struct item *item, struct item **list, struct item **last)
62 {
63 if (*last)
64 (*last)->right = item;
65 else
66 *list = item;
67
68 item->left = *last;
69 item->right = NULL;
70 *last = item;
71 }
72
73 static void
74 calcoffsets(void)
75 {
76 int i, n;
77
78 if (lines > 0)
79 n = lines * bh;
80 else
81 n = mw - (promptw + inputw + TEXTW("<") + TEXTW(">"));
82 /* calculate which items will begin the next page and previous page */
83 for (i = 0, next = curr; next; next = next->right)
84 if ((i += (lines > 0) ? bh : MIN(TEXTW(next->text), n)) > n)
85 break;
86 for (i = 0, prev = curr; prev && prev->left; prev = prev->left)
87 if ((i += (lines > 0) ? bh : MIN(TEXTW(prev->left->text), n)) > n)
88 break;
89 }
90
91 static void
92 cleanup(void)
93 {
94 size_t i;
95
96 XUngrabKey(dpy, AnyKey, AnyModifier, root);
97 for (i = 0; i < SchemeLast; i++)
98 free(scheme[i]);
99 drw_free(drw);
100 XSync(dpy, False);
101 XCloseDisplay(dpy);
102 }
103
104 static char *
105 cistrstr(const char *s, const char *sub)
106 {
107 size_t len;
108
109 for (len = strlen(sub); *s; s++)
110 if (!strncasecmp(s, sub, len))
111 return (char *)s;
112 return NULL;
113 }
114
115 static int
116 drawitem(struct item *item, int x, int y, int w)
117 {
118 if (item == sel)
119 drw_setscheme(drw, scheme[SchemeSel]);
120 else if (item->out)
121 drw_setscheme(drw, scheme[SchemeOut]);
122 else
123 drw_setscheme(drw, scheme[SchemeNorm]);
124
125 return drw_text(drw, x, y, w, bh, lrpad / 2, item->text, 0);
126 }
127
128 static void
129 drawmenu(void)
130 {
131 unsigned int curpos;
132 struct item *item;
133 int x = 0, y = 0, w;
134
135 drw_setscheme(drw, scheme[SchemeNorm]);
136 drw_rect(drw, 0, 0, mw, mh, 1, 1);
137
138 if (prompt && *prompt) {
139 drw_setscheme(drw, scheme[SchemeSel]);
140 x = drw_text(drw, x, 0, promptw, bh, lrpad / 2, prompt, 0);
141 }
142 /* draw input field */
143 w = (lines > 0 || !matches) ? mw - x : inputw;
144 drw_setscheme(drw, scheme[SchemeNorm]);
145 drw_text(drw, x, 0, w, bh, lrpad / 2, text, 0);
146
147 drw_font_getexts(drw->fonts, text, cursor, &curpos, NULL);
148 if ((curpos += lrpad / 2 - 1) < w) {
149 drw_setscheme(drw, scheme[SchemeNorm]);
150 drw_rect(drw, x + curpos, 2, 2, bh - 4, 1, 0);
151 }
152
153 if (lines > 0) {
154 /* draw vertical list */
155 for (item = curr; item != next; item = item->right)
156 drawitem(item, x, y += bh, mw - x);
157 } else if (matches) {
158 /* draw horizontal list */
159 x += inputw;
160 w = TEXTW("<");
161 if (curr->left) {
162 drw_setscheme(drw, scheme[SchemeNorm]);
163 drw_text(drw, x, 0, w, bh, lrpad / 2, "<", 0);
164 }
165 x += w;
166 for (item = curr; item != next; item = item->right)
167 x = drawitem(item, x, 0, MIN(TEXTW(item->text), mw - x - TEXTW(">")));
168 if (next) {
169 w = TEXTW(">");
170 drw_setscheme(drw, scheme[SchemeNorm]);
171 drw_text(drw, mw - w, 0, w, bh, lrpad / 2, ">", 0);
172 }
173 }
174 drw_map(drw, win, 0, 0, mw, mh);
175 }
176
177 static void
178 grabfocus(void)
179 {
180 struct timespec ts = { .tv_sec = 0, .tv_nsec = 10000000 };
181 Window focuswin;
182 int i, revertwin;
183
184 for (i = 0; i < 100; ++i) {
185 XGetInputFocus(dpy, &focuswin, &revertwin);
186 if (focuswin == win)
187 return;
188 XSetInputFocus(dpy, win, RevertToParent, CurrentTime);
189 nanosleep(&ts, NULL);
190 }
191 die("cannot grab focus");
192 }
193
194 static void
195 grabkeyboard(void)
196 {
197 struct timespec ts = { .tv_sec = 0, .tv_nsec = 1000000 };
198 int i;
199
200 if (embed)
201 return;
202 /* try to grab keyboard, we may have to wait for another process to ungrab */
203 for (i = 0; i < 1000; i++) {
204 if (XGrabKeyboard(dpy, DefaultRootWindow(dpy), True, GrabModeAsync,
205 GrabModeAsync, CurrentTime) == GrabSuccess)
206 return;
207 nanosleep(&ts, NULL);
208 }
209 die("cannot grab keyboard");
210 }
211
212 static void
213 match(void)
214 {
215 static char **tokv = NULL;
216 static int tokn = 0;
217
218 char buf[sizeof text], *s;
219 int i, tokc = 0;
220 size_t len, textsize;
221 struct item *item, *lprefix, *lsubstr, *prefixend, *substrend;
222
223 strcpy(buf, text);
224 /* separate input text into tokens to be matched individually */
225 for (s = strtok(buf, " "); s; tokv[tokc - 1] = s, s = strtok(NULL, " "))
226 if (++tokc > tokn && !(tokv = realloc(tokv, ++tokn * sizeof *tokv)))
227 die("cannot realloc %u bytes:", tokn * sizeof *tokv);
228 len = tokc ? strlen(tokv[0]) : 0;
229
230 matches = lprefix = lsubstr = matchend = prefixend = substrend = NULL;
231 textsize = strlen(text);
232 for (item = items; item && item->text; item++) {
233 for (i = 0; i < tokc; i++)
234 if (!fstrstr(item->text, tokv[i]))
235 break;
236 if (i != tokc) /* not all tokens match */
237 continue;
238 /* exact matches go first, then prefixes, then substrings */
239 if (!tokc || !fstrncmp(text, item->text, textsize))
240 appenditem(item, &matches, &matchend);
241 else if (!fstrncmp(tokv[0], item->text, len))
242 appenditem(item, &lprefix, &prefixend);
243 else
244 appenditem(item, &lsubstr, &substrend);
245 }
246 if (lprefix) {
247 if (matches) {
248 matchend->right = lprefix;
249 lprefix->left = matchend;
250 } else
251 matches = lprefix;
252 matchend = prefixend;
253 }
254 if (lsubstr) {
255 if (matches) {
256 matchend->right = lsubstr;
257 lsubstr->left = matchend;
258 } else
259 matches = lsubstr;
260 matchend = substrend;
261 }
262 curr = sel = matches;
263 calcoffsets();
264 }
265
266 static void
267 insert(const char *str, ssize_t n)
268 {
269 if (strlen(text) + n > sizeof text - 1)
270 return;
271 /* move existing text out of the way, insert new text, and update cursor */
272 memmove(&text[cursor + n], &text[cursor], sizeof text - cursor - MAX(n, 0));
273 if (n > 0)
274 memcpy(&text[cursor], str, n);
275 cursor += n;
276 match();
277 }
278
279 static size_t
280 nextrune(int inc)
281 {
282 ssize_t n;
283
284 /* return location of next utf8 rune in the given direction (+1 or -1) */
285 for (n = cursor + inc; n + inc >= 0 && (text[n] & 0xc0) == 0x80; n += inc)
286 ;
287 return n;
288 }
289
290 static void
291 keypress(XKeyEvent *ev)
292 {
293 char buf[32];
294 int len;
295 KeySym ksym = NoSymbol;
296 Status status;
297
298 len = XmbLookupString(xic, ev, buf, sizeof buf, &ksym, &status);
299 if (status == XBufferOverflow)
300 return;
301 if (ev->state & ControlMask)
302 switch(ksym) {
303 case XK_a: ksym = XK_Home; break;
304 case XK_b: ksym = XK_Left; break;
305 case XK_c: ksym = XK_Escape; break;
306 case XK_d: ksym = XK_Delete; break;
307 case XK_e: ksym = XK_End; break;
308 case XK_f: ksym = XK_Right; break;
309 case XK_g: ksym = XK_Escape; break;
310 case XK_h: ksym = XK_BackSpace; break;
311 case XK_i: ksym = XK_Tab; break;
312 case XK_j: /* fallthrough */
313 case XK_J: /* fallthrough */
314 case XK_m: /* fallthrough */
315 case XK_M: ksym = XK_Return; ev->state &= ~ControlMask; break;
316 case XK_n: ksym = XK_Down; break;
317 case XK_p: ksym = XK_Up; break;
318
319 case XK_k: /* delete right */
320 text[cursor] = '\0';
321 match();
322 break;
323 case XK_u: /* delete left */
324 insert(NULL, 0 - cursor);
325 break;
326 case XK_w: /* delete word */
327 while (cursor > 0 && strchr(worddelimiters, text[nextrune(-1)]))
328 insert(NULL, nextrune(-1) - cursor);
329 while (cursor > 0 && !strchr(worddelimiters, text[nextrune(-1)]))
330 insert(NULL, nextrune(-1) - cursor);
331 break;
332 case XK_y: /* paste selection */
333 case XK_Y:
334 XConvertSelection(dpy, (ev->state & ShiftMask) ? clip : XA_PRIMARY,
335 utf8, utf8, win, CurrentTime);
336 return;
337 case XK_Return:
338 case XK_KP_Enter:
339 break;
340 case XK_bracketleft:
341 cleanup();
342 exit(1);
343 default:
344 return;
345 }
346 else if (ev->state & Mod1Mask)
347 switch(ksym) {
348 case XK_g: ksym = XK_Home; break;
349 case XK_G: ksym = XK_End; break;
350 case XK_h: ksym = XK_Up; break;
351 case XK_j: ksym = XK_Next; break;
352 case XK_k: ksym = XK_Prior; break;
353 case XK_l: ksym = XK_Down; break;
354 default:
355 return;
356 }
357 switch(ksym) {
358 default:
359 if (!iscntrl(*buf))
360 insert(buf, len);
361 break;
362 case XK_Delete:
363 if (text[cursor] == '\0')
364 return;
365 cursor = nextrune(+1);
366 /* fallthrough */
367 case XK_BackSpace:
368 if (cursor == 0)
369 return;
370 insert(NULL, nextrune(-1) - cursor);
371 break;
372 case XK_End:
373 if (text[cursor] != '\0') {
374 cursor = strlen(text);
375 break;
376 }
377 if (next) {
378 /* jump to end of list and position items in reverse */
379 curr = matchend;
380 calcoffsets();
381 curr = prev;
382 calcoffsets();
383 while (next && (curr = curr->right))
384 calcoffsets();
385 }
386 sel = matchend;
387 break;
388 case XK_Escape:
389 cleanup();
390 exit(1);
391 case XK_Home:
392 if (sel == matches) {
393 cursor = 0;
394 break;
395 }
396 sel = curr = matches;
397 calcoffsets();
398 break;
399 case XK_Left:
400 if (cursor > 0 && (!sel || !sel->left || lines > 0)) {
401 cursor = nextrune(-1);
402 break;
403 }
404 if (lines > 0)
405 return;
406 /* fallthrough */
407 case XK_Up:
408 if (sel && sel->left && (sel = sel->left)->right == curr) {
409 curr = prev;
410 calcoffsets();
411 }
412 break;
413 case XK_Next:
414 if (!next)
415 return;
416 sel = curr = next;
417 calcoffsets();
418 break;
419 case XK_Prior:
420 if (!prev)
421 return;
422 sel = curr = prev;
423 calcoffsets();
424 break;
425 case XK_Return:
426 case XK_KP_Enter:
427 puts((sel && !(ev->state & ShiftMask)) ? sel->text : text);
428 if (!(ev->state & ControlMask)) {
429 cleanup();
430 exit(0);
431 }
432 if (sel)
433 sel->out = 1;
434 break;
435 case XK_Right:
436 if (text[cursor] != '\0') {
437 cursor = nextrune(+1);
438 break;
439 }
440 if (lines > 0)
441 return;
442 /* fallthrough */
443 case XK_Down:
444 if (sel && sel->right && (sel = sel->right) == next) {
445 curr = next;
446 calcoffsets();
447 }
448 break;
449 case XK_Tab:
450 if (!sel)
451 return;
452 strncpy(text, sel->text, sizeof text - 1);
453 text[sizeof text - 1] = '\0';
454 cursor = strlen(text);
455 match();
456 break;
457 }
458 drawmenu();
459 }
460
461 static void
462 paste(void)
463 {
464 char *p, *q;
465 int di;
466 unsigned long dl;
467 Atom da;
468
469 /* we have been given the current selection, now insert it into input */
470 XGetWindowProperty(dpy, win, utf8, 0, (sizeof text / 4) + 1, False,
471 utf8, &da, &di, &dl, &dl, (unsigned char **)&p);
472 insert(p, (q = strchr(p, '\n')) ? q - p : (ssize_t)strlen(p));
473 XFree(p);
474 drawmenu();
475 }
476
477 static void
478 readstdin(void)
479 {
480 char buf[sizeof text], *p;
481 size_t i, imax = 0, size = 0;
482 unsigned int tmpmax = 0;
483
484 /* read each line from stdin and add it to the item list */
485 for (i = 0; fgets(buf, sizeof buf, stdin); i++) {
486 if (i + 1 >= size / sizeof *items)
487 if (!(items = realloc(items, (size += BUFSIZ))))
488 die("cannot realloc %u bytes:", size);
489 if ((p = strchr(buf, '\n')))
490 *p = '\0';
491 if (!(items[i].text = strdup(buf)))
492 die("cannot strdup %u bytes:", strlen(buf) + 1);
493 items[i].out = 0;
494 drw_font_getexts(drw->fonts, buf, strlen(buf), &tmpmax, NULL);
495 if (tmpmax > inputw) {
496 inputw = tmpmax;
497 imax = i;
498 }
499 }
500 if (items)
501 items[i].text = NULL;
502 inputw = items ? TEXTW(items[imax].text) : 0;
503 lines = MIN(lines, i);
504 }
505
506 static void
507 run(void)
508 {
509 XEvent ev;
510
511 while (!XNextEvent(dpy, &ev)) {
512 if (XFilterEvent(&ev, win))
513 continue;
514 switch(ev.type) {
515 case Expose:
516 if (ev.xexpose.count == 0)
517 drw_map(drw, win, 0, 0, mw, mh);
518 break;
519 case FocusIn:
520 /* regrab focus from parent window */
521 if (ev.xfocus.window != win)
522 grabfocus();
523 break;
524 case KeyPress:
525 keypress(&ev.xkey);
526 break;
527 case SelectionNotify:
528 if (ev.xselection.property == utf8)
529 paste();
530 break;
531 case VisibilityNotify:
532 if (ev.xvisibility.state != VisibilityUnobscured)
533 XRaiseWindow(dpy, win);
534 break;
535 }
536 }
537 }
538
539 static void
540 setup(void)
541 {
542 int x, y;
543 XSetWindowAttributes swa;
544 XIM xim;
545 #ifdef XINERAMA
546 XineramaScreenInfo *info;
547 Window w, pw, dw, *dws;
548 XWindowAttributes wa;
549 int a, j, di, n, i = 0, area = 0;
550 unsigned int du;
551 #endif
552
553 /* init appearance */
554 scheme[SchemeNorm] = drw_scm_create(drw, colors[SchemeNorm], 2);
555 scheme[SchemeSel] = drw_scm_create(drw, colors[SchemeSel], 2);
556 scheme[SchemeOut] = drw_scm_create(drw, colors[SchemeOut], 2);
557
558 clip = XInternAtom(dpy, "CLIPBOARD", False);
559 utf8 = XInternAtom(dpy, "UTF8_STRING", False);
560
561 /* calculate menu geometry */
562 bh = drw->fonts->h + 2;
563 lines = MAX(lines, 0);
564 mh = (lines + 1) * bh;
565 #ifdef XINERAMA
566 if (parentwin == root && (info = XineramaQueryScreens(dpy, &n))) {
567 XGetInputFocus(dpy, &w, &di);
568 if (mon >= 0 && mon < n)
569 i = mon;
570 else if (w != root && w != PointerRoot && w != None) {
571 /* find top-level window containing current input focus */
572 do {
573 if (XQueryTree(dpy, (pw = w), &dw, &w, &dws, &du) && dws)
574 XFree(dws);
575 } while (w != root && w != pw);
576 /* find xinerama screen with which the window intersects most */
577 if (XGetWindowAttributes(dpy, pw, &wa))
578 for (j = 0; j < n; j++)
579 if ((a = INTERSECT(wa.x, wa.y, wa.width, wa.height, info[j])) > area) {
580 area = a;
581 i = j;
582 }
583 }
584 /* no focused window is on screen, so use pointer location instead */
585 if (mon < 0 && !area && XQueryPointer(dpy, root, &dw, &dw, &x, &y, &di, &di, &du))
586 for (i = 0; i < n; i++)
587 if (INTERSECT(x, y, 1, 1, info[i]))
588 break;
589
590 x = info[i].x_org;
591 y = info[i].y_org + (topbar ? 0 : info[i].height - mh);
592 mw = info[i].width;
593 XFree(info);
594 } else
595 #endif
596 {
597 if (!XGetWindowAttributes(dpy, parentwin, &wa))
598 die("could not get embedding window attributes: 0x%lx",
599 parentwin);
600 x = 0;
601 y = topbar ? 0 : wa.height - mh;
602 mw = wa.width;
603 }
604 promptw = (prompt && *prompt) ? TEXTW(prompt) - lrpad / 4 : 0;
605 inputw = MIN(inputw, mw/3);
606 match();
607
608 /* create menu window */
609 swa.override_redirect = True;
610 swa.background_pixel = scheme[SchemeNorm][ColBg].pixel;
611 swa.event_mask = ExposureMask | KeyPressMask | VisibilityChangeMask;
612 win = XCreateWindow(dpy, parentwin, x, y, mw, mh, 0,
613 CopyFromParent, CopyFromParent, CopyFromParent,
614 CWOverrideRedirect | CWBackPixel | CWEventMask, &swa);
615
616 /* open input methods */
617 xim = XOpenIM(dpy, NULL, NULL, NULL);
618 xic = XCreateIC(xim, XNInputStyle, XIMPreeditNothing | XIMStatusNothing,
619 XNClientWindow, win, XNFocusWindow, win, NULL);
620
621 XMapRaised(dpy, win);
622 if (embed) {
623 XSelectInput(dpy, parentwin, FocusChangeMask);
624 if (XQueryTree(dpy, parentwin, &dw, &w, &dws, &du) && dws) {
625 for (i = 0; i < du && dws[i] != win; ++i)
626 XSelectInput(dpy, dws[i], FocusChangeMask);
627 XFree(dws);
628 }
629 grabfocus();
630 }
631 drw_resize(drw, mw, mh);
632 drawmenu();
633 }
634
635 static void
636 usage(void)
637 {
638 fputs("usage: dmenu [-bfiv] [-l lines] [-p prompt] [-fn font] [-m monitor]\n"
639 " [-nb color] [-nf color] [-sb color] [-sf color] [-w windowid]\n", stderr);
640 exit(1);
641 }
642
643 int
644 main(int argc, char *argv[])
645 {
646 XWindowAttributes wa;
647 int i, fast = 0;
648
649 for (i = 1; i < argc; i++)
650 /* these options take no arguments */
651 if (!strcmp(argv[i], "-v")) { /* prints version information */
652 puts("dmenu-"VERSION);
653 exit(0);
654 } else if (!strcmp(argv[i], "-b")) /* appears at the bottom of the screen */
655 topbar = 0;
656 else if (!strcmp(argv[i], "-f")) /* grabs keyboard before reading stdin */
657 fast = 1;
658 else if (!strcmp(argv[i], "-i")) { /* case-insensitive item matching */
659 fstrncmp = strncasecmp;
660 fstrstr = cistrstr;
661 } else if (i + 1 == argc)
662 usage();
663 /* these options take one argument */
664 else if (!strcmp(argv[i], "-l")) /* number of lines in vertical list */
665 lines = atoi(argv[++i]);
666 else if (!strcmp(argv[i], "-m"))
667 mon = atoi(argv[++i]);
668 else if (!strcmp(argv[i], "-p")) /* adds prompt to left of input field */
669 prompt = argv[++i];
670 else if (!strcmp(argv[i], "-fn")) /* font or font set */
671 fonts[0] = argv[++i];
672 else if (!strcmp(argv[i], "-nb")) /* normal background color */
673 colors[SchemeNorm][ColBg] = argv[++i];
674 else if (!strcmp(argv[i], "-nf")) /* normal foreground color */
675 colors[SchemeNorm][ColFg] = argv[++i];
676 else if (!strcmp(argv[i], "-sb")) /* selected background color */
677 colors[SchemeSel][ColBg] = argv[++i];
678 else if (!strcmp(argv[i], "-sf")) /* selected foreground color */
679 colors[SchemeSel][ColFg] = argv[++i];
680 else if (!strcmp(argv[i], "-w")) /* embedding window id */
681 embed = argv[++i];
682 else
683 usage();
684
685 if (!setlocale(LC_CTYPE, "") || !XSupportsLocale())
686 fputs("warning: no locale support\n", stderr);
687 if (!(dpy = XOpenDisplay(NULL)))
688 die("cannot open display");
689 screen = DefaultScreen(dpy);
690 root = RootWindow(dpy, screen);
691 if (!embed || !(parentwin = strtol(embed, NULL, 0)))
692 parentwin = root;
693 if (!XGetWindowAttributes(dpy, parentwin, &wa))
694 die("could not get embedding window attributes: 0x%lx",
695 parentwin);
696 drw = drw_create(dpy, screen, root, wa.width, wa.height);
697 if (!drw_fontset_create(drw, fonts, LENGTH(fonts)))
698 die("no fonts could be loaded.");
699 lrpad = drw->fonts->h;
700
701 if (fast) {
702 grabkeyboard();
703 readstdin();
704 } else {
705 readstdin();
706 grabkeyboard();
707 }
708 setup();
709 run();
710
711 return 1; /* unreachable */
712 }