console.c 48.5 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.  */
122 123 124
    graphic_hw_update_ptr hw_update;
    graphic_hw_invalidate_ptr hw_invalidate;
    graphic_hw_text_update_ptr hw_text_update;
P
pbrook 已提交
125
    void *hw;
B
bellard 已提交
126
    int g_width, g_height;
127 128

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

145 146 147 148 149
    int update_x0;
    int update_y0;
    int update_x1;
    int update_y1;

B
bellard 已提交
150 151 152 153
    enum TTYState state;
    int esc_params[MAX_ESC_PARAMS];
    int nb_esc_params;

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

161
static DisplayState *display_state;
162 163
static QemuConsole *active_console;
static QemuConsole *consoles[MAX_CONSOLES];
B
bellard 已提交
164 165
static int nb_consoles = 0;

166
static void text_console_do_init(CharDriverState *chr, DisplayState *ds);
167 168
static void dpy_gfx_switch_surface(DisplayState *ds,
                                   DisplaySurface *surface);
169

170
void graphic_hw_update(QemuConsole *con)
P
pbrook 已提交
171
{
172 173 174 175 176 177
    if (!con) {
        con = active_console;
    }
    if (con && con->hw_update) {
        con->hw_update(con->hw);
    }
P
pbrook 已提交
178 179
}

180
void graphic_hw_invalidate(QemuConsole *con)
P
pbrook 已提交
181
{
182 183 184 185 186 187
    if (!con) {
        con = active_console;
    }
    if (con && con->hw_invalidate) {
        con->hw_invalidate(con->hw);
    }
P
pbrook 已提交
188 189
}

G
Gerd Hoffmann 已提交
190 191
static void ppm_save(const char *filename, struct DisplaySurface *ds,
                     Error **errp)
P
pbrook 已提交
192
{
G
Gerd Hoffmann 已提交
193 194 195 196 197 198 199 200 201 202 203 204 205
    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;
206
    }
G
Gerd Hoffmann 已提交
207 208 209 210 211 212 213 214 215 216 217 218 219 220 221
    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;
        }
222 223
    }

G
Gerd Hoffmann 已提交
224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243
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;
244
    }
G
Gerd Hoffmann 已提交
245 246 247 248

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

251
void graphic_hw_text_update(QemuConsole *con, console_ch_t *chardata)
B
balrog 已提交
252
{
253 254 255 256 257
    if (!con) {
        con = active_console;
    }
    if (con && con->hw_text_update)
        con->hw_text_update(con->hw, chardata);
B
balrog 已提交
258 259
}

260 261
static void vga_fill_rect(QemuConsole *con,
                          int posx, int posy, int width, int height,
262
                          pixman_color_t color)
B
bellard 已提交
263
{
264
    DisplaySurface *surface = qemu_console_surface(con);
265 266 267 268 269
    pixman_rectangle16_t rect = {
        .x = posx, .y = posy, .width = width, .height = height
    };

    pixman_image_fill_rectangles(PIXMAN_OP_SRC, surface->image,
270
                                 &color, 1, &rect);
B
bellard 已提交
271 272 273
}

/* copy from (xs, ys) to (xd, yd) a rectangle of size (w, h) */
274 275
static void vga_bitblt(QemuConsole *con,
                       int xs, int ys, int xd, int yd, int w, int h)
B
bellard 已提交
276
{
277
    DisplaySurface *surface = qemu_console_surface(con);
278 279 280 281

    pixman_image_composite(PIXMAN_OP_SRC,
                           surface->image, NULL, surface->image,
                           xs, ys, 0, 0, xd, yd, w, h);
B
bellard 已提交
282 283 284 285 286 287 288 289 290 291
}

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

#define FONT_HEIGHT 16
#define FONT_WIDTH 8

#include "vgafont.h"

292
#ifndef CONFIG_CURSES
293 294 295 296 297 298 299 300 301 302
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
};
303
#endif
304

305 306 307 308
#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] = {
309
    {   /* dark */
B
bellard 已提交
310 311 312 313 314 315 316 317
        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 */
318 319
    },
    {   /* bright */
B
bellard 已提交
320 321 322 323 324 325 326 327
        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 */
328
    }
B
bellard 已提交
329 330
};

331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362
#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 已提交
363

364
static void vga_putcharxy(QemuConsole *s, int x, int y, int ch,
365
                          TextAttributes *t_attrib)
