[qemu.git] / 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-common.h"
#include "console.h"
#include "sysemu.h"

#include <curses.h>

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

#ifdef __OpenBSD__
#define resize_term resizeterm
#endif

#define FONT_HEIGHT 16
#define FONT_WIDTH 8

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 void curses_update(DisplayState *ds, int x, int y, int w, int h)
{
    chtype *line;

    line = ((chtype *) screen) + y * width;
    for (h += y; y < h; y ++, line += width)
        mvwaddchnstr(screenpad, y, 0, line, width);

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

static void curses_calc_pad(void)
{
    if (is_fixedsize_console()) {
        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(DisplayState *ds)
{
    if (ds_get_width(ds) == gwidth && ds_get_height(ds) == gheight)
        return;

    gwidth = ds_get_width(ds);
    gheight = ds_get_height(ds);

    curses_calc_pad();
    ds->surface->width = width * FONT_WIDTH;
    ds->surface->height = height * FONT_HEIGHT;
}

#ifndef _WIN32
#if defined(SIGWINCH) && defined(KEY_RESIZE)
static void curses_winch_handler(int signum)
{
    struct winsize {
        unsigned short ws_row;
        unsigned short ws_col;
        unsigned short ws_xpixel;   /* unused */
        unsigned short ws_ypixel;   /* unused */
    } ws;

    /* terminal size changed */
    if (ioctl(1, TIOCGWINSZ, &ws) == -1)
        return;

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

    /* some systems require this */
    signal(SIGWINCH, curses_winch_handler);
}
#endif
#endif

static void curses_cursor_position(DisplayState *ds, 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 (!is_graphic_console())
                curs_set(2);
            return;
        }
    }

    curs_set(0);
}

/* generic keyboard conversion */

#include "curses_keys.h"
#include "keymaps.c"

static kbd_layout_t *kbd_layout = 0;
static int keycode2keysym[CURSES_KEYS];

static void curses_refresh(DisplayState *ds)
{
    int chr, nextchr, keysym, keycode;

    if (invalidate) {
        clear();
        refresh();
        curses_calc_pad();
        ds->surface->width = FONT_WIDTH * width;
        ds->surface->height = FONT_HEIGHT * height;
        vga_hw_invalidate();
        invalidate = 0;
    }

    vga_hw_text_update(screen);

    nextchr = ERR;
    while (1) {
        /* while there are any pending key strokes to process */
        if (nextchr == ERR)
            chr = getch();
        else {
            chr = nextchr;
            nextchr = ERR;
        }

        if (chr == ERR)
            break;

#ifdef KEY_RESIZE
        /* this shouldn't occur when we use a custom SIGWINCH handler */
        if (chr == KEY_RESIZE) {
            clear();
            refresh();
            curses_calc_pad();
            curses_update(ds, 0, 0, width, height);
            ds->surface->width = FONT_WIDTH * width;
            ds->surface->height = FONT_HEIGHT * height;
            continue;
        }
#endif

        keycode = curses2keycode[chr];
        if (keycode == -1)
            continue;

        /* alt key */
        if (keycode == 1) {
            nextchr = getch();

            if (nextchr != ERR) {
                keycode = curses2keycode[nextchr];
                nextchr = ERR;
                if (keycode == -1)
                    continue;

                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 && !(keycode & GREY)) {
            keysym = keycode2keysym[keycode & KEY_MASK];
            if (keysym == -1)
                keysym = chr;

            keycode &= ~KEY_MASK;
            keycode |= keysym2scancode(kbd_layout, keysym);
        }

        if (is_graphic_console()) {
            /* since terminals don't know about key press and release
             * events, we need to emit both for each key received */
            if (keycode & SHIFT)
                kbd_put_keycode(SHIFT_CODE);
            if (keycode & CNTRL)
                kbd_put_keycode(CNTRL_CODE);
            if (keycode & ALT)
                kbd_put_keycode(ALT_CODE);
            if (keycode & GREY)
                kbd_put_keycode(GREY_CODE);
            kbd_put_keycode(keycode & KEY_MASK);
            if (keycode & GREY)
                kbd_put_keycode(GREY_CODE);
            kbd_put_keycode((keycode & KEY_MASK) | KEY_RELEASE);
            if (keycode & ALT)
                kbd_put_keycode(ALT_CODE | KEY_RELEASE);
            if (keycode & CNTRL)
                kbd_put_keycode(CNTRL_CODE | KEY_RELEASE);
            if (keycode & SHIFT)
                kbd_put_keycode(SHIFT_CODE | KEY_RELEASE);
        } else {
            keysym = curses2keysym[chr];
            if (keysym == -1)
                keysym = chr;

            kbd_put_keysym(keysym);
        }
    }
}

static void curses_cleanup(void *opaque) 
{
    endwin();
}

static void curses_atexit(void)
{
    curses_cleanup(NULL);
}

static void curses_setup(void)
{
    int i, colour_default[8] = {
        COLOR_BLACK, COLOR_BLUE, COLOR_GREEN, COLOR_CYAN,
        COLOR_RED, COLOR_MAGENTA, COLOR_YELLOW, 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);

    for (i = 0; i < 64; i ++)
        init_pair(i, colour_default[i & 7], colour_default[i >> 3]);
}

static void curses_keyboard_setup(void)
{
    int i, keycode, keysym;

#if defined(__APPLE__)
    /* always use generic keymaps */
    if (!keyboard_layout)
        keyboard_layout = "en-us";
#endif
    if(keyboard_layout) {
        kbd_layout = init_keyboard_layout(keyboard_layout);
        if (!kbd_layout)
            exit(1);
    }

    for (i = 0; i < CURSES_KEYS; i ++)
        keycode2keysym[i] = -1;

    for (i = 0; i < CURSES_KEYS; i ++) {
        if (curses2keycode[i] == -1)
            continue;

        keycode = curses2keycode[i] & KEY_MASK;
        if (keycode2keysym[keycode] >= 0)
            continue;

        for (keysym = 0; keysym < CURSES_KEYS; keysym ++)
            if (curses2keycode[keysym] == keycode) {
                keycode2keysym[keycode] = keysym;
                break;
            }

        if (keysym >= CURSES_KEYS)
            keycode2keysym[keycode] = i;
    }
}

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

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

#ifndef _WIN32
#if defined(SIGWINCH) && defined(KEY_RESIZE)
    /* some curses implementations provide a handler, but we
     * want to be sure this is handled regardless of the library */
    signal(SIGWINCH, curses_winch_handler);
#endif
#endif

    dcl = (DisplayChangeListener *) qemu_mallocz(sizeof(DisplayChangeListener));
    dcl->dpy_update = curses_update;
    dcl->dpy_resize = curses_resize;
    dcl->dpy_refresh = curses_refresh;
    dcl->dpy_text_cursor = curses_cursor_position;
    register_displaychangelistener(ds, dcl);
    qemu_free_displaysurface(ds->surface);
    ds->surface = qemu_create_displaysurface_from(640, 400, 0, 0, (uint8_t*) screen);

    invalidate = 1;

    /* Standard VGA initial text mode dimensions */
    curses_resize(ds);
}
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	*/
	24
	25	#include "qemu-common.h"
	26	#include "console.h"
	27	#include "sysemu.h"
	28
	29	#include <curses.h>
	30
	31	#ifndef _WIN32
	32	#include <signal.h>
	33	#include <sys/ioctl.h>
	34	#include <termios.h>
	35	#endif
	36
128ab2ff BS	37	#ifdef __OpenBSD__
	38	#define resize_term resizeterm
	39	#endif
	40
4d3b6f6e AZ	41	#define FONT_HEIGHT 16
	42	#define FONT_WIDTH 8
	43
	44	static console_ch_t screen[160 * 100];
	45	static WINDOW *screenpad = NULL;
	46	static int width, height, gwidth, gheight, invalidate;
	47	static int px, py, sminx, sminy, smaxx, smaxy;
	48
	49	static void curses_update(DisplayState *ds, int x, int y, int w, int h)
	50	{
	51	chtype *line;
	52
	53	line = ((chtype ) screen) + y width;
	54	for (h += y; y < h; y ++, line += width)
	55	mvwaddchnstr(screenpad, y, 0, line, width);
	56
	57	pnoutrefresh(screenpad, py, px, sminy, sminx, smaxy - 1, smaxx - 1);
	58	refresh();
	59	}
	60
	61	static void curses_calc_pad(void)
	62	{
c21bbcfa	63	if (is_fixedsize_console()) {
4d3b6f6e AZ	64	width = gwidth;
	65	height = gheight;
	66	} else {
	67	width = COLS;
	68	height = LINES;
	69	}
	70
	71	if (screenpad)
	72	delwin(screenpad);
	73
	74	clear();
	75	refresh();
	76
	77	screenpad = newpad(height, width);
	78
	79	if (width > COLS) {
	80	px = (width - COLS) / 2;
	81	sminx = 0;
	82	smaxx = COLS;
	83	} else {
	84	px = 0;
	85	sminx = (COLS - width) / 2;
	86	smaxx = sminx + width;
	87	}
	88
	89	if (height > LINES) {
	90	py = (height - LINES) / 2;
	91	sminy = 0;
	92	smaxy = LINES;
	93	} else {
	94	py = 0;
	95	sminy = (LINES - height) / 2;
	96	smaxy = sminy + height;
	97	}
	98	}
	99
7d957bd8	100	static void curses_resize(DisplayState *ds)
4d3b6f6e	101	{
7d957bd8	102	if (ds_get_width(ds) == gwidth && ds_get_height(ds) == gheight)
4d3b6f6e AZ	103	return;
4d3b6f6e AZ	104
7d957bd8 AL	105	gwidth = ds_get_width(ds);
7d957bd8 AL	106	gheight = ds_get_height(ds);
4d3b6f6e AZ	107
4d3b6f6e AZ	108	curses_calc_pad();
68f00996 AL	109	ds->surface->width = width * FONT_WIDTH;
68f00996 AL	110	ds->surface->height = height * FONT_HEIGHT;
4d3b6f6e AZ	111	}
	112
	113	#ifndef _WIN32
b1314cf9	114	#if defined(SIGWINCH) && defined(KEY_RESIZE)
4d3b6f6e AZ	115	static void curses_winch_handler(int signum)
	116	{
	117	struct winsize {
	118	unsigned short ws_row;
	119	unsigned short ws_col;
	120	unsigned short ws_xpixel; /* unused */
	121	unsigned short ws_ypixel; /* unused */
	122	} ws;
	123
	124	/* terminal size changed */
	125	if (ioctl(1, TIOCGWINSZ, &ws) == -1)
	126	return;
	127
	128	resize_term(ws.ws_row, ws.ws_col);
	129	curses_calc_pad();
	130	invalidate = 1;
	131
	132	/* some systems require this */
	133	signal(SIGWINCH, curses_winch_handler);
	134	}
	135	#endif
	136	#endif
	137
	138	static void curses_cursor_position(DisplayState *ds, int x, int y)
	139	{
	140	if (x >= 0) {
	141	x = sminx + x - px;
	142	y = sminy + y - py;
	143
	144	if (x >= 0 && y >= 0 && x < COLS && y < LINES) {
	145	move(y, x);
	146	curs_set(1);
	147	/* it seems that curs_set(1) must always be called before
	148	* curs_set(2) for the latter to have effect */
	149	if (!is_graphic_console())
	150	curs_set(2);
	151	return;
	152	}
	153	}
	154
	155	curs_set(0);
	156	}
	157
	158	/* generic keyboard conversion */
	159
	160	#include "curses_keys.h"
	161	#include "keymaps.c"
	162
	163	static kbd_layout_t *kbd_layout = 0;
	164	static int keycode2keysym[CURSES_KEYS];
	165
	166	static void curses_refresh(DisplayState *ds)
	167	{
	168	int chr, nextchr, keysym, keycode;
	169
	170	if (invalidate) {
	171	clear();
	172	refresh();
	173	curses_calc_pad();
7d957bd8 AL	174	ds->surface->width = FONT_WIDTH * width;
7d957bd8 AL	175	ds->surface->height = FONT_HEIGHT * height;
4d3b6f6e AZ	176	vga_hw_invalidate();
	177	invalidate = 0;
	178	}
	179
	180	vga_hw_text_update(screen);
	181
	182	nextchr = ERR;
	183	while (1) {
	184	/* while there are any pending key strokes to process */
	185	if (nextchr == ERR)
	186	chr = getch();
	187	else {
	188	chr = nextchr;
	189	nextchr = ERR;
	190	}
	191
	192	if (chr == ERR)
	193	break;
	194
b1314cf9	195	#ifdef KEY_RESIZE
4d3b6f6e AZ	196	/* this shouldn't occur when we use a custom SIGWINCH handler */
	197	if (chr == KEY_RESIZE) {
	198	clear();
	199	refresh();
	200	curses_calc_pad();
	201	curses_update(ds, 0, 0, width, height);
7d957bd8 AL	202	ds->surface->width = FONT_WIDTH * width;
7d957bd8 AL	203	ds->surface->height = FONT_HEIGHT * height;
4d3b6f6e AZ	204	continue;
4d3b6f6e AZ	205	}
b1314cf9	206	#endif
4d3b6f6e AZ	207
	208	keycode = curses2keycode[chr];
	209	if (keycode == -1)
	210	continue;
	211
	212	/* alt key */
	213	if (keycode == 1) {
	214	nextchr = getch();
	215
	216	if (nextchr != ERR) {
	217	keycode = curses2keycode[nextchr];
	218	nextchr = ERR;
	219	if (keycode == -1)
	220	continue;
	221
	222	keycode \|= ALT;
	223
	224	/* process keys reserved for qemu */
	225	if (keycode >= QEMU_KEY_CONSOLE0 &&
	226	keycode < QEMU_KEY_CONSOLE0 + 9) {
	227	erase();
	228	wnoutrefresh(stdscr);
	229	console_select(keycode - QEMU_KEY_CONSOLE0);
	230
	231	invalidate = 1;
	232	continue;
	233	}
	234	}
	235	}
	236
	237	if (kbd_layout && !(keycode & GREY)) {
	238	keysym = keycode2keysym[keycode & KEY_MASK];
	239	if (keysym == -1)
	240	keysym = chr;
	241
	242	keycode &= ~KEY_MASK;
	243	keycode \|= keysym2scancode(kbd_layout, keysym);
	244	}
	245
	246	if (is_graphic_console()) {
	247	/* since terminals don't know about key press and release
	248	* events, we need to emit both for each key received */
	249	if (keycode & SHIFT)
	250	kbd_put_keycode(SHIFT_CODE);
	251	if (keycode & CNTRL)
	252	kbd_put_keycode(CNTRL_CODE);
	253	if (keycode & ALT)
	254	kbd_put_keycode(ALT_CODE);
	255	if (keycode & GREY)
	256	kbd_put_keycode(GREY_CODE);
	257	kbd_put_keycode(keycode & KEY_MASK);
	258	if (keycode & GREY)
	259	kbd_put_keycode(GREY_CODE);
	260	kbd_put_keycode((keycode & KEY_MASK) \| KEY_RELEASE);
	261	if (keycode & ALT)
	262	kbd_put_keycode(ALT_CODE \| KEY_RELEASE);
	263	if (keycode & CNTRL)
	264	kbd_put_keycode(CNTRL_CODE \| KEY_RELEASE);
	265	if (keycode & SHIFT)
	266	kbd_put_keycode(SHIFT_CODE \| KEY_RELEASE);
	267	} else {
	268	keysym = curses2keysym[chr];
	269	if (keysym == -1)
	270	keysym = chr;
271
272	kbd_put_keysym(keysym);
273	}
274	}
275	}
276
277	static void curses_cleanup(void *opaque)
278	{
279	endwin();
280	}
281
282	static void curses_atexit(void)
283	{
284	curses_cleanup(NULL);
285	}
286
287	static void curses_setup(void)
288	{
289	int i, colour_default[8] = {
290	COLOR_BLACK, COLOR_BLUE, COLOR_GREEN, COLOR_CYAN,
291	COLOR_RED, COLOR_MAGENTA, COLOR_YELLOW, COLOR_WHITE,
292	};
293
294	/* input as raw as possible, let everything be interpreted
295	* by the guest system */
296	initscr(); noecho(); intrflush(stdscr, FALSE);
297	nodelay(stdscr, TRUE); nonl(); keypad(stdscr, TRUE);
298	start_color(); raw(); scrollok(stdscr, FALSE);
299
300	for (i = 0; i < 64; i ++)
301	init_pair(i, colour_default[i & 7], colour_default[i >> 3]);
302	}
303
304	static void curses_keyboard_setup(void)
305	{
306	int i, keycode, keysym;
307
308	#if defined(__APPLE__)
309	/* always use generic keymaps */
310	if (!keyboard_layout)
311	keyboard_layout = "en-us";
312	#endif
313	if(keyboard_layout) {
314	kbd_layout = init_keyboard_layout(keyboard_layout);
315	if (!kbd_layout)
316	exit(1);
317	}
318
319	for (i = 0; i < CURSES_KEYS; i ++)
320	keycode2keysym[i] = -1;
321
322	for (i = 0; i < CURSES_KEYS; i ++) {
323	if (curses2keycode[i] == -1)
324	continue;
325
326	keycode = curses2keycode[i] & KEY_MASK;
327	if (keycode2keysym[keycode] >= 0)
328	continue;
329
330	for (keysym = 0; keysym < CURSES_KEYS; keysym ++)
331	if (curses2keycode[keysym] == keycode) {
332	keycode2keysym[keycode] = keysym;
333	break;
334	}
335
336	if (keysym >= CURSES_KEYS)
337	keycode2keysym[keycode] = i;
338	}
339	}
340
341	void curses_display_init(DisplayState *ds, int full_screen)
342	{
7d957bd8	343	DisplayChangeListener *dcl;
4d3b6f6e AZ	344	#ifndef _WIN32
	345	if (!isatty(1)) {
	346	fprintf(stderr, "We need a terminal output\n");
	347	exit(1);
	348	}
	349	#endif
	350
	351	curses_setup();
	352	curses_keyboard_setup();
	353	atexit(curses_atexit);
	354
	355	#ifndef _WIN32
b1314cf9	356	#if defined(SIGWINCH) && defined(KEY_RESIZE)
4d3b6f6e AZ	357	/* some curses implementations provide a handler, but we
	358	* want to be sure this is handled regardless of the library */
	359	signal(SIGWINCH, curses_winch_handler);
	360	#endif
	361	#endif
	362
7d957bd8	363	dcl = (DisplayChangeListener *) qemu_mallocz(sizeof(DisplayChangeListener));
7d957bd8 AL	364	dcl->dpy_update = curses_update;
	365	dcl->dpy_resize = curses_resize;
	366	dcl->dpy_refresh = curses_refresh;
	367	dcl->dpy_text_cursor = curses_cursor_position;
	368	register_displaychangelistener(ds, dcl);
	369	qemu_free_displaysurface(ds->surface);
68f00996	370	ds->surface = qemu_create_displaysurface_from(640, 400, 0, 0, (uint8_t*) screen);
4d3b6f6e AZ	371
	372	invalidate = 1;
	373
	374	/* Standard VGA initial text mode dimensions */
7d957bd8	375	curses_resize(ds);
4d3b6f6e	376	}