clients/terminal.c

   1 /*
   2  * Copyright © 2008 Kristian Høgsberg
   3  *
   4  * Permission to use, copy, modify, distribute, and sell this software and its
   5  * documentation for any purpose is hereby granted without fee, provided that
   6  * the above copyright notice appear in all copies and that both that copyright
   7  * notice and this permission notice appear in supporting documentation, and
   8  * that the name of the copyright holders not be used in advertising or
   9  * publicity pertaining to distribution of the software without specific,
  10  * written prior permission.  The copyright holders make no representations
  11  * about the suitability of this software for any purpose.  It is provided "as
  12  * is" without express or implied warranty.
  13  *
  14  * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  15  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
  16  * EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  17  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
  18  * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
  19  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
  20  * OF THIS SOFTWARE.
  21  */
  22
  23 #include <stdint.h>
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <fcntl.h>
  28 #include <unistd.h>
  29 #include <math.h>
  30 #include <time.h>
  31 #include <pty.h>
  32 #include <ctype.h>
  33 #include <cairo.h>
  34 #include <glib.h>
  35 #include <sys/epoll.h>
  36
  37 #include <X11/keysym.h>
  38
  39 #include <wayland-client.h>
  40
  41 #include "window.h"
  42
  43 static int option_fullscreen;
  44
  45 #define MOD_SHIFT       0x01
  46 #define MOD_ALT         0x02
  47 #define MOD_CTRL        0x04
  48
  49 #define ATTRMASK_BOLD           0x01
  50 #define ATTRMASK_UNDERLINE      0x02
  51 #define ATTRMASK_BLINK          0x04
  52 #define ATTRMASK_INVERSE        0x08
  53 #define ATTRMASK_CONCEALED      0x10
  54
  55 /* Buffer sizes */
  56 #define MAX_RESPONSE            256
  57 #define MAX_ESCAPE              255
  58
  59 /* Terminal modes */
  60 #define MODE_SHOW_CURSOR        0x00000001
  61 #define MODE_INVERSE            0x00000002
  62 #define MODE_AUTOWRAP           0x00000004
  63 #define MODE_AUTOREPEAT         0x00000008
  64 #define MODE_LF_NEWLINE         0x00000010
  65 #define MODE_IRM                0x00000020
  66 #define MODE_DELETE_SENDS_DEL   0x00000040
  67 #define MODE_ALT_SENDS_ESC      0x00000080
  68
  69 union utf8_char {
  70         unsigned char byte[4];
  71         uint32_t ch;
  72 };
  73
  74 enum utf8_state {
  75         utf8state_start,
  76         utf8state_accept,
  77         utf8state_reject,
  78         utf8state_expect3,
  79         utf8state_expect2,
  80         utf8state_expect1
  81 };
  82
  83 struct utf8_state_machine {
  84         enum utf8_state state;
  85         int len;
  86         union utf8_char s;
  87 };
  88
  89 static void
  90 init_state_machine(struct utf8_state_machine *machine)
  91 {
  92         machine->state = utf8state_start;
  93         machine->len = 0;
  94         machine->s.ch = 0;
  95 }
  96
  97 static enum utf8_state
  98 utf8_next_char(struct utf8_state_machine *machine, char c)
  99 {
 100         switch(machine->state) {
 101         case utf8state_start:
 102         case utf8state_accept:
 103         case utf8state_reject:
 104                 machine->s.ch = 0;
 105                 machine->len = 0;
 106                 if(c == 0xC0 || c == 0xC1) {
 107                         /* overlong encoding, reject */
 108                         machine->state = utf8state_reject;
 109                 } else if((c & 0x80) == 0) {
 110                         /* single byte, accept */
 111                         machine->s.byte[machine->len++] = c;
 112                         machine->state = utf8state_accept;
 113                 } else if((c & 0xC0) == 0x80) {
 114                         /* parser out of sync, ignore byte */
 115                         machine->state = utf8state_start;
 116                 } else if((c & 0xE0) == 0xC0) {
 117                         /* start of two byte sequence */
 118                         machine->s.byte[machine->len++] = c;
 119                         machine->state = utf8state_expect1;
 120                 } else if((c & 0xF0) == 0xE0) {
 121                         /* start of three byte sequence */
 122                         machine->s.byte[machine->len++] = c;
 123                         machine->state = utf8state_expect2;
 124                 } else if((c & 0xF8) == 0xF0) {
 125                         /* start of four byte sequence */
 126                         machine->s.byte[machine->len++] = c;
 127                         machine->state = utf8state_expect3;
 128                 } else {
 129                         /* overlong encoding, reject */
 130                         machine->state = utf8state_reject;
 131                 }
 132                 break;
 133         case utf8state_expect3:
 134                 machine->s.byte[machine->len++] = c;
 135                 if((c & 0xC0) == 0x80) {
 136                         /* all good, continue */
 137                         machine->state = utf8state_expect2;
 138                 } else {
 139                         /* missing extra byte, reject */
 140                         machine->state = utf8state_reject;
 141                 }
 142                 break;
 143         case utf8state_expect2:
 144                 machine->s.byte[machine->len++] = c;
 145                 if((c & 0xC0) == 0x80) {
 146                         /* all good, continue */
 147                         machine->state = utf8state_expect1;
 148                 } else {
 149                         /* missing extra byte, reject */
 150                         machine->state = utf8state_reject;
 151                 }
 152                 break;
 153         case utf8state_expect1:
 154                 machine->s.byte[machine->len++] = c;
 155                 if((c & 0xC0) == 0x80) {
 156                         /* all good, accept */
 157                         machine->state = utf8state_accept;
 158                 } else {
 159                         /* missing extra byte, reject */
 160                         machine->state = utf8state_reject;
 161                 }
 162                 break;
 163         default:
 164                 machine->state = utf8state_reject;
 165                 break;
 166         }
 167
 168         return machine->state;
 169 }
 170
 171 struct char_sub {
 172         union utf8_char match;
 173         union utf8_char replace;
 174 };
 175 /* Set last char_sub match to NULL char */
 176 typedef struct char_sub *character_set;
 177
 178 struct char_sub CS_US[] = {
 179         {{{0, }}, {{0, }}}
 180 };
 181 static struct char_sub CS_UK[] = {
 182         {{{'#', 0, }}, {{0xC2, 0xA3, 0, }}},
 183         {{{0, }}, {{0, }}}
 184 };
 185 static struct char_sub CS_SPECIAL[] = {
 186         {{{'`', 0, }}, {{0xE2, 0x99, 0xA6, 0}}}, /* diamond */
 187         {{{'a', 0, }}, {{0xE2, 0x96, 0x92, 0}}}, /* 50% cell */
 188         {{{'b', 0, }}, {{0xE2, 0x90, 0x89, 0}}}, /* HT */
 189         {{{'c', 0, }}, {{0xE2, 0x90, 0x8C, 0}}}, /* FF */
 190         {{{'d', 0, }}, {{0xE2, 0x90, 0x8D, 0}}}, /* CR */
 191         {{{'e', 0, }}, {{0xE2, 0x90, 0x8A, 0}}}, /* LF */
 192         {{{'f', 0, }}, {{0xC2, 0xB0, 0, }}}, /* Degree */
 193         {{{'g', 0, }}, {{0xC2, 0xB1, 0, }}}, /* Plus/Minus */
 194         {{{'h', 0, }}, {{0xE2, 0x90, 0xA4, 0}}}, /* NL */
 195         {{{'i', 0, }}, {{0xE2, 0x90, 0x8B, 0}}}, /* VT */
 196         {{{'j', 0, }}, {{0xE2, 0x94, 0x98, 0}}}, /* CN_RB */
 197         {{{'k', 0, }}, {{0xE2, 0x94, 0x90, 0}}}, /* CN_RT */
 198         {{{'l', 0, }}, {{0xE2, 0x94, 0x8C, 0}}}, /* CN_LT */
 199         {{{'m', 0, }}, {{0xE2, 0x94, 0x94, 0}}}, /* CN_RB */
 200         {{{'n', 0, }}, {{0xE2, 0x94, 0xBC, 0}}}, /* CROSS */
 201         {{{'o', 0, }}, {{0xE2, 0x94, 0x80, 0}}}, /* H */
 202         {{{'p', 0, }}, {{0xE2, 0x94, 0x80, 0}}}, /* H */
 203         {{{'q', 0, }}, {{0xE2, 0x94, 0x80, 0}}}, /* H */
 204         {{{'r', 0, }}, {{0xE2, 0x94, 0x80, 0}}}, /* H */
 205         {{{'s', 0, }}, {{0xE2, 0x94, 0x80, 0}}}, /* H */
 206         {{{'t', 0, }}, {{0xE2, 0x94, 0x9C, 0}}}, /* TR */
 207         {{{'u', 0, }}, {{0xE2, 0x94, 0xA4, 0}}}, /* TL */
 208         {{{'v', 0, }}, {{0xE2, 0x94, 0xB4, 0}}}, /* TU */
 209         {{{'w', 0, }}, {{0xE2, 0x94, 0xAC, 0}}}, /* TD */
 210         {{{'x', 0, }}, {{0xE2, 0x94, 0x82, 0}}}, /* V */
 211         {{{'y', 0, }}, {{0xE2, 0x89, 0xA4, 0}}}, /* LE */
 212         {{{'z', 0, }}, {{0xE2, 0x89, 0xA5, 0}}}, /* GE */
 213         {{{'{', 0, }}, {{0xCF, 0x80, 0, }}}, /* PI */
 214         {{{'|', 0, }}, {{0xE2, 0x89, 0xA0, 0}}}, /* NEQ */
 215         {{{'}', 0, }}, {{0xC2, 0xA3, 0, }}}, /* POUND */
 216         {{{'~', 0, }}, {{0xE2, 0x8B, 0x85, 0}}}, /* DOT */
 217         {{{0, }}, {{0, }}}
 218 };
 219
 220 static void
 221 apply_char_set(character_set cs, union utf8_char *utf8)
 222 {
 223         int i = 0;
 224
 225         while (cs[i].match.byte[0]) {
 226                 if ((*utf8).ch == cs[i].match.ch) {
 227                         *utf8 = cs[i].replace;
 228                         break;
 229                 }
 230                 i++;
 231         }
 232 }
 233
 234 struct key_map {
 235         int sym;
 236         int num;
 237         char escape;
 238         char code;
 239 };
 240 /* Set last key_sub sym to NULL */
 241 typedef struct key_map *keyboard_mode;
 242
 243 static struct key_map KM_NORMAL[] = {
 244         {XK_Left,  1, '[', 'D'},
 245         {XK_Right, 1, '[', 'C'},
 246         {XK_Up,    1, '[', 'A'},
 247         {XK_Down,  1, '[', 'B'},
 248         {XK_Home,  1, '[', 'H'},
 249         {XK_End,   1, '[', 'F'},
 250         {0, 0, 0, 0}
 251 };
 252 static struct key_map KM_APPLICATION[] = {
 253         {XK_Left,          1, 'O', 'D'},
 254         {XK_Right,         1, 'O', 'C'},
 255         {XK_Up,            1, 'O', 'A'},
 256         {XK_Down,          1, 'O', 'B'},
 257         {XK_Home,          1, 'O', 'H'},
 258         {XK_End,           1, 'O', 'F'},
 259         {XK_KP_Enter,      1, 'O', 'M'},
 260         {XK_KP_Multiply,   1, 'O', 'j'},
 261         {XK_KP_Add,        1, 'O', 'k'},
 262         {XK_KP_Separator,  1, 'O', 'l'},
 263         {XK_KP_Subtract,   1, 'O', 'm'},
 264         {XK_KP_Divide,     1, 'O', 'o'},
 265         {0, 0, 0, 0}
 266 };
 267
 268 static int
 269 function_key_response(char escape, int num, uint32_t modifiers,
 270                       char code, char *response)
 271 {
 272         int mod_num = 0;
 273         int len;
 274
 275         if (modifiers & XKB_COMMON_SHIFT_MASK) mod_num   |= 1;
 276         if (modifiers & XKB_COMMON_MOD1_MASK) mod_num    |= 2;
 277         if (modifiers & XKB_COMMON_CONTROL_MASK) mod_num |= 4;
 278
 279         if (mod_num != 0)
 280                 len = snprintf(response, MAX_RESPONSE, "\e[%d;%d%c",
 281                                num, mod_num + 1, code);
 282         else if (code != '~')
 283                 len = snprintf(response, MAX_RESPONSE, "\e%c%c",
 284                                escape, code);
 285         else
 286                 len = snprintf(response, MAX_RESPONSE, "\e%c%d%c",
 287                                escape, num, code);
 288
 289         if (len >= MAX_RESPONSE)        return MAX_RESPONSE - 1;
 290         else                            return len;
 291 }
 292
 293 /* returns the number of bytes written into response,
 294  * which must have room for MAX_RESPONSE bytes */
 295 static int
 296 apply_key_map(keyboard_mode mode, int sym, uint32_t modifiers, char *response)
 297 {
 298         struct key_map map;
 299         int len = 0;
 300         int i = 0;
 301
 302         while (mode[i].sym) {
 303                 map = mode[i++];
 304                 if (sym == map.sym) {
 305                         len = function_key_response(map.escape, map.num,
 306                                                     modifiers, map.code,
 307                                                     response);
 308                         break;
 309                 }
 310         }
 311
 312         return len;
 313 }
 314
 315 struct terminal_color { double r, g, b, a; };
 316 struct attr {
 317         unsigned char fg, bg;
 318         char a;        /* attributes format:
 319                         * 76543210
 320                         *    cilub */
 321         char s;        /* in selection */
 322 };
 323 struct color_scheme {
 324         struct terminal_color palette[16];
 325         char border;
 326         struct attr default_attr;
 327 };
 328
 329 static void
 330 attr_init(struct attr *data_attr, struct attr attr, int n)
 331 {
 332         int i;
 333         for (i = 0; i < n; i++) {
 334                 data_attr[i] = attr;
 335         }
 336 }
 337
 338 enum escape_state {
 339         escape_state_normal = 0,
 340         escape_state_escape,
 341         escape_state_dcs,
 342         escape_state_csi,
 343         escape_state_osc,
 344         escape_state_inner_escape,
 345         escape_state_ignore,
 346         escape_state_special
 347 };
 348
 349 #define ESC_FLAG_WHAT   0x01
 350 #define ESC_FLAG_GT     0x02
 351 #define ESC_FLAG_BANG   0x04
 352 #define ESC_FLAG_CASH   0x08
 353 #define ESC_FLAG_SQUOTE 0x10
 354 #define ESC_FLAG_DQUOTE 0x20
 355 #define ESC_FLAG_SPACE  0x40
 356
 357 struct terminal {
 358         struct window *window;
 359         struct widget *widget;
 360         struct display *display;
 361         union utf8_char *data;
 362         struct task io_task;
 363         char *tab_ruler;
 364         struct attr *data_attr;
 365         struct attr curr_attr;
 366         uint32_t mode;
 367         char origin_mode;
 368         char saved_origin_mode;
 369         struct attr saved_attr;
 370         union utf8_char last_char;
 371         int margin_top, margin_bottom;
 372         character_set cs, g0, g1;
 373         character_set saved_cs, saved_g0, saved_g1;
 374         keyboard_mode key_mode;
 375         int data_pitch, attr_pitch;  /* The width in bytes of a line */
 376         int width, height, start, row, column;
 377         int saved_row, saved_column;
 378         int fd, master;
 379         uint32_t modifiers;
 380         char escape[MAX_ESCAPE+1];
 381         int escape_length;
 382         enum escape_state state;
 383         enum escape_state outer_state;
 384         int escape_flags;
 385         struct utf8_state_machine state_machine;
 386         int margin;
 387         int fullscreen;
 388         int focused;
 389         struct color_scheme *color_scheme;
 390         struct terminal_color color_table[256];
 391         cairo_font_extents_t extents;
 392         cairo_scaled_font_t *font_normal, *font_bold;
 393
 394         struct wl_data_source *selection;
 395         int32_t dragging;
 396         int selection_start_x, selection_start_y;
 397         int selection_end_x, selection_end_y;
 398 };
 399
 400 /* Create default tab stops, every 8 characters */
 401 static void
 402 terminal_init_tabs(struct terminal *terminal)
 403 {
 404         int i = 0;
 405
 406         while (i < terminal->width) {
 407                 if (i % 8 == 0)
 408                         terminal->tab_ruler[i] = 1;
 409                 else
 410                         terminal->tab_ruler[i] = 0;
 411                 i++;
 412         }
 413 }
 414
 415 static void
 416 terminal_init(struct terminal *terminal)
 417 {
 418         terminal->curr_attr = terminal->color_scheme->default_attr;
 419         terminal->origin_mode = 0;
 420         terminal->mode = MODE_SHOW_CURSOR |
 421                          MODE_AUTOREPEAT |
 422                          MODE_ALT_SENDS_ESC |
 423                          MODE_AUTOWRAP;
 424
 425         terminal->row = 0;
 426         terminal->column = 0;
 427
 428         terminal->g0 = CS_US;
 429         terminal->g1 = CS_US;
 430         terminal->cs = terminal->g0;
 431         terminal->key_mode = KM_NORMAL;
 432
 433         terminal->saved_g0 = terminal->g0;
 434         terminal->saved_g1 = terminal->g1;
 435         terminal->saved_cs = terminal->cs;
 436
 437         terminal->saved_attr = terminal->curr_attr;
 438         terminal->saved_origin_mode = terminal->origin_mode;
 439         terminal->saved_row = terminal->row;
 440         terminal->saved_column = terminal->column;
 441
 442         if (terminal->tab_ruler != NULL) terminal_init_tabs(terminal);
 443 }
 444
 445 static void
 446 init_color_table(struct terminal *terminal)
 447 {
 448         int c, r;
 449         struct terminal_color *color_table = terminal->color_table;
 450
 451         for (c = 0; c < 256; c ++) {
 452                 if (c < 16) {
 453                         color_table[c] = terminal->color_scheme->palette[c];
 454                 } else if (c < 232) {
 455                         r = c - 16;
 456                         color_table[c].b = ((double)(r % 6) / 6.0); r /= 6;
 457                         color_table[c].g = ((double)(r % 6) / 6.0); r /= 6;
 458                         color_table[c].r = ((double)(r % 6) / 6.0);
 459                         color_table[c].a = 1.0;
 460                 } else {
 461                         r = (c - 232) * 10 + 8;
 462                         color_table[c].r = ((double) r) / 256.0;
 463                         color_table[c].g = color_table[c].r;
 464                         color_table[c].b = color_table[c].r;
 465                         color_table[c].a = 1.0;
 466                 }
 467         }
 468 }
 469
 470 static union utf8_char *
 471 terminal_get_row(struct terminal *terminal, int row)
 472 {
 473         int index;
 474
 475         index = (row + terminal->start) % terminal->height;
 476
 477         return &terminal->data[index * terminal->width];
 478 }
 479
 480 static struct attr*
 481 terminal_get_attr_row(struct terminal *terminal, int row)
 482 {
 483         int index;
 484
 485         index = (row + terminal->start) % terminal->height;
 486
 487         return &terminal->data_attr[index * terminal->width];
 488 }
 489
 490 union decoded_attr {
 491         struct attr attr;
 492         uint32_t key;
 493 };
 494
 495 static int
 496 terminal_compare_position(struct terminal *terminal,
 497                           int x, int y, int32_t ref_row, int32_t ref_col)
 498 {
 499         struct rectangle allocation;
 500         int top_margin, side_margin, col, row, ref_x;
 501
 502         window_get_child_allocation(terminal->window, &allocation);
 503         side_margin = allocation.x + (allocation.width - terminal->width * terminal->extents.max_x_advance) / 2;
 504         top_margin = allocation.y + (allocation.height - terminal->height * terminal->extents.height) / 2;
 505
 506         col = (x - side_margin) / terminal->extents.max_x_advance;
 507         row = (y - top_margin) / terminal->extents.height;
 508
 509         ref_x = side_margin + ref_col * terminal->extents.max_x_advance +
 510                 terminal->extents.max_x_advance / 2;
 511
 512         if (row < ref_row)
 513                 return -1;
 514         if (row == ref_row) {
 515                 if (col < ref_col)
 516                         return -1;
 517                 if (col == ref_col && x < ref_x)
 518                         return -1;
 519         }
 520
 521         return 1;
 522 }
 523
 524 static void
 525 terminal_decode_attr(struct terminal *terminal, int row, int col,
 526                      union decoded_attr *decoded)
 527 {
 528         struct attr attr;
 529         int foreground, background, tmp;
 530         int start_cmp, end_cmp;
 531
 532         start_cmp =
 533                 terminal_compare_position(terminal,
 534                                           terminal->selection_start_x,
 535                                           terminal->selection_start_y,
 536                                           row, col);
 537         end_cmp =
 538                 terminal_compare_position(terminal,
 539                                           terminal->selection_end_x,
 540                                           terminal->selection_end_y,
 541                                           row, col);
 542         decoded->attr.s = 0;
 543         if (start_cmp < 0 && end_cmp > 0)
 544                 decoded->attr.s = 1;
 545         else if (end_cmp < 0 && start_cmp > 0)
 546                 decoded->attr.s = 1;
 547
 548         /* get the attributes for this character cell */
 549         attr = terminal_get_attr_row(terminal, row)[col];
 550         if ((attr.a & ATTRMASK_INVERSE) ||
 551             decoded->attr.s ||
 552             ((terminal->mode & MODE_SHOW_CURSOR) &&
 553              terminal->focused && terminal->row == row &&
 554              terminal->column == col)) {
 555                 foreground = attr.bg;
 556                 background = attr.fg;
 557                 if (attr.a & ATTRMASK_BOLD) {
 558                         if (foreground <= 16) foreground |= 0x08;
 559                         if (background <= 16) background &= 0x07;
 560                 }
 561         } else {
 562                 foreground = attr.fg;
 563                 background = attr.bg;
 564         }
 565
 566         if (terminal->mode & MODE_INVERSE) {
 567                 tmp = foreground;
 568                 foreground = background;
 569                 background = tmp;
 570                 if (attr.a & ATTRMASK_BOLD) {
 571                         if (foreground <= 16) foreground |= 0x08;
 572                         if (background <= 16) background &= 0x07;
 573                 }
 574         }
 575
 576         decoded->attr.fg = foreground;
 577         decoded->attr.bg = background;
 578         decoded->attr.a = attr.a;
 579 }
 580
 581
 582 static void
 583 terminal_scroll_buffer(struct terminal *terminal, int d)
 584 {
 585         int i;
 586
 587         d = d % (terminal->height + 1);
 588         terminal->start = (terminal->start + d) % terminal->height;
 589         if (terminal->start < 0) terminal->start = terminal->height + terminal->start;
 590         if(d < 0) {
 591                 d = 0 - d;
 592                 for(i = 0; i < d; i++) {
 593                         memset(terminal_get_row(terminal, i), 0, terminal->data_pitch);
 594                         attr_init(terminal_get_attr_row(terminal, i),
 595                             terminal->curr_attr, terminal->width);
 596                 }
 597         } else {
 598                 for(i = terminal->height - d; i < terminal->height; i++) {
 599                         memset(terminal_get_row(terminal, i), 0, terminal->data_pitch);
 600                         attr_init(terminal_get_attr_row(terminal, i),
 601                             terminal->curr_attr, terminal->width);
 602                 }
 603         }
 604 }
 605
 606 static void
 607 terminal_scroll_window(struct terminal *terminal, int d)
 608 {
 609         int i;
 610         int window_height;
 611         int from_row, to_row;
 612
 613         // scrolling range is inclusive
 614         window_height = terminal->margin_bottom - terminal->margin_top + 1;
 615         d = d % (window_height + 1);
 616         if(d < 0) {
 617                 d = 0 - d;
 618                 to_row = terminal->margin_bottom;
 619                 from_row = terminal->margin_bottom - d;
 620
 621                 for (i = 0; i < (window_height - d); i++) {
 622                         memcpy(terminal_get_row(terminal, to_row - i),
 623                                terminal_get_row(terminal, from_row - i),
 624                                terminal->data_pitch);
 625                         memcpy(terminal_get_attr_row(terminal, to_row - i),
 626                                terminal_get_attr_row(terminal, from_row - i),
 627                                terminal->attr_pitch);
 628                 }
 629                 for (i = terminal->margin_top; i < (terminal->margin_top + d); i++) {
 630                         memset(terminal_get_row(terminal, i), 0, terminal->data_pitch);
 631                         attr_init(terminal_get_attr_row(terminal, i),
 632                                 terminal->curr_attr, terminal->width);
 633                 }
 634         } else {
 635                 to_row = terminal->margin_top;
 636                 from_row = terminal->margin_top + d;
 637
 638                 for (i = 0; i < (window_height - d); i++) {
 639                         memcpy(terminal_get_row(terminal, to_row + i),
 640                                terminal_get_row(terminal, from_row + i),
 641                                terminal->data_pitch);
 642                         memcpy(terminal_get_attr_row(terminal, to_row + i),
 643                                terminal_get_attr_row(terminal, from_row + i),
 644                                terminal->attr_pitch);
 645                 }
 646                 for (i = terminal->margin_bottom - d + 1; i <= terminal->margin_bottom; i++) {
 647                         memset(terminal_get_row(terminal, i), 0, terminal->data_pitch);
 648                         attr_init(terminal_get_attr_row(terminal, i),
 649                                 terminal->curr_attr, terminal->width);
 650                 }
 651         }
 652 }
 653
 654 static void
 655 terminal_scroll(struct terminal *terminal, int d)
 656 {
 657         if(terminal->margin_top == 0 && terminal->margin_bottom == terminal->height - 1)
 658                 terminal_scroll_buffer(terminal, d);
 659         else
 660                 terminal_scroll_window(terminal, d);
 661 }
 662
 663 static void
 664 terminal_shift_line(struct terminal *terminal, int d)
 665 {
 666         union utf8_char *row;
 667         struct attr *attr_row;
 668
 669         row = terminal_get_row(terminal, terminal->row);
 670         attr_row = terminal_get_attr_row(terminal, terminal->row);
 671
 672         if ((terminal->width + d) <= terminal->column)
 673                 d = terminal->column + 1 - terminal->width;
 674         if ((terminal->column + d) >= terminal->width)
 675                 d = terminal->width - terminal->column - 1;
 676
 677         if (d < 0) {
 678                 d = 0 - d;
 679                 memmove(&row[terminal->column],
 680                         &row[terminal->column + d],
 681                         (terminal->width - terminal->column - d) * sizeof(union utf8_char));
 682                 memmove(&attr_row[terminal->column], &attr_row[terminal->column + d],
 683                         (terminal->width - terminal->column - d) * sizeof(struct attr));
 684                 memset(&row[terminal->width - d], 0, d * sizeof(union utf8_char));
 685                 attr_init(&attr_row[terminal->width - d], terminal->curr_attr, d);
 686         } else {
 687                 memmove(&row[terminal->column + d], &row[terminal->column],
 688                         (terminal->width - terminal->column - d) * sizeof(union utf8_char));
 689                 memmove(&attr_row[terminal->column + d], &attr_row[terminal->column],
 690                         (terminal->width - terminal->column - d) * sizeof(struct attr));
 691                 memset(&row[terminal->column], 0, d * sizeof(union utf8_char));
 692                 attr_init(&attr_row[terminal->column], terminal->curr_attr, d);
 693         }
 694 }
 695
 696 static void
 697 terminal_resize(struct terminal *terminal, int width, int height)
 698 {
 699         size_t size;
 700         union utf8_char *data;
 701         struct attr *data_attr;
 702         char *tab_ruler;
 703         int data_pitch, attr_pitch;
 704         int i, l, total_rows;
 705         struct rectangle allocation;
 706         struct winsize ws;
 707         int32_t pixel_width, pixel_height;
 708
 709         if (width < 1)
 710                 width = 1;
 711         if (height < 1)
 712                 height = 1;
 713         if (terminal->width == width && terminal->height == height)
 714                 return;
 715
 716         if (!terminal->fullscreen) {
 717                 pixel_width = width *
 718                         terminal->extents.max_x_advance + 2 * terminal->margin;
 719                 pixel_height = height *
 720                         terminal->extents.height + 2 * terminal->margin;
 721                 window_set_child_size(terminal->window,
 722                                       pixel_width, pixel_height);
 723         }
 724
 725         window_schedule_redraw (terminal->window);
 726
 727         data_pitch = width * sizeof(union utf8_char);
 728         size = data_pitch * height;
 729         data = malloc(size);
 730         attr_pitch = width * sizeof(struct attr);
 731         data_attr = malloc(attr_pitch * height);
 732         tab_ruler = malloc(width);
 733         memset(data, 0, size);
 734         memset(tab_ruler, 0, width);
 735         attr_init(data_attr, terminal->curr_attr, width * height);
 736         if (terminal->data && terminal->data_attr) {
 737                 if (width > terminal->width)
 738                         l = terminal->width;
 739                 else
 740                         l = width;
 741
 742                 if (terminal->height > height) {
 743                         total_rows = height;
 744                 } else {
 745                         total_rows = terminal->height;
 746                 }
 747
 748                 for (i = 0; i < total_rows; i++) {
 749                         memcpy(&data[width * i],
 750                                terminal_get_row(terminal, i),
 751                                l * sizeof(union utf8_char));
 752                         memcpy(&data_attr[width * i],
 753                                terminal_get_attr_row(terminal, i),
 754                                l * sizeof(struct attr));
 755                 }
 756
 757                 free(terminal->data);
 758                 free(terminal->data_attr);
 759                 free(terminal->tab_ruler);
 760         }
 761
 762         terminal->data_pitch = data_pitch;
 763         terminal->attr_pitch = attr_pitch;
 764         terminal->margin_bottom =
 765                 height - (terminal->height - terminal->margin_bottom);
 766         terminal->width = width;
 767         terminal->height = height;
 768         terminal->data = data;
 769         terminal->data_attr = data_attr;
 770         terminal->tab_ruler = tab_ruler;
 771         terminal_init_tabs(terminal);
 772
 773         /* Update the window size */
 774         ws.ws_row = terminal->height;
 775         ws.ws_col = terminal->width;
 776         window_get_child_allocation(terminal->window, &allocation);
 777         ws.ws_xpixel = allocation.width;
 778         ws.ws_ypixel = allocation.height;
 779         ioctl(terminal->master, TIOCSWINSZ, &ws);
 780 }
 781
 782 struct color_scheme DEFAULT_COLORS = {
 783         {
 784                 {0,    0,    0,    1}, /* black */
 785                 {0.66, 0,    0,    1}, /* red */
 786                 {0  ,  0.66, 0,    1}, /* green */
 787                 {0.66, 0.33, 0,    1}, /* orange (nicer than muddy yellow) */
 788                 {0  ,  0  ,  0.66, 1}, /* blue */
 789                 {0.66, 0  ,  0.66, 1}, /* magenta */
 790                 {0,    0.66, 0.66, 1}, /* cyan */
 791                 {0.66, 0.66, 0.66, 1}, /* light grey */
 792                 {0.22, 0.33, 0.33, 1}, /* dark grey */
 793                 {1,    0.33, 0.33, 1}, /* high red */
 794                 {0.33, 1,    0.33, 1}, /* high green */
 795                 {1,    1,    0.33, 1}, /* high yellow */
 796                 {0.33, 0.33, 1,    1}, /* high blue */
 797                 {1,    0.33, 1,    1}, /* high magenta */
 798                 {0.33, 1,    1,    1}, /* high cyan */
 799                 {1,    1,    1,    1}  /* white */
 800         },
 801         0,                             /* black border */
 802         {7, 0, 0, }                    /* bg:black (0), fg:light gray (7)  */
 803 };
 804
 805 static void
 806 terminal_set_color(struct terminal *terminal, cairo_t *cr, int index)
 807 {
 808         cairo_set_source_rgba(cr,
 809                               terminal->color_table[index].r,
 810                               terminal->color_table[index].g,
 811                               terminal->color_table[index].b,
 812                               terminal->color_table[index].a);
 813 }
 814
 815 static void
 816 terminal_send_selection(struct terminal *terminal, int fd)
 817 {
 818         int row, col;
 819         union utf8_char *p_row;
 820         union decoded_attr attr;
 821         FILE *fp;
 822         int len;
 823
 824         fp = fdopen(fd, "w");
 825         for (row = 0; row < terminal->height; row++) {
 826                 p_row = terminal_get_row(terminal, row);
 827                 for (col = 0; col < terminal->width; col++) {
 828                         /* get the attributes for this character cell */
 829                         terminal_decode_attr(terminal, row, col, &attr);
 830                         if (!attr.attr.s)
 831                                 continue;
 832                         len = strnlen((char *) p_row[col].byte, 4);
 833                         fwrite(p_row[col].byte, 1, len, fp);
 834                 }
 835         }
 836         fclose(fp);
 837 }
 838
 839 struct glyph_run {
 840         struct terminal *terminal;
 841         cairo_t *cr;
 842         int count;
 843         union decoded_attr attr;
 844         cairo_glyph_t glyphs[256], *g;
 845 };
 846
 847 static void
 848 glyph_run_init(struct glyph_run *run, struct terminal *terminal, cairo_t *cr)
 849 {
 850         run->terminal = terminal;
 851         run->cr = cr;
 852         run->g = run->glyphs;
 853         run->count = 0;
 854         run->attr.key = 0;
 855 }
 856
 857 static void
 858 glyph_run_flush(struct glyph_run *run, union decoded_attr attr)
 859 {
 860         cairo_scaled_font_t *font;
 861
 862         if (run->count > ARRAY_LENGTH(run->glyphs) - 10 ||
 863             (attr.key != run->attr.key)) {
 864                 if (run->attr.attr.a & (ATTRMASK_BOLD | ATTRMASK_BLINK))
 865                         font = run->terminal->font_bold;
 866                 else
 867                         font = run->terminal->font_normal;
 868                 cairo_set_scaled_font(run->cr, font);
 869                 terminal_set_color(run->terminal, run->cr,
 870                                    run->attr.attr.fg);
 871
 872                 if (!(run->attr.attr.a & ATTRMASK_CONCEALED))
 873                         cairo_show_glyphs (run->cr, run->glyphs, run->count);
 874                 run->g = run->glyphs;
 875                 run->count = 0;
 876         }
 877         run->attr = attr;
 878 }
 879
 880 static void
 881 glyph_run_add(struct glyph_run *run, int x, int y, union utf8_char *c)
 882 {
 883         int num_glyphs;
 884         cairo_scaled_font_t *font;
 885
 886         num_glyphs = ARRAY_LENGTH(run->glyphs) - run->count;
 887
 888         if (run->attr.attr.a & (ATTRMASK_BOLD | ATTRMASK_BLINK))
 889                 font = run->terminal->font_bold;
 890         else
 891                 font = run->terminal->font_normal;
 892
 893         cairo_move_to(run->cr, x, y);
 894         cairo_scaled_font_text_to_glyphs (font, x, y,
 895                                           (char *) c->byte, 4,
 896                                           &run->g, &num_glyphs,
 897                                           NULL, NULL, NULL);
 898         run->g += num_glyphs;
 899         run->count += num_glyphs;
 900 }
 901
 902 static void
 903 terminal_draw_contents(struct terminal *terminal)
 904 {
 905         struct rectangle allocation;
 906         cairo_t *cr;
 907         int top_margin, side_margin;
 908         int row, col;
 909         union utf8_char *p_row;
 910         union decoded_attr attr;
 911         int text_x, text_y;
 912         cairo_surface_t *surface;
 913         double d;
 914         struct glyph_run run;
 915         cairo_font_extents_t extents;
 916
 917         surface = window_get_surface(terminal->window);
 918         window_get_child_allocation(terminal->window, &allocation);
 919         cr = cairo_create(surface);
 920         cairo_rectangle(cr, allocation.x, allocation.y,
 921                         allocation.width, allocation.height);
 922         cairo_clip(cr);
 923         cairo_push_group(cr);
 924
 925         cairo_set_operator(cr, CAIRO_OPERATOR_SOURCE);
 926         terminal_set_color(terminal, cr, terminal->color_scheme->border);
 927         cairo_paint(cr);
 928
 929         cairo_set_scaled_font(cr, terminal->font_normal);
 930
 931         extents = terminal->extents;
 932         side_margin = (allocation.width - terminal->width * extents.max_x_advance) / 2;
 933         top_margin = (allocation.height - terminal->height * extents.height) / 2;
 934
 935         cairo_set_line_width(cr, 1.0);
 936         cairo_translate(cr, allocation.x + side_margin,
 937                         allocation.y + top_margin);
 938         /* paint the background */
 939         for (row = 0; row < terminal->height; row++) {
 940                 for (col = 0; col < terminal->width; col++) {
 941                         /* get the attributes for this character cell */
 942                         terminal_decode_attr(terminal, row, col, &attr);
 943
 944                         if (attr.attr.bg == terminal->color_scheme->border)
 945                                 continue;
 946
 947                         terminal_set_color(terminal, cr, attr.attr.bg);
 948                         cairo_move_to(cr, col * extents.max_x_advance,
 949                                       row * extents.height);
 950                         cairo_rel_line_to(cr, extents.max_x_advance, 0);
 951                         cairo_rel_line_to(cr, 0, extents.height);
 952                         cairo_rel_line_to(cr, -extents.max_x_advance, 0);
 953                         cairo_close_path(cr);
 954                         cairo_fill(cr);
 955                 }
 956         }
 957
 958         cairo_set_operator(cr, CAIRO_OPERATOR_OVER);
 959
 960         /* paint the foreground */
 961         glyph_run_init(&run, terminal, cr);
 962         for (row = 0; row < terminal->height; row++) {
 963                 p_row = terminal_get_row(terminal, row);
 964                 for (col = 0; col < terminal->width; col++) {
 965                         /* get the attributes for this character cell */
 966                         terminal_decode_attr(terminal, row, col, &attr);
 967
 968                         glyph_run_flush(&run, attr);
 969
 970                         text_x = col * extents.max_x_advance;
 971                         text_y = extents.ascent + row * extents.height;
 972                         if (attr.attr.a & ATTRMASK_UNDERLINE) {
 973                                 terminal_set_color(terminal, cr, attr.attr.fg);
 974                                 cairo_move_to(cr, text_x, (double)text_y + 1.5);
 975                                 cairo_line_to(cr, text_x + extents.max_x_advance, (double) text_y + 1.5);
 976                                 cairo_stroke(cr);
 977                         }
 978
 979                         glyph_run_add(&run, text_x, text_y, &p_row[col]);
 980                 }
 981         }
 982
 983         attr.key = ~0;
 984         glyph_run_flush(&run, attr);
 985
 986         if ((terminal->mode & MODE_SHOW_CURSOR) && !terminal->focused) {
 987                 d = 0.5;
 988
 989                 cairo_set_line_width(cr, 1);
 990                 cairo_move_to(cr, terminal->column * extents.max_x_advance + d,
 991                               terminal->row * extents.height + d);
 992                 cairo_rel_line_to(cr, extents.max_x_advance - 2 * d, 0);
 993                 cairo_rel_line_to(cr, 0, extents.height - 2 * d);
 994                 cairo_rel_line_to(cr, -extents.max_x_advance + 2 * d, 0);
 995                 cairo_close_path(cr);
 996
 997                 cairo_stroke(cr);
 998         }
 999
1000         cairo_pop_group_to_source(cr);
1001         cairo_paint(cr);
1002         cairo_destroy(cr);
1003         cairo_surface_destroy(surface);
1004 }
1005
1006 static void
1007 terminal_write(struct terminal *terminal, const char *data, size_t length)
1008 {
1009         if (write(terminal->master, data, length) < 0)
1010                 abort();
1011 }
1012
1013 static void
1014 resize_handler(struct window *window,
1015                int32_t pixel_width, int32_t pixel_height, void *data)
1016 {
1017         struct terminal *terminal = data;
1018         int32_t width, height;
1019
1020         width = (pixel_width - 2 * terminal->margin) /
1021                 (int32_t) terminal->extents.max_x_advance;
1022         height = (pixel_height - 2 * terminal->margin) /
1023                 (int32_t) terminal->extents.height;
1024
1025         if (terminal->fullscreen)
1026                 window_set_child_size(terminal->window,
1027                                       pixel_width, pixel_height);
1028
1029         terminal_resize(terminal, width, height);
1030 }
1031
1032 static void
1033 redraw_handler(struct window *window, void *data)
1034 {
1035         struct terminal *terminal = data;
1036
1037         terminal_draw_contents(terminal);
1038 }
1039
1040 static void
1041 terminal_data(struct terminal *terminal, const char *data, size_t length);
1042
1043 static void
1044 handle_char(struct terminal *terminal, union utf8_char utf8);
1045
1046 static void
1047 handle_sgr(struct terminal *terminal, int code);
1048
1049 static void
1050 handle_term_parameter(struct terminal *terminal, int code, int sr)
1051 {
1052         int i;
1053
1054         if (terminal->escape_flags & ESC_FLAG_WHAT) {
1055                 switch(code) {
1056                 case 1:  /* DECCKM */
1057                         if (sr) terminal->key_mode = KM_APPLICATION;
1058                         else    terminal->key_mode = KM_NORMAL;
1059                         break;
1060                 case 2:  /* DECANM */
1061                         /* No VT52 support yet */
1062                         terminal->g0 = CS_US;
1063                         terminal->g1 = CS_US;
1064                         terminal->cs = terminal->g0;
1065                         break;
1066                 case 3:  /* DECCOLM */
1067                         if (sr)
1068                                 terminal_resize(terminal, 132, 24);
1069                         else
1070                                 terminal_resize(terminal, 80, 24);
1071
1072                         /* set columns, but also home cursor and clear screen */
1073                         terminal->row = 0; terminal->column = 0;
1074                         for (i = 0; i < terminal->height; i++) {
1075                                 memset(terminal_get_row(terminal, i),
1076                                     0, terminal->data_pitch);
1077                                 attr_init(terminal_get_attr_row(terminal, i),
1078                                     terminal->curr_attr, terminal->width);
1079                         }
1080                         break;
1081                 case 5:  /* DECSCNM */
1082                         if (sr) terminal->mode |=  MODE_INVERSE;
1083                         else    terminal->mode &= ~MODE_INVERSE;
1084                         break;
1085                 case 6:  /* DECOM */
1086                         terminal->origin_mode = sr;
1087                         if (terminal->origin_mode)
1088                                 terminal->row = terminal->margin_top;
1089                         else
1090                                 terminal->row = 0;
1091                         terminal->column = 0;
1092                         break;
1093                 case 7:  /* DECAWM */
1094                         if (sr) terminal->mode |=  MODE_AUTOWRAP;
1095                         else    terminal->mode &= ~MODE_AUTOWRAP;
1096                         break;
1097                 case 8:  /* DECARM */
1098                         if (sr) terminal->mode |=  MODE_AUTOREPEAT;
1099                         else    terminal->mode &= ~MODE_AUTOREPEAT;
1100                         break;
1101                 case 25:
1102                         if (sr) terminal->mode |=  MODE_SHOW_CURSOR;
1103                         else    terminal->mode &= ~MODE_SHOW_CURSOR;
1104                         break;
1105                 case 1037:   /* deleteSendsDel */
1106                         if (sr) terminal->mode |=  MODE_DELETE_SENDS_DEL;
1107                         else    terminal->mode &= ~MODE_DELETE_SENDS_DEL;
1108                         break;
1109                 case 1039:   /* altSendsEscape */
1110                         if (sr) terminal->mode |=  MODE_ALT_SENDS_ESC;
1111                         else    terminal->mode &= ~MODE_ALT_SENDS_ESC;
1112                         break;
1113                 default:
1114                         fprintf(stderr, "Unknown parameter: ?%d\n", code);
1115                         break;
1116                 }
1117         } else {
1118                 switch(code) {
1119                 case 4:  /* IRM */
1120                         if (sr) terminal->mode |=  MODE_IRM;
1121                         else    terminal->mode &= ~MODE_IRM;
1122                         break;
1123                 case 20: /* LNM */
1124                         if (sr) terminal->mode |=  MODE_LF_NEWLINE;
1125                         else    terminal->mode &= ~MODE_LF_NEWLINE;
1126                         break;
1127                 default:
1128                         fprintf(stderr, "Unknown parameter: %d\n", code);
1129                         break;
1130                 }
1131         }
1132 }
1133
1134 static void
1135 handle_dcs(struct terminal *terminal)
1136 {
1137 }
1138
1139 static void
1140 handle_osc(struct terminal *terminal)
1141 {
1142         char *p;
1143         int code;
1144
1145         terminal->escape[terminal->escape_length++] = '\0';
1146         p = &terminal->escape[2];
1147         code = strtol(p, &p, 10);
1148         if (*p == ';') p++;
1149
1150         switch (code) {
1151         case 0: /* Icon name and window title */
1152         case 1: /* Icon label */
1153         case 2: /* Window title*/
1154                 window_set_title(terminal->window, p);
1155                 break;
1156         default:
1157                 fprintf(stderr, "Unknown OSC escape code %d\n", code);
1158                 break;
1159         }
1160 }
1161
1162 static void
1163 handle_escape(struct terminal *terminal)
1164 {
1165         union utf8_char *row;
1166         struct attr *attr_row;
1167         char *p;
1168         int i, count, x, y, top, bottom;
1169         int args[10], set[10] = { 0, };
1170         char response[MAX_RESPONSE] = {0, };
1171         struct rectangle allocation;
1172
1173         terminal->escape[terminal->escape_length++] = '\0';
1174         i = 0;
1175         p = &terminal->escape[2];
1176         while ((isdigit(*p) || *p == ';') && i < 10) {
1177                 if (*p == ';') {
1178                         if (!set[i]) {
1179                                 args[i] = 0;
1180                                 set[i] = 1;
1181                         }
1182                         p++;
1183                         i++;
1184                 } else {
1185                         args[i] = strtol(p, &p, 10);
1186                         set[i] = 1;
1187                 }
1188         }
1189
1190         switch (*p) {
1191         case '@':    /* ICH */
1192                 count = set[0] ? args[0] : 1;
1193                 if (count == 0) count = 1;
1194                 terminal_shift_line(terminal, count);
1195                 break;
1196         case 'A':    /* CUU */
1197                 count = set[0] ? args[0] : 1;
1198                 if (count == 0) count = 1;
1199                 if (terminal->row - count >= terminal->margin_top)
1200                         terminal->row -= count;
1201                 else
1202                         terminal->row = terminal->margin_top;
1203                 break;
1204         case 'B':    /* CUD */
1205                 count = set[0] ? args[0] : 1;
1206                 if (count == 0) count = 1;
1207                 if (terminal->row + count <= terminal->margin_bottom)
1208                         terminal->row += count;
1209                 else
1210                         terminal->row = terminal->margin_bottom;
1211                 break;
1212         case 'C':    /* CUF */
1213                 count = set[0] ? args[0] : 1;
1214                 if (count == 0) count = 1;
1215                 if ((terminal->column + count) < terminal->width)
1216                         terminal->column += count;
1217                 else
1218                         terminal->column = terminal->width - 1;
1219                 break;
1220         case 'D':    /* CUB */
1221                 count = set[0] ? args[0] : 1;
1222                 if (count == 0) count = 1;
1223                 if ((terminal->column - count) >= 0)
1224                         terminal->column -= count;
1225                 else
1226                         terminal->column = 0;
1227                 break;
1228         case 'E':    /* CNL */
1229                 count = set[0] ? args[0] : 1;
1230                 if (terminal->row + count <= terminal->margin_bottom)
1231                         terminal->row += count;
1232                 else
1233                         terminal->row = terminal->margin_bottom;
1234                 terminal->column = 0;
1235                 break;
1236         case 'F':    /* CPL */
1237                 count = set[0] ? args[0] : 1;
1238                 if (terminal->row - count >= terminal->margin_top)
1239                         terminal->row -= count;
1240                 else
1241                         terminal->row = terminal->margin_top;
1242                 terminal->column = 0;
1243                 break;
1244         case 'G':    /* CHA */
1245                 y = set[0] ? args[0] : 1;
1246                 y = y <= 0 ? 1 : y > terminal->width ? terminal->width : y;
1247
1248                 terminal->column = y - 1;
1249                 break;
1250         case 'f':    /* HVP */
1251         case 'H':    /* CUP */
1252                 x = (set[1] ? args[1] : 1) - 1;
1253                 x = x < 0 ? 0 :
1254                     (x >= terminal->width ? terminal->width - 1 : x);
1255
1256                 y = (set[0] ? args[0] : 1) - 1;
1257                 if (terminal->origin_mode) {
1258                         y += terminal->margin_top;
1259                         y = y < terminal->margin_top ? terminal->margin_top :
1260                             (y > terminal->margin_bottom ? terminal->margin_bottom : y);
1261                 } else {
1262                         y = y < 0 ? 0 :
1263                             (y >= terminal->height ? terminal->height - 1 : y);
1264                 }
1265
1266                 terminal->row = y;
1267                 terminal->column = x;
1268                 break;
1269         case 'I':    /* CHT */
1270                 count = set[0] ? args[0] : 1;
1271                 if (count == 0) count = 1;
1272                 while (count > 0 && terminal->column < terminal->width) {
1273                         if (terminal->tab_ruler[terminal->column]) count--;
1274                         terminal->column++;
1275                 }
1276                 terminal->column--;
1277                 break;
1278         case 'J':    /* ED */
1279                 row = terminal_get_row(terminal, terminal->row);
1280                 attr_row = terminal_get_attr_row(terminal, terminal->row);
1281                 if (!set[0] || args[0] == 0 || args[0] > 2) {
1282                         memset(&row[terminal->column],
1283                                0, (terminal->width - terminal->column) * sizeof(union utf8_char));
1284                         attr_init(&attr_row[terminal->column],
1285                                terminal->curr_attr, terminal->width - terminal->column);
1286                         for (i = terminal->row + 1; i < terminal->height; i++) {
1287                                 memset(terminal_get_row(terminal, i),
1288                                     0, terminal->data_pitch);
1289                                 attr_init(terminal_get_attr_row(terminal, i),
1290                                     terminal->curr_attr, terminal->width);
1291                         }
1292                 } else if (args[0] == 1) {
1293                         memset(row, 0, (terminal->column+1) * sizeof(union utf8_char));
1294                         attr_init(attr_row, terminal->curr_attr, terminal->column+1);
1295                         for (i = 0; i < terminal->row; i++) {
1296                                 memset(terminal_get_row(terminal, i),
1297                                     0, terminal->data_pitch);
1298                                 attr_init(terminal_get_attr_row(terminal, i),
1299                                     terminal->curr_attr, terminal->width);
1300                         }
1301                 } else if (args[0] == 2) {
1302                         for (i = 0; i < terminal->height; i++) {
1303                                 memset(terminal_get_row(terminal, i),
1304                                     0, terminal->data_pitch);
1305                                 attr_init(terminal_get_attr_row(terminal, i),
1306                                     terminal->curr_attr, terminal->width);
1307                         }
1308                 }
1309                 break;
1310         case 'K':    /* EL */
1311                 row = terminal_get_row(terminal, terminal->row);
1312                 attr_row = terminal_get_attr_row(terminal, terminal->row);
1313                 if (!set[0] || args[0] == 0 || args[0] > 2) {
1314                         memset(&row[terminal->column], 0,
1315                             (terminal->width - terminal->column) * sizeof(union utf8_char));
1316                         attr_init(&attr_row[terminal->column], terminal->curr_attr,
1317                             terminal->width - terminal->column);
1318                 } else if (args[0] == 1) {
1319                         memset(row, 0, (terminal->column+1) * sizeof(union utf8_char));
1320                         attr_init(attr_row, terminal->curr_attr, terminal->column+1);
1321                 } else if (args[0] == 2) {
1322                         memset(row, 0, terminal->data_pitch);
1323                         attr_init(attr_row, terminal->curr_attr, terminal->width);
1324                 }
1325                 break;
1326         case 'L':    /* IL */
1327                 count = set[0] ? args[0] : 1;
1328                 if (count == 0) count = 1;
1329                 if (terminal->row >= terminal->margin_top &&
1330                         terminal->row < terminal->margin_bottom)
1331                 {
1332                         top = terminal->margin_top;
1333                         terminal->margin_top = terminal->row;
1334                         terminal_scroll(terminal, 0 - count);
1335                         terminal->margin_top = top;
1336                 } else if (terminal->row == terminal->margin_bottom) {
1337                         memset(terminal_get_row(terminal, terminal->row),
1338                                0, terminal->data_pitch);
1339                         attr_init(terminal_get_attr_row(terminal, terminal->row),
1340                                 terminal->curr_attr, terminal->width);
1341                 }
1342                 break;
1343         case 'M':    /* DL */
1344                 count = set[0] ? args[0] : 1;
1345                 if (count == 0) count = 1;
1346                 if (terminal->row >= terminal->margin_top &&
1347                         terminal->row < terminal->margin_bottom)
1348                 {
1349                         top = terminal->margin_top;
1350                         terminal->margin_top = terminal->row;
1351                         terminal_scroll(terminal, count);
1352                         terminal->margin_top = top;
1353                 } else if (terminal->row == terminal->margin_bottom) {
1354                         memset(terminal_get_row(terminal, terminal->row),
1355                                0, terminal->data_pitch);
1356                 }
1357                 break;
1358         case 'P':    /* DCH */
1359                 count = set[0] ? args[0] : 1;
1360                 if (count == 0) count = 1;
1361                 terminal_shift_line(terminal, 0 - count);
1362                 break;
1363         case 'S':    /* SU */
1364                 terminal_scroll(terminal, set[0] ? args[0] : 1);
1365                 break;
1366         case 'T':    /* SD */
1367                 terminal_scroll(terminal, 0 - (set[0] ? args[0] : 1));
1368                 break;
1369         case 'X':    /* ECH */
1370                 count = set[0] ? args[0] : 1;
1371                 if (count == 0) count = 1;
1372                 if ((terminal->column + count) > terminal->width)
1373                         count = terminal->width - terminal->column;
1374                 row = terminal_get_row(terminal, terminal->row);
1375                 attr_row = terminal_get_attr_row(terminal, terminal->row);
1376                 memset(&row[terminal->column], 0, count * sizeof(union utf8_char));
1377                 attr_init(&attr_row[terminal->column], terminal->curr_attr, count);
1378                 break;
1379         case 'Z':    /* CBT */
1380                 count = set[0] ? args[0] : 1;
1381                 if (count == 0) count = 1;
1382                 while (count > 0 && terminal->column >= 0) {
1383                         if (terminal->tab_ruler[terminal->column]) count--;
1384                         terminal->column--;
1385                 }
1386                 terminal->column++;
1387                 break;
1388         case '`':    /* HPA */
1389                 y = set[0] ? args[0] : 1;
1390                 y = y <= 0 ? 1 : y > terminal->width ? terminal->width : y;
1391
1392                 terminal->column = y - 1;
1393                 break;
1394         case 'b':    /* REP */
1395                 count = set[0] ? args[0] : 1;
1396                 if (count == 0) count = 1;
1397                 if (terminal->last_char.byte[0])
1398                         for (i = 0; i < count; i++)
1399                                 handle_char(terminal, terminal->last_char);
1400                 terminal->last_char.byte[0] = 0;
1401                 break;
1402         case 'c':    /* Primary DA */
1403                 terminal_write(terminal, "\e[?6c", 5);
1404                 break;
1405         case 'd':    /* VPA */
1406                 x = set[0] ? args[0] : 1;
1407                 x = x <= 0 ? 1 : x > terminal->height ? terminal->height : x;
1408
1409                 terminal->row = x - 1;
1410                 break;
1411         case 'g':    /* TBC */
1412                 if (!set[0] || args[0] == 0) {
1413                         terminal->tab_ruler[terminal->column] = 0;
1414                 } else if (args[0] == 3) {
1415                         memset(terminal->tab_ruler, 0, terminal->width);
1416                 }
1417                 break;
1418         case 'h':    /* SM */
1419                 for(i = 0; i < 10 && set[i]; i++) {
1420                         handle_term_parameter(terminal, args[i], 1);
1421                 }
1422                 break;
1423         case 'l':    /* RM */
1424                 for(i = 0; i < 10 && set[i]; i++) {
1425                         handle_term_parameter(terminal, args[i], 0);
1426                 }
1427                 break;
1428         case 'm':    /* SGR */
1429                 for(i = 0; i < 10; i++) {
1430                         if (i <= 7 && set[i] && set[i + 1] &&
1431                                 set[i + 2] && args[i + 1] == 5)
1432                         {
1433                                 if (args[i] == 38) {
1434                                         handle_sgr(terminal, args[i + 2] + 256);
1435                                         break;
1436                                 } else if (args[i] == 48) {
1437                                         handle_sgr(terminal, args[i + 2] + 512);
1438                                         break;
1439                                 }
1440                         }
1441                         if(set[i]) {
1442                                 handle_sgr(terminal, args[i]);
1443                         } else if(i == 0) {
1444                                 handle_sgr(terminal, 0);
1445                                 break;
1446                         } else {
1447                                 break;
1448                         }
1449                 }
1450                 break;
1451         case 'n':    /* DSR */
1452                 i = set[0] ? args[0] : 0;
1453                 if (i == 0 || i == 5) {
1454                         terminal_write(terminal, "\e[0n", 4);
1455                 } else if (i == 6) {
1456                         snprintf(response, MAX_RESPONSE, "\e[%d;%dR",
1457                                  terminal->origin_mode ?
1458                                      terminal->row+terminal->margin_top : terminal->row+1,
1459                                  terminal->column+1);
1460                         terminal_write(terminal, response, strlen(response));
1461                 }
1462                 break;
1463         case 'r':
1464                 if(!set[0]) {
1465                         terminal->margin_top = 0;
1466                         terminal->margin_bottom = terminal->height-1;
1467                         terminal->row = 0;
1468                         terminal->column = 0;
1469                 } else {
1470                         top = (set[0] ? args[0] : 1) - 1;
1471                         top = top < 0 ? 0 :
1472                               (top >= terminal->height ? terminal->height - 1 : top);
1473                         bottom = (set[1] ? args[1] : 1) - 1;
1474                         bottom = bottom < 0 ? 0 :
1475                                  (bottom >= terminal->height ? terminal->height - 1 : bottom);
1476                         if(bottom > top) {
1477                                 terminal->margin_top = top;
1478                                 terminal->margin_bottom = bottom;
1479                         } else {
1480                                 terminal->margin_top = 0;
1481                                 terminal->margin_bottom = terminal->height-1;
1482                         }
1483                         if(terminal->origin_mode)
1484                                 terminal->row = terminal->margin_top;
1485                         else
1486                                 terminal->row = 0;
1487                         terminal->column = 0;
1488                 }
1489                 break;
1490         case 's':
1491                 terminal->saved_row = terminal->row;
1492                 terminal->saved_column = terminal->column;
1493                 break;
1494         case 't':    /* windowOps */
1495                 if (!set[0]) break;
1496                 switch (args[0]) {
1497                 case 4:  /* resize px */
1498                         if (set[1] && set[2]) {
1499                                 window_set_child_size(terminal->window,
1500                                                       args[2], args[1]);
1501                                 resize_handler(terminal->window,
1502                                                args[2], args[1], terminal);
1503                         }
1504                         break;
1505                 case 8:  /* resize ch */
1506                         if (set[1] && set[2]) {
1507                                 terminal_resize(terminal, args[2], args[1]);
1508                         }
1509                         break;
1510                 case 13: /* report position */
1511                         window_get_child_allocation(terminal->window, &allocation);
1512                         snprintf(response, MAX_RESPONSE, "\e[3;%d;%dt",
1513                                  allocation.x, allocation.y);
1514                         terminal_write(terminal, response, strlen(response));
1515                         break;
1516                 case 14: /* report px */
1517                         window_get_child_allocation(terminal->window, &allocation);
1518                         snprintf(response, MAX_RESPONSE, "\e[4;%d;%dt",
1519                                  allocation.height, allocation.width);
1520                         terminal_write(terminal, response, strlen(response));
1521                         break;
1522                 case 18: /* report ch */
1523                         snprintf(response, MAX_RESPONSE, "\e[9;%d;%dt",
1524                                  terminal->height, terminal->width);
1525                         terminal_write(terminal, response, strlen(response));
1526                         break;
1527                 case 21: /* report title */
1528                         snprintf(response, MAX_RESPONSE, "\e]l%s\e\\",
1529                                  window_get_title(terminal->window));
1530                         terminal_write(terminal, response, strlen(response));
1531                         break;
1532                 default:
1533                         if (args[0] >= 24)
1534                                 terminal_resize(terminal, terminal->width, args[0]);
1535                         else
1536                                 fprintf(stderr, "Unimplemented windowOp %d\n", args[0]);
1537                         break;
1538                 }
1539         case 'u':
1540                 terminal->row = terminal->saved_row;
1541                 terminal->column = terminal->saved_column;
1542                 break;
1543         default:
1544                 fprintf(stderr, "Unknown CSI escape: %c\n", *p);
1545                 break;
1546         }
1547 }
1548
1549 static void
1550 handle_non_csi_escape(struct terminal *terminal, char code)
1551 {
1552         switch(code) {
1553         case 'M':    /* RI */
1554                 terminal->row -= 1;
1555                 if(terminal->row < terminal->margin_top) {
1556                         terminal->row = terminal->margin_top;
1557                         terminal_scroll(terminal, -1);
1558                 }
1559                 break;
1560         case 'E':    /* NEL */
1561                 terminal->column = 0;
1562                 // fallthrough
1563         case 'D':    /* IND */
1564                 terminal->row += 1;
1565                 if(terminal->row > terminal->margin_bottom) {
1566                         terminal->row = terminal->margin_bottom;
1567                         terminal_scroll(terminal, +1);
1568                 }
1569                 break;
1570         case 'c':    /* RIS */
1571                 terminal_init(terminal);
1572                 break;
1573         case 'H':    /* HTS */
1574                 terminal->tab_ruler[terminal->column] = 1;
1575                 break;
1576         case '7':    /* DECSC */
1577                 terminal->saved_row = terminal->row;
1578                 terminal->saved_column = terminal->column;
1579                 terminal->saved_attr = terminal->curr_attr;
1580                 terminal->saved_origin_mode = terminal->origin_mode;
1581                 terminal->saved_cs = terminal->cs;
1582                 terminal->saved_g0 = terminal->g0;
1583                 terminal->saved_g1 = terminal->g1;
1584                 break;
1585         case '8':    /* DECRC */
1586                 terminal->row = terminal->saved_row;
1587                 terminal->column = terminal->saved_column;
1588                 terminal->curr_attr = terminal->saved_attr;
1589                 terminal->origin_mode = terminal->saved_origin_mode;
1590                 terminal->cs = terminal->saved_cs;
1591                 terminal->g0 = terminal->saved_g0;
1592                 terminal->g1 = terminal->saved_g1;
1593                 break;
1594         case '=':    /* DECPAM */
1595                 terminal->key_mode = KM_APPLICATION;
1596                 break;
1597         case '>':    /* DECPNM */
1598                 terminal->key_mode = KM_NORMAL;
1599                 break;
1600         default:
1601                 fprintf(stderr, "Unknown escape code: %c\n", code);
1602                 break;
1603         }
1604 }
1605
1606 static void
1607 handle_special_escape(struct terminal *terminal, char special, char code)
1608 {
1609         int i, numChars;
1610
1611         if (special == '#') {
1612                 switch(code) {
1613                 case '8':
1614                         /* fill with 'E', no cheap way to do this */
1615                         memset(terminal->data, 0, terminal->data_pitch * terminal->height);
1616                         numChars = terminal->width * terminal->height;
1617                         for(i = 0; i < numChars; i++) {
1618                                 terminal->data[i].byte[0] = 'E';
1619                         }
1620                         break;
1621                 default:
1622                         fprintf(stderr, "Unknown HASH escape #%c\n", code);
1623                         break;
1624                 }
1625         } else if (special == '(' || special == ')') {
1626                 switch(code) {
1627                 case '0':
1628                         if (special == '(')
1629                                 terminal->g0 = CS_SPECIAL;
1630                         else
1631                                 terminal->g1 = CS_SPECIAL;
1632                         break;
1633                 case 'A':
1634                         if (special == '(')
1635                                 terminal->g0 = CS_UK;
1636                         else
1637                                 terminal->g1 = CS_UK;
1638                         break;
1639                 case 'B':
1640                         if (special == '(')
1641                                 terminal->g0 = CS_US;
1642                         else
1643                                 terminal->g1 = CS_US;
1644                         break;
1645                 default:
1646                         fprintf(stderr, "Unknown character set %c\n", code);
1647                         break;
1648                 }
1649         } else {
1650                 fprintf(stderr, "Unknown special escape %c%c\n", special, code);
1651         }
1652 }
1653
1654 static void
1655 handle_sgr(struct terminal *terminal, int code)
1656 {
1657         switch(code) {
1658         case 0:
1659                 terminal->curr_attr = terminal->color_scheme->default_attr;
1660                 break;
1661         case 1:
1662                 terminal->curr_attr.a |= ATTRMASK_BOLD;
1663                 if (terminal->curr_attr.fg < 8)
1664                         terminal->curr_attr.fg += 8;
1665                 break;
1666         case 4:
1667                 terminal->curr_attr.a |= ATTRMASK_UNDERLINE;
1668                 break;
1669         case 5:
1670                 terminal->curr_attr.a |= ATTRMASK_BLINK;
1671                 break;
1672         case 8:
1673                 terminal->curr_attr.a |= ATTRMASK_CONCEALED;
1674                 break;
1675         case 2:
1676         case 21:
1677         case 22:
1678                 terminal->curr_attr.a &= ~ATTRMASK_BOLD;
1679                 if (terminal->curr_attr.fg < 16 && terminal->curr_attr.fg >= 8)
1680                         terminal->curr_attr.fg -= 8;
1681                 break;
1682         case 24:
1683                 terminal->curr_attr.a &= ~ATTRMASK_UNDERLINE;
1684                 break;
1685         case 25:
1686                 terminal->curr_attr.a &= ~ATTRMASK_BLINK;
1687                 break;
1688         case 7:
1689         case 26:
1690                 terminal->curr_attr.a |= ATTRMASK_INVERSE;
1691                 break;
1692         case 27:
1693                 terminal->curr_attr.a &= ~ATTRMASK_INVERSE;
1694                 break;
1695         case 28:
1696                 terminal->curr_attr.a &= ~ATTRMASK_CONCEALED;
1697                 break;
1698         case 39:
1699                 terminal->curr_attr.fg = terminal->color_scheme->default_attr.fg;
1700                 break;
1701         case 49:
1702                 terminal->curr_attr.bg = terminal->color_scheme->default_attr.bg;
1703                 break;
1704         default:
1705                 if(code >= 30 && code <= 37) {
1706                         terminal->curr_attr.fg = code - 30;
1707                         if (terminal->curr_attr.a & ATTRMASK_BOLD)
1708                                 terminal->curr_attr.fg += 8;
1709                 } else if(code >= 40 && code <= 47) {
1710                         terminal->curr_attr.bg = code - 40;
1711                 } else if (code >= 90 && code <= 97) {
1712                         terminal->curr_attr.fg = code - 90 + 8;
1713                 } else if (code >= 100 && code <= 107) {
1714                         terminal->curr_attr.bg = code - 100 + 8;
1715                 } else if(code >= 256 && code < 512) {
1716                         terminal->curr_attr.fg = code - 256;
1717                 } else if(code >= 512 && code < 768) {
1718                         terminal->curr_attr.bg = code - 512;
1719                 } else {
1720                         fprintf(stderr, "Unknown SGR code: %d\n", code);
1721                 }
1722                 break;
1723         }
1724 }
1725
1726 /* Returns 1 if c was special, otherwise 0 */
1727 static int
1728 handle_special_char(struct terminal *terminal, char c)
1729 {
1730         union utf8_char *row;
1731         struct attr *attr_row;
1732
1733         row = terminal_get_row(terminal, terminal->row);
1734         attr_row = terminal_get_attr_row(terminal, terminal->row);
1735
1736         switch(c) {
1737         case '\r':
1738                 terminal->column = 0;
1739                 break;
1740         case '\n':
1741                 if (terminal->mode & MODE_LF_NEWLINE) {
1742                         terminal->column = 0;
1743                 }
1744                 /* fallthrough */
1745         case '\v':
1746         case '\f':
1747                 terminal->row++;
1748                 if(terminal->row > terminal->margin_bottom) {
1749                         terminal->row = terminal->margin_bottom;
1750                         terminal_scroll(terminal, +1);
1751                 }
1752
1753                 break;
1754         case '\t':
1755                 while (terminal->column < terminal->width) {
1756                         if (terminal->tab_ruler[terminal->column]) break;
1757                         if (terminal->mode & MODE_IRM)
1758                                 terminal_shift_line(terminal, +1);
1759                         row[terminal->column].byte[0] = ' ';
1760                         row[terminal->column].byte[1] = '\0';
1761                         attr_row[terminal->column] = terminal->curr_attr;
1762                         terminal->column++;
1763                 }
1764                 if (terminal->column >= terminal->width) {
1765                         terminal->column = terminal->width - 1;
1766                 }
1767
1768                 break;
1769         case '\b':
1770                 if (terminal->column >= terminal->width) {
1771                         terminal->column = terminal->width - 2;
1772                 } else if (terminal->column > 0) {
1773                         terminal->column--;
1774                 } else if (terminal->mode & MODE_AUTOWRAP) {
1775                         terminal->column = terminal->width - 1;
1776                         terminal->row -= 1;
1777                         if (terminal->row < terminal->margin_top) {
1778                                 terminal->row = terminal->margin_top;
1779                                 terminal_scroll(terminal, -1);
1780                         }
1781                 }
1782
1783                 break;
1784         case '\a':
1785                 /* Bell */
1786                 break;
1787         case '\x0E': /* SO */
1788                 terminal->cs = terminal->g1;
1789                 break;
1790         case '\x0F': /* SI */
1791                 terminal->cs = terminal->g0;
1792                 break;
1793         default:
1794                 return 0;
1795         }
1796
1797         return 1;
1798 }
1799
1800 static void
1801 handle_char(struct terminal *terminal, union utf8_char utf8)
1802 {
1803         union utf8_char *row;
1804         struct attr *attr_row;
1805
1806         if (handle_special_char(terminal, utf8.byte[0])) return;
1807
1808         apply_char_set(terminal->cs, &utf8);
1809
1810         /* There are a whole lot of non-characters, control codes,
1811          * and formatting codes that should probably be ignored,
1812          * for example: */
1813         if (strncmp((char*) utf8.byte, "\xEF\xBB\xBF", 3) == 0) {
1814                 /* BOM, ignore */
1815                 return;
1816         }
1817
1818         /* Some of these non-characters should be translated, e.g.: */
1819         if (utf8.byte[0] < 32) {
1820                 utf8.byte[0] = utf8.byte[0] + 64;
1821         }
1822
1823         /* handle right margin effects */
1824         if (terminal->column >= terminal->width) {
1825                 if (terminal->mode & MODE_AUTOWRAP) {
1826                         terminal->column = 0;
1827                         terminal->row += 1;
1828                         if (terminal->row > terminal->margin_bottom) {
1829                                 terminal->row = terminal->margin_bottom;
1830                                 terminal_scroll(terminal, +1);
1831                         }
1832                 } else {
1833                         terminal->column--;
1834                 }
1835         }
1836
1837         row = terminal_get_row(terminal, terminal->row);
1838         attr_row = terminal_get_attr_row(terminal, terminal->row);
1839
1840         if (terminal->mode & MODE_IRM)
1841                 terminal_shift_line(terminal, +1);
1842         row[terminal->column] = utf8;
1843         attr_row[terminal->column++] = terminal->curr_attr;
1844
1845         if (utf8.ch != terminal->last_char.ch)
1846                 terminal->last_char = utf8;
1847 }
1848
1849 static void
1850 escape_append_utf8(struct terminal *terminal, union utf8_char utf8)
1851 {
1852         int len, i;
1853
1854         if ((utf8.byte[0] & 0x80) == 0x00)       len = 1;
1855         else if ((utf8.byte[0] & 0xE0) == 0xC0)  len = 2;
1856         else if ((utf8.byte[0] & 0xF0) == 0xE0)  len = 3;
1857         else if ((utf8.byte[0] & 0xF8) == 0xF0)  len = 4;
1858         else                                     len = 1;  /* Invalid, cannot happen */
1859
1860         if (terminal->escape_length + len <= MAX_ESCAPE) {
1861                 for (i = 0; i < len; i++)
1862                         terminal->escape[terminal->escape_length + i] = utf8.byte[i];
1863                 terminal->escape_length += len;
1864         } else if (terminal->escape_length < MAX_ESCAPE) {
1865                 terminal->escape[terminal->escape_length++] = 0;
1866         }
1867 }
1868
1869 static void
1870 terminal_data(struct terminal *terminal, const char *data, size_t length)
1871 {
1872         int i;
1873         union utf8_char utf8;
1874         enum utf8_state parser_state;
1875
1876         for (i = 0; i < length; i++) {
1877                 parser_state =
1878                         utf8_next_char(&terminal->state_machine, data[i]);
1879                 switch(parser_state) {
1880                 case utf8state_accept:
1881                         utf8.ch = terminal->state_machine.s.ch;
1882                         break;
1883                 case utf8state_reject:
1884                         /* the unicode replacement character */
1885                         utf8.byte[0] = 0xEF;
1886                         utf8.byte[1] = 0xBF;
1887                         utf8.byte[2] = 0xBD;
1888                         utf8.byte[3] = 0x00;
1889                         break;
1890                 default:
1891                         continue;
1892                 }
1893
1894                 /* assume escape codes never use non-ASCII characters */
1895                 switch (terminal->state) {
1896                 case escape_state_escape:
1897                         escape_append_utf8(terminal, utf8);
1898                         switch (utf8.byte[0]) {
1899                         case 'P':  /* DCS */
1900                                 terminal->state = escape_state_dcs;
1901                                 break;
1902                         case '[':  /* CSI */
1903                                 terminal->state = escape_state_csi;
1904                                 break;
1905                         case ']':  /* OSC */
1906                                 terminal->state = escape_state_osc;
1907                                 break;
1908                         case '#':
1909                         case '(':
1910                         case ')':  /* special */
1911                                 terminal->state = escape_state_special;
1912                                 break;
1913                         case '^':  /* PM (not implemented) */
1914                         case '_':  /* APC (not implemented) */
1915                                 terminal->state = escape_state_ignore;
1916                                 break;
1917                         default:
1918                                 terminal->state = escape_state_normal;
1919                                 handle_non_csi_escape(terminal, utf8.byte[0]);
1920                                 break;
1921                         }
1922                         continue;
1923                 case escape_state_csi:
1924                         if (handle_special_char(terminal, utf8.byte[0]) != 0) {
1925                                 /* do nothing */
1926                         } else if (utf8.byte[0] == '?') {
1927                                 terminal->escape_flags |= ESC_FLAG_WHAT;
1928                         } else if (utf8.byte[0] == '>') {
1929                                 terminal->escape_flags |= ESC_FLAG_GT;
1930                         } else if (utf8.byte[0] == '!') {
1931                                 terminal->escape_flags |= ESC_FLAG_BANG;
1932                         } else if (utf8.byte[0] == '$') {
1933                                 terminal->escape_flags |= ESC_FLAG_CASH;
1934                         } else if (utf8.byte[0] == '\'') {
1935                                 terminal->escape_flags |= ESC_FLAG_SQUOTE;
1936                         } else if (utf8.byte[0] == '"') {
1937                                 terminal->escape_flags |= ESC_FLAG_DQUOTE;
1938                         } else if (utf8.byte[0] == ' ') {
1939                                 terminal->escape_flags |= ESC_FLAG_SPACE;
1940                         } else {
1941                                 escape_append_utf8(terminal, utf8);
1942                                 if (terminal->escape_length >= MAX_ESCAPE)
1943                                         terminal->state = escape_state_normal;
1944                         }
1945
1946                         if (isalpha(utf8.byte[0]) || utf8.byte[0] == '@' ||
1947                                 utf8.byte[0] == '`')
1948                         {
1949                                 terminal->state = escape_state_normal;
1950                                 handle_escape(terminal);
1951                         } else {
1952                         }
1953                         continue;
1954                 case escape_state_inner_escape:
1955                         if (utf8.byte[0] == '\\') {
1956                                 terminal->state = escape_state_normal;
1957                                 if (terminal->outer_state == escape_state_dcs) {
1958                                         handle_dcs(terminal);
1959                                 } else if (terminal->outer_state == escape_state_osc) {
1960                                         handle_osc(terminal);
1961                                 }
1962                         } else if (utf8.byte[0] == '\e') {
1963                                 terminal->state = terminal->outer_state;
1964                                 escape_append_utf8(terminal, utf8);
1965                                 if (terminal->escape_length >= MAX_ESCAPE)
1966                                         terminal->state = escape_state_normal;
1967                         } else {
1968                                 terminal->state = terminal->outer_state;
1969                                 if (terminal->escape_length < MAX_ESCAPE)
1970                                         terminal->escape[terminal->escape_length++] = '\e';
1971                                 escape_append_utf8(terminal, utf8);
1972                                 if (terminal->escape_length >= MAX_ESCAPE)
1973                                         terminal->state = escape_state_normal;
1974                         }
1975                         continue;
1976                 case escape_state_dcs:
1977                 case escape_state_osc:
1978                 case escape_state_ignore:
1979                         if (utf8.byte[0] == '\e') {
1980                                 terminal->outer_state = terminal->state;
1981                                 terminal->state = escape_state_inner_escape;
1982                         } else if (utf8.byte[0] == '\a' && terminal->state == escape_state_osc) {
1983                                 terminal->state = escape_state_normal;
1984                                 handle_osc(terminal);
1985                         } else {
1986                                 escape_append_utf8(terminal, utf8);
1987                                 if (terminal->escape_length >= MAX_ESCAPE)
1988                                         terminal->state = escape_state_normal;
1989                         }
1990                         continue;
1991                 case escape_state_special:
1992                         escape_append_utf8(terminal, utf8);
1993                         terminal->state = escape_state_normal;
1994                         if (isdigit(utf8.byte[0]) || isalpha(utf8.byte[0])) {
1995                                 handle_special_escape(terminal, terminal->escape[1],
1996                                                       utf8.byte[0]);
1997                         }
1998                         continue;
1999                 default:
2000                         break;
2001                 }
2002
2003                 /* this is valid, because ASCII characters are never used to
2004                  * introduce a multibyte sequence in UTF-8 */
2005                 if (utf8.byte[0] == '\e') {
2006                         terminal->state = escape_state_escape;
2007                         terminal->outer_state = escape_state_normal;
2008                         terminal->escape[0] = '\e';
2009                         terminal->escape_length = 1;
2010                         terminal->escape_flags = 0;
2011                 } else {
2012                         handle_char(terminal, utf8);
2013                 } /* if */
2014         } /* for */
2015
2016         window_schedule_redraw(terminal->window);
2017 }
2018
2019 static void
2020 data_source_target(void *data,
2021                    struct wl_data_source *source, const char *mime_type)
2022 {
2023         fprintf(stderr, "data_source_target, %s\n", mime_type);
2024 }
2025
2026 static void
2027 data_source_send(void *data,
2028                  struct wl_data_source *source,
2029                  const char *mime_type, int32_t fd)
2030 {
2031         struct terminal *terminal = data;
2032
2033         terminal_send_selection(terminal, fd);
2034 }
2035
2036 static void
2037 data_source_cancelled(void *data, struct wl_data_source *source)
2038 {
2039         wl_data_source_destroy(source);
2040 }
2041
2042 static const struct wl_data_source_listener data_source_listener = {
2043         data_source_target,
2044         data_source_send,
2045         data_source_cancelled
2046 };
2047
2048 static int
2049 handle_bound_key(struct terminal *terminal,
2050                  struct input *input, uint32_t sym, uint32_t time)
2051 {
2052         switch (sym) {
2053         case XK_X:
2054                 /* Cut selection; terminal doesn't do cut, fall
2055                  * through to copy. */
2056         case XK_C:
2057                 terminal->selection =
2058                         display_create_data_source(terminal->display);
2059                 wl_data_source_offer(terminal->selection,
2060                                      "text/plain;charset=utf-8");
2061                 wl_data_source_add_listener(terminal->selection,
2062                                             &data_source_listener, terminal);
2063                 input_set_selection(input, terminal->selection, time);
2064                 return 1;
2065         case XK_V:
2066                 input_receive_selection_data_to_fd(input,
2067                                                    "text/plain;charset=utf-8",
2068                                                    terminal->master);
2069
2070                 return 1;
2071         default:
2072                 return 0;
2073         }
2074 }
2075
2076 static void
2077 key_handler(struct window *window, struct input *input, uint32_t time,
2078             uint32_t key, uint32_t sym, uint32_t state, void *data)
2079 {
2080         struct terminal *terminal = data;
2081         char ch[MAX_RESPONSE];
2082         uint32_t modifiers;
2083         int len = 0;
2084
2085         modifiers = input_get_modifiers(input);
2086         if ((modifiers & XKB_COMMON_CONTROL_MASK) &&
2087             (modifiers & XKB_COMMON_SHIFT_MASK) &&
2088             state && handle_bound_key(terminal, input, sym, time))
2089                 return;
2090
2091         switch (sym) {
2092         case XK_F11:
2093                 if (!state)
2094                         break;
2095                 terminal->fullscreen ^= 1;
2096                 window_set_fullscreen(window, terminal->fullscreen);
2097                 window_schedule_redraw(terminal->window);
2098                 break;
2099
2100         case XK_BackSpace:
2101         case XK_Tab:
2102         case XK_Linefeed:
2103         case XK_Clear:
2104         case XK_Pause:
2105         case XK_Scroll_Lock:
2106         case XK_Sys_Req:
2107         case XK_Escape:
2108                 ch[len++] = sym & 0x7f;
2109                 break;
2110
2111         case XK_Return:
2112                 if (terminal->mode & MODE_LF_NEWLINE) {
2113                         ch[len++] = 0x0D;
2114                         ch[len++] = 0x0A;
2115                 } else {
2116                         ch[len++] = 0x0D;
2117                 }
2118                 break;
2119
2120         case XK_Shift_L:
2121         case XK_Shift_R:
2122         case XK_Control_L:
2123         case XK_Control_R:
2124         case XK_Alt_L:
2125         case XK_Alt_R:
2126                 break;
2127
2128         case XK_Insert:
2129                 len = function_key_response('[', 2, modifiers, '~', ch);
2130                 break;
2131         case XK_Delete:
2132                 if (terminal->mode & MODE_DELETE_SENDS_DEL) {
2133                         ch[len++] = '\x04';
2134                 } else {
2135                         len = function_key_response('[', 3, modifiers, '~', ch);
2136                 }
2137                 break;
2138         case XK_Page_Up:
2139                 len = function_key_response('[', 5, modifiers, '~', ch);
2140                 break;
2141         case XK_Page_Down:
2142                 len = function_key_response('[', 6, modifiers, '~', ch);
2143                 break;
2144         case XK_F1:
2145                 len = function_key_response('O', 1, modifiers, 'P', ch);
2146                 break;
2147         case XK_F2:
2148                 len = function_key_response('O', 1, modifiers, 'Q', ch);
2149                 break;
2150         case XK_F3:
2151                 len = function_key_response('O', 1, modifiers, 'R', ch);
2152                 break;
2153         case XK_F4:
2154                 len = function_key_response('O', 1, modifiers, 'S', ch);
2155                 break;
2156         case XK_F5:
2157                 len = function_key_response('[', 15, modifiers, '~', ch);
2158                 break;
2159         case XK_F6:
2160                 len = function_key_response('[', 17, modifiers, '~', ch);
2161                 break;
2162         case XK_F7:
2163                 len = function_key_response('[', 18, modifiers, '~', ch);
2164                 break;
2165         case XK_F8:
2166                 len = function_key_response('[', 19, modifiers, '~', ch);
2167                 break;
2168         case XK_F9:
2169                 len = function_key_response('[', 20, modifiers, '~', ch);
2170                 break;
2171         case XK_F10:
2172                 len = function_key_response('[', 21, modifiers, '~', ch);
2173                 break;
2174         case XK_F12:
2175                 len = function_key_response('[', 24, modifiers, '~', ch);
2176                 break;
2177         default:
2178                 /* Handle special keys with alternate mappings */
2179                 len = apply_key_map(terminal->key_mode, sym, modifiers, ch);
2180                 if (len != 0) break;
2181
2182                 if (modifiers & XKB_COMMON_CONTROL_MASK) {
2183                         if (sym >= '3' && sym <= '7')
2184                                 sym = (sym & 0x1f) + 8;
2185
2186                         if (!((sym >= '!' && sym <= '/') ||
2187                                 (sym >= '8' && sym <= '?') ||
2188                                 (sym >= '0' && sym <= '2'))) sym = sym & 0x1f;
2189                         else if (sym == '2') sym = 0x00;
2190                         else if (sym == '/') sym = 0x1F;
2191                         else if (sym == '8' || sym == '?') sym = 0x7F;
2192                 } else if ((terminal->mode & MODE_ALT_SENDS_ESC) &&
2193                            (modifiers & XKB_COMMON_MOD1_MASK))
2194                 {
2195                         ch[len++] = 0x1b;
2196                 } else if (modifiers & XKB_COMMON_MOD1_MASK) {
2197                         sym = sym | 0x80;
2198                 }
2199
2200                 if (sym < 256)
2201                         ch[len++] = sym;
2202                 break;
2203         }
2204
2205         if (state && len > 0)
2206                 terminal_write(terminal, ch, len);
2207 }
2208
2209 static void
2210 keyboard_focus_handler(struct window *window,
2211                        struct input *device, void *data)
2212 {
2213         struct terminal *terminal = data;
2214
2215         terminal->focused = (device != NULL);
2216         window_schedule_redraw(terminal->window);
2217 }
2218
2219 static void
2220 button_handler(struct widget *widget,
2221                struct input *input, uint32_t time,
2222                int button, int state, void *data)
2223 {
2224         struct terminal *terminal = data;
2225
2226         switch (button) {
2227         case 272:
2228                 if (state) {
2229                         terminal->dragging = 1;
2230                         input_get_position(input,
2231                                            &terminal->selection_start_x,
2232                                            &terminal->selection_start_y);
2233                         terminal->selection_end_x = terminal->selection_start_x;
2234                         terminal->selection_end_y = terminal->selection_start_y;
2235                         widget_schedule_redraw(widget);
2236                 } else {
2237                         terminal->dragging = 0;
2238                 }
2239                 break;
2240         }
2241 }
2242
2243 static int
2244 motion_handler(struct widget *widget,
2245                struct input *input, uint32_t time,
2246                int32_t x, int32_t y, void *data)
2247 {
2248         struct terminal *terminal = data;
2249
2250         if (terminal->dragging) {
2251                 input_get_position(input,
2252                                    &terminal->selection_end_x,
2253                                    &terminal->selection_end_y);
2254                 widget_schedule_redraw(widget);
2255         }
2256
2257         return POINTER_IBEAM;
2258 }
2259
2260 static struct terminal *
2261 terminal_create(struct display *display, int fullscreen)
2262 {
2263         struct terminal *terminal;
2264         cairo_surface_t *surface;
2265         cairo_t *cr;
2266
2267         terminal = malloc(sizeof *terminal);
2268         if (terminal == NULL)
2269                 return terminal;
2270
2271         memset(terminal, 0, sizeof *terminal);
2272         terminal->fullscreen = fullscreen;
2273         terminal->color_scheme = &DEFAULT_COLORS;
2274         terminal_init(terminal);
2275         terminal->margin_top = 0;
2276         terminal->margin_bottom = -1;
2277         terminal->window = window_create(display, 500, 400);
2278         terminal->widget = window_add_widget(terminal->window, terminal);
2279         window_set_title(terminal->window, "Wayland Terminal");
2280
2281         init_state_machine(&terminal->state_machine);
2282         init_color_table(terminal);
2283
2284         terminal->display = display;
2285         terminal->margin = 5;
2286
2287         window_set_user_data(terminal->window, terminal);
2288         window_set_redraw_handler(terminal->window, redraw_handler);
2289         window_set_resize_handler(terminal->window, resize_handler);
2290
2291         window_set_key_handler(terminal->window, key_handler);
2292         window_set_keyboard_focus_handler(terminal->window,
2293                                           keyboard_focus_handler);
2294         widget_set_button_handler(terminal->widget, button_handler);
2295         widget_set_motion_handler(terminal->widget, motion_handler);
2296
2297         surface = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, 0, 0);
2298         cr = cairo_create(surface);
2299         cairo_set_font_size(cr, 14);
2300         cairo_select_font_face (cr, "mono",
2301                                 CAIRO_FONT_SLANT_NORMAL,
2302                                 CAIRO_FONT_WEIGHT_BOLD);
2303         terminal->font_bold = cairo_get_scaled_font (cr);
2304         cairo_scaled_font_reference(terminal->font_bold);
2305
2306         cairo_select_font_face (cr, "mono",
2307                                 CAIRO_FONT_SLANT_NORMAL,
2308                                 CAIRO_FONT_WEIGHT_NORMAL);
2309         terminal->font_normal = cairo_get_scaled_font (cr);
2310         cairo_scaled_font_reference(terminal->font_normal);
2311
2312         cairo_font_extents(cr, &terminal->extents);
2313         cairo_destroy(cr);
2314         cairo_surface_destroy(surface);
2315
2316         return terminal;
2317 }
2318
2319 static void
2320 io_handler(struct task *task, uint32_t events)
2321 {
2322         struct terminal *terminal =
2323                 container_of(task, struct terminal, io_task);
2324         char buffer[256];
2325         int len;
2326
2327         if (events & EPOLLHUP)
2328                 exit(0);
2329
2330         len = read(terminal->master, buffer, sizeof buffer);
2331         if (len < 0)
2332                 exit(0);
2333
2334         terminal_data(terminal, buffer, len);
2335 }
2336
2337 static int
2338 terminal_run(struct terminal *terminal, const char *path)
2339 {
2340         int master;
2341         pid_t pid;
2342
2343         pid = forkpty(&master, NULL, NULL, NULL);
2344         if (pid == 0) {
2345                 setenv("TERM", "xterm-256color", 1);
2346                 setenv("COLORTERM", "xterm-256color", 1);
2347                 if (execl(path, path, NULL)) {
2348                         printf("exec failed: %m\n");
2349                         exit(EXIT_FAILURE);
2350                 }
2351         } else if (pid < 0) {
2352                 fprintf(stderr, "failed to fork and create pty (%m).\n");
2353                 return -1;
2354         }
2355
2356         terminal->master = master;
2357         fcntl(master, F_SETFL, O_NONBLOCK);
2358         terminal->io_task.run = io_handler;
2359         display_watch_fd(terminal->display, terminal->master,
2360                          EPOLLIN | EPOLLHUP, &terminal->io_task);
2361
2362         window_set_fullscreen(terminal->window, terminal->fullscreen);
2363         if (!terminal->fullscreen)
2364                 terminal_resize(terminal, 80, 24);
2365
2366         window_schedule_redraw(terminal->window);
2367
2368         return 0;
2369 }
2370
2371 static const GOptionEntry option_entries[] = {
2372         { "fullscreen", 'f', 0, G_OPTION_ARG_NONE,
2373           &option_fullscreen, "Run in fullscreen mode" },
2374         { NULL }
2375 };
2376
2377 int main(int argc, char *argv[])
2378 {
2379         struct display *d;
2380         struct terminal *terminal;
2381
2382         d = display_create(&argc, &argv, option_entries);
2383         if (d == NULL) {
2384                 fprintf(stderr, "failed to create display: %m\n");
2385                 return -1;
2386         }
2387
2388         terminal = terminal_create(d, option_fullscreen);
2389         if (terminal_run(terminal, "/bin/bash"))
2390                 exit(EXIT_FAILURE);
2391
2392         display_run(d);
2393
2394         return 0;
2395 }