ui/console.c

   1 /*
   2  * QEMU graphical console
   3  *
   4  * Copyright (c) 2004 Fabrice Bellard
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a copy
   7  * of this software and associated documentation files (the "Software"), to deal
   8  * in the Software without restriction, including without limitation the rights
   9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  10  * copies of the Software, and to permit persons to whom the Software is
  11  * furnished to do so, subject to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be included in
  14  * all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  22  * THE SOFTWARE.
  23  */
  24 #include "qemu-common.h"
  25 #include "ui/console.h"
  26 #include "hw/qdev-core.h"
  27 #include "qemu/timer.h"
  28 #include "qmp-commands.h"
  29 #include "sysemu/char.h"
  30 #include "trace.h"
  31 #include "exec/memory.h"
  32
  33 #define DEFAULT_BACKSCROLL 512
  34 #define CONSOLE_CURSOR_PERIOD 500
  35
  36 typedef struct TextAttributes {
  37     uint8_t fgcol:4;
  38     uint8_t bgcol:4;
  39     uint8_t bold:1;
  40     uint8_t uline:1;
  41     uint8_t blink:1;
  42     uint8_t invers:1;
  43     uint8_t unvisible:1;
  44 } TextAttributes;
  45
  46 typedef struct TextCell {
  47     uint8_t ch;
  48     TextAttributes t_attrib;
  49 } TextCell;
  50
  51 #define MAX_ESC_PARAMS 3
  52
  53 enum TTYState {
  54     TTY_STATE_NORM,
  55     TTY_STATE_ESC,
  56     TTY_STATE_CSI,
  57 };
  58
  59 typedef struct QEMUFIFO {
  60     uint8_t *buf;
  61     int buf_size;
  62     int count, wptr, rptr;
  63 } QEMUFIFO;
  64
  65 static int qemu_fifo_write(QEMUFIFO *f, const uint8_t *buf, int len1)
  66 {
  67     int l, len;
  68
  69     l = f->buf_size - f->count;
  70     if (len1 > l)
  71         len1 = l;
  72     len = len1;
  73     while (len > 0) {
  74         l = f->buf_size - f->wptr;
  75         if (l > len)
  76             l = len;
  77         memcpy(f->buf + f->wptr, buf, l);
  78         f->wptr += l;
  79         if (f->wptr >= f->buf_size)
  80             f->wptr = 0;
  81         buf += l;
  82         len -= l;
  83     }
  84     f->count += len1;
  85     return len1;
  86 }
  87
  88 static int qemu_fifo_read(QEMUFIFO *f, uint8_t *buf, int len1)
  89 {
  90     int l, len;
  91
  92     if (len1 > f->count)
  93         len1 = f->count;
  94     len = len1;
  95     while (len > 0) {
  96         l = f->buf_size - f->rptr;
  97         if (l > len)
  98             l = len;
  99         memcpy(buf, f->buf + f->rptr, l);
 100         f->rptr += l;
 101         if (f->rptr >= f->buf_size)
 102             f->rptr = 0;
 103         buf += l;
 104         len -= l;
 105     }
 106     f->count -= len1;
 107     return len1;
 108 }
 109
 110 typedef enum {
 111     GRAPHIC_CONSOLE,
 112     TEXT_CONSOLE,
 113     TEXT_CONSOLE_FIXED_SIZE
 114 } console_type_t;
 115
 116 struct QemuConsole {
 117     Object parent;
 118
 119     int index;
 120     console_type_t console_type;
 121     DisplayState *ds;
 122     DisplaySurface *surface;
 123     int dcls;
 124
 125     /* Graphic console state.  */
 126     Object *device;
 127     uint32_t head;
 128     QemuUIInfo ui_info;
 129     const GraphicHwOps *hw_ops;
 130     void *hw;
 131
 132     /* Text console state */
 133     int width;
 134     int height;
 135     int total_height;
 136     int backscroll_height;
 137     int x, y;
 138     int x_saved, y_saved;
 139     int y_displayed;
 140     int y_base;
 141     TextAttributes t_attrib_default; /* default text attributes */
 142     TextAttributes t_attrib; /* currently active text attributes */
 143     TextCell *cells;
 144     int text_x[2], text_y[2], cursor_invalidate;
 145     int echo;
 146
 147     int update_x0;
 148     int update_y0;
 149     int update_x1;
 150     int update_y1;
 151
 152     enum TTYState state;
 153     int esc_params[MAX_ESC_PARAMS];
 154     int nb_esc_params;
 155
 156     CharDriverState *chr;
 157     /* fifo for key pressed */
 158     QEMUFIFO out_fifo;
 159     uint8_t out_fifo_buf[16];
 160     QEMUTimer *kbd_timer;
 161 };
 162
 163 struct DisplayState {
 164     QEMUTimer *gui_timer;
 165     uint64_t last_update;
 166     uint64_t update_interval;
 167     bool refreshing;
 168     bool have_gfx;
 169     bool have_text;
 170
 171     QLIST_HEAD(, DisplayChangeListener) listeners;
 172 };
 173
 174 static DisplayState *display_state;
 175 static QemuConsole *active_console;
 176 static QemuConsole **consoles;
 177 static int nb_consoles = 0;
 178 static bool cursor_visible_phase;
 179 static QEMUTimer *cursor_timer;
 180
 181 static void text_console_do_init(CharDriverState *chr, DisplayState *ds);
 182 static void dpy_refresh(DisplayState *s);
 183 static DisplayState *get_alloc_displaystate(void);
 184 static void text_console_update_cursor_timer(void);
 185 static void text_console_update_cursor(void *opaque);
 186
 187 static void gui_update(void *opaque)
 188 {
 189     uint64_t interval = GUI_REFRESH_INTERVAL_IDLE;
 190     uint64_t dcl_interval;
 191     DisplayState *ds = opaque;
 192     DisplayChangeListener *dcl;
 193     int i;
 194
 195     ds->refreshing = true;
 196     dpy_refresh(ds);
 197     ds->refreshing = false;
 198
 199     QLIST_FOREACH(dcl, &ds->listeners, next) {
 200         dcl_interval = dcl->update_interval ?
 201             dcl->update_interval : GUI_REFRESH_INTERVAL_DEFAULT;
 202         if (interval > dcl_interval) {
 203             interval = dcl_interval;
 204         }
 205     }
 206     if (ds->update_interval != interval) {
 207         ds->update_interval = interval;
 208         for (i = 0; i < nb_consoles; i++) {
 209             if (consoles[i]->hw_ops->update_interval) {
 210                 consoles[i]->hw_ops->update_interval(consoles[i]->hw, interval);
 211             }
 212         }
 213         trace_console_refresh(interval);
 214     }
 215     ds->last_update = qemu_clock_get_ms(QEMU_CLOCK_REALTIME);
 216     timer_mod(ds->gui_timer, ds->last_update + interval);
 217 }
 218
 219 static void gui_setup_refresh(DisplayState *ds)
 220 {
 221     DisplayChangeListener *dcl;
 222     bool need_timer = false;
 223     bool have_gfx = false;
 224     bool have_text = false;
 225
 226     QLIST_FOREACH(dcl, &ds->listeners, next) {
 227         if (dcl->ops->dpy_refresh != NULL) {
 228             need_timer = true;
 229         }
 230         if (dcl->ops->dpy_gfx_update != NULL) {
 231             have_gfx = true;
 232         }
 233         if (dcl->ops->dpy_text_update != NULL) {
 234             have_text = true;
 235         }
 236     }
 237
 238     if (need_timer && ds->gui_timer == NULL) {
 239         ds->gui_timer = timer_new_ms(QEMU_CLOCK_REALTIME, gui_update, ds);
 240         timer_mod(ds->gui_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME));
 241     }
 242     if (!need_timer && ds->gui_timer != NULL) {
 243         timer_del(ds->gui_timer);
 244         timer_free(ds->gui_timer);
 245         ds->gui_timer = NULL;
 246     }
 247
 248     ds->have_gfx = have_gfx;
 249     ds->have_text = have_text;
 250 }
 251
 252 void graphic_hw_update(QemuConsole *con)
 253 {
 254     if (!con) {
 255         con = active_console;
 256     }
 257     if (con && con->hw_ops->gfx_update) {
 258         con->hw_ops->gfx_update(con->hw);
 259     }
 260 }
 261
 262 void graphic_hw_invalidate(QemuConsole *con)
 263 {
 264     if (!con) {
 265         con = active_console;
 266     }
 267     if (con && con->hw_ops->invalidate) {
 268         con->hw_ops->invalidate(con->hw);
 269     }
 270 }
 271
 272 static void ppm_save(const char *filename, struct DisplaySurface *ds,
 273                      Error **errp)
 274 {
 275     int width = pixman_image_get_width(ds->image);
 276     int height = pixman_image_get_height(ds->image);
 277     int fd;
 278     FILE *f;
 279     int y;
 280     int ret;
 281     pixman_image_t *linebuf;
 282
 283     trace_ppm_save(filename, ds);
 284     fd = qemu_open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0666);
 285     if (fd == -1) {
 286         error_setg(errp, "failed to open file '%s': %s", filename,
 287                    strerror(errno));
 288         return;
 289     }
 290     f = fdopen(fd, "wb");
 291     ret = fprintf(f, "P6\n%d %d\n%d\n", width, height, 255);
 292     if (ret < 0) {
 293         linebuf = NULL;
 294         goto write_err;
 295     }
 296     linebuf = qemu_pixman_linebuf_create(PIXMAN_BE_r8g8b8, width);
 297     for (y = 0; y < height; y++) {
 298         qemu_pixman_linebuf_fill(linebuf, ds->image, width, 0, y);
 299         clearerr(f);
 300         ret = fwrite(pixman_image_get_data(linebuf), 1,
 301                      pixman_image_get_stride(linebuf), f);
 302         (void)ret;
 303         if (ferror(f)) {
 304             goto write_err;
 305         }
 306     }
 307
 308 out:
 309     qemu_pixman_image_unref(linebuf);
 310     fclose(f);
 311     return;
 312
 313 write_err:
 314     error_setg(errp, "failed to write to file '%s': %s", filename,
 315                strerror(errno));
 316     unlink(filename);
 317     goto out;
 318 }
 319
 320 void qmp_screendump(const char *filename, Error **errp)
 321 {
 322     QemuConsole *con = qemu_console_lookup_by_index(0);
 323     DisplaySurface *surface;
 324
 325     if (con == NULL) {
 326         error_setg(errp, "There is no QemuConsole I can screendump from.");
 327         return;
 328     }
 329
 330     graphic_hw_update(con);
 331     surface = qemu_console_surface(con);
 332     ppm_save(filename, surface, errp);
 333 }
 334
 335 void graphic_hw_text_update(QemuConsole *con, console_ch_t *chardata)
 336 {
 337     if (!con) {
 338         con = active_console;
 339     }
 340     if (con && con->hw_ops->text_update) {
 341         con->hw_ops->text_update(con->hw, chardata);
 342     }
 343 }
 344
 345 static void vga_fill_rect(QemuConsole *con,
 346                           int posx, int posy, int width, int height,
 347                           pixman_color_t color)
 348 {
 349     DisplaySurface *surface = qemu_console_surface(con);
 350     pixman_rectangle16_t rect = {
 351         .x = posx, .y = posy, .width = width, .height = height
 352     };
 353
 354     pixman_image_fill_rectangles(PIXMAN_OP_SRC, surface->image,
 355                                  &color, 1, &rect);
 356 }
 357
 358 /* copy from (xs, ys) to (xd, yd) a rectangle of size (w, h) */
 359 static void vga_bitblt(QemuConsole *con,
 360                        int xs, int ys, int xd, int yd, int w, int h)
 361 {
 362     DisplaySurface *surface = qemu_console_surface(con);
 363
 364     pixman_image_composite(PIXMAN_OP_SRC,
 365                            surface->image, NULL, surface->image,
 366                            xs, ys, 0, 0, xd, yd, w, h);
 367 }
 368
 369 /***********************************************************/
 370 /* basic char display */
 371
 372 #define FONT_HEIGHT 16
 373 #define FONT_WIDTH 8
 374
 375 #include "vgafont.h"
 376
 377 #ifndef CONFIG_CURSES
 378 enum color_names {
 379     COLOR_BLACK   = 0,
 380     COLOR_RED     = 1,
 381     COLOR_GREEN   = 2,
 382     COLOR_YELLOW  = 3,
 383     COLOR_BLUE    = 4,
 384     COLOR_MAGENTA = 5,
 385     COLOR_CYAN    = 6,
 386     COLOR_WHITE   = 7
 387 };
 388 #endif
 389
 390 #define QEMU_RGB(r, g, b)                                               \
 391     { .red = r << 8, .green = g << 8, .blue = b << 8, .alpha = 0xffff }
 392
 393 static const pixman_color_t color_table_rgb[2][8] = {
 394     {   /* dark */
 395         QEMU_RGB(0x00, 0x00, 0x00),  /* black */
 396         QEMU_RGB(0xaa, 0x00, 0x00),  /* red */
 397         QEMU_RGB(0x00, 0xaa, 0x00),  /* green */
 398         QEMU_RGB(0xaa, 0xaa, 0x00),  /* yellow */
 399         QEMU_RGB(0x00, 0x00, 0xaa),  /* blue */
 400         QEMU_RGB(0xaa, 0x00, 0xaa),  /* magenta */
 401         QEMU_RGB(0x00, 0xaa, 0xaa),  /* cyan */
 402         QEMU_RGB(0xaa, 0xaa, 0xaa),  /* white */
 403     },
 404     {   /* bright */
 405         QEMU_RGB(0x00, 0x00, 0x00),  /* black */
 406         QEMU_RGB(0xff, 0x00, 0x00),  /* red */
 407         QEMU_RGB(0x00, 0xff, 0x00),  /* green */
 408         QEMU_RGB(0xff, 0xff, 0x00),  /* yellow */
 409         QEMU_RGB(0x00, 0x00, 0xff),  /* blue */
 410         QEMU_RGB(0xff, 0x00, 0xff),  /* magenta */
 411         QEMU_RGB(0x00, 0xff, 0xff),  /* cyan */
 412         QEMU_RGB(0xff, 0xff, 0xff),  /* white */
 413     }
 414 };
 415
 416 static void vga_putcharxy(QemuConsole *s, int x, int y, int ch,
 417                           TextAttributes *t_attrib)
 418 {
 419     static pixman_image_t *glyphs[256];
 420     DisplaySurface *surface = qemu_console_surface(s);
 421     pixman_color_t fgcol, bgcol;
 422
 423     if (t_attrib->invers) {
 424         bgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
 425         fgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
 426     } else {
 427         fgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
 428         bgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
 429     }
 430
 431     if (!glyphs[ch]) {
 432         glyphs[ch] = qemu_pixman_glyph_from_vgafont(FONT_HEIGHT, vgafont16, ch);
 433     }
 434     qemu_pixman_glyph_render(glyphs[ch], surface->image,
 435                              &fgcol, &bgcol, x, y, FONT_WIDTH, FONT_HEIGHT);
 436 }
 437
 438 static void text_console_resize(QemuConsole *s)
 439 {
 440     TextCell *cells, *c, *c1;
 441     int w1, x, y, last_width;
 442
 443     last_width = s->width;
 444     s->width = surface_width(s->surface) / FONT_WIDTH;
 445     s->height = surface_height(s->surface) / FONT_HEIGHT;
 446
 447     w1 = last_width;
 448     if (s->width < w1)
 449         w1 = s->width;
 450
 451     cells = g_malloc(s->width * s->total_height * sizeof(TextCell));
 452     for(y = 0; y < s->total_height; y++) {
 453         c = &cells[y * s->width];
 454         if (w1 > 0) {
 455             c1 = &s->cells[y * last_width];
 456             for(x = 0; x < w1; x++) {
 457                 *c++ = *c1++;
 458             }
 459         }
 460         for(x = w1; x < s->width; x++) {
 461             c->ch = ' ';
 462             c->t_attrib = s->t_attrib_default;
 463             c++;
 464         }
 465     }
 466     g_free(s->cells);
 467     s->cells = cells;
 468 }
 469
 470 static inline void text_update_xy(QemuConsole *s, int x, int y)
 471 {
 472     s->text_x[0] = MIN(s->text_x[0], x);
 473     s->text_x[1] = MAX(s->text_x[1], x);
 474     s->text_y[0] = MIN(s->text_y[0], y);
 475     s->text_y[1] = MAX(s->text_y[1], y);
 476 }
 477
 478 static void invalidate_xy(QemuConsole *s, int x, int y)
 479 {
 480     if (!qemu_console_is_visible(s)) {
 481         return;
 482     }
 483     if (s->update_x0 > x * FONT_WIDTH)
 484         s->update_x0 = x * FONT_WIDTH;
 485     if (s->update_y0 > y * FONT_HEIGHT)
 486         s->update_y0 = y * FONT_HEIGHT;
 487     if (s->update_x1 < (x + 1) * FONT_WIDTH)
 488         s->update_x1 = (x + 1) * FONT_WIDTH;
 489     if (s->update_y1 < (y + 1) * FONT_HEIGHT)
 490         s->update_y1 = (y + 1) * FONT_HEIGHT;
 491 }
 492
 493 static void update_xy(QemuConsole *s, int x, int y)
 494 {
 495     TextCell *c;
 496     int y1, y2;
 497
 498     if (s->ds->have_text) {
 499         text_update_xy(s, x, y);
 500     }
 501
 502     y1 = (s->y_base + y) % s->total_height;
 503     y2 = y1 - s->y_displayed;
 504     if (y2 < 0) {
 505         y2 += s->total_height;
 506     }
 507     if (y2 < s->height) {
 508         c = &s->cells[y1 * s->width + x];
 509         vga_putcharxy(s, x, y2, c->ch,
 510                       &(c->t_attrib));
 511         invalidate_xy(s, x, y2);
 512     }
 513 }
 514
 515 static void console_show_cursor(QemuConsole *s, int show)
 516 {
 517     TextCell *c;
 518     int y, y1;
 519     int x = s->x;
 520
 521     if (s->ds->have_text) {
 522         s->cursor_invalidate = 1;
 523     }
 524
 525     if (x >= s->width) {
 526         x = s->width - 1;
 527     }
 528     y1 = (s->y_base + s->y) % s->total_height;
 529     y = y1 - s->y_displayed;
 530     if (y < 0) {
 531         y += s->total_height;
 532     }
 533     if (y < s->height) {
 534         c = &s->cells[y1 * s->width + x];
 535         if (show && cursor_visible_phase) {
 536             TextAttributes t_attrib = s->t_attrib_default;
 537             t_attrib.invers = !(t_attrib.invers); /* invert fg and bg */
 538             vga_putcharxy(s, x, y, c->ch, &t_attrib);
 539         } else {
 540             vga_putcharxy(s, x, y, c->ch, &(c->t_attrib));
 541         }
 542         invalidate_xy(s, x, y);
 543     }
 544 }
 545
 546 static void console_refresh(QemuConsole *s)
 547 {
 548     DisplaySurface *surface = qemu_console_surface(s);
 549     TextCell *c;
 550     int x, y, y1;
 551
 552     if (s->ds->have_text) {
 553         s->text_x[0] = 0;
 554         s->text_y[0] = 0;
 555         s->text_x[1] = s->width - 1;
 556         s->text_y[1] = s->height - 1;
 557         s->cursor_invalidate = 1;
 558     }
 559
 560     vga_fill_rect(s, 0, 0, surface_width(surface), surface_height(surface),
 561                   color_table_rgb[0][COLOR_BLACK]);
 562     y1 = s->y_displayed;
 563     for (y = 0; y < s->height; y++) {
 564         c = s->cells + y1 * s->width;
 565         for (x = 0; x < s->width; x++) {
 566             vga_putcharxy(s, x, y, c->ch,
 567                           &(c->t_attrib));
 568             c++;
 569         }
 570         if (++y1 == s->total_height) {
 571             y1 = 0;
 572         }
 573     }
 574     console_show_cursor(s, 1);
 575     dpy_gfx_update(s, 0, 0,
 576                    surface_width(surface), surface_height(surface));
 577 }
 578
 579 static void console_scroll(QemuConsole *s, int ydelta)
 580 {
 581     int i, y1;
 582
 583     if (ydelta > 0) {
 584         for(i = 0; i < ydelta; i++) {
 585             if (s->y_displayed == s->y_base)
 586                 break;
 587             if (++s->y_displayed == s->total_height)
 588                 s->y_displayed = 0;
 589         }
 590     } else {
 591         ydelta = -ydelta;
 592         i = s->backscroll_height;
 593         if (i > s->total_height - s->height)
 594             i = s->total_height - s->height;
 595         y1 = s->y_base - i;
 596         if (y1 < 0)
 597             y1 += s->total_height;
 598         for(i = 0; i < ydelta; i++) {
 599             if (s->y_displayed == y1)
 600                 break;
 601             if (--s->y_displayed < 0)
 602                 s->y_displayed = s->total_height - 1;
 603         }
 604     }
 605     console_refresh(s);
 606 }
 607
 608 static void console_put_lf(QemuConsole *s)
 609 {
 610     TextCell *c;
 611     int x, y1;
 612
 613     s->y++;
 614     if (s->y >= s->height) {
 615         s->y = s->height - 1;
 616
 617         if (s->y_displayed == s->y_base) {
 618             if (++s->y_displayed == s->total_height)
 619                 s->y_displayed = 0;
 620         }
 621         if (++s->y_base == s->total_height)
 622             s->y_base = 0;
 623         if (s->backscroll_height < s->total_height)
 624             s->backscroll_height++;
 625         y1 = (s->y_base + s->height - 1) % s->total_height;
 626         c = &s->cells[y1 * s->width];
 627         for(x = 0; x < s->width; x++) {
 628             c->ch = ' ';
 629             c->t_attrib = s->t_attrib_default;
 630             c++;
 631         }
 632         if (s->y_displayed == s->y_base) {
 633             if (s->ds->have_text) {
 634                 s->text_x[0] = 0;
 635                 s->text_y[0] = 0;
 636                 s->text_x[1] = s->width - 1;
 637                 s->text_y[1] = s->height - 1;
 638             }
 639
 640             vga_bitblt(s, 0, FONT_HEIGHT, 0, 0,
 641                        s->width * FONT_WIDTH,
 642                        (s->height - 1) * FONT_HEIGHT);
 643             vga_fill_rect(s, 0, (s->height - 1) * FONT_HEIGHT,
 644                           s->width * FONT_WIDTH, FONT_HEIGHT,
 645                           color_table_rgb[0][s->t_attrib_default.bgcol]);
 646             s->update_x0 = 0;
 647             s->update_y0 = 0;
 648             s->update_x1 = s->width * FONT_WIDTH;
 649             s->update_y1 = s->height * FONT_HEIGHT;
 650         }
 651     }
 652 }
 653
 654 /* Set console attributes depending on the current escape codes.
 655  * NOTE: I know this code is not very efficient (checking every color for it
 656  * self) but it is more readable and better maintainable.
 657  */
 658 static void console_handle_escape(QemuConsole *s)
 659 {
 660     int i;
 661
 662     for (i=0; i<s->nb_esc_params; i++) {
 663         switch (s->esc_params[i]) {
 664             case 0: /* reset all console attributes to default */
 665                 s->t_attrib = s->t_attrib_default;
 666                 break;
 667             case 1:
 668                 s->t_attrib.bold = 1;
 669                 break;
 670             case 4:
 671                 s->t_attrib.uline = 1;
 672                 break;
 673             case 5:
 674                 s->t_attrib.blink = 1;
 675                 break;
 676             case 7:
 677                 s->t_attrib.invers = 1;
 678                 break;
 679             case 8:
 680                 s->t_attrib.unvisible = 1;
 681                 break;
 682             case 22:
 683                 s->t_attrib.bold = 0;
 684                 break;
 685             case 24:
 686                 s->t_attrib.uline = 0;
 687                 break;
 688             case 25:
 689                 s->t_attrib.blink = 0;
 690                 break;
 691             case 27:
 692                 s->t_attrib.invers = 0;
 693                 break;
 694             case 28:
 695                 s->t_attrib.unvisible = 0;
 696                 break;
 697             /* set foreground color */
 698             case 30:
 699                 s->t_attrib.fgcol=COLOR_BLACK;
 700                 break;
 701             case 31:
 702                 s->t_attrib.fgcol=COLOR_RED;
 703                 break;
 704             case 32:
 705                 s->t_attrib.fgcol=COLOR_GREEN;
 706                 break;
 707             case 33:
 708                 s->t_attrib.fgcol=COLOR_YELLOW;
 709                 break;
 710             case 34:
 711                 s->t_attrib.fgcol=COLOR_BLUE;
 712                 break;
 713             case 35:
 714                 s->t_attrib.fgcol=COLOR_MAGENTA;
 715                 break;
 716             case 36:
 717                 s->t_attrib.fgcol=COLOR_CYAN;
 718                 break;
 719             case 37:
 720                 s->t_attrib.fgcol=COLOR_WHITE;
 721                 break;
 722             /* set background color */
 723             case 40:
 724                 s->t_attrib.bgcol=COLOR_BLACK;
 725                 break;
 726             case 41:
 727                 s->t_attrib.bgcol=COLOR_RED;
 728                 break;
 729             case 42:
 730                 s->t_attrib.bgcol=COLOR_GREEN;
 731                 break;
 732             case 43:
 733                 s->t_attrib.bgcol=COLOR_YELLOW;
 734                 break;
 735             case 44:
 736                 s->t_attrib.bgcol=COLOR_BLUE;
 737                 break;
 738             case 45:
 739                 s->t_attrib.bgcol=COLOR_MAGENTA;
 740                 break;
 741             case 46:
 742                 s->t_attrib.bgcol=COLOR_CYAN;
 743                 break;
 744             case 47:
 745                 s->t_attrib.bgcol=COLOR_WHITE;
 746                 break;
 747         }
 748     }
 749 }
 750
 751 static void console_clear_xy(QemuConsole *s, int x, int y)
 752 {
 753     int y1 = (s->y_base + y) % s->total_height;
 754     TextCell *c = &s->cells[y1 * s->width + x];
 755     c->ch = ' ';
 756     c->t_attrib = s->t_attrib_default;
 757     update_xy(s, x, y);
 758 }
 759
 760 /* set cursor, checking bounds */
 761 static void set_cursor(QemuConsole *s, int x, int y)
 762 {
 763     if (x < 0) {
 764         x = 0;
 765     }
 766     if (y < 0) {
 767         y = 0;
 768     }
 769     if (y >= s->height) {
 770         y = s->height - 1;
 771     }
 772     if (x >= s->width) {
 773         x = s->width - 1;
 774     }
 775
 776     s->x = x;
 777     s->y = y;
 778 }
 779
 780 static void console_putchar(QemuConsole *s, int ch)
 781 {
 782     TextCell *c;
 783     int y1, i;
 784     int x, y;
 785
 786     switch(s->state) {
 787     case TTY_STATE_NORM:
 788         switch(ch) {
 789         case '\r':  /* carriage return */
 790             s->x = 0;
 791             break;
 792         case '\n':  /* newline */
 793             console_put_lf(s);
 794             break;
 795         case '\b':  /* backspace */
 796             if (s->x > 0)
 797                 s->x--;
 798             break;
 799         case '\t':  /* tabspace */
 800             if (s->x + (8 - (s->x % 8)) > s->width) {
 801                 s->x = 0;
 802                 console_put_lf(s);
 803             } else {
 804                 s->x = s->x + (8 - (s->x % 8));
 805             }
 806             break;
 807         case '\a':  /* alert aka. bell */
 808             /* TODO: has to be implemented */
 809             break;
 810         case 14:
 811             /* SI (shift in), character set 0 (ignored) */
 812             break;
 813         case 15:
 814             /* SO (shift out), character set 1 (ignored) */
 815             break;
 816         case 27:    /* esc (introducing an escape sequence) */
 817             s->state = TTY_STATE_ESC;
 818             break;
 819         default:
 820             if (s->x >= s->width) {
 821                 /* line wrap */
 822                 s->x = 0;
 823                 console_put_lf(s);
 824             }
 825             y1 = (s->y_base + s->y) % s->total_height;
 826             c = &s->cells[y1 * s->width + s->x];
 827             c->ch = ch;
 828             c->t_attrib = s->t_attrib;
 829             update_xy(s, s->x, s->y);
 830             s->x++;
 831             break;
 832         }
 833         break;
 834     case TTY_STATE_ESC: /* check if it is a terminal escape sequence */
 835         if (ch == '[') {
 836             for(i=0;i<MAX_ESC_PARAMS;i++)
 837                 s->esc_params[i] = 0;
 838             s->nb_esc_params = 0;
 839             s->state = TTY_STATE_CSI;
 840         } else {
 841             s->state = TTY_STATE_NORM;
 842         }
 843         break;
 844     case TTY_STATE_CSI: /* handle escape sequence parameters */
 845         if (ch >= '0' && ch <= '9') {
 846             if (s->nb_esc_params < MAX_ESC_PARAMS) {
 847                 int *param = &s->esc_params[s->nb_esc_params];
 848                 int digit = (ch - '0');
 849
 850                 *param = (*param <= (INT_MAX - digit) / 10) ?
 851                          *param * 10 + digit : INT_MAX;
 852             }
 853         } else {
 854             if (s->nb_esc_params < MAX_ESC_PARAMS)
 855                 s->nb_esc_params++;
 856             if (ch == ';')
 857                 break;
 858             trace_console_putchar_csi(s->esc_params[0], s->esc_params[1],
 859                                       ch, s->nb_esc_params);
 860             s->state = TTY_STATE_NORM;
 861             switch(ch) {
 862             case 'A':
 863                 /* move cursor up */
 864                 if (s->esc_params[0] == 0) {
 865                     s->esc_params[0] = 1;
 866                 }
 867                 set_cursor(s, s->x, s->y - s->esc_params[0]);
 868                 break;
 869             case 'B':
 870                 /* move cursor down */
 871                 if (s->esc_params[0] == 0) {
 872                     s->esc_params[0] = 1;
 873                 }
 874                 set_cursor(s, s->x, s->y + s->esc_params[0]);
 875                 break;
 876             case 'C':
 877                 /* move cursor right */
 878                 if (s->esc_params[0] == 0) {
 879                     s->esc_params[0] = 1;
 880                 }
 881                 set_cursor(s, s->x + s->esc_params[0], s->y);
 882                 break;
 883             case 'D':
 884                 /* move cursor left */
 885                 if (s->esc_params[0] == 0) {
 886                     s->esc_params[0] = 1;
 887                 }
 888                 set_cursor(s, s->x - s->esc_params[0], s->y);
 889                 break;
 890             case 'G':
 891                 /* move cursor to column */
 892                 set_cursor(s, s->esc_params[0] - 1, s->y);
 893                 break;
 894             case 'f':
 895             case 'H':
 896                 /* move cursor to row, column */
 897                 set_cursor(s, s->esc_params[1] - 1, s->esc_params[0] - 1);
 898                 break;
 899             case 'J':
 900                 switch (s->esc_params[0]) {
 901                 case 0:
 902                     /* clear to end of screen */
 903                     for (y = s->y; y < s->height; y++) {
 904                         for (x = 0; x < s->width; x++) {
 905                             if (y == s->y && x < s->x) {
 906                                 continue;
 907                             }
 908                             console_clear_xy(s, x, y);
 909                         }
 910                     }
 911                     break;
 912                 case 1:
 913                     /* clear from beginning of screen */
 914                     for (y = 0; y <= s->y; y++) {
 915                         for (x = 0; x < s->width; x++) {
 916                             if (y == s->y && x > s->x) {
 917                                 break;
 918                             }
 919                             console_clear_xy(s, x, y);
 920                         }
 921                     }
 922                     break;
 923                 case 2:
 924                     /* clear entire screen */
 925                     for (y = 0; y <= s->height; y++) {
 926                         for (x = 0; x < s->width; x++) {
 927                             console_clear_xy(s, x, y);
 928                         }
 929                     }
 930                     break;
 931                 }
 932                 break;
 933             case 'K':
 934                 switch (s->esc_params[0]) {
 935                 case 0:
 936                     /* clear to eol */
 937                     for(x = s->x; x < s->width; x++) {
 938                         console_clear_xy(s, x, s->y);
 939                     }
 940                     break;
 941                 case 1:
 942                     /* clear from beginning of line */
 943                     for (x = 0; x <= s->x; x++) {
 944                         console_clear_xy(s, x, s->y);
 945                     }
 946                     break;
 947                 case 2:
 948                     /* clear entire line */
 949                     for(x = 0; x < s->width; x++) {
 950                         console_clear_xy(s, x, s->y);
 951                     }
 952                     break;
 953                 }
 954                 break;
 955             case 'm':
 956                 console_handle_escape(s);
 957                 break;
 958             case 'n':
 959                 /* report cursor position */
 960                 /* TODO: send ESC[row;colR */
 961                 break;
 962             case 's':
 963                 /* save cursor position */
 964                 s->x_saved = s->x;
 965                 s->y_saved = s->y;
 966                 break;
 967             case 'u':
 968                 /* restore cursor position */
 969                 s->x = s->x_saved;
 970                 s->y = s->y_saved;
 971                 break;
 972             default:
 973                 trace_console_putchar_unhandled(ch);
 974                 break;
 975             }
 976             break;
 977         }
 978     }
 979 }
 980
 981 void console_select(unsigned int index)
 982 {
 983     DisplayChangeListener *dcl;
 984     QemuConsole *s;
 985
 986     trace_console_select(index);
 987     s = qemu_console_lookup_by_index(index);
 988     if (s) {
 989         DisplayState *ds = s->ds;
 990
 991         active_console = s;
 992         if (ds->have_gfx) {
 993             QLIST_FOREACH(dcl, &ds->listeners, next) {
 994                 if (dcl->con != NULL) {
 995                     continue;
 996                 }
 997                 if (dcl->ops->dpy_gfx_switch) {
 998                     dcl->ops->dpy_gfx_switch(dcl, s->surface);
 999                 }
1000             }
1001             dpy_gfx_update(s, 0, 0, surface_width(s->surface),
1002                            surface_height(s->surface));
1003         }
1004         if (ds->have_text) {
1005             dpy_text_resize(s, s->width, s->height);
1006         }
1007         text_console_update_cursor(NULL);
1008     }
1009 }
1010
1011 static int console_puts(CharDriverState *chr, const uint8_t *buf, int len)
1012 {
1013     QemuConsole *s = chr->opaque;
1014     int i;
1015
1016     s->update_x0 = s->width * FONT_WIDTH;
1017     s->update_y0 = s->height * FONT_HEIGHT;
1018     s->update_x1 = 0;
1019     s->update_y1 = 0;
1020     console_show_cursor(s, 0);
1021     for(i = 0; i < len; i++) {
1022         console_putchar(s, buf[i]);
1023     }
1024     console_show_cursor(s, 1);
1025     if (s->ds->have_gfx && s->update_x0 < s->update_x1) {
1026         dpy_gfx_update(s, s->update_x0, s->update_y0,
1027                        s->update_x1 - s->update_x0,
1028                        s->update_y1 - s->update_y0);
1029     }
1030     return len;
1031 }
1032
1033 static void kbd_send_chars(void *opaque)
1034 {
1035     QemuConsole *s = opaque;
1036     int len;
1037     uint8_t buf[16];
1038
1039     len = qemu_chr_be_can_write(s->chr);
1040     if (len > s->out_fifo.count)
1041         len = s->out_fifo.count;
1042     if (len > 0) {
1043         if (len > sizeof(buf))
1044             len = sizeof(buf);
1045         qemu_fifo_read(&s->out_fifo, buf, len);
1046         qemu_chr_be_write(s->chr, buf, len);
1047     }
1048     /* characters are pending: we send them a bit later (XXX:
1049        horrible, should change char device API) */
1050     if (s->out_fifo.count > 0) {
1051         timer_mod(s->kbd_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME) + 1);
1052     }
1053 }
1054
1055 /* called when an ascii key is pressed */
1056 void kbd_put_keysym_console(QemuConsole *s, int keysym)
1057 {
1058     uint8_t buf[16], *q;
1059     int c;
1060
1061     if (!s || (s->console_type == GRAPHIC_CONSOLE))
1062         return;
1063
1064     switch(keysym) {
1065     case QEMU_KEY_CTRL_UP:
1066         console_scroll(s, -1);
1067         break;
1068     case QEMU_KEY_CTRL_DOWN:
1069         console_scroll(s, 1);
1070         break;
1071     case QEMU_KEY_CTRL_PAGEUP:
1072         console_scroll(s, -10);
1073         break;
1074     case QEMU_KEY_CTRL_PAGEDOWN:
1075         console_scroll(s, 10);
1076         break;
1077     default:
1078         /* convert the QEMU keysym to VT100 key string */
1079         q = buf;
1080         if (keysym >= 0xe100 && keysym <= 0xe11f) {
1081             *q++ = '\033';
1082             *q++ = '[';
1083             c = keysym - 0xe100;
1084             if (c >= 10)
1085                 *q++ = '0' + (c / 10);
1086             *q++ = '0' + (c % 10);
1087             *q++ = '~';
1088         } else if (keysym >= 0xe120 && keysym <= 0xe17f) {
1089             *q++ = '\033';
1090             *q++ = '[';
1091             *q++ = keysym & 0xff;
1092         } else if (s->echo && (keysym == '\r' || keysym == '\n')) {
1093             console_puts(s->chr, (const uint8_t *) "\r", 1);
1094             *q++ = '\n';
1095         } else {
1096             *q++ = keysym;
1097         }
1098         if (s->echo) {
1099             console_puts(s->chr, buf, q - buf);
1100         }
1101         if (s->chr->chr_read) {
1102             qemu_fifo_write(&s->out_fifo, buf, q - buf);
1103             kbd_send_chars(s);
1104         }
1105         break;
1106     }
1107 }
1108
1109 static const int qcode_to_keysym[Q_KEY_CODE_MAX] = {
1110     [Q_KEY_CODE_UP]     = QEMU_KEY_UP,
1111     [Q_KEY_CODE_DOWN]   = QEMU_KEY_DOWN,
1112     [Q_KEY_CODE_RIGHT]  = QEMU_KEY_RIGHT,
1113     [Q_KEY_CODE_LEFT]   = QEMU_KEY_LEFT,
1114     [Q_KEY_CODE_HOME]   = QEMU_KEY_HOME,
1115     [Q_KEY_CODE_END]    = QEMU_KEY_END,
1116     [Q_KEY_CODE_PGUP]   = QEMU_KEY_PAGEUP,
1117     [Q_KEY_CODE_PGDN]   = QEMU_KEY_PAGEDOWN,
1118     [Q_KEY_CODE_DELETE] = QEMU_KEY_DELETE,
1119 };
1120
1121 bool kbd_put_qcode_console(QemuConsole *s, int qcode)
1122 {
1123     int keysym;
1124
1125     keysym = qcode_to_keysym[qcode];
1126     if (keysym == 0) {
1127         return false;
1128     }
1129     kbd_put_keysym_console(s, keysym);
1130     return true;
1131 }
1132
1133 void kbd_put_string_console(QemuConsole *s, const char *str, int len)
1134 {
1135     int i;
1136
1137     for (i = 0; i < len && str[i]; i++) {
1138         kbd_put_keysym_console(s, str[i]);
1139     }
1140 }
1141
1142 void kbd_put_keysym(int keysym)
1143 {
1144     kbd_put_keysym_console(active_console, keysym);
1145 }
1146
1147 static void text_console_invalidate(void *opaque)
1148 {
1149     QemuConsole *s = (QemuConsole *) opaque;
1150
1151     if (s->ds->have_text && s->console_type == TEXT_CONSOLE) {
1152         text_console_resize(s);
1153     }
1154     console_refresh(s);
1155 }
1156
1157 static void text_console_update(void *opaque, console_ch_t *chardata)
1158 {
1159     QemuConsole *s = (QemuConsole *) opaque;
1160     int i, j, src;
1161
1162     if (s->text_x[0] <= s->text_x[1]) {
1163         src = (s->y_base + s->text_y[0]) * s->width;
1164         chardata += s->text_y[0] * s->width;
1165         for (i = s->text_y[0]; i <= s->text_y[1]; i ++)
1166             for (j = 0; j < s->width; j ++, src ++)
1167                 console_write_ch(chardata ++, s->cells[src].ch |
1168                                 (s->cells[src].t_attrib.fgcol << 12) |
1169                                 (s->cells[src].t_attrib.bgcol << 8) |
1170                                 (s->cells[src].t_attrib.bold << 21));
1171         dpy_text_update(s, s->text_x[0], s->text_y[0],
1172                         s->text_x[1] - s->text_x[0], i - s->text_y[0]);
1173         s->text_x[0] = s->width;
1174         s->text_y[0] = s->height;
1175         s->text_x[1] = 0;
1176         s->text_y[1] = 0;
1177     }
1178     if (s->cursor_invalidate) {
1179         dpy_text_cursor(s, s->x, s->y);
1180         s->cursor_invalidate = 0;
1181     }
1182 }
1183
1184 static QemuConsole *new_console(DisplayState *ds, console_type_t console_type,
1185                                 uint32_t head)
1186 {
1187     Object *obj;
1188     QemuConsole *s;
1189     int i;
1190
1191     obj = object_new(TYPE_QEMU_CONSOLE);
1192     s = QEMU_CONSOLE(obj);
1193     s->head = head;
1194     object_property_add_link(obj, "device", TYPE_DEVICE,
1195                              (Object **)&s->device,
1196                              object_property_allow_set_link,
1197                              OBJ_PROP_LINK_UNREF_ON_RELEASE,
1198                              &error_abort);
1199     object_property_add_uint32_ptr(obj, "head",
1200                                    &s->head, &error_abort);
1201
1202     if (!active_console || ((active_console->console_type != GRAPHIC_CONSOLE) &&
1203         (console_type == GRAPHIC_CONSOLE))) {
1204         active_console = s;
1205     }
1206     s->ds = ds;
1207     s->console_type = console_type;
1208
1209     consoles = g_realloc(consoles, sizeof(*consoles) * (nb_consoles+1));
1210     if (console_type != GRAPHIC_CONSOLE) {
1211         s->index = nb_consoles;
1212         consoles[nb_consoles++] = s;
1213     } else {
1214         /* HACK: Put graphical consoles before text consoles.  */
1215         for (i = nb_consoles; i > 0; i--) {
1216             if (consoles[i - 1]->console_type == GRAPHIC_CONSOLE)
1217                 break;
1218             consoles[i] = consoles[i - 1];
1219             consoles[i]->index = i;
1220         }
1221         s->index = i;
1222         consoles[i] = s;
1223         nb_consoles++;
1224     }
1225     return s;
1226 }
1227
1228 static void qemu_alloc_display(DisplaySurface *surface, int width, int height)
1229 {
1230     qemu_pixman_image_unref(surface->image);
1231     surface->image = NULL;
1232
1233     surface->format = PIXMAN_x8r8g8b8;
1234     surface->image = pixman_image_create_bits(surface->format,
1235                                               width, height,
1236                                               NULL, width * 4);
1237     assert(surface->image != NULL);
1238
1239     surface->flags = QEMU_ALLOCATED_FLAG;
1240 }
1241
1242 DisplaySurface *qemu_create_displaysurface(int width, int height)
1243 {
1244     DisplaySurface *surface = g_new0(DisplaySurface, 1);
1245
1246     trace_displaysurface_create(surface, width, height);
1247     qemu_alloc_display(surface, width, height);
1248     return surface;
1249 }
1250
1251 DisplaySurface *qemu_create_displaysurface_from(int width, int height,
1252                                                 pixman_format_code_t format,
1253                                                 int linesize, uint8_t *data)
1254 {
1255     DisplaySurface *surface = g_new0(DisplaySurface, 1);
1256
1257     trace_displaysurface_create_from(surface, width, height, format);
1258     surface->format = format;
1259     surface->image = pixman_image_create_bits(surface->format,
1260                                               width, height,
1261                                               (void *)data, linesize);
1262     assert(surface->image != NULL);
1263
1264     return surface;
1265 }
1266
1267 static void qemu_unmap_displaysurface_guestmem(pixman_image_t *image,
1268                                                void *unused)
1269 {
1270     void *data = pixman_image_get_data(image);
1271     uint32_t size = pixman_image_get_stride(image) *
1272         pixman_image_get_height(image);
1273     cpu_physical_memory_unmap(data, size, 0, 0);
1274 }
1275
1276 DisplaySurface *qemu_create_displaysurface_guestmem(int width, int height,
1277                                                     pixman_format_code_t format,
1278                                                     int linesize, uint64_t addr)
1279 {
1280     DisplaySurface *surface;
1281     hwaddr size;
1282     void *data;
1283
1284     if (linesize == 0) {
1285         linesize = width * PIXMAN_FORMAT_BPP(format) / 8;
1286     }
1287
1288     size = linesize * height;
1289     data = cpu_physical_memory_map(addr, &size, 0);
1290     if (size != linesize * height) {
1291         cpu_physical_memory_unmap(data, size, 0, 0);
1292         return NULL;
1293     }
1294
1295     surface = qemu_create_displaysurface_from
1296         (width, height, format, linesize, data);
1297     pixman_image_set_destroy_function
1298         (surface->image, qemu_unmap_displaysurface_guestmem, NULL);
1299
1300     return surface;
1301 }
1302
1303 static DisplaySurface *qemu_create_message_surface(int w, int h,
1304                                                    const char *msg)
1305 {
1306     DisplaySurface *surface = qemu_create_displaysurface(w, h);
1307     pixman_color_t bg = color_table_rgb[0][COLOR_BLACK];
1308     pixman_color_t fg = color_table_rgb[0][COLOR_WHITE];
1309     pixman_image_t *glyph;
1310     int len, x, y, i;
1311
1312     len = strlen(msg);
1313     x = (w / FONT_WIDTH  - len) / 2;
1314     y = (h / FONT_HEIGHT - 1)   / 2;
1315     for (i = 0; i < len; i++) {
1316         glyph = qemu_pixman_glyph_from_vgafont(FONT_HEIGHT, vgafont16, msg[i]);
1317         qemu_pixman_glyph_render(glyph, surface->image, &fg, &bg,
1318                                  x+i, y, FONT_WIDTH, FONT_HEIGHT);
1319         qemu_pixman_image_unref(glyph);
1320     }
1321     return surface;
1322 }
1323
1324 void qemu_free_displaysurface(DisplaySurface *surface)
1325 {
1326     if (surface == NULL) {
1327         return;
1328     }
1329     trace_displaysurface_free(surface);
1330     qemu_pixman_image_unref(surface->image);
1331     g_free(surface);
1332 }
1333
1334 void register_displaychangelistener(DisplayChangeListener *dcl)
1335 {
1336     static const char nodev[] =
1337         "This VM has no graphic display device.";
1338     static DisplaySurface *dummy;
1339     QemuConsole *con;
1340
1341     trace_displaychangelistener_register(dcl, dcl->ops->dpy_name);
1342     dcl->ds = get_alloc_displaystate();
1343     QLIST_INSERT_HEAD(&dcl->ds->listeners, dcl, next);
1344     gui_setup_refresh(dcl->ds);
1345     if (dcl->con) {
1346         dcl->con->dcls++;
1347         con = dcl->con;
1348     } else {
1349         con = active_console;
1350     }
1351     if (dcl->ops->dpy_gfx_switch) {
1352         if (con) {
1353             dcl->ops->dpy_gfx_switch(dcl, con->surface);
1354         } else {
1355             if (!dummy) {
1356                 dummy = qemu_create_message_surface(640, 480, nodev);
1357             }
1358             dcl->ops->dpy_gfx_switch(dcl, dummy);
1359         }
1360     }
1361     text_console_update_cursor(NULL);
1362 }
1363
1364 void update_displaychangelistener(DisplayChangeListener *dcl,
1365                                   uint64_t interval)
1366 {
1367     DisplayState *ds = dcl->ds;
1368
1369     dcl->update_interval = interval;
1370     if (!ds->refreshing && ds->update_interval > interval) {
1371         timer_mod(ds->gui_timer, ds->last_update + interval);
1372     }
1373 }
1374
1375 void unregister_displaychangelistener(DisplayChangeListener *dcl)
1376 {
1377     DisplayState *ds = dcl->ds;
1378     trace_displaychangelistener_unregister(dcl, dcl->ops->dpy_name);
1379     if (dcl->con) {
1380         dcl->con->dcls--;
1381     }
1382     QLIST_REMOVE(dcl, next);
1383     gui_setup_refresh(ds);
1384 }
1385
1386 int dpy_set_ui_info(QemuConsole *con, QemuUIInfo *info)
1387 {
1388     assert(con != NULL);
1389     con->ui_info = *info;
1390     if (con->hw_ops->ui_info) {
1391         return con->hw_ops->ui_info(con->hw, con->head, info);
1392     }
1393     return -1;
1394 }
1395
1396 void dpy_gfx_update(QemuConsole *con, int x, int y, int w, int h)
1397 {
1398     DisplayState *s = con->ds;
1399     DisplayChangeListener *dcl;
1400     int width = surface_width(con->surface);
1401     int height = surface_height(con->surface);
1402
1403     x = MAX(x, 0);
1404     y = MAX(y, 0);
1405     x = MIN(x, width);
1406     y = MIN(y, height);
1407     w = MIN(w, width - x);
1408     h = MIN(h, height - y);
1409
1410     if (!qemu_console_is_visible(con)) {
1411         return;
1412     }
1413     QLIST_FOREACH(dcl, &s->listeners, next) {
1414         if (con != (dcl->con ? dcl->con : active_console)) {
1415             continue;
1416         }
1417         if (dcl->ops->dpy_gfx_update) {
1418             dcl->ops->dpy_gfx_update(dcl, x, y, w, h);
1419         }
1420     }
1421 }
1422
1423 void dpy_gfx_replace_surface(QemuConsole *con,
1424                              DisplaySurface *surface)
1425 {
1426     DisplayState *s = con->ds;
1427     DisplaySurface *old_surface = con->surface;
1428     DisplayChangeListener *dcl;
1429
1430     con->surface = surface;
1431     QLIST_FOREACH(dcl, &s->listeners, next) {
1432         if (con != (dcl->con ? dcl->con : active_console)) {
1433             continue;
1434         }
1435         if (dcl->ops->dpy_gfx_switch) {
1436             dcl->ops->dpy_gfx_switch(dcl, surface);
1437         }
1438     }
1439     qemu_free_displaysurface(old_surface);
1440 }
1441
1442 static void dpy_refresh(DisplayState *s)
1443 {
1444     DisplayChangeListener *dcl;
1445
1446     QLIST_FOREACH(dcl, &s->listeners, next) {
1447         if (dcl->ops->dpy_refresh) {
1448             dcl->ops->dpy_refresh(dcl);
1449         }
1450     }
1451 }
1452
1453 void dpy_gfx_copy(QemuConsole *con, int src_x, int src_y,
1454                   int dst_x, int dst_y, int w, int h)
1455 {
1456     DisplayState *s = con->ds;
1457     DisplayChangeListener *dcl;
1458
1459     if (!qemu_console_is_visible(con)) {
1460         return;
1461     }
1462     QLIST_FOREACH(dcl, &s->listeners, next) {
1463         if (con != (dcl->con ? dcl->con : active_console)) {
1464             continue;
1465         }
1466         if (dcl->ops->dpy_gfx_copy) {
1467             dcl->ops->dpy_gfx_copy(dcl, src_x, src_y, dst_x, dst_y, w, h);
1468         } else { /* TODO */
1469             dcl->ops->dpy_gfx_update(dcl, dst_x, dst_y, w, h);
1470         }
1471     }
1472 }
1473
1474 void dpy_text_cursor(QemuConsole *con, int x, int y)
1475 {
1476     DisplayState *s = con->ds;
1477     DisplayChangeListener *dcl;
1478
1479     if (!qemu_console_is_visible(con)) {
1480         return;
1481     }
1482     QLIST_FOREACH(dcl, &s->listeners, next) {
1483         if (con != (dcl->con ? dcl->con : active_console)) {
1484             continue;
1485         }
1486         if (dcl->ops->dpy_text_cursor) {
1487             dcl->ops->dpy_text_cursor(dcl, x, y);
1488         }
1489     }
1490 }
1491
1492 void dpy_text_update(QemuConsole *con, int x, int y, int w, int h)
1493 {
1494     DisplayState *s = con->ds;
1495     DisplayChangeListener *dcl;
1496
1497     if (!qemu_console_is_visible(con)) {
1498         return;
1499     }
1500     QLIST_FOREACH(dcl, &s->listeners, next) {
1501         if (con != (dcl->con ? dcl->con : active_console)) {
1502             continue;
1503         }
1504         if (dcl->ops->dpy_text_update) {
1505             dcl->ops->dpy_text_update(dcl, x, y, w, h);
1506         }
1507     }
1508 }
1509
1510 void dpy_text_resize(QemuConsole *con, int w, int h)
1511 {
1512     DisplayState *s = con->ds;
1513     struct DisplayChangeListener *dcl;
1514
1515     if (!qemu_console_is_visible(con)) {
1516         return;
1517     }
1518     QLIST_FOREACH(dcl, &s->listeners, next) {
1519         if (con != (dcl->con ? dcl->con : active_console)) {
1520             continue;
1521         }
1522         if (dcl->ops->dpy_text_resize) {
1523             dcl->ops->dpy_text_resize(dcl, w, h);
1524         }
1525     }
1526 }
1527
1528 void dpy_mouse_set(QemuConsole *con, int x, int y, int on)
1529 {
1530     DisplayState *s = con->ds;
1531     DisplayChangeListener *dcl;
1532
1533     if (!qemu_console_is_visible(con)) {
1534         return;
1535     }
1536     QLIST_FOREACH(dcl, &s->listeners, next) {
1537         if (con != (dcl->con ? dcl->con : active_console)) {
1538             continue;
1539         }
1540         if (dcl->ops->dpy_mouse_set) {
1541             dcl->ops->dpy_mouse_set(dcl, x, y, on);
1542         }
1543     }
1544 }
1545
1546 void dpy_cursor_define(QemuConsole *con, QEMUCursor *cursor)
1547 {
1548     DisplayState *s = con->ds;
1549     DisplayChangeListener *dcl;
1550
1551     if (!qemu_console_is_visible(con)) {
1552         return;
1553     }
1554     QLIST_FOREACH(dcl, &s->listeners, next) {
1555         if (con != (dcl->con ? dcl->con : active_console)) {
1556             continue;
1557         }
1558         if (dcl->ops->dpy_cursor_define) {
1559             dcl->ops->dpy_cursor_define(dcl, cursor);
1560         }
1561     }
1562 }
1563
1564 bool dpy_cursor_define_supported(QemuConsole *con)
1565 {
1566     DisplayState *s = con->ds;
1567     DisplayChangeListener *dcl;
1568
1569     QLIST_FOREACH(dcl, &s->listeners, next) {
1570         if (dcl->ops->dpy_cursor_define) {
1571             return true;
1572         }
1573     }
1574     return false;
1575 }
1576
1577 /*
1578  * Call dpy_gfx_update for all dirity scanlines.  Works for
1579  * DisplaySurfaces backed by guest memory (i.e. the ones created
1580  * using qemu_create_displaysurface_guestmem).
1581  */
1582 void dpy_gfx_update_dirty(QemuConsole *con,
1583                           MemoryRegion *address_space,
1584                           hwaddr base,
1585                           bool invalidate)
1586 {
1587     DisplaySurface *ds = qemu_console_surface(con);
1588     int width = surface_stride(ds);
1589     int height = surface_height(ds);
1590     hwaddr size = width * height;
1591     MemoryRegionSection mem_section;
1592     MemoryRegion *mem;
1593     ram_addr_t addr;
1594     int first, last, i;
1595     bool dirty;
1596
1597     mem_section = memory_region_find(address_space, base, size);
1598     mem = mem_section.mr;
1599     if (int128_get64(mem_section.size) != size ||
1600         !memory_region_is_ram(mem_section.mr)) {
1601         goto out;
1602     }
1603     assert(mem);
1604
1605     memory_region_sync_dirty_bitmap(mem);
1606     addr = mem_section.offset_within_region;
1607
1608     first = -1;
1609     last = -1;
1610     for (i = 0; i < height; i++, addr += width) {
1611         dirty = invalidate ||
1612             memory_region_get_dirty(mem, addr, width, DIRTY_MEMORY_VGA);
1613         if (dirty) {
1614             if (first == -1) {
1615                 first = i;
1616             }
1617             last = i;
1618         }
1619         if (first != -1 && !dirty) {
1620             assert(last != -1 && last >= first);
1621             dpy_gfx_update(con, 0, first, surface_width(ds),
1622                            last - first + 1);
1623             first = -1;
1624         }
1625     }
1626     if (first != -1) {
1627         assert(last != -1 && last >= first);
1628         dpy_gfx_update(con, 0, first, surface_width(ds),
1629                        last - first + 1);
1630     }
1631
1632     memory_region_reset_dirty(mem, mem_section.offset_within_region, size,
1633                               DIRTY_MEMORY_VGA);
1634 out:
1635     memory_region_unref(mem);
1636 }
1637
1638 /***********************************************************/
1639 /* register display */
1640
1641 /* console.c internal use only */
1642 static DisplayState *get_alloc_displaystate(void)
1643 {
1644     if (!display_state) {
1645         display_state = g_new0(DisplayState, 1);
1646         cursor_timer = timer_new_ms(QEMU_CLOCK_REALTIME,
1647                                     text_console_update_cursor, NULL);
1648     }
1649     return display_state;
1650 }
1651
1652 /*
1653  * Called by main(), after creating QemuConsoles
1654  * and before initializing ui (sdl/vnc/...).
1655  */
1656 DisplayState *init_displaystate(void)
1657 {
1658     gchar *name;
1659     int i;
1660
1661     get_alloc_displaystate();
1662     for (i = 0; i < nb_consoles; i++) {
1663         if (consoles[i]->console_type != GRAPHIC_CONSOLE &&
1664             consoles[i]->ds == NULL) {
1665             text_console_do_init(consoles[i]->chr, display_state);
1666         }
1667
1668         /* Hook up into the qom tree here (not in new_console()), once
1669          * all QemuConsoles are created and the order / numbering
1670          * doesn't change any more */
1671         name = g_strdup_printf("console[%d]", i);
1672         object_property_add_child(container_get(object_get_root(), "/backend"),
1673                                   name, OBJECT(consoles[i]), &error_abort);
1674         g_free(name);
1675     }
1676
1677     return display_state;
1678 }
1679
1680 void graphic_console_set_hwops(QemuConsole *con,
1681                                const GraphicHwOps *hw_ops,
1682                                void *opaque)
1683 {
1684     con->hw_ops = hw_ops;
1685     con->hw = opaque;
1686 }
1687
1688 QemuConsole *graphic_console_init(DeviceState *dev, uint32_t head,
1689                                   const GraphicHwOps *hw_ops,
1690                                   void *opaque)
1691 {
1692     static const char noinit[] =
1693         "Guest has not initialized the display (yet).";
1694     int width = 640;
1695     int height = 480;
1696     QemuConsole *s;
1697     DisplayState *ds;
1698
1699     ds = get_alloc_displaystate();
1700     trace_console_gfx_new();
1701     s = new_console(ds, GRAPHIC_CONSOLE, head);
1702     graphic_console_set_hwops(s, hw_ops, opaque);
1703     if (dev) {
1704         object_property_set_link(OBJECT(s), OBJECT(dev), "device",
1705                                  &error_abort);
1706     }
1707
1708     s->surface = qemu_create_message_surface(width, height, noinit);
1709     return s;
1710 }
1711
1712 QemuConsole *qemu_console_lookup_by_index(unsigned int index)
1713 {
1714     if (index >= nb_consoles) {
1715         return NULL;
1716     }
1717     return consoles[index];
1718 }
1719
1720 QemuConsole *qemu_console_lookup_by_device(DeviceState *dev, uint32_t head)
1721 {
1722     Object *obj;
1723     uint32_t h;
1724     int i;
1725
1726     for (i = 0; i < nb_consoles; i++) {
1727         if (!consoles[i]) {
1728             continue;
1729         }
1730         obj = object_property_get_link(OBJECT(consoles[i]),
1731                                        "device", &error_abort);
1732         if (DEVICE(obj) != dev) {
1733             continue;
1734         }
1735         h = object_property_get_int(OBJECT(consoles[i]),
1736                                     "head", &error_abort);
1737         if (h != head) {
1738             continue;
1739         }
1740         return consoles[i];
1741     }
1742     return NULL;
1743 }
1744
1745 bool qemu_console_is_visible(QemuConsole *con)
1746 {
1747     return (con == active_console) || (con->dcls > 0);
1748 }
1749
1750 bool qemu_console_is_graphic(QemuConsole *con)
1751 {
1752     if (con == NULL) {
1753         con = active_console;
1754     }
1755     return con && (con->console_type == GRAPHIC_CONSOLE);
1756 }
1757
1758 bool qemu_console_is_fixedsize(QemuConsole *con)
1759 {
1760     if (con == NULL) {
1761         con = active_console;
1762     }
1763     return con && (con->console_type != TEXT_CONSOLE);
1764 }
1765
1766 int qemu_console_get_index(QemuConsole *con)
1767 {
1768     if (con == NULL) {
1769         con = active_console;
1770     }
1771     return con ? con->index : -1;
1772 }
1773
1774 uint32_t qemu_console_get_head(QemuConsole *con)
1775 {
1776     if (con == NULL) {
1777         con = active_console;
1778     }
1779     return con ? con->head : -1;
1780 }
1781
1782 QemuUIInfo *qemu_console_get_ui_info(QemuConsole *con)
1783 {
1784     assert(con != NULL);
1785     return &con->ui_info;
1786 }
1787
1788 int qemu_console_get_width(QemuConsole *con, int fallback)
1789 {
1790     if (con == NULL) {
1791         con = active_console;
1792     }
1793     return con ? surface_width(con->surface) : fallback;
1794 }
1795
1796 int qemu_console_get_height(QemuConsole *con, int fallback)
1797 {
1798     if (con == NULL) {
1799         con = active_console;
1800     }
1801     return con ? surface_height(con->surface) : fallback;
1802 }
1803
1804 static void text_console_set_echo(CharDriverState *chr, bool echo)
1805 {
1806     QemuConsole *s = chr->opaque;
1807
1808     s->echo = echo;
1809 }
1810
1811 static void text_console_update_cursor_timer(void)
1812 {
1813     timer_mod(cursor_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME)
1814               + CONSOLE_CURSOR_PERIOD / 2);
1815 }
1816
1817 static void text_console_update_cursor(void *opaque)
1818 {
1819     QemuConsole *s;
1820     int i, count = 0;
1821
1822     cursor_visible_phase = !cursor_visible_phase;
1823
1824     for (i = 0; i < nb_consoles; i++) {
1825         s = consoles[i];
1826         if (qemu_console_is_graphic(s) ||
1827             !qemu_console_is_visible(s)) {
1828             continue;
1829         }
1830         count++;
1831         graphic_hw_invalidate(s);
1832     }
1833
1834     if (count) {
1835         text_console_update_cursor_timer();
1836     }
1837 }
1838
1839 static const GraphicHwOps text_console_ops = {
1840     .invalidate  = text_console_invalidate,
1841     .text_update = text_console_update,
1842 };
1843
1844 static void text_console_do_init(CharDriverState *chr, DisplayState *ds)
1845 {
1846     QemuConsole *s;
1847     int g_width = 80 * FONT_WIDTH;
1848     int g_height = 24 * FONT_HEIGHT;
1849
1850     s = chr->opaque;
1851
1852     chr->chr_write = console_puts;
1853
1854     s->out_fifo.buf = s->out_fifo_buf;
1855     s->out_fifo.buf_size = sizeof(s->out_fifo_buf);
1856     s->kbd_timer = timer_new_ms(QEMU_CLOCK_REALTIME, kbd_send_chars, s);
1857     s->ds = ds;
1858
1859     s->y_displayed = 0;
1860     s->y_base = 0;
1861     s->total_height = DEFAULT_BACKSCROLL;
1862     s->x = 0;
1863     s->y = 0;
1864     if (!s->surface) {
1865         if (active_console && active_console->surface) {
1866             g_width = surface_width(active_console->surface);
1867             g_height = surface_height(active_console->surface);
1868         }
1869         s->surface = qemu_create_displaysurface(g_width, g_height);
1870     }
1871
1872     s->hw_ops = &text_console_ops;
1873     s->hw = s;
1874
1875     /* Set text attribute defaults */
1876     s->t_attrib_default.bold = 0;
1877     s->t_attrib_default.uline = 0;
1878     s->t_attrib_default.blink = 0;
1879     s->t_attrib_default.invers = 0;
1880     s->t_attrib_default.unvisible = 0;
1881     s->t_attrib_default.fgcol = COLOR_WHITE;
1882     s->t_attrib_default.bgcol = COLOR_BLACK;
1883     /* set current text attributes to default */
1884     s->t_attrib = s->t_attrib_default;
1885     text_console_resize(s);
1886
1887     if (chr->label) {
1888         char msg[128];
1889         int len;
1890
1891         s->t_attrib.bgcol = COLOR_BLUE;
1892         len = snprintf(msg, sizeof(msg), "%s console\r\n", chr->label);
1893         console_puts(chr, (uint8_t*)msg, len);
1894         s->t_attrib = s->t_attrib_default;
1895     }
1896
1897     qemu_chr_be_generic_open(chr);
1898     if (chr->init)
1899         chr->init(chr);
1900 }
1901
1902 static CharDriverState *text_console_init(ChardevVC *vc)
1903 {
1904     CharDriverState *chr;
1905     QemuConsole *s;
1906     unsigned width = 0;
1907     unsigned height = 0;
1908
1909     chr = qemu_chr_alloc();
1910
1911     if (vc->has_width) {
1912         width = vc->width;
1913     } else if (vc->has_cols) {
1914         width = vc->cols * FONT_WIDTH;
1915     }
1916
1917     if (vc->has_height) {
1918         height = vc->height;
1919     } else if (vc->has_rows) {
1920         height = vc->rows * FONT_HEIGHT;
1921     }
1922
1923     trace_console_txt_new(width, height);
1924     if (width == 0 || height == 0) {
1925         s = new_console(NULL, TEXT_CONSOLE, 0);
1926     } else {
1927         s = new_console(NULL, TEXT_CONSOLE_FIXED_SIZE, 0);
1928         s->surface = qemu_create_displaysurface(width, height);
1929     }
1930
1931     if (!s) {
1932         g_free(chr);
1933         return NULL;
1934     }
1935
1936     s->chr = chr;
1937     chr->opaque = s;
1938     chr->chr_set_echo = text_console_set_echo;
1939     /* console/chardev init sometimes completes elsewhere in a 2nd
1940      * stage, so defer OPENED events until they are fully initialized
1941      */
1942     chr->explicit_be_open = true;
1943
1944     if (display_state) {
1945         text_console_do_init(chr, display_state);
1946     }
1947     return chr;
1948 }
1949
1950 static VcHandler *vc_handler = text_console_init;
1951
1952 CharDriverState *vc_init(ChardevVC *vc)
1953 {
1954     return vc_handler(vc);
1955 }
1956
1957 void register_vc_handler(VcHandler *handler)
1958 {
1959     vc_handler = handler;
1960 }
1961
1962 void qemu_console_resize(QemuConsole *s, int width, int height)
1963 {
1964     DisplaySurface *surface;
1965
1966     assert(s->console_type == GRAPHIC_CONSOLE);
1967     surface = qemu_create_displaysurface(width, height);
1968     dpy_gfx_replace_surface(s, surface);
1969 }
1970
1971 void qemu_console_copy(QemuConsole *con, int src_x, int src_y,
1972                        int dst_x, int dst_y, int w, int h)
1973 {
1974     assert(con->console_type == GRAPHIC_CONSOLE);
1975     dpy_gfx_copy(con, src_x, src_y, dst_x, dst_y, w, h);
1976 }
1977
1978 DisplaySurface *qemu_console_surface(QemuConsole *console)
1979 {
1980     return console->surface;
1981 }
1982
1983 DisplayState *qemu_console_displaystate(QemuConsole *console)
1984 {
1985     return console->ds;
1986 }
1987
1988 PixelFormat qemu_different_endianness_pixelformat(int bpp)
1989 {
1990     pixman_format_code_t fmt = qemu_default_pixman_format(bpp, false);
1991     PixelFormat pf = qemu_pixelformat_from_pixman(fmt);
1992     return pf;
1993 }
1994
1995 PixelFormat qemu_default_pixelformat(int bpp)
1996 {
1997     pixman_format_code_t fmt = qemu_default_pixman_format(bpp, true);
1998     PixelFormat pf = qemu_pixelformat_from_pixman(fmt);
1999     return pf;
2000 }
2001
2002 static void qemu_chr_parse_vc(QemuOpts *opts, ChardevBackend *backend,
2003                               Error **errp)
2004 {
2005     int val;
2006
2007     backend->vc = g_new0(ChardevVC, 1);
2008
2009     val = qemu_opt_get_number(opts, "width", 0);
2010     if (val != 0) {
2011         backend->vc->has_width = true;
2012         backend->vc->width = val;
2013     }
2014
2015     val = qemu_opt_get_number(opts, "height", 0);
2016     if (val != 0) {
2017         backend->vc->has_height = true;
2018         backend->vc->height = val;
2019     }
2020
2021     val = qemu_opt_get_number(opts, "cols", 0);
2022     if (val != 0) {
2023         backend->vc->has_cols = true;
2024         backend->vc->cols = val;
2025     }
2026
2027     val = qemu_opt_get_number(opts, "rows", 0);
2028     if (val != 0) {
2029         backend->vc->has_rows = true;
2030         backend->vc->rows = val;
2031     }
2032 }
2033
2034 static const TypeInfo qemu_console_info = {
2035     .name = TYPE_QEMU_CONSOLE,
2036     .parent = TYPE_OBJECT,
2037     .instance_size = sizeof(QemuConsole),
2038     .class_size = sizeof(QemuConsoleClass),
2039 };
2040
2041
2042 static void register_types(void)
2043 {
2044     type_register_static(&qemu_console_info);
2045     register_char_driver("vc", CHARDEV_BACKEND_KIND_VC, qemu_chr_parse_vc);
2046 }
2047
2048 type_init(register_types);