dlls/comctl32/tests/syslink.c

   1 /* Unit tests for the syslink control.
   2  *
   3  * Copyright 2011 Francois Gouget for CodeWeavers
   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 <windows.h>
  21 #include <commctrl.h>
  22
  23 #include "wine/test.h"
  24 #include "v6util.h"
  25 #include "msg.h"
  26
  27 #define expect(expected, got) ok(got == expected, "Expected %d, got %d\n", expected, got)
  28 #define NUM_MSG_SEQUENCE 2
  29 #define PARENT_SEQ_INDEX 0
  30 #define SYSLINK_SEQ_INDEX 1
  31
  32 static HWND hWndParent;
  33
  34 static struct msg_sequence *sequences[NUM_MSG_SEQUENCE];
  35
  36 static const struct message empty_wnd_seq[] = {
  37     {0}
  38 };
  39
  40 static const struct message parent_create_syslink_wnd_seq[] = {
  41     { WM_GETFONT, sent|optional}, /* Only on XP */
  42     { WM_QUERYUISTATE, sent|optional},
  43     { WM_CTLCOLORSTATIC, sent},
  44     { WM_NOTIFY, sent|wparam, 0},
  45     { WM_PARENTNOTIFY, sent|wparam, WM_CREATE},
  46     {0}
  47 };
  48
  49 static const struct message visible_syslink_wnd_seq[] = {
  50     { WM_STYLECHANGING, sent|wparam, GWL_STYLE},
  51     { WM_STYLECHANGED, sent|wparam, GWL_STYLE},
  52     { WM_PAINT, sent},
  53     {0}
  54 };
  55
  56 static const struct message parent_visible_syslink_wnd_seq[] = {
  57     { WM_CTLCOLORSTATIC, sent},
  58     { WM_NOTIFY, sent|wparam, 0},
  59     {0}
  60 };
  61
  62 /* Try to make sure pending X events have been processed before continuing */
  63 static void flush_events(void)
  64 {
  65     MSG msg;
  66     int diff = 200;
  67     int min_timeout = 100;
  68     DWORD time = GetTickCount() + diff;
  69
  70     while (diff > 0)
  71     {
  72         if (MsgWaitForMultipleObjects( 0, NULL, FALSE, min_timeout, QS_ALLINPUT ) == WAIT_TIMEOUT) break;
  73         while (PeekMessageA( &msg, 0, 0, 0, PM_REMOVE )) DispatchMessageA( &msg );
  74         diff = time - GetTickCount();
  75     }
  76 }
  77
  78 static LRESULT WINAPI parent_wnd_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
  79 {
  80     static LONG defwndproc_counter = 0;
  81     LRESULT ret;
  82     struct message msg;
  83
  84     /* log system messages, except for painting */
  85     if (message < WM_USER &&
  86         message != WM_PAINT &&
  87         message != WM_ERASEBKGND &&
  88         message != WM_NCPAINT &&
  89         message != WM_NCHITTEST &&
  90         message != WM_GETTEXT &&
  91         message != WM_GETICON &&
  92         message != WM_DEVICECHANGE)
  93     {
  94         msg.message = message;
  95         msg.flags = sent|wparam|lparam;
  96         if (defwndproc_counter) msg.flags |= defwinproc;
  97         msg.wParam = wParam;
  98         msg.lParam = lParam;
  99         add_message(sequences, PARENT_SEQ_INDEX, &msg);
 100     }
 101
 102     defwndproc_counter++;
 103     ret = DefWindowProcW(hwnd, message, wParam, lParam);
 104     defwndproc_counter--;
 105
 106     return ret;
 107 }
 108
 109 static BOOL register_parent_wnd_class(void)
 110 {
 111     WNDCLASSW cls;
 112
 113     cls.style = 0;
 114     cls.lpfnWndProc = parent_wnd_proc;
 115     cls.cbClsExtra = 0;
 116     cls.cbWndExtra = 0;
 117     cls.hInstance = GetModuleHandleW(NULL);
 118     cls.hIcon = 0;
 119     cls.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
 120     cls.hbrBackground = GetStockObject(WHITE_BRUSH);
 121     cls.lpszMenuName = NULL;
 122     cls.lpszClassName = L"Syslink test parent class";
 123     return RegisterClassW(&cls);
 124 }
 125
 126 static HWND create_parent_window(void)
 127 {
 128     if (!register_parent_wnd_class())
 129         return NULL;
 130
 131     return CreateWindowExW(0, L"Syslink test parent class", L"Syslink test parent window",
 132                            WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX |
 133                            WS_MAXIMIZEBOX | WS_VISIBLE,
 134                            0, 0, 200, 100, GetDesktopWindow(),
 135                            NULL, GetModuleHandleW(NULL), NULL);
 136 }
 137
 138 static WNDPROC syslink_oldproc;
 139
 140 static LRESULT WINAPI syslink_subclass_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
 141 {
 142     static LONG defwndproc_counter = 0;
 143     struct message msg = { 0 };
 144     LRESULT ret;
 145
 146     msg.message = message;
 147     msg.flags = sent|wparam|lparam;
 148     if (defwndproc_counter) msg.flags |= defwinproc;
 149     msg.wParam = wParam;
 150     msg.lParam = lParam;
 151     add_message(sequences, SYSLINK_SEQ_INDEX, &msg);
 152
 153     defwndproc_counter++;
 154     ret = CallWindowProcW(syslink_oldproc, hwnd, message, wParam, lParam);
 155     defwndproc_counter--;
 156
 157     return ret;
 158 }
 159
 160 static HWND create_syslink(DWORD style, HWND parent)
 161 {
 162     HWND hWndSysLink;
 163
 164     /* Only Unicode will do here */
 165     hWndSysLink = CreateWindowExW(0, WC_LINK, L"Head <a href=\"link1\">Name1</a> Middle <a href=\"link2\">Name2</a> Tail",
 166                                 style, 0, 0, 150, 50,
 167                                 parent, NULL, GetModuleHandleW(NULL), NULL);
 168     if (!hWndSysLink) return NULL;
 169
 170     if (GetWindowLongPtrW(hWndSysLink, GWLP_USERDATA))
 171         /* On Windows XP SysLink takes GWLP_USERDATA for itself! */
 172         trace("SysLink makes use of GWLP_USERDATA\n");
 173
 174     syslink_oldproc = (WNDPROC)SetWindowLongPtrW(hWndSysLink, GWLP_WNDPROC, (LONG_PTR)syslink_subclass_proc);
 175
 176     return hWndSysLink;
 177 }
 178
 179 static void test_create_syslink(void)
 180 {
 181     HWND hWndSysLink;
 182     LONG oldstyle;
 183
 184     /* Create an invisible SysLink control */
 185     flush_sequences(sequences, NUM_MSG_SEQUENCE);
 186     hWndSysLink = create_syslink(WS_CHILD | WS_TABSTOP, hWndParent);
 187     ok(hWndSysLink != NULL, "Expected non NULL value (le %lu)\n", GetLastError());
 188     flush_events();
 189     ok_sequence(sequences, SYSLINK_SEQ_INDEX, empty_wnd_seq, "create SysLink", FALSE);
 190     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_create_syslink_wnd_seq, "create SysLink (parent)", TRUE);
 191
 192     /* Make the SysLink control visible */
 193     flush_sequences(sequences, NUM_MSG_SEQUENCE);
 194     oldstyle = GetWindowLongA(hWndSysLink, GWL_STYLE);
 195     SetWindowLongA(hWndSysLink, GWL_STYLE, oldstyle | WS_VISIBLE);
 196     RedrawWindow(hWndSysLink, NULL, NULL, RDW_INVALIDATE);
 197     flush_events();
 198     ok_sequence(sequences, SYSLINK_SEQ_INDEX, visible_syslink_wnd_seq, "visible SysLink", TRUE);
 199     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_visible_syslink_wnd_seq, "visible SysLink (parent)", TRUE);
 200
 201     DestroyWindow(hWndSysLink);
 202 }
 203
 204 static void test_LM_GETIDEALHEIGHT(void)
 205 {
 206     HWND hwnd;
 207     LONG ret;
 208
 209     hwnd = create_syslink(WS_CHILD | WS_TABSTOP | WS_VISIBLE, hWndParent);
 210     ok(hwnd != NULL, "Failed to create SysLink window.\n");
 211
 212     ret = SendMessageA(hwnd, LM_GETIDEALHEIGHT, 0, 0);
 213     ok(ret > 0, "Unexpected ideal height, %ld.\n", ret);
 214
 215     DestroyWindow(hwnd);
 216 }
 217
 218 static void test_LM_GETIDEALSIZE(void)
 219 {
 220     HWND hwnd;
 221     LONG ret;
 222     SIZE sz;
 223
 224     hwnd = create_syslink(WS_CHILD | WS_TABSTOP | WS_VISIBLE, hWndParent);
 225     ok(hwnd != NULL, "Failed to create SysLink window.\n");
 226
 227     memset(&sz, 0, sizeof(sz));
 228     ret = SendMessageA(hwnd, LM_GETIDEALSIZE, 0, (LPARAM)&sz);
 229     ok(ret > 0, "Unexpected return value, %ld.\n", ret);
 230     if (sz.cy == 0)
 231         win_skip("LM_GETIDEALSIZE is not supported.\n");
 232     else
 233     {
 234         ok(sz.cx > 5, "Unexpected ideal width, %ld.\n", sz.cx);
 235         ok(sz.cy == ret, "Unexpected ideal height, %ld.\n", sz.cy);
 236     }
 237
 238     DestroyWindow(hwnd);
 239 }
 240
 241 START_TEST(syslink)
 242 {
 243     ULONG_PTR ctx_cookie;
 244     HMODULE hComctl32;
 245     POINT orig_pos;
 246     HANDLE hCtx;
 247
 248     if (!load_v6_module(&ctx_cookie, &hCtx))
 249         return;
 250
 251     /* LoadLibrary is needed. This file has no reference to functions in comctl32 */
 252     hComctl32 = LoadLibraryA("comctl32.dll");
 253     ok(hComctl32 != NULL, "Failed to load comctl32.dll.\n");
 254
 255     /* Move the cursor off the parent window */
 256     GetCursorPos(&orig_pos);
 257     SetCursorPos(400, 400);
 258
 259     init_msg_sequences(sequences, NUM_MSG_SEQUENCE);
 260
 261     /* Create parent window */
 262     hWndParent = create_parent_window();
 263     ok(hWndParent != NULL, "Failed to create parent Window!\n");
 264     flush_events();
 265
 266     test_create_syslink();
 267     test_LM_GETIDEALHEIGHT();
 268     test_LM_GETIDEALSIZE();
 269
 270     DestroyWindow(hWndParent);
 271     unload_v6_module(ctx_cookie, hCtx);
 272     SetCursorPos(orig_pos.x, orig_pos.y);
 273 }