console.c 50.3 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
    DisplayState *ds = opaque;
    DisplayChangeListener *dcl;
185
    int i;
186

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

    QLIST_FOREACH(dcl, &ds->listeners, next) {
G
Gerd Hoffmann 已提交
192 193 194 195
        dcl_interval = dcl->update_interval ?
            dcl->update_interval : GUI_REFRESH_INTERVAL_DEFAULT;
        if (interval > dcl_interval) {
            interval = dcl_interval;
196 197
        }
    }
G
Gerd Hoffmann 已提交
198 199
    if (ds->update_interval != interval) {
        ds->update_interval = interval;
200 201 202 203 204
        for (i = 0; i < nb_consoles; i++) {
            if (consoles[i]->hw_ops->update_interval) {
                consoles[i]->hw_ops->update_interval(consoles[i]->hw, interval);
            }
        }
G
Gerd Hoffmann 已提交
205 206 207 208
        trace_console_refresh(interval);
    }
    ds->last_update = qemu_get_clock_ms(rt_clock);
    qemu_mod_timer(ds->gui_timer, ds->last_update + interval);
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 238 239 240 241 242 243
}

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;
}

244
void graphic_hw_update(QemuConsole *con)
P
pbrook 已提交
245
{
246 247 248
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
249 250
    if (con && con->hw_ops->gfx_update) {
        con->hw_ops->gfx_update(con->hw);
251
    }
P
pbrook 已提交
252 253
}

254
void graphic_hw_invalidate(QemuConsole *con)
P
pbrook 已提交
255
{
256 257 258
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
259 260
    if (con && con->hw_ops->invalidate) {
        con->hw_ops->invalidate(con->hw);
261
    }
P
pbrook 已提交
262 263
}

G
Gerd Hoffmann 已提交
264 265
static void ppm_save(const char *filename, struct DisplaySurface *ds,
                     Error **errp)
P
pbrook 已提交
266
{
G
Gerd Hoffmann 已提交
267 268 269 270 271 272 273 274 275 276 277 278 279
    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;
280
    }
G
Gerd Hoffmann 已提交
281 282 283 284 285 286 287 288 289 290 291 292 293 294 295
    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;
        }
296 297
    }

G
Gerd Hoffmann 已提交
298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317
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;
318
    }
G
Gerd Hoffmann 已提交
319 320 321 322

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

325
void graphic_hw_text_update(QemuConsole *con, console_ch_t *chardata)
B
balrog 已提交
326
{
327 328 329
    if (!con) {
        con = active_console;
    }
G
Gerd Hoffmann 已提交
330 331 332
    if (con && con->hw_ops->text_update) {
        con->hw_ops->text_update(con->hw, chardata);
    }
B
balrog 已提交
333 334
}

335 336
static void vga_fill_rect(QemuConsole *con,
                          int posx, int posy, int width, int height,
337
                          pixman_color_t color)
B
bellard 已提交
338
{
339
    DisplaySurface *surface = qemu_console_surface(con);
340 341 342 343 344
    pixman_rectangle16_t rect = {
        .x = posx, .y = posy, .width = width, .height = height
    };

    pixman_image_fill_rectangles(PIXMAN_OP_SRC, surface->image,
345
                                 &color, 1, &rect);
B
bellard 已提交
346 347 348
}

/* copy from (xs, ys) to (xd, yd) a rectangle of size (w, h) */
349 350
static void vga_bitblt(QemuConsole *con,
                       int xs, int ys, int xd, int yd, int w, int h)
B
bellard 已提交
351
{
352
    DisplaySurface *surface = qemu_console_surface(con);
353 354 355 356

    pixman_image_composite(PIXMAN_OP_SRC,
                           surface->image, NULL, surface->image,
                           xs, ys, 0, 0, xd, yd, w, h);
B
bellard 已提交
357 358 359 360 361 362 363 364 365 366
}

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

#define FONT_HEIGHT 16
#define FONT_WIDTH 8

#include "vgafont.h"

367
#ifndef CONFIG_CURSES
368 369 370 371 372 373 374 375 376 377
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
};
378
#endif
379

380 381 382 383
#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] = {
384
    {   /* dark */
B
bellard 已提交
385 386 387 388 389 390 391 392
        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 */
393 394
    },
    {   /* bright */
B
bellard 已提交
395 396 397 398 399 400 401 402
        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 */
403
    }
