curses.c

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