console.c 50.1 KB
Newer Older
B
bellard 已提交
1 2
/*
 * QEMU graphical console
3
 *
B
bellard 已提交
4
 * Copyright (c) 2004 Fabrice Bellard
5
 *
B
bellard 已提交
6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
P
pbrook 已提交
24
#include "qemu-common.h"
25
#include "ui/console.h"
26
#include "qemu/timer.h"
L
Luiz Capitulino 已提交
27
#include "qmp-commands.h"
28
#include "sysemu/char.h"
B
bellard 已提交
29

30
//#define DEBUG_CONSOLE
B
bellard 已提交
31 32
#define DEFAULT_BACKSCROLL 512
#define MAX_CONSOLES 12
33
#define CONSOLE_CURSOR_PERIOD 500
B
bellard 已提交
34

35 36 37 38 39 40 41 42 43 44
typedef struct TextAttributes {
    uint8_t fgcol:4;
    uint8_t bgcol:4;
    uint8_t bold:1;
    uint8_t uline:1;
    uint8_t blink:1;
    uint8_t invers:1;
    uint8_t unvisible:1;
} TextAttributes;

B
bellard 已提交
45 46
typedef struct TextCell {
    uint8_t ch;
47
    TextAttributes t_attrib;
B
bellard 已提交
48 49 50 51 52 53 54 55 56 57
} TextCell;

#define MAX_ESC_PARAMS 3

enum TTYState {
    TTY_STATE_NORM,
    TTY_STATE_ESC,
    TTY_STATE_CSI,
};

58 59 60 61 62 63
typedef struct QEMUFIFO {
    uint8_t *buf;
    int buf_size;
    int count, wptr, rptr;
} QEMUFIFO;

64
static int qemu_fifo_write(QEMUFIFO *f, const uint8_t *buf, int len1)
65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
{
    int l, len;

    l = f->buf_size - f->count;
    if (len1 > l)
        len1 = l;
    len = len1;
    while (len > 0) {
        l = f->buf_size - f->wptr;
        if (l > len)
            l = len;
        memcpy(f->buf + f->wptr, buf, l);
        f->wptr += l;
        if (f->wptr >= f->buf_size)
            f->wptr = 0;
        buf += l;
        len -= l;
    }
    f->count += len1;
    return len1;
}

87
static int qemu_fifo_read(QEMUFIFO *f, uint8_t *buf, int len1)
88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108
{
    int l, len;

    if (len1 > f->count)
        len1 = f->count;
    len = len1;
    while (len > 0) {
        l = f->buf_size - f->rptr;
        if (l > len)
            l = len;
        memcpy(buf, f->buf + f->rptr, l);
        f->rptr += l;
        if (f->rptr >= f->buf_size)
            f->rptr = 0;
        buf += l;
        len -= l;
    }
    f->count -= len1;
    return len1;
}

109 110
typedef enum {
    GRAPHIC_CONSOLE,
111 112
    TEXT_CONSOLE,
    TEXT_CONSOLE_FIXED_SIZE
A
Anthony Liguori 已提交
113
} console_type_t;
114

115
struct QemuConsole {
116
    int index;
A
Anthony Liguori 已提交
117
    console_type_t console_type;
B
bellard 已提交
118
    DisplayState *ds;
119
    DisplaySurface *surface;
120

P
pbrook 已提交
121
    /* Graphic console state.  */
G
Gerd Hoffmann 已提交
122
    const GraphicHwOps *hw_ops;
P
pbrook 已提交
123
    void *hw;
124 125

    /* Text console state */
B
bellard 已提交
126 127 128 129 130
    int width;
    int height;
    int total_height;
    int backscroll_height;
    int x, y;
131
    int x_saved, y_saved;
B
bellard 已提交
132 133
    int y_displayed;
    int y_base;
134 135
    TextAttributes t_attrib_default; /* default text attributes */
    TextAttributes t_attrib; /* currently active text attributes */
B
bellard 已提交
136
    TextCell *cells;
B
balrog 已提交
137
    int text_x[2], text_y[2], cursor_invalidate;
138
    int echo;
139 140
    bool cursor_visible_phase;
    QEMUTimer *cursor_timer;
B
bellard 已提交
141

142 143 144 145 146
    int update_x0;
    int update_y0;
    int update_x1;
    int update_y1;

B
bellard 已提交
147 148 149 150
    enum TTYState state;
    int esc_params[MAX_ESC_PARAMS];
    int nb_esc_params;

151
    CharDriverState *chr;
152 153 154 155
    /* fifo for key pressed */
    QEMUFIFO out_fifo;
    uint8_t out_fifo_buf[16];
    QEMUTimer *kbd_timer;
B
bellard 已提交
156 157
};

158 159
struct DisplayState {
    struct QEMUTimer *gui_timer;
G
Gerd Hoffmann 已提交
160 161 162
    uint64_t last_update;
    uint64_t update_interval;
    bool refreshing;
163 164 165 166 167 168
    bool have_gfx;
    bool have_text;

    QLIST_HEAD(, DisplayChangeListener) listeners;
};

169
static DisplayState *display_state;
170 171
static QemuConsole *active_console;
static QemuConsole *consoles[MAX_CONSOLES];
B
bellard 已提交
172 173
static int nb_consoles = 0;

174
static void text_console_do_init(CharDriverState *chr, DisplayState *ds);
175 176
static void dpy_gfx_switch_surface(DisplayState *ds,
                                   DisplaySurface *surface);
G
Gerd Hoffmann 已提交
177
static void dpy_refresh(DisplayState *s);
178

179 180
static void gui_update(void *opaque)
{
G
Gerd Hoffmann 已提交
181 182
    uint64_t interval = GUI_REFRESH_INTERVAL_IDLE;
    uint64_t dcl_interval;
183 184 185
    DisplayState *ds = opaque;
    DisplayChangeListener *dcl;

G
Gerd Hoffmann 已提交
186
    ds->refreshing = true;
187
    dpy_refresh(ds);
G
Gerd Hoffmann 已提交
188
    ds->refreshing = false;
189 190

    QLIST_FOREACH(dcl, &ds->listeners, next) {
G
Gerd Hoffmann 已提交
191 192 193 194
        dcl_interval = dcl->update_interval ?
            dcl->update_interval : GUI_REFRESH_INTERVAL_DEFAULT;
        if (interval > dcl_interval) {
            interval = dcl_interval;
195 196
        }
    }
G
Gerd Hoffmann 已提交
197 198 199 200 201 202
    if (ds->update_interval != interval) {
        ds->update_interval = interval;
        trace_console_refresh(interval);
    }
    ds->last_update = qemu_get_clock_ms(rt_clock);
    qemu_mod_timer(ds->gui_timer, ds->last_update + interval);
203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237
}

static void gui_setup_refresh(DisplayState *ds)
{
    DisplayChangeListener *dcl;
    bool need_timer = false;
    bool have_gfx = false;
    bool have_text = false;

    QLIST_FOREACH(dcl, &ds->listeners, next) {
        if (dcl->ops->dpy_refresh != NULL) {
            need_timer = true;
        }
        if (dcl->ops->dpy_gfx_update != NULL) {
            have_gfx = true;
        }
        if (dcl->ops->dpy_text_update != NULL) {
            have_text = true;
        }
    }

    if (need_timer && ds->gui_timer == NULL) {
        ds->gui_timer = qemu_new_timer_ms(rt_clock, gui_update, ds);
        qemu_mod_timer(ds->gui_timer, qemu_get_clock_ms(rt_clock));
    }
    if (!need_timer && ds->gui_timer != NULL) {
        qemu_del_timer(ds->gui_timer);
        qemu_free_timer(ds->gui_timer);
        ds->gui_timer = NULL;
    }

    ds->have_gfx = have_gfx;
    ds->have_text = have_text;
}

238
void graphic_hw_update(QemuConsole *con)
P
pbrook 已提交
239
{
240 241 242
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
243 244
    if (con && con->hw_ops->gfx_update) {
        con->hw_ops->gfx_update(con->hw);
245
    }
P
pbrook 已提交
246 247
}

248
void graphic_hw_invalidate(QemuConsole *con)
P
pbrook 已提交
249
{
250 251 252
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
253 254
    if (con && con->hw_ops->invalidate) {
        con->hw_ops->invalidate(con->hw);
255
    }
P
pbrook 已提交
256 257
}