B
bellard 已提交
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 432 433 434 435 436 437
#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 已提交
438

439
static void vga_putcharxy(QemuConsole *s, int x, int y, int ch,
440
                          TextAttributes *t_attrib)
B
bellard 已提交
441
{
442
    static pixman_image_t *glyphs[256];
443
    DisplaySurface *surface = qemu_console_surface(s);
444
    pixman_color_t fgcol, bgcol;
445 446

    if (t_attrib->invers) {
G
Gerd Hoffmann 已提交
447 448
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
449
    } else {
G
Gerd Hoffmann 已提交
450 451
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
452
    }
B
bellard 已提交
453

454 455
    if (!glyphs[ch]) {
        glyphs[ch] = qemu_pixman_glyph_from_vgafont(FONT_HEIGHT, vgafont16, ch);
B
bellard 已提交
456
    }
457
    qemu_pixman_glyph_render(glyphs[ch], surface->image,
458
                             &fgcol, &bgcol, x, y, FONT_WIDTH, FONT_HEIGHT);
B
bellard 已提交
459 460
}

461
static void text_console_resize(QemuConsole *s)
B
bellard 已提交
462 463 464 465 466
{
    TextCell *cells, *c, *c1;
    int w1, x, y, last_width;

    last_width = s->width;
G
Gerd Hoffmann 已提交
467 468
    s->width = surface_width(s->surface) / FONT_WIDTH;
    s->height = surface_height(s->surface) / FONT_HEIGHT;
B
bellard 已提交
469 470 471 472 473

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

474
    cells = g_malloc(s->width * s->total_height * sizeof(TextCell));
B
bellard 已提交
475 476 477 478 479 480 481 482 483 484
    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 = ' ';
485
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
486 487 488
            c++;
        }
    }
489
    g_free(s->cells);
B
bellard 已提交
490 491 492
    s->cells = cells;
}

493
static inline void text_update_xy(QemuConsole *s, int x, int y)
B
balrog 已提交
494 495 496 497 498 499 500
{
    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);
}

501
static void invalidate_xy(QemuConsole *s, int x, int y)
502 503 504 505 506 507 508 509 510 511 512
{
    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;
}

513
static void update_xy(QemuConsole *s, int x, int y)
B
bellard 已提交
514 515 516 517
{
    TextCell *c;
    int y1, y2;

518 519 520 521 522 523 524
    if (s != active_console) {
        return;
    }

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

526
    if (s->ds->have_gfx) {
B
bellard 已提交
527 528 529 530 531 532
        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];
533
            vga_putcharxy(s, x, y2, c->ch,
534
                          &(c->t_attrib));
535
            invalidate_xy(s, x, y2);
B
bellard 已提交
536 537 538 539
        }
    }
}

540
static void console_show_cursor(QemuConsole *s, int show)
B
bellard 已提交
541 542 543
{
    TextCell *c;
    int y, y1;
544
    int x = s->x;
B
bellard 已提交
545

546 547 548
    if (s != active_console) {
        return;
    }
B
balrog 已提交
549

550 551 552
    if (s->ds->have_text) {
        s->cursor_invalidate = 1;
    }
B
balrog 已提交
553

554
    if (s->ds->have_gfx) {
555 556 557
        if (x >= s->width) {
            x = s->width - 1;
        }
B
bellard 已提交
558 559 560 561 562
        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) {
563
            c = &s->cells[y1 * s->width + x];
564
            if (show && s->cursor_visible_phase) {
565 566
                TextAttributes t_attrib = s->t_attrib_default;
                t_attrib.invers = !(t_attrib.invers); /* invert fg and bg */
567
                vga_putcharxy(s, x, y, c->ch, &t_attrib);
B
bellard 已提交
568
            } else {
569
                vga_putcharxy(s, x, y, c->ch, &(c->t_attrib));
B
bellard 已提交
570
            }
571
            invalidate_xy(s, x, y);
B
bellard 已提交
572 573 574 575
        }
    }
}

