1 /*
2 * a GUI application for displaying a console
3 * (N)Curses back end
4 *
5 * Copyright 2002 Eric Pouech
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 /* Known issues & FIXME:
23 * - not all key mapping functions have been written
24 * - allow dyn loading of curses library (extreme care should be taken for
25 * functions which can be implemented as macros)
26 * - finish buffer scrolling (mainly, need to decide of a nice way for
27 * requesting the UP/DOWN operations
28 * - Resizing (unix) terminal does not change (Win32) console size.
29 * - Initial console size comes from registry and not from terminal size.
30 */
31
32 #include "config.h"
33 #include "wine/port.h"
34
35 #include <stdio.h>
36 #include <stdarg.h>
37 #include <stdlib.h>
38 #ifdef HAVE_POLL_H
39 # include <poll.h>
40 #endif
41 #ifdef HAVE_NCURSES_H
42 # include <ncurses.h>
43 #elif defined(HAVE_CURSES_H)
44 # include <curses.h>
45 #endif
46 /* avoid redefinition warnings */
47 #undef KEY_EVENT
48 #undef MOUSE_MOVED
49
50 #ifdef HAVE_UNISTD_H
51 #include <unistd.h>
52 #endif
53 #include <windef.h>
54 #include <winbase.h>
55 #include <winnls.h>
56 #include "winecon_private.h"
57
58 #include "wine/library.h"
59 #include "wine/debug.h"
60
61 WINE_DEFAULT_DEBUG_CHANNEL(curses);
62
63 #define PRIVATE(data) ((struct inner_data_curse*)((data)->private))
64
65 #if defined(SONAME_LIBCURSES) || defined(SONAME_LIBNCURSES)
66
67 #ifdef HAVE_NCURSES_H
68 # define CURSES_NAME "ncurses"
69 #else
70 # define CURSES_NAME "curses"
71 #endif
72
73 struct inner_data_curse
74 {
75 unsigned long initial_mouse_mask;
76 int sync_pipe[2];
77 HANDLE input_thread;
78 WINDOW* pad;
79 chtype* line;
80 int allow_scroll;
81 };
82
83
84 static void *nc_handle = NULL;
85
86 #ifdef initscr /* work around Solaris breakage */
87 #undef initscr
88 extern WINDOW *initscr(void);
89 #endif
90
91 #define MAKE_FUNCPTR(f) static typeof(f) * p_##f;
92
93 MAKE_FUNCPTR(curs_set)
94 MAKE_FUNCPTR(delwin)
95 MAKE_FUNCPTR(endwin)
96 #ifndef getmaxx
97 MAKE_FUNCPTR(getmaxx)
98 #endif
99 #ifndef getmaxy
100 MAKE_FUNCPTR(getmaxy)
101 #endif
102 MAKE_FUNCPTR(getmouse)
103 MAKE_FUNCPTR(has_colors)
104 MAKE_FUNCPTR(init_pair)
105 MAKE_FUNCPTR(initscr)
106 #ifndef intrflush
107 MAKE_FUNCPTR(intrflush)
108 #endif
109 MAKE_FUNCPTR(keypad)
110 MAKE_FUNCPTR(newpad)
111 #ifndef nodelay
112 MAKE_FUNCPTR(nodelay)
113 #endif
114 #ifndef noecho
115 MAKE_FUNCPTR(noecho)
116 #endif
117 MAKE_FUNCPTR(prefresh)
118 MAKE_FUNCPTR(raw)
119 MAKE_FUNCPTR(start_color)
120 MAKE_FUNCPTR(stdscr)
121 MAKE_FUNCPTR(waddchnstr)
122 MAKE_FUNCPTR(wmove)
123 MAKE_FUNCPTR(wgetch)
124 #ifdef HAVE_MOUSEMASK
125 MAKE_FUNCPTR(mouseinterval)
126 MAKE_FUNCPTR(mousemask)
127 #endif
128
129 #undef MAKE_FUNCPTR
130
131 /**********************************************************************/
132
133 static BOOL WCCURSES_bind_libcurses(void)
134 {
135 #ifdef SONAME_LIBNCURSES
136 static const char ncname[] = SONAME_LIBNCURSES;
137 #else
138 static const char ncname[] = SONAME_LIBCURSES;
139 #endif
140
141 nc_handle = wine_dlopen(ncname, RTLD_NOW, NULL, 0);
142 if(!nc_handle)
143 {
144 WINE_MESSAGE("Wine cannot find the " CURSES_NAME " library (%s).\n",
145 ncname);
146 return FALSE;
147 }
148
149 #define LOAD_FUNCPTR(f) \
150 if((p_##f = wine_dlsym(nc_handle, #f, NULL, 0)) == NULL) \
151 { \
152 WINE_WARN("Can't find symbol %s\n", #f); \
153 goto sym_not_found; \
154 }
155
156 LOAD_FUNCPTR(curs_set)
157 LOAD_FUNCPTR(delwin)
158 LOAD_FUNCPTR(endwin)
159 #ifndef getmaxx
160 LOAD_FUNCPTR(getmaxx)
161 #endif
162 #ifndef getmaxy
163 LOAD_FUNCPTR(getmaxy)
164 #endif
165 LOAD_FUNCPTR(getmouse)
166 LOAD_FUNCPTR(has_colors)
167 LOAD_FUNCPTR(init_pair)
168 LOAD_FUNCPTR(initscr)
169 #ifndef intrflush
170 LOAD_FUNCPTR(intrflush)
171 #endif
172 LOAD_FUNCPTR(keypad)
173 LOAD_FUNCPTR(newpad)
174 #ifndef nodelay
175 LOAD_FUNCPTR(nodelay)
176 #endif
177 #ifndef noecho
178 LOAD_FUNCPTR(noecho)
179 #endif
180 LOAD_FUNCPTR(prefresh)
181 LOAD_FUNCPTR(raw)
182 LOAD_FUNCPTR(start_color)
183 LOAD_FUNCPTR(stdscr)
184 LOAD_FUNCPTR(waddchnstr)
185 LOAD_FUNCPTR(wmove)
186 LOAD_FUNCPTR(wgetch)
187 #ifdef HAVE_MOUSEMASK
188 LOAD_FUNCPTR(mouseinterval)
189 LOAD_FUNCPTR(mousemask)
190 #endif
191
192 #undef LOAD_FUNCPTR
193
194 return TRUE;
195
196 sym_not_found:
197 WINE_MESSAGE(
198 "Wine cannot find certain functions that it needs inside the "
199 CURSES_NAME "\nlibrary. To enable Wine to use " CURSES_NAME
200 " please upgrade your " CURSES_NAME "\nlibraries\n");
201 wine_dlclose(nc_handle, NULL, 0);
202 nc_handle = NULL;
203 return FALSE;
204 }
205
206 #define curs_set p_curs_set
207 #define delwin p_delwin
208 #define endwin p_endwin
209 #ifndef getmaxx
210 #define getmaxx p_getmaxx
211 #endif
212 #ifndef getmaxy
213 #define getmaxy p_getmaxy
214 #endif
215 #define getmouse p_getmouse
216 #define has_colors p_has_colors
217 #define init_pair p_init_pair
218 #define initscr p_initscr
219 #ifndef intrflush
220 #define intrflush p_intrflush
221 #endif
222 #define keypad p_keypad
223 #define mouseinterval p_mouseinterval
224 #define mousemask p_mousemask
225 #define newpad p_newpad
226 #ifndef nodelay
227 #define nodelay p_nodelay
228 #endif
229 #ifndef noecho
230 #define noecho p_noecho
231 #endif
232 #define prefresh p_prefresh
233 #define raw p_raw
234 #define start_color p_start_color
235 #define stdscr (*p_stdscr)
236 #define waddchnstr p_waddchnstr
237 #define wmove p_wmove
238 #define wgetch p_wgetch
239
240 /******************************************************************
241 * WCCURSES_ResizeScreenBuffer
242 *
243 *
244 */
245 static void WCCURSES_ResizeScreenBuffer(struct inner_data* data)
246 {
247 /* reallocate a new pad. next event would redraw the whole pad */
248 if (PRIVATE(data)->pad) delwin(PRIVATE(data)->pad);
249 PRIVATE(data)->pad = newpad(data->curcfg.sb_height, data->curcfg.sb_width);
250 if (!PRIVATE(data)->pad)
251 WINE_FIXME("Cannot create pad\n");
252 if (PRIVATE(data)->line)
253 PRIVATE(data)->line = HeapReAlloc(GetProcessHeap(), 0, PRIVATE(data)->line,
254 sizeof(chtype) * data->curcfg.sb_width);
255 else
256 PRIVATE(data)->line = HeapAlloc(GetProcessHeap(), 0,
257 sizeof(chtype) * data->curcfg.sb_width);
258 }
259
260 /******************************************************************
261 * WCCURSES_PosCursor
262 *
263 * Set a new position for the cursor (and refresh any modified part of our pad)
264 */
265 static void WCCURSES_PosCursor(const struct inner_data* data)
266 {
267 int scr_width;
268 int scr_height;
269
270 if (data->curcfg.cursor_visible &&
271 data->cursor.Y >= data->curcfg.win_pos.Y &&
272 data->cursor.Y < data->curcfg.win_pos.Y + data->curcfg.win_height &&
273 data->cursor.X >= data->curcfg.win_pos.X &&
274 data->cursor.X < data->curcfg.win_pos.X + data->curcfg.win_width)
275 {
276 if (curs_set(2) == ERR) curs_set(1);
277 wmove(PRIVATE(data)->pad, data->cursor.Y, data->cursor.X);
278 }
279 else
280 {
281 curs_set(0);
282 }
283 getmaxyx(stdscr, scr_height, scr_width);
284 prefresh(PRIVATE(data)->pad,
285 data->curcfg.win_pos.Y, data->curcfg.win_pos.X,
286 0, 0,
287 min(scr_height, data->curcfg.win_height) - 1,
288 min(scr_width, data->curcfg.win_width) - 1);
289 }
290
291 /******************************************************************
292 * WCCURSES_ShapeCursor
293 *
294 * Sets a new shape for the cursor
295 */
296 static void WCCURSES_ShapeCursor(struct inner_data* data, int size, int vis, BOOL force)
297 {
298 /* we can't do much about the size... */
299 data->curcfg.cursor_size = size;
300 data->curcfg.cursor_visible = vis ? TRUE : FALSE;
301 WCCURSES_PosCursor(data);
302 }
303
304 /******************************************************************
305 * WCCURSES_ComputePositions
306 *
307 * Recomputes all the components (mainly scroll bars) positions
308 */
309 static void WCCURSES_ComputePositions(struct inner_data* data)
310 {
311 int x, y;
312
313 getmaxyx(stdscr, y, x);
314 if ((data->curcfg.win_height && y < data->curcfg.win_height) ||
315 (data->curcfg.win_width && x < data->curcfg.win_width))
316 {
317 SMALL_RECT pos;
318
319 WINE_WARN("Window too large (%dx%d), adjusting to curses' size (%dx%d)\n",
320 data->curcfg.win_width, data->curcfg.win_height, x, y);
321 pos.Left = pos.Top = 0;
322 pos.Right = x - 1; pos.Bottom = y - 1;
323 SetConsoleWindowInfo(data->hConOut, FALSE, &pos);
324 return; /* we'll get called again upon event for new window size */
325 }
326 if (PRIVATE(data)->pad) WCCURSES_PosCursor(data);
327 }
328
329 /******************************************************************
330 * WCCURSES_SetTitle
331 *
332 * Sets the title to the wine console
333 */
334 static void WCCURSES_SetTitle(const struct inner_data* data)
335 {
336 WCHAR wbuf[256];
337
338 if (WINECON_GetConsoleTitle(data->hConIn, wbuf, sizeof(wbuf)/sizeof(WCHAR)))
339 {
340 char buffer[256];
341
342 WideCharToMultiByte(CP_UNIXCP, 0, wbuf, -1, buffer, sizeof(buffer),
343 NULL, NULL);
344 fputs("\033]2;", stdout);
345 fputs(buffer, stdout);
346 fputc('\a', stdout);
347 fflush(stdout);
348 }
349 }
350
351 /******************************************************************
352 * WCCURSES_Refresh
353 *
354 *
355 */
356 static void WCCURSES_Refresh(const struct inner_data* data, int tp, int bm)
357 {
358 unsigned int x;
359 int y;
360 CHAR_INFO* cell;
361 DWORD attr;
362 char ch;
363
364 for (y = tp; y <= bm; y++)
365 {
366 cell = &data->cells[y * data->curcfg.sb_width];
367 for (x = 0; x < data->curcfg.sb_width; x++)
368 {
369 WideCharToMultiByte(CP_UNIXCP, 0, &cell[x].Char.UnicodeChar, 1,
370 &ch, 1, NULL, NULL);
371 attr = ((BYTE)ch < 32) ? 32 : (BYTE)ch;
372
373 if (cell[x].Attributes & FOREGROUND_RED) attr |= COLOR_PAIR(COLOR_RED);
374 if (cell[x].Attributes & FOREGROUND_BLUE) attr |= COLOR_PAIR(COLOR_BLUE);
375 if (cell[x].Attributes & FOREGROUND_GREEN) attr |= COLOR_PAIR(COLOR_GREEN);
376 if (cell[x].Attributes & BACKGROUND_RED) attr |= COLOR_PAIR(COLOR_RED << 3);
377 if (cell[x].Attributes & BACKGROUND_BLUE) attr |= COLOR_PAIR(COLOR_BLUE << 3);
378 if (cell[x].Attributes & BACKGROUND_GREEN) attr |= COLOR_PAIR(COLOR_GREEN << 3);
379
380 if (cell[x].Attributes & FOREGROUND_INTENSITY) attr |= A_BOLD;
381 PRIVATE(data)->line[x] = attr;
382 }
383 mvwaddchnstr(PRIVATE(data)->pad, y, 0, PRIVATE(data)->line, data->curcfg.sb_width);
384 }
385
386 WCCURSES_PosCursor(data);
387 }
388
389 /******************************************************************
390 * WCCURSES_Scroll
391 *
392 *
393 */
394 static void WCCURSES_Scroll(struct inner_data* data, int pos, BOOL horz)
395 {
396 if (horz)
397 {
398 data->curcfg.win_pos.X = pos;
399 }
400 else
401 {
402 data->curcfg.win_pos.Y = pos;
403 }
404 WCCURSES_PosCursor(data);
405 }
406
407 /******************************************************************
408 * WCCURSES_SetFont
409 *
410 *
411 */
412 static void WCCURSES_SetFont(struct inner_data* data, const WCHAR* font,
413 unsigned height, unsigned weight)
414 {
415 /* FIXME: really not much to do ? */
416 }
417
418 /******************************************************************
419 * WCCURSES_ScrollV
420 *
421 *
422 */
423 static void WCCURSES_ScrollV(struct inner_data* data, int delta)
424 {
425 int pos = data->curcfg.win_pos.Y;
426
427 pos += delta;
428 if (pos < 0) pos = 0;
429 if (pos > data->curcfg.sb_height - data->curcfg.win_height)
430 pos = data->curcfg.sb_height - data->curcfg.win_height;
431 if (pos != data->curcfg.win_pos.Y)
432 {
433 data->curcfg.win_pos.Y = pos;
434 WCCURSES_PosCursor(data);
435 WINECON_NotifyWindowChange(data);
436 }
437 }
438
439 /* Ascii -> VK, generated by calling VkKeyScanA(i) */
440 static const int vkkeyscan_table[256] =
441 {
442 0,0,0,0,0,0,0,0,8,9,0,0,0,13,0,0,0,0,0,19,145,556,0,0,0,0,0,27,0,0,0,
443 0,32,305,478,307,308,309,311,222,313,304,312,443,188,189,190,191,48,
444 49,50,51,52,53,54,55,56,57,442,186,444,187,446,447,306,321,322,323,
445 324,325,326,327,328,329,330,331,332,333,334,335,336,337,338,339,340,
446 341,342,343,344,345,346,219,220,221,310,445,192,65,66,67,68,69,70,71,
447 72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,475,476,477,
448 448,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
449 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
450 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
451 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,400,0,0,0,0,0,0
452 };
453
454 static const int mapvkey_0[256] =
455 {
456 0,0,0,0,0,0,0,0,14,15,0,0,0,28,0,0,42,29,56,69,58,0,0,0,0,0,0,1,0,0,
457 0,0,57,73,81,79,71,75,72,77,80,0,0,0,55,82,83,0,11,2,3,4,5,6,7,8,9,
458 10,0,0,0,0,0,0,0,30,48,46,32,18,33,34,35,23,36,37,38,50,49,24,25,16,
459 19,31,20,22,47,17,45,21,44,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,55,78,0,74,
460 0,53,59,60,61,62,63,64,65,66,67,68,87,88,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
461 0,0,0,0,0,0,69,70,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
462 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,39,13,51,12,52,53,41,0,0,0,0,0,0,0,0,0,
463 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,26,43,27,40,76,96,0,0,0,0,0,0,0,0,
464 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
465 };
466
467 /******************************************************************
468 * WCCURSES_InitComplexChar
469 *
470 *
471 */
472 static inline void WCCURSES_InitComplexChar(INPUT_RECORD* ir, BOOL down, WORD vk, WORD kc, DWORD cks)
473 {
474 ir->EventType = KEY_EVENT;
475 ir->Event.KeyEvent.bKeyDown = down;
476 ir->Event.KeyEvent.wRepeatCount = 1;
477
478 ir->Event.KeyEvent.wVirtualScanCode = vk;
479 ir->Event.KeyEvent.wVirtualKeyCode = kc;
480 ir->Event.KeyEvent.dwControlKeyState = cks;
481 ir->Event.KeyEvent.uChar.UnicodeChar = 0;
482 }
483
484 /******************************************************************
485 * WCCURSES_FillSimpleChar
486 *
487 *
488 */
489 static unsigned WCCURSES_FillSimpleChar(INPUT_RECORD* ir, unsigned real_inchar)
490 {
491 unsigned vk;
492 unsigned inchar;
493 char ch;
494 unsigned numEvent = 0;
495 DWORD cks = 0;
496
497 switch (real_inchar)
498 {
499 case 9: inchar = real_inchar;
500 real_inchar = 27; /* so that we don't think key is ctrl- something */
501 break;
502 case 10: inchar = '\r';
503 real_inchar = 27; /* Fixme: so that we don't think key is ctrl- something */
504 break;
505 case 127: inchar = '\b';
506 break;
507 case 27:
508 /* we assume that ESC & and the second character are atomically
509 * generated otherwise, we'll have a race here. FIXME: This gives 1 sec. delay
510 * because curses looks for a second character.
511 */
512 if ((inchar = wgetch(stdscr)) != ERR)
513 {
514 /* we got a alt-something key... */
515 cks = LEFT_ALT_PRESSED;
516 }
517 else
518 inchar = 27;
519 break;
520 default:
521 inchar = real_inchar;
522 break;
523 }
524 if ((inchar & ~0xFF) != 0) WINE_FIXME("What a char (%u)\n", inchar);
525 vk = vkkeyscan_table[inchar];
526 if (vk & 0x0100)
527 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x2a, 0x10, SHIFT_PRESSED);
528 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
529 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x1d, 0x11, LEFT_CTRL_PRESSED);
530 if (vk & 0x0400)
531 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x38, 0x12, LEFT_ALT_PRESSED);
532
533 ir[numEvent].EventType = KEY_EVENT;
534 ir[numEvent].Event.KeyEvent.bKeyDown = 1;
535 ir[numEvent].Event.KeyEvent.wRepeatCount = 1;
536 ir[numEvent].Event.KeyEvent.dwControlKeyState = cks;
537 if (vk & 0x0100)
538 ir[numEvent].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
539 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
540 ir[numEvent].Event.KeyEvent.dwControlKeyState |= LEFT_CTRL_PRESSED;
541 if (vk & 0x0400)
542 ir[numEvent].Event.KeyEvent.dwControlKeyState |= LEFT_ALT_PRESSED;
543 ir[numEvent].Event.KeyEvent.wVirtualKeyCode = vk;
544 ir[numEvent].Event.KeyEvent.wVirtualScanCode = mapvkey_0[vk & 0x00ff]; /* VirtualKeyCodes to ScanCode */
545
546 ch = inchar;
547 MultiByteToWideChar(CP_UNIXCP, 0,&ch,1,&ir[numEvent].Event.KeyEvent.uChar.UnicodeChar, 1);
548 ir[numEvent + 1] = ir[numEvent];
549 ir[numEvent + 1].Event.KeyEvent.bKeyDown = 0;
550
551 numEvent += 2;
552
553 if (vk & 0x0400)
554 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x38, 0x12, LEFT_ALT_PRESSED);
555 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
556 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x1d, 0x11, 0);
557 if (vk & 0x0100)
558 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x2a, 0x10, 0);
559
560 return numEvent;
561 }
562
563 /******************************************************************
564 * WCCURSES_FillComplexChar
565 *
566 *
567 */
568 static unsigned WCCURSES_FillComplexChar(INPUT_RECORD* ir, WORD vk, WORD kc, DWORD cks)
569 {
570 WCCURSES_InitComplexChar(&ir[0], 1, vk, kc, ENHANCED_KEY | cks);
571 WCCURSES_InitComplexChar(&ir[1], 0, vk, kc, ENHANCED_KEY | cks);
572
573 return 2;
574 }
575
576 /******************************************************************
577 * WCCURSES_FillMouse
578 *
579 *
580 */
581 static unsigned WCCURSES_FillMouse(INPUT_RECORD* ir)
582 {
583 #ifdef HAVE_MOUSEMASK
584 static unsigned bstate /* = 0 */;
585 static COORD pos /* = {0, 0} */;
586
587 MEVENT mevt;
588
589 if (getmouse(&mevt) == ERR)
590 return 0;
591
592 WINE_TRACE("[%u]: (%d, %d) %08lx\n",
593 mevt.id, mevt.x, mevt.y, (unsigned long)mevt.bstate);
594
595 /* macros to ease mapping ncurse button numbering to windows's one */
596 #define BTN1_BIT FROM_LEFT_1ST_BUTTON_PRESSED
597 #define BTN2_BIT RIGHTMOST_BUTTON_PRESSED
598 #define BTN3_BIT FROM_LEFT_2ND_BUTTON_PRESSED
599 #define BTN4_BIT 0 /* not done yet */
600
601 if (mevt.bstate & BUTTON1_PRESSED) bstate |= BTN1_BIT;
602 if (mevt.bstate & BUTTON1_RELEASED) bstate &= ~BTN1_BIT;
603 if (mevt.bstate & BUTTON2_PRESSED) bstate |= BTN2_BIT;
604 if (mevt.bstate & BUTTON2_RELEASED) bstate &= ~BTN2_BIT;
605 if (mevt.bstate & BUTTON3_PRESSED) bstate |= BTN3_BIT;
606 if (mevt.bstate & BUTTON3_RELEASED) bstate &= ~BTN3_BIT;
607
608 ir->EventType = MOUSE_EVENT;
609 ir->Event.MouseEvent.dwMousePosition.X = mevt.x;
610 ir->Event.MouseEvent.dwMousePosition.Y = mevt.y;
611
612 ir->Event.MouseEvent.dwButtonState = bstate;
613
614 /* partial conversion */
615 ir->Event.MouseEvent.dwControlKeyState = 0;
616 if (mevt.bstate & BUTTON_SHIFT) ir->Event.MouseEvent.dwControlKeyState |= SHIFT_PRESSED;
617 /* choose to map to left ctrl... could use both ? */
618 if (mevt.bstate & BUTTON_CTRL) ir->Event.MouseEvent.dwControlKeyState |= LEFT_CTRL_PRESSED;
619 /* choose to map to left alt... could use both ? */
620 if (mevt.bstate & BUTTON_ALT) ir->Event.MouseEvent.dwControlKeyState |= LEFT_ALT_PRESSED;
621 /* FIXME: unsupported yet flags: CAPSLOCK_ON, ENHANCED_KEY (??), NUMLOCK_ON, SCROLLLOCK_ON
622 * could be reported from the key events...
623 */
624
625 ir->Event.MouseEvent.dwEventFlags = 0;
626 /* FIXME: we no longer generate double click events */
627
628 if (!(mevt.bstate & (BUTTON1_PRESSED|BUTTON1_RELEASED|BUTTON2_PRESSED|BUTTON2_RELEASED|BUTTON3_PRESSED|BUTTON3_RELEASED)) &&
629 (mevt.x != pos.X || mevt.y != pos.Y))
630 {
631 ir->Event.MouseEvent.dwEventFlags |= MOUSE_MOVED;
632 }
633 pos.X = mevt.x; pos.Y = mevt.y;
634
635 return 1;
636 #else
637 return 0;
638 #endif
639 }
640
641 /******************************************************************
642 * WCCURSES_FillCode
643 *
644 *
645 */
646 static unsigned WCCURSES_FillCode(struct inner_data* data, INPUT_RECORD* ir, int inchar)
647 {
648 unsigned numEvent = 0;
649
650 switch (inchar)
651 {
652 case KEY_BREAK:
653 goto notFound;
654 case KEY_DOWN:
655 numEvent = WCCURSES_FillComplexChar(ir, 0x50, 0x28, 0);
656 break;
657 case KEY_UP:
658 numEvent = WCCURSES_FillComplexChar(ir, 0x48, 0x26, 0);
659 break;
660 case KEY_LEFT:
661 numEvent = WCCURSES_FillComplexChar(ir, 0x4b, 0x25, 0);
662 break;
663 case KEY_RIGHT:
664 numEvent = WCCURSES_FillComplexChar(ir, 0x4d, 0x27, 0);
665 break;
666 case KEY_HOME:
667 numEvent = WCCURSES_FillComplexChar(ir, 0x47, 0x24, 0);
668 break;
669 case KEY_BACKSPACE:
670 numEvent = WCCURSES_FillSimpleChar(ir, 127);
671 break;
672
673 case KEY_F0: /* up to F63 */
674 goto notFound;
675
676 case KEY_F( 1):
677 case KEY_F( 2):
678 case KEY_F( 3):
679 case KEY_F( 4):
680 case KEY_F( 5):
681 case KEY_F( 6):
682 case KEY_F( 7):
683 case KEY_F( 8):
684 case KEY_F( 9):
685 case KEY_F(10):
686 numEvent = WCCURSES_FillComplexChar(ir, 0x3b + inchar - KEY_F(1),
687 0x70 + inchar - KEY_F(1), 0);
688 break;
689 case KEY_F(11):
690 case KEY_F(12):
691 if (PRIVATE(data)->allow_scroll)
692 {
693 WCCURSES_ScrollV(data, inchar == KEY_F(11) ? 8 : -8);
694 }
695 else
696 {
697 numEvent = WCCURSES_FillComplexChar(ir, 0xd9 + inchar - KEY_F(11),
698 0x7a + inchar - KEY_F(11), 0);
699 }
700 break;
701
702 case KEY_DL:
703 case KEY_IL:
704 goto notFound;
705
706 case KEY_DC:
707 numEvent = WCCURSES_FillComplexChar(ir, 0x53, 0x2e, 0);
708 break;
709 case KEY_IC:
710 numEvent = WCCURSES_FillComplexChar(ir, 0x52, 0x2d, 0);
711 break;
712
713 case KEY_EIC:
714 case KEY_CLEAR:
715 case KEY_EOS:
716 case KEY_EOL:
717 case KEY_SF:
718 case KEY_SR:
719 goto notFound;
720
721 case KEY_NPAGE:
722 numEvent = WCCURSES_FillComplexChar(ir, 0x51, 0x22, 0);
723 break;
724 case KEY_PPAGE:
725 numEvent = WCCURSES_FillComplexChar(ir, 0x49, 0x21, 0);
726 break;
727
728 case KEY_STAB:
729 case KEY_CTAB:
730 case KEY_CATAB:
731 case KEY_ENTER:
732 case KEY_SRESET:
733 case KEY_RESET:
734 case KEY_PRINT:
735 case KEY_LL:
736 case KEY_A1:
737 case KEY_A3:
738 case KEY_B2:
739 case KEY_C1:
740 case KEY_C3:
741 goto notFound;
742 case KEY_BTAB: /* shift tab */
743 numEvent = WCCURSES_FillSimpleChar(ir, 0x9);
744 ir[0].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
745 ir[1].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
746 if (numEvent != 2) WINE_ERR("FillsimpleChar has changed\n");
747 break;
748
749 case KEY_BEG:
750 case KEY_CANCEL:
751 case KEY_CLOSE:
752 case KEY_COMMAND:
753 case KEY_COPY:
754 case KEY_CREATE:
755 goto notFound;
756
757 case KEY_END:
758 numEvent = WCCURSES_FillComplexChar(ir, 0x4f, 0x23, 0);
759 break;
760
761 case KEY_EXIT:
762 case KEY_FIND:
763 case KEY_HELP:
764 case KEY_MARK:
765 case KEY_MESSAGE:
766 goto notFound;
767
768 case KEY_MOUSE:
769 numEvent = WCCURSES_FillMouse(ir);
770 break;
771
772 case KEY_MOVE:
773 case KEY_NEXT:
774 case KEY_OPEN:
775 case KEY_OPTIONS:
776 case KEY_PREVIOUS:
777 case KEY_REDO:
778 case KEY_REFERENCE:
779 case KEY_REFRESH:
780 case KEY_REPLACE:
781 case KEY_RESTART:
782 case KEY_RESUME:
783 case KEY_SAVE:
784 case KEY_SBEG:
785 case KEY_SCANCEL:
786 case KEY_SCOMMAND:
787 case KEY_SCOPY:
788 case KEY_SCREATE:
789 #ifdef KEY_RESIZE
790 case KEY_RESIZE:
791 #endif
792 goto notFound;
793
794 case KEY_SDC:
795 numEvent = WCCURSES_FillComplexChar(ir, 0x53, 0x2e, SHIFT_PRESSED);
796 break;
797 case KEY_SDL:
798 case KEY_SELECT:
799 goto notFound;
800
801 case KEY_SEND:
802 numEvent = WCCURSES_FillComplexChar(ir, 0x4f, 0x23, SHIFT_PRESSED);
803 break;
804
805 case KEY_SEOL:
806 case KEY_SEXIT:
807 case KEY_SFIND:
808 case KEY_SHELP:
809 goto notFound;
810
811 case KEY_SHOME:
812 numEvent = WCCURSES_FillComplexChar(ir, 0x47, 0x24, SHIFT_PRESSED);
813 break;
814 case KEY_SIC:
815 numEvent = WCCURSES_FillComplexChar(ir, 0x52, 0x2d, SHIFT_PRESSED);
816 break;
817 case KEY_SLEFT:
818 numEvent = WCCURSES_FillComplexChar(ir, 0x4b, 0x25, SHIFT_PRESSED);
819 break;
820
821 case KEY_SMESSAGE:
822 case KEY_SMOVE:
823 case KEY_SNEXT:
824 case KEY_SOPTIONS:
825 case KEY_SPREVIOUS:
826 case KEY_SPRINT:
827 case KEY_SREDO:
828 case KEY_SREPLACE:
829 goto notFound;
830
831 case KEY_SRIGHT:
832 numEvent = WCCURSES_FillComplexChar(ir, 0x4d, 0x27, SHIFT_PRESSED);
833 break;
834
835 case KEY_SRSUME:
836 case KEY_SSAVE:
837 case KEY_SSUSPEND:
838 case KEY_SUNDO:
839 case KEY_SUSPEND:
840 case KEY_UNDO:
841 notFound:
842 WINE_FIXME("Not done yet (%o)\n", inchar);
843 break;
844 default:
845 WINE_ERR("Unknown val (%o)\n", inchar);
846 break;
847 }
848 return numEvent;
849 }
850
851 /******************************************************************
852 * input_thread
853 */
854 static DWORD CALLBACK input_thread( void *arg )
855 {
856 struct inner_data* data = arg;
857 int inchar;
858 INPUT_RECORD ir[8];
859 unsigned numEvent;
860 DWORD n;
861 struct pollfd pfd[2];
862
863 pfd[0].fd = 0;
864 pfd[0].events = POLLIN;
865 pfd[1].fd = PRIVATE(data)->sync_pipe[0];
866 pfd[1].events = POLLHUP;
867
868 for (;;)
869 {
870 pfd[0].revents = pfd[1].revents = 0;
871 if (poll( pfd, 2, -1 ) == -1) break;
872 if (pfd[0].revents & (POLLHUP|POLLERR)) break;
873 if (pfd[1].revents & (POLLHUP|POLLERR)) break;
874 if (!(pfd[0].revents & POLLIN)) continue;
875
876 if ((inchar = wgetch(stdscr)) == ERR) continue;
877
878 WINE_TRACE("Got o%o (0x%x)\n", inchar,inchar);
879
880 if (inchar >= KEY_MIN && inchar <= KEY_MAX)
881 numEvent = WCCURSES_FillCode(data, ir, inchar);
882 else
883 numEvent = WCCURSES_FillSimpleChar(ir, inchar);
884
885 if (numEvent) WriteConsoleInput(data->hConIn, ir, numEvent, &n);
886 }
887 close( PRIVATE(data)->sync_pipe[0] );
888 return 0;
889 }
890
891 /******************************************************************
892 * WCCURSES_DeleteBackend
893 *
894 *
895 */
896 static void WCCURSES_DeleteBackend(struct inner_data* data)
897 {
898 if (!PRIVATE(data)) return;
899
900 if (PRIVATE(data)->input_thread)
901 {
902 close( PRIVATE(data)->sync_pipe[1] );
903 WaitForSingleObject( PRIVATE(data)->input_thread, INFINITE );
904 CloseHandle( PRIVATE(data)->input_thread );
905 }
906
907 delwin(PRIVATE(data)->pad);
908 #ifdef HAVE_MOUSEMASK
909 {
910 mmask_t mm;
911 mousemask(PRIVATE(data)->initial_mouse_mask, &mm);
912 }
913 #endif
914 endwin();
915
916 HeapFree(GetProcessHeap(), 0, PRIVATE(data)->line);
917 HeapFree(GetProcessHeap(), 0, PRIVATE(data));
918 data->private = NULL;
919 }
920
921 /******************************************************************