gdiplus/tests: Comment out a test that corrupts the stack on Vista.
[wine/multimedia.git] / dlls / msvcrt / time.c
blob2e8828cb377562bd9e74e034ddc28b9a285d6e12
1 /*
2 * msvcrt.dll date/time functions
4 * Copyright 1996,1998 Marcus Meissner
5 * Copyright 1996 Jukka Iivonen
6 * Copyright 1997,2000 Uwe Bonnes
7 * Copyright 2000 Jon Griffiths
8 * Copyright 2004 Hans Leidekker
10 * This library is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
25 #include "config.h"
27 #define _POSIX_PTHREAD_SEMANTICS /* switch to a 2 arg style asctime_r on Solaris */
28 #include <time.h>
29 #ifdef HAVE_SYS_TIMES_H
30 # include <sys/times.h>
31 #endif
32 #include <limits.h>
34 #include "msvcrt.h"
35 #include "mtdll.h"
36 #include "winbase.h"
37 #include "winnls.h"
38 #include "wine/debug.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt);
42 static const int MonthLengths[2][12] =
44 { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
45 { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }
48 static inline int IsLeapYear(int Year)
50 return Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0);
53 static inline void msvcrt_tm_to_unix( struct tm *dest, const struct MSVCRT_tm *src )
55 memset( dest, 0, sizeof(*dest) );
56 dest->tm_sec = src->tm_sec;
57 dest->tm_min = src->tm_min;
58 dest->tm_hour = src->tm_hour;
59 dest->tm_mday = src->tm_mday;
60 dest->tm_mon = src->tm_mon;
61 dest->tm_year = src->tm_year;
62 dest->tm_wday = src->tm_wday;
63 dest->tm_yday = src->tm_yday;
64 dest->tm_isdst = src->tm_isdst;
67 static inline void unix_tm_to_msvcrt( struct MSVCRT_tm *dest, const struct tm *src )
69 memset( dest, 0, sizeof(*dest) );
70 dest->tm_sec = src->tm_sec;
71 dest->tm_min = src->tm_min;
72 dest->tm_hour = src->tm_hour;
73 dest->tm_mday = src->tm_mday;
74 dest->tm_mon = src->tm_mon;
75 dest->tm_year = src->tm_year;
76 dest->tm_wday = src->tm_wday;
77 dest->tm_yday = src->tm_yday;
78 dest->tm_isdst = src->tm_isdst;
81 #define SECSPERDAY 86400
82 /* 1601 to 1970 is 369 years plus 89 leap days */
83 #define SECS_1601_TO_1970 ((369 * 365 + 89) * (ULONGLONG)SECSPERDAY)
84 #define TICKSPERSEC 10000000
85 #define TICKSPERMSEC 10000
86 #define TICKS_1601_TO_1970 (SECS_1601_TO_1970 * TICKSPERSEC)
88 /**********************************************************************
89 * _mktime64 (MSVCRT.@)
91 MSVCRT___time64_t CDECL MSVCRT__mktime64(struct MSVCRT_tm *mstm)
93 time_t secs;
94 struct tm tm;
96 msvcrt_tm_to_unix( &tm, mstm );
97 secs = mktime( &tm );
98 unix_tm_to_msvcrt( mstm, &tm );
100 return secs < 0 ? -1 : secs;
103 /**********************************************************************
104 * _mktime32 (MSVCRT.@)
106 MSVCRT___time32_t CDECL MSVCRT__mktime32(struct MSVCRT_tm *mstm)
108 return MSVCRT__mktime64( mstm );
111 /**********************************************************************
112 * mktime (MSVCRT.@)
114 #ifdef _WIN64
115 MSVCRT___time64_t CDECL MSVCRT_mktime(struct MSVCRT_tm *mstm)
117 return MSVCRT__mktime64( mstm );
119 #else
120 MSVCRT___time32_t CDECL MSVCRT_mktime(struct MSVCRT_tm *mstm)
122 return MSVCRT__mktime32( mstm );
124 #endif
126 /**********************************************************************
127 * _mkgmtime64 (MSVCRT.@)
129 * time->tm_isdst value is ignored
131 MSVCRT___time64_t CDECL MSVCRT__mkgmtime64(struct MSVCRT_tm *time)
133 SYSTEMTIME st;
134 FILETIME ft;
135 MSVCRT___time64_t ret;
136 int i;
138 st.wMilliseconds = 0;
139 st.wSecond = time->tm_sec;
140 st.wMinute = time->tm_min;
141 st.wHour = time->tm_hour;
142 st.wDay = time->tm_mday;
143 st.wMonth = time->tm_mon+1;
144 st.wYear = time->tm_year+1900;
146 if(!SystemTimeToFileTime(&st, &ft))
147 return -1;
149 FileTimeToSystemTime(&ft, &st);
150 time->tm_wday = st.wDayOfWeek;
152 for(i=time->tm_yday=0; i<st.wMonth-1; i++)
153 time->tm_yday += MonthLengths[IsLeapYear(st.wYear)][i];
154 time->tm_yday += st.wDay-1;
156 ret = ((MSVCRT___time64_t)ft.dwHighDateTime<<32)+ft.dwLowDateTime;
157 ret = (ret-TICKS_1601_TO_1970)/TICKSPERSEC;
158 return ret;
161 /**********************************************************************
162 * _mkgmtime32 (MSVCRT.@)
164 MSVCRT___time32_t CDECL MSVCRT__mkgmtime32(struct MSVCRT_tm *time)
166 return MSVCRT__mkgmtime64(time);
169 /**********************************************************************
170 * _mkgmtime (MSVCRT.@)
172 #ifdef _WIN64
173 MSVCRT___time64_t CDECL MSVCRT__mkgmtime(struct MSVCRT_tm *time)
175 return MSVCRT__mkgmtime64(time);
177 #else
178 MSVCRT___time32_t CDECL MSVCRT__mkgmtime(struct MSVCRT_tm *time)
180 return MSVCRT__mkgmtime32(time);
182 #endif
184 /*********************************************************************
185 * _localtime64 (MSVCRT.@)
187 struct MSVCRT_tm* CDECL MSVCRT__localtime64(const MSVCRT___time64_t* secs)
189 struct tm *tm;
190 thread_data_t *data;
191 time_t seconds = *secs;
193 if (seconds < 0) return NULL;
195 _mlock(_TIME_LOCK);
196 if (!(tm = localtime( &seconds))) {
197 _munlock(_TIME_LOCK);
198 return NULL;
201 data = msvcrt_get_thread_data();
202 unix_tm_to_msvcrt( &data->time_buffer, tm );
203 _munlock(_TIME_LOCK);
205 return &data->time_buffer;
208 /*********************************************************************
209 * _localtime32 (MSVCRT.@)
211 struct MSVCRT_tm* CDECL MSVCRT__localtime32(const MSVCRT___time32_t* secs)
213 MSVCRT___time64_t secs64 = *secs;
214 return MSVCRT__localtime64( &secs64 );
217 /*********************************************************************
218 * localtime (MSVCRT.@)
220 #ifdef _WIN64
221 struct MSVCRT_tm* CDECL MSVCRT_localtime(const MSVCRT___time64_t* secs)
223 return MSVCRT__localtime64( secs );
225 #else
226 struct MSVCRT_tm* CDECL MSVCRT_localtime(const MSVCRT___time32_t* secs)
228 return MSVCRT__localtime32( secs );
230 #endif
232 /*********************************************************************
233 * _gmtime64 (MSVCRT.@)
235 struct MSVCRT_tm* CDECL MSVCRT__gmtime64(const MSVCRT___time64_t* secs)
237 thread_data_t * const data = msvcrt_get_thread_data();
238 int i;
239 FILETIME ft;
240 SYSTEMTIME st;
242 ULONGLONG time = *secs * (ULONGLONG)TICKSPERSEC + TICKS_1601_TO_1970;
244 ft.dwHighDateTime = (UINT)(time >> 32);
245 ft.dwLowDateTime = (UINT)time;
247 FileTimeToSystemTime(&ft, &st);
249 if (st.wYear < 1970) return NULL;
251 data->time_buffer.tm_sec = st.wSecond;
252 data->time_buffer.tm_min = st.wMinute;
253 data->time_buffer.tm_hour = st.wHour;
254 data->time_buffer.tm_mday = st.wDay;
255 data->time_buffer.tm_year = st.wYear - 1900;
256 data->time_buffer.tm_mon = st.wMonth - 1;
257 data->time_buffer.tm_wday = st.wDayOfWeek;
258 for (i = data->time_buffer.tm_yday = 0; i < st.wMonth - 1; i++) {
259 data->time_buffer.tm_yday += MonthLengths[IsLeapYear(st.wYear)][i];
262 data->time_buffer.tm_yday += st.wDay - 1;
263 data->time_buffer.tm_isdst = 0;
265 return &data->time_buffer;
268 /*********************************************************************
269 * _gmtime32 (MSVCRT.@)
271 struct MSVCRT_tm* CDECL MSVCRT__gmtime32(const MSVCRT___time32_t* secs)
273 MSVCRT___time64_t secs64 = *secs;
274 return MSVCRT__gmtime64( &secs64 );
277 /*********************************************************************
278 * gmtime (MSVCRT.@)
280 #ifdef _WIN64
281 struct MSVCRT_tm* CDECL MSVCRT_gmtime(const MSVCRT___time64_t* secs)
283 return MSVCRT__gmtime64( secs );
285 #else
286 struct MSVCRT_tm* CDECL MSVCRT_gmtime(const MSVCRT___time32_t* secs)
288 return MSVCRT__gmtime32( secs );
290 #endif
292 /**********************************************************************
293 * _strdate (MSVCRT.@)
295 char* CDECL _strdate(char* date)
297 static const char format[] = "MM'/'dd'/'yy";
299 GetDateFormatA(LOCALE_NEUTRAL, 0, NULL, format, date, 9);
301 return date;
304 /**********************************************************************
305 * _wstrdate (MSVCRT.@)
307 MSVCRT_wchar_t* CDECL _wstrdate(MSVCRT_wchar_t* date)
309 static const WCHAR format[] = { 'M','M','\'','/','\'','d','d','\'','/','\'','y','y',0 };
311 GetDateFormatW(LOCALE_NEUTRAL, 0, NULL, format, date, 9);
313 return date;
316 /*********************************************************************
317 * _strtime (MSVCRT.@)
319 char* CDECL _strtime(char* time)
321 static const char format[] = "HH':'mm':'ss";
323 GetTimeFormatA(LOCALE_NEUTRAL, 0, NULL, format, time, 9);
325 return time;
328 /*********************************************************************
329 * _wstrtime (MSVCRT.@)
331 MSVCRT_wchar_t* CDECL _wstrtime(MSVCRT_wchar_t* time)
333 static const WCHAR format[] = { 'H','H','\'',':','\'','m','m','\'',':','\'','s','s',0 };
335 GetTimeFormatW(LOCALE_NEUTRAL, 0, NULL, format, time, 9);
337 return time;
340 /*********************************************************************
341 * clock (MSVCRT.@)
343 MSVCRT_clock_t CDECL MSVCRT_clock(void)
345 FILETIME ftc, fte, ftk, ftu;
346 ULONGLONG utime, ktime;
348 MSVCRT_clock_t clock;
350 GetProcessTimes(GetCurrentProcess(), &ftc, &fte, &ftk, &ftu);
352 ktime = ((ULONGLONG)ftk.dwHighDateTime << 32) | ftk.dwLowDateTime;
353 utime = ((ULONGLONG)ftu.dwHighDateTime << 32) | ftu.dwLowDateTime;
355 clock = (utime + ktime) / (TICKSPERSEC / MSVCRT_CLOCKS_PER_SEC);
357 return clock;
360 /*********************************************************************
361 * _difftime64 (MSVCRT.@)
363 double CDECL MSVCRT__difftime64(MSVCRT___time64_t time1, MSVCRT___time64_t time2)
365 return (double)(time1 - time2);
368 /*********************************************************************
369 * _difftime32 (MSVCRT.@)
371 double CDECL MSVCRT__difftime32(MSVCRT___time32_t time1, MSVCRT___time32_t time2)
373 return (double)(time1 - time2);
376 /*********************************************************************
377 * difftime (MSVCRT.@)
379 #ifdef _WIN64
380 double CDECL MSVCRT_difftime(MSVCRT___time64_t time1, MSVCRT___time64_t time2)
382 return MSVCRT__difftime64( time1, time2 );
384 #else
385 double CDECL MSVCRT_difftime(MSVCRT___time32_t time1, MSVCRT___time32_t time2)
387 return MSVCRT__difftime32( time1, time2 );
389 #endif
391 /*********************************************************************
392 * _ftime64 (MSVCRT.@)
394 void CDECL MSVCRT__ftime64(struct MSVCRT___timeb64 *buf)
396 TIME_ZONE_INFORMATION tzinfo;
397 FILETIME ft;
398 ULONGLONG time;
400 DWORD tzid = GetTimeZoneInformation(&tzinfo);
401 GetSystemTimeAsFileTime(&ft);
403 time = ((ULONGLONG)ft.dwHighDateTime << 32) | ft.dwLowDateTime;
405 buf->time = time / TICKSPERSEC - SECS_1601_TO_1970;
406 buf->millitm = (time % TICKSPERSEC) / TICKSPERMSEC;
407 buf->timezone = tzinfo.Bias +
408 ( tzid == TIME_ZONE_ID_STANDARD ? tzinfo.StandardBias :
409 ( tzid == TIME_ZONE_ID_DAYLIGHT ? tzinfo.DaylightBias : 0 ));
410 buf->dstflag = (tzid == TIME_ZONE_ID_DAYLIGHT?1:0);
413 /*********************************************************************
414 * _ftime32 (MSVCRT.@)
416 void CDECL MSVCRT__ftime32(struct MSVCRT___timeb32 *buf)
418 struct MSVCRT___timeb64 buf64;
420 MSVCRT__ftime64( &buf64 );
421 buf->time = buf64.time;
422 buf->millitm = buf64.millitm;
423 buf->timezone = buf64.timezone;
424 buf->dstflag = buf64.dstflag;
427 /*********************************************************************
428 * _ftime (MSVCRT.@)
430 #ifdef _WIN64
431 void CDECL MSVCRT__ftime(struct MSVCRT___timeb64 *buf)
433 return MSVCRT__ftime64( buf );
435 #else
436 void CDECL MSVCRT__ftime(struct MSVCRT___timeb32 *buf)
438 return MSVCRT__ftime32( buf );
440 #endif
442 /*********************************************************************
443 * _time64 (MSVCRT.@)
445 MSVCRT___time64_t CDECL MSVCRT__time64(MSVCRT___time64_t *buf)
447 MSVCRT___time64_t curtime;
448 struct MSVCRT___timeb64 tb;
450 MSVCRT__ftime64(&tb);
452 curtime = tb.time;
453 return buf ? *buf = curtime : curtime;
456 /*********************************************************************
457 * _time32 (MSVCRT.@)
459 MSVCRT___time32_t CDECL MSVCRT__time32(MSVCRT___time32_t *buf)
461 MSVCRT___time32_t curtime;
462 struct MSVCRT___timeb64 tb;
464 MSVCRT__ftime64(&tb);
466 curtime = tb.time;
467 return buf ? *buf = curtime : curtime;
470 /*********************************************************************
471 * time (MSVCRT.@)
473 #ifdef _WIN64
474 MSVCRT___time64_t CDECL MSVCRT_time(MSVCRT___time64_t* buf)
476 return MSVCRT__time64( buf );
478 #else
479 MSVCRT___time32_t CDECL MSVCRT_time(MSVCRT___time32_t* buf)
481 return MSVCRT__time32( buf );
483 #endif
485 /*********************************************************************
486 * _daylight (MSVCRT.@)
488 int MSVCRT___daylight = 0;
490 /*********************************************************************
491 * __p_daylight (MSVCRT.@)
493 int * CDECL MSVCRT___p__daylight(void)
495 return &MSVCRT___daylight;
498 /*********************************************************************
499 * _dstbias (MSVCRT.@)
501 int MSVCRT__dstbias = 0;
503 /*********************************************************************
504 * __p_dstbias (MSVCRT.@)
506 int * CDECL __p__dstbias(void)
508 return &MSVCRT__dstbias;
511 /*********************************************************************
512 * _timezone (MSVCRT.@)
514 MSVCRT_long MSVCRT___timezone = 0;
516 /*********************************************************************
517 * __p_timezone (MSVCRT.@)
519 MSVCRT_long * CDECL MSVCRT___p__timezone(void)
521 return &MSVCRT___timezone;
524 /*********************************************************************
525 * _tzname (MSVCRT.@)
526 * NOTES
527 * Some apps (notably Mozilla) insist on writing to these, so the buffer
528 * must be large enough. The size is picked based on observation of
529 * Windows XP.
531 static char tzname_std[64] = "";
532 static char tzname_dst[64] = "";
533 char *MSVCRT__tzname[2] = { tzname_std, tzname_dst };
535 /*********************************************************************
536 * __p_tzname (MSVCRT.@)
538 char ** CDECL __p__tzname(void)
540 return MSVCRT__tzname;
543 /*********************************************************************
544 * _tzset (MSVCRT.@)
546 void CDECL MSVCRT__tzset(void)
548 tzset();
549 #if defined(HAVE_TIMEZONE) && defined(HAVE_DAYLIGHT)
550 MSVCRT___daylight = daylight;
551 MSVCRT___timezone = timezone;
552 #else
554 static const time_t seconds_in_year = (365 * 24 + 6) * 3600;
555 time_t t;
556 struct tm *tmp;
557 int zone_january, zone_july;
559 _mlock(_TIME_LOCK);
560 t = (time(NULL) / seconds_in_year) * seconds_in_year;
561 tmp = localtime(&t);
562 zone_january = -tmp->tm_gmtoff;
563 t += seconds_in_year / 2;
564 tmp = localtime(&t);
565 zone_july = -tmp->tm_gmtoff;
566 _munlock(_TIME_LOCK);
568 MSVCRT___daylight = (zone_january != zone_july);
569 MSVCRT___timezone = max(zone_january, zone_july);
571 #endif
572 lstrcpynA(tzname_std, tzname[0], sizeof(tzname_std));
573 tzname_std[sizeof(tzname_std) - 1] = '\0';
574 lstrcpynA(tzname_dst, tzname[1], sizeof(tzname_dst));
575 tzname_dst[sizeof(tzname_dst) - 1] = '\0';
578 /*********************************************************************
579 * strftime (MSVCRT.@)
581 MSVCRT_size_t CDECL MSVCRT_strftime( char *str, MSVCRT_size_t max, const char *format,
582 const struct MSVCRT_tm *mstm )
584 struct tm tm;
586 msvcrt_tm_to_unix( &tm, mstm );
587 return strftime( str, max, format, &tm );
590 /*********************************************************************
591 * wcsftime (MSVCRT.@)
593 MSVCRT_size_t CDECL MSVCRT_wcsftime( MSVCRT_wchar_t *str, MSVCRT_size_t max,
594 const MSVCRT_wchar_t *format, const struct MSVCRT_tm *mstm )
596 char *s, *fmt;
597 MSVCRT_size_t len;
599 TRACE("%p %ld %s %p\n", str, max, debugstr_w(format), mstm );
601 len = WideCharToMultiByte( CP_UNIXCP, 0, format, -1, NULL, 0, NULL, NULL );
602 if (!(fmt = MSVCRT_malloc( len ))) return 0;
603 WideCharToMultiByte( CP_UNIXCP, 0, format, -1, fmt, len, NULL, NULL );
605 if ((s = MSVCRT_malloc( max*4 )))
607 struct tm tm;
608 msvcrt_tm_to_unix( &tm, mstm );
609 if (!strftime( s, max*4, fmt, &tm )) s[0] = 0;
610 len = MultiByteToWideChar( CP_UNIXCP, 0, s, -1, str, max );
611 if (len) len--;
612 MSVCRT_free( s );
614 else len = 0;
616 MSVCRT_free( fmt );
617 return len;
620 /*********************************************************************
621 * asctime (MSVCRT.@)
623 char * CDECL MSVCRT_asctime(const struct MSVCRT_tm *mstm)
625 thread_data_t *data = msvcrt_get_thread_data();
626 struct tm tm;
628 msvcrt_tm_to_unix( &tm, mstm );
630 if (!data->asctime_buffer)
631 data->asctime_buffer = MSVCRT_malloc( 30 ); /* ought to be enough */
633 /* FIXME: may want to map from Unix codepage to CP_ACP */
634 #ifdef HAVE_ASCTIME_R
635 asctime_r( &tm, data->asctime_buffer );
636 #else
637 strcpy( data->asctime_buffer, asctime(&tm) );
638 #endif
639 return data->asctime_buffer;
642 /*********************************************************************
643 * _wasctime (MSVCRT.@)
645 MSVCRT_wchar_t * CDECL MSVCRT__wasctime(const struct MSVCRT_tm *mstm)
647 thread_data_t *data = msvcrt_get_thread_data();
648 struct tm tm;
649 char buffer[30];
651 msvcrt_tm_to_unix( &tm, mstm );
653 if (!data->wasctime_buffer)
654 data->wasctime_buffer = MSVCRT_malloc( 30*sizeof(MSVCRT_wchar_t) ); /* ought to be enough */
655 #ifdef HAVE_ASCTIME_R
656 asctime_r( &tm, buffer );
657 #else
658 strcpy( buffer, asctime(&tm) );
659 #endif
660 MultiByteToWideChar( CP_UNIXCP, 0, buffer, -1, data->wasctime_buffer, 30 );
661 return data->wasctime_buffer;
664 /*********************************************************************
665 * _ctime64 (MSVCRT.@)
667 char * CDECL MSVCRT__ctime64(const MSVCRT___time64_t *time)
669 struct MSVCRT_tm *t;
670 t = MSVCRT__localtime64( time );
671 if (!t) return NULL;
672 return MSVCRT_asctime( t );
675 /*********************************************************************
676 * _ctime32 (MSVCRT.@)
678 char * CDECL MSVCRT__ctime32(const MSVCRT___time32_t *time)
680 struct MSVCRT_tm *t;
681 t = MSVCRT__localtime32( time );
682 if (!t) return NULL;
683 return MSVCRT_asctime( t );
686 /*********************************************************************
687 * ctime (MSVCRT.@)
689 #ifdef _WIN64
690 char * CDECL MSVCRT_ctime(const MSVCRT___time64_t *time)
692 return MSVCRT__ctime64( time );
694 #else
695 char * CDECL MSVCRT_ctime(const MSVCRT___time32_t *time)
697 return MSVCRT__ctime32( time );
699 #endif
701 /*********************************************************************
702 * _wctime64 (MSVCRT.@)
704 MSVCRT_wchar_t * CDECL MSVCRT__wctime64(const MSVCRT___time64_t *time)
706 return MSVCRT__wasctime( MSVCRT__localtime64(time) );
709 /*********************************************************************
710 * _wctime32 (MSVCRT.@)
712 MSVCRT_wchar_t * CDECL MSVCRT__wctime32(const MSVCRT___time32_t *time)
714 return MSVCRT__wasctime( MSVCRT__localtime32(time) );
717 /*********************************************************************
718 * _wctime (MSVCRT.@)
720 #ifdef _WIN64
721 MSVCRT_wchar_t * CDECL MSVCRT__wctime(const MSVCRT___time64_t *time)
723 return MSVCRT__wctime64( time );
725 #else
726 MSVCRT_wchar_t * CDECL MSVCRT__wctime(const MSVCRT___time32_t *time)
728 return MSVCRT__wctime32( time );
730 #endif