576
static void console_refresh(QemuConsole *s)
B
bellard 已提交
577
{
578
    DisplaySurface *surface = qemu_console_surface(s);
B
bellard 已提交
579 580 581
    TextCell *c;
    int x, y, y1;

582
    if (s != active_console)
B
bellard 已提交
583
        return;
584 585

    if (s->ds->have_text) {
B
balrog 已提交
586 587 588 589 590 591
        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 已提交
592

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

static void console_scroll(int ydelta)
{
616
    QemuConsole *s;
B
bellard 已提交
617
    int i, y1;
618

B
bellard 已提交
619
    s = active_console;
620
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647
        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);
}

648
static void console_put_lf(QemuConsole *s)
B
bellard 已提交
649 650 651 652 653 654 655
{
    TextCell *c;
    int x, y1;

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

B
bellard 已提交
657 658 659 660 661 662 663 664 665 666 667 668
        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 = ' ';
669
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
670 671 672
            c++;
        }
        if (s == active_console && s->y_displayed == s->y_base) {
673
            if (s->ds->have_text) {
B
balrog 已提交
674 675 676 677 678 679
                s->text_x[0] = 0;
                s->text_y[0] = 0;
                s->text_x[1] = s->width - 1;
                s->text_y[1] = s->height - 1;
            }

680 681 682 683 684 685 686 687 688 689 690 691
            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 已提交
692 693 694 695
        }
    }
}

696 697 698 699
/* 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.
 */
700
static void console_handle_escape(QemuConsole *s)
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 787 788 789 790 791 792
{
    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;
        }
    }
}

793
static void console_clear_xy(QemuConsole *s, int x, int y)
794 795 796 797 798 799 800 801
{
    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);
}

802
/* set cursor, checking bounds */
803
static void set_cursor(QemuConsole *s, int x, int y)
804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821
{
    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;
}

822
static void console_putchar(QemuConsole *s, int ch)
B
bellard 已提交
823 824
{
    TextCell *c;
825 826
    int y1, i;
    int x, y;
B
bellard 已提交
827 828 829 830

    switch(s->state) {
    case TTY_STATE_NORM:
        switch(ch) {
831
        case '\r':  /* carriage return */
B
bellard 已提交
832 833
            s->x = 0;
            break;
834
        case '\n':  /* newline */
B
bellard 已提交
835 836
            console_put_lf(s);
            break;
837
        case '\b':  /* backspace */
838
            if (s->x > 0)
839
                s->x--;
840 841 842
            break;
        case '\t':  /* tabspace */
            if (s->x + (8 - (s->x % 8)) > s->width) {
B
bellard 已提交
843
                s->x = 0;
844 845 846 847 848 849 850 851
                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;
852 853 854 855 856 857
        case 14:
            /* SI (shift in), character set 0 (ignored) */
            break;
        case 15:
            /* SO (shift out), character set 1 (ignored) */
            break;
858
        case 27:    /* esc (introducing an escape sequence) */
B
bellard 已提交
859 860 861
            s->state = TTY_STATE_ESC;
            break;
        default:
862 863 864 865
            if (s->x >= s->width) {
                /* line wrap */
                s->x = 0;
                console_put_lf(s);
866
            }
B
bellard 已提交
867 868 869
            y1 = (s->y_base + s->y) % s->total_height;
            c = &s->cells[y1 * s->width + s->x];
            c->ch = ch;
870
            c->t_attrib = s->t_attrib;
B
bellard 已提交
871 872 873 874 875
            update_xy(s, s->x, s->y);
            s->x++;
            break;
        }
        break;
876
    case TTY_STATE_ESC: /* check if it is a terminal escape sequence */
B
bellard 已提交
877 878 879 880 881 882 883 884 885
        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;
886
    case TTY_STATE_CSI: /* handle escape sequence parameters */
B
bellard 已提交
887 888
        if (ch >= '0' && ch <= '9') {
            if (s->nb_esc_params < MAX_ESC_PARAMS) {
889 890 891 892 893
                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 已提交
894 895
            }
        } else {
896 897
            if (s->nb_esc_params < MAX_ESC_PARAMS)
                s->nb_esc_params++;
B
bellard 已提交
898 899
            if (ch == ';')
                break;
900 901 902 903
#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 已提交
904 905
            s->state = TTY_STATE_NORM;
            switch(ch) {
906 907 908 909 910
            case 'A':
                /* move cursor up */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
911
                set_cursor(s, s->x, s->y - s->esc_params[0]);
912 913 914 915 916 917
                break;
            case 'B':
                /* move cursor down */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
918
                set_cursor(s, s->x, s->y + s->esc_params[0]);
B
bellard 已提交
919 920
                break;
            case 'C':
921 922 923 924
                /* move cursor right */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
925
                set_cursor(s, s->x + s->esc_params[0], s->y);
B
bellard 已提交
926
                break;
927 928 929 930 931
            case 'D':
                /* move cursor left */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
932
                set_cursor(s, s->x - s->esc_params[0], s->y);
933 934 935
                break;
            case 'G':
                /* move cursor to column */
936
                set_cursor(s, s->esc_params[0] - 1, s->y);
937 938 939 940
                break;
            case 'f':
            case 'H':
                /* move cursor to row, column */
941
                set_cursor(s, s->esc_params[1] - 1, s->esc_params[0] - 1);
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 968 969 970 971 972 973
                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);
                        }
                    }
974
                    break;
975
                }
976
                break;
B
bellard 已提交
977
            case 'K':
978 979
                switch (s->esc_params[0]) {
                case 0:
980 981
                    /* clear to eol */
                    for(x = s->x; x < s->width; x++) {
982
                        console_clear_xy(s, x, s->y);
983 984
                    }
                    break;
985 986 987 988 989 990 991 992 993 994 995
                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);
                    }