B
bellard 已提交
366
{
367
    static pixman_image_t *glyphs[256];
368
    DisplaySurface *surface = qemu_console_surface(s);
369
    pixman_color_t fgcol, bgcol;
370 371

    if (t_attrib->invers) {
G
Gerd Hoffmann 已提交
372 373
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
374
    } else {
G
Gerd Hoffmann 已提交
375 376
        fgcol = color_table_rgb[t_attrib->bold][t_attrib->fgcol];
        bgcol = color_table_rgb[t_attrib->bold][t_attrib->bgcol];
377
    }
B
bellard 已提交
378

379 380
    if (!glyphs[ch]) {
        glyphs[ch] = qemu_pixman_glyph_from_vgafont(FONT_HEIGHT, vgafont16, ch);
B
bellard 已提交
381
    }
382
    qemu_pixman_glyph_render(glyphs[ch], surface->image,
383
                             &fgcol, &bgcol, x, y, FONT_WIDTH, FONT_HEIGHT);
B
bellard 已提交
384 385
}

386
static void text_console_resize(QemuConsole *s)
B
bellard 已提交
387 388 389 390 391 392 393 394 395 396 397 398
{
    TextCell *cells, *c, *c1;
    int w1, x, y, last_width;

    last_width = s->width;
    s->width = s->g_width / FONT_WIDTH;
    s->height = s->g_height / FONT_HEIGHT;

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

399
    cells = g_malloc(s->width * s->total_height * sizeof(TextCell));
B
bellard 已提交
400 401 402 403 404 405 406 407 408 409
    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 = ' ';
410
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
411 412 413
            c++;
        }
    }
414
    g_free(s->cells);
B
bellard 已提交
415 416 417
    s->cells = cells;
}

418
static inline void text_update_xy(QemuConsole *s, int x, int y)
B
balrog 已提交
419 420 421 422 423 424 425
{
    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);
}

426
static void invalidate_xy(QemuConsole *s, int x, int y)
427 428 429 430 431 432 433 434 435 436 437
{
    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;
}

438
static void update_xy(QemuConsole *s, int x, int y)
B
bellard 已提交
439 440 441 442
{
    TextCell *c;
    int y1, y2;

443 444 445 446 447 448 449
    if (s != active_console) {
        return;
    }

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

451
    if (s->ds->have_gfx) {
B
bellard 已提交
452 453 454 455 456 457
        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];
458
            vga_putcharxy(s, x, y2, c->ch,
459
                          &(c->t_attrib));
460
            invalidate_xy(s, x, y2);
B
bellard 已提交
461 462 463 464
        }
    }
}

465
static void console_show_cursor(QemuConsole *s, int show)
B
bellard 已提交
466 467 468
{
    TextCell *c;
    int y, y1;
469
    int x = s->x;
B
bellard 已提交
470

471 472 473
    if (s != active_console) {
        return;
    }
B
balrog 已提交
474

475 476 477
    if (s->ds->have_text) {
        s->cursor_invalidate = 1;
    }
B
balrog 已提交
478

479
    if (s->ds->have_gfx) {
480 481 482
        if (x >= s->width) {
            x = s->width - 1;
        }
B
bellard 已提交
483 484 485 486 487
        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) {
488
            c = &s->cells[y1 * s->width + x];
489
            if (show && s->cursor_visible_phase) {
490 491
                TextAttributes t_attrib = s->t_attrib_default;
                t_attrib.invers = !(t_attrib.invers); /* invert fg and bg */
492
                vga_putcharxy(s, x, y, c->ch, &t_attrib);
B
bellard 已提交
493
            } else {
494
                vga_putcharxy(s, x, y, c->ch, &(c->t_attrib));
B
bellard 已提交
495
            }
496
            invalidate_xy(s, x, y);
B
bellard 已提交
497 498 499 500
        }
    }
}

501
static void console_refresh(QemuConsole *s)
B
bellard 已提交
502
{
503
    DisplaySurface *surface = qemu_console_surface(s);
B
bellard 已提交
504 505 506
    TextCell *c;
    int x, y, y1;

507
    if (s != active_console)
B
bellard 已提交
508
        return;
509 510

    if (s->ds->have_text) {
B
balrog 已提交
511 512 513 514 515 516
        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 已提交
517

518
    if (s->ds->have_gfx) {
519
        vga_fill_rect(s, 0, 0, surface_width(surface), surface_height(surface),
G
Gerd Hoffmann 已提交
520
                      color_table_rgb[0][COLOR_BLACK]);
521 522 523 524
        y1 = s->y_displayed;
        for (y = 0; y < s->height; y++) {
            c = s->cells + y1 * s->width;
            for (x = 0; x < s->width; x++) {
525
                vga_putcharxy(s, x, y, c->ch,
526 527 528 529 530 531
                              &(c->t_attrib));
                c++;
            }
            if (++y1 == s->total_height) {
                y1 = 0;
            }
B
bellard 已提交
532
        }
533
        console_show_cursor(s, 1);
534 535
        dpy_gfx_update(s, 0, 0,
                       surface_width(surface), surface_height(surface));
B
bellard 已提交
536 537 538 539 540
    }
}

static void console_scroll(int ydelta)
{
541
    QemuConsole *s;
B
bellard 已提交
542
    int i, y1;
543

B
bellard 已提交
544
    s = active_console;
545
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572
        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);
}

