Xinqi Bao's Git

projects / st.git / blob


ef0fd17d00eaa7ea057fb7bb88093b4ed937f9a6
[st.git] / st.c
1 /* See LICENSE for licence details. */
2 #include "st.h"
3
4 /* Globals */
5 DC dc;
6 XWindow xw;
7 Term term;
8 Escseq escseq;
9 int cmdfd;
10 int running;
11
12 void
13 die(const char *errstr, ...) {
14 va_list ap;
15
16 va_start(ap, errstr);
17 vfprintf(stderr, errstr, ap);
18 va_end(ap);
19 exit(EXIT_FAILURE);
20 }
21
22 void
23 execsh(void) {
24 char *args[3] = {SHELL, "-i", NULL};
25 putenv("TERM=" TNAME);
26 execvp(SHELL, args);
27 }
28
29 void
30 xbell(void) { /* visual bell */
31 XRectangle r = { 0, 0, xw.w, xw.h };
32 XSetForeground(xw.dis, dc.gc, dc.col[BellCol]);
33 XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1);
34 XFlush(xw.dis);
35 usleep(30000);
36 draw(SCredraw);
37 }
38
39 void
40 ttynew(void) {
41 int m, s;
42 pid_t pid;
43 char *pts;
44
45 if((m = posix_openpt(O_RDWR | O_NOCTTY)) < 0)
46 die("openpt");
47 if(grantpt(m) == -1)
48 die("grandpt");
49 if(unlockpt(m) == -1)
50 die("unlockpt");
51 if((pts = ptsname(m)) == NULL)
52 die("ptsname");
53 if((s = open(pts, O_RDWR | O_NOCTTY)) < 0)
54 die("slave open");
55 fcntl(s, F_SETFL, O_NDELAY);
56 switch(pid = fork()) {
57 case -1:
58 die("fork");
59 break;
60 case 0:
61 setsid(); /* create a new process group */
62 dup2(s, STDIN_FILENO);
63 dup2(s, STDOUT_FILENO);
64 dup2(s, STDERR_FILENO);
65 if(ioctl(s, TIOCSCTTY, NULL) < 0)
66 die("slave TTIOCSTTY");
67 execsh();
68 break;
69 default:
70 close(s);
71 cmdfd = m;
72 }
73 }
74
75 void
76 dump(char c) {
77 static int col;
78 fprintf(stderr, " %02x %c ", c, isprint(c)?c:'.');
79 if(++col % 10 == 0)
80 fprintf(stderr, "\n");
81 }
82
83 void
84 ttyread(void) {
85 char buf[BUFSIZ] = {0};
86 int ret;
87
88 switch(ret = read(cmdfd, buf, BUFSIZ)) {
89 case -1: /* error or exit */
90 /* XXX: be more precise */
91 running = 0;
92 break;
93 default:
94 tputs(buf, ret);
95 }
96 }
97
98 void
99 ttywrite(char *s, size_t n) {
100 if(write(cmdfd, s, n) == -1)
101 die("write error on tty.");
102 }
103
104 void
105 ttyresize(int x, int y) {
106 struct winsize w;
107
108 w.ws_row = term.row;
109 w.ws_col = term.col;
110 w.ws_xpixel = w.ws_ypixel = 0;
111 if(ioctl(cmdfd, TIOCSWINSZ, &w) < 0)
112 fprintf(stderr, "Couldn't set window size: %m\n");
113 }
114
115 int
116 escfinal(char c) {
117 if(escseq.len == 1)
118 switch(c) {
119 case '[':
120 case ']':
121 case '(':
122 return 0;
123 case '=':
124 case '>':
125 default:
126 return 1;
127 }
128 else if(BETWEEN(c, 0x40, 0x7E))
129 return 1;
130 return 0;
131 }
132
133 void
134 tcpos(int mode) {
135 static int x = 0;
136 static int y = 0;
137
138 if(mode == CSsave)
139 x = term.c.x, y = term.c.y;
140 else if(mode == CSload)
141 tmoveto(x, y);
142 }
143
144 void
145 tnew(int col, int row) { /* screen size */
146 term.row = row, term.col = col;
147 term.top = 0, term.bot = term.row - 1;
148 /* mode */
149 term.mode = TMwrap;
150 /* cursor */
151 term.c.attr.mode = ATnone;
152 term.c.attr.fg = DefaultFG;
153 term.c.attr.bg = DefaultBG;
154 term.c.x = term.c.y = 0;
155 term.c.hidden = 0;
156 /* allocate screen */
157 term.line = calloc(term.row, sizeof(Line));
158 for(row = 0 ; row < term.row; row++)
159 term.line[row] = calloc(term.col, sizeof(Glyph));
160 }
161
162 void
163 tscroll(void) {
164 Line temp = term.line[term.top];
165 int i;
166
167 for(i = term.top; i < term.bot; i++)
168 term.line[i] = term.line[i+1];
169 memset(temp, 0, sizeof(Glyph) * term.col);
170 term.line[term.bot] = temp;
171 xscroll();
172 }
173
174 void
175 tnewline(void) {
176 int y = term.c.y + 1;
177
178 if(y > term.bot) {
179 tscroll(), y = term.bot;
180 }
181 tmoveto(0, y);
182 }
183
184 int
185 escaddc(char c) {
186 escseq.buf[escseq.len++] = c;
187 if(escfinal(c) || escseq.len >= ESCSIZ) {
188 escparse(), eschandle();
189 return 0;
190 }
191 return 1;
192 }
193
194 void
195 escparse(void) {
196 /* int noarg = 1; */
197 char *p = escseq.buf;
198
199 escseq.narg = 0;
200 switch(escseq.pre = *p++) {
201 case '[': /* CSI */
202 if(*p == '?')
203 escseq.priv = 1, p++;
204
205 while(p < escseq.buf+escseq.len) {
206 while(isdigit(*p)) {
207 escseq.arg[escseq.narg] *= 10;
208 escseq.arg[escseq.narg] += *(p++) - '0'/*, noarg = 0 */;
209 }
210 if(*p == ';')
211 escseq.narg++, p++;
212 else {
213 escseq.mode = *p;
214 escseq.narg++;
215 return;
216 }
217 }
218 break;
219 case '(':
220 /* XXX: graphic character set */
221 break;
222 }
223 }
224
225 void
226 tmoveto(int x, int y) {
227 term.c.x = x < 0 ? 0 : x >= term.col ? term.col-1 : x;
228 term.c.y = y < 0 ? 0 : y >= term.row ? term.row-1 : y;
229 }
230
231 void
232 tcursor(int dir) {
233 int xf = term.c.x, yf = term.c.y;
234
235 switch(dir) {
236 case CSup:
237 yf--;
238 break;
239 case CSdown:
240 yf++;
241 break;
242 case CSleft:
243 xf--;
244 if(xf < 0) {
245 xf = term.col-1, yf--;
246 if(yf < term.top)
247 yf = term.top, xf = 0;
248 }
249 break;
250 case CSright:
251 xf++;
252 if(xf >= term.col) {
253 xf = 0, yf++;
254 if(yf > term.bot)
255 yf = term.bot, tscroll();
256 }
257 break;
258 }
259 tmoveto(xf, yf);
260 }
261
262 void
263 tsetchar(char c) {
264 term.line[term.c.y][term.c.x] = term.c.attr;
265 term.line[term.c.y][term.c.x].c = c;
266 term.line[term.c.y][term.c.x].state |= CRset | CRupdate;
267 }
268
269 void
270 tclearregion(int x1, int y1, int x2, int y2) {
271 int x, y;
272
273 LIMIT(x1, 0, term.col-1);
274 LIMIT(x2, 0, term.col-1);
275 LIMIT(y1, 0, term.row-1);
276 LIMIT(y2, 0, term.row-1);
277
278 /* XXX: could be optimized */
279 for(x = x1; x <= x2; x++)
280 for(y = y1; y <= y2; y++)
281 memset(&term.line[y][x], 0, sizeof(Glyph));
282
283 xclear(x1, y1, x2, y2);
284 }
285
286 void
287 tdeletechar(int n) {
288 int src = term.c.x + n;
289 int dst = term.c.x;
290 int size = term.col - src;
291
292 if(src >= term.col) {
293 tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
294 return;
295 }
296 memmove(&term.line[term.c.y][dst], &term.line[term.c.y][src], size * sizeof(Glyph));
297 tclearregion(term.col-size, term.c.y, term.col-1, term.c.y);
298 }
299
300 void
301 tinsertblank(int n) {
302 int src = term.c.x;
303 int dst = src + n;
304 int size = term.col - n - src;
305
306 if(dst >= term.col) {
307 tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
308 return;
309 }
310 memmove(&term.line[term.c.y][dst], &term.line[term.c.y][src], size * sizeof(Glyph));
311 tclearregion(src, term.c.y, dst, term.c.y);
312 }
313
314 void
315 tinsertblankline (int n) {
316 int i;
317 Line blank;
318 int bot = term.bot;
319
320 if(term.c.y > term.bot)
321 bot = term.row - 1;
322 else if(term.c.y < term.top)
323 bot = term.top - 1;
324 if(term.c.y + n >= bot) {
325 tclearregion(0, term.c.y, term.col-1, bot);
326 return;
327 }
328 for(i = bot; i >= term.c.y+n; i--) {
329 /* swap deleted line <-> blanked line */
330 blank = term.line[i];
331 term.line[i] = term.line[i-n];
332 term.line[i-n] = blank;
333 /* blank it */
334 memset(blank, 0, term.col * sizeof(Glyph));
335 }
336 }
337
338
339 void
340 tdeleteline(int n) {
341 int i;
342 Line blank;
343 int bot = term.bot;
344
345 if(term.c.y > term.bot)
346 bot = term.row - 1;
347 else if(term.c.y < term.top)
348 bot = term.top - 1;
349 if(term.c.y + n >= bot) {
350 tclearregion(0, term.c.y, term.col-1, bot);
351 return;
352 }
353 for(i = term.c.y; i <= bot-n; i++) {
354 /* swap deleted line <-> blanked line */
355 blank = term.line[i];
356 term.line[i] = term.line[i+n];
357 term.line[i+n] = blank;
358 /* blank it */
359 memset(blank, 0, term.col * sizeof(Glyph));
360 }
361 }
362
363 void
364 tsetattr(int *attr, int l) {
365 int i;
366
367 for(i = 0; i < l; i++) {
368 switch(attr[i]) {
369 case 0:
370 memset(&term.c.attr, 0, sizeof(term.c.attr));
371 term.c.attr.fg = DefaultFG;
372 term.c.attr.bg = DefaultBG;
373 break;
374 case 1:
375 term.c.attr.mode |= ATbold;
376 break;
377 case 4:
378 term.c.attr.mode |= ATunderline;
379 break;
380 case 7:
381 term.c.attr.mode |= ATreverse;
382 break;
383 case 8:
384 term.c.hidden = CShide;
385 break;
386 case 22:
387 term.c.attr.mode &= ~ATbold;
388 break;
389 case 24:
390 term.c.attr.mode &= ~ATunderline;
391 break;
392 case 27:
393 term.c.attr.mode &= ~ATreverse;
394 break;
395 case 39:
396 term.c.attr.fg = DefaultFG;
397 break;
398 case 49:
399 term.c.attr.fg = DefaultBG;
400 break;
401 default:
402 if(BETWEEN(attr[i], 30, 37))
403 term.c.attr.fg = attr[i] - 30;
404 else if(BETWEEN(attr[i], 40, 47))
405 term.c.attr.bg = attr[i] - 40;
406 break;
407 }
408 }
409 }
410
411 void
412 tsetscroll(int t, int b) {
413 int temp;
414
415 LIMIT(t, 0, term.row-1);
416 LIMIT(b, 0, term.row-1);
417 if(t > b) {
418 temp = t;
419 t = b;
420 b = temp;
421 }
422 term.top = t;
423 term.bot = b;
424 }
425
426
427 void
428 eschandle(void) {
429 /* escdump(); */
430 switch(escseq.pre) {
431 case '[':
432 switch(escseq.mode) {
433 case '@': /* Insert <n> blank char */
434 DEFAULT(escseq.arg[0], 1);
435 tinsertblank(escseq.arg[0]);
436 break;
437 case 'A': /* Cursor <n> Up */
438 case 'e':
439 DEFAULT(escseq.arg[0], 1);
440 tmoveto(term.c.x, term.c.y-escseq.arg[0]);
441 break;
442 case 'B': /* Cursor <n> Down */
443 DEFAULT(escseq.arg[0], 1);
444 tmoveto(term.c.x, term.c.y+escseq.arg[0]);
445 break;
446 case 'C': /* Cursor <n> Forward */
447 case 'a':
448 DEFAULT(escseq.arg[0], 1);
449 tmoveto(term.c.x+escseq.arg[0], term.c.y);
450 break;
451 case 'D': /* Cursor <n> Backward */
452 DEFAULT(escseq.arg[0], 1);
453 tmoveto(term.c.x-escseq.arg[0], term.c.y);
454 break;
455 case 'E': /* Cursor <n> Down and first col */
456 DEFAULT(escseq.arg[0], 1);
457 tmoveto(0, term.c.y+escseq.arg[0]);
458 break;
459 case 'F': /* Cursor <n> Up and first col */
460 DEFAULT(escseq.arg[0], 1);
461 tmoveto(0, term.c.y-escseq.arg[0]);
462 break;
463 case 'G': /* Move to <col> */
464 case '`':
465 DEFAULT(escseq.arg[0], 1);
466 tmoveto(escseq.arg[0]-1, term.c.y);
467 break;
468 case 'H': /* Move to <row> <col> */
469 case 'f':
470 DEFAULT(escseq.arg[0], 1);
471 DEFAULT(escseq.arg[1], 1);
472 tmoveto(escseq.arg[1]-1, escseq.arg[0]-1);
473 break;
474 case 'J': /* Clear screen */
475 switch(escseq.arg[0]) {
476 case 0: /* below */
477 tclearregion(term.c.x, term.c.y, term.col-1, term.row-1);
478 break;
479 case 1: /* above */
480 tclearregion(0, 0, term.c.x, term.c.y);
481 break;
482 case 2: /* all */
483 tclearregion(0, 0, term.col-1, term.row-1);
484 break;
485 }
486 break;
487 case 'K': /* Clear line */
488 switch(escseq.arg[0]) {
489 case 0: /* right */
490 tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
491 break;
492 case 1: /* left */
493 tclearregion(0, term.c.y, term.c.x, term.c.y);
494 break;
495 case 2: /* all */
496 tclearregion(0, term.c.y, term.col-1, term.c.y);
497 break;
498 }
499 break;
500 case 'L': /* Insert <n> blank lines */
501 DEFAULT(escseq.arg[0], 1);
502 tinsertblankline(escseq.arg[0]);
503 break;
504 case 'M': /* Delete <n> lines */
505 DEFAULT(escseq.arg[0], 1);
506 tdeleteline(escseq.arg[0]);
507 break;
508 case 'P': /* Delete <n> char */
509 DEFAULT(escseq.arg[0], 1);
510 tdeletechar(escseq.arg[0]);
511 break;
512 case 'd': /* Move to <row> */
513 DEFAULT(escseq.arg[0], 1);
514 tmoveto(term.c.x, escseq.arg[0]-1);
515 break;
516 case 'h': /* Set terminal mode */
517 break;
518 case 'm': /* Terminal attribute (color) */
519 tsetattr(escseq.arg, escseq.narg);
520 break;
521 case 'r':
522 if(escseq.priv)
523 ;
524 else {
525 DEFAULT(escseq.arg[0], 1);
526 DEFAULT(escseq.arg[1], term.row);
527 tsetscroll(escseq.arg[0]-1, escseq.arg[1]-1);
528 }
529 break;
530 case 's': /* Save cursor position */
531 tcpos(CSsave);
532 break;
533 case 'u': /* Load cursor position */
534 tcpos(CSload);
535 break;
536 }
537 break;
538 }
539 }
540
541 void
542 escdump(void) {
543 int i;
544 puts("------");
545 printf("rawbuf : %s\n", escseq.buf);
546 printf("prechar : %c\n", escseq.pre);
547 printf("private : %c\n", escseq.priv ? '?' : ' ');
548 printf("narg : %d\n", escseq.narg);
549 if(escseq.narg) {
550 for(i = 0; i < escseq.narg; i++)
551 printf("\targ %d = %d\n", i, escseq.arg[i]);
552 }
553 printf("mode : %c\n", escseq.mode);
554 }
555
556 void
557 escreset(void) {
558 memset(&escseq, 0, sizeof(escseq));
559 }
560
561 void
562 tputc(char c) {
563 static int inesc = 0;
564
565 dump(c);
566 /* start of escseq */
567 if(c == '\033')
568 escreset(), inesc = 1;
569 else if(inesc) {
570 inesc = escaddc(c);
571 } /* normal char */
572 else switch(c) {
573 default:
574 tsetchar(c);
575 tcursor(CSright);
576 break;
577 case '\b':
578 tcursor(CSleft);
579 break;
580 case '\r':
581 tmoveto(0, term.c.y);
582 break;
583 case '\n':
584 tnewline();
585 break;
586 case '\a':
587 xbell();
588 break;
589 }
590 }
591
592 void
593 tputs(char *s, int len) {
594 for(; len > 0; len--)
595 tputc(*s++);
596 }
597
598 void
599 tdump(void) {
600 int row, col;
601 Glyph c;
602
603 for(row = 0; row < term.row; row++) {
604 for(col = 0; col < term.col; col++) {
605 if(col == term.c.x && row == term.c.y)
606 putchar('#');
607 else {
608 c = term.line[row][col];
609 putchar(c.state & CRset ? c.c : '.');
610 }
611 }
612 putchar('\n');
613 }
614 }
615
616 void
617 tresize(int col, int row) {
618 int i;
619 Line *line;
620 int minrow = MIN(row, term.row);
621 int mincol = MIN(col, term.col);
622
623 if(col < 1 || row < 1)
624 return;
625 line = calloc(row, sizeof(Line));
626 for(i = 0 ; i < row; i++)
627 line[i] = calloc(col, sizeof(Glyph));
628 for(i = 0 ; i < minrow; i++) {
629 memcpy(line[i], term.line[i], mincol * sizeof(Glyph));
630 free(term.line[i]);
631 }
632 free(term.line);
633 LIMIT(term.c.x, 0, col-1);
634 LIMIT(term.c.y, 0, row-1);
635 LIMIT(term.top, 0, row-1);
636 LIMIT(term.bot, 0, row-1);
637 // if(term.bot == term.row-1)
638 term.bot = row-1;
639 term.line = line;
640 term.col = col, term.row = row;
641 }
642
643 unsigned long
644 xgetcol(const char *s) {
645 XColor color;
646 Colormap cmap = DefaultColormap(xw.dis, xw.scr);
647
648 if(!XAllocNamedColor(xw.dis, cmap, s, &color, &color)) {
649 color.pixel = WhitePixel(xw.dis, xw.scr);
650 fprintf(stderr, "Could not allocate color '%s'\n", s);
651 }
652 return color.pixel;
653 }
654
655
656 void
657 xclear(int x1, int y1, int x2, int y2) {
658 XClearArea(xw.dis, xw.win,
659 x1 * xw.cw, y1 * xw.ch,
660 (x2-x1+1) * xw.cw, (y2-y1+1) * xw.ch,
661 False);
662 }
663
664
665 void
666 xscroll(void) {
667 int srcy = (term.top+1) * xw.ch;
668 int dsty = term.top * xw.ch;
669 int height = (term.bot-term.top) * xw.ch;
670
671 xcursor(CShide);
672 XCopyArea(xw.dis, xw.win, xw.win, dc.gc, 0, srcy, xw.w, height, 0, dsty);
673 xclear(0, term.bot, term.col-1, term.bot);
674 }
675
676
677
678
679 void
680 xinit(void) {
681 XGCValues values;
682 unsigned long valuemask;
683 XClassHint chint;
684 XWMHints wmhint;
685 XSizeHints shint;
686 char *args[] = {NULL};
687 int i;
688
689 xw.dis = XOpenDisplay(NULL);
690 xw.scr = XDefaultScreen(xw.dis);
691 if(!xw.dis)
692 die("can not open display");
693
694 /* font */
695 if(!(dc.font = XLoadQueryFont(xw.dis, FONT)))
696 die("can not find font " FONT);
697
698 xw.cw = dc.font->max_bounds.rbearing - dc.font->min_bounds.lbearing;
699 xw.ch = dc.font->ascent + dc.font->descent + LINESPACE;
700
701 /* colors */
702 for(i = 0; i < LEN(colorname); i++)
703 dc.col[i] = xgetcol(colorname[i]);
704
705 term.c.attr.fg = DefaultFG;
706 term.c.attr.bg = DefaultBG;
707 term.c.attr.mode = ATnone;
708 /* windows */
709 xw.h = term.row * xw.ch;
710 xw.w = term.col * xw.cw;
711 /* XXX: this BORDER is useless after the first resize, handle it in xdraws() */
712 xw.win = XCreateSimpleWindow(xw.dis, XRootWindow(xw.dis, xw.scr), 0, 0,
713 xw.w, xw.h, BORDER,
714 dc.col[DefaultBG],
715 dc.col[DefaultBG]);
716 /* gc */
717 values.foreground = XWhitePixel(xw.dis, xw.scr);
718 values.font = dc.font->fid;
719 valuemask = GCForeground | GCFont;
720 dc.gc = XCreateGC(xw.dis, xw.win, valuemask, &values);
721 XMapWindow(xw.dis, xw.win);
722 /* wm stuff */
723 chint.res_name = TNAME, chint.res_class = TNAME;
724 wmhint.input = 1, wmhint.flags = InputHint;
725 shint.height_inc = xw.ch, shint.width_inc = xw.cw;
726 shint.height = xw.h, shint.width = xw.w;
727 shint.flags = PSize | PResizeInc;
728 XSetWMProperties(xw.dis, xw.win, NULL, NULL, &args[0], 0, &shint, &wmhint, &chint);
729 XStoreName(xw.dis, xw.win, TNAME);
730 XSync(xw.dis, 0);
731
732 }
733
734 void
735 xdrawc(int x, int y, Glyph g) {
736 XRectangle r = { x * xw.cw, y * xw.ch, xw.cw, xw.ch };
737 unsigned long xfg, xbg;
738
739 /* reverse video */
740 if(g.mode & ATreverse)
741 xfg = dc.col[g.bg], xbg = dc.col[g.fg];
742 else
743 xfg = dc.col[g.fg], xbg = dc.col[g.bg];
744 /* background */
745 XSetForeground(xw.dis, dc.gc, xbg);
746 XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1);
747 /* string */
748 XSetForeground(xw.dis, dc.gc, xfg);
749 XDrawString(xw.dis, xw.win, dc.gc, r.x, r.y+dc.font->ascent, &(g.c), 1);
750 if(g.mode & ATbold) /* XXX: bold hack (draw again at x+1) */
751 XDrawString(xw.dis, xw.win, dc.gc, r.x+1, r.y+dc.font->ascent, &(g.c), 1);
752 /* underline */
753 if(g.mode & ATunderline) {
754 r.y += dc.font->ascent + 1;
755 XDrawLine(xw.dis, xw.win, dc.gc, r.x, r.y, r.x+r.width-1, r.y);
756 }
757 }
758
759 void
760 xcursor(int mode) {
761 static int oldx = 0;
762 static int oldy = 0;
763 Glyph g = {' ', ATnone, DefaultBG, DefaultCS, 0};
764
765 if(term.line[term.c.y][term.c.x].state & CRset)
766 g.c = term.line[term.c.y][term.c.x].c;
767 /* remove the old cursor */
768 if(term.line[oldy][oldx].state & CRset)
769 xdrawc(oldx, oldy, term.line[oldy][oldx]);
770 else xclear(oldx, oldy, oldx, oldy); /* XXX: maybe a bug */
771 if(mode == CSdraw && !term.c.hidden) {
772 xdrawc(term.c.x, term.c.y, g);
773 oldx = term.c.x, oldy = term.c.y;
774 }
775 }
776
777
778 void
779 draw(int redraw_all) {
780 int x, y;
781 int changed, set;
782
783 if(redraw_all)
784 XClearWindow(xw.dis, xw.win);
785 /* XXX: drawing could be optimised */
786 for(y = 0; y < term.row; y++) {
787 for(x = 0; x < term.col; x++) {
788 changed = term.line[y][x].state & CRupdate;
789 set = term.line[y][x].state & CRset;
790 if((changed && set) || (redraw_all && set)) {
791 term.line[y][x].state &= ~CRupdate;
792 xdrawc(x, y, term.line[y][x]);
793 }
794 }
795 }
796 xcursor(CSdraw);
797 }
798
799 void
800 kpress(XKeyEvent *e) {
801 KeySym ksym;
802 char buf[32];
803 int len;
804 int meta;
805 int shift;
806
807 meta = e->state & Mod4Mask;
808 shift = e->state & ShiftMask;
809 len = XLookupString(e, buf, sizeof(buf), &ksym, NULL);
810 if(len > 0) {
811 buf[sizeof(buf)-1] = '\0';
812 if(meta && len == 1)
813 ttywrite("\033", 1);
814 ttywrite(buf, len);
815 return;
816 }
817 switch(ksym) {
818 #ifdef DEBUG1
819 default:
820 printf("errkey: %d\n", (int)ksym);
821 break;
822 #endif
823 case XK_Up:
824 case XK_Down:
825 case XK_Left:
826 case XK_Right:
827 sprintf(buf, "\033[%c", "DACB"[ksym - XK_Left]);
828 ttywrite(buf, 3);
829 break;
830 case XK_Delete: ttywrite(KEYDELETE, sizeof(KEYDELETE)-1); break;
831 case XK_Home: ttywrite( KEYHOME, sizeof( KEYHOME)-1); break;
832 case XK_End: ttywrite( KEYEND, sizeof( KEYEND)-1); break;
833 case XK_Prior: ttywrite( KEYPREV, sizeof( KEYPREV)-1); break;
834 case XK_Next: ttywrite( KEYNEXT, sizeof( KEYNEXT)-1); break;
835 case XK_Insert:
836 /* XXX: paste X clipboard */
837 if(shift);
838 break;
839 }
840 }
841
842 void
843 resize(XEvent *e) {
844 int col, row;
845 col = e->xconfigure.width / xw.cw;
846 row = e->xconfigure.height / xw.ch;
847
848 if(term.col != col && term.row != row) {
849 tresize(col, row);
850 ttyresize(col, row);
851 xw.w = e->xconfigure.width;
852 xw.h = e->xconfigure.height;
853 draw(SCredraw);
854 }
855 }
856
857
858 void
859 run(void) {
860 int ret;
861 XEvent ev;
862 fd_set rfd;
863 struct timeval tv = {0, 10000};
864
865 running = 1;
866 XSelectInput(xw.dis, xw.win, ExposureMask | KeyPressMask | StructureNotifyMask);
867 XResizeWindow(xw.dis, xw.win, xw.w , xw.h); /* seems to fix the resize bug in wmii */
868 while(running) {
869 while(XPending(xw.dis)) {
870 XNextEvent(xw.dis, &ev);
871 switch (ev.type) {
872 default:
873 break;
874 case KeyPress:
875 kpress(&ev.xkey);
876 break;
877 case Expose:
878 draw(SCredraw);
879 break;
880 case ConfigureNotify:
881 resize(&ev);
882 break;
883 }
884 }
885 FD_ZERO(&rfd);
886 FD_SET(cmdfd, &rfd);
887 ret = select(cmdfd+1, &rfd, NULL, NULL, &tv);
888 if(ret < 0) {
889 fprintf(stderr, "select: %m\n");
890 running = 0;
891 }
892 if(!ret)
893 continue;
894 if(FD_ISSET(cmdfd, &rfd)) {
895 ttyread();
896 draw(SCupdate);
897 }
898 }
899 }
900
901 int
902 main(int argc, char *argv[]) {
903 if(argc == 2 && !strncmp("-v", argv[1], 3))
904 die("st-" VERSION ", © 2009 st engineers\n");
905 else if(argc != 1)
906 die("usage: st [-v]\n");
907 setlocale(LC_CTYPE, "");
908 tnew(80, 24);
909 ttynew();
910 xinit();
911 run();
912 return 0;
913 }