[mirror_qemu.git] / ui / curses.c

/*
 * QEMU curses/ncurses display driver
 * 
 * Copyright (c) 2005 Andrzej Zaborowski  <balrog@zabor.org>
 * 
 * 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.
 */
#include "qemu/osdep.h"

#ifndef _WIN32
#include <sys/ioctl.h>
#include <termios.h>
#endif

#include "qapi/error.h"
#include "qemu-common.h"
#include "ui/console.h"
#include "ui/input.h"
#include "sysemu/sysemu.h"

/* KEY_EVENT is defined in wincon.h and in curses.h. Avoid redefinition. */
#undef KEY_EVENT
#include <curses.h>
#undef KEY_EVENT

#define FONT_HEIGHT 16
#define FONT_WIDTH 8

enum maybe_keycode {
    CURSES_KEYCODE,
    CURSES_CHAR,
    CURSES_CHAR_OR_KEYCODE,
};

static DisplayChangeListener *dcl;
static console_ch_t screen[160 * 100];
static WINDOW *screenpad = NULL;
static int width, height, gwidth, gheight, invalidate;
static int px, py, sminx, sminy, smaxx, smaxy;

static chtype vga_to_curses[256];

static void curses_update(DisplayChangeListener *dcl,
                          int x, int y, int w, int h)
{
    console_ch_t *line;
    chtype curses_line[width];

    line = screen + y * width;
    for (h += y; y < h; y ++, line += width) {
        for (x = 0; x < width; x++) {
            chtype ch = line[x] & 0xff;
            chtype at = line[x] & ~0xff;
            if (vga_to_curses[ch]) {
                ch = vga_to_curses[ch];
            }
            curses_line[x] = ch | at;
        }
        mvwaddchnstr(screenpad, y, 0, curses_line, width);
    }

    pnoutrefresh(screenpad, py, px, sminy, sminx, smaxy - 1, smaxx - 1);
    refresh();
}

static void curses_calc_pad(void)
{
    if (qemu_console_is_fixedsize(NULL)) {
        width = gwidth;
        height = gheight;
    } else {
        width = COLS;
        height = LINES;
    }

    if (screenpad)
        delwin(screenpad);

    clear();
    refresh();

    screenpad = newpad(height, width);

    if (width > COLS) {
        px = (width - COLS) / 2;
        sminx = 0;
        smaxx = COLS;
    } else {
        px = 0;
        sminx = (COLS - width) / 2;
        smaxx = sminx + width;
    }

    if (height > LINES) {
        py = (height - LINES) / 2;
        sminy = 0;
        smaxy = LINES;
    } else {
        py = 0;
        sminy = (LINES - height) / 2;
        smaxy = sminy + height;
    }
}

static void curses_resize(DisplayChangeListener *dcl,
                          int width, int height)
{
    if (width == gwidth && height == gheight) {
        return;
    }

    gwidth = width;
    gheight = height;

    curses_calc_pad();
}

#if !defined(_WIN32) && defined(SIGWINCH) && defined(KEY_RESIZE)
static volatile sig_atomic_t got_sigwinch;
static void curses_winch_check(void)
{
    struct winsize {
        unsigned short ws_row;
        unsigned short ws_col;
        unsigned short ws_xpixel;   /* unused */
        unsigned short ws_ypixel;   /* unused */
    } ws;

    if (!got_sigwinch) {
        return;
    }
    got_sigwinch = false;

    if (ioctl(1, TIOCGWINSZ, &ws) == -1) {
        return;
    }

    resize_term(ws.ws_row, ws.ws_col);
    invalidate = 1;
}

static void curses_winch_handler(int signum)
{
    got_sigwinch = true;
}

static void curses_winch_init(void)
{
    struct sigaction old, winch = {
        .sa_handler  = curses_winch_handler,
    };
    sigaction(SIGWINCH, &winch, &old);
}
#else
static void curses_winch_check(void) {}
static void curses_winch_init(void) {}
#endif

static void curses_cursor_position(DisplayChangeListener *dcl,
                                   int x, int y)
{
    if (x >= 0) {
        x = sminx + x - px;
        y = sminy + y - py;

        if (x >= 0 && y >= 0 && x < COLS && y < LINES) {
            move(y, x);
            curs_set(1);
            /* it seems that curs_set(1) must always be called before
             * curs_set(2) for the latter to have effect */
            if (!qemu_console_is_graphic(NULL)) {
                curs_set(2);
            }
            return;
        }
    }

    curs_set(0);
}

/* generic keyboard conversion */

#include "curses_keys.h"

static kbd_layout_t *kbd_layout = NULL;