996 997
                    break;
                }
998 999
                break;
            case 'm':
1000 1001
                console_handle_escape(s);
                break;
1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022
            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 已提交
1023 1024 1025 1026 1027 1028
        }
    }
}

void console_select(unsigned int index)
{
1029
    QemuConsole *s;
1030

B
bellard 已提交
1031 1032
    if (index >= MAX_CONSOLES)
        return;
G
Gerd Hoffmann 已提交
1033 1034

    trace_console_select(index);
B
bellard 已提交
1035 1036
    s = consoles[index];
    if (s) {
1037
        DisplayState *ds = s->ds;
1038

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

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

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

1080 1081
static void kbd_send_chars(void *opaque)
{
1082
    QemuConsole *s = opaque;
1083 1084
    int len;
    uint8_t buf[16];
1085

1086
    len = qemu_chr_be_can_write(s->chr);
1087 1088 1089 1090 1091 1092
    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);
1093
        qemu_chr_be_write(s->chr, buf, len);
1094 1095 1096 1097
    }
    /* characters are pending: we send them a bit later (XXX:
       horrible, should change char device API) */
    if (s->out_fifo.count > 0) {
1098
        qemu_mod_timer(s->kbd_timer, qemu_get_clock_ms(rt_clock) + 1);
1099 1100 1101
    }
}