G
Gerd Hoffmann 已提交
258 259
static void ppm_save(const char *filename, struct DisplaySurface *ds,
                     Error **errp)
P
pbrook 已提交
260
{
G
Gerd Hoffmann 已提交
261 262 263 264 265 266 267 268 269 270 271 272 273
    int width = pixman_image_get_width(ds->image);
    int height = pixman_image_get_height(ds->image);
    FILE *f;
    int y;
    int ret;
    pixman_image_t *linebuf;

    trace_ppm_save(filename, ds);
    f = fopen(filename, "wb");
    if (!f) {
        error_setg(errp, "failed to open file '%s': %s", filename,
                   strerror(errno));
        return;
274
    }
G
Gerd Hoffmann 已提交
275 276 277 278 279 280 281 282 283 284 285 286 287 288 289
    ret = fprintf(f, "P6\n%d %d\n%d\n", width, height, 255);
    if (ret < 0) {
        linebuf = NULL;
        goto write_err;
    }
    linebuf = qemu_pixman_linebuf_create(PIXMAN_BE_r8g8b8, width);
    for (y = 0; y < height; y++) {
        qemu_pixman_linebuf_fill(linebuf, ds->image, width, 0, y);
        clearerr(f);
        ret = fwrite(pixman_image_get_data(linebuf), 1,
                     pixman_image_get_stride(linebuf), f);
        (void)ret;
        if (ferror(f)) {
            goto write_err;
        }
290 291
    }

G
Gerd Hoffmann 已提交
292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311
out:
    qemu_pixman_image_unref(linebuf);
    fclose(f);
    return;

write_err:
    error_setg(errp, "failed to write to file '%s': %s", filename,
               strerror(errno));
    unlink(filename);
    goto out;
}

void qmp_screendump(const char *filename, Error **errp)
{
    QemuConsole *con = consoles[0];
    DisplaySurface *surface;

    if (con == NULL) {
        error_setg(errp, "There is no QemuConsole I can screendump from.");
        return;
312
    }
G
Gerd Hoffmann 已提交
313 314 315 316

    graphic_hw_update(con);
    surface = qemu_console_surface(con);
    ppm_save(filename, surface, errp);
P
pbrook 已提交
317 318
}

319
void graphic_hw_text_update(QemuConsole *con, console_ch_t *chardata)
B
balrog 已提交
320
{
321 322 323
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
324 325 326
    if (con && con->hw_ops->text_update) {
        con->hw_ops->text_update(con->hw, chardata);
    }
B
balrog 已提交
327 328
}

329 330
static void vga_fill_rect(QemuConsole *con,
                          int posx, int posy, int width, int height,
331
                          pixman_color_t color)
B
bellard 已提交
332
{
333
    DisplaySurface *surface = qemu_console_surface(con);
334 335 336 337 338
    pixman_rectangle16_t rect = {
        .x = posx, .y = posy, .width = width, .height = height
    };

    pixman_image_fill_rectangles(PIXMAN_OP_SRC, surface->image,
339
                                 &color, 1, &rect);
B
bellard 已提交
340 341 342
}

/* copy from (xs, ys) to (xd, yd) a rectangle of size (w, h) */
343 344
static void vga_bitblt(QemuConsole *con,
                       int xs, int ys, int xd, int yd, int w, int h)
B
bellard 已提交
345
{
346
    DisplaySurface *surface = qemu_console_surface(con);
347 348 349 350

    pixman_image_composite(PIXMAN_OP_SRC,
                           surface->image, NULL, surface->image,
                           xs, ys, 0, 0, xd, yd, w, h);
B
bellard 已提交
351 352 353 354 355 356 357 358 359 360
}

/***********************************************************/
/* basic char display */

#define FONT_HEIGHT 16
#define FONT_WIDTH 8

#include "vgafont.h"

361
#ifndef CONFIG_CURSES
362 363 364 365 366 367 368 369 370 371
enum color_names {
    COLOR_BLACK   = 0,
    COLOR_RED     = 1,
    COLOR_GREEN   = 2,
    COLOR_YELLOW  = 3,
    COLOR_BLUE    = 4,
    COLOR_MAGENTA = 5,
    COLOR_CYAN    = 6,
    COLOR_WHITE   = 7
};
372
#endif
373

374 375 376 377
#define QEMU_RGB(r, g, b)                                               \
    { .red = r << 8, .green = g << 8, .blue = b << 8, .alpha = 0xffff }

static const pixman_color_t color_table_rgb[2][8] = {
378
    {   /* dark */
B
bellard 已提交
379 380 381 382 383 384 385 386
        QEMU_RGB(0x00, 0x00, 0x00),  /* black */
        QEMU_RGB(0xaa, 0x00, 0x00),  /* red */
        QEMU_RGB(0x00, 0xaa, 0x00),  /* green */
        QEMU_RGB(0xaa, 0xaa, 0x00),  /* yellow */
        QEMU_RGB(0x00, 0x00, 0xaa),  /* blue */
        QEMU_RGB(0xaa, 0x00, 0xaa),  /* magenta */
        QEMU_RGB(0x00, 0xaa, 0xaa),  /* cyan */
        QEMU_RGB(0xaa, 0xaa, 0xaa),  /* white */
387 388
    },
    {   /* bright */
B
bellard 已提交
389 390 391 392 393 394 395 396
        QEMU_RGB(0x00, 0x00, 0x00),  /* black */
        QEMU_RGB(0xff, 0x00, 0x00),  /* red */
        QEMU_RGB(0x00, 0xff, 0x00),  /* green */
        QEMU_RGB(0xff, 0xff, 0x00),  /* yellow */
        QEMU_RGB(0x00, 0x00, 0xff),  /* blue */
        QEMU_RGB(0xff, 0x00, 0xff),  /* magenta */
        QEMU_RGB(0x00, 0xff, 0xff),  /* cyan */
        QEMU_RGB(0xff, 0xff, 0xff),  /* white */
397
    }
B
bellard 已提交
398 399
};

400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431
#ifdef DEBUG_CONSOLE
static void console_print_text_attributes(TextAttributes *t_attrib, char ch)
{
    if (t_attrib->bold) {
        printf("b");
    } else {
        printf(" ");
    }
    if (t_attrib->uline) {
        printf("u");
    } else {
        printf(" ");
    }
    if (t_attrib->blink) {
        printf("l");
    } else {
        printf(" ");
    }
    if (t_attrib->invers) {
        printf("i");
    } else {
        printf(" ");
    }
    if (t_attrib->unvisible) {
        printf("n");
    } else {
        printf(" ");
    }

    printf(" fg: %d bg: %d ch:'%2X' '%c'\n", t_attrib->fgcol, t_attrib->bgcol, ch, ch);
}
#endif
B
bellard 已提交
432

433
static void vga_putcharxy(QemuConsole *s, int x, int y, int ch,
434
                          TextAttributes *t_attrib)
B
bellard 已提交
435
{
436
    static pixman_image_t *glyphs[256];
437
    DisplaySurface *surface = qemu_console_surface(s);
438
    pixman_color_t fgcol, bgcol;
439 440

    if (t_attrib->invers) {
G
Gerd Hoffmann 已提交
441 442
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
443
    } else {
G
Gerd Hoffmann 已提交
444 445
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
446
    }
B
bellard 已提交
447

448 449
    if (!glyphs[ch]) {
        glyphs[ch] = qemu_pixman_glyph_from_vgafont(FONT_HEIGHT, vgafont16, ch);
B
bellard 已提交
450
    }
451
    qemu_pixman_glyph_render(glyphs[ch], surface->image,
452
                             &fgcol, &bgcol, x, y, FONT_WIDTH, FONT_HEIGHT);
B
bellard 已提交
453 454
}

