blob: 417b91e681a42b661c2047c3b54eba9b70aa9ffb [file] [log] [blame]
Bram Moolenaare4f25e42017-07-07 11:54:15 +02001#include "vterm.h"
Bram Moolenaar707d2262019-12-04 22:16:54 +01002#include "../src/vterm_internal.h" // We pull in some internal bits too
Bram Moolenaare4f25e42017-07-07 11:54:15 +02003
4#include <stdio.h>
5#include <string.h>
6
7#define streq(a,b) (!strcmp(a,b))
8#define strstartswith(a,b) (!strncmp(a,b,strlen(b)))
9
10static size_t inplace_hex2bytes(char *s)
11{
12 char *inpos = s, *outpos = s;
13
14 while(*inpos) {
15 unsigned int ch;
16 sscanf(inpos, "%2x", &ch);
17 *outpos = ch;
18 outpos += 1; inpos += 2;
19 }
20
21 return outpos - s;
22}
23
24static VTermModifier strpe_modifiers(char **strp)
25{
26 VTermModifier state = 0;
27
28 while((*strp)[0]) {
29 switch(((*strp)++)[0]) {
30 case 'S': state |= VTERM_MOD_SHIFT; break;
31 case 'C': state |= VTERM_MOD_CTRL; break;
32 case 'A': state |= VTERM_MOD_ALT; break;
33 default: return state;
34 }
35 }
36
37 return state;
38}
39
40static VTermKey strp_key(char *str)
41{
42 static struct {
43 char *name;
44 VTermKey key;
45 } keys[] = {
46 { "Up", VTERM_KEY_UP },
47 { "Tab", VTERM_KEY_TAB },
48 { "Enter", VTERM_KEY_ENTER },
49 { "KP0", VTERM_KEY_KP_0 },
50 { NULL, VTERM_KEY_NONE },
51 };
52 int i;
53
54 for(i = 0; keys[i].name; i++) {
55 if(streq(str, keys[i].name))
56 return keys[i].key;
57 }
58
59 return VTERM_KEY_NONE;
60}
61
62static VTerm *vt;
63static VTermState *state;
64static VTermScreen *screen;
65
66static VTermEncodingInstance encoding;
67
Bram Moolenaard19a8f92020-04-11 21:42:48 +020068static int parser_text(const char bytes[], size_t len, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +020069{
Bram Moolenaar81ea1df2020-04-11 18:01:41 +020070 size_t i;
Bram Moolenaare4f25e42017-07-07 11:54:15 +020071
72 printf("text ");
73 for(i = 0; i < len; i++) {
74 unsigned char b = bytes[i];
75 if(b < 0x20 || b == 0x7f || (b >= 0x80 && b < 0xa0))
76 break;
77 printf(i ? ",%x" : "%x", b);
78 }
79 printf("\n");
80
81 return i;
82}
83
Bram Moolenaard19a8f92020-04-11 21:42:48 +020084static int parser_control(unsigned char control, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +020085{
86 printf("control %02x\n", control);
87
88 return 1;
89}
90
Bram Moolenaard19a8f92020-04-11 21:42:48 +020091static int parser_escape(const char bytes[], size_t len, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +020092{
Bram Moolenaar81ea1df2020-04-11 18:01:41 +020093 size_t i;
Bram Moolenaare4f25e42017-07-07 11:54:15 +020094
95 if(bytes[0] >= 0x20 && bytes[0] < 0x30) {
96 if(len < 2)
97 return -1;
98 len = 2;
99 }
100 else {
101 len = 1;
102 }
103
104 printf("escape ");
105 for(i = 0; i < len; i++)
106 printf("%02x", bytes[i]);
107 printf("\n");
108
109 return len;
110}
111
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200112static int parser_csi(const char *leader, const long args[], int argcount, const char *intermed, char command, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200113{
114 int i;
115 printf("csi %02x", command);
116
117 if(leader && leader[0]) {
118 printf(" L=");
119 for(i = 0; leader[i]; i++)
120 printf("%02x", leader[i]);
121 }
122
123 for(i = 0; i < argcount; i++) {
124 char sep = i ? ',' : ' ';
125
126 if(args[i] == CSI_ARG_MISSING)
127 printf("%c*", sep);
128 else
129 printf("%c%ld%s", sep, CSI_ARG(args[i]), CSI_ARG_HAS_MORE(args[i]) ? "+" : "");
130 }
131
132 if(intermed && intermed[0]) {
133 printf(" I=");
134 for(i = 0; intermed[i]; i++)
135 printf("%02x", intermed[i]);
136 }
137
138 printf("\n");
139
140 return 1;
141}
142
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200143static int parser_osc(const char *command, size_t cmdlen, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200144{
Bram Moolenaar81ea1df2020-04-11 18:01:41 +0200145 size_t i;
Bram Moolenaar81ea1df2020-04-11 18:01:41 +0200146
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200147 printf("osc ");
148 for(i = 0; i < cmdlen; i++)
149 printf("%02x", command[i]);
150 printf("\n");
151
152 return 1;
153}
154
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200155static int parser_dcs(const char *command, size_t cmdlen, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200156{
Bram Moolenaar81ea1df2020-04-11 18:01:41 +0200157 size_t i;
Bram Moolenaar81ea1df2020-04-11 18:01:41 +0200158
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200159 printf("dcs ");
160 for(i = 0; i < cmdlen; i++)
161 printf("%02x", command[i]);
162 printf("\n");
163
164 return 1;
165}
166
167static VTermParserCallbacks parser_cbs = {
Bram Moolenaar707d2262019-12-04 22:16:54 +0100168 parser_text, // text
169 parser_control, // control
170 parser_escape, // escape
171 parser_csi, // csi
172 parser_osc, // osc
173 parser_dcs, // dcs
174 NULL // resize
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200175};
176
Bram Moolenaar707d2262019-12-04 22:16:54 +0100177// These callbacks are shared by State and Screen
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200178
179static int want_movecursor = 0;
180static VTermPos state_pos;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200181static int movecursor(VTermPos pos, VTermPos oldpos UNUSED, int visible UNUSED, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200182{
183 state_pos = pos;
184
185 if(want_movecursor)
186 printf("movecursor %d,%d\n", pos.row, pos.col);
187
188 return 1;
189}
190
191static int want_scrollrect = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200192static int scrollrect(VTermRect rect, int downward, int rightward, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200193{
194 if(!want_scrollrect)
195 return 0;
196
197 printf("scrollrect %d..%d,%d..%d => %+d,%+d\n",
198 rect.start_row, rect.end_row, rect.start_col, rect.end_col,
199 downward, rightward);
200
201 return 1;
202}
203
204static int want_moverect = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200205static int moverect(VTermRect dest, VTermRect src, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200206{
207 if(!want_moverect)
208 return 0;
209
210 printf("moverect %d..%d,%d..%d -> %d..%d,%d..%d\n",
211 src.start_row, src.end_row, src.start_col, src.end_col,
212 dest.start_row, dest.end_row, dest.start_col, dest.end_col);
213
214 return 1;
215}
216
217static int want_settermprop = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200218static int settermprop(VTermProp prop, VTermValue *val, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200219{
220 VTermValueType type;
221 if(!want_settermprop)
222 return 1;
223
224 type = vterm_get_prop_type(prop);
225 switch(type) {
226 case VTERM_VALUETYPE_BOOL:
227 printf("settermprop %d %s\n", prop, val->boolean ? "true" : "false");
228 return 1;
229 case VTERM_VALUETYPE_INT:
230 printf("settermprop %d %d\n", prop, val->number);
231 return 1;
232 case VTERM_VALUETYPE_STRING:
233 printf("settermprop %d \"%s\"\n", prop, val->string);
234 return 1;
235 case VTERM_VALUETYPE_COLOR:
236 printf("settermprop %d rgb(%d,%d,%d)\n", prop, val->color.red, val->color.green, val->color.blue);
237 return 1;
Bram Moolenaarb5b49a32018-03-25 16:20:37 +0200238
239 case VTERM_N_VALUETYPES:
240 return 0;
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200241 }
242
243 return 0;
244}
245
Bram Moolenaar707d2262019-12-04 22:16:54 +0100246// These callbacks are for State
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200247
248static int want_state_putglyph = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200249static int state_putglyph(VTermGlyphInfo *info, VTermPos pos, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200250{
251 int i;
252 if(!want_state_putglyph)
253 return 1;
254
255 printf("putglyph ");
256 for(i = 0; info->chars[i]; i++)
257 printf(i ? ",%x" : "%x", info->chars[i]);
258 printf(" %d %d,%d", info->width, pos.row, pos.col);
259 if(info->protected_cell)
260 printf(" prot");
261 if(info->dwl)
262 printf(" dwl");
263 if(info->dhl)
264 printf(" dhl-%s", info->dhl == 1 ? "top" : info->dhl == 2 ? "bottom" : "?" );
265 printf("\n");
266
267 return 1;
268}
269
270static int want_state_erase = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200271static int state_erase(VTermRect rect, int selective, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200272{
273 if(!want_state_erase)
274 return 1;
275
276 printf("erase %d..%d,%d..%d%s\n",
277 rect.start_row, rect.end_row, rect.start_col, rect.end_col,
278 selective ? " selective" : "");
279
280 return 1;
281}
282
283static struct {
284 int bold;
285 int underline;
286 int italic;
287 int blink;
288 int reverse;
289 int strike;
290 int font;
291 VTermColor foreground;
292 VTermColor background;
293} state_pen;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200294static int state_setpenattr(VTermAttr attr, VTermValue *val, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200295{
296 switch(attr) {
297 case VTERM_ATTR_BOLD:
298 state_pen.bold = val->boolean;
299 break;
300 case VTERM_ATTR_UNDERLINE:
301 state_pen.underline = val->number;
302 break;
303 case VTERM_ATTR_ITALIC:
304 state_pen.italic = val->boolean;
305 break;
306 case VTERM_ATTR_BLINK:
307 state_pen.blink = val->boolean;
308 break;
309 case VTERM_ATTR_REVERSE:
310 state_pen.reverse = val->boolean;
311 break;
312 case VTERM_ATTR_STRIKE:
313 state_pen.strike = val->boolean;
314 break;
315 case VTERM_ATTR_FONT:
316 state_pen.font = val->number;
317 break;
318 case VTERM_ATTR_FOREGROUND:
319 state_pen.foreground = val->color;
320 break;
321 case VTERM_ATTR_BACKGROUND:
322 state_pen.background = val->color;
323 break;
Bram Moolenaarb5b49a32018-03-25 16:20:37 +0200324
325 case VTERM_N_ATTRS:
326 return 0;
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200327 }
328
329 return 1;
330}
331
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200332static int state_setlineinfo(int row UNUSED, const VTermLineInfo *newinfo UNUSED, const VTermLineInfo *oldinfo UNUSED, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200333{
334 return 1;
335}
336
337VTermStateCallbacks state_cbs = {
Bram Moolenaar707d2262019-12-04 22:16:54 +0100338 state_putglyph, // putglyph
339 movecursor, // movecursor
340 scrollrect, // scrollrect
341 moverect, // moverect
342 state_erase, // erase
343 NULL, // initpen
344 state_setpenattr, // setpenattr
345 settermprop, // settermprop
346 NULL, // bell
347 NULL, // resize
348 state_setlineinfo, // setlineinfo
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200349};
350
351static int want_screen_damage = 0;
352static int want_screen_damage_cells = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200353static int screen_damage(VTermRect rect, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200354{
355 if(!want_screen_damage)
356 return 1;
357
358 printf("damage %d..%d,%d..%d",
359 rect.start_row, rect.end_row, rect.start_col, rect.end_col);
360
361 if(want_screen_damage_cells) {
Bram Moolenaarb2a76ec2017-07-25 21:34:46 +0200362 int equals = FALSE;
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200363 int row;
364 int col;
365
366 for(row = rect.start_row; row < rect.end_row; row++) {
367 int eol = rect.end_col;
368 while(eol > rect.start_col) {
369 VTermScreenCell cell;
370 VTermPos pos;
371 pos.row = row;
372 pos.col = eol-1;
373 vterm_screen_get_cell(screen, pos, &cell);
374 if(cell.chars[0])
375 break;
376
377 eol--;
378 }
379
380 if(eol == rect.start_col)
381 break;
382
383 if(!equals)
Bram Moolenaarb2a76ec2017-07-25 21:34:46 +0200384 printf(" ="), equals = TRUE;
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200385
386 printf(" %d<", row);
387 for(col = rect.start_col; col < eol; col++) {
388 VTermScreenCell cell;
389 VTermPos pos;
390 pos.row = row;
391 pos.col = col;
392 vterm_screen_get_cell(screen, pos, &cell);
393 printf(col == rect.start_col ? "%02X" : " %02X", cell.chars[0]);
394 }
395 printf(">");
396 }
397 }
398
399 printf("\n");
400
401 return 1;
402}
403
404static int want_screen_scrollback = 0;
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200405static int screen_sb_pushline(int cols, const VTermScreenCell *cells, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200406{
407 int eol;
408 int c;
409
410 if(!want_screen_scrollback)
411 return 1;
412
413 eol = cols;
414 while(eol && !cells[eol-1].chars[0])
415 eol--;
416
417 printf("sb_pushline %d =", cols);
418 for(c = 0; c < eol; c++)
419 printf(" %02X", cells[c].chars[0]);
420 printf("\n");
421
422 return 1;
423}
424
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200425static int screen_sb_popline(int cols, VTermScreenCell *cells, void *user UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200426{
427 int col;
428
429 if(!want_screen_scrollback)
430 return 0;
431
Bram Moolenaar707d2262019-12-04 22:16:54 +0100432 // All lines of scrollback contain "ABCDE"
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200433 for(col = 0; col < cols; col++) {
434 if(col < 5)
435 cells[col].chars[0] = 'A' + col;
436 else
437 cells[col].chars[0] = 0;
438
439 cells[col].width = 1;
440 }
441
442 printf("sb_popline %d\n", cols);
443 return 1;
444}
445
446VTermScreenCallbacks screen_cbs = {
Bram Moolenaar707d2262019-12-04 22:16:54 +0100447 screen_damage, // damage
448 moverect, // moverect
449 movecursor, // movecursor
450 settermprop, // settermprop
451 NULL, // bell
452 NULL, // resize
453 screen_sb_pushline, // sb_pushline
454 screen_sb_popline // sb_popline
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200455};
456
Bram Moolenaard19a8f92020-04-11 21:42:48 +0200457int main(int argc UNUSED, char **argv UNUSED)
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200458{
459 char line[1024] = {0};
460 int flag;
461
462 int err;
463
464 setvbuf(stdout, NULL, _IONBF, 0);
465
466 while(fgets(line, sizeof line, stdin)) {
467 char *nl;
468 size_t outlen;
469 err = 0;
470
471 if((nl = strchr(line, '\n')))
472 *nl = '\0';
473
474 if(streq(line, "INIT")) {
475 if(!vt)
476 vt = vterm_new(25, 80);
477 }
478
479 else if(streq(line, "WANTPARSER")) {
480 vterm_parser_set_callbacks(vt, &parser_cbs, NULL);
481 }
482
483 else if(strstartswith(line, "WANTSTATE") && (line[9] == '\0' || line[9] == ' ')) {
484 int i = 9;
485 int sense = 1;
486 if(!state) {
487 state = vterm_obtain_state(vt);
488 vterm_state_set_callbacks(state, &state_cbs, NULL);
489 vterm_state_set_bold_highbright(state, 1);
490 vterm_state_reset(state, 1);
491 }
492
493 while(line[i] == ' ')
494 i++;
495 for( ; line[i]; i++)
496 switch(line[i]) {
497 case '+':
498 sense = 1;
499 break;
500 case '-':
501 sense = 0;
502 break;
503 case 'g':
504 want_state_putglyph = sense;
505 break;
506 case 's':
507 want_scrollrect = sense;
508 break;
509 case 'm':
510 want_moverect = sense;
511 break;
512 case 'e':
513 want_state_erase = sense;
514 break;
515 case 'p':
516 want_settermprop = sense;
517 break;
518 case 'f':
519 vterm_state_set_unrecognised_fallbacks(state, sense ? &parser_cbs : NULL, NULL);
520 break;
521 default:
522 fprintf(stderr, "Unrecognised WANTSTATE flag '%c'\n", line[i]);
523 }
524 }
525
526 else if(strstartswith(line, "WANTSCREEN") && (line[10] == '\0' || line[10] == ' ')) {
527 int i = 10;
528 int sense = 1;
529 if(!screen)
530 screen = vterm_obtain_screen(vt);
531 vterm_screen_enable_altscreen(screen, 1);
532 vterm_screen_set_callbacks(screen, &screen_cbs, NULL);
533
534 while(line[i] == ' ')
535 i++;
536 for( ; line[i]; i++)
537 switch(line[i]) {
538 case '-':
539 sense = 0;
540 break;
541 case 'd':
542 want_screen_damage = sense;
543 break;
544 case 'D':
545 want_screen_damage = sense;
546 want_screen_damage_cells = sense;
547 break;
548 case 'm':
549 want_moverect = sense;
550 break;
551 case 'c':
552 want_movecursor = sense;
553 break;
554 case 'p':
555 want_settermprop = 1;
556 break;
557 case 'b':
558 want_screen_scrollback = sense;
559 break;
560 default:
561 fprintf(stderr, "Unrecognised WANTSCREEN flag '%c'\n", line[i]);
562 }
563 }
564
565 else if(sscanf(line, "UTF8 %d", &flag)) {
566 vterm_set_utf8(vt, flag);
567 }
568
569 else if(streq(line, "RESET")) {
570 if(state) {
571 vterm_state_reset(state, 1);
572 vterm_state_get_cursorpos(state, &state_pos);
573 }
574 if(screen) {
575 vterm_screen_reset(screen, 1);
576 }
577 }
578
579 else if(strstartswith(line, "RESIZE ")) {
580 int rows, cols;
581 char *linep = line + 7;
582 while(linep[0] == ' ')
583 linep++;
584 sscanf(linep, "%d, %d", &rows, &cols);
585 vterm_set_size(vt, rows, cols);
586 }
587
588 else if(strstartswith(line, "PUSH ")) {
589 char *bytes = line + 5;
590 size_t len = inplace_hex2bytes(bytes);
591 size_t written = vterm_input_write(vt, bytes, len);
592 if(written < len)
593 fprintf(stderr, "! short write\n");
594 }
595
596 else if(streq(line, "WANTENCODING")) {
Bram Moolenaar707d2262019-12-04 22:16:54 +0100597 // This isn't really external API but it's hard to get this out any
598 // other way
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200599 encoding.enc = vterm_lookup_encoding(ENC_UTF8, 'u');
600 if(encoding.enc->init)
601 (*encoding.enc->init)(encoding.enc, encoding.data);
602 }
603
604 else if(strstartswith(line, "ENCIN ")) {
605 char *bytes = line + 6;
606 size_t len = inplace_hex2bytes(bytes);
607
608 uint32_t cp[1024];
609 int cpi = 0;
610 size_t pos = 0;
611
612 (*encoding.enc->decode)(encoding.enc, encoding.data,
613 cp, &cpi, len, bytes, &pos, len);
614
615 if(cpi > 0) {
616 int i;
617 printf("encout ");
618 for(i = 0; i < cpi; i++) {
619 printf(i ? ",%x" : "%x", cp[i]);
620 }
621 printf("\n");
622 }
623 }
624
625 else if(strstartswith(line, "INCHAR ")) {
626 char *linep = line + 7;
627 unsigned int c = 0;
628 VTermModifier mod;
629 while(linep[0] == ' ')
630 linep++;
631 mod = strpe_modifiers(&linep);
632 sscanf(linep, " %x", &c);
633
634 vterm_keyboard_unichar(vt, c, mod);
635 }
636
637 else if(strstartswith(line, "INKEY ")) {
638 VTermModifier mod;
639 VTermKey key;
640 char *linep = line + 6;
641 while(linep[0] == ' ')
642 linep++;
643 mod = strpe_modifiers(&linep);
644 while(linep[0] == ' ')
645 linep++;
646 key = strp_key(linep);
647
648 vterm_keyboard_key(vt, key, mod);
649 }
650
651 else if(strstartswith(line, "PASTE ")) {
652 char *linep = line + 6;
653 if(streq(linep, "START"))
654 vterm_keyboard_start_paste(vt);
655 else if(streq(linep, "END"))
656 vterm_keyboard_end_paste(vt);
657 else
658 goto abort_line;
659 }
660
Bram Moolenaarb5b49a32018-03-25 16:20:37 +0200661 else if(strstartswith(line, "FOCUS ")) {
662 char *linep = line + 6;
663 if(streq(linep, "IN"))
664 vterm_state_focus_in(state);
665 else if(streq(linep, "OUT"))
666 vterm_state_focus_out(state);
667 else
668 goto abort_line;
669 }
670
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200671 else if(strstartswith(line, "MOUSEMOVE ")) {
672 char *linep = line + 10;
673 int row, col, len;
674 VTermModifier mod;
675 while(linep[0] == ' ')
676 linep++;
677 sscanf(linep, "%d,%d%n", &row, &col, &len);
678 linep += len;
679 while(linep[0] == ' ')
680 linep++;
681 mod = strpe_modifiers(&linep);
682 vterm_mouse_move(vt, row, col, mod);
683 }
684
685 else if(strstartswith(line, "MOUSEBTN ")) {
686 char *linep = line + 9;
687 char press;
688 int button, len;
689 VTermModifier mod;
690 while(linep[0] == ' ')
691 linep++;
692 sscanf(linep, "%c %d%n", &press, &button, &len);
693 linep += len;
694 while(linep[0] == ' ')
695 linep++;
696 mod = strpe_modifiers(&linep);
697 vterm_mouse_button(vt, button, (press == 'd' || press == 'D'), mod);
698 }
699
700 else if(strstartswith(line, "DAMAGEMERGE ")) {
701 char *linep = line + 12;
702 while(linep[0] == ' ')
703 linep++;
704 if(streq(linep, "CELL"))
705 vterm_screen_set_damage_merge(screen, VTERM_DAMAGE_CELL);
706 else if(streq(linep, "ROW"))
707 vterm_screen_set_damage_merge(screen, VTERM_DAMAGE_ROW);
708 else if(streq(linep, "SCREEN"))
709 vterm_screen_set_damage_merge(screen, VTERM_DAMAGE_SCREEN);
710 else if(streq(linep, "SCROLL"))
711 vterm_screen_set_damage_merge(screen, VTERM_DAMAGE_SCROLL);
712 }
713
714 else if(strstartswith(line, "DAMAGEFLUSH")) {
715 vterm_screen_flush_damage(screen);
716 }
717
718 else if(line[0] == '?') {
719 if(streq(line, "?cursor")) {
720 VTermPos pos;
721 vterm_state_get_cursorpos(state, &pos);
722 if(pos.row != state_pos.row)
723 printf("! row mismatch: state=%d,%d event=%d,%d\n",
724 pos.row, pos.col, state_pos.row, state_pos.col);
725 else if(pos.col != state_pos.col)
726 printf("! col mismatch: state=%d,%d event=%d,%d\n",
727 pos.row, pos.col, state_pos.row, state_pos.col);
728 else
729 printf("%d,%d\n", state_pos.row, state_pos.col);
730 }
731 else if(strstartswith(line, "?pen ")) {
732 VTermValue val;
733 char *linep = line + 5;
734 while(linep[0] == ' ')
735 linep++;
736
737#define BOOLSTR(v) ((v) ? "on" : "off")
738
739 if(streq(linep, "bold")) {
740 vterm_state_get_penattr(state, VTERM_ATTR_BOLD, &val);
741 if(val.boolean != state_pen.bold)
742 printf("! pen bold mismatch; state=%s, event=%s\n",
743 BOOLSTR(val.boolean), BOOLSTR(state_pen.bold));
744 else
745 printf("%s\n", BOOLSTR(state_pen.bold));
746 }
747 else if(streq(linep, "underline")) {
748 vterm_state_get_penattr(state, VTERM_ATTR_UNDERLINE, &val);
749 if(val.boolean != state_pen.underline)
750 printf("! pen underline mismatch; state=%d, event=%d\n",
751 val.boolean, state_pen.underline);
752 else
753 printf("%d\n", state_pen.underline);
754 }
755 else if(streq(linep, "italic")) {
756 vterm_state_get_penattr(state, VTERM_ATTR_ITALIC, &val);
757 if(val.boolean != state_pen.italic)
758 printf("! pen italic mismatch; state=%s, event=%s\n",
759 BOOLSTR(val.boolean), BOOLSTR(state_pen.italic));
760 else
761 printf("%s\n", BOOLSTR(state_pen.italic));
762 }
763 else if(streq(linep, "blink")) {
764 vterm_state_get_penattr(state, VTERM_ATTR_BLINK, &val);
765 if(val.boolean != state_pen.blink)
766 printf("! pen blink mismatch; state=%s, event=%s\n",
767 BOOLSTR(val.boolean), BOOLSTR(state_pen.blink));
768 else
769 printf("%s\n", BOOLSTR(state_pen.blink));
770 }
771 else if(streq(linep, "reverse")) {
772 vterm_state_get_penattr(state, VTERM_ATTR_REVERSE, &val);
773 if(val.boolean != state_pen.reverse)
774 printf("! pen reverse mismatch; state=%s, event=%s\n",
775 BOOLSTR(val.boolean), BOOLSTR(state_pen.reverse));
776 else
777 printf("%s\n", BOOLSTR(state_pen.reverse));
778 }
779 else if(streq(linep, "font")) {
780 vterm_state_get_penattr(state, VTERM_ATTR_FONT, &val);
781 if(val.boolean != state_pen.font)
782 printf("! pen font mismatch; state=%d, event=%d\n",
783 val.boolean, state_pen.font);
784 else
785 printf("%d\n", state_pen.font);
786 }
787 else if(streq(linep, "foreground")) {
788 printf("rgb(%d,%d,%d)\n", state_pen.foreground.red, state_pen.foreground.green, state_pen.foreground.blue);
789 }
790 else if(streq(linep, "background")) {
791 printf("rgb(%d,%d,%d)\n", state_pen.background.red, state_pen.background.green, state_pen.background.blue);
792 }
793 else
794 printf("?\n");
795 }
796 else if(strstartswith(line, "?screen_chars ")) {
797 char *linep = line + 13;
798 VTermRect rect;
799 size_t len;
800 while(linep[0] == ' ')
801 linep++;
802 if(sscanf(linep, "%d,%d,%d,%d", &rect.start_row, &rect.start_col, &rect.end_row, &rect.end_col) < 4) {
803 printf("! screen_chars unrecognised input\n");
804 goto abort_line;
805 }
806 len = vterm_screen_get_chars(screen, NULL, 0, rect);
807 if(len == (size_t)-1)
808 printf("! screen_chars error\n");
809 else if(len == 0)
810 printf("\n");
811 else {
812 uint32_t *chars = malloc(sizeof(uint32_t) * len);
813 size_t i;
814 vterm_screen_get_chars(screen, chars, len, rect);
815 for(i = 0; i < len; i++) {
816 printf("0x%02x%s", chars[i], i < len-1 ? "," : "\n");
817 }
818 free(chars);
819 }
820 }
821 else if(strstartswith(line, "?screen_text ")) {
822 char *linep = line + 12;
823 VTermRect rect;
824 size_t len;
825 while(linep[0] == ' ')
826 linep++;
827 if(sscanf(linep, "%d,%d,%d,%d", &rect.start_row, &rect.start_col, &rect.end_row, &rect.end_col) < 4) {
828 printf("! screen_text unrecognised input\n");
829 goto abort_line;
830 }
831 len = vterm_screen_get_text(screen, NULL, 0, rect);
832 if(len == (size_t)-1)
833 printf("! screen_text error\n");
834 else if(len == 0)
835 printf("\n");
836 else {
Bram Moolenaar707d2262019-12-04 22:16:54 +0100837 // Put an overwrite guard at both ends of the buffer
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200838 unsigned char *buffer = malloc(len + 4);
839 unsigned char *text = buffer + 2;
840 text[-2] = 0x55; text[-1] = 0xAA;
841 text[len] = 0x55; text[len+1] = 0xAA;
842
843 vterm_screen_get_text(screen, (char *)text, len, rect);
844
845 if(text[-2] != 0x55 || text[-1] != 0xAA)
846 printf("! screen_get_text buffer overrun left [%02x,%02x]\n", text[-2], text[-1]);
847 else if(text[len] != 0x55 || text[len+1] != 0xAA)
848 printf("! screen_get_text buffer overrun right [%02x,%02x]\n", text[len], text[len+1]);
849 else
850 {
851 size_t i;
852 for(i = 0; i < len; i++) {
853 printf("0x%02x%s", text[i], i < len-1 ? "," : "\n");
854 }
855 }
856
857 free(buffer);
858 }
859 }
860 else if(strstartswith(line, "?screen_cell ")) {
861 char *linep = line + 12;
862 int i;
863 VTermPos pos;
864 VTermScreenCell cell;
865 while(linep[0] == ' ')
866 linep++;
867 if(sscanf(linep, "%d,%d\n", &pos.row, &pos.col) < 2) {
868 printf("! screen_cell unrecognised input\n");
869 goto abort_line;
870 }
871 if(!vterm_screen_get_cell(screen, pos, &cell))
872 goto abort_line;
873 printf("{");
874 for(i = 0; i < VTERM_MAX_CHARS_PER_CELL && cell.chars[i]; i++) {
875 printf("%s0x%x", i ? "," : "", cell.chars[i]);
876 }
877 printf("} width=%d attrs={", cell.width);
878 if(cell.attrs.bold) printf("B");
879 if(cell.attrs.underline) printf("U%d", cell.attrs.underline);
880 if(cell.attrs.italic) printf("I");
881 if(cell.attrs.blink) printf("K");
882 if(cell.attrs.reverse) printf("R");
883 if(cell.attrs.font) printf("F%d", cell.attrs.font);
884 printf("} ");
885 if(cell.attrs.dwl) printf("dwl ");
886 if(cell.attrs.dhl) printf("dhl-%s ", cell.attrs.dhl == 2 ? "bottom" : "top");
887 printf("fg=rgb(%d,%d,%d) ", cell.fg.red, cell.fg.green, cell.fg.blue);
888 printf("bg=rgb(%d,%d,%d)\n", cell.bg.red, cell.bg.green, cell.bg.blue);
889 }
890 else if(strstartswith(line, "?screen_eol ")) {
891 VTermPos pos;
892 char *linep = line + 12;
893 while(linep[0] == ' ')
894 linep++;
895 if(sscanf(linep, "%d,%d\n", &pos.row, &pos.col) < 2) {
896 printf("! screen_eol unrecognised input\n");
897 goto abort_line;
898 }
899 printf("%d\n", vterm_screen_is_eol(screen, pos));
900 }
901 else if(strstartswith(line, "?screen_attrs_extent ")) {
902 VTermPos pos;
903 VTermRect rect;
904 char *linep = line + 21;
905 while(linep[0] == ' ')
906 linep++;
907 if(sscanf(linep, "%d,%d\n", &pos.row, &pos.col) < 2) {
908 printf("! screen_attrs_extent unrecognised input\n");
909 goto abort_line;
910 }
911 rect.start_col = 0;
912 rect.end_col = -1;
913 if(!vterm_screen_get_attrs_extent(screen, &rect, pos, ~0)) {
914 printf("! screen_attrs_extent failed\n");
915 goto abort_line;
916 }
917 printf("%d,%d-%d,%d\n", rect.start_row, rect.start_col, rect.end_row, rect.end_col);
918 }
919 else
920 printf("?\n");
921
922 memset(line, 0, sizeof line);
923 continue;
924 }
925
926 else
927 abort_line: err = 1;
928
929 outlen = vterm_output_get_buffer_current(vt);
930 if(outlen > 0) {
Bram Moolenaar81ea1df2020-04-11 18:01:41 +0200931 size_t i;
Bram Moolenaare4f25e42017-07-07 11:54:15 +0200932 char outbuff[1024];
933 vterm_output_read(vt, outbuff, outlen);
934
935 printf("output ");
936 for(i = 0; i < outlen; i++)
937 printf("%x%s", (unsigned char)outbuff[i], i < outlen-1 ? "," : "\n");
938 }
939
940 printf(err ? "?\n" : "DONE\n");
941 }
942
943 vterm_free(vt);
944
945 return 0;
946}