573
static void console_put_lf(QemuConsole *s)
B
bellard 已提交
574 575 576 577 578 579 580
{
    TextCell *c;
    int x, y1;

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

B
bellard 已提交
582 583 584 585 586 587 588 589 590 591 592 593
        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 = ' ';
594
            c->t_attrib = s->t_attrib_default;
B
bellard 已提交
595 596 597
            c++;
        }
        if (s == active_console && s->y_displayed == s->y_base) {
598
            if (s->ds->have_text) {
B
balrog 已提交
599 600 601 602 603 604
                s->text_x[0] = 0;
                s->text_y[0] = 0;
                s->text_x[1] = s->width - 1;
                s->text_y[1] = s->height - 1;
            }

605 606 607 608 609 610 611 612 613 614 615 616
            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 已提交
617 618 619 620
        }
    }
}

621 622 623 624
/* 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.
 */
625
static void console_handle_escape(QemuConsole *s)
626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717
{
    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;
        }
    }
}

718
static void console_clear_xy(QemuConsole *s, int x, int y)
719 720 721 722 723 724 725 726
{
    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);
}

727
/* set cursor, checking bounds */
728
static void set_cursor(QemuConsole *s, int x, int y)
729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746
{
    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;
}

747
static void console_putchar(QemuConsole *s, int ch)
B
bellard 已提交
748 749
{
    TextCell *c;
750 751
    int y1, i;
    int x, y;
B
bellard 已提交
752 753 754 755

    switch(s->state) {
    case TTY_STATE_NORM:
        switch(ch) {
756
        case '\r':  /* carriage return */
B
bellard 已提交
757 758
            s->x = 0;
            break;
759
        case '\n':  /* newline */
B
bellard 已提交
760 761
            console_put_lf(s);
            break;
762
        case '\b':  /* backspace */
763
            if (s->x > 0)
764
                s->x--;
765 766 767
            break;
        case '\t':  /* tabspace */
            if (s->x + (8 - (s->x % 8)) > s->width) {
B
bellard 已提交
768
                s->x = 0;
769 770 771 772 773 774 775 776
                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;
777 778 779 780 781 782
        case 14:
            /* SI (shift in), character set 0 (ignored) */
            break;
        case 15:
            /* SO (shift out), character set 1 (ignored) */
            break;
783
        case 27:    /* esc (introducing an escape sequence) */
B
bellard 已提交
784 785 786
            s->state = TTY_STATE_ESC;
            break;
        default:
787 788 789 790
            if (s->x >= s->width) {
                /* line wrap */
                s->x = 0;
                console_put_lf(s);
791
            }
B
bellard 已提交
792 793 794
            y1 = (s->y_base + s->y) % s->total_height;
            c = &s->cells[y1 * s->width + s->x];
            c->ch = ch;
795
            c->t_attrib = s->t_attrib;
B
bellard 已提交
796 797 798 799 800
            update_xy(s, s->x, s->y);
            s->x++;
            break;
        }
        break;
801
    case TTY_STATE_ESC: /* check if it is a terminal escape sequence */
B
bellard 已提交
802 803 804 805 806 807 808 809 810
        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;
811
    case TTY_STATE_CSI: /* handle escape sequence parameters */
B
bellard 已提交
812 813
        if (ch >= '0' && ch <= '9') {
            if (s->nb_esc_params < MAX_ESC_PARAMS) {
814 815 816 817 818
                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 已提交
819 820
            }
        } else {
821 822
            if (s->nb_esc_params < MAX_ESC_PARAMS)
                s->nb_esc_params++;
B
bellard 已提交
823 824
            if (ch == ';')
                break;
825 826 827 828
#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 已提交
829 830
            s->state = TTY_STATE_NORM;
            switch(ch) {
831 832 833 834 835
            case 'A':
                /* move cursor up */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
836
                set_cursor(s, s->x, s->y - s->esc_params[0]);
837 838 839 840 841 842
                break;
            case 'B':
                /* move cursor down */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
843
                set_cursor(s, s->x, s->y + s->esc_params[0]);
B
bellard 已提交
844 845
                break;
            case 'C':
846 847 848 849
                /* move cursor right */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
850
                set_cursor(s, s->x + s->esc_params[0], s->y);
B
bellard 已提交
851
                break;
852 853 854 855 856
            case 'D':
                /* move cursor left */
                if (s->esc_params[0] == 0) {
                    s->esc_params[0] = 1;
                }
857
                set_cursor(s, s->x - s->esc_params[0], s->y);
858 859 860
                break;
            case 'G':
                /* move cursor to column */
861
                set_cursor(s, s->esc_params[0] - 1, s->y);
862 863 864 865
                break;
            case 'f':
            case 'H':
                /* move cursor to row, column */
866
                set_cursor(s, s->esc_params[1] - 1, s->esc_params[0] - 1);
867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898
                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);
                        }
                    }
899
                    break;
900
                }
901
                break;
B
bellard 已提交
902
            case 'K':
903 904
                switch (s->esc_params[0]) {
                case 0:
905 906
                    /* clear to eol */
                    for(x = s->x; x < s->width; x++) {
907
                        console_clear_xy(s, x, s->y);
908 909
                    }
                    break;
910 911 912 913 914 915 916 917 918 919 920
                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);
                    }
