?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
d3d11/tests: Add test for shaders interstage interface.
[wine.git] / dlls / user32 / tests / listbox.c
blob91d4675f839ce0312f7149e0801afdf69494b0c9
1 /* Unit test suite for list boxes.
2 *
3 * Copyright 2003 Ferenc Wagner
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 #include <assert.h>
21 #include <stdarg.h>
22 #include <stdio.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "wingdi.h"
27 #include "winuser.h"
28 #include "winnls.h"
29
30 #include "wine/test.h"
31
32 #ifdef VISIBLE
33 #define WAIT Sleep (1000)
34 #define REDRAW RedrawWindow (handle, NULL, 0, RDW_UPDATENOW)
35 #else
36 #define WAIT
37 #define REDRAW
38 #endif
39
40 static const char * const strings[4] = {
41 "First added",
42 "Second added",
43 "Third added",
44 "Fourth added which is very long because at some time we only had a 256 byte character buffer and that was overflowing in one of those applications that had a common dialog file open box and tried to add a 300 characters long custom filter string which of course the code did not like and crashed. Just make sure this string is longer than 256 characters."
45 };
46
47 static const char BAD_EXTENSION[] = "*.badtxt";
48
49 static HWND
50 create_listbox (DWORD add_style, HWND parent)
51 {
52 HWND handle;
53 INT_PTR ctl_id=0;
54 if (parent)
55 ctl_id=1;
56 handle=CreateWindowA("LISTBOX", "TestList",
57 (LBS_STANDARD & ~LBS_SORT) | add_style,
58 0, 0, 100, 100,
59 parent, (HMENU)ctl_id, NULL, 0);
60
61 assert (handle);
62 SendMessageA(handle, LB_ADDSTRING, 0, (LPARAM) strings[0]);
63 SendMessageA(handle, LB_ADDSTRING, 0, (LPARAM) strings[1]);
64 SendMessageA(handle, LB_ADDSTRING, 0, (LPARAM) strings[2]);
65 SendMessageA(handle, LB_ADDSTRING, 0, (LPARAM) strings[3]);
66
67 #ifdef VISIBLE
68 ShowWindow (handle, SW_SHOW);
69 #endif
70 REDRAW;
71
72 return handle;
73 }
74
75 struct listbox_prop {
76 DWORD add_style;
77 };
78
79 struct listbox_stat {
80 int selected, anchor, caret, selcount;
81 };
82
83 struct listbox_test {
84 struct listbox_prop prop;
85 struct listbox_stat init, init_todo;
86 struct listbox_stat click, click_todo;
87 struct listbox_stat step, step_todo;
88 struct listbox_stat sel, sel_todo;
89 };
90
91 static void
92 listbox_query (HWND handle, struct listbox_stat *results)
93 {
94 results->selected = SendMessageA(handle, LB_GETCURSEL, 0, 0);
95 results->anchor = SendMessageA(handle, LB_GETANCHORINDEX, 0, 0);
96 results->caret = SendMessageA(handle, LB_GETCARETINDEX, 0, 0);
97 results->selcount = SendMessageA(handle, LB_GETSELCOUNT, 0, 0);
98 }
99
100 static void
101 buttonpress (HWND handle, WORD x, WORD y)
102 {
103 LPARAM lp=x+(y<<16);
104
105 WAIT;
106 SendMessageA(handle, WM_LBUTTONDOWN, MK_LBUTTON, lp);
107 SendMessageA(handle, WM_LBUTTONUP, 0, lp);
108 REDRAW;
109 }
110
111 static void
112 keypress (HWND handle, WPARAM keycode, BYTE scancode, BOOL extended)
113 {
114 LPARAM lp=1+(scancode<<16)+(extended?KEYEVENTF_EXTENDEDKEY:0);
115
116 WAIT;
117 SendMessageA(handle, WM_KEYDOWN, keycode, lp);
118 SendMessageA(handle, WM_KEYUP , keycode, lp | 0xc000000);
119 REDRAW;
120 }
121
122 #define listbox_field_ok(t, s, f, got) \
123 ok (t.s.f==got.f, "style %#x, step " #s ", field " #f \
124 ": expected %d, got %d\n", (unsigned int)t.prop.add_style, \
125 t.s.f, got.f)
126
127 #define listbox_todo_field_ok(t, s, f, got) \
128 todo_wine_if (t.s##_todo.f) { listbox_field_ok(t, s, f, got); }
129
130 #define listbox_ok(t, s, got) \
131 listbox_todo_field_ok(t, s, selected, got); \
132 listbox_todo_field_ok(t, s, anchor, got); \
133 listbox_todo_field_ok(t, s, caret, got); \
134 listbox_todo_field_ok(t, s, selcount, got)
135
136 static void
137 check (const struct listbox_test test)
138 {
139 struct listbox_stat answer;
140 HWND hLB=create_listbox (test.prop.add_style, 0);
141 RECT second_item;
142 int i;
143 int res;
144
145 listbox_query (hLB, &answer);
146 listbox_ok (test, init, answer);
147
148 SendMessageA(hLB, LB_GETITEMRECT, 1, (LPARAM) &second_item);
149 buttonpress(hLB, (WORD)second_item.left, (WORD)second_item.top);
150
151 listbox_query (hLB, &answer);
152 listbox_ok (test, click, answer);
153
154 keypress (hLB, VK_DOWN, 0x50, TRUE);
155
156 listbox_query (hLB, &answer);
157 listbox_ok (test, step, answer);
158
159 DestroyWindow (hLB);
160 hLB=create_listbox (test.prop.add_style, 0);
161
162 SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, 2));
163 listbox_query (hLB, &answer);
164 listbox_ok (test, sel, answer);
165
166 for (i=0;i<4;i++) {
167 DWORD size = SendMessageA(hLB, LB_GETTEXTLEN, i, 0);
168 CHAR *txt;
169 WCHAR *txtw;
170 int resA, resW;
171
172 txt = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, size+1);
173 resA=SendMessageA(hLB, LB_GETTEXT, i, (LPARAM)txt);
174 ok(!strcmp (txt, strings[i]), "returned string for item %d does not match %s vs %s\n", i, txt, strings[i]);
175
176 txtw = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, 2*size+2);
177 resW=SendMessageW(hLB, LB_GETTEXT, i, (LPARAM)txtw);
178 if (resA != resW) {
179 trace("SendMessageW(LB_GETTEXT) not supported on this platform (resA=%d resW=%d), skipping...\n",
180 resA, resW);
181 } else {
182 WideCharToMultiByte( CP_ACP, 0, txtw, -1, txt, size, NULL, NULL );
183 ok(!strcmp (txt, strings[i]), "returned string for item %d does not match %s vs %s\n", i, txt, strings[i]);
184 }
185
186 HeapFree (GetProcessHeap(), 0, txtw);
187 HeapFree (GetProcessHeap(), 0, txt);
188 }
189
190 /* Confirm the count of items, and that an invalid delete does not remove anything */
191 res = SendMessageA(hLB, LB_GETCOUNT, 0, 0);
192 ok((res==4), "Expected 4 items, got %d\n", res);
193 res = SendMessageA(hLB, LB_DELETESTRING, -1, 0);
194 ok((res==LB_ERR), "Expected LB_ERR items, got %d\n", res);
195 res = SendMessageA(hLB, LB_DELETESTRING, 4, 0);
196 ok((res==LB_ERR), "Expected LB_ERR items, got %d\n", res);
197 res = SendMessageA(hLB, LB_GETCOUNT, 0, 0);
198 ok((res==4), "Expected 4 items, got %d\n", res);
199
200 WAIT;
201 DestroyWindow (hLB);
202 }
203
204 static void check_item_height(void)
205 {
206 HWND hLB;
207 HDC hdc;
208 HFONT font;
209 TEXTMETRICA tm;
210 INT itemHeight;
211
212 hLB = create_listbox (0, 0);
213 ok ((hdc = GetDCEx( hLB, 0, DCX_CACHE )) != 0, "Can't get hdc\n");
214 ok ((font = GetCurrentObject(hdc, OBJ_FONT)) != 0, "Can't get the current font\n");
215 ok (GetTextMetricsA( hdc, &tm ), "Can't read font metrics\n");
216 ReleaseDC( hLB, hdc);
217
218 ok (SendMessageA(hLB, WM_SETFONT, (WPARAM)font, 0) == 0, "Can't set font\n");
219
220 itemHeight = SendMessageA(hLB, LB_GETITEMHEIGHT, 0, 0);
221 ok (itemHeight == tm.tmHeight, "Item height wrong, got %d, expecting %d\n", itemHeight, tm.tmHeight);
222
223 DestroyWindow (hLB);
224
225 hLB = CreateWindowA("LISTBOX", "TestList", LBS_OWNERDRAWVARIABLE,
226 0, 0, 100, 100, NULL, NULL, NULL, 0);
227 itemHeight = SendMessageA(hLB, LB_GETITEMHEIGHT, 0, 0);
228 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
229 itemHeight = SendMessageA(hLB, LB_GETITEMHEIGHT, 5, 0);
230 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
231 itemHeight = SendMessageA(hLB, LB_GETITEMHEIGHT, -5, 0);
232 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
233 DestroyWindow (hLB);
234 }
235
236 static int got_selchange;
237
238 static LRESULT WINAPI main_window_proc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
239 {
240 switch (msg)
241 {
242 case WM_DRAWITEM:
243 {
244 RECT rc_item, rc_client, rc_clip;
245 DRAWITEMSTRUCT *dis = (DRAWITEMSTRUCT *)lparam;
246
247 trace("%p WM_DRAWITEM %08lx %08lx\n", hwnd, wparam, lparam);
248
249 ok(wparam == dis->CtlID, "got wParam=%08lx instead of %08x\n",
250 wparam, dis->CtlID);
251 ok(dis->CtlType == ODT_LISTBOX, "wrong CtlType %04x\n", dis->CtlType);
252
253 GetClientRect(dis->hwndItem, &rc_client);
254 trace("hwndItem %p client rect %s\n", dis->hwndItem, wine_dbgstr_rect(&rc_client));
255 GetClipBox(dis->hDC, &rc_clip);
256 trace("clip rect %s\n", wine_dbgstr_rect(&rc_clip));
257 ok(EqualRect(&rc_client, &rc_clip) || IsRectEmpty(&rc_clip),
258 "client rect of the listbox should be equal to the clip box,"
259 "or the clip box should be empty\n");
260
261 trace("rcItem %s\n", wine_dbgstr_rect(&dis->rcItem));
262 SendMessageA(dis->hwndItem, LB_GETITEMRECT, dis->itemID, (LPARAM)&rc_item);
263 trace("item rect %s\n", wine_dbgstr_rect(&rc_item));
264 ok(EqualRect(&dis->rcItem, &rc_item), "item rects are not equal\n");
265
266 break;
267 }
268
269 case WM_COMMAND:
270 if (HIWORD( wparam ) == LBN_SELCHANGE) got_selchange++;
271 break;
272
273 default:
274 break;
275 }
276
277 return DefWindowProcA(hwnd, msg, wparam, lparam);
278 }
279
280 static HWND create_parent( void )
281 {
282 WNDCLASSA cls;
283 HWND parent;
284 static ATOM class;
285
286 if (!class)
287 {
288 cls.style = 0;
289 cls.lpfnWndProc = main_window_proc;
290 cls.cbClsExtra = 0;
291 cls.cbWndExtra = 0;
292 cls.hInstance = GetModuleHandleA(NULL);
293 cls.hIcon = 0;
294 cls.hCursor = LoadCursorA(0, (LPCSTR)IDC_ARROW);
295 cls.hbrBackground = GetStockObject(WHITE_BRUSH);
296 cls.lpszMenuName = NULL;
297 cls.lpszClassName = "main_window_class";
298 class = RegisterClassA( &cls );
299 }
300
301 parent = CreateWindowExA(0, "main_window_class", NULL,
302 WS_POPUP | WS_VISIBLE,
303 100, 100, 400, 400,
304 GetDesktopWindow(), 0,
305 GetModuleHandleA(NULL), NULL);
306 return parent;
307 }
308
309 static void test_ownerdraw(void)
310 {
311 HWND parent, hLB;
312 INT ret;
313 RECT rc;
314
315 parent = create_parent();
316 assert(parent);
317
318 hLB = create_listbox(LBS_OWNERDRAWFIXED | WS_CHILD | WS_VISIBLE, parent);
319 assert(hLB);
320
321 SetForegroundWindow(hLB);
322 UpdateWindow(hLB);
323
324 /* make height short enough */
325 SendMessageA(hLB, LB_GETITEMRECT, 0, (LPARAM)&rc);
326 SetWindowPos(hLB, 0, 0, 0, 100, rc.bottom - rc.top + 1,
327 SWP_NOZORDER | SWP_NOMOVE);
328
329 /* make 0 item invisible */
330 SendMessageA(hLB, LB_SETTOPINDEX, 1, 0);
331 ret = SendMessageA(hLB, LB_GETTOPINDEX, 0, 0);
332 ok(ret == 1, "wrong top index %d\n", ret);
333
334 SendMessageA(hLB, LB_GETITEMRECT, 0, (LPARAM)&rc);
335 trace("item 0 rect %s\n", wine_dbgstr_rect(&rc));
336 ok(!IsRectEmpty(&rc), "empty item rect\n");
337 ok(rc.top < 0, "rc.top is not negative (%d)\n", rc.top);
338
339 DestroyWindow(hLB);
340 DestroyWindow(parent);
341 }
342
343 #define listbox_test_query(exp, got) \
344 ok(exp.selected == got.selected, "expected selected %d, got %d\n", exp.selected, got.selected); \
345 ok(exp.anchor == got.anchor, "expected anchor %d, got %d\n", exp.anchor, got.anchor); \
346 ok(exp.caret == got.caret, "expected caret %d, got %d\n", exp.caret, got.caret); \
347 ok(exp.selcount == got.selcount, "expected selcount %d, got %d\n", exp.selcount, got.selcount);
348
349 static void test_LB_SELITEMRANGE(void)
350 {
351 static const struct listbox_stat test_nosel = { 0, LB_ERR, 0, 0 };
352 static const struct listbox_stat test_1 = { 0, LB_ERR, 0, 2 };
353 static const struct listbox_stat test_2 = { 0, LB_ERR, 0, 3 };
354 static const struct listbox_stat test_3 = { 0, LB_ERR, 0, 4 };
355 HWND hLB;
356 struct listbox_stat answer;
357 INT ret;
358
359 trace("testing LB_SELITEMRANGE\n");
360
361 hLB = create_listbox(LBS_EXTENDEDSEL, 0);
362 assert(hLB);
363
364 listbox_query(hLB, &answer);
365 listbox_test_query(test_nosel, answer);
366
367 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, 2));
368 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
369 listbox_query(hLB, &answer);
370 listbox_test_query(test_1, answer);
371
372 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
373 listbox_query(hLB, &answer);
374 listbox_test_query(test_nosel, answer);
375
376 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(0, 4));
377 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
378 listbox_query(hLB, &answer);
379 listbox_test_query(test_3, answer);
380
381 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
382 listbox_query(hLB, &answer);
383 listbox_test_query(test_nosel, answer);
384
385 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(-5, 5));
386 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
387 listbox_query(hLB, &answer);
388 listbox_test_query(test_nosel, answer);
389
390 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
391 listbox_query(hLB, &answer);
392 listbox_test_query(test_nosel, answer);
393
394 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(2, 10));
395 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
396 listbox_query(hLB, &answer);
397 listbox_test_query(test_1, answer);
398
399 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
400 listbox_query(hLB, &answer);
401 listbox_test_query(test_nosel, answer);
402
403 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(4, 10));
404 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
405 listbox_query(hLB, &answer);
406 listbox_test_query(test_nosel, answer);
407
408 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
409 listbox_query(hLB, &answer);
410 listbox_test_query(test_nosel, answer);
411
412 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(10, 1));
413 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
414 listbox_query(hLB, &answer);
415 listbox_test_query(test_2, answer);
416
417 SendMessageA(hLB, LB_SETSEL, FALSE, -1);
418 listbox_query(hLB, &answer);
419 listbox_test_query(test_nosel, answer);
420
421 ret = SendMessageA(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, -1));
422 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
423 listbox_query(hLB, &answer);
424 listbox_test_query(test_2, answer);
425
426 DestroyWindow(hLB);
427 }
428
429 static void test_LB_SETCURSEL(void)
430 {
431 HWND parent, hLB;
432 INT ret;
433
434 trace("testing LB_SETCURSEL\n");
435
436 parent = create_parent();
437 assert(parent);
438
439 hLB = create_listbox(LBS_NOINTEGRALHEIGHT | WS_CHILD, parent);
440 assert(hLB);
441
442 SendMessageA(hLB, LB_SETITEMHEIGHT, 0, 32);
443
444 ret = SendMessageA(hLB, LB_SETCURSEL, 2, 0);
445 ok(ret == 2, "LB_SETCURSEL returned %d instead of 2\n", ret);
446 ret = GetScrollPos(hLB, SB_VERT);
447 ok(ret == 0, "expected vscroll 0, got %d\n", ret);
448
449 ret = SendMessageA(hLB, LB_SETCURSEL, 3, 0);
450 ok(ret == 3, "LB_SETCURSEL returned %d instead of 3\n", ret);
451 ret = GetScrollPos(hLB, SB_VERT);
452 ok(ret == 1, "expected vscroll 1, got %d\n", ret);
453
454 DestroyWindow(hLB);
455 }
456
457 static void test_listbox_height(void)
458 {
459 HWND hList;
460 int r, id;
461
462 hList = CreateWindowA( "ListBox", "list test", 0,
463 1, 1, 600, 100, NULL, NULL, NULL, NULL );
464 ok( hList != NULL, "failed to create listbox\n");
465
466 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
467 ok( id == 0, "item id wrong\n");
468
469 r = SendMessageA( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 20, 0 ));
470 ok( r == 0, "send message failed\n");
471
472 r = SendMessageA(hList, LB_GETITEMHEIGHT, 0, 0 );
473 ok( r == 20, "height wrong\n");
474
475 r = SendMessageA( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0, 30 ));
476 ok( r == -1, "send message failed\n");
477
478 r = SendMessageA(hList, LB_GETITEMHEIGHT, 0, 0 );
479 ok( r == 20, "height wrong\n");
480
481 r = SendMessageA( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0x100, 0 ));
482 ok( r == -1, "send message failed\n");
483
484 r = SendMessageA(hList, LB_GETITEMHEIGHT, 0, 0 );
485 ok( r == 20, "height wrong\n");
486
487 r = SendMessageA( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0xff, 0 ));
488 ok( r == 0, "send message failed\n");
489
490 r = SendMessageA(hList, LB_GETITEMHEIGHT, 0, 0 );
491 ok( r == 0xff, "height wrong\n");
492
493 DestroyWindow( hList );
494 }
495
496 static void test_itemfrompoint(void)
497 {
498 /* WS_POPUP is required in order to have a more accurate size calculation (
499 without caption). LBS_NOINTEGRALHEIGHT is required in order to test
500 behavior of partially-displayed item.
501 */
502 HWND hList = CreateWindowA( "ListBox", "list test",
503 WS_VISIBLE|WS_POPUP|LBS_NOINTEGRALHEIGHT,
504 1, 1, 600, 100, NULL, NULL, NULL, NULL );
505 ULONG r, id;
506 RECT rc;
507
508 /* For an empty listbox win2k returns 0x1ffff, win98 returns 0x10000, nt4 returns 0xffffffff */
509 r = SendMessageA(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 30 ));
510 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
511
512 r = SendMessageA(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( 700, 30 ));
513 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
514
515 r = SendMessageA(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( 30, 300 ));
516 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
517
518 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
519 ok( id == 0, "item id wrong\n");
520 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi1");
521 ok( id == 1, "item id wrong\n");
522
523 r = SendMessageA(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 30 ));
524 ok( r == 0x1, "ret %x\n", r );
525
526 r = SendMessageA(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 601 ));
527 ok( r == 0x10001 || broken(r == 1), /* nt4 */
528 "ret %x\n", r );
529
530 /* Resize control so that below assertions about sizes are valid */
531 r = SendMessageA( hList, LB_GETITEMRECT, 0, (LPARAM)&rc);
532 ok( r == 1, "ret %x\n", r);
533 r = MoveWindow(hList, 1, 1, 600, (rc.bottom - rc.top + 1) * 9 / 2, TRUE);
534 ok( r != 0, "ret %x\n", r);
535
536 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi2");
537 ok( id == 2, "item id wrong\n");
538 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi3");
539 ok( id == 3, "item id wrong\n");
540 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi4");
541 ok( id == 4, "item id wrong\n");
542 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi5");
543 ok( id == 5, "item id wrong\n");
544 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi6");
545 ok( id == 6, "item id wrong\n");
546 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi7");
547 ok( id == 7, "item id wrong\n");
548
549 /* Set the listbox up so that id 1 is at the top, this leaves 5
550 partially visible at the bottom and 6, 7 are invisible */
551
552 SendMessageA( hList, LB_SETTOPINDEX, 1, 0);
553 r = SendMessageA( hList, LB_GETTOPINDEX, 0, 0);
554 ok( r == 1, "top %d\n", r);
555
556 r = SendMessageA( hList, LB_GETITEMRECT, 5, (LPARAM)&rc);
557 ok( r == 1, "ret %x\n", r);
558 r = SendMessageA( hList, LB_GETITEMRECT, 6, (LPARAM)&rc);
559 ok( r == 0, "ret %x\n", r);
560
561 r = SendMessageA( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(/* x */ 10, /* y */ 10) );
562 ok( r == 1, "ret %x\n", r);
563
564 r = SendMessageA( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(1000, 10) );
565 ok( r == 0x10001 || broken(r == 1), /* nt4 */
566 "ret %x\n", r );
567
568 r = SendMessageA( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, -10) );
569 ok( r == 0x10001 || broken(r == 1), /* nt4 */
570 "ret %x\n", r );
571
572 r = SendMessageA( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, 100) );
573 ok( r == 0x10005 || broken(r == 5), /* nt4 */
574 "item %x\n", r );
575
576 r = SendMessageA( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, 200) );
577 ok( r == 0x10005 || broken(r == 5), /* nt4 */
578 "item %x\n", r );
579
580 DestroyWindow( hList );
581 }
582
583 static void test_listbox_item_data(void)
584 {
585 HWND hList;
586 int r, id;
587
588 hList = CreateWindowA( "ListBox", "list test", 0,
589 1, 1, 600, 100, NULL, NULL, NULL, NULL );
590 ok( hList != NULL, "failed to create listbox\n");
591
592 id = SendMessageA( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
593 ok( id == 0, "item id wrong\n");
594
595 r = SendMessageA( hList, LB_SETITEMDATA, 0, MAKELPARAM( 20, 0 ));
596 ok(r == TRUE, "LB_SETITEMDATA returned %d instead of TRUE\n", r);
597
598 r = SendMessageA( hList, LB_GETITEMDATA, 0, 0);
599 ok( r == 20, "get item data failed\n");
600
601 DestroyWindow( hList );
602 }
603
604 static void test_listbox_LB_DIR(void)
605 {
606 HWND hList;
607 int res, itemCount;
608 int itemCount_justFiles;
609 int itemCount_justDrives;
610 int itemCount_allFiles;
611 int itemCount_allDirs;
612 int i;
613 char pathBuffer[MAX_PATH];
614 char * p;
615 char driveletter;
616 const char *wildcard = "*";
617 HANDLE file;
618
619 file = CreateFileA( "wtest1.tmp.c", GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL );
620 ok(file != INVALID_HANDLE_VALUE, "Error creating the test file: %d\n", GetLastError());
621 CloseHandle( file );
622
623 /* NOTE: for this test to succeed, there must be no subdirectories
624 under the current directory. In addition, there must be at least
625 one file that fits the wildcard w*.c . Normally, the test
626 directory itself satisfies both conditions.
627 */
628 hList = CreateWindowA( "ListBox", "list test", WS_VISIBLE|WS_POPUP,
629 1, 1, 600, 100, NULL, NULL, NULL, NULL );
630 assert(hList);
631
632 /* Test for standard usage */
633
634 /* This should list all the files in the test directory. */
635 strcpy(pathBuffer, wildcard);
636 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
637 res = SendMessageA(hList, LB_DIR, 0, (LPARAM)pathBuffer);
638 if (res == -1) /* "*" wildcard doesn't work on win9x */
639 {
640 wildcard = "*.*";
641 strcpy(pathBuffer, wildcard);
642 res = SendMessageA(hList, LB_DIR, 0, (LPARAM)pathBuffer);
643 }
644 ok (res >= 0, "SendMessage(LB_DIR, 0, *) failed - 0x%08x\n", GetLastError());
645
646 /* There should be some content in the listbox */
647 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
648 ok (itemCount > 0, "SendMessage(LB_DIR) did NOT fill the listbox!\n");
649 itemCount_allFiles = itemCount;
650 ok(res + 1 == itemCount,
651 "SendMessage(LB_DIR, 0, *) returned incorrect index (expected %d got %d)!\n",
652 itemCount - 1, res);
653
654 /* This tests behavior when no files match the wildcard */
655 strcpy(pathBuffer, BAD_EXTENSION);
656 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
657 res = SendMessageA(hList, LB_DIR, 0, (LPARAM)pathBuffer);
658 ok (res == -1, "SendMessage(LB_DIR, 0, %s) returned %d, expected -1\n", BAD_EXTENSION, res);
659
660 /* There should be NO content in the listbox */
661 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
662 ok (itemCount == 0, "SendMessage(LB_DIR) DID fill the listbox!\n");
663
664
665 /* This should list all the w*.c files in the test directory
666 * As of this writing, this includes win.c, winstation.c, wsprintf.c
667 */
668 strcpy(pathBuffer, "w*.c");
669 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
670 res = SendMessageA(hList, LB_DIR, 0, (LPARAM)pathBuffer);
671 ok (res >= 0, "SendMessage(LB_DIR, 0, w*.c) failed - 0x%08x\n", GetLastError());
672
673 /* Path specification does NOT converted to uppercase */
674 ok (!strcmp(pathBuffer, "w*.c"),
675 "expected no change to pathBuffer, got %s\n", pathBuffer);
676
677 /* There should be some content in the listbox */
678 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
679 ok (itemCount > 0, "SendMessage(LB_DIR) did NOT fill the listbox!\n");
680 itemCount_justFiles = itemCount;
681 ok(res + 1 == itemCount,
682 "SendMessage(LB_DIR, 0, w*.c) returned incorrect index (expected %d got %d)!\n",
683 itemCount - 1, res);
684
685 /* Every single item in the control should start with a w and end in .c */
686 for (i = 0; i < itemCount; i++) {
687 memset(pathBuffer, 0, MAX_PATH);
688 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
689 p = pathBuffer + strlen(pathBuffer);
690 ok(((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
691 (*(p-1) == 'c' || *(p-1) == 'C') &&
692 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
693 }
694
695 /* Test DDL_DIRECTORY */
696 strcpy(pathBuffer, wildcard);
697 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
698 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
699 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY, *) failed - 0x%08x\n", GetLastError());
700
701 /* There should be some content in the listbox.
702 * All files plus "[..]"
703 */
704 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
705 itemCount_allDirs = itemCount - itemCount_allFiles;
706 ok (itemCount > itemCount_allFiles,
707 "SendMessage(LB_DIR, DDL_DIRECTORY, *) filled with %d entries, expected > %d\n",
708 itemCount, itemCount_allFiles);
709 ok(res + 1 == itemCount,
710 "SendMessage(LB_DIR, DDL_DIRECTORY, *) returned incorrect index (expected %d got %d)!\n",
711 itemCount - 1, res);
712
713 /* This tests behavior when no files match the wildcard */
714 strcpy(pathBuffer, BAD_EXTENSION);
715 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
716 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
717 ok (res == -1, "SendMessage(LB_DIR, DDL_DIRECTORY, %s) returned %d, expected -1\n", BAD_EXTENSION, res);
718
719 /* There should be NO content in the listbox */
720 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
721 ok (itemCount == 0, "SendMessage(LB_DIR) DID fill the listbox!\n");
722
723
724 /* Test DDL_DIRECTORY */
725 strcpy(pathBuffer, "w*.c");
726 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
727 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
728 ok (res >= 0, "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) failed - 0x%08x\n", GetLastError());
729
730 /* There should be some content in the listbox. Since the parent directory does not
731 * fit w*.c, there should be exactly the same number of items as without DDL_DIRECTORY
732 */
733 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
734 ok (itemCount == itemCount_justFiles,
735 "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) filled with %d entries, expected %d\n",
736 itemCount, itemCount_justFiles);
737 ok(res + 1 == itemCount,
738 "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) returned incorrect index (expected %d got %d)!\n",
739 itemCount - 1, res);
740
741 /* Every single item in the control should start with a w and end in .c. */
742 for (i = 0; i < itemCount; i++) {
743 memset(pathBuffer, 0, MAX_PATH);
744 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
745 p = pathBuffer + strlen(pathBuffer);
746 ok(
747 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
748 (*(p-1) == 'c' || *(p-1) == 'C') &&
749 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
750 }
751
752
753 /* Test DDL_DRIVES|DDL_EXCLUSIVE */
754 strcpy(pathBuffer, wildcard);
755 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
756 res = SendMessageA(hList, LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
757 ok (res >= 0, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) failed - 0x%08x\n", GetLastError());
758
759 /* There should be some content in the listbox. In particular, there should
760 * be at least one element before, since the string "[-c-]" should
761 * have been added. Depending on the user setting, more drives might have
762 * been added.
763 */
764 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
765 ok (itemCount >= 1,
766 "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) filled with %d entries, expected at least %d\n",
767 itemCount, 1);
768 itemCount_justDrives = itemCount;
769 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) returned incorrect index!\n");
770
771 /* Every single item in the control should fit the format [-c-] */
772 for (i = 0; i < itemCount; i++) {
773 memset(pathBuffer, 0, MAX_PATH);
774 driveletter = '\0';
775 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
776 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
777 ok( sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
778 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
779 if (!(driveletter >= 'a' && driveletter <= 'z')) {
780 /* Correct after invalid entry is found */
781 trace("removing count of invalid entry %s\n", pathBuffer);
782 itemCount_justDrives--;
783 }
784 }
785
786 /* This tests behavior when no files match the wildcard */
787 strcpy(pathBuffer, BAD_EXTENSION);
788 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
789 res = SendMessageA(hList, LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
790 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
791 BAD_EXTENSION, res, itemCount_justDrives -1);
792
793 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
794 ok (itemCount == itemCount_justDrives, "SendMessage(LB_DIR) returned %d expected %d\n",
795 itemCount, itemCount_justDrives);
796
797 trace("Files with w*.c: %d Mapped drives: %d Directories: 1\n",
798 itemCount_justFiles, itemCount_justDrives);
799
800 /* Test DDL_DRIVES. */
801 strcpy(pathBuffer, wildcard);
802 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
803 res = SendMessageA(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
804 ok (res > 0, "SendMessage(LB_DIR, DDL_DRIVES, *) failed - 0x%08x\n", GetLastError());
805
806 /* There should be some content in the listbox. In particular, there should
807 * be at least one element before, since the string "[-c-]" should
808 * have been added. Depending on the user setting, more drives might have
809 * been added.
810 */
811 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
812 ok (itemCount == itemCount_justDrives + itemCount_allFiles,
813 "SendMessage(LB_DIR, DDL_DRIVES, *) filled with %d entries, expected %d\n",
814 itemCount, itemCount_justDrives + itemCount_allFiles);
815 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES, *) returned incorrect index!\n");
816
817 /* This tests behavior when no files match the wildcard */
818 strcpy(pathBuffer, BAD_EXTENSION);
819 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
820 res = SendMessageA(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
821 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DRIVES, %s) returned %d, expected %d\n",
822 BAD_EXTENSION, res, itemCount_justDrives -1);
823
824 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
825 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
826
827
828 /* Test DDL_DRIVES. */
829 strcpy(pathBuffer, "w*.c");
830 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
831 res = SendMessageA(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
832 ok (res > 0, "SendMessage(LB_DIR, DDL_DRIVES, w*.c) failed - 0x%08x\n", GetLastError());
833
834 /* There should be some content in the listbox. In particular, there should
835 * be at least one element before, since the string "[-c-]" should
836 * have been added. Depending on the user setting, more drives might have
837 * been added.
838 */
839 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
840 ok (itemCount == itemCount_justDrives + itemCount_justFiles,
841 "SendMessage(LB_DIR, DDL_DRIVES, w*.c) filled with %d entries, expected %d\n",
842 itemCount, itemCount_justDrives + itemCount_justFiles);
843 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES, w*.c) returned incorrect index!\n");
844
845 /* Every single item in the control should fit the format [-c-], or w*.c */
846 for (i = 0; i < itemCount; i++) {
847 memset(pathBuffer, 0, MAX_PATH);
848 driveletter = '\0';
849 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
850 p = pathBuffer + strlen(pathBuffer);
851 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
852 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
853 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
854 } else {
855 ok(
856 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
857 (*(p-1) == 'c' || *(p-1) == 'C') &&
858 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
859 }
860 }
861
862
863 /* Test DDL_DIRECTORY|DDL_DRIVES. This does *not* imply DDL_EXCLUSIVE */
864 strcpy(pathBuffer, wildcard);
865 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
866 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
867 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, *) failed - 0x%08x\n", GetLastError());
868
869 /* There should be some content in the listbox. In particular, there should
870 * be exactly the number of plain files, plus the number of mapped drives.
871 */
872 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
873 ok (itemCount == itemCount_allFiles + itemCount_justDrives + itemCount_allDirs,
874 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
875 itemCount, itemCount_allFiles + itemCount_justDrives + itemCount_allDirs);
876 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) returned incorrect index!\n");
877
878 /* Every single item in the control should start with a w and end in .c,
879 * except for the "[..]" string, which should appear exactly as it is,
880 * and the mapped drives in the format "[-X-]".
881 */
882 for (i = 0; i < itemCount; i++) {
883 memset(pathBuffer, 0, MAX_PATH);
884 driveletter = '\0';
885 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
886 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
887 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
888 }
889 }
890
891 /* This tests behavior when no files match the wildcard */
892 strcpy(pathBuffer, BAD_EXTENSION);
893 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
894 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
895 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, %s) returned %d, expected %d\n",
896 BAD_EXTENSION, res, itemCount_justDrives -1);
897
898 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
899 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
900
901
902
903 /* Test DDL_DIRECTORY|DDL_DRIVES. */
904 strcpy(pathBuffer, "w*.c");
905 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
906 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
907 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) failed - 0x%08x\n", GetLastError());
908
909 /* There should be some content in the listbox. In particular, there should
910 * be exactly the number of plain files, plus the number of mapped drives.
911 */
912 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
913 ok (itemCount == itemCount_justFiles + itemCount_justDrives,
914 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
915 itemCount, itemCount_justFiles + itemCount_justDrives);
916 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) returned incorrect index!\n");
917
918 /* Every single item in the control should start with a w and end in .c,
919 * except the mapped drives in the format "[-X-]". The "[..]" directory
920 * should not appear.
921 */
922 for (i = 0; i < itemCount; i++) {
923 memset(pathBuffer, 0, MAX_PATH);
924 driveletter = '\0';
925 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
926 p = pathBuffer + strlen(pathBuffer);
927 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
928 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
929 } else {
930 ok(
931 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
932 (*(p-1) == 'c' || *(p-1) == 'C') &&
933 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
934 }
935 }
936
937 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
938 strcpy(pathBuffer, wildcard);
939 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
940 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
941 ok (res != -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, *) failed err %u\n", GetLastError());
942
943 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
944 ok (itemCount == itemCount_allDirs,
945 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
946 itemCount, itemCount_allDirs);
947 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, *) returned incorrect index!\n");
948
949 if (itemCount && GetCurrentDirectoryA( MAX_PATH, pathBuffer ) > 3) /* there's no [..] in drive root */
950 {
951 memset(pathBuffer, 0, MAX_PATH);
952 SendMessageA(hList, LB_GETTEXT, 0, (LPARAM)pathBuffer);
953 ok( !strcmp(pathBuffer, "[..]"), "First element is not [..]\n");
954 }
955
956 /* This tests behavior when no files match the wildcard */
957 strcpy(pathBuffer, BAD_EXTENSION);
958 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
959 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
960 ok (res == -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
961 BAD_EXTENSION, res, -1);
962
963 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
964 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
965
966
967 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
968 strcpy(pathBuffer, "w*.c");
969 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
970 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
971 ok (res == LB_ERR, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, w*.c) returned %d expected %d\n", res, LB_ERR);
972
973 /* There should be no elements, since "[..]" does not fit w*.c */
974 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
975 ok (itemCount == 0,
976 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
977 itemCount, 0);
978
979 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
980 strcpy(pathBuffer, wildcard);
981 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
982 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
983 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c,) failed - 0x%08x\n", GetLastError());
984
985 /* There should be no plain files on the listbox */
986 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
987 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
988 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
989 itemCount, itemCount_justDrives + itemCount_allDirs);
990 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c) returned incorrect index!\n");
991
992 for (i = 0; i < itemCount; i++) {
993 memset(pathBuffer, 0, MAX_PATH);
994 driveletter = '\0';
995 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
996 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
997 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
998 } else {
999 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
1000 "Element %d (%s) does not fit expected [...]\n", i, pathBuffer);
1001 }
1002 }
1003
1004 /* This tests behavior when no files match the wildcard */
1005 strcpy(pathBuffer, BAD_EXTENSION);
1006 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
1007 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
1008 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
1009 BAD_EXTENSION, res, itemCount_justDrives -1);
1010
1011 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
1012 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
1013
1014 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
1015 strcpy(pathBuffer, "w*.c");
1016 SendMessageA(hList, LB_RESETCONTENT, 0, 0);
1017 res = SendMessageA(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
1018 ok (res >= 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c,) failed - 0x%08x\n", GetLastError());
1019
1020 /* There should be no plain files on the listbox, and no [..], since it does not fit w*.c */
1021 itemCount = SendMessageA(hList, LB_GETCOUNT, 0, 0);
1022 ok (itemCount == itemCount_justDrives,
1023 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
1024 itemCount, itemCount_justDrives);
1025 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c) returned incorrect index!\n");
1026
1027 for (i = 0; i < itemCount; i++) {
1028 memset(pathBuffer, 0, MAX_PATH);
1029 driveletter = '\0';
1030 SendMessageA(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
1031 ok (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
1032 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1033 }
1034 DestroyWindow(hList);
1035
1036 DeleteFileA( "wtest1.tmp.c" );
1037 }
1038
1039 static HWND g_listBox;
1040 static HWND g_label;
1041
1042 #define ID_TEST_LABEL 1001
1043 #define ID_TEST_LISTBOX 1002
1044
1045 static BOOL on_listbox_container_create (HWND hwnd, LPCREATESTRUCTA lpcs)
1046 {
1047 g_label = CreateWindowA(
1048 "Static",
1049 "Contents of static control before DlgDirList.",
1050 WS_CHILD | WS_VISIBLE,
1051 10, 10, 512, 32,
1052 hwnd, (HMENU)ID_TEST_LABEL, NULL, 0);
1053 if (!g_label) return FALSE;
1054 g_listBox = CreateWindowA(
1055 "ListBox",
1056 "DlgDirList test",
1057 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_BORDER | WS_VSCROLL,
1058 10, 60, 256, 256,
1059 hwnd, (HMENU)ID_TEST_LISTBOX, NULL, 0);
1060 if (!g_listBox) return FALSE;
1061
1062 return TRUE;
1063 }
1064
1065 static LRESULT CALLBACK listbox_container_window_procA (
1066 HWND hwnd, UINT uiMsg, WPARAM wParam, LPARAM lParam)
1067 {
1068 LRESULT result = 0;
1069
1070 switch (uiMsg) {
1071 case WM_DESTROY:
1072 PostQuitMessage(0);
1073 break;
1074 case WM_CREATE:
1075 result = on_listbox_container_create(hwnd, (LPCREATESTRUCTA) lParam)
1076 ? 0 : (LRESULT)-1;
1077 break;
1078 default:
1079 result = DefWindowProcA (hwnd, uiMsg, wParam, lParam);
1080 break;
1081 }
1082 return result;
1083 }
1084
1085 static BOOL RegisterListboxWindowClass(HINSTANCE hInst)
1086 {
1087 WNDCLASSA cls;
1088
1089 cls.style = 0;
1090 cls.cbClsExtra = 0;
1091 cls.cbWndExtra = 0;
1092 cls.hInstance = hInst;
1093 cls.hIcon = NULL;
1094 cls.hCursor = LoadCursorA (NULL, (LPCSTR)IDC_ARROW);
1095 cls.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
1096 cls.lpszMenuName = NULL;
1097 cls.lpfnWndProc = listbox_container_window_procA;
1098 cls.lpszClassName = "ListboxContainerClass";
1099 if (!RegisterClassA (&cls)) return FALSE;
1100
1101 return TRUE;
1102 }
1103
1104 static void test_listbox_dlgdir(void)
1105 {
1106 HINSTANCE hInst;
1107 HWND hWnd;
1108 int res, itemCount;
1109 int itemCount_allDirs;
1110 int itemCount_justFiles;
1111 int itemCount_justDrives;
1112 int i;
1113 char pathBuffer[MAX_PATH];
1114 char itemBuffer[MAX_PATH];
1115 char tempBuffer[MAX_PATH];
1116 char * p;
1117 char driveletter;
1118 HANDLE file;
1119
1120 file = CreateFileA( "wtest1.tmp.c", GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL );
1121 ok(file != INVALID_HANDLE_VALUE, "Error creating the test file: %d\n", GetLastError());
1122 CloseHandle( file );
1123
1124 /* NOTE: for this test to succeed, there must be no subdirectories
1125 under the current directory. In addition, there must be at least
1126 one file that fits the wildcard w*.c . Normally, the test
1127 directory itself satisfies both conditions.
1128 */
1129
1130 hInst = GetModuleHandleA(0);
1131 if (!RegisterListboxWindowClass(hInst)) assert(0);
1132 hWnd = CreateWindowA("ListboxContainerClass", "ListboxContainerClass",
1133 WS_OVERLAPPEDWINDOW | WS_VISIBLE,
1134 CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
1135 NULL, NULL, hInst, 0);
1136 assert(hWnd);
1137
1138 /* Test for standard usage */
1139
1140 /* The following should be overwritten by the directory path */
1141 SendMessageA(g_label, WM_SETTEXT, 0, (LPARAM)"default contents");
1142
1143 /* This should list all the w*.c files in the test directory
1144 * As of this writing, this includes win.c, winstation.c, wsprintf.c
1145 */
1146 strcpy(pathBuffer, "w*.c");
1147 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL, 0);
1148 ok (res == 1, "DlgDirList(*.c, 0) returned %d - expected 1 - 0x%08x\n", res, GetLastError());
1149
1150 /* Path specification gets converted to uppercase */
1151 ok (!strcmp(pathBuffer, "W*.C"),
1152 "expected conversion to uppercase, got %s\n", pathBuffer);
1153
1154 /* Loaded path should have overwritten the label text */
1155 SendMessageA(g_label, WM_GETTEXT, MAX_PATH, (LPARAM)pathBuffer);
1156 trace("Static control after DlgDirList: %s\n", pathBuffer);
1157 ok (strcmp("default contents", pathBuffer), "DlgDirList() did not modify static control!\n");
1158
1159 /* There should be some content in the listbox */
1160 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1161 ok (itemCount > 0, "DlgDirList() did NOT fill the listbox!\n");
1162 itemCount_justFiles = itemCount;
1163
1164 /* Every single item in the control should start with a w and end in .c */
1165 for (i = 0; i < itemCount; i++) {
1166 memset(pathBuffer, 0, MAX_PATH);
1167 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1168 p = pathBuffer + strlen(pathBuffer);
1169 ok(((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1170 (*(p-1) == 'c' || *(p-1) == 'C') &&
1171 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1172 }
1173
1174 /* Test behavior when no files match the wildcard */
1175 strcpy(pathBuffer, BAD_EXTENSION);
1176 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL, 0);
1177 ok (res == 1, "DlgDirList(%s, 0) returned %d expected 1\n", BAD_EXTENSION, res);
1178
1179 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1180 ok (itemCount == 0, "DlgDirList() DID fill the listbox!\n");
1181
1182 /* Test DDL_DIRECTORY */
1183 strcpy(pathBuffer, "w*.c");
1184 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1185 DDL_DIRECTORY);
1186 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY) failed - 0x%08x\n", GetLastError());
1187
1188 /* There should be some content in the listbox. In particular, there should
1189 * be exactly more elements than before, since the directories should
1190 * have been added.
1191 */
1192 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1193 itemCount_allDirs = itemCount - itemCount_justFiles;
1194 ok (itemCount >= itemCount_justFiles,
1195 "DlgDirList(DDL_DIRECTORY) filled with %d entries, expected > %d\n",
1196 itemCount, itemCount_justFiles);
1197
1198 /* Every single item in the control should start with a w and end in .c,
1199 * except for the "[..]" string, which should appear exactly as it is.
1200 */
1201 for (i = 0; i < itemCount; i++) {
1202 memset(pathBuffer, 0, MAX_PATH);
1203 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1204 p = pathBuffer + strlen(pathBuffer);
1205 ok( (pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']') ||
1206 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1207 (*(p-1) == 'c' || *(p-1) == 'C') &&
1208 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1209 }
1210
1211 /* Test behavior when no files match the wildcard */
1212 strcpy(pathBuffer, BAD_EXTENSION);
1213 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1214 DDL_DIRECTORY);
1215 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY) returned %d expected 1\n", BAD_EXTENSION, res);
1216
1217 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1218 ok (itemCount == itemCount_allDirs,
1219 "DlgDirList() incorrectly filled the listbox! (expected %d got %d)\n",
1220 itemCount_allDirs, itemCount);
1221 for (i = 0; i < itemCount; i++) {
1222 memset(pathBuffer, 0, MAX_PATH);
1223 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1224 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
1225 "Element %d (%s) does not fit requested [...]\n", i, pathBuffer);
1226 }
1227
1228
1229 /* Test DDL_DRIVES. At least on WinXP-SP2, this implies DDL_EXCLUSIVE */
1230 strcpy(pathBuffer, "w*.c");
1231 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1232 DDL_DRIVES);
1233 ok (res == 1, "DlgDirList(*.c, DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1234
1235 /* There should be some content in the listbox. In particular, there should
1236 * be at least one element before, since the string "[-c-]" should
1237 * have been added. Depending on the user setting, more drives might have
1238 * been added.
1239 */
1240 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1241 ok (itemCount >= 1,
1242 "DlgDirList(DDL_DRIVES) filled with %d entries, expected at least %d\n",
1243 itemCount, 1);
1244 itemCount_justDrives = itemCount;
1245
1246 /* Every single item in the control should fit the format [-c-] */
1247 for (i = 0; i < itemCount; i++) {
1248 memset(pathBuffer, 0, MAX_PATH);
1249 driveletter = '\0';
1250 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1251 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
1252 ok( sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
1253 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1254 if (!(driveletter >= 'a' && driveletter <= 'z')) {
1255 /* Correct after invalid entry is found */
1256 trace("removing count of invalid entry %s\n", pathBuffer);
1257 itemCount_justDrives--;
1258 }
1259 }
1260
1261 /* Test behavior when no files match the wildcard */
1262 strcpy(pathBuffer, BAD_EXTENSION);
1263 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1264 DDL_DRIVES);
1265 ok (res == 1, "DlgDirList(%s, DDL_DRIVES) returned %d expected 1\n", BAD_EXTENSION, res);
1266
1267 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1268 ok (itemCount == itemCount_justDrives, "DlgDirList() incorrectly filled the listbox!\n");
1269
1270
1271 /* Test DDL_DIRECTORY|DDL_DRIVES. This does *not* imply DDL_EXCLUSIVE */
1272 strcpy(pathBuffer, "w*.c");
1273 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1274 DDL_DIRECTORY|DDL_DRIVES);
1275 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1276
1277 /* There should be some content in the listbox. In particular, there should
1278 * be exactly the number of plain files, plus the number of mapped drives,
1279 * plus one "[..]"
1280 */
1281 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1282 ok (itemCount == itemCount_justFiles + itemCount_justDrives + itemCount_allDirs,
1283 "DlgDirList(DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
1284 itemCount, itemCount_justFiles + itemCount_justDrives + itemCount_allDirs);
1285
1286 /* Every single item in the control should start with a w and end in .c,
1287 * except for the "[..]" string, which should appear exactly as it is,
1288 * and the mapped drives in the format "[-X-]".
1289 */
1290 for (i = 0; i < itemCount; i++) {
1291 memset(pathBuffer, 0, MAX_PATH);
1292 driveletter = '\0';
1293 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1294 p = pathBuffer + strlen(pathBuffer);
1295 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
1296 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1297 } else {
1298 ok( (pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']') ||
1299 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1300 (*(p-1) == 'c' || *(p-1) == 'C') &&
1301 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1302 }
1303 }
1304
1305 /* Test behavior when no files match the wildcard */
1306 strcpy(pathBuffer, BAD_EXTENSION);
1307 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1308 DDL_DIRECTORY|DDL_DRIVES);
1309 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_DRIVES) returned %d expected 1\n", BAD_EXTENSION, res);
1310
1311 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1312 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1313 "DlgDirList() incorrectly filled the listbox! (expected %d got %d)\n",
1314 itemCount_justDrives + itemCount_allDirs, itemCount);
1315
1316
1317
1318 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
1319 strcpy(pathBuffer, "w*.c");
1320 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1321 DDL_DIRECTORY|DDL_EXCLUSIVE);
1322 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_EXCLUSIVE) failed - 0x%08x\n", GetLastError());
1323
1324 /* There should be exactly one element: "[..]" */
1325 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1326 ok (itemCount == itemCount_allDirs,
1327 "DlgDirList(DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
1328 itemCount, itemCount_allDirs);
1329
1330 if (itemCount && GetCurrentDirectoryA( MAX_PATH, pathBuffer ) > 3) /* there's no [..] in drive root */
1331 {
1332 memset(pathBuffer, 0, MAX_PATH);
1333 SendMessageA(g_listBox, LB_GETTEXT, 0, (LPARAM)pathBuffer);
1334 ok( !strcmp(pathBuffer, "[..]"), "First (and only) element is not [..]\n");
1335 }
1336
1337 /* Test behavior when no files match the wildcard */
1338 strcpy(pathBuffer, BAD_EXTENSION);
1339 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1340 DDL_DIRECTORY|DDL_EXCLUSIVE);
1341 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_EXCLUSIVE) returned %d expected 1\n", BAD_EXTENSION, res);
1342
1343 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1344 ok (itemCount == itemCount_allDirs, "DlgDirList() incorrectly filled the listbox!\n");
1345
1346
1347 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
1348 strcpy(pathBuffer, "w*.c");
1349 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1350 DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE);
1351 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) failed - 0x%08x\n", GetLastError());
1352
1353 /* There should be no plain files on the listbox */
1354 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1355 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1356 "DlgDirList(DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
1357 itemCount, itemCount_justDrives + itemCount_allDirs);
1358
1359 for (i = 0; i < itemCount; i++) {
1360 memset(pathBuffer, 0, MAX_PATH);
1361 driveletter = '\0';
1362 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1363 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
1364 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1365 } else {
1366 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
1367 "Element %d (%s) does not fit expected [...]\n", i, pathBuffer);
1368 }
1369 }
1370
1371 /* Test behavior when no files match the wildcard */
1372 strcpy(pathBuffer, BAD_EXTENSION);
1373 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1374 DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE);
1375 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) returned %d expected 1\n", BAD_EXTENSION, res);
1376
1377 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1378 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1379 "DlgDirList() incorrectly filled the listbox!\n");
1380
1381 /* Now test DlgDirSelectEx() in normal operation */
1382 /* Fill with everything - drives, directory and all plain files. */
1383 strcpy(pathBuffer, "*");
1384 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1385 DDL_DIRECTORY|DDL_DRIVES);
1386 ok (res != 0, "DlgDirList(*, DDL_DIRECTORY|DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1387
1388 SendMessageA(g_listBox, LB_SETCURSEL, -1, 0); /* Unselect any current selection */
1389 memset(pathBuffer, 0, MAX_PATH);
1390 SetLastError(0xdeadbeef);
1391 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1392 ok (GetLastError() == 0xdeadbeef,
1393 "DlgDirSelectEx() with no selection modified last error code from 0xdeadbeef to 0x%08x\n",
1394 GetLastError());
1395 ok (res == 0, "DlgDirSelectEx() with no selection returned %d, expected 0\n", res);
1396 /* WinXP-SP2 leaves pathBuffer untouched, but Win98 fills it with garbage. */
1397 /*
1398 ok (strlen(pathBuffer) == 0, "DlgDirSelectEx() with no selection filled buffer with %s\n", pathBuffer);
1399 */
1400 /* Test proper drive/dir/file recognition */
1401 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1402 for (i = 0; i < itemCount; i++) {
1403 memset(itemBuffer, 0, MAX_PATH);
1404 memset(pathBuffer, 0, MAX_PATH);
1405 memset(tempBuffer, 0, MAX_PATH);
1406 driveletter = '\0';
1407 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)itemBuffer);
1408 res = SendMessageA(g_listBox, LB_SETCURSEL, i, 0);
1409 ok (res == i, "SendMessageA(LB_SETCURSEL, %d) failed\n", i);
1410 if (sscanf(itemBuffer, "[-%c-]", &driveletter) == 1) {
1411 /* Current item is a drive letter */
1412 SetLastError(0xdeadbeef);
1413 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1414 ok (GetLastError() == 0xdeadbeef,
1415 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1416 i, GetLastError());
1417 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1418
1419 /* For drive letters, DlgDirSelectEx tacks on a colon */
1420 ok (pathBuffer[0] == driveletter && pathBuffer[1] == ':' && pathBuffer[2] == '\0',
1421 "%d: got \"%s\" expected \"%c:\"\n", i, pathBuffer, driveletter);
1422 } else if (itemBuffer[0] == '[') {
1423 /* Current item is the parent directory */
1424 SetLastError(0xdeadbeef);
1425 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1426 ok (GetLastError() == 0xdeadbeef,
1427 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1428 i, GetLastError());
1429 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1430
1431 /* For directories, DlgDirSelectEx tacks on a backslash */
1432 p = pathBuffer + strlen(pathBuffer);
1433 ok (*(p-1) == '\\', "DlgDirSelectEx did NOT tack on a backslash to dir, got %s\n", pathBuffer);
1434
1435 tempBuffer[0] = '[';
1436 lstrcpynA(tempBuffer + 1, pathBuffer, strlen(pathBuffer));
1437 strcat(tempBuffer, "]");
1438 ok (!strcmp(tempBuffer, itemBuffer), "Formatted directory should be %s, got %s\n", tempBuffer, itemBuffer);
1439 } else {
1440 /* Current item is a plain file */
1441 SetLastError(0xdeadbeef);
1442 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1443 ok (GetLastError() == 0xdeadbeef,
1444 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1445 i, GetLastError());
1446 ok(res == 0, "DlgDirSelectEx() thinks %s (%s) is a drive/directory!\n", itemBuffer, pathBuffer);
1447
1448 /* NOTE: WinXP tacks a period on all files that lack an extension. This affects
1449 * for example, "Makefile", which gets reported as "Makefile."
1450 */
1451 strcpy(tempBuffer, itemBuffer);
1452 if (strchr(tempBuffer, '.') == NULL) strcat(tempBuffer, ".");
1453 ok (!strcmp(pathBuffer, tempBuffer), "Formatted file should be %s, got %s\n", tempBuffer, pathBuffer);
1454 }
1455 }
1456
1457 DeleteFileA( "wtest1.tmp.c" );
1458
1459 /* Now test DlgDirSelectEx() in abnormal operation */
1460 /* Fill list with bogus entries, that look somewhat valid */
1461 SendMessageA(g_listBox, LB_RESETCONTENT, 0, 0);
1462 SendMessageA(g_listBox, LB_ADDSTRING, 0, (LPARAM)"[notexist.dir]");
1463 SendMessageA(g_listBox, LB_ADDSTRING, 0, (LPARAM)"notexist.fil");
1464 itemCount = SendMessageA(g_listBox, LB_GETCOUNT, 0, 0);
1465 for (i = 0; i < itemCount; i++) {
1466 memset(itemBuffer, 0, MAX_PATH);
1467 memset(pathBuffer, 0, MAX_PATH);
1468 memset(tempBuffer, 0, MAX_PATH);
1469 driveletter = '\0';
1470 SendMessageA(g_listBox, LB_GETTEXT, i, (LPARAM)itemBuffer);
1471 res = SendMessageA(g_listBox, LB_SETCURSEL, i, 0);
1472 ok (res == i, "SendMessage(LB_SETCURSEL, %d) failed\n", i);
1473 if (sscanf(itemBuffer, "[-%c-]", &driveletter) == 1) {
1474 /* Current item is a drive letter */
1475 SetLastError(0xdeadbeef);
1476 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1477 ok (GetLastError() == 0xdeadbeef,
1478 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1479 i, GetLastError());
1480 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1481
1482 /* For drive letters, DlgDirSelectEx tacks on a colon */
1483 ok (pathBuffer[0] == driveletter && pathBuffer[1] == ':' && pathBuffer[2] == '\0',
1484 "%d: got \"%s\" expected \"%c:\"\n", i, pathBuffer, driveletter);
1485 } else if (itemBuffer[0] == '[') {
1486 /* Current item is the parent directory */
1487 SetLastError(0xdeadbeef);
1488 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1489 ok (GetLastError() == 0xdeadbeef,
1490 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1491 i, GetLastError());
1492 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1493
1494 /* For directories, DlgDirSelectEx tacks on a backslash */
1495 p = pathBuffer + strlen(pathBuffer);
1496 ok (*(p-1) == '\\', "DlgDirSelectEx did NOT tack on a backslash to dir, got %s\n", pathBuffer);
1497
1498 tempBuffer[0] = '[';
1499 lstrcpynA(tempBuffer + 1, pathBuffer, strlen(pathBuffer));
1500 strcat(tempBuffer, "]");
1501 ok (!strcmp(tempBuffer, itemBuffer), "Formatted directory should be %s, got %s\n", tempBuffer, itemBuffer);
1502 } else {
1503 /* Current item is a plain file */
1504 SetLastError(0xdeadbeef);
1505 res = DlgDirSelectExA(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1506 ok (GetLastError() == 0xdeadbeef,
1507 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1508 i, GetLastError());
1509 ok(res == 0, "DlgDirSelectEx() thinks %s (%s) is a drive/directory!\n", itemBuffer, pathBuffer);
1510
1511 /* NOTE: WinXP and Win98 tack a period on all files that lack an extension.
1512 * This affects for example, "Makefile", which gets reported as "Makefile."
1513 */
1514 strcpy(tempBuffer, itemBuffer);
1515 if (strchr(tempBuffer, '.') == NULL) strcat(tempBuffer, ".");
1516 ok (!strcmp(pathBuffer, tempBuffer), "Formatted file should be %s, got %s\n", tempBuffer, pathBuffer);
1517 }
1518 }
1519
1520 /* Test behavior when loading folders from root with and without wildcard */
1521 strcpy(pathBuffer, "C:\\");
1522 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, 0, DDL_DIRECTORY | DDL_EXCLUSIVE);
1523 ok(res || broken(!res) /* NT4/W2K */, "DlgDirList failed to list C:\\ folders\n");
1524 todo_wine ok(!strcmp(pathBuffer, "*") || broken(!res) /* NT4/W2K */,
1525 "DlgDirList set the invalid path spec '%s', expected '*'\n", pathBuffer);
1526
1527 strcpy(pathBuffer, "C:\\*");
1528 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, 0, DDL_DIRECTORY | DDL_EXCLUSIVE);
1529 ok(res || broken(!res) /* NT4/W2K */, "DlgDirList failed to list C:\\* folders\n");
1530 ok(!strcmp(pathBuffer, "*") || broken(!res) /* NT4/W2K */,
1531 "DlgDirList set the invalid path spec '%s', expected '*'\n", pathBuffer);
1532
1533 /* Try loading files from an invalid folder */
1534 SetLastError(0xdeadbeef);
1535 strcpy(pathBuffer, "C:\\INVALID$$DIR");
1536 res = DlgDirListA(hWnd, pathBuffer, ID_TEST_LISTBOX, 0, DDL_DIRECTORY | DDL_EXCLUSIVE);
1537 todo_wine ok(!res, "DlgDirList should have failed with 0 but %d was returned\n", res);
1538 todo_wine ok(GetLastError() == ERROR_NO_WILDCARD_CHARACTERS,
1539 "GetLastError should return 0x589, got 0x%X\n",GetLastError());
1540
1541 DestroyWindow(hWnd);
1542 }
1543
1544 static void test_set_count( void )
1545 {
1546 HWND parent, listbox;
1547 LONG ret;
1548 RECT r;
1549
1550 parent = create_parent();
1551 listbox = create_listbox( LBS_OWNERDRAWFIXED | LBS_NODATA | WS_CHILD | WS_VISIBLE, parent );
1552
1553 UpdateWindow( listbox );
1554 GetUpdateRect( listbox, &r, TRUE );
1555 ok( IsRectEmpty( &r ), "got non-empty rect\n");
1556
1557 ret = SendMessageA( listbox, LB_SETCOUNT, 100, 0 );
1558 ok( ret == 0, "got %d\n", ret );
1559 ret = SendMessageA( listbox, LB_GETCOUNT, 0, 0 );
1560 ok( ret == 100, "got %d\n", ret );
1561
1562 GetUpdateRect( listbox, &r, TRUE );
1563 ok( !IsRectEmpty( &r ), "got empty rect\n");
1564
1565 ValidateRect( listbox, NULL );
1566 GetUpdateRect( listbox, &r, TRUE );
1567 ok( IsRectEmpty( &r ), "got non-empty rect\n");
1568
1569 ret = SendMessageA( listbox, LB_SETCOUNT, 99, 0 );
1570 ok( ret == 0, "got %d\n", ret );
1571
1572 GetUpdateRect( listbox, &r, TRUE );
1573 ok( !IsRectEmpty( &r ), "got empty rect\n");
1574
1575 DestroyWindow( listbox );
1576 DestroyWindow( parent );
1577 }
1578
1579 static DWORD (WINAPI *pGetListBoxInfo)(HWND);
1580 static int lb_getlistboxinfo;
1581
1582 static LRESULT WINAPI listbox_subclass_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
1583 {
1584 WNDPROC oldproc = (WNDPROC)GetWindowLongPtrA(hwnd, GWLP_USERDATA);
1585
1586 if (message == LB_GETLISTBOXINFO)
1587 lb_getlistboxinfo++;
1588
1589 return CallWindowProcA(oldproc, hwnd, message, wParam, lParam);
1590 }
1591
1592 static void test_GetListBoxInfo(void)
1593 {
1594 HWND listbox, parent;
1595 WNDPROC oldproc;
1596 DWORD ret;
1597
1598 pGetListBoxInfo = (void*)GetProcAddress(GetModuleHandleA("user32.dll"), "GetListBoxInfo");
1599
1600 if (!pGetListBoxInfo)
1601 {
1602 win_skip("GetListBoxInfo() not available\n");
1603 return;
1604 }
1605
1606 parent = create_parent();
1607 listbox = create_listbox(WS_CHILD | WS_VISIBLE, parent);
1608
1609 oldproc = (WNDPROC)SetWindowLongPtrA(listbox, GWLP_WNDPROC, (LONG_PTR)listbox_subclass_proc);
1610 SetWindowLongPtrA(listbox, GWLP_USERDATA, (LONG_PTR)oldproc);
1611
1612 lb_getlistboxinfo = 0;
1613 ret = pGetListBoxInfo(listbox);
1614 ok(ret > 0, "got %d\n", ret);
1615 todo_wine
1616 ok(lb_getlistboxinfo == 0, "got %d\n", lb_getlistboxinfo);
1617
1618 DestroyWindow(listbox);
1619 DestroyWindow(parent);
1620 }
1621
1622 static void test_missing_lbuttonup( void )
1623 {
1624 HWND listbox, parent, capture;
1625
1626 parent = create_parent();
1627 listbox = create_listbox(WS_CHILD | WS_VISIBLE, parent);
1628
1629 /* Send button down without a corresponding button up */
1630 SendMessageA(listbox, WM_LBUTTONDOWN, 0, MAKELPARAM(10,10));
1631 capture = GetCapture();
1632 ok(capture == listbox, "got %p expected %p\n", capture, listbox);
1633
1634 /* Capture is released and LBN_SELCHANGE sent during WM_KILLFOCUS */
1635 got_selchange = 0;
1636 SetFocus(NULL);
1637 capture = GetCapture();
1638 ok(capture == NULL, "got %p\n", capture);
1639 ok(got_selchange, "got %d\n", got_selchange);
1640
1641 DestroyWindow(listbox);
1642 DestroyWindow(parent);
1643 }
1644
1645 static void test_extents(void)
1646 {
1647 HWND listbox, parent;
1648 DWORD res;
1649 SCROLLINFO sinfo;
1650 BOOL br;
1651
1652 parent = create_parent();
1653
1654 listbox = create_listbox(WS_CHILD | WS_VISIBLE, parent);
1655
1656 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1657 ok(res == 0, "Got wrong initial horizontal extent: %u\n", res);
1658
1659 sinfo.cbSize = sizeof(sinfo);
1660 sinfo.fMask = SIF_RANGE;
1661 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1662 ok(br == TRUE, "GetScrollInfo failed\n");
1663 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1664 ok(sinfo.nMax == 100, "got wrong max: %u\n", sinfo.nMax);
1665 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1666 "List box should not have a horizontal scroll bar\n");
1667
1668 /* horizontal extent < width */
1669 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 64, 0);
1670
1671 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1672 ok(res == 64, "Got wrong horizontal extent: %u\n", res);
1673
1674 sinfo.cbSize = sizeof(sinfo);
1675 sinfo.fMask = SIF_RANGE;
1676 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1677 ok(br == TRUE, "GetScrollInfo failed\n");
1678 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1679 ok(sinfo.nMax == 100, "got wrong max: %u\n", sinfo.nMax);
1680 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1681 "List box should not have a horizontal scroll bar\n");
1682
1683 /* horizontal extent > width */
1684 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 184, 0);
1685
1686 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1687 ok(res == 184, "Got wrong horizontal extent: %u\n", res);
1688
1689 sinfo.cbSize = sizeof(sinfo);
1690 sinfo.fMask = SIF_RANGE;
1691 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1692 ok(br == TRUE, "GetScrollInfo failed\n");
1693 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1694 ok(sinfo.nMax == 100, "got wrong max: %u\n", sinfo.nMax);
1695 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1696 "List box should not have a horizontal scroll bar\n");
1697
1698 DestroyWindow(listbox);
1699
1700
1701 listbox = create_listbox(WS_CHILD | WS_VISIBLE | WS_HSCROLL, parent);
1702
1703 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1704 ok(res == 0, "Got wrong initial horizontal extent: %u\n", res);
1705
1706 sinfo.cbSize = sizeof(sinfo);
1707 sinfo.fMask = SIF_RANGE;
1708 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1709 ok(br == TRUE, "GetScrollInfo failed\n");
1710 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1711 ok(sinfo.nMax == 100, "got wrong max: %u\n", sinfo.nMax);
1712 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1713 "List box should not have a horizontal scroll bar\n");
1714
1715 /* horizontal extent < width */
1716 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 64, 0);
1717
1718 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1719 ok(res == 64, "Got wrong horizontal extent: %u\n", res);
1720
1721 sinfo.cbSize = sizeof(sinfo);
1722 sinfo.fMask = SIF_RANGE;
1723 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1724 ok(br == TRUE, "GetScrollInfo failed\n");
1725 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1726 ok(sinfo.nMax == 63, "got wrong max: %u\n", sinfo.nMax);
1727 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1728 "List box should not have a horizontal scroll bar\n");
1729
1730 /* horizontal extent > width */
1731 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 184, 0);
1732
1733 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1734 ok(res == 184, "Got wrong horizontal extent: %u\n", res);
1735
1736 sinfo.cbSize = sizeof(sinfo);
1737 sinfo.fMask = SIF_RANGE;
1738 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1739 ok(br == TRUE, "GetScrollInfo failed\n");
1740 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1741 ok(sinfo.nMax == 183, "got wrong max: %u\n", sinfo.nMax);
1742 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) != 0,
1743 "List box should have a horizontal scroll bar\n");
1744
1745 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 0, 0);
1746
1747 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1748 ok(res == 0, "Got wrong horizontal extent: %u\n", res);
1749
1750 sinfo.cbSize = sizeof(sinfo);
1751 sinfo.fMask = SIF_RANGE;
1752 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1753 ok(br == TRUE, "GetScrollInfo failed\n");
1754 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1755 ok(sinfo.nMax == 0, "got wrong max: %u\n", sinfo.nMax);
1756 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) == 0,
1757 "List box should not have a horizontal scroll bar\n");
1758
1759 DestroyWindow(listbox);
1760
1761
1762 listbox = create_listbox(WS_CHILD | WS_VISIBLE | WS_HSCROLL | LBS_DISABLENOSCROLL, parent);
1763
1764 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1765 ok(res == 0, "Got wrong initial horizontal extent: %u\n", res);
1766
1767 sinfo.cbSize = sizeof(sinfo);
1768 sinfo.fMask = SIF_RANGE;
1769 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1770 ok(br == TRUE, "GetScrollInfo failed\n");
1771 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1772 ok(sinfo.nMax == 0, "got wrong max: %u\n", sinfo.nMax);
1773 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) != 0,
1774 "List box should have a horizontal scroll bar\n");
1775
1776 /* horizontal extent < width */
1777 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 64, 0);
1778
1779 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1780 ok(res == 64, "Got wrong horizontal extent: %u\n", res);
1781
1782 sinfo.cbSize = sizeof(sinfo);
1783 sinfo.fMask = SIF_RANGE;
1784 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1785 ok(br == TRUE, "GetScrollInfo failed\n");
1786 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1787 ok(sinfo.nMax == 63, "got wrong max: %u\n", sinfo.nMax);
1788 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) != 0,
1789 "List box should have a horizontal scroll bar\n");
1790
1791 /* horizontal extent > width */
1792 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 184, 0);
1793
1794 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1795 ok(res == 184, "Got wrong horizontal extent: %u\n", res);
1796
1797 sinfo.cbSize = sizeof(sinfo);
1798 sinfo.fMask = SIF_RANGE;
1799 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1800 ok(br == TRUE, "GetScrollInfo failed\n");
1801 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1802 ok(sinfo.nMax == 183, "got wrong max: %u\n", sinfo.nMax);
1803 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) != 0,
1804 "List box should have a horizontal scroll bar\n");
1805
1806 SendMessageA(listbox, LB_SETHORIZONTALEXTENT, 0, 0);
1807
1808 res = SendMessageA(listbox, LB_GETHORIZONTALEXTENT, 0, 0);
1809 ok(res == 0, "Got wrong horizontal extent: %u\n", res);
1810
1811 sinfo.cbSize = sizeof(sinfo);
1812 sinfo.fMask = SIF_RANGE;
1813 br = GetScrollInfo(listbox, SB_HORZ, &sinfo);
1814 ok(br == TRUE, "GetScrollInfo failed\n");
1815 ok(sinfo.nMin == 0, "got wrong min: %u\n", sinfo.nMin);
1816 ok(sinfo.nMax == 0, "got wrong max: %u\n", sinfo.nMax);
1817 ok((GetWindowLongA(listbox, GWL_STYLE) & WS_HSCROLL) != 0,
1818 "List box should have a horizontal scroll bar\n");
1819
1820 DestroyWindow(listbox);
1821
1822 DestroyWindow(parent);
1823 }
1824
1825 START_TEST(listbox)
1826 {
1827 const struct listbox_test SS =
1828 /* {add_style} */
1829 {{0},
1830 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1831 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1832 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1833 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1834 /* {selected, anchor, caret, selcount}{TODO fields} */
1835 const struct listbox_test SS_NS =
1836 {{LBS_NOSEL},
1837 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1838 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1839 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1840 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1841 const struct listbox_test MS =
1842 {{LBS_MULTIPLESEL},
1843 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1844 { 1, 1, 1, 1}, {0,0,0,0},
1845 { 2, 1, 2, 1}, {0,0,0,0},
1846 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1847 const struct listbox_test MS_NS =
1848 {{LBS_MULTIPLESEL | LBS_NOSEL},
1849 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1850 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1851 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1852 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1853 const struct listbox_test ES =
1854 {{LBS_EXTENDEDSEL},
1855 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1856 { 1, 1, 1, 1}, {0,0,0,0},
1857 { 2, 2, 2, 1}, {0,0,0,0},
1858 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1859 const struct listbox_test ES_NS =
1860 {{LBS_EXTENDEDSEL | LBS_NOSEL},
1861 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1862 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1863 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1864 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1865 const struct listbox_test EMS =
1866 {{LBS_EXTENDEDSEL | LBS_MULTIPLESEL},
1867 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1868 { 1, 1, 1, 1}, {0,0,0,0},
1869 { 2, 2, 2, 1}, {0,0,0,0},
1870 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1871 const struct listbox_test EMS_NS =
1872 {{LBS_EXTENDEDSEL | LBS_MULTIPLESEL | LBS_NOSEL},
1873 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1874 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1875 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1876 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1877
1878 trace (" Testing single selection...\n");
1879 check (SS);
1880 trace (" ... with NOSEL\n");
1881 check (SS_NS);
1882 trace (" Testing multiple selection...\n");
1883 check (MS);
1884 trace (" ... with NOSEL\n");
1885 check (MS_NS);
1886 trace (" Testing extended selection...\n");
1887 check (ES);
1888 trace (" ... with NOSEL\n");
1889 check (ES_NS);
1890 trace (" Testing extended and multiple selection...\n");
1891 check (EMS);
1892 trace (" ... with NOSEL\n");
1893 check (EMS_NS);
1894
1895 check_item_height();
1896 test_ownerdraw();
1897 test_LB_SELITEMRANGE();
1898 test_LB_SETCURSEL();
1899 test_listbox_height();
1900 test_itemfrompoint();
1901 test_listbox_item_data();
1902 test_listbox_LB_DIR();
1903 test_listbox_dlgdir();
1904 test_set_count();
1905 test_GetListBoxInfo();
1906 test_missing_lbuttonup();
1907 test_extents();
1908 }
Windows API implementation