B
bellard 已提交
1102 1103 1104
/* called when an ascii key is pressed */
void kbd_put_keysym(int keysym)
{
1105
    QemuConsole *s;
B
bellard 已提交
1106 1107 1108 1109
    uint8_t buf[16], *q;
    int c;

    s = active_console;
1110
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126
        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:
1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140
        /* 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;
1141 1142 1143
        } else if (s->echo && (keysym == '\r' || keysym == '\n')) {
            console_puts(s->chr, (const uint8_t *) "\r", 1);
            *q++ = '\n';
1144
        } else {
1145 1146 1147 1148
            *q++ = keysym;
        }
        if (s->echo) {
            console_puts(s->chr, buf, q - buf);
1149
        }
1150
        if (s->chr->chr_read) {
1151 1152
            qemu_fifo_write(&s->out_fifo, buf, q - buf);
            kbd_send_chars(s);
B
bellard 已提交
1153 1154 1155 1156 1157
        }
        break;
    }
}

B
balrog 已提交
1158 1159
static void text_console_invalidate(void *opaque)
{
1160
    QemuConsole *s = (QemuConsole *) opaque;
1161 1162

    if (s->ds->have_text && s->console_type == TEXT_CONSOLE) {
1163 1164
        text_console_resize(s);
    }
B
balrog 已提交
1165 1166 1167
    console_refresh(s);
}

A
Anthony Liguori 已提交
1168
static void text_console_update(void *opaque, console_ch_t *chardata)
B
balrog 已提交
1169
{
1170
    QemuConsole *s = (QemuConsole *) opaque;
B
balrog 已提交
1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181
    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));
1182
        dpy_text_update(s, s->text_x[0], s->text_y[0],
1183
                        s->text_x[1] - s->text_x[0], i - s->text_y[0]);
B
balrog 已提交
1184 1185 1186 1187 1188 1189
        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) {
1190
        dpy_text_cursor(s, s->x, s->y);
B
balrog 已提交
1191 1192 1193 1194
        s->cursor_invalidate = 0;
    }
}

1195
static QemuConsole *new_console(DisplayState *ds, console_type_t console_type)
B
bellard 已提交
1196
{
1197
    QemuConsole *s;
P
pbrook 已提交
1198
    int i;
B
bellard 已提交
1199 1200 1201

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

1227 1228
static void qemu_alloc_display(DisplaySurface *surface, int width, int height,
                               int linesize, PixelFormat pf, int newflags)
1229 1230
{
    surface->pf = pf;
1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241

    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);

1242
    surface->flags = newflags | QEMU_ALLOCATED_FLAG;
1243
#ifdef HOST_WORDS_BIGENDIAN
1244
    surface->flags |= QEMU_BIG_ENDIAN_FLAG;
1245 1246 1247
#endif
}

1248
DisplaySurface *qemu_create_displaysurface(int width, int height)
1249 1250 1251
{
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
    int linesize = width * 4;
1252 1253

    trace_displaysurface_create(surface, width, height);
1254 1255 1256 1257 1258
    qemu_alloc_display(surface, width, height, linesize,
                       qemu_default_pixelformat(32), 0);
    return surface;
}

G
Gerd Hoffmann 已提交
1259
DisplaySurface *qemu_create_displaysurface_from(int width, int height, int bpp,
G
Gerd Hoffmann 已提交
1260 1261
                                                int linesize, uint8_t *data,
                                                bool byteswap)
1262
{
1263
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
1264

1265
    trace_displaysurface_create_from(surface, width, height, bpp, byteswap);
G
Gerd Hoffmann 已提交
1266 1267 1268 1269 1270
    if (byteswap) {
        surface->pf = qemu_different_endianness_pixelformat(bpp);
    } else {
        surface->pf = qemu_default_pixelformat(bpp);
    }
1271 1272 1273 1274 1275 1276 1277 1278

    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);

1279 1280 1281 1282 1283 1284 1285
#ifdef HOST_WORDS_BIGENDIAN
    surface->flags = QEMU_BIG_ENDIAN_FLAG;
#endif

    return surface;
}

1286
void qemu_free_displaysurface(DisplaySurface *surface)
1287
{
1288
    if (surface == NULL) {
1289
        return;
G
Gerd Hoffmann 已提交
1290
    }
1291 1292 1293
    trace_displaysurface_free(surface);
    qemu_pixman_image_unref(surface->image);
    g_free(surface);
1294 1295
}

1296 1297 1298 1299 1300 1301 1302
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);
1303 1304
    if (dcl->ops->dpy_gfx_switch && active_console) {
        dcl->ops->dpy_gfx_switch(dcl, active_console->surface);
1305 1306 1307
    }
}

G
Gerd Hoffmann 已提交
1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318
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);
    }
}

1319 1320 1321 1322 1323 1324 1325 1326
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);
}

1327
void dpy_gfx_update(QemuConsole *con, int x, int y, int w, int h)
1328
{
1329
    DisplayState *s = con->ds;
1330
    struct DisplayChangeListener *dcl;
1331 1332
    int width = surface_width(con->surface);
    int height = surface_height(con->surface);
1333 1334 1335 1336 1337 1338 1339 1340

    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);

1341 1342 1343
    if (con != active_console) {
        return;
    }
1344 1345
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_update) {
1346
            dcl->ops->dpy_gfx_update(dcl, x, y, w, h);
1347 1348 1349 1350
        }
    }
}

1351 1352
static void dpy_gfx_switch_surface(DisplayState *ds,
                                   DisplaySurface *surface)
1353 1354
{
    struct DisplayChangeListener *dcl;
1355

1356
    QLIST_FOREACH(dcl, &ds->listeners, next) {
1357
        if (dcl->ops->dpy_gfx_switch) {
1358
            dcl->ops->dpy_gfx_switch(dcl, surface);
1359 1360
        }
    }
1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372
}

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);
    }
1373
    qemu_free_displaysurface(old_surface);
1374 1375 1376 1377 1378 1379 1380
}

void dpy_refresh(DisplayState *s)
{
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_refresh) {
1381
            dcl->ops->dpy_refresh(dcl);
1382 1383 1384 1385
        }
    }
}

1386 1387
void dpy_gfx_copy(QemuConsole *con, int src_x, int src_y,
                  int dst_x, int dst_y, int w, int h)
1388
{
1389
    DisplayState *s = con->ds;
1390
    struct DisplayChangeListener *dcl;
1391 1392 1393 1394

    if (con != active_console) {
        return;
    }
1395 1396
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_copy) {
1397
            dcl->ops->dpy_gfx_copy(dcl, src_x, src_y, dst_x, dst_y, w, h);
1398
        } else { /* TODO */
1399
            dcl->ops->dpy_gfx_update(dcl, dst_x, dst_y, w, h);
1400 1401 1402 1403
        }
    }
}