921 922
                    break;
                }
923 924
                break;
            case 'm':
925 926
                console_handle_escape(s);
                break;
927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947
            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 已提交
948 949 950 951 952 953
        }
    }
}

void console_select(unsigned int index)
{
954
    DisplaySurface *surface;
955
    QemuConsole *s;
956

B
bellard 已提交
957 958
    if (index >= MAX_CONSOLES)
        return;
G
Gerd Hoffmann 已提交
959 960

    trace_console_select(index);
961
    if (active_console) {
962 963 964
        surface = qemu_console_surface(active_console);
        active_console->g_width = surface_width(surface);
        active_console->g_height = surface_height(surface);
965
    }
B
bellard 已提交
966 967
    s = consoles[index];
    if (s) {
968
        DisplayState *ds = s->ds;
969

970
        if (active_console && active_console->cursor_timer) {
971 972
            qemu_del_timer(active_console->cursor_timer);
        }
B
bellard 已提交
973
        active_console = s;
974
        if (ds->have_gfx) {
975 976 977
            dpy_gfx_switch_surface(ds, s->surface);
            dpy_gfx_update(s, 0, 0, surface_width(s->surface),
                           surface_height(s->surface));
978 979
        }
        if (ds->have_text) {
980
            dpy_text_resize(s, s->width, s->height);
981
        }
982 983 984 985
        if (s->cursor_timer) {
            qemu_mod_timer(s->cursor_timer,
                   qemu_get_clock_ms(rt_clock) + CONSOLE_CURSOR_PERIOD / 2);
        }
B
bellard 已提交
986 987 988 989 990
    }
}

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

994 995 996 997
    s->update_x0 = s->width * FONT_WIDTH;
    s->update_y0 = s->height * FONT_HEIGHT;
    s->update_x1 = 0;
    s->update_y1 = 0;
B
bellard 已提交
998 999 1000 1001 1002
    console_show_cursor(s, 0);
    for(i = 0; i < len; i++) {
        console_putchar(s, buf[i]);
    }
    console_show_cursor(s, 1);
1003
    if (s->ds->have_gfx && s->update_x0 < s->update_x1) {
1004
        dpy_gfx_update(s, s->update_x0, s->update_y0,
1005 1006
                       s->update_x1 - s->update_x0,
                       s->update_y1 - s->update_y0);
1007
    }
B
bellard 已提交
1008 1009 1010
    return len;
}

1011 1012
static void kbd_send_chars(void *opaque)
{
1013
    QemuConsole *s = opaque;
1014 1015
    int len;
    uint8_t buf[16];
1016

1017
    len = qemu_chr_be_can_write(s->chr);
1018 1019 1020 1021 1022 1023
    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);
1024
        qemu_chr_be_write(s->chr, buf, len);
1025 1026 1027 1028
    }
    /* characters are pending: we send them a bit later (XXX:
       horrible, should change char device API) */
    if (s->out_fifo.count > 0) {
1029
        qemu_mod_timer(s->kbd_timer, qemu_get_clock_ms(rt_clock) + 1);
1030 1031 1032
    }
}

