?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
user32/tests: Add tests for removing already seen messages from the queue.
[wine/multimedia.git] / programs / wineconsole / curses.c
blob24aab886f4e7d9df2b42654c34f294b59d46bdde
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 */
29
30 #include "config.h"
31 #include "wine/port.h"
32
33 #include <stdio.h>
34 #include <stdarg.h>
35 #include <stdlib.h>
36 #ifdef HAVE_POLL_H
37 # include <poll.h>
38 #endif
39 #ifdef HAVE_NCURSES_H
40 # include <ncurses.h>
41 #elif defined(HAVE_CURSES_H)
42 # include <curses.h>
43 #endif
44 /* avoid redefinition warnings */
45 #undef KEY_EVENT
46 #undef MOUSE_MOVED
47
48 #ifdef HAVE_UNISTD_H
49 #include <unistd.h>
50 #endif
51 #include <windef.h>
52 #include <winbase.h>
53 #include <winnls.h>
54 #include "winecon_private.h"
55
56 #include "wine/library.h"
57 #include "wine/debug.h"
58 #undef ERR
59 #define ERR (-1)
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 CRITICAL_SECTION lock;
79 WINDOW* pad;
80 chtype* line;
81 int allow_scroll;
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(has_colors)
103 MAKE_FUNCPTR(init_pair)
104 MAKE_FUNCPTR(initscr)
105 #ifndef intrflush
106 MAKE_FUNCPTR(intrflush)
107 #endif
108 MAKE_FUNCPTR(keypad)
109 MAKE_FUNCPTR(newpad)
110 #ifndef nodelay
111 MAKE_FUNCPTR(nodelay)
112 #endif
113 #ifndef noecho
114 MAKE_FUNCPTR(noecho)
115 #endif
116 MAKE_FUNCPTR(prefresh)
117 MAKE_FUNCPTR(raw)
118 MAKE_FUNCPTR(start_color)
119 MAKE_FUNCPTR(stdscr)
120 MAKE_FUNCPTR(waddchnstr)
121 MAKE_FUNCPTR(wmove)
122 MAKE_FUNCPTR(wgetch)
123 #ifdef HAVE_MOUSEMASK
124 MAKE_FUNCPTR(getmouse)
125 MAKE_FUNCPTR(mouseinterval)
126 MAKE_FUNCPTR(mousemask)
127 #endif
128 MAKE_FUNCPTR(acs_map)
129
130 #undef MAKE_FUNCPTR
131
132 /**********************************************************************/
133
134 static BOOL WCCURSES_bind_libcurses(void)
135 {
136 #ifdef SONAME_LIBNCURSES
137 static const char ncname[] = SONAME_LIBNCURSES;
138 #else
139 static const char ncname[] = SONAME_LIBCURSES;
140 #endif
141
142 nc_handle = wine_dlopen(ncname, RTLD_NOW, NULL, 0);
143 if(!nc_handle)
144 {
145 WINE_MESSAGE("Wine cannot find the " CURSES_NAME " library (%s).\n",
146 ncname);
147 return FALSE;
148 }
149
150 #define LOAD_FUNCPTR(f) \
151 if((p_##f = wine_dlsym(nc_handle, #f, NULL, 0)) == NULL) \
152 { \
153 WINE_WARN("Can't find symbol %s\n", #f); \
154 goto sym_not_found; \
155 }
156
157 LOAD_FUNCPTR(curs_set)
158 LOAD_FUNCPTR(delwin)
159 LOAD_FUNCPTR(endwin)
160 #ifndef getmaxx
161 LOAD_FUNCPTR(getmaxx)
162 #endif
163 #ifndef getmaxy
164 LOAD_FUNCPTR(getmaxy)
165 #endif
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(getmouse)
189 LOAD_FUNCPTR(mouseinterval)
190 LOAD_FUNCPTR(mousemask)
191 #endif
192 LOAD_FUNCPTR(acs_map)
193
194 #undef LOAD_FUNCPTR
195
196 return TRUE;
197
198 sym_not_found:
199 WINE_MESSAGE(
200 "Wine cannot find certain functions that it needs inside the "
201 CURSES_NAME "\nlibrary. To enable Wine to use " CURSES_NAME
202 " please upgrade your " CURSES_NAME "\nlibraries\n");
203 wine_dlclose(nc_handle, NULL, 0);
204 nc_handle = NULL;
205 return FALSE;
206 }
207
208 #define curs_set p_curs_set
209 #define delwin p_delwin
210 #define endwin p_endwin
211 #ifndef getmaxx
212 #define getmaxx p_getmaxx
213 #endif
214 #ifndef getmaxy
215 #define getmaxy p_getmaxy
216 #endif
217 #define has_colors p_has_colors
218 #define init_pair p_init_pair
219 #define initscr p_initscr
220 #ifndef intrflush
221 #define intrflush p_intrflush
222 #endif
223 #define keypad p_keypad
224 #ifdef HAVE_MOUSEMASK
225 #define getmouse p_getmouse
226 #define mouseinterval p_mouseinterval
227 #define mousemask p_mousemask
228 #endif
229 #define newpad p_newpad
230 #ifndef nodelay
231 #define nodelay p_nodelay
232 #endif
233 #ifndef noecho
234 #define noecho p_noecho
235 #endif
236 #define prefresh p_prefresh
237 #define raw p_raw
238 #define start_color p_start_color
239 #define stdscr (*p_stdscr)
240 #define waddchnstr p_waddchnstr
241 #define wmove p_wmove
242 #define wgetch p_wgetch
243 #define acs_map (*p_acs_map)
244
245 /******************************************************************
246 * WCCURSES_ResizeScreenBuffer
247 *
248 *
249 */
250 static void WCCURSES_ResizeScreenBuffer(struct inner_data* data)
251 {
252 /* reallocate a new pad. next event would redraw the whole pad */
253 if (PRIVATE(data)->pad) delwin(PRIVATE(data)->pad);
254 PRIVATE(data)->pad = newpad(data->curcfg.sb_height, data->curcfg.sb_width);
255 if (!PRIVATE(data)->pad)
256 WINE_FIXME("Cannot create pad\n");
257 if (PRIVATE(data)->line)
258 PRIVATE(data)->line = HeapReAlloc(GetProcessHeap(), 0, PRIVATE(data)->line,
259 sizeof(chtype) * data->curcfg.sb_width);
260 else
261 PRIVATE(data)->line = HeapAlloc(GetProcessHeap(), 0,
262 sizeof(chtype) * data->curcfg.sb_width);
263 }
264
265 /******************************************************************
266 * WCCURSES_PosCursor
267 *
268 * Set a new position for the cursor (and refresh any modified part of our pad)
269 */
270 static void WCCURSES_PosCursor(const struct inner_data* data)
271 {
272 int scr_width;
273 int scr_height;
274
275 if (data->curcfg.cursor_visible &&
276 data->cursor.Y >= data->curcfg.win_pos.Y &&
277 data->cursor.Y < data->curcfg.win_pos.Y + data->curcfg.win_height &&
278 data->cursor.X >= data->curcfg.win_pos.X &&
279 data->cursor.X < data->curcfg.win_pos.X + data->curcfg.win_width)
280 {
281 if (curs_set(2) == ERR) curs_set(1);
282 wmove(PRIVATE(data)->pad, data->cursor.Y, data->cursor.X);
283 }
284 else
285 {
286 curs_set(0);
287 }
288 getmaxyx(stdscr, scr_height, scr_width);
289 prefresh(PRIVATE(data)->pad,
290 data->curcfg.win_pos.Y, data->curcfg.win_pos.X,
291 0, 0,
292 min(scr_height, data->curcfg.win_height) - 1,
293 min(scr_width, data->curcfg.win_width) - 1);
294 }
295
296 /******************************************************************
297 * WCCURSES_ShapeCursor
298 *
299 * Sets a new shape for the cursor
300 */
301 static void WCCURSES_ShapeCursor(struct inner_data* data, int size, int vis, BOOL force)
302 {
303 /* we can't do much about the size... */
304 data->curcfg.cursor_size = size;
305 data->curcfg.cursor_visible = vis != 0;
306 WCCURSES_PosCursor(data);
307 }
308
309 /******************************************************************
310 * WCCURSES_ComputePositions
311 *
312 * Recomputes all the components (mainly scroll bars) positions
313 */
314 static void WCCURSES_ComputePositions(struct inner_data* data)
315 {
316 int x, y;
317
318 getmaxyx(stdscr, y, x);
319 if ((data->curcfg.win_height && y < data->curcfg.win_height) ||
320 (data->curcfg.win_width && x < data->curcfg.win_width))
321 {
322 SMALL_RECT pos;
323
324 WINE_WARN("Window too large (%dx%d), adjusting to curses' size (%dx%d)\n",
325 data->curcfg.win_width, data->curcfg.win_height, x, y);
326 pos.Left = pos.Top = 0;
327 pos.Right = x - 1; pos.Bottom = y - 1;
328 SetConsoleWindowInfo(data->hConOut, FALSE, &pos);
329 return; /* we'll get called again upon event for new window size */
330 }
331 if (PRIVATE(data)->pad) WCCURSES_PosCursor(data);
332 }
333
334 /******************************************************************
335 * WCCURSES_SetTitle
336 *
337 * Sets the title to the wine console
338 */
339 static void WCCURSES_SetTitle(const struct inner_data* data)
340 {
341 WCHAR wbuf[256];
342
343 if (WINECON_GetConsoleTitle(data->hConIn, wbuf, sizeof(wbuf)/sizeof(WCHAR)))
344 {
345 char buffer[256];
346
347 WideCharToMultiByte(CP_UNIXCP, 0, wbuf, -1, buffer, sizeof(buffer),
348 NULL, NULL);
349 fputs("\033]2;", stdout);
350 fputs(buffer, stdout);
351 fputc('\a', stdout);
352 fflush(stdout);
353 }
354 }
355
356 /******************************************************************
357 * WCCURSES_Refresh
358 *
359 *
360 */
361 static void WCCURSES_Refresh(const struct inner_data* data, int tp, int bm)
362 {
363 unsigned int x;
364 int y;
365 CHAR_INFO* cell;
366 DWORD attr;
367
368 for (y = tp; y <= bm; y++)
369 {
370 cell = &data->cells[y * data->curcfg.sb_width];
371 for (x = 0; x < data->curcfg.sb_width; x++)
372 {
373 /* check for some mapping to ACS characters (drawing boxes, arrows) */
374 if ((cell[x].Char.UnicodeChar >= 0x2500 && cell[x].Char.UnicodeChar <= 0x257F) ||
375 (cell[x].Char.UnicodeChar >= 0x2190 && cell[x].Char.UnicodeChar <= 0x21FF))
376 {
377 /* FIXME: we're also mapping heavy and lines item to single lines
378 * (that's ugly, but that's better than crap)
379 * Moreover, as the ACS_ macros refer to values in array acs_map[], we
380 * cannot simply build static tables for the mapping (FIXME: this could be done
381 * at load time)
382 */
383 switch (cell[x].Char.UnicodeChar)
384 {
385 case 0x2190: case 0x219E: case 0x21A2: case 0x21A4:
386 case 0x21BC: case 0x21BD: case 0x21D0: case 0x21E6: attr = ACS_LARROW; break;
387 case 0x2191: case 0x219F: case 0x21A3: case 0x21A5:
388 case 0x21BE: case 0x21BF: case 0x21D1: case 0x21E7: attr = ACS_UARROW; break;
389 case 0x2192: case 0x21A0: case 0x21A6: case 0x21C0:
390 case 0x21C1: case 0x21D2: case 0x21E8: attr = ACS_RARROW; break;
391 case 0x2193: case 0x21A1: case 0x21A7: case 0x21C2:
392 case 0x21C3: case 0x21D3: case 0x21E9: attr = ACS_DARROW; break;
393
394 case 0x2500: case 0x2501: case 0x257C: case 0x257E: attr = ACS_HLINE; break;
395 case 0x2502: case 0x2503: case 0x257D: case 0x257F: attr = ACS_VLINE; break;
396 case 0x250C: case 0x250D: case 0x250E: case 0x250F: attr = ACS_ULCORNER; break;
397 case 0x2510: case 0x2511: case 0x2512: case 0x2513: attr = ACS_URCORNER; break;
398 case 0x2514: case 0x2515: case 0x2516: case 0x2517: attr = ACS_LLCORNER; break;
399 case 0x2518: case 0x2519: case 0x251A: case 0x251B: attr = ACS_LRCORNER; break;
400 case 0x251C: case 0x251D: case 0x251E: case 0x251F:
401 case 0x2520: case 0x2521: case 0x2522: case 0x2523: attr = ACS_LTEE; break;
402 case 0x2524: case 0x2525: case 0x2526: case 0x2527:
403 case 0x2528: case 0x2529: case 0x252A: case 0x252B: attr = ACS_RTEE; break;
404
405 case 0x252C: case 0x252D: case 0x252E: case 0x252F:
406 case 0x2530: case 0x2531: case 0x2532: case 0x2533: attr = ACS_TTEE; break;
407 case 0x2534: case 0x2535: case 0x2536: case 0x2537:
408 case 0x2538: case 0x2539: case 0x253A: case 0x253B: attr = ACS_BTEE; break;
409
410 case 0x253C: case 0x253D: case 0x253E: case 0x253F:
411 case 0x2540: case 0x2541: case 0x2542: case 0x2543:
412 case 0x2544: case 0x2545: case 0x2546: case 0x2547:
413 case 0x2548: case 0x2549: case 0x254A: case 0x254B: attr = ACS_PLUS; break;
414
415 case 0x2550: attr = ACS_HLINE; break;
416 case 0x2551: attr = ACS_VLINE; break;
417 case 0x2552: case 0x2553: case 0x2554: attr = ACS_ULCORNER; break;
418 case 0x2555: case 0x2556: case 0x2557: attr = ACS_URCORNER; break;
419 case 0x2558: case 0x2559: case 0x255A: attr = ACS_LLCORNER; break;
420 case 0x255B: case 0x255C: case 0x255D: attr = ACS_LRCORNER; break;
421 case 0x255E: case 0x255F: case 0x2560: attr = ACS_LTEE; break;
422 case 0x2561: case 0x2562: case 0x2563: attr = ACS_RTEE; break;
423 case 0x2564: case 0x2565: case 0x2566: attr = ACS_TTEE; break;
424 case 0x2567: case 0x2568: case 0x2569: attr = ACS_BTEE; break;
425 case 0x256A: case 0x256B: case 0x256C: attr = ACS_PLUS; break;
426 default:
427 WINE_FIXME("Unmapped special character (%x)\n", cell[x].Char.UnicodeChar);
428 attr = ' ';
429 }
430 }
431 else
432 {
433 char ch[2];
434
435 if (WideCharToMultiByte(CP_UNIXCP, 0, &cell[x].Char.UnicodeChar, 1,
436 ch, sizeof(ch), NULL, NULL) == 1)
437 attr = ((BYTE)ch[0] < 32) ? 32 : (BYTE)ch[0];
438 else
439 attr = 32;
440 }
441
442 if (cell[x].Attributes & FOREGROUND_RED) attr |= COLOR_PAIR(COLOR_RED);
443 if (cell[x].Attributes & FOREGROUND_BLUE) attr |= COLOR_PAIR(COLOR_BLUE);
444 if (cell[x].Attributes & FOREGROUND_GREEN) attr |= COLOR_PAIR(COLOR_GREEN);
445 if (cell[x].Attributes & BACKGROUND_RED) attr |= COLOR_PAIR(COLOR_RED << 3);
446 if (cell[x].Attributes & BACKGROUND_BLUE) attr |= COLOR_PAIR(COLOR_BLUE << 3);
447 if (cell[x].Attributes & BACKGROUND_GREEN) attr |= COLOR_PAIR(COLOR_GREEN << 3);
448
449 if (cell[x].Attributes & FOREGROUND_INTENSITY) attr |= A_BOLD;
450 PRIVATE(data)->line[x] = attr;
451 }
452 mvwaddchnstr(PRIVATE(data)->pad, y, 0, PRIVATE(data)->line, data->curcfg.sb_width);
453 }
454
455 WCCURSES_PosCursor(data);
456 }
457
458 /******************************************************************
459 * WCCURSES_Scroll
460 *
461 *
462 */
463 static void WCCURSES_Scroll(struct inner_data* data, int pos, BOOL horz)
464 {
465 if (horz)
466 {
467 data->curcfg.win_pos.X = pos;
468 }
469 else
470 {
471 data->curcfg.win_pos.Y = pos;
472 }
473 WCCURSES_PosCursor(data);
474 }
475
476 /******************************************************************
477 * WCCURSES_SetFont
478 *
479 *
480 */
481 static void WCCURSES_SetFont(struct inner_data* data, const WCHAR* font,
482 unsigned height, unsigned weight)
483 {
484 /* FIXME: really not much to do ? */
485 }
486
487 /******************************************************************
488 * WCCURSES_Resize
489 *
490 */
491 static void WCCURSES_Resize(struct inner_data* data)
492 {
493 int width, height;
494
495 getmaxyx(stdscr, height, width);
496 WINECON_ResizeWithContainer(data, width, height);
497 }
498
499 /******************************************************************
500 * WCCURSES_ScrollV
501 *
502 *
503 */
504 static void WCCURSES_ScrollV(struct inner_data* data, int delta)
505 {
506 struct config_data cfg = data->curcfg;
507
508 cfg.win_pos.Y += delta;
509 if (cfg.win_pos.Y < 0) cfg.win_pos.Y = 0;
510 if (cfg.win_pos.Y > data->curcfg.sb_height - data->curcfg.win_height)
511 cfg.win_pos.Y = data->curcfg.sb_height - data->curcfg.win_height;
512 if (cfg.win_pos.Y != data->curcfg.win_pos.Y)
513 {
514 WCCURSES_PosCursor(data);
515 WINECON_SetConfig(data, &cfg);
516 }
517 }
518
519 /* Ascii -> VK, generated by calling VkKeyScanA(i) */
520 static const int vkkeyscan_table[256] =
521 {
522 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,
523 0,32,305,478,307,308,309,311,222,313,304,312,443,188,189,190,191,48,
524 49,50,51,52,53,54,55,56,57,442,186,444,187,446,447,306,321,322,323,
525 324,325,326,327,328,329,330,331,332,333,334,335,336,337,338,339,340,
526 341,342,343,344,345,346,219,220,221,310,445,192,65,66,67,68,69,70,71,
527 72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,475,476,477,
528 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,
529 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,
530 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,
531 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
532 };
533
534 static const int mapvkey_0[256] =
535 {
536 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,
537 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,
538 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,
539 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,
540 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,
541 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,
542 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,
543 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,
544 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
545 };
546
547 /******************************************************************
548 * WCCURSES_InitComplexChar
549 *
550 *
551 */
552 static inline void WCCURSES_InitComplexChar(INPUT_RECORD* ir, BOOL down, WORD vk, WORD kc, DWORD cks)
553 {
554 ir->EventType = KEY_EVENT;
555 ir->Event.KeyEvent.bKeyDown = down;
556 ir->Event.KeyEvent.wRepeatCount = 1;
557
558 ir->Event.KeyEvent.wVirtualScanCode = vk;
559 ir->Event.KeyEvent.wVirtualKeyCode = kc;
560 ir->Event.KeyEvent.dwControlKeyState = cks;
561 ir->Event.KeyEvent.uChar.UnicodeChar = 0;
562 }
563
564 /******************************************************************
565 * WCCURSES_FillSimpleChar
566 *
567 *
568 */
569 static unsigned WCCURSES_FillSimpleChar(INPUT_RECORD* ir, unsigned real_inchar)
570 {
571 unsigned vk;
572 unsigned inchar;
573 char ch;
574 unsigned numEvent = 0;
575 DWORD cks = 0;
576
577 switch (real_inchar)
578 {
579 case 9: inchar = real_inchar;
580 real_inchar = 27; /* so that we don't think key is ctrl- something */
581 break;
582 case 10: inchar = '\r';
583 real_inchar = 27; /* Fixme: so that we don't think key is ctrl- something */
584 break;
585 case 127: inchar = '\b';
586 break;
587 case 27:
588 /* we assume that ESC & and the second character are atomically
589 * generated otherwise, we'll have a race here. FIXME: This gives 1 sec. delay
590 * because curses looks for a second character.
591 */
592 if ((inchar = wgetch(stdscr)) != ERR)
593 {
594 /* we got an alt-something key... */
595 cks = LEFT_ALT_PRESSED;
596 }
597 else
598 inchar = 27;
599 break;
600 default:
601 inchar = real_inchar;
602 break;
603 }
604 if ((inchar & ~0xFF) != 0) WINE_FIXME("What a char (%u)\n", inchar);
605 vk = vkkeyscan_table[inchar];
606 if (vk & 0x0100)
607 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x2a, 0x10, SHIFT_PRESSED);
608 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
609 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x1d, 0x11, LEFT_CTRL_PRESSED);
610 if (vk & 0x0400)
611 WCCURSES_InitComplexChar(&ir[numEvent++], 1, 0x38, 0x12, LEFT_ALT_PRESSED);
612
613 ir[numEvent].EventType = KEY_EVENT;
614 ir[numEvent].Event.KeyEvent.bKeyDown = 1;
615 ir[numEvent].Event.KeyEvent.wRepeatCount = 1;
616 ir[numEvent].Event.KeyEvent.dwControlKeyState = cks;
617 if (vk & 0x0100)
618 ir[numEvent].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
619 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
620 ir[numEvent].Event.KeyEvent.dwControlKeyState |= LEFT_CTRL_PRESSED;
621 if (vk & 0x0400)
622 ir[numEvent].Event.KeyEvent.dwControlKeyState |= LEFT_ALT_PRESSED;
623 ir[numEvent].Event.KeyEvent.wVirtualKeyCode = vk;
624 ir[numEvent].Event.KeyEvent.wVirtualScanCode = mapvkey_0[vk & 0x00ff]; /* VirtualKeyCodes to ScanCode */
625
626 ch = inchar;
627 MultiByteToWideChar(CP_UNIXCP, 0,&ch,1,&ir[numEvent].Event.KeyEvent.uChar.UnicodeChar, 1);
628 ir[numEvent + 1] = ir[numEvent];
629 ir[numEvent + 1].Event.KeyEvent.bKeyDown = 0;
630
631 numEvent += 2;
632
633 if (vk & 0x0400)
634 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x38, 0x12, LEFT_ALT_PRESSED);
635 if ((vk & 0x0200) || (unsigned char)real_inchar <= 26)
636 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x1d, 0x11, 0);
637 if (vk & 0x0100)
638 WCCURSES_InitComplexChar(&ir[numEvent++], 0, 0x2a, 0x10, 0);
639
640 return numEvent;
641 }
642
643 /******************************************************************
644 * WCCURSES_FillComplexChar
645 *
646 *
647 */
648 static unsigned WCCURSES_FillComplexChar(INPUT_RECORD* ir, WORD vk, WORD kc, DWORD cks)
649 {
650 WCCURSES_InitComplexChar(&ir[0], 1, vk, kc, ENHANCED_KEY | cks);
651 WCCURSES_InitComplexChar(&ir[1], 0, vk, kc, ENHANCED_KEY | cks);
652
653 return 2;
654 }
655
656 /******************************************************************
657 * WCCURSES_FillMouse
658 *
659 *
660 */
661 static unsigned WCCURSES_FillMouse(INPUT_RECORD* ir)
662 {
663 #ifdef HAVE_MOUSEMASK
664 static unsigned bstate /* = 0 */;
665 static COORD pos /* = {0, 0} */;
666
667 MEVENT mevt;
668
669 if (getmouse(&mevt) == ERR)
670 return 0;
671
672 WINE_TRACE("[%u]: (%d, %d) %08lx\n",
673 mevt.id, mevt.x, mevt.y, (unsigned long)mevt.bstate);
674
675 /* macros to ease mapping ncurses button numbering to windows' one */
676 #define BTN1_BIT FROM_LEFT_1ST_BUTTON_PRESSED
677 #define BTN2_BIT RIGHTMOST_BUTTON_PRESSED
678 #define BTN3_BIT FROM_LEFT_2ND_BUTTON_PRESSED
679 #define BTN4_BIT 0 /* not done yet */
680
681 if (mevt.bstate & BUTTON1_PRESSED) bstate |= BTN1_BIT;
682 if (mevt.bstate & BUTTON1_RELEASED) bstate &= ~BTN1_BIT;
683 if (mevt.bstate & BUTTON2_PRESSED) bstate |= BTN2_BIT;
684 if (mevt.bstate & BUTTON2_RELEASED) bstate &= ~BTN2_BIT;
685 if (mevt.bstate & BUTTON3_PRESSED) bstate |= BTN3_BIT;
686 if (mevt.bstate & BUTTON3_RELEASED) bstate &= ~BTN3_BIT;
687
688 ir->EventType = MOUSE_EVENT;
689 ir->Event.MouseEvent.dwMousePosition.X = mevt.x;
690 ir->Event.MouseEvent.dwMousePosition.Y = mevt.y;
691
692 ir->Event.MouseEvent.dwButtonState = bstate;
693
694 /* partial conversion */
695 ir->Event.MouseEvent.dwControlKeyState = 0;
696 if (mevt.bstate & BUTTON_SHIFT) ir->Event.MouseEvent.dwControlKeyState |= SHIFT_PRESSED;
697 /* choose to map to left ctrl... could use both ? */
698 if (mevt.bstate & BUTTON_CTRL) ir->Event.MouseEvent.dwControlKeyState |= LEFT_CTRL_PRESSED;
699 /* choose to map to left alt... could use both ? */
700 if (mevt.bstate & BUTTON_ALT) ir->Event.MouseEvent.dwControlKeyState |= LEFT_ALT_PRESSED;
701 /* FIXME: unsupported yet flags: CAPSLOCK_ON, ENHANCED_KEY (??), NUMLOCK_ON, SCROLLLOCK_ON
702 * could be reported from the key events...
703 */
704
705 ir->Event.MouseEvent.dwEventFlags = 0;
706 /* FIXME: we no longer generate double click events */
707
708 if (!(mevt.bstate & (BUTTON1_PRESSED|BUTTON1_RELEASED|BUTTON2_PRESSED|BUTTON2_RELEASED|BUTTON3_PRESSED|BUTTON3_RELEASED)) &&
709 (mevt.x != pos.X || mevt.y != pos.Y))
710 {
711 ir->Event.MouseEvent.dwEventFlags |= MOUSE_MOVED;
712 }
713 pos.X = mevt.x; pos.Y = mevt.y;
714
715 return 1;
716 #else
717 return 0;
718 #endif
719 }
720
721 /******************************************************************
722 * WCCURSES_FillCode
723 *
724 *
725 */
726 static unsigned WCCURSES_FillCode(struct inner_data* data, INPUT_RECORD* ir, int inchar)
727 {
728 unsigned numEvent = 0;
729
730 switch (inchar)
731 {
732 case KEY_BREAK:
733 goto notFound;
734 case KEY_DOWN:
735 numEvent = WCCURSES_FillComplexChar(ir, 0x50, 0x28, 0);
736 break;
737 case KEY_UP:
738 numEvent = WCCURSES_FillComplexChar(ir, 0x48, 0x26, 0);
739 break;
740 case KEY_LEFT:
741 numEvent = WCCURSES_FillComplexChar(ir, 0x4b, 0x25, 0);
742 break;
743 case KEY_RIGHT:
744 numEvent = WCCURSES_FillComplexChar(ir, 0x4d, 0x27, 0);
745 break;
746 case KEY_HOME:
747 numEvent = WCCURSES_FillComplexChar(ir, 0x47, 0x24, 0);
748 break;
749 case KEY_BACKSPACE:
750 numEvent = WCCURSES_FillSimpleChar(ir, 127);
751 break;
752
753 case KEY_F0: /* up to F63 */
754 goto notFound;
755
756 case KEY_F( 1):
757 case KEY_F( 2):
758 case KEY_F( 3):
759 case KEY_F( 4):
760 case KEY_F( 5):
761 case KEY_F( 6):
762 case KEY_F( 7):
763 case KEY_F( 8):
764 case KEY_F( 9):
765 case KEY_F(10):
766 numEvent = WCCURSES_FillComplexChar(ir, 0x3b + inchar - KEY_F(1),
767 0x70 + inchar - KEY_F(1), 0);
768 break;
769 case KEY_F(11):
770 case KEY_F(12):
771 if (PRIVATE(data)->allow_scroll)
772 {
773 WCCURSES_ScrollV(data, inchar == KEY_F(11) ? 8 : -8);
774 }
775 else
776 {
777 numEvent = WCCURSES_FillComplexChar(ir, 0xd9 + inchar - KEY_F(11),
778 0x7a + inchar - KEY_F(11), 0);
779 }
780 break;
781
782 case KEY_DL:
783 case KEY_IL:
784 goto notFound;
785
786 case KEY_DC:
787 numEvent = WCCURSES_FillComplexChar(ir, 0x53, 0x2e, 0);
788 break;
789 case KEY_IC:
790 numEvent = WCCURSES_FillComplexChar(ir, 0x52, 0x2d, 0);
791 break;
792
793 case KEY_EIC:
794 case KEY_CLEAR:
795 case KEY_EOS:
796 case KEY_EOL:
797 case KEY_SF:
798 case KEY_SR:
799 goto notFound;
800
801 case KEY_NPAGE:
802 numEvent = WCCURSES_FillComplexChar(ir, 0x51, 0x22, 0);
803 break;
804 case KEY_PPAGE:
805 numEvent = WCCURSES_FillComplexChar(ir, 0x49, 0x21, 0);
806 break;
807
808 case KEY_STAB:
809 case KEY_CTAB:
810 case KEY_CATAB:
811 case KEY_ENTER:
812 case KEY_SRESET:
813 case KEY_RESET:
814 case KEY_PRINT:
815 case KEY_LL:
816 case KEY_A1:
817 case KEY_A3:
818 case KEY_B2:
819 case KEY_C1:
820 case KEY_C3:
821 goto notFound;
822 case KEY_BTAB: /* shift tab */
823 numEvent = WCCURSES_FillSimpleChar(ir, 0x9);
824 ir[0].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
825 ir[1].Event.KeyEvent.dwControlKeyState |= SHIFT_PRESSED;
826 if (numEvent != 2) WINE_ERR("FillsimpleChar has changed\n");
827 break;
828
829 case KEY_BEG:
830 case KEY_CANCEL:
831 case KEY_CLOSE:
832 case KEY_COMMAND:
833 case KEY_COPY:
834 case KEY_CREATE:
835 goto notFound;
836
837 case KEY_END:
838 numEvent = WCCURSES_FillComplexChar(ir, 0x4f, 0x23, 0);
839 break;
840
841 case KEY_EXIT:
842 case KEY_FIND:
843 case KEY_HELP:
844 case KEY_MARK:
845 case KEY_MESSAGE:
846 goto notFound;
847
848 case KEY_MOUSE:
849 numEvent = WCCURSES_FillMouse(ir);
850 break;
851 #ifdef KEY_RESIZE
852 case KEY_RESIZE:
853 WCCURSES_Resize(data);
854 break;
855 #endif
856
857 case KEY_MOVE:
858 case KEY_NEXT:
859 case KEY_OPEN:
860 case KEY_OPTIONS:
861 case KEY_PREVIOUS:
862 case KEY_REDO:
863 case KEY_REFERENCE:
864 case KEY_REFRESH:
865 case KEY_REPLACE:
866 case KEY_RESTART:
867 case KEY_RESUME:
868 case KEY_SAVE:
869 case KEY_SBEG:
870 case KEY_SCANCEL:
871 case KEY_SCOMMAND:
872 case KEY_SCOPY:
873 case KEY_SCREATE:
874 goto notFound;
875
876 case KEY_SDC:
877 numEvent = WCCURSES_FillComplexChar(ir, 0x53, 0x2e, SHIFT_PRESSED);
878 break;
879 case KEY_SDL:
880 case KEY_SELECT:
881 goto notFound;
882
883 case KEY_SEND:
884 numEvent = WCCURSES_FillComplexChar(ir, 0x4f, 0x23, SHIFT_PRESSED);
885 break;
886
887 case KEY_SEOL:
888 case KEY_SEXIT:
889 case KEY_SFIND:
890 case KEY_SHELP:
891 goto notFound;
892
893 case KEY_SHOME:
894 numEvent = WCCURSES_FillComplexChar(ir, 0x47, 0x24, SHIFT_PRESSED);
895 break;
896 case KEY_SIC:
897 numEvent = WCCURSES_FillComplexChar(ir, 0x52, 0x2d, SHIFT_PRESSED);
898 break;
899 case KEY_SLEFT:
900 numEvent = WCCURSES_FillComplexChar(ir, 0x4b, 0x25, SHIFT_PRESSED);
901 break;
902
903 case KEY_SMESSAGE:
904 case KEY_SMOVE:
905 case KEY_SNEXT:
906 case KEY_SOPTIONS:
907 case KEY_SPREVIOUS:
908 case KEY_SPRINT:
909 case KEY_SREDO:
910 case KEY_SREPLACE:
911 goto notFound;
912
913 case KEY_SRIGHT:
914 numEvent = WCCURSES_FillComplexChar(ir, 0x4d, 0x27, SHIFT_PRESSED);
915 break;
916
917 case KEY_SRSUME:
918 case KEY_SSAVE:
919 case KEY_SSUSPEND:
920 case KEY_SUNDO:
921 case KEY_SUSPEND:
922 case KEY_UNDO:
923 notFound:
924 WINE_FIXME("Not done yet (%o)\n", inchar);
925 break;
926 default:
927 WINE_ERR("Unknown val (%o)\n", inchar);
928 break;
929 }
930 return numEvent;
931 }
932
933 /******************************************************************
934 * input_thread
935 */
936 static DWORD CALLBACK input_thread( void *arg )
937 {
938 struct inner_data* data = arg;
939 int inchar;
940 INPUT_RECORD ir[8];
941 unsigned numEvent;
942 DWORD n;
943 struct pollfd pfd[2];
944
945 pfd[0].fd = 0;
946 pfd[0].events = POLLIN;
947 pfd[1].fd = PRIVATE(data)->sync_pipe[0];
948 pfd[1].events = POLLHUP;
949
950 for (;;)
951 {
952 pfd[0].revents = pfd[1].revents = 0;
953 if (poll( pfd, 2, -1 ) == -1) break;
954 if (pfd[0].revents & (POLLHUP|POLLERR)) break;
955 if (pfd[1].revents & (POLLHUP|POLLERR)) break;
956 if (!(pfd[0].revents & POLLIN)) continue;
957
958 /* we're called from input thread (not main thread), so force unique access */
959 EnterCriticalSection(&PRIVATE(data)->lock);
960 if ((inchar = wgetch(stdscr)) != ERR)
961 {
962 WINE_TRACE("Got o%o (0x%x)\n", inchar,inchar);
963
964 if (inchar >= KEY_MIN && inchar <= KEY_MAX)
965 numEvent = WCCURSES_FillCode(data, ir, inchar);
966 else
967 numEvent = WCCURSES_FillSimpleChar(ir, inchar);
968
969 if (numEvent) WriteConsoleInputW(data->hConIn, ir, numEvent, &n);
970 }
971 LeaveCriticalSection(&PRIVATE(data)->lock);
972 }
973 close( PRIVATE(data)->sync_pipe[0] );
974 return 0;
975 }
976
977 /******************************************************************
978 * WCCURSES_DeleteBackend
979 *
980 *
981 */
982 static void WCCURSES_DeleteBackend(struct inner_data* data)
983 {
984 if (!PRIVATE(data)) return;
985
986 if (PRIVATE(data)->input_thread)
987 {
988 close( PRIVATE(data)->sync_pipe[1] );
989 WaitForSingleObject( PRIVATE(data)->input_thread, INFINITE );
990 CloseHandle( PRIVATE(data)->input_thread );
991 }
992 PRIVATE(data)->lock.DebugInfo->Spare[0] = 0;
993 DeleteCriticalSection(&PRIVATE(data)->lock);
994
995 delwin(PRIVATE(data)->pad);
996 #ifdef HAVE_MOUSEMASK
997 {
998 mmask_t mm;
999 mousemask(PRIVATE(data)->initial_mouse_mask, &mm);
1000 }
1001 #endif
1002 endwin();
1003
1004 HeapFree(GetProcessHeap(), 0, PRIVATE(data)->line);
1005 HeapFree(GetProcessHeap(), 0, PRIVATE(data));
1006 data->private = NULL;
1007 }
1008
1009 /******************************************************************
1010 * WCCURSES_MainLoop
1011 *
1012 *
1013 */
1014 static int WCCURSES_MainLoop(struct inner_data* data)
1015 {
1016 DWORD id;
1017
1018 WCCURSES_Resize(data);
1019
1020 if (pipe( PRIVATE(data)->sync_pipe ) == -1) return 0;
1021 PRIVATE(data)->input_thread = CreateThread( NULL, 0, input_thread, data, 0, &id );
1022
1023 while (!data->dying && WaitForSingleObject(data->hSynchro, INFINITE) == WAIT_OBJECT_0)
1024 {
1025 EnterCriticalSection(&PRIVATE(data)->lock);
1026 WINECON_GrabChanges(data);
1027 LeaveCriticalSection(&PRIVATE(data)->lock);
1028 }
1029
1030 close( PRIVATE(data)->sync_pipe[1] );
1031 WaitForSingleObject( PRIVATE(data)->input_thread, INFINITE );
1032 CloseHandle( PRIVATE(data)->input_thread );
1033 PRIVATE(data)->input_thread = 0;
1034 return 0;
1035 }
1036
1037 /******************************************************************
1038 * WCCURSES_InitBackend
1039 *
1040 * Initialisation part II: creation of window.
1041 *
1042 */
1043 enum init_return WCCURSES_InitBackend(struct inner_data* data)
1044 {
1045 if( !WCCURSES_bind_libcurses() )
1046 return init_not_supported;
1047
1048 data->private = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(struct inner_data_curse));
1049 if (!data->private) return init_failed;
1050
1051 data->fnMainLoop = WCCURSES_MainLoop;
1052 data->fnPosCursor = WCCURSES_PosCursor;
1053 data->fnShapeCursor = WCCURSES_ShapeCursor;
1054 data->fnComputePositions = WCCURSES_ComputePositions;
1055 data->fnRefresh = WCCURSES_Refresh;
1056 data->fnResizeScreenBuffer = WCCURSES_ResizeScreenBuffer;
1057 data->fnSetTitle = WCCURSES_SetTitle;
1058 data->fnScroll = WCCURSES_Scroll;
1059 data->fnSetFont = WCCURSES_SetFont;
1060 data->fnDeleteBackend = WCCURSES_DeleteBackend;
1061 data->hWnd = NULL;
1062
1063 /* FIXME: should find a good way to enable buffer scrolling
1064 * For the time being, setting this to 1 will allow scrolling up/down
1065 * on buffer with F11/F12.
1066 */
1067 /* PRIVATE(data)->allow_scroll = 1; */
1068
1069 initscr();
1070
1071 /* creating the basic colors - FIXME intensity not handled yet */
1072 if (has_colors())
1073 {
1074 int i, j;
1075
1076 start_color();
1077 for (i = 0; i < 8; i++)
1078 for (j = 0; j < 8; j++)
1079 init_pair(i | (j << 3), i, j);
1080 }
1081
1082 raw();
1083 noecho();
1084 intrflush(stdscr, FALSE);
1085 nodelay(stdscr, TRUE);
1086 keypad(stdscr, TRUE);
1087 #ifdef HAVE_MOUSEMASK
1088 if (data->curcfg.quick_edit)
1089 {
1090 mmask_t mm;
1091 mousemask(BUTTON1_PRESSED|BUTTON1_RELEASED|
1092 BUTTON2_PRESSED|BUTTON2_RELEASED|
1093 BUTTON3_PRESSED|BUTTON3_RELEASED|
1094 BUTTON_SHIFT|BUTTON_CTRL|BUTTON_ALT|REPORT_MOUSE_POSITION,
1095 &mm);
1096 /* no click event generation... we just need button up/down events
1097 * it doesn't seem that mouseinterval(-1) behaves as documented...
1098 * 0 seems to be better value to disable click event generation
1099 */
1100 mouseinterval(0);
1101 PRIVATE(data)->initial_mouse_mask = mm;
1102 }
1103 else
1104 {
1105 mmask_t mm;
1106 mousemask(0, &mm);
1107 PRIVATE(data)->initial_mouse_mask = mm;
1108 }
1109 #endif
1110 InitializeCriticalSection(&PRIVATE(data)->lock);
1111 PRIVATE(data)->lock.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": curses");
1112
1113 return init_success;
1114 }
1115
1116 #else
1117 enum init_return WCCURSES_InitBackend(struct inner_data* data)
1118 {
1119 WINE_ERR("(n)curses was not found at configuration time.\n"
1120 "If you want (n)curses support, please install relevant packages.\n");
1121 return init_not_supported;
1122 }
1123 #endif
Maarten's multimedia branch