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 * OemKeyScan (USER32.@)
695 DWORD WINAPI
OemKeyScan(WORD wOemChar
)
697 TRACE("(%d)\n", wOemChar
);
701 /******************************************************************************
702 * GetKeyboardType (USER32.@)
704 INT WINAPI
GetKeyboardType(INT nTypeFlag
)
706 TRACE_(keyboard
)("(%d)\n", nTypeFlag
);
709 case 0: /* Keyboard type */
710 return 4; /* AT-101 */
711 case 1: /* Keyboard Subtype */
712 return 0; /* There are no defined subtypes */
713 case 2: /* Number of F-keys */
714 return 12; /* We're doing an 101 for now, so return 12 F-keys */
716 WARN_(keyboard
)("Unknown type\n");
717 return 0; /* The book says 0 here, so 0 */
721 /******************************************************************************
722 * MapVirtualKeyA (USER32.@)
724 UINT WINAPI
MapVirtualKeyA(UINT code
, UINT maptype
)
726 return MapVirtualKeyExA( code
, maptype
, GetKeyboardLayout(0) );
729 /******************************************************************************
730 * MapVirtualKeyW (USER32.@)
732 UINT WINAPI
MapVirtualKeyW(UINT code
, UINT maptype
)
734 return MapVirtualKeyExW(code
, maptype
, GetKeyboardLayout(0));
737 /******************************************************************************
738 * MapVirtualKeyExA (USER32.@)
740 UINT WINAPI
MapVirtualKeyExA(UINT code
, UINT maptype
, HKL hkl
)
742 return MapVirtualKeyExW(code
, maptype
, hkl
);
745 /******************************************************************************
746 * MapVirtualKeyExW (USER32.@)
748 UINT WINAPI
MapVirtualKeyExW(UINT code
, UINT maptype
, HKL hkl
)
750 TRACE_(keyboard
)("(%d, %d, %p)\n", code
, maptype
, hkl
);
752 if (USER_Driver
.pMapVirtualKeyEx
)
753 return USER_Driver
.pMapVirtualKeyEx(code
, maptype
, hkl
);
757 /****************************************************************************
758 * GetKBCodePage (USER32.@)
760 UINT WINAPI
GetKBCodePage(void)
765 /****************************************************************************
766 * GetKeyboardLayoutName (USER.477)
768 INT16 WINAPI
GetKeyboardLayoutName16(LPSTR pwszKLID
)
770 return GetKeyboardLayoutNameA(pwszKLID
);
773 /***********************************************************************
774 * GetKeyboardLayout (USER32.@)
776 * - device handle for keyboard layout defaulted to
777 * the language id. This is the way Windows default works.
778 * - the thread identifier (dwLayout) is also ignored.
780 HKL WINAPI
GetKeyboardLayout(DWORD dwLayout
)
782 if (USER_Driver
.pGetKeyboardLayout
)
783 return USER_Driver
.pGetKeyboardLayout(dwLayout
);
787 /****************************************************************************
788 * GetKeyboardLayoutNameA (USER32.@)
790 BOOL WINAPI
GetKeyboardLayoutNameA(LPSTR pszKLID
)
792 WCHAR buf
[KL_NAMELENGTH
];
794 if (GetKeyboardLayoutNameW(buf
))
795 return WideCharToMultiByte( CP_ACP
, 0, buf
, -1, pszKLID
, KL_NAMELENGTH
, NULL
, NULL
) != 0;
799 /****************************************************************************
800 * GetKeyboardLayoutNameW (USER32.@)
802 BOOL WINAPI
GetKeyboardLayoutNameW(LPWSTR pwszKLID
)
804 if (USER_Driver
.pGetKeyboardLayoutName
)
805 return USER_Driver
.pGetKeyboardLayoutName(pwszKLID
);
809 /****************************************************************************
810 * GetKeyNameTextA (USER32.@)
812 INT WINAPI
GetKeyNameTextA(LONG lParam
, LPSTR lpBuffer
, INT nSize
)
817 if (!GetKeyNameTextW(lParam
, buf
, 256))
819 ret
= WideCharToMultiByte(CP_ACP
, 0, buf
, -1, lpBuffer
, nSize
, NULL
, NULL
);
828 /****************************************************************************
829 * GetKeyNameTextW (USER32.@)
831 INT WINAPI
GetKeyNameTextW(LONG lParam
, LPWSTR lpBuffer
, INT nSize
)
833 if (USER_Driver
.pGetKeyNameText
)
834 return USER_Driver
.pGetKeyNameText( lParam
, lpBuffer
, nSize
);
838 /****************************************************************************
839 * ToUnicode (USER32.@)
841 INT WINAPI
ToUnicode(UINT virtKey
, UINT scanCode
, LPBYTE lpKeyState
,
842 LPWSTR lpwStr
, int size
, UINT flags
)
844 return ToUnicodeEx(virtKey
, scanCode
, lpKeyState
, lpwStr
, size
, flags
, GetKeyboardLayout(0));
847 /****************************************************************************
848 * ToUnicodeEx (USER32.@)
850 INT WINAPI
ToUnicodeEx(UINT virtKey
, UINT scanCode
, LPBYTE lpKeyState
,
851 LPWSTR lpwStr
, int size
, UINT flags
, HKL hkl
)
853 if (USER_Driver
.pToUnicodeEx
)
854 return USER_Driver
.pToUnicodeEx(virtKey
, scanCode
, lpKeyState
, lpwStr
, size
, flags
, hkl
);
858 /****************************************************************************
861 INT WINAPI
ToAscii( UINT virtKey
, UINT scanCode
, LPBYTE lpKeyState
,
862 LPWORD lpChar
, UINT flags
)
864 return ToAsciiEx(virtKey
, scanCode
, lpKeyState
, lpChar
, flags
, GetKeyboardLayout(0));
867 /****************************************************************************
868 * ToAsciiEx (USER32.@)
870 INT WINAPI
ToAsciiEx( UINT virtKey
, UINT scanCode
, LPBYTE lpKeyState
,
871 LPWORD lpChar
, UINT flags
, HKL dwhkl
)
876 ret
= ToUnicodeEx(virtKey
, scanCode
, lpKeyState
, uni_chars
, 2, flags
, dwhkl
);
877 if (ret
< 0) n_ret
= 1; /* FIXME: make ToUnicode return 2 for dead chars */
879 WideCharToMultiByte(CP_ACP
, 0, uni_chars
, n_ret
, (LPSTR
)lpChar
, 2, NULL
, NULL
);
883 /**********************************************************************
884 * ActivateKeyboardLayout (USER32.@)
886 HKL WINAPI
ActivateKeyboardLayout(HKL hLayout
, UINT flags
)
888 TRACE_(keyboard
)("(%p, %d)\n", hLayout
, flags
);
890 if (USER_Driver
.pActivateKeyboardLayout
)
891 return USER_Driver
.pActivateKeyboardLayout(hLayout
, flags
);
896 /***********************************************************************
897 * GetKeyboardLayoutList (USER32.@)
899 * Return number of values available if either input parm is
900 * 0, per MS documentation.
902 UINT WINAPI
GetKeyboardLayoutList(INT nBuff
, HKL
*layouts
)
904 TRACE_(keyboard
)("(%d,%p)\n",nBuff
,layouts
);
906 if (USER_Driver
.pGetKeyboardLayoutList
)
907 return USER_Driver
.pGetKeyboardLayoutList(nBuff
, layouts
);
912 /***********************************************************************
913 * RegisterHotKey (USER32.@)
915 BOOL WINAPI
RegisterHotKey(HWND hwnd
,INT id
,UINT modifiers
,UINT vk
) {
916 FIXME_(keyboard
)("(%p,%d,0x%08x,%d): stub\n",hwnd
,id
,modifiers
,vk
);
920 /***********************************************************************
921 * UnregisterHotKey (USER32.@)
923 BOOL WINAPI
UnregisterHotKey(HWND hwnd
,INT id
) {
924 FIXME_(keyboard
)("(%p,%d): stub\n",hwnd
,id
);
928 /***********************************************************************
929 * LoadKeyboardLayoutW (USER32.@)
931 HKL WINAPI
LoadKeyboardLayoutW(LPCWSTR pwszKLID
, UINT Flags
)
933 TRACE_(keyboard
)("(%s, %d)\n", debugstr_w(pwszKLID
), Flags
);
935 if (USER_Driver
.pLoadKeyboardLayout
)
936 return USER_Driver
.pLoadKeyboardLayout(pwszKLID
, Flags
);
940 /***********************************************************************
941 * LoadKeyboardLayoutA (USER32.@)
943 HKL WINAPI
LoadKeyboardLayoutA(LPCSTR pwszKLID
, UINT Flags
)
946 UNICODE_STRING pwszKLIDW
;
948 if (pwszKLID
) RtlCreateUnicodeStringFromAsciiz(&pwszKLIDW
, pwszKLID
);
949 else pwszKLIDW
.Buffer
= NULL
;
951 ret
= LoadKeyboardLayoutW(pwszKLIDW
.Buffer
, Flags
);
952 RtlFreeUnicodeString(&pwszKLIDW
);
957 /***********************************************************************
958 * UnloadKeyboardLayout (USER32.@)
960 BOOL WINAPI
UnloadKeyboardLayout(HKL hkl
)
962 TRACE_(keyboard
)("(%p)\n", hkl
);
964 if (USER_Driver
.pUnloadKeyboardLayout
)
965 return USER_Driver
.pUnloadKeyboardLayout(hkl
);
969 typedef struct __TRACKINGLIST
{
971 POINT pos
; /* center of hover rectangle */
972 INT iHoverTime
; /* elapsed time the cursor has been inside of the hover rect */
975 static _TRACKINGLIST TrackingList
[10];
976 static int iTrackMax
= 0;
977 static UINT_PTR timer
;
978 static const INT iTimerInterval
= 50; /* msec for timer interval */
980 static void CALLBACK
TrackMouseEventProc(HWND hwndUnused
, UINT uMsg
, UINT_PTR idEvent
,
988 INT hoverwidth
= 0, hoverheight
= 0;
992 hwnd
= WindowFromPoint(pos
);
994 SystemParametersInfoA(SPI_GETMOUSEHOVERWIDTH
, 0, &hoverwidth
, 0);
995 SystemParametersInfoA(SPI_GETMOUSEHOVERHEIGHT
, 0, &hoverheight
, 0);
997 /* loop through tracking events we are processing */
998 while (i
< iTrackMax
) {
999 if (TrackingList
[i
].tme
.dwFlags
& TME_NONCLIENT
) {
1006 /* see if this tracking event is looking for TME_LEAVE and that the */
1007 /* mouse has left the window */
1008 if (TrackingList
[i
].tme
.dwFlags
& TME_LEAVE
) {
1009 if (TrackingList
[i
].tme
.hwndTrack
!= hwnd
) {
1011 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1014 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1017 /* remove the TME_LEAVE flag */
1018 TrackingList
[i
].tme
.dwFlags
^= TME_LEAVE
;
1021 GetClientRect(hwnd
, &client
);
1022 MapWindowPoints(hwnd
, NULL
, (LPPOINT
)&client
, 2);
1023 if(PtInRect(&client
, pos
)) {
1025 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1026 /* remove the TME_LEAVE flag */
1027 TrackingList
[i
].tme
.dwFlags
^= TME_LEAVE
;
1032 PostMessageA(TrackingList
[i
].tme
.hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1033 /* remove the TME_LEAVE flag */
1034 TrackingList
[i
].tme
.dwFlags
^= TME_LEAVE
;
1040 /* see if we are tracking hovering for this hwnd */
1041 if(TrackingList
[i
].tme
.dwFlags
& TME_HOVER
) {
1042 /* add the timer interval to the hovering time */
1043 TrackingList
[i
].iHoverTime
+=iTimerInterval
;
1045 /* has the cursor moved outside the rectangle centered around pos? */
1046 if((abs(pos
.x
- TrackingList
[i
].pos
.x
) > (hoverwidth
/ 2.0))
1047 || (abs(pos
.y
- TrackingList
[i
].pos
.y
) > (hoverheight
/ 2.0)))
1049 /* record this new position as the current position and reset */
1050 /* the iHoverTime variable to 0 */
1051 TrackingList
[i
].pos
= pos
;
1052 TrackingList
[i
].iHoverTime
= 0;
1055 /* has the mouse hovered long enough? */
1056 if(TrackingList
[i
].iHoverTime
<= TrackingList
[i
].tme
.dwHoverTime
)
1058 posClient
.x
= pos
.x
;
1059 posClient
.y
= pos
.y
;
1060 ScreenToClient(hwnd
, &posClient
);
1062 PostMessageW(TrackingList
[i
].tme
.hwndTrack
, WM_NCMOUSEHOVER
,
1063 get_key_state(), MAKELPARAM( posClient
.x
, posClient
.y
));
1066 PostMessageW(TrackingList
[i
].tme
.hwndTrack
, WM_MOUSEHOVER
,
1067 get_key_state(), MAKELPARAM( posClient
.x
, posClient
.y
));
1070 /* stop tracking mouse hover */
1071 TrackingList
[i
].tme
.dwFlags
^= TME_HOVER
;
1075 /* see if we are still tracking TME_HOVER or TME_LEAVE for this entry */
1076 if((TrackingList
[i
].tme
.dwFlags
& TME_HOVER
) ||
1077 (TrackingList
[i
].tme
.dwFlags
& TME_LEAVE
)) {
1079 } else { /* remove this entry from the tracking list */
1080 TrackingList
[i
] = TrackingList
[--iTrackMax
];
1084 /* stop the timer if the tracking list is empty */
1085 if(iTrackMax
== 0) {
1086 KillTimer(0, timer
);
1092 /***********************************************************************
1093 * TrackMouseEvent [USER32]
1095 * Requests notification of mouse events
1097 * During mouse tracking WM_MOUSEHOVER or WM_MOUSELEAVE events are posted
1098 * to the hwnd specified in the ptme structure. After the event message
1099 * is posted to the hwnd, the entry in the queue is removed.
1101 * If the current hwnd isn't ptme->hwndTrack the TME_HOVER flag is completely
1102 * ignored. The TME_LEAVE flag results in a WM_MOUSELEAVE message being posted
1103 * immediately and the TME_LEAVE flag being ignored.
1106 * ptme [I,O] pointer to TRACKMOUSEEVENT information structure.
1115 TrackMouseEvent (TRACKMOUSEEVENT
*ptme
)
1119 BOOL cancel
= 0, hover
= 0, leave
= 0, query
= 0, nonclient
= 0, inclient
= 0;
1127 SetRectEmpty(&client
);
1129 TRACE("%lx, %lx, %p, %lx\n", ptme
->cbSize
, ptme
->dwFlags
, ptme
->hwndTrack
, ptme
->dwHoverTime
);
1131 if (ptme
->cbSize
!= sizeof(TRACKMOUSEEVENT
)) {
1132 WARN("wrong TRACKMOUSEEVENT size from app\n");
1133 SetLastError(ERROR_INVALID_PARAMETER
); /* FIXME not sure if this is correct */
1137 flags
= ptme
->dwFlags
;
1139 /* if HOVER_DEFAULT was specified replace this with the systems current value */
1140 if(ptme
->dwHoverTime
== HOVER_DEFAULT
)
1141 SystemParametersInfoA(SPI_GETMOUSEHOVERTIME
, 0, &(ptme
->dwHoverTime
), 0);
1144 hwnd
= WindowFromPoint(pos
);
1146 if ( flags
& TME_CANCEL
) {
1147 flags
&= ~ TME_CANCEL
;
1151 if ( flags
& TME_HOVER
) {
1152 flags
&= ~ TME_HOVER
;
1156 if ( flags
& TME_LEAVE
) {
1157 flags
&= ~ TME_LEAVE
;
1161 if ( flags
& TME_NONCLIENT
) {
1162 flags
&= ~ TME_NONCLIENT
;
1166 /* fill the TRACKMOUSEEVENT struct with the current tracking for the given hwnd */
1167 if ( flags
& TME_QUERY
) {
1168 flags
&= ~ TME_QUERY
;
1172 /* Find the tracking list entry with the matching hwnd */
1173 while((i
< iTrackMax
) && (TrackingList
[i
].tme
.hwndTrack
!= ptme
->hwndTrack
)) {
1177 /* hwnd found, fill in the ptme struct */
1179 *ptme
= TrackingList
[i
].tme
;
1183 return TRUE
; /* return here, TME_QUERY is retrieving information */
1187 FIXME("Unknown flag(s) %08lx\n", flags
);
1190 /* find a matching hwnd if one exists */
1193 while((i
< iTrackMax
) && (TrackingList
[i
].tme
.hwndTrack
!= ptme
->hwndTrack
)) {
1198 TrackingList
[i
].tme
.dwFlags
&= ~(ptme
->dwFlags
& ~TME_CANCEL
);
1200 /* if we aren't tracking on hover or leave remove this entry */
1201 if(!((TrackingList
[i
].tme
.dwFlags
& TME_HOVER
) ||
1202 (TrackingList
[i
].tme
.dwFlags
& TME_LEAVE
)))
1204 TrackingList
[i
] = TrackingList
[--iTrackMax
];
1206 if(iTrackMax
== 0) {
1207 KillTimer(0, timer
);
1213 /* see if hwndTrack isn't the current window */
1214 if(ptme
->hwndTrack
!= hwnd
) {
1217 PostMessageA(ptme
->hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1220 PostMessageA(ptme
->hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1224 GetClientRect(ptme
->hwndTrack
, &client
);
1225 MapWindowPoints(ptme
->hwndTrack
, NULL
, (LPPOINT
)&client
, 2);
1226 if(PtInRect(&client
, pos
)) {
1229 if(nonclient
&& inclient
) {
1230 PostMessageA(ptme
->hwndTrack
, WM_NCMOUSELEAVE
, 0, 0);
1233 else if(!nonclient
&& !inclient
) {
1234 PostMessageA(ptme
->hwndTrack
, WM_MOUSELEAVE
, 0, 0);
1238 /* See if this hwnd is already being tracked and update the tracking flags */
1239 for(i
= 0; i
< iTrackMax
; i
++) {
1240 if(TrackingList
[i
].tme
.hwndTrack
== ptme
->hwndTrack
) {
1241 TrackingList
[i
].tme
.dwFlags
= 0;
1244 TrackingList
[i
].tme
.dwFlags
|= TME_HOVER
;
1245 TrackingList
[i
].tme
.dwHoverTime
= ptme
->dwHoverTime
;
1249 TrackingList
[i
].tme
.dwFlags
|= TME_LEAVE
;
1252 TrackingList
[i
].tme
.dwFlags
|= TME_NONCLIENT
;
1254 /* reset iHoverTime as per winapi specs */
1255 TrackingList
[i
].iHoverTime
= 0;
1261 /* if the tracking list is full return FALSE */
1262 if (iTrackMax
== sizeof (TrackingList
) / sizeof(*TrackingList
)) {
1266 /* Adding new mouse event to the tracking list */
1267 TrackingList
[iTrackMax
].tme
= *ptme
;
1269 /* Initialize HoverInfo variables even if not hover tracking */
1270 TrackingList
[iTrackMax
].iHoverTime
= 0;
1271 TrackingList
[iTrackMax
].pos
= pos
;
1276 timer
= SetTimer(0, 0, iTimerInterval
, TrackMouseEventProc
);