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