static wint_t console_getch(enum maybe_keycode *maybe_keycode)
{
    wint_t ret;
    switch (get_wch(&ret)) {
    case KEY_CODE_YES:
        *maybe_keycode = CURSES_KEYCODE;
        break;
    case OK:
        *maybe_keycode = CURSES_CHAR;
        break;
    case ERR:
        ret = -1;
        break;
    }
    return ret;
}

static int curses2foo(const int _curses2foo[], const int _curseskey2foo[],
                      int chr, enum maybe_keycode maybe_keycode)
{
    int ret = -1;
    if (maybe_keycode == CURSES_CHAR) {
        if (chr < CURSES_CHARS) {
            ret = _curses2foo[chr];
        }
    } else {
        if (chr < CURSES_KEYS) {
            ret = _curseskey2foo[chr];
        }
        if (ret == -1 && maybe_keycode == CURSES_CHAR_OR_KEYCODE &&
            chr < CURSES_CHARS) {
            ret = _curses2foo[chr];
        }
    }
    return ret;
}

#define curses2keycode(chr, maybe_keycode) \
    curses2foo(_curses2keycode, _curseskey2keycode, chr, maybe_keycode)
#define curses2keysym(chr, maybe_keycode) \
    curses2foo(_curses2keysym, _curseskey2keysym, chr, maybe_keycode)
#define curses2qemu(chr, maybe_keycode) \
    curses2foo(_curses2qemu, _curseskey2qemu, chr, maybe_keycode)

static void curses_refresh(DisplayChangeListener *dcl)
{
    int chr, keysym, keycode, keycode_alt;
    enum maybe_keycode maybe_keycode;

    curses_winch_check();

    if (invalidate) {
        clear();
        refresh();
        curses_calc_pad();
        graphic_hw_invalidate(NULL);
        invalidate = 0;
    }

    graphic_hw_text_update(NULL, screen);

    while (1) {
        /* while there are any pending key strokes to process */
        chr = console_getch(&maybe_keycode);

        if (chr == -1)
            break;

#ifdef KEY_RESIZE
        /* this shouldn't occur when we use a custom SIGWINCH handler */
        if (maybe_keycode != CURSES_CHAR && chr == KEY_RESIZE) {
            clear();
            refresh();
            curses_calc_pad();
            curses_update(dcl, 0, 0, width, height);
            continue;
        }
#endif

        keycode = curses2keycode(chr, maybe_keycode);
        keycode_alt = 0;

        /* alt or esc key */
        if (keycode == 1) {
            enum maybe_keycode next_maybe_keycode;
            int nextchr = console_getch(&next_maybe_keycode);

            if (nextchr != -1) {
                chr = nextchr;
                maybe_keycode = next_maybe_keycode;
                keycode_alt = ALT;
                keycode = curses2keycode(chr, maybe_keycode);

                if (keycode != -1) {
                    keycode |= ALT;

                    /* process keys reserved for qemu */
                    if (keycode >= QEMU_KEY_CONSOLE0 &&
                            keycode < QEMU_KEY_CONSOLE0 + 9) {
                        erase();
                        wnoutrefresh(stdscr);
                        console_select(keycode - QEMU_KEY_CONSOLE0);

                        invalidate = 1;
                        continue;
                    }
                }
            }
        }

        if (kbd_layout) {
            keysym = curses2keysym(chr, maybe_keycode);

            if (keysym == -1) {
                if (chr < ' ') {
                    keysym = chr + '@';
                    if (keysym >= 'A' && keysym <= 'Z')
                        keysym += 'a' - 'A';
                    keysym |= KEYSYM_CNTRL;
                } else
                    keysym = chr;
            }

            keycode = keysym2scancode(kbd_layout, keysym & KEYSYM_MASK,
                                      NULL, false);
            if (keycode == 0)
                continue;

            keycode |= (keysym & ~KEYSYM_MASK) >> 16;
            keycode |= keycode_alt;
        }

        if (keycode == -1)
            continue;

        if (qemu_console_is_graphic(NULL)) {
            /* since terminals don't know about key press and release
             * events, we need to emit both for each key received */
            if (keycode & SHIFT) {
                qemu_input_event_send_key_number(NULL, SHIFT_CODE, true);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & CNTRL) {
                qemu_input_event_send_key_number(NULL, CNTRL_CODE, true);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & ALT) {
                qemu_input_event_send_key_number(NULL, ALT_CODE, true);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & ALTGR) {
                qemu_input_event_send_key_number(NULL, GREY | ALT_CODE, true);
                qemu_input_event_send_key_delay(0);
            }

            qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, true);
            qemu_input_event_send_key_delay(0);
            qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, false);
            qemu_input_event_send_key_delay(0);

            if (keycode & ALTGR) {
                qemu_input_event_send_key_number(NULL, GREY | ALT_CODE, false);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & ALT) {
                qemu_input_event_send_key_number(NULL, ALT_CODE, false);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & CNTRL) {
                qemu_input_event_send_key_number(NULL, CNTRL_CODE, false);
                qemu_input_event_send_key_delay(0);
            }
            if (keycode & SHIFT) {
                qemu_input_event_send_key_number(NULL, SHIFT_CODE, false);
                qemu_input_event_send_key_delay(0);
            }
        } else {
            keysym = curses2qemu(chr, maybe_keycode);
            if (keysym == -1)
                keysym = chr;

            kbd_put_keysym(keysym);
        }
    }
}