455
static void text_console_resize(QemuConsole *s)
B
bellard 已提交
456 457 458 459 460
{
    TextCell *cells, *c, *c1;
    int w1, x, y, last_width;

    last_width = s->width;
G
Gerd Hoffmann 已提交
461 462
    s->width = surface_width(s->surface) / FONT_WIDTH;
    s->height = surface_height(s->surface) / FONT_HEIGHT;
B
bellard 已提交
463 464 465 466 467

    w1 = last_width;
    if (s->width < w1)
        w1 = s->width;

468
    cells = g_malloc(s->width * s->total_height * sizeof(TextCell));
B
bellard 已提交
469 470 471 472 473 474 475 476 477 478
    for(y = 0; y < s->total_height; y++) {
        c = &cells[y * s->width];
        if (w1 > 0) {
            c1 = &s->cells[y * last_width];
            for(x = 0; x < w1; x++) {
                *c++ = *c1++;
            }
        }
        for(x = w1; x < s->width; x++) {
            c->ch = ' ';
479
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
480 481 482
            c++;
        }
    }
483
    g_free(s->cells);
B
bellard 已提交
484 485 486
    s->cells = cells;
}

487
static inline void text_update_xy(QemuConsole *s, int x, int y)
B
balrog 已提交
488 489 490 491 492 493 494
{
    s->text_x[0] = MIN(s->text_x[0], x);
    s->text_x[1] = MAX(s->text_x[1], x);
    s->text_y[0] = MIN(s->text_y[0], y);
    s->text_y[1] = MAX(s->text_y[1], y);
}

495
static void invalidate_xy(QemuConsole *s, int x, int y)
496 497 498 499 500 501 502 503 504 505 506
{
    if (s->update_x0 > x * FONT_WIDTH)
        s->update_x0 = x * FONT_WIDTH;
    if (s->update_y0 > y * FONT_HEIGHT)
        s->update_y0 = y * FONT_HEIGHT;
    if (s->update_x1 < (x + 1) * FONT_WIDTH)
        s->update_x1 = (x + 1) * FONT_WIDTH;
    if (s->update_y1 < (y + 1) * FONT_HEIGHT)
        s->update_y1 = (y + 1) * FONT_HEIGHT;
}

507
static void update_xy(QemuConsole *s, int x, int y)
B
bellard 已提交
508 509 510 511
{
    TextCell *c;
    int y1, y2;

512 513 514 515 516 517 518
    if (s != active_console) {
        return;
    }

    if (s->ds->have_text) {
        text_update_xy(s, x, y);
    }
B
balrog 已提交
519

520
    if (s->ds->have_gfx) {
B
bellard 已提交
521 522 523 524 525 526
        y1 = (s->y_base + y) % s->total_height;
        y2 = y1 - s->y_displayed;
        if (y2 < 0)
            y2 += s->total_height;
        if (y2 < s->height) {
            c = &s->cells[y1 * s->width + x];
527
            vga_putcharxy(s, x, y2, c->ch,
528
                          &(c->t_attrib));
529
            invalidate_xy(s, x, y2);
B
bellard 已提交
530 531 532 533
        }
    }
}

534
static void console_show_cursor(QemuConsole *s, int show)
B
bellard 已提交
535 536 537
{
    TextCell *c;
    int y, y1;
538
    int x = s->x;
B
bellard 已提交
539

540 541 542
    if (s != active_console) {
        return;
    }
B
balrog 已提交
543

544 545 546
    if (s->ds->have_text) {
        s->cursor_invalidate = 1;
    }
B
balrog 已提交
547

548
    if (s->ds->have_gfx) {
549 550 551
        if (x >= s->width) {
            x = s->width - 1;
        }
B
bellard 已提交
552 553 554 555 556
        y1 = (s->y_base + s->y) % s->total_height;
        y = y1 - s->y_displayed;
        if (y < 0)
            y += s->total_height;
        if (y < s->height) {
557
            c = &s->cells[y1 * s->width + x];
558
            if (show && s->cursor_visible_phase) {
559 560
                TextAttributes t_attrib = s->t_attrib_default;
                t_attrib.invers = !(t_attrib.invers); /* invert fg and bg */
561
                vga_putcharxy(s, x, y, c->ch, &t_attrib);
B
bellard 已提交
562
            } else {
563
                vga_putcharxy(s, x, y, c->ch, &(c->t_attrib));
B
bellard 已提交
564
            }
565
            invalidate_xy(s, x, y);
B
bellard 已提交
566 567 568 569
        }
    }
}

570
static void console_refresh(QemuConsole *s)
B
bellard 已提交
571
{
572
    DisplaySurface *surface = qemu_console_surface(s);
B
bellard 已提交
573 574 575
    TextCell *c;
    int x, y, y1;

576
    if (s != active_console)
B
bellard 已提交
577
        return;
578 579

    if (s->ds->have_text) {
B
balrog 已提交
580 581 582 583 584 585
        s->text_x[0] = 0;
        s->text_y[0] = 0;
        s->text_x[1] = s->width - 1;
        s->text_y[1] = s->height - 1;
        s->cursor_invalidate = 1;
    }
B
bellard 已提交
586

587
    if (s->ds->have_gfx) {
588
        vga_fill_rect(s, 0, 0, surface_width(surface), surface_height(surface),
G
Gerd Hoffmann 已提交
589
                      color_table_rgb[0][COLOR_BLACK]);
590 591 592 593
        y1 = s->y_displayed;
        for (y = 0; y < s->height; y++) {
            c = s->cells + y1 * s->width;
            for (x = 0; x < s->width; x++) {
594
                vga_putcharxy(s, x, y, c->ch,
595 596 597 598 599 600
                              &(c->t_attrib));
                c++;
            }
            if (++y1 == s->total_height) {
                y1 = 0;
            }
B
bellard 已提交
601
        }
602
        console_show_cursor(s, 1);
603 604
        dpy_gfx_update(s, 0, 0,
                       surface_width(surface), surface_height(surface));
B
bellard 已提交
605 606 607 608 609
    }
}

static void console_scroll(int ydelta)
{
610
    QemuConsole *s;
B
bellard 已提交
611
    int i, y1;
612

B
bellard 已提交
613
    s = active_console;
614
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641
        return;

    if (ydelta > 0) {
        for(i = 0; i < ydelta; i++) {
            if (s->y_displayed == s->y_base)
                break;
            if (++s->y_displayed == s->total_height)
                s->y_displayed = 0;
        }
    } else {
        ydelta = -ydelta;
        i = s->backscroll_height;
        if (i > s->total_height - s->height)
            i = s->total_height - s->height;
        y1 = s->y_base - i;
        if (y1 < 0)
            y1 += s->total_height;
        for(i = 0; i < ydelta; i++) {
            if (s->y_displayed == y1)
                break;
            if (--s->y_displayed < 0)
                s->y_displayed = s->total_height - 1;
        }
    }
    console_refresh(s);
}

642
static void console_put_lf(QemuConsole *s)
B
bellard 已提交
643 644 645 646 647 648 649
{
    TextCell *c;
    int x, y1;

    s->y++;
    if (s->y >= s->height) {
        s->y = s->height - 1;
650

B
bellard 已提交
651 652 653 654 655 656 657 658 659 660 661 662
        if (s->y_displayed == s->y_base) {
            if (++s->y_displayed == s->total_height)
                s->y_displayed = 0;
        }
        if (++s->y_base == s->total_height)
            s->y_base = 0;
        if (s->backscroll_height < s->total_height)
            s->backscroll_height++;
        y1 = (s->y_base + s->height - 1) % s->total_height;
        c = &s->cells[y1 * s->width];
        for(x = 0; x < s->width; x++) {
            c->ch = ' ';
663
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
664 665 666
            c++;
        }
        if (s == active_console && s->y_displayed == s->y_base) {
667
            if (s->ds->have_text) {
B
balrog 已提交
668 669 670 671 672 673
                s->text_x[0] = 0;
                s->text_y[0] = 0;
                s->text_x[1] = s->width - 1;
                s->text_y[1] = s->height - 1;
            }

674 675 676 677 678 679 680 681 682 683 684 685
            if (s->ds->have_gfx) {
                vga_bitblt(s, 0, FONT_HEIGHT, 0, 0,
                           s->width * FONT_WIDTH,
                           (s->height - 1) * FONT_HEIGHT);
                vga_fill_rect(s, 0, (s->height - 1) * FONT_HEIGHT,
                              s->width * FONT_WIDTH, FONT_HEIGHT,
                              color_table_rgb[0][s->t_attrib_default.bgcol]);
                s->update_x0 = 0;
                s->update_y0 = 0;
                s->update_x1 = s->width * FONT_WIDTH;
                s->update_y1 = s->height * FONT_HEIGHT;
            }
B
bellard 已提交
686 687 688 689
        }
    }
}