1404
void dpy_text_cursor(QemuConsole *con, int x, int y)
1405
{
1406
    DisplayState *s = con->ds;
1407
    struct DisplayChangeListener *dcl;
1408 1409 1410 1411

    if (con != active_console) {
        return;
    }
1412 1413
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_cursor) {
1414
            dcl->ops->dpy_text_cursor(dcl, x, y);
1415 1416 1417 1418
        }
    }
}

1419
void dpy_text_update(QemuConsole *con, int x, int y, int w, int h)
1420
{
1421
    DisplayState *s = con->ds;
1422
    struct DisplayChangeListener *dcl;
1423 1424 1425 1426

    if (con != active_console) {
        return;
    }
1427 1428
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_update) {
1429
            dcl->ops->dpy_text_update(dcl, x, y, w, h);
1430 1431 1432 1433
        }
    }
}

1434
void dpy_text_resize(QemuConsole *con, int w, int h)
1435
{
1436
    DisplayState *s = con->ds;
1437
    struct DisplayChangeListener *dcl;
1438 1439 1440 1441

    if (con != active_console) {
        return;
    }
1442 1443
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_resize) {
1444
            dcl->ops->dpy_text_resize(dcl, w, h);
1445 1446 1447 1448
        }
    }
}

1449
void dpy_mouse_set(QemuConsole *con, int x, int y, int on)
1450
{
1451
    DisplayState *s = con->ds;
1452
    struct DisplayChangeListener *dcl;
1453 1454 1455 1456

    if (con != active_console) {
        return;
    }
1457 1458
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_mouse_set) {
1459
            dcl->ops->dpy_mouse_set(dcl, x, y, on);
1460 1461 1462 1463
        }
    }
}

1464
void dpy_cursor_define(QemuConsole *con, QEMUCursor *cursor)
1465
{
1466
    DisplayState *s = con->ds;
1467
    struct DisplayChangeListener *dcl;
1468 1469 1470 1471

    if (con != active_console) {
        return;
    }
1472 1473
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_cursor_define) {
1474
            dcl->ops->dpy_cursor_define(dcl, cursor);
1475 1476 1477 1478
        }
    }
}

1479
bool dpy_cursor_define_supported(QemuConsole *con)
1480
{
1481
    DisplayState *s = con->ds;
1482 1483 1484 1485 1486 1487 1488 1489 1490
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_cursor_define) {
            return true;
        }
    }
    return false;
}

1491 1492 1493
/***********************************************************/
/* register display */

1494 1495
/* console.c internal use only */
static DisplayState *get_alloc_displaystate(void)
1496
{
1497 1498 1499 1500
    if (!display_state) {
        display_state = g_new0(DisplayState, 1);
    }
    return display_state;
1501 1502
}

1503 1504 1505 1506 1507
/*
 * Called by main(), after creating QemuConsoles
 * and before initializing ui (sdl/vnc/...).
 */
DisplayState *init_displaystate(void)
1508
{
1509 1510
    int i;

1511
    if (!display_state) {
1512
        display_state = g_new0(DisplayState, 1);
1513
    }
1514 1515 1516 1517 1518 1519 1520 1521

    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);
        }
    }

1522 1523 1524
    return display_state;
}

G
Gerd Hoffmann 已提交
1525
QemuConsole *graphic_console_init(const GraphicHwOps *hw_ops,
1526
                                  void *opaque)
