comctl32/tests: Remove commented out struct declaration.
[wine] / dlls / comctl32 / tests / monthcal.c
1 /*
2  * comctl32 month calendar unit tests
3  *
4  * Copyright (C) 2006 Vitaliy Margolen
5  * Copyright (C) 2007 Farshad Agah
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include <stdarg.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "winuser.h"
27
28 #include "commctrl.h"
29
30 #include "wine/test.h"
31 #include "v6util.h"
32 #include <assert.h>
33 #include <windows.h>
34 #include "msg.h"
35
36 #define expect(expected, got) ok(expected == got, "Expected %d, got %d\n", expected, got);
37 #define expect_hex(expected, got) ok(expected == got, "Expected %x, got %x\n", expected, got);
38 #define expect_d(expected, got) ok(abs((expected) - (got)) <= 2, "Expected %d, got %d\n", expected, got);
39
40 #define NUM_MSG_SEQUENCES   2
41 #define PARENT_SEQ_INDEX    0
42 #define MONTHCAL_SEQ_INDEX  1
43
44 #define SEL_NOTIFY_TEST_ID  100
45
46 static struct msg_sequence *sequences[NUM_MSG_SEQUENCES];
47
48 static HWND parent_wnd;
49
50 static const struct message create_parent_window_seq[] = {
51     { WM_GETMINMAXINFO, sent },
52     { WM_NCCREATE, sent },
53     { WM_NCCALCSIZE, sent|wparam, 0 },
54     { WM_CREATE, sent },
55     { WM_SHOWWINDOW, sent|wparam, 1 },
56     { WM_WINDOWPOSCHANGING, sent|wparam, 0 },
57     { WM_QUERYNEWPALETTE, sent|optional },
58     { WM_WINDOWPOSCHANGING, sent|wparam|optional, 0 },
59     { WM_WINDOWPOSCHANGED, sent|optional },
60     { WM_ACTIVATEAPP, sent|wparam, 1 },
61     { WM_NCACTIVATE, sent },
62     { WM_ACTIVATE, sent|wparam, 1 },
63     { WM_IME_SETCONTEXT, sent|wparam|defwinproc|optional, 1 },
64     { WM_IME_NOTIFY, sent|defwinproc|optional },
65     { WM_SETFOCUS, sent|wparam|defwinproc, 0 },
66     /* Win9x adds SWP_NOZORDER below */
67     { WM_WINDOWPOSCHANGED, sent, /*|wparam, SWP_SHOWWINDOW|SWP_NOSIZE|SWP_NOMOVE|SWP_NOCLIENTSIZE|SWP_NOCLIENTMOVE*/ },
68     { WM_NCCALCSIZE, sent|wparam|optional, 1 },
69     { WM_SIZE, sent },
70     { WM_MOVE, sent },
71     { 0 }
72 };
73
74 static const struct message create_monthcal_control_seq[] = {
75     { WM_NOTIFYFORMAT, sent|lparam, 0, NF_QUERY },
76     { WM_QUERYUISTATE, sent|optional },
77     { WM_GETFONT, sent },
78     { WM_PARENTNOTIFY, sent|wparam, WM_CREATE},
79     { 0 }
80 };
81
82 static const struct message create_monthcal_multi_sel_style_seq[] = {
83     { WM_NOTIFYFORMAT, sent|lparam, 0, NF_QUERY },
84     { WM_QUERYUISTATE, sent|optional },
85     { WM_GETFONT, sent },
86     { WM_PARENTNOTIFY, sent },
87     { 0 }
88 };
89
90 static const struct message monthcal_curr_date_seq[] = {
91     { MCM_SETCURSEL, sent|wparam, 0},
92     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
93     { MCM_SETCURSEL, sent|wparam, 0},
94     { MCM_SETCURSEL, sent|wparam, 0},
95     { MCM_GETCURSEL, sent|wparam, 0},
96     { MCM_GETCURSEL, sent|wparam|lparam, 0, 0},
97     { 0 }
98 };
99
100 static const struct message monthcal_first_day_seq[] = {
101     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
102
103     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, -5},
104     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
105
106     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, -4},
107     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
108
109     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, -3},
110     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
111
112     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, -2},
113     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
114
115     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, -1},
116     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
117
118     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
119     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
120
121     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 1},
122     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
123
124     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 2},
125     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
126
127     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 3},
128     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
129
130     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 4},
131     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
132
133     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 5},
134     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
135
136     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 6},
137     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
138
139     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 7},
140     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
141
142     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 8},
143     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
144
145     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 9},
146     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
147
148     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 10},
149     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
150
151     { MCM_SETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 11},
152     { MCM_GETFIRSTDAYOFWEEK, sent|wparam|lparam, 0, 0},
153     { 0 }
154 };
155
156 static const struct message monthcal_unicode_seq[] = {
157     { MCM_GETUNICODEFORMAT, sent|wparam|lparam, 0, 0},
158     { MCM_SETUNICODEFORMAT, sent|wparam|lparam, 1, 0},
159     { MCM_GETUNICODEFORMAT, sent|wparam|lparam, 0, 0},
160     { MCM_SETUNICODEFORMAT, sent|wparam|lparam, 0, 0},
161     { MCM_GETUNICODEFORMAT, sent|wparam|lparam, 0, 0},
162     { MCM_SETUNICODEFORMAT, sent|wparam|lparam, 1, 0},
163     { 0 }
164 };
165
166 static const struct message monthcal_hit_test_seq[] = {
167     { MCM_SETCURSEL, sent|wparam, 0},
168     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
169     { MCM_HITTEST, sent|wparam, 0},
170     { MCM_HITTEST, sent|wparam, 0},
171     { MCM_HITTEST, sent|wparam, 0},
172     { MCM_HITTEST, sent|wparam, 0},
173     { MCM_HITTEST, sent|wparam, 0},
174     { MCM_HITTEST, sent|wparam, 0},
175     { MCM_HITTEST, sent|wparam, 0},
176     { MCM_HITTEST, sent|wparam, 0},
177     { MCM_HITTEST, sent|wparam, 0},
178     { MCM_HITTEST, sent|wparam, 0},
179     { 0 }
180 };
181
182 static const struct message monthcal_todaylink_seq[] = {
183     { MCM_HITTEST, sent|wparam, 0},
184     { MCM_SETTODAY, sent|wparam, 0},
185     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
186     { MCM_GETTODAY, sent|wparam, 0},
187     { WM_LBUTTONDOWN, sent|wparam, MK_LBUTTON},
188     { WM_CAPTURECHANGED, sent|wparam|lparam|defwinproc, 0, 0},
189     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
190     { MCM_GETCURSEL, sent|wparam, 0},
191     { 0 }
192 };
193
194 static const struct message monthcal_today_seq[] = {
195     { MCM_SETTODAY, sent|wparam, 0},
196     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
197     { MCM_GETTODAY, sent|wparam, 0},
198     { MCM_SETTODAY, sent|wparam, 0},
199     { WM_PAINT, sent|wparam|lparam|defwinproc, 0, 0},
200     { MCM_GETTODAY, sent|wparam, 0},
201     { 0 }
202 };
203
204 static const struct message monthcal_scroll_seq[] = {
205     { MCM_SETMONTHDELTA, sent|wparam|lparam, 2, 0},
206     { MCM_SETMONTHDELTA, sent|wparam|lparam, 3, 0},
207     { MCM_GETMONTHDELTA, sent|wparam|lparam, 0, 0},
208     { MCM_SETMONTHDELTA, sent|wparam|lparam, 12, 0},
209     { MCM_GETMONTHDELTA, sent|wparam|lparam, 0, 0},
210     { MCM_SETMONTHDELTA, sent|wparam|lparam, 15, 0},
211     { MCM_GETMONTHDELTA, sent|wparam|lparam, 0, 0},
212     { MCM_SETMONTHDELTA, sent|wparam|lparam, -5, 0},
213     { MCM_GETMONTHDELTA, sent|wparam|lparam, 0, 0},
214     { 0 }
215 };
216
217 static const struct message monthcal_monthrange_seq[] = {
218     { MCM_GETMONTHRANGE, sent|wparam, GMR_VISIBLE},
219     { MCM_GETMONTHRANGE, sent|wparam, GMR_DAYSTATE},
220     { 0 }
221 };
222
223 static const struct message monthcal_max_sel_day_seq[] = {
224     { MCM_SETMAXSELCOUNT, sent|wparam|lparam, 5, 0},
225     { MCM_GETMAXSELCOUNT, sent|wparam|lparam, 0, 0},
226     { MCM_SETMAXSELCOUNT, sent|wparam|lparam, 15, 0},
227     { MCM_GETMAXSELCOUNT, sent|wparam|lparam, 0, 0},
228     { MCM_SETMAXSELCOUNT, sent|wparam|lparam, -1, 0},
229     { MCM_GETMAXSELCOUNT, sent|wparam|lparam, 0, 0},
230     { 0 }
231 };
232
233 /* expected message sequence for parent*/
234 static const struct message destroy_monthcal_parent_msgs_seq[] = {
235     { WM_PARENTNOTIFY, sent|wparam, WM_DESTROY},
236     { 0 }
237 };
238
239 /* expected message sequence for child*/
240 static const struct message destroy_monthcal_child_msgs_seq[] = {
241     { 0x0090, sent|optional }, /* Vista */
242     { WM_SHOWWINDOW, sent|wparam|lparam, 0, 0},
243     { WM_WINDOWPOSCHANGING, sent|wparam, 0},
244     { WM_WINDOWPOSCHANGED, sent|wparam, 0},
245     { WM_DESTROY, sent|wparam|lparam, 0, 0},
246     { WM_NCDESTROY, sent|wparam|lparam, 0, 0},
247     { 0 }
248 };
249
250 static const struct message destroy_monthcal_multi_sel_style_seq[] = {
251     { 0x0090, sent|optional }, /* Vista */
252     { WM_SHOWWINDOW, sent|wparam|lparam, 0, 0},
253     { WM_WINDOWPOSCHANGING, sent|wparam, 0},
254     { WM_WINDOWPOSCHANGED, sent|wparam, 0},
255     { WM_DESTROY, sent|wparam|lparam, 0, 0},
256     { WM_NCDESTROY, sent|wparam|lparam, 0, 0},
257     { 0 }
258 };
259
260 static void test_monthcal(void)
261 {
262     HWND hwnd;
263     SYSTEMTIME st[2], st1[2], today;
264     int res, month_range;
265     DWORD limits;
266
267     hwnd = CreateWindowA(MONTHCAL_CLASSA, "MonthCal", WS_POPUP | WS_VISIBLE, CW_USEDEFAULT,
268                          0, 300, 300, 0, 0, NULL, NULL);
269     ok(hwnd != NULL, "Failed to create MonthCal\n");
270
271     /* test range just after creation */
272     memset(&st, 0xcc, sizeof(st));
273     limits = SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st);
274     ok(limits == 0 ||
275        broken(limits == GDTR_MIN), /* comctl32 <= 4.70 */
276        "No limits should be set (%d)\n", limits);
277     if (limits == GDTR_MIN)
278     {
279         win_skip("comctl32 <= 4.70 is broken\n");
280         DestroyWindow(hwnd);
281         return;
282     }
283
284     ok(0 == st[0].wYear ||
285        broken(1752 == st[0].wYear), /* comctl32 <= 4.72 */
286        "Expected 0, got %d\n", st[0].wYear);
287     ok(0 == st[0].wMonth ||
288        broken(9 == st[0].wMonth), /* comctl32 <= 4.72 */
289        "Expected 0, got %d\n", st[0].wMonth);
290     ok(0 == st[0].wDay ||
291        broken(14 == st[0].wDay), /* comctl32 <= 4.72 */
292        "Expected 0, got %d\n", st[0].wDay);
293     expect(0, st[0].wDayOfWeek);
294     expect(0, st[0].wHour);
295     expect(0, st[0].wMinute);
296     expect(0, st[0].wSecond);
297     expect(0, st[0].wMilliseconds);
298
299     expect(0, st[1].wYear);
300     expect(0, st[1].wMonth);
301     expect(0, st[1].wDay);
302     expect(0, st[1].wDayOfWeek);
303     expect(0, st[1].wHour);
304     expect(0, st[1].wMinute);
305     expect(0, st[1].wSecond);
306     expect(0, st[1].wMilliseconds);
307
308     GetSystemTime(&st[0]);
309     st[1] = st[0];
310
311     SendMessage(hwnd, MCM_GETTODAY, 0, (LPARAM)&today);
312
313     /* Invalid date/time */
314     st[0].wYear  = 2000;
315     /* Time should not matter */
316     st[1].wHour = st[1].wMinute = st[1].wSecond = 70;
317     st[1].wMilliseconds = 1200;
318     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set MAX limit\n");
319     /* invalid timestamp is written back with today data and msecs untouched */
320     expect(today.wHour, st[1].wHour);
321     expect(today.wMinute, st[1].wMinute);
322     expect(today.wSecond, st[1].wSecond);
323     expect(1200, st[1].wMilliseconds);
324
325     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "No limits should be set\n");
326     ok(st1[0].wYear != 2000, "Lower limit changed\n");
327     /* invalid timestamp should be replaced with today data, except msecs */
328     expect(today.wHour, st1[1].wHour);
329     expect(today.wMinute, st1[1].wMinute);
330     expect(today.wSecond, st1[1].wSecond);
331     expect(1200, st1[1].wMilliseconds);
332
333     /* Invalid date/time with invalid milliseconds only */
334     GetSystemTime(&st[0]);
335     st[1] = st[0];
336     /* Time should not matter */
337     st[1].wMilliseconds = 1200;
338     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set MAX limit\n");
339     /* invalid milliseconds field doesn't lead to invalid timestamp */
340     expect(st[0].wHour,   st[1].wHour);
341     expect(st[0].wMinute, st[1].wMinute);
342     expect(st[0].wSecond, st[1].wSecond);
343     expect(1200, st[1].wMilliseconds);
344
345     GetSystemTime(&st[0]);
346
347     st[1].wMonth = 0;
348     ok(!SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN | GDTR_MAX, (LPARAM)st), "Should have failed to set limits\n");
349     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "No limits should be set\n");
350     ok(st1[0].wYear != 2000, "Lower limit changed\n");
351     ok(!SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Should have failed to set MAX limit\n");
352     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "No limits should be set\n");
353     ok(st1[0].wYear != 2000, "Lower limit changed\n");
354
355     GetSystemTime(&st[0]);
356     st[0].wDay = 20;
357     st[0].wMonth = 5;
358     st[1] = st[0];
359
360     month_range = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, (LPARAM)st1);
361     st[1].wMonth--;
362     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN | GDTR_MAX, (LPARAM)st), "Failed to set both min and max limits\n");
363     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, (LPARAM)st1);
364     ok(res == month_range, "Invalid month range (%d)\n", res);
365     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == (GDTR_MIN|GDTR_MAX), "Limits should be set\n");
366
367     st[1].wMonth += 2;
368     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN | GDTR_MAX, (LPARAM)st), "Failed to set both min and max limits\n");
369     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, (LPARAM)st1);
370     ok(res == month_range, "Invalid month range (%d)\n", res);
371
372     st[1].wYear --;
373     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN | GDTR_MAX, (LPARAM)st), "Failed to set both min and max limits\n");
374     st[1].wYear += 1;
375     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN | GDTR_MAX, (LPARAM)st), "Failed to set both min and max limits\n");
376
377     st[1].wMonth -= 3;
378     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set max limit\n");
379     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "Only MAX limit should be set\n");
380     st[1].wMonth += 4;
381     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set max limit\n");
382     st[1].wYear -= 3;
383     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set max limit\n");
384     st[1].wYear += 4;
385     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set max limit\n");
386     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "Only MAX limit should be set\n");
387
388     /* set both limits, then set max < min */
389     GetSystemTime(&st[0]);
390     st[0].wDay = 25;
391     st[1] = st[0];
392     st[1].wYear++;
393     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN|GDTR_MAX, (LPARAM)st), "Failed to set limits\n");
394     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == (GDTR_MIN|GDTR_MAX), "Min limit expected\n");
395     st[1].wYear -= 2;
396     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MAX, (LPARAM)st), "Failed to set limits\n");
397     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MAX, "Max limit expected\n");
398
399     expect(0, st1[0].wYear);
400     expect(0, st1[0].wMonth);
401     expect(0, st1[0].wDay);
402     expect(0, st1[0].wDayOfWeek);
403     expect(0, st1[0].wHour);
404     expect(0, st1[0].wMinute);
405     expect(0, st1[0].wSecond);
406     expect(0, st1[0].wMilliseconds);
407
408     expect(st[1].wYear,      st1[1].wYear);
409     expect(st[1].wMonth,     st1[1].wMonth);
410     expect(st[1].wDay,       st1[1].wDay);
411     expect(st[1].wDayOfWeek, st1[1].wDayOfWeek);
412     expect(st[1].wHour,      st1[1].wHour);
413     expect(st[1].wMinute,    st1[1].wMinute);
414     expect(st[1].wSecond,    st1[1].wSecond);
415     expect(st[1].wMilliseconds, st1[1].wMilliseconds);
416
417     st[1] = st[0];
418     st[1].wYear++;
419     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN|GDTR_MAX, (LPARAM)st), "Failed to set limits\n");
420     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == (GDTR_MIN|GDTR_MAX), "Min limit expected\n");
421     st[0].wYear++; /* start == end now */
422     ok(SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN, (LPARAM)st), "Failed to set limits\n");
423     ok(SendMessage(hwnd, MCM_GETRANGE, 0, (LPARAM)st1) == GDTR_MIN, "Min limit expected\n");
424
425     expect(st[0].wYear,      st1[0].wYear);
426     expect(st[0].wMonth,     st1[0].wMonth);
427     expect(st[0].wDay,       st1[0].wDay);
428     expect(st[0].wDayOfWeek, st1[0].wDayOfWeek);
429     expect(st[0].wHour,      st1[0].wHour);
430     expect(st[0].wMinute,    st1[0].wMinute);
431     expect(st[0].wSecond,    st1[0].wSecond);
432     expect(st[0].wMilliseconds, st1[0].wMilliseconds);
433
434     expect(0, st1[1].wYear);
435     expect(0, st1[1].wMonth);
436     expect(0, st1[1].wDay);
437     expect(0, st1[1].wDayOfWeek);
438     expect(0, st1[1].wHour);
439     expect(0, st1[1].wMinute);
440     expect(0, st1[1].wSecond);
441     expect(0, st1[1].wMilliseconds);
442
443     DestroyWindow(hwnd);
444 }
445
446 static LRESULT WINAPI parent_wnd_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
447 {
448     static LONG defwndproc_counter = 0;
449     LRESULT ret;
450     struct message msg;
451
452     /* log system messages, except for painting */
453     if (message < WM_USER &&
454         message != WM_PAINT &&
455         message != WM_ERASEBKGND &&
456         message != WM_NCPAINT &&
457         message != WM_NCHITTEST &&
458         message != WM_GETTEXT &&
459         message != WM_GETICON &&
460         message != WM_DEVICECHANGE)
461     {
462         trace("parent: %p, %04x, %08lx, %08lx\n", hwnd, message, wParam, lParam);
463
464         msg.message = message;
465         msg.flags = sent|wparam|lparam;
466         if (defwndproc_counter) msg.flags |= defwinproc;
467         msg.wParam = wParam;
468         msg.lParam = lParam;
469         add_message(sequences, PARENT_SEQ_INDEX, &msg);
470     }
471
472     if (message == WM_NOTIFY)
473     {
474         NMHDR *hdr = (NMHDR*)lParam;
475         switch (hdr->code)
476         {
477           case MCN_GETDAYSTATE:
478           {
479             NMDAYSTATE *nmstate = (NMDAYSTATE*)lParam;
480             static MONTHDAYSTATE months[14] = { 0 };
481
482             ok(nmstate->cDayState > 0, "got %d\n", nmstate->cDayState);
483             ok(nmstate->cDayState <= 14, "got %d\n", nmstate->cDayState);
484             ok(nmstate->prgDayState != NULL, "got %p\n", nmstate->prgDayState);
485
486             nmstate->prgDayState = months;
487
488             return TRUE;
489           }
490           case MCN_SELECT:
491           case MCN_SELCHANGE:
492           {
493             NMSELCHANGE *nmchg = (NMSELCHANGE*)lParam;
494             SYSTEMTIME st[2];
495             BOOL is_multisel = GetWindowLongPtr(nmchg->nmhdr.hwndFrom, GWL_STYLE) &
496                         MCS_MULTISELECT;
497
498             if(GetWindowLongPtr(nmchg->nmhdr.hwndFrom, GWLP_ID) != SEL_NOTIFY_TEST_ID)
499               break;
500             SendMessage(nmchg->nmhdr.hwndFrom, is_multisel ? MCM_GETSELRANGE :
501                         MCM_GETCURSEL, 0, (LPARAM)st);
502
503             expect(st[0].wYear,  nmchg->stSelStart.wYear);
504             expect(st[0].wMonth, nmchg->stSelStart.wMonth);
505             expect(0,            nmchg->stSelStart.wDayOfWeek);
506             expect(st[0].wDay,   nmchg->stSelStart.wDay);
507
508             if(is_multisel)
509             {
510               expect(st[1].wYear,  nmchg->stSelEnd.wYear);
511               expect(st[1].wMonth, nmchg->stSelEnd.wMonth);
512               expect(0,            nmchg->stSelEnd.wDayOfWeek);
513               expect(st[1].wDay,   nmchg->stSelEnd.wDay);
514             }
515             else
516               ok(!(nmchg->stSelEnd.wYear | nmchg->stSelEnd.wMonth |
517                         nmchg->stSelEnd.wDayOfWeek | nmchg->stSelEnd.wDay |
518                         nmchg->stSelEnd.wHour | nmchg->stSelEnd.wMinute |
519                         nmchg->stSelEnd.wSecond | nmchg->stSelEnd.wMilliseconds),
520                         "Non-zero member in stSelEnd\n");
521             return TRUE;
522           }
523           default:
524             break;
525         }
526     }
527
528     defwndproc_counter++;
529     ret = DefWindowProcA(hwnd, message, wParam, lParam);
530     defwndproc_counter--;
531
532     return ret;
533 }
534
535 static BOOL register_parent_wnd_class(void)
536 {
537     WNDCLASSA cls;
538
539     cls.style = 0;
540     cls.lpfnWndProc = parent_wnd_proc;
541     cls.cbClsExtra = 0;
542     cls.cbWndExtra = 0;
543     cls.hInstance = GetModuleHandleA(NULL);
544     cls.hIcon = 0;
545     cls.hCursor = LoadCursorA(0, IDC_ARROW);
546     cls.hbrBackground = GetStockObject(WHITE_BRUSH);
547     cls.lpszMenuName = NULL;
548     cls.lpszClassName = "Month-Cal test parent class";
549     return RegisterClassA(&cls);
550 }
551
552 static HWND create_parent_window(void)
553 {
554     HWND hwnd;
555
556     InitCommonControls();
557
558     /* flush message sequences, so we can check the new sequence by the end of function */
559     flush_sequences(sequences, NUM_MSG_SEQUENCES);
560
561     if (!register_parent_wnd_class())
562         return NULL;
563
564     hwnd = CreateWindowEx(0, "Month-Cal test parent class",
565                           "Month-Cal test parent window",
566                           WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX |
567                           WS_MAXIMIZEBOX | WS_VISIBLE,
568                           0, 0, 500, 500,
569                           GetDesktopWindow(), NULL, GetModuleHandleA(NULL), NULL);
570
571     assert(hwnd);
572
573     /* check for message sequences */
574     ok_sequence(sequences, PARENT_SEQ_INDEX, create_parent_window_seq, "create parent window", FALSE);
575
576     return hwnd;
577 }
578
579 static LRESULT WINAPI monthcal_subclass_proc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
580 {
581     WNDPROC oldproc = (WNDPROC)GetWindowLongPtrA(hwnd, GWLP_USERDATA);
582     static LONG defwndproc_counter = 0;
583     LRESULT ret;
584     struct message msg;
585
586     msg.message = message;
587     msg.flags = sent|wparam|lparam;
588     if (defwndproc_counter) msg.flags |= defwinproc;
589     msg.wParam = wParam;
590     msg.lParam = lParam;
591     add_message(sequences, MONTHCAL_SEQ_INDEX, &msg);
592
593     /* some debug output for style changing */
594     if ((message == WM_STYLECHANGING ||
595          message == WM_STYLECHANGED) && lParam)
596     {
597         STYLESTRUCT *style = (STYLESTRUCT*)lParam;
598         trace("\told style: 0x%08x, new style: 0x%08x\n", style->styleOld, style->styleNew);
599     }
600
601     defwndproc_counter++;
602     ret = CallWindowProcA(oldproc, hwnd, message, wParam, lParam);
603     defwndproc_counter--;
604
605     return ret;
606 }
607
608 static HWND create_monthcal_control(DWORD style)
609 {
610     WNDPROC oldproc;
611     HWND hwnd;
612
613     hwnd = CreateWindowEx(0,
614                     MONTHCAL_CLASS,
615                     "",
616                     WS_CHILD | WS_BORDER | WS_VISIBLE | style,
617                     0, 0, 300, 400,
618                     parent_wnd, NULL, GetModuleHandleA(NULL), NULL);
619
620     if (!hwnd) return NULL;
621
622     oldproc = (WNDPROC)SetWindowLongPtrA(hwnd, GWLP_WNDPROC,
623                                         (LONG_PTR)monthcal_subclass_proc);
624     SetWindowLongPtrA(hwnd, GWLP_USERDATA, (LONG_PTR)oldproc);
625
626     SendMessage(hwnd, WM_SETFONT, (WPARAM)GetStockObject(SYSTEM_FONT), 0);
627
628     return hwnd;
629 }
630
631
632 /* Setter and Getters Tests */
633
634 static void test_color(void)
635 {
636     COLORREF color, prev;
637     HWND hwnd;
638
639     hwnd = create_monthcal_control(0);
640
641     /* invalid color index */
642     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TRAILINGTEXT + 1, 0);
643     expect(~0u, color);
644     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TRAILINGTEXT + 1, RGB(255,255,255));
645     expect(~0u, prev);
646
647     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_BACKGROUND, 0);
648     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_BACKGROUND, RGB(0,0,0));
649     expect(color, prev);
650     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_BACKGROUND, 0);
651     expect(RGB(0,0,0), color);
652     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_BACKGROUND, RGB(255,255,255));
653     expect(color, prev);
654     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_BACKGROUND, 0);
655     expect(RGB(255,255,255), color);
656
657     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_MONTHBK, 0);
658     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_MONTHBK, RGB(0,0,0));
659     expect(color, prev);
660     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_MONTHBK, 0);
661     expect(RGB(0,0,0), color);
662     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_MONTHBK, RGB(255,255,255));
663     expect(color, prev);
664     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_MONTHBK, 0);
665     expect(RGB(255,255,255), color);
666
667     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TEXT, 0);
668     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TEXT, RGB(0,0,0));
669     expect(color, prev);
670     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TEXT, 0);
671     expect(RGB(0,0,0), color);
672     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TEXT, RGB(255,255,255));
673     expect(color, prev);
674     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TEXT, 0);
675     expect(RGB(255,255,255), color);
676
677     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLEBK, 0);
678     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TITLEBK, RGB(0,0,0));
679     expect(color, prev);
680     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLEBK, 0);
681     expect(RGB(0,0,0), color);
682     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TITLEBK, RGB(255,255,255));
683     expect(color, prev);
684     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLEBK, 0);
685     expect(RGB(255,255,255), color);
686
687     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLETEXT, 0);
688     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TITLETEXT, RGB(0,0,0));
689     expect(color, prev);
690     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLETEXT, 0);
691     expect(RGB(0,0,0), color);
692     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TITLETEXT, RGB(255,255,255));
693     expect(color, prev);
694     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TITLETEXT, 0);
695     expect(RGB(255,255,255), color);
696
697     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TRAILINGTEXT, 0);
698     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TRAILINGTEXT, RGB(0,0,0));
699     expect(color, prev);
700     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TRAILINGTEXT, 0);
701     expect(RGB(0,0,0), color);
702     prev = SendMessage(hwnd, MCM_SETCOLOR, MCSC_TRAILINGTEXT, RGB(255,255,255));
703     expect(color, prev);
704     color = SendMessage(hwnd, MCM_GETCOLOR, MCSC_TRAILINGTEXT, 0);
705     expect(RGB(255,255,255), color);
706
707     DestroyWindow(hwnd);
708 }
709
710 static void test_currdate(void)
711 {
712     SYSTEMTIME st_original, st_new, st_test;
713     int res;
714     HWND hwnd;
715
716     hwnd = create_monthcal_control(0);
717
718     flush_sequences(sequences, NUM_MSG_SEQUENCES);
719
720     /* Setter and Getters for current date selected */
721     st_original.wYear = 2000;
722     st_original.wMonth = 11;
723     st_original.wDay = 28;
724     st_original.wHour = 11;
725     st_original.wMinute = 59;
726     st_original.wSecond = 30;
727     st_original.wMilliseconds = 0;
728     st_original.wDayOfWeek = 0;
729
730     st_new = st_test = st_original;
731
732     /* Should not validate the time */
733     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_test);
734     expect(1,res);
735
736     /* Overflow matters, check for wDay */
737     st_test.wDay += 4;
738     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_test);
739     expect(0,res);
740
741     /* correct wDay before checking for wMonth */
742     st_test.wDay -= 4;
743     expect(st_original.wDay, st_test.wDay);
744
745     /* Overflow matters, check for wMonth */
746     st_test.wMonth += 4;
747     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_test);
748     expect(0,res);
749
750     /* checking if gets the information right, modify st_new */
751     st_new.wYear += 4;
752     st_new.wMonth += 4;
753     st_new.wDay += 4;
754     st_new.wHour += 4;
755     st_new.wMinute += 4;
756     st_new.wSecond += 4;
757
758     res = SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st_new);
759     expect(1, res);
760
761     /* st_new change to st_origin, above settings with overflow */
762     /* should not change the current settings */
763     expect(st_original.wYear, st_new.wYear);
764     expect(st_original.wMonth, st_new.wMonth);
765     expect(st_original.wDay, st_new.wDay);
766     ok(st_original.wHour == st_new.wHour ||
767        broken(0 == st_new.wHour), /* comctl32 <= 4.70 */
768        "Expected %d, got %d\n", st_original.wHour, st_new.wHour);
769     ok(st_original.wMinute == st_new.wMinute ||
770        broken(0 == st_new.wMinute), /* comctl32 <= 4.70 */
771        "Expected %d, got %d\n", st_original.wMinute, st_new.wMinute);
772     ok(st_original.wSecond == st_new.wSecond ||
773        broken(0 == st_new.wSecond), /* comctl32 <= 4.70 */
774        "Expected %d, got %d\n", st_original.wSecond, st_new.wSecond);
775
776     /* lparam cannot be NULL */
777     res = SendMessage(hwnd, MCM_GETCURSEL, 0, 0);
778     expect(0, res);
779
780     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_curr_date_seq, "monthcal currDate", TRUE);
781
782     /* December, 31, 9999 is the maximum allowed date */
783     memset(&st_new, 0, sizeof(st_new));
784     st_new.wYear = 9999;
785     st_new.wMonth = 12;
786     st_new.wDay = 31;
787     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_new);
788     expect(1, res);
789     memset(&st_test, 0, sizeof(st_test));
790     res = SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st_test);
791     expect(1, res);
792     expect(st_new.wYear, st_test.wYear);
793     expect(st_new.wMonth, st_test.wMonth);
794     expect(st_new.wDay, st_test.wDay);
795     expect(st_new.wHour, st_test.wHour);
796     expect(st_new.wMinute, st_test.wMinute);
797     expect(st_new.wSecond, st_test.wSecond);
798     /* try one day later */
799     st_original = st_new;
800     st_new.wYear = 10000;
801     st_new.wMonth = 1;
802     st_new.wDay = 1;
803     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_new);
804     ok(0 == res ||
805        broken(1 == res), /* comctl32 <= 4.72 */
806        "Expected 0, got %d\n", res);
807     if (0 == res)
808     {
809         memset(&st_test, 0, sizeof(st_test));
810         res = SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st_test);
811         expect(1, res);
812         expect(st_original.wYear, st_test.wYear);
813         expect(st_original.wMonth, st_test.wMonth);
814         expect(st_original.wDay, st_test.wDay);
815         expect(st_original.wHour, st_test.wHour);
816         expect(st_original.wMinute, st_test.wMinute);
817         expect(st_original.wSecond, st_test.wSecond);
818     }
819
820     /* setting selection equal to current reports success even if out range */
821     memset(&st_new, 0, sizeof(st_new));
822     st_new.wYear = 2009;
823     st_new.wDay  = 5;
824     st_new.wMonth = 10;
825     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_new);
826     expect(1, res);
827     memset(&st_test, 0, sizeof(st_test));
828     st_test.wYear = 2009;
829     st_test.wDay  = 6;
830     st_test.wMonth = 10;
831     res = SendMessage(hwnd, MCM_SETRANGE, GDTR_MIN, (LPARAM)&st_test);
832     expect(1, res);
833     /* set to current again */
834     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_new);
835     expect(1, res);
836
837     /* set with invalid day of week */
838     memset(&st_test, 0, sizeof(st_test));
839     st_test.wYear = 2009;
840     st_test.wDay  = 7;
841     st_test.wMonth = 10;
842     st_test.wDayOfWeek = 100;
843     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st_test);
844     expect(1, res);
845
846     memset(&st_test, 0, sizeof(st_test));
847     res = SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st_test);
848     expect(1, res);
849     expect(2009, st_test.wYear);
850     expect(7, st_test.wDay);
851     expect(10, st_test.wMonth);
852     expect(3, st_test.wDayOfWeek);
853
854     DestroyWindow(hwnd);
855 }
856
857 static void test_firstDay(void)
858 {
859     int res, fday, i, prev;
860     CHAR b[128], caltype[3];
861     LCID lcid = LOCALE_USER_DEFAULT;
862     HWND hwnd;
863     LRESULT ret;
864
865     SetLastError(0xdeadbeef);
866     ret = GetLocaleInfoA(lcid, LOCALE_ICALENDARTYPE, caltype, 3);
867     if (ret == 0) {
868         skip("Must know local calendar type (%x)\n", GetLastError());
869         return;
870     } else if (atoi(caltype) != CAL_GREGORIAN) {
871         skip("MonthCalendar Control only supports Gregorian calendar (type: %s)\n", caltype);
872         return;
873     }
874
875     hwnd = create_monthcal_control(0);
876
877     flush_sequences(sequences, NUM_MSG_SEQUENCES);
878
879     /* Setter and Getters for first day of week */
880     /* check for locale first day */
881     if(GetLocaleInfoA(lcid, LOCALE_IFIRSTDAYOFWEEK, b, 128)){
882         fday = atoi(b);
883         trace("fday: %d\n", fday);
884         res = SendMessage(hwnd, MCM_GETFIRSTDAYOFWEEK, 0, 0);
885         expect(fday, res);
886         prev = fday;
887
888         /* checking for the values that actually will be stored as */
889         /* current first day when we set a new value */
890         for (i = -5; i < 12; i++){
891             res = SendMessage(hwnd, MCM_SETFIRSTDAYOFWEEK, 0, i);
892             expect(prev, res);
893             res = SendMessage(hwnd, MCM_GETFIRSTDAYOFWEEK, 0, 0);
894             prev = res;
895
896             if (i == -1){
897                 expect(MAKELONG(fday, FALSE), res);
898             }else if (i >= 7){
899                 /* out of range sets max first day of week, locale is ignored */
900                 expect(MAKELONG(6, TRUE), res);
901             }else{
902                 expect(MAKELONG(i, TRUE), res);
903             }
904         }
905
906         ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_first_day_seq, "monthcal firstDay", FALSE);
907
908     }else{
909         skip("Cannot retrieve first day of the week\n");
910     }
911
912     DestroyWindow(hwnd);
913 }
914
915 static void test_unicode(void)
916 {
917     int res, temp;
918     HWND hwnd;
919
920     hwnd = create_monthcal_control(0);
921
922     flush_sequences(sequences, NUM_MSG_SEQUENCES);
923
924     /* Setter and Getters for Unicode format */
925
926     /* getting the current settings */
927     temp = SendMessage(hwnd, MCM_GETUNICODEFORMAT, 0, 0);
928
929     /* setting to 1, should return previous settings */
930     res = SendMessage(hwnd, MCM_SETUNICODEFORMAT, 1, 0);
931     expect(temp, res);
932
933     /* current setting is 1, so, should return 1 */
934     res = SendMessage(hwnd, MCM_GETUNICODEFORMAT, 0, 0);
935     ok(1 == res ||
936        broken(0 == res), /* comctl32 <= 4.70 */
937        "Expected 1, got %d\n", res);
938
939     /* setting to 0, should return previous settings */
940     res = SendMessage(hwnd, MCM_SETUNICODEFORMAT, 0, 0);
941     ok(1 == res ||
942        broken(0 == res), /* comctl32 <= 4.70 */
943        "Expected 1, got %d\n", res);
944
945     /* current setting is 0, so, it should return 0 */
946     res = SendMessage(hwnd, MCM_GETUNICODEFORMAT, 0, 0);
947     expect(0, res);
948
949     /* should return previous settings */
950     res = SendMessage(hwnd, MCM_SETUNICODEFORMAT, 1, 0);
951     expect(0, res);
952
953     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_unicode_seq, "monthcal unicode", FALSE);
954
955     DestroyWindow(hwnd);
956 }
957
958 static void test_hittest(void)
959 {
960     typedef struct hittest_test
961     {
962         UINT ht;
963         int  todo;
964     } hittest_test_t;
965
966     static const hittest_test_t title_hits[] = {
967         /* Start is the same everywhere */
968         { MCHT_TITLE,        0 },
969         { MCHT_TITLEBTNPREV, 0 },
970         /* The middle piece is only tested for presence of items */
971         /* End is the same everywhere */
972         { MCHT_TITLEBTNNEXT, 0 },
973         { MCHT_TITLE,        0 },
974         { MCHT_NOWHERE,      1 }
975     };
976
977     MCHITTESTINFO mchit;
978     UINT res, old_res;
979     SYSTEMTIME st;
980     LONG x;
981     UINT title_index;
982     HWND hwnd;
983     RECT r;
984     char yearmonth[80], *locale_month, *locale_year;
985     int month_count, year_count;
986     BOOL in_the_middle;
987
988     memset(&mchit, 0, sizeof(MCHITTESTINFO));
989
990     hwnd = create_monthcal_control(0);
991
992     /* test with invalid structure size */
993     mchit.cbSize = MCHITTESTINFO_V1_SIZE - 1;
994     mchit.pt.x = 0;
995     mchit.pt.y = 0;
996     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
997     expect(0, mchit.pt.x);
998     expect(0, mchit.pt.y);
999     expect(~0u, res);
1000     expect(0, mchit.uHit);
1001     /* test with invalid pointer */
1002     res = SendMessage(hwnd, MCM_HITTEST, 0, 0);
1003     expect(~0u, res);
1004
1005     /* resize control to display single Calendar */
1006     res = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r);
1007     if (res == 0)
1008     {
1009         win_skip("Message MCM_GETMINREQRECT unsupported. Skipping.\n");
1010         DestroyWindow(hwnd);
1011         return;
1012     }
1013     MoveWindow(hwnd, 0, 0, r.right, r.bottom, FALSE);
1014
1015     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1016
1017     st.wYear = 2007;
1018     st.wMonth = 4;
1019     st.wDay = 11;
1020     st.wHour = 1;
1021     st.wMinute = 0;
1022     st.wSecond = 0;
1023     st.wMilliseconds = 0;
1024     st.wDayOfWeek = 0;
1025
1026     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st);
1027     expect(1,res);
1028
1029     /* (0, 0) is the top left of the control - title */
1030     mchit.cbSize = MCHITTESTINFO_V1_SIZE;
1031     mchit.pt.x = 0;
1032     mchit.pt.y = 0;
1033     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1034     expect(0, mchit.pt.x);
1035     expect(0, mchit.pt.y);
1036     expect(mchit.uHit, res);
1037     expect_hex(MCHT_TITLE, res);
1038
1039     /* bottom right of the control and should not be active */
1040     mchit.pt.x = r.right;
1041     mchit.pt.y = r.bottom;
1042     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1043     expect(r.right,  mchit.pt.x);
1044     expect(r.bottom, mchit.pt.y);
1045     expect(mchit.uHit, res);
1046     todo_wine expect_hex(MCHT_NOWHERE, res);
1047
1048     /* completely out of the control, should not be active */
1049     mchit.pt.x = 2 * r.right;
1050     mchit.pt.y = 2 * r.bottom;
1051     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1052     expect(2 * r.right, mchit.pt.x);
1053     expect(2 * r.bottom, mchit.pt.y);
1054     expect(mchit.uHit, res);
1055     todo_wine expect_hex(MCHT_NOWHERE, res);
1056
1057     /* in active area - day of the week */
1058     mchit.pt.x = r.right / 2;
1059     mchit.pt.y = r.bottom / 2;
1060     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1061     expect(r.right / 2, mchit.pt.x);
1062     expect(r.bottom / 2, mchit.pt.y);
1063     expect(mchit.uHit, res);
1064     expect_hex(MCHT_CALENDARDATE, res);
1065
1066     /* in active area - day of the week #2 */
1067     mchit.pt.x = r.right / 14; /* half of first day rect */
1068     mchit.pt.y = r.bottom / 2;
1069     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1070     expect(r.right / 14, mchit.pt.x);
1071     expect(r.bottom / 2, mchit.pt.y);
1072     expect(mchit.uHit, res);
1073     expect_hex(MCHT_CALENDARDATE, res);
1074
1075     /* in active area - date from prev month */
1076     mchit.pt.x = r.right / 14; /* half of first day rect */
1077     mchit.pt.y = 6 * r.bottom / 19;
1078     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1079     expect(r.right / 14, mchit.pt.x);
1080     expect(6 * r.bottom / 19, mchit.pt.y);
1081     expect(mchit.uHit, res);
1082     expect_hex(MCHT_CALENDARDATEPREV, res);
1083
1084 #if 0
1085     /* (125, 115) is in active area - date from this month */
1086     mchit.pt.x = 125;
1087     mchit.pt.y = 115;
1088     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1089     expect(125, mchit.pt.x);
1090     expect(115, mchit.pt.y);
1091     expect(mchit.uHit, res);
1092     expect(MCHT_CALENDARDATE, res);
1093 #endif
1094
1095     /* in active area - date from next month */
1096     mchit.pt.x = 11 * r.right / 14;
1097     mchit.pt.y = 16 * r.bottom / 19;
1098     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1099     expect(11 * r.right / 14, mchit.pt.x);
1100     expect(16 * r.bottom / 19, mchit.pt.y);
1101     expect(mchit.uHit, res);
1102     expect_hex(MCHT_CALENDARDATENEXT, res);
1103
1104     /* in active area - today link */
1105     mchit.pt.x = r.right / 14;
1106     mchit.pt.y = 18 * r.bottom / 19;
1107     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1108     expect(r.right / 14, mchit.pt.x);
1109     expect(18 * r.bottom / 19, mchit.pt.y);
1110     expect(mchit.uHit, res);
1111     expect_hex(MCHT_TODAYLINK, res);
1112
1113     /* in active area - today link */
1114     mchit.pt.x = r.right / 2;
1115     mchit.pt.y = 18 * r.bottom / 19;
1116     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1117     expect(r.right / 2, mchit.pt.x);
1118     expect(18 * r.bottom / 19, mchit.pt.y);
1119     expect(mchit.uHit, res);
1120     expect_hex(MCHT_TODAYLINK, res);
1121
1122     /* in active area - today link */
1123     mchit.pt.x = r.right / 10;
1124     mchit.pt.y = 18 * r.bottom / 19;
1125     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1126     expect(r.right / 10, mchit.pt.x);
1127     expect(18 * r.bottom / 19, mchit.pt.y);
1128     expect(mchit.uHit, res);
1129     expect_hex(MCHT_TODAYLINK, res);
1130
1131     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_hit_test_seq, "monthcal hit test", TRUE);
1132
1133     /* The horizontal position of title bar elements depends on locale (y pos
1134        is constant), so we sample across a horizontal line and make sure we
1135        find all elements. */
1136
1137     /* Get the format of the title */
1138     GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SYEARMONTH, yearmonth, 80);
1139     /* Find out if we have a month and/or year */
1140     locale_year = strstr(yearmonth, "y");
1141     locale_month = strstr(yearmonth, "M");
1142
1143     mchit.pt.x = 0;
1144     mchit.pt.y = (5/2) * r.bottom / 19;
1145     title_index = 0;
1146     old_res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1147     expect_hex(title_hits[title_index].ht, old_res);
1148
1149     in_the_middle = FALSE;
1150     month_count = year_count = 0;
1151     for (x = 0; x < r.right; x++){
1152         mchit.pt.x = x;
1153         res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1154         expect(x, mchit.pt.x);
1155         expect((5/2) * r.bottom / 19, mchit.pt.y);
1156         expect(mchit.uHit, res);
1157         if (res != old_res) {
1158
1159             if (old_res == MCHT_TITLEBTNPREV)
1160                 in_the_middle = TRUE;
1161
1162             if (res == MCHT_TITLEBTNNEXT)
1163                 in_the_middle = FALSE;
1164
1165             if (in_the_middle) {
1166                 if (res == MCHT_TITLEMONTH)
1167                     month_count++;
1168                 else if (res == MCHT_TITLEYEAR)
1169                     year_count++;
1170             } else {
1171                 title_index++;
1172
1173                 if (sizeof(title_hits) / sizeof(title_hits[0]) <= title_index)
1174                     break;
1175
1176                 if (title_hits[title_index].todo) {
1177                     todo_wine
1178                     ok(title_hits[title_index].ht == res, "Expected %x, got %x, pos %d\n",
1179                                                           title_hits[title_index].ht, res, x);
1180                 } else {
1181                     ok(title_hits[title_index].ht == res, "Expected %x, got %x, pos %d\n",
1182                                                           title_hits[title_index].ht, res, x);
1183                 }
1184             }
1185             old_res = res;
1186         }
1187     }
1188
1189     /* There are some limits, even if LOCALE_SYEARMONTH contains rubbish
1190      * or no month/year indicators at all */
1191     if (locale_month)
1192         todo_wine ok(month_count == 1, "Expected 1 month item, got %d\n", month_count);
1193     else
1194         ok(month_count <= 1, "Too many month items: %d\n", month_count);
1195
1196     if (locale_year)
1197         todo_wine ok(year_count == 1, "Expected 1 year item, got %d\n", year_count);
1198     else
1199         ok(year_count <= 1, "Too many year items: %d\n", year_count);
1200
1201     todo_wine ok(month_count + year_count >= 1, "Not enough month and year items\n");
1202
1203     ok(r.right <= x && title_index + 1 == sizeof(title_hits) / sizeof(title_hits[0]),
1204        "Wrong title layout\n");
1205
1206     DestroyWindow(hwnd);
1207 }
1208
1209 static void test_todaylink(void)
1210 {
1211     MCHITTESTINFO mchit;
1212     SYSTEMTIME st_test, st_new;
1213     UINT res;
1214     HWND hwnd;
1215     RECT r;
1216
1217     memset(&mchit, 0, sizeof(MCHITTESTINFO));
1218
1219     hwnd = create_monthcal_control(0);
1220
1221     res = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r);
1222     expect(1, res);
1223     MoveWindow(hwnd, 0, 0, r.right, r.bottom, FALSE);
1224
1225     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1226
1227     /* hit active area - today link */
1228     mchit.cbSize = MCHITTESTINFO_V1_SIZE;
1229     mchit.pt.x = r.right / 14;
1230     mchit.pt.y = 18 * r.bottom / 19;
1231     res = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM) & mchit);
1232     expect(r.right / 14, mchit.pt.x);
1233     expect(18 * r.bottom / 19, mchit.pt.y);
1234     expect(mchit.uHit, res);
1235     expect(MCHT_TODAYLINK, res);
1236
1237     st_test.wDay = 1;
1238     st_test.wMonth = 1;
1239     st_test.wYear = 2005;
1240
1241     res = SendMessage(hwnd, MCM_SETTODAY, 0, (LPARAM)&st_test);
1242     expect(0, res);
1243
1244     memset(&st_new, 0, sizeof(st_new));
1245     res = SendMessage(hwnd, MCM_GETTODAY, 0, (LPARAM)&st_new);
1246     expect(1, res);
1247     expect(1, st_new.wDay);
1248     expect(1, st_new.wMonth);
1249     expect(2005, st_new.wYear);
1250
1251     res = SendMessage(hwnd, WM_LBUTTONDOWN, MK_LBUTTON, MAKELONG(mchit.pt.x, mchit.pt.y));
1252     expect(0, res);
1253
1254     memset(&st_new, 0, sizeof(st_new));
1255     res = SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st_new);
1256     expect(1, res);
1257     expect(1, st_new.wDay);
1258     expect(1, st_new.wMonth);
1259     expect(2005, st_new.wYear);
1260
1261     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_todaylink_seq, "monthcal hit test", TRUE);
1262
1263     DestroyWindow(hwnd);
1264 }
1265
1266 static void test_today(void)
1267 {
1268     SYSTEMTIME st_test, st_new;
1269     int res;
1270     HWND hwnd;
1271
1272     hwnd = create_monthcal_control(0);
1273
1274     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1275
1276     /* Setter and Getters for "today" information */
1277
1278     /* check for overflow, should be ok */
1279     memset(&st_test, 0, sizeof(st_test));
1280     st_test.wDay = 38;
1281     st_test.wMonth = 38;
1282
1283     st_new.wDay = 27;
1284     st_new.wMonth = 27;
1285
1286     res = SendMessage(hwnd, MCM_SETTODAY, 0, (LPARAM)&st_test);
1287     expect(0, res);
1288
1289     res = SendMessage(hwnd, MCM_GETTODAY, 0, (LPARAM)&st_new);
1290     expect(1, res);
1291
1292     /* st_test should not change */
1293     expect(38, st_test.wDay);
1294     expect(38, st_test.wMonth);
1295
1296     /* st_new should change, overflow does not matter */
1297     expect(38, st_new.wDay);
1298     expect(38, st_new.wMonth);
1299
1300     /* check for zero, should be ok*/
1301     st_test.wDay = 0;
1302     st_test.wMonth = 0;
1303
1304     res = SendMessage(hwnd, MCM_SETTODAY, 0, (LPARAM)&st_test);
1305     expect(0, res);
1306
1307     res = SendMessage(hwnd, MCM_GETTODAY, 0, (LPARAM)&st_new);
1308     expect(1, res);
1309
1310     /* st_test should not change */
1311     expect(0, st_test.wDay);
1312     expect(0, st_test.wMonth);
1313
1314     /* st_new should change to zero*/
1315     expect(0, st_new.wDay);
1316     expect(0, st_new.wMonth);
1317
1318     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_today_seq, "monthcal today", TRUE);
1319
1320     DestroyWindow(hwnd);
1321 }
1322
1323 static void test_scroll(void)
1324 {
1325     int res;
1326     HWND hwnd;
1327
1328     hwnd = create_monthcal_control(0);
1329
1330     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1331
1332     /* Setter and Getters for scroll rate */
1333     res = SendMessage(hwnd, MCM_SETMONTHDELTA, 2, 0);
1334     expect(0, res);
1335
1336     res = SendMessage(hwnd, MCM_SETMONTHDELTA, 3, 0);
1337     expect(2, res);
1338     res = SendMessage(hwnd, MCM_GETMONTHDELTA, 0, 0);
1339     expect(3, res);
1340
1341     res = SendMessage(hwnd, MCM_SETMONTHDELTA, 12, 0);
1342     expect(3, res);
1343     res = SendMessage(hwnd, MCM_GETMONTHDELTA, 0, 0);
1344     expect(12, res);
1345
1346     res = SendMessage(hwnd, MCM_SETMONTHDELTA, 15, 0);
1347     expect(12, res);
1348     res = SendMessage(hwnd, MCM_GETMONTHDELTA, 0, 0);
1349     expect(15, res);
1350
1351     res = SendMessage(hwnd, MCM_SETMONTHDELTA, -5, 0);
1352     expect(15, res);
1353     res = SendMessage(hwnd, MCM_GETMONTHDELTA, 0, 0);
1354     expect(-5, res);
1355
1356     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_scroll_seq, "monthcal scroll", FALSE);
1357
1358     DestroyWindow(hwnd);
1359 }
1360
1361 static void test_monthrange(void)
1362 {
1363     int res;
1364     SYSTEMTIME st_visible[2], st_daystate[2], st;
1365     HWND hwnd;
1366     RECT r;
1367
1368     hwnd = create_monthcal_control(0);
1369
1370     st_visible[0].wYear = 0;
1371     st_visible[0].wMonth = 0;
1372     st_visible[0].wDay = 0;
1373     st_daystate[1] = st_daystate[0] = st_visible[1] = st_visible[0];
1374
1375     st.wYear = 2000;
1376     st.wMonth = 11;
1377     st.wDay = 28;
1378     st.wHour = 11;
1379     st.wMinute = 59;
1380     st.wSecond = 30;
1381     st.wMilliseconds = 0;
1382     st.wDayOfWeek = 0;
1383
1384     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st);
1385     expect(1,res);
1386
1387     /* to be locale independent */
1388     SendMessage(hwnd, MCM_SETFIRSTDAYOFWEEK, 0, (LPARAM)6);
1389
1390     res = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r);
1391     expect(TRUE, res);
1392     /* resize control to display two Calendars */
1393     MoveWindow(hwnd, 0, 0, r.right, (5/2)*r.bottom, FALSE);
1394
1395     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1396
1397     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, (LPARAM)st_visible);
1398     expect(2, res);
1399     expect(2000, st_visible[0].wYear);
1400     expect(11, st_visible[0].wMonth);
1401     expect(1, st_visible[0].wDay);
1402     expect(2000, st_visible[1].wYear);
1403     expect(12, st_visible[1].wMonth);
1404     expect(31, st_visible[1].wDay);
1405
1406     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_DAYSTATE, (LPARAM)st_daystate);
1407     expect(4, res);
1408     expect(2000, st_daystate[0].wYear);
1409     expect(10, st_daystate[0].wMonth);
1410     expect(29, st_daystate[0].wDay);
1411     expect(2001, st_daystate[1].wYear);
1412     expect(1, st_daystate[1].wMonth);
1413     expect(6, st_daystate[1].wDay);
1414
1415     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_monthrange_seq, "monthcal monthrange", FALSE);
1416
1417     /* with null date array parameter */
1418     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, 0);
1419     expect(2, res);
1420
1421     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_DAYSTATE, 0);
1422     expect(4, res);
1423
1424     /* resize control to display single Calendar */
1425     MoveWindow(hwnd, 0, 0, r.right, r.bottom, FALSE);
1426
1427     memset(&st, 0, sizeof(st));
1428     st.wMonth = 9;
1429     st.wYear  = 1752;
1430     st.wDay   = 14;
1431
1432     res = SendMessage(hwnd, MCM_SETCURSEL, 0, (LPARAM)&st);
1433     expect(1, res);
1434
1435     /* September 1752 has 19 days */
1436     res = SendMessage(hwnd, MCM_GETMONTHRANGE, GMR_VISIBLE, (LPARAM)st_visible);
1437     expect(1, res);
1438
1439     expect(1752, st_visible[0].wYear);
1440     expect(9, st_visible[0].wMonth);
1441     ok(14 == st_visible[0].wDay ||
1442        broken(1 == st_visible[0].wDay), /* comctl32 <= 4.72 */
1443        "Expected 14, got %d\n", st_visible[0].wDay);
1444
1445     expect(1752, st_visible[1].wYear);
1446     expect(9, st_visible[1].wMonth);
1447     expect(19, st_visible[1].wDay);
1448
1449     DestroyWindow(hwnd);
1450 }
1451
1452 static void test_maxselday(void)
1453 {
1454     int res;
1455     HWND hwnd;
1456     DWORD style;
1457
1458     hwnd = create_monthcal_control(0);
1459     /* if no style specified default to 1 */
1460     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1461     expect(1, res);
1462     res = SendMessage(hwnd, MCM_SETMAXSELCOUNT, 5, 0);
1463     expect(0, res);
1464     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1465     expect(1, res);
1466
1467     /* try to set style */
1468     style = GetWindowLong(hwnd, GWL_STYLE);
1469     SetWindowLong(hwnd, GWL_STYLE, style | MCS_MULTISELECT);
1470     style = GetWindowLong(hwnd, GWL_STYLE);
1471     ok(!(style & MCS_MULTISELECT), "Expected MCS_MULTISELECT not to be set\n");
1472     DestroyWindow(hwnd);
1473
1474     hwnd = create_monthcal_control(MCS_MULTISELECT);
1475     /* try to remove style */
1476     style = GetWindowLong(hwnd, GWL_STYLE);
1477     SetWindowLong(hwnd, GWL_STYLE, style & ~MCS_MULTISELECT);
1478     style = GetWindowLong(hwnd, GWL_STYLE);
1479     ok(style & MCS_MULTISELECT, "Expected MCS_MULTISELECT to be set\n");
1480     DestroyWindow(hwnd);
1481
1482     hwnd = create_monthcal_control(MCS_MULTISELECT);
1483
1484     /* default width is a week */
1485     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1486     expect(7, res);
1487
1488     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1489
1490     /* Setter and Getters for max selected days */
1491     res = SendMessage(hwnd, MCM_SETMAXSELCOUNT, 5, 0);
1492     expect(1, res);
1493     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1494     expect(5, res);
1495
1496     res = SendMessage(hwnd, MCM_SETMAXSELCOUNT, 15, 0);
1497     expect(1, res);
1498     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1499     expect(15, res);
1500
1501     /* test invalid value */
1502     res = SendMessage(hwnd, MCM_SETMAXSELCOUNT, -1, 0);
1503     expect(0, res);
1504     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1505     expect(15, res);
1506
1507     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, monthcal_max_sel_day_seq, "monthcal MaxSelDay", FALSE);
1508
1509     /* zero value is invalid too */
1510     res = SendMessage(hwnd, MCM_SETMAXSELCOUNT, 0, 0);
1511     expect(0, res);
1512     res = SendMessage(hwnd, MCM_GETMAXSELCOUNT, 0, 0);
1513     expect(15, res);
1514
1515     DestroyWindow(hwnd);
1516 }
1517
1518 static void test_size(void)
1519 {
1520     int res;
1521     RECT r1, r2;
1522     HFONT hFont1, hFont2;
1523     LOGFONTA logfont;
1524     HWND hwnd;
1525
1526     hwnd = create_monthcal_control(0);
1527
1528     lstrcpyA(logfont.lfFaceName, "Arial");
1529     memset(&logfont, 0, sizeof(logfont));
1530     logfont.lfHeight = 12;
1531     hFont1 = CreateFontIndirectA(&logfont);
1532
1533     logfont.lfHeight = 24;
1534     hFont2 = CreateFontIndirectA(&logfont);
1535
1536     /* initialize to a font we can compare against */
1537     SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont1, 0);
1538     res = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r1);
1539     ok(res, "SendMessage(MCM_GETMINREQRECT) failed\n");
1540
1541     /* check that setting a larger font results in an larger rect */
1542     SendMessage(hwnd, WM_SETFONT, (WPARAM)hFont2, 0);
1543     res = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r2);
1544     ok(res, "SendMessage(MCM_GETMINREQRECT) failed\n");
1545
1546     OffsetRect(&r1, -r1.left, -r1.top);
1547     OffsetRect(&r2, -r2.left, -r2.top);
1548
1549     ok(r1.bottom < r2.bottom, "Failed to get larger rect with larger font\n");
1550
1551     DestroyWindow(hwnd);
1552 }
1553
1554 static void test_create(void)
1555 {
1556     HWND hwnd;
1557
1558     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1559
1560     hwnd = create_monthcal_control(0);
1561     ok_sequence(sequences, PARENT_SEQ_INDEX, create_monthcal_control_seq, "create monthcal control", TRUE);
1562
1563     DestroyWindow(hwnd);
1564
1565     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1566     hwnd = create_monthcal_control(MCS_MULTISELECT);
1567     ok_sequence(sequences, PARENT_SEQ_INDEX, create_monthcal_multi_sel_style_seq, "create monthcal (multi sel style)", TRUE);
1568     DestroyWindow(hwnd);
1569 }
1570
1571 static void test_destroy(void)
1572 {
1573     HWND hwnd;
1574
1575     hwnd = create_monthcal_control(0);
1576     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1577     DestroyWindow(hwnd);
1578     ok_sequence(sequences, PARENT_SEQ_INDEX, destroy_monthcal_parent_msgs_seq, "Destroy monthcal (parent msg)", FALSE);
1579     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, destroy_monthcal_child_msgs_seq, "Destroy monthcal (child msg)", FALSE);
1580
1581     /* MCS_MULTISELECT */
1582     hwnd = create_monthcal_control(MCS_MULTISELECT);
1583     flush_sequences(sequences, NUM_MSG_SEQUENCES);
1584     DestroyWindow(hwnd);
1585     ok_sequence(sequences, MONTHCAL_SEQ_INDEX, destroy_monthcal_multi_sel_style_seq, "Destroy monthcal (multi sel style)", FALSE);
1586 }
1587
1588 static void test_selrange(void)
1589 {
1590     HWND hwnd;
1591     SYSTEMTIME st, range[2], range2[2];
1592     BOOL ret, old_comctl32 = FALSE;
1593
1594     hwnd = create_monthcal_control(MCS_MULTISELECT);
1595
1596     /* just after creation selection should start and end today */
1597     ret = SendMessage(hwnd, MCM_GETTODAY, 0, (LPARAM)&st);
1598     expect(TRUE, ret);
1599
1600     memset(range, 0xcc, sizeof(range));
1601     ret = SendMessage(hwnd, MCM_GETSELRANGE, 0, (LPARAM)range);
1602     expect(TRUE, ret);
1603     expect(st.wYear,      range[0].wYear);
1604     expect(st.wMonth,     range[0].wMonth);
1605     expect(st.wDay,       range[0].wDay);
1606     if (range[0].wDayOfWeek != st.wDayOfWeek)
1607     {
1608         win_skip("comctl32 <= 4.70 doesn't set some values\n");
1609         old_comctl32 = TRUE;
1610     }
1611     else
1612     {
1613         expect(st.wDayOfWeek, range[0].wDayOfWeek);
1614         expect(st.wHour,      range[0].wHour);
1615         expect(st.wMinute,    range[0].wMinute);
1616         expect(st.wSecond,    range[0].wSecond);
1617         expect(st.wMilliseconds, range[0].wMilliseconds);
1618     }
1619
1620     expect(st.wYear,      range[1].wYear);
1621     expect(st.wMonth,     range[1].wMonth);
1622     expect(st.wDay,       range[1].wDay);
1623     if (!old_comctl32)
1624     {
1625         expect(st.wDayOfWeek, range[1].wDayOfWeek);
1626         expect(st.wHour,      range[1].wHour);
1627         expect(st.wMinute,    range[1].wMinute);
1628         expect(st.wSecond,    range[1].wSecond);
1629         expect(st.wMilliseconds, range[1].wMilliseconds);
1630     }
1631
1632     /* bounds are swapped if min > max */
1633     memset(&range[0], 0, sizeof(range[0]));
1634     range[0].wYear  = 2009;
1635     range[0].wMonth = 10;
1636     range[0].wDay   = 5;
1637     range[1] = range[0];
1638     range[1].wDay   = 3;
1639
1640     ret = SendMessage(hwnd, MCM_SETSELRANGE, 0, (LPARAM)range);
1641     expect(TRUE, ret);
1642
1643     ret = SendMessage(hwnd, MCM_GETSELRANGE, 0, (LPARAM)range2);
1644     expect(TRUE, ret);
1645
1646     expect(range[1].wYear,      range2[0].wYear);
1647     expect(range[1].wMonth,     range2[0].wMonth);
1648     expect(range[1].wDay,       range2[0].wDay);
1649     expect(6, range2[0].wDayOfWeek);
1650     expect(range[1].wHour,      range2[0].wHour);
1651     expect(range[1].wMinute,    range2[0].wMinute);
1652     expect(range[1].wSecond,    range2[0].wSecond);
1653     expect(range[1].wMilliseconds, range2[0].wMilliseconds);
1654
1655     expect(range[0].wYear,      range2[1].wYear);
1656     expect(range[0].wMonth,     range2[1].wMonth);
1657     expect(range[0].wDay,       range2[1].wDay);
1658     expect(1, range2[1].wDayOfWeek);
1659     expect(range[0].wHour,      range2[1].wHour);
1660     expect(range[0].wMinute,    range2[1].wMinute);
1661     expect(range[0].wSecond,    range2[1].wSecond);
1662     expect(range[0].wMilliseconds, range2[1].wMilliseconds);
1663
1664     /* try with range larger than maximum configured */
1665     memset(&range[0], 0, sizeof(range[0]));
1666     range[0].wYear  = 2009;
1667     range[0].wMonth = 10;
1668     range[0].wDay   = 1;
1669     range[1] = range[0];
1670
1671     ret = SendMessage(hwnd, MCM_SETSELRANGE, 0, (LPARAM)range);
1672     expect(TRUE, ret);
1673
1674     range[1] = range[0];
1675     /* default max. range is 7 days */
1676     range[1].wDay = 8;
1677
1678     ret = SendMessage(hwnd, MCM_SETSELRANGE, 0, (LPARAM)range);
1679     expect(FALSE, ret);
1680
1681     ret = SendMessage(hwnd, MCM_GETSELRANGE, 0, (LPARAM)range2);
1682     expect(TRUE, ret);
1683
1684     expect(range[0].wYear,  range2[0].wYear);
1685     expect(range[0].wMonth, range2[0].wMonth);
1686     expect(range[0].wDay,   range2[0].wDay);
1687     expect(range[0].wYear,  range2[1].wYear);
1688     expect(range[0].wMonth, range2[1].wMonth);
1689     expect(range[0].wDay,   range2[1].wDay);
1690
1691     DestroyWindow(hwnd);
1692 }
1693
1694 static void test_killfocus(void)
1695 {
1696     HWND hwnd;
1697     DWORD style;
1698
1699     hwnd = create_monthcal_control(0);
1700
1701     /* make parent invisible */
1702     style = GetWindowLong(parent_wnd, GWL_STYLE);
1703     SetWindowLong(parent_wnd, GWL_STYLE, style &~ WS_VISIBLE);
1704
1705     SendMessage(hwnd, WM_KILLFOCUS, (WPARAM)GetDesktopWindow(), 0);
1706
1707     style = GetWindowLong(hwnd, GWL_STYLE);
1708     ok(style & WS_VISIBLE, "Expected WS_VISIBLE to be set\n");
1709
1710     style = GetWindowLong(parent_wnd, GWL_STYLE);
1711     SetWindowLong(parent_wnd, GWL_STYLE, style | WS_VISIBLE);
1712
1713     DestroyWindow(hwnd);
1714 }
1715
1716 static void test_hittest_v6(void)
1717 {
1718     MCHITTESTINFO mchit;
1719     DWORD ret;
1720     HWND hwnd;
1721     RECT r;
1722
1723     hwnd = create_monthcal_control(0);
1724     SendMessage(hwnd, MCM_SETCALENDARBORDER, TRUE, 0);
1725
1726     SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r);
1727     /* reserving some area around calendar */
1728     MoveWindow(hwnd, 0, 0, r.right * 3 / 2, r.bottom * 3 / 2, FALSE);
1729     mchit.cbSize = sizeof(MCHITTESTINFO);
1730     mchit.pt.x = mchit.pt.y = 0;
1731     mchit.iOffset = -1;
1732     mchit.iRow = -1;
1733     mchit.iCol = -1;
1734     ret = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1735     if (ret == ~0u)
1736     {
1737         win_skip("Only MCHITTESTINFO_V1 supported\n");
1738         DestroyWindow(hwnd);
1739         return;
1740     }
1741     todo_wine expect_hex(MCHT_NOWHERE, ret);
1742     expect(-1, mchit.iOffset);
1743     expect(-1, mchit.iRow);
1744     expect(-1, mchit.iCol);
1745
1746     MoveWindow(hwnd, 0, 0, r.right, r.bottom, FALSE);
1747     mchit.pt.x = r.right / 2;
1748     mchit.pt.y = r.bottom / 2;
1749     mchit.iOffset = -1;
1750     ret = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1751     expect_hex(MCHT_CALENDARDATE, ret);
1752     expect(0, mchit.iOffset);
1753
1754     /* over day area */
1755     mchit.pt.x = r.right / (7*2);
1756     mchit.pt.y = r.bottom / 2;
1757     mchit.iOffset = -1;
1758     mchit.iCol = mchit.iRow = -1;
1759     mchit.uHit = 0;
1760     mchit.rc.left = mchit.rc.right = mchit.rc.top = mchit.rc.bottom = -1;
1761     ret = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1762     expect_hex(MCHT_CALENDARDATE, ret);
1763     expect_hex(MCHT_CALENDARDATE, mchit.uHit);
1764     expect(0, mchit.iOffset);
1765     expect(2, mchit.iRow);
1766     expect(0, mchit.iCol);
1767     /* returned a one day rectangle */
1768     expect_d(r.right / 7, mchit.rc.right - mchit.rc.left);
1769     expect_d(r.bottom / 10, mchit.rc.bottom - mchit.rc.top);
1770
1771     /* title */
1772     mchit.pt.x = 1;
1773     mchit.pt.y = 1;
1774     mchit.iOffset = -1;
1775     mchit.iCol = mchit.iRow = -1;
1776     mchit.uHit = 0;
1777     mchit.rc.left = mchit.rc.right = mchit.rc.top = mchit.rc.bottom = -1;
1778     ret = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1779     expect_hex(MCHT_TITLE, ret);
1780     expect_hex(MCHT_TITLE, mchit.uHit);
1781     expect(0, mchit.iOffset);
1782     expect(-1, mchit.iRow);
1783     expect(-1, mchit.iCol);
1784     expect(0, mchit.rc.left);
1785     expect(0, mchit.rc.top);
1786     expect_d(r.right, mchit.rc.right);
1787     ok(mchit.rc.bottom > 0, "got %d\n", mchit.rc.bottom);
1788
1789     /* between two calendars */
1790     MoveWindow(hwnd, 0, 0, r.right * 5/2, r.bottom, FALSE);
1791     mchit.pt.x = r.right / (5*4);
1792     mchit.pt.y = r.bottom / 2;
1793     mchit.iOffset = -2;
1794     mchit.iCol = mchit.iRow = -2;
1795     mchit.uHit = ~0;
1796     mchit.rc.left = mchit.rc.right = mchit.rc.top = mchit.rc.bottom = -1;
1797     ret = SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1798     todo_wine expect_hex(MCHT_NOWHERE, ret);
1799     todo_wine expect_hex(MCHT_NOWHERE, mchit.uHit);
1800     expect(-2, mchit.iOffset);
1801     expect(-2, mchit.iRow);
1802     expect(-2, mchit.iCol);
1803     todo_wine expect(0, mchit.rc.left);
1804     todo_wine expect(0, mchit.rc.top);
1805     todo_wine expect_d(r.right * 5/2, mchit.rc.right);
1806     todo_wine expect_d(r.bottom, mchit.rc.bottom);
1807
1808     DestroyWindow(hwnd);
1809 }
1810
1811 static void test_get_set_border(void)
1812 {
1813     HWND hwnd;
1814     DWORD ret;
1815
1816     hwnd = create_monthcal_control(0);
1817
1818     /* a non-default value */
1819     ret = SendMessage(hwnd, MCM_SETCALENDARBORDER, TRUE, 10);
1820     expect(0, ret);
1821
1822     ret = SendMessage(hwnd, MCM_GETCALENDARBORDER, 0, 0);
1823
1824     if (ret != 10)
1825     {
1826         skip("MCM_GET/SETCALENDARBORDER not supported\n");
1827         DestroyWindow(hwnd);
1828         return;
1829     }
1830
1831     expect(10, ret);
1832
1833     DestroyWindow(hwnd);
1834 }
1835
1836 static void test_MCM_SIZERECTTOMIN(void)
1837 {
1838     HWND hwnd;
1839     DWORD ret;
1840     RECT r, r2;
1841
1842     hwnd = create_monthcal_control(0);
1843
1844     ret = SendMessageA(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r2);
1845     if (ret == 0)
1846     {
1847         win_skip("Message MCM_GETMINREQRECT unsupported. Skipping.\n");
1848         DestroyWindow(hwnd);
1849         return;
1850     }
1851
1852     ret = SendMessageA(hwnd, MCM_SIZERECTTOMIN, 0, 0);
1853     ok(ret == 0, "got %d\n", ret);
1854
1855     r.left = r.right = r.top = r.bottom = 0;
1856     ret = SendMessageA(hwnd, MCM_SIZERECTTOMIN, 0, (LPARAM)&r);
1857     if (ret == 0)
1858     {
1859         skip("Message MCM_SIZERECTTOMIN unsupported. Skipping.\n");
1860         DestroyWindow(hwnd);
1861         return;
1862     }
1863     ok(ret == 1, "got %d\n", ret);
1864     ok(r.left == 0 && r.right > 0, "got %d, %d\n", r.left, r.right);
1865
1866     r = r2;
1867     ret = SendMessageA(hwnd, MCM_SIZERECTTOMIN, 0, (LPARAM)&r);
1868     ok(ret == 1, "got %d\n", ret);
1869
1870     r2.right = (r2.right - r2.left) * 3;
1871     r2.bottom = (r2.bottom - r2.top) * 3;
1872     r2.left = r2.top = 0;
1873     ret = SendMessageA(hwnd, MCM_SIZERECTTOMIN, 0, (LPARAM)&r2);
1874     ok(ret == 1, "got %d\n", ret);
1875
1876     DestroyWindow(hwnd);
1877 }
1878
1879 static void test_MCM_GETCALENDARCOUNT(void)
1880 {
1881     HWND hwnd;
1882     DWORD ret;
1883
1884     hwnd = create_monthcal_control(0);
1885
1886     ret = SendMessageA(hwnd, MCM_GETCALENDARCOUNT, 0, 0);
1887     if (ret == 0)
1888     {
1889         win_skip("Message MCM_GETCALENDARCOUNT unsupported. Skipping.\n");
1890         DestroyWindow(hwnd);
1891         return;
1892     }
1893
1894     expect(2, ret);
1895
1896     DestroyWindow(hwnd);
1897 }
1898
1899 static void test_daystate(void)
1900 {
1901     MONTHDAYSTATE state[4];
1902     DWORD ret, style;
1903     HWND hwnd;
1904     RECT r;
1905
1906     /* without MCS_DAYSTATE */
1907     hwnd = create_monthcal_control(0);
1908
1909     ret = SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&r);
1910     expect(TRUE, ret);
1911
1912     /* resize control to display two Calendars */
1913     MoveWindow(hwnd, 0, 0, r.right, (5/2)*r.bottom, FALSE);
1914
1915     ret = SendMessageA(hwnd, MCM_GETMONTHRANGE, GMR_DAYSTATE, 0);
1916     expect(4, ret);
1917
1918     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 4, (LPARAM)&state);
1919     expect(0, ret);
1920
1921     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 2, (LPARAM)&state);
1922     expect(0, ret);
1923
1924     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 0, 0);
1925     expect(0, ret);
1926
1927     /* try to switch on */
1928     SetWindowLongA(hwnd, GWL_STYLE, GetWindowLongA(hwnd, GWL_STYLE) | MCS_DAYSTATE);
1929     style = GetWindowLongA(hwnd, GWL_STYLE);
1930     ok((style & MCS_DAYSTATE) == 0, "got 0x%08x\n", style);
1931
1932     DestroyWindow(hwnd);
1933
1934     /* with MCS_DAYSTATE */
1935     hwnd = create_monthcal_control(MCS_DAYSTATE);
1936
1937     ret = SendMessageA(hwnd, MCM_GETMONTHRANGE, GMR_DAYSTATE, 0);
1938     expect(4, ret);
1939
1940     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 4, (LPARAM)&state);
1941     expect(1, ret);
1942
1943     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 2, (LPARAM)&state);
1944     expect(0, ret);
1945
1946     ret = SendMessageA(hwnd, MCM_SETDAYSTATE, 0, 0);
1947     expect(0, ret);
1948
1949     /* try to switch off */
1950     SetWindowLongA(hwnd, GWL_STYLE, GetWindowLongA(hwnd, GWL_STYLE) & ~MCS_DAYSTATE);
1951     style = GetWindowLongA(hwnd, GWL_STYLE);
1952     ok((style & MCS_DAYSTATE) == MCS_DAYSTATE, "got 0x%08x\n", style);
1953
1954     DestroyWindow(hwnd);
1955 }
1956
1957 static void test_sel_notify(void)
1958 {
1959     typedef struct
1960     {
1961         DWORD       val;
1962         const char* name;
1963     } Monthcal_style;
1964
1965     HWND hwnd;
1966     RECT rc;
1967     MCHITTESTINFO mchit = {sizeof(MCHITTESTINFO)};
1968     SYSTEMTIME st;
1969     Monthcal_style styles[] = {
1970         {MCS_NOTODAY,                    "MCS_NOTODAY"},
1971         {MCS_NOTODAY | MCS_MULTISELECT,  "MCS_NOTODAY | MCS_MULTISELECT"},
1972         {MCS_DAYSTATE,                   "MCS_DAYSTATE"},
1973         {MCS_DAYSTATE | MCS_MULTISELECT, "MCS_DAYSTATE | MCS_MULTISELECT"}
1974     };
1975     int i;
1976
1977     for(i = 0; i < sizeof styles / sizeof styles[0]; i++)
1978     {
1979         trace("%s\n", styles[i].name);
1980         hwnd = create_monthcal_control(styles[i].val);
1981         SetWindowLongPtr(hwnd, GWLP_ID, SEL_NOTIFY_TEST_ID);
1982         assert(hwnd);
1983         SendMessage(hwnd, MCM_GETMINREQRECT, 0, (LPARAM)&rc);
1984         MoveWindow(hwnd, 0, 0, rc.right, rc.bottom, FALSE);
1985         /* Simulate mouse click on some unselected day to generate
1986             MCN_SELECT and MCN_SELCHANGE notifications */
1987         mchit.pt.x = rc.right / 2;
1988         mchit.pt.y = rc.bottom / 2;
1989         SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1990         SendMessage(hwnd, MCM_GETCURSEL, 0, (LPARAM)&st);
1991         while(st.wDay == mchit.st.wDay) /* Ensure that mchit.pt points to unselected day */
1992         {
1993             mchit.pt.y++;
1994             SendMessage(hwnd, MCM_HITTEST, 0, (LPARAM)&mchit);
1995         }
1996         SendMessage(hwnd, WM_LBUTTONDOWN, 0, MAKELPARAM(mchit.pt.x, mchit.pt.y));
1997         SendMessage(hwnd, WM_LBUTTONUP, 0, MAKELPARAM(mchit.pt.x, mchit.pt.y));
1998         DestroyWindow(hwnd);
1999     }
2000 }
2001
2002 START_TEST(monthcal)
2003 {
2004     BOOL (WINAPI *pInitCommonControlsEx)(const INITCOMMONCONTROLSEX*);
2005     INITCOMMONCONTROLSEX iccex;
2006     HMODULE hComctl32;
2007     HWND hwnd;
2008
2009     ULONG_PTR ctx_cookie;
2010     HANDLE hCtx;
2011
2012     hComctl32 = GetModuleHandleA("comctl32.dll");
2013     pInitCommonControlsEx = (void*)GetProcAddress(hComctl32, "InitCommonControlsEx");
2014     if (!pInitCommonControlsEx)
2015     {
2016         skip("InitCommonControlsEx() is missing. Skipping the tests\n");
2017         return;
2018     }
2019     iccex.dwSize = sizeof(iccex);
2020     iccex.dwICC  = ICC_DATE_CLASSES;
2021     pInitCommonControlsEx(&iccex);
2022
2023     test_monthcal();
2024
2025     init_msg_sequences(sequences, NUM_MSG_SEQUENCES);
2026
2027     parent_wnd = create_parent_window();
2028
2029     test_create();
2030     test_destroy();
2031     test_color();
2032     test_currdate();
2033     test_firstDay();
2034     test_unicode();
2035     test_today();
2036     test_scroll();
2037     test_monthrange();
2038     test_hittest();
2039     test_todaylink();
2040     test_size();
2041     test_maxselday();
2042     test_selrange();
2043     test_killfocus();
2044     test_daystate();
2045     test_sel_notify();
2046
2047     if (!load_v6_module(&ctx_cookie, &hCtx))
2048     {
2049         DestroyWindow(parent_wnd);
2050         return;
2051     }
2052
2053     /* this is a XP SP3 failure workaround */
2054     hwnd = CreateWindowExA(0, MONTHCAL_CLASSA, "foo",
2055                            WS_CHILD | WS_BORDER | WS_VISIBLE,
2056                            0, 0, 100, 100,
2057                            parent_wnd, NULL, GetModuleHandleA(NULL), NULL);
2058     if (!IsWindow(hwnd))
2059     {
2060         win_skip("FIXME: failed to create Monthcal window.\n");
2061         unload_v6_module(ctx_cookie, hCtx);
2062         DestroyWindow(parent_wnd);
2063         return;
2064     }
2065     else
2066         DestroyWindow(hwnd);
2067
2068     test_hittest_v6();
2069     test_get_set_border();
2070     test_MCM_SIZERECTTOMIN();
2071     test_MCM_GETCALENDARCOUNT();
2072
2073     unload_v6_module(ctx_cookie, hCtx);
2074
2075     DestroyWindow(parent_wnd);
2076 }