xref: /openbmc/qemu/ui/curses.c (revision f723f626)
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/osdep.h"
26 
27 #ifndef _WIN32
28 #include <sys/ioctl.h>
29 #include <termios.h>
30 #endif
31 #include <locale.h>
32 #include <wchar.h>
33 #include <iconv.h>
34 
35 #include "qapi/error.h"
36 #include "qemu/module.h"
37 #include "ui/console.h"
38 #include "ui/input.h"
39 #include "sysemu/sysemu.h"
40 
41 #if defined(__APPLE__) || defined(__OpenBSD__)
42 #define _XOPEN_SOURCE_EXTENDED 1
43 #endif
44 
45 /* KEY_EVENT is defined in wincon.h and in curses.h. Avoid redefinition. */
46 #undef KEY_EVENT
47 #include <curses.h>
48 #undef KEY_EVENT
49 
50 #define FONT_HEIGHT 16
51 #define FONT_WIDTH 8
52 
53 enum maybe_keycode {
54     CURSES_KEYCODE,
55     CURSES_CHAR,
56     CURSES_CHAR_OR_KEYCODE,
57 };
58 
59 static DisplayChangeListener *dcl;
60 static console_ch_t *screen;
61 static WINDOW *screenpad = NULL;
62 static int width, height, gwidth, gheight, invalidate;
63 static int px, py, sminx, sminy, smaxx, smaxy;
64 
65 static const char *font_charset = "CP437";
66 static cchar_t *vga_to_curses;
67 
68 static void curses_update(DisplayChangeListener *dcl,
69                           int x, int y, int w, int h)
70 {
71     console_ch_t *line;
72     g_autofree cchar_t *curses_line = g_new(cchar_t, width);
73     wchar_t wch[CCHARW_MAX];
74     attr_t attrs;
75     short colors;
76     int ret;
77 
78     line = screen + y * width;
79     for (h += y; y < h; y ++, line += width) {
80         for (x = 0; x < width; x++) {
81             chtype ch = line[x] & A_CHARTEXT;
82             chtype at = line[x] & A_ATTRIBUTES;
83             short color_pair = PAIR_NUMBER(line[x]);
84 
85             ret = getcchar(&vga_to_curses[ch], wch, &attrs, &colors, NULL);
86             if (ret == ERR || wch[0] == 0) {
87                 wch[0] = ch;
88                 wch[1] = 0;
89             }
90             setcchar(&curses_line[x], wch, at, color_pair, NULL);
91         }
92         mvwadd_wchnstr(screenpad, y, 0, curses_line, width);
93     }
94 
95     pnoutrefresh(screenpad, py, px, sminy, sminx, smaxy - 1, smaxx - 1);
96     refresh();
97 }
98 
99 static void curses_calc_pad(void)
100 {
101     if (qemu_console_is_fixedsize(NULL)) {
102         width = gwidth;
103         height = gheight;
104     } else {
105         width = COLS;
106         height = LINES;
107     }
108 
109     if (screenpad)
110         delwin(screenpad);
111 
112     clear();
113     refresh();
114 
115     screenpad = newpad(height, width);
116 
117     if (width > COLS) {
118         px = (width - COLS) / 2;
119         sminx = 0;
120         smaxx = COLS;
121     } else {
122         px = 0;
123         sminx = (COLS - width) / 2;
124         smaxx = sminx + width;
125     }
126 
127     if (height > LINES) {
128         py = (height - LINES) / 2;
129         sminy = 0;
130         smaxy = LINES;
131     } else {
132         py = 0;
133         sminy = (LINES - height) / 2;
134         smaxy = sminy + height;
135     }
136 }
137 
138 static void curses_resize(DisplayChangeListener *dcl,
139                           int width, int height)
140 {
141     if (width == gwidth && height == gheight) {
142         return;
143     }
144 
145     gwidth = width;
146     gheight = height;
147 
148     curses_calc_pad();
149 }
150 
151 #if !defined(_WIN32) && defined(SIGWINCH) && defined(KEY_RESIZE)
152 static volatile sig_atomic_t got_sigwinch;
153 static void curses_winch_check(void)
154 {
155     struct winsize {
156         unsigned short ws_row;
157         unsigned short ws_col;
158         unsigned short ws_xpixel;   /* unused */
159         unsigned short ws_ypixel;   /* unused */
160     } ws;
161 
162     if (!got_sigwinch) {
163         return;
164     }
165     got_sigwinch = false;
166 
167     if (ioctl(1, TIOCGWINSZ, &ws) == -1) {
168         return;
169     }
170 
171     resize_term(ws.ws_row, ws.ws_col);
172     invalidate = 1;
173 }
174 
175 static void curses_winch_handler(int signum)
176 {
177     got_sigwinch = true;
178 }
179 
180 static void curses_winch_init(void)
181 {
182     struct sigaction old, winch = {
183         .sa_handler  = curses_winch_handler,
184     };
185     sigaction(SIGWINCH, &winch, &old);
186 }
187 #else
188 static void curses_winch_check(void) {}
189 static void curses_winch_init(void) {}
190 #endif
191 
192 static void curses_cursor_position(DisplayChangeListener *dcl,
193                                    int x, int y)
194 {
195     if (x >= 0) {
196         x = sminx + x - px;
197         y = sminy + y - py;
198 
199         if (x >= 0 && y >= 0 && x < COLS && y < LINES) {
200             move(y, x);
201             curs_set(1);
202             /* it seems that curs_set(1) must always be called before
203              * curs_set(2) for the latter to have effect */
204             if (!qemu_console_is_graphic(NULL)) {
205                 curs_set(2);
206             }
207             return;
208         }
209     }
210 
211     curs_set(0);
212 }
213 
214 /* generic keyboard conversion */
215 
216 #include "curses_keys.h"
217 
218 static kbd_layout_t *kbd_layout = NULL;
219 
220 static wint_t console_getch(enum maybe_keycode *maybe_keycode)
221 {
222     wint_t ret;
223     switch (get_wch(&ret)) {
224     case KEY_CODE_YES:
225         *maybe_keycode = CURSES_KEYCODE;
226         break;
227     case OK:
228         *maybe_keycode = CURSES_CHAR;
229         break;
230     case ERR:
231         ret = -1;
232         break;
233     default:
234         abort();
235     }
236     return ret;
237 }
238 
239 static int curses2foo(const int _curses2foo[], const int _curseskey2foo[],
240                       int chr, enum maybe_keycode maybe_keycode)
241 {
242     int ret = -1;
243     if (maybe_keycode == CURSES_CHAR) {
244         if (chr < CURSES_CHARS) {
245             ret = _curses2foo[chr];
246         }
247     } else {
248         if (chr < CURSES_KEYS) {
249             ret = _curseskey2foo[chr];
250         }
251         if (ret == -1 && maybe_keycode == CURSES_CHAR_OR_KEYCODE &&
252             chr < CURSES_CHARS) {
253             ret = _curses2foo[chr];
254         }
255     }
256     return ret;
257 }
258 
259 #define curses2keycode(chr, maybe_keycode) \
260     curses2foo(_curses2keycode, _curseskey2keycode, chr, maybe_keycode)
261 #define curses2keysym(chr, maybe_keycode) \
262     curses2foo(_curses2keysym, _curseskey2keysym, chr, maybe_keycode)
263 #define curses2qemu(chr, maybe_keycode) \
264     curses2foo(_curses2qemu, _curseskey2qemu, chr, maybe_keycode)
265 
266 static void curses_refresh(DisplayChangeListener *dcl)
267 {
268     int chr, keysym, keycode, keycode_alt;
269     enum maybe_keycode maybe_keycode = CURSES_KEYCODE;
270 
271     curses_winch_check();
272 
273     if (invalidate) {
274         clear();
275         refresh();
276         curses_calc_pad();
277         graphic_hw_invalidate(NULL);
278         invalidate = 0;
279     }
280 
281     graphic_hw_text_update(NULL, screen);
282 
283     while (1) {
284         /* while there are any pending key strokes to process */
285         chr = console_getch(&maybe_keycode);
286 
287         if (chr == -1)
288             break;
289 
290 #ifdef KEY_RESIZE
291         /* this shouldn't occur when we use a custom SIGWINCH handler */
292         if (maybe_keycode != CURSES_CHAR && chr == KEY_RESIZE) {
293             clear();
294             refresh();
295             curses_calc_pad();
296             curses_update(dcl, 0, 0, width, height);
297             continue;
298         }
299 #endif
300 
301         keycode = curses2keycode(chr, maybe_keycode);
302         keycode_alt = 0;
303 
304         /* alt or esc key */
305         if (keycode == 1) {
306             enum maybe_keycode next_maybe_keycode = CURSES_KEYCODE;
307             int nextchr = console_getch(&next_maybe_keycode);
308 
309             if (nextchr != -1) {
310                 chr = nextchr;
311                 maybe_keycode = next_maybe_keycode;
312                 keycode_alt = ALT;
313                 keycode = curses2keycode(chr, maybe_keycode);
314 
315                 if (keycode != -1) {
316                     keycode |= ALT;
317 
318                     /* process keys reserved for qemu */
319                     if (keycode >= QEMU_KEY_CONSOLE0 &&
320                             keycode < QEMU_KEY_CONSOLE0 + 9) {
321                         erase();
322                         wnoutrefresh(stdscr);
323                         console_select(keycode - QEMU_KEY_CONSOLE0);
324 
325                         invalidate = 1;
326                         continue;
327                     }
328                 }
329             }
330         }
331 
332         if (kbd_layout) {
333             keysym = curses2keysym(chr, maybe_keycode);
334 
335             if (keysym == -1) {
336                 if (chr < ' ') {
337                     keysym = chr + '@';
338                     if (keysym >= 'A' && keysym <= 'Z')
339                         keysym += 'a' - 'A';
340                     keysym |= KEYSYM_CNTRL;
341                 } else
342                     keysym = chr;
343             }
344 
345             keycode = keysym2scancode(kbd_layout, keysym & KEYSYM_MASK,
346                                       NULL, false);
347             if (keycode == 0)
348                 continue;
349 
350             keycode |= (keysym & ~KEYSYM_MASK) >> 16;
351             keycode |= keycode_alt;
352         }
353 
354         if (keycode == -1)
355             continue;
356 
357         if (qemu_console_is_graphic(NULL)) {
358             /* since terminals don't know about key press and release
359              * events, we need to emit both for each key received */
360             if (keycode & SHIFT) {
361                 qemu_input_event_send_key_number(NULL, SHIFT_CODE, true);
362                 qemu_input_event_send_key_delay(0);
363             }
364             if (keycode & CNTRL) {
365                 qemu_input_event_send_key_number(NULL, CNTRL_CODE, true);
366                 qemu_input_event_send_key_delay(0);
367             }
368             if (keycode & ALT) {
369                 qemu_input_event_send_key_number(NULL, ALT_CODE, true);
370                 qemu_input_event_send_key_delay(0);
371             }
372             if (keycode & ALTGR) {
373                 qemu_input_event_send_key_number(NULL, GREY | ALT_CODE, true);
374                 qemu_input_event_send_key_delay(0);
375             }
376 
377             qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, true);
378             qemu_input_event_send_key_delay(0);
379             qemu_input_event_send_key_number(NULL, keycode & KEY_MASK, false);
380             qemu_input_event_send_key_delay(0);
381 
382             if (keycode & ALTGR) {
383                 qemu_input_event_send_key_number(NULL, GREY | ALT_CODE, false);
384                 qemu_input_event_send_key_delay(0);
385             }
386             if (keycode & ALT) {
387                 qemu_input_event_send_key_number(NULL, ALT_CODE, false);
388                 qemu_input_event_send_key_delay(0);
389             }
390             if (keycode & CNTRL) {
391                 qemu_input_event_send_key_number(NULL, CNTRL_CODE, false);
392                 qemu_input_event_send_key_delay(0);
393             }
394             if (keycode & SHIFT) {
395                 qemu_input_event_send_key_number(NULL, SHIFT_CODE, false);
396                 qemu_input_event_send_key_delay(0);
397             }
398         } else {
399             keysym = curses2qemu(chr, maybe_keycode);
400             if (keysym == -1)
401                 keysym = chr;
402 
403             kbd_put_keysym(keysym);
404         }
405     }
406 }
407 
408 static void curses_atexit(void)
409 {
410     endwin();
411     g_free(vga_to_curses);
412     g_free(screen);
413 }
414 
415 /*
416  * In the following:
417  * - fch is the font glyph number
418  * - uch is the unicode value
419  * - wch is the wchar_t value (may not be unicode, e.g. on BSD/solaris)
420  * - mbch is the native local-dependent multibyte representation
421  */
422 
423 /* Setup wchar glyph for one UCS-2 char */
424 static void convert_ucs(unsigned char fch, uint16_t uch, iconv_t conv)
425 {
426     char mbch[MB_LEN_MAX];
427     wchar_t wch[2];
428     char *puch, *pmbch;
429     size_t such, smbch;
430     mbstate_t ps;
431 
432     puch = (char *) &uch;
433     pmbch = (char *) mbch;
434     such = sizeof(uch);
435     smbch = sizeof(mbch);
436 
437     if (iconv(conv, &puch, &such, &pmbch, &smbch) == (size_t) -1) {
438         fprintf(stderr, "Could not convert 0x%04x "
439                         "from UCS-2 to a multibyte character: %s\n",
440                         uch, strerror(errno));
441         return;
442     }
443 
444     memset(&ps, 0, sizeof(ps));
445     if (mbrtowc(&wch[0], mbch, sizeof(mbch) - smbch, &ps) == -1) {
446         fprintf(stderr, "Could not convert 0x%04x "
447                         "from a multibyte character to wchar_t: %s\n",
448                         uch, strerror(errno));
449         return;
450     }
451 
452     wch[1] = 0;
453     setcchar(&vga_to_curses[fch], wch, 0, 0, NULL);
454 }
455 
456 /* Setup wchar glyph for one font character */
457 static void convert_font(unsigned char fch, iconv_t conv)
458 {
459     char mbch[MB_LEN_MAX];
460     wchar_t wch[2];
461     char *pfch, *pmbch;
462     size_t sfch, smbch;
463     mbstate_t ps;
464 
465     pfch = (char *) &fch;
466     pmbch = (char *) &mbch;
467     sfch = sizeof(fch);
468     smbch = sizeof(mbch);
469 
470     if (iconv(conv, &pfch, &sfch, &pmbch, &smbch) == (size_t) -1) {
471         fprintf(stderr, "Could not convert font glyph 0x%02x "
472                         "from %s to a multibyte character: %s\n",
473                         fch, font_charset, strerror(errno));
474         return;
475     }
476 
477     memset(&ps, 0, sizeof(ps));
478     if (mbrtowc(&wch[0], mbch, sizeof(mbch) - smbch, &ps) == -1) {
479         fprintf(stderr, "Could not convert font glyph 0x%02x "
480                         "from a multibyte character to wchar_t: %s\n",
481                         fch, strerror(errno));
482         return;
483     }
484 
485     wch[1] = 0;
486     setcchar(&vga_to_curses[fch], wch, 0, 0, NULL);
487 }
488 
489 /* Convert one wchar to UCS-2 */
490 static uint16_t get_ucs(wchar_t wch, iconv_t conv)
491 {
492     char mbch[MB_LEN_MAX];
493     uint16_t uch;
494     char *pmbch, *puch;
495     size_t smbch, such;
496     mbstate_t ps;
497     int ret;
498 
499     memset(&ps, 0, sizeof(ps));
500     ret = wcrtomb(mbch, wch, &ps);
501     if (ret == -1) {
502         fprintf(stderr, "Could not convert 0x%04lx "
503                         "from wchar_t to a multibyte character: %s\n",
504                         (unsigned long)wch, strerror(errno));
505         return 0xFFFD;
506     }
507 
508     pmbch = (char *) mbch;
509     puch = (char *) &uch;
510     smbch = ret;
511     such = sizeof(uch);
512 
513     if (iconv(conv, &pmbch, &smbch, &puch, &such) == (size_t) -1) {
514         fprintf(stderr, "Could not convert 0x%04lx "
515                         "from a multibyte character to UCS-2 : %s\n",
516                         (unsigned long)wch, strerror(errno));
517         return 0xFFFD;
518     }
519 
520     return uch;
521 }
522 
523 /*
524  * Setup mapping for vga to curses line graphics.
525  */
526 static void font_setup(void)
527 {
528     iconv_t ucs2_to_nativecharset;
529     iconv_t nativecharset_to_ucs2;
530     iconv_t font_conv;
531     int i;
532     g_autofree gchar *local_codeset = g_get_codeset();
533 
534     /*
535      * Control characters are normally non-printable, but VGA does have
536      * well-known glyphs for them.
537      */
538     static const uint16_t control_characters[0x20] = {
539       0x0020,
540       0x263a,
541       0x263b,
542       0x2665,
543       0x2666,
544       0x2663,
545       0x2660,
546       0x2022,
547       0x25d8,
548       0x25cb,
549       0x25d9,
550       0x2642,
551       0x2640,
552       0x266a,
553       0x266b,
554       0x263c,
555       0x25ba,
556       0x25c4,
557       0x2195,
558       0x203c,
559       0x00b6,
560       0x00a7,
561       0x25ac,
562       0x21a8,
563       0x2191,
564       0x2193,
565       0x2192,
566       0x2190,
567       0x221f,
568       0x2194,
569       0x25b2,
570       0x25bc
571     };
572 
573     ucs2_to_nativecharset = iconv_open(local_codeset, "UCS-2");
574     if (ucs2_to_nativecharset == (iconv_t) -1) {
575         fprintf(stderr, "Could not convert font glyphs from UCS-2: '%s'\n",
576                         strerror(errno));
577         exit(1);
578     }
579 
580     nativecharset_to_ucs2 = iconv_open("UCS-2", local_codeset);
581     if (nativecharset_to_ucs2 == (iconv_t) -1) {
582         iconv_close(ucs2_to_nativecharset);
583         fprintf(stderr, "Could not convert font glyphs to UCS-2: '%s'\n",
584                         strerror(errno));
585         exit(1);
586     }
587 
588     font_conv = iconv_open(local_codeset, font_charset);
589     if (font_conv == (iconv_t) -1) {
590         iconv_close(ucs2_to_nativecharset);
591         iconv_close(nativecharset_to_ucs2);
592         fprintf(stderr, "Could not convert font glyphs from %s: '%s'\n",
593                         font_charset, strerror(errno));
594         exit(1);
595     }
596 
597     /* Control characters */
598     for (i = 0; i <= 0x1F; i++) {
599         convert_ucs(i, control_characters[i], ucs2_to_nativecharset);
600     }
601 
602     for (i = 0x20; i <= 0xFF; i++) {
603         convert_font(i, font_conv);
604     }
605 
606     /* DEL */
607     convert_ucs(0x7F, 0x2302, ucs2_to_nativecharset);
608 
609     if (strcmp(local_codeset, "UTF-8")) {
610         /* Non-Unicode capable, use termcap equivalents for those available */
611         for (i = 0; i <= 0xFF; i++) {
612             wchar_t wch[CCHARW_MAX];
613             attr_t attr;
614             short color;
615             int ret;
616 
617             ret = getcchar(&vga_to_curses[i], wch, &attr, &color, NULL);
618             if (ret == ERR)
619                 continue;
620 
621             switch (get_ucs(wch[0], nativecharset_to_ucs2)) {
622             case 0x00a3:
623                 vga_to_curses[i] = *WACS_STERLING;
624                 break;
625             case 0x2591:
626                 vga_to_curses[i] = *WACS_BOARD;
627                 break;
628             case 0x2592:
629                 vga_to_curses[i] = *WACS_CKBOARD;
630                 break;
631             case 0x2502:
632                 vga_to_curses[i] = *WACS_VLINE;
633                 break;
634             case 0x2524:
635                 vga_to_curses[i] = *WACS_RTEE;
636                 break;
637             case 0x2510:
638                 vga_to_curses[i] = *WACS_URCORNER;
639                 break;
640             case 0x2514:
641                 vga_to_curses[i] = *WACS_LLCORNER;
642                 break;
643             case 0x2534:
644                 vga_to_curses[i] = *WACS_BTEE;
645                 break;
646             case 0x252c:
647                 vga_to_curses[i] = *WACS_TTEE;
648                 break;
649             case 0x251c:
650                 vga_to_curses[i] = *WACS_LTEE;
651                 break;
652             case 0x2500:
653                 vga_to_curses[i] = *WACS_HLINE;
654                 break;
655             case 0x253c:
656                 vga_to_curses[i] = *WACS_PLUS;
657                 break;
658             case 0x256c:
659                 vga_to_curses[i] = *WACS_LANTERN;
660                 break;
661             case 0x256a:
662                 vga_to_curses[i] = *WACS_NEQUAL;
663                 break;
664             case 0x2518:
665                 vga_to_curses[i] = *WACS_LRCORNER;
666                 break;
667             case 0x250c:
668                 vga_to_curses[i] = *WACS_ULCORNER;
669                 break;
670             case 0x2588:
671                 vga_to_curses[i] = *WACS_BLOCK;
672                 break;
673             case 0x03c0:
674                 vga_to_curses[i] = *WACS_PI;
675                 break;
676             case 0x00b1:
677                 vga_to_curses[i] = *WACS_PLMINUS;
678                 break;
679             case 0x2265:
680                 vga_to_curses[i] = *WACS_GEQUAL;
681                 break;
682             case 0x2264:
683                 vga_to_curses[i] = *WACS_LEQUAL;
684                 break;
685             case 0x00b0:
686                 vga_to_curses[i] = *WACS_DEGREE;
687                 break;
688             case 0x25a0:
689                 vga_to_curses[i] = *WACS_BULLET;
690                 break;
691             case 0x2666:
692                 vga_to_curses[i] = *WACS_DIAMOND;
693                 break;
694             case 0x2192:
695                 vga_to_curses[i] = *WACS_RARROW;
696                 break;
697             case 0x2190:
698                 vga_to_curses[i] = *WACS_LARROW;
699                 break;
700             case 0x2191:
701                 vga_to_curses[i] = *WACS_UARROW;
702                 break;
703             case 0x2193:
704                 vga_to_curses[i] = *WACS_DARROW;
705                 break;
706             case 0x23ba:
707                 vga_to_curses[i] = *WACS_S1;
708                 break;
709             case 0x23bb:
710                 vga_to_curses[i] = *WACS_S3;
711                 break;
712             case 0x23bc:
713                 vga_to_curses[i] = *WACS_S7;
714                 break;
715             case 0x23bd:
716                 vga_to_curses[i] = *WACS_S9;
717                 break;
718             }
719         }
720     }
721     iconv_close(ucs2_to_nativecharset);
722     iconv_close(nativecharset_to_ucs2);
723     iconv_close(font_conv);
724 }
725 
726 static void curses_setup(void)
727 {
728     int i, colour_default[8] = {
729         [QEMU_COLOR_BLACK]   = COLOR_BLACK,
730         [QEMU_COLOR_BLUE]    = COLOR_BLUE,
731         [QEMU_COLOR_GREEN]   = COLOR_GREEN,
732         [QEMU_COLOR_CYAN]    = COLOR_CYAN,
733         [QEMU_COLOR_RED]     = COLOR_RED,
734         [QEMU_COLOR_MAGENTA] = COLOR_MAGENTA,
735         [QEMU_COLOR_YELLOW]  = COLOR_YELLOW,
736         [QEMU_COLOR_WHITE]   = COLOR_WHITE,
737     };
738 
739     /* input as raw as possible, let everything be interpreted
740      * by the guest system */
741     initscr(); noecho(); intrflush(stdscr, FALSE);
742     nodelay(stdscr, TRUE); nonl(); keypad(stdscr, TRUE);
743     start_color(); raw(); scrollok(stdscr, FALSE);
744     set_escdelay(25);
745 
746     /* Make color pair to match color format (3bits bg:3bits fg) */
747     for (i = 0; i < 64; i++) {
748         init_pair(i, colour_default[i & 7], colour_default[i >> 3]);
749     }
750     /* Set default color for more than 64 for safety. */
751     for (i = 64; i < COLOR_PAIRS; i++) {
752         init_pair(i, COLOR_WHITE, COLOR_BLACK);
753     }
754 
755     font_setup();
756 }
757 
758 static void curses_keyboard_setup(void)
759 {
760 #if defined(__APPLE__)
761     /* always use generic keymaps */
762     if (!keyboard_layout)
763         keyboard_layout = "en-us";
764 #endif
765     if(keyboard_layout) {
766         kbd_layout = init_keyboard_layout(name2keysym, keyboard_layout,
767                                           &error_fatal);
768     }
769 }
770 
771 static const DisplayChangeListenerOps dcl_ops = {
772     .dpy_name        = "curses",
773     .dpy_text_update = curses_update,
774     .dpy_text_resize = curses_resize,
775     .dpy_refresh     = curses_refresh,
776     .dpy_text_cursor = curses_cursor_position,
777 };
778 
779 static void curses_display_init(DisplayState *ds, DisplayOptions *opts)
780 {
781 #ifndef _WIN32
782     if (!isatty(1)) {
783         fprintf(stderr, "We need a terminal output\n");
784         exit(1);
785     }
786 #endif
787 
788     setlocale(LC_CTYPE, "");
789     if (opts->u.curses.charset) {
790         font_charset = opts->u.curses.charset;
791     }
792     screen = g_new0(console_ch_t, 160 * 100);
793     vga_to_curses = g_new0(cchar_t, 256);
794     curses_setup();
795     curses_keyboard_setup();
796     atexit(curses_atexit);
797 
798     curses_winch_init();
799 
800     dcl = g_new0(DisplayChangeListener, 1);
801     dcl->ops = &dcl_ops;
802     register_displaychangelistener(dcl);
803 
804     invalidate = 1;
805 }
806 
807 static QemuDisplay qemu_display_curses = {
808     .type       = DISPLAY_TYPE_CURSES,
809     .init       = curses_display_init,
810 };
811 
812 static void register_curses(void)
813 {
814     qemu_display_register(&qemu_display_curses);
815 }
816 
817 type_init(register_curses);
818