P
pbrook 已提交
1527
{
1528 1529
    int width = 640;
    int height = 480;
1530
    QemuConsole *s;
1531
    DisplayState *ds;
A
aurel32 已提交
1532

1533
    ds = get_alloc_displaystate();
G
Gerd Hoffmann 已提交
1534
    trace_console_gfx_new();
1535
    s = new_console(ds, GRAPHIC_CONSOLE);
G
Gerd Hoffmann 已提交
1536
    s->hw_ops = hw_ops;
P
pbrook 已提交
1537
    s->hw = opaque;
1538

1539
    s->surface = qemu_create_displaysurface(width, height);
1540
    return s;
B
bellard 已提交
1541 1542
}

P
pbrook 已提交
1543
int is_graphic_console(void)
B
bellard 已提交
1544
{
B
balrog 已提交
1545
    return active_console && active_console->console_type == GRAPHIC_CONSOLE;
B
bellard 已提交
1546 1547
}

1548 1549 1550 1551 1552
int is_fixedsize_console(void)
{
    return active_console && active_console->console_type != TEXT_CONSOLE;
}

1553 1554
static void text_console_set_echo(CharDriverState *chr, bool echo)
{
1555
    QemuConsole *s = chr->opaque;
1556 1557 1558 1559

    s->echo = echo;
}

1560 1561
static void text_console_update_cursor(void *opaque)
{
1562
    QemuConsole *s = opaque;
1563 1564

    s->cursor_visible_phase = !s->cursor_visible_phase;
1565
    graphic_hw_invalidate(s);
1566 1567 1568 1569
    qemu_mod_timer(s->cursor_timer,
                   qemu_get_clock_ms(rt_clock) + CONSOLE_CURSOR_PERIOD / 2);
}

G
Gerd Hoffmann 已提交
1570 1571 1572 1573 1574
static const GraphicHwOps text_console_ops = {
    .invalidate  = text_console_invalidate,
    .text_update = text_console_update,
};