B
bellard 已提交
1033 1034 1035
/* called when an ascii key is pressed */
void kbd_put_keysym(int keysym)
{
1036
    QemuConsole *s;
B
bellard 已提交
1037 1038 1039 1040
    uint8_t buf[16], *q;
    int c;

    s = active_console;
1041
    if (!s || (s->console_type == GRAPHIC_CONSOLE))
B
bellard 已提交
1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057
        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:
1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071
        /* 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;
1072 1073 1074
        } else if (s->echo && (keysym == '\r' || keysym == '\n')) {
            console_puts(s->chr, (const uint8_t *) "\r", 1);
            *q++ = '\n';
1075
        } else {
1076 1077 1078 1079
            *q++ = keysym;
        }
        if (s->echo) {
            console_puts(s->chr, buf, q - buf);
1080
        }
1081
        if (s->chr->chr_read) {
1082 1083
            qemu_fifo_write(&s->out_fifo, buf, q - buf);
            kbd_send_chars(s);
B
bellard 已提交
1084 1085 1086 1087 1088
        }
        break;
    }
}

B
balrog 已提交
1089 1090
static void text_console_invalidate(void *opaque)
{
1091
    QemuConsole *s = (QemuConsole *) opaque;
1092 1093 1094 1095 1096
    DisplaySurface *surface = qemu_console_surface(s);

    if (s->ds->have_text && s->console_type == TEXT_CONSOLE) {
        s->g_width = surface_width(surface);
        s->g_height = surface_height(surface);
1097 1098
        text_console_resize(s);
    }
B
balrog 已提交
1099 1100 1101
    console_refresh(s);
}

A
Anthony Liguori 已提交
1102
static void text_console_update(void *opaque, console_ch_t *chardata)
B
balrog 已提交
1103
{
1104
    QemuConsole *s = (QemuConsole *) opaque;
B
balrog 已提交
1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115
    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));
1116
        dpy_text_update(s, s->text_x[0], s->text_y[0],
1117
                        s->text_x[1] - s->text_x[0], i - s->text_y[0]);
B
balrog 已提交
1118 1119 1120 1121 1122 1123
        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) {
1124
        dpy_text_cursor(s, s->x, s->y);
B
balrog 已提交
1125 1126 1127 1128
        s->cursor_invalidate = 0;
    }
}

1129
static QemuConsole *new_console(DisplayState *ds, console_type_t console_type)
B
bellard 已提交
1130
{
1131
    QemuConsole *s;
P
pbrook 已提交
1132
    int i;
B
bellard 已提交
1133 1134 1135

    if (nb_consoles >= MAX_CONSOLES)
        return NULL;
1136
    s = g_malloc0(sizeof(QemuConsole));
1137 1138
    if (!active_console || ((active_console->console_type != GRAPHIC_CONSOLE) &&
        (console_type == GRAPHIC_CONSOLE))) {
B
bellard 已提交
1139
        active_console = s;
1140
    }
B
bellard 已提交
1141
    s->ds = ds;
1142 1143
    s->console_type = console_type;
    if (console_type != GRAPHIC_CONSOLE) {
1144
        s->index = nb_consoles;
P
pbrook 已提交
1145 1146 1147 1148
        consoles[nb_consoles++] = s;
    } else {
        /* HACK: Put graphical consoles before text consoles.  */
        for (i = nb_consoles; i > 0; i--) {
1149
            if (consoles[i - 1]->console_type == GRAPHIC_CONSOLE)
P
pbrook 已提交
1150 1151
                break;
            consoles[i] = consoles[i - 1];
1152
            consoles[i]->index = i;
P
pbrook 已提交
1153
        }
1154
        s->index = i;
P
pbrook 已提交
1155
        consoles[i] = s;
1156
        nb_consoles++;
P
pbrook 已提交
1157 1158 1159 1160
    }
    return s;
}

1161 1162
static void qemu_alloc_display(DisplaySurface *surface, int width, int height,
                               int linesize, PixelFormat pf, int newflags)
1163 1164
{
    surface->pf = pf;
1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175

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

1176
    surface->flags = newflags | QEMU_ALLOCATED_FLAG;
1177
#ifdef HOST_WORDS_BIGENDIAN
1178
    surface->flags |= QEMU_BIG_ENDIAN_FLAG;
1179 1180 1181
#endif
}

1182
DisplaySurface *qemu_create_displaysurface(int width, int height)
1183 1184 1185
{
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
    int linesize = width * 4;
1186 1187

    trace_displaysurface_create(surface, width, height);
1188 1189 1190 1191 1192
    qemu_alloc_display(surface, width, height, linesize,
                       qemu_default_pixelformat(32), 0);
    return surface;
}

G
Gerd Hoffmann 已提交
1193
DisplaySurface *qemu_create_displaysurface_from(int width, int height, int bpp,
G
Gerd Hoffmann 已提交
1194 1195
                                                int linesize, uint8_t *data,
                                                bool byteswap)
1196
{
1197
    DisplaySurface *surface = g_new0(DisplaySurface, 1);
1198

1199
    trace_displaysurface_create_from(surface, width, height, bpp, byteswap);
G
Gerd Hoffmann 已提交
1200 1201 1202 1203 1204
    if (byteswap) {
        surface->pf = qemu_different_endianness_pixelformat(bpp);
    } else {
        surface->pf = qemu_default_pixelformat(bpp);
    }
1205 1206 1207 1208 1209 1210 1211 1212

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

1213 1214 1215 1216 1217 1218 1219
#ifdef HOST_WORDS_BIGENDIAN
    surface->flags = QEMU_BIG_ENDIAN_FLAG;
#endif

    return surface;
}

1220
void qemu_free_displaysurface(DisplaySurface *surface)
1221
{
1222
    if (surface == NULL) {
1223
        return;
G
Gerd Hoffmann 已提交
1224
    }
1225 1226 1227
    trace_displaysurface_free(surface);
    qemu_pixman_image_unref(surface->image);
    g_free(surface);
1228 1229
}

