0d358c2ad9bcf7578e068f76f6e23eb5e14cfee0
[reactos.git] / modules / rostests / winetests / user32 / class.c
1 /* Unit test suite for window classes.
2 *
3 * Copyright 2002 Mike McCormack
4 * Copyright 2003 Alexandre Julliard
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include "precomp.h"
22
23 #include <commctrl.h>
24
25 #define NUMCLASSWORDS 4
26
27 #define IS_WNDPROC_HANDLE(x) (((ULONG_PTR)(x) >> 16) == (~0u >> 16))
28
29 static LRESULT WINAPI ClassTest_WndProc (HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
30 {
31 if (msg == WM_NCCREATE) return 1;
32 return DefWindowProcW (hWnd, msg, wParam, lParam);
33 }
34
35 static LRESULT WINAPI ClassTest_WndProc2 (HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
36 {
37 if (msg == WM_NCCREATE) return 1;
38 return DefWindowProcA (hWnd, msg, wParam, lParam);
39 }
40
41 /***********************************************************************
42 */
43 static void ClassTest(HINSTANCE hInstance, BOOL global)
44 {
45 WNDCLASSW cls, wc;
46 static const WCHAR className[] = {'T','e','s','t','C','l','a','s','s',0};
47 static const WCHAR winName[] = {'W','i','n','C','l','a','s','s','T','e','s','t',0};
48 ATOM test_atom;
49 HWND hTestWnd;
50 LONG i;
51 WCHAR str[20];
52 ATOM classatom;
53
54 cls.style = CS_HREDRAW | CS_VREDRAW | (global?CS_GLOBALCLASS:0);
55 cls.lpfnWndProc = ClassTest_WndProc;
56 cls.cbClsExtra = NUMCLASSWORDS*sizeof(DWORD);
57 cls.cbWndExtra = 12;
58 cls.hInstance = hInstance;
59 cls.hIcon = LoadIconW (0, (LPWSTR)IDI_APPLICATION);
60 cls.hCursor = LoadCursorW (0, (LPWSTR)IDC_ARROW);
61 cls.hbrBackground = GetStockObject (WHITE_BRUSH);
62 cls.lpszMenuName = 0;
63 cls.lpszClassName = className;
64
65 classatom=RegisterClassW(&cls);
66 if (!classatom && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
67 return;
68 ok(classatom, "failed to register class\n");
69
70 ok(!RegisterClassW (&cls),
71 "RegisterClass of the same class should fail for the second time\n");
72
73 /* Setup windows */
74 hTestWnd = CreateWindowW (className, winName,
75 WS_OVERLAPPEDWINDOW + WS_HSCROLL + WS_VSCROLL,
76 CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, 0,
77 0, hInstance, 0);
78
79 ok(hTestWnd!=0, "Failed to create window\n");
80
81 /* test initial values of valid classwords */
82 for(i=0; i<NUMCLASSWORDS; i++)
83 {
84 SetLastError(0);
85 ok(!GetClassLongW(hTestWnd,i*sizeof (DWORD)),
86 "GetClassLongW initial value nonzero!\n");
87 ok(!GetLastError(),
88 "GetClassLongW failed!\n");
89 }
90
91 if (0)
92 {
93 /*
94 * GetClassLongW(hTestWnd, NUMCLASSWORDS*sizeof(DWORD))
95 * does not fail on Win 98, though MSDN says it should
96 */
97 SetLastError(0);
98 GetClassLongW(hTestWnd, NUMCLASSWORDS*sizeof(DWORD));
99 ok(GetLastError(),
100 "GetClassLongW() with invalid offset did not fail\n");
101 }
102
103 /* set values of valid class words */
104 for(i=0; i<NUMCLASSWORDS; i++)
105 {
106 SetLastError(0);
107 ok(!SetClassLongW(hTestWnd,i*sizeof(DWORD),i+1),
108 "GetClassLongW(%d) initial value nonzero!\n",i);
109 ok(!GetLastError(),
110 "SetClassLongW(%d) failed!\n",i);
111 }
112
113 /* test values of valid classwords that we set */
114 for(i=0; i<NUMCLASSWORDS; i++)
115 {
116 SetLastError(0);
117 ok( (i+1) == GetClassLongW(hTestWnd,i*sizeof (DWORD)),
118 "GetClassLongW value doesn't match what was set!\n");
119 ok(!GetLastError(),
120 "GetClassLongW failed!\n");
121 }
122
123 /* check GetClassName */
124 i = GetClassNameW(hTestWnd, str, sizeof(str)/sizeof(str[0]));
125 ok(i == lstrlenW(className),
126 "GetClassName returned incorrect length\n");
127 ok(!lstrcmpW(className,str),
128 "GetClassName returned incorrect name for this window's class\n");
129
130 /* check GetClassInfo with our hInstance */
131 if((test_atom = GetClassInfoW(hInstance, str, &wc)))
132 {
133 ok(test_atom == classatom,
134 "class atom did not match\n");
135 ok(wc.cbClsExtra == cls.cbClsExtra,
136 "cbClsExtra did not match\n");
137 ok(wc.cbWndExtra == cls.cbWndExtra,
138 "cbWndExtra did not match\n");
139 ok(wc.hbrBackground == cls.hbrBackground,
140 "hbrBackground did not match\n");
141 ok(wc.hCursor== cls.hCursor,
142 "hCursor did not match\n");
143 ok(wc.hInstance== cls.hInstance,
144 "hInstance did not match\n");
145 }
146 else
147 ok(FALSE,"GetClassInfo (hinstance) failed!\n");
148
149 /* check GetClassInfo with zero hInstance */
150 if(global)
151 {
152 if((test_atom = GetClassInfoW(0, str, &wc)))
153 {
154 ok(test_atom == classatom,
155 "class atom did not match %x != %x\n", test_atom, classatom);
156 ok(wc.cbClsExtra == cls.cbClsExtra,
157 "cbClsExtra did not match %x!=%x\n",wc.cbClsExtra,cls.cbClsExtra);
158 ok(wc.cbWndExtra == cls.cbWndExtra,
159 "cbWndExtra did not match %x!=%x\n",wc.cbWndExtra,cls.cbWndExtra);
160 ok(wc.hbrBackground == cls.hbrBackground,
161 "hbrBackground did not match %p!=%p\n",wc.hbrBackground,cls.hbrBackground);
162 ok(wc.hCursor== cls.hCursor,
163 "hCursor did not match %p!=%p\n",wc.hCursor,cls.hCursor);
164 ok(!wc.hInstance,
165 "hInstance not zero for global class %p\n",wc.hInstance);
166 }
167 else
168 ok(FALSE,"GetClassInfo (0) failed for global class!\n");
169 }
170 else
171 {
172 ok(!GetClassInfoW(0, str, &wc),
173 "GetClassInfo (0) succeeded for local class!\n");
174 }
175
176 ok(!UnregisterClassW(className, hInstance),
177 "Unregister class succeeded with window existing\n");
178
179 ok(DestroyWindow(hTestWnd),
180 "DestroyWindow() failed!\n");
181
182 ok(UnregisterClassW(className, hInstance),
183 "UnregisterClass() failed\n");
184
185 return;
186 }
187
188 static void check_style( const char *name, int must_exist, UINT style, UINT ignore )
189 {
190 WNDCLASSA wc;
191
192 if (GetClassInfoA( 0, name, &wc ))
193 {
194 ok( !(~wc.style & style & ~ignore), "System class %s is missing bits %x (%08x/%08x)\n",
195 name, ~wc.style & style, wc.style, style );
196 ok( !(wc.style & ~style), "System class %s has extra bits %x (%08x/%08x)\n",
197 name, wc.style & ~style, wc.style, style );
198 }
199 else
200 ok( !must_exist, "System class %s does not exist\n", name );
201 }
202
203 /* test styles of system classes */
204 static void test_styles(void)
205 {
206 /* check style bits */
207 check_style( "Button", 1, CS_PARENTDC | CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW, 0 );
208 check_style( "ComboBox", 1, CS_PARENTDC | CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW, 0 );
209 check_style( "Edit", 1, CS_PARENTDC | CS_DBLCLKS, 0 );
210 check_style( "ListBox", 1, CS_PARENTDC | CS_DBLCLKS, CS_PARENTDC /*FIXME*/ );
211 check_style( "MDIClient", 1, 0, 0 );
212 check_style( "ScrollBar", 1, CS_PARENTDC | CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW, 0 );
213 check_style( "Static", 1, CS_PARENTDC | CS_DBLCLKS, 0 );
214 check_style( "ComboLBox", 1, CS_SAVEBITS | CS_DBLCLKS, 0 );
215 check_style( "DDEMLEvent", 0, 0, 0 );
216 check_style( "Message", 0, 0, 0 );
217 check_style( "#32768", 1, CS_DROPSHADOW | CS_SAVEBITS | CS_DBLCLKS, CS_DROPSHADOW ); /* menu */
218 check_style( "#32769", 1, CS_DBLCLKS, 0 ); /* desktop */
219 check_style( "#32770", 1, CS_SAVEBITS | CS_DBLCLKS, 0 ); /* dialog */
220 todo_wine { check_style( "#32771", 1, CS_SAVEBITS | CS_HREDRAW | CS_VREDRAW, 0 ); } /* task switch */
221 check_style( "#32772", 1, 0, 0 ); /* icon title */
222 }
223
224 static void check_class_(int line, HINSTANCE inst, const char *name, const char *menu_name)
225 {
226 WNDCLASSA wc;
227 UINT atom = GetClassInfoA(inst,name,&wc);
228 ok_(__FILE__,line)( atom, "Class %s %p not found\n", name, inst );
229 if (atom)
230 {
231 if (wc.lpszMenuName && menu_name)
232 ok_(__FILE__,line)( !strcmp( menu_name, wc.lpszMenuName ),
233 "Wrong name %s/%s for class %s %p\n",
234 wc.lpszMenuName, menu_name, name, inst );
235 else
236 ok_(__FILE__,line)( !menu_name == !wc.lpszMenuName, "Wrong name %p/%p for class %s %p\n",
237 wc.lpszMenuName, menu_name, name, inst );
238 }
239 }
240 #define check_class(inst,name,menu) check_class_(__LINE__,inst,name,menu)
241
242 static void check_instance_( int line, const char *name, HINSTANCE inst,
243 HINSTANCE info_inst, HINSTANCE gcl_inst )
244 {
245 WNDCLASSA wc;
246 HWND hwnd;
247
248 ok_(__FILE__,line)( GetClassInfoA( inst, name, &wc ), "Couldn't find class %s inst %p\n", name, inst );
249 ok_(__FILE__,line)( wc.hInstance == info_inst, "Wrong info instance %p/%p for class %s\n",
250 wc.hInstance, info_inst, name );
251 hwnd = CreateWindowExA( 0, name, "test_window", 0, 0, 0, 0, 0, 0, 0, inst, 0 );
252 ok_(__FILE__,line)( hwnd != NULL, "Couldn't create window for class %s inst %p\n", name, inst );
253 ok_(__FILE__,line)( (HINSTANCE)GetClassLongPtrA( hwnd, GCLP_HMODULE ) == gcl_inst,
254 "Wrong GCL instance %p/%p for class %s\n",
255 (HINSTANCE)GetClassLongPtrA( hwnd, GCLP_HMODULE ), gcl_inst, name );
256 ok_(__FILE__,line)( (HINSTANCE)GetWindowLongPtrA( hwnd, GWLP_HINSTANCE ) == inst,
257 "Wrong GWL instance %p/%p for window %s\n",
258 (HINSTANCE)GetWindowLongPtrA( hwnd, GWLP_HINSTANCE ), inst, name );
259 ok_(__FILE__,line)(!UnregisterClassA(name, inst),
260 "UnregisterClassA should fail while exists a class window\n");
261 ok_(__FILE__,line)(GetLastError() == ERROR_CLASS_HAS_WINDOWS,
262 "GetLastError() should be set to ERROR_CLASS_HAS_WINDOWS not %d\n", GetLastError());
263 DestroyWindow(hwnd);
264 }
265 #define check_instance(name,inst,info_inst,gcl_inst) check_instance_(__LINE__,name,inst,info_inst,gcl_inst)
266
267 struct class_info
268 {
269 const char *name;
270 HINSTANCE inst, info_inst, gcl_inst;
271 };
272
273 static DWORD WINAPI thread_proc(void *param)
274 {
275 struct class_info *class_info = param;
276
277 check_instance(class_info->name, class_info->inst, class_info->info_inst, class_info->gcl_inst);
278
279 return 0;
280 }
281
282 static void check_thread_instance( const char *name, HINSTANCE inst, HINSTANCE info_inst, HINSTANCE gcl_inst )
283 {
284 HANDLE hThread;
285 DWORD tid;
286 struct class_info class_info;
287
288 class_info.name = name;
289 class_info.inst = inst;
290 class_info.info_inst = info_inst;
291 class_info.gcl_inst = gcl_inst;
292
293 hThread = CreateThread(NULL, 0, thread_proc, &class_info, 0, &tid);
294 ok(hThread != NULL, "CreateThread failed, error %d\n", GetLastError());
295 ok(WaitForSingleObject(hThread, INFINITE) == WAIT_OBJECT_0, "WaitForSingleObject failed\n");
296 CloseHandle(hThread);
297 }
298
299 /* test various instance parameters */
300 static void test_instances(void)
301 {
302 WNDCLASSA cls, wc;
303 WNDCLASSEXA wcexA;
304 HWND hwnd, hwnd2;
305 const char *name = "__test__";
306 HINSTANCE kernel32 = GetModuleHandleA("kernel32");
307 HINSTANCE user32 = GetModuleHandleA("user32");
308 HINSTANCE main_module = GetModuleHandleA(NULL);
309 HINSTANCE zero_instance = 0;
310 DWORD r;
311 char buffer[0x10];
312
313 memset( &cls, 0, sizeof(cls) );
314 cls.style = CS_HREDRAW | CS_VREDRAW;
315 cls.lpfnWndProc = ClassTest_WndProc;
316 cls.cbClsExtra = 0;
317 cls.cbWndExtra = 0;
318 cls.lpszClassName = name;
319
320 cls.lpszMenuName = "main_module";
321 cls.hInstance = main_module;
322
323 ok( RegisterClassA( &cls ), "Failed to register local class for main module\n" );
324 check_class( main_module, name, "main_module" );
325 check_instance( name, main_module, main_module, main_module );
326 check_thread_instance( name, main_module, main_module, main_module );
327
328 cls.lpszMenuName = "kernel32";
329 cls.hInstance = kernel32;
330 ok( RegisterClassA( &cls ), "Failed to register local class for kernel32\n" );
331 check_class( kernel32, name, "kernel32" );
332 check_class( main_module, name, "main_module" );
333 check_instance( name, kernel32, kernel32, kernel32 );
334 check_thread_instance( name, kernel32, kernel32, kernel32 );
335 ok( UnregisterClassA( name, kernel32 ), "Unregister failed for kernel32\n" );
336
337 ZeroMemory(&wcexA, sizeof(wcexA));
338 wcexA.lpfnWndProc = DefWindowProcA;
339 wcexA.lpszClassName = "__classex_test__";
340 SetLastError(0xdeadbeef);
341 wcexA.cbSize = sizeof(wcexA) - 1;
342 ok( ((RegisterClassExA( &wcexA ) == 0) && (GetLastError() == ERROR_INVALID_PARAMETER)),
343 "Succeeded with invalid number of cbSize bytes\n");
344 SetLastError(0xdeadbeef);
345 wcexA.cbSize = sizeof(wcexA) + 1;
346 ok( ((RegisterClassExA( &wcexA ) == 0) && (GetLastError() == ERROR_INVALID_PARAMETER)),
347 "Succeeded with invalid number of cbSize bytes\n");
348 SetLastError(0xdeadbeef);
349 wcexA.cbSize = sizeof(wcexA);
350 ok( RegisterClassExA( &wcexA ), "Failed with valid number of cbSize bytes\n");
351 wcexA.cbSize = 0xdeadbeef;
352 ok( GetClassInfoExA(main_module, wcexA.lpszClassName, &wcexA), "GetClassInfoEx failed\n");
353 ok( wcexA.cbSize == 0xdeadbeef, "GetClassInfoEx returned wrong cbSize value %d\n", wcexA.cbSize);
354 UnregisterClassA(wcexA.lpszClassName, main_module);
355
356 /* Bug 2631 - Supplying an invalid number of bytes fails */
357 cls.cbClsExtra = 0;
358 cls.cbWndExtra = -1;
359 SetLastError(0xdeadbeef);
360 ok( ((RegisterClassA( &cls ) == 0) && (GetLastError() == ERROR_INVALID_PARAMETER)),
361 "Failed with invalid number of WndExtra bytes\n");
362
363 cls.cbClsExtra = -1;
364 cls.cbWndExtra = 0;
365 SetLastError(0xdeadbeef);
366 ok( ((RegisterClassA( &cls ) == 0) && (GetLastError() == ERROR_INVALID_PARAMETER)),
367 "Failed with invalid number of ClsExtra bytes\n");
368
369 cls.cbClsExtra = -1;
370 cls.cbWndExtra = -1;
371 SetLastError(0xdeadbeef);
372 ok( ((RegisterClassA( &cls ) == 0) && (GetLastError() == ERROR_INVALID_PARAMETER)),
373 "Failed with invalid number of ClsExtra and cbWndExtra bytes\n");
374
375 cls.cbClsExtra = 0;
376 cls.cbWndExtra = 0;
377 SetLastError(0xdeadbeef);
378
379 /* setting global flag doesn't change status of class */
380 hwnd = CreateWindowExA( 0, name, "test", 0, 0, 0, 0, 0, 0, 0, main_module, 0 );
381 ok( hwnd != 0, "CreateWindow failed error %u\n", GetLastError());
382 SetClassLongA( hwnd, GCL_STYLE, CS_GLOBALCLASS );
383 cls.lpszMenuName = "kernel32";
384 cls.hInstance = kernel32;
385 ok( RegisterClassA( &cls ), "Failed to register local class for kernel32\n" );
386 check_class( kernel32, name, "kernel32" );
387 check_class( main_module, name, "main_module" );
388 check_instance( name, kernel32, kernel32, kernel32 );
389 check_instance( name, main_module, main_module, main_module );
390 check_thread_instance( name, kernel32, kernel32, kernel32 );
391 check_thread_instance( name, main_module, main_module, main_module );
392 ok( UnregisterClassA( name, kernel32 ), "Unregister failed for kernel32\n" );
393
394 /* changing the instance doesn't make it global */
395 SetClassLongPtrA( hwnd, GCLP_HMODULE, 0 );
396 ok( RegisterClassA( &cls ), "Failed to register local class for kernel32\n" );
397 check_class( kernel32, name, "kernel32" );
398 check_instance( name, kernel32, kernel32, kernel32 );
399 check_thread_instance( name, kernel32, kernel32, kernel32 );
400 ok( !GetClassInfoA( 0, name, &wc ), "Class found with null instance\n" );
401 ok( UnregisterClassA( name, kernel32 ), "Unregister failed for kernel32\n" );
402
403 /* GetClassInfo with instance 0 finds user32 instance */
404 SetClassLongPtrA( hwnd, GCLP_HMODULE, (LONG_PTR)user32 );
405 ok( RegisterClassA( &cls ), "Failed to register local class for kernel32\n" );
406 if (!GetClassInfoA( 0, name, &wc )) zero_instance = user32; /* instance 0 not supported on wow64 */
407 else
408 {
409 check_instance( name, 0, 0, kernel32 );
410 check_thread_instance( name, 0, 0, kernel32 );
411 }
412 check_class( kernel32, name, "kernel32" );
413 check_class( user32, name, "main_module" );
414 check_class( zero_instance, name, "main_module" );
415 check_instance( name, kernel32, kernel32, kernel32 );
416 check_instance( name, user32, zero_instance, user32 );
417 check_thread_instance( name, kernel32, kernel32, kernel32 );
418 check_thread_instance( name, user32, zero_instance, user32 );
419 ok( UnregisterClassA( name, kernel32 ), "Unregister failed for kernel32\n" );
420
421 SetClassLongPtrA( hwnd, GCLP_HMODULE, 0x12345678 );
422 ok( RegisterClassA( &cls ), "Failed to register local class for kernel32\n" );
423 check_class( kernel32, name, "kernel32" );
424 check_class( (HINSTANCE)0x12345678, name, "main_module" );
425 check_instance( name, kernel32, kernel32, kernel32 );
426 check_instance( name, (HINSTANCE)0x12345678, (HINSTANCE)0x12345678, (HINSTANCE)0x12345678 );
427 check_thread_instance( name, kernel32, kernel32, kernel32 );
428 check_thread_instance( name, (HINSTANCE)0x12345678, (HINSTANCE)0x12345678, (HINSTANCE)0x12345678 );
429 ok( !GetClassInfoA( 0, name, &wc ), "Class found with null instance\n" );
430
431 /* creating a window with instance 0 uses the first class found */
432 cls.hInstance = (HINSTANCE)0xdeadbeef;
433 cls.lpszMenuName = "deadbeef";
434 cls.style = 3;
435 ok( RegisterClassA( &cls ), "Failed to register local class for deadbeef\n" );
436 hwnd2 = CreateWindowExA( 0, name, "test_window", 0, 0, 0, 0, 0, 0, 0, NULL, 0 );
437 ok( GetClassLongPtrA( hwnd2, GCLP_HMODULE ) == 0xdeadbeef,
438 "Didn't get deadbeef class for null instance\n" );
439 DestroyWindow( hwnd2 );
440 ok( UnregisterClassA( name, (HINSTANCE)0xdeadbeef ), "Unregister failed for deadbeef\n" );
441
442 hwnd2 = CreateWindowExA( 0, name, "test_window", 0, 0, 0, 0, 0, 0, 0, NULL, 0 );
443 ok( (HINSTANCE)GetClassLongPtrA( hwnd2, GCLP_HMODULE ) == kernel32,
444 "Didn't get kernel32 class for null instance\n" );
445 DestroyWindow( hwnd2 );
446
447 r = GetClassNameA( hwnd, buffer, 4 );
448 ok( r == 3, "expected 3, got %d\n", r );
449 ok( !strcmp( buffer, "__t"), "name wrong: %s\n", buffer );
450
451 ok( UnregisterClassA( name, kernel32 ), "Unregister failed for kernel32\n" );
452
453 hwnd2 = CreateWindowExA( 0, name, "test_window", 0, 0, 0, 0, 0, 0, 0, NULL, 0 );
454 ok( GetClassLongPtrA( hwnd2, GCLP_HMODULE ) == 0x12345678,
455 "Didn't get 12345678 class for null instance\n" );
456 DestroyWindow( hwnd2 );
457
458 SetClassLongPtrA( hwnd, GCLP_HMODULE, (LONG_PTR)main_module );
459 DestroyWindow( hwnd );
460
461 /* null handle means the same thing as main module */
462 cls.lpszMenuName = "null";
463 cls.hInstance = 0;
464 ok( !RegisterClassA( &cls ), "Succeeded registering local class for null instance\n" );
465 ok( GetLastError() == ERROR_CLASS_ALREADY_EXISTS, "Wrong error code %d\n", GetLastError() );
466 ok( UnregisterClassA( name, main_module ), "Unregister failed for main module\n" );
467
468 ok( RegisterClassA( &cls ), "Failed to register local class for null instance\n" );
469 /* must be found with main module handle */
470 check_class( main_module, name, "null" );
471 check_instance( name, main_module, main_module, main_module );
472 check_thread_instance( name, main_module, main_module, main_module );
473 ok( !GetClassInfoA( 0, name, &wc ), "Class found with null instance\n" );
474 ok( GetLastError() == ERROR_CLASS_DOES_NOT_EXIST, "Wrong error code %d\n", GetLastError() );
475 ok( UnregisterClassA( name, 0 ), "Unregister failed for null instance\n" );
476
477 /* registering for user32 always fails */
478 cls.lpszMenuName = "user32";
479 cls.hInstance = user32;
480 ok( !RegisterClassA( &cls ), "Succeeded registering local class for user32\n" );
481 ok( GetLastError() == ERROR_INVALID_PARAMETER, "Wrong error code %d\n", GetLastError() );
482 cls.style |= CS_GLOBALCLASS;
483 ok( !RegisterClassA( &cls ), "Succeeded registering global class for user32\n" );
484 ok( GetLastError() == ERROR_INVALID_PARAMETER, "Wrong error code %d\n", GetLastError() );
485
486 /* unregister is OK though */
487 cls.hInstance = main_module;
488 ok( RegisterClassA( &cls ), "Failed to register global class for main module\n" );
489 ok( UnregisterClassA( name, user32 ), "Unregister failed for user32\n" );
490
491 /* instance doesn't matter for global class */
492 cls.style |= CS_GLOBALCLASS;
493 cls.lpszMenuName = "main_module";
494 cls.hInstance = main_module;
495 ok( RegisterClassA( &cls ), "Failed to register global class for main module\n" );
496 cls.lpszMenuName = "kernel32";
497 cls.hInstance = kernel32;
498 ok( !RegisterClassA( &cls ), "Succeeded registering local class for kernel32\n" );
499 ok( GetLastError() == ERROR_CLASS_ALREADY_EXISTS, "Wrong error code %d\n", GetLastError() );
500 /* even if global flag is cleared */
501 hwnd = CreateWindowExA( 0, name, "test", 0, 0, 0, 0, 0, 0, 0, main_module, 0 );
502 SetClassLongA( hwnd, GCL_STYLE, 0 );
503 ok( !RegisterClassA( &cls ), "Succeeded registering local class for kernel32\n" );
504 ok( GetLastError() == ERROR_CLASS_ALREADY_EXISTS, "Wrong error code %d\n", GetLastError() );
505
506 check_class( main_module, name, "main_module" );
507 check_class( kernel32, name, "main_module" );
508 check_class( 0, name, "main_module" );
509 check_class( (HINSTANCE)0x12345678, name, "main_module" );
510 check_instance( name, main_module, main_module, main_module );
511 check_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, main_module );
512 check_thread_instance( name, main_module, main_module, main_module );
513 check_thread_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, main_module );
514
515 /* changing the instance for global class doesn't make much difference */
516 SetClassLongPtrA( hwnd, GCLP_HMODULE, 0xdeadbeef );
517 check_instance( name, main_module, main_module, (HINSTANCE)0xdeadbeef );
518 check_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef );
519 check_thread_instance( name, main_module, main_module, (HINSTANCE)0xdeadbeef );
520 check_thread_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef );
521
522 DestroyWindow( hwnd );
523 ok( UnregisterClassA( name, (HINSTANCE)0x87654321 ), "Unregister failed for main module global\n" );
524 ok( !UnregisterClassA( name, (HINSTANCE)0x87654321 ), "Unregister succeeded the second time\n" );
525 ok( GetLastError() == ERROR_CLASS_DOES_NOT_EXIST, "Wrong error code %d\n", GetLastError() );
526
527 cls.hInstance = (HINSTANCE)0x12345678;
528 ok( RegisterClassA( &cls ), "Failed to register global class for dummy instance\n" );
529 check_instance( name, main_module, main_module, (HINSTANCE)0x12345678 );
530 check_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, (HINSTANCE)0x12345678 );
531 check_thread_instance( name, main_module, main_module, (HINSTANCE)0x12345678 );
532 check_thread_instance( name, (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, (HINSTANCE)0x12345678 );
533 ok( UnregisterClassA( name, (HINSTANCE)0x87654321 ), "Unregister failed for main module global\n" );
534
535 /* check system classes */
536
537 /* we cannot register a global class with the name of a system class */
538 cls.style |= CS_GLOBALCLASS;
539 cls.lpszMenuName = "button_main_module";
540 cls.lpszClassName = "BUTTON";
541 cls.hInstance = main_module;
542 ok( !RegisterClassA( &cls ), "Succeeded registering global button class for main module\n" );
543 ok( GetLastError() == ERROR_CLASS_ALREADY_EXISTS, "Wrong error code %d\n", GetLastError() );
544 cls.hInstance = kernel32;
545 ok( !RegisterClassA( &cls ), "Succeeded registering global button class for kernel32\n" );
546 ok( GetLastError() == ERROR_CLASS_ALREADY_EXISTS, "Wrong error code %d\n", GetLastError() );
547
548 /* local class is OK however */
549 cls.style &= ~CS_GLOBALCLASS;
550 cls.lpszMenuName = "button_main_module";
551 cls.hInstance = main_module;
552 ok( RegisterClassA( &cls ), "Failed to register local button class for main module\n" );
553 check_class( main_module, "BUTTON", "button_main_module" );
554 cls.lpszMenuName = "button_kernel32";
555 cls.hInstance = kernel32;
556 ok( RegisterClassA( &cls ), "Failed to register local button class for kernel32\n" );
557 check_class( kernel32, "BUTTON", "button_kernel32" );
558 check_class( main_module, "BUTTON", "button_main_module" );
559 ok( UnregisterClassA( "BUTTON", kernel32 ), "Unregister failed for kernel32 button\n" );
560 ok( UnregisterClassA( "BUTTON", main_module ), "Unregister failed for main module button\n" );
561 /* GetClassInfo sets instance to passed value for global classes */
562 check_instance( "BUTTON", 0, 0, user32 );
563 check_instance( "BUTTON", (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, user32 );
564 check_instance( "BUTTON", user32, zero_instance, user32 );
565 check_thread_instance( "BUTTON", 0, 0, user32 );
566 check_thread_instance( "BUTTON", (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, user32 );
567 check_thread_instance( "BUTTON", user32, zero_instance, user32 );
568
569 /* we can unregister system classes */
570 ok( GetClassInfoA( 0, "BUTTON", &wc ), "Button class not found with null instance\n" );
571 ok( GetClassInfoA( kernel32, "BUTTON", &wc ), "Button class not found with kernel32\n" );
572 ok( UnregisterClassA( "BUTTON", (HINSTANCE)0x12345678 ), "Failed to unregister button\n" );
573 ok( !UnregisterClassA( "BUTTON", (HINSTANCE)0x87654321 ), "Unregistered button a second time\n" );
574 ok( GetLastError() == ERROR_CLASS_DOES_NOT_EXIST, "Wrong error code %d\n", GetLastError() );
575 ok( !GetClassInfoA( 0, "BUTTON", &wc ), "Button still exists\n" );
576 /* last error not set reliably */
577
578 /* we can change the instance of a system class */
579 check_instance( "EDIT", (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, user32 );
580 check_thread_instance( "EDIT", (HINSTANCE)0xdeadbeef, (HINSTANCE)0xdeadbeef, user32 );
581 hwnd = CreateWindowExA( 0, "EDIT", "test", 0, 0, 0, 0, 0, 0, 0, main_module, 0 );
582 SetClassLongPtrA( hwnd, GCLP_HMODULE, 0xdeadbeef );
583 check_instance( "EDIT", (HINSTANCE)0x12345678, (HINSTANCE)0x12345678, (HINSTANCE)0xdeadbeef );
584 check_thread_instance( "EDIT", (HINSTANCE)0x12345678, (HINSTANCE)0x12345678, (HINSTANCE)0xdeadbeef );
585 DestroyWindow(hwnd);
586 }
587
588 static void test_builtinproc(void)
589 {
590 /* Edit behaves differently */
591 static const CHAR NORMAL_CLASSES[][10] = {
592 "Button",
593 "Static",
594 "ComboBox",
595 "ComboLBox",
596 "ListBox",
597 "ScrollBar",
598 "#32770", /* dialog */
599 };
600 static const int NUM_NORMAL_CLASSES = (sizeof(NORMAL_CLASSES)/sizeof(NORMAL_CLASSES[0]));
601 static const char classA[] = "deftest";
602 static const WCHAR classW[] = {'d','e','f','t','e','s','t',0};
603 WCHAR unistring[] = {0x142, 0x40e, 0x3b4, 0}; /* a string that would be destroyed by a W->A->W conversion */
604 WNDPROC pDefWindowProcA, pDefWindowProcW;
605 WNDPROC pNtdllDefWindowProcA, pNtdllDefWindowProcW;
606 WNDPROC oldproc;
607 WNDCLASSEXA cls; /* the memory layout of WNDCLASSEXA and WNDCLASSEXW is the same */
608 WCHAR buf[128];
609 ATOM atom;
610 HWND hwnd;
611 int i;
612
613 pDefWindowProcA = (void *)GetProcAddress(GetModuleHandleA("user32.dll"), "DefWindowProcA");
614 pDefWindowProcW = (void *)GetProcAddress(GetModuleHandleA("user32.dll"), "DefWindowProcW");
615 pNtdllDefWindowProcA = (void *)GetProcAddress(GetModuleHandleA("ntdll.dll"), "NtdllDefWindowProc_A");
616 pNtdllDefWindowProcW = (void *)GetProcAddress(GetModuleHandleA("ntdll.dll"), "NtdllDefWindowProc_W");
617
618 /* On Vista+, the user32.dll export DefWindowProcA/W is forwarded to */
619 /* ntdll.NtdllDefWindowProc_A/W. However, the wndproc returned by */
620 /* GetClassLong/GetWindowLong points to an unexported user32 function */
621 if (pDefWindowProcA == pNtdllDefWindowProcA &&
622 pDefWindowProcW == pNtdllDefWindowProcW)
623 skip("user32.DefWindowProcX forwarded to ntdll.NtdllDefWindowProc_X\n");
624 else
625 {
626 for (i = 0; i < 4; i++)
627 {
628 ZeroMemory(&cls, sizeof(cls));
629 cls.cbSize = sizeof(cls);
630 cls.hInstance = GetModuleHandleA(NULL);
631 cls.hbrBackground = GetStockObject (WHITE_BRUSH);
632 if (i & 1)
633 cls.lpfnWndProc = pDefWindowProcA;
634 else
635 cls.lpfnWndProc = pDefWindowProcW;
636
637 if (i & 2)
638 {
639 cls.lpszClassName = classA;
640 atom = RegisterClassExA(&cls);
641 }
642 else
643 {
644 cls.lpszClassName = (LPCSTR)classW;
645 atom = RegisterClassExW((WNDCLASSEXW *)&cls);
646 }
647 ok(atom != 0, "Couldn't register class, i=%d, %d\n", i, GetLastError());
648
649 hwnd = CreateWindowA(classA, NULL, 0, 0, 0, 100, 100, NULL, NULL, GetModuleHandleA(NULL), NULL);
650 ok(hwnd != NULL, "Couldn't create window i=%d\n", i);
651
652 ok(GetWindowLongPtrA(hwnd, GWLP_WNDPROC) == (LONG_PTR)pDefWindowProcA, "Wrong ANSI wndproc: %p vs %p\n",
653 (void *)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), pDefWindowProcA);
654 ok(GetClassLongPtrA(hwnd, GCLP_WNDPROC) == (ULONG_PTR)pDefWindowProcA, "Wrong ANSI wndproc: %p vs %p\n",
655 (void *)GetClassLongPtrA(hwnd, GCLP_WNDPROC), pDefWindowProcA);
656
657 ok(GetWindowLongPtrW(hwnd, GWLP_WNDPROC) == (LONG_PTR)pDefWindowProcW, "Wrong Unicode wndproc: %p vs %p\n",
658 (void *)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), pDefWindowProcW);
659 ok(GetClassLongPtrW(hwnd, GCLP_WNDPROC) == (ULONG_PTR)pDefWindowProcW, "Wrong Unicode wndproc: %p vs %p\n",
660 (void *)GetClassLongPtrW(hwnd, GCLP_WNDPROC), pDefWindowProcW);
661
662 DestroyWindow(hwnd);
663 UnregisterClassA((LPSTR)(DWORD_PTR)atom, GetModuleHandleA(NULL));
664 }
665 }
666
667 /* built-in winproc - window A/W type automatically detected */
668 ZeroMemory(&cls, sizeof(cls));
669 cls.cbSize = sizeof(cls);
670 cls.hInstance = GetModuleHandleA(NULL);
671 cls.hbrBackground = GetStockObject (WHITE_BRUSH);
672 cls.lpszClassName = classA;
673 cls.lpfnWndProc = pDefWindowProcW;
674 atom = RegisterClassExA(&cls);
675
676 hwnd = CreateWindowExW(0, classW, unistring, WS_OVERLAPPEDWINDOW,
677 CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, GetModuleHandleW(NULL), 0);
678 ok(IsWindowUnicode(hwnd) ||
679 broken(!IsWindowUnicode(hwnd)) /* Windows 8 and 10 */,
680 "Windows should be Unicode\n");
681 SendMessageW(hwnd, WM_GETTEXT, sizeof(buf) / sizeof(buf[0]), (LPARAM)buf);
682 if (IsWindowUnicode(hwnd))
683 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
684 else
685 ok(memcmp(buf, unistring, sizeof(unistring)) != 0, "WM_GETTEXT invalid return\n");
686 SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)pDefWindowProcA);
687 ok(IsWindowUnicode(hwnd), "Windows should have remained Unicode\n");
688 if (GetWindowLongPtrW(hwnd, GWLP_WNDPROC) == (LONG_PTR)pDefWindowProcA)
689 {
690 /* DefWindowProc isn't magic on wow64 */
691 ok(IS_WNDPROC_HANDLE(GetWindowLongPtrA(hwnd, GWLP_WNDPROC)), "Ansi winproc is not a handle\n");
692 }
693 else
694 {
695 ok(GetWindowLongPtrW(hwnd, GWLP_WNDPROC) == (LONG_PTR)pDefWindowProcW, "Invalid Unicode winproc\n");
696 ok(GetWindowLongPtrA(hwnd, GWLP_WNDPROC) == (LONG_PTR)pDefWindowProcA, "Invalid Ansi winproc\n");
697 }
698 SetWindowLongPtrA(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc);
699 ok(IsWindowUnicode(hwnd) == FALSE, "SetWindowLongPtrA should have switched window to ANSI\n");
700
701 DestroyWindow(hwnd);
702 UnregisterClassA((LPSTR)(DWORD_PTR)atom, GetModuleHandleA(NULL));
703
704 /* custom winproc - the same function can be used as both A and W*/
705 ZeroMemory(&cls, sizeof(cls));
706 cls.cbSize = sizeof(cls);
707 cls.hInstance = GetModuleHandleA(NULL);
708 cls.hbrBackground = GetStockObject (WHITE_BRUSH);
709 cls.lpszClassName = classA;
710 cls.lpfnWndProc = ClassTest_WndProc2;
711 atom = RegisterClassExA(&cls);
712
713 hwnd = CreateWindowExW(0, classW, NULL, WS_OVERLAPPEDWINDOW,
714 CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, GetModuleHandleA(NULL), 0);
715 ok(IsWindowUnicode(hwnd) == FALSE, "Window should be ANSI\n");
716 SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc);
717 ok(IsWindowUnicode(hwnd), "SetWindowLongPtrW should have changed window to Unicode\n");
718 SetWindowLongPtrA(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc);
719 ok(IsWindowUnicode(hwnd) == FALSE, "SetWindowLongPtrA should have changed window to ANSI\n");
720
721 DestroyWindow(hwnd);
722 UnregisterClassA((LPSTR)(DWORD_PTR)atom, GetModuleHandleA(NULL));
723
724 /* For most of the builtin controls both GetWindowLongPtrA and W returns a pointer that is executed directly
725 * by CallWindowProcA/W */
726 for (i = 0; i < NUM_NORMAL_CLASSES; i++)
727 {
728 WNDPROC procA, procW;
729 hwnd = CreateWindowExA(0, NORMAL_CLASSES[i], classA, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, 680, 260,
730 NULL, NULL, NULL, 0);
731 ok(hwnd != NULL, "Couldn't create window of class %s\n", NORMAL_CLASSES[i]);
732 SetWindowTextA(hwnd, classA); /* ComboBox needs this */
733 procA = (WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC);
734 procW = (WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC);
735 ok(!IS_WNDPROC_HANDLE(procA), "procA should not be a handle for %s (%p)\n", NORMAL_CLASSES[i], procA);
736 ok(!IS_WNDPROC_HANDLE(procW), "procW should not be a handle for %s (%p)\n", NORMAL_CLASSES[i], procW);
737 CallWindowProcA(procA, hwnd, WM_GETTEXT, 120, (LPARAM)buf);
738 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT A/A invalid return for class %s\n", NORMAL_CLASSES[i]);
739 CallWindowProcA(procW, hwnd, WM_GETTEXT, 120, (LPARAM)buf);
740 ok(memcmp(buf, classW, sizeof(classW)) == 0, "WM_GETTEXT A/W invalid return for class %s\n", NORMAL_CLASSES[i]);
741 CallWindowProcW(procA, hwnd, WM_GETTEXT, 120, (LPARAM)buf);
742 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT W/A invalid return for class %s\n", NORMAL_CLASSES[i]);
743 CallWindowProcW(procW, hwnd, WM_GETTEXT, 120, (LPARAM)buf);
744 ok(memcmp(buf, classW, sizeof(classW)) == 0, "WM_GETTEXT W/W invalid return for class %s\n", NORMAL_CLASSES[i]);
745
746 oldproc = (WNDPROC)SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc);
747 ok(IS_WNDPROC_HANDLE(oldproc) == FALSE, "Class %s shouldn't return a handle\n", NORMAL_CLASSES[i]);
748 SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)oldproc);
749 DestroyWindow(hwnd);
750 }
751
752 /* Edit controls are special - they return a wndproc handle when GetWindowLongPtr is called with a different A/W.
753 * On the other hand there is no W->A->W conversion so this control is treated specially. */
754 hwnd = CreateWindowW(WC_EDITW, unistring, WS_OVERLAPPEDWINDOW,
755 CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, NULL, 0);
756 /* GetClassLongPtr returns that both the Unicode and ANSI wndproc */
757 ok(IS_WNDPROC_HANDLE(GetClassLongPtrA(hwnd, GCLP_WNDPROC)) == FALSE, "Edit control class should have a Unicode wndproc\n");
758 ok(IS_WNDPROC_HANDLE(GetClassLongPtrW(hwnd, GCLP_WNDPROC)) == FALSE, "Edit control class should have a ANSI wndproc\n");
759 /* But GetWindowLongPtr returns only a handle for the ANSI one */
760 ok(IS_WNDPROC_HANDLE(GetWindowLongPtrA(hwnd, GWLP_WNDPROC)), "Edit control should return a wndproc handle\n");
761 ok(!IS_WNDPROC_HANDLE(GetWindowLongPtrW(hwnd, GWLP_WNDPROC)), "Edit control shouldn't return a W wndproc handle\n");
762 CallWindowProcW((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
763 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
764 CallWindowProcA((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
765 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
766 CallWindowProcW((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
767 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
768
769 SetWindowTextW(hwnd, classW);
770 CallWindowProcA((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
771 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
772
773 oldproc = (WNDPROC)SetWindowLongPtrA(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc2);
774 /* SetWindowLongPtr returns a wndproc handle - like GetWindowLongPtr */
775 ok(IS_WNDPROC_HANDLE(oldproc), "Edit control should return a wndproc handle\n");
776 ok(IsWindowUnicode(hwnd) == FALSE, "SetWindowLongPtrA should have changed window to ANSI\n");
777 SetWindowTextA(hwnd, classA); /* Windows resets the title to WideStringToMultiByte(unistring) */
778 memset(buf, 0, sizeof(buf));
779 CallWindowProcA((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
780 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
781 CallWindowProcA((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
782 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
783 CallWindowProcW((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
784 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
785
786 CallWindowProcW((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
787 ok(memcmp(buf, classW, sizeof(classW)) == 0, "WM_GETTEXT invalid return\n");
788
789 SetWindowLongPtrA(hwnd, GWLP_WNDPROC, (LONG_PTR)oldproc);
790
791 DestroyWindow(hwnd);
792
793 hwnd = CreateWindowA(WC_EDITA, classA, WS_OVERLAPPEDWINDOW,
794 CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, NULL, 0);
795
796 /* GetClassLongPtr returns that both the Unicode and ANSI wndproc */
797 ok(!IS_WNDPROC_HANDLE(GetClassLongPtrA(hwnd, GCLP_WNDPROC)), "Edit control class should have a Unicode wndproc\n");
798 ok(!IS_WNDPROC_HANDLE(GetClassLongPtrW(hwnd, GCLP_WNDPROC)), "Edit control class should have a ANSI wndproc\n");
799 /* But GetWindowLongPtr returns only a handle for the Unicode one */
800 ok(!IS_WNDPROC_HANDLE(GetWindowLongPtrA(hwnd, GWLP_WNDPROC)), "Edit control shouldn't return an A wndproc handle\n");
801 ok(IS_WNDPROC_HANDLE(GetWindowLongPtrW(hwnd, GWLP_WNDPROC)), "Edit control should return a wndproc handle\n");
802 CallWindowProcA((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
803 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
804 CallWindowProcA((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
805 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
806 CallWindowProcW((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
807 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
808
809 CallWindowProcW((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
810 ok(memcmp(buf, classW, sizeof(classW)) == 0, "WM_GETTEXT invalid return\n");
811
812 oldproc = (WNDPROC)SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)ClassTest_WndProc);
813 SetWindowTextW(hwnd, unistring);
814 CallWindowProcW((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
815 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
816 CallWindowProcA((WNDPROC)GetWindowLongPtrW(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
817 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
818 CallWindowProcW((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
819 ok(memcmp(buf, unistring, sizeof(unistring)) == 0, "WM_GETTEXT invalid return\n");
820
821 SetWindowTextW(hwnd, classW);
822 CallWindowProcA((WNDPROC)GetWindowLongPtrA(hwnd, GWLP_WNDPROC), hwnd, WM_GETTEXT, 120, (LPARAM)buf);
823 ok(memcmp(buf, classA, sizeof(classA)) == 0, "WM_GETTEXT invalid return\n");
824
825 SetWindowLongPtrW(hwnd, GWLP_WNDPROC, (LONG_PTR)oldproc);
826
827 DestroyWindow(hwnd);
828 }
829
830
831 static LRESULT WINAPI TestDlgProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
832 {
833 return DefWindowProcA(hWnd, uMsg, wParam, lParam);
834 }
835
836 static BOOL RegisterTestDialog(HINSTANCE hInstance)
837 {
838 WNDCLASSEXA wcx;
839 ATOM atom = 0;
840
841 ZeroMemory(&wcx, sizeof(WNDCLASSEXA));
842 wcx.cbSize = sizeof(wcx);
843 wcx.lpfnWndProc = TestDlgProc;
844 wcx.cbClsExtra = 0;
845 wcx.cbWndExtra = DLGWINDOWEXTRA;
846 wcx.hInstance = hInstance;
847 wcx.hIcon = LoadIconA(NULL, (LPCSTR)IDI_APPLICATION);
848 wcx.hCursor = LoadCursorA(NULL, (LPCSTR)IDC_ARROW);
849 wcx.hbrBackground = GetStockObject(WHITE_BRUSH);
850 wcx.lpszClassName = "TestDialog";
851 wcx.lpszMenuName = "TestDialog";
852 wcx.hIconSm = LoadImageA(hInstance, (LPCSTR)MAKEINTRESOURCE(5), IMAGE_ICON,
853 GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON),
854 LR_DEFAULTCOLOR);
855
856 atom = RegisterClassExA(&wcx);
857 ok(atom != 0, "RegisterClassEx returned 0\n");
858
859 return atom;
860 }
861
862 /* test registering a dialog box created by using the CLASS directive in a
863 resource file, then test creating the dialog using CreateDialogParam. */
864 static void CreateDialogParamTest(HINSTANCE hInstance)
865 {
866 HWND hWndMain;
867
868 if (RegisterTestDialog(hInstance))
869 {
870 hWndMain = CreateDialogParamA(hInstance, "CLASS_TEST_DIALOG", NULL, 0, 0);
871 ok(hWndMain != NULL, "CreateDialogParam returned NULL\n");
872 ShowWindow(hWndMain, SW_SHOW);
873 DestroyWindow(hWndMain);
874 }
875 }
876
877 static const struct
878 {
879 const char name[9];
880 int value;
881 int badvalue;
882 } extra_values[] =
883 {
884 {"#32770",30,30}, /* Dialog */
885 #ifdef _WIN64
886 {"Edit",8,8},
887 #else
888 {"Edit",6,8}, /* Windows XP 64-bit returns 8 also to 32-bit applications */
889 #endif
890 };
891
892 static void test_extra_values(void)
893 {
894 int i;
895 for(i=0; i< sizeof(extra_values)/sizeof(extra_values[0]); i++)
896 {
897 WNDCLASSEXA wcx;
898 BOOL ret = GetClassInfoExA(NULL,extra_values[i].name,&wcx);
899
900 ok( ret, "GetClassInfo (0) failed for global class %s\n", extra_values[i].name);
901 if (!ret) continue;
902 ok(extra_values[i].value == wcx.cbWndExtra || broken(extra_values[i].badvalue == wcx.cbWndExtra),
903 "expected %d, got %d\n", extra_values[i].value, wcx.cbWndExtra);
904 }
905 }
906
907 static void test_GetClassInfo(void)
908 {
909 static const WCHAR staticW[] = {'s','t','a','t','i','c',0};
910 WNDCLASSA wc;
911 WNDCLASSEXA wcx;
912 BOOL ret;
913
914 SetLastError(0xdeadbeef);
915 ret = GetClassInfoA(0, "static", &wc);
916 ok(ret, "GetClassInfoA() error %d\n", GetLastError());
917
918 if (0) { /* crashes under XP */
919 SetLastError(0xdeadbeef);
920 ret = GetClassInfoA(0, "static", NULL);
921 ok(ret, "GetClassInfoA() error %d\n", GetLastError());
922
923 SetLastError(0xdeadbeef);
924 ret = GetClassInfoW(0, staticW, NULL);
925 ok(ret, "GetClassInfoW() error %d\n", GetLastError());
926 }
927
928 wcx.cbSize = sizeof(wcx);
929 SetLastError(0xdeadbeef);
930 ret = GetClassInfoExA(0, "static", &wcx);
931 ok(ret, "GetClassInfoExA() error %d\n", GetLastError());
932
933 SetLastError(0xdeadbeef);
934 ret = GetClassInfoExA(0, "static", NULL);
935 ok(!ret, "GetClassInfoExA() should fail\n");
936 ok(GetLastError() == ERROR_NOACCESS ||
937 broken(GetLastError() == 0xdeadbeef), /* win9x */
938 "expected ERROR_NOACCESS, got %d\n", GetLastError());
939
940 SetLastError(0xdeadbeef);
941 ret = GetClassInfoExW(0, staticW, NULL);
942 ok(!ret, "GetClassInfoExW() should fail\n");
943 ok(GetLastError() == ERROR_NOACCESS ||
944 broken(GetLastError() == 0xdeadbeef) /* NT4 */ ||
945 broken(GetLastError() == ERROR_CALL_NOT_IMPLEMENTED), /* win9x */
946 "expected ERROR_NOACCESS, got %d\n", GetLastError());
947
948 wcx.cbSize = 0;
949 wcx.lpfnWndProc = NULL;
950 SetLastError(0xdeadbeef);
951 ret = GetClassInfoExA(0, "static", &wcx);
952 ok(ret, "GetClassInfoExA() error %d\n", GetLastError());
953 ok(wcx.cbSize == 0, "expected 0, got %u\n", wcx.cbSize);
954 ok(wcx.lpfnWndProc != NULL, "got null proc\n");
955
956 wcx.cbSize = sizeof(wcx) - 1;
957 wcx.lpfnWndProc = NULL;
958 SetLastError(0xdeadbeef);
959 ret = GetClassInfoExA(0, "static", &wcx);
960 ok(ret, "GetClassInfoExA() error %d\n", GetLastError());
961 ok(wcx.cbSize == sizeof(wcx) - 1, "expected sizeof(wcx)-1, got %u\n", wcx.cbSize);
962 ok(wcx.lpfnWndProc != NULL, "got null proc\n");
963
964 wcx.cbSize = sizeof(wcx) + 1;
965 wcx.lpfnWndProc = NULL;
966 SetLastError(0xdeadbeef);
967 ret = GetClassInfoExA(0, "static", &wcx);
968 ok(ret, "GetClassInfoExA() error %d\n", GetLastError());
969 ok(wcx.cbSize == sizeof(wcx) + 1, "expected sizeof(wcx)+1, got %u\n", wcx.cbSize);
970 ok(wcx.lpfnWndProc != NULL, "got null proc\n");
971 }
972
973 static void test_icons(void)
974 {
975 WNDCLASSEXW wcex, ret_wcex;
976 WCHAR cls_name[] = {'I','c','o','n','T','e','s','t','C','l','a','s','s',0};
977 HWND hwnd;
978 HINSTANCE hinst = GetModuleHandleW(0);
979 HICON hsmicon, hsmallnew;
980 ICONINFO icinf;
981
982 memset(&wcex, 0, sizeof wcex);
983 wcex.cbSize = sizeof wcex;
984 wcex.lpfnWndProc = ClassTest_WndProc;
985 wcex.hIcon = LoadIconW(0, (LPCWSTR)IDI_APPLICATION);
986 wcex.hInstance = hinst;
987 wcex.lpszClassName = cls_name;
988 ok(RegisterClassExW(&wcex), "RegisterClassExW returned 0\n");
989 hwnd = CreateWindowExW(0, cls_name, NULL, WS_OVERLAPPEDWINDOW,
990 0, 0, 0, 0, NULL, NULL, hinst, 0);
991 ok(hwnd != NULL, "Window was not created\n");
992
993 ok(GetClassInfoExW(hinst, cls_name, &ret_wcex), "Class info was not retrieved\n");
994 ok(wcex.hIcon == ret_wcex.hIcon, "Icons don't match\n");
995 ok(ret_wcex.hIconSm != NULL, "hIconSm should be non-zero handle\n");
996
997 hsmicon = (HICON)GetClassLongPtrW(hwnd, GCLP_HICONSM);
998 ok(hsmicon != NULL, "GetClassLong should return non-zero handle\n");
999
1000 ok(SendMessageA(hwnd, WM_GETICON, ICON_BIG, 0) == 0,
1001 "WM_GETICON with ICON_BIG should not return the class icon\n");
1002 ok(SendMessageA(hwnd, WM_GETICON, ICON_SMALL, 0) == 0,
1003 "WM_GETICON with ICON_SMALL should not return the class icon\n");
1004 ok(SendMessageA(hwnd, WM_GETICON, ICON_SMALL2, 0) == 0,
1005 "WM_GETICON with ICON_SMALL2 should not return the class icon\n");
1006
1007 hsmallnew = CopyImage(wcex.hIcon, IMAGE_ICON, GetSystemMetrics(SM_CXSMICON),
1008 GetSystemMetrics(SM_CYSMICON), 0);
1009 ok(!SetClassLongPtrW(hwnd, GCLP_HICONSM, (LONG_PTR)hsmallnew),
1010 "Previous hIconSm should be zero\n");
1011 ok(hsmallnew == (HICON)GetClassLongPtrW(hwnd, GCLP_HICONSM),
1012 "Should return explicitly assigned small icon\n");
1013 ok(!GetIconInfo(hsmicon, &icinf), "Previous small icon should be destroyed\n");
1014
1015 SetClassLongPtrW(hwnd, GCLP_HICONSM, 0);
1016 hsmicon = (HICON)GetClassLongPtrW(hwnd, GCLP_HICONSM);
1017 ok( hsmicon != NULL, "GetClassLong should return non-zero handle\n");
1018
1019 SetClassLongPtrW(hwnd, GCLP_HICON, 0);
1020 ok(!GetClassLongPtrW(hwnd, GCLP_HICONSM), "GetClassLong should return zero handle\n");
1021
1022 SetClassLongPtrW(hwnd, GCLP_HICON, (LONG_PTR)LoadIconW(NULL, (LPCWSTR)IDI_QUESTION));
1023 hsmicon = (HICON)GetClassLongPtrW(hwnd, GCLP_HICONSM);
1024 ok(hsmicon != NULL, "GetClassLong should return non-zero handle\n");
1025 UnregisterClassW(cls_name, hinst);
1026 ok(GetIconInfo(hsmicon, &icinf), "Icon should NOT be destroyed\n");
1027
1028 DestroyIcon(hsmallnew);
1029 DestroyWindow(hwnd);
1030 }
1031
1032 static void test_comctl32_class( const char *name )
1033 {
1034 WNDCLASSA wcA;
1035 WNDCLASSW wcW;
1036 BOOL ret;
1037 HMODULE module;
1038 WCHAR nameW[20];
1039 HWND hwnd;
1040
1041 module = GetModuleHandleA( "comctl32" );
1042 ok( !module, "comctl32 already loaded\n" );
1043 ret = GetClassInfoA( 0, name, &wcA );
1044 ok( ret || broken(!ret) /* <= winxp */, "GetClassInfoA failed for %s\n", name );
1045 if (!ret) return;
1046 MultiByteToWideChar( CP_ACP, 0, name, -1, nameW, sizeof(nameW)/sizeof(WCHAR) );
1047 ret = GetClassInfoW( 0, nameW, &wcW );
1048 ok( ret, "GetClassInfoW failed for %s\n", name );
1049 module = GetModuleHandleA( "comctl32" );
1050 ok( module != 0, "comctl32 not loaded\n" );
1051 FreeLibrary( module );
1052 module = GetModuleHandleA( "comctl32" );
1053 ok( !module, "comctl32 still loaded\n" );
1054 hwnd = CreateWindowA( name, "test", WS_OVERLAPPEDWINDOW, 0, 0, 10, 10, NULL, NULL, NULL, 0 );
1055 ok( hwnd != 0, "failed to create window for %s\n", name );
1056 module = GetModuleHandleA( "comctl32" );
1057 ok( module != 0, "comctl32 not loaded\n" );
1058 }
1059
1060 /* verify that comctl32 classes are automatically loaded by user32 */
1061 static void test_comctl32_classes(void)
1062 {
1063 char path_name[MAX_PATH];
1064 PROCESS_INFORMATION info;
1065 STARTUPINFOA startup;
1066 char **argv;
1067 int i;
1068
1069 static const char *classes[] =
1070 {
1071 ANIMATE_CLASSA,
1072 WC_COMBOBOXEXA,
1073 DATETIMEPICK_CLASSA,
1074 WC_HEADERA,
1075 HOTKEY_CLASSA,
1076 WC_IPADDRESSA,
1077 WC_LISTVIEWA,
1078 MONTHCAL_CLASSA,
1079 WC_NATIVEFONTCTLA,
1080 WC_PAGESCROLLERA,
1081 PROGRESS_CLASSA,
1082 REBARCLASSNAMEA,
1083 STATUSCLASSNAMEA,
1084 WC_TABCONTROLA,
1085 TOOLBARCLASSNAMEA,
1086 TOOLTIPS_CLASSA,
1087 TRACKBAR_CLASSA,
1088 WC_TREEVIEWA,
1089 UPDOWN_CLASSA
1090 };
1091
1092 winetest_get_mainargs( &argv );
1093 for (i = 0; i < sizeof(classes) / sizeof(classes[0]); i++)
1094 {
1095 memset( &startup, 0, sizeof(startup) );
1096 startup.cb = sizeof( startup );
1097 sprintf( path_name, "%s class %s", argv[0], classes[i] );
1098 ok( CreateProcessA( NULL, path_name, NULL, NULL, FALSE, 0, NULL, NULL, &startup, &info ),
1099 "CreateProcess failed.\n" );
1100 winetest_wait_child_process( info.hProcess );
1101 CloseHandle( info.hProcess );
1102 CloseHandle( info.hThread );
1103 }
1104 }
1105
1106 static void test_IME(void)
1107 {
1108 static const WCHAR ime_classW[] = {'I','M','E',0};
1109
1110 char module_name[MAX_PATH], *ptr;
1111 MEMORY_BASIC_INFORMATION mbi;
1112 WNDCLASSW wnd_classw;
1113 WNDCLASSA wnd_class;
1114 SIZE_T size;
1115 BOOL ret;
1116
1117 if (!GetProcAddress(GetModuleHandleA("user32.dll"), "BroadcastSystemMessageExA"))
1118 {
1119 win_skip("BroadcastSystemMessageExA not available, skipping IME class test\n");
1120 return;
1121 }
1122
1123 ok(GetModuleHandleA("imm32") != 0, "imm32.dll is not loaded\n");
1124
1125 ret = GetClassInfoA(NULL, "IME", &wnd_class);
1126 ok(ret, "GetClassInfo failed: %d\n", GetLastError());
1127
1128 size = VirtualQuery(wnd_class.lpfnWndProc, &mbi, sizeof(mbi));
1129 ok(size == sizeof(mbi), "VirtualQuery returned %ld\n", size);
1130 if (size == sizeof(mbi)) {
1131 size = GetModuleFileNameA(mbi.AllocationBase, module_name, sizeof(module_name));
1132 ok(size, "GetModuleFileName failed\n");
1133 for (ptr = module_name+size-1; ptr > module_name; ptr--)
1134 if (*ptr == '\\' || *ptr == '/') break;
1135 if (*ptr == '\\' || *ptr=='/') ptr++;
1136 ok(!lstrcmpiA(ptr, "user32.dll") || !lstrcmpiA(ptr, "ntdll.dll"), "IME window proc implemented in %s\n", ptr);
1137 }
1138
1139 ret = GetClassInfoW(NULL, ime_classW, &wnd_classw);
1140 ok(ret, "GetClassInfo failed: %d\n", GetLastError());
1141
1142 size = VirtualQuery(wnd_classw.lpfnWndProc, &mbi, sizeof(mbi));
1143 ok(size == sizeof(mbi), "VirtualQuery returned %ld\n", size);
1144 size = GetModuleFileNameA(mbi.AllocationBase, module_name, sizeof(module_name));
1145 ok(size, "GetModuleFileName failed\n");
1146 for (ptr = module_name+size-1; ptr > module_name; ptr--)
1147 if (*ptr == '\\' || *ptr == '/') break;
1148 if (*ptr == '\\' || *ptr=='/') ptr++;
1149 ok(!lstrcmpiA(ptr, "user32.dll") || !lstrcmpiA(ptr, "ntdll.dll"), "IME window proc implemented in %s\n", ptr);
1150 }
1151
1152 START_TEST(class)
1153 {
1154 char **argv;
1155 HANDLE hInstance = GetModuleHandleA( NULL );
1156 int argc = winetest_get_mainargs( &argv );
1157
1158 if (argc >= 3)
1159 {
1160 test_comctl32_class( argv[2] );
1161 return;
1162 }
1163
1164 test_IME();
1165 test_GetClassInfo();
1166 test_extra_values();
1167
1168 if (!GetModuleHandleW(0))
1169 {
1170 trace("Class test is incompatible with Win9x implementation, skipping\n");
1171 return;
1172 }
1173
1174 ClassTest(hInstance,FALSE);
1175 ClassTest(hInstance,TRUE);
1176 CreateDialogParamTest(hInstance);
1177 test_styles();
1178 test_builtinproc();
1179 test_icons();
1180 test_comctl32_classes();
1181
1182 /* this test unregisters the Button class so it should be executed at the end */
1183 test_instances();
1184 }