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 */
flush_events(void)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 
parent_wnd_proc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam)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 const WCHAR parentClassW[] = {'S','y','s','l','i','n','k',' ','t','e','s','t',' ','p','a','r','e','n','t',' ','c','l','a','s','s',0};
110 
register_parent_wnd_class(void)111 static BOOL register_parent_wnd_class(void)
112 {
113     WNDCLASSW cls;
114 
115     cls.style = 0;
116     cls.lpfnWndProc = parent_wnd_proc;
117     cls.cbClsExtra = 0;
118     cls.cbWndExtra = 0;
119     cls.hInstance = GetModuleHandleW(NULL);
120     cls.hIcon = 0;
121     cls.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
122     cls.hbrBackground = GetStockObject(WHITE_BRUSH);
123     cls.lpszMenuName = NULL;
124     cls.lpszClassName = parentClassW;
125     return RegisterClassW(&cls);
126 }
127 
create_parent_window(void)128 static HWND create_parent_window(void)
129 {
130     static const WCHAR titleW[] = {'S','y','s','l','i','n','k',' ','t','e','s','t',' ','p','a','r','e','n','t',' ','w','i','n','d','o','w',0};
131     if (!register_parent_wnd_class())
132         return NULL;
133 
134     return CreateWindowExW(0, parentClassW, titleW,
135                            WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX |
136                            WS_MAXIMIZEBOX | WS_VISIBLE,
137                            0, 0, 200, 100, GetDesktopWindow(),
138                            NULL, GetModuleHandleW(NULL), NULL);
139 }
140 
141 static WNDPROC syslink_oldproc;
142 
syslink_subclass_proc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam)143 static LRESULT WINAPI syslink_subclass_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
144 {
145     static LONG defwndproc_counter = 0;
146     struct message msg = { 0 };
147     LRESULT ret;
148 
149     msg.message = message;
150     msg.flags = sent|wparam|lparam;
151     if (defwndproc_counter) msg.flags |= defwinproc;
152     msg.wParam = wParam;
153     msg.lParam = lParam;
154     add_message(sequences, SYSLINK_SEQ_INDEX, &msg);
155 
156     defwndproc_counter++;
157     ret = CallWindowProcW(syslink_oldproc, hwnd, message, wParam, lParam);
158     defwndproc_counter--;
159 
160     return ret;
161 }
162 
create_syslink(DWORD style,HWND parent)163 static HWND create_syslink(DWORD style, HWND parent)
164 {
165     HWND hWndSysLink;
166     static const WCHAR linkW[] = {'H','e','a','d',' ','<','a',' ','h','r','e','f','=','"','l','i','n','k','1','"','>','N','a','m','e','1','<','/','a','>',' ','M','i','d','d','l','e',' ','<','a',' ','h','r','e','f','=','"','l','i','n','k','2','"','>','N','a','m','e','2','<','/','a','>',' ','T','a','i','l',0};
167 
168     /* Only Unicode will do here */
169     hWndSysLink = CreateWindowExW(0, WC_LINK, linkW,
170                                 style, 0, 0, 150, 50,
171                                 parent, NULL, GetModuleHandleW(NULL), NULL);
172     if (!hWndSysLink) return NULL;
173 
174     if (GetWindowLongPtrW(hWndSysLink, GWLP_USERDATA))
175         /* On Windows XP SysLink takes GWLP_USERDATA for itself! */
176         trace("SysLink makes use of GWLP_USERDATA\n");
177 
178     syslink_oldproc = (WNDPROC)SetWindowLongPtrW(hWndSysLink, GWLP_WNDPROC, (LONG_PTR)syslink_subclass_proc);
179 
180     return hWndSysLink;
181 }
182 
test_create_syslink(void)183 static void test_create_syslink(void)
184 {
185     HWND hWndSysLink;
186     LONG oldstyle;
187 
188     /* Create an invisible SysLink control */
189     flush_sequences(sequences, NUM_MSG_SEQUENCE);
190     hWndSysLink = create_syslink(WS_CHILD | WS_TABSTOP, hWndParent);
191     ok(hWndSysLink != NULL, "Expected non NULL value (le %u)\n", GetLastError());
192     flush_events();
193     ok_sequence(sequences, SYSLINK_SEQ_INDEX, empty_wnd_seq, "create SysLink", FALSE);
194     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_create_syslink_wnd_seq, "create SysLink (parent)", TRUE);
195 
196     /* Make the SysLink control visible */
197     flush_sequences(sequences, NUM_MSG_SEQUENCE);
198     oldstyle = GetWindowLongA(hWndSysLink, GWL_STYLE);
199     SetWindowLongA(hWndSysLink, GWL_STYLE, oldstyle | WS_VISIBLE);
200     RedrawWindow(hWndSysLink, NULL, NULL, RDW_INVALIDATE);
201     flush_events();
202     ok_sequence(sequences, SYSLINK_SEQ_INDEX, visible_syslink_wnd_seq, "visible SysLink", TRUE);
203     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_visible_syslink_wnd_seq, "visible SysLink (parent)", TRUE);
204 
205     DestroyWindow(hWndSysLink);
206 }
207 
test_LM_GETIDEALHEIGHT(void)208 static void test_LM_GETIDEALHEIGHT(void)
209 {
210     HWND hwnd;
211     LONG ret;
212 
213     hwnd = create_syslink(WS_CHILD | WS_TABSTOP | WS_VISIBLE, hWndParent);
214     ok(hwnd != NULL, "Failed to create SysLink window.\n");
215 
216     ret = SendMessageA(hwnd, LM_GETIDEALHEIGHT, 0, 0);
217     ok(ret > 0, "Unexpected ideal height, %d.\n", ret);
218 
219     DestroyWindow(hwnd);
220 }
221 
test_LM_GETIDEALSIZE(void)222 static void test_LM_GETIDEALSIZE(void)
223 {
224     HWND hwnd;
225     LONG ret;
226     SIZE sz;
227 
228     hwnd = create_syslink(WS_CHILD | WS_TABSTOP | WS_VISIBLE, hWndParent);
229     ok(hwnd != NULL, "Failed to create SysLink window.\n");
230 
231     memset(&sz, 0, sizeof(sz));
232     ret = SendMessageA(hwnd, LM_GETIDEALSIZE, 0, (LPARAM)&sz);
233     ok(ret > 0, "Unexpected return value, %d.\n", ret);
234     if (sz.cy == 0)
235         win_skip("LM_GETIDEALSIZE is not supported.\n");
236     else
237     {
238         ok(sz.cx > 5, "Unexpected ideal width, %d.\n", sz.cx);
239         ok(sz.cy == ret, "Unexpected ideal height, %d.\n", sz.cy);
240     }
241 
242     DestroyWindow(hwnd);
243 }
244 
START_TEST(syslink)245 START_TEST(syslink)
246 {
247     ULONG_PTR ctx_cookie;
248     HMODULE hComctl32;
249     POINT orig_pos;
250     HANDLE hCtx;
251 
252     if (!load_v6_module(&ctx_cookie, &hCtx))
253         return;
254 
255     /* LoadLibrary is needed. This file has no reference to functions in comctl32 */
256     hComctl32 = LoadLibraryA("comctl32.dll");
257     ok(hComctl32 != NULL, "Failed to load comctl32.dll.\n");
258 
259     /* Move the cursor off the parent window */
260     GetCursorPos(&orig_pos);
261     SetCursorPos(400, 400);
262 
263     init_msg_sequences(sequences, NUM_MSG_SEQUENCE);
264 
265     /* Create parent window */
266     hWndParent = create_parent_window();
267     ok(hWndParent != NULL, "Failed to create parent Window!\n");
268     flush_events();
269 
270     test_create_syslink();
271     test_LM_GETIDEALHEIGHT();
272     test_LM_GETIDEALSIZE();
273 
274     DestroyWindow(hWndParent);
275     unload_v6_module(ctx_cookie, hCtx);
276     SetCursorPos(orig_pos.x, orig_pos.y);
277 }
278