static void curses_atexit(void)
{
    endwin();
}

static void curses_setup(void)
{
    int i, colour_default[8] = {
        [QEMU_COLOR_BLACK]   = COLOR_BLACK,
        [QEMU_COLOR_BLUE]    = COLOR_BLUE,
        [QEMU_COLOR_GREEN]   = COLOR_GREEN,
        [QEMU_COLOR_CYAN]    = COLOR_CYAN,
        [QEMU_COLOR_RED]     = COLOR_RED,
        [QEMU_COLOR_MAGENTA] = COLOR_MAGENTA,
        [QEMU_COLOR_YELLOW]  = COLOR_YELLOW,
        [QEMU_COLOR_WHITE]   = COLOR_WHITE,
    };

    /* input as raw as possible, let everything be interpreted
     * by the guest system */
    initscr(); noecho(); intrflush(stdscr, FALSE);
    nodelay(stdscr, TRUE); nonl(); keypad(stdscr, TRUE);
    start_color(); raw(); scrollok(stdscr, FALSE);
    set_escdelay(25);

    /* Make color pair to match color format (3bits bg:3bits fg) */
    for (i = 0; i < 64; i++) {
        init_pair(i, colour_default[i & 7], colour_default[i >> 3]);
    }
    /* Set default color for more than 64 for safety. */
    for (i = 64; i < COLOR_PAIRS; i++) {
        init_pair(i, COLOR_WHITE, COLOR_BLACK);
    }

    /*
     * Setup mapping for vga to curses line graphics.
     * FIXME: for better font, have to use ncursesw and setlocale()
     */
#if 0
    /* FIXME: map from where? */
    ACS_S1;
    ACS_S3;
    ACS_S7;
    ACS_S9;
#endif
    /* ACS_* is not constant. So, we can't initialize statically. */
    vga_to_curses['\0'] = ' ';
    vga_to_curses[0x04] = ACS_DIAMOND;
    vga_to_curses[0x18] = ACS_UARROW;
    vga_to_curses[0x19] = ACS_DARROW;
    vga_to_curses[0x1a] = ACS_RARROW;
    vga_to_curses[0x1b] = ACS_LARROW;
    vga_to_curses[0x9c] = ACS_STERLING;
    vga_to_curses[0xb0] = ACS_BOARD;
    vga_to_curses[0xb1] = ACS_CKBOARD;
    vga_to_curses[0xb3] = ACS_VLINE;
    vga_to_curses[0xb4] = ACS_RTEE;
    vga_to_curses[0xbf] = ACS_URCORNER;
    vga_to_curses[0xc0] = ACS_LLCORNER;
    vga_to_curses[0xc1] = ACS_BTEE;
    vga_to_curses[0xc2] = ACS_TTEE;
    vga_to_curses[0xc3] = ACS_LTEE;
    vga_to_curses[0xc4] = ACS_HLINE;
    vga_to_curses[0xc5] = ACS_PLUS;
    vga_to_curses[0xce] = ACS_LANTERN;
    vga_to_curses[0xd8] = ACS_NEQUAL;
    vga_to_curses[0xd9] = ACS_LRCORNER;
    vga_to_curses[0xda] = ACS_ULCORNER;
    vga_to_curses[0xdb] = ACS_BLOCK;
    vga_to_curses[0xe3] = ACS_PI;
    vga_to_curses[0xf1] = ACS_PLMINUS;
    vga_to_curses[0xf2] = ACS_GEQUAL;
    vga_to_curses[0xf3] = ACS_LEQUAL;
    vga_to_curses[0xf8] = ACS_DEGREE;
    vga_to_curses[0xfe] = ACS_BULLET;
}

static void curses_keyboard_setup(void)
{
#if defined(__APPLE__)
    /* always use generic keymaps */
    if (!keyboard_layout)
        keyboard_layout = "en-us";
#endif
    if(keyboard_layout) {
        kbd_layout = init_keyboard_layout(name2keysym, keyboard_layout,
                                          &error_fatal);
    }
}