1230 1231 1232 1233 1234 1235 1236
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);
1237 1238
    if (dcl->ops->dpy_gfx_switch && active_console) {
        dcl->ops->dpy_gfx_switch(dcl, active_console->surface);
1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249
    }
}

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

1250
void dpy_gfx_update(QemuConsole *con, int x, int y, int w, int h)
1251
{
1252
    DisplayState *s = con->ds;
1253
    struct DisplayChangeListener *dcl;
1254 1255
    int width = surface_width(con->surface);
    int height = surface_height(con->surface);
1256 1257 1258 1259 1260 1261 1262 1263

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

1264 1265 1266
    if (con != active_console) {
        return;
    }
1267 1268
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_update) {
1269
            dcl->ops->dpy_gfx_update(dcl, x, y, w, h);
1270 1271 1272 1273
        }
    }
}

1274 1275
static void dpy_gfx_switch_surface(DisplayState *ds,
                                   DisplaySurface *surface)
1276 1277
{
    struct DisplayChangeListener *dcl;
1278

1279
    QLIST_FOREACH(dcl, &ds->listeners, next) {
1280
        if (dcl->ops->dpy_gfx_switch) {
1281
            dcl->ops->dpy_gfx_switch(dcl, surface);
1282 1283
        }
    }
1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295
}

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);
    }
1296
    qemu_free_displaysurface(old_surface);
1297 1298 1299 1300 1301 1302 1303
}

void dpy_refresh(DisplayState *s)
{
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_refresh) {
1304
            dcl->ops->dpy_refresh(dcl);
1305 1306 1307 1308
        }
    }
}

1309 1310
void dpy_gfx_copy(QemuConsole *con, int src_x, int src_y,
                  int dst_x, int dst_y, int w, int h)
1311
{
1312
    DisplayState *s = con->ds;
1313
    struct DisplayChangeListener *dcl;
1314 1315 1316 1317

    if (con != active_console) {
        return;
    }
1318 1319
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_gfx_copy) {
1320
            dcl->ops->dpy_gfx_copy(dcl, src_x, src_y, dst_x, dst_y, w, h);
1321
        } else { /* TODO */
1322
            dcl->ops->dpy_gfx_update(dcl, dst_x, dst_y, w, h);
1323 1324 1325 1326
        }
    }
}

1327
void dpy_text_cursor(QemuConsole *con, int x, int y)
1328
{
1329
    DisplayState *s = con->ds;
1330
    struct DisplayChangeListener *dcl;
1331 1332 1333 1334

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

1342
void dpy_text_update(QemuConsole *con, int x, int y, int w, int h)
1343
{
1344
    DisplayState *s = con->ds;
1345
    struct DisplayChangeListener *dcl;
1346 1347 1348 1349

    if (con != active_console) {
        return;
    }
1350 1351
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_update) {
1352
            dcl->ops->dpy_text_update(dcl, x, y, w, h);
1353 1354 1355 1356
        }
    }
}

1357
void dpy_text_resize(QemuConsole *con, int w, int h)
1358
{
1359
    DisplayState *s = con->ds;
1360
    struct DisplayChangeListener *dcl;
1361 1362 1363 1364

    if (con != active_console) {
        return;
    }
1365 1366
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_text_resize) {
1367
            dcl->ops->dpy_text_resize(dcl, w, h);
1368 1369 1370 1371
        }
    }
}

1372
void dpy_mouse_set(QemuConsole *con, int x, int y, int on)
1373
{
1374
    DisplayState *s = con->ds;
1375
    struct DisplayChangeListener *dcl;
1376 1377 1378 1379

    if (con != active_console) {
        return;
    }
1380 1381
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_mouse_set) {
1382
            dcl->ops->dpy_mouse_set(dcl, x, y, on);
1383 1384 1385 1386
        }
    }
}

1387
void dpy_cursor_define(QemuConsole *con, QEMUCursor *cursor)
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_cursor_define) {
1397
            dcl->ops->dpy_cursor_define(dcl, cursor);
1398 1399 1400 1401
        }
    }
}

1402
bool dpy_cursor_define_supported(QemuConsole *con)
1403
{
1404
    DisplayState *s = con->ds;
1405 1406 1407 1408 1409 1410 1411 1412 1413
    struct DisplayChangeListener *dcl;
    QLIST_FOREACH(dcl, &s->listeners, next) {
        if (dcl->ops->dpy_cursor_define) {
            return true;
        }
    }
    return false;
}

1414 1415 1416
/***********************************************************/
/* register display */

1417 1418
/* console.c internal use only */
static DisplayState *get_alloc_displaystate(void)
1419
{
1420 1421 1422 1423
    if (!display_state) {
        display_state = g_new0(DisplayState, 1);
    }
    return display_state;
1424 1425
}

1426 1427 1428 1429 1430
/*
 * Called by main(), after creating QemuConsoles
 * and before initializing ui (sdl/vnc/...).
 */
