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