?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
push 8b07bf1f08b23b9893a622b47d2be359556765b1
[wine/hacks.git] / dlls / user32 / tests / listbox.c
blob942c7800f670595d8c4940fdd37847366e9ca003
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=CreateWindow ("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 SendMessage (handle, LB_ADDSTRING, 0, (LPARAM) strings[0]);
63 SendMessage (handle, LB_ADDSTRING, 0, (LPARAM) strings[1]);
64 SendMessage (handle, LB_ADDSTRING, 0, (LPARAM) strings[2]);
65 SendMessage (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 = SendMessage (handle, LB_GETCURSEL, 0, 0);
95 results->anchor = SendMessage (handle, LB_GETANCHORINDEX, 0, 0);
96 results->caret = SendMessage (handle, LB_GETCARETINDEX, 0, 0);
97 results->selcount = SendMessage (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 SendMessage (handle, WM_LBUTTONDOWN, MK_LBUTTON, lp);
107 SendMessage (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 SendMessage (handle, WM_KEYDOWN, keycode, lp);
118 SendMessage (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 if (t.s##_todo.f) todo_wine { listbox_field_ok(t, s, f, got); } \
129 else listbox_field_ok(t, s, f, got)
130
131 #define listbox_ok(t, s, got) \
132 listbox_todo_field_ok(t, s, selected, got); \
133 listbox_todo_field_ok(t, s, anchor, got); \
134 listbox_todo_field_ok(t, s, caret, got); \
135 listbox_todo_field_ok(t, s, selcount, got)
136
137 static void
138 check (const struct listbox_test test)
139 {
140 struct listbox_stat answer;
141 HWND hLB=create_listbox (test.prop.add_style, 0);
142 RECT second_item;
143 int i;
144 int res;
145
146 listbox_query (hLB, &answer);
147 listbox_ok (test, init, answer);
148
149 SendMessage (hLB, LB_GETITEMRECT, (WPARAM) 1, (LPARAM) &second_item);
150 buttonpress(hLB, (WORD)second_item.left, (WORD)second_item.top);
151
152 listbox_query (hLB, &answer);
153 listbox_ok (test, click, answer);
154
155 keypress (hLB, VK_DOWN, 0x50, TRUE);
156
157 listbox_query (hLB, &answer);
158 listbox_ok (test, step, answer);
159
160 DestroyWindow (hLB);
161 hLB=create_listbox (test.prop.add_style, 0);
162
163 SendMessage (hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, 2));
164 listbox_query (hLB, &answer);
165 listbox_ok (test, sel, answer);
166
167 for (i=0;i<4;i++) {
168 DWORD size = SendMessage (hLB, LB_GETTEXTLEN, i, 0);
169 CHAR *txt;
170 WCHAR *txtw;
171 int resA, resW;
172
173 txt = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, size+1);
174 resA=SendMessageA(hLB, LB_GETTEXT, i, (LPARAM)txt);
175 ok(!strcmp (txt, strings[i]), "returned string for item %d does not match %s vs %s\n", i, txt, strings[i]);
176
177 txtw = HeapAlloc (GetProcessHeap(), HEAP_ZERO_MEMORY, 2*size+2);
178 resW=SendMessageW(hLB, LB_GETTEXT, i, (LPARAM)txtw);
179 if (resA != resW) {
180 trace("SendMessageW(LB_GETTEXT) not supported on this platform (resA=%d resW=%d), skipping...\n",
181 resA, resW);
182 } else {
183 WideCharToMultiByte( CP_ACP, 0, txtw, -1, txt, size, NULL, NULL );
184 ok(!strcmp (txt, strings[i]), "returned string for item %d does not match %s vs %s\n", i, txt, strings[i]);
185 }
186
187 HeapFree (GetProcessHeap(), 0, txtw);
188 HeapFree (GetProcessHeap(), 0, txt);
189 }
190
191 /* Confirm the count of items, and that an invalid delete does not remove anything */
192 res = SendMessage (hLB, LB_GETCOUNT, 0, 0);
193 ok((res==4), "Expected 4 items, got %d\n", res);
194 res = SendMessage (hLB, LB_DELETESTRING, -1, 0);
195 ok((res==LB_ERR), "Expected LB_ERR items, got %d\n", res);
196 res = SendMessage (hLB, LB_DELETESTRING, 4, 0);
197 ok((res==LB_ERR), "Expected LB_ERR items, got %d\n", res);
198 res = SendMessage (hLB, LB_GETCOUNT, 0, 0);
199 ok((res==4), "Expected 4 items, got %d\n", res);
200
201 WAIT;
202 DestroyWindow (hLB);
203 }
204
205 static void check_item_height(void)
206 {
207 HWND hLB;
208 HDC hdc;
209 HFONT font;
210 TEXTMETRIC tm;
211 INT itemHeight;
212
213 hLB = create_listbox (0, 0);
214 ok ((hdc = GetDCEx( hLB, 0, DCX_CACHE )) != 0, "Can't get hdc\n");
215 ok ((font = GetCurrentObject(hdc, OBJ_FONT)) != 0, "Can't get the current font\n");
216 ok (GetTextMetrics( hdc, &tm ), "Can't read font metrics\n");
217 ReleaseDC( hLB, hdc);
218
219 ok (SendMessage(hLB, WM_SETFONT, (WPARAM)font, 0) == 0, "Can't set font\n");
220
221 itemHeight = SendMessage(hLB, LB_GETITEMHEIGHT, 0, 0);
222 ok (itemHeight == tm.tmHeight, "Item height wrong, got %d, expecting %d\n", itemHeight, tm.tmHeight);
223
224 DestroyWindow (hLB);
225
226 hLB = CreateWindow ("LISTBOX", "TestList", LBS_OWNERDRAWVARIABLE,
227 0, 0, 100, 100, NULL, NULL, NULL, 0);
228 itemHeight = SendMessage(hLB, LB_GETITEMHEIGHT, 0, 0);
229 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
230 itemHeight = SendMessage(hLB, LB_GETITEMHEIGHT, 5, 0);
231 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
232 itemHeight = SendMessage(hLB, LB_GETITEMHEIGHT, -5, 0);
233 ok(itemHeight == tm.tmHeight, "itemHeight %d\n", itemHeight);
234 DestroyWindow (hLB);
235 }
236
237 static LRESULT WINAPI main_window_proc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
238 {
239 switch (msg)
240 {
241 case WM_DRAWITEM:
242 {
243 RECT rc_item, rc_client, rc_clip;
244 DRAWITEMSTRUCT *dis = (DRAWITEMSTRUCT *)lparam;
245
246 trace("%p WM_DRAWITEM %08lx %08lx\n", hwnd, wparam, lparam);
247
248 ok(wparam == dis->CtlID, "got wParam=%08lx instead of %08x\n",
249 wparam, dis->CtlID);
250 ok(dis->CtlType == ODT_LISTBOX, "wrong CtlType %04x\n", dis->CtlType);
251
252 GetClientRect(dis->hwndItem, &rc_client);
253 trace("hwndItem %p client rect (%d,%d-%d,%d)\n", dis->hwndItem,
254 rc_client.left, rc_client.top, rc_client.right, rc_client.bottom);
255 GetClipBox(dis->hDC, &rc_clip);
256 trace("clip rect (%d,%d-%d,%d)\n", rc_clip.left, rc_clip.top, rc_clip.right, rc_clip.bottom);
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 (%d,%d-%d,%d)\n", dis->rcItem.left, dis->rcItem.top,
262 dis->rcItem.right, dis->rcItem.bottom);
263 SendMessage(dis->hwndItem, LB_GETITEMRECT, dis->itemID, (LPARAM)&rc_item);
264 trace("item rect (%d,%d-%d,%d)\n", rc_item.left, rc_item.top, rc_item.right, rc_item.bottom);
265 ok(EqualRect(&dis->rcItem, &rc_item), "item rects are not equal\n");
266
267 break;
268 }
269
270 default:
271 break;
272 }
273
274 return DefWindowProc(hwnd, msg, wparam, lparam);
275 }
276
277 static void test_ownerdraw(void)
278 {
279 WNDCLASS cls;
280 HWND parent, hLB;
281 INT ret;
282 RECT rc;
283
284 cls.style = 0;
285 cls.lpfnWndProc = main_window_proc;
286 cls.cbClsExtra = 0;
287 cls.cbWndExtra = 0;
288 cls.hInstance = GetModuleHandle(0);
289 cls.hIcon = 0;
290 cls.hCursor = LoadCursor(0, IDC_ARROW);
291 cls.hbrBackground = GetStockObject(WHITE_BRUSH);
292 cls.lpszMenuName = NULL;
293 cls.lpszClassName = "main_window_class";
294 assert(RegisterClass(&cls));
295
296 parent = CreateWindowEx(0, "main_window_class", NULL,
297 WS_POPUP | WS_VISIBLE,
298 100, 100, 400, 400,
299 GetDesktopWindow(), 0,
300 GetModuleHandle(0), NULL);
301 assert(parent);
302
303 hLB = create_listbox(LBS_OWNERDRAWFIXED | WS_CHILD | WS_VISIBLE, parent);
304 assert(hLB);
305
306 SetForegroundWindow(hLB);
307 UpdateWindow(hLB);
308
309 /* make height short enough */
310 SendMessage(hLB, LB_GETITEMRECT, 0, (LPARAM)&rc);
311 SetWindowPos(hLB, 0, 0, 0, 100, rc.bottom - rc.top + 1,
312 SWP_NOZORDER | SWP_NOMOVE);
313
314 /* make 0 item invisible */
315 SendMessage(hLB, LB_SETTOPINDEX, 1, 0);
316 ret = SendMessage(hLB, LB_GETTOPINDEX, 0, 0);
317 ok(ret == 1, "wrong top index %d\n", ret);
318
319 SendMessage(hLB, LB_GETITEMRECT, 0, (LPARAM)&rc);
320 trace("item 0 rect (%d,%d-%d,%d)\n", rc.left, rc.top, rc.right, rc.bottom);
321 ok(!IsRectEmpty(&rc), "empty item rect\n");
322 ok(rc.top < 0, "rc.top is not negative (%d)\n", rc.top);
323
324 DestroyWindow(hLB);
325 DestroyWindow(parent);
326 }
327
328 #define listbox_test_query(exp, got) \
329 ok(exp.selected == got.selected, "expected selected %d, got %d\n", exp.selected, got.selected); \
330 ok(exp.anchor == got.anchor, "expected anchor %d, got %d\n", exp.anchor, got.anchor); \
331 ok(exp.caret == got.caret, "expected caret %d, got %d\n", exp.caret, got.caret); \
332 ok(exp.selcount == got.selcount, "expected selcount %d, got %d\n", exp.selcount, got.selcount);
333
334 static void test_selection(void)
335 {
336 static const struct listbox_stat test_nosel = { 0, LB_ERR, 0, 0 };
337 static const struct listbox_stat test_1 = { 0, LB_ERR, 0, 2 };
338 static const struct listbox_stat test_2 = { 0, LB_ERR, 0, 3 };
339 static const struct listbox_stat test_3 = { 0, LB_ERR, 0, 4 };
340 HWND hLB;
341 struct listbox_stat answer;
342 INT ret;
343
344 trace("testing LB_SELITEMRANGE\n");
345
346 hLB = create_listbox(LBS_EXTENDEDSEL, 0);
347 assert(hLB);
348
349 listbox_query(hLB, &answer);
350 listbox_test_query(test_nosel, answer);
351
352 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, 2));
353 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
354 listbox_query(hLB, &answer);
355 listbox_test_query(test_1, answer);
356
357 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
358 listbox_query(hLB, &answer);
359 listbox_test_query(test_nosel, answer);
360
361 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(0, 4));
362 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
363 listbox_query(hLB, &answer);
364 listbox_test_query(test_3, answer);
365
366 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
367 listbox_query(hLB, &answer);
368 listbox_test_query(test_nosel, answer);
369
370 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(-5, 5));
371 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
372 listbox_query(hLB, &answer);
373 listbox_test_query(test_nosel, answer);
374
375 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
376 listbox_query(hLB, &answer);
377 listbox_test_query(test_nosel, answer);
378
379 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(2, 10));
380 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
381 listbox_query(hLB, &answer);
382 listbox_test_query(test_1, answer);
383
384 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
385 listbox_query(hLB, &answer);
386 listbox_test_query(test_nosel, answer);
387
388 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(4, 10));
389 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
390 listbox_query(hLB, &answer);
391 listbox_test_query(test_nosel, answer);
392
393 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
394 listbox_query(hLB, &answer);
395 listbox_test_query(test_nosel, answer);
396
397 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(10, 1));
398 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
399 listbox_query(hLB, &answer);
400 listbox_test_query(test_2, answer);
401
402 SendMessage(hLB, LB_SETSEL, FALSE, (LPARAM)-1);
403 listbox_query(hLB, &answer);
404 listbox_test_query(test_nosel, answer);
405
406 ret = SendMessage(hLB, LB_SELITEMRANGE, TRUE, MAKELPARAM(1, -1));
407 ok(ret == LB_OKAY, "LB_SELITEMRANGE returned %d instead of LB_OKAY\n", ret);
408 listbox_query(hLB, &answer);
409 listbox_test_query(test_2, answer);
410
411 DestroyWindow(hLB);
412 }
413
414 static void test_listbox_height(void)
415 {
416 HWND hList;
417 int r, id;
418
419 hList = CreateWindow( "ListBox", "list test", 0,
420 1, 1, 600, 100, NULL, NULL, NULL, NULL );
421 ok( hList != NULL, "failed to create listbox\n");
422
423 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
424 ok( id == 0, "item id wrong\n");
425
426 r = SendMessage( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 20, 0 ));
427 ok( r == 0, "send message failed\n");
428
429 r = SendMessage(hList, LB_GETITEMHEIGHT, 0, 0 );
430 ok( r == 20, "height wrong\n");
431
432 r = SendMessage( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0, 30 ));
433 ok( r == -1, "send message failed\n");
434
435 r = SendMessage(hList, LB_GETITEMHEIGHT, 0, 0 );
436 ok( r == 20, "height wrong\n");
437
438 r = SendMessage( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0x100, 0 ));
439 ok( r == -1, "send message failed\n");
440
441 r = SendMessage(hList, LB_GETITEMHEIGHT, 0, 0 );
442 ok( r == 20, "height wrong\n");
443
444 r = SendMessage( hList, LB_SETITEMHEIGHT, 0, MAKELPARAM( 0xff, 0 ));
445 ok( r == 0, "send message failed\n");
446
447 r = SendMessage(hList, LB_GETITEMHEIGHT, 0, 0 );
448 ok( r == 0xff, "height wrong\n");
449
450 DestroyWindow( hList );
451 }
452
453 static void test_itemfrompoint(void)
454 {
455 /* WS_POPUP is required in order to have a more accurate size calculation (
456 without caption). LBS_NOINTEGRALHEIGHT is required in order to test
457 behavior of partially-displayed item.
458 */
459 HWND hList = CreateWindow( "ListBox", "list test",
460 WS_VISIBLE|WS_POPUP|LBS_NOINTEGRALHEIGHT,
461 1, 1, 600, 100, NULL, NULL, NULL, NULL );
462 ULONG r, id;
463 RECT rc;
464
465 /* For an empty listbox win2k returns 0x1ffff, win98 returns 0x10000, nt4 returns 0xffffffff */
466 r = SendMessage(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 30 ));
467 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
468
469 r = SendMessage(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( 700, 30 ));
470 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
471
472 r = SendMessage(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( 30, 300 ));
473 ok( r == 0x1ffff || r == 0x10000 || r == 0xffffffff, "ret %x\n", r );
474
475 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
476 ok( id == 0, "item id wrong\n");
477 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi1");
478 ok( id == 1, "item id wrong\n");
479
480 r = SendMessage(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 30 ));
481 ok( r == 0x1, "ret %x\n", r );
482
483 r = SendMessage(hList, LB_ITEMFROMPOINT, 0, MAKELPARAM( /* x */ 30, /* y */ 601 ));
484 ok( r == 0x10001 || broken(r == 1), /* nt4 */
485 "ret %x\n", r );
486
487 /* Resize control so that below assertions about sizes are valid */
488 r = SendMessage( hList, LB_GETITEMRECT, 0, (LPARAM)&rc);
489 ok( r == 1, "ret %x\n", r);
490 r = MoveWindow(hList, 1, 1, 600, (rc.bottom - rc.top + 1) * 9 / 2, TRUE);
491 ok( r != 0, "ret %x\n", r);
492
493 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi2");
494 ok( id == 2, "item id wrong\n");
495 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi3");
496 ok( id == 3, "item id wrong\n");
497 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi4");
498 ok( id == 4, "item id wrong\n");
499 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi5");
500 ok( id == 5, "item id wrong\n");
501 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi6");
502 ok( id == 6, "item id wrong\n");
503 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi7");
504 ok( id == 7, "item id wrong\n");
505
506 /* Set the listbox up so that id 1 is at the top, this leaves 5
507 partially visible at the bottom and 6, 7 are invisible */
508
509 SendMessage( hList, LB_SETTOPINDEX, 1, 0);
510 r = SendMessage( hList, LB_GETTOPINDEX, 0, 0);
511 ok( r == 1, "top %d\n", r);
512
513 r = SendMessage( hList, LB_GETITEMRECT, 5, (LPARAM)&rc);
514 ok( r == 1, "ret %x\n", r);
515 r = SendMessage( hList, LB_GETITEMRECT, 6, (LPARAM)&rc);
516 ok( r == 0, "ret %x\n", r);
517
518 r = SendMessage( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(/* x */ 10, /* y */ 10) );
519 ok( r == 1, "ret %x\n", r);
520
521 r = SendMessage( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(1000, 10) );
522 ok( r == 0x10001 || broken(r == 1), /* nt4 */
523 "ret %x\n", r );
524
525 r = SendMessage( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, -10) );
526 ok( r == 0x10001 || broken(r == 1), /* nt4 */
527 "ret %x\n", r );
528
529 r = SendMessage( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, 100) );
530 ok( r == 0x10005 || broken(r == 5), /* nt4 */
531 "item %x\n", r );
532
533 r = SendMessage( hList, LB_ITEMFROMPOINT, 0, MAKELPARAM(10, 200) );
534 ok( r == 0x10005 || broken(r == 5), /* nt4 */
535 "item %x\n", r );
536
537 DestroyWindow( hList );
538 }
539
540 static void test_listbox_item_data(void)
541 {
542 HWND hList;
543 int r, id;
544
545 hList = CreateWindow( "ListBox", "list test", 0,
546 1, 1, 600, 100, NULL, NULL, NULL, NULL );
547 ok( hList != NULL, "failed to create listbox\n");
548
549 id = SendMessage( hList, LB_ADDSTRING, 0, (LPARAM) "hi");
550 ok( id == 0, "item id wrong\n");
551
552 r = SendMessage( hList, LB_SETITEMDATA, 0, MAKELPARAM( 20, 0 ));
553 ok(r == TRUE, "LB_SETITEMDATA returned %d instead of TRUE\n", r);
554
555 r = SendMessage( hList, LB_GETITEMDATA, 0, 0);
556 ok( r == 20, "get item data failed\n");
557
558 DestroyWindow( hList );
559 }
560
561 static void test_listbox_LB_DIR(void)
562 {
563 HWND hList;
564 int res, itemCount;
565 int itemCount_justFiles;
566 int itemCount_justDrives;
567 int itemCount_allFiles;
568 int itemCount_allDirs;
569 int i;
570 char pathBuffer[MAX_PATH];
571 char * p;
572 char driveletter;
573 const char *wildcard = "*";
574 HANDLE file;
575
576 file = CreateFileA( "wtest1.tmp.c", GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL );
577 ok(file != INVALID_HANDLE_VALUE, "Error creating the test file: %d\n", GetLastError());
578 CloseHandle( file );
579
580 /* NOTE: for this test to succeed, there must be no subdirectories
581 under the current directory. In addition, there must be at least
582 one file that fits the wildcard w*.c . Normally, the test
583 directory itself satisfies both conditions.
584 */
585 hList = CreateWindow( "ListBox", "list test", WS_VISIBLE|WS_POPUP,
586 1, 1, 600, 100, NULL, NULL, NULL, NULL );
587 assert(hList);
588
589 /* Test for standard usage */
590
591 /* This should list all the files in the test directory. */
592 strcpy(pathBuffer, wildcard);
593 SendMessage(hList, LB_RESETCONTENT, 0, 0);
594 res = SendMessage(hList, LB_DIR, 0, (LPARAM)pathBuffer);
595 if (res == -1) /* "*" wildcard doesn't work on win9x */
596 {
597 wildcard = "*.*";
598 strcpy(pathBuffer, wildcard);
599 res = SendMessage(hList, LB_DIR, 0, (LPARAM)pathBuffer);
600 }
601 ok (res >= 0, "SendMessage(LB_DIR, 0, *) failed - 0x%08x\n", GetLastError());
602
603 /* There should be some content in the listbox */
604 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
605 ok (itemCount > 0, "SendMessage(LB_DIR) did NOT fill the listbox!\n");
606 itemCount_allFiles = itemCount;
607 ok(res + 1 == itemCount,
608 "SendMessage(LB_DIR, 0, *) returned incorrect index (expected %d got %d)!\n",
609 itemCount - 1, res);
610
611 /* This tests behavior when no files match the wildcard */
612 strcpy(pathBuffer, BAD_EXTENSION);
613 SendMessage(hList, LB_RESETCONTENT, 0, 0);
614 res = SendMessage(hList, LB_DIR, 0, (LPARAM)pathBuffer);
615 ok (res == -1, "SendMessage(LB_DIR, 0, %s) returned %d, expected -1\n", BAD_EXTENSION, res);
616
617 /* There should be NO content in the listbox */
618 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
619 ok (itemCount == 0, "SendMessage(LB_DIR) DID fill the listbox!\n");
620
621
622 /* This should list all the w*.c files in the test directory
623 * As of this writing, this includes win.c, winstation.c, wsprintf.c
624 */
625 strcpy(pathBuffer, "w*.c");
626 SendMessage(hList, LB_RESETCONTENT, 0, 0);
627 res = SendMessage(hList, LB_DIR, 0, (LPARAM)pathBuffer);
628 ok (res >= 0, "SendMessage(LB_DIR, 0, w*.c) failed - 0x%08x\n", GetLastError());
629
630 /* Path specification does NOT converted to uppercase */
631 ok (!strcmp(pathBuffer, "w*.c"),
632 "expected no change to pathBuffer, got %s\n", pathBuffer);
633
634 /* There should be some content in the listbox */
635 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
636 ok (itemCount > 0, "SendMessage(LB_DIR) did NOT fill the listbox!\n");
637 itemCount_justFiles = itemCount;
638 ok(res + 1 == itemCount,
639 "SendMessage(LB_DIR, 0, w*.c) returned incorrect index (expected %d got %d)!\n",
640 itemCount - 1, res);
641
642 /* Every single item in the control should start with a w and end in .c */
643 for (i = 0; i < itemCount; i++) {
644 memset(pathBuffer, 0, MAX_PATH);
645 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
646 p = pathBuffer + strlen(pathBuffer);
647 ok(((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
648 (*(p-1) == 'c' || *(p-1) == 'C') &&
649 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
650 }
651
652 /* Test DDL_DIRECTORY */
653 strcpy(pathBuffer, wildcard);
654 SendMessage(hList, LB_RESETCONTENT, 0, 0);
655 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
656 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY, *) failed - 0x%08x\n", GetLastError());
657
658 /* There should be some content in the listbox.
659 * All files plus "[..]"
660 */
661 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
662 itemCount_allDirs = itemCount - itemCount_allFiles;
663 ok (itemCount > itemCount_allFiles,
664 "SendMessage(LB_DIR, DDL_DIRECTORY, *) filled with %d entries, expected > %d\n",
665 itemCount, itemCount_allFiles);
666 ok(res + 1 == itemCount,
667 "SendMessage(LB_DIR, DDL_DIRECTORY, *) returned incorrect index (expected %d got %d)!\n",
668 itemCount - 1, res);
669
670 /* This tests behavior when no files match the wildcard */
671 strcpy(pathBuffer, BAD_EXTENSION);
672 SendMessage(hList, LB_RESETCONTENT, 0, 0);
673 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
674 ok (res == -1, "SendMessage(LB_DIR, DDL_DIRECTORY, %s) returned %d, expected -1\n", BAD_EXTENSION, res);
675
676 /* There should be NO content in the listbox */
677 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
678 ok (itemCount == 0, "SendMessage(LB_DIR) DID fill the listbox!\n");
679
680
681 /* Test DDL_DIRECTORY */
682 strcpy(pathBuffer, "w*.c");
683 SendMessage(hList, LB_RESETCONTENT, 0, 0);
684 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY, (LPARAM)pathBuffer);
685 ok (res >= 0, "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) failed - 0x%08x\n", GetLastError());
686
687 /* There should be some content in the listbox. Since the parent directory does not
688 * fit w*.c, there should be exactly the same number of items as without DDL_DIRECTORY
689 */
690 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
691 ok (itemCount == itemCount_justFiles,
692 "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) filled with %d entries, expected %d\n",
693 itemCount, itemCount_justFiles);
694 ok(res + 1 == itemCount,
695 "SendMessage(LB_DIR, DDL_DIRECTORY, w*.c) returned incorrect index (expected %d got %d)!\n",
696 itemCount - 1, res);
697
698 /* Every single item in the control should start with a w and end in .c. */
699 for (i = 0; i < itemCount; i++) {
700 memset(pathBuffer, 0, MAX_PATH);
701 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
702 p = pathBuffer + strlen(pathBuffer);
703 ok(
704 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
705 (*(p-1) == 'c' || *(p-1) == 'C') &&
706 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
707 }
708
709
710 /* Test DDL_DRIVES|DDL_EXCLUSIVE */
711 strcpy(pathBuffer, wildcard);
712 SendMessage(hList, LB_RESETCONTENT, 0, 0);
713 res = SendMessage(hList, LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
714 ok (res >= 0, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) failed - 0x%08x\n", GetLastError());
715
716 /* There should be some content in the listbox. In particular, there should
717 * be at least one element before, since the string "[-c-]" should
718 * have been added. Depending on the user setting, more drives might have
719 * been added.
720 */
721 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
722 ok (itemCount >= 1,
723 "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) filled with %d entries, expected at least %d\n",
724 itemCount, 1);
725 itemCount_justDrives = itemCount;
726 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, *) returned incorrect index!\n");
727
728 /* Every single item in the control should fit the format [-c-] */
729 for (i = 0; i < itemCount; i++) {
730 memset(pathBuffer, 0, MAX_PATH);
731 driveletter = '\0';
732 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
733 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
734 ok( sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
735 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
736 if (!(driveletter >= 'a' && driveletter <= 'z')) {
737 /* Correct after invalid entry is found */
738 trace("removing count of invalid entry %s\n", pathBuffer);
739 itemCount_justDrives--;
740 }
741 }
742
743 /* This tests behavior when no files match the wildcard */
744 strcpy(pathBuffer, BAD_EXTENSION);
745 SendMessage(hList, LB_RESETCONTENT, 0, 0);
746 res = SendMessage(hList, LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
747 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DRIVES|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
748 BAD_EXTENSION, res, itemCount_justDrives -1);
749
750 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
751 ok (itemCount == itemCount_justDrives, "SendMessage(LB_DIR) returned %d expected %d\n",
752 itemCount, itemCount_justDrives);
753
754 trace("Files with w*.c: %d Mapped drives: %d Directories: 1\n",
755 itemCount_justFiles, itemCount_justDrives);
756
757 /* Test DDL_DRIVES. */
758 strcpy(pathBuffer, wildcard);
759 SendMessage(hList, LB_RESETCONTENT, 0, 0);
760 res = SendMessage(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
761 ok (res > 0, "SendMessage(LB_DIR, DDL_DRIVES, *) failed - 0x%08x\n", GetLastError());
762
763 /* There should be some content in the listbox. In particular, there should
764 * be at least one element before, since the string "[-c-]" should
765 * have been added. Depending on the user setting, more drives might have
766 * been added.
767 */
768 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
769 ok (itemCount == itemCount_justDrives + itemCount_allFiles,
770 "SendMessage(LB_DIR, DDL_DRIVES, *) filled with %d entries, expected %d\n",
771 itemCount, itemCount_justDrives + itemCount_allFiles);
772 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES, *) returned incorrect index!\n");
773
774 /* This tests behavior when no files match the wildcard */
775 strcpy(pathBuffer, BAD_EXTENSION);
776 SendMessage(hList, LB_RESETCONTENT, 0, 0);
777 res = SendMessage(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
778 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DRIVES, %s) returned %d, expected %d\n",
779 BAD_EXTENSION, res, itemCount_justDrives -1);
780
781 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
782 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
783
784
785 /* Test DDL_DRIVES. */
786 strcpy(pathBuffer, "w*.c");
787 SendMessage(hList, LB_RESETCONTENT, 0, 0);
788 res = SendMessage(hList, LB_DIR, DDL_DRIVES, (LPARAM)pathBuffer);
789 ok (res > 0, "SendMessage(LB_DIR, DDL_DRIVES, w*.c) failed - 0x%08x\n", GetLastError());
790
791 /* There should be some content in the listbox. In particular, there should
792 * be at least one element before, since the string "[-c-]" should
793 * have been added. Depending on the user setting, more drives might have
794 * been added.
795 */
796 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
797 ok (itemCount == itemCount_justDrives + itemCount_justFiles,
798 "SendMessage(LB_DIR, DDL_DRIVES, w*.c) filled with %d entries, expected %d\n",
799 itemCount, itemCount_justDrives + itemCount_justFiles);
800 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DRIVES, w*.c) returned incorrect index!\n");
801
802 /* Every single item in the control should fit the format [-c-], or w*.c */
803 for (i = 0; i < itemCount; i++) {
804 memset(pathBuffer, 0, MAX_PATH);
805 driveletter = '\0';
806 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
807 p = pathBuffer + strlen(pathBuffer);
808 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
809 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
810 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
811 } else {
812 ok(
813 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
814 (*(p-1) == 'c' || *(p-1) == 'C') &&
815 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
816 }
817 }
818
819
820 /* Test DDL_DIRECTORY|DDL_DRIVES. This does *not* imply DDL_EXCLUSIVE */
821 strcpy(pathBuffer, wildcard);
822 SendMessage(hList, LB_RESETCONTENT, 0, 0);
823 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
824 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, *) failed - 0x%08x\n", GetLastError());
825
826 /* There should be some content in the listbox. In particular, there should
827 * be exactly the number of plain files, plus the number of mapped drives.
828 */
829 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
830 ok (itemCount == itemCount_allFiles + itemCount_justDrives + itemCount_allDirs,
831 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
832 itemCount, itemCount_allFiles + itemCount_justDrives + itemCount_allDirs);
833 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) returned incorrect index!\n");
834
835 /* Every single item in the control should start with a w and end in .c,
836 * except for the "[..]" string, which should appear exactly as it is,
837 * and the mapped drives in the format "[-X-]".
838 */
839 for (i = 0; i < itemCount; i++) {
840 memset(pathBuffer, 0, MAX_PATH);
841 driveletter = '\0';
842 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
843 p = pathBuffer + strlen(pathBuffer);
844 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
845 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
846 }
847 }
848
849 /* This tests behavior when no files match the wildcard */
850 strcpy(pathBuffer, BAD_EXTENSION);
851 SendMessage(hList, LB_RESETCONTENT, 0, 0);
852 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
853 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, %s) returned %d, expected %d\n",
854 BAD_EXTENSION, res, itemCount_justDrives -1);
855
856 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
857 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
858
859
860
861 /* Test DDL_DIRECTORY|DDL_DRIVES. */
862 strcpy(pathBuffer, "w*.c");
863 SendMessage(hList, LB_RESETCONTENT, 0, 0);
864 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES, (LPARAM)pathBuffer);
865 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) failed - 0x%08x\n", GetLastError());
866
867 /* There should be some content in the listbox. In particular, there should
868 * be exactly the number of plain files, plus the number of mapped drives.
869 */
870 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
871 ok (itemCount == itemCount_justFiles + itemCount_justDrives,
872 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
873 itemCount, itemCount_justFiles + itemCount_justDrives);
874 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES, w*.c) returned incorrect index!\n");
875
876 /* Every single item in the control should start with a w and end in .c,
877 * except the mapped drives in the format "[-X-]". The "[..]" directory
878 * should not appear.
879 */
880 for (i = 0; i < itemCount; i++) {
881 memset(pathBuffer, 0, MAX_PATH);
882 driveletter = '\0';
883 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
884 p = pathBuffer + strlen(pathBuffer);
885 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
886 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
887 } else {
888 ok(
889 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
890 (*(p-1) == 'c' || *(p-1) == 'C') &&
891 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
892 }
893 }
894
895 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
896 strcpy(pathBuffer, wildcard);
897 SendMessage(hList, LB_RESETCONTENT, 0, 0);
898 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
899 ok (res != -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, *) failed err %u\n", GetLastError());
900
901 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
902 ok (itemCount == itemCount_allDirs,
903 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
904 itemCount, itemCount_allDirs);
905 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, *) returned incorrect index!\n");
906
907 if (itemCount && GetCurrentDirectoryA( MAX_PATH, pathBuffer ) > 3) /* there's no [..] in drive root */
908 {
909 memset(pathBuffer, 0, MAX_PATH);
910 SendMessage(hList, LB_GETTEXT, 0, (LPARAM)pathBuffer);
911 ok( !strcmp(pathBuffer, "[..]"), "First element is not [..]\n");
912 }
913
914 /* This tests behavior when no files match the wildcard */
915 strcpy(pathBuffer, BAD_EXTENSION);
916 SendMessage(hList, LB_RESETCONTENT, 0, 0);
917 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
918 ok (res == -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
919 BAD_EXTENSION, res, -1);
920
921 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
922 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
923
924
925 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
926 strcpy(pathBuffer, "w*.c");
927 SendMessage(hList, LB_RESETCONTENT, 0, 0);
928 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
929 ok (res == LB_ERR, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE, w*.c) returned %d expected %d\n", res, LB_ERR);
930
931 /* There should be no elements, since "[..]" does not fit w*.c */
932 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
933 ok (itemCount == 0,
934 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
935 itemCount, 0);
936
937 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
938 strcpy(pathBuffer, wildcard);
939 SendMessage(hList, LB_RESETCONTENT, 0, 0);
940 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
941 ok (res > 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c,) failed - 0x%08x\n", GetLastError());
942
943 /* There should be no plain files on the listbox */
944 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
945 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
946 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
947 itemCount, itemCount_justDrives + itemCount_allDirs);
948 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c) returned incorrect index!\n");
949
950 for (i = 0; i < itemCount; i++) {
951 memset(pathBuffer, 0, MAX_PATH);
952 driveletter = '\0';
953 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
954 p = pathBuffer + strlen(pathBuffer);
955 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
956 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
957 } else {
958 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
959 "Element %d (%s) does not fit expected [...]\n", i, pathBuffer);
960 }
961 }
962
963 /* This tests behavior when no files match the wildcard */
964 strcpy(pathBuffer, BAD_EXTENSION);
965 SendMessage(hList, LB_RESETCONTENT, 0, 0);
966 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
967 ok (res == itemCount_justDrives -1, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, %s) returned %d, expected %d\n",
968 BAD_EXTENSION, res, itemCount_justDrives -1);
969
970 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
971 ok (itemCount == res + 1, "SendMessage(LB_DIR) returned %d expected %d\n", itemCount, res + 1);
972
973 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
974 strcpy(pathBuffer, "w*.c");
975 SendMessage(hList, LB_RESETCONTENT, 0, 0);
976 res = SendMessage(hList, LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, (LPARAM)pathBuffer);
977 ok (res >= 0, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c,) failed - 0x%08x\n", GetLastError());
978
979 /* There should be no plain files on the listbox, and no [..], since it does not fit w*.c */
980 itemCount = SendMessage(hList, LB_GETCOUNT, 0, 0);
981 ok (itemCount == itemCount_justDrives,
982 "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
983 itemCount, itemCount_justDrives);
984 ok(res + 1 == itemCount, "SendMessage(LB_DIR, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE, w*.c) returned incorrect index!\n");
985
986 for (i = 0; i < itemCount; i++) {
987 memset(pathBuffer, 0, MAX_PATH);
988 driveletter = '\0';
989 SendMessage(hList, LB_GETTEXT, i, (LPARAM)pathBuffer);
990 p = pathBuffer + strlen(pathBuffer);
991 ok (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
992 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
993 }
994 DestroyWindow(hList);
995
996 DeleteFileA( "wtest1.tmp.c" );
997 }
998
999 HWND g_listBox;
1000 HWND g_label;
1001
1002 #define ID_TEST_LABEL 1001
1003 #define ID_TEST_LISTBOX 1002
1004
1005 static BOOL on_listbox_container_create (HWND hwnd, LPCREATESTRUCT lpcs)
1006 {
1007 g_label = CreateWindow(
1008 "Static",
1009 "Contents of static control before DlgDirList.",
1010 WS_CHILD | WS_VISIBLE,
1011 10, 10, 512, 32,
1012 hwnd, (HMENU)ID_TEST_LABEL, NULL, 0);
1013 if (!g_label) return FALSE;
1014 g_listBox = CreateWindow(
1015 "ListBox",
1016 "DlgDirList test",
1017 WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_BORDER | WS_VSCROLL,
1018 10, 60, 256, 256,
1019 hwnd, (HMENU)ID_TEST_LISTBOX, NULL, 0);
1020 if (!g_listBox) return FALSE;
1021
1022 return TRUE;
1023 }
1024
1025 static LRESULT CALLBACK listbox_container_window_procA (
1026 HWND hwnd, UINT uiMsg, WPARAM wParam, LPARAM lParam)
1027 {
1028 LRESULT result = 0;
1029
1030 switch (uiMsg) {
1031 case WM_DESTROY:
1032 PostQuitMessage(0);
1033 break;
1034 case WM_CREATE:
1035 result = on_listbox_container_create(hwnd, (LPCREATESTRUCTA) lParam)
1036 ? 0 : (LRESULT)-1;
1037 break;
1038 default:
1039 result = DefWindowProcA (hwnd, uiMsg, wParam, lParam);
1040 break;
1041 }
1042 return result;
1043 }
1044
1045 static BOOL RegisterListboxWindowClass(HINSTANCE hInst)
1046 {
1047 WNDCLASSA cls;
1048
1049 cls.style = 0;
1050 cls.cbClsExtra = 0;
1051 cls.cbWndExtra = 0;
1052 cls.hInstance = hInst;
1053 cls.hIcon = NULL;
1054 cls.hCursor = LoadCursorA (NULL, IDC_ARROW);
1055 cls.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
1056 cls.lpszMenuName = NULL;
1057 cls.lpfnWndProc = listbox_container_window_procA;
1058 cls.lpszClassName = "ListboxContainerClass";
1059 if (!RegisterClassA (&cls)) return FALSE;
1060
1061 return TRUE;
1062 }
1063
1064 static void test_listbox_dlgdir(void)
1065 {
1066 HINSTANCE hInst;
1067 HWND hWnd;
1068 int res, itemCount;
1069 int itemCount_allDirs;
1070 int itemCount_justFiles;
1071 int itemCount_justDrives;
1072 int i;
1073 char pathBuffer[MAX_PATH];
1074 char itemBuffer[MAX_PATH];
1075 char tempBuffer[MAX_PATH];
1076 char * p;
1077 char driveletter;
1078 HANDLE file;
1079
1080 file = CreateFileA( "wtest1.tmp.c", GENERIC_READ|GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, NULL );
1081 ok(file != INVALID_HANDLE_VALUE, "Error creating the test file: %d\n", GetLastError());
1082 CloseHandle( file );
1083
1084 /* NOTE: for this test to succeed, there must be no subdirectories
1085 under the current directory. In addition, there must be at least
1086 one file that fits the wildcard w*.c . Normally, the test
1087 directory itself satisfies both conditions.
1088 */
1089
1090 hInst = GetModuleHandleA(0);
1091 if (!RegisterListboxWindowClass(hInst)) assert(0);
1092 hWnd = CreateWindow("ListboxContainerClass", "ListboxContainerClass",
1093 WS_OVERLAPPEDWINDOW | WS_VISIBLE,
1094 CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
1095 NULL, NULL, hInst, 0);
1096 assert(hWnd);
1097
1098 /* Test for standard usage */
1099
1100 /* The following should be overwritten by the directory path */
1101 SendMessage(g_label, WM_SETTEXT, 0, (LPARAM)"default contents");
1102
1103 /* This should list all the w*.c files in the test directory
1104 * As of this writing, this includes win.c, winstation.c, wsprintf.c
1105 */
1106 strcpy(pathBuffer, "w*.c");
1107 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL, 0);
1108 ok (res == 1, "DlgDirList(*.c, 0) returned %d - expected 1 - 0x%08x\n", res, GetLastError());
1109
1110 /* Path specification gets converted to uppercase */
1111 ok (!strcmp(pathBuffer, "W*.C"),
1112 "expected conversion to uppercase, got %s\n", pathBuffer);
1113
1114 /* Loaded path should have overwritten the label text */
1115 SendMessage(g_label, WM_GETTEXT, (WPARAM)MAX_PATH, (LPARAM)pathBuffer);
1116 trace("Static control after DlgDirList: %s\n", pathBuffer);
1117 ok (strcmp("default contents", pathBuffer), "DlgDirList() did not modify static control!\n");
1118
1119 /* There should be some content in the listbox */
1120 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1121 ok (itemCount > 0, "DlgDirList() did NOT fill the listbox!\n");
1122 itemCount_justFiles = itemCount;
1123
1124 /* Every single item in the control should start with a w and end in .c */
1125 for (i = 0; i < itemCount; i++) {
1126 memset(pathBuffer, 0, MAX_PATH);
1127 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1128 p = pathBuffer + strlen(pathBuffer);
1129 ok(((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1130 (*(p-1) == 'c' || *(p-1) == 'C') &&
1131 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1132 }
1133
1134 /* Test behavior when no files match the wildcard */
1135 strcpy(pathBuffer, BAD_EXTENSION);
1136 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL, 0);
1137 ok (res == 1, "DlgDirList(%s, 0) returned %d expected 1\n", BAD_EXTENSION, res);
1138
1139 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1140 ok (itemCount == 0, "DlgDirList() DID fill the listbox!\n");
1141
1142 /* Test DDL_DIRECTORY */
1143 strcpy(pathBuffer, "w*.c");
1144 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1145 DDL_DIRECTORY);
1146 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY) failed - 0x%08x\n", GetLastError());
1147
1148 /* There should be some content in the listbox. In particular, there should
1149 * be exactly more elements than before, since the directories should
1150 * have been added.
1151 */
1152 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1153 itemCount_allDirs = itemCount - itemCount_justFiles;
1154 ok (itemCount >= itemCount_justFiles,
1155 "DlgDirList(DDL_DIRECTORY) filled with %d entries, expected > %d\n",
1156 itemCount, itemCount_justFiles);
1157
1158 /* Every single item in the control should start with a w and end in .c,
1159 * except for the "[..]" string, which should appear exactly as it is.
1160 */
1161 for (i = 0; i < itemCount; i++) {
1162 memset(pathBuffer, 0, MAX_PATH);
1163 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1164 p = pathBuffer + strlen(pathBuffer);
1165 ok( (pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']') ||
1166 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1167 (*(p-1) == 'c' || *(p-1) == 'C') &&
1168 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1169 }
1170
1171 /* Test behavior when no files match the wildcard */
1172 strcpy(pathBuffer, BAD_EXTENSION);
1173 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1174 DDL_DIRECTORY);
1175 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY) returned %d expected 1\n", BAD_EXTENSION, res);
1176
1177 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1178 ok (itemCount == itemCount_allDirs,
1179 "DlgDirList() incorrectly filled the listbox! (expected %d got %d)\n",
1180 itemCount_allDirs, itemCount);
1181 for (i = 0; i < itemCount; i++) {
1182 memset(pathBuffer, 0, MAX_PATH);
1183 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1184 p = pathBuffer + strlen(pathBuffer);
1185 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
1186 "Element %d (%s) does not fit requested [...]\n", i, pathBuffer);
1187 }
1188
1189
1190 /* Test DDL_DRIVES. At least on WinXP-SP2, this implies DDL_EXCLUSIVE */
1191 strcpy(pathBuffer, "w*.c");
1192 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1193 DDL_DRIVES);
1194 ok (res == 1, "DlgDirList(*.c, DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1195
1196 /* There should be some content in the listbox. In particular, there should
1197 * be at least one element before, since the string "[-c-]" should
1198 * have been added. Depending on the user setting, more drives might have
1199 * been added.
1200 */
1201 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1202 ok (itemCount >= 1,
1203 "DlgDirList(DDL_DRIVES) filled with %d entries, expected at least %d\n",
1204 itemCount, 1);
1205 itemCount_justDrives = itemCount;
1206
1207 /* Every single item in the control should fit the format [-c-] */
1208 for (i = 0; i < itemCount; i++) {
1209 memset(pathBuffer, 0, MAX_PATH);
1210 driveletter = '\0';
1211 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1212 ok( strlen(pathBuffer) == 5, "Length of drive string is not 5\n" );
1213 ok( sscanf(pathBuffer, "[-%c-]", &driveletter) == 1, "Element %d (%s) does not fit [-X-]\n", i, pathBuffer);
1214 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1215 if (!(driveletter >= 'a' && driveletter <= 'z')) {
1216 /* Correct after invalid entry is found */
1217 trace("removing count of invalid entry %s\n", pathBuffer);
1218 itemCount_justDrives--;
1219 }
1220 }
1221
1222 /* Test behavior when no files match the wildcard */
1223 strcpy(pathBuffer, BAD_EXTENSION);
1224 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1225 DDL_DRIVES);
1226 ok (res == 1, "DlgDirList(%s, DDL_DRIVES) returned %d expected 1\n", BAD_EXTENSION, res);
1227
1228 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1229 ok (itemCount == itemCount_justDrives, "DlgDirList() incorrectly filled the listbox!\n");
1230
1231
1232 /* Test DDL_DIRECTORY|DDL_DRIVES. This does *not* imply DDL_EXCLUSIVE */
1233 strcpy(pathBuffer, "w*.c");
1234 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1235 DDL_DIRECTORY|DDL_DRIVES);
1236 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1237
1238 /* There should be some content in the listbox. In particular, there should
1239 * be exactly the number of plain files, plus the number of mapped drives,
1240 * plus one "[..]"
1241 */
1242 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1243 ok (itemCount == itemCount_justFiles + itemCount_justDrives + itemCount_allDirs,
1244 "DlgDirList(DDL_DIRECTORY|DDL_DRIVES) filled with %d entries, expected %d\n",
1245 itemCount, itemCount_justFiles + itemCount_justDrives + itemCount_allDirs);
1246
1247 /* Every single item in the control should start with a w and end in .c,
1248 * except for the "[..]" string, which should appear exactly as it is,
1249 * and the mapped drives in the format "[-X-]".
1250 */
1251 for (i = 0; i < itemCount; i++) {
1252 memset(pathBuffer, 0, MAX_PATH);
1253 driveletter = '\0';
1254 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1255 p = pathBuffer + strlen(pathBuffer);
1256 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
1257 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1258 } else {
1259 ok( (pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']') ||
1260 ((pathBuffer[0] == 'w' || pathBuffer[0] == 'W') &&
1261 (*(p-1) == 'c' || *(p-1) == 'C') &&
1262 (*(p-2) == '.')), "Element %d (%s) does not fit requested w*.c\n", i, pathBuffer);
1263 }
1264 }
1265
1266 /* Test behavior when no files match the wildcard */
1267 strcpy(pathBuffer, BAD_EXTENSION);
1268 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1269 DDL_DIRECTORY|DDL_DRIVES);
1270 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_DRIVES) returned %d expected 1\n", BAD_EXTENSION, res);
1271
1272 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1273 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1274 "DlgDirList() incorrectly filled the listbox! (expected %d got %d)\n",
1275 itemCount_justDrives + itemCount_allDirs, itemCount);
1276
1277
1278
1279 /* Test DDL_DIRECTORY|DDL_EXCLUSIVE. */
1280 strcpy(pathBuffer, "w*.c");
1281 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1282 DDL_DIRECTORY|DDL_EXCLUSIVE);
1283 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_EXCLUSIVE) failed - 0x%08x\n", GetLastError());
1284
1285 /* There should be exactly one element: "[..]" */
1286 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1287 ok (itemCount == itemCount_allDirs,
1288 "DlgDirList(DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
1289 itemCount, itemCount_allDirs);
1290
1291 if (itemCount && GetCurrentDirectoryA( MAX_PATH, pathBuffer ) > 3) /* there's no [..] in drive root */
1292 {
1293 memset(pathBuffer, 0, MAX_PATH);
1294 SendMessage(g_listBox, LB_GETTEXT, 0, (LPARAM)pathBuffer);
1295 ok( !strcmp(pathBuffer, "[..]"), "First (and only) element is not [..]\n");
1296 }
1297
1298 /* Test behavior when no files match the wildcard */
1299 strcpy(pathBuffer, BAD_EXTENSION);
1300 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1301 DDL_DIRECTORY|DDL_EXCLUSIVE);
1302 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_EXCLUSIVE) returned %d expected 1\n", BAD_EXTENSION, res);
1303
1304 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1305 ok (itemCount == itemCount_allDirs, "DlgDirList() incorrectly filled the listbox!\n");
1306
1307
1308 /* Test DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE. */
1309 strcpy(pathBuffer, "w*.c");
1310 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1311 DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE);
1312 ok (res == 1, "DlgDirList(*.c, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) failed - 0x%08x\n", GetLastError());
1313
1314 /* There should be no plain files on the listbox */
1315 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1316 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1317 "DlgDirList(DDL_DIRECTORY|DDL_EXCLUSIVE) filled with %d entries, expected %d\n",
1318 itemCount, itemCount_justDrives + itemCount_allDirs);
1319
1320 for (i = 0; i < itemCount; i++) {
1321 memset(pathBuffer, 0, MAX_PATH);
1322 driveletter = '\0';
1323 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)pathBuffer);
1324 p = pathBuffer + strlen(pathBuffer);
1325 if (sscanf(pathBuffer, "[-%c-]", &driveletter) == 1) {
1326 ok( driveletter >= 'a' && driveletter <= 'z', "Drive letter not in range a..z, got ascii %d\n", driveletter);
1327 } else {
1328 ok( pathBuffer[0] == '[' && pathBuffer[strlen(pathBuffer)-1] == ']',
1329 "Element %d (%s) does not fit expected [...]\n", i, pathBuffer);
1330 }
1331 }
1332
1333 /* Test behavior when no files match the wildcard */
1334 strcpy(pathBuffer, BAD_EXTENSION);
1335 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1336 DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE);
1337 ok (res == 1, "DlgDirList(%s, DDL_DIRECTORY|DDL_DRIVES|DDL_EXCLUSIVE) returned %d expected 1\n", BAD_EXTENSION, res);
1338
1339 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1340 ok (itemCount == itemCount_justDrives + itemCount_allDirs,
1341 "DlgDirList() incorrectly filled the listbox!\n");
1342
1343
1344 /* Now test DlgDirSelectEx() in normal operation */
1345 /* Fill with everything - drives, directory and all plain files. */
1346 strcpy(pathBuffer, "*");
1347 res = DlgDirList(hWnd, pathBuffer, ID_TEST_LISTBOX, ID_TEST_LABEL,
1348 DDL_DIRECTORY|DDL_DRIVES);
1349 ok (res != 0, "DlgDirList(*, DDL_DIRECTORY|DDL_DRIVES) failed - 0x%08x\n", GetLastError());
1350
1351 SendMessage(g_listBox, LB_SETCURSEL, -1, 0); /* Unselect any current selection */
1352 memset(pathBuffer, 0, MAX_PATH);
1353 SetLastError(0xdeadbeef);
1354 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1355 ok (GetLastError() == 0xdeadbeef,
1356 "DlgDirSelectEx() with no selection modified last error code from 0xdeadbeef to 0x%08x\n",
1357 GetLastError());
1358 ok (res == 0, "DlgDirSelectEx() with no selection returned %d, expected 0\n", res);
1359 /* WinXP-SP2 leaves pathBuffer untouched, but Win98 fills it with garbage. */
1360 /*
1361 ok (strlen(pathBuffer) == 0, "DlgDirSelectEx() with no selection filled buffer with %s\n", pathBuffer);
1362 */
1363 /* Test proper drive/dir/file recognition */
1364 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1365 for (i = 0; i < itemCount; i++) {
1366 memset(itemBuffer, 0, MAX_PATH);
1367 memset(pathBuffer, 0, MAX_PATH);
1368 memset(tempBuffer, 0, MAX_PATH);
1369 driveletter = '\0';
1370 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)itemBuffer);
1371 res = SendMessage(g_listBox, LB_SETCURSEL, i, 0);
1372 ok (res == i, "SendMessage(LB_SETCURSEL, %d) failed\n", i);
1373 if (sscanf(itemBuffer, "[-%c-]", &driveletter) == 1) {
1374 /* Current item is a drive letter */
1375 SetLastError(0xdeadbeef);
1376 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1377 ok (GetLastError() == 0xdeadbeef,
1378 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1379 i, GetLastError());
1380 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1381
1382 /* For drive letters, DlgDirSelectEx tacks on a colon */
1383 ok (pathBuffer[0] == driveletter && pathBuffer[1] == ':' && pathBuffer[2] == '\0',
1384 "%d: got \"%s\" expected \"%c:\"\n", i, pathBuffer, driveletter);
1385 } else if (itemBuffer[0] == '[') {
1386 /* Current item is the parent directory */
1387 SetLastError(0xdeadbeef);
1388 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1389 ok (GetLastError() == 0xdeadbeef,
1390 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1391 i, GetLastError());
1392 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1393
1394 /* For directories, DlgDirSelectEx tacks on a backslash */
1395 p = pathBuffer + strlen(pathBuffer);
1396 ok (*(p-1) == '\\', "DlgDirSelectEx did NOT tack on a backslash to dir, got %s\n", pathBuffer);
1397
1398 tempBuffer[0] = '[';
1399 strncpy(tempBuffer + 1, pathBuffer, strlen(pathBuffer) - 1);
1400 strcat(tempBuffer, "]");
1401 ok (!strcmp(tempBuffer, itemBuffer), "Formatted directory should be %s, got %s\n", tempBuffer, itemBuffer);
1402 } else {
1403 /* Current item is a plain file */
1404 SetLastError(0xdeadbeef);
1405 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1406 ok (GetLastError() == 0xdeadbeef,
1407 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1408 i, GetLastError());
1409 ok(res == 0, "DlgDirSelectEx() thinks %s (%s) is a drive/directory!\n", itemBuffer, pathBuffer);
1410
1411 /* NOTE: WinXP tacks a period on all files that lack an extension. This affects
1412 * for example, "Makefile", which gets reported as "Makefile."
1413 */
1414 strcpy(tempBuffer, itemBuffer);
1415 if (strchr(tempBuffer, '.') == NULL) strcat(tempBuffer, ".");
1416 ok (!strcmp(pathBuffer, tempBuffer), "Formatted file should be %s, got %s\n", tempBuffer, pathBuffer);
1417 }
1418 }
1419
1420 /* Now test DlgDirSelectEx() in abnormal operation */
1421 /* Fill list with bogus entries, that look somewhat valid */
1422 SendMessage(g_listBox, LB_RESETCONTENT, 0, 0);
1423 SendMessage(g_listBox, LB_ADDSTRING, 0, (LPARAM)"[notexist.dir]");
1424 SendMessage(g_listBox, LB_ADDSTRING, 0, (LPARAM)"notexist.fil");
1425 itemCount = SendMessage(g_listBox, LB_GETCOUNT, 0, 0);
1426 for (i = 0; i < itemCount; i++) {
1427 memset(itemBuffer, 0, MAX_PATH);
1428 memset(pathBuffer, 0, MAX_PATH);
1429 memset(tempBuffer, 0, MAX_PATH);
1430 driveletter = '\0';
1431 SendMessage(g_listBox, LB_GETTEXT, i, (LPARAM)itemBuffer);
1432 res = SendMessage(g_listBox, LB_SETCURSEL, i, 0);
1433 ok (res == i, "SendMessage(LB_SETCURSEL, %d) failed\n", i);
1434 if (sscanf(itemBuffer, "[-%c-]", &driveletter) == 1) {
1435 /* Current item is a drive letter */
1436 SetLastError(0xdeadbeef);
1437 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1438 ok (GetLastError() == 0xdeadbeef,
1439 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1440 i, GetLastError());
1441 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1442
1443 /* For drive letters, DlgDirSelectEx tacks on a colon */
1444 ok (pathBuffer[0] == driveletter && pathBuffer[1] == ':' && pathBuffer[2] == '\0',
1445 "%d: got \"%s\" expected \"%c:\"\n", i, pathBuffer, driveletter);
1446 } else if (itemBuffer[0] == '[') {
1447 /* Current item is the parent directory */
1448 SetLastError(0xdeadbeef);
1449 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1450 ok (GetLastError() == 0xdeadbeef,
1451 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1452 i, GetLastError());
1453 ok(res == 1, "DlgDirSelectEx() thinks %s (%s) is not a drive/directory!\n", itemBuffer, pathBuffer);
1454
1455 /* For directories, DlgDirSelectEx tacks on a backslash */
1456 p = pathBuffer + strlen(pathBuffer);
1457 ok (*(p-1) == '\\', "DlgDirSelectEx did NOT tack on a backslash to dir, got %s\n", pathBuffer);
1458
1459 tempBuffer[0] = '[';
1460 strncpy(tempBuffer + 1, pathBuffer, strlen(pathBuffer) - 1);
1461 strcat(tempBuffer, "]");
1462 ok (!strcmp(tempBuffer, itemBuffer), "Formatted directory should be %s, got %s\n", tempBuffer, itemBuffer);
1463 } else {
1464 /* Current item is a plain file */
1465 SetLastError(0xdeadbeef);
1466 res = DlgDirSelectEx(hWnd, pathBuffer, MAX_PATH, ID_TEST_LISTBOX);
1467 ok (GetLastError() == 0xdeadbeef,
1468 "DlgDirSelectEx() with selection at %d modified last error code from 0xdeadbeef to 0x%08x\n",
1469 i, GetLastError());
1470 ok(res == 0, "DlgDirSelectEx() thinks %s (%s) is a drive/directory!\n", itemBuffer, pathBuffer);
1471
1472 /* NOTE: WinXP and Win98 tack a period on all files that lack an extension.
1473 * This affects for example, "Makefile", which gets reported as "Makefile."
1474 */
1475 strcpy(tempBuffer, itemBuffer);
1476 if (strchr(tempBuffer, '.') == NULL) strcat(tempBuffer, ".");
1477 ok (!strcmp(pathBuffer, tempBuffer), "Formatted file should be %s, got %s\n", tempBuffer, pathBuffer);
1478 }
1479 }
1480 DestroyWindow(hWnd);
1481
1482 DeleteFileA( "wtest1.tmp.c" );
1483 }
1484
1485 START_TEST(listbox)
1486 {
1487 const struct listbox_test SS =
1488 /* {add_style} */
1489 {{0},
1490 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1491 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1492 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1493 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1494 /* {selected, anchor, caret, selcount}{TODO fields} */
1495 const struct listbox_test SS_NS =
1496 {{LBS_NOSEL},
1497 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1498 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1499 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1500 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1501 const struct listbox_test MS =
1502 {{LBS_MULTIPLESEL},
1503 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1504 { 1, 1, 1, 1}, {0,0,0,0},
1505 { 2, 1, 2, 1}, {0,0,0,0},
1506 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1507 const struct listbox_test MS_NS =
1508 {{LBS_MULTIPLESEL | LBS_NOSEL},
1509 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1510 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1511 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1512 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1513 const struct listbox_test ES =
1514 {{LBS_EXTENDEDSEL},
1515 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1516 { 1, 1, 1, 1}, {0,0,0,0},
1517 { 2, 2, 2, 1}, {0,0,0,0},
1518 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1519 const struct listbox_test ES_NS =
1520 {{LBS_EXTENDEDSEL | LBS_NOSEL},
1521 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1522 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1523 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1524 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1525 const struct listbox_test EMS =
1526 {{LBS_EXTENDEDSEL | LBS_MULTIPLESEL},
1527 { 0, LB_ERR, 0, 0}, {0,0,0,0},
1528 { 1, 1, 1, 1}, {0,0,0,0},
1529 { 2, 2, 2, 1}, {0,0,0,0},
1530 { 0, LB_ERR, 0, 2}, {0,0,0,0}};
1531 const struct listbox_test EMS_NS =
1532 {{LBS_EXTENDEDSEL | LBS_MULTIPLESEL | LBS_NOSEL},
1533 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0},
1534 { 1, 1, 1, LB_ERR}, {0,0,0,0},
1535 { 2, 2, 2, LB_ERR}, {0,0,0,0},
1536 {LB_ERR, LB_ERR, 0, LB_ERR}, {0,0,0,0}};
1537
1538 trace (" Testing single selection...\n");
1539 check (SS);
1540 trace (" ... with NOSEL\n");
1541 check (SS_NS);
1542 trace (" Testing multiple selection...\n");
1543 check (MS);
1544 trace (" ... with NOSEL\n");
1545 check (MS_NS);
1546 trace (" Testing extended selection...\n");
1547 check (ES);
1548 trace (" ... with NOSEL\n");
1549 check (ES_NS);
1550 trace (" Testing extended and multiple selection...\n");
1551 check (EMS);
1552 trace (" ... with NOSEL\n");
1553 check (EMS_NS);
1554
1555 check_item_height();
1556 test_ownerdraw();
1557 test_selection();
1558 test_listbox_height();
1559 test_itemfrompoint();
1560 test_listbox_item_data();
1561 test_listbox_LB_DIR();
1562 test_listbox_dlgdir();
1563 }
useful hacks and other patches not (yet) suitable for mainline