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