Xinqi Bao's Git

Instantiate j var outside #ifdef XINEMARA directive because it is used in loop outsid...
[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) + 1;
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 if (XGetWindowProperty(dpy, win, utf8, 0, (sizeof text / 4) + 1, False,
471 utf8, &da, &di, &dl, &dl, (unsigned char **)&p)
472 == Success && p) {
473 insert(p, (q = strchr(p, '\n')) ? q - p : (ssize_t)strlen(p));
474 XFree(p);
475 }
476 drawmenu();
477 }
478
479 static void
480 readstdin(void)
481 {
482 char buf[sizeof text], *p;
483 size_t i, imax = 0, size = 0;
484 unsigned int tmpmax = 0;
485
486 /* read each line from stdin and add it to the item list */
487 for (i = 0; fgets(buf, sizeof buf, stdin); i++) {
488 if (i + 1 >= size / sizeof *items)
489 if (!(items = realloc(items, (size += BUFSIZ))))
490 die("cannot realloc %u bytes:", size);
491 if ((p = strchr(buf, '\n')))
492 *p = '\0';
493 if (!(items[i].text = strdup(buf)))
494 die("cannot strdup %u bytes:", strlen(buf) + 1);
495 items[i].out = 0;
496 drw_font_getexts(drw->fonts, buf, strlen(buf), &tmpmax, NULL);
497 if (tmpmax > inputw) {
498 inputw = tmpmax;
499 imax = i;
500 }
501 }
502 if (items)
503 items[i].text = NULL;
504 inputw = items ? TEXTW(items[imax].text) : 0;
505 lines = MIN(lines, i);
506 }
507
508 static void
509 run(void)
510 {
511 XEvent ev;
512
513 while (!XNextEvent(dpy, &ev)) {
514 if (XFilterEvent(&ev, win))
515 continue;
516 switch(ev.type) {
517 case Expose:
518 if (ev.xexpose.count == 0)
519 drw_map(drw, win, 0, 0, mw, mh);
520 break;
521 case FocusIn:
522 /* regrab focus from parent window */
523 if (ev.xfocus.window != win)
524 grabfocus();
525 break;
526 case KeyPress:
527 keypress(&ev.xkey);
528 break;
529 case SelectionNotify:
530 if (ev.xselection.property == utf8)
531 paste();
532 break;
533 case VisibilityNotify:
534 if (ev.xvisibility.state != VisibilityUnobscured)
535 XRaiseWindow(dpy, win);
536 break;
537 }
538 }
539 }
540
541 static void
542 setup(void)
543 {
544 int x, y, i, j = 0;
545 unsigned int du;
546 XSetWindowAttributes swa;
547 XIM xim;
548 Window w, dw, *dws;
549 XWindowAttributes wa;
550 XClassHint ch = {"dmenu", "dmenu"};
551 #ifdef XINERAMA
552 XineramaScreenInfo *info;
553 Window pw;
554 int a, di, n, area = 0;
555 #endif
556 /* init appearance */
557 for (j = 0; j < SchemeLast; j++)
558 scheme[j] = drw_scm_create(drw, colors[j], 2);
559
560 clip = XInternAtom(dpy, "CLIPBOARD", False);
561 utf8 = XInternAtom(dpy, "UTF8_STRING", False);
562
563 /* calculate menu geometry */
564 bh = drw->fonts->h + 2;
565 lines = MAX(lines, 0);
566 mh = (lines + 1) * bh;
567 #ifdef XINERAMA
568 if (parentwin == root && (info = XineramaQueryScreens(dpy, &n))) {
569 XGetInputFocus(dpy, &w, &di);
570 if (mon >= 0 && mon < n)
571 i = mon;
572 else if (w != root && w != PointerRoot && w != None) {
573 /* find top-level window containing current input focus */
574 do {
575 if (XQueryTree(dpy, (pw = w), &dw, &w, &dws, &du) && dws)
576 XFree(dws);
577 } while (w != root && w != pw);
578 /* find xinerama screen with which the window intersects most */
579 if (XGetWindowAttributes(dpy, pw, &wa))
580 for (j = 0; j < n; j++)
581 if ((a = INTERSECT(wa.x, wa.y, wa.width, wa.height, info[j])) > area) {
582 area = a;
583 i = j;
584 }
585 }
586 /* no focused window is on screen, so use pointer location instead */
587 if (mon < 0 && !area && XQueryPointer(dpy, root, &dw, &dw, &x, &y, &di, &di, &du))
588 for (i = 0; i < n; i++)
589 if (INTERSECT(x, y, 1, 1, info[i]))
590 break;
591
592 x = info[i].x_org;
593 y = info[i].y_org + (topbar ? 0 : info[i].height - mh);
594 mw = info[i].width;
595 XFree(info);
596 } else
597 #endif
598 {
599 if (!XGetWindowAttributes(dpy, parentwin, &wa))
600 die("could not get embedding window attributes: 0x%lx",
601 parentwin);
602 x = 0;
603 y = topbar ? 0 : wa.height - mh;
604 mw = wa.width;
605 }
606 promptw = (prompt && *prompt) ? TEXTW(prompt) - lrpad / 4 : 0;
607 inputw = MIN(inputw, mw/3);
608 match();
609
610 /* create menu window */
611 swa.override_redirect = True;
612 swa.background_pixel = scheme[SchemeNorm][ColBg].pixel;
613 swa.event_mask = ExposureMask | KeyPressMask | VisibilityChangeMask;
614 win = XCreateWindow(dpy, parentwin, x, y, mw, mh, 0,
615 CopyFromParent, CopyFromParent, CopyFromParent,
616 CWOverrideRedirect | CWBackPixel | CWEventMask, &swa);
617 XSetClassHint(dpy, win, &ch);
618
619 /* open input methods */
620 xim = XOpenIM(dpy, NULL, NULL, NULL);
621 xic = XCreateIC(xim, XNInputStyle, XIMPreeditNothing | XIMStatusNothing,
622 XNClientWindow, win, XNFocusWindow, win, NULL);
623
624 XMapRaised(dpy, win);
625 if (embed) {
626 XSelectInput(dpy, parentwin, FocusChangeMask);
627 if (XQueryTree(dpy, parentwin, &dw, &w, &dws, &du) && dws) {
628 for (i = 0; i < du && dws[i] != win; ++i)
629 XSelectInput(dpy, dws[i], FocusChangeMask);
630 XFree(dws);
631 }
632 grabfocus();
633 }
634 drw_resize(drw, mw, mh);
635 drawmenu();
636 }
637
638 static void
639 usage(void)
640 {
641 fputs("usage: dmenu [-bfiv] [-l lines] [-p prompt] [-fn font] [-m monitor]\n"
642 " [-nb color] [-nf color] [-sb color] [-sf color] [-w windowid]\n", stderr);
643 exit(1);
644 }
645
646 int
647 main(int argc, char *argv[])
648 {
649 XWindowAttributes wa;
650 int i, fast = 0;
651
652 for (i = 1; i < argc; i++)
653 /* these options take no arguments */
654 if (!strcmp(argv[i], "-v")) { /* prints version information */
655 puts("dmenu-"VERSION);
656 exit(0);
657 } else if (!strcmp(argv[i], "-b")) /* appears at the bottom of the screen */
658 topbar = 0;
659 else if (!strcmp(argv[i], "-f")) /* grabs keyboard before reading stdin */
660 fast = 1;
661 else if (!strcmp(argv[i], "-i")) { /* case-insensitive item matching */
662 fstrncmp = strncasecmp;
663 fstrstr = cistrstr;
664 } else if (i + 1 == argc)
665 usage();
666 /* these options take one argument */
667 else if (!strcmp(argv[i], "-l")) /* number of lines in vertical list */
668 lines = atoi(argv[++i]);
669 else if (!strcmp(argv[i], "-m"))
670 mon = atoi(argv[++i]);
671 else if (!strcmp(argv[i], "-p")) /* adds prompt to left of input field */
672 prompt = argv[++i];
673 else if (!strcmp(argv[i], "-fn")) /* font or font set */
674 fonts[0] = argv[++i];
675 else if (!strcmp(argv[i], "-nb")) /* normal background color */
676 colors[SchemeNorm][ColBg] = argv[++i];
677 else if (!strcmp(argv[i], "-nf")) /* normal foreground color */
678 colors[SchemeNorm][ColFg] = argv[++i];
679 else if (!strcmp(argv[i], "-sb")) /* selected background color */
680 colors[SchemeSel][ColBg] = argv[++i];
681 else if (!strcmp(argv[i], "-sf")) /* selected foreground color */
682 colors[SchemeSel][ColFg] = argv[++i];
683 else if (!strcmp(argv[i], "-w")) /* embedding window id */
684 embed = argv[++i];
685 else
686 usage();
687
688 if (!setlocale(LC_CTYPE, "") || !XSupportsLocale())
689 fputs("warning: no locale support\n", stderr);
690 if (!(dpy = XOpenDisplay(NULL)))
691 die("cannot open display");
692 screen = DefaultScreen(dpy);
693 root = RootWindow(dpy, screen);
694 if (!embed || !(parentwin = strtol(embed, NULL, 0)))
695 parentwin = root;
696 if (!XGetWindowAttributes(dpy, parentwin, &wa))
697 die("could not get embedding window attributes: 0x%lx",
698 parentwin);
699 drw = drw_create(dpy, screen, root, wa.width, wa.height);
700 if (!drw_fontset_create(drw, fonts, LENGTH(fonts)))
701 die("no fonts could be loaded.");
702 lrpad = drw->fonts->h;
703
704 if (fast) {
705 grabkeyboard();
706 readstdin();
707 } else {
708 readstdin();
709 grabkeyboard();
710 }
711 setup();
712 run();
713
714 return 1; /* unreachable */
715 }