Split OpenFile implementation in separate 16- and 32-bit versions, and
[wine.git] / windows / input.c
blob63adb588d4481469722ca622ded01f9783734891
1 /*
2 * USER Input processing
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
10 * This library is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 #include "config.h"
26 #include "wine/port.h"
28 #include <stdlib.h>
29 #include <string.h>
30 #include <stdarg.h>
31 #include <stdio.h>
32 #include <ctype.h>
33 #include <assert.h>
35 #define NONAMELESSUNION
36 #define NONAMELESSSTRUCT
37 #include "windef.h"
38 #include "winbase.h"
39 #include "wingdi.h"
40 #include "winuser.h"
41 #include "winnls.h"
42 #include "wine/winbase16.h"
43 #include "wine/winuser16.h"
44 #include "wine/server.h"
45 #include "win.h"
46 #include "message.h"
47 #include "winternl.h"
48 #include "wine/debug.h"
49 #include "winerror.h"
51 WINE_DECLARE_DEBUG_CHANNEL(key);
52 WINE_DECLARE_DEBUG_CHANNEL(keyboard);
53 WINE_DECLARE_DEBUG_CHANNEL(win);
54 WINE_DEFAULT_DEBUG_CHANNEL(event);
56 static BOOL InputEnabled = TRUE;
57 static BOOL SwappedButtons;
59 BYTE InputKeyStateTable[256];
60 BYTE AsyncKeyStateTable[256];
61 BYTE TrackSysKey = 0; /* determine whether ALT key up will cause a WM_SYSKEYUP
62 or a WM_KEYUP message */
64 /* Storage for the USER-maintained mouse positions */
65 static DWORD PosX, PosY;
67 typedef union
69 struct
71 unsigned long count : 16;
72 unsigned long code : 8;
73 unsigned long extended : 1;
74 unsigned long unused : 2;
75 unsigned long win_internal : 2;
76 unsigned long context : 1;
77 unsigned long previous : 1;
78 unsigned long transition : 1;
79 } lp1;
80 unsigned long lp2;
81 } KEYLP;
84 /***********************************************************************
85 * get_key_state
87 static WORD get_key_state(void)
89 WORD ret = 0;
91 if (SwappedButtons)
93 if (InputKeyStateTable[VK_RBUTTON] & 0x80) ret |= MK_LBUTTON;
94 if (InputKeyStateTable[VK_LBUTTON] & 0x80) ret |= MK_RBUTTON;
96 else
98 if (InputKeyStateTable[VK_LBUTTON] & 0x80) ret |= MK_LBUTTON;
99 if (InputKeyStateTable[VK_RBUTTON] & 0x80) ret |= MK_RBUTTON;
101 if (InputKeyStateTable[VK_MBUTTON] & 0x80) ret |= MK_MBUTTON;
102 if (InputKeyStateTable[VK_SHIFT] & 0x80) ret |= MK_SHIFT;
103 if (InputKeyStateTable[VK_CONTROL] & 0x80) ret |= MK_CONTROL;
104 if (InputKeyStateTable[VK_XBUTTON1] & 0x80) ret |= MK_XBUTTON1;
105 if (InputKeyStateTable[VK_XBUTTON2] & 0x80) ret |= MK_XBUTTON2;
106 return ret;
110 /***********************************************************************
111 * queue_hardware_message
113 * Add a message to the hardware queue.
114 * Note: the position is relative to the desktop window.
116 static void queue_hardware_message( UINT message, HWND hwnd, WPARAM wParam, LPARAM lParam,
117 int xPos, int yPos, DWORD time, ULONG_PTR extraInfo )
119 SERVER_START_REQ( send_message )
121 req->id = GetCurrentThreadId();
122 req->type = MSG_HARDWARE;
123 req->flags = 0;
124 req->win = hwnd;
125 req->msg = message;
126 req->wparam = wParam;
127 req->lparam = lParam;
128 req->x = xPos;
129 req->y = yPos;
130 req->time = time;
131 req->info = extraInfo;
132 req->timeout = -1;
133 req->callback = NULL;
134 wine_server_call( req );
136 SERVER_END_REQ;
140 /***********************************************************************
141 * queue_kbd_event
143 * Put a keyboard event into a thread queue
145 static void queue_kbd_event( const KEYBDINPUT *ki, UINT injected_flags )
147 UINT message;
148 KEYLP keylp;
149 KBDLLHOOKSTRUCT hook;
151 keylp.lp2 = 0;
152 keylp.lp1.count = 1;
153 keylp.lp1.code = ki->wScan;
154 keylp.lp1.extended = (ki->dwFlags & KEYEVENTF_EXTENDEDKEY) != 0;
155 keylp.lp1.win_internal = 0; /* this has something to do with dialogs,
156 * don't remember where I read it - AK */
157 /* it's '1' under windows, when a dialog box appears
158 * and you press one of the underlined keys - DF*/
160 /* note that there is a test for all this */
161 if (ki->dwFlags & KEYEVENTF_KEYUP )
163 message = WM_KEYUP;
164 if( (InputKeyStateTable[VK_MENU] & 0x80) && (
165 (ki->wVk == VK_MENU) || (ki->wVk == VK_CONTROL) ||
166 !(InputKeyStateTable[VK_CONTROL] & 0x80))) {
167 if( TrackSysKey == VK_MENU || /* <ALT>-down/<ALT>-up sequence */
168 (ki->wVk != VK_MENU)) /* <ALT>-down...<something else>-up */
169 message = WM_SYSKEYUP;
170 TrackSysKey = 0;
172 InputKeyStateTable[ki->wVk] &= ~0x80;
173 keylp.lp1.previous = 1;
174 keylp.lp1.transition = 1;
176 else
178 keylp.lp1.previous = (InputKeyStateTable[ki->wVk] & 0x80) != 0;
179 keylp.lp1.transition = 0;
180 if (!(InputKeyStateTable[ki->wVk] & 0x80)) InputKeyStateTable[ki->wVk] ^= 0x01;
181 InputKeyStateTable[ki->wVk] |= 0x80;
182 AsyncKeyStateTable[ki->wVk] |= 0x80;
184 message = WM_KEYDOWN;
185 if( (InputKeyStateTable[VK_MENU] & 0x80) &&
186 !(InputKeyStateTable[VK_CONTROL] & 0x80)) {
187 message = WM_SYSKEYDOWN;
188 TrackSysKey = ki->wVk;
192 keylp.lp1.context = (InputKeyStateTable[VK_MENU] & 0x80) != 0; /* 1 if alt */
194 TRACE_(key)(" wParam=%04x, lParam=%08lx, InputKeyState=%x\n",
195 ki->wVk, keylp.lp2, InputKeyStateTable[ki->wVk] );
197 hook.vkCode = ki->wVk;
198 hook.scanCode = ki->wScan;
199 hook.flags = (keylp.lp2 >> 24) | injected_flags;
200 hook.time = ki->time;
201 hook.dwExtraInfo = ki->dwExtraInfo;
202 if (!HOOK_CallHooks( WH_KEYBOARD_LL, HC_ACTION, message, (LPARAM)&hook, TRUE ))
203 queue_hardware_message( message, 0, ki->wVk, keylp.lp2,
204 PosX, PosY, ki->time, ki->dwExtraInfo );
208 /***********************************************************************
209 * queue_raw_mouse_message
211 static void queue_raw_mouse_message( UINT message, UINT flags, INT x, INT y, const MOUSEINPUT *mi )
213 MSLLHOOKSTRUCT hook;
215 hook.pt.x = x;
216 hook.pt.y = y;
217 hook.mouseData = MAKELONG( 0, mi->mouseData );
218 hook.flags = flags;
219 hook.time = mi->time;
220 hook.dwExtraInfo = mi->dwExtraInfo;
222 if (!HOOK_CallHooks( WH_MOUSE_LL, HC_ACTION, message, (LPARAM)&hook, TRUE ))
223 queue_hardware_message( message, (HWND)mi->dwExtraInfo /*FIXME*/,
224 MAKEWPARAM( get_key_state(), mi->mouseData ),
225 0, x, y, mi->time, mi->dwExtraInfo );
229 /***********************************************************************
230 * queue_mouse_event
232 static void queue_mouse_event( const MOUSEINPUT *mi, UINT flags )
234 if (mi->dwFlags & MOUSEEVENTF_ABSOLUTE)
236 PosX = (mi->dx * GetSystemMetrics(SM_CXSCREEN)) >> 16;
237 PosY = (mi->dy * GetSystemMetrics(SM_CYSCREEN)) >> 16;
239 else if (mi->dwFlags & MOUSEEVENTF_MOVE)
241 int width = GetSystemMetrics(SM_CXSCREEN);
242 int height = GetSystemMetrics(SM_CYSCREEN);
243 long posX = (long) PosX, posY = (long) PosY;
244 int accel[3];
245 int accelMult;
247 /* dx and dy can be negative numbers for relative movements */
248 SystemParametersInfoA(SPI_GETMOUSE, 0, accel, 0);
250 accelMult = 1;
251 if (mi->dx > accel[0] && accel[2] != 0)
253 accelMult = 2;
254 if ((mi->dx > accel[1]) && (accel[2] == 2))
256 accelMult = 4;
259 posX += (long)mi->dx * accelMult;
261 accelMult = 1;
262 if (mi->dy > accel[0] && accel[2] != 0)
264 accelMult = 2;
265 if ((mi->dy > accel[1]) && (accel[2] == 2))
267 accelMult = 4;
270 posY += (long)mi->dy * accelMult;
272 /* Clip to the current screen size */
273 if (posX < 0) PosX = 0;
274 else if (posX >= width) PosX = width - 1;
275 else PosX = posX;
277 if (posY < 0) PosY = 0;
278 else if (posY >= height) PosY = height - 1;
279 else PosY = posY;
282 if (mi->dwFlags & MOUSEEVENTF_MOVE)
284 queue_raw_mouse_message( WM_MOUSEMOVE, flags, PosX, PosY, mi );
286 if (mi->dwFlags & MOUSEEVENTF_LEFTDOWN)
288 InputKeyStateTable[VK_LBUTTON] |= 0x80;
289 AsyncKeyStateTable[VK_LBUTTON] |= 0x80;
290 queue_raw_mouse_message( SwappedButtons ? WM_RBUTTONDOWN : WM_LBUTTONDOWN,
291 flags, PosX, PosY, mi );
293 if (mi->dwFlags & MOUSEEVENTF_LEFTUP)
295 InputKeyStateTable[VK_LBUTTON] &= ~0x80;
296 queue_raw_mouse_message( SwappedButtons ? WM_RBUTTONUP : WM_LBUTTONUP,
297 flags, PosX, PosY, mi );
299 if (mi->dwFlags & MOUSEEVENTF_RIGHTDOWN)
301 InputKeyStateTable[VK_RBUTTON] |= 0x80;
302 AsyncKeyStateTable[VK_RBUTTON] |= 0x80;
303 queue_raw_mouse_message( SwappedButtons ? WM_LBUTTONDOWN : WM_RBUTTONDOWN,
304 flags, PosX, PosY, mi );
306 if (mi->dwFlags & MOUSEEVENTF_RIGHTUP)
308 InputKeyStateTable[VK_RBUTTON] &= ~0x80;
309 queue_raw_mouse_message( SwappedButtons ? WM_LBUTTONUP : WM_RBUTTONUP,
310 flags, PosX, PosY, mi );
312 if (mi->dwFlags & MOUSEEVENTF_MIDDLEDOWN)
314 InputKeyStateTable[VK_MBUTTON] |= 0x80;
315 AsyncKeyStateTable[VK_MBUTTON] |= 0x80;
316 queue_raw_mouse_message( WM_MBUTTONDOWN, flags, PosX, PosY, mi );
318 if (mi->dwFlags & MOUSEEVENTF_MIDDLEUP)
320 InputKeyStateTable[VK_MBUTTON] &= ~0x80;
321 queue_raw_mouse_message( WM_MBUTTONUP, flags, PosX, PosY, mi );
323 if (mi->dwFlags & MOUSEEVENTF_WHEEL)
325 queue_raw_mouse_message( WM_MOUSEWHEEL, flags, PosX, PosY, mi );
327 if (flags & LLMHF_INJECTED) /* we have to actually move the cursor */
328 SetCursorPos( PosX, PosY );
332 /***********************************************************************
333 * SendInput (USER32.@)
335 UINT WINAPI SendInput( UINT count, LPINPUT inputs, int size )
337 UINT i;
339 if (!InputEnabled) return 0;
341 for (i = 0; i < count; i++, inputs++)
343 switch(inputs->type)
345 case INPUT_MOUSE:
346 queue_mouse_event( &inputs->u.mi, LLMHF_INJECTED );
347 break;
348 case WINE_INTERNAL_INPUT_MOUSE:
349 queue_mouse_event( &inputs->u.mi, 0 );
350 break;
351 case INPUT_KEYBOARD:
352 queue_kbd_event( &inputs->u.ki, LLKHF_INJECTED );
353 break;
354 case WINE_INTERNAL_INPUT_KEYBOARD:
355 queue_kbd_event( &inputs->u.ki, 0 );
356 break;
357 case INPUT_HARDWARE:
358 FIXME( "INPUT_HARDWARE not supported\n" );
359 break;
362 return count;
366 /***********************************************************************
367 * keybd_event (USER32.@)
369 void WINAPI keybd_event( BYTE bVk, BYTE bScan,
370 DWORD dwFlags, ULONG_PTR dwExtraInfo )
372 INPUT input;
374 input.type = INPUT_KEYBOARD;
375 input.u.ki.wVk = bVk;
376 input.u.ki.wScan = bScan;
377 input.u.ki.dwFlags = dwFlags;
378 input.u.ki.time = GetTickCount();
379 input.u.ki.dwExtraInfo = dwExtraInfo;
380 SendInput( 1, &input, sizeof(input) );
384 /***********************************************************************
385 * keybd_event (USER.289)
387 void WINAPI keybd_event16( CONTEXT86 *context )
389 DWORD dwFlags = 0;
391 if (HIBYTE(context->Eax) & 0x80) dwFlags |= KEYEVENTF_KEYUP;
392 if (HIBYTE(context->Ebx) & 0x01) dwFlags |= KEYEVENTF_EXTENDEDKEY;
394 keybd_event( LOBYTE(context->Eax), LOBYTE(context->Ebx),
395 dwFlags, MAKELONG(LOWORD(context->Esi), LOWORD(context->Edi)) );
399 /***********************************************************************
400 * mouse_event (USER32.@)
402 void WINAPI mouse_event( DWORD dwFlags, DWORD dx, DWORD dy,
403 DWORD dwData, ULONG_PTR dwExtraInfo )
405 INPUT input;
407 input.type = INPUT_MOUSE;
408 input.u.mi.dx = dx;
409 input.u.mi.dy = dy;
410 input.u.mi.mouseData = dwData;
411 input.u.mi.dwFlags = dwFlags;
412 input.u.mi.time = GetCurrentTime();
413 input.u.mi.dwExtraInfo = dwExtraInfo;
414 SendInput( 1, &input, sizeof(input) );
418 /***********************************************************************
419 * mouse_event (USER.299)
421 void WINAPI mouse_event16( CONTEXT86 *context )
423 mouse_event( LOWORD(context->Eax), LOWORD(context->Ebx), LOWORD(context->Ecx),
424 LOWORD(context->Edx), MAKELONG(context->Esi, context->Edi) );
427 /***********************************************************************
428 * GetMouseEventProc (USER.337)
430 FARPROC16 WINAPI GetMouseEventProc16(void)
432 HMODULE16 hmodule = GetModuleHandle16("USER");
433 return GetProcAddress16( hmodule, "mouse_event" );
437 /**********************************************************************
438 * EnableHardwareInput (USER.331)
440 BOOL16 WINAPI EnableHardwareInput16(BOOL16 bEnable)
442 BOOL16 bOldState = InputEnabled;
443 FIXME_(event)("(%d) - stub\n", bEnable);
444 InputEnabled = bEnable;
445 return bOldState;
449 /***********************************************************************
450 * SwapMouseButton (USER.186)
452 BOOL16 WINAPI SwapMouseButton16( BOOL16 fSwap )
454 BOOL16 ret = SwappedButtons;
455 SwappedButtons = fSwap;
456 return ret;
460 /***********************************************************************
461 * SwapMouseButton (USER32.@)
463 BOOL WINAPI SwapMouseButton( BOOL fSwap )
465 BOOL ret = SwappedButtons;
466 SwappedButtons = fSwap;
467 return ret;
471 /***********************************************************************
472 * GetCursorPos (USER.17)
474 BOOL16 WINAPI GetCursorPos16( POINT16 *pt )
476 POINT pos;
477 if (!pt) return 0;
478 GetCursorPos(&pos);
479 pt->x = pos.x;
480 pt->y = pos.y;
481 return 1;
485 /***********************************************************************
486 * GetCursorPos (USER32.@)
488 BOOL WINAPI GetCursorPos( POINT *pt )
490 if (!pt) return 0;
491 pt->x = PosX;
492 pt->y = PosY;
493 if (USER_Driver.pGetCursorPos) USER_Driver.pGetCursorPos( pt );
494 return 1;
498 /***********************************************************************
499 * GetCursorInfo (USER32.@)
501 BOOL WINAPI GetCursorInfo( PCURSORINFO pci )
503 MESSAGEQUEUE *queue = QUEUE_Current();
505 if (!pci) return 0;
506 if (queue->cursor_count >= 0) pci->flags = CURSOR_SHOWING;
507 else pci->flags = 0;
508 GetCursorPos(&pci->ptScreenPos);
509 return 1;
513 /***********************************************************************
514 * SetCursorPos (USER.70)
516 void WINAPI SetCursorPos16( INT16 x, INT16 y )
518 SetCursorPos( x, y );
522 /***********************************************************************
523 * SetCursorPos (USER32.@)
525 BOOL WINAPI SetCursorPos( INT x, INT y )
527 if (USER_Driver.pSetCursorPos) USER_Driver.pSetCursorPos( x, y );
528 PosX = x;
529 PosY = y;
530 return TRUE;
534 /**********************************************************************
535 * SetCapture (USER32.@)
537 HWND WINAPI SetCapture( HWND hwnd )
539 HWND previous = 0;
541 SERVER_START_REQ( set_capture_window )
543 req->handle = hwnd;
544 req->flags = 0;
545 if (!wine_server_call_err( req ))
547 previous = reply->previous;
548 hwnd = reply->full_handle;
551 SERVER_END_REQ;
553 if (previous && previous != hwnd)
554 SendMessageW( previous, WM_CAPTURECHANGED, 0, (LPARAM)hwnd );
555 return previous;
559 /**********************************************************************
560 * ReleaseCapture (USER32.@)
562 BOOL WINAPI ReleaseCapture(void)
564 return (SetCapture(0) != 0);
568 /**********************************************************************
569 * GetCapture (USER32.@)
571 HWND WINAPI GetCapture(void)
573 HWND ret = 0;
575 SERVER_START_REQ( get_thread_input )
577 req->tid = GetCurrentThreadId();
578 if (!wine_server_call_err( req )) ret = reply->capture;
580 SERVER_END_REQ;
581 return ret;
585 /**********************************************************************
586 * GetAsyncKeyState (USER32.@)
588 * Determine if a key is or was pressed. retval has high-order
589 * bit set to 1 if currently pressed, low-order bit set to 1 if key has
590 * been pressed.
592 * This uses the variable AsyncMouseButtonsStates and
593 * AsyncKeyStateTable (set in event.c) which have the mouse button
594 * number or key number (whichever is applicable) set to true if the
595 * mouse or key had been depressed since the last call to
596 * GetAsyncKeyState.
598 SHORT WINAPI GetAsyncKeyState(INT nKey)
600 SHORT retval = ((AsyncKeyStateTable[nKey] & 0x80) ? 0x0001 : 0) |
601 ((InputKeyStateTable[nKey] & 0x80) ? 0x8000 : 0);
602 AsyncKeyStateTable[nKey] = 0;
603 TRACE_(key)("(%x) -> %x\n", nKey, retval);
604 return retval;
607 /**********************************************************************
608 * GetAsyncKeyState (USER.249)
610 INT16 WINAPI GetAsyncKeyState16(INT16 nKey)
612 return GetAsyncKeyState(nKey);
615 /***********************************************************************
616 * IsUserIdle (USER.333)
618 BOOL16 WINAPI IsUserIdle16(void)
620 if ( GetAsyncKeyState( VK_LBUTTON ) & 0x8000 )
621 return FALSE;
623 if ( GetAsyncKeyState( VK_RBUTTON ) & 0x8000 )
624 return FALSE;
626 if ( GetAsyncKeyState( VK_MBUTTON ) & 0x8000 )
627 return FALSE;
629 /* Should check for screen saver activation here ... */
631 return TRUE;
634 /**********************************************************************
635 * VkKeyScanA (USER32.@)
637 * VkKeyScan translates an ANSI character to a virtual-key and shift code
638 * for the current keyboard.
639 * high-order byte yields :
640 * 0 Unshifted
641 * 1 Shift
642 * 2 Ctrl
643 * 3-5 Shift-key combinations that are not used for characters
644 * 6 Ctrl-Alt
645 * 7 Ctrl-Alt-Shift
646 * I.e. : Shift = 1, Ctrl = 2, Alt = 4.
647 * FIXME : works ok except for dead chars :
648 * VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
649 * VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
651 SHORT WINAPI VkKeyScanA(CHAR cChar)
653 WCHAR wChar;
655 if (IsDBCSLeadByte(cChar)) return -1;
657 MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
658 return VkKeyScanW(wChar);
661 /******************************************************************************
662 * VkKeyScanW (USER32.@)
664 SHORT WINAPI VkKeyScanW(WCHAR cChar)
666 return VkKeyScanExW(cChar, GetKeyboardLayout(0));
669 /**********************************************************************
670 * VkKeyScanExA (USER32.@)
672 WORD WINAPI VkKeyScanExA(CHAR cChar, HKL dwhkl)
674 WCHAR wChar;
676 if (IsDBCSLeadByte(cChar)) return -1;
678 MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
679 return VkKeyScanExW(wChar, dwhkl);
682 /******************************************************************************
683 * VkKeyScanExW (USER32.@)
685 WORD WINAPI VkKeyScanExW(WCHAR cChar, HKL dwhkl)
687 if (USER_Driver.pVkKeyScanEx)
688 return USER_Driver.pVkKeyScanEx(cChar, dwhkl);
689 return -1;
692 /******************************************************************************
693 * GetKeyboardType (USER32.@)
695 INT WINAPI GetKeyboardType(INT nTypeFlag)
697 TRACE_(keyboard)("(%d)\n", nTypeFlag);
698 switch(nTypeFlag)
700 case 0: /* Keyboard type */
701 return 4; /* AT-101 */
702 case 1: /* Keyboard Subtype */
703 return 0; /* There are no defined subtypes */
704 case 2: /* Number of F-keys */
705 return 12; /* We're doing an 101 for now, so return 12 F-keys */
706 default:
707 WARN_(keyboard)("Unknown type\n");
708 return 0; /* The book says 0 here, so 0 */
712 /******************************************************************************
713 * MapVirtualKeyA (USER32.@)
715 UINT WINAPI MapVirtualKeyA(UINT code, UINT maptype)
717 return MapVirtualKeyExA( code, maptype, GetKeyboardLayout(0) );
720 /******************************************************************************
721 * MapVirtualKeyW (USER32.@)
723 UINT WINAPI MapVirtualKeyW(UINT code, UINT maptype)
725 return MapVirtualKeyExW(code, maptype, GetKeyboardLayout(0));
728 /******************************************************************************
729 * MapVirtualKeyExA (USER32.@)
731 UINT WINAPI MapVirtualKeyExA(UINT code, UINT maptype, HKL hkl)
733 return MapVirtualKeyExW(code, maptype, hkl);
736 /******************************************************************************
737 * MapVirtualKeyExW (USER32.@)
739 UINT WINAPI MapVirtualKeyExW(UINT code, UINT maptype, HKL hkl)
741 TRACE_(keyboard)("(%d, %d, %p)\n", code, maptype, hkl);
743 if (USER_Driver.pMapVirtualKeyEx)
744 return USER_Driver.pMapVirtualKeyEx(code, maptype, hkl);
745 return 0;
748 /****************************************************************************
749 * GetKBCodePage (USER32.@)
751 UINT WINAPI GetKBCodePage(void)
753 return GetOEMCP();
756 /****************************************************************************
757 * GetKeyboardLayoutName (USER.477)
759 INT16 WINAPI GetKeyboardLayoutName16(LPSTR pwszKLID)
761 return GetKeyboardLayoutNameA(pwszKLID);
764 /***********************************************************************
765 * GetKeyboardLayout (USER32.@)
767 * - device handle for keyboard layout defaulted to
768 * the language id. This is the way Windows default works.
769 * - the thread identifier (dwLayout) is also ignored.
771 HKL WINAPI GetKeyboardLayout(DWORD dwLayout)
773 if (USER_Driver.pGetKeyboardLayout)
774 return USER_Driver.pGetKeyboardLayout(dwLayout);
775 return 0;
778 /****************************************************************************
779 * GetKeyboardLayoutNameA (USER32.@)
781 BOOL WINAPI GetKeyboardLayoutNameA(LPSTR pszKLID)
783 WCHAR buf[KL_NAMELENGTH];
785 if (GetKeyboardLayoutNameW(buf))
786 return WideCharToMultiByte( CP_ACP, 0, buf, -1, pszKLID, KL_NAMELENGTH, NULL, NULL ) != 0;
787 return FALSE;
790 /****************************************************************************
791 * GetKeyboardLayoutNameW (USER32.@)
793 BOOL WINAPI GetKeyboardLayoutNameW(LPWSTR pwszKLID)
795 if (USER_Driver.pGetKeyboardLayoutName)
796 return USER_Driver.pGetKeyboardLayoutName(pwszKLID);
797 return FALSE;
800 /****************************************************************************
801 * GetKeyNameTextA (USER32.@)
803 INT WINAPI GetKeyNameTextA(LONG lParam, LPSTR lpBuffer, INT nSize)
805 WCHAR buf[256];
806 INT ret;
808 if (!GetKeyNameTextW(lParam, buf, 256))
809 return 0;
810 ret = WideCharToMultiByte(CP_ACP, 0, buf, -1, lpBuffer, nSize, NULL, NULL);
811 if (!ret && nSize)
813 ret = nSize - 1;
814 lpBuffer[ret] = 0;
816 return ret;
819 /****************************************************************************
820 * GetKeyNameTextW (USER32.@)
822 INT WINAPI GetKeyNameTextW(LONG lParam, LPWSTR lpBuffer, INT nSize)
824 if (USER_Driver.pGetKeyNameText)
825 return USER_Driver.pGetKeyNameText( lParam, lpBuffer, nSize );
826 return 0;
829 /****************************************************************************
830 * ToUnicode (USER32.@)
832 INT WINAPI ToUnicode(UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
833 LPWSTR lpwStr, int size, UINT flags)
835 return ToUnicodeEx(virtKey, scanCode, lpKeyState, lpwStr, size, flags, GetKeyboardLayout(0));
838 /****************************************************************************
839 * ToUnicodeEx (USER32.@)
841 INT WINAPI ToUnicodeEx(UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
842 LPWSTR lpwStr, int size, UINT flags, HKL hkl)
844 if (USER_Driver.pToUnicodeEx)
845 return USER_Driver.pToUnicodeEx(virtKey, scanCode, lpKeyState, lpwStr, size, flags, hkl);
846 return 0;
849 /****************************************************************************
850 * ToAscii (USER32.@)
852 INT WINAPI ToAscii( UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
853 LPWORD lpChar, UINT flags )
855 return ToAsciiEx(virtKey, scanCode, lpKeyState, lpChar, flags, GetKeyboardLayout(0));
858 /****************************************************************************
859 * ToAsciiEx (USER32.@)
861 INT WINAPI ToAsciiEx( UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
862 LPWORD lpChar, UINT flags, HKL dwhkl )
864 WCHAR uni_chars[2];
865 INT ret, n_ret;
867 ret = ToUnicodeEx(virtKey, scanCode, lpKeyState, uni_chars, 2, flags, dwhkl);
868 if (ret < 0) n_ret = 1; /* FIXME: make ToUnicode return 2 for dead chars */
869 else n_ret = ret;
870 WideCharToMultiByte(CP_ACP, 0, uni_chars, n_ret, (LPSTR)lpChar, 2, NULL, NULL);
871 return ret;
874 /**********************************************************************
875 * ActivateKeyboardLayout (USER32.@)
877 HKL WINAPI ActivateKeyboardLayout(HKL hLayout, UINT flags)
879 TRACE_(keyboard)("(%p, %d)\n", hLayout, flags);
881 if (USER_Driver.pActivateKeyboardLayout)
882 return USER_Driver.pActivateKeyboardLayout(hLayout, flags);
883 return 0;
887 /***********************************************************************
888 * GetKeyboardLayoutList (USER32.@)
890 * Return number of values available if either input parm is
891 * 0, per MS documentation.
893 UINT WINAPI GetKeyboardLayoutList(INT nBuff, HKL *layouts)
895 TRACE_(keyboard)("(%d,%p)\n",nBuff,layouts);
897 if (USER_Driver.pGetKeyboardLayoutList)
898 return USER_Driver.pGetKeyboardLayoutList(nBuff, layouts);
899 return 0;
903 /***********************************************************************
904 * RegisterHotKey (USER32.@)
906 BOOL WINAPI RegisterHotKey(HWND hwnd,INT id,UINT modifiers,UINT vk) {
907 FIXME_(keyboard)("(%p,%d,0x%08x,%d): stub\n",hwnd,id,modifiers,vk);
908 return TRUE;
911 /***********************************************************************
912 * UnregisterHotKey (USER32.@)
914 BOOL WINAPI UnregisterHotKey(HWND hwnd,INT id) {
915 FIXME_(keyboard)("(%p,%d): stub\n",hwnd,id);
916 return TRUE;
919 /***********************************************************************
920 * LoadKeyboardLayoutW (USER32.@)
922 HKL WINAPI LoadKeyboardLayoutW(LPCWSTR pwszKLID, UINT Flags)
924 TRACE_(keyboard)("(%s, %d)\n", debugstr_w(pwszKLID), Flags);
926 if (USER_Driver.pLoadKeyboardLayout)
927 return USER_Driver.pLoadKeyboardLayout(pwszKLID, Flags);
928 return 0;
931 /***********************************************************************
932 * LoadKeyboardLayoutA (USER32.@)
934 HKL WINAPI LoadKeyboardLayoutA(LPCSTR pwszKLID, UINT Flags)
936 HKL ret;
937 UNICODE_STRING pwszKLIDW;
939 if (pwszKLID) RtlCreateUnicodeStringFromAsciiz(&pwszKLIDW, pwszKLID);
940 else pwszKLIDW.Buffer = NULL;
942 ret = LoadKeyboardLayoutW(pwszKLIDW.Buffer, Flags);
943 RtlFreeUnicodeString(&pwszKLIDW);
944 return ret;
948 /***********************************************************************
949 * UnloadKeyboardLayout (USER32.@)
951 BOOL WINAPI UnloadKeyboardLayout(HKL hkl)
953 TRACE_(keyboard)("(%p)\n", hkl);
955 if (USER_Driver.pUnloadKeyboardLayout)
956 return USER_Driver.pUnloadKeyboardLayout(hkl);
957 return 0;
960 typedef struct __TRACKINGLIST {
961 TRACKMOUSEEVENT tme;
962 POINT pos; /* center of hover rectangle */
963 INT iHoverTime; /* elapsed time the cursor has been inside of the hover rect */
964 } _TRACKINGLIST;
966 static _TRACKINGLIST TrackingList[10];
967 static int iTrackMax = 0;
968 static UINT_PTR timer;
969 static const INT iTimerInterval = 50; /* msec for timer interval */
971 static void CALLBACK TrackMouseEventProc(HWND hwndUnused, UINT uMsg, UINT_PTR idEvent,
972 DWORD dwTime)
974 int i = 0;
975 POINT pos;
976 POINT posClient;
977 HWND hwnd;
978 INT nonclient;
979 INT hoverwidth = 0, hoverheight = 0;
980 RECT client;
982 GetCursorPos(&pos);
983 hwnd = WindowFromPoint(pos);
985 SystemParametersInfoA(SPI_GETMOUSEHOVERWIDTH, 0, &hoverwidth, 0);
986 SystemParametersInfoA(SPI_GETMOUSEHOVERHEIGHT, 0, &hoverheight, 0);
988 /* loop through tracking events we are processing */
989 while (i < iTrackMax) {
990 if (TrackingList[i].tme.dwFlags & TME_NONCLIENT) {
991 nonclient = 1;
993 else {
994 nonclient = 0;
997 /* see if this tracking event is looking for TME_LEAVE and that the */
998 /* mouse has left the window */
999 if (TrackingList[i].tme.dwFlags & TME_LEAVE) {
1000 if (TrackingList[i].tme.hwndTrack != hwnd) {
1001 if (nonclient) {
1002 PostMessageA(TrackingList[i].tme.hwndTrack, WM_NCMOUSELEAVE, 0, 0);
1004 else {
1005 PostMessageA(TrackingList[i].tme.hwndTrack, WM_MOUSELEAVE, 0, 0);
1008 /* remove the TME_LEAVE flag */
1009 TrackingList[i].tme.dwFlags ^= TME_LEAVE;
1011 else {
1012 GetClientRect(hwnd, &client);
1013 MapWindowPoints(hwnd, NULL, (LPPOINT)&client, 2);
1014 if(PtInRect(&client, pos)) {
1015 if (nonclient) {
1016 PostMessageA(TrackingList[i].tme.hwndTrack, WM_NCMOUSELEAVE, 0, 0);
1017 /* remove the TME_LEAVE flag */
1018 TrackingList[i].tme.dwFlags ^= TME_LEAVE;
1021 else {
1022 if (!nonclient) {
1023 PostMessageA(TrackingList[i].tme.hwndTrack, WM_MOUSELEAVE, 0, 0);
1024 /* remove the TME_LEAVE flag */
1025 TrackingList[i].tme.dwFlags ^= TME_LEAVE;
1031 /* see if we are tracking hovering for this hwnd */
1032 if(TrackingList[i].tme.dwFlags & TME_HOVER) {
1033 /* add the timer interval to the hovering time */
1034 TrackingList[i].iHoverTime+=iTimerInterval;
1036 /* has the cursor moved outside the rectangle centered around pos? */
1037 if((abs(pos.x - TrackingList[i].pos.x) > (hoverwidth / 2.0))
1038 || (abs(pos.y - TrackingList[i].pos.y) > (hoverheight / 2.0)))
1040 /* record this new position as the current position and reset */
1041 /* the iHoverTime variable to 0 */
1042 TrackingList[i].pos = pos;
1043 TrackingList[i].iHoverTime = 0;
1046 /* has the mouse hovered long enough? */
1047 if(TrackingList[i].iHoverTime <= TrackingList[i].tme.dwHoverTime)
1049 posClient.x = pos.x;
1050 posClient.y = pos.y;
1051 ScreenToClient(hwnd, &posClient);
1052 if (nonclient) {
1053 PostMessageW(TrackingList[i].tme.hwndTrack, WM_NCMOUSEHOVER,
1054 get_key_state(), MAKELPARAM( posClient.x, posClient.y ));
1056 else {
1057 PostMessageW(TrackingList[i].tme.hwndTrack, WM_MOUSEHOVER,
1058 get_key_state(), MAKELPARAM( posClient.x, posClient.y ));
1061 /* stop tracking mouse hover */
1062 TrackingList[i].tme.dwFlags ^= TME_HOVER;
1066 /* see if we are still tracking TME_HOVER or TME_LEAVE for this entry */
1067 if((TrackingList[i].tme.dwFlags & TME_HOVER) ||
1068 (TrackingList[i].tme.dwFlags & TME_LEAVE)) {
1069 i++;
1070 } else { /* remove this entry from the tracking list */
1071 TrackingList[i] = TrackingList[--iTrackMax];
1075 /* stop the timer if the tracking list is empty */
1076 if(iTrackMax == 0) {
1077 KillTimer(0, timer);
1078 timer = 0;
1083 /***********************************************************************
1084 * TrackMouseEvent [USER32]
1086 * Requests notification of mouse events
1088 * During mouse tracking WM_MOUSEHOVER or WM_MOUSELEAVE events are posted
1089 * to the hwnd specified in the ptme structure. After the event message
1090 * is posted to the hwnd, the entry in the queue is removed.
1092 * If the current hwnd isn't ptme->hwndTrack the TME_HOVER flag is completely
1093 * ignored. The TME_LEAVE flag results in a WM_MOUSELEAVE message being posted
1094 * immediately and the TME_LEAVE flag being ignored.
1096 * PARAMS
1097 * ptme [I,O] pointer to TRACKMOUSEEVENT information structure.
1099 * RETURNS
1100 * Success: non-zero
1101 * Failure: zero
1105 BOOL WINAPI
1106 TrackMouseEvent (TRACKMOUSEEVENT *ptme)
1108 DWORD flags = 0;
1109 int i = 0;
1110 BOOL cancel = 0, hover = 0, leave = 0, query = 0, nonclient = 0, inclient = 0;
1111 HWND hwnd;
1112 POINT pos;
1113 RECT client;
1116 pos.x = 0;
1117 pos.y = 0;
1118 SetRectEmpty(&client);
1120 TRACE("%lx, %lx, %p, %lx\n", ptme->cbSize, ptme->dwFlags, ptme->hwndTrack, ptme->dwHoverTime);
1122 if (ptme->cbSize != sizeof(TRACKMOUSEEVENT)) {
1123 WARN("wrong TRACKMOUSEEVENT size from app\n");
1124 SetLastError(ERROR_INVALID_PARAMETER); /* FIXME not sure if this is correct */
1125 return FALSE;
1128 flags = ptme->dwFlags;
1130 /* if HOVER_DEFAULT was specified replace this with the systems current value */
1131 if(ptme->dwHoverTime == HOVER_DEFAULT)
1132 SystemParametersInfoA(SPI_GETMOUSEHOVERTIME, 0, &(ptme->dwHoverTime), 0);
1134 GetCursorPos(&pos);
1135 hwnd = WindowFromPoint(pos);
1137 if ( flags & TME_CANCEL ) {
1138 flags &= ~ TME_CANCEL;
1139 cancel = 1;
1142 if ( flags & TME_HOVER ) {
1143 flags &= ~ TME_HOVER;
1144 hover = 1;
1147 if ( flags & TME_LEAVE ) {
1148 flags &= ~ TME_LEAVE;
1149 leave = 1;
1152 if ( flags & TME_NONCLIENT ) {
1153 flags &= ~ TME_NONCLIENT;
1154 nonclient = 1;
1157 /* fill the TRACKMOUSEEVENT struct with the current tracking for the given hwnd */
1158 if ( flags & TME_QUERY ) {
1159 flags &= ~ TME_QUERY;
1160 query = 1;
1161 i = 0;
1163 /* Find the tracking list entry with the matching hwnd */
1164 while((i < iTrackMax) && (TrackingList[i].tme.hwndTrack != ptme->hwndTrack)) {
1165 i++;
1168 /* hwnd found, fill in the ptme struct */
1169 if(i < iTrackMax)
1170 *ptme = TrackingList[i].tme;
1171 else
1172 ptme->dwFlags = 0;
1174 return TRUE; /* return here, TME_QUERY is retrieving information */
1177 if ( flags )
1178 FIXME("Unknown flag(s) %08lx\n", flags );
1180 if(cancel) {
1181 /* find a matching hwnd if one exists */
1182 i = 0;
1184 while((i < iTrackMax) && (TrackingList[i].tme.hwndTrack != ptme->hwndTrack)) {
1185 i++;
1188 if(i < iTrackMax) {
1189 TrackingList[i].tme.dwFlags &= ~(ptme->dwFlags & ~TME_CANCEL);
1191 /* if we aren't tracking on hover or leave remove this entry */
1192 if(!((TrackingList[i].tme.dwFlags & TME_HOVER) ||
1193 (TrackingList[i].tme.dwFlags & TME_LEAVE)))
1195 TrackingList[i] = TrackingList[--iTrackMax];
1197 if(iTrackMax == 0) {
1198 KillTimer(0, timer);
1199 timer = 0;
1203 } else {
1204 /* see if hwndTrack isn't the current window */
1205 if(ptme->hwndTrack != hwnd) {
1206 if(leave) {
1207 if(nonclient) {
1208 PostMessageA(ptme->hwndTrack, WM_NCMOUSELEAVE, 0, 0);
1210 else {
1211 PostMessageA(ptme->hwndTrack, WM_MOUSELEAVE, 0, 0);
1214 } else {
1215 GetClientRect(ptme->hwndTrack, &client);
1216 MapWindowPoints(ptme->hwndTrack, NULL, (LPPOINT)&client, 2);
1217 if(PtInRect(&client, pos)) {
1218 inclient = 1;
1220 if(nonclient && inclient) {
1221 PostMessageA(ptme->hwndTrack, WM_NCMOUSELEAVE, 0, 0);
1222 return TRUE;
1224 else if(!nonclient && !inclient) {
1225 PostMessageA(ptme->hwndTrack, WM_MOUSELEAVE, 0, 0);
1226 return TRUE;
1229 /* See if this hwnd is already being tracked and update the tracking flags */
1230 for(i = 0; i < iTrackMax; i++) {
1231 if(TrackingList[i].tme.hwndTrack == ptme->hwndTrack) {
1232 TrackingList[i].tme.dwFlags = 0;
1234 if(hover) {
1235 TrackingList[i].tme.dwFlags |= TME_HOVER;
1236 TrackingList[i].tme.dwHoverTime = ptme->dwHoverTime;
1239 if(leave)
1240 TrackingList[i].tme.dwFlags |= TME_LEAVE;
1242 if(nonclient)
1243 TrackingList[i].tme.dwFlags |= TME_NONCLIENT;
1245 /* reset iHoverTime as per winapi specs */
1246 TrackingList[i].iHoverTime = 0;
1248 return TRUE;
1252 /* if the tracking list is full return FALSE */
1253 if (iTrackMax == sizeof (TrackingList) / sizeof(*TrackingList)) {
1254 return FALSE;
1257 /* Adding new mouse event to the tracking list */
1258 TrackingList[iTrackMax].tme = *ptme;
1260 /* Initialize HoverInfo variables even if not hover tracking */
1261 TrackingList[iTrackMax].iHoverTime = 0;
1262 TrackingList[iTrackMax].pos = pos;
1264 iTrackMax++;
1266 if (!timer) {
1267 timer = SetTimer(0, 0, iTimerInterval, TrackMouseEventProc);
1272 return TRUE;