1 /****************************************************************************
2 * Copyright (c) 1998-2012,2013 Free Software Foundation, Inc. *
4 * Permission is hereby granted, free of charge, to any person obtaining a *
5 * copy of this software and associated documentation files (the *
6 * "Software"), to deal in the Software without restriction, including *
7 * without limitation the rights to use, copy, modify, merge, publish, *
8 * distribute, distribute with modifications, sublicense, and/or sell *
9 * copies of the Software, and to permit persons to whom the Software is *
10 * furnished to do so, subject to the following conditions: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * Except as contained in this notice, the name(s) of the above copyright *
24 * holders shall not be used in advertising or otherwise to promote the *
25 * sale, use or other dealings in this Software without prior written *
27 ****************************************************************************/
29 /****************************************************************************
30 * Author: Juergen Pfeifer *
31 ****************************************************************************/
34 * TODO - GetMousePos(POINT * result) from ntconio.c
35 * TODO - implement nodelay
38 #include <curses.priv.h>
39 #define CUR my_term.type.
41 MODULE_ID("$Id: win_driver.c,v 1.16 2013/01/05 23:16:54 tom Exp $")
43 #define WINMAGIC NCDRV_MAGIC(NCDRV_WINCONSOLE)
45 #define EXP_OPTIMIZE 0
47 #define AssertTCB() assert(TCB!=0 && TCB->magic==WINMAGIC)
48 #define SetSP() assert(TCB->csp!=0); sp = TCB->csp; (void) sp
50 #define GenMap(vKey,key) MAKELONG(key, vKey)
52 static const LONG keylist[] =
54 GenMap(VK_PRIOR, KEY_PPAGE),
55 GenMap(VK_NEXT, KEY_NPAGE),
56 GenMap(VK_END, KEY_END),
57 GenMap(VK_HOME, KEY_HOME),
58 GenMap(VK_LEFT, KEY_LEFT),
59 GenMap(VK_UP, KEY_UP),
60 GenMap(VK_RIGHT, KEY_RIGHT),
61 GenMap(VK_DOWN, KEY_DOWN),
62 GenMap(VK_DELETE, KEY_DC),
63 GenMap(VK_INSERT, KEY_IC)
65 #define N_INI ((int)(sizeof(keylist)/sizeof(keylist[0])))
67 #define MAPSIZE (FKEYS + N_INI)
70 typedef struct props {
71 CONSOLE_SCREEN_BUFFER_INFO SBI;
78 #define PropOf(TCB) ((Properties*)TCB->prop)
81 _nc_mingw_ioctl(int fd GCC_UNUSED,
82 long int request GCC_UNUSED,
83 struct termios *arg GCC_UNUSED)
87 fprintf(stderr, "TERMINFO currently not supported on Windows.\n");
92 MapColor(bool fore, int color)
94 static const int _cmap[] =
95 {0, 4, 2, 6, 1, 5, 3, 7};
97 if (color < 0 || color > 7)
107 MapAttr(TERMINAL_CONTROL_BLOCK * TCB, WORD res, attr_t ch)
116 if (p > 0 && p < NUMPAIRS && TCB != 0 && sp != 0) {
118 a = PropOf(TCB)->pairs[p];
119 res = (res & 0xff00) | a;
124 res = ((res & 0xff00) | (((res & 0x07) << 4) | ((res & 0x70) >> 4)));
127 res = ((res & 0xff00) | (((res & 0x07) << 4) | ((res & 0x70) >> 4))
128 | BACKGROUND_INTENSITY);
131 res |= FOREGROUND_INTENSITY;
134 res |= BACKGROUND_INTENSITY;
139 #if USE_WIDEC_SUPPORT
141 * TODO: support surrogate pairs
142 * TODO: support combining characters
144 * TODO: check wcwidth of base character, fill if needed for double-width
145 * TODO: _nc_wacs should be part of sp.
148 con_write16(TERMINAL_CONTROL_BLOCK * TCB, int y, int x, cchar_t *str, int limit)
160 if (TCB == 0 || InvalidConsoleHandle(TCB->hdl))
165 for (i = actual = 0; i < limit; i++) {
169 ci[actual].Char.UnicodeChar = CharOf(ch);
170 ci[actual].Attributes = MapAttr(TCB,
171 PropOf(TCB)->SBI.wAttributes,
173 if (AttrOf(ch) & A_ALTCHARSET) {
175 int which = CharOf(ch);
178 && CharOf(_nc_wacs[which]) != 0) {
179 ci[actual].Char.UnicodeChar = CharOf(_nc_wacs[which]);
181 ci[actual].Char.UnicodeChar = ' ';
190 siz.X = (short) actual;
193 rec.Left = (short) x;
195 rec.Right = (short) (x + limit - 1);
196 rec.Bottom = rec.Top;
198 return WriteConsoleOutputW(TCB->hdl, ci, siz, loc, &rec);
200 #define con_write(tcb, y, x, str, n) con_write16(tcb, y, x, str, n)
203 con_write8(TERMINAL_CONTROL_BLOCK * TCB, int y, int x, chtype *str, int n)
214 if (TCB == 0 || InvalidConsoleHandle(TCB->hdl))
219 for (i = 0; i < n; i++) {
221 ci[i].Char.AsciiChar = ChCharOf(ch);
222 ci[i].Attributes = MapAttr(TCB,
223 PropOf(TCB)->SBI.wAttributes,
225 if (ChAttrOf(ch) & A_ALTCHARSET) {
227 ci[i].Char.AsciiChar =
228 ChCharOf(NCURSES_SP_NAME(_nc_acs_char) (sp, ChCharOf(ch)));
237 rec.Left = (short) x;
239 rec.Right = (short) (x + n - 1);
240 rec.Bottom = rec.Top;
242 return WriteConsoleOutput(TCB->hdl, ci, siz, loc, &rec);
244 #define con_write(tcb, y, x, str, n) con_write8(tcb, y, x, str, n)
249 * Comparing new/current screens, determine the last column-index for a change
250 * beginning on the given row,col position. Unlike a serial terminal, there is
251 * no cost for "moving" the "cursor" on the line as we update it.
254 find_end_of_change(SCREEN *sp, int row, int col)
257 struct ldat *curdat = CurScreen(sp)->_line + row;
258 struct ldat *newdat = NewScreen(sp)->_line + row;
260 while (col <= newdat->lastchar) {
261 #if USE_WIDEC_SUPPORT
262 if (isWidecExt(curdat->text[col]) || isWidecExt(newdat->text[col])) {
264 } else if (memcmp(&curdat->text[col],
266 sizeof(curdat->text[0]))) {
272 if (curdat->text[col] != newdat->text[col]) {
284 * Given a row,col position at the end of a change-chunk, look for the
285 * beginning of the next change-chunk.
288 find_next_change(SCREEN *sp, int row, int col)
290 struct ldat *curdat = CurScreen(sp)->_line + row;
291 struct ldat *newdat = NewScreen(sp)->_line + row;
292 int result = newdat->lastchar + 1;
294 while (++col <= newdat->lastchar) {
295 #if USE_WIDEC_SUPPORT
296 if (isWidecExt(curdat->text[col]) != isWidecExt(newdat->text[col])) {
299 } else if (memcmp(&curdat->text[col],
301 sizeof(curdat->text[0]))) {
306 if (curdat->text[col] != newdat->text[col]) {
315 #define EndChange(first) \
316 find_end_of_change(sp, y, first)
317 #define NextChange(last) \
318 find_next_change(sp, y, last)
320 #endif /* EXP_OPTIMIZE */
322 #define MARK_NOCHANGE(win,row) \
323 win->_line[row].firstchar = _NOCHANGE; \
324 win->_line[row].lastchar = _NOCHANGE
327 drv_doupdate(TERMINAL_CONTROL_BLOCK * TCB)
329 int y, nonempty, n, x0, x1, Width, Height;
335 Width = screen_columns(sp);
336 Height = screen_lines(sp);
337 nonempty = min(Height, NewScreen(sp)->_maxy + 1);
339 if ((CurScreen(sp)->_clear || NewScreen(sp)->_clear)) {
341 #if USE_WIDEC_SUPPORT
342 cchar_t empty[Width];
348 for (x = 0; x < Width; x++)
349 setcchar(&empty[x], blank, 0, 0, 0);
353 for (x = 0; x < Width; x++)
357 for (y = 0; y < nonempty; y++) {
358 con_write(TCB, y, 0, empty, Width);
360 CurScreen(sp)->_line[y].text,
361 Width * sizeof(empty[0]));
363 CurScreen(sp)->_clear = FALSE;
364 NewScreen(sp)->_clear = FALSE;
365 touchwin(NewScreen(sp));
368 for (y = 0; y < nonempty; y++) {
369 x0 = NewScreen(sp)->_line[y].firstchar;
370 if (x0 != _NOCHANGE) {
373 int limit = NewScreen(sp)->_line[y].lastchar;
374 while ((x1 = EndChange(x0)) <= limit) {
375 while ((x2 = NextChange(x1)) <= limit && x2 <= (x1 + 2)) {
379 memcpy(&CurScreen(sp)->_line[y].text[x0],
380 &NewScreen(sp)->_line[y].text[x0],
381 n * sizeof(CurScreen(sp)->_line[y].text[x0]));
385 &CurScreen(sp)->_line[y].text[x0], n);
389 /* mark line changed successfully */
390 if (y <= NewScreen(sp)->_maxy) {
391 MARK_NOCHANGE(NewScreen(sp), y);
393 if (y <= CurScreen(sp)->_maxy) {
394 MARK_NOCHANGE(CurScreen(sp), y);
397 x1 = NewScreen(sp)->_line[y].lastchar;
400 memcpy(&CurScreen(sp)->_line[y].text[x0],
401 &NewScreen(sp)->_line[y].text[x0],
402 n * sizeof(CurScreen(sp)->_line[y].text[x0]));
406 &CurScreen(sp)->_line[y].text[x0], n);
408 /* mark line changed successfully */
409 if (y <= NewScreen(sp)->_maxy) {
410 MARK_NOCHANGE(NewScreen(sp), y);
412 if (y <= CurScreen(sp)->_maxy) {
413 MARK_NOCHANGE(CurScreen(sp), y);
420 /* put everything back in sync */
421 for (y = nonempty; y <= NewScreen(sp)->_maxy; y++) {
422 MARK_NOCHANGE(NewScreen(sp), y);
424 for (y = nonempty; y <= CurScreen(sp)->_maxy; y++) {
425 MARK_NOCHANGE(CurScreen(sp), y);
428 if (!NewScreen(sp)->_leaveok) {
429 CurScreen(sp)->_curx = NewScreen(sp)->_curx;
430 CurScreen(sp)->_cury = NewScreen(sp)->_cury;
432 TCB->drv->hwcur(TCB, 0, 0, CurScreen(sp)->_cury, CurScreen(sp)->_curx);
434 SetConsoleActiveScreenBuffer(TCB->hdl);
439 drv_CanHandle(TERMINAL_CONTROL_BLOCK * TCB,
441 int *errret GCC_UNUSED)
445 T((T_CALLED("win32con::drv_CanHandle(%p)"), TCB));
450 TCB->magic = WINMAGIC;
451 if (*tname == 0 || *tname == 0 || *tname == '#') {
458 #if (USE_DATABASE || USE_TERMCAP)
459 status = _nc_setup_tinfo(tname, &my_term.type);
463 if (status != TGETENT_YES) {
464 const TERMTYPE *fallback = _nc_fallback(tname);
467 my_term.type = *fallback;
468 status = TGETENT_YES;
469 } else if (!strcmp(tname, "unknown")) {
473 if (status == TGETENT_YES) {
474 if (generic_type || hard_copy)
480 if ((TCB->term.type.Booleans) == 0) {
481 _nc_init_entry(&(TCB->term.type));
489 drv_dobeepflash(TERMINAL_CONTROL_BLOCK * TCB,
490 int beepFlag GCC_UNUSED)
502 drv_print(TERMINAL_CONTROL_BLOCK * TCB,
503 char *data GCC_UNUSED,
515 drv_defaultcolors(TERMINAL_CONTROL_BLOCK * TCB,
529 drv_setcolor(TERMINAL_CONTROL_BLOCK * TCB,
532 int (*outc) (SCREEN *, int) GCC_UNUSED)
536 if (TCB && !InvalidConsoleHandle(TCB->hdl)) {
537 WORD a = MapColor(fore, color);
538 a = ((PropOf(TCB)->SBI.wAttributes) & (fore ? 0xfff8 : 0xff8f)) | a;
539 SetConsoleTextAttribute(TCB->hdl, a);
540 GetConsoleScreenBufferInfo(TCB->hdl, &(PropOf(TCB)->SBI));
545 drv_rescol(TERMINAL_CONTROL_BLOCK * TCB)
550 if (TCB && !InvalidConsoleHandle(TCB->hdl)) {
551 WORD a = FOREGROUND_BLUE | FOREGROUND_RED | FOREGROUND_GREEN;
552 SetConsoleTextAttribute(TCB->hdl, a);
553 GetConsoleScreenBufferInfo(TCB->hdl, &(PropOf(TCB)->SBI));
560 drv_rescolors(TERMINAL_CONTROL_BLOCK * TCB)
572 drv_size(TERMINAL_CONTROL_BLOCK * TCB, int *Lines, int *Cols)
576 if (TCB == NULL || Lines == NULL || Cols == NULL || InvalidConsoleHandle(TCB->hdl))
579 *Lines = (int) (PropOf(TCB)->SBI.dwSize.Y);
580 *Cols = (int) (PropOf(TCB)->SBI.dwSize.X);
585 drv_setsize(TERMINAL_CONTROL_BLOCK * TCB GCC_UNUSED,
594 drv_sgmode(TERMINAL_CONTROL_BLOCK * TCB, int setFlag, TTY * buf)
602 if (TCB == 0 || buf == NULL)
606 iflag = buf->c_iflag;
607 lflag = buf->c_lflag;
609 GetConsoleMode(TCB->inp, &dwFlag);
612 dwFlag |= ENABLE_LINE_INPUT;
614 dwFlag &= ~ENABLE_LINE_INPUT;
617 dwFlag |= ENABLE_ECHO_INPUT;
619 dwFlag &= ~ENABLE_ECHO_INPUT;
622 dwFlag |= ENABLE_PROCESSED_INPUT;
624 dwFlag &= ~ENABLE_PROCESSED_INPUT;
626 dwFlag |= ENABLE_MOUSE_INPUT;
628 buf->c_iflag = iflag;
629 buf->c_lflag = lflag;
630 SetConsoleMode(TCB->inp, dwFlag);
631 TCB->term.Nttyb = *buf;
633 iflag = TCB->term.Nttyb.c_iflag;
634 lflag = TCB->term.Nttyb.c_lflag;
635 GetConsoleMode(TCB->inp, &dwFlag);
637 if (dwFlag & ENABLE_LINE_INPUT)
642 if (dwFlag & ENABLE_ECHO_INPUT)
647 if (dwFlag & ENABLE_PROCESSED_INPUT)
652 TCB->term.Nttyb.c_iflag = iflag;
653 TCB->term.Nttyb.c_lflag = lflag;
655 *buf = TCB->term.Nttyb;
661 drv_mode(TERMINAL_CONTROL_BLOCK * TCB, int progFlag, int defFlag)
664 TERMINAL *_term = (TERMINAL *) TCB;
670 PropOf(TCB)->progMode = progFlag;
671 SetConsoleActiveScreenBuffer(progFlag ? TCB->hdl : TCB->out);
673 if (progFlag) /* prog mode */ {
675 if ((drv_sgmode(TCB, FALSE, &(_term->Nttyb)) == OK)) {
676 _term->Nttyb.c_oflag &= ~OFLAGS_TABS;
680 /* reset_prog_mode */
681 if (drv_sgmode(TCB, TRUE, &(_term->Nttyb)) == OK) {
684 _nc_keypad(sp, TRUE);
685 NC_BUFFERED(sp, TRUE);
690 } else { /* shell mode */
693 if (drv_sgmode(TCB, FALSE, &(_term->Ottyb)) == OK) {
697 /* reset_shell_mode */
699 _nc_keypad(sp, FALSE);
700 NCURSES_SP_NAME(_nc_flush) (sp);
701 NC_BUFFERED(sp, FALSE);
703 code = drv_sgmode(TCB, TRUE, &(_term->Ottyb));
711 drv_screen_init(SCREEN *sp GCC_UNUSED)
716 drv_wrap(SCREEN *sp GCC_UNUSED)
721 rkeycompare(const void *el1, const void *el2)
723 WORD key1 = (LOWORD((*((const LONG *) el1)))) & 0x7fff;
724 WORD key2 = (LOWORD((*((const LONG *) el2)))) & 0x7fff;
726 return ((key1 < key2) ? -1 : ((key1 == key2) ? 0 : 1));
730 keycompare(const void *el1, const void *el2)
732 WORD key1 = HIWORD((*((const LONG *) el1)));
733 WORD key2 = HIWORD((*((const LONG *) el2)));
735 return ((key1 < key2) ? -1 : ((key1 == key2) ? 0 : 1));
739 MapKey(TERMINAL_CONTROL_BLOCK * TCB, WORD vKey)
743 LONG key = GenMap(vKey, 0);
750 (size_t) (N_INI + FKEYS),
754 key = *((LONG *) res);
756 code = (int) (nKey & 0x7fff);
764 drv_release(TERMINAL_CONTROL_BLOCK * TCB)
766 T((T_CALLED("win32con::drv_release(%p)"), TCB));
776 drv_init(TERMINAL_CONTROL_BLOCK * TCB)
780 T((T_CALLED("win32con::drv_init(%p)"), TCB));
785 BOOL b = AllocConsole();
790 b = AttachConsole(ATTACH_PARENT_PROCESS);
792 TCB->inp = GetStdHandle(STD_INPUT_HANDLE);
793 TCB->out = GetStdHandle(STD_OUTPUT_HANDLE);
798 TCB->hdl = CreateConsoleScreenBuffer(GENERIC_READ | GENERIC_WRITE,
801 CONSOLE_TEXTMODE_BUFFER,
804 if (!InvalidConsoleHandle(TCB->hdl)) {
805 TCB->prop = typeCalloc(Properties, 1);
806 GetConsoleScreenBufferInfo(TCB->hdl, &(PropOf(TCB)->SBI));
809 TCB->info.initcolor = TRUE;
810 TCB->info.canchange = FALSE;
811 TCB->info.hascolor = TRUE;
812 TCB->info.caninit = TRUE;
814 TCB->info.maxpairs = NUMPAIRS;
815 TCB->info.maxcolors = 8;
816 TCB->info.numlabels = 0;
817 TCB->info.labelwidth = 0;
818 TCB->info.labelheight = 0;
819 TCB->info.nocolorvideo = 1;
820 TCB->info.tabsize = 8;
822 if (GetNumberOfConsoleMouseButtons(&num_buttons)) {
823 T(("mouse has %ld buttons", num_buttons));
824 TCB->info.numbuttons = num_buttons;
826 TCB->info.numbuttons = 1;
829 TCB->info.defaultPalette = _nc_cga_palette;
831 for (i = 0; i < (N_INI + FKEYS); i++) {
833 PropOf(TCB)->rmap[i] = PropOf(TCB)->map[i] = keylist[i];
835 PropOf(TCB)->rmap[i] = PropOf(TCB)->map[i] =
836 GenMap((VK_F1 + (i - N_INI)), (KEY_F(1) + (i - N_INI)));
838 qsort(PropOf(TCB)->map,
842 qsort(PropOf(TCB)->rmap,
847 a = MapColor(true, COLOR_WHITE) | MapColor(false, COLOR_BLACK);
848 for (i = 0; i < NUMPAIRS; i++)
849 PropOf(TCB)->pairs[i] = a;
855 drv_initpair(TERMINAL_CONTROL_BLOCK * TCB,
865 if ((pair > 0) && (pair < NUMPAIRS) && (f >= 0) && (f < 8)
866 && (b >= 0) && (b < 8)) {
867 PropOf(TCB)->pairs[pair] = MapColor(true, f) | MapColor(false, b);
872 drv_initcolor(TERMINAL_CONTROL_BLOCK * TCB,
873 int color GCC_UNUSED,
885 drv_do_color(TERMINAL_CONTROL_BLOCK * TCB,
886 int old_pair GCC_UNUSED,
888 int reverse GCC_UNUSED,
889 int (*outc) (SCREEN *, int) GCC_UNUSED
899 drv_initmouse(TERMINAL_CONTROL_BLOCK * TCB)
906 sp->_mouse_type = M_TERM_DRIVER;
910 drv_testmouse(TERMINAL_CONTROL_BLOCK * TCB, int delay)
918 if (sp->_drv_mouse_head < sp->_drv_mouse_tail) {
921 rc = TCBOf(sp)->drv->twait(TCBOf(sp),
932 drv_mvcur(TERMINAL_CONTROL_BLOCK * TCB,
933 int yold GCC_UNUSED, int xold GCC_UNUSED,
937 if (TCB && !InvalidConsoleHandle(TCB->hdl)) {
941 SetConsoleCursorPosition(TCB->hdl, loc);
948 drv_hwlabel(TERMINAL_CONTROL_BLOCK * TCB,
949 int labnum GCC_UNUSED,
950 char *text GCC_UNUSED)
959 drv_hwlabelOnOff(TERMINAL_CONTROL_BLOCK * TCB,
960 int OnFlag GCC_UNUSED)
969 drv_conattr(TERMINAL_CONTROL_BLOCK * TCB GCC_UNUSED)
971 chtype res = A_NORMAL;
972 res |= (A_BOLD | A_DIM | A_REVERSE | A_STANDOUT | A_COLOR);
977 drv_setfilter(TERMINAL_CONTROL_BLOCK * TCB)
986 drv_initacs(TERMINAL_CONTROL_BLOCK * TCB,
987 chtype *real_map GCC_UNUSED,
988 chtype *fake_map GCC_UNUSED)
990 #define DATA(a,b) { a, b }
995 DATA('a', 0xb1), /* ACS_CKBOARD */
996 DATA('f', 0xf8), /* ACS_DEGREE */
997 DATA('g', 0xf1), /* ACS_PLMINUS */
998 DATA('j', 0xd9), /* ACS_LRCORNER */
999 DATA('l', 0xda), /* ACS_ULCORNER */
1000 DATA('k', 0xbf), /* ACS_URCORNER */
1001 DATA('m', 0xc0), /* ACS_LLCORNER */
1002 DATA('n', 0xc5), /* ACS_PLUS */
1003 DATA('q', 0xc4), /* ACS_HLINE */
1004 DATA('t', 0xc3), /* ACS_LTEE */
1005 DATA('u', 0xb4), /* ACS_RTEE */
1006 DATA('v', 0xc1), /* ACS_BTEE */
1007 DATA('w', 0xc2), /* ACS_TTEE */
1008 DATA('x', 0xb3), /* ACS_VLINE */
1009 DATA('y', 0xf3), /* ACS_LEQUAL */
1010 DATA('z', 0xf2), /* ACS_GEQUAL */
1011 DATA('0', 0xdb), /* ACS_BLOCK */
1012 DATA('{', 0xe3), /* ACS_PI */
1013 DATA('}', 0x9c), /* ACS_STERLING */
1014 DATA(',', 0xae), /* ACS_LARROW */
1015 DATA('+', 0xaf), /* ACS_RARROW */
1016 DATA('~', 0xf9), /* ACS_BULLET */
1025 for (n = 0; n < SIZEOF(table); ++n) {
1026 real_map[table[n].acs_code] = table[n].use_code | A_ALTCHARSET;
1028 sp->_screen_acs_map[table[n].acs_code] = TRUE;
1033 tdiff(FILETIME fstart, FILETIME fend)
1035 ULARGE_INTEGER ustart;
1036 ULARGE_INTEGER uend;
1039 ustart.LowPart = fstart.dwLowDateTime;
1040 ustart.HighPart = fstart.dwHighDateTime;
1041 uend.LowPart = fend.dwLowDateTime;
1042 uend.HighPart = fend.dwHighDateTime;
1044 diff = (uend.QuadPart - ustart.QuadPart) / 10000;
1049 Adjust(int milliseconds, int diff)
1051 if (milliseconds == INFINITY)
1052 return milliseconds;
1053 milliseconds -= diff;
1054 if (milliseconds < 0)
1056 return milliseconds;
1059 #define BUTTON_MASK (FROM_LEFT_1ST_BUTTON_PRESSED | \
1060 FROM_LEFT_2ND_BUTTON_PRESSED | \
1061 FROM_LEFT_3RD_BUTTON_PRESSED | \
1062 FROM_LEFT_4TH_BUTTON_PRESSED | \
1063 RIGHTMOST_BUTTON_PRESSED)
1066 decode_mouse(TERMINAL_CONTROL_BLOCK * TCB, int mask)
1074 if (mask & FROM_LEFT_1ST_BUTTON_PRESSED)
1075 result |= BUTTON1_PRESSED;
1076 if (mask & FROM_LEFT_2ND_BUTTON_PRESSED)
1077 result |= BUTTON2_PRESSED;
1078 if (mask & FROM_LEFT_3RD_BUTTON_PRESSED)
1079 result |= BUTTON3_PRESSED;
1080 if (mask & FROM_LEFT_4TH_BUTTON_PRESSED)
1081 result |= BUTTON4_PRESSED;
1083 if (mask & RIGHTMOST_BUTTON_PRESSED) {
1084 switch (TCB->info.numbuttons) {
1086 result |= BUTTON1_PRESSED;
1089 result |= BUTTON2_PRESSED;
1092 result |= BUTTON3_PRESSED;
1095 result |= BUTTON4_PRESSED;
1104 drv_twait(TERMINAL_CONTROL_BLOCK * TCB,
1108 EVENTLIST_2nd(_nc_eventlist * evl))
1111 INPUT_RECORD inp_rec;
1113 DWORD nRead = 0, rc = -1;
1118 bool isImmed = (milliseconds == 0);
1120 #define CONSUME() ReadConsoleInput(TCB->inp,&inp_rec,1,&nRead)
1125 TR(TRACE_IEVENT, ("start twait: %d milliseconds, mode: %d",
1126 milliseconds, mode));
1128 if (milliseconds < 0)
1129 milliseconds = INFINITY;
1131 memset(&inp_rec, 0, sizeof(inp_rec));
1134 GetSystemTimeAsFileTime(&fstart);
1135 rc = WaitForSingleObject(TCB->inp, milliseconds);
1136 GetSystemTimeAsFileTime(&fend);
1137 diff = (int) tdiff(fstart, fend);
1138 milliseconds = Adjust(milliseconds, diff);
1140 if (!isImmed && milliseconds == 0)
1143 if (rc == WAIT_OBJECT_0) {
1145 b = GetNumberOfConsoleInputEvents(TCB->inp, &nRead);
1146 if (b && nRead > 0) {
1147 b = PeekConsoleInput(TCB->inp, &inp_rec, 1, &nRead);
1148 if (b && nRead > 0) {
1149 switch (inp_rec.EventType) {
1151 if (mode & TW_INPUT) {
1152 WORD vk = inp_rec.Event.KeyEvent.wVirtualKeyCode;
1153 char ch = inp_rec.Event.KeyEvent.uChar.AsciiChar;
1155 if (inp_rec.Event.KeyEvent.bKeyDown) {
1157 int nKey = MapKey(TCB, vk);
1158 if ((nKey < 0) || FALSE == sp->_keypad_on) {
1171 if (decode_mouse(TCB,
1172 (inp_rec.Event.MouseEvent.dwButtonState
1173 & BUTTON_MASK)) == 0) {
1175 } else if (mode & TW_MOUSE) {
1181 SetConsoleActiveScreenBuffer(!PropOf(TCB)->progMode ?
1182 TCB->hdl : TCB->out);
1190 if (rc != WAIT_TIMEOUT) {
1201 TR(TRACE_IEVENT, ("end twait: returned %d (%d), remaining time %d msec",
1202 code, errno, milliseconds));
1205 *timeleft = milliseconds;
1211 handle_mouse(TERMINAL_CONTROL_BLOCK * TCB, MOUSE_EVENT_RECORD mer)
1215 bool result = FALSE;
1220 sp->_drv_mouse_old_buttons = sp->_drv_mouse_new_buttons;
1221 sp->_drv_mouse_new_buttons = mer.dwButtonState & BUTTON_MASK;
1224 * We're only interested if the button is pressed or released.
1225 * FIXME: implement continuous event-tracking.
1227 if (sp->_drv_mouse_new_buttons != sp->_drv_mouse_old_buttons) {
1229 memset(&work, 0, sizeof(work));
1231 if (sp->_drv_mouse_new_buttons) {
1233 work.bstate |= decode_mouse(TCB, sp->_drv_mouse_new_buttons);
1237 /* cf: BUTTON_PRESSED, BUTTON_RELEASED */
1238 work.bstate |= (decode_mouse(TCB, sp->_drv_mouse_old_buttons) >> 1);
1243 work.x = mer.dwMousePosition.X;
1244 work.y = mer.dwMousePosition.Y;
1246 sp->_drv_mouse_fifo[sp->_drv_mouse_tail] = work;
1247 sp->_drv_mouse_tail += 1;
1254 drv_read(TERMINAL_CONTROL_BLOCK * TCB, int *buf)
1258 INPUT_RECORD inp_rec;
1267 memset(&inp_rec, 0, sizeof(inp_rec));
1269 T((T_CALLED("win32con::drv_read(%p)"), TCB));
1270 while ((b = ReadConsoleInput(TCB->inp, &inp_rec, 1, &nRead))) {
1271 if (b && nRead > 0) {
1272 if (inp_rec.EventType == KEY_EVENT) {
1273 if (!inp_rec.Event.KeyEvent.bKeyDown)
1275 *buf = (int) inp_rec.Event.KeyEvent.uChar.AsciiChar;
1276 vk = inp_rec.Event.KeyEvent.wVirtualKeyCode;
1278 if (sp->_keypad_on) {
1279 *buf = MapKey(TCB, vk);
1286 } else { /* *buf != 0 */
1289 } else if (inp_rec.EventType == MOUSE_EVENT) {
1290 if (handle_mouse(TCB, inp_rec.Event.MouseEvent)) {
1302 drv_nap(TERMINAL_CONTROL_BLOCK * TCB GCC_UNUSED, int ms)
1309 drv_kyExist(TERMINAL_CONTROL_BLOCK * TCB, int keycode)
1315 LONG key = GenMap(0, (WORD) keycode);
1324 (size_t) (N_INI + FKEYS),
1328 key = *((LONG *) res);
1330 if (!(nKey & 0x8000))
1337 drv_kpad(TERMINAL_CONTROL_BLOCK * TCB, int flag GCC_UNUSED)
1352 drv_keyok(TERMINAL_CONTROL_BLOCK * TCB, int keycode, int flag)
1359 LONG key = GenMap(0, (WORD) keycode);
1367 (size_t) (N_INI + FKEYS),
1371 key = *((LONG *) res);
1373 nKey = (LOWORD(key)) & 0x7fff;
1376 *(LONG *) res = GenMap(vKey, nKey);
1382 NCURSES_EXPORT_VAR (TERM_DRIVER) _nc_WIN_DRIVER = {
1384 drv_CanHandle, /* CanHandle */
1385 drv_init, /* init */
1386 drv_release, /* release */
1387 drv_size, /* size */
1388 drv_sgmode, /* sgmode */
1389 drv_conattr, /* conattr */
1390 drv_mvcur, /* hwcur */
1391 drv_mode, /* mode */
1392 drv_rescol, /* rescol */
1393 drv_rescolors, /* rescolors */
1394 drv_setcolor, /* color */
1395 drv_dobeepflash, /* DoBeepFlash */
1396 drv_initpair, /* initpair */
1397 drv_initcolor, /* initcolor */
1398 drv_do_color, /* docolor */
1399 drv_initmouse, /* initmouse */
1400 drv_testmouse, /* testmouse */
1401 drv_setfilter, /* setfilter */
1402 drv_hwlabel, /* hwlabel */
1403 drv_hwlabelOnOff, /* hwlabelOnOff */
1404 drv_doupdate, /* update */
1405 drv_defaultcolors, /* defaultcolors */
1406 drv_print, /* print */
1407 drv_size, /* getsize */
1408 drv_setsize, /* setsize */
1409 drv_initacs, /* initacs */
1410 drv_screen_init, /* scinit */
1411 drv_wrap, /* scexit */
1412 drv_twait, /* twait */
1413 drv_read, /* read */
1415 drv_kpad, /* kpad */
1416 drv_keyok, /* kyOk */
1417 drv_kyExist /* kyExist */