static const DisplayChangeListenerOps dcl_ops = {
    .dpy_name        = "curses",
    .dpy_text_update = curses_update,
    .dpy_text_resize = curses_resize,
    .dpy_refresh     = curses_refresh,
    .dpy_text_cursor = curses_cursor_position,
};

static void curses_display_init(DisplayState *ds, DisplayOptions *opts)
{
#ifndef _WIN32
    if (!isatty(1)) {
        fprintf(stderr, "We need a terminal output\n");
        exit(1);
    }
#endif

    curses_setup();
    curses_keyboard_setup();
    atexit(curses_atexit);

    curses_winch_init();

    dcl = g_new0(DisplayChangeListener, 1);
    dcl->ops = &dcl_ops;
    register_displaychangelistener(dcl);

    invalidate = 1;
}

static QemuDisplay qemu_display_curses = {
    .type       = DISPLAY_TYPE_CURSES,
    .init       = curses_display_init,
};

static void register_curses(void)
{
    qemu_display_register(&qemu_display_curses);
}

type_init(register_curses);
Commit	Line	Data
4d3b6f6e AZ	1	/*
	2	* QEMU curses/ncurses display driver
	3	*
	4	* Copyright (c) 2005 Andrzej Zaborowski <balrog@zabor.org>
	5	*
	6	* Permission is hereby granted, free of charge, to any person obtaining a copy
	7	* of this software and associated documentation files (the "Software"), to deal
	8	* in the Software without restriction, including without limitation the rights
	9	* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
	10	* copies of the Software, and to permit persons to whom the Software is
	11	* furnished to do so, subject to the following conditions:
	12	*
	13	* The above copyright notice and this permission notice shall be included in
	14	* all copies or substantial portions of the Software.
	15	*
	16	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
	17	* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
	18	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
	19	* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
	20	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
	21	* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
	22	* THE SOFTWARE.
	23	*/
e16f4c87	24	#include "qemu/osdep.h"
4d3b6f6e AZ	25
4d3b6f6e AZ	26	#ifndef _WIN32
4d3b6f6e AZ	27	#include <sys/ioctl.h>
	28	#include <termios.h>
	29	#endif
	30
ab4f931e	31	#include "qapi/error.h"
511d2b14	32	#include "qemu-common.h"
28ecbaee	33	#include "ui/console.h"
cd100328	34	#include "ui/input.h"
9c17d615	35	#include "sysemu/sysemu.h"
511d2b14	36
e2f82e92 GH	37	/* KEY_EVENT is defined in wincon.h and in curses.h. Avoid redefinition. */
	38	#undef KEY_EVENT
	39	#include <curses.h>
	40	#undef KEY_EVENT
	41
4d3b6f6e AZ	42	#define FONT_HEIGHT 16
	43	#define FONT_WIDTH 8
	44
459a707e ST	45	enum maybe_keycode {
	46	CURSES_KEYCODE,
	47	CURSES_CHAR,
	48	CURSES_CHAR_OR_KEYCODE,
	49	};
	50
7c20b4a3	51	static DisplayChangeListener *dcl;
c227f099	52	static console_ch_t screen[160 * 100];
4d3b6f6e AZ	53	static WINDOW *screenpad = NULL;
	54	static int width, height, gwidth, gheight, invalidate;
	55	static int px, py, sminx, sminy, smaxx, smaxy;
	56
e2f82e92	57	static chtype vga_to_curses[256];
e2368dc9	58
7c20b4a3	59	static void curses_update(DisplayChangeListener *dcl,
7c20b4a3	60	int x, int y, int w, int h)
4d3b6f6e	61	{
e2f82e92 GH	62	console_ch_t *line;
e2f82e92 GH	63	chtype curses_line[width];
4d3b6f6e	64
e2f82e92 GH	65	line = screen + y * width;
	66	for (h += y; y < h; y ++, line += width) {
	67	for (x = 0; x < width; x++) {
	68	chtype ch = line[x] & 0xff;
	69	chtype at = line[x] & ~0xff;
	70	if (vga_to_curses[ch]) {
	71	ch = vga_to_curses[ch];
	72	}
	73	curses_line[x] = ch \| at;
	74	}
	75	mvwaddchnstr(screenpad, y, 0, curses_line, width);
	76	}
4d3b6f6e AZ	77
	78	pnoutrefresh(screenpad, py, px, sminy, sminx, smaxy - 1, smaxx - 1);
	79	refresh();
	80	}
	81
	82	static void curses_calc_pad(void)
	83	{
81c0d5a6	84	if (qemu_console_is_fixedsize(NULL)) {
4d3b6f6e AZ	85	width = gwidth;
	86	height = gheight;
	87	} else {
	88	width = COLS;
	89	height = LINES;
	90	}
	91
	92	if (screenpad)
	93	delwin(screenpad);
	94
	95	clear();
	96	refresh();
	97
	98	screenpad = newpad(height, width);
	99
	100	if (width > COLS) {
	101	px = (width - COLS) / 2;
	102	sminx = 0;
	103	smaxx = COLS;
	104	} else {
	105	px = 0;
	106	sminx = (COLS - width) / 2;
	107	smaxx = sminx + width;
	108	}
	109
	110	if (height > LINES) {
	111	py = (height - LINES) / 2;
	112	sminy = 0;
	113	smaxy = LINES;
	114	} else {
	115	py = 0;
	116	sminy = (LINES - height) / 2;
	117	smaxy = sminy + height;
	118	}
	119	}
	120