DisplayState *init_displaystate(void)
1431
{
1432 1433
    int i;

1434
    if (!display_state) {
1435
        display_state = g_new0(DisplayState, 1);
1436
    }
1437 1438 1439 1440 1441 1442 1443 1444

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

1445 1446 1447
    return display_state;
}

1448 1449 1450
QemuConsole *graphic_console_init(graphic_hw_update_ptr update,
                                  graphic_hw_invalidate_ptr invalidate,
                                  graphic_hw_text_update_ptr text_update,
1451
                                  void *opaque)
P
pbrook 已提交
1452
{
1453 1454
    int width = 640;
    int height = 480;
1455
    QemuConsole *s;
1456
    DisplayState *ds;
A
aurel32 已提交
1457

1458
    ds = get_alloc_displaystate();
G
Gerd Hoffmann 已提交
1459
    trace_console_gfx_new();
1460
    s = new_console(ds, GRAPHIC_CONSOLE);
P
pbrook 已提交
1461 1462
    s->hw_update = update;
    s->hw_invalidate = invalidate;
B
balrog 已提交
1463
    s->hw_text_update = text_update;
P
pbrook 已提交
1464
    s->hw = opaque;
1465

1466
    s->surface = qemu_create_displaysurface(width, height);
1467
    return s;
B
bellard 已提交
1468 1469
}

P
pbrook 已提交
1470
int is_graphic_console(void)
B
bellard 已提交
1471
{
B
balrog 已提交
1472
    return active_console && active_console->console_type == GRAPHIC_CONSOLE;
B
bellard 已提交
1473 1474
}

1475 1476 1477 1478 1479
int is_fixedsize_console(void)
{
    return active_console && active_console->console_type != TEXT_CONSOLE;
}

1480 1481
static void text_console_set_echo(CharDriverState *chr, bool echo)
{
1482
    QemuConsole *s = chr->opaque;
1483 1484 1485 1486

    s->echo = echo;
}

1487 1488
static void text_console_update_cursor(void *opaque)
{
1489
    QemuConsole *s = opaque;
1490 1491

    s->cursor_visible_phase = !s->cursor_visible_phase;
1492
    graphic_hw_invalidate(s);
1493 1494 1495 1496
    qemu_mod_timer(s->cursor_timer,
                   qemu_get_clock_ms(rt_clock) + CONSOLE_CURSOR_PERIOD / 2);
}

