wininet: Partial implementation of InternetGet/SetCookieEx.
[wine] / dlls / user32 / input.c
1 /*
2  * USER Input processing
3  *
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
9  *
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.
14  *
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.
19  *
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23  */
24
25 #include "config.h"
26 #include "wine/port.h"
27
28 #include <stdlib.h>
29 #include <string.h>
30 #include <stdarg.h>
31 #include <stdio.h>
32 #include <ctype.h>
33 #include <assert.h>
34
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 "winternl.h"
43 #include "winerror.h"
44 #include "win.h"
45 #include "user_private.h"
46 #include "wine/server.h"
47 #include "wine/debug.h"
48
49 WINE_DEFAULT_DEBUG_CHANNEL(win);
50 WINE_DECLARE_DEBUG_CHANNEL(keyboard);
51
52
53 /***********************************************************************
54  *           get_key_state
55  */
56 static WORD get_key_state(void)
57 {
58     WORD ret = 0;
59
60     if (GetSystemMetrics( SM_SWAPBUTTON ))
61     {
62         if (GetAsyncKeyState(VK_RBUTTON) & 0x80) ret |= MK_LBUTTON;
63         if (GetAsyncKeyState(VK_LBUTTON) & 0x80) ret |= MK_RBUTTON;
64     }
65     else
66     {
67         if (GetAsyncKeyState(VK_LBUTTON) & 0x80) ret |= MK_LBUTTON;
68         if (GetAsyncKeyState(VK_RBUTTON) & 0x80) ret |= MK_RBUTTON;
69     }
70     if (GetAsyncKeyState(VK_MBUTTON) & 0x80)  ret |= MK_MBUTTON;
71     if (GetAsyncKeyState(VK_SHIFT) & 0x80)    ret |= MK_SHIFT;
72     if (GetAsyncKeyState(VK_CONTROL) & 0x80)  ret |= MK_CONTROL;
73     if (GetAsyncKeyState(VK_XBUTTON1) & 0x80) ret |= MK_XBUTTON1;
74     if (GetAsyncKeyState(VK_XBUTTON2) & 0x80) ret |= MK_XBUTTON2;
75     return ret;
76 }
77
78
79 /**********************************************************************
80  *              set_capture_window
81  */
82 BOOL set_capture_window( HWND hwnd, UINT gui_flags, HWND *prev_ret )
83 {
84     HWND previous = 0;
85     UINT flags = 0;
86     BOOL ret;
87
88     if (gui_flags & GUI_INMENUMODE) flags |= CAPTURE_MENU;
89     if (gui_flags & GUI_INMOVESIZE) flags |= CAPTURE_MOVESIZE;
90
91     SERVER_START_REQ( set_capture_window )
92     {
93         req->handle = hwnd;
94         req->flags  = flags;
95         if ((ret = !wine_server_call_err( req )))
96         {
97             previous = reply->previous;
98             hwnd = reply->full_handle;
99         }
100     }
101     SERVER_END_REQ;
102
103     USER_Driver->pSetCapture( hwnd, gui_flags );
104
105     if (previous && previous != hwnd)
106         SendMessageW( previous, WM_CAPTURECHANGED, 0, (LPARAM)hwnd );
107
108     if (prev_ret) *prev_ret = previous;
109     return ret;
110 }
111
112
113 /***********************************************************************
114  *              SendInput  (USER32.@)
115  */
116 UINT WINAPI SendInput( UINT count, LPINPUT inputs, int size )
117 {
118     if (TRACE_ON(win))
119     {
120         UINT i;
121
122         for (i = 0; i < count; i++)
123         {
124             switch(inputs[i].type)
125             {
126             case INPUT_MOUSE:
127                 TRACE("mouse: dx %d, dy %d, data %x, flags %x, time %u, info %lx\n",
128                       inputs[i].u.mi.dx, inputs[i].u.mi.dy, inputs[i].u.mi.mouseData,
129                       inputs[i].u.mi.dwFlags, inputs[i].u.mi.time, inputs[i].u.mi.dwExtraInfo);
130                 break;
131
132             case INPUT_KEYBOARD:
133                 TRACE("keyboard: vk %x, scan %x, flags %x, time %u, info %lx\n",
134                       inputs[i].u.ki.wVk, inputs[i].u.ki.wScan, inputs[i].u.ki.dwFlags,
135                       inputs[i].u.ki.time, inputs[i].u.ki.dwExtraInfo);
136                 break;
137
138             case INPUT_HARDWARE:
139                 TRACE("hardware: msg %d, wParamL %x, wParamH %x\n",
140                       inputs[i].u.hi.uMsg, inputs[i].u.hi.wParamL, inputs[i].u.hi.wParamH);
141                 break;
142
143             default:
144                 FIXME("unknown input type %u\n", inputs[i].type);
145                 break;
146             }
147         }
148     }
149
150     return USER_Driver->pSendInput( count, inputs, size );
151 }
152
153
154 /***********************************************************************
155  *              keybd_event (USER32.@)
156  */
157 void WINAPI keybd_event( BYTE bVk, BYTE bScan,
158                          DWORD dwFlags, ULONG_PTR dwExtraInfo )
159 {
160     INPUT input;
161
162     input.type = INPUT_KEYBOARD;
163     input.u.ki.wVk = bVk;
164     input.u.ki.wScan = bScan;
165     input.u.ki.dwFlags = dwFlags;
166     input.u.ki.time = GetTickCount();
167     input.u.ki.dwExtraInfo = dwExtraInfo;
168     SendInput( 1, &input, sizeof(input) );
169 }
170
171
172 /***********************************************************************
173  *              mouse_event (USER32.@)
174  */
175 void WINAPI mouse_event( DWORD dwFlags, DWORD dx, DWORD dy,
176                          DWORD dwData, ULONG_PTR dwExtraInfo )
177 {
178     INPUT input;
179
180     input.type = INPUT_MOUSE;
181     input.u.mi.dx = dx;
182     input.u.mi.dy = dy;
183     input.u.mi.mouseData = dwData;
184     input.u.mi.dwFlags = dwFlags;
185     input.u.mi.time = GetCurrentTime();
186     input.u.mi.dwExtraInfo = dwExtraInfo;
187     SendInput( 1, &input, sizeof(input) );
188 }
189
190
191 /***********************************************************************
192  *              GetCursorPos (USER32.@)
193  */
194 BOOL WINAPI GetCursorPos( POINT *pt )
195 {
196     if (!pt) return FALSE;
197     return USER_Driver->pGetCursorPos( pt );
198 }
199
200
201 /***********************************************************************
202  *              GetCursorInfo (USER32.@)
203  */
204 BOOL WINAPI GetCursorInfo( PCURSORINFO pci )
205 {
206     if (!pci) return 0;
207     if (get_user_thread_info()->cursor_count >= 0) pci->flags = CURSOR_SHOWING;
208     else pci->flags = 0;
209     GetCursorPos(&pci->ptScreenPos);
210     return 1;
211 }
212
213
214 /***********************************************************************
215  *              SetCursorPos (USER32.@)
216  */
217 BOOL WINAPI SetCursorPos( INT x, INT y )
218 {
219     return USER_Driver->pSetCursorPos( x, y );
220 }
221
222
223 /**********************************************************************
224  *              SetCapture (USER32.@)
225  */
226 HWND WINAPI SetCapture( HWND hwnd )
227 {
228     HWND previous;
229
230     set_capture_window( hwnd, 0, &previous );
231     return previous;
232 }
233
234
235 /**********************************************************************
236  *              ReleaseCapture (USER32.@)
237  */
238 BOOL WINAPI ReleaseCapture(void)
239 {
240     BOOL ret = set_capture_window( 0, 0, NULL );
241
242     /* Somebody may have missed some mouse movements */
243     mouse_event( MOUSEEVENTF_MOVE, 0, 0, 0, 0 );
244
245     return ret;
246 }
247
248
249 /**********************************************************************
250  *              GetCapture (USER32.@)
251  */
252 HWND WINAPI GetCapture(void)
253 {
254     HWND ret = 0;
255
256     SERVER_START_REQ( get_thread_input )
257     {
258         req->tid = GetCurrentThreadId();
259         if (!wine_server_call_err( req )) ret = reply->capture;
260     }
261     SERVER_END_REQ;
262     return ret;
263 }
264
265
266 /**********************************************************************
267  *              GetAsyncKeyState (USER32.@)
268  *
269  *      Determine if a key is or was pressed.  retval has high-order
270  * bit set to 1 if currently pressed, low-order bit set to 1 if key has
271  * been pressed.
272  */
273 SHORT WINAPI GetAsyncKeyState(INT nKey)
274 {
275     return USER_Driver->pGetAsyncKeyState( nKey );
276 }
277
278
279 /***********************************************************************
280  *              GetQueueStatus (USER32.@)
281  */
282 DWORD WINAPI GetQueueStatus( UINT flags )
283 {
284     DWORD ret = 0;
285
286     if (flags & ~(QS_ALLINPUT | QS_ALLPOSTMESSAGE | QS_SMRESULT))
287     {
288         SetLastError( ERROR_INVALID_FLAGS );
289         return 0;
290     }
291
292     /* check for pending X events */
293     USER_Driver->pMsgWaitForMultipleObjectsEx( 0, NULL, 0, flags, 0 );
294
295     SERVER_START_REQ( get_queue_status )
296     {
297         req->clear = 1;
298         wine_server_call( req );
299         ret = MAKELONG( reply->changed_bits & flags, reply->wake_bits & flags );
300     }
301     SERVER_END_REQ;
302     return ret;
303 }
304
305
306 /***********************************************************************
307  *              GetInputState   (USER32.@)
308  */
309 BOOL WINAPI GetInputState(void)
310 {
311     DWORD ret = 0;
312
313     /* check for pending X events */
314     USER_Driver->pMsgWaitForMultipleObjectsEx( 0, NULL, 0, QS_INPUT, 0 );
315
316     SERVER_START_REQ( get_queue_status )
317     {
318         req->clear = 0;
319         wine_server_call( req );
320         ret = reply->wake_bits & (QS_KEY | QS_MOUSEBUTTON);
321     }
322     SERVER_END_REQ;
323     return ret;
324 }
325
326
327 /******************************************************************
328  *              GetLastInputInfo (USER32.@)
329  */
330 BOOL WINAPI GetLastInputInfo(PLASTINPUTINFO plii)
331 {
332     BOOL ret;
333
334     TRACE("%p\n", plii);
335
336     if (plii->cbSize != sizeof (*plii) )
337     {
338         SetLastError(ERROR_INVALID_PARAMETER);
339         return FALSE;
340     }
341
342     SERVER_START_REQ( get_last_input_time )
343     {
344         ret = !wine_server_call_err( req );
345         if (ret)
346             plii->dwTime = reply->time;
347     }
348     SERVER_END_REQ;
349     return ret;
350 }
351
352
353 /******************************************************************
354 *               GetRawInputDeviceList (USER32.@)
355 */
356 UINT WINAPI GetRawInputDeviceList(PRAWINPUTDEVICELIST pRawInputDeviceList, PUINT puiNumDevices, UINT cbSize)
357 {
358     FIXME("(pRawInputDeviceList=%p, puiNumDevices=%p, cbSize=%d) stub!\n", pRawInputDeviceList, puiNumDevices, cbSize);
359
360     if(pRawInputDeviceList)
361         memset(pRawInputDeviceList, 0, sizeof *pRawInputDeviceList);
362     *puiNumDevices = 0;
363     return 0;
364 }
365
366
367 /******************************************************************
368 *               RegisterRawInputDevices (USER32.@)
369 */
370 BOOL WINAPI RegisterRawInputDevices(PRAWINPUTDEVICE pRawInputDevices, UINT uiNumDevices, UINT cbSize)
371 {
372     FIXME("(pRawInputDevices=%p, uiNumDevices=%d, cbSize=%d) stub!\n", pRawInputDevices, uiNumDevices, cbSize);
373
374     return TRUE;
375 }
376
377
378 /******************************************************************
379 *               GetRawInputData (USER32.@)
380 */
381 UINT WINAPI GetRawInputData(HRAWINPUT hRawInput, UINT uiCommand, LPVOID pData, PUINT pcbSize, UINT cbSizeHeader)
382 {
383     FIXME("(hRawInput=%p, uiCommand=%d, pData=%p, pcbSize=%p, cbSizeHeader=%d) stub!\n",
384             hRawInput, uiCommand, pData, pcbSize, cbSizeHeader);
385
386     return 0;
387 }
388
389
390 /******************************************************************
391 *               GetRawInputBuffer (USER32.@)
392 */
393 UINT WINAPI GetRawInputBuffer(PRAWINPUT pData, PUINT pcbSize, UINT cbSizeHeader)
394 {
395     FIXME("(pData=%p, pcbSize=%p, cbSizeHeader=%d) stub!\n", pData, pcbSize, cbSizeHeader);
396
397     return 0;
398 }
399
400
401 /******************************************************************
402 *               GetRawInputDeviceInfoA (USER32.@)
403 */
404 UINT WINAPI GetRawInputDeviceInfoA(HANDLE hDevice, UINT uiCommand, LPVOID pData, PUINT pcbSize)
405 {
406     FIXME("(hDevice=%p, uiCommand=%d, pData=%p, pcbSize=%p) stub!\n", hDevice, uiCommand, pData, pcbSize);
407
408     return 0;
409 }
410
411
412 /******************************************************************
413 *               GetRawInputDeviceInfoW (USER32.@)
414 */
415 UINT WINAPI GetRawInputDeviceInfoW(HANDLE hDevice, UINT uiCommand, LPVOID pData, PUINT pcbSize)
416 {
417     FIXME("(hDevice=%p, uiCommand=%d, pData=%p, pcbSize=%p) stub!\n", hDevice, uiCommand, pData, pcbSize);
418
419     return 0;
420 }
421
422
423 /******************************************************************
424 *               GetRegisteredRawInputDevices (USER32.@)
425 */
426 UINT WINAPI GetRegisteredRawInputDevices(PRAWINPUTDEVICE pRawInputDevices, PUINT puiNumDevices, UINT cbSize)
427 {
428     FIXME("(pRawInputDevices=%p, puiNumDevices=%p, cbSize=%d) stub!\n", pRawInputDevices, puiNumDevices, cbSize);
429
430     return 0;
431 }
432
433
434 /******************************************************************
435 *               DefRawInputProc (USER32.@)
436 */
437 LRESULT WINAPI DefRawInputProc(PRAWINPUT *paRawInput, INT nInput, UINT cbSizeHeader)
438 {
439     FIXME("(paRawInput=%p, nInput=%d, cbSizeHeader=%d) stub!\n", *paRawInput, nInput, cbSizeHeader);
440
441     return 0;
442 }
443
444
445 /**********************************************************************
446  *              AttachThreadInput (USER32.@)
447  *
448  * Attaches the input processing mechanism of one thread to that of
449  * another thread.
450  */
451 BOOL WINAPI AttachThreadInput( DWORD from, DWORD to, BOOL attach )
452 {
453     BOOL ret;
454
455     SERVER_START_REQ( attach_thread_input )
456     {
457         req->tid_from = from;
458         req->tid_to   = to;
459         req->attach   = attach;
460         ret = !wine_server_call_err( req );
461     }
462     SERVER_END_REQ;
463     return ret;
464 }
465
466
467 /**********************************************************************
468  *              GetKeyState (USER32.@)
469  *
470  * An application calls the GetKeyState function in response to a
471  * keyboard-input message.  This function retrieves the state of the key
472  * at the time the input message was generated.
473  */
474 SHORT WINAPI GetKeyState(INT vkey)
475 {
476     SHORT retval = 0;
477
478     SERVER_START_REQ( get_key_state )
479     {
480         req->tid = GetCurrentThreadId();
481         req->key = vkey;
482         if (!wine_server_call( req )) retval = (signed char)reply->state;
483     }
484     SERVER_END_REQ;
485     TRACE("key (0x%x) -> %x\n", vkey, retval);
486     return retval;
487 }
488
489
490 /**********************************************************************
491  *              GetKeyboardState (USER32.@)
492  */
493 BOOL WINAPI GetKeyboardState( LPBYTE state )
494 {
495     BOOL ret;
496
497     TRACE("(%p)\n", state);
498
499     memset( state, 0, 256 );
500     SERVER_START_REQ( get_key_state )
501     {
502         req->tid = GetCurrentThreadId();
503         req->key = -1;
504         wine_server_set_reply( req, state, 256 );
505         ret = !wine_server_call_err( req );
506     }
507     SERVER_END_REQ;
508     return ret;
509 }
510
511
512 /**********************************************************************
513  *              SetKeyboardState (USER32.@)
514  */
515 BOOL WINAPI SetKeyboardState( LPBYTE state )
516 {
517     BOOL ret;
518
519     SERVER_START_REQ( set_key_state )
520     {
521         req->tid = GetCurrentThreadId();
522         wine_server_add_data( req, state, 256 );
523         ret = !wine_server_call_err( req );
524     }
525     SERVER_END_REQ;
526     return ret;
527 }
528
529
530 /**********************************************************************
531  *              VkKeyScanA (USER32.@)
532  *
533  * VkKeyScan translates an ANSI character to a virtual-key and shift code
534  * for the current keyboard.
535  * high-order byte yields :
536  *      0       Unshifted
537  *      1       Shift
538  *      2       Ctrl
539  *      3-5     Shift-key combinations that are not used for characters
540  *      6       Ctrl-Alt
541  *      7       Ctrl-Alt-Shift
542  *      I.e. :  Shift = 1, Ctrl = 2, Alt = 4.
543  * FIXME : works ok except for dead chars :
544  * VkKeyScan '^'(0x5e, 94) ... got keycode 00 ... returning 00
545  * VkKeyScan '`'(0x60, 96) ... got keycode 00 ... returning 00
546  */
547 SHORT WINAPI VkKeyScanA(CHAR cChar)
548 {
549     WCHAR wChar;
550
551     if (IsDBCSLeadByte(cChar)) return -1;
552
553     MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
554     return VkKeyScanW(wChar);
555 }
556
557 /******************************************************************************
558  *              VkKeyScanW (USER32.@)
559  */
560 SHORT WINAPI VkKeyScanW(WCHAR cChar)
561 {
562     return VkKeyScanExW(cChar, GetKeyboardLayout(0));
563 }
564
565 /**********************************************************************
566  *              VkKeyScanExA (USER32.@)
567  */
568 WORD WINAPI VkKeyScanExA(CHAR cChar, HKL dwhkl)
569 {
570     WCHAR wChar;
571
572     if (IsDBCSLeadByte(cChar)) return -1;
573
574     MultiByteToWideChar(CP_ACP, 0, &cChar, 1, &wChar, 1);
575     return VkKeyScanExW(wChar, dwhkl);
576 }
577
578 /******************************************************************************
579  *              VkKeyScanExW (USER32.@)
580  */
581 WORD WINAPI VkKeyScanExW(WCHAR cChar, HKL dwhkl)
582 {
583     return USER_Driver->pVkKeyScanEx(cChar, dwhkl);
584 }
585
586 /**********************************************************************
587  *              OemKeyScan (USER32.@)
588  */
589 DWORD WINAPI OemKeyScan(WORD wOemChar)
590 {
591     return wOemChar;
592 }
593
594 /******************************************************************************
595  *              GetKeyboardType (USER32.@)
596  */
597 INT WINAPI GetKeyboardType(INT nTypeFlag)
598 {
599     TRACE_(keyboard)("(%d)\n", nTypeFlag);
600     switch(nTypeFlag)
601     {
602     case 0:      /* Keyboard type */
603         return 4;    /* AT-101 */
604     case 1:      /* Keyboard Subtype */
605         return 0;    /* There are no defined subtypes */
606     case 2:      /* Number of F-keys */
607         return 12;   /* We're doing an 101 for now, so return 12 F-keys */
608     default:
609         WARN_(keyboard)("Unknown type\n");
610         return 0;    /* The book says 0 here, so 0 */
611     }
612 }
613
614 /******************************************************************************
615  *              MapVirtualKeyA (USER32.@)
616  */
617 UINT WINAPI MapVirtualKeyA(UINT code, UINT maptype)
618 {
619     return MapVirtualKeyExA( code, maptype, GetKeyboardLayout(0) );
620 }
621
622 /******************************************************************************
623  *              MapVirtualKeyW (USER32.@)
624  */
625 UINT WINAPI MapVirtualKeyW(UINT code, UINT maptype)
626 {
627     return MapVirtualKeyExW(code, maptype, GetKeyboardLayout(0));
628 }
629
630 /******************************************************************************
631  *              MapVirtualKeyExA (USER32.@)
632  */
633 UINT WINAPI MapVirtualKeyExA(UINT code, UINT maptype, HKL hkl)
634 {
635     UINT ret;
636
637     ret = MapVirtualKeyExW( code, maptype, hkl );
638     if (maptype == MAPVK_VK_TO_CHAR)
639     {
640         BYTE ch = 0;
641         WCHAR wch = ret;
642
643         WideCharToMultiByte( CP_ACP, 0, &wch, 1, (LPSTR)&ch, 1, NULL, NULL );
644         ret = ch;
645     }
646     return ret;
647 }
648
649 /******************************************************************************
650  *              MapVirtualKeyExW (USER32.@)
651  */
652 UINT WINAPI MapVirtualKeyExW(UINT code, UINT maptype, HKL hkl)
653 {
654     TRACE_(keyboard)("(%d, %d, %p)\n", code, maptype, hkl);
655
656     return USER_Driver->pMapVirtualKeyEx(code, maptype, hkl);
657 }
658
659 /****************************************************************************
660  *              GetKBCodePage (USER32.@)
661  */
662 UINT WINAPI GetKBCodePage(void)
663 {
664     return GetOEMCP();
665 }
666
667 /***********************************************************************
668  *              GetKeyboardLayout (USER32.@)
669  *
670  *        - device handle for keyboard layout defaulted to
671  *          the language id. This is the way Windows default works.
672  *        - the thread identifier (dwLayout) is also ignored.
673  */
674 HKL WINAPI GetKeyboardLayout(DWORD dwLayout)
675 {
676     return USER_Driver->pGetKeyboardLayout(dwLayout);
677 }
678
679 /****************************************************************************
680  *              GetKeyboardLayoutNameA (USER32.@)
681  */
682 BOOL WINAPI GetKeyboardLayoutNameA(LPSTR pszKLID)
683 {
684     WCHAR buf[KL_NAMELENGTH];
685
686     if (GetKeyboardLayoutNameW(buf))
687         return WideCharToMultiByte( CP_ACP, 0, buf, -1, pszKLID, KL_NAMELENGTH, NULL, NULL ) != 0;
688     return FALSE;
689 }
690
691 /****************************************************************************
692  *              GetKeyboardLayoutNameW (USER32.@)
693  */
694 BOOL WINAPI GetKeyboardLayoutNameW(LPWSTR pwszKLID)
695 {
696     return USER_Driver->pGetKeyboardLayoutName(pwszKLID);
697 }
698
699 /****************************************************************************
700  *              GetKeyNameTextA (USER32.@)
701  */
702 INT WINAPI GetKeyNameTextA(LONG lParam, LPSTR lpBuffer, INT nSize)
703 {
704     WCHAR buf[256];
705     INT ret;
706
707     if (!GetKeyNameTextW(lParam, buf, 256))
708     {
709         lpBuffer[0] = 0;
710         return 0;
711     }
712     ret = WideCharToMultiByte(CP_ACP, 0, buf, -1, lpBuffer, nSize, NULL, NULL);
713     if (!ret && nSize)
714     {
715         ret = nSize - 1;
716         lpBuffer[ret] = 0;
717     }
718     return ret;
719 }
720
721 /****************************************************************************
722  *              GetKeyNameTextW (USER32.@)
723  */
724 INT WINAPI GetKeyNameTextW(LONG lParam, LPWSTR lpBuffer, INT nSize)
725 {
726     return USER_Driver->pGetKeyNameText( lParam, lpBuffer, nSize );
727 }
728
729 /****************************************************************************
730  *              ToUnicode (USER32.@)
731  */
732 INT WINAPI ToUnicode(UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
733                      LPWSTR lpwStr, int size, UINT flags)
734 {
735     return ToUnicodeEx(virtKey, scanCode, lpKeyState, lpwStr, size, flags, GetKeyboardLayout(0));
736 }
737
738 /****************************************************************************
739  *              ToUnicodeEx (USER32.@)
740  */
741 INT WINAPI ToUnicodeEx(UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
742                        LPWSTR lpwStr, int size, UINT flags, HKL hkl)
743 {
744     return USER_Driver->pToUnicodeEx(virtKey, scanCode, lpKeyState, lpwStr, size, flags, hkl);
745 }
746
747 /****************************************************************************
748  *              ToAscii (USER32.@)
749  */
750 INT WINAPI ToAscii( UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
751                     LPWORD lpChar, UINT flags )
752 {
753     return ToAsciiEx(virtKey, scanCode, lpKeyState, lpChar, flags, GetKeyboardLayout(0));
754 }
755
756 /****************************************************************************
757  *              ToAsciiEx (USER32.@)
758  */
759 INT WINAPI ToAsciiEx( UINT virtKey, UINT scanCode, LPBYTE lpKeyState,
760                       LPWORD lpChar, UINT flags, HKL dwhkl )
761 {
762     WCHAR uni_chars[2];
763     INT ret, n_ret;
764
765     ret = ToUnicodeEx(virtKey, scanCode, lpKeyState, uni_chars, 2, flags, dwhkl);
766     if (ret < 0) n_ret = 1; /* FIXME: make ToUnicode return 2 for dead chars */
767     else n_ret = ret;
768     WideCharToMultiByte(CP_ACP, 0, uni_chars, n_ret, (LPSTR)lpChar, 2, NULL, NULL);
769     return ret;
770 }
771
772 /**********************************************************************
773  *              ActivateKeyboardLayout (USER32.@)
774  */
775 HKL WINAPI ActivateKeyboardLayout(HKL hLayout, UINT flags)
776 {
777     TRACE_(keyboard)("(%p, %d)\n", hLayout, flags);
778
779     return USER_Driver->pActivateKeyboardLayout(hLayout, flags);
780 }
781
782 /**********************************************************************
783  *              BlockInput (USER32.@)
784  */
785 BOOL WINAPI BlockInput(BOOL fBlockIt)
786 {
787     FIXME_(keyboard)("(%d): stub\n", fBlockIt);
788     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
789
790     return FALSE;
791 }
792
793 /***********************************************************************
794  *              GetKeyboardLayoutList (USER32.@)
795  *
796  * Return number of values available if either input parm is
797  *  0, per MS documentation.
798  */
799 UINT WINAPI GetKeyboardLayoutList(INT nBuff, HKL *layouts)
800 {
801     TRACE_(keyboard)("(%d,%p)\n",nBuff,layouts);
802
803     return USER_Driver->pGetKeyboardLayoutList(nBuff, layouts);
804 }
805
806
807 /***********************************************************************
808  *              RegisterHotKey (USER32.@)
809  */
810 BOOL WINAPI RegisterHotKey(HWND hwnd,INT id,UINT modifiers,UINT vk)
811 {
812     static int once;
813     if (!once++) FIXME_(keyboard)("(%p,%d,0x%08x,%d): stub\n",hwnd,id,modifiers,vk);
814     return TRUE;
815 }
816
817 /***********************************************************************
818  *              UnregisterHotKey (USER32.@)
819  */
820 BOOL WINAPI UnregisterHotKey(HWND hwnd,INT id)
821 {
822     static int once;
823     if (!once++) FIXME_(keyboard)("(%p,%d): stub\n",hwnd,id);
824     return TRUE;
825 }
826
827 /***********************************************************************
828  *              LoadKeyboardLayoutW (USER32.@)
829  */
830 HKL WINAPI LoadKeyboardLayoutW(LPCWSTR pwszKLID, UINT Flags)
831 {
832     TRACE_(keyboard)("(%s, %d)\n", debugstr_w(pwszKLID), Flags);
833
834     return USER_Driver->pLoadKeyboardLayout(pwszKLID, Flags);
835 }
836
837 /***********************************************************************
838  *              LoadKeyboardLayoutA (USER32.@)
839  */
840 HKL WINAPI LoadKeyboardLayoutA(LPCSTR pwszKLID, UINT Flags)
841 {
842     HKL ret;
843     UNICODE_STRING pwszKLIDW;
844
845     if (pwszKLID) RtlCreateUnicodeStringFromAsciiz(&pwszKLIDW, pwszKLID);
846     else pwszKLIDW.Buffer = NULL;
847
848     ret = LoadKeyboardLayoutW(pwszKLIDW.Buffer, Flags);
849     RtlFreeUnicodeString(&pwszKLIDW);
850     return ret;
851 }
852
853
854 /***********************************************************************
855  *              UnloadKeyboardLayout (USER32.@)
856  */
857 BOOL WINAPI UnloadKeyboardLayout(HKL hkl)
858 {
859     TRACE_(keyboard)("(%p)\n", hkl);
860
861     return USER_Driver->pUnloadKeyboardLayout(hkl);
862 }
863
864 typedef struct __TRACKINGLIST {
865     TRACKMOUSEEVENT tme;
866     POINT pos; /* center of hover rectangle */
867 } _TRACKINGLIST;
868
869 /* FIXME: move tracking stuff into a per thread data */
870 static _TRACKINGLIST tracking_info;
871 static UINT_PTR timer;
872
873 static void check_mouse_leave(HWND hwnd, int hittest)
874 {
875     if (tracking_info.tme.hwndTrack != hwnd)
876     {
877         if (tracking_info.tme.dwFlags & TME_NONCLIENT)
878             PostMessageW(tracking_info.tme.hwndTrack, WM_NCMOUSELEAVE, 0, 0);
879         else
880             PostMessageW(tracking_info.tme.hwndTrack, WM_MOUSELEAVE, 0, 0);
881
882         /* remove the TME_LEAVE flag */
883         tracking_info.tme.dwFlags &= ~TME_LEAVE;
884     }
885     else
886     {
887         if (hittest == HTCLIENT)
888         {
889             if (tracking_info.tme.dwFlags & TME_NONCLIENT)
890             {
891                 PostMessageW(tracking_info.tme.hwndTrack, WM_NCMOUSELEAVE, 0, 0);
892                 /* remove the TME_LEAVE flag */
893                 tracking_info.tme.dwFlags &= ~TME_LEAVE;
894             }
895         }
896         else
897         {
898             if (!(tracking_info.tme.dwFlags & TME_NONCLIENT))
899             {
900                 PostMessageW(tracking_info.tme.hwndTrack, WM_MOUSELEAVE, 0, 0);
901                 /* remove the TME_LEAVE flag */
902                 tracking_info.tme.dwFlags &= ~TME_LEAVE;
903             }
904         }
905     }
906 }
907
908 static void CALLBACK TrackMouseEventProc(HWND hwnd, UINT uMsg, UINT_PTR idEvent,
909                                          DWORD dwTime)
910 {
911     POINT pos;
912     INT hoverwidth = 0, hoverheight = 0, hittest;
913
914     TRACE("hwnd %p, msg %04x, id %04lx, time %u\n", hwnd, uMsg, idEvent, dwTime);
915
916     GetCursorPos(&pos);
917     hwnd = WINPOS_WindowFromPoint(hwnd, pos, &hittest);
918
919     TRACE("point %s hwnd %p hittest %d\n", wine_dbgstr_point(&pos), hwnd, hittest);
920
921     SystemParametersInfoW(SPI_GETMOUSEHOVERWIDTH, 0, &hoverwidth, 0);
922     SystemParametersInfoW(SPI_GETMOUSEHOVERHEIGHT, 0, &hoverheight, 0);
923
924     TRACE("tracked pos %s, current pos %s, hover width %d, hover height %d\n",
925            wine_dbgstr_point(&tracking_info.pos), wine_dbgstr_point(&pos),
926            hoverwidth, hoverheight);
927
928     /* see if this tracking event is looking for TME_LEAVE and that the */
929     /* mouse has left the window */
930     if (tracking_info.tme.dwFlags & TME_LEAVE)
931     {
932         check_mouse_leave(hwnd, hittest);
933     }
934
935     if (tracking_info.tme.hwndTrack != hwnd)
936     {
937         /* mouse is gone, stop tracking mouse hover */
938         tracking_info.tme.dwFlags &= ~TME_HOVER;
939     }
940
941     /* see if we are tracking hovering for this hwnd */
942     if (tracking_info.tme.dwFlags & TME_HOVER)
943     {
944         /* has the cursor moved outside the rectangle centered around pos? */
945         if ((abs(pos.x - tracking_info.pos.x) > (hoverwidth / 2)) ||
946             (abs(pos.y - tracking_info.pos.y) > (hoverheight / 2)))
947         {
948             /* record this new position as the current position */
949             tracking_info.pos = pos;
950         }
951         else
952         {
953             if (hittest == HTCLIENT)
954             {
955                 ScreenToClient(hwnd, &pos);
956                 TRACE("client cursor pos %s\n", wine_dbgstr_point(&pos));
957
958                 PostMessageW(tracking_info.tme.hwndTrack, WM_MOUSEHOVER,
959                              get_key_state(), MAKELPARAM( pos.x, pos.y ));
960             }
961             else
962             {
963                 if (tracking_info.tme.dwFlags & TME_NONCLIENT)
964                     PostMessageW(tracking_info.tme.hwndTrack, WM_NCMOUSEHOVER,
965                                  hittest, MAKELPARAM( pos.x, pos.y ));
966             }
967
968             /* stop tracking mouse hover */
969             tracking_info.tme.dwFlags &= ~TME_HOVER;
970         }
971     }
972
973     /* stop the timer if the tracking list is empty */
974     if (!(tracking_info.tme.dwFlags & (TME_HOVER | TME_LEAVE)))
975     {
976         KillSystemTimer(tracking_info.tme.hwndTrack, timer);
977         timer = 0;
978         tracking_info.tme.hwndTrack = 0;
979         tracking_info.tme.dwFlags = 0;
980         tracking_info.tme.dwHoverTime = 0;
981     }
982 }
983
984
985 /***********************************************************************
986  * TrackMouseEvent [USER32]
987  *
988  * Requests notification of mouse events
989  *
990  * During mouse tracking WM_MOUSEHOVER or WM_MOUSELEAVE events are posted
991  * to the hwnd specified in the ptme structure.  After the event message
992  * is posted to the hwnd, the entry in the queue is removed.
993  *
994  * If the current hwnd isn't ptme->hwndTrack the TME_HOVER flag is completely
995  * ignored. The TME_LEAVE flag results in a WM_MOUSELEAVE message being posted
996  * immediately and the TME_LEAVE flag being ignored.
997  *
998  * PARAMS
999  *     ptme [I,O] pointer to TRACKMOUSEEVENT information structure.
1000  *
1001  * RETURNS
1002  *     Success: non-zero
1003  *     Failure: zero
1004  *
1005  */
1006
1007 BOOL WINAPI
1008 TrackMouseEvent (TRACKMOUSEEVENT *ptme)
1009 {
1010     HWND hwnd;
1011     POINT pos;
1012     DWORD hover_time;
1013     INT hittest;
1014
1015     TRACE("%x, %x, %p, %u\n", ptme->cbSize, ptme->dwFlags, ptme->hwndTrack, ptme->dwHoverTime);
1016
1017     if (ptme->cbSize != sizeof(TRACKMOUSEEVENT)) {
1018         WARN("wrong TRACKMOUSEEVENT size from app\n");
1019         SetLastError(ERROR_INVALID_PARAMETER);
1020         return FALSE;
1021     }
1022
1023     /* fill the TRACKMOUSEEVENT struct with the current tracking for the given hwnd */
1024     if (ptme->dwFlags & TME_QUERY )
1025     {
1026         *ptme = tracking_info.tme;
1027         /* set cbSize in the case it's not initialized yet */
1028         ptme->cbSize = sizeof(TRACKMOUSEEVENT);
1029
1030         return TRUE; /* return here, TME_QUERY is retrieving information */
1031     }
1032
1033     if (!IsWindow(ptme->hwndTrack))
1034     {
1035         SetLastError(ERROR_INVALID_WINDOW_HANDLE);
1036         return FALSE;
1037     }
1038
1039     hover_time = ptme->dwHoverTime;
1040
1041     /* if HOVER_DEFAULT was specified replace this with the systems current value.
1042      * TME_LEAVE doesn't need to specify hover time so use default */
1043     if (hover_time == HOVER_DEFAULT || hover_time == 0 || !(ptme->dwHoverTime&TME_HOVER))
1044         SystemParametersInfoW(SPI_GETMOUSEHOVERTIME, 0, &hover_time, 0);
1045
1046     GetCursorPos(&pos);
1047     hwnd = WINPOS_WindowFromPoint(ptme->hwndTrack, pos, &hittest);
1048     TRACE("point %s hwnd %p hittest %d\n", wine_dbgstr_point(&pos), hwnd, hittest);
1049
1050     if (ptme->dwFlags & ~(TME_CANCEL | TME_HOVER | TME_LEAVE | TME_NONCLIENT))
1051         FIXME("Unknown flag(s) %08x\n", ptme->dwFlags & ~(TME_CANCEL | TME_HOVER | TME_LEAVE | TME_NONCLIENT));
1052
1053     if (ptme->dwFlags & TME_CANCEL)
1054     {
1055         if (tracking_info.tme.hwndTrack == ptme->hwndTrack)
1056         {
1057             tracking_info.tme.dwFlags &= ~(ptme->dwFlags & ~TME_CANCEL);
1058
1059             /* if we aren't tracking on hover or leave remove this entry */
1060             if (!(tracking_info.tme.dwFlags & (TME_HOVER | TME_LEAVE)))
1061             {
1062                 KillSystemTimer(tracking_info.tme.hwndTrack, timer);
1063                 timer = 0;
1064                 tracking_info.tme.hwndTrack = 0;
1065                 tracking_info.tme.dwFlags = 0;
1066                 tracking_info.tme.dwHoverTime = 0;
1067             }
1068         }
1069     } else {
1070         /* In our implementation it's possible that another window will receive a
1071          * WM_MOUSEMOVE and call TrackMouseEvent before TrackMouseEventProc is
1072          * called. In such a situation post the WM_MOUSELEAVE now */
1073         if (tracking_info.tme.dwFlags & TME_LEAVE && tracking_info.tme.hwndTrack != NULL)
1074             check_mouse_leave(hwnd, hittest);
1075
1076         if (timer)
1077         {
1078             KillSystemTimer(tracking_info.tme.hwndTrack, timer);
1079             timer = 0;
1080             tracking_info.tme.hwndTrack = 0;
1081             tracking_info.tme.dwFlags = 0;
1082             tracking_info.tme.dwHoverTime = 0;
1083         }
1084
1085         if (ptme->hwndTrack == hwnd)
1086         {
1087             /* Adding new mouse event to the tracking list */
1088             tracking_info.tme = *ptme;
1089             tracking_info.tme.dwHoverTime = hover_time;
1090
1091             /* Initialize HoverInfo variables even if not hover tracking */
1092             tracking_info.pos = pos;
1093
1094             timer = SetSystemTimer(tracking_info.tme.hwndTrack, (UINT_PTR)&tracking_info.tme, hover_time, TrackMouseEventProc);
1095         }
1096     }
1097
1098     return TRUE;
1099 }
1100
1101 /***********************************************************************
1102  * GetMouseMovePointsEx [USER32]
1103  *
1104  * RETURNS
1105  *     Success: count of point set in the buffer
1106  *     Failure: -1
1107  */
1108 int WINAPI GetMouseMovePointsEx(UINT size, LPMOUSEMOVEPOINT ptin, LPMOUSEMOVEPOINT ptout, int count, DWORD res) {
1109
1110     if((size != sizeof(MOUSEMOVEPOINT)) || (count < 0) || (count > 64)) {
1111         SetLastError(ERROR_INVALID_PARAMETER);
1112         return -1;
1113     }
1114
1115     if(!ptin || !ptout) {
1116         SetLastError(ERROR_NOACCESS);
1117         return -1;
1118     }
1119
1120     FIXME("(%d %p %p %d %d) stub\n", size, ptin, ptout, count, res);
1121
1122     SetLastError(ERROR_POINT_NOT_FOUND);
1123     return -1;
1124 }