7c20b4a3	121	static void curses_resize(DisplayChangeListener *dcl,
7c20b4a3	122	int width, int height)
4d3b6f6e	123	{
a93a4a22	124	if (width == gwidth && height == gheight) {
4d3b6f6e	125	return;
a93a4a22	126	}
4d3b6f6e	127
a93a4a22 GH	128	gwidth = width;
a93a4a22 GH	129	gheight = height;
4d3b6f6e AZ	130
	131	curses_calc_pad();
	132	}
	133
032ac6f8 GH	134	#if !defined(_WIN32) && defined(SIGWINCH) && defined(KEY_RESIZE)
	135	static volatile sig_atomic_t got_sigwinch;
	136	static void curses_winch_check(void)
4d3b6f6e AZ	137	{
	138	struct winsize {
	139	unsigned short ws_row;
	140	unsigned short ws_col;
	141	unsigned short ws_xpixel; /* unused */
	142	unsigned short ws_ypixel; /* unused */
	143	} ws;
	144
032ac6f8 GH	145	if (!got_sigwinch) {
	146	return;
	147	}
	148	got_sigwinch = false;
	149
	150	if (ioctl(1, TIOCGWINSZ, &ws) == -1) {
4d3b6f6e	151	return;
032ac6f8	152	}
4d3b6f6e AZ	153
4d3b6f6e AZ	154	resize_term(ws.ws_row, ws.ws_col);
4d3b6f6e	155	invalidate = 1;
032ac6f8	156	}
4d3b6f6e	157
032ac6f8 GH	158	static void curses_winch_handler(int signum)
	159	{
	160	got_sigwinch = true;
4d3b6f6e	161	}
032ac6f8 GH	162
	163	static void curses_winch_init(void)
	164	{
	165	struct sigaction old, winch = {
	166	.sa_handler = curses_winch_handler,
	167	};
	168	sigaction(SIGWINCH, &winch, &old);
	169	}
	170	#else
	171	static void curses_winch_check(void) {}
	172	static void curses_winch_init(void) {}
4d3b6f6e AZ	173	#endif
4d3b6f6e AZ	174
7c20b4a3	175	static void curses_cursor_position(DisplayChangeListener *dcl,
7c20b4a3	176	int x, int y)
4d3b6f6e AZ	177	{
	178	if (x >= 0) {
	179	x = sminx + x - px;
	180	y = sminy + y - py;
	181
	182	if (x >= 0 && y >= 0 && x < COLS && y < LINES) {
	183	move(y, x);
	184	curs_set(1);
	185	/* it seems that curs_set(1) must always be called before
	186	* curs_set(2) for the latter to have effect */
81c0d5a6	187	if (!qemu_console_is_graphic(NULL)) {
4d3b6f6e	188	curs_set(2);
81c0d5a6	189	}
4d3b6f6e AZ	190	return;
	191	}
	192	}
	193
	194	curs_set(0);
	195	}
	196
	197	/* generic keyboard conversion */
	198
	199	#include "curses_keys.h"
4d3b6f6e	200
c227f099	201	static kbd_layout_t *kbd_layout = NULL;
4d3b6f6e	202
459a707e ST	203	static wint_t console_getch(enum maybe_keycode *maybe_keycode)
	204	{
	205	wint_t ret;
	206	switch (get_wch(&ret)) {
	207	case KEY_CODE_YES:
	208	*maybe_keycode = CURSES_KEYCODE;
	209	break;
	210	case OK:
	211	*maybe_keycode = CURSES_CHAR;
	212	break;
	213	case ERR:
	214	ret = -1;
	215	break;
	216	}
	217	return ret;
	218	}
	219
	220	static int curses2foo(const int _curses2foo[], const int _curseskey2foo[],
	221	int chr, enum maybe_keycode maybe_keycode)
	222	{
	223	int ret = -1;
	224	if (maybe_keycode == CURSES_CHAR) {
	225	if (chr < CURSES_CHARS) {
	226	ret = _curses2foo[chr];
	227	}
	228	} else {
	229	if (chr < CURSES_KEYS) {
	230	ret = _curseskey2foo[chr];
	231	}
	232	if (ret == -1 && maybe_keycode == CURSES_CHAR_OR_KEYCODE &&
	233	chr < CURSES_CHARS) {
	234	ret = _curses2foo[chr];
	235	}
	236	}
	237	return ret;
	238	}
	239
	240	#define curses2keycode(chr, maybe_keycode) \
	241	curses2foo(_curses2keycode, _curseskey2keycode, chr, maybe_keycode)
	242	#define curses2keysym(chr, maybe_keycode) \
	243	curses2foo(_curses2keysym, _curseskey2keysym, chr, maybe_keycode)
	244	#define curses2qemu(chr, maybe_keycode) \
	245	curses2foo(_curses2qemu, _curseskey2qemu, chr, maybe_keycode)
	246
