Xinqi Bao's Git

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