user32/tests: Make sure the message test doesn't hang if the window doesn't have...
[wine] / dlls / user32 / tests / input.c
1 /* Test Key event to Key message translation
2  *
3  * Copyright 2003 Rein Klazes
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
18  */
19
20 /* test whether the right type of messages:
21  * WM_KEYUP/DOWN vs WM_SYSKEYUP/DOWN  are sent in case of combined
22  * keystrokes.
23  *
24  * For instance <ALT>-X can be accomplished by
25  * the sequence ALT-KEY-DOWN, X-KEY-DOWN, ALT-KEY-UP, X-KEY-UP
26  * but also X-KEY-DOWN, ALT-KEY-DOWN, X-KEY-UP, ALT-KEY-UP
27  * Whether a KEY or a SYSKEY message is sent is not always clear, it is
28  * also not the same in WINNT as in WIN9X */
29
30 /* NOTE that there will be test failures under WIN9X
31  * No applications are known to me that rely on this
32  * so I don't fix it */
33
34 /* TODO:
35  * 1. extend it to the wm_command and wm_syscommand notifications
36  * 2. add some more tests with special cases like dead keys or right (alt) key
37  * 3. there is some adapted code from input.c in here. Should really
38  *    make that code exactly the same.
39  * 4. resolve the win9x case when there is a need or the testing frame work
40  *    offers a nice way.
41  * 5. The test app creates a window, the user should not take the focus
42  *    away during its short existence. I could do something to prevent that
43  *    if it is a problem.
44  *
45  */
46
47 #define _WIN32_WINNT 0x401
48 #define _WIN32_IE 0x0500
49
50 #include <stdarg.h>
51 #include <assert.h>
52
53 #include "windef.h"
54 #include "winbase.h"
55 #include "winuser.h"
56
57 #include "wine/test.h"
58
59 /* globals */
60 static HWND hWndTest;
61 static long timetag = 0x10000000;
62
63 static UINT (WINAPI *pSendInput) (UINT, INPUT*, size_t);
64 static int (WINAPI *pGetMouseMovePointsEx) (UINT, LPMOUSEMOVEPOINT, LPMOUSEMOVEPOINT, int, DWORD);
65
66 #define MAXKEYEVENTS 6
67 #define MAXKEYMESSAGES MAXKEYEVENTS /* assuming a key event generates one
68                                        and only one message */
69
70 /* keyboard message names, sorted as their value */
71 static const char *MSGNAME[]={"WM_KEYDOWN", "WM_KEYUP", "WM_CHAR","WM_DEADCHAR",
72     "WM_SYSKEYDOWN", "WM_SYSKEYUP", "WM_SYSCHAR", "WM_SYSDEADCHAR" ,"WM_KEYLAST"};
73
74 /* keyevents, add more as needed */
75 typedef enum KEVtag
76 {  ALTDOWN = 1, ALTUP, XDOWN, XUP, SHIFTDOWN, SHIFTUP, CTRLDOWN, CTRLUP } KEV;
77 /* matching VK's */
78 static const int GETVKEY[]={0, VK_MENU, VK_MENU, 'X', 'X', VK_SHIFT, VK_SHIFT, VK_CONTROL, VK_CONTROL};
79 /* matching scan codes */
80 static const int GETSCAN[]={0, 0x38, 0x38, 0x2D, 0x2D, 0x2A, 0x2A, 0x1D, 0x1D };
81 /* matching updown events */
82 static const int GETFLAGS[]={0, 0, KEYEVENTF_KEYUP, 0, KEYEVENTF_KEYUP, 0, KEYEVENTF_KEYUP, 0, KEYEVENTF_KEYUP};
83 /* matching descriptions */
84 static const char *getdesc[]={"", "+alt","-alt","+X","-X","+shift","-shift","+ctrl","-ctrl"};
85
86 /* The MSVC headers ignore our NONAMELESSUNION requests so we have to define our own type */
87 typedef struct
88 {
89     DWORD type;
90     union
91     {
92         MOUSEINPUT      mi;
93         KEYBDINPUT      ki;
94         HARDWAREINPUT   hi;
95     } u;
96 } TEST_INPUT;
97
98 #define ADDTOINPUTS(kev) \
99 inputs[evtctr].type = INPUT_KEYBOARD; \
100     ((TEST_INPUT*)inputs)[evtctr].u.ki.wVk = GETVKEY[ kev]; \
101     ((TEST_INPUT*)inputs)[evtctr].u.ki.wScan = GETSCAN[ kev]; \
102     ((TEST_INPUT*)inputs)[evtctr].u.ki.dwFlags = GETFLAGS[ kev]; \
103     ((TEST_INPUT*)inputs)[evtctr].u.ki.dwExtraInfo = 0; \
104     ((TEST_INPUT*)inputs)[evtctr].u.ki.time = ++timetag; \
105     if( kev) evtctr++;
106
107 typedef struct {
108     UINT    message;
109     WPARAM  wParam;
110     LPARAM  lParam;
111 } KMSG;
112
113 /*******************************************
114  * add new test sets here
115  * the software will make all combinations of the
116  * keyevent defined here
117  */
118 static const struct {
119     int nrkev;
120     KEV keydwn[MAXKEYEVENTS];
121     KEV keyup[MAXKEYEVENTS];
122 } testkeyset[]= {
123     { 2, { ALTDOWN, XDOWN }, { ALTUP, XUP}},
124     { 3, { ALTDOWN, XDOWN , SHIFTDOWN}, { ALTUP, XUP, SHIFTUP}},
125     { 3, { ALTDOWN, XDOWN , CTRLDOWN}, { ALTUP, XUP, CTRLUP}},
126     { 3, { SHIFTDOWN, XDOWN , CTRLDOWN}, { SHIFTUP, XUP, CTRLUP}},
127     { 0 } /* mark the end */
128 };
129
130 /**********************adapted from input.c **********************************/
131
132 static BYTE InputKeyStateTable[256];
133 static BYTE AsyncKeyStateTable[256];
134 static BYTE TrackSysKey = 0; /* determine whether ALT key up will cause a WM_SYSKEYUP
135                          or a WM_KEYUP message */
136
137 static void init_function_pointers(void)
138 {
139     HMODULE hdll = GetModuleHandleA("user32");
140
141 #define GET_PROC(func) \
142     p ## func = (void*)GetProcAddress(hdll, #func); \
143     if(!p ## func) \
144       trace("GetProcAddress(%s) failed\n", #func);
145
146     GET_PROC(SendInput)
147     GET_PROC(GetMouseMovePointsEx)
148
149 #undef GET_PROC
150 }
151
152 static int KbdMessage( KEV kev, WPARAM *pwParam, LPARAM *plParam )
153 {
154     UINT message;
155     int VKey = GETVKEY[kev];
156     WORD flags;
157
158     flags = LOBYTE(GETSCAN[kev]);
159     if (GETFLAGS[kev] & KEYEVENTF_EXTENDEDKEY) flags |= KF_EXTENDED;
160
161     if (GETFLAGS[kev] & KEYEVENTF_KEYUP )
162     {
163         message = WM_KEYUP;
164         if( (InputKeyStateTable[VK_MENU] & 0x80) && (
165                 (VKey == VK_MENU) || (VKey == VK_CONTROL) ||
166                  !(InputKeyStateTable[VK_CONTROL] & 0x80))) {
167             if(  TrackSysKey == VK_MENU || /* <ALT>-down/<ALT>-up sequence */
168                     (VKey != VK_MENU)) /* <ALT>-down...<something else>-up */
169                 message = WM_SYSKEYUP;
170                 TrackSysKey = 0;
171         }
172         InputKeyStateTable[VKey] &= ~0x80;
173         flags |= KF_REPEAT | KF_UP;
174     }
175     else
176     {
177         if (InputKeyStateTable[VKey] & 0x80) flags |= KF_REPEAT;
178         if (!(InputKeyStateTable[VKey] & 0x80)) InputKeyStateTable[VKey] ^= 0x01;
179         InputKeyStateTable[VKey] |= 0x80;
180         AsyncKeyStateTable[VKey] |= 0x80;
181
182         message = WM_KEYDOWN;
183         if( (InputKeyStateTable[VK_MENU] & 0x80) &&
184                 !(InputKeyStateTable[VK_CONTROL] & 0x80)) {
185             message = WM_SYSKEYDOWN;
186             TrackSysKey = VKey;
187         }
188     }
189
190     if (InputKeyStateTable[VK_MENU] & 0x80) flags |= KF_ALTDOWN;
191
192     if( plParam) *plParam = MAKELPARAM( 1, flags );
193     if( pwParam) *pwParam = VKey;
194     return message;
195 }
196
197 /****************************** end copy input.c ****************************/
198
199 /*
200  * . prepare the keyevents for SendInputs
201  * . calculate the "expected" messages
202  * . Send the events to our window
203  * . retrieve the messages from the input queue
204  * . verify
205  */
206 static void do_test( HWND hwnd, int seqnr, const KEV td[] )
207 {
208     INPUT inputs[MAXKEYEVENTS];
209     KMSG expmsg[MAXKEYEVENTS];
210     MSG msg;
211     char buf[100];
212     UINT evtctr=0;
213     int kmctr, i;
214
215     buf[0]='\0';
216     TrackSysKey=0; /* see input.c */
217     for( i = 0; i < MAXKEYEVENTS; i++) {
218         ADDTOINPUTS(td[i])
219         strcat(buf, getdesc[td[i]]);
220         if(td[i])
221             expmsg[i].message = KbdMessage(td[i], &(expmsg[i].wParam), &(expmsg[i].lParam)); /* see queue_kbd_event() */
222         else
223             expmsg[i].message = 0;
224     }
225     for( kmctr = 0; kmctr < MAXKEYEVENTS && expmsg[kmctr].message; kmctr++)
226         ;
227     assert( evtctr <= MAXKEYEVENTS );
228     assert( evtctr == pSendInput(evtctr, &inputs[0], sizeof(INPUT)));
229     i = 0;
230     if (winetest_debug > 1)
231         trace("======== key stroke sequence #%d: %s =============\n",
232             seqnr + 1, buf);
233     while( PeekMessage(&msg,hwnd,WM_KEYFIRST,WM_KEYLAST,PM_REMOVE) ) {
234         if (winetest_debug > 1)
235             trace("message[%d] %-15s wParam %04lx lParam %08lx time %x\n", i,
236                   MSGNAME[msg.message - WM_KEYFIRST], msg.wParam, msg.lParam, msg.time);
237         if( i < kmctr ) {
238             ok( msg.message == expmsg[i].message &&
239                     msg.wParam == expmsg[i].wParam &&
240                     msg.lParam == expmsg[i].lParam,
241                     "wrong message! expected:\n"
242                     "message[%d] %-15s wParam %04lx lParam %08lx\n",i,
243                     MSGNAME[(expmsg[i]).message - WM_KEYFIRST],
244                     expmsg[i].wParam, expmsg[i].lParam );
245         }
246         i++;
247     }
248     if (winetest_debug > 1)
249         trace("%d messages retrieved\n", i);
250     ok( i == kmctr, "message count is wrong: got %d expected: %d\n", i, kmctr);
251 }
252
253 /* test all combinations of the specified key events */
254 static void TestASet( HWND hWnd, int nrkev, const KEV kevdwn[], const KEV kevup[] )
255 {
256     int i,j,k,l,m,n;
257     static int count=0;
258     KEV kbuf[MAXKEYEVENTS];
259     assert( nrkev==2 || nrkev==3);
260     for(i=0;i<MAXKEYEVENTS;i++) kbuf[i]=0;
261     /* two keys involved gives 4 test cases */
262     if(nrkev==2) {
263         for(i=0;i<nrkev;i++) {
264             for(j=0;j<nrkev;j++) {
265                 kbuf[0] = kevdwn[i];
266                 kbuf[1] = kevdwn[1-i];
267                 kbuf[2] = kevup[j];
268                 kbuf[3] = kevup[1-j];
269                 do_test( hWnd, count++, kbuf);
270             }
271         }
272     }
273     /* three keys involved gives 36 test cases */
274     if(nrkev==3){
275         for(i=0;i<nrkev;i++){
276             for(j=0;j<nrkev;j++){
277                 if(j==i) continue;
278                 for(k=0;k<nrkev;k++){
279                     if(k==i || k==j) continue;
280                     for(l=0;l<nrkev;l++){
281                         for(m=0;m<nrkev;m++){
282                             if(m==l) continue;
283                             for(n=0;n<nrkev;n++){
284                                 if(n==l ||n==m) continue;
285                                 kbuf[0] = kevdwn[i];
286                                 kbuf[1] = kevdwn[j];
287                                 kbuf[2] = kevdwn[k];
288                                 kbuf[3] = kevup[l];
289                                 kbuf[4] = kevup[m];
290                                 kbuf[5] = kevup[n];
291                                 do_test( hWnd, count++, kbuf);
292                             }
293                         }
294                     }
295                 }
296             }
297         }
298     }
299 }
300
301 /* test each set specified in the global testkeyset array */
302 static void TestSysKeys( HWND hWnd)
303 {
304     int i;
305     for(i=0; testkeyset[i].nrkev;i++)
306         TestASet( hWnd, testkeyset[i].nrkev, testkeyset[i].keydwn,
307                 testkeyset[i].keyup);
308 }
309
310 static LRESULT CALLBACK WndProc( HWND hWnd, UINT msg, WPARAM wParam,
311         LPARAM lParam )
312 {
313     switch (msg) {
314         case WM_USER:
315             SetFocus(hWnd);
316             /* window has focus, now do the test */
317             if( hWnd == hWndTest) TestSysKeys( hWnd);
318             /* finished :-) */
319             break;
320
321         case WM_DESTROY:
322             PostQuitMessage( 0 );
323             break;
324
325         default:
326             return( DefWindowProcA( hWnd, msg, wParam, lParam ) );
327     }
328
329     return 0;
330 }
331
332 static void test_Input_whitebox(void)
333 {
334     MSG msg;
335     WNDCLASSA  wclass;
336     HANDLE hInstance = GetModuleHandleA( NULL );
337
338     wclass.lpszClassName = "InputSysKeyTestClass";
339     wclass.style         = CS_HREDRAW | CS_VREDRAW;
340     wclass.lpfnWndProc   = WndProc;
341     wclass.hInstance     = hInstance;
342     wclass.hIcon         = LoadIconA( 0, (LPSTR)IDI_APPLICATION );
343     wclass.hCursor       = LoadCursorA( NULL, IDC_ARROW);
344     wclass.hbrBackground = (HBRUSH)( COLOR_WINDOW + 1);
345     wclass.lpszMenuName = 0;
346     wclass.cbClsExtra    = 0;
347     wclass.cbWndExtra    = 0;
348     assert (RegisterClassA( &wclass ));
349     /* create the test window that will receive the keystrokes */
350     assert ( hWndTest = CreateWindowA( wclass.lpszClassName, "InputSysKeyTest",
351                 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, 0, 100, 100,
352                 NULL, NULL, hInstance, NULL) );
353     ShowWindow( hWndTest, SW_SHOW);
354     UpdateWindow( hWndTest);
355
356     /* flush pending messages */
357     while (PeekMessage( &msg, 0, 0, 0, PM_REMOVE )) DispatchMessageA( &msg );
358
359     SendMessageA(hWndTest, WM_USER, 0, 0);
360     DestroyWindow(hWndTest);
361 }
362
363 /* try to make sure pending X events have been processed before continuing */
364 static void empty_message_queue(void)
365 {
366     MSG msg;
367     int diff = 200;
368     int min_timeout = 50;
369     DWORD time = GetTickCount() + diff;
370
371     while (diff > 0)
372     {
373         if (MsgWaitForMultipleObjects(0, NULL, FALSE, min_timeout, QS_ALLINPUT) == WAIT_TIMEOUT) break;
374         while (PeekMessage(&msg, 0, 0, 0, PM_REMOVE))
375         {
376             TranslateMessage(&msg);
377             DispatchMessage(&msg);
378         }
379         diff = time - GetTickCount();
380         min_timeout = 20;
381     }
382 }
383
384 struct transition_s {
385     WORD wVk;
386     BYTE before_state;
387     BYTE optional;
388 };
389
390 typedef enum {
391     sent=0x1,
392     posted=0x2,
393     parent=0x4,
394     wparam=0x8,
395     lparam=0x10,
396     defwinproc=0x20,
397     beginpaint=0x40,
398     optional=0x80,
399     hook=0x100,
400     winevent_hook=0x200
401 } msg_flags_t;
402
403 struct message {
404     UINT message;          /* the WM_* code */
405     msg_flags_t flags;     /* message props */
406     WPARAM wParam;         /* expected value of wParam */
407     LPARAM lParam;         /* expected value of lParam */
408 };
409
410 struct sendinput_test_s {
411     WORD wVk;
412     DWORD dwFlags;
413     BOOL _todo_wine;
414     struct transition_s expected_transitions[MAXKEYEVENTS+1];
415     struct message expected_messages[MAXKEYMESSAGES+1];
416 } sendinput_test[] = {
417     /* test ALT+F */
418     /* 0 */
419     {VK_LMENU, 0, 0, {{VK_MENU, 0x00}, {VK_LMENU, 0x00}, {0}},
420         {{WM_SYSKEYDOWN, hook|wparam, VK_LMENU}, {WM_SYSKEYDOWN}, {0}}},
421     {'F', 0, 0, {{'F', 0x00}, {0}},
422         {{WM_SYSKEYDOWN, hook}, {WM_SYSKEYDOWN},
423         {WM_SYSCHAR},
424         {WM_SYSCOMMAND}, {0}}},
425     {'F', KEYEVENTF_KEYUP, 0, {{'F', 0x80}, {0}},
426         {{WM_SYSKEYUP, hook}, {WM_SYSKEYUP}, {0}}},
427     {VK_LMENU, KEYEVENTF_KEYUP, 0, {{VK_MENU, 0x80}, {VK_LMENU, 0x80}, {0}},
428         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
429
430     /* test CTRL+O */
431     /* 4 */
432     {VK_LCONTROL, 0, 0, {{VK_CONTROL, 0x00}, {VK_LCONTROL, 0x00}, {0}},
433         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {0}}},
434     {'O', 0, 0, {{'O', 0x00}, {0}},
435         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {WM_CHAR}, {0}}},
436     {'O', KEYEVENTF_KEYUP, 0, {{'O', 0x80}, {0}},
437         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
438     {VK_LCONTROL, KEYEVENTF_KEYUP, 0, {{VK_CONTROL, 0x80}, {VK_LCONTROL, 0x80}, {0}},
439         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
440
441     /* test ALT+CTRL+X */
442     /* 8 */
443     {VK_LMENU, 0, 0, {{VK_MENU, 0x00}, {VK_LMENU, 0x00}, {0}},
444         {{WM_SYSKEYDOWN, hook}, {WM_SYSKEYDOWN}, {0}}},
445     {VK_LCONTROL, 0, 0, {{VK_CONTROL, 0x00}, {VK_LCONTROL, 0x00}, {0}},
446         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {0}}},
447     {'X', 0, 0, {{'X', 0x00}, {0}},
448         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {0}}},
449     {'X', KEYEVENTF_KEYUP, 0, {{'X', 0x80}, {0}},
450         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
451     {VK_LCONTROL, KEYEVENTF_KEYUP, 0, {{VK_CONTROL, 0x80}, {VK_LCONTROL, 0x80}, {0}},
452         {{WM_SYSKEYUP, hook}, {WM_SYSKEYUP}, {0}}},
453     {VK_LMENU, KEYEVENTF_KEYUP, 0, {{VK_MENU, 0x80}, {VK_LMENU, 0x80}, {0}},
454         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
455
456     /* test SHIFT+A */
457     /* 14 */
458     {VK_LSHIFT, 0, 0, {{VK_SHIFT, 0x00}, {VK_LSHIFT, 0x00}, {0}},
459         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {0}}},
460     {'A', 0, 0, {{'A', 0x00}, {0}},
461         {{WM_KEYDOWN, hook}, {WM_KEYDOWN}, {WM_CHAR}, {0}}},
462     {'A', KEYEVENTF_KEYUP, 0, {{'A', 0x80}, {0}},
463         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
464     {VK_LSHIFT, KEYEVENTF_KEYUP, 0, {{VK_SHIFT, 0x80}, {VK_LSHIFT, 0x80}, {0}},
465         {{WM_KEYUP, hook}, {WM_KEYUP}, {0}}},
466     /* test L-SHIFT & R-SHIFT: */
467     /* RSHIFT == LSHIFT */
468     /* 18 */
469     {VK_RSHIFT, 0, 0,
470      /* recent windows versions (>= w2k3) correctly report an RSHIFT transition */
471        {{VK_SHIFT, 0x00}, {VK_LSHIFT, 0x00, TRUE}, {VK_RSHIFT, 0x00, TRUE}, {0}},
472         {{WM_KEYDOWN, hook|wparam, VK_RSHIFT},
473         {WM_KEYDOWN}, {0}}},
474     {VK_RSHIFT, KEYEVENTF_KEYUP, 0,
475        {{VK_SHIFT, 0x80}, {VK_LSHIFT, 0x80, TRUE}, {VK_RSHIFT, 0x80, TRUE}, {0}},
476         {{WM_KEYUP, hook, hook|wparam, VK_RSHIFT},
477         {WM_KEYUP}, {0}}},
478
479     /* LSHIFT | KEYEVENTF_EXTENDEDKEY == RSHIFT */
480     /* 20 */
481     {VK_LSHIFT, KEYEVENTF_EXTENDEDKEY, 0,
482         {{VK_SHIFT, 0x00}, {VK_RSHIFT, 0x00}, {0}},
483         {{WM_KEYDOWN, hook|wparam|lparam, VK_LSHIFT, LLKHF_EXTENDED},
484         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
485     {VK_LSHIFT, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
486         {{VK_SHIFT, 0x80}, {VK_RSHIFT, 0x80}, {0}},
487         {{WM_KEYUP, hook|wparam|lparam, VK_LSHIFT, LLKHF_UP|LLKHF_EXTENDED},
488         {WM_KEYUP, wparam|lparam, VK_SHIFT, KF_UP}, {0}}},
489     /* RSHIFT | KEYEVENTF_EXTENDEDKEY == RSHIFT */
490     /* 22 */
491     {VK_RSHIFT, KEYEVENTF_EXTENDEDKEY, 0,
492         {{VK_SHIFT, 0x00}, {VK_RSHIFT, 0x00}, {0}},
493         {{WM_KEYDOWN, hook|wparam|lparam, VK_RSHIFT, LLKHF_EXTENDED},
494         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
495     {VK_RSHIFT, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
496         {{VK_SHIFT, 0x80}, {VK_RSHIFT, 0x80}, {0}},
497         {{WM_KEYUP, hook|wparam|lparam, VK_RSHIFT, LLKHF_UP|LLKHF_EXTENDED},
498         {WM_KEYUP, wparam|lparam, VK_SHIFT, KF_UP}, {0}}},
499
500     /* Note about wparam for hook with generic key (VK_SHIFT, VK_CONTROL, VK_MENU):
501        win2k  - sends to hook whatever we generated here
502        winXP+ - Attempts to convert key to L/R key but not always correct
503     */
504     /* SHIFT == LSHIFT */
505     /* 24 */
506     {VK_SHIFT, 0, 0,
507         {{VK_SHIFT, 0x00}, {VK_LSHIFT, 0x00}, {0}},
508         {{WM_KEYDOWN, hook/* |wparam */|lparam, VK_SHIFT, 0},
509         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
510     {VK_SHIFT, KEYEVENTF_KEYUP, 0,
511         {{VK_SHIFT, 0x80}, {VK_LSHIFT, 0x80}, {0}},
512         {{WM_KEYUP, hook/*|wparam*/|lparam, VK_SHIFT, LLKHF_UP},
513         {WM_KEYUP, wparam|lparam, VK_SHIFT, KF_UP}, {0}}},
514     /* SHIFT | KEYEVENTF_EXTENDEDKEY == RSHIFT */
515     /* 26 */
516     {VK_SHIFT, KEYEVENTF_EXTENDEDKEY, 0,
517         {{VK_SHIFT, 0x00}, {VK_RSHIFT, 0x00}, {0}},
518         {{WM_KEYDOWN, hook/*|wparam*/|lparam, VK_SHIFT, LLKHF_EXTENDED},
519         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
520     {VK_SHIFT, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
521         {{VK_SHIFT, 0x80}, {VK_RSHIFT, 0x80}, {0}},
522         {{WM_KEYUP, hook/*|wparam*/|lparam, VK_SHIFT, LLKHF_UP|LLKHF_EXTENDED},
523         {WM_KEYUP, wparam|lparam, VK_SHIFT, KF_UP}, {0}}},
524
525     /* test L-CONTROL & R-CONTROL: */
526     /* RCONTROL == LCONTROL */
527     /* 28 */
528     {VK_RCONTROL, 0, 0,
529         {{VK_CONTROL, 0x00}, {VK_LCONTROL, 0x00}, {0}},
530         {{WM_KEYDOWN, hook|wparam, VK_RCONTROL},
531         {WM_KEYDOWN, wparam|lparam, VK_CONTROL, 0}, {0}}},
532     {VK_RCONTROL, KEYEVENTF_KEYUP, 0,
533         {{VK_CONTROL, 0x80}, {VK_LCONTROL, 0x80}, {0}},
534         {{WM_KEYUP, hook|wparam, VK_RCONTROL},
535         {WM_KEYUP, wparam|lparam, VK_CONTROL, KF_UP}, {0}}},
536     /* LCONTROL | KEYEVENTF_EXTENDEDKEY == RCONTROL */
537     /* 30 */
538     {VK_LCONTROL, KEYEVENTF_EXTENDEDKEY, 0,
539         {{VK_CONTROL, 0x00}, {VK_RCONTROL, 0x00}, {0}},
540         {{WM_KEYDOWN, hook|wparam|lparam, VK_LCONTROL, LLKHF_EXTENDED},
541         {WM_KEYDOWN, wparam|lparam, VK_CONTROL, KF_EXTENDED}, {0}}},
542     {VK_LCONTROL, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
543         {{VK_CONTROL, 0x80}, {VK_RCONTROL, 0x80}, {0}},
544         {{WM_KEYUP, hook|wparam|lparam, VK_LCONTROL, LLKHF_UP|LLKHF_EXTENDED},
545         {WM_KEYUP, wparam|lparam, VK_CONTROL, KF_UP|KF_EXTENDED}, {0}}},
546     /* RCONTROL | KEYEVENTF_EXTENDEDKEY == RCONTROL */
547     /* 32 */
548     {VK_RCONTROL, KEYEVENTF_EXTENDEDKEY, 0,
549         {{VK_CONTROL, 0x00}, {VK_RCONTROL, 0x00}, {0}},
550         {{WM_KEYDOWN, hook|wparam|lparam, VK_RCONTROL, LLKHF_EXTENDED},
551         {WM_KEYDOWN, wparam|lparam, VK_CONTROL, KF_EXTENDED}, {0}}},
552     {VK_RCONTROL, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
553         {{VK_CONTROL, 0x80}, {VK_RCONTROL, 0x80}, {0}},
554         {{WM_KEYUP, hook|wparam|lparam, VK_RCONTROL, LLKHF_UP|LLKHF_EXTENDED},
555         {WM_KEYUP, wparam|lparam, VK_CONTROL, KF_UP|KF_EXTENDED}, {0}}},
556     /* CONTROL == LCONTROL */
557     /* 34 */
558     {VK_CONTROL, 0, 0,
559         {{VK_CONTROL, 0x00}, {VK_LCONTROL, 0x00}, {0}},
560         {{WM_KEYDOWN, hook/*|wparam, VK_CONTROL*/},
561         {WM_KEYDOWN, wparam|lparam, VK_CONTROL, 0}, {0}}},
562     {VK_CONTROL, KEYEVENTF_KEYUP, 0,
563         {{VK_CONTROL, 0x80}, {VK_LCONTROL, 0x80}, {0}},
564         {{WM_KEYUP, hook/*|wparam, VK_CONTROL*/},
565         {WM_KEYUP, wparam|lparam, VK_CONTROL, KF_UP}, {0}}},
566     /* CONTROL | KEYEVENTF_EXTENDEDKEY == RCONTROL */
567     /* 36 */
568     {VK_CONTROL, KEYEVENTF_EXTENDEDKEY, 0,
569         {{VK_CONTROL, 0x00}, {VK_RCONTROL, 0x00}, {0}},
570         {{WM_KEYDOWN, hook/*|wparam*/|lparam, VK_CONTROL, LLKHF_EXTENDED},
571         {WM_KEYDOWN, wparam|lparam, VK_CONTROL, KF_EXTENDED}, {0}}},
572     {VK_CONTROL, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
573         {{VK_CONTROL, 0x80}, {VK_RCONTROL, 0x80}, {0}},
574         {{WM_KEYUP, hook/*|wparam*/|lparam, VK_CONTROL, LLKHF_UP|LLKHF_EXTENDED},
575         {WM_KEYUP, wparam|lparam, VK_CONTROL, KF_UP|KF_EXTENDED}, {0}}},
576
577     /* test L-MENU & R-MENU: */
578     /* RMENU == LMENU */
579     /* 38 */
580     {VK_RMENU, 0, 0,
581         {{VK_MENU, 0x00}, {VK_LMENU, 0x00}, {0}},
582         {{WM_SYSKEYDOWN, hook|wparam, VK_RMENU},
583         {WM_SYSKEYDOWN, wparam|lparam, VK_MENU, 0}, {0}}},
584     {VK_RMENU, KEYEVENTF_KEYUP, 1,
585         {{VK_MENU, 0x80}, {VK_LMENU, 0x80}, {0}},
586         {{WM_KEYUP, hook|wparam, VK_RMENU},
587         {WM_SYSKEYUP, wparam|lparam, VK_MENU, KF_UP},
588         {WM_SYSCOMMAND}, {0}}},
589     /* LMENU | KEYEVENTF_EXTENDEDKEY == RMENU */
590     /* 40 */
591     {VK_LMENU, KEYEVENTF_EXTENDEDKEY, 0,
592         {{VK_MENU, 0x00}, {VK_RMENU, 0x00}, {0}},
593         {{WM_SYSKEYDOWN, hook|wparam|lparam, VK_LMENU, LLKHF_EXTENDED},
594         {WM_SYSKEYDOWN, wparam|lparam, VK_MENU, KF_EXTENDED}, {0}}},
595     {VK_LMENU, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 1,
596         {{VK_MENU, 0x80}, {VK_RMENU, 0x80}, {0}},
597         {{WM_KEYUP, hook|wparam|lparam, VK_LMENU, LLKHF_UP|LLKHF_EXTENDED},
598         {WM_SYSKEYUP, wparam|lparam, VK_MENU, KF_UP|KF_EXTENDED},
599         {WM_SYSCOMMAND}, {0}}},
600     /* RMENU | KEYEVENTF_EXTENDEDKEY == RMENU */
601     /* 42 */
602     {VK_RMENU, KEYEVENTF_EXTENDEDKEY, 0,
603         {{VK_MENU, 0x00}, {VK_RMENU, 0x00}, {0}},
604         {{WM_SYSKEYDOWN, hook|wparam|lparam, VK_RMENU, LLKHF_EXTENDED},
605         {WM_SYSKEYDOWN, wparam|lparam, VK_MENU, KF_EXTENDED}, {0}}},
606     {VK_RMENU, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 1,
607         {{VK_MENU, 0x80}, {VK_RMENU, 0x80}, {0}},
608         {{WM_KEYUP, hook|wparam|lparam, VK_RMENU, LLKHF_UP|LLKHF_EXTENDED},
609         {WM_SYSKEYUP, wparam|lparam, VK_MENU, KF_UP|KF_EXTENDED},
610         {WM_SYSCOMMAND}, {0}}},
611     /* MENU == LMENU */
612     /* 44 */
613     {VK_MENU, 0, 0,
614         {{VK_MENU, 0x00}, {VK_LMENU, 0x00}, {0}},
615         {{WM_SYSKEYDOWN, hook/*|wparam, VK_MENU*/},
616         {WM_SYSKEYDOWN, wparam|lparam, VK_MENU, 0}, {0}}},
617     {VK_MENU, KEYEVENTF_KEYUP, 1,
618         {{VK_MENU, 0x80}, {VK_LMENU, 0x80}, {0}},
619         {{WM_KEYUP, hook/*|wparam, VK_MENU*/},
620         {WM_SYSKEYUP, wparam|lparam, VK_MENU, KF_UP},
621         {WM_SYSCOMMAND}, {0}}},
622     /* MENU | KEYEVENTF_EXTENDEDKEY == RMENU */
623     /* 46 */
624     {VK_MENU, KEYEVENTF_EXTENDEDKEY, 0,
625         {{VK_MENU, 0x00}, {VK_RMENU, 0x00}, {0}},
626         {{WM_SYSKEYDOWN, hook/*|wparam*/|lparam, VK_MENU, LLKHF_EXTENDED},
627         {WM_SYSKEYDOWN, wparam|lparam, VK_MENU, KF_EXTENDED}, {0}}},
628     {VK_MENU, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 1,
629         {{VK_MENU, 0x80}, {VK_RMENU, 0x80}, {0}},
630         {{WM_KEYUP, hook/*|wparam*/|lparam, VK_MENU, LLKHF_UP|LLKHF_EXTENDED},
631         {WM_SYSKEYUP, wparam|lparam, VK_MENU, KF_UP|KF_EXTENDED},
632         {WM_SYSCOMMAND}, {0}}},
633
634     /* test LSHIFT & RSHIFT */
635     /* 48 */
636     {VK_LSHIFT, 0, 0,
637         {{VK_SHIFT, 0x00}, {VK_LSHIFT, 0x00}, {0}},
638         {{WM_KEYDOWN, hook|wparam|lparam, VK_LSHIFT, 0},
639         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
640     {VK_RSHIFT, KEYEVENTF_EXTENDEDKEY, 0,
641         {{VK_RSHIFT, 0x00}, {0}},
642         {{WM_KEYDOWN, hook|wparam|lparam, VK_RSHIFT, LLKHF_EXTENDED},
643         {WM_KEYDOWN, wparam|lparam, VK_SHIFT, 0}, {0}}},
644     {VK_RSHIFT, KEYEVENTF_KEYUP | KEYEVENTF_EXTENDEDKEY, 0,
645         {{VK_RSHIFT, 0x80}, {0}},
646         {{WM_KEYUP, hook|wparam|lparam, VK_RSHIFT, LLKHF_UP|LLKHF_EXTENDED},
647         {WM_KEYUP, optional}, {0}}},
648     {VK_LSHIFT, KEYEVENTF_KEYUP, 0,
649         {{VK_SHIFT, 0x80}, {VK_LSHIFT, 0x80}, {0}},
650         {{WM_KEYUP, hook|wparam, VK_LSHIFT},
651         {WM_KEYUP, wparam|lparam, VK_SHIFT, KF_UP}, {0}}},
652
653     {0, 0, 0, {{0}}, {{0}}} /* end */
654 };
655
656 static struct message sent_messages[MAXKEYMESSAGES];
657 static UINT sent_messages_cnt;
658
659 /* Verify that only specified key state transitions occur */
660 static void compare_and_check(int id, BYTE *ks1, BYTE *ks2, struct sendinput_test_s *test)
661 {
662     int i, failcount = 0;
663     struct transition_s *t = test->expected_transitions;
664     UINT actual_cnt = 0;
665     const struct message *expected = test->expected_messages;
666
667     while (t->wVk) {
668         int matched = ((ks1[t->wVk]&0x80) == (t->before_state&0x80)
669                        && (ks2[t->wVk]&0x80) == (~t->before_state&0x80));
670
671         if (!matched && test->_todo_wine)
672         {
673             failcount++;
674             todo_wine {
675                 ok(matched, "%2d (%x/%x): %02x from %02x -> %02x "
676                    "instead of %02x -> %02x\n", id, test->wVk, test->dwFlags,
677                    t->wVk, ks1[t->wVk]&0x80, ks2[t->wVk]&0x80, t->before_state,
678                    ~t->before_state&0x80);
679             }
680         } else {
681             ok(matched || t->optional, "%2d (%x/%x): %02x from %02x -> %02x "
682                "instead of %02x -> %02x\n", id, test->wVk, test->dwFlags,
683                t->wVk, ks1[t->wVk]&0x80, ks2[t->wVk]&0x80, t->before_state,
684                ~t->before_state&0x80);
685         }
686         ks2[t->wVk] = ks1[t->wVk]; /* clear the match */
687         t++;
688     }
689     for (i = 0; i < 256; i++)
690         if (ks2[i] != ks1[i] && test->_todo_wine)
691         {
692             failcount++;
693             todo_wine
694                 ok(FALSE, "%2d (%x/%x): %02x from %02x -> %02x unexpected\n",
695                    id, test->wVk, test->dwFlags, i, ks1[i], ks2[i]);
696         }
697         else
698             ok(ks2[i] == ks1[i], "%2d (%x/%x): %02x from %02x -> %02x unexpected\n",
699                id, test->wVk, test->dwFlags, i, ks1[i], ks2[i]);
700
701     while (expected->message && actual_cnt < sent_messages_cnt)
702     {
703         const struct message *actual = &sent_messages[actual_cnt];
704
705         if (expected->message == actual->message)
706         {
707             ok((expected->flags & hook) == (actual->flags & hook),
708                "%2d (%x/%x): the msg 0x%04x should have been sent by a hook\n",
709                id, test->wVk, test->dwFlags, expected->message);
710
711             if (expected->flags & wparam)
712             {
713                 if (expected->wParam != actual->wParam && test->_todo_wine)
714                 {
715                     failcount++;
716                     todo_wine
717                         ok(FALSE, "%2d (%x/%x): in msg 0x%04x expecting wParam 0x%lx got 0x%lx\n",
718                            id, test->wVk, test->dwFlags, expected->message, expected->wParam, actual->wParam);
719                 }
720                 else
721                     ok(expected->wParam == actual->wParam,
722                        "%2d (%x/%x): in msg 0x%04x expecting wParam 0x%lx got 0x%lx\n",
723                        id, test->wVk, test->dwFlags, expected->message, expected->wParam, actual->wParam);
724             }
725             if (expected->flags & lparam)
726             {
727                 if (expected->lParam != actual->lParam && test->_todo_wine)
728                 {
729                     failcount++;
730                     todo_wine
731                         ok(FALSE, "%2d (%x/%x): in msg 0x%04x expecting lParam 0x%lx got 0x%lx\n",
732                            id, test->wVk, test->dwFlags, expected->message, expected->lParam, actual->lParam);
733                 }
734                 else
735                     ok(expected->lParam == actual->lParam,
736                        "%2d (%x/%x): in msg 0x%04x expecting lParam 0x%lx got 0x%lx\n",
737                        id, test->wVk, test->dwFlags, expected->message, expected->lParam, actual->lParam);
738             }
739         }
740         else if (expected->flags & optional)
741         {
742             expected++;
743             continue;
744         }
745         else if (test->_todo_wine)
746         {
747             failcount++;
748             todo_wine
749             ok(FALSE,
750                "%2d (%x/%x): the msg 0x%04x was expected, but got msg 0x%04x instead\n",
751                id, test->wVk, test->dwFlags, expected->message, actual->message);
752         }
753         else
754             ok(FALSE,
755                "%2d (%x/%x): the msg 0x%04x was expected, but got msg 0x%04x instead\n",
756                id, test->wVk, test->dwFlags, expected->message, actual->message);
757
758         actual_cnt++;
759         expected++;
760     }
761     /* skip all optional trailing messages */
762     while (expected->message && (expected->flags & optional))
763         expected++;
764
765
766     if (expected->message || actual_cnt < sent_messages_cnt)
767     {
768         if (test->_todo_wine)
769         {
770             failcount++;
771             todo_wine
772                 ok(FALSE, "%2d (%x/%x): the msg sequence is not complete: expected %04x - actual %04x\n",
773                    id, test->wVk, test->dwFlags, expected->message, sent_messages[actual_cnt].message);
774         }
775         else
776             ok(FALSE, "%2d (%x/%x): the msg sequence is not complete: expected %04x - actual %04x\n",
777                id, test->wVk, test->dwFlags, expected->message, sent_messages[actual_cnt].message);
778     }
779
780     if( test->_todo_wine && !failcount) /* succeeded yet marked todo */
781         todo_wine
782             ok(TRUE, "%2d (%x/%x): marked \"todo_wine\" but succeeds\n", id, test->wVk, test->dwFlags);
783
784     sent_messages_cnt = 0;
785 }
786
787 /* WndProc2 checks that we get at least the messages specified */
788 static LRESULT CALLBACK WndProc2(HWND hWnd, UINT Msg, WPARAM wParam,
789                                    LPARAM lParam)
790 {
791     if (winetest_debug > 1) trace("MSG:  %8x W:%8lx L:%8lx\n", Msg, wParam, lParam);
792
793     if (Msg != WM_PAINT &&
794         Msg != WM_NCPAINT &&
795         Msg != WM_SYNCPAINT &&
796         Msg != WM_ERASEBKGND &&
797         Msg != WM_NCHITTEST &&
798         Msg != WM_GETTEXT &&
799         Msg != WM_GETICON &&
800         Msg != WM_DEVICECHANGE)
801     {
802         sent_messages[sent_messages_cnt].message = Msg;
803         sent_messages[sent_messages_cnt].flags = 0;
804         sent_messages[sent_messages_cnt].wParam = wParam;
805         sent_messages[sent_messages_cnt++].lParam = HIWORD(lParam) & (KF_UP|KF_EXTENDED);
806     }
807     return DefWindowProc(hWnd, Msg, wParam, lParam);
808 }
809
810 static LRESULT CALLBACK hook_proc(int code, WPARAM wparam, LPARAM lparam)
811 {
812     KBDLLHOOKSTRUCT *hook_info = (KBDLLHOOKSTRUCT *)lparam;
813
814     if (code == HC_ACTION)
815     {
816         sent_messages[sent_messages_cnt].message = wparam;
817         sent_messages[sent_messages_cnt].flags = hook;
818         sent_messages[sent_messages_cnt].wParam = hook_info->vkCode;
819         sent_messages[sent_messages_cnt++].lParam = hook_info->flags & (LLKHF_UP|LLKHF_EXTENDED);
820
821 if(0) /* For some reason not stable on Wine */
822 {
823         if (wparam == WM_KEYDOWN || wparam == WM_SYSKEYDOWN)
824             ok(!(GetAsyncKeyState(hook_info->vkCode) & 0x8000), "key %x should be up\n", hook_info->vkCode);
825         else if (wparam == WM_KEYUP || wparam == WM_SYSKEYUP)
826             ok(GetAsyncKeyState(hook_info->vkCode) & 0x8000, "key %x should be down\n", hook_info->vkCode);
827 }
828
829         if (winetest_debug > 1)
830             trace("Hook:   w=%lx vk:%8x sc:%8x fl:%8x %lx\n", wparam,
831                   hook_info->vkCode, hook_info->scanCode, hook_info->flags, hook_info->dwExtraInfo);
832     }
833     return CallNextHookEx( 0, code, wparam, lparam );
834 }
835 static void test_Input_blackbox(void)
836 {
837     TEST_INPUT i;
838     int ii;
839     BYTE ks1[256], ks2[256];
840     LONG_PTR prevWndProc;
841     HWND window;
842     HHOOK hook;
843
844     if (!pSendInput)
845     {
846         skip("SendInput is not available\n");
847         return;
848     }
849
850     window = CreateWindow("Static", NULL, WS_POPUP|WS_HSCROLL|WS_VSCROLL
851         |WS_VISIBLE, 0, 0, 200, 60, NULL, NULL,
852         NULL, NULL);
853     ok(window != NULL, "error: %d\n", (int) GetLastError());
854
855     hook = SetWindowsHookExA(WH_KEYBOARD_LL, hook_proc, GetModuleHandleA( NULL ), 0);
856
857     /* must process all initial messages, otherwise X11DRV_KeymapNotify unsets
858      * key state set by SendInput(). */
859     empty_message_queue();
860
861     prevWndProc = SetWindowLongPtr(window, GWLP_WNDPROC, (LONG_PTR) WndProc2);
862     ok(prevWndProc != 0 || (prevWndProc == 0 && GetLastError() == 0),
863        "error: %d\n", (int) GetLastError());
864
865     i.type = INPUT_KEYBOARD;
866     i.u.ki.time = 0;
867     i.u.ki.dwExtraInfo = 0;
868
869     for (ii = 0; ii < sizeof(sendinput_test)/sizeof(struct sendinput_test_s)-1;
870          ii++) {
871         GetKeyboardState(ks1);
872         i.u.ki.wScan = ii+1 /* useful for debugging */;
873         i.u.ki.dwFlags = sendinput_test[ii].dwFlags;
874         i.u.ki.wVk = sendinput_test[ii].wVk;
875         pSendInput(1, (INPUT*)&i, sizeof(TEST_INPUT));
876         empty_message_queue();
877         GetKeyboardState(ks2);
878         compare_and_check(ii, ks1, ks2, &sendinput_test[ii]);
879     }
880
881     empty_message_queue();
882     DestroyWindow(window);
883     UnhookWindowsHookEx(hook);
884 }
885
886 static void test_keynames(void)
887 {
888     int i, len;
889     char buff[256];
890
891     for (i = 0; i < 512; i++)
892     {
893         strcpy(buff, "----");
894         len = GetKeyNameTextA(i << 16, buff, sizeof(buff));
895         ok(len || !buff[0], "%d: Buffer is not zeroed\n", i);
896     }
897 }
898
899 static POINT pt_old, pt_new;
900 static BOOL clipped;
901 #define STEP 20
902
903 static LRESULT CALLBACK hook_proc1( int code, WPARAM wparam, LPARAM lparam )
904 {
905     MSLLHOOKSTRUCT *hook = (MSLLHOOKSTRUCT *)lparam;
906     POINT pt, pt1;
907
908     if (code == HC_ACTION)
909     {
910         /* This is our new cursor position */
911         pt_new = hook->pt;
912         /* Should return previous position */
913         GetCursorPos(&pt);
914         ok(pt.x == pt_old.x && pt.y == pt_old.y, "GetCursorPos: (%d,%d)\n", pt.x, pt.y);
915
916         /* Should set new position until hook chain is finished. */
917         pt.x = pt_old.x + STEP;
918         pt.y = pt_old.y + STEP;
919         SetCursorPos(pt.x, pt.y);
920         GetCursorPos(&pt1);
921         if (clipped)
922             ok(pt1.x == pt_old.x && pt1.y == pt_old.y, "Wrong set pos: (%d,%d)\n", pt1.x, pt1.y);
923         else
924             ok(pt1.x == pt.x && pt1.y == pt.y, "Wrong set pos: (%d,%d)\n", pt1.x, pt1.y);
925     }
926     return CallNextHookEx( 0, code, wparam, lparam );
927 }
928
929 static LRESULT CALLBACK hook_proc2( int code, WPARAM wparam, LPARAM lparam )
930 {
931     MSLLHOOKSTRUCT *hook = (MSLLHOOKSTRUCT *)lparam;
932     POINT pt;
933
934     if (code == HC_ACTION)
935     {
936         ok(hook->pt.x == pt_new.x && hook->pt.y == pt_new.y,
937            "Wrong hook coords: (%d %d) != (%d,%d)\n", hook->pt.x, hook->pt.y, pt_new.x, pt_new.y);
938
939         /* Should match position set above */
940         GetCursorPos(&pt);
941         if (clipped)
942             ok(pt.x == pt_old.x && pt.y == pt_old.y, "GetCursorPos: (%d,%d)\n", pt.x, pt.y);
943         else
944             ok(pt.x == pt_old.x +STEP && pt.y == pt_old.y +STEP, "GetCursorPos: (%d,%d)\n", pt.x, pt.y);
945     }
946     return CallNextHookEx( 0, code, wparam, lparam );
947 }
948
949 static void test_mouse_ll_hook(void)
950 {
951     HWND hwnd;
952     HHOOK hook1, hook2;
953     POINT pt_org, pt;
954     RECT rc;
955
956     GetCursorPos(&pt_org);
957     hwnd = CreateWindow("static", "Title", WS_OVERLAPPEDWINDOW | WS_VISIBLE,
958                         10, 10, 200, 200, NULL, NULL, NULL, NULL);
959     SetCursorPos(100, 100);
960
961     hook2 = SetWindowsHookExA(WH_MOUSE_LL, hook_proc2, GetModuleHandleA(0), 0);
962     hook1 = SetWindowsHookExA(WH_MOUSE_LL, hook_proc1, GetModuleHandleA(0), 0);
963
964     GetCursorPos(&pt_old);
965     mouse_event(MOUSEEVENTF_MOVE, -STEP,  0, 0, 0);
966     GetCursorPos(&pt_old);
967     ok(pt_old.x == pt_new.x && pt_old.y == pt_new.y, "Wrong new pos: (%d,%d)\n", pt_old.x, pt_old.y);
968     mouse_event(MOUSEEVENTF_MOVE, +STEP,  0, 0, 0);
969     GetCursorPos(&pt_old);
970     ok(pt_old.x == pt_new.x && pt_old.y == pt_new.y, "Wrong new pos: (%d,%d)\n", pt_old.x, pt_old.y);
971     mouse_event(MOUSEEVENTF_MOVE,  0, -STEP, 0, 0);
972     GetCursorPos(&pt_old);
973     ok(pt_old.x == pt_new.x && pt_old.y == pt_new.y, "Wrong new pos: (%d,%d)\n", pt_old.x, pt_old.y);
974     mouse_event(MOUSEEVENTF_MOVE,  0, +STEP, 0, 0);
975     GetCursorPos(&pt_old);
976     ok(pt_old.x == pt_new.x && pt_old.y == pt_new.y, "Wrong new pos: (%d,%d)\n", pt_old.x, pt_old.y);
977
978     SetRect(&rc, 50, 50, 151, 151);
979     ClipCursor(&rc);
980     clipped = TRUE;
981
982     SetCursorPos(40, 40);
983     GetCursorPos(&pt_old);
984     ok(pt_old.x == 50 && pt_old.y == 50, "Wrong new pos: (%d,%d)\n", pt_new.x, pt_new.y);
985     SetCursorPos(160, 160);
986     GetCursorPos(&pt_old);
987     ok(pt_old.x == 150 && pt_old.y == 150, "Wrong new pos: (%d,%d)\n", pt_new.x, pt_new.y);
988     mouse_event(MOUSEEVENTF_MOVE, +STEP, +STEP, 0, 0);
989     GetCursorPos(&pt_old);
990     ok(pt_old.x == 150 && pt_old.y == 150, "Wrong new pos: (%d,%d)\n", pt_new.x, pt_new.y);
991
992     clipped = FALSE;
993     pt_new.x = pt_new.y = 150;
994     ClipCursor(NULL);
995     UnhookWindowsHookEx(hook1);
996
997     /* Now check that mouse buttons do not change mouse position
998        if we don't have MOUSEEVENTF_MOVE flag specified. */
999
1000     /* We reusing the same hook callback, so make it happy */
1001     pt_old.x = pt_new.x - STEP;
1002     pt_old.y = pt_new.y - STEP;
1003     mouse_event(MOUSEEVENTF_LEFTUP, 123, 456, 0, 0);
1004     GetCursorPos(&pt);
1005     ok(pt.x == pt_new.x && pt.y == pt_new.y, "Position changed: (%d,%d)\n", pt.x, pt.y);
1006     mouse_event(MOUSEEVENTF_RIGHTUP, 456, 123, 0, 0);
1007     GetCursorPos(&pt);
1008     ok(pt.x == pt_new.x && pt.y == pt_new.y, "Position changed: (%d,%d)\n", pt.x, pt.y);
1009
1010     mouse_event(MOUSEEVENTF_LEFTUP | MOUSEEVENTF_ABSOLUTE, 123, 456, 0, 0);
1011     GetCursorPos(&pt);
1012     ok(pt.x == pt_new.x && pt.y == pt_new.y, "Position changed: (%d,%d)\n", pt.x, pt.y);
1013     mouse_event(MOUSEEVENTF_RIGHTUP | MOUSEEVENTF_ABSOLUTE, 456, 123, 0, 0);
1014     GetCursorPos(&pt);
1015     ok(pt.x == pt_new.x && pt.y == pt_new.y, "Position changed: (%d,%d)\n", pt.x, pt.y);
1016
1017     UnhookWindowsHookEx(hook2);
1018     DestroyWindow(hwnd);
1019     SetCursorPos(pt_org.x, pt_org.y);
1020 }
1021
1022 static void test_GetMouseMovePointsEx(void)
1023 {
1024 #define BUFLIM  64
1025 #define MYERROR 0xdeadbeef
1026     int count, retval;
1027     MOUSEMOVEPOINT in;
1028     MOUSEMOVEPOINT out[200];
1029     POINT point;
1030
1031     /* Get a valid content for the input struct */
1032     if(!GetCursorPos(&point)) {
1033         skip("GetCursorPos() failed with error %u\n", GetLastError());
1034         return;
1035     }
1036     memset(&in, 0, sizeof(MOUSEMOVEPOINT));
1037     in.x = point.x;
1038     in.y = point.y;
1039
1040     /* test first parameter
1041      * everything different than sizeof(MOUSEMOVEPOINT)
1042      * is expected to fail with ERROR_INVALID_PARAMETER
1043      */
1044     SetLastError(MYERROR);
1045     retval = pGetMouseMovePointsEx(0, &in, out, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1046     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1047     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1048        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1049
1050     SetLastError(MYERROR);
1051     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT)-1, &in, out, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1052     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1053     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1054        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1055
1056     SetLastError(MYERROR);
1057     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT)+1, &in, out, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1058     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1059     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1060        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1061
1062     /* test second and third parameter
1063      */
1064     SetLastError(MYERROR);
1065     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), NULL, out, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1066     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1067     ok(GetLastError() == ERROR_NOACCESS || GetLastError() == MYERROR,
1068        "expected error ERROR_NOACCESS, got %u\n", GetLastError());
1069
1070     SetLastError(MYERROR);
1071     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, NULL, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1072     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1073     ok(ERROR_NOACCESS == GetLastError(),
1074        "expected error ERROR_NOACCESS, got %u\n", GetLastError());
1075
1076     SetLastError(MYERROR);
1077     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), NULL, NULL, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1078     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1079     ok(ERROR_NOACCESS == GetLastError(),
1080        "expected error ERROR_NOACCESS, got %u\n", GetLastError());
1081
1082     SetLastError(MYERROR);
1083     count = 0;
1084     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, NULL, count, GMMP_USE_DISPLAY_POINTS);
1085     todo_wine {
1086     ok(retval == count, "expected GetMouseMovePointsEx to succeed, got %d\n", retval);
1087     ok(MYERROR == GetLastError(),
1088        "expected error %d, got %u\n", MYERROR, GetLastError());
1089     }
1090
1091     /* test fourth parameter
1092      * a value higher than 64 is expected to fail with ERROR_INVALID_PARAMETER
1093      */
1094     SetLastError(MYERROR);
1095     count = -1;
1096     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, out, count, GMMP_USE_DISPLAY_POINTS);
1097     ok(retval == count, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1098     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1099        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1100
1101     SetLastError(MYERROR);
1102     count = 0;
1103     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, out, count, GMMP_USE_DISPLAY_POINTS);
1104     todo_wine {
1105     ok(retval == count, "expected GetMouseMovePointsEx to succeed, got %d\n", retval);
1106     ok(MYERROR == GetLastError(),
1107        "expected error %d, got %u\n", MYERROR, GetLastError());
1108     }
1109
1110     SetLastError(MYERROR);
1111     count = BUFLIM;
1112     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, out, count, GMMP_USE_DISPLAY_POINTS);
1113     todo_wine {
1114     ok((0 <= retval) && (retval <= count), "expected GetMouseMovePointsEx to succeed, got %d\n", retval);
1115     ok(MYERROR == GetLastError(),
1116        "expected error %d, got %u\n", MYERROR, GetLastError());
1117     }
1118
1119     SetLastError(MYERROR);
1120     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, out, BUFLIM+1, GMMP_USE_DISPLAY_POINTS);
1121     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1122     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1123        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1124
1125     /* it was not possible to force an error with the fifth parameter on win2k */
1126
1127     /* test combinations of wrong parameters to see which error wins */
1128     SetLastError(MYERROR);
1129     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT)-1, NULL, out, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1130     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1131     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1132        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1133
1134     SetLastError(MYERROR);
1135     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT)-1, &in, NULL, BUFLIM, GMMP_USE_DISPLAY_POINTS);
1136     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1137     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1138        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1139
1140     SetLastError(MYERROR);
1141     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), NULL, out, BUFLIM+1, GMMP_USE_DISPLAY_POINTS);
1142     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1143     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1144        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1145
1146     SetLastError(MYERROR);
1147     retval = pGetMouseMovePointsEx(sizeof(MOUSEMOVEPOINT), &in, NULL, BUFLIM+1, GMMP_USE_DISPLAY_POINTS);
1148     ok(retval == -1, "expected GetMouseMovePointsEx to fail, got %d\n", retval);
1149     ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == MYERROR,
1150        "expected error ERROR_INVALID_PARAMETER, got %u\n", GetLastError());
1151
1152 #undef BUFLIM
1153 #undef MYERROR
1154 }
1155
1156 static void test_key_map(void)
1157 {
1158     HKL kl = GetKeyboardLayout(0);
1159     UINT kL, kR, s, sL;
1160     int i;
1161     static const UINT numpad_collisions[][2] = {
1162         { VK_NUMPAD0, VK_INSERT },
1163         { VK_NUMPAD1, VK_END },
1164         { VK_NUMPAD2, VK_DOWN },
1165         { VK_NUMPAD3, VK_NEXT },
1166         { VK_NUMPAD4, VK_LEFT },
1167         { VK_NUMPAD6, VK_RIGHT },
1168         { VK_NUMPAD7, VK_HOME },
1169         { VK_NUMPAD8, VK_UP },
1170         { VK_NUMPAD9, VK_PRIOR },
1171     };
1172
1173     s  = MapVirtualKeyEx(VK_SHIFT,  MAPVK_VK_TO_VSC, kl);
1174     ok(s != 0, "MapVirtualKeyEx(VK_SHIFT) should return non-zero\n");
1175     sL = MapVirtualKeyEx(VK_LSHIFT, MAPVK_VK_TO_VSC, kl);
1176     ok(s == sL, "%x != %x\n", s, sL);
1177
1178     kL = MapVirtualKeyEx(0x2a, MAPVK_VSC_TO_VK, kl);
1179     ok(kL == VK_SHIFT, "Scan code -> vKey = %x (not VK_SHIFT)\n", kL);
1180     kR = MapVirtualKeyEx(0x36, MAPVK_VSC_TO_VK, kl);
1181     ok(kR == VK_SHIFT, "Scan code -> vKey = %x (not VK_SHIFT)\n", kR);
1182
1183     kL = MapVirtualKeyEx(0x2a, MAPVK_VSC_TO_VK_EX, kl);
1184     ok(kL == VK_LSHIFT, "Scan code -> vKey = %x (not VK_LSHIFT)\n", kL);
1185     kR = MapVirtualKeyEx(0x36, MAPVK_VSC_TO_VK_EX, kl);
1186     ok(kR == VK_RSHIFT, "Scan code -> vKey = %x (not VK_RSHIFT)\n", kR);
1187
1188     /* test that MAPVK_VSC_TO_VK prefers the non-numpad vkey if there's ambiguity */
1189     for (i = 0; i < sizeof(numpad_collisions)/sizeof(numpad_collisions[0]); i++)
1190     {
1191         UINT numpad_scan = MapVirtualKeyEx(numpad_collisions[i][0],  MAPVK_VK_TO_VSC, kl);
1192         UINT other_scan  = MapVirtualKeyEx(numpad_collisions[i][1],  MAPVK_VK_TO_VSC, kl);
1193
1194         /* do they really collide for this layout? */
1195         if (numpad_scan && other_scan == numpad_scan)
1196         {
1197             UINT vkey = MapVirtualKeyEx(numpad_scan, MAPVK_VSC_TO_VK, kl);
1198             ok(vkey != numpad_collisions[i][0],
1199                "Got numpad vKey %x for scan code %x when there was another choice\n",
1200                vkey, numpad_scan);
1201         }
1202     }
1203 }
1204
1205 static void test_ToUnicode(void)
1206 {
1207     WCHAR wStr[2];
1208     BYTE state[256];
1209     const BYTE SC_RETURN = 0x1c, SC_TAB = 0x0f;
1210     const BYTE HIGHEST_BIT = 0x80;
1211     int i, ret;
1212     for(i=0; i<256; i++)
1213         state[i]=0;
1214
1215     SetLastError(0xdeadbeef);
1216     ret = ToUnicode(VK_RETURN, SC_RETURN, state, wStr, 2, 0);
1217     if (!ret && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
1218     {
1219         skip("ToUnicode is not implemented\n");
1220         return;
1221     }
1222
1223     ok(ret == 1, "ToUnicode for Return key didn't return 1 (was %i)\n", ret);
1224     if(ret == 1)
1225         ok(wStr[0]=='\r', "ToUnicode for CTRL + Return was %i (expected 13)\n", wStr[0]);
1226     state[VK_CONTROL] |= HIGHEST_BIT;
1227     state[VK_LCONTROL] |= HIGHEST_BIT;
1228
1229     ret = ToUnicode(VK_TAB, SC_TAB, state, wStr, 2, 0);
1230     todo_wine ok(ret == 0, "ToUnicode for CTRL + Tab didn't return 0 (was %i)\n", ret);
1231
1232     ret = ToUnicode(VK_RETURN, SC_RETURN, state, wStr, 2, 0);
1233     ok(ret == 1, "ToUnicode for CTRL + Return didn't return 1 (was %i)\n", ret);
1234     if(ret == 1)
1235         ok(wStr[0]=='\n', "ToUnicode for CTRL + Return was %i (expected 10)\n", wStr[0]);
1236
1237     state[VK_SHIFT] |= HIGHEST_BIT;
1238     state[VK_LSHIFT] |= HIGHEST_BIT;
1239     ret = ToUnicode(VK_RETURN, SC_RETURN, state, wStr, 2, 0);
1240     todo_wine ok(ret == 0, "ToUnicode for CTRL + SHIFT + Return didn't return 0 (was %i)\n", ret);
1241 }
1242
1243 START_TEST(input)
1244 {
1245     init_function_pointers();
1246
1247     if (!pSendInput)
1248         skip("SendInput is not available\n");
1249     else
1250         test_Input_whitebox();
1251
1252     test_Input_blackbox();
1253     test_keynames();
1254     test_mouse_ll_hook();
1255     test_key_map();
1256     test_ToUnicode();
1257
1258     if(pGetMouseMovePointsEx)
1259         test_GetMouseMovePointsEx();
1260     else
1261         skip("GetMouseMovePointsEx is not available\n");
1262 }