690 691 692 693
/* Set console attributes depending on the current escape codes.
 * NOTE: I know this code is not very efficient (checking every color for it
 * self) but it is more readable and better maintainable.
 */
694
static void console_handle_escape(QemuConsole *s)
695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786
{
    int i;

    for (i=0; i<s->nb_esc_params; i++) {
        switch (s->esc_params[i]) {
            case 0: /* reset all console attributes to default */
                s->t_attrib = s->t_attrib_default;
                break;
            case 1:
                s->t_attrib.bold = 1;
                break;
            case 4:
                s->t_attrib.uline = 1;
                break;
            case 5:
                s->t_attrib.blink = 1;
                break;
            case 7:
                s->t_attrib.invers = 1;
                break;
            case 8:
                s->t_attrib.unvisible = 1;
                break;
            case 22:
                s->t_attrib.bold = 0;
                break;
            case 24:
                s->t_attrib.uline = 0;
                break;
            case 25:
                s->t_attrib.blink = 0;
                break;
            case 27:
                s->t_attrib.invers = 0;
                break;
            case 28:
                s->t_attrib.unvisible = 0;
                break;
            /* set foreground color */
            case 30:
                s->t_attrib.fgcol=COLOR_BLACK;
                break;
            case 31:
                s->t_attrib.fgcol=COLOR_RED;
                break;
            case 32:
                s->t_attrib.fgcol=COLOR_GREEN;
                break;
            case 33:
                s->t_attrib.fgcol=COLOR_YELLOW;
                break;
            case 34:
                s->t_attrib.fgcol=COLOR_BLUE;
                break;
            case 35:
                s->t_attrib.fgcol=COLOR_MAGENTA;
                break;
            case 36:
                s->t_attrib.fgcol=COLOR_CYAN;
                break;
            case 37:
                s->t_attrib.fgcol=COLOR_WHITE;
                break;
            /* set background color */
            case 40:
                s->t_attrib.bgcol=COLOR_BLACK;
                break;
            case 41:
                s->t_attrib.bgcol=COLOR_RED;
                break;
            case 42:
                s->t_attrib.bgcol=COLOR_GREEN;
                break;
            case 43:
                s->t_attrib.bgcol=COLOR_YELLOW;
                break;
            case 44:
                s->t_attrib.bgcol=COLOR_BLUE;
                break;
            case 45:
                s->t_attrib.bgcol=COLOR_MAGENTA;
                break;
            case 46:
                s->t_attrib.bgcol=COLOR_CYAN;
                break;
            case 47:
                s->t_attrib.bgcol=COLOR_WHITE;
                break;
        }
    }
}

787
static void console_clear_xy(QemuConsole *s, int x, int y)
788 789 790 791 792 793 794 795
{
    int y1 = (s->y_base + y) % s->total_height;
    TextCell *c = &s->cells[y1 * s->width + x];
    c->ch = ' ';
    c->t_attrib = s->t_attrib_default;
    update_xy(s, x, y);
}

796
/* set cursor, checking bounds */
797
static void set_cursor(QemuConsole *s, int x, int y)
798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815
{
    if (x < 0) {
        x = 0;
    }
    if (y < 0) {
        y = 0;
    }
    if (y >= s->height) {
        y = s->height - 1;
    }
    if (x >= s->width) {
        x = s->width - 1;
    }

    s->x = x;
    s->y = y;
}

816
static void console_putchar(QemuConsole *s, int ch)
B
bellard 已提交
817 818
{
    TextCell *c;
819 820
    int y1, i;
    int x, y;
B
bellard 已提交
821 822 823 824

    switch(s->state) {
    case TTY_STATE_NORM:
        switch(ch) {
825
        case '\r':  /* carriage return */
B
bellard 已提交
826 827
            s->x = 0;
            break;
828
        case '\n':  /* newline */
B
bellard 已提交
829 830
            console_put_lf(s);
            break;
831
        case '\b':  /* backspace */
832
            if (s->x > 0)
833
                s->x--;
834 835 836
            break;
        case '\t':  /* tabspace */
            if (s->x + (8 - (s->x % 8)) > s->width) {
B
bellard 已提交
837
                s->x = 0;
838 839 840 841 842 843 844 845
                console_put_lf(s);
            } else {
                s->x = s->x + (8 - (s->x % 8));
            }
            break;
        case '\a':  /* alert aka. bell */
            /* TODO: has to be implemented */
            break;
846 847 848 849 850 851
        case 14:
            /* SI (shift in), character set 0 (ignored) */
            break;
        case 15:
            /* SO (shift out), character set 1 (ignored) */
            break;
852
        case 27:    /* esc (introducing an escape sequence) */
B
bellard 已提交
853 854 855
            s->state = TTY_STATE_ESC;
            break;
        default:
856 857 858 859
            if (s->x >= s->width) {
                /* line wrap */
                s->x = 0;
                console_put_lf(s);
860
            }
B
bellard 已提交
861 862 863
            y1 = (s->y_base + s->y) % s->total_height;
            c = &s->cells[y1 * s->width + s->x];
            c->ch = ch;
864
            c->t_attrib = s->t_attrib;
B
bellard 已提交
865 866 867 868 869
            update_xy(s, s->x, s->y);
            s->x++;
            break;
        }
        break;
870
    case TTY_STATE_ESC: /* check if it is a terminal escape sequence */
B
bellard 已提交
871 872 873 874 875 876 877 878 879
        if (ch == '[') {
            for(i=0;i<MAX_ESC_PARAMS;i++)
                s->esc_params[i] = 0;
            s->nb_esc_params = 0;
            s->state = TTY_STATE_CSI;
        } else {
            s->state = TTY_STATE_NORM;
        }
        break;
880
    case TTY_STATE_CSI: /* handle escape sequence parameters */
B
bellard 已提交
881 882
        if (ch >= '0' && ch <= '9') {
            if (s->nb_esc_params < MAX_ESC_PARAMS) {
883 884 885 886 887
                int *param = &s->esc_params[s->nb_esc_params];
                int digit = (ch - '0');

                *param = (*param <= (INT_MAX - digit) / 10) ?
                         *param * 10 + digit : INT_MAX;
B
bellard 已提交
888 889
            }
        } else {
890 891
            if (s->nb_esc_params < MAX_ESC_PARAMS)
                s->nb_esc_params++;
B
bellard 已提交
892 893
            if (ch == ';')
                break;
894 895 896 897
#ifdef DEBUG_CONSOLE
            fprintf(stderr, "escape sequence CSI%d;%d%c, %d parameters\n",
                    s->esc_params[0], s->esc_params[1], ch, s->nb_esc_params);
#endif
B
bellard 已提交
898 899
            s->state = TTY_STATE_NORM;
            switch(ch) {
900 901 902 903 904
            case 'A':
                /* move cursor up */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
905
                set_cursor(s, s->x, s->y - s->esc_params[0]);
906 907 908 909 910 911
                break;
            case 'B':
                /* move cursor down */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
912
                set_cursor(s, s->x, s->y + s->esc_params[0]);
B
bellard 已提交
913 914
                break;
            case 'C':
915 916 917 918
                /* move cursor right */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
919
                set_cursor(s, s->x + s->esc_params[0], s->y);
B
bellard 已提交
920
                break;
921 922 923 924 925
            case 'D':
                /* move cursor left */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
926
                set_cursor(s, s->x - s->esc_params[0], s->y);
927 928 929
                break;
            case 'G':
                /* move cursor to column */
930
                set_cursor(s, s->esc_params[0] - 1, s->y);
931 932 933 934
                break;
            case 'f':
            case 'H':
                /* move cursor to row, column */
935
                set_cursor(s, s->esc_params[1] - 1, s->esc_params[0] - 1);
936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967
                break;
            case 'J':
                switch (s->esc_params[0]) {
                case 0:
                    /* clear to end of screen */
                    for (y = s->y; y < s->height; y++) {
                        for (x = 0; x < s->width; x++) {
                            if (y == s->y && x < s->x) {
                                continue;
                            }
                            console_clear_xy(s, x, y);
                        }
                    }
                    break;
                case 1:
                    /* clear from beginning of screen */
                    for (y = 0; y <= s->y; y++) {
                        for (x = 0; x < s->width; x++) {
                            if (y == s->y && x > s->x) {
                                break;
                            }
                            console_clear_xy(s, x, y);
                        }
                    }
                    break;
                case 2:
                    /* clear entire screen */
                    for (y = 0; y <= s->height; y++) {
                        for (x = 0; x < s->width; x++) {
                            console_clear_xy(s, x, y);
                        }
                    }
968
                    break;
969
                }
970
                break;
B
bellard 已提交
971
            case 'K':
972 973
                switch (s->esc_params[0]) {
                case 0:
974 975
                    /* clear to eol */
                    for(x = s->x; x < s->width; x++) {
976
                        console_clear_xy(s, x, s->y);
977 978
                    }
                    break;
979 980 981 982 983 984 985 986 987 988 989
                case 1:
                    /* clear from beginning of line */
                    for (x = 0; x <= s->x; x++) {
                        console_clear_xy(s, x, s->y);
                    }
                    break;
                case 2:
                    /* clear entire line */
                    for(x = 0; x < s->width; x++) {
                        console_clear_xy(s, x, s->y);
                    }
990 991
                    break;
                }
992 993
                break;
            case 'm':
994 995
                console_handle_escape(s);
                break;
996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016
            case 'n':
                /* report cursor position */
                /* TODO: send ESC[row;colR */
                break;
            case 's':
                /* save cursor position */
                s->x_saved = s->x;
                s->y_saved = s->y;
                break;
            case 'u':
                /* restore cursor position */
                s->x = s->x_saved;
                s->y = s->y_saved;
                break;
            default:
#ifdef DEBUG_CONSOLE
                fprintf(stderr, "unhandled escape character '%c'\n", ch);
#endif
                break;
            }
            break;
B
bellard 已提交
1017 1018 1019 1020 1021 1022
        }
    }
}