P
Paolo Bonzini 已提交
1497
static void text_console_do_init(CharDriverState *chr, DisplayState *ds)
B
bellard 已提交
1498
{
1499
    QemuConsole *s;
1500

1501
    s = chr->opaque;
G
Gerd Hoffmann 已提交
1502

B
bellard 已提交
1503
    chr->chr_write = console_puts;
B
bellard 已提交
1504

1505 1506
    s->out_fifo.buf = s->out_fifo_buf;
    s->out_fifo.buf_size = sizeof(s->out_fifo_buf);
1507
    s->kbd_timer = qemu_new_timer_ms(rt_clock, kbd_send_chars, s);
1508
    s->ds = ds;
1509

B
bellard 已提交
1510 1511 1512 1513 1514
    s->y_displayed = 0;
    s->y_base = 0;
    s->total_height = DEFAULT_BACKSCROLL;
    s->x = 0;
    s->y = 0;
1515
    if (s->console_type == TEXT_CONSOLE) {
1516 1517 1518 1519 1520 1521 1522
        if (active_console && active_console->surface) {
            s->g_width = surface_width(active_console->surface);
            s->g_height = surface_height(active_console->surface);
        } else {
            s->g_width = 80 * FONT_WIDTH;
            s->g_height = 24 * FONT_HEIGHT;
        }
1523
    }
1524
    s->surface = qemu_create_displaysurface(s->g_width, s->g_height);
1525

1526 1527 1528
    s->cursor_timer =
        qemu_new_timer_ms(rt_clock, text_console_update_cursor, s);

B
balrog 已提交
1529 1530 1531 1532
    s->hw_invalidate = text_console_invalidate;
    s->hw_text_update = text_console_update;
    s->hw = s;

1533 1534 1535 1536 1537 1538 1539 1540 1541 1542
    /* 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 已提交
1543 1544
    text_console_resize(s);

1545 1546 1547 1548
    if (chr->label) {
        char msg[128];
        int len;

1549
        s->t_attrib.bgcol = COLOR_BLUE;
1550 1551
        len = snprintf(msg, sizeof(msg), "%s console\r\n", chr->label);
        console_puts(chr, (uint8_t*)msg, len);
1552
        s->t_attrib = s->t_attrib_default;
1553 1554
    }

1555
    qemu_chr_be_generic_open(chr);
1556 1557
    if (chr->init)
        chr->init(chr);
B
bellard 已提交
1558
}
1559

G
Gerd Hoffmann 已提交
1560
static CharDriverState *text_console_init(ChardevVC *vc)
1561 1562
{
    CharDriverState *chr;
1563
    QemuConsole *s;
G
Gerd Hoffmann 已提交
1564 1565
    unsigned width = 0;
    unsigned height = 0;
1566

1567
    chr = g_malloc0(sizeof(CharDriverState));
1568

G
Gerd Hoffmann 已提交
1569 1570 1571 1572 1573
    if (vc->has_width) {
        width = vc->width;
    } else if (vc->has_cols) {
        width = vc->cols * FONT_WIDTH;
    }
1574

G
Gerd Hoffmann 已提交
1575 1576 1577 1578 1579
    if (vc->has_height) {
        height = vc->height;
    } else if (vc->has_rows) {
        height = vc->rows * FONT_HEIGHT;
    }
1580

G
Gerd Hoffmann 已提交
1581
    trace_console_txt_new(width, height);
1582 1583 1584 1585 1586 1587 1588
    if (width == 0 || height == 0) {
        s = new_console(NULL, TEXT_CONSOLE);
    } else {
        s = new_console(NULL, TEXT_CONSOLE_FIXED_SIZE);
    }

    if (!s) {
1589
        g_free(chr);
1590
        return NULL;
1591 1592 1593 1594 1595 1596
    }

    s->chr = chr;
    s->g_width = width;
    s->g_height = height;
    chr->opaque = s;
1597
    chr->chr_set_echo = text_console_set_echo;
1598 1599 1600 1601

    if (display_state) {
        text_console_do_init(chr, display_state);
    }
1602
    return chr;
1603 1604
}

1605 1606
static VcHandler *vc_handler = text_console_init;

G
Gerd Hoffmann 已提交
1607
CharDriverState *vc_init(ChardevVC *vc)
1608
{
G
Gerd Hoffmann 已提交
1609
    return vc_handler(vc);
1610 1611 1612 1613 1614 1615 1616
}

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

1617
void qemu_console_resize(QemuConsole *s, int width, int height)
1618
{
1619 1620 1621
    DisplaySurface *surface;

    assert(s->console_type == GRAPHIC_CONSOLE);
1622 1623
    s->g_width = width;
    s->g_height = height;
1624 1625
    surface = qemu_create_displaysurface(width, height);
    dpy_gfx_replace_surface(s, surface);
1626
}
1627

1628
void qemu_console_copy(QemuConsole *con, int src_x, int src_y,
1629
                       int dst_x, int dst_y, int w, int h)
1630
{
1631 1632
    assert(con->console_type == GRAPHIC_CONSOLE);
    dpy_gfx_copy(con, src_x, src_y, dst_x, dst_y, w, h);
1633
}
1634

1635 1636
DisplaySurface *qemu_console_surface(QemuConsole *console)
{
1637
    return console->surface;
1638 1639 1640 1641 1642 1643 1644
}

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

1645
PixelFormat qemu_different_endianness_pixelformat(int bpp)
1646 1647 1648 1649 1650 1651
{
    PixelFormat pf;

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

    pf.bits_per_pixel = bpp;
1652
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1653 1654 1655
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1656 1657 1658 1659 1660 1661 1662 1663 1664 1665
        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;
1666 1667 1668
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1669
            break;
1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682
        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;
1683 1684 1685 1686
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
            pf.abits = 8;
1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700
            break;
        default:
            break;
    }
    return pf;
}

PixelFormat qemu_default_pixelformat(int bpp)
{
    PixelFormat pf;

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

    pf.bits_per_pixel = bpp;
1701
    pf.bytes_per_pixel = DIV_ROUND_UP(bpp, 8);
1702 1703 1704
    pf.depth = bpp == 32 ? 24 : bpp;

    switch (bpp) {
1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719
        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;
1720 1721 1722 1723 1724 1725 1726 1727 1728 1729
        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;
1730 1731 1732
            pf.rbits = 5;
            pf.gbits = 6;
            pf.bbits = 5;
1733 1734
            break;
        case 24:
1735 1736 1737 1738 1739 1740 1741 1742 1743
            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;
1744 1745 1746
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1747
            break;
1748 1749 1750 1751 1752 1753 1754 1755 1756 1757
        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;
1758 1759 1760
            pf.rbits = 8;
            pf.gbits = 8;
            pf.bbits = 8;
1761 1762 1763 1764 1765 1766
            break;
        default:
            break;
    }
    return pf;
}
1767

G
Gerd Hoffmann 已提交
1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799
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;
    }
}

1800 1801
static void register_types(void)
{
G
Gerd Hoffmann 已提交
1802 1803
    register_char_driver_qapi("vc", CHARDEV_BACKEND_KIND_VC,
                              qemu_chr_parse_vc);
1804 1805 1806
}

type_init(register_types);