git.oblomov.eu Git - wine/blob - dlls/user32/tests/listbox.c

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