P
Paolo Bonzini 已提交
1575
static void text_console_do_init(CharDriverState *chr, DisplayState *ds)
B
bellard 已提交
1576
{
1577
    QemuConsole *s;
G
Gerd Hoffmann 已提交
1578 1579
    int g_width = 80 * FONT_WIDTH;
    int g_height = 24 * FONT_HEIGHT;
1580

1581
    s = chr->opaque;
G
Gerd Hoffmann 已提交
1582

B
bellard 已提交
1583
    chr->chr_write = console_puts;
B
bellard 已提交
1584

1585 1586
    s->out_fifo.buf = s->out_fifo_buf;
    s->out_fifo.buf_size = sizeof(s->out_fifo_buf);
1587
    s->kbd_timer = qemu_new_timer_ms(rt_clock, kbd_send_chars, s);
1588
    s->ds = ds;
1589

B
bellard 已提交
1590 1591 1592 1593 1594
    s->y_displayed = 0;
    s->y_base = 0;
    s->total_height = DEFAULT_BACKSCROLL;
    s->x = 0;
    s->y = 0;
G
Gerd Hoffmann 已提交
1595
    if (!s->surface) {
1596
        if (active_console && active_console->surface) {
G
Gerd Hoffmann 已提交
1597 1598
            g_width = surface_width(active_console->surface);
            g_height = surface_height(active_console->surface);
1599
        }
G
Gerd Hoffmann 已提交
1600
        s->surface = qemu_create_displaysurface(g_width, g_height);
1601
    }
1602

1603 1604 1605
    s->cursor_timer =
        qemu_new_timer_ms(rt_clock, text_console_update_cursor, s);

G
Gerd Hoffmann 已提交
1606
    s->hw_ops = &text_console_ops;
B
balrog 已提交
1607 1608
    s->hw = s;

1609 1610 1611 1612 1613 1614 1615 1616 1617 1618
    /* 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 已提交
1619 1620
    text_console_resize(s);

1621 1622 1623 1624
    if (chr->label) {
        char msg[128];
        int len;

1625
        s->t_attrib.bgcol = COLOR_BLUE;
1626 1627
        len = snprintf(msg, sizeof(msg), "%s console\r\n", chr->label);
        console_puts(chr, (uint8_t*)msg, len);
1628
        s->t_attrib = s->t_attrib_default;
1629 1630
    }

1631
    qemu_chr_be_generic_open(chr);
1632 1633
    if (chr->init)
        chr->init(chr);
B
bellard 已提交
1634
}
1635

G
Gerd Hoffmann 已提交
1636
static CharDriverState *text_console_init(ChardevVC *vc)
1637 1638
{
    CharDriverState *chr;
1639
    QemuConsole *s;
G
Gerd Hoffmann 已提交
1640 1641
    unsigned width = 0;
    unsigned height = 0;
1642

1643
    chr = g_malloc0(sizeof(CharDriverState));
1644

G
Gerd Hoffmann 已提交
1645 1646 1647 1648 1649
    if (vc->has_width) {
        width = vc->width;
    } else if (vc->has_cols) {
        width = vc->cols * FONT_WIDTH;
    }
1650

G
Gerd Hoffmann 已提交
1651 1652 1653 1654 1655
    if (vc->has_height) {
        height = vc->height;
    } else if (vc->has_rows) {
        height = vc->rows * FONT_HEIGHT;
    }
1656

G
Gerd Hoffmann 已提交
1657
    trace_console_txt_new(width, height);
1658 1659 1660 1661
    if (width == 0 || height == 0) {
        s = new_console(NULL, TEXT_CONSOLE);
    } else {
        s = new_console(NULL, TEXT_CONSOLE_FIXED_SIZE);
G
Gerd Hoffmann 已提交
1662
        s->surface = qemu_create_displaysurface(width, height);
1663 1664 1665
    }

    if (!s) {
1666
        g_free(chr);
1667
        return NULL;
1668 1669 1670 1671
    }

    s->chr = chr;
    chr->opaque = s;
1672
    chr->chr_set_echo = text_console_set_echo;
1673 1674 1675 1676

    if (display_state) {
        text_console_do_init(chr, display_state);
    }
1677
    return chr;
1678 1679
}

1680 1681
static VcHandler *vc_handler = text_console_init;

G
Gerd Hoffmann 已提交
1682
CharDriverState *vc_init(ChardevVC *vc)
1683
{
G
Gerd Hoffmann 已提交
1684
    return vc_handler(vc);
1685 1686 1687 1688 1689 1690 1691
}

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

1692
void qemu_console_resize(QemuConsole *s, int width, int height)
1693
{
1694 1695 1696 1697 1698
    DisplaySurface *surface;

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

1701
void qemu_console_copy(QemuConsole *con, int src_x, int src_y,
1702
                       int dst_x, int dst_y, int w, int h)
1703
{
1704 1705
    assert(con->console_type == GRAPHIC_CONSOLE);
    dpy_gfx_copy(con, src_x, src_y, dst_x, dst_y, w, h);
1706
}
1707

1708 1709
DisplaySurface *qemu_console_surface(QemuConsole *console)
{
1710
    return console->surface;
1711 1712 1713 1714 1715 1716 1717
}

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

1718
PixelFormat qemu_different_endianness_pixelformat(int bpp)
1719 1720 1721 1722 1723 1724
{
    PixelFormat pf;

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

    pf.bits_per_pixel = bpp;
1725
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1726 1727 1728
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1729 1730 1731 1732 1733 1734 1735 1736 1737 1738
        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;
1739 1740 1741
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1742
            break;
1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755
        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;
1756 1757 1758 1759
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
            pf.abits = 8;
1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
            break;
        default:
            break;
    }
    return pf;
}

PixelFormat qemu_default_pixelformat(int bpp)
{
    PixelFormat pf;

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

    pf.bits_per_pixel = bpp;
1774
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1775 1776 1777
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792
        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;
1793 1794 1795 1796 1797 1798 1799 1800 1801 1802
        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;
1803 1804 1805
            pf.rbits = 5;
            pf.gbits = 6;
            pf.bbits = 5;
1806 1807
            break;
        case 24:
1808 1809 1810 1811 1812 1813 1814 1815 1816
            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;
1817 1818 1819
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1820
            break;
1821 1822 1823 1824 1825 1826 1827 1828 1829 1830
        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;
1831 1832 1833
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1834 1835 1836 1837 1838 1839
            break;
        default:
            break;
    }
    return pf;
}
1840

G
Gerd Hoffmann 已提交
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 1867 1868 1869 1870 1871 1872
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;
    }
}

1873 1874
static void register_types(void)
{
G
Gerd Hoffmann 已提交
1875 1876
    register_char_driver_qapi("vc", CHARDEV_BACKEND_KIND_VC,
                              qemu_chr_parse_vc);
1877 1878 1879
}

type_init(register_types);