bc2ed970	247	static void curses_refresh(DisplayChangeListener *dcl)
4d3b6f6e	248	{
99a9ef44	249	int chr, keysym, keycode, keycode_alt;
459a707e	250	enum maybe_keycode maybe_keycode;
4d3b6f6e	251
032ac6f8 GH	252	curses_winch_check();
032ac6f8 GH	253
4d3b6f6e AZ	254	if (invalidate) {
	255	clear();
	256	refresh();
	257	curses_calc_pad();
1dbfa005	258	graphic_hw_invalidate(NULL);
4d3b6f6e AZ	259	invalidate = 0;
	260	}
	261
1dbfa005	262	graphic_hw_text_update(NULL, screen);
4d3b6f6e	263
4d3b6f6e AZ	264	while (1) {
4d3b6f6e AZ	265	/* while there are any pending key strokes to process */
459a707e	266	chr = console_getch(&maybe_keycode);
4d3b6f6e	267
459a707e	268	if (chr == -1)
4d3b6f6e AZ	269	break;
4d3b6f6e AZ	270
b1314cf9	271	#ifdef KEY_RESIZE
4d3b6f6e	272	/* this shouldn't occur when we use a custom SIGWINCH handler */
459a707e	273	if (maybe_keycode != CURSES_CHAR && chr == KEY_RESIZE) {
4d3b6f6e AZ	274	clear();
	275	refresh();
	276	curses_calc_pad();
bc2ed970	277	curses_update(dcl, 0, 0, width, height);
4d3b6f6e AZ	278	continue;
4d3b6f6e AZ	279	}
b1314cf9	280	#endif
4d3b6f6e	281
459a707e	282	keycode = curses2keycode(chr, maybe_keycode);
44bb61c8	283	keycode_alt = 0;
4d3b6f6e	284
633786fe	285	/* alt or esc key */
4d3b6f6e	286	if (keycode == 1) {
459a707e ST	287	enum maybe_keycode next_maybe_keycode;
459a707e ST	288	int nextchr = console_getch(&next_maybe_keycode);
4d3b6f6e	289
459a707e	290	if (nextchr != -1) {
44bb61c8	291	chr = nextchr;
459a707e	292	maybe_keycode = next_maybe_keycode;
44bb61c8	293	keycode_alt = ALT;
459a707e	294	keycode = curses2keycode(chr, maybe_keycode);
4d3b6f6e	295
44bb61c8 ST	296	if (keycode != -1) {
44bb61c8 ST	297	keycode \|= ALT;
4d3b6f6e	298
44bb61c8 ST	299	/* process keys reserved for qemu */
	300	if (keycode >= QEMU_KEY_CONSOLE0 &&
	301	keycode < QEMU_KEY_CONSOLE0 + 9) {
	302	erase();
	303	wnoutrefresh(stdscr);
	304	console_select(keycode - QEMU_KEY_CONSOLE0);
4d3b6f6e	305
44bb61c8 ST	306	invalidate = 1;
	307	continue;
	308	}
4d3b6f6e AZ	309	}
	310	}
	311	}
	312
44bb61c8	313	if (kbd_layout) {
459a707e	314	keysym = curses2keysym(chr, maybe_keycode);
44bb61c8 ST	315
44bb61c8 ST	316	if (keysym == -1) {
d03703c8 ST	317	if (chr < ' ') {
	318	keysym = chr + '@';
	319	if (keysym >= 'A' && keysym <= 'Z')
	320	keysym += 'a' - 'A';
	321	keysym \|= KEYSYM_CNTRL;
	322	} else
44bb61c8 ST	323	keysym = chr;
44bb61c8 ST	324	}
4d3b6f6e	325
abb4f2c9	326	keycode = keysym2scancode(kbd_layout, keysym & KEYSYM_MASK,
19c1b9fd	327	NULL, false);
44bb61c8 ST	328	if (keycode == 0)
	329	continue;
	330
	331	keycode \|= (keysym & ~KEYSYM_MASK) >> 16;
	332	keycode \|= keycode_alt;
4d3b6f6e AZ	333	}
4d3b6f6e AZ	334
44bb61c8 ST	335	if (keycode == -1)
	336	continue;
	337
81c0d5a6	338	if (qemu_console_is_graphic(NULL)) {
4d3b6f6e AZ	339	/* since terminals don't know about key press and release
4d3b6f6e AZ	340	* events, we need to emit both for each key received */
cd100328 GH	341	if (keycode & SHIFT) {
cd100328 GH	342	qemu_input_event_send_key_number(NULL, SHIFT_CODE, true);
5a165668	343	qemu_input_event_send_key_delay(0);
cd100328 GH	344	}
	345	if (keycode & CNTRL) {
	346	qemu_input_event_send_key_number(NULL, CNTRL_CODE, true);
5a165668	347	qemu_input_event_send_key_delay(0);
cd100328 GH	348	}
	349	if (keycode & ALT) {
	350	qemu_input_event_send_key_number(NULL, ALT_CODE, true);
5a165668	351	qemu_input_event_send_key_delay(0);
cd100328	352	}
44bb61c8	353	if (keycode & ALTGR) {
cd100328	354	qemu_input_event_send_key_number(NULL, GREY \| ALT_CODE, true);
5a165668	355	qemu_input_event_send_key_delay(0);
44bb61c8	356	}
cd100328	357
f5c0ab13	358	qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, true);
5a165668	359	qemu_input_event_send_key_delay(0);
f5c0ab13	360	qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, false);
5a165668	361	qemu_input_event_send_key_delay(0);
cd100328	362
44bb61c8	363	if (keycode & ALTGR) {
cd100328	364	qemu_input_event_send_key_number(NULL, GREY \| ALT_CODE, false);
5a165668	365	qemu_input_event_send_key_delay(0);
cd100328 GH	366	}
	367	if (keycode & ALT) {
	368	qemu_input_event_send_key_number(NULL, ALT_CODE, false);
5a165668	369	qemu_input_event_send_key_delay(0);
cd100328 GH	370	}
	371	if (keycode & CNTRL) {
	372	qemu_input_event_send_key_number(NULL, CNTRL_CODE, false);
5a165668	373	qemu_input_event_send_key_delay(0);
cd100328 GH	374	}
	375	if (keycode & SHIFT) {
	376	qemu_input_event_send_key_number(NULL, SHIFT_CODE, false);
5a165668	377	qemu_input_event_send_key_delay(0);
44bb61c8	378	}
4d3b6f6e	379	} else {
459a707e	380	keysym = curses2qemu(chr, maybe_keycode);
4d3b6f6e AZ	381	if (keysym == -1)
	382	keysym = chr;
	383
	384	kbd_put_keysym(keysym);
	385	}
	386	}
	387	}
	388
