?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
wined3d: Add a test for fixed function bump mapping.
[wine/multimedia.git] / dlls / comctl32 / datetime.c
blob100cd746e03727e7582166fcd7fd0f23248bdafc
1 /*
2 * Date and time picker control
3 *
4 * Copyright 1998, 1999 Eric Kohl
5 * Copyright 1999, 2000 Alex Priem <alexp@sci.kun.nl>
6 * Copyright 2000 Chris Morgan <cmorgan@wpi.edu>
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 *
22 * NOTE
23 *
24 * This code was audited for completeness against the documented features
25 * of Comctl32.dll version 6.0 on Oct. 20, 2004, by Dimitrie O. Paun.
26 *
27 * Unless otherwise noted, we believe this code to be complete, as per
28 * the specification mentioned above.
29 * If you discover missing features, or bugs, please note them below.
30 *
31 * TODO:
32 * -- DTS_APPCANPARSE
33 * -- DTS_SHORTDATECENTURYFORMAT
34 * -- DTN_CLOSEUP
35 * -- DTN_FORMAT
36 * -- DTN_FORMATQUERY
37 * -- DTN_USERSTRING
38 * -- DTN_WMKEYDOWN
39 * -- FORMATCALLBACK
40 */
41
42 #include <math.h>
43 #include <string.h>
44 #include <stdarg.h>
45 #include <stdio.h>
46 #include <limits.h>
47
48 #include "windef.h"
49 #include "winbase.h"
50 #include "wingdi.h"
51 #include "winuser.h"
52 #include "winnls.h"
53 #include "commctrl.h"
54 #include "comctl32.h"
55 #include "wine/debug.h"
56 #include "wine/unicode.h"
57
58 WINE_DEFAULT_DEBUG_CHANNEL(datetime);
59
60 typedef struct
61 {
62 HWND hwndSelf;
63 HWND hMonthCal;
64 HWND hwndNotify;
65 HWND hUpdown;
66 DWORD dwStyle;
67 SYSTEMTIME date;
68 BOOL dateValid;
69 HWND hwndCheckbut;
70 RECT rcClient; /* rect around the edge of the window */
71 RECT rcDraw; /* rect inside of the border */
72 RECT checkbox; /* checkbox allowing the control to be enabled/disabled */
73 RECT calbutton; /* button that toggles the dropdown of the monthcal control */
74 BOOL bCalDepressed; /* TRUE = cal button is depressed */
75 int bDropdownEnabled;
76 int select;
77 HFONT hFont;
78 int nrFieldsAllocated;
79 int nrFields;
80 int haveFocus;
81 int *fieldspec;
82 RECT *fieldRect;
83 int *buflen;
84 WCHAR textbuf[256];
85 POINT monthcal_pos;
86 int pendingUpdown;
87 } DATETIME_INFO, *LPDATETIME_INFO;
88
89 /* in monthcal.c */
90 extern int MONTHCAL_MonthLength(int month, int year);
91
92 /* this list of defines is closely related to `allowedformatchars' defined
93 * in datetime.c; the high nibble indicates the `base type' of the format
94 * specifier.
95 * Do not change without first reading DATETIME_UseFormat.
96 *
97 */
98
99 #define DT_END_FORMAT 0
100 #define ONEDIGITDAY 0x01
101 #define TWODIGITDAY 0x02
102 #define THREECHARDAY 0x03
103 #define FULLDAY 0x04
104 #define ONEDIGIT12HOUR 0x11
105 #define TWODIGIT12HOUR 0x12
106 #define ONEDIGIT24HOUR 0x21
107 #define TWODIGIT24HOUR 0x22
108 #define ONEDIGITMINUTE 0x31
109 #define TWODIGITMINUTE 0x32
110 #define ONEDIGITMONTH 0x41
111 #define TWODIGITMONTH 0x42
112 #define THREECHARMONTH 0x43
113 #define FULLMONTH 0x44
114 #define ONEDIGITSECOND 0x51
115 #define TWODIGITSECOND 0x52
116 #define ONELETTERAMPM 0x61
117 #define TWOLETTERAMPM 0x62
118 #define ONEDIGITYEAR 0x71
119 #define TWODIGITYEAR 0x72
120 #define INVALIDFULLYEAR 0x73 /* FIXME - yyy is not valid - we'll treat it as yyyy */
121 #define FULLYEAR 0x74
122 #define FORMATCALLBACK 0x81 /* -> maximum of 0x80 callbacks possible */
123 #define FORMATCALLMASK 0x80
124 #define DT_STRING 0x0100
125
126 #define DTHT_DATEFIELD 0xff /* for hit-testing */
127
128 #define DTHT_NONE 0
129 #define DTHT_CHECKBOX 0x200 /* these should end at '00' , to make */
130 #define DTHT_MCPOPUP 0x300 /* & DTHT_DATEFIELD 0 when DATETIME_KeyDown */
131 #define DTHT_GOTFOCUS 0x400 /* tests for date-fields */
132
133 static BOOL DATETIME_SendSimpleNotify (const DATETIME_INFO *infoPtr, UINT code);
134 static BOOL DATETIME_SendDateTimeChangeNotify (const DATETIME_INFO *infoPtr);
135 extern void MONTHCAL_CopyTime(const SYSTEMTIME *from, SYSTEMTIME *to);
136 static const WCHAR allowedformatchars[] = {'d', 'h', 'H', 'm', 'M', 's', 't', 'y', 'X', '\'', 0};
137 static const int maxrepetition [] = {4,2,2,2,4,2,2,4,-1,-1};
138
139
140 static DWORD
141 DATETIME_GetSystemTime (const DATETIME_INFO *infoPtr, SYSTEMTIME *lprgSysTimeArray)
142 {
143 if (!lprgSysTimeArray) return GDT_NONE;
144
145 if ((infoPtr->dwStyle & DTS_SHOWNONE) &&
146 (SendMessageW (infoPtr->hwndCheckbut, BM_GETCHECK, 0, 0) == BST_UNCHECKED))
147 return GDT_NONE;
148
149 MONTHCAL_CopyTime (&infoPtr->date, lprgSysTimeArray);
150
151 return GDT_VALID;
152 }
153
154
155 static BOOL
156 DATETIME_SetSystemTime (DATETIME_INFO *infoPtr, DWORD flag, const SYSTEMTIME *lprgSysTimeArray)
157 {
158 if (!lprgSysTimeArray) return 0;
159
160 TRACE("%04d/%02d/%02d %02d:%02d:%02d\n",
161 lprgSysTimeArray->wYear, lprgSysTimeArray->wMonth, lprgSysTimeArray->wDay,
162 lprgSysTimeArray->wHour, lprgSysTimeArray->wMinute, lprgSysTimeArray->wSecond);
163
164 if (flag == GDT_VALID) {
165 if (lprgSysTimeArray->wYear < 1601 || lprgSysTimeArray->wYear > 30827 ||
166 lprgSysTimeArray->wMonth < 1 || lprgSysTimeArray->wMonth > 12 ||
167 lprgSysTimeArray->wDayOfWeek > 6 ||
168 lprgSysTimeArray->wDay < 1 || lprgSysTimeArray->wDay > 31 ||
169 lprgSysTimeArray->wHour > 23 ||
170 lprgSysTimeArray->wMinute > 59 ||
171 lprgSysTimeArray->wSecond > 59 ||
172 lprgSysTimeArray->wMilliseconds > 999
173 )
174 return 0;
175
176 infoPtr->dateValid = TRUE;
177 MONTHCAL_CopyTime (lprgSysTimeArray, &infoPtr->date);
178 SendMessageW (infoPtr->hMonthCal, MCM_SETCURSEL, 0, (LPARAM)(&infoPtr->date));
179 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_CHECKED, 0);
180 } else if ((infoPtr->dwStyle & DTS_SHOWNONE) && (flag == GDT_NONE)) {
181 infoPtr->dateValid = FALSE;
182 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_UNCHECKED, 0);
183 }
184 else
185 return 0;
186
187 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
188 return TRUE;
189 }
190
191
192 /***
193 * Split up a formattxt in actions.
194 * See ms documentation for the meaning of the letter codes/'specifiers'.
195 *
196 * Notes:
197 * *'dddddd' is handled as 'dddd' plus 'dd'.
198 * *unrecognized formats are strings (here given the type DT_STRING;
199 * start of the string is encoded in lower bits of DT_STRING.
200 * Therefore, 'string' ends finally up as '<show seconds>tring'.
201 *
202 */
203 static void
204 DATETIME_UseFormat (DATETIME_INFO *infoPtr, LPCWSTR formattxt)
205 {
206 unsigned int i;
207 int j, k, len;
208 int *nrFields = &infoPtr->nrFields;
209
210 *nrFields = 0;
211 infoPtr->fieldspec[*nrFields] = 0;
212 len = strlenW(allowedformatchars);
213 k = 0;
214
215 for (i = 0; formattxt[i]; i++) {
216 TRACE ("\n%d %c:", i, formattxt[i]);
217 for (j = 0; j < len; j++) {
218 if (allowedformatchars[j]==formattxt[i]) {
219 TRACE ("%c[%d,%x]", allowedformatchars[j], *nrFields, infoPtr->fieldspec[*nrFields]);
220 if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
221 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
222 break;
223 }
224 if (infoPtr->fieldspec[*nrFields] >> 4 != j) {
225 (*nrFields)++;
226 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
227 break;
228 }
229 if ((infoPtr->fieldspec[*nrFields] & 0x0f) == maxrepetition[j]) {
230 (*nrFields)++;
231 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
232 break;
233 }
234 infoPtr->fieldspec[*nrFields]++;
235 break;
236 } /* if allowedformatchar */
237 } /* for j */
238
239 /* char is not a specifier: handle char like a string */
240 if (j == len) {
241 if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
242 infoPtr->fieldspec[*nrFields] = DT_STRING + k;
243 infoPtr->buflen[*nrFields] = 0;
244 } else if ((infoPtr->fieldspec[*nrFields] & DT_STRING) != DT_STRING) {
245 (*nrFields)++;
246 infoPtr->fieldspec[*nrFields] = DT_STRING + k;
247 infoPtr->buflen[*nrFields] = 0;
248 }
249 infoPtr->textbuf[k] = formattxt[i];
250 k++;
251 infoPtr->buflen[*nrFields]++;
252 } /* if j=len */
253
254 if (*nrFields == infoPtr->nrFieldsAllocated) {
255 FIXME ("out of memory; should reallocate. crash ahead.\n");
256 }
257 } /* for i */
258
259 TRACE("\n");
260
261 if (infoPtr->fieldspec[*nrFields] != 0) (*nrFields)++;
262 }
263
264
265 static BOOL
266 DATETIME_SetFormatW (DATETIME_INFO *infoPtr, LPCWSTR lpszFormat)
267 {
268 if (!lpszFormat) {
269 WCHAR format_buf[80];
270 DWORD format_item;
271
272 if (infoPtr->dwStyle & DTS_LONGDATEFORMAT)
273 format_item = LOCALE_SLONGDATE;
274 else if ((infoPtr->dwStyle & DTS_TIMEFORMAT) == DTS_TIMEFORMAT)
275 format_item = LOCALE_STIMEFORMAT;
276 else /* DTS_SHORTDATEFORMAT */
277 format_item = LOCALE_SSHORTDATE;
278 GetLocaleInfoW( GetSystemDefaultLCID(), format_item, format_buf, sizeof(format_buf)/sizeof(format_buf[0]));
279 lpszFormat = format_buf;
280 }
281
282 DATETIME_UseFormat (infoPtr, lpszFormat);
283 InvalidateRect (infoPtr->hwndSelf, NULL, TRUE);
284
285 return 1;
286 }
287
288
289 static BOOL
290 DATETIME_SetFormatA (DATETIME_INFO *infoPtr, LPCSTR lpszFormat)
291 {
292 if (lpszFormat) {
293 BOOL retval;
294 INT len = MultiByteToWideChar(CP_ACP, 0, lpszFormat, -1, NULL, 0);
295 LPWSTR wstr = Alloc(len * sizeof(WCHAR));
296 if (wstr) MultiByteToWideChar(CP_ACP, 0, lpszFormat, -1, wstr, len);
297 retval = DATETIME_SetFormatW (infoPtr, wstr);
298 Free (wstr);
299 return retval;
300 }
301 else
302 return DATETIME_SetFormatW (infoPtr, 0);
303
304 }
305
306
307 static void
308 DATETIME_ReturnTxt (const DATETIME_INFO *infoPtr, int count, LPWSTR result, int resultSize)
309 {
310 static const WCHAR fmt_dW[] = { '%', 'd', 0 };
311 static const WCHAR fmt__2dW[] = { '%', '.', '2', 'd', 0 };
312 static const WCHAR fmt__3sW[] = { '%', '.', '3', 's', 0 };
313 SYSTEMTIME date = infoPtr->date;
314 int spec;
315 WCHAR buffer[80];
316
317 *result=0;
318 TRACE ("%d,%d\n", infoPtr->nrFields, count);
319 if (count>infoPtr->nrFields || count < 0) {
320 WARN ("buffer overrun, have %d want %d\n", infoPtr->nrFields, count);
321 return;
322 }
323
324 if (!infoPtr->fieldspec) return;
325
326 spec = infoPtr->fieldspec[count];
327 if (spec & DT_STRING) {
328 int txtlen = infoPtr->buflen[count];
329
330 if (txtlen > resultSize)
331 txtlen = resultSize - 1;
332 memcpy (result, infoPtr->textbuf + (spec &~ DT_STRING), txtlen * sizeof(WCHAR));
333 result[txtlen] = 0;
334 TRACE ("arg%d=%x->[%s]\n", count, infoPtr->fieldspec[count], debugstr_w(result));
335 return;
336 }
337
338
339 switch (spec) {
340 case DT_END_FORMAT:
341 *result = 0;
342 break;
343 case ONEDIGITDAY:
344 wsprintfW (result, fmt_dW, date.wDay);
345 break;
346 case TWODIGITDAY:
347 wsprintfW (result, fmt__2dW, date.wDay);
348 break;
349 case THREECHARDAY:
350 GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SABBREVDAYNAME1+(date.wDayOfWeek+6)%7, result, 4);
351 /*wsprintfW (result,"%.3s",days[date.wDayOfWeek]);*/
352 break;
353 case FULLDAY:
354 GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDAYNAME1+(date.wDayOfWeek+6)%7, result, resultSize);
355 break;
356 case ONEDIGIT12HOUR:
357 if (date.wHour == 0) {
358 result[0] = '1';
359 result[1] = '2';
360 result[2] = 0;
361 }
362 else
363 wsprintfW (result, fmt_dW, date.wHour - (date.wHour > 12 ? 12 : 0));
364 break;
365 case TWODIGIT12HOUR:
366 if (date.wHour == 0) {
367 result[0] = '1';
368 result[1] = '2';
369 result[2] = 0;
370 }
371 else
372 wsprintfW (result, fmt__2dW, date.wHour - (date.wHour > 12 ? 12 : 0));
373 break;
374 case ONEDIGIT24HOUR:
375 wsprintfW (result, fmt_dW, date.wHour);
376 break;
377 case TWODIGIT24HOUR:
378 wsprintfW (result, fmt__2dW, date.wHour);
379 break;
380 case ONEDIGITSECOND:
381 wsprintfW (result, fmt_dW, date.wSecond);
382 break;
383 case TWODIGITSECOND:
384 wsprintfW (result, fmt__2dW, date.wSecond);
385 break;
386 case ONEDIGITMINUTE:
387 wsprintfW (result, fmt_dW, date.wMinute);
388 break;
389 case TWODIGITMINUTE:
390 wsprintfW (result, fmt__2dW, date.wMinute);
391 break;
392 case ONEDIGITMONTH:
393 wsprintfW (result, fmt_dW, date.wMonth);
394 break;
395 case TWODIGITMONTH:
396 wsprintfW (result, fmt__2dW, date.wMonth);
397 break;
398 case THREECHARMONTH:
399 GetLocaleInfoW(GetSystemDefaultLCID(), LOCALE_SMONTHNAME1+date.wMonth -1,
400 buffer, sizeof(buffer)/sizeof(buffer[0]));
401 wsprintfW (result, fmt__3sW, buffer);
402 break;
403 case FULLMONTH:
404 GetLocaleInfoW(GetSystemDefaultLCID(),LOCALE_SMONTHNAME1+date.wMonth -1,
405 result, resultSize);
406 break;
407 case ONELETTERAMPM:
408 result[0] = (date.wHour < 12 ? 'A' : 'P');
409 result[1] = 0;
410 break;
411 case TWOLETTERAMPM:
412 result[0] = (date.wHour < 12 ? 'A' : 'P');
413 result[1] = 'M';
414 result[2] = 0;
415 break;
416 case FORMATCALLBACK:
417 FIXME ("Not implemented\n");
418 result[0] = 'x';
419 result[1] = 0;
420 break;
421 case ONEDIGITYEAR:
422 wsprintfW (result, fmt_dW, date.wYear-10* (int) floor(date.wYear/10));
423 break;
424 case TWODIGITYEAR:
425 wsprintfW (result, fmt__2dW, date.wYear-100* (int) floor(date.wYear/100));
426 break;
427 case INVALIDFULLYEAR:
428 case FULLYEAR:
429 wsprintfW (result, fmt_dW, date.wYear);
430 break;
431 }
432
433 TRACE ("arg%d=%x->[%s]\n", count, infoPtr->fieldspec[count], debugstr_w(result));
434 }
435
436 /* Offsets of days in the week to the weekday of january 1 in a leap year. */
437 static const int DayOfWeekTable[] = {0, 3, 2, 5, 0, 3, 5, 1, 4, 6, 2, 4};
438
439 /* returns the day in the week(0 == sunday, 6 == saturday) */
440 /* day(1 == 1st, 2 == 2nd... etc), year is the year value */
441 static int DATETIME_CalculateDayOfWeek(DWORD day, DWORD month, DWORD year)
442 {
443 year-=(month < 3);
444
445 return((year + year/4 - year/100 + year/400 +
446 DayOfWeekTable[month-1] + day ) % 7);
447 }
448
449 static int wrap(int val, int delta, int minVal, int maxVal)
450 {
451 val += delta;
452 if (delta == INT_MIN || val < minVal) return maxVal;
453 if (delta == INT_MAX || val > maxVal) return minVal;
454 return val;
455 }
456
457 static void
458 DATETIME_IncreaseField (DATETIME_INFO *infoPtr, int number, int delta)
459 {
460 SYSTEMTIME *date = &infoPtr->date;
461
462 TRACE ("%d\n", number);
463 if ((number > infoPtr->nrFields) || (number < 0)) return;
464
465 if ((infoPtr->fieldspec[number] & DTHT_DATEFIELD) == 0) return;
466
467 switch (infoPtr->fieldspec[number]) {
468 case ONEDIGITYEAR:
469 case TWODIGITYEAR:
470 case FULLYEAR:
471 date->wYear = wrap(date->wYear, delta, 1752, 9999);
472 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(date->wDay,date->wMonth,date->wYear);
473 break;
474 case ONEDIGITMONTH:
475 case TWODIGITMONTH:
476 case THREECHARMONTH:
477 case FULLMONTH:
478 date->wMonth = wrap(date->wMonth, delta, 1, 12);
479 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(date->wDay,date->wMonth,date->wYear);
480 delta = 0;
481 /* fall through */
482 case ONEDIGITDAY:
483 case TWODIGITDAY:
484 case THREECHARDAY:
485 case FULLDAY:
486 date->wDay = wrap(date->wDay, delta, 1, MONTHCAL_MonthLength(date->wMonth, date->wYear));
487 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(date->wDay,date->wMonth,date->wYear);
488 break;
489 case ONELETTERAMPM:
490 case TWOLETTERAMPM:
491 delta *= 12;
492 /* fall through */
493 case ONEDIGIT12HOUR:
494 case TWODIGIT12HOUR:
495 case ONEDIGIT24HOUR:
496 case TWODIGIT24HOUR:
497 date->wHour = wrap(date->wHour, delta, 0, 23);
498 break;
499 case ONEDIGITMINUTE:
500 case TWODIGITMINUTE:
501 date->wMinute = wrap(date->wMinute, delta, 0, 59);
502 break;
503 case ONEDIGITSECOND:
504 case TWODIGITSECOND:
505 date->wSecond = wrap(date->wSecond, delta, 0, 59);
506 break;
507 case FORMATCALLBACK:
508 FIXME ("Not implemented\n");
509 break;
510 }
511
512 /* FYI: On 1752/9/14 the calendar changed and England and the
513 * American colonies changed to the Gregorian calendar. This change
514 * involved having September 14th follow September 2nd. So no date
515 * algorithm works before that date.
516 */
517 if (10000 * date->wYear + 100 * date->wMonth + date->wDay < 17520914) {
518 date->wYear = 1752;
519 date->wMonth = 9;
520 date->wDay = 14;
521 date->wSecond = 0;
522 date->wMinute = 0;
523 date->wHour = 0;
524 }
525 }
526
527
528 static void
529 DATETIME_ReturnFieldWidth (const DATETIME_INFO *infoPtr, HDC hdc, int count, SHORT *fieldWidthPtr)
530 {
531 /* fields are a fixed width, determined by the largest possible string */
532 /* presumably, these widths should be language dependent */
533 static const WCHAR fld_d1W[] = { '2', 0 };
534 static const WCHAR fld_d2W[] = { '2', '2', 0 };
535 static const WCHAR fld_d4W[] = { '2', '2', '2', '2', 0 };
536 static const WCHAR fld_am1[] = { 'A', 0 };
537 static const WCHAR fld_am2[] = { 'A', 'M', 0 };
538 static const WCHAR fld_day[] = { 'W', 'e', 'd', 'n', 'e', 's', 'd', 'a', 'y', 0 };
539 static const WCHAR fld_day3[] = { 'W', 'e', 'd', 0 };
540 static const WCHAR fld_mon[] = { 'S', 'e', 'p', 't', 'e', 'm', 'b', 'e', 'r', 0 };
541 static const WCHAR fld_mon3[] = { 'D', 'e', 'c', 0 };
542 int spec;
543 WCHAR buffer[80];
544 LPCWSTR bufptr;
545 SIZE size;
546
547 TRACE ("%d,%d\n", infoPtr->nrFields, count);
548 if (count>infoPtr->nrFields || count < 0) {
549 WARN ("buffer overrun, have %d want %d\n", infoPtr->nrFields, count);
550 return;
551 }
552
553 if (!infoPtr->fieldspec) return;
554
555 spec = infoPtr->fieldspec[count];
556 if (spec & DT_STRING) {
557 int txtlen = infoPtr->buflen[count];
558
559 if (txtlen > 79)
560 txtlen = 79;
561 memcpy (buffer, infoPtr->textbuf + (spec &~ DT_STRING), txtlen * sizeof(WCHAR));
562 buffer[txtlen] = 0;
563 bufptr = buffer;
564 }
565 else {
566 switch (spec) {
567 case ONEDIGITDAY:
568 case ONEDIGIT12HOUR:
569 case ONEDIGIT24HOUR:
570 case ONEDIGITSECOND:
571 case ONEDIGITMINUTE:
572 case ONEDIGITMONTH:
573 case ONEDIGITYEAR:
574 /* these seem to use a two byte field */
575 case TWODIGITDAY:
576 case TWODIGIT12HOUR:
577 case TWODIGIT24HOUR:
578 case TWODIGITSECOND:
579 case TWODIGITMINUTE:
580 case TWODIGITMONTH:
581 case TWODIGITYEAR:
582 bufptr = fld_d2W;
583 break;
584 case INVALIDFULLYEAR:
585 case FULLYEAR:
586 bufptr = fld_d4W;
587 break;
588 case THREECHARDAY:
589 bufptr = fld_day3;
590 break;
591 case FULLDAY:
592 bufptr = fld_day;
593 break;
594 case THREECHARMONTH:
595 bufptr = fld_mon3;
596 break;
597 case FULLMONTH:
598 bufptr = fld_mon;
599 break;
600 case ONELETTERAMPM:
601 bufptr = fld_am1;
602 break;
603 case TWOLETTERAMPM:
604 bufptr = fld_am2;
605 break;
606 default:
607 bufptr = fld_d1W;
608 break;
609 }
610 }
611 GetTextExtentPoint32W (hdc, bufptr, strlenW(bufptr), &size);
612 *fieldWidthPtr = size.cx;
613 }
614
615 static void
616 DATETIME_Refresh (DATETIME_INFO *infoPtr, HDC hdc)
617 {
618 int i,prevright;
619 RECT *field;
620 RECT *rcDraw = &infoPtr->rcDraw;
621 RECT *calbutton = &infoPtr->calbutton;
622 RECT *checkbox = &infoPtr->checkbox;
623 SIZE size;
624 COLORREF oldTextColor;
625 SHORT fieldWidth = 0;
626
627 /* draw control edge */
628 TRACE("\n");
629
630 if (infoPtr->dateValid) {
631 HFONT oldFont = SelectObject (hdc, infoPtr->hFont);
632 INT oldBkMode = SetBkMode (hdc, TRANSPARENT);
633 WCHAR txt[80];
634
635 DATETIME_ReturnTxt (infoPtr, 0, txt, sizeof(txt)/sizeof(txt[0]));
636 GetTextExtentPoint32W (hdc, txt, strlenW(txt), &size);
637 rcDraw->bottom = size.cy + 2;
638
639 prevright = checkbox->right = ((infoPtr->dwStyle & DTS_SHOWNONE) ? 18 : 2);
640
641 for (i = 0; i < infoPtr->nrFields; i++) {
642 DATETIME_ReturnTxt (infoPtr, i, txt, sizeof(txt)/sizeof(txt[0]));
643 GetTextExtentPoint32W (hdc, txt, strlenW(txt), &size);
644 DATETIME_ReturnFieldWidth (infoPtr, hdc, i, &fieldWidth);
645 field = &infoPtr->fieldRect[i];
646 field->left = prevright;
647 field->right = prevright + fieldWidth;
648 field->top = rcDraw->top;
649 field->bottom = rcDraw->bottom;
650 prevright = field->right;
651
652 if (infoPtr->dwStyle & WS_DISABLED)
653 oldTextColor = SetTextColor (hdc, comctl32_color.clrGrayText);
654 else if ((infoPtr->haveFocus) && (i == infoPtr->select)) {
655 /* fill if focussed */
656 HBRUSH hbr = CreateSolidBrush (comctl32_color.clrActiveCaption);
657 FillRect(hdc, field, hbr);
658 DeleteObject (hbr);
659 oldTextColor = SetTextColor (hdc, comctl32_color.clrWindow);
660 }
661 else
662 oldTextColor = SetTextColor (hdc, comctl32_color.clrWindowText);
663
664 /* draw the date text using the colour set above */
665 DrawTextW (hdc, txt, strlenW(txt), field, DT_RIGHT | DT_VCENTER | DT_SINGLELINE);
666 SetTextColor (hdc, oldTextColor);
667 }
668 SetBkMode (hdc, oldBkMode);
669 SelectObject (hdc, oldFont);
670 }
671
672 if (!(infoPtr->dwStyle & DTS_UPDOWN)) {
673 DrawFrameControl(hdc, calbutton, DFC_SCROLL,
674 DFCS_SCROLLDOWN | (infoPtr->bCalDepressed ? DFCS_PUSHED : 0) |
675 (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
676 }
677 }
678
679
680 static INT
681 DATETIME_HitTest (const DATETIME_INFO *infoPtr, POINT pt)
682 {
683 int i;
684
685 TRACE ("%d, %d\n", pt.x, pt.y);
686
687 if (PtInRect (&infoPtr->calbutton, pt)) return DTHT_MCPOPUP;
688 if (PtInRect (&infoPtr->checkbox, pt)) return DTHT_CHECKBOX;
689
690 for (i=0; i < infoPtr->nrFields; i++) {
691 if (PtInRect (&infoPtr->fieldRect[i], pt)) return i;
692 }
693
694 return DTHT_NONE;
695 }
696
697
698 static LRESULT
699 DATETIME_LButtonDown (DATETIME_INFO *infoPtr, WORD wKey, INT x, INT y)
700 {
701 POINT pt;
702 int old, new;
703
704 pt.x = x;
705 pt.y = y;
706 old = infoPtr->select;
707 new = DATETIME_HitTest (infoPtr, pt);
708
709 /* FIXME: might be conditions where we don't want to update infoPtr->select */
710 infoPtr->select = new;
711
712 SetFocus(infoPtr->hwndSelf);
713
714 if (infoPtr->select == DTHT_MCPOPUP) {
715 RECT rcMonthCal;
716 SendMessageW(infoPtr->hMonthCal, MCM_GETMINREQRECT, 0, (LPARAM)&rcMonthCal);
717
718 /* FIXME: button actually is only depressed during dropdown of the */
719 /* calendar control and when the mouse is over the button window */
720 infoPtr->bCalDepressed = TRUE;
721
722 /* recalculate the position of the monthcal popup */
723 if(infoPtr->dwStyle & DTS_RIGHTALIGN)
724 infoPtr->monthcal_pos.x = infoPtr->calbutton.left -
725 (rcMonthCal.right - rcMonthCal.left);
726 else
727 /* FIXME: this should be after the area reserved for the checkbox */
728 infoPtr->monthcal_pos.x = infoPtr->rcDraw.left;
729
730 infoPtr->monthcal_pos.y = infoPtr->rcClient.bottom;
731 ClientToScreen (infoPtr->hwndSelf, &(infoPtr->monthcal_pos));
732 SetWindowPos(infoPtr->hMonthCal, 0, infoPtr->monthcal_pos.x,
733 infoPtr->monthcal_pos.y, rcMonthCal.right - rcMonthCal.left,
734 rcMonthCal.bottom - rcMonthCal.top, 0);
735
736 if(IsWindowVisible(infoPtr->hMonthCal)) {
737 ShowWindow(infoPtr->hMonthCal, SW_HIDE);
738 } else {
739 const SYSTEMTIME *lprgSysTimeArray = &infoPtr->date;
740 TRACE("update calendar %04d/%02d/%02d\n",
741 lprgSysTimeArray->wYear, lprgSysTimeArray->wMonth, lprgSysTimeArray->wDay);
742 SendMessageW(infoPtr->hMonthCal, MCM_SETCURSEL, 0, (LPARAM)(&infoPtr->date));
743
744 if (infoPtr->bDropdownEnabled)
745 ShowWindow(infoPtr->hMonthCal, SW_SHOW);
746 infoPtr->bDropdownEnabled = TRUE;
747 }
748
749 TRACE ("dt:%p mc:%p mc parent:%p, desktop:%p\n",
750 infoPtr->hwndSelf, infoPtr->hMonthCal, infoPtr->hwndNotify, GetDesktopWindow ());
751 DATETIME_SendSimpleNotify (infoPtr, DTN_DROPDOWN);
752 }
753
754 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
755
756 return 0;
757 }
758
759
760 static LRESULT
761 DATETIME_LButtonUp (DATETIME_INFO *infoPtr, WORD wKey)
762 {
763 if(infoPtr->bCalDepressed) {
764 infoPtr->bCalDepressed = FALSE;
765 InvalidateRect(infoPtr->hwndSelf, &(infoPtr->calbutton), TRUE);
766 }
767
768 return 0;
769 }
770
771
772 static LRESULT
773 DATETIME_Paint (DATETIME_INFO *infoPtr, HDC hdc)
774 {
775 if (!hdc) {
776 PAINTSTRUCT ps;
777 hdc = BeginPaint (infoPtr->hwndSelf, &ps);
778 DATETIME_Refresh (infoPtr, hdc);
779 EndPaint (infoPtr->hwndSelf, &ps);
780 } else {
781 DATETIME_Refresh (infoPtr, hdc);
782 }
783
784 /* Not a click on the dropdown box, enabled it */
785 infoPtr->bDropdownEnabled = TRUE;
786
787 return 0;
788 }
789
790
791 static LRESULT
792 DATETIME_Button_Command (DATETIME_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
793 {
794 if( HIWORD(wParam) == BN_CLICKED) {
795 DWORD state = SendMessageW((HWND)lParam, BM_GETCHECK, 0, 0);
796 infoPtr->dateValid = (state == BST_CHECKED);
797 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
798 }
799 return 0;
800 }
801
802
803
804 static LRESULT
805 DATETIME_Command (DATETIME_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
806 {
807 TRACE("hwndbutton = %p\n", infoPtr->hwndCheckbut);
808 if(infoPtr->hwndCheckbut == (HWND)lParam)
809 return DATETIME_Button_Command(infoPtr, wParam, lParam);
810 return 0;
811 }
812
813
814 static LRESULT
815 DATETIME_Enable (DATETIME_INFO *infoPtr, BOOL bEnable)
816 {
817 TRACE("%p %s\n", infoPtr, bEnable ? "TRUE" : "FALSE");
818 if (bEnable)
819 infoPtr->dwStyle &= ~WS_DISABLED;
820 else
821 infoPtr->dwStyle |= WS_DISABLED;
822
823 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
824
825 return 0;
826 }
827
828
829 static LRESULT
830 DATETIME_EraseBackground (const DATETIME_INFO *infoPtr, HDC hdc)
831 {
832 HBRUSH hBrush, hSolidBrush = NULL;
833 RECT rc;
834
835 if (infoPtr->dwStyle & WS_DISABLED)
836 hBrush = hSolidBrush = CreateSolidBrush(comctl32_color.clrBtnFace);
837 else
838 {
839 hBrush = (HBRUSH)SendMessageW(infoPtr->hwndNotify, WM_CTLCOLOREDIT,
840 (WPARAM)hdc, (LPARAM)infoPtr->hwndSelf);
841 if (!hBrush)
842 hBrush = hSolidBrush = CreateSolidBrush(comctl32_color.clrWindow);
843 }
844
845 GetClientRect (infoPtr->hwndSelf, &rc);
846
847 FillRect (hdc, &rc, hBrush);
848
849 if (hSolidBrush)
850 DeleteObject(hSolidBrush);
851
852 return -1;
853 }
854
855
856 static LRESULT
857 DATETIME_Notify (DATETIME_INFO *infoPtr, int idCtrl, LPNMHDR lpnmh)
858 {
859 TRACE ("Got notification %x from %p\n", lpnmh->code, lpnmh->hwndFrom);
860 TRACE ("info: %p %p %p\n", infoPtr->hwndSelf, infoPtr->hMonthCal, infoPtr->hUpdown);
861
862 if (lpnmh->code == MCN_SELECT) {
863 ShowWindow(infoPtr->hMonthCal, SW_HIDE);
864 infoPtr->dateValid = TRUE;
865 SendMessageW (infoPtr->hMonthCal, MCM_GETCURSEL, 0, (LPARAM)&infoPtr->date);
866 TRACE("got from calendar %04d/%02d/%02d day of week %d\n",
867 infoPtr->date.wYear, infoPtr->date.wMonth, infoPtr->date.wDay, infoPtr->date.wDayOfWeek);
868 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_CHECKED, 0);
869 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
870 DATETIME_SendDateTimeChangeNotify (infoPtr);
871 }
872 if ((lpnmh->hwndFrom == infoPtr->hUpdown) && (lpnmh->code == UDN_DELTAPOS)) {
873 LPNMUPDOWN lpnmud = (LPNMUPDOWN)lpnmh;
874 TRACE("Delta pos %d\n", lpnmud->iDelta);
875 infoPtr->pendingUpdown = lpnmud->iDelta;
876 }
877 return 0;
878 }
879
880
881 static LRESULT
882 DATETIME_KeyDown (DATETIME_INFO *infoPtr, DWORD vkCode, LPARAM flags)
883 {
884 int fieldNum = infoPtr->select & DTHT_DATEFIELD;
885 int wrap = 0;
886
887 if (!(infoPtr->haveFocus)) return 0;
888 if ((fieldNum==0) && (infoPtr->select)) return 0;
889
890 if (infoPtr->select & FORMATCALLMASK) {
891 FIXME ("Callbacks not implemented yet\n");
892 }
893
894 if (vkCode >= '0' && vkCode <= '9') {
895 /* this is a somewhat simplified version of what Windows does */
896 SYSTEMTIME *date = &infoPtr->date;
897 switch (infoPtr->fieldspec[fieldNum]) {
898 case ONEDIGITYEAR:
899 case TWODIGITYEAR:
900 date->wYear = date->wYear - (date->wYear%100) +
901 (date->wYear%10)*10 + (vkCode-'0');
902 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(
903 date->wDay,date->wMonth,date->wYear);
904 DATETIME_SendDateTimeChangeNotify (infoPtr);
905 break;
906 case INVALIDFULLYEAR:
907 case FULLYEAR:
908 date->wYear = (date->wYear%1000)*10 + (vkCode-'0');
909 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(
910 date->wDay,date->wMonth,date->wYear);
911 DATETIME_SendDateTimeChangeNotify (infoPtr);
912 break;
913 case ONEDIGITMONTH:
914 case TWODIGITMONTH:
915 if ((date->wMonth%10) > 1 || (vkCode-'0') > 2)
916 date->wMonth = vkCode-'0';
917 else
918 date->wMonth = (date->wMonth%10)*10+vkCode-'0';
919 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(
920 date->wDay,date->wMonth,date->wYear);
921 DATETIME_SendDateTimeChangeNotify (infoPtr);
922 break;
923 case ONEDIGITDAY:
924 case TWODIGITDAY:
925 /* probably better checking here would help */
926 if ((date->wDay%10) >= 3 && (vkCode-'0') > 1)
927 date->wDay = vkCode-'0';
928 else
929 date->wDay = (date->wDay%10)*10+vkCode-'0';
930 date->wDayOfWeek = DATETIME_CalculateDayOfWeek(
931 date->wDay,date->wMonth,date->wYear);
932 DATETIME_SendDateTimeChangeNotify (infoPtr);
933 break;
934 case ONEDIGIT12HOUR:
935 case TWODIGIT12HOUR:
936 if ((date->wHour%10) > 1 || (vkCode-'0') > 2)
937 date->wHour = vkCode-'0';
938 else
939 date->wHour = (date->wHour%10)*10+vkCode-'0';
940 DATETIME_SendDateTimeChangeNotify (infoPtr);
941 break;
942 case ONEDIGIT24HOUR:
943 case TWODIGIT24HOUR:
944 if ((date->wHour%10) > 2)
945 date->wHour = vkCode-'0';
946 else if ((date->wHour%10) == 2 && (vkCode-'0') > 3)
947 date->wHour = vkCode-'0';
948 else
949 date->wHour = (date->wHour%10)*10+vkCode-'0';
950 DATETIME_SendDateTimeChangeNotify (infoPtr);
951 break;
952 case ONEDIGITMINUTE:
953 case TWODIGITMINUTE:
954 if ((date->wMinute%10) > 5)
955 date->wMinute = vkCode-'0';
956 else
957 date->wMinute = (date->wMinute%10)*10+vkCode-'0';
958 DATETIME_SendDateTimeChangeNotify (infoPtr);
959 break;
960 case ONEDIGITSECOND:
961 case TWODIGITSECOND:
962 if ((date->wSecond%10) > 5)
963 date->wSecond = vkCode-'0';
964 else
965 date->wSecond = (date->wSecond%10)*10+vkCode-'0';
966 DATETIME_SendDateTimeChangeNotify (infoPtr);
967 break;
968 }
969 }
970
971 switch (vkCode) {
972 case VK_ADD:
973 case VK_UP:
974 DATETIME_IncreaseField (infoPtr, fieldNum, 1);
975 DATETIME_SendDateTimeChangeNotify (infoPtr);
976 break;
977 case VK_SUBTRACT:
978 case VK_DOWN:
979 DATETIME_IncreaseField (infoPtr, fieldNum, -1);
980 DATETIME_SendDateTimeChangeNotify (infoPtr);
981 break;
982 case VK_HOME:
983 DATETIME_IncreaseField (infoPtr, fieldNum, INT_MIN);
984 DATETIME_SendDateTimeChangeNotify (infoPtr);
985 break;
986 case VK_END:
987 DATETIME_IncreaseField (infoPtr, fieldNum, INT_MAX);
988 DATETIME_SendDateTimeChangeNotify (infoPtr);
989 break;
990 case VK_LEFT:
991 do {
992 if (infoPtr->select == 0) {
993 infoPtr->select = infoPtr->nrFields - 1;
994 wrap++;
995 } else {
996 infoPtr->select--;
997 }
998 } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
999 break;
1000 case VK_RIGHT:
1001 do {
1002 infoPtr->select++;
1003 if (infoPtr->select==infoPtr->nrFields) {
1004 infoPtr->select = 0;
1005 wrap++;
1006 }
1007 } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
1008 break;
1009 }
1010
1011 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
1012
1013 return 0;
1014 }
1015
1016
1017 static LRESULT
1018 DATETIME_VScroll (DATETIME_INFO *infoPtr, WORD wScroll)
1019 {
1020 int fieldNum = infoPtr->select & DTHT_DATEFIELD;
1021
1022 if ((SHORT)LOWORD(wScroll) != SB_THUMBPOSITION) return 0;
1023 if (!(infoPtr->haveFocus)) return 0;
1024 if ((fieldNum==0) && (infoPtr->select)) return 0;
1025
1026 if (infoPtr->pendingUpdown >= 0) {
1027 DATETIME_IncreaseField (infoPtr, fieldNum, 1);
1028 DATETIME_SendDateTimeChangeNotify (infoPtr);
1029 }
1030 else {
1031 DATETIME_IncreaseField (infoPtr, fieldNum, -1);
1032 DATETIME_SendDateTimeChangeNotify (infoPtr);
1033 }
1034
1035 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
1036
1037 return 0;
1038 }
1039
1040
1041 static LRESULT
1042 DATETIME_KillFocus (DATETIME_INFO *infoPtr, HWND lostFocus)
1043 {
1044 TRACE("lost focus to %p\n", lostFocus);
1045
1046 if (infoPtr->haveFocus) {
1047 DATETIME_SendSimpleNotify (infoPtr, NM_KILLFOCUS);
1048 infoPtr->haveFocus = 0;
1049 }
1050
1051 InvalidateRect (infoPtr->hwndSelf, NULL, TRUE);
1052
1053 return 0;
1054 }
1055
1056
1057 static LRESULT
1058 DATETIME_NCCreate (HWND hwnd, const CREATESTRUCTW *lpcs)
1059 {
1060 DWORD dwExStyle = GetWindowLongW(hwnd, GWL_EXSTYLE);
1061 /* force control to have client edge */
1062 dwExStyle |= WS_EX_CLIENTEDGE;
1063 SetWindowLongW(hwnd, GWL_EXSTYLE, dwExStyle);
1064
1065 return DefWindowProcW(hwnd, WM_NCCREATE, 0, (LPARAM)lpcs);
1066 }
1067
1068
1069 static LRESULT
1070 DATETIME_SetFocus (DATETIME_INFO *infoPtr, HWND lostFocus)
1071 {
1072 TRACE("got focus from %p\n", lostFocus);
1073
1074 /* if monthcal is open and it loses focus, close monthcal */
1075 if (infoPtr->hMonthCal && (lostFocus == infoPtr->hMonthCal) &&
1076 IsWindowVisible(infoPtr->hMonthCal))
1077 {
1078 ShowWindow(infoPtr->hMonthCal, SW_HIDE);
1079 DATETIME_SendSimpleNotify(infoPtr, DTN_CLOSEUP);
1080 /* note: this get triggered even if monthcal loses focus to a dropdown
1081 * box click, which occurs without an intermediate WM_PAINT call
1082 */
1083 infoPtr->bDropdownEnabled = FALSE;
1084 return 0;
1085 }
1086
1087 if (infoPtr->haveFocus == 0) {
1088 DATETIME_SendSimpleNotify (infoPtr, NM_SETFOCUS);
1089 infoPtr->haveFocus = DTHT_GOTFOCUS;
1090 }
1091
1092 InvalidateRect(infoPtr->hwndSelf, NULL, FALSE);
1093
1094 return 0;
1095 }
1096
1097
1098 static BOOL
1099 DATETIME_SendDateTimeChangeNotify (const DATETIME_INFO *infoPtr)
1100 {
1101 NMDATETIMECHANGE dtdtc;
1102
1103 dtdtc.nmhdr.hwndFrom = infoPtr->hwndSelf;
1104 dtdtc.nmhdr.idFrom = GetWindowLongPtrW(infoPtr->hwndSelf, GWLP_ID);
1105 dtdtc.nmhdr.code = DTN_DATETIMECHANGE;
1106
1107 dtdtc.dwFlags = (infoPtr->dwStyle & DTS_SHOWNONE) ? GDT_NONE : GDT_VALID;
1108
1109 MONTHCAL_CopyTime (&infoPtr->date, &dtdtc.st);
1110 return (BOOL) SendMessageW (infoPtr->hwndNotify, WM_NOTIFY,
1111 dtdtc.nmhdr.idFrom, (LPARAM)&dtdtc);
1112 }
1113
1114
1115 static BOOL
1116 DATETIME_SendSimpleNotify (const DATETIME_INFO *infoPtr, UINT code)
1117 {
1118 NMHDR nmhdr;
1119
1120 TRACE("%x\n", code);
1121 nmhdr.hwndFrom = infoPtr->hwndSelf;
1122 nmhdr.idFrom = GetWindowLongPtrW(infoPtr->hwndSelf, GWLP_ID);
1123 nmhdr.code = code;
1124
1125 return (BOOL) SendMessageW (infoPtr->hwndNotify, WM_NOTIFY,
1126 nmhdr.idFrom, (LPARAM)&nmhdr);
1127 }
1128
1129 static LRESULT
1130 DATETIME_Size (DATETIME_INFO *infoPtr, WORD flags, INT width, INT height)
1131 {
1132 /* set size */
1133 infoPtr->rcClient.bottom = height;
1134 infoPtr->rcClient.right = width;
1135
1136 TRACE("Height=%d, Width=%d\n", infoPtr->rcClient.bottom, infoPtr->rcClient.right);
1137
1138 infoPtr->rcDraw = infoPtr->rcClient;
1139
1140 if (infoPtr->dwStyle & DTS_UPDOWN) {
1141 SetWindowPos(infoPtr->hUpdown, NULL,
1142 infoPtr->rcClient.right-14, 0,
1143 15, infoPtr->rcClient.bottom - infoPtr->rcClient.top,
1144 SWP_NOACTIVATE | SWP_NOZORDER);
1145 }
1146 else {
1147 /* set the size of the button that drops the calendar down */
1148 /* FIXME: account for style that allows button on left side */
1149 infoPtr->calbutton.top = infoPtr->rcDraw.top;
1150 infoPtr->calbutton.bottom= infoPtr->rcDraw.bottom;
1151 infoPtr->calbutton.left = infoPtr->rcDraw.right-15;
1152 infoPtr->calbutton.right = infoPtr->rcDraw.right;
1153 }
1154
1155 /* set enable/disable button size for show none style being enabled */
1156 /* FIXME: these dimensions are completely incorrect */
1157 infoPtr->checkbox.top = infoPtr->rcDraw.top;
1158 infoPtr->checkbox.bottom = infoPtr->rcDraw.bottom;
1159 infoPtr->checkbox.left = infoPtr->rcDraw.left;
1160 infoPtr->checkbox.right = infoPtr->rcDraw.left + 10;
1161
1162 InvalidateRect(infoPtr->hwndSelf, NULL, FALSE);
1163
1164 return 0;
1165 }
1166
1167
1168 static LRESULT
1169 DATETIME_StyleChanged(DATETIME_INFO *infoPtr, WPARAM wStyleType, const STYLESTRUCT *lpss)
1170 {
1171 static const WCHAR buttonW[] = { 'b', 'u', 't', 't', 'o', 'n', 0 };
1172
1173 TRACE("(styletype=%lx, styleOld=0x%08x, styleNew=0x%08x)\n",
1174 wStyleType, lpss->styleOld, lpss->styleNew);
1175
1176 if (wStyleType != GWL_STYLE) return 0;
1177
1178 infoPtr->dwStyle = lpss->styleNew;
1179
1180 if ( !(lpss->styleOld & DTS_SHOWNONE) && (lpss->styleNew & DTS_SHOWNONE) ) {
1181 infoPtr->hwndCheckbut = CreateWindowExW (0, buttonW, 0, WS_CHILD | WS_VISIBLE | BS_AUTOCHECKBOX,
1182 2, 2, 13, 13, infoPtr->hwndSelf, 0,
1183 (HINSTANCE)GetWindowLongPtrW (infoPtr->hwndSelf, GWLP_HINSTANCE), 0);
1184 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, 1, 0);
1185 }
1186 if ( (lpss->styleOld & DTS_SHOWNONE) && !(lpss->styleNew & DTS_SHOWNONE) ) {
1187 DestroyWindow(infoPtr->hwndCheckbut);
1188 infoPtr->hwndCheckbut = 0;
1189 }
1190 if ( !(lpss->styleOld & DTS_UPDOWN) && (lpss->styleNew & DTS_UPDOWN) ) {
1191 infoPtr->hUpdown = CreateUpDownControl (WS_CHILD | WS_BORDER | WS_VISIBLE, 120, 1, 20, 20,
1192 infoPtr->hwndSelf, 1, 0, 0, UD_MAXVAL, UD_MINVAL, 0);
1193 }
1194 if ( (lpss->styleOld & DTS_UPDOWN) && !(lpss->styleNew & DTS_UPDOWN) ) {
1195 DestroyWindow(infoPtr->hUpdown);
1196 infoPtr->hUpdown = 0;
1197 }
1198
1199 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
1200 return 0;
1201 }
1202
1203
1204 static LRESULT
1205 DATETIME_SetFont (DATETIME_INFO *infoPtr, HFONT font, BOOL repaint)
1206 {
1207 infoPtr->hFont = font;
1208 if (repaint) InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
1209 return 0;
1210 }
1211
1212
1213 static LRESULT
1214 DATETIME_Create (HWND hwnd, const CREATESTRUCTW *lpcs)
1215 {
1216 static const WCHAR SysMonthCal32W[] = { 'S', 'y', 's', 'M', 'o', 'n', 't', 'h', 'C', 'a', 'l', '3', '2', 0 };
1217 DATETIME_INFO *infoPtr = (DATETIME_INFO *)Alloc (sizeof(DATETIME_INFO));
1218 STYLESTRUCT ss = { 0, lpcs->style };
1219
1220 if (!infoPtr) return -1;
1221
1222 infoPtr->hwndSelf = hwnd;
1223 infoPtr->dwStyle = lpcs->style;
1224
1225 infoPtr->nrFieldsAllocated = 32;
1226 infoPtr->fieldspec = (int *) Alloc (infoPtr->nrFieldsAllocated * sizeof(int));
1227 infoPtr->fieldRect = (RECT *) Alloc (infoPtr->nrFieldsAllocated * sizeof(RECT));
1228 infoPtr->buflen = (int *) Alloc (infoPtr->nrFieldsAllocated * sizeof(int));
1229 infoPtr->hwndNotify = lpcs->hwndParent;
1230 infoPtr->select = -1; /* initially, nothing is selected */
1231 infoPtr->bDropdownEnabled = TRUE;
1232
1233 DATETIME_StyleChanged(infoPtr, GWL_STYLE, &ss);
1234 DATETIME_SetFormatW (infoPtr, 0);
1235
1236 /* create the monthcal control */
1237 infoPtr->hMonthCal = CreateWindowExW (0, SysMonthCal32W, 0, WS_BORDER | WS_POPUP | WS_CLIPSIBLINGS,
1238 0, 0, 0, 0, infoPtr->hwndSelf, 0, 0, 0);
1239
1240 /* initialize info structure */
1241 GetLocalTime (&infoPtr->date);
1242 infoPtr->dateValid = TRUE;
1243 infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT);
1244
1245 SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
1246
1247 return 0;
1248 }
1249
1250
1251
1252 static LRESULT
1253 DATETIME_Destroy (DATETIME_INFO *infoPtr)
1254 {
1255 if (infoPtr->hwndCheckbut)
1256 DestroyWindow(infoPtr->hwndCheckbut);
1257 if (infoPtr->hUpdown)
1258 DestroyWindow(infoPtr->hUpdown);
1259 if (infoPtr->hMonthCal)
1260 DestroyWindow(infoPtr->hMonthCal);
1261 SetWindowLongPtrW( infoPtr->hwndSelf, 0, 0 ); /* clear infoPtr */
1262 Free (infoPtr);
1263 return 0;
1264 }
1265
1266
1267 static LRESULT WINAPI
1268 DATETIME_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
1269 {
1270 DATETIME_INFO *infoPtr = ((DATETIME_INFO *)GetWindowLongPtrW (hwnd, 0));
1271 LRESULT ret;
1272
1273 TRACE ("%x, %lx, %lx\n", uMsg, wParam, lParam);
1274
1275 if (!infoPtr && (uMsg != WM_CREATE) && (uMsg != WM_NCCREATE))
1276 return DefWindowProcW( hwnd, uMsg, wParam, lParam );
1277
1278 switch (uMsg) {
1279
1280 case DTM_GETSYSTEMTIME:
1281 return DATETIME_GetSystemTime (infoPtr, (SYSTEMTIME *) lParam);
1282
1283 case DTM_SETSYSTEMTIME:
1284 return DATETIME_SetSystemTime (infoPtr, wParam, (SYSTEMTIME *) lParam);
1285
1286 case DTM_GETRANGE:
1287 ret = SendMessageW (infoPtr->hMonthCal, MCM_GETRANGE, wParam, lParam);
1288 return ret ? ret : 1; /* bug emulation */
1289
1290 case DTM_SETRANGE:
1291 return SendMessageW (infoPtr->hMonthCal, MCM_SETRANGE, wParam, lParam);
1292
1293 case DTM_SETFORMATA:
1294 return DATETIME_SetFormatA (infoPtr, (LPCSTR)lParam);
1295
1296 case DTM_SETFORMATW:
1297 return DATETIME_SetFormatW (infoPtr, (LPCWSTR)lParam);
1298
1299 case DTM_GETMONTHCAL:
1300 return (LRESULT)infoPtr->hMonthCal;
1301
1302 case DTM_SETMCCOLOR:
1303 return SendMessageW (infoPtr->hMonthCal, MCM_SETCOLOR, wParam, lParam);
1304
1305 case DTM_GETMCCOLOR:
1306 return SendMessageW (infoPtr->hMonthCal, MCM_GETCOLOR, wParam, 0);
1307
1308 case DTM_SETMCFONT:
1309 return SendMessageW (infoPtr->hMonthCal, WM_SETFONT, wParam, lParam);
1310
1311 case DTM_GETMCFONT:
1312 return SendMessageW (infoPtr->hMonthCal, WM_GETFONT, wParam, lParam);
1313
1314 case WM_NOTIFY:
1315 return DATETIME_Notify (infoPtr, (int)wParam, (LPNMHDR)lParam);
1316
1317 case WM_ENABLE:
1318 return DATETIME_Enable (infoPtr, (BOOL)wParam);
1319
1320 case WM_ERASEBKGND:
1321 return DATETIME_EraseBackground (infoPtr, (HDC)wParam);
1322
1323 case WM_GETDLGCODE:
1324 return DLGC_WANTARROWS | DLGC_WANTCHARS;
1325
1326 case WM_PRINTCLIENT:
1327 case WM_PAINT:
1328 return DATETIME_Paint (infoPtr, (HDC)wParam);
1329
1330 case WM_KEYDOWN:
1331 return DATETIME_KeyDown (infoPtr, wParam, lParam);
1332
1333 case WM_KILLFOCUS:
1334 return DATETIME_KillFocus (infoPtr, (HWND)wParam);
1335
1336 case WM_NCCREATE:
1337 return DATETIME_NCCreate (hwnd, (LPCREATESTRUCTW)lParam);
1338
1339 case WM_SETFOCUS:
1340 return DATETIME_SetFocus (infoPtr, (HWND)wParam);
1341
1342 case WM_SIZE:
1343 return DATETIME_Size (infoPtr, wParam, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
1344
1345 case WM_LBUTTONDOWN:
1346 return DATETIME_LButtonDown (infoPtr, (WORD)wParam, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
1347
1348 case WM_LBUTTONUP:
1349 return DATETIME_LButtonUp (infoPtr, (WORD)wParam);
1350
1351 case WM_VSCROLL:
1352 return DATETIME_VScroll (infoPtr, (WORD)wParam);
1353
1354 case WM_CREATE:
1355 return DATETIME_Create (hwnd, (LPCREATESTRUCTW)lParam);
1356
1357 case WM_DESTROY:
1358 return DATETIME_Destroy (infoPtr);
1359
1360 case WM_COMMAND:
1361 return DATETIME_Command (infoPtr, wParam, lParam);
1362
1363 case WM_STYLECHANGED:
1364 return DATETIME_StyleChanged(infoPtr, wParam, (LPSTYLESTRUCT)lParam);
1365
1366 case WM_SETFONT:
1367 return DATETIME_SetFont(infoPtr, (HFONT)wParam, (BOOL)lParam);
1368
1369 case WM_GETFONT:
1370 return (LRESULT) infoPtr->hFont;
1371
1372 default:
1373 if ((uMsg >= WM_USER) && (uMsg < WM_APP))
1374 ERR("unknown msg %04x wp=%08lx lp=%08lx\n",
1375 uMsg, wParam, lParam);
1376 return DefWindowProcW (hwnd, uMsg, wParam, lParam);
1377 }
1378 }
1379
1380
1381 void
1382 DATETIME_Register (void)
1383 {
1384 WNDCLASSW wndClass;
1385
1386 ZeroMemory (&wndClass, sizeof(WNDCLASSW));
1387 wndClass.style = CS_GLOBALCLASS;
1388 wndClass.lpfnWndProc = DATETIME_WindowProc;
1389 wndClass.cbClsExtra = 0;
1390 wndClass.cbWndExtra = sizeof(DATETIME_INFO *);
1391 wndClass.hCursor = LoadCursorW (0, (LPCWSTR)IDC_ARROW);
1392 wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
1393 wndClass.lpszClassName = DATETIMEPICK_CLASSW;
1394
1395 RegisterClassW (&wndClass);
1396 }
1397
1398
1399 void
1400 DATETIME_Unregister (void)
1401 {
1402 UnregisterClassW (DATETIMEPICK_CLASSW, NULL);
1403 }
Maarten's multimedia branch