source: trunk/src/user32/winkeyboard.cpp@ 7216

Last change on this file since 7216 was 7216, checked in by phaller, 24 years ago

AltGr fix
File size: 83.1 KB
Line 
1/* $Id: winkeyboard.cpp,v 1.24 2001-10-26 12:46:17 phaller Exp $ */
2/*
3 * Win32 <-> PM key translation
4 *
5 *
6 * Project Odin Software License can be found in LICENSE.TXT
7 *
8 */
9
10#include <odin.h>
11#include <odinwrap.h>
12#include <os2sel.h>
13
14#include <os2win.h>
15
16#include <string.h>
17#include <stdio.h>
18#include <winkeyboard.h>
19#include "oslibwin.h"
20#include <heapstring.h>
21#include <pmscan.h>
22#include <winscan.h>
23#include <winuser32.h>
24#include "initterm.h"
25
26#define DBG_LOCALLOG DBG_winkeyboard
27#include "dbglocal.h"
28
29
30
31
32ODINDEBUGCHANNEL(USER32-WINKBD)
33
34
35BOOL OPEN32API _O32_GetKeyboardState( PBYTE lpKeyState );
36
37inline BOOL O32_GetKeyboardState(PBYTE lpKeyState)
38{
39 BOOL yyrc;
40 USHORT sel = RestoreOS2FS();
41
42 yyrc = _O32_GetKeyboardState(lpKeyState);
43 SetFS(sel);
44
45 return yyrc;
46}
47
48
49BYTE abPMScanToWinVKey[256][2] =
50/****************************************************************************/
51/* PM Scancode * Win32 vkey Extended Key */
52/****************************************************************************/
53/* 0x00 */ { 0x00, FALSE
54/* 0x01 PMSCAN_ESC */ , VK_ESCAPE ,FALSE
55/* 0x02 PMSCAN_ONE */ , VK_1 ,FALSE
56/* 0x03 PMSCAN_TWO */ , VK_2 ,FALSE
57/* 0x04 PMSCAN_THREE */ , VK_3 ,FALSE
58/* 0x05 PMSCAN_FOUR */ , VK_4 ,FALSE
59/* 0x06 PMSCAN_FIVE */ , VK_5 ,FALSE
60/* 0x07 PMSCAN_SIX */ , VK_6 ,FALSE
61/* 0x08 PMSCAN_SEVEN */ , VK_7 ,FALSE
62/* 0x09 PMSCAN_EIGHT */ , VK_8 ,FALSE
63/* 0x0A PMSCAN_NINE */ , VK_9 ,FALSE
64/* 0x0B PMSCAN_ZERO */ , VK_0 ,FALSE
65/* 0x0C PMSCAN_HYPHEN */ , VK_HYPHEN ,FALSE
66/* 0x0D PMSCAN_EQUAL */ , VK_EQUAL ,FALSE
67/* 0x0E PMSCAN_BACKSPACE */ , VK_BACK ,FALSE
68/* 0x0F PMSCAN_TAB */ , VK_TAB ,FALSE
69/* 0x10 PMSCAN_Q */ , VK_Q ,FALSE
70/* 0x11 PMSCAN_W */ , VK_W ,FALSE
71/* 0x12 PMSCAN_E */ , VK_E ,FALSE
72/* 0x13 PMSCAN_R */ , VK_R ,FALSE
73/* 0x14 PMSCAN_T */ , VK_T ,FALSE
74/* 0x15 PMSCAN_Y */ , VK_Y ,FALSE
75/* 0x16 PMSCAN_U */ , VK_U ,FALSE
76/* 0x17 PMSCAN_I */ , VK_I ,FALSE
77/* 0x18 PMSCAN_O */ , VK_O ,FALSE
78/* 0x19 PMSCAN_P */ , VK_P ,FALSE
79/* 0x1A PMSCAN_BRACKETLEFT */ , VK_BRACKETLEFT ,FALSE
80/* 0x1B PMSCAN_BRACKETRIGHT */ , VK_BRACKETRIGHT ,FALSE
81/* 0x1C PMSCAN_ENTER */ , VK_RETURN ,FALSE
82/* 0x1D PMSCAN_CTRLLEFT */ , VK_LCONTROL ,FALSE
83/* 0x1E PMSCAN_A */ , VK_A ,FALSE
84/* 0x1F PMSCAN_S */ , VK_S ,FALSE
85/* 0x20 PMSCAN_D */ , VK_D ,FALSE
86/* 0x21 PMSCAN_F */ , VK_F ,FALSE
87/* 0x22 PMSCAN_G */ , VK_G ,FALSE
88/* 0x23 PMSCAN_H */ , VK_H ,FALSE
89/* 0x24 PMSCAN_J */ , VK_J ,FALSE
90/* 0x25 PMSCAN_K */ , VK_K ,FALSE
91/* 0x26 PMSCAN_L */ , VK_L ,FALSE
92/* 0x27 PMSCAN_SEMICOLON */ , VK_SEMICOLON ,FALSE
93/* 0x28 PMSCAN_QUOTESINGLE */ , VK_QUOTESINGLE ,FALSE
94/* 0x29 PMSCAN_GRAVE */ , VK_GRAVE ,FALSE
95/* 0x2A PMSCAN_SHIFTLEFT */ , VK_LSHIFT ,FALSE
96/* 0x2B PMSCAN_BACKSLASH */ , VK_BACKSLASH ,FALSE
97/* 0x2C PMSCAN_Z */ , VK_Z ,FALSE
98/* 0x2D PMSCAN_X */ , VK_X ,FALSE
99/* 0x2E PMSCAN_C */ , VK_C ,FALSE
100/* 0x2F PMSCAN_V */ , VK_V ,FALSE
101/* 0x30 PMSCAN_B */ , VK_B ,FALSE
102/* 0x31 PMSCAN_N */ , VK_N ,FALSE
103/* 0x32 PMSCAN_M */ , VK_M ,FALSE
104/* 0x33 PMSCAN_COMMA */ , VK_COMMA ,FALSE
105/* 0x34 PMSCAN_PERIOD */ , VK_PERIOD ,FALSE
106/* 0x35 PMSCAN_SLASH */ , VK_SLASH ,FALSE
107/* 0x36 PMSCAN_SHIFTRIGHT */ , VK_RSHIFT ,TRUE
108/* 0x37 PMSCAN_PADASTERISK */ , VK_MULTIPLY ,FALSE
109/* 0x38 PMSCAN_ALTLEFT */ , VK_LMENU ,FALSE
110/* 0x39 PMSCAN_SPACE */ , VK_SPACE ,FALSE
111/* 0x3A PMSCAN_CAPSLOCK */ , VK_CAPITAL ,FALSE
112/* 0x3B PMSCAN_F1 */ , VK_F1 ,FALSE
113/* 0x3C PMSCAN_F2 */ , VK_F2 ,FALSE
114/* 0x3D PMSCAN_F3 */ , VK_F3 ,FALSE
115/* 0x3E PMSCAN_F4 */ , VK_F4 ,FALSE
116/* 0x3F PMSCAN_F5 */ , VK_F5 ,FALSE
117/* 0x40 PMSCAN_F6 */ , VK_F6 ,FALSE
118/* 0x41 PMSCAN_F7 */ , VK_F7 ,FALSE
119/* 0x42 PMSCAN_F8 */ , VK_F8 ,FALSE
120/* 0x43 PMSCAN_F9 */ , VK_F9 ,FALSE
121/* 0x44 PMSCAN_F10 */ , VK_F10 ,FALSE
122/* 0x45 PMSCAN_NUMLOCK */ , VK_NUMLOCK ,TRUE
123/* 0x46 PMSCAN_SCROLLLOCK */ , VK_SCROLL ,FALSE
124/* 0x47 PMSCAN_PAD7 */ , VK_NUMPAD7 ,FALSE
125/* 0x48 PMSCAN_PAD8 */ , VK_NUMPAD8 ,FALSE
126/* 0x49 PMSCAN_PAD9 */ , VK_NUMPAD9 ,FALSE
127/* 0x4A PMSCAN_PADMINUS */ , VK_SUBTRACT ,FALSE
128/* 0x4B PMSCAN_PAD4 */ , VK_NUMPAD4 ,FALSE
129/* 0x4C PMSCAN_PAD5 */ , VK_NUMPAD5 ,FALSE
130/* 0x4D PMSCAN_PAD6 */ , VK_NUMPAD6 ,FALSE
131/* 0x4E PMSCAN_PADPLUS */ , VK_ADD ,FALSE
132/* 0x4F PMSCAN_PAD1 */ , VK_NUMPAD1 ,FALSE
133/* 0x50 PMSCAN_PAD2 */ , VK_NUMPAD2 ,FALSE
134/* 0x51 PMSCAN_PAD3 */ , VK_NUMPAD3 ,FALSE
135/* 0x52 PMSCAN_PAD0 */ , VK_NUMPAD0 ,FALSE
136/* 0x53 PMSCAN_PADPERIOD */ , VK_DECIMAL ,FALSE
137/* 0x54 PMSCAN_SYSREQ */ , 0x00 ,FALSE
138/* 0x55 PMSCAN_RESET */ , 0x00 ,FALSE
139/* 0x56 PMSCAN_EXTRA */ , VK_EXTRA ,FALSE
140/* 0x57 PMSCAN_F11 */ , VK_F11 ,FALSE
141/* 0x58 PMSCAN_F12 */ , VK_F12 ,FALSE
142/* 0x59 PMSCAN_BACKTAB */ , 0x00 ,FALSE
143/* 0x5A PMSCAN_PADENTER */ , VK_RETURN ,TRUE
144/* 0x5B PMSCAN_CTRLRIGHT */ , VK_RCONTROL ,TRUE
145/* 0x5C PMSCAN_PADSLASH */ , VK_DIVIDE ,TRUE
146/* 0x5D PMSCAN_PRINT */ , VK_SNAPSHOT ,TRUE
147/* 0x5E PMSCAN_ALTRIGHT */ , VK_RMENU ,TRUE
148/* 0x5F PMSCAN_PAUSE */ , VK_PAUSE ,FALSE
149/* 0x60 PMSCAN_HOME */ , VK_HOME ,TRUE
150/* 0x61 PMSCAN_UP */ , VK_UP ,TRUE
151/* 0x62 PMSCAN_PAGEUP */ , VK_PRIOR ,TRUE
152/* 0x63 PMSCAN_LEFT */ , VK_LEFT ,TRUE
153/* 0x64 PMSCAN_RIGHT */ , VK_RIGHT ,TRUE
154/* 0x65 PMSCAN_END */ , VK_END ,TRUE
155/* 0x66 PMSCAN_DOWN */ , VK_DOWN ,TRUE
156/* 0x67 PMSCAN_PAGEDOWN */ , VK_NEXT ,TRUE
157/* 0x68 PMSCAN_INSERT */ , VK_INSERT ,TRUE
158/* 0x69 PMSCAN_DELETE */ , VK_DELETE ,TRUE
159/* 0x6A PMSCAN_F23 */ , VK_F23 ,FALSE
160/* 0x6B PMSCAN_F24 */ , VK_F24 ,FALSE
161/* 0x6C PMSCAN_SYSMEM */ , 0x00 ,FALSE
162/* 0x6D PMSCAN_ERASEEOF */ , VK_EREOF ,FALSE
163/* 0x6E PMSCAN_BREAK */ , VK_CANCEL ,TRUE
164/* 0x6F PMSCAN_MOVEWIN */ , 0x00 ,FALSE
165/* 0x70 PMSCAN_NLS3 */ , 0x00 ,FALSE
166/* 0x71 PMSCAN_HELP */ , VK_HELP ,FALSE
167/* 0x72 PMSCAN_TASKMAN */ , 0x00 ,FALSE
168/* 0x73 PMSCAN_B11 */ , 0x00 ,FALSE
169/* 0x74 PMSCAN_JUMP */ , 0x00 ,FALSE
170/* 0x75 PMSCAN_MINWIN */ , 0x00 ,FALSE
171/* 0x76 PMSCAN_CLEAR */ , 0x00 ,FALSE
172/* 0x77 PMSCAN_77 */ , 0x00 ,FALSE
173/* 0x78 PMSCAN_78 */ , 0x00 ,FALSE
174/* 0x79 PMSCAN_NLS2 */ , 0x00 ,FALSE
175/* 0x7a PMSCAN_SIZE */ , 0x00 ,FALSE
176/* 0x7b PMSCAN_NLS1 */ , 0x00 ,FALSE
177/* 0x7c PMSCAN_APPLICATION */ , VK_APPS ,TRUE
178/* 0x7d PMSCAN_E13 */ , 0x00 ,FALSE
179/* 0x7e PMSCAN_WINLEFT */ , VK_LWIN ,TRUE
180/* 0x7f PMSCAN_WINRIGHT */ , VK_RWIN ,TRUE
181/* 0x80 PMSCAN_PA1 */ , VK_PA1 ,FALSE
182/* 0x81 PMSCAN_F13 */ , VK_F13 ,FALSE
183/* 0x82 PMSCAN_F14 */ , VK_F14 ,FALSE
184/* 0x83 PMSCAN_F15 */ , VK_F15 ,FALSE
185/* 0x84 PMSCAN_PA2 */ , 0x00 ,FALSE
186/* 0x85 PMSCAN_PA3 */ , 0x00 ,FALSE
187/* 0x86 PMSCAN_SPACEBREAK */ , 0x00 ,FALSE
188/* 0x87 PMSCAN_TABRIGHT */ , 0x00 ,FALSE
189/* 0x88 PMSCAN_NOOP */ , 0x00 ,FALSE
190/* 0x89 PMSCAN_F16 */ , VK_F16 ,FALSE
191/* 0x8a PMSCAN_F17 */ , VK_F17 ,FALSE
192/* 0x8b PMSCAN_F18 */ , VK_F18 ,FALSE
193/* 0x8c PMSCAN_F19 */ , VK_F19 ,FALSE
194/* 0x8d PMSCAN_F20 */ , VK_F20 ,FALSE
195/* 0x8e PMSCAN_F21 */ , VK_F21 ,FALSE
196/* 0x8f PMSCAN_F22 */ , VK_F22 ,FALSE
197/* 0x90 */ , 0x00 ,FALSE
198/* 0x91 */ , 0x00 ,FALSE
199/* 0x92 */ , 0x00 ,FALSE
200/* 0x93 */ , 0x00 ,FALSE
201/* 0x94 */ , 0x00 ,FALSE
202/* 0x95 */ , 0x00 ,FALSE
203/* 0x96 */ , 0x00 ,FALSE
204/* 0x97 */ , 0x00 ,FALSE
205/* 0x98 */ , 0x00 ,FALSE
206/* 0x99 */ , 0x00 ,FALSE
207/* 0x9A */ , 0x00 ,FALSE
208/* 0x9B */ , 0x00 ,FALSE
209/* 0x9C */ , 0x00 ,FALSE
210/* 0x9D */ , 0x00 ,FALSE
211/* 0x9E */ , 0x00 ,FALSE
212/* 0x9F */ , 0x00 ,FALSE
213/* 0xA0 */ , 0x00 ,FALSE
214/* 0xA1 */ , 0x00 ,FALSE
215/* 0xA2 */ , 0x00 ,FALSE
216/* 0xA3 */ , 0x00 ,FALSE
217/* 0xA4 */ , 0x00 ,FALSE
218/* 0xA5 */ , 0x00 ,FALSE
219/* 0xA6 */ , 0x00 ,FALSE
220/* 0xA7 */ , 0x00 ,FALSE
221/* 0xA8 */ , 0x00 ,FALSE
222/* 0xA9 */ , 0x00 ,FALSE
223/* 0xAA */ , 0x00 ,FALSE
224/* 0xAB */ , 0x00 ,FALSE
225/* 0xAC */ , 0x00 ,FALSE
226/* 0xAD */ , 0x00 ,FALSE
227/* 0xAE */ , 0x00 ,FALSE
228/* 0xAF */ , 0x00 ,FALSE
229/* 0xB0 */ , 0x00 ,FALSE
230/* 0xB1 */ , 0x00 ,FALSE
231/* 0xB2 */ , 0x00 ,FALSE
232/* 0xB3 */ , 0x00 ,FALSE
233/* 0xB4 */ , 0x00 ,FALSE
234/* 0xB5 */ , 0x00 ,FALSE
235/* 0xB6 */ , 0x00 ,FALSE
236/* 0xB7 */ , 0x00 ,FALSE
237/* 0xB8 */ , 0x00 ,FALSE
238/* 0xB9 */ , 0x00 ,FALSE
239/* 0xBA */ , 0x00 ,FALSE
240/* 0xBB */ , 0x00 ,FALSE
241/* 0xBC */ , 0x00 ,FALSE
242/* 0xBD */ , 0x00 ,FALSE
243/* 0xBE */ , 0x00 ,FALSE
244/* 0xBF */ , 0x00 ,FALSE
245/* 0xC0 */ , 0x00 ,FALSE
246/* 0xC1 */ , 0x00 ,FALSE
247/* 0xC2 */ , 0x00 ,FALSE
248/* 0xC3 */ , 0x00 ,FALSE
249/* 0xC4 */ , 0x00 ,FALSE
250/* 0xC5 */ , 0x00 ,FALSE
251/* 0xC6 */ , 0x00 ,FALSE
252/* 0xC7 */ , 0x00 ,FALSE
253/* 0xC8 */ , 0x00 ,FALSE
254/* 0xC9 */ , 0x00 ,FALSE
255/* 0xCA */ , 0x00 ,FALSE
256/* 0xCB */ , 0x00 ,FALSE
257/* 0xCC */ , 0x00 ,FALSE
258/* 0xCD */ , 0x00 ,FALSE
259/* 0xCE */ , 0x00 ,FALSE
260/* 0xCF */ , 0x00 ,FALSE
261/* 0xD0 */ , 0x00 ,FALSE
262/* 0xD1 */ , 0x00 ,FALSE
263/* 0xD2 */ , 0x00 ,FALSE
264/* 0xD3 */ , 0x00 ,FALSE
265/* 0xD4 */ , 0x00 ,FALSE
266/* 0xD5 */ , 0x00 ,FALSE
267/* 0xD6 */ , 0x00 ,FALSE
268/* 0xD7 */ , 0x00 ,FALSE
269/* 0xD8 */ , 0x00 ,FALSE
270/* 0xD9 */ , 0x00 ,FALSE
271/* 0xDA */ , 0x00 ,FALSE
272/* 0xDB */ , 0x00 ,FALSE
273/* 0xDC */ , 0x00 ,FALSE
274/* 0xDD */ , 0x00 ,FALSE
275/* 0xDE */ , 0x00 ,FALSE
276/* 0xDF */ , 0x00 ,FALSE
277/* 0xE0 */ , 0x00 ,FALSE
278/* 0xE1 */ , 0x00 ,FALSE
279/* 0xE2 */ , 0x00 ,FALSE
280/* 0xE3 */ , 0x00 ,FALSE
281/* 0xE4 */ , 0x00 ,FALSE
282/* 0xE5 */ , 0x00 ,FALSE
283/* 0xE6 */ , 0x00 ,FALSE
284/* 0xE7 */ , 0x00 ,FALSE
285/* 0xE8 */ , 0x00 ,FALSE
286/* 0xE9 */ , 0x00 ,FALSE
287/* 0xEA */ , 0x00 ,FALSE
288/* 0xEB */ , 0x00 ,FALSE
289/* 0xEC */ , 0x00 ,FALSE
290/* 0xED */ , 0x00 ,FALSE
291/* 0xEE */ , 0x00 ,FALSE
292/* 0xEF */ , 0x00 ,FALSE
293/* 0xF0 */ , 0x00 ,FALSE
294/* 0xF1 */ , 0x00 ,FALSE
295/* 0xF2 */ , 0x00 ,FALSE
296/* 0xF3 */ , 0x00 ,FALSE
297/* 0xF4 */ , 0x00 ,FALSE
298/* 0xF5 */ , 0x00 ,FALSE
299/* 0xF6 */ , 0x00 ,FALSE
300/* 0xF7 */ , 0x00 ,FALSE
301/* 0xF8 */ , 0x00 ,FALSE
302/* 0xF9 */ , 0x00 ,FALSE
303/* 0xFA */ , 0x00 ,FALSE
304/* 0xFB */ , 0x00 ,FALSE
305/* 0xFC */ , 0x00 ,FALSE
306/* 0xFD */ , 0x00 ,FALSE
307/* 0xFE */ , 0x00 ,FALSE
308/* 0xFF */ , 0x00 ,FALSE
309 };
310
311typedef struct tagWinVKeyToPMScan
312{
313 /* index is the VKey value */
314 BYTE bPMScanCode;
315 LPSTR lpstrName;
316} WINVKEYTOPMSCAN, *PWINVKEYTOPMSCAN;
317
318WINVKEYTOPMSCAN abWinVKeyToPMScan[256] =
319/**********************************************************************/
320/* Vkey * Scancode * Name */
321/**********************************************************************/
322/* 0x00 */ { 0x00 , NULL
323/* 0x01 VK_LBUTTON */ , 0x00 , NULL
324/* 0x02 VK_RBUTTON */ , 0x00 , NULL
325/* 0x03 VK_CANCEL */ , PMSCAN_BREAK , "Break"
326/* 0x04 VK_MBUTTON */ , 0x00 , NULL
327/* 0x05 */ , 0x00 , NULL
328/* 0x06 */ , 0x00 , NULL
329/* 0x07 */ , 0x00 , NULL
330/* 0x08 VK_BACK */ , PMSCAN_BACKSPACE , "Backspace"
331/* 0x09 VK_TAB */ , PMSCAN_TAB , "Tab"
332/* 0x0A */ , 0x00 , NULL
333/* 0x0B */ , 0x00 , NULL
334/* 0x0C VK_CLEAR */ , PMSCAN_PAD5 , "Num 5"
335/* 0x0D VK_RETURN */ , PMSCAN_ENTER , "Enter"
336/* 0x0E */ , 0x00 , NULL
337/* 0x0F */ , 0x00 , NULL
338/* 0x10 VK_SHIFT */ , PMSCAN_SHIFTLEFT , "Left Shift"
339/* 0x11 VK_CONTROL */ , PMSCAN_CTRLLEFT , "Left Control"
340/* 0x12 VK_MENU */ , PMSCAN_ALTLEFT , "Left Alt"
341/* 0x13 VK_PAUSE */ , PMSCAN_PAUSE , "Pause"
342/* 0x14 VK_CAPITAL */ , PMSCAN_CAPSLOCK , "Caps Lock"
343/* 0x15 */ , 0x00 , NULL
344/* 0x16 */ , 0x00 , NULL
345/* 0x17 */ , 0x00 , NULL
346/* 0x18 */ , 0x00 , NULL
347/* 0x19 */ , 0x00 , NULL
348/* 0x1A */ , 0x00 , NULL
349/* 0x1B VK_ESCAPE */ , PMSCAN_ESC , "Escape"
350/* 0x1C */ , 0x00 , NULL
351/* 0x1D */ , 0x00 , NULL
352/* 0x1E */ , 0x00 , NULL
353/* 0x1F */ , 0x00 , NULL
354/* 0x20 VK_SPACE */ , PMSCAN_SPACE , "Space"
355/* 0x21 VK_PRIOR */ , PMSCAN_PAGEUP , "Page Up"
356/* 0x22 VK_NEXT */ , PMSCAN_PAGEDOWN , "Page Down"
357/* 0x23 VK_END */ , PMSCAN_END , "End"
358/* 0x24 VK_HOME */ , PMSCAN_HOME , "Home"
359/* 0x25 VK_LEFT */ , PMSCAN_LEFT , "Left"
360/* 0x26 VK_UP */ , PMSCAN_UP , "Up"
361/* 0x27 VK_RIGHT */ , PMSCAN_RIGHT , "Right"
362/* 0x28 VK_DOWN */ , PMSCAN_DOWN , "Down"
363/* 0x29 VK_SELECT */ , 0x00 , NULL
364/* 0x2A VK_PRINT */ , 0x00 , NULL
365/* 0x2B VK_EXECUTE */ , 0x00 , NULL
366/* 0x2C VK_SNAPSHOT */ , PMSCAN_PRINT , "Print" // NT4SP6: appears to be printscreen!
367/* 0x2D VK_INSERT */ , PMSCAN_INSERT , "Insert"
368/* 0x2E VK_DELETE */ , PMSCAN_DELETE , "Delete"
369/* 0x2F VK_HELP */ , PMSCAN_HELP , "Help"
370/* 0x30 VK_0 */ , PMSCAN_ZERO , "0"
371/* 0x31 VK_1 */ , PMSCAN_ONE , "1"
372/* 0x32 VK_2 */ , PMSCAN_TWO , "2"
373/* 0x33 VK_3 */ , PMSCAN_THREE , "3"
374/* 0x34 VK_4 */ , PMSCAN_FOUR , "4"
375/* 0x35 VK_5 */ , PMSCAN_FIVE , "5"
376/* 0x36 VK_6 */ , PMSCAN_SIX , "6"
377/* 0x37 VK_7 */ , PMSCAN_SEVEN , "7"
378/* 0x38 VK_8 */ , PMSCAN_EIGHT , "8"
379/* 0x39 VK_9 */ , PMSCAN_NINE , "9"
380/* 0x3A */ , 0x00 , NULL
381/* 0x3B */ , 0x00 , NULL
382/* 0x3C */ , 0x00 , NULL
383/* 0x3D */ , 0x00 , NULL
384/* 0x3E */ , 0x00 , NULL
385/* 0x3F */ , 0x00 , NULL
386/* 0x40 */ , 0x00 , NULL
387/* 0x41 VK_A */ , PMSCAN_A , "A"
388/* 0x42 VK_B */ , PMSCAN_B , "B"
389/* 0x43 VK_C */ , PMSCAN_C , "C"
390/* 0x44 VK_D */ , PMSCAN_D , "D"
391/* 0x45 VK_E */ , PMSCAN_E , "E"
392/* 0x46 VK_F */ , PMSCAN_F , "F"
393/* 0x47 VK_G */ , PMSCAN_G , "G"
394/* 0x48 VK_H */ , PMSCAN_H , "H"
395/* 0x49 VK_I */ , PMSCAN_I , "I"
396/* 0x4A VK_J */ , PMSCAN_J , "J"
397/* 0x4B VK_K */ , PMSCAN_K , "K"
398/* 0x4C VK_L */ , PMSCAN_L , "L"
399/* 0x4D VK_M */ , PMSCAN_M , "M"
400/* 0x4E VK_N */ , PMSCAN_N , "N"
401/* 0x4F VK_O */ , PMSCAN_O , "O"
402/* 0x50 VK_P */ , PMSCAN_P , "P"
403/* 0x51 VK_Q */ , PMSCAN_Q , "Q"
404/* 0x52 VK_R */ , PMSCAN_R , "R"
405/* 0x53 VK_S */ , PMSCAN_S , "S"
406/* 0x54 VK_T */ , PMSCAN_T , "T"
407/* 0x55 VK_U */ , PMSCAN_U , "U"
408/* 0x56 VK_V */ , PMSCAN_V , "V"
409/* 0x57 VK */ , PMSCAN_W , "W"
410/* 0x58 VK_X */ , PMSCAN_X , "X"
411/* 0x59 VK_Y */ , PMSCAN_Y , "Y"
412/* 0x5A VK_Z */ , PMSCAN_Z , "Z"
413/* 0x5B VK_LWIN */ , PMSCAN_WINLEFT , "Left Win"
414/* 0x5C VK_RWIN */ , PMSCAN_WINRIGHT , "Right Win"
415/* 0x5D VK_APPS */ , PMSCAN_APPLICATION , "Application"
416/* 0x5E */ , 0x00 , NULL
417/* 0x5F */ , 0x00 , NULL
418/* 0x60 VK_NUMPAD0 */ , PMSCAN_PAD0 , "Num 0"
419/* 0x61 VK_NUMPAD1 */ , PMSCAN_PAD1 , "Num 1"
420/* 0x62 VK_NUMPAD2 */ , PMSCAN_PAD2 , "Num 2"
421/* 0x63 VK_NUMPAD3 */ , PMSCAN_PAD3 , "Num 3"
422/* 0x64 VK_NUMPAD4 */ , PMSCAN_PAD4 , "Num 4"
423/* 0x65 VK_NUMPAD5 */ , PMSCAN_PAD5 , "Num 5"
424/* 0x66 VK_NUMPAD6 */ , PMSCAN_PAD6 , "Num 6"
425/* 0x67 VK_NUMPAD7 */ , PMSCAN_PAD7 , "Num 7"
426/* 0x68 VK_NUMPAD8 */ , PMSCAN_PAD8 , "Num 8"
427/* 0x69 VK_NUMPAD9 */ , PMSCAN_PAD9 , "Num 9"
428/* 0x6A VK_MULTIPLY */ , PMSCAN_PADASTERISK , "Num *"
429/* 0x6B VK_ADD */ , PMSCAN_PADPLUS , "Num +"
430/* 0x6C VK_SEPARATOR */ , 0x00 , NULL
431/* 0x6D VK_SUBTRACT */ , PMSCAN_PADMINUS , "Num -"
432/* 0x6E VK_DECIMAL */ , PMSCAN_PADPERIOD , "Num ."
433/* 0x6F VK_DIVIDE */ , PMSCAN_PADSLASH , "Num /"
434/* 0x70 VK_F1 */ , PMSCAN_F1 , "F1"
435/* 0x71 VK_F2 */ , PMSCAN_F2 , "F2"
436/* 0x72 VK_F3 */ , PMSCAN_F3 , "F3"
437/* 0x73 VK_F4 */ , PMSCAN_F4 , "F4"
438/* 0x74 VK_F5 */ , PMSCAN_F5 , "F5"
439/* 0x75 VK_F6 */ , PMSCAN_F6 , "F6"
440/* 0x76 VK_F7 */ , PMSCAN_F7 , "F7"
441/* 0x77 VK_F8 */ , PMSCAN_F8 , "F8"
442/* 0x78 VK_F9 */ , PMSCAN_F9 , "F9"
443/* 0x79 VK_F10 */ , PMSCAN_F10 , "F10"
444/* 0x7A VK_F11 */ , PMSCAN_F11 , "F11"
445/* 0x7B VK_F12 */ , PMSCAN_F12 , "F12"
446/* 0x7C VK_F13 */ , PMSCAN_F13 , "F13"
447/* 0x7D VK_F14 */ , PMSCAN_F14 , "F14"
448/* 0x7E VK_F15 */ , PMSCAN_F15 , "F15"
449/* 0x7F VK_F16 */ , PMSCAN_F16 , "F16"
450/* 0x80 VK_F17 */ , PMSCAN_F17 , "F17"
451/* 0x81 VK_F18 */ , PMSCAN_F18 , "F18"
452/* 0x82 VK_F19 */ , PMSCAN_F19 , "F19"
453/* 0x83 VK_F20 */ , PMSCAN_F20 , "F20"
454/* 0x84 VK_F21 */ , PMSCAN_F21 , "F21"
455/* 0x85 VK_F22 */ , PMSCAN_F22 , "F22"
456/* 0x86 VK_F23 */ , PMSCAN_F23 , "F23"
457/* 0x87 VK_F24 */ , PMSCAN_F24 , "F24"
458/* 0x88 */ , 0x00 , NULL
459/* 0x89 */ , 0x00 , NULL
460/* 0x8A */ , 0x00 , NULL
461/* 0x8B */ , 0x00 , NULL
462/* 0x8C */ , 0x00 , NULL
463/* 0x8D */ , 0x00 , NULL
464/* 0x8E */ , 0x00 , NULL
465/* 0x8F */ , 0x00 , NULL
466/* 0x90 VK_NUMLOCK */ , PMSCAN_NUMLOCK , "Num Lock"
467/* 0x91 VK_SCROLL */ , PMSCAN_SCROLLLOCK , "Scroll Lock"
468/* 0x92 */ , 0x00 , NULL
469/* 0x93 */ , 0x00 , NULL
470/* 0x94 */ , 0x00 , NULL
471/* 0x95 */ , 0x00 , NULL
472/* 0x96 */ , 0x00 , NULL
473/* 0x97 */ , 0x00 , NULL
474/* 0x98 */ , 0x00 , NULL
475/* 0x99 */ , 0x00 , NULL
476/* 0x9A */ , 0x00 , NULL
477/* 0x9B */ , 0x00 , NULL
478/* 0x9C */ , 0x00 , NULL
479/* 0x9D */ , 0x00 , NULL
480/* 0x9E */ , 0x00 , NULL
481/* 0x9F */ , 0x00 , NULL
482/* 0xA0 VK_LSHIFT */ , PMSCAN_SHIFTLEFT , "Left Shift"
483/* 0xA1 VK_RSHIFT */ , PMSCAN_SHIFTRIGHT , "Right Shift"
484/* 0xA2 VK_LCONTROL */ , PMSCAN_CTRLLEFT , "Left Control"
485/* 0xA3 VK_RCONTROL */ , PMSCAN_CTRLRIGHT , "Right Control"
486/* 0xA4 VK_LMENU */ , PMSCAN_ALTLEFT , "Left Alt"
487/* 0xA5 VK_RMENU */ , PMSCAN_ALTRIGHT , "Right Alt"
488/* 0xA6 */ , 0x00 , NULL
489/* 0xA7 */ , 0x00 , NULL
490/* 0xA8 */ , 0x00 , NULL
491/* 0xA9 */ , 0x00 , NULL
492/* 0xAA */ , 0x00 , NULL
493/* 0xAB */ , 0x00 , NULL
494/* 0xAC */ , 0x00 , NULL
495/* 0xAD */ , 0x00 , NULL
496/* 0xAE */ , 0x00 , NULL
497/* 0xAF */ , 0x00 , NULL
498/* 0xB0 */ , 0x00 , NULL
499/* 0xB1 */ , 0x00 , NULL
500/* 0xB2 */ , 0x00 , NULL
501/* 0xB3 */ , 0x00 , NULL
502/* 0xB4 */ , 0x00 , NULL
503/* 0xB5 */ , 0x00 , NULL
504/* 0xB6 */ , 0x00 , NULL
505/* 0xB7 */ , 0x00 , NULL
506/* 0xB8 */ , 0x00 , NULL
507/* 0xB9 */ , 0x00 , NULL
508/* 0xBA VK_SEMICOLON */ , PMSCAN_SEMICOLON , ";"
509/* 0xBB VK_EQUAL */ , PMSCAN_EQUAL , "="
510/* 0xBC VK_COMMA */ , PMSCAN_COMMA , ","
511/* 0xBD VK_HYPHEN */ , PMSCAN_HYPHEN , "-"
512/* 0xBE VK_PERIOD */ , PMSCAN_PERIOD , "."
513/* 0xBF VK_SLASH */ , PMSCAN_SLASH , "/"
514/* 0xC0 VK_GRAVE */ , PMSCAN_GRAVE , "'"
515/* 0xC1 VK_FFC1 */ , PMSCAN_JEXTRA , "JExtra" //??
516/* 0xC2 VK_YEN */ , PMSCAN_YEN , "Yen"
517/* 0xC3 */ , 0x00 , NULL
518/* 0xC4 */ , 0x00 , NULL
519/* 0xC5 */ , 0x00 , NULL
520/* 0xC6 */ , 0x00 , NULL
521/* 0xC7 */ , 0x00 , NULL
522/* 0xC8 */ , 0x00 , NULL
523/* 0xC9 */ , 0x00 , NULL
524/* 0xCA */ , 0x00 , NULL
525/* 0xCB */ , 0x00 , NULL
526/* 0xCC */ , 0x00 , NULL
527/* 0xCD */ , 0x00 , NULL
528/* 0xCE */ , 0x00 , NULL
529/* 0xCF */ , 0x00 , NULL
530/* 0xD0 */ , 0x00 , NULL
531/* 0xD1 */ , 0x00 , NULL
532/* 0xD2 */ , 0x00 , NULL
533/* 0xD3 */ , 0x00 , NULL
534/* 0xD4 */ , 0x00 , NULL
535/* 0xD5 */ , 0x00 , NULL
536/* 0xD6 */ , 0x00 , NULL
537/* 0xD7 */ , 0x00 , NULL
538/* 0xD8 */ , 0x00 , NULL
539/* 0xD9 */ , 0x00 , NULL
540/* 0xDA */ , 0x00 , NULL
541/* 0xDB VK_BRACKETLEFT */ , PMSCAN_BRACKETLEFT , "["
542/* 0xDC VK_BACKSLASH */ , PMSCAN_BACKSLASH , "\\"
543/* 0xDD VK_BRACKETRIGHT */ , PMSCAN_BRACKETRIGHT , "]"
544/* 0xDE VK_QUOTESINGLE */ , PMSCAN_QUOTESINGLE , "'"
545/* 0xDF */ , 0x00 , NULL
546/* 0xE0 */ , 0x00 , NULL
547/* 0xE1 */ , 0x00 , NULL
548/* 0xE2 VK_EXTRA */ , PMSCAN_EXTRA , "<"
549/* 0xE3 */ , 0x00 , NULL
550/* 0xE4 */ , 0x00 , NULL
551/* 0xE5 */ , 0x00 , NULL
552/* 0xE6 */ , 0x00 , NULL
553/* 0xE7 */ , 0x00 , NULL
554/* 0xE8 */ , 0x00 , NULL
555/* 0xE9 */ , 0x00 , NULL
556/* 0xEA */ , 0x00 , NULL
557/* 0xEB */ , 0x00 , NULL
558/* 0xEC */ , 0x00 , NULL
559/* 0xED */ , 0x00 , NULL
560/* 0xEE */ , 0x00 , NULL
561/* 0xEF */ , 0x00 , NULL
562/* 0xF0 */ , 0x00 , NULL
563/* 0xF1 */ , 0x00 , NULL
564/* 0xF2 */ , 0x00 , NULL
565/* 0xF3 */ , 0x00 , NULL
566/* 0xF4 */ , 0x00 , NULL
567/* 0xF5 */ , 0x00 , NULL
568/* 0xF6 VK_ATTN */ , 0x00 , NULL
569/* 0xF7 VK_CRSEL */ , 0x00 , NULL
570/* 0xF8 VK_EXSEL */ , 0x00 , NULL
571/* 0xF9 VK_EREOF */ , PMSCAN_ERASEEOF , "Erase"
572/* 0xFA VK_PLAY */ , 0x00 , NULL
573/* 0xFB VK_ZOOM */ , 0x00 , NULL
574/* 0xFC VK_NONAME */ , 0x00 , NULL
575/* 0xFD VK_PA1 */ , PMSCAN_PA1 , "PA1"
576/* 0xFE VK_OEM_CLEAR */ , 0x00 , NULL
577/* 0xFF */ , 0x00 , NULL
578 };
579
580
581// @@@PH
582// Note: windoes uses different scancodes if numlock is pressed
583// This is not (yet) reflected here!
584BYTE abPMScanToWinScan[256][2] =
585/****************************************************************************/
586/* PM Scancode * Win32 Scancode Extended Key */
587/****************************************************************************/
588/* 0x00 */ { 0x00, FALSE
589/* 0x01 PMSCAN_ESC */ , WINSCAN_ESC ,FALSE
590/* 0x02 PMSCAN_ONE */ , WINSCAN_ONE ,FALSE
591/* 0x03 PMSCAN_TWO */ , WINSCAN_TWO ,FALSE
592/* 0x04 PMSCAN_THREE */ , WINSCAN_THREE ,FALSE
593/* 0x05 PMSCAN_FOUR */ , WINSCAN_FOUR ,FALSE
594/* 0x06 PMSCAN_FIVE */ , WINSCAN_FIVE ,FALSE
595/* 0x07 PMSCAN_SIX */ , WINSCAN_SIX ,FALSE
596/* 0x08 PMSCAN_SEVEN */ , WINSCAN_SEVEN ,FALSE
597/* 0x09 PMSCAN_EIGHT */ , WINSCAN_EIGHT ,FALSE
598/* 0x0A PMSCAN_NINE */ , WINSCAN_NINE ,FALSE
599/* 0x0B PMSCAN_ZERO */ , WINSCAN_ZERO ,FALSE
600/* 0x0C PMSCAN_HYPHEN */ , WINSCAN_HYPHEN ,FALSE
601/* 0x0D PMSCAN_EQUAL */ , WINSCAN_EQUAL ,FALSE
602/* 0x0E PMSCAN_BACKSPACE */ , WINSCAN_BACKSPACE ,FALSE
603/* 0x0F PMSCAN_TAB */ , WINSCAN_TAB ,FALSE
604/* 0x10 PMSCAN_Q */ , WINSCAN_Q ,FALSE
605/* 0x11 PMSCAN_W */ , WINSCAN_W ,FALSE
606/* 0x12 PMSCAN_E */ , WINSCAN_E ,FALSE
607/* 0x13 PMSCAN_R */ , WINSCAN_R ,FALSE
608/* 0x14 PMSCAN_T */ , WINSCAN_T ,FALSE
609/* 0x15 PMSCAN_Y */ , WINSCAN_Y ,FALSE
610/* 0x16 PMSCAN_U */ , WINSCAN_U ,FALSE
611/* 0x17 PMSCAN_I */ , WINSCAN_I ,FALSE
612/* 0x18 PMSCAN_O */ , WINSCAN_O ,FALSE
613/* 0x19 PMSCAN_P */ , WINSCAN_P ,FALSE
614/* 0x1A PMSCAN_BRACKETLEFT */ , WINSCAN_BRACKETLEFT ,FALSE
615/* 0x1B PMSCAN_BRACKETRIGHT */ , WINSCAN_BRACKETRIGHT ,FALSE
616/* 0x1C PMSCAN_ENTER */ , WINSCAN_ENTER ,FALSE
617/* 0x1D PMSCAN_CTRLLEFT */ , WINSCAN_CTRLLEFT ,FALSE
618/* 0x1E PMSCAN_A */ , WINSCAN_A ,FALSE
619/* 0x1F PMSCAN_S */ , WINSCAN_S ,FALSE
620/* 0x20 PMSCAN_D */ , WINSCAN_D ,FALSE
621/* 0x21 PMSCAN_F */ , WINSCAN_F ,FALSE
622/* 0x22 PMSCAN_G */ , WINSCAN_G ,FALSE
623/* 0x23 PMSCAN_H */ , WINSCAN_H ,FALSE
624/* 0x24 PMSCAN_J */ , WINSCAN_J ,FALSE
625/* 0x25 PMSCAN_K */ , WINSCAN_K ,FALSE
626/* 0x26 PMSCAN_L */ , WINSCAN_L ,FALSE
627/* 0x27 PMSCAN_SEMICOLON */ , WINSCAN_SEMICOLON ,FALSE
628/* 0x28 PMSCAN_QUOTESINGLE */ , WINSCAN_QUOTESINGLE ,FALSE
629/* 0x29 PMSCAN_GRAVE */ , WINSCAN_GRAVE ,FALSE
630/* 0x2A PMSCAN_SHIFTLEFT */ , WINSCAN_SHIFTLEFT ,FALSE
631/* 0x2B PMSCAN_BACKSLASH */ , WINSCAN_BACKSLASH ,FALSE
632/* 0x2C PMSCAN_Z */ , WINSCAN_Z ,FALSE
633/* 0x2D PMSCAN_X */ , WINSCAN_X ,FALSE
634/* 0x2E PMSCAN_C */ , WINSCAN_C ,FALSE
635/* 0x2F PMSCAN_V */ , WINSCAN_V ,FALSE
636/* 0x30 PMSCAN_B */ , WINSCAN_B ,FALSE
637/* 0x31 PMSCAN_N */ , WINSCAN_N ,FALSE
638/* 0x32 PMSCAN_M */ , WINSCAN_M ,FALSE
639/* 0x33 PMSCAN_COMMA */ , WINSCAN_COMMA ,FALSE
640/* 0x34 PMSCAN_PERIOD */ , WINSCAN_PERIOD ,FALSE
641/* 0x35 PMSCAN_SLASH */ , WINSCAN_SLASH ,FALSE
642/* 0x36 PMSCAN_SHIFTRIGHT */ , WINSCAN_SHIFTRIGHT ,TRUE
643/* 0x37 PMSCAN_PADASTERISK */ , WINSCAN_PADASTERISK ,FALSE
644/* 0x38 PMSCAN_ALTLEFT */ , WINSCAN_ALTLEFT ,FALSE
645/* 0x39 PMSCAN_SPACE */ , WINSCAN_SPACE ,FALSE
646/* 0x3A PMSCAN_CAPSLOCK */ , WINSCAN_CAPSLOCK ,FALSE
647/* 0x3B PMSCAN_F1 */ , WINSCAN_F1 ,FALSE
648/* 0x3C PMSCAN_F2 */ , WINSCAN_F2 ,FALSE
649/* 0x3D PMSCAN_F3 */ , WINSCAN_F3 ,FALSE
650/* 0x3E PMSCAN_F4 */ , WINSCAN_F4 ,FALSE
651/* 0x3F PMSCAN_F5 */ , WINSCAN_F5 ,FALSE
652/* 0x40 PMSCAN_F6 */ , WINSCAN_F6 ,FALSE
653/* 0x41 PMSCAN_F7 */ , WINSCAN_F7 ,FALSE
654/* 0x42 PMSCAN_F8 */ , WINSCAN_F8 ,FALSE
655/* 0x43 PMSCAN_F9 */ , WINSCAN_F9 ,FALSE
656/* 0x44 PMSCAN_F10 */ , WINSCAN_F10 ,FALSE
657/* 0x45 PMSCAN_NUMLOCK */ , WINSCAN_NUMLOCK ,TRUE
658/* 0x46 PMSCAN_SCROLLLOCK */ , WINSCAN_SCROLLLOCK ,FALSE
659/* 0x47 PMSCAN_PAD7 */ , WINSCAN_PAD7 ,FALSE
660/* 0x48 PMSCAN_PAD8 */ , WINSCAN_PAD8 ,FALSE
661/* 0x49 PMSCAN_PAD9 */ , WINSCAN_PAD9 ,FALSE
662/* 0x4A PMSCAN_PADMINUS */ , WINSCAN_PADMINUS ,FALSE
663/* 0x4B PMSCAN_PAD4 */ , WINSCAN_PAD4 ,FALSE
664/* 0x4C PMSCAN_PAD5 */ , WINSCAN_PAD5 ,FALSE
665/* 0x4D PMSCAN_PAD6 */ , WINSCAN_PAD6 ,FALSE
666/* 0x4E PMSCAN_PADPLUS */ , WINSCAN_PADPLUS ,FALSE
667/* 0x4F PMSCAN_PAD1 */ , WINSCAN_PAD1 ,FALSE
668/* 0x50 PMSCAN_PAD2 */ , WINSCAN_PAD2 ,FALSE
669/* 0x51 PMSCAN_PAD3 */ , WINSCAN_PAD3 ,FALSE
670/* 0x52 PMSCAN_PAD0 */ , WINSCAN_PAD0 ,FALSE
671/* 0x53 PMSCAN_PADPERIOD */ , WINSCAN_PADPERIOD ,FALSE
672/* 0x54 PMSCAN_SYSREQ */ , 0x00 ,FALSE
673/* 0x55 PMSCAN_RESET */ , 0x00 ,FALSE
674/* 0x56 PMSCAN_EXTRA */ , WINSCAN_EXTRA ,FALSE
675/* 0x57 PMSCAN_F11 */ , WINSCAN_F11 ,FALSE
676/* 0x58 PMSCAN_F12 */ , WINSCAN_F12 ,FALSE
677/* 0x59 PMSCAN_BACKTAB */ , 0x00 ,FALSE
678/* 0x5A PMSCAN_PADENTER */ , WINSCAN_PADENTER ,TRUE
679/* 0x5B PMSCAN_CTRLRIGHT */ , WINSCAN_CTRLRIGHT ,TRUE
680/* 0x5C PMSCAN_PADSLASH */ , WINSCAN_PADSLASH ,TRUE
681/* 0x5D PMSCAN_PRINT */ , WINSCAN_PRINT ,TRUE
682/* 0x5E PMSCAN_ALTRIGHT */ , WINSCAN_ALTRIGHT ,TRUE
683/* 0x5F PMSCAN_PAUSE */ , WINSCAN_PAUSE ,FALSE
684/* 0x60 PMSCAN_HOME */ , WINSCAN_HOME ,TRUE
685/* 0x61 PMSCAN_UP */ , WINSCAN_UP ,TRUE
686/* 0x62 PMSCAN_PAGEUP */ , WINSCAN_PAGEUP ,TRUE
687/* 0x63 PMSCAN_LEFT */ , WINSCAN_LEFT ,TRUE
688/* 0x64 PMSCAN_RIGHT */ , WINSCAN_RIGHT ,TRUE
689/* 0x65 PMSCAN_END */ , WINSCAN_END ,TRUE
690/* 0x66 PMSCAN_DOWN */ , WINSCAN_DOWN ,TRUE
691/* 0x67 PMSCAN_PAGEDOWN */ , WINSCAN_PAGEDOWN ,TRUE
692/* 0x68 PMSCAN_INSERT */ , WINSCAN_INSERT ,TRUE
693/* 0x69 PMSCAN_DELETE */ , WINSCAN_DELETE ,TRUE
694/* 0x6A PMSCAN_F23 */ , WINSCAN_F23 ,FALSE
695/* 0x6B PMSCAN_F24 */ , WINSCAN_F24 ,FALSE
696/* 0x6C PMSCAN_SYSMEM */ , 0x00 ,FALSE
697/* 0x6D PMSCAN_ERASEEOF */ , WINSCAN_ERASEEOF ,FALSE
698/* 0x6E PMSCAN_BREAK */ , WINSCAN_BREAK ,TRUE
699/* 0x6F PMSCAN_MOVEWIN */ , 0x00 ,FALSE
700/* 0x70 PMSCAN_NLS3 */ , 0x00 ,FALSE
701/* 0x71 PMSCAN_HELP */ , WINSCAN_HELP ,FALSE
702/* 0x72 PMSCAN_TASKMAN */ , 0x00 ,FALSE
703/* 0x73 PMSCAN_B11 */ , 0x00 ,FALSE
704/* 0x74 PMSCAN_JUMP */ , 0x00 ,FALSE
705/* 0x75 PMSCAN_MINWIN */ , 0x00 ,FALSE
706/* 0x76 PMSCAN_CLEAR */ , 0x00 ,FALSE
707/* 0x77 PMSCAN_77 */ , 0x00 ,FALSE
708/* 0x78 PMSCAN_78 */ , 0x00 ,FALSE
709/* 0x79 PMSCAN_NLS2 */ , 0x00 ,FALSE
710/* 0x7a PMSCAN_SIZE */ , 0x00 ,FALSE
711/* 0x7b PMSCAN_NLS1 */ , 0x00 ,FALSE
712/* 0x7c PMSCAN_APPLICATION */ , WINSCAN_APPLICATION ,TRUE
713/* 0x7d PMSCAN_E13 */ , 0x00 ,FALSE
714/* 0x7e PMSCAN */ , WINSCAN_WINLEFT ,TRUE
715/* 0x7f PMSCAN */ , WINSCAN_WINRIGHT ,TRUE
716/* 0x80 PMSCAN_PA1 */ , WINSCAN_PA1 ,FALSE
717/* 0x81 PMSCAN_F13 */ , WINSCAN_F13 ,FALSE
718/* 0x82 PMSCAN_F14 */ , WINSCAN_F14 ,FALSE
719/* 0x83 PMSCAN_F15 */ , WINSCAN_F15 ,FALSE
720/* 0x84 PMSCAN_PA2 */ , 0x00 ,FALSE
721/* 0x85 PMSCAN_PA3 */ , 0x00 ,FALSE
722/* 0x86 PMSCAN_SPACEBREAK */ , 0x00 ,FALSE
723/* 0x87 PMSCAN_TABRIGHT */ , 0x00 ,FALSE
724/* 0x88 PMSCAN_NOOP */ , 0x00 ,FALSE
725/* 0x89 PMSCAN_F16 */ , WINSCAN_F16 ,FALSE
726/* 0x8a PMSCAN_F17 */ , WINSCAN_F17 ,FALSE
727/* 0x8b PMSCAN_F18 */ , WINSCAN_F18 ,FALSE
728/* 0x8c PMSCAN_F19 */ , WINSCAN_F19 ,FALSE
729/* 0x8d PMSCAN_F20 */ , WINSCAN_F20 ,FALSE
730/* 0x8e PMSCAN_F21 */ , WINSCAN_F21 ,FALSE
731/* 0x8f PMSCAN_F22 */ , WINSCAN_F22 ,FALSE
732/* 0x90 */ , 0x00 ,FALSE
733/* 0x91 */ , 0x00 ,FALSE
734/* 0x92 */ , 0x00 ,FALSE
735/* 0x93 */ , 0x00 ,FALSE
736/* 0x94 */ , 0x00 ,FALSE
737/* 0x95 */ , 0x00 ,FALSE
738/* 0x96 */ , 0x00 ,FALSE
739/* 0x97 */ , 0x00 ,FALSE
740/* 0x98 */ , 0x00 ,FALSE
741/* 0x99 */ , 0x00 ,FALSE
742/* 0x9A */ , 0x00 ,FALSE
743/* 0x9B */ , 0x00 ,FALSE
744/* 0x9C */ , 0x00 ,FALSE
745/* 0x9D */ , 0x00 ,FALSE
746/* 0x9E */ , 0x00 ,FALSE
747/* 0x9F */ , 0x00 ,FALSE
748/* 0xA0 */ , 0x00 ,FALSE
749/* 0xA1 */ , 0x00 ,FALSE
750/* 0xA2 */ , 0x00 ,FALSE
751/* 0xA3 */ , 0x00 ,FALSE
752/* 0xA4 */ , 0x00 ,FALSE
753/* 0xA5 */ , 0x00 ,FALSE
754/* 0xA6 */ , 0x00 ,FALSE
755/* 0xA7 */ , 0x00 ,FALSE
756/* 0xA8 */ , 0x00 ,FALSE
757/* 0xA9 */ , 0x00 ,FALSE
758/* 0xAA */ , 0x00 ,FALSE
759/* 0xAB */ , 0x00 ,FALSE
760/* 0xAC */ , 0x00 ,FALSE
761/* 0xAD */ , 0x00 ,FALSE
762/* 0xAE */ , 0x00 ,FALSE
763/* 0xAF */ , 0x00 ,FALSE
764/* 0xB0 */ , 0x00 ,FALSE
765/* 0xB1 */ , 0x00 ,FALSE
766/* 0xB2 */ , 0x00 ,FALSE
767/* 0xB3 */ , 0x00 ,FALSE
768/* 0xB4 */ , 0x00 ,FALSE
769/* 0xB5 */ , 0x00 ,FALSE
770/* 0xB6 */ , 0x00 ,FALSE
771/* 0xB7 */ , 0x00 ,FALSE
772/* 0xB8 */ , 0x00 ,FALSE
773/* 0xB9 */ , 0x00 ,FALSE
774/* 0xBA */ , 0x00 ,FALSE
775/* 0xBB */ , 0x00 ,FALSE
776/* 0xBC */ , 0x00 ,FALSE
777/* 0xBD */ , 0x00 ,FALSE
778/* 0xBE */ , 0x00 ,FALSE
779/* 0xBF */ , 0x00 ,FALSE
780/* 0xC0 */ , 0x00 ,FALSE
781/* 0xC1 */ , 0x00 ,FALSE
782/* 0xC2 */ , 0x00 ,FALSE
783/* 0xC3 */ , 0x00 ,FALSE
784/* 0xC4 */ , 0x00 ,FALSE
785/* 0xC5 */ , 0x00 ,FALSE
786/* 0xC6 */ , 0x00 ,FALSE
787/* 0xC7 */ , 0x00 ,FALSE
788/* 0xC8 */ , 0x00 ,FALSE
789/* 0xC9 */ , 0x00 ,FALSE
790/* 0xCA */ , 0x00 ,FALSE
791/* 0xCB */ , 0x00 ,FALSE
792/* 0xCC */ , 0x00 ,FALSE
793/* 0xCD */ , 0x00 ,FALSE
794/* 0xCE */ , 0x00 ,FALSE
795/* 0xCF */ , 0x00 ,FALSE
796/* 0xD0 */ , 0x00 ,FALSE
797/* 0xD1 */ , 0x00 ,FALSE
798/* 0xD2 */ , 0x00 ,FALSE
799/* 0xD3 */ , 0x00 ,FALSE
800/* 0xD4 */ , 0x00 ,FALSE
801/* 0xD5 */ , 0x00 ,FALSE
802/* 0xD6 */ , 0x00 ,FALSE
803/* 0xD7 */ , 0x00 ,FALSE
804/* 0xD8 */ , 0x00 ,FALSE
805/* 0xD9 */ , 0x00 ,FALSE
806/* 0xDA */ , 0x00 ,FALSE
807/* 0xDB */ , 0x00 ,FALSE
808/* 0xDC */ , 0x00 ,FALSE
809/* 0xDD */ , 0x00 ,FALSE
810/* 0xDE */ , 0x00 ,FALSE
811/* 0xDF */ , 0x00 ,FALSE
812/* 0xE0 */ , 0x00 ,FALSE
813/* 0xE1 */ , 0x00 ,FALSE
814/* 0xE2 */ , 0x00 ,FALSE
815/* 0xE3 */ , 0x00 ,FALSE
816/* 0xE4 */ , 0x00 ,FALSE
817/* 0xE5 */ , 0x00 ,FALSE
818/* 0xE6 */ , 0x00 ,FALSE
819/* 0xE7 */ , 0x00 ,FALSE
820/* 0xE8 */ , 0x00 ,FALSE
821/* 0xE9 */ , 0x00 ,FALSE
822/* 0xEA */ , 0x00 ,FALSE
823/* 0xEB */ , 0x00 ,FALSE
824/* 0xEC */ , 0x00 ,FALSE
825/* 0xED */ , 0x00 ,FALSE
826/* 0xEE */ , 0x00 ,FALSE
827/* 0xEF */ , 0x00 ,FALSE
828/* 0xF0 */ , 0x00 ,FALSE
829/* 0xF1 */ , 0x00 ,FALSE
830/* 0xF2 */ , 0x00 ,FALSE
831/* 0xF3 */ , 0x00 ,FALSE
832/* 0xF4 */ , 0x00 ,FALSE
833/* 0xF5 */ , 0x00 ,FALSE
834/* 0xF6 */ , 0x00 ,FALSE
835/* 0xF7 */ , 0x00 ,FALSE
836/* 0xF8 */ , 0x00 ,FALSE
837/* 0xF9 */ , 0x00 ,FALSE
838/* 0xFA */ , 0x00 ,FALSE
839/* 0xFB */ , 0x00 ,FALSE
840/* 0xFC */ , 0x00 ,FALSE
841/* 0xFD */ , 0x00 ,FALSE
842/* 0xFE */ , 0x00 ,FALSE
843/* 0xFF */ , 0x00 ,FALSE
844 };
845
846
847//******************************************************************************
848//******************************************************************************
849
850ODINPROCEDURE3(KeyTranslatePMToWinBuf,
851 BYTE *, pmkey,
852 BYTE *, winkey,
853 int, nrkeys)
854{
855 for(int i=1;i<nrkeys;i++) {
856 if(abWinVKeyToPMScan[i].bPMScanCode) {
857 winkey[i] = pmkey[OSLibWinTranslateChar(abWinVKeyToPMScan[i].bPMScanCode, TC_SCANCODETOVIRTUALKEY, 0)];
858 }
859 }
860 winkey[VK_SHIFT] = winkey[VK_LSHIFT] | winkey[VK_RSHIFT];
861 winkey[VK_CONTROL] = winkey[VK_LCONTROL] | winkey[VK_RCONTROL];
862 winkey[VK_MENU] = winkey[VK_LMENU] | winkey[VK_RMENU];
863}
864//******************************************************************************
865//******************************************************************************
866BYTE KeyTranslateWinVKeyToPMScan(BYTE bWinVKey, BOOL fExtended)
867{
868 // if the extended bit didn't match, this is
869 // the closest hit
870 BYTE bAlmost = 0;
871
872 // experiment
873#if 0
874 bAlmost = abWinVKeyToPMScan[bWinVKey].bPMScanCode;
875#else
876 for(int i = 0;
877 i < 256; // sizeof(row of abPMScanToWinVKey)
878 i++)
879 {
880 if (abPMScanToWinVKey[i][0] == bWinVKey)
881 {
882 // this represents the PMScan code which is used as index
883 bAlmost = i;
884
885 // exact match!
886 if (abPMScanToWinVKey[i][1] == fExtended)
887 break;
888 }
889 }
890#endif
891
892 dprintf(("KeyTranslateWinVKeyToPMScan(%02xh,%d) = %02xh",
893 bWinVKey,
894 fExtended,
895 bAlmost));
896
897 // almost a match or no match at all.
898 return bAlmost;
899}
900//******************************************************************************
901//******************************************************************************
902void KeyTranslatePMScanToWinVKey(BYTE bPMScan,
903 BOOL bNumLock,
904 PBYTE pbWinVKey,
905 WORD* pwWinScan,
906 PBOOL pfExtended)
907{
908 // @@@PH numlock is currently ignored
909 if (pbWinVKey)
910 *pbWinVKey = abPMScanToWinVKey[bPMScan][0];
911
912 if (pfExtended)
913 *pfExtended = abPMScanToWinVKey[bPMScan][1];
914
915 if (pwWinScan)
916 *pwWinScan = abPMScanToWinScan[bPMScan][0];
917}
918//******************************************************************************
919//******************************************************************************
920BYTE KeyTranslateWinScanToPMScan(BYTE bWinScan, BOOL fExtended)
921{
922 // Note:
923 // MapVirtualKeyA requires this function,
924 // O32_MapVirtualKeyA uses PM Scancodes only!
925
926 // if the extended bit didn't match, this is
927 // the closest hit
928 BYTE bAlmost = 0;
929
930 for(int i = 0;
931 i < 256; // sizeof(row of abPMScanToWinVKey)
932 i++)
933 {
934 if (abPMScanToWinScan[i][0] == bWinScan)
935 {
936 // this represents the PMScan code which is used as index
937 bAlmost = i;
938
939 // exact match!
940 if (abPMScanToWinVKey[i][1] == fExtended)
941 break;
942 }
943 }
944
945 dprintf(("KeyTranslateWinScanToPMScan(%02xh,%d) = %02xh",
946 bWinScan,
947 fExtended,
948 bAlmost));
949
950 // almost a match or no match at all.
951 return bAlmost;
952
953}
954//******************************************************************************
955//******************************************************************************
956ODINFUNCTION1(int, GetKeyboardType,
957 int, nTypeFlag)
958{
959 return O32_GetKeyboardType(nTypeFlag);
960}
961//******************************************************************************
962//******************************************************************************
963ODINFUNCTION1(BOOL, GetKeyboardState,
964 PBYTE, lpKeyState)
965{
966 BYTE PMKeyState[256];
967 BOOL rc;
968
969 memset(PMKeyState, 0, sizeof(PMKeyState));
970 memset(lpKeyState, 0, 256);
971 rc = OSLibWinGetKeyboardStateTable((PBYTE)&PMKeyState[0] );
972//// rc = O32_GetKeyboardState(lpKeyState);
973 if(rc == TRUE)
974 {
975 KeyTranslatePMToWinBuf((BYTE *)&PMKeyState[0], lpKeyState, 256);
976#ifdef DEBUG
977 for(int i=0;i<256;i++) {
978 if(PMKeyState[i] & 0x80) {
979 dprintf2(("PM key 0x%0x = %x", i, PMKeyState[i]));
980 }
981 }
982 for(i=0;i<256;i++) {
983 if(lpKeyState[i]) {
984 dprintf2(("Win key 0x%0x = %x", i, lpKeyState[i]));
985 }
986 }
987#endif
988 return TRUE;
989 }
990 return FALSE;
991}
992//******************************************************************************
993//******************************************************************************
994ODINFUNCTION1(BOOL, SetKeyboardState,
995 PBYTE, lpKeyState)
996{
997 dprintf(("USER32: SetKeyboardState %x not implemented", lpKeyState));
998 return(TRUE);
999}
1000/***********************************************************************
1001 * GetKeyboardLayout (USER32.250)
1002 *
1003 * FIXME: - device handle for keyboard layout defaulted to
1004 * the language id. This is the way Windows default works.
1005 * - the thread identifier (dwLayout) is also ignored.
1006 */
1007// * Remark : Based on Wine version (991031)
1008ODINFUNCTION1(HKL, GetKeyboardLayout,
1009 DWORD, dwLayout)
1010{
1011 HKL layout;
1012 layout = GetSystemDefaultLCID(); /* FIXME */
1013 layout |= (layout<<16); /* FIXME */
1014 dprintf(("GetKeyboardLayout returning %08x\n",layout));
1015 return layout;
1016}
1017/*****************************************************************************
1018 * Name : BOOL WIN32API GetKeyboardLayoutNameA
1019 * Purpose : The GetKeyboardLayoutName function retrieves the name of the
1020 * active keyboard layout.
1021 * Parameters: LPTSTR pwszKLID address of buffer for layout name
1022 * Variables :
1023 * Result : If the function succeeds, the return value is TRUE.
1024 * If the function fails, the return value is FALSE. To get extended
1025 * error information, call GetLastError.
1026 * Remark : Based on Wine version (991031)
1027 * Status : UNTESTED STUB
1028 *
1029 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1030 *****************************************************************************/
1031ODINFUNCTION1(INT, GetKeyboardLayoutNameA,
1032 LPSTR, pwszKLID)
1033{
1034 dprintf(("not correctly implemented"));
1035
1036 sprintf(pwszKLID, "%08x",GetKeyboardLayout(0));
1037 return 1;
1038}
1039
1040
1041/*****************************************************************************
1042 * Name : BOOL WIN32API GetKeyboardLayoutNameW
1043 * Purpose : The GetKeyboardLayoutName function retrieves the name of the
1044 * active keyboard layout.
1045 * Parameters: LPTSTR pwszKLID address of buffer for layout name
1046 * Variables :
1047 * Result : If the function succeeds, the return value is TRUE.
1048 * If the function fails, the return value is FALSE. To get extended
1049 * error information, call GetLastError.
1050 * Remark : Based on Wine version (991031)
1051 * Status : UNTESTED STUB
1052 *
1053 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1054 *****************************************************************************/
1055ODINFUNCTION1(INT, GetKeyboardLayoutNameW,
1056 LPWSTR, pwszKLID)
1057{
1058 LPSTR buf = (LPSTR)HEAP_xalloc( GetProcessHeap(), 0, strlen("00000409")+1);
1059
1060 int res = GetKeyboardLayoutNameA(buf);
1061 lstrcpyAtoW(pwszKLID,buf);
1062 HeapFree( GetProcessHeap(), 0, buf );
1063 return res;
1064}
1065/***********************************************************************
1066 * GetKeyboardLayoutList (USER32.251)
1067 *
1068 * FIXME: Supports only the system default language and layout and
1069 * returns only 1 value.
1070 *
1071 * Return number of values available if either input parm is
1072 * 0, per MS documentation.
1073 *
1074 * Remark : Based on Wine version (991031)
1075 */
1076ODINFUNCTION2(INT, GetKeyboardLayoutList,
1077 INT, nBuff,
1078 HKL *, layouts)
1079{
1080 dprintf(("not correctly implemented"));
1081
1082 if (!nBuff || !layouts)
1083 return 1;
1084
1085 if (layouts)
1086 layouts[0] = GetKeyboardLayout(0);
1087
1088 return 1;
1089}
1090/*****************************************************************************
1091 * Name : int WIN32API ToAscii
1092 * Purpose : The ToAscii function translates the specified virtual-key code
1093 * and keyboard state to the corresponding Windows character or characters.
1094 * Parameters: UINT uVirtKey virtual-key code
1095 * UINT uScanCode scan code
1096 * PBYTE lpbKeyState address of key-state array
1097 * LPWORD lpwTransKey buffer for translated key
1098 * UINT fuState active-menu flag
1099 * Variables :
1100 * Result : 0 The specified virtual key has no translation for the current
1101 * state of the keyboard.
1102 * 1 One Windows character was copied to the buffer.
1103 * 2 Two characters were copied to the buffer. This usually happens
1104 * when a dead-key character (accent or diacritic) stored in the
1105 * keyboard layout cannot be composed with the specified virtual
1106 * key to form a single character.
1107 * Remark :
1108 * Status : UNTESTED STUB
1109 *
1110 * Author : SvL
1111 *****************************************************************************/
1112
1113ODINFUNCTION5(int, ToAscii,
1114 UINT, uVirtKey,
1115 UINT, uScanCode,
1116 PBYTE, lpbKeyState,
1117 LPWORD, lpwTransKey,
1118 UINT, fuState)
1119{
1120 INT ret;
1121
1122 if (uScanCode == 0) {
1123 /* This happens when doing Alt+letter : a fake 'down arrow' key press
1124 event is generated by windows. Just ignore it. */
1125 dprintf2(("scanCode=0, doing nothing"));
1126 return 0;
1127 }
1128 if (uScanCode & 0x8000)
1129 {
1130 dprintf2(("Key UP, doing nothing"));
1131 return 0;
1132 }
1133
1134 /* We have another special case for delete key (XK_Delete) on an
1135 extended keyboard. X returns a char for it, but Windows doesn't */
1136 if (uVirtKey == VK_DELETE)
1137 {
1138 *(char*)lpwTransKey = 0;
1139 ret = 0;
1140 }
1141 else
1142 if (uVirtKey == VK_ESCAPE) {
1143 //NT returns VK_ESCAPE here
1144 *(char*)lpwTransKey = VK_ESCAPE;
1145 ret = 1;
1146 }
1147 else {
1148 ULONG shiftstate = 0;
1149
1150 //TODO: multiple characters returned (DBCS??)
1151
1152 if(lpbKeyState[VK_LSHIFT] & 0x80) shiftstate |= TCF_LSHIFT;
1153 if(lpbKeyState[VK_RSHIFT] & 0x80) shiftstate |= TCF_RSHIFT;
1154 if(lpbKeyState[VK_SHIFT] & 0x80) shiftstate |= TCF_SHIFT;
1155 if(lpbKeyState[VK_LCONTROL] & 0x80) shiftstate |= TCF_LCONTROL;
1156 if(lpbKeyState[VK_RCONTROL] & 0x80) shiftstate |= TCF_RCONTROL;
1157 if(lpbKeyState[VK_CONTROL] & 0x80) shiftstate |= TCF_CONTROL;
1158 if(lpbKeyState[VK_LMENU] & 0x80) shiftstate |= TCF_ALT;
1159 if(lpbKeyState[VK_RMENU] & 0x80) shiftstate |= TCF_ALTGR;
1160 if(lpbKeyState[VK_MENU] & 0x80) shiftstate |= TCF_ALT;
1161 if(lpbKeyState[VK_CAPITAL] & 1) shiftstate |= TCF_CAPSLOCK;
1162 if(lpbKeyState[VK_NUMLOCK] & 1) shiftstate |= TCF_NUMLOCK;
1163
1164 //NT only modifies the bytes it returns
1165 *(char *)lpwTransKey = OSLibWinTranslateChar(uScanCode, TC_SCANCODETOCHAR, shiftstate);
1166
1167 if(shiftstate & TCF_CONTROL) {
1168 if(uVirtKey >= VK_A && uVirtKey <= VK_Z) {
1169 //NT returns key-0x60 (or so it seems) for ctrl-(shift-)-a..z
1170 if(shiftstate & (TCF_SHIFT|TCF_CAPSLOCK)) {
1171 *(char *)lpwTransKey -= 0x40;
1172 }
1173 else *(char *)lpwTransKey -= 0x60;
1174 }
1175 else
1176 if(uVirtKey == VK_SPACE) {
1177 if(shiftstate & TCF_SHIFT) {
1178 //NT returns 0 for ctrl-shift-space
1179 *lpwTransKey = 0;
1180 }
1181 }
1182 else {
1183 //NT returns 0 for ctrl-0, ctrl-.
1184 *lpwTransKey = 0;
1185 }
1186 }
1187
1188 if(*(char *)lpwTransKey == 0) {
1189 ret = 0;
1190 }
1191 else ret = 1;
1192 }
1193 dprintf2(("USER32:ToAscii returned %x, len %d", *lpwTransKey, ret));
1194 return ret;
1195}
1196/*****************************************************************************
1197 * Name : int WIN32API ToAsciiEx
1198 * Purpose : The ToAscii function translates the specified virtual-key code
1199 * and keyboard state to the corresponding Windows character or characters.
1200 * Parameters: UINT uVirtKey virtual-key code
1201 * UINT uScanCode scan code
1202 * PBYTE lpbKeyState address of key-state array
1203 * LPWORD lpwTransKey buffer for translated key
1204 * UINT fuState active-menu flag
1205 * HLK hlk keyboard layout handle
1206 * Variables :
1207 * Result : 0 The specified virtual key has no translation for the current
1208 * state of the keyboard.
1209 * 1 One Windows character was copied to the buffer.
1210 * 2 Two characters were copied to the buffer. This usually happens
1211 * when a dead-key character (accent or diacritic) stored in the
1212 * keyboard layout cannot be composed with the specified virtual
1213 * key to form a single character.
1214 * Remark :
1215 * Status : UNTESTED STUB
1216 *
1217 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1218 *****************************************************************************/
1219
1220ODINFUNCTION6(int, ToAsciiEx,
1221 UINT, uVirtKey,
1222 UINT, uScanCode,
1223 PBYTE, lpbKeyState,
1224 LPWORD, lpwTransKey,
1225 UINT, fuState,
1226 HKL, hkl)
1227{
1228 dprintf(("imcompletely implemented"));
1229
1230 return ToAscii(uVirtKey, uScanCode, lpbKeyState, lpwTransKey, fuState);
1231}
1232/*****************************************************************************
1233 * Name : int WIN32API ToUnicode
1234 * Purpose : The ToUnicode function translates the specified virtual-key code
1235 * and keyboard state to the corresponding Unicode character or characters.
1236 * Parameters: UINT wVirtKey virtual-key code
1237 * UINT wScanCode scan code
1238 * PBYTE lpKeyState address of key-state array
1239 * LPWSTR pwszBuff buffer for translated key
1240 * int cchBuff size of translated key buffer
1241 * UINT wFlags set of function-conditioning flags
1242 * Variables :
1243 * Result : - 1 The specified virtual key is a dead-key character (accent or
1244 * diacritic). This value is returned regardless of the keyboard
1245 * layout, even if several characters have been typed and are
1246 * stored in the keyboard state. If possible, even with Unicode
1247 * keyboard layouts, the function has written a spacing version of
1248 * the dead-key character to the buffer specified by pwszBuffer.
1249 * For example, the function writes the character SPACING ACUTE
1250 * (0x00B4), rather than the character NON_SPACING ACUTE (0x0301).
1251 * 0 The specified virtual key has no translation for the current
1252 * state of the keyboard. Nothing was written to the buffer
1253 * specified by pwszBuffer.
1254 * 1 One character was written to the buffer specified by pwszBuffer.
1255 * 2 or more Two or more characters were written to the buffer specified by
1256 * pwszBuff. The most common cause for this is that a dead-key
1257 * character (accent or diacritic) stored in the keyboard layout
1258 * could not be combined with the specified virtual key to form a
1259 * single character.
1260 * Remark :
1261 * Status : UNTESTED STUB
1262 *
1263 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1264 *****************************************************************************/
1265
1266ODINFUNCTION6(int, ToUnicode,
1267 UINT, uVirtKey,
1268 UINT, uScanCode,
1269 PBYTE, lpKeyState,
1270 LPWSTR, pwszBuff,
1271 int, cchBuff,
1272 UINT, wFlags)
1273{
1274 dprintf(("not implemented.\n"));
1275
1276 return (0);
1277}
1278/*****************************************************************************
1279 * Name : UINT WIN32API GetKBCodePage
1280 * Purpose : The GetKBCodePage function is provided for compatibility with
1281 * earlier versions of Windows. In the Win32 application programming
1282 * interface (API) it just calls the GetOEMCP function.
1283 * Parameters:
1284 * Variables :
1285 * Result : If the function succeeds, the return value is an OEM code-page
1286 * identifier, or it is the default identifier if the registry
1287 * value is not readable. For a list of OEM code-page identifiers,
1288 * see GetOEMCP.
1289 * Remark :
1290 * Status : COMPLETELY IMPLEMENTED UNTESTED
1291 *
1292 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1293 *****************************************************************************/
1294
1295ODINFUNCTION0(UINT, GetKBCodePage)
1296{
1297 return (GetOEMCP());
1298}
1299//******************************************************************************
1300//******************************************************************************
1301ODINFUNCTION3(int, GetKeyNameTextA,
1302 LPARAM, lParam,
1303 LPSTR, lpString,
1304 int, nSize)
1305{
1306 // check the scancodes if the extended key bit is set so
1307 // we can easily distinguish between "left" and "right" special keys, etc.
1308 BOOL fDontCare = (lParam & 0x02000000) != 0;
1309 BOOL fExtended = (lParam & 0x01000000) != 0;
1310 UCHAR ucWinScan = (lParam & 0x00ff0000) >> 16;
1311 UCHAR ucWinVKey;
1312 UCHAR ucPMScan;
1313 int result;
1314
1315 if (fDontCare)
1316 {
1317 fExtended = FALSE;
1318
1319 // map "right keys" to "universal keys"
1320 // LALT,RALT -> ALT
1321 // etc.
1322 // @@@PH
1323 }
1324
1325 // Note: Open32 expects PM Scancodes, NOT Winscancodes.
1326 // Note: this is the only way of loss-less conversion!
1327 ucPMScan = KeyTranslateWinScanToPMScan(ucWinScan, fExtended);
1328 dprintf(("ucWinScan=%02xh, fExtended=%d translated to PMscan=%02xh\n",
1329 ucWinScan,
1330 fExtended,
1331 ucPMScan));
1332 ucWinVKey = abPMScanToWinVKey[ucPMScan][0];
1333 dprintf(("ucPMScan=%02xh translated to ucWinVKey=%02xh\n",
1334 ucPMScan,
1335 ucWinVKey));
1336
1337 // Bug in Open32:
1338 // 0 - expects PMScancodes instead of WinScancodes
1339 // 1 - the "extended key bit" is not taken into account
1340 // 2 - some keys (AltGr) have not been assigned any names
1341 // int result = O32_GetKeyNameText(lParam,lpString,nSize);
1342
1343 memset(lpString, 0, nSize);
1344
1345 LPSTR lpstrKey = abWinVKeyToPMScan[ucWinVKey].lpstrName;
1346 if (NULL == lpstrKey)
1347 {
1348 dprintf(("ERROR: keyname for winscan=%02xh winvkey=%02xh, fExtended=%d not found.\n",
1349 ucWinScan, ucWinVKey, fExtended & !fDontCare));
1350
1351 // build artificial name
1352
1353 CHAR szName[10];
1354 sprintf(szName,
1355 "VKey%02x%c",
1356 ucWinScan,
1357 fExtended ? '+' : 0);
1358 memcpy(lpString, szName, nSize);
1359
1360 // how many chars have been returned?
1361 result = min(nSize, strlen(lpString));
1362 }
1363 else
1364 {
1365 result = min(nSize, strlen(lpstrKey));
1366 strncpy (lpString, lpstrKey, result);
1367 }
1368
1369 dprintf(("keyname=[%s]\n",
1370 lpString));
1371
1372 return result;
1373}
1374//******************************************************************************
1375//******************************************************************************
1376ODINFUNCTION3(int, GetKeyNameTextW,
1377 LPARAM, lParam,
1378 LPWSTR, lpString,
1379 int, nSize)
1380{
1381 dprintf(("USER32: GetKeyNameTextW DOES NOT WORK (not implemented)\n"));
1382 // NOTE: This will not work as is (needs UNICODE support)
1383 return 0;
1384// return O32_GetKeyNameText(arg1, arg2, arg3);
1385}
1386//******************************************************************************
1387//******************************************************************************
1388ODINFUNCTION1(SHORT, GetKeyState,
1389 int, nVirtKey)
1390{
1391 return O32_GetKeyState(nVirtKey);
1392}
1393//******************************************************************************
1394//******************************************************************************
1395ODINFUNCTION1(WORD, GetAsyncKeyState,
1396 INT, nVirtKey)
1397{
1398 if(fVersionWarp3)
1399 {
1400 dprintf(("WARNING: not correctly implemented for Warp 3"));
1401 //Not present in Warp 3's PMWINX
1402 return O32_GetKeyState(nVirtKey);
1403 }
1404 else
1405 return O32_GetAsyncKeyState(nVirtKey);
1406}
1407//******************************************************************************
1408//******************************************************************************
1409ODINFUNCTION2(UINT, MapVirtualKeyA,
1410 UINT, uCode,
1411 UINT, uMapType)
1412{
1413 dprintf(("imcompletely implemented"));
1414
1415 /* A quick fix for Commandos, very incomplete */
1416 switch (uMapType)
1417 {
1418 case 2:
1419 if (uCode >= VK_A && uCode <= VK_Z)
1420 {
1421 return 'A' + uCode - VK_A;
1422 }
1423 break;
1424
1425 case 1:
1426 case 3:
1427 // Open32 uses PMScancodes, not Windows Scancodes!!
1428 // @@@PH the extended flag is to be ignored!
1429 BYTE bPMScan = KeyTranslateWinScanToPMScan(uCode, FALSE);
1430 return O32_MapVirtualKey(bPMScan, uMapType);
1431 }
1432 return O32_MapVirtualKey(uCode, uMapType);
1433}
1434//******************************************************************************
1435//******************************************************************************
1436ODINFUNCTION2(UINT, MapVirtualKeyW,
1437 UINT, uCode,
1438 UINT, uMapType)
1439{
1440 dprintf(("incorrectly implemented\n"));
1441
1442 // NOTE: This will not work as is (needs UNICODE support)
1443 return O32_MapVirtualKey(uCode,uMapType);
1444}
1445/*****************************************************************************
1446 * Name : UINT WIN32API MapVirtualKeyExA
1447 * Purpose : The MapVirtualKeyEx function translates (maps) a virtual-key
1448 * code into a scan code or character value, or translates a scan
1449 * code into a virtual-key code. The function translates the codes
1450 * using the input language and physical keyboard layout identified
1451 * by the given keyboard layout handle.
1452 * Parameters:
1453 * Variables :
1454 * Result : The return value is either a scan code, a virtual-key code, or
1455 * a character value, depending on the value of uCode and uMapType.
1456 * If there is no translation, the return value is zero.
1457 * Remark :
1458 * Status : UNTESTED STUB
1459 *
1460 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1461 *****************************************************************************/
1462ODINFUNCTION3(UINT, MapVirtualKeyExA,
1463 UINT, uCode,
1464 UINT, uMapType,
1465 HKL, dwhkl)
1466{
1467 dprintf(("incompletely implemented"));
1468
1469 return MapVirtualKeyA(uCode, uMapType);
1470}
1471/*****************************************************************************
1472 * Name : UINT WIN32API MapVirtualKeyExW
1473 * Purpose : The MapVirtualKeyEx function translates (maps) a virtual-key
1474 * code into a scan code or character value, or translates a scan
1475 * code into a virtual-key code. The function translates the codes
1476 * using the input language and physical keyboard layout identified
1477 * by the given keyboard layout handle.
1478 * Parameters:
1479 * Variables :
1480 * Result : The return value is either a scan code, a virtual-key code, or
1481 * a character value, depending on the value of uCode and uMapType.
1482 * If there is no translation, the return value is zero.
1483 * Remark :
1484 * Status : UNTESTED STUB
1485 *
1486 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1487 *****************************************************************************/
1488ODINFUNCTION3(UINT, MapVirtualKeyExW,
1489 UINT, uCode,
1490 UINT, uMapType,
1491 HKL, dwhkl)
1492{
1493 dprintf(("incompletely implemented"));
1494
1495 return MapVirtualKeyW(uCode, uMapType);
1496}
1497/*****************************************************************************
1498 * Name : DWORD WIN32API OemKeyScan
1499 * Purpose : The OemKeyScan function maps OEM ASCII codes 0 through 0x0FF
1500 * into the OEM scan codes and shift states. The function provides
1501 * information that allows a program to send OEM text to another
1502 * program by simulating keyboard input.
1503 * Parameters:
1504 * Variables :
1505 * Result :
1506 * Remark :
1507 * Status : Borrowed from NT
1508 *
1509 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1510 *****************************************************************************/
1511ODINFUNCTION1(DWORD, OemKeyScan,
1512 WORD, wOemChar)
1513{
1514 int nVirtKey;
1515
1516 OemToCharBuffA((LPCSTR)&wOemChar,
1517 (LPSTR) &nVirtKey,
1518 1);
1519 if (nVirtKey != 0)
1520 {
1521 SHORT sScan = VkKeyScanA(nVirtKey);
1522 nVirtKey = MapVirtualKeyA( (sScan & 0xff), 0);
1523 if (nVirtKey != 0)
1524 {
1525 return ( (nVirtKey & 0x00FF) ||
1526 ( (nVirtKey & 0xFF00) << 8) );
1527 }
1528 }
1529
1530 // if not found ...
1531 return 0xffffffff;
1532}
1533//******************************************************************************
1534//******************************************************************************
1535ODINFUNCTION4(BOOL, RegisterHotKey,
1536 HWND, hwnd,
1537 int, idHotKey,
1538 UINT, fuModifiers,
1539 UINT, uVirtKey)
1540{
1541 dprintf(("not implemented"));
1542
1543 hwnd = Win32ToOS2Handle(hwnd);
1544 return(TRUE);
1545}
1546//******************************************************************************
1547//******************************************************************************
1548ODINFUNCTION2(BOOL, UnregisterHotKey,
1549 HWND, hwnd,
1550 int, idHotKey)
1551{
1552 dprintf(("not implemented"));
1553
1554 hwnd = Win32ToOS2Handle(hwnd);
1555
1556 return(TRUE);
1557}
1558
1559//******************************************************************************
1560//SvL: 24-6-'97 - Added
1561//******************************************************************************
1562ODINFUNCTION1(WORD, VkKeyScanA,
1563 char, ch)
1564{
1565 return O32_VkKeyScan(ch);
1566}
1567//******************************************************************************
1568//******************************************************************************
1569ODINFUNCTION1(WORD, VkKeyScanW,
1570 WCHAR, wch)
1571{
1572 dprintf(("incorrectly implemented"));
1573 // NOTE: This will not work as is (needs UNICODE support)
1574 return O32_VkKeyScan((char)wch);
1575}
1576/*****************************************************************************
1577 * Name : SHORT WIN32API VkKeyScanExW
1578 * Purpose : The VkKeyScanEx function translates a character to the
1579 * corresponding virtual-key code and shift state. The function
1580 * translates the character using the input language and physical
1581 * keyboard layout identified by the given keyboard layout handle.
1582 * Parameters: UINT uChar character to translate
1583 * HKL hkl keyboard layout handle
1584 * Variables :
1585 * Result : see docs
1586 * Remark :
1587 * Status : UNTESTED STUB
1588 *
1589 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1590 *****************************************************************************/
1591ODINFUNCTION2(WORD, VkKeyScanExW,
1592 WCHAR, uChar,
1593 HKL, hkl)
1594{
1595 dprintf(("partially implemented"));
1596
1597 return VkKeyScanW(uChar);
1598}
1599/*****************************************************************************
1600 * Name : SHORT WIN32API VkKeyScanExA
1601 * Purpose : The VkKeyScanEx function translates a character to the
1602 * corresponding virtual-key code and shift state. The function
1603 * translates the character using the input language and physical
1604 * keyboard layout identified by the given keyboard layout handle.
1605 * Parameters: UINT uChar character to translate
1606 * HKL hkl keyboard layout handle
1607 * Variables :
1608 * Result : see docs
1609 * Remark :
1610 * Status : UNTESTED STUB
1611 *
1612 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1613 *****************************************************************************/
1614ODINFUNCTION2(WORD, VkKeyScanExA,
1615 CHAR, uChar,
1616 HKL, hkl)
1617{
1618 dprintf(("partially implemented"));
1619
1620 return VkKeyScanA(uChar);
1621}
1622/*****************************************************************************
1623 * Name : VOID WIN32API keybd_event
1624 * Purpose : The keybd_event function synthesizes a keystroke. The system
1625 * can use such a synthesized keystroke to generate a WM_KEYUP or
1626 * WM_KEYDOWN message. The keyboard driver's interrupt handler calls
1627 * the keybd_event function.
1628 * Parameters: BYTE bVk virtual-key code
1629
1630 * BYTE bScan hardware scan code
1631 * DWORD dwFlags flags specifying various function options
1632 * DWORD dwExtraInfo additional data associated with keystroke
1633 * Variables :
1634 * Result :
1635 * Remark :
1636 * Status : UNTESTED STUB
1637 *
1638 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1639 *****************************************************************************/
1640ODINPROCEDURE4(keybd_event,
1641 BYTE, bVk,
1642 BYTE, bScan,
1643 DWORD, dwFlags,
1644 DWORD, dwExtraInfo)
1645{
1646 INPUT i;
1647
1648 // format input packet
1649 i.type = INPUT_KEYBOARD;
1650 i.ki.wVk = bVk;
1651 i.ki.wScan = bScan;
1652 i.ki.dwFlags = dwFlags;
1653 i.ki.dwExtraInfo = dwExtraInfo;
1654
1655 // forward to more modern API
1656 SendInput(1, &i, sizeof(i) );
1657}
1658/*****************************************************************************
1659 * Name : HLK WIN32API LoadKeyboardLayoutA
1660 * Purpose : The LoadKeyboardLayout function loads a new keyboard layout into
1661 * the system. Several keyboard layouts can be loaded at a time, but
1662 * only one per process is active at a time. Loading multiple keyboard
1663 * layouts makes it possible to rapidly switch between layouts.
1664 * Parameters:
1665 * Variables :
1666 * Result : If the function succeeds, the return value is the handle of the
1667 * keyboard layout.
1668 * If the function fails, the return value is NULL. To get extended
1669 * error information, call GetLastError.
1670 * Remark :
1671 * Status : UNTESTED STUB
1672 *
1673 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1674 *****************************************************************************/
1675ODINFUNCTION2(HKL, LoadKeyboardLayoutA,
1676 LPCSTR, pwszKLID,
1677 UINT, Flags)
1678{
1679 dprintf(("USER32:LeadKeyboardLayoutA (%s,%u) not implemented.\n",
1680 pwszKLID,
1681 Flags));
1682
1683 return (NULL);
1684}
1685/*****************************************************************************
1686 * Name : HLK WIN32API LoadKeyboardLayoutW
1687 * Purpose : The LoadKeyboardLayout function loads a new keyboard layout into
1688 * the system. Several keyboard layouts can be loaded at a time, but
1689 * only one per process is active at a time. Loading multiple keyboard
1690 * layouts makes it possible to rapidly switch between layouts.
1691 * Parameters:
1692 * Variables :
1693 * Result : If the function succeeds, the return value is the handle of the
1694 * keyboard layout.
1695 * If the function fails, the return value is NULL. To get extended
1696 * error information, call GetLastError.
1697 * Remark :
1698 * Status : UNTESTED STUB
1699 *
1700 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1701 *****************************************************************************/
1702ODINFUNCTION2(HKL, LoadKeyboardLayoutW,
1703 LPCWSTR, pwszKLID,
1704 UINT, Flags)
1705{
1706 dprintf(("USER32:LoadKeyboardLayoutW (%ls,%u) not implemented.\n",
1707 pwszKLID,
1708 Flags));
1709
1710 return (NULL);
1711}
1712//******************************************************************************
1713//******************************************************************************
1714ODINFUNCTION2(BOOL, ActivateKeyboardLayout,
1715 HKL, hkl,
1716 UINT, fuFlags)
1717{
1718 dprintf(("not implemented\n"));
1719 return(TRUE);
1720}
1721/*****************************************************************************
1722 * Name : BOOL WIN32API UnloadKeyboardLayout
1723 * Purpose : The UnloadKeyboardLayout function removes a keyboard layout.
1724 * Parameters: HKL hkl handle of keyboard layout
1725 * Variables :
1726 * Result : If the function succeeds, the return value is the handle of the
1727 * keyboard layout; otherwise, it is NULL. To get extended error
1728 * information, use the GetLastError function.
1729 * Remark :
1730 * Status : UNTESTED STUB
1731 *
1732 * Author : Patrick Haller [Thu, 1998/02/26 11:55]
1733 *****************************************************************************/
1734ODINFUNCTION1(BOOL, UnloadKeyboardLayout,
1735 HKL, hkl)
1736{
1737 dprintf(("not implemented.\n"));
1738
1739 return (TRUE);
1740}
1741//******************************************************************************
1742//******************************************************************************
Note: See TracBrowser for help on using the repository browser.