aaf12c25	389	static void curses_atexit(void)
4d3b6f6e AZ	390	{
	391	endwin();
	392	}
	393
4d3b6f6e AZ	394	static void curses_setup(void)
	395	{
	396	int i, colour_default[8] = {
4083733d OH	397	[QEMU_COLOR_BLACK] = COLOR_BLACK,
	398	[QEMU_COLOR_BLUE] = COLOR_BLUE,
	399	[QEMU_COLOR_GREEN] = COLOR_GREEN,
	400	[QEMU_COLOR_CYAN] = COLOR_CYAN,
	401	[QEMU_COLOR_RED] = COLOR_RED,
	402	[QEMU_COLOR_MAGENTA] = COLOR_MAGENTA,
	403	[QEMU_COLOR_YELLOW] = COLOR_YELLOW,
	404	[QEMU_COLOR_WHITE] = COLOR_WHITE,
4d3b6f6e AZ	405	};
	406
	407	/* input as raw as possible, let everything be interpreted
	408	* by the guest system */
	409	initscr(); noecho(); intrflush(stdscr, FALSE);
	410	nodelay(stdscr, TRUE); nonl(); keypad(stdscr, TRUE);
	411	start_color(); raw(); scrollok(stdscr, FALSE);
633786fe	412	set_escdelay(25);
4d3b6f6e	413
4083733d	414	/* Make color pair to match color format (3bits bg:3bits fg) */
615220dd	415	for (i = 0; i < 64; i++) {
4d3b6f6e	416	init_pair(i, colour_default[i & 7], colour_default[i >> 3]);
615220dd	417	}
4083733d	418	/* Set default color for more than 64 for safety. */
615220dd OH	419	for (i = 64; i < COLOR_PAIRS; i++) {
	420	init_pair(i, COLOR_WHITE, COLOR_BLACK);
	421	}
e2368dc9 OH	422
	423	/*
	424	* Setup mapping for vga to curses line graphics.
	425	* FIXME: for better font, have to use ncursesw and setlocale()
	426	*/
	427	#if 0
	428	/* FIXME: map from where? */
	429	ACS_S1;
	430	ACS_S3;
	431	ACS_S7;
	432	ACS_S9;
	433	#endif
	434	/* ACS_* is not constant. So, we can't initialize statically. */
	435	vga_to_curses['\0'] = ' ';
	436	vga_to_curses[0x04] = ACS_DIAMOND;
e2368dc9 OH	437	vga_to_curses[0x18] = ACS_UARROW;
e2368dc9 OH	438	vga_to_curses[0x19] = ACS_DARROW;
697783a7 ST	439	vga_to_curses[0x1a] = ACS_RARROW;
697783a7 ST	440	vga_to_curses[0x1b] = ACS_LARROW;
e2368dc9 OH	441	vga_to_curses[0x9c] = ACS_STERLING;
	442	vga_to_curses[0xb0] = ACS_BOARD;
	443	vga_to_curses[0xb1] = ACS_CKBOARD;
	444	vga_to_curses[0xb3] = ACS_VLINE;
	445	vga_to_curses[0xb4] = ACS_RTEE;
	446	vga_to_curses[0xbf] = ACS_URCORNER;
	447	vga_to_curses[0xc0] = ACS_LLCORNER;
	448	vga_to_curses[0xc1] = ACS_BTEE;
	449	vga_to_curses[0xc2] = ACS_TTEE;
	450	vga_to_curses[0xc3] = ACS_LTEE;
	451	vga_to_curses[0xc4] = ACS_HLINE;
	452	vga_to_curses[0xc5] = ACS_PLUS;
	453	vga_to_curses[0xce] = ACS_LANTERN;
	454	vga_to_curses[0xd8] = ACS_NEQUAL;
	455	vga_to_curses[0xd9] = ACS_LRCORNER;
	456	vga_to_curses[0xda] = ACS_ULCORNER;
	457	vga_to_curses[0xdb] = ACS_BLOCK;
	458	vga_to_curses[0xe3] = ACS_PI;
	459	vga_to_curses[0xf1] = ACS_PLMINUS;
	460	vga_to_curses[0xf2] = ACS_GEQUAL;
	461	vga_to_curses[0xf3] = ACS_LEQUAL;
	462	vga_to_curses[0xf8] = ACS_DEGREE;
	463	vga_to_curses[0xfe] = ACS_BULLET;
4d3b6f6e AZ	464	}
	465
	466	static void curses_keyboard_setup(void)
	467	{
4d3b6f6e AZ	468	#if defined(__APPLE__)
	469	/* always use generic keymaps */
	470	if (!keyboard_layout)
	471	keyboard_layout = "en-us";
	472	#endif
	473	if(keyboard_layout) {
ab4f931e FL	474	kbd_layout = init_keyboard_layout(name2keysym, keyboard_layout,
ab4f931e FL	475	&error_fatal);
4d3b6f6e	476	}
4d3b6f6e AZ	477	}
4d3b6f6e AZ	478
7c20b4a3 GH	479	static const DisplayChangeListenerOps dcl_ops = {
	480	.dpy_name = "curses",
	481	.dpy_text_update = curses_update,
	482	.dpy_text_resize = curses_resize,
	483	.dpy_refresh = curses_refresh,
	484	.dpy_text_cursor = curses_cursor_position,
	485	};
	486
b0766612	487	static void curses_display_init(DisplayState ds, DisplayOptions opts)
4d3b6f6e AZ	488	{
	489	#ifndef _WIN32
	490	if (!isatty(1)) {
	491	fprintf(stderr, "We need a terminal output\n");
	492	exit(1);
	493	}
	494	#endif
	495
	496	curses_setup();
	497	curses_keyboard_setup();
28695489	498	atexit(curses_atexit);
4d3b6f6e	499
032ac6f8	500	curses_winch_init();
4d3b6f6e	501
fedf0d35	502	dcl = g_new0(DisplayChangeListener, 1);
7c20b4a3	503	dcl->ops = &dcl_ops;
5209089f	504	register_displaychangelistener(dcl);
4d3b6f6e AZ	505
4d3b6f6e AZ	506	invalidate = 1;
4d3b6f6e	507	}
b0766612 GH	508
	509	static QemuDisplay qemu_display_curses = {
	510	.type = DISPLAY_TYPE_CURSES,
	511	.init = curses_display_init,
	512	};
	513
	514	static void register_curses(void)
	515	{
	516	qemu_display_register(&qemu_display_curses);
	517	}
	518
	519	type_init(register_curses);