void console_select(unsigned int index)
{
1023
    QemuConsole *s;
1024

B
bellard 已提交
1025 1026
    if (index >= MAX_CONSOLES)
        return;
G
Gerd Hoffmann 已提交
1027 1028

    trace_console_select(index);
B
bellard 已提交
1029 1030
    s = consoles[index];
    if (s) {
1031
        DisplayState *ds = s->ds;
1032

1033
        if (active_console && active_console->cursor_timer) {
1034 1035
            qemu_del_timer(active_console->cursor_timer);
        }
B
bellard 已提交
1036
        active_console = s;
1037
        if (ds->have_gfx) {
1038 1039 1040
            dpy_gfx_switch_surface(ds, s->surface);
            dpy_gfx_update(s, 0, 0, surface_width(s->surface),
                           surface_height(s->surface));
1041 1042
        }
        if (ds->have_text) {
1043
            dpy_text_resize(s, s->width, s->height);
1044
        }
1045 1046 1047 1048
        if (s->cursor_timer) {
            qemu_mod_timer(s->cursor_timer,
                   qemu_get_clock_ms(rt_clock) + CONSOLE_CURSOR_PERIOD / 2);
        }
B
bellard 已提交
1049 1050 1051 1052 1053
    }
}

static int console_puts(CharDriverState *chr, const uint8_t *buf, int len)
{
1054
    QemuConsole *s = chr->opaque;
B
bellard 已提交
1055 1056
    int i;

1057 1058 1059 1060
    s->update_x0 = s->width * FONT_WIDTH;
    s->update_y0 = s->height * FONT_HEIGHT;
    s->update_x1 = 0;
    s->update_y1 = 0;
B
bellard 已提交
1061 1062 1063 1064 1065
    console_show_cursor(s, 0);
    for(i = 0; i < len; i++) {
        console_putchar(s, buf[i]);
    }
    console_show_cursor(s, 1);
1066
    if (s->ds->have_gfx && s->update_x0 < s->update_x1) {
1067
        dpy_gfx_update(s, s->update_x0, s->update_y0,
1068 1069
                       s->update_x1 - s->update_x0,
                       s->update_y1 - s->update_y0);
1070
    }
B
bellard 已提交
1071 1072 1073
    return len;
}

1074 1075
static void kbd_send_chars(void *opaque)
{
1076
    QemuConsole *s = opaque;
1077 1078
    int len;
    uint8_t buf[16];
1079

1080
    len = qemu_chr_be_can_write(s->chr);
1081 1082 1083 1084 1085 1086
    if (len > s->out_fifo.count)
        len = s->out_fifo.count;
    if (len > 0) {
        if (len > sizeof(buf))
            len = sizeof(buf);
        qemu_fifo_read(&s->out_fifo, buf, len);
1087
        qemu_chr_be_write(s->chr, buf, len);
1088 1089 1090 1091
    }
    /* characters are pending: we send them a bit later (XXX:
       horrible, should change char device API) */
    if (s->out_fifo.count > 0) {
1092
        qemu_mod_timer(s->kbd_timer, qemu_get_clock_ms(rt_clock) + 1);
1093 1094 1095
    }
}

B
bellard 已提交
1096 1097 1098
/* called when an ascii key is pressed */
void kbd_put_keysym(int keysym)
{
1099
    QemuConsole *s;
B
bellard 已提交
1100 1101 1102 1103
    uint8_t buf[16], *q;
    int c;

    s = active_console;
1104
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120
        return;

    switch(keysym) {
    case QEMU_KEY_CTRL_UP:
        console_scroll(-1);
        break;
    case QEMU_KEY_CTRL_DOWN:
        console_scroll(1);
        break;
    case QEMU_KEY_CTRL_PAGEUP:
        console_scroll(-10);
        break;
    case QEMU_KEY_CTRL_PAGEDOWN:
        console_scroll(10);
        break;
    default:
1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134
        /* convert the QEMU keysym to VT100 key string */
        q = buf;
        if (keysym >= 0xe100 && keysym <= 0xe11f) {
            *q++ = '\033';
            *q++ = '[';
            c = keysym - 0xe100;
            if (c >= 10)
                *q++ = '0' + (c / 10);
            *q++ = '0' + (c % 10);
            *q++ = '~';
        } else if (keysym >= 0xe120 && keysym <= 0xe17f) {
            *q++ = '\033';
            *q++ = '[';
            *q++ = keysym & 0xff;
1135 1136 1137
        } else if (s->echo && (keysym == '\r' || keysym == '\n')) {
            console_puts(s->chr, (const uint8_t *) "\r", 1);
            *q++ = '\n';
1138
        } else {
1139 1140 1141 1142
            *q++ = keysym;
        }
        if (s->echo) {
            console_puts(s->chr, buf, q - buf);
1143
        }
1144
        if (s->chr->chr_read) {
1145 1146
            qemu_fifo_write(&s->out_fifo, buf, q - buf);
            kbd_send_chars(s);
B
bellard 已提交
1147 1148 1149 1150 1151
        }
        break;
    }
}

B
balrog 已提交
1152 1153
static void text_console_invalidate(void *opaque)
{
1154
    QemuConsole *s = (QemuConsole *) opaque;
1155 1156

    if (s->ds->have_text && s->console_type == TEXT_CONSOLE) {
1157 1158
        text_console_resize(s);
    }
B
balrog 已提交
1159 1160 1161
    console_refresh(s);
}

A
Anthony Liguori 已提交
1162
static void text_console_update(void *opaque, console_ch_t *chardata)
B
balrog 已提交
1163
{
1164
    QemuConsole *s = (QemuConsole *) opaque;
B
balrog 已提交
1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175
    int i, j, src;

    if (s->text_x[0] <= s->text_x[1]) {
        src = (s->y_base + s->text_y[0]) * s->width;
        chardata += s->text_y[0] * s->width;
        for (i = s->text_y[0]; i <= s->text_y[1]; i ++)
            for (j = 0; j < s->width; j ++, src ++)
                console_write_ch(chardata ++, s->cells[src].ch |
                                (s->cells[src].t_attrib.fgcol << 12) |
                                (s->cells[src].t_attrib.bgcol << 8) |
                                (s->cells[src].t_attrib.bold << 21));
1176
        dpy_text_update(s, s->text_x[0], s->text_y[0],
1177
                        s->text_x[1] - s->text_x[0], i - s->text_y[0]);
B
balrog 已提交
1178 1179 1180 1181 1182 1183
        s->text_x[0] = s->width;
        s->text_y[0] = s->height;
        s->text_x[1] = 0;
        s->text_y[1] = 0;
    }
    if (s->cursor_invalidate) {
1184
        dpy_text_cursor(s, s->x, s->y);
B
balrog 已提交
1185 1186 1187 1188
        s->cursor_invalidate = 0;
    }
}

1189
static QemuConsole *new_console(DisplayState *ds, console_type_t console_type)
B
bellard 已提交
1190
{
1191
    QemuConsole *s;
P
pbrook 已提交
1192
    int i;
B
bellard 已提交
1193 1194 1195

    if (nb_consoles >= MAX_CONSOLES)
        return NULL;
1196
    s = g_malloc0(sizeof(QemuConsole));
1197 1198
    if (!active_console || ((active_console->console_type != GRAPHIC_CONSOLE) &&
        (console_type == GRAPHIC_CONSOLE))) {
B
bellard 已提交
1199
        active_console = s;
1200
    }
B
bellard 已提交
1201
    s->ds = ds;
1202 1203
    s->console_type = console_type;
    if (console_type != GRAPHIC_CONSOLE) {
1204
        s->index = nb_consoles;
P
pbrook 已提交
1205 1206 1207 1208
        consoles[nb_consoles++] = s;
    } else {
        /* HACK: Put graphical consoles before text consoles.  */
        for (i = nb_consoles; i > 0; i--) {
1209
            if (consoles[i - 1]->console_type == GRAPHIC_CONSOLE)
P
pbrook 已提交
1210 1211
                break;
            consoles[i] = consoles[i - 1];
1212
            consoles[i]->index = i;
P
pbrook 已提交
1213
        }
1214
        s->index = i;
P
pbrook 已提交
1215
        consoles[i] = s;
1216
        nb_consoles++;
P
pbrook 已提交
1217 1218 1219 1220
    }
    return s;
}

1221 1222
static void qemu_alloc_display(DisplaySurface *surface, int width, int height,
                               int linesize, PixelFormat pf, int newflags)
1223 1224
{
    surface->pf = pf;
1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235

    qemu_pixman_image_unref(surface->image);
    surface->image = NULL;

    surface->format = qemu_pixman_get_format(&pf);
    assert(surface->format != 0);
    surface->image = pixman_image_create_bits(surface->format,
                                              width, height,
                                              NULL, linesize);
    assert(surface->image != NULL);

1236
    surface->flags = newflags | QEMU_ALLOCATED_FLAG;
1237
#ifdef HOST_WORDS_BIGENDIAN
1238
    surface->flags |= QEMU_BIG_ENDIAN_FLAG;
1239 1240 1241
#endif
}

1242
DisplaySurface *qemu_create_displaysurface(int width, int height)
1243 1244 1245
{
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
    int linesize = width * 4;
1246 1247

    trace_displaysurface_create(surface, width, height);
1248 1249 1250 1251 1252
    qemu_alloc_display(surface, width, height, linesize,
                       qemu_default_pixelformat(32), 0);
    return surface;
}

G
Gerd Hoffmann 已提交
1253
DisplaySurface *qemu_create_displaysurface_from(int width, int height, int bpp,
G
Gerd Hoffmann 已提交
1254 1255
                                                int linesize, uint8_t *data,
                                                bool byteswap)
1256
{
1257
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
1258

1259
    trace_displaysurface_create_from(surface, width, height, bpp, byteswap);
G
Gerd Hoffmann 已提交
1260 1261 1262 1263 1264
    if (byteswap) {
        surface->pf = qemu_different_endianness_pixelformat(bpp);
    } else {
        surface->pf = qemu_default_pixelformat(bpp);
    }
1265 1266 1267 1268 1269 1270 1271 1272

    surface->format = qemu_pixman_get_format(&surface->pf);
    assert(surface->format != 0);
    surface->image = pixman_image_create_bits(surface->format,
                                              width, height,
                                              (void *)data, linesize);
    assert(surface->image != NULL);

1273 1274 1275 1276 1277 1278 1279
#ifdef HOST_WORDS_BIGENDIAN
    surface->flags = QEMU_BIG_ENDIAN_FLAG;
#endif

    return surface;
}

1280
void qemu_free_displaysurface(DisplaySurface *surface)
1281
{
1282
    if (surface == NULL) {
1283
        return;
G
Gerd Hoffmann 已提交
1284
    }
1285 1286 1287
    trace_displaysurface_free(surface);
    qemu_pixman_image_unref(surface->image);
    g_free(surface);
1288 1289
}

1290 1291 1292 1293 1294 1295 1296
void register_displaychangelistener(DisplayState *ds,
                                    DisplayChangeListener *dcl)
{
    trace_displaychangelistener_register(dcl, dcl->ops->dpy_name);
    dcl->ds = ds;
    QLIST_INSERT_HEAD(&ds->listeners, dcl, next);
    gui_setup_refresh(ds);
1297 1298
    if (dcl->ops->dpy_gfx_switch && active_console) {
        dcl->ops->dpy_gfx_switch(dcl, active_console->surface);
1299 1300 1301
    }
}

G
Gerd Hoffmann 已提交
1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312
void update_displaychangelistener(DisplayChangeListener *dcl,
                                  uint64_t interval)
{
    DisplayState *ds = dcl->ds;

    dcl->update_interval = interval;
    if (!ds->refreshing && ds->update_interval > interval) {
        qemu_mod_timer(ds->gui_timer, ds->last_update + interval);
    }
}

1313 1314 1315 1316 1317 1318 1319 1320
void unregister_displaychangelistener(DisplayChangeListener *dcl)
{
    DisplayState *ds = dcl->ds;
    trace_displaychangelistener_unregister(dcl, dcl->ops->dpy_name);
    QLIST_REMOVE(dcl, next);
    gui_setup_refresh(ds);
}

1321
void dpy_gfx_update(QemuConsole *con, int x, int y, int w, int h)
1322
{
1323
    DisplayState *s = con->ds;
1324
    struct DisplayChangeListener *dcl;
1325 1326
    int width = surface_width(con->surface);
    int height = surface_height(con->surface);
1327 1328 1329 1330 1331 1332 1333 1334

    x = MAX(x, 0);
    y = MAX(y, 0);
    x = MIN(x, width);
    y = MIN(y, height);
    w = MIN(w, width - x);
    h = MIN(h, height - y);

1335 1336 1337
    if (con != active_console) {
        return;
    }
1338 1339
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_update) {
1340
            dcl->ops->dpy_gfx_update(dcl, x, y, w, h);
1341 1342 1343 1344
        }
    }
}

1345 1346
static void dpy_gfx_switch_surface(DisplayState *ds,
                                   DisplaySurface *surface)
1347 1348
{
    struct DisplayChangeListener *dcl;
1349

1350
    QLIST_FOREACH(dcl, &ds->listeners, next) {
1351
        if (dcl->ops->dpy_gfx_switch) {
1352
            dcl->ops->dpy_gfx_switch(dcl, surface);
1353 1354
        }
    }
1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366
}

void dpy_gfx_replace_surface(QemuConsole *con,
                             DisplaySurface *surface)
{
    DisplayState *s = con->ds;
    DisplaySurface *old_surface = con->surface;

    con->surface = surface;
    if (con == active_console) {
        dpy_gfx_switch_surface(s, surface);
    }
1367
    qemu_free_displaysurface(old_surface);
1368 1369 1370 1371 1372 1373 1374
}

void dpy_refresh(DisplayState *s)
{
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_refresh) {
1375
            dcl->ops->dpy_refresh(dcl);
1376 1377 1378 1379
        }
    }
}

1380 1381
void dpy_gfx_copy(QemuConsole *con, int src_x, int src_y,
                  int dst_x, int dst_y, int w, int h)
1382
{
1383
    DisplayState *s = con->ds;
1384
    struct DisplayChangeListener *dcl;
1385 1386 1387 1388

    if (con != active_console) {
        return;
    }
1389 1390
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_copy) {
1391
            dcl->ops->dpy_gfx_copy(dcl, src_x, src_y, dst_x, dst_y, w, h);
1392
        } else { /* TODO */
1393
            dcl->ops->dpy_gfx_update(dcl, dst_x, dst_y, w, h);
1394 1395 1396 1397
        }
    }
}

1398
void dpy_text_cursor(QemuConsole *con, int x, int y)
1399
{
1400
    DisplayState *s = con->ds;
1401
    struct DisplayChangeListener *dcl;
1402 1403 1404 1405

    if (con != active_console) {
        return;
    }
1406 1407
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_cursor) {
1408
            dcl->ops->dpy_text_cursor(dcl, x, y);
1409 1410 1411 1412
        }
    }
}

1413
void dpy_text_update(QemuConsole *con, int x, int y, int w, int h)
1414
{
1415
    DisplayState *s = con->ds;
1416
    struct DisplayChangeListener *dcl;
1417 1418 1419 1420

    if (con != active_console) {
        return;
    }
1421 1422
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_update) {
1423
            dcl->ops->dpy_text_update(dcl, x, y, w, h);
1424 1425 1426 1427
        }
    }
}

1428
void dpy_text_resize(QemuConsole *con, int w, int h)
1429
{
1430
    DisplayState *s = con->ds;
1431
    struct DisplayChangeListener *dcl;
1432 1433 1434 1435

    if (con != active_console) {
        return;
    }
1436 1437
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_resize) {
1438
            dcl->ops->dpy_text_resize(dcl, w, h);
1439 1440 1441 1442
        }
    }
}

1443
void dpy_mouse_set(QemuConsole *con, int x, int y, int on)
1444
{
1445
    DisplayState *s = con->ds;
1446
    struct DisplayChangeListener *dcl;
1447 1448 1449 1450

    if (con != active_console) {
        return;
    }
1451 1452
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_mouse_set) {
1453
            dcl->ops->dpy_mouse_set(dcl, x, y, on);
1454 1455 1456 1457
        }
    }
}

1458
void dpy_cursor_define(QemuConsole *con, QEMUCursor *cursor)
1459
{
1460
    DisplayState *s = con->ds;
1461
    struct DisplayChangeListener *dcl;
1462 1463 1464 1465

    if (con != active_console) {
        return;
    }
1466 1467
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_cursor_define) {
1468
            dcl->ops->dpy_cursor_define(dcl, cursor);
1469 1470 1471 1472
        }
    }
}

1473
bool dpy_cursor_define_supported(QemuConsole *con)
1474
{
1475
    DisplayState *s = con->ds;
1476 1477 1478 1479 1480 1481 1482 1483 1484
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_cursor_define) {
            return true;
        }
    }
    return false;
}

1485 1486 1487
/***********************************************************/
/* register display */

1488 1489
/* console.c internal use only */
static DisplayState *get_alloc_displaystate(void)
1490
{
1491 1492 1493 1494
    if (!display_state) {
        display_state = g_new0(DisplayState, 1);
    }
    return display_state;
1495 1496
}

1497 1498 1499 1500 1501
/*
 * Called by main(), after creating QemuConsoles
 * and before initializing ui (sdl/vnc/...).
 */
DisplayState *init_displaystate(void)
1502
{
1503 1504
    int i;

1505
    if (!display_state) {
1506
        display_state = g_new0(DisplayState, 1);
1507
    }
1508 1509 1510 1511 1512 1513 1514 1515

    for (i = 0; i < nb_consoles; i++) {
        if (consoles[i]->console_type != GRAPHIC_CONSOLE &&
            consoles[i]->ds == NULL) {
            text_console_do_init(consoles[i]->chr, display_state);
        }
    }

1516 1517 1518
    return display_state;
}

G
Gerd Hoffmann 已提交
1519
QemuConsole *graphic_console_init(const GraphicHwOps *hw_ops,
1520
                                  void *opaque)
P
pbrook 已提交
1521
{
1522 1523
    int width = 640;
    int height = 480;
1524
    QemuConsole *s;
1525
    DisplayState *ds;
A
aurel32 已提交
1526

1527
    ds = get_alloc_displaystate();
G
Gerd Hoffmann 已提交
1528
    trace_console_gfx_new();
1529
    s = new_console(ds, GRAPHIC_CONSOLE);
G
Gerd Hoffmann 已提交
1530
    s->hw_ops = hw_ops;
P
pbrook 已提交
1531
    s->hw = opaque;
1532

1533
    s->surface = qemu_create_displaysurface(width, height);
1534
    return s;
B
bellard 已提交
1535 1536
}

P
pbrook 已提交
1537
int is_graphic_console(void)
B
bellard 已提交
1538
{
B
balrog 已提交
1539
    return active_console && active_console->console_type == GRAPHIC_CONSOLE;
B
bellard 已提交
1540 1541
}

1542 1543 1544 1545 1546
int is_fixedsize_console(void)
{
    return active_console && active_console->console_type != TEXT_CONSOLE;
}

1547 1548
static void text_console_set_echo(CharDriverState *chr, bool echo)
{
1549
    QemuConsole *s = chr->opaque;
1550 1551 1552 1553

    s->echo = echo;
}

1554 1555
static void text_console_update_cursor(void *opaque)
{
1556
    QemuConsole *s = opaque;
1557 1558

    s->cursor_visible_phase = !s->cursor_visible_phase;
1559
    graphic_hw_invalidate(s);
1560 1561 1562 1563
    qemu_mod_timer(s->cursor_timer,
                   qemu_get_clock_ms(rt_clock) + CONSOLE_CURSOR_PERIOD / 2);
}

G
Gerd Hoffmann 已提交
1564 1565 1566 1567 1568
static const GraphicHwOps text_console_ops = {
    .invalidate  = text_console_invalidate,
    .text_update = text_console_update,
};

P
Paolo Bonzini 已提交
1569
static void text_console_do_init(CharDriverState *chr, DisplayState *ds)
B
bellard 已提交
1570
{
1571
    QemuConsole *s;
G
Gerd Hoffmann 已提交
1572 1573
    int g_width = 80 * FONT_WIDTH;
    int g_height = 24 * FONT_HEIGHT;
1574

1575
    s = chr->opaque;
G
Gerd Hoffmann 已提交
1576

B
bellard 已提交
1577
    chr->chr_write = console_puts;
B
bellard 已提交
1578

1579 1580
    s->out_fifo.buf = s->out_fifo_buf;
    s->out_fifo.buf_size = sizeof(s->out_fifo_buf);
1581
    s->kbd_timer = qemu_new_timer_ms(rt_clock, kbd_send_chars, s);
1582
    s->ds = ds;
1583

B
bellard 已提交
1584 1585 1586 1587 1588
    s->y_displayed = 0;
    s->y_base = 0;
    s->total_height = DEFAULT_BACKSCROLL;
    s->x = 0;
    s->y = 0;
G
Gerd Hoffmann 已提交
1589
    if (!s->surface) {
1590
        if (active_console && active_console->surface) {
G
Gerd Hoffmann 已提交
1591 1592
            g_width = surface_width(active_console->surface);
            g_height = surface_height(active_console->surface);
1593
        }
G
Gerd Hoffmann 已提交
1594
        s->surface = qemu_create_displaysurface(g_width, g_height);
1595
    }
1596

1597 1598 1599
    s->cursor_timer =
        qemu_new_timer_ms(rt_clock, text_console_update_cursor, s);

G
Gerd Hoffmann 已提交
1600
    s->hw_ops = &text_console_ops;
B
balrog 已提交
1601 1602
    s->hw = s;

1603 1604 1605 1606 1607 1608 1609 1610 1611 1612
    /* Set text attribute defaults */
    s->t_attrib_default.bold = 0;
    s->t_attrib_default.uline = 0;
    s->t_attrib_default.blink = 0;
    s->t_attrib_default.invers = 0;
    s->t_attrib_default.unvisible = 0;
    s->t_attrib_default.fgcol = COLOR_WHITE;
    s->t_attrib_default.bgcol = COLOR_BLACK;
    /* set current text attributes to default */
    s->t_attrib = s->t_attrib_default;
B
bellard 已提交
1613 1614
    text_console_resize(s);

1615 1616 1617 1618
    if (chr->label) {
        char msg[128];
        int len;

1619
        s->t_attrib.bgcol = COLOR_BLUE;
1620 1621
        len = snprintf(msg, sizeof(msg), "%s console\r\n", chr->label);
        console_puts(chr, (uint8_t*)msg, len);
1622
        s->t_attrib = s->t_attrib_default;
1623 1624
    }

1625
    qemu_chr_be_generic_open(chr);
1626 1627
    if (chr->init)
        chr->init(chr);
B
bellard 已提交
1628
}
1629

G
Gerd Hoffmann 已提交
1630
static CharDriverState *text_console_init(ChardevVC *vc)
1631 1632
{
    CharDriverState *chr;
1633
    QemuConsole *s;
G
Gerd Hoffmann 已提交
1634 1635
    unsigned width = 0;
    unsigned height = 0;
1636

1637
    chr = g_malloc0(sizeof(CharDriverState));
1638

G
Gerd Hoffmann 已提交
1639 1640 1641 1642 1643
    if (vc->has_width) {
        width = vc->width;
    } else if (vc->has_cols) {
        width = vc->cols * FONT_WIDTH;
    }
1644

G
Gerd Hoffmann 已提交
1645 1646 1647 1648 1649
    if (vc->has_height) {
        height = vc->height;
    } else if (vc->has_rows) {
        height = vc->rows * FONT_HEIGHT;
    }
1650

G
Gerd Hoffmann 已提交
1651
    trace_console_txt_new(width, height);
1652 1653 1654 1655
    if (width == 0 || height == 0) {
        s = new_console(NULL, TEXT_CONSOLE);
    } else {
        s = new_console(NULL, TEXT_CONSOLE_FIXED_SIZE);
G
Gerd Hoffmann 已提交
1656
        s->surface = qemu_create_displaysurface(width, height);
1657 1658 1659
    }

    if (!s) {
1660
        g_free(chr);
1661
        return NULL;
1662 1663 1664 1665
    }

    s->chr = chr;
    chr->opaque = s;
1666
    chr->chr_set_echo = text_console_set_echo;
1667 1668 1669 1670

    if (display_state) {
        text_console_do_init(chr, display_state);
    }
1671
    return chr;
1672 1673
}

1674 1675
static VcHandler *vc_handler = text_console_init;

G
Gerd Hoffmann 已提交
1676
CharDriverState *vc_init(ChardevVC *vc)
1677
{
G
Gerd Hoffmann 已提交
1678
    return vc_handler(vc);
1679 1680 1681 1682 1683 1684 1685
}

void register_vc_handler(VcHandler *handler)
{
    vc_handler = handler;
}

1686
void qemu_console_resize(QemuConsole *s, int width, int height)
1687
{
1688 1689 1690 1691 1692
    DisplaySurface *surface;

    assert(s->console_type == GRAPHIC_CONSOLE);
    surface = qemu_create_displaysurface(width, height);
    dpy_gfx_replace_surface(s, surface);
1693
}
1694

1695
void qemu_console_copy(QemuConsole *con, int src_x, int src_y,
1696
                       int dst_x, int dst_y, int w, int h)
1697
{
1698 1699
    assert(con->console_type == GRAPHIC_CONSOLE);
    dpy_gfx_copy(con, src_x, src_y, dst_x, dst_y, w, h);
1700
}
1701

1702 1703
DisplaySurface *qemu_console_surface(QemuConsole *console)
{
1704
    return console->surface;
1705 1706 1707 1708 1709 1710 1711
}

DisplayState *qemu_console_displaystate(QemuConsole *console)
{
    return console->ds;
}

1712
PixelFormat qemu_different_endianness_pixelformat(int bpp)
1713 1714 1715 1716 1717 1718
{
    PixelFormat pf;

    memset(&pf, 0x00, sizeof(PixelFormat));

    pf.bits_per_pixel = bpp;
1719
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1720 1721 1722
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1723 1724 1725 1726 1727 1728 1729 1730 1731 1732
        case 24:
            pf.rmask = 0x000000FF;
            pf.gmask = 0x0000FF00;
            pf.bmask = 0x00FF0000;
            pf.rmax = 255;
            pf.gmax = 255;
            pf.bmax = 255;
            pf.rshift = 0;
            pf.gshift = 8;
            pf.bshift = 16;
1733 1734 1735
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1736
            break;
1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749
        case 32:
            pf.rmask = 0x0000FF00;
            pf.gmask = 0x00FF0000;
            pf.bmask = 0xFF000000;
            pf.amask = 0x00000000;
            pf.amax = 255;
            pf.rmax = 255;
            pf.gmax = 255;
            pf.bmax = 255;
            pf.ashift = 0;
            pf.rshift = 8;
            pf.gshift = 16;
            pf.bshift = 24;
1750 1751 1752 1753
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
            pf.abits = 8;
1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767
            break;
        default:
            break;
    }
    return pf;
}

PixelFormat qemu_default_pixelformat(int bpp)
{
    PixelFormat pf;

    memset(&pf, 0x00, sizeof(PixelFormat));

    pf.bits_per_pixel = bpp;
1768
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1769 1770 1771
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786
        case 15:
            pf.bits_per_pixel = 16;
            pf.rmask = 0x00007c00;
            pf.gmask = 0x000003E0;
            pf.bmask = 0x0000001F;
            pf.rmax = 31;
            pf.gmax = 31;
            pf.bmax = 31;
            pf.rshift = 10;
            pf.gshift = 5;
            pf.bshift = 0;
            pf.rbits = 5;
            pf.gbits = 5;
            pf.bbits = 5;
            break;
1787 1788 1789 1790 1791 1792 1793 1794 1795 1796
        case 16:
            pf.rmask = 0x0000F800;
            pf.gmask = 0x000007E0;
            pf.bmask = 0x0000001F;
            pf.rmax = 31;
            pf.gmax = 63;
            pf.bmax = 31;
            pf.rshift = 11;
            pf.gshift = 5;
            pf.bshift = 0;
1797 1798 1799
            pf.rbits = 5;
            pf.gbits = 6;
            pf.bbits = 5;
1800 1801
            break;
        case 24:
1802 1803 1804 1805 1806 1807 1808 1809 1810
            pf.rmask = 0x00FF0000;
            pf.gmask = 0x0000FF00;
            pf.bmask = 0x000000FF;
            pf.rmax = 255;
            pf.gmax = 255;
            pf.bmax = 255;
            pf.rshift = 16;
            pf.gshift = 8;
            pf.bshift = 0;
1811 1812 1813
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1814
            break;
1815 1816 1817 1818 1819 1820 1821 1822 1823 1824
        case 32:
            pf.rmask = 0x00FF0000;
            pf.gmask = 0x0000FF00;
            pf.bmask = 0x000000FF;
            pf.rmax = 255;
            pf.gmax = 255;
            pf.bmax = 255;
            pf.rshift = 16;
            pf.gshift = 8;
            pf.bshift = 0;
1825 1826 1827
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1828 1829 1830 1831 1832 1833
            break;
        default:
            break;
    }
    return pf;
}
1834

G
Gerd Hoffmann 已提交
1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866
static void qemu_chr_parse_vc(QemuOpts *opts, ChardevBackend *backend,
                              Error **errp)
{
    int val;

    backend->vc = g_new0(ChardevVC, 1);

    val = qemu_opt_get_number(opts, "width", 0);
    if (val != 0) {
        backend->vc->has_width = true;
        backend->vc->width = val;
    }

    val = qemu_opt_get_number(opts, "height", 0);
    if (val != 0) {
        backend->vc->has_height = true;
        backend->vc->height = val;
    }

    val = qemu_opt_get_number(opts, "cols", 0);
    if (val != 0) {
        backend->vc->has_cols = true;
        backend->vc->cols = val;
    }

    val = qemu_opt_get_number(opts, "rows", 0);
    if (val != 0) {
        backend->vc->has_rows = true;
        backend->vc->rows = val;
    }
}

1867 1868
static void register_types(void)
{
G
Gerd Hoffmann 已提交
1869 1870
    register_char_driver_qapi("vc", CHARDEV_BACKEND_KIND_VC,
                              qemu_chr_parse_vc);
1871 1872 1873
}

type_init(register_types);