4 * Copyright 1993 Bob Amstadt
5 * Copyright 1996 Albrecht Kleine
6 * Copyright 1997 David Faure
7 * Copyright 1998 Morten Welinder
8 * Copyright 1998 Ulrich Weigand
17 #include "wine/keyboard16.h"
22 #include "debugtools.h"
23 #include "debugtools.h"
27 DECLARE_DEBUG_CHANNEL(event
)
28 DECLARE_DEBUG_CHANNEL(keyboard
)
30 /**********************************************************************/
32 KEYBOARD_DRIVER
*KEYBOARD_Driver
= NULL
;
34 static LPKEYBD_EVENT_PROC DefKeybEventProc
= NULL
;
35 LPBYTE pKeyStateTable
= NULL
;
37 /***********************************************************************
38 * KEYBOARD_Inquire (KEYBOARD.1)
40 WORD WINAPI
KEYBOARD_Inquire(LPKBINFO kbInfo
)
42 kbInfo
->Begin_First_Range
= 0;
43 kbInfo
->End_First_Range
= 0;
44 kbInfo
->Begin_Second_Range
= 0;
45 kbInfo
->End_Second_Range
= 0;
46 kbInfo
->StateSize
= 16;
48 return sizeof(KBINFO
);
51 /***********************************************************************
52 * KEYBOARD_Enable (KEYBOARD.2)
54 VOID WINAPI
KEYBOARD_Enable( LPKEYBD_EVENT_PROC lpKeybEventProc
,
57 static BOOL initDone
= FALSE
;
59 DefKeybEventProc
= lpKeybEventProc
;
60 pKeyStateTable
= lpKeyState
;
62 /* all states to false */
63 memset( lpKeyState
, 0, sizeof(lpKeyState
) );
65 if (!initDone
) KEYBOARD_Driver
->pInit();
69 /***********************************************************************
70 * KEYBOARD_Disable (KEYBOARD.3)
72 VOID WINAPI
KEYBOARD_Disable(VOID
)
74 DefKeybEventProc
= NULL
;
75 pKeyStateTable
= NULL
;
78 /***********************************************************************
81 void KEYBOARD_SendEvent( BYTE bVk
, BYTE bScan
, DWORD dwFlags
,
82 DWORD posX
, DWORD posY
, DWORD time
)
87 if ( !DefKeybEventProc
) return;
89 TRACE_(event
)("(%d,%d,%04lX)\n", bVk
, bScan
, dwFlags
);
91 wke
.magic
= WINE_KEYBDEVENT_MAGIC
;
96 /* To avoid deadlocks, we have to suspend all locks on windows structures
97 before the program control is passed to the keyboard driver */
98 iWndsLocks
= WIN_SuspendWndsLock();
99 DefKeybEventProc( bVk
, bScan
, dwFlags
, (DWORD
)&wke
);
100 WIN_RestoreWndsLock(iWndsLocks
);
103 /**********************************************************************
104 * SetSpeed16 (KEYBOARD.7)
106 WORD WINAPI
SetSpeed16(WORD unused
)
108 FIXME_(keyboard
)("(%04x): stub\n",unused
);
112 /**********************************************************************
113 * ScreenSwitchEnable (KEYBOARD.100)
115 VOID WINAPI
ScreenSwitchEnable16(WORD unused
)
117 FIXME_(keyboard
)("(%04x): stub\n",unused
);
120 /**********************************************************************
121 * OemKeyScan (KEYBOARD.128)(USER32.401)
123 DWORD WINAPI
OemKeyScan(WORD wOemChar
)
125 TRACE_(keyboard
)("*OemKeyScan (%d)\n",wOemChar
);
130 /**********************************************************************
131 * VkKeyScan [KEYBOARD.129]
133 /* VkKeyScan translates an ANSI character to a virtual-key and shift code
134 * for the current keyboard.
135 * high-order byte yields :
139 * 3-5 Shift-key combinations that are not used for characters
142 * I.e. : Shift = 1, Ctrl = 2, Alt = 4.
143 * FIXME : works ok except for dead chars :
144 * VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
145 * VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
148 WORD WINAPI
VkKeyScan16(CHAR cChar
)
150 return KEYBOARD_Driver
->pVkKeyScan(cChar
);
153 /******************************************************************************
154 * GetKeyboardType16 (KEYBOARD.130)
156 INT16 WINAPI
GetKeyboardType16(INT16 nTypeFlag
)
158 TRACE_(keyboard
)("(%d)\n",nTypeFlag
);
161 case 0: /* Keyboard type */
162 return 4; /* AT-101 */
164 case 1: /* Keyboard Subtype */
165 return 0; /* There are no defined subtypes */
167 case 2: /* Number of F-keys */
168 return 12; /* We're doing an 101 for now, so return 12 F-keys */
171 WARN_(keyboard
)("Unknown type\n");
172 return 0; /* The book says 0 here, so 0 */
176 /******************************************************************************
177 * MapVirtualKey16 (KEYBOARD.131)
179 * MapVirtualKey translates keycodes from one format to another
181 UINT16 WINAPI
MapVirtualKey16(UINT16 wCode
, UINT16 wMapType
)
183 return KEYBOARD_Driver
->pMapVirtualKey(wCode
,wMapType
);
186 /****************************************************************************
187 * GetKBCodePage16 (KEYBOARD.132)
189 INT16 WINAPI
GetKBCodePage16(void)
191 TRACE_(keyboard
)("(void)\n");
195 /****************************************************************************
196 * GetKeyNameText16 (KEYBOARD.133)
198 INT16 WINAPI
GetKeyNameText16(LONG lParam
, LPSTR lpBuffer
, INT16 nSize
)
200 return KEYBOARD_Driver
->pGetKeyNameText(lParam
, lpBuffer
, nSize
);
203 /****************************************************************************
204 * ToAscii (KEYBOARD.4)
206 * The ToAscii function translates the specified virtual-key code and keyboard
207 * state to the corresponding Windows character or characters.
209 * If the specified key is a dead key, the return value is negative. Otherwise,
210 * it is one of the following values:
212 * 0 The specified virtual key has no translation for the current state of the keyboard.
213 * 1 One Windows character was copied to the buffer.
214 * 2 Two characters were copied to the buffer. This usually happens when a
215 * dead-key character (accent or diacritic) stored in the keyboard layout cannot
216 * be composed with the specified virtual key to form a single character.
218 * FIXME : should do the above (return 2 for non matching deadchar+char combinations)
221 INT16 WINAPI
ToAscii16(UINT16 virtKey
,UINT16 scanCode
, LPBYTE lpKeyState
,
222 LPVOID lpChar
, UINT16 flags
)
224 return KEYBOARD_Driver
->pToAscii(
225 virtKey
, scanCode
, lpKeyState
, lpChar
, flags
229 /***********************************************************************
230 * KEYBOARD_GetBeepActive
232 BOOL
KEYBOARD_GetBeepActive()
234 return KEYBOARD_Driver
->pGetBeepActive();
237 /***********************************************************************
238 * KEYBOARD_SetBeepActive
240 void KEYBOARD_SetBeepActive(BOOL bActivate
)
242 KEYBOARD_Driver
->pSetBeepActive(bActivate
);
245 /***********************************************************************
248 void KEYBOARD_Beep(void)
250 KEYBOARD_Driver
->pBeep();