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
26 #include "wine/port.h"
35 #define NONAMELESSUNION
36 #define NONAMELESSSTRUCT
42 #include "wine/winbase16.h"
43 #include "wine/winuser16.h"
44 #include "wine/server.h"
48 #include "wine/debug.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
;
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;
84 /***********************************************************************
87 static WORD
get_key_state(void)
93 if (InputKeyStateTable
[VK_RBUTTON
] & 0x80) ret
|= MK_LBUTTON
;
94 if (InputKeyStateTable
[VK_LBUTTON
] & 0x80) ret
|= MK_RBUTTON
;
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
;
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
;
126 req
->wparam
= wParam
;
127 req
->lparam
= lParam
;
131 req
->info
= extraInfo
;
133 req
->callback
= NULL
;
134 wine_server_call( req
);
140 /***********************************************************************
143 * Put a keyboard event into a thread queue
145 static void queue_kbd_event( const KEYBDINPUT
*ki
, UINT injected_flags
)
149 KBDLLHOOKSTRUCT hook
;
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
)
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
;
172 InputKeyStateTable
[ki
->wVk
] &= ~0x80;
173 keylp
.lp1
.previous
= 1;
174 keylp
.lp1
.transition
= 1;
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
)
217 hook
.mouseData
= MAKELONG( 0, mi
->mouseData
);
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 /***********************************************************************
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
;
247 /* dx and dy can be negative numbers for relative movements */
248 SystemParametersInfoA(SPI_GETMOUSE
, 0, accel
, 0);
251 if (mi
->dx
> accel
[0] && accel
[2] != 0)
254 if ((mi
->dx
> accel
[1]) && (accel
[2] == 2))
259 posX
+= (long)mi
->dx
* accelMult
;
262 if (mi
->dy
> accel
[0] && accel
[2] != 0)
265 if ((mi
->dy
> accel
[1]) && (accel
[2] == 2))
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;
277 if (posY
< 0) PosY
= 0;
278 else if (posY
>= height
) PosY
= height
- 1;
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
)
339 if (!InputEnabled
) return 0;
341 for (i
= 0; i
< count
; i
++, inputs
++)
346 queue_mouse_event( &inputs
->u
.mi
, LLMHF_INJECTED
);
348 case WINE_INTERNAL_INPUT_MOUSE
:
349 queue_mouse_event( &inputs
->u
.mi
, 0 );
352 queue_kbd_event( &inputs
->u
.ki
, LLKHF_INJECTED
);
354 case WINE_INTERNAL_INPUT_KEYBOARD
:
355 queue_kbd_event( &inputs
->u
.ki
, 0 );
358 FIXME( "INPUT_HARDWARE not supported\n" );
366 /***********************************************************************
367 * keybd_event (USER32.@)
369 void WINAPI
keybd_event( BYTE bVk
, BYTE bScan
,
370 DWORD dwFlags
, ULONG_PTR dwExtraInfo
)
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
)
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
)
407 input
.type
= INPUT_MOUSE
;
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
;
449 /***********************************************************************
450 * SwapMouseButton (USER.186)
452 BOOL16 WINAPI
SwapMouseButton16( BOOL16 fSwap
)
454 BOOL16 ret
= SwappedButtons
;
455 SwappedButtons
= fSwap
;
460 /***********************************************************************
461 * SwapMouseButton (USER32.@)
463 BOOL WINAPI
SwapMouseButton( BOOL fSwap
)
465 BOOL ret
= SwappedButtons
;
466 SwappedButtons
= fSwap
;
471 /***********************************************************************
472 * GetCursorPos (USER.17)
474 BOOL16 WINAPI
GetCursorPos16( POINT16
*pt
)
485 /***********************************************************************
486 * GetCursorPos (USER32.@)
488 BOOL WINAPI
GetCursorPos( POINT
*pt
)
493 if (USER_Driver
.pGetCursorPos
) USER_Driver
.pGetCursorPos( pt
);
498 /***********************************************************************
499 * GetCursorInfo (USER32.@)
501 BOOL WINAPI
GetCursorInfo( PCURSORINFO pci
)
503 MESSAGEQUEUE
*queue
= QUEUE_Current();
506 if (queue
->cursor_count
>= 0) pci
->flags
= CURSOR_SHOWING
;
508 GetCursorPos(&pci
->ptScreenPos
);
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
);
534 /**********************************************************************
535 * SetCapture (USER32.@)
537 HWND WINAPI
SetCapture( HWND hwnd
)
541 SERVER_START_REQ( set_capture_window
)
545 if (!wine_server_call_err( req
))
547 previous
= reply
->previous
;
548 hwnd
= reply
->full_handle
;
553 if (previous
&& previous
!= hwnd
)
554 SendMessageW( previous
, WM_CAPTURECHANGED
, 0, (LPARAM
)hwnd
);
559 /**********************************************************************
560 * ReleaseCapture (USER32.@)
562 BOOL WINAPI
ReleaseCapture(void)
564 return (SetCapture(0) != 0);
568 /**********************************************************************
569 * GetCapture (USER32.@)
571 HWND WINAPI
GetCapture(void)
575 SERVER_START_REQ( get_thread_input
)
577 req
->tid
= GetCurrentThreadId();
578 if (!wine_server_call_err( req
)) ret
= reply
->capture
;
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
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
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
);
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 )
623 if ( GetAsyncKeyState( VK_RBUTTON
) & 0x8000 )
626 if ( GetAsyncKeyState( VK_MBUTTON
) & 0x8000 )
629 /* Should check for screen saver activation here ... */
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 :
643 * 3-5 Shift-key combinations that are not used for characters
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
)
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
)
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
);
692 /******************************************************************************
693 * GetKeyboardType (USER32.@)
695 INT WINAPI
GetKeyboardType(INT nTypeFlag
)
697 TRACE_(keyboard
)("(%d)\n", 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 */
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
);
748 /****************************************************************************
749 * GetKBCodePage (USER32.@)
751 UINT WINAPI
GetKBCodePage(void)
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
);
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;
790 /****************************************************************************
791 * GetKeyboardLayoutNameW (USER32.@)
793 BOOL WINAPI
GetKeyboardLayoutNameW(LPWSTR pwszKLID
)
795 if (USER_Driver
.pGetKeyboardLayoutName
)
796 return USER_Driver
.pGetKeyboardLayoutName(pwszKLID
);
800 /****************************************************************************
801 * GetKeyNameTextA (USER32.@)
803 INT WINAPI
GetKeyNameTextA(LONG lParam
, LPSTR lpBuffer
, INT nSize
)
808 if (!GetKeyNameTextW(lParam
, buf
, 256))
810 ret
= WideCharToMultiByte(CP_ACP
, 0, buf
, -1, lpBuffer
, nSize
, NULL
, NULL
);
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
);
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
);
849 /****************************************************************************
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
)
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 */
870 WideCharToMultiByte(CP_ACP
, 0, uni_chars
, n_ret
, (LPSTR
)lpChar
, 2, NULL
, NULL
);
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
);
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
);
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
);
911 /***********************************************************************
912 * UnregisterHotKey (USER32.@)
914 BOOL WINAPI
UnregisterHotKey(HWND hwnd
,INT id
) {
915 FIXME_(keyboard
)("(%p,%d): stub\n",hwnd
,id
);
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
);
931 /***********************************************************************
932 * LoadKeyboardLayoutA (USER32.@)
934 HKL WINAPI
LoadKeyboardLayoutA(LPCSTR pwszKLID
, UINT Flags
)
937 UNICODE_STRING pwszKLIDW
;
939 if (pwszKLID
) RtlCreateUnicodeStringFromAsciiz(&pwszKLIDW
, pwszKLID
);
940 else pwszKLIDW
.Buffer
= NULL
;
942 ret
= LoadKeyboardLayoutW(pwszKLIDW
.Buffer
, Flags
);
943 RtlFreeUnicodeString(&pwszKLIDW
);
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
);
960 typedef struct __TRACKINGLIST
{
962 POINT pos
; /* center of hover rectangle */
963 INT iHoverTime
; /* elapsed time the cursor has been inside of the hover rect */
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
,
979 INT hoverwidth
= 0, hoverheight
= 0;
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
) {
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
) {
1002 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1005 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1008 /* remove the TME_LEAVE flag */
1009 TrackingList
[i
].tme
.dwFlags
^= TME_LEAVE
;
1012 GetClientRect(hwnd
, &client
);
1013 MapWindowPoints(hwnd
, NULL
, (LPPOINT
)&client
, 2);
1014 if(PtInRect(&client
, pos
)) {
1016 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1017 /* remove the TME_LEAVE flag */
1018 TrackingList
[i
].tme
.dwFlags
^= TME_LEAVE
;
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
);
1053 PostMessageW(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSEHOVER
,
1054 get_key_state(), MAKELPARAM( posClient
.x
, posClient
.y
));
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
)) {
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
);
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.
1097 * ptme [I,O] pointer to TRACKMOUSEEVENT information structure.
1106 TrackMouseEvent (TRACKMOUSEEVENT
*ptme
)
1110 BOOL cancel
= 0, hover
= 0, leave
= 0, query
= 0, nonclient
= 0, inclient
= 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 */
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);
1135 hwnd
= WindowFromPoint(pos
);
1137 if ( flags
& TME_CANCEL
) {
1138 flags
&= ~ TME_CANCEL
;
1142 if ( flags
& TME_HOVER
) {
1143 flags
&= ~ TME_HOVER
;
1147 if ( flags
& TME_LEAVE
) {
1148 flags
&= ~ TME_LEAVE
;
1152 if ( flags
& TME_NONCLIENT
) {
1153 flags
&= ~ TME_NONCLIENT
;
1157 /* fill the TRACKMOUSEEVENT struct with the current tracking for the given hwnd */
1158 if ( flags
& TME_QUERY
) {
1159 flags
&= ~ TME_QUERY
;
1163 /* Find the tracking list entry with the matching hwnd */
1164 while((i
< iTrackMax
) && (TrackingList
[i
].tme
.hwndTrack
!= ptme
->hwndTrack
)) {
1168 /* hwnd found, fill in the ptme struct */
1170 *ptme
= TrackingList
[i
].tme
;
1174 return TRUE
; /* return here, TME_QUERY is retrieving information */
1178 FIXME("Unknown flag(s) %08lx\n", flags
);
1181 /* find a matching hwnd if one exists */
1184 while((i
< iTrackMax
) && (TrackingList
[i
].tme
.hwndTrack
!= ptme
->hwndTrack
)) {
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
);
1204 /* see if hwndTrack isn't the current window */
1205 if(ptme
->hwndTrack
!= hwnd
) {
1208 PostMessageA(ptme
->hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1211 PostMessageA(ptme
->hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1215 GetClientRect(ptme
->hwndTrack
, &client
);
1216 MapWindowPoints(ptme
->hwndTrack
, NULL
, (LPPOINT
)&client
, 2);
1217 if(PtInRect(&client
, pos
)) {
1220 if(nonclient
&& inclient
) {
1221 PostMessageA(ptme
->hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1224 else if(!nonclient
&& !inclient
) {
1225 PostMessageA(ptme
->hwndTrack
, WM_MOUSELEAVE
, 0, 0);
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;
1235 TrackingList
[i
].tme
.dwFlags
|= TME_HOVER
;
1236 TrackingList
[i
].tme
.dwHoverTime
= ptme
->dwHoverTime
;
1240 TrackingList
[i
].tme
.dwFlags
|= TME_LEAVE
;
1243 TrackingList
[i
].tme
.dwFlags
|= TME_NONCLIENT
;
1245 /* reset iHoverTime as per winapi specs */
1246 TrackingList
[i
].iHoverTime
= 0;
1252 /* if the tracking list is full return FALSE */
1253 if (iTrackMax
== sizeof (TrackingList
) / sizeof(*TrackingList
)) {
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
;
1267 timer
= SetTimer(0, 0, iTimerInterval
, TrackMouseEventProc
);