comctl32: When created with TCS_VERTICAL, TCS_MULTILINE is set automatically.
[wine] / 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 (PeekMessage( &msg, 0, 0, 0, PM_REMOVE )) DispatchMessage( &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         trace("parent: %p, %04x, %08lx, %08lx\n", hwnd, message, wParam, lParam);
95
96         msg.message = message;
97         msg.flags = sent|wparam|lparam;
98         if (defwndproc_counter) msg.flags |= defwinproc;
99         msg.wParam = wParam;
100         msg.lParam = lParam;
101         add_message(sequences, PARENT_SEQ_INDEX, &msg);
102     }
103
104     defwndproc_counter++;
105     ret = DefWindowProcW(hwnd, message, wParam, lParam);
106     defwndproc_counter--;
107
108     return ret;
109 }
110
111 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};
112
113 static BOOL register_parent_wnd_class(void)
114 {
115     WNDCLASSW cls;
116
117     cls.style = 0;
118     cls.lpfnWndProc = parent_wnd_proc;
119     cls.cbClsExtra = 0;
120     cls.cbWndExtra = 0;
121     cls.hInstance = GetModuleHandleW(NULL);
122     cls.hIcon = 0;
123     cls.hCursor = LoadCursorW(0, (LPCWSTR)IDC_ARROW);
124     cls.hbrBackground = GetStockObject(WHITE_BRUSH);
125     cls.lpszMenuName = NULL;
126     cls.lpszClassName = parentClassW;
127     return RegisterClassW(&cls);
128 }
129
130 static HWND create_parent_window(void)
131 {
132     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};
133     if (!register_parent_wnd_class())
134         return NULL;
135
136     return CreateWindowExW(0, parentClassW, titleW,
137                            WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX |
138                            WS_MAXIMIZEBOX | WS_VISIBLE,
139                            0, 0, 200, 100, GetDesktopWindow(),
140                            NULL, GetModuleHandleW(NULL), NULL);
141 }
142
143 static WNDPROC syslink_oldproc;
144
145 static LRESULT WINAPI syslink_subclass_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
146 {
147     static LONG defwndproc_counter = 0;
148     LRESULT ret;
149     struct message msg;
150
151     trace("syslink: %p, %04x, %08lx, %08lx\n", hwnd, message, wParam, lParam);
152
153     msg.message = message;
154     msg.flags = sent|wparam|lparam;
155     if (defwndproc_counter) msg.flags |= defwinproc;
156     msg.wParam = wParam;
157     msg.lParam = lParam;
158     add_message(sequences, SYSLINK_SEQ_INDEX, &msg);
159
160     defwndproc_counter++;
161     ret = CallWindowProcW(syslink_oldproc, hwnd, message, wParam, lParam);
162     defwndproc_counter--;
163
164     return ret;
165 }
166
167 static HWND create_syslink(DWORD style, HWND parent)
168 {
169     HWND hWndSysLink;
170     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};
171
172     /* Only Unicode will do here */
173     hWndSysLink = CreateWindowExW(0, WC_LINK, linkW,
174                                 style, 0, 0, 150, 50,
175                                 parent, NULL, GetModuleHandleW(NULL), NULL);
176     if (!hWndSysLink) return NULL;
177
178     if (GetWindowLongPtrW(hWndSysLink, GWLP_USERDATA))
179         /* On Windows XP SysLink takes GWLP_USERDATA for itself! */
180         trace("SysLink makes use of GWLP_USERDATA\n");
181
182     syslink_oldproc = (WNDPROC)SetWindowLongPtrW(hWndSysLink, GWLP_WNDPROC, (LONG_PTR)syslink_subclass_proc);
183
184     return hWndSysLink;
185 }
186
187
188 START_TEST(syslink)
189 {
190     ULONG_PTR ctx_cookie;
191     HANDLE hCtx;
192     HMODULE hComctl32;
193     BOOL (WINAPI *pInitCommonControlsEx)(const INITCOMMONCONTROLSEX*);
194     INITCOMMONCONTROLSEX iccex;
195     BOOL rc;
196     HWND hWndSysLink;
197     LONG oldstyle;
198
199     if (!load_v6_module(&ctx_cookie, &hCtx))
200         return;
201
202     /* LoadLibrary is needed. This file has no reference to functions in comctl32 */
203     hComctl32 = LoadLibraryA("comctl32.dll");
204     pInitCommonControlsEx = (void*)GetProcAddress(hComctl32, "InitCommonControlsEx");
205     if (!pInitCommonControlsEx)
206     {
207         win_skip("InitCommonControlsEx() is missing. Skipping the tests\n");
208         return;
209     }
210     iccex.dwSize = sizeof(iccex);
211     iccex.dwICC = ICC_LINK_CLASS;
212     rc = pInitCommonControlsEx(&iccex);
213     ok(rc, "InitCommonControlsEx failed (le %u)\n", GetLastError());
214     if (!rc)
215     {
216         skip("Could not register ICC_LINK_CLASS\n");
217         return;
218     }
219
220     init_msg_sequences(sequences, NUM_MSG_SEQUENCE);
221
222     /* Create parent window */
223     hWndParent = create_parent_window();
224     ok(hWndParent != NULL, "Failed to create parent Window!\n");
225     if (!hWndParent)
226     {
227         skip("Parent window not present\n");
228         return;
229     }
230     flush_events();
231
232     /* Create an invisible SysLink control */
233     flush_sequences(sequences, NUM_MSG_SEQUENCE);
234     hWndSysLink = create_syslink(WS_CHILD | WS_TABSTOP, hWndParent);
235     ok(hWndSysLink != NULL, "Expected non NULL value (le %u)\n", GetLastError());
236     if (!hWndSysLink)
237     {
238         skip("SysLink control not present?\n");
239         return;
240     }
241     flush_events();
242     ok_sequence(sequences, SYSLINK_SEQ_INDEX, empty_wnd_seq, "create SysLink", FALSE);
243     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_create_syslink_wnd_seq, "create SysLink (parent)", TRUE);
244
245     /* Make the SysLink control visible */
246     flush_sequences(sequences, NUM_MSG_SEQUENCE);
247     oldstyle = GetWindowLong(hWndSysLink, GWL_STYLE);
248     SetWindowLong(hWndSysLink, GWL_STYLE, oldstyle | WS_VISIBLE);
249     RedrawWindow(hWndSysLink, NULL, NULL, RDW_INVALIDATE);
250     flush_events();
251     ok_sequence(sequences, SYSLINK_SEQ_INDEX, visible_syslink_wnd_seq, "visible SysLink", TRUE);
252     ok_sequence(sequences, PARENT_SEQ_INDEX, parent_visible_syslink_wnd_seq, "visible SysLink (parent)", TRUE);
253
254     DestroyWindow(hWndSysLink);
255     DestroyWindow(hWndParent);
256     unload_v6_module(ctx_cookie, hCtx);
257 }