Xinqi Bao's Git

bugfix of the -0 case in dmenu (thanks to Sander for his hint)
[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 <stdlib.h>
6 #include <stdio.h>
7 #include <string.h>
8 #include <unistd.h>
9 #include <X11/Xlib.h>
10 #include <X11/Xutil.h>
11 #include <X11/keysym.h>
12
13 /* macros */
14 #define CLEANMASK(mask) (mask & ~(numlockmask | LockMask))
15
16 /* enums */
17 enum { ColFG, ColBG, ColLast };
18
19 /* typedefs */
20 typedef struct {
21 int x, y, w, h;
22 unsigned long norm[ColLast];
23 unsigned long sel[ColLast];
24 Drawable drawable;
25 GC gc;
26 struct {
27 XFontStruct *xfont;
28 XFontSet set;
29 int ascent;
30 int descent;
31 int height;
32 } font;
33 } DC; /* draw context */
34
35 typedef struct Item Item;
36 struct Item {
37 char *text;
38 Item *next; /* traverses all items */
39 Item *left, *right; /* traverses items matching current search pattern */
40 };
41
42 /* forward declarations */
43 void appenditem(Item *i, Item **list, Item **last);
44 void calcoffsets(void);
45 char *cistrstr(const char *s, const char *sub);
46 void cleanup(void);
47 void drawmenu(void);
48 void drawtext(const char *text, unsigned long col[ColLast]);
49 void *emalloc(unsigned int size);
50 void eprint(const char *errstr, ...);
51 char *estrdup(const char *str);
52 unsigned long getcolor(const char *colstr);
53 Bool grabkeyboard(void);
54 void initfont(const char *fontstr);
55 void kpress(XKeyEvent * e);
56 void match(char *pattern);
57 void readstdin(void);
58 void run(void);
59 void setup(int x, int y, int w);
60 unsigned int textnw(const char *text, unsigned int len);
61 unsigned int textw(const char *text);
62
63 #include "config.h"
64
65 /* variables */
66 char *font = FONT;
67 char *maxname = NULL;
68 char *normbg = NORMBGCOLOR;
69 char *normfg = NORMFGCOLOR;
70 char *prompt = NULL;
71 char *selbg = SELBGCOLOR;
72 char *selfg = SELFGCOLOR;
73 char text[4096];
74 int screen;
75 int ret = 0;
76 unsigned int cmdw = 0;
77 unsigned int mw, mh;
78 unsigned int promptw = 0;
79 unsigned int numlockmask = 0;
80 Bool running = True;
81 Display *dpy;
82 DC dc = {0};
83 Item *allitems = NULL; /* first of all items */
84 Item *item = NULL; /* first of pattern matching items */
85 Item *sel = NULL;
86 Item *next = NULL;
87 Item *prev = NULL;
88 Item *curr = NULL;
89 Window root, win;
90 int (*fstrncmp)(const char *, const char *, size_t n) = strncmp;
91 char *(*fstrstr)(const char *, const char *) = strstr;
92
93 void
94 appenditem(Item *i, Item **list, Item **last) {
95 if(!(*last))
96 *list = i;
97 else
98 (*last)->right = i;
99 i->left = *last;
100 i->right = NULL;
101 *last = i;
102 }
103
104 void
105 calcoffsets(void) {
106 unsigned int tw, w;
107
108 if(!curr)
109 return;
110 w = promptw + cmdw + 2 * SPACE;
111 for(next = curr; next; next=next->right) {
112 tw = textw(next->text);
113 if(tw > mw / 3)
114 tw = mw / 3;
115 w += tw;
116 if(w > mw)
117 break;
118 }
119 w = promptw + cmdw + 2 * SPACE;
120 for(prev = curr; prev && prev->left; prev=prev->left) {
121 tw = textw(prev->left->text);
122 if(tw > mw / 3)
123 tw = mw / 3;
124 w += tw;
125 if(w > mw)
126 break;
127 }
128 }
129
130 char *
131 cistrstr(const char *s, const char *sub) {
132 int c, csub;
133 unsigned int len;
134
135 if(!sub)
136 return (char *)s;
137 if((c = *sub++) != 0) {
138 c = tolower(c);
139 len = strlen(sub);
140 do {
141 do {
142 if((csub = *s++) == 0)
143 return (NULL);
144 }
145 while(tolower(csub) != c);
146 }
147 while(strncasecmp(s, sub, len) != 0);
148 s--;
149 }
150 return (char *)s;
151 }
152
153 void
154 cleanup(void) {
155 Item *itm;
156
157 while(allitems) {
158 itm = allitems->next;
159 free(allitems->text);
160 free(allitems);
161 allitems = itm;
162 }
163 if(dc.font.set)
164 XFreeFontSet(dpy, dc.font.set);
165 else
166 XFreeFont(dpy, dc.font.xfont);
167 XFreePixmap(dpy, dc.drawable);
168 XFreeGC(dpy, dc.gc);
169 XDestroyWindow(dpy, win);
170 XUngrabKeyboard(dpy, CurrentTime);
171 }
172
173 void
174 drawmenu(void) {
175 Item *i;
176
177 dc.x = 0;
178 dc.y = 0;
179 dc.w = mw;
180 dc.h = mh;
181 drawtext(NULL, dc.norm);
182 /* print prompt? */
183 if(promptw) {
184 dc.w = promptw;
185 drawtext(prompt, dc.sel);
186 }
187 dc.x += promptw;
188 dc.w = mw - promptw;
189 /* print command */
190 if(cmdw && item)
191 dc.w = cmdw;
192 drawtext(text[0] ? text : NULL, dc.norm);
193 dc.x += cmdw;
194 if(curr) {
195 dc.w = SPACE;
196 drawtext((curr && curr->left) ? "<" : NULL, dc.norm);
197 dc.x += dc.w;
198 /* determine maximum items */
199 for(i = curr; i != next; i=i->right) {
200 dc.w = textw(i->text);
201 if(dc.w > mw / 3)
202 dc.w = mw / 3;
203 drawtext(i->text, (sel == i) ? dc.sel : dc.norm);
204 dc.x += dc.w;
205 }
206 dc.x = mw - SPACE;
207 dc.w = SPACE;
208 drawtext(next ? ">" : NULL, dc.norm);
209 }
210 XCopyArea(dpy, dc.drawable, win, dc.gc, 0, 0, mw, mh, 0, 0);
211 XFlush(dpy);
212 }
213
214 void
215 drawtext(const char *text, unsigned long col[ColLast]) {
216 int x, y, w, h;
217 static char buf[256];
218 unsigned int len, olen;
219 XRectangle r = { dc.x, dc.y, dc.w, dc.h };
220
221 XSetForeground(dpy, dc.gc, col[ColBG]);
222 XFillRectangles(dpy, dc.drawable, dc.gc, &r, 1);
223 if(!text)
224 return;
225 w = 0;
226 olen = len = strlen(text);
227 if(len >= sizeof buf)
228 len = sizeof buf - 1;
229 memcpy(buf, text, len);
230 buf[len] = 0;
231 h = dc.font.ascent + dc.font.descent;
232 y = dc.y + (dc.h / 2) - (h / 2) + dc.font.ascent;
233 x = dc.x + (h / 2);
234 /* shorten text if necessary */
235 while(len && (w = textnw(buf, len)) > dc.w - h)
236 buf[--len] = 0;
237 if(len < olen) {
238 if(len > 1)
239 buf[len - 1] = '.';
240 if(len > 2)
241 buf[len - 2] = '.';
242 if(len > 3)
243 buf[len - 3] = '.';
244 }
245 if(w > dc.w)
246 return; /* too long */
247 XSetForeground(dpy, dc.gc, col[ColFG]);
248 if(dc.font.set)
249 XmbDrawString(dpy, dc.drawable, dc.font.set, dc.gc, x, y, buf, len);
250 else
251 XDrawString(dpy, dc.drawable, dc.gc, x, y, buf, len);
252 }
253
254 void *
255 emalloc(unsigned int size) {
256 void *res = malloc(size);
257
258 if(!res)
259 eprint("fatal: could not malloc() %u bytes\n", size);
260 return res;
261 }
262
263 void
264 eprint(const char *errstr, ...) {
265 va_list ap;
266
267 va_start(ap, errstr);
268 vfprintf(stderr, errstr, ap);
269 va_end(ap);
270 exit(EXIT_FAILURE);
271 }
272
273 char *
274 estrdup(const char *str) {
275 void *res = strdup(str);
276
277 if(!res)
278 eprint("fatal: could not malloc() %u bytes\n", strlen(str));
279 return res;
280 }
281
282 unsigned long
283 getcolor(const char *colstr) {
284 Colormap cmap = DefaultColormap(dpy, screen);
285 XColor color;
286
287 if(!XAllocNamedColor(dpy, cmap, colstr, &color, &color))
288 eprint("error, cannot allocate color '%s'\n", colstr);
289 return color.pixel;
290 }
291
292 Bool
293 grabkeyboard(void) {
294 unsigned int len;
295
296 for(len = 1000; len; len--) {
297 if(XGrabKeyboard(dpy, root, True, GrabModeAsync, GrabModeAsync, CurrentTime)
298 == GrabSuccess)
299 break;
300 usleep(1000);
301 }
302 return len > 0;
303 }
304
305 void
306 initfont(const char *fontstr) {
307 char *def, **missing;
308 int i, n;
309
310 if(!fontstr || fontstr[0] == '\0')
311 eprint("error, cannot load font: '%s'\n", fontstr);
312 missing = NULL;
313 if(dc.font.set)
314 XFreeFontSet(dpy, dc.font.set);
315 dc.font.set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
316 if(missing)
317 XFreeStringList(missing);
318 if(dc.font.set) {
319 XFontSetExtents *font_extents;
320 XFontStruct **xfonts;
321 char **font_names;
322 dc.font.ascent = dc.font.descent = 0;
323 font_extents = XExtentsOfFontSet(dc.font.set);
324 n = XFontsOfFontSet(dc.font.set, &xfonts, &font_names);
325 for(i = 0, dc.font.ascent = 0, dc.font.descent = 0; i < n; i++) {
326 if(dc.font.ascent < (*xfonts)->ascent)
327 dc.font.ascent = (*xfonts)->ascent;
328 if(dc.font.descent < (*xfonts)->descent)
329 dc.font.descent = (*xfonts)->descent;
330 xfonts++;
331 }
332 }
333 else {
334 if(dc.font.xfont)
335 XFreeFont(dpy, dc.font.xfont);
336 dc.font.xfont = NULL;
337 if(!(dc.font.xfont = XLoadQueryFont(dpy, fontstr))
338 && !(dc.font.xfont = XLoadQueryFont(dpy, "fixed")))
339 eprint("error, cannot load font: '%s'\n", fontstr);
340 dc.font.ascent = dc.font.xfont->ascent;
341 dc.font.descent = dc.font.xfont->descent;
342 }
343 dc.font.height = dc.font.ascent + dc.font.descent;
344 }
345
346 void
347 kpress(XKeyEvent * e) {
348 char buf[32];
349 int i, num;
350 unsigned int len;
351 KeySym ksym;
352
353 len = strlen(text);
354 buf[0] = 0;
355 num = XLookupString(e, buf, sizeof buf, &ksym, 0);
356 if(IsKeypadKey(ksym))
357 if(ksym == XK_KP_Enter)
358 ksym = XK_Return;
359 else if(ksym >= XK_KP_0 && ksym <= XK_KP_9)
360 ksym = (ksym - XK_KP_0) + XK_0;
361 if(IsFunctionKey(ksym) || IsKeypadKey(ksym)
362 || IsMiscFunctionKey(ksym) || IsPFKey(ksym)
363 || IsPrivateKeypadKey(ksym))
364 return;
365 /* first check if a control mask is omitted */
366 if(e->state & ControlMask) {
367 switch (ksym) {
368 default: /* ignore other control sequences */
369 return;
370 case XK_bracketleft:
371 ksym = XK_Escape;
372 break;
373 case XK_h:
374 case XK_H:
375 ksym = XK_BackSpace;
376 break;
377 case XK_i:
378 case XK_I:
379 ksym = XK_Tab;
380 break;
381 case XK_j:
382 case XK_J:
383 ksym = XK_Return;
384 break;
385 case XK_u:
386 case XK_U:
387 text[0] = 0;
388 match(text);
389 drawmenu();
390 return;
391 case XK_w:
392 case XK_W:
393 if(len) {
394 i = len - 1;
395 while(i >= 0 && text[i] == ' ')
396 text[i--] = 0;
397 while(i >= 0 && text[i] != ' ')
398 text[i--] = 0;
399 match(text);
400 drawmenu();
401 }
402 return;
403 }
404 }
405 if(CLEANMASK(e->state) & Mod1Mask) {
406 switch(ksym) {
407 default: return;
408 case XK_h:
409 ksym = XK_Left;
410 break;
411 case XK_l:
412 ksym = XK_Right;
413 break;
414 case XK_j:
415 ksym = XK_Next;
416 break;
417 case XK_k:
418 ksym = XK_Prior;
419 break;
420 case XK_g:
421 ksym = XK_Home;
422 break;
423 case XK_G:
424 ksym = XK_End;
425 break;
426 }
427 }
428 switch(ksym) {
429 default:
430 if(num && !iscntrl((int) buf[0])) {
431 buf[num] = 0;
432 if(len > 0)
433 strncat(text, buf, sizeof text);
434 else
435 strncpy(text, buf, sizeof text);
436 match(text);
437 }
438 break;
439 case XK_BackSpace:
440 if(len) {
441 text[--len] = 0;
442 match(text);
443 }
444 break;
445 case XK_End:
446 if(!item)
447 return;
448 while(next) {
449 sel = curr = next;
450 calcoffsets();
451 }
452 while(sel && sel->right)
453 sel = sel->right;
454 break;
455 case XK_Escape:
456 ret = 1;
457 running = False;
458 break;
459 case XK_Home:
460 if(!item)
461 return;
462 sel = curr = item;
463 calcoffsets();
464 break;
465 case XK_Left:
466 if(!(sel && sel->left))
467 return;
468 sel=sel->left;
469 if(sel->right == curr) {
470 curr = prev;
471 calcoffsets();
472 }
473 break;
474 case XK_Next:
475 if(!next)
476 return;
477 sel = curr = next;
478 calcoffsets();
479 break;
480 case XK_Prior:
481 if(!prev)
482 return;
483 sel = curr = prev;
484 calcoffsets();
485 break;
486 case XK_Return:
487 if((e->state & ShiftMask) && text)
488 fprintf(stdout, "%s", text);
489 else if(sel)
490 fprintf(stdout, "%s", sel->text);
491 else if(text)
492 fprintf(stdout, "%s", text);
493 fflush(stdout);
494 running = False;
495 break;
496 case XK_Right:
497 if(!(sel && sel->right))
498 return;
499 sel=sel->right;
500 if(sel == next) {
501 curr = next;
502 calcoffsets();
503 }
504 break;
505 case XK_Tab:
506 if(!sel)
507 return;
508 strncpy(text, sel->text, sizeof text);
509 match(text);
510 break;
511 }
512 drawmenu();
513 }
514
515 void
516 match(char *pattern) {
517 unsigned int plen;
518 Item *i, *itemend, *lexact, *lprefix, *lsubstr, *exactend, *prefixend, *substrend;
519
520 if(!pattern)
521 return;
522 plen = strlen(pattern);
523 item = lexact = lprefix = lsubstr = itemend = exactend = prefixend = substrend = NULL;
524 for(i = allitems; i; i = i->next)
525 if(!fstrncmp(pattern, i->text, plen + 1))
526 appenditem(i, &lexact, &exactend);
527 else if(!fstrncmp(pattern, i->text, plen))
528 appenditem(i, &lprefix, &prefixend);
529 else if(fstrstr(i->text, pattern))
530 appenditem(i, &lsubstr, &substrend);
531 if(lexact) {
532 item = lexact;
533 itemend = exactend;
534 }
535 if(lprefix) {
536 if(itemend) {
537 itemend->right = lprefix;
538 lprefix->left = itemend;
539 }
540 else
541 item = lprefix;
542 itemend = prefixend;
543 }
544 if(lsubstr) {
545 if(itemend) {
546 itemend->right = lsubstr;
547 lsubstr->left = itemend;
548 }
549 else
550 item = lsubstr;
551 }
552 curr = prev = next = sel = item;
553 calcoffsets();
554 }
555
556 void
557 readstdin(void) {
558 char *p, buf[1024];
559 unsigned int len = 0, max = 0;
560 Item *i, *new;
561
562 i = 0;
563 while(fgets(buf, sizeof buf, stdin)) {
564 len = strlen(buf);
565 if (buf[len - 1] == '\n')
566 buf[len - 1] = 0;
567 p = estrdup(buf);
568 if(max < len) {
569 maxname = p;
570 max = len;
571 }
572 new = emalloc(sizeof(Item));
573 new->next = new->left = new->right = NULL;
574 new->text = p;
575 if(!i)
576 allitems = new;
577 else
578 i->next = new;
579 i = new;
580 }
581 }
582
583 void
584 run(void) {
585 XEvent ev;
586
587 /* main event loop */
588 while(running && !XNextEvent(dpy, &ev))
589 switch (ev.type) {
590 default: /* ignore all crap */
591 break;
592 case KeyPress:
593 kpress(&ev.xkey);
594 break;
595 case Expose:
596 if(ev.xexpose.count == 0)
597 drawmenu();
598 break;
599 }
600 }
601
602 void
603 setup(int x, int y, int w) {
604 unsigned int i, j;
605 XModifierKeymap *modmap;
606 XSetWindowAttributes wa;
607
608 /* init modifier map */
609 modmap = XGetModifierMapping(dpy);
610 for(i = 0; i < 8; i++)
611 for(j = 0; j < modmap->max_keypermod; j++) {
612 if(modmap->modifiermap[i * modmap->max_keypermod + j]
613 == XKeysymToKeycode(dpy, XK_Num_Lock))
614 numlockmask = (1 << i);
615 }
616 XFreeModifiermap(modmap);
617
618 /* style */
619 dc.norm[ColBG] = getcolor(normbg);
620 dc.norm[ColFG] = getcolor(normfg);
621 dc.sel[ColBG] = getcolor(selbg);
622 dc.sel[ColFG] = getcolor(selfg);
623 initfont(font);
624
625 /* menu window */
626 wa.override_redirect = 1;
627 wa.background_pixmap = ParentRelative;
628 wa.event_mask = ExposureMask | ButtonPressMask | KeyPressMask;
629 mw = w ? w : DisplayWidth(dpy, screen);
630 mh = dc.font.height + 2;
631 if(y < 0) {
632 if(y == ((~(unsigned int)0)/2)+1)
633 y = DisplayHeight(dpy, screen) - mh;
634 else
635 y = (-1 * y) - mh;
636 }
637 win = XCreateWindow(dpy, root, x, y, mw, mh, 0,
638 DefaultDepth(dpy, screen), CopyFromParent,
639 DefaultVisual(dpy, screen),
640 CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa);
641
642 /* pixmap */
643 dc.drawable = XCreatePixmap(dpy, root, mw, mh, DefaultDepth(dpy, screen));
644 dc.gc = XCreateGC(dpy, root, 0, 0);
645 XSetLineAttributes(dpy, dc.gc, 1, LineSolid, CapButt, JoinMiter);
646 if(!dc.font.set)
647 XSetFont(dpy, dc.gc, dc.font.xfont->fid);
648 if(maxname)
649 cmdw = textw(maxname);
650 if(cmdw > mw / 3)
651 cmdw = mw / 3;
652 if(prompt)
653 promptw = textw(prompt);
654 if(promptw > mw / 5)
655 promptw = mw / 5;
656 text[0] = 0;
657 match(text);
658 XMapRaised(dpy, win);
659 }
660
661 unsigned int
662 textnw(const char *text, unsigned int len) {
663 XRectangle r;
664
665 if(dc.font.set) {
666 XmbTextExtents(dc.font.set, text, len, NULL, &r);
667 return r.width;
668 }
669 return XTextWidth(dc.font.xfont, text, len);
670 }
671
672 unsigned int
673 textw(const char *text) {
674 return textnw(text, strlen(text)) + dc.font.height;
675 }
676
677 int
678 main(int argc, char *argv[]) {
679 int x = 0, y = 0, w = 0;
680 unsigned int i;
681
682 /* command line args */
683 for(i = 1; i < argc; i++)
684 if(!strcmp(argv[i], "-i")) {
685 fstrncmp = strncasecmp;
686 fstrstr = cistrstr;
687 }
688 else if(!strcmp(argv[i], "-fn")) {
689 if(++i < argc) font = argv[i];
690 }
691 else if(!strcmp(argv[i], "-nb")) {
692 if(++i < argc) normbg = argv[i];
693 }
694 else if(!strcmp(argv[i], "-nf")) {
695 if(++i < argc) normfg = argv[i];
696 }
697 else if(!strcmp(argv[i], "-p")) {
698 if(++i < argc) prompt = argv[i];
699 }
700 else if(!strcmp(argv[i], "-sb")) {
701 if(++i < argc) selbg = argv[i];
702 }
703 else if(!strcmp(argv[i], "-sf")) {
704 if(++i < argc) selfg = argv[i];
705 }
706 else if(!strcmp(argv[i], "-x")) {
707 if(++i < argc) x = atoi(argv[i]);
708 }
709 else if(!strcmp(argv[i], "-y")) {
710 if(++i < argc)
711 if(!strcmp(argv[i], "-0"))
712 y = ((~(unsigned int)0)/2)+1;
713 else
714 y = atoi(argv[i]);
715 }
716 else if(!strcmp(argv[i], "-w")) {
717 if(++i < argc) w = atoi(argv[i]);
718 }
719 else if(!strcmp(argv[i], "-v"))
720 eprint("dmenu-"VERSION", © 2006-2008 dmenu engineers, see LICENSE for details\n");
721 else
722 eprint("usage: dmenu [-i] [-fn <font>] [-nb <color>] [-nf <color>]\n"
723 " [-p <prompt>] [-sb <color>] [-sf <color>]\n"
724 " [-x <x>] [-y <y>] [-w <w>] [-v]\n");
725 setlocale(LC_CTYPE, "");
726 dpy = XOpenDisplay(0);
727 if(!dpy)
728 eprint("dmenu: cannot open display\n");
729 screen = DefaultScreen(dpy);
730 root = RootWindow(dpy, screen);
731
732 if(isatty(STDIN_FILENO)) {
733 readstdin();
734 running = grabkeyboard();
735 }
736 else { /* prevent keypress loss */
737 running = grabkeyboard();
738 readstdin();
739 }
740
741 setup(x, y, w);
742 drawmenu();
743 XSync(dpy, False);
744 run();
745 cleanup();
746 XCloseDisplay(dpy);
747 return ret;
748 }