msvcrt: Rewrite asctime function.
[wine] / dlls / msvcrt / time.c
1 /*
2  * msvcrt.dll date/time functions
3  *
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
9  *
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.
14  *
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.
19  *
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
23  */
24
25 #include "config.h"
26
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>
33
34 #include "msvcrt.h"
35 #include "mtdll.h"
36 #include "winbase.h"
37 #include "winnls.h"
38 #include "wine/debug.h"
39 #include "wine/unicode.h"
40
41 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt);
42
43 static const int MonthLengths[2][12] =
44 {
45     { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
46     { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }
47 };
48
49 static inline int IsLeapYear(int Year)
50 {
51     return Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0);
52 }
53
54 static inline void msvcrt_tm_to_unix( struct tm *dest, const struct MSVCRT_tm *src )
55 {
56     memset( dest, 0, sizeof(*dest) );
57     dest->tm_sec   = src->tm_sec;
58     dest->tm_min   = src->tm_min;
59     dest->tm_hour  = src->tm_hour;
60     dest->tm_mday  = src->tm_mday;
61     dest->tm_mon   = src->tm_mon;
62     dest->tm_year  = src->tm_year;
63     dest->tm_wday  = src->tm_wday;
64     dest->tm_yday  = src->tm_yday;
65     dest->tm_isdst = src->tm_isdst;
66 }
67
68 static inline void unix_tm_to_msvcrt( struct MSVCRT_tm *dest, const struct tm *src )
69 {
70     memset( dest, 0, sizeof(*dest) );
71     dest->tm_sec   = src->tm_sec;
72     dest->tm_min   = src->tm_min;
73     dest->tm_hour  = src->tm_hour;
74     dest->tm_mday  = src->tm_mday;
75     dest->tm_mon   = src->tm_mon;
76     dest->tm_year  = src->tm_year;
77     dest->tm_wday  = src->tm_wday;
78     dest->tm_yday  = src->tm_yday;
79     dest->tm_isdst = src->tm_isdst;
80 }
81
82 static inline void write_invalid_msvcrt_tm( struct MSVCRT_tm *tm )
83 {
84     tm->tm_sec = -1;
85     tm->tm_min = -1;
86     tm->tm_hour = -1;
87     tm->tm_mday = -1;
88     tm->tm_mon = -1;
89     tm->tm_year = -1;
90     tm->tm_wday = -1;
91     tm->tm_yday = -1;
92     tm->tm_isdst = -1;
93 }
94
95 #define SECSPERDAY        86400
96 /* 1601 to 1970 is 369 years plus 89 leap days */
97 #define SECS_1601_TO_1970  ((369 * 365 + 89) * (ULONGLONG)SECSPERDAY)
98 #define TICKSPERSEC       10000000
99 #define TICKSPERMSEC      10000
100 #define TICKS_1601_TO_1970 (SECS_1601_TO_1970 * TICKSPERSEC)
101
102 /**********************************************************************
103  *              _mktime64 (MSVCRT.@)
104  */
105 MSVCRT___time64_t CDECL MSVCRT__mktime64(struct MSVCRT_tm *mstm)
106 {
107     time_t secs;
108     struct tm tm;
109
110     msvcrt_tm_to_unix( &tm, mstm );
111     secs = mktime( &tm );
112     unix_tm_to_msvcrt( mstm, &tm );
113
114     return secs < 0 ? -1 : secs;
115 }
116
117 /**********************************************************************
118  *              _mktime32 (MSVCRT.@)
119  */
120 MSVCRT___time32_t CDECL MSVCRT__mktime32(struct MSVCRT_tm *mstm)
121 {
122     return MSVCRT__mktime64( mstm );
123 }
124
125 /**********************************************************************
126  *              mktime (MSVCRT.@)
127  */
128 #ifdef _WIN64
129 MSVCRT___time64_t CDECL MSVCRT_mktime(struct MSVCRT_tm *mstm)
130 {
131     return MSVCRT__mktime64( mstm );
132 }
133 #else
134 MSVCRT___time32_t CDECL MSVCRT_mktime(struct MSVCRT_tm *mstm)
135 {
136     return MSVCRT__mktime32( mstm );
137 }
138 #endif
139
140 /**********************************************************************
141  *              _mkgmtime64 (MSVCRT.@)
142  *
143  * time->tm_isdst value is ignored
144  */
145 MSVCRT___time64_t CDECL MSVCRT__mkgmtime64(struct MSVCRT_tm *time)
146 {
147     SYSTEMTIME st;
148     FILETIME ft;
149     MSVCRT___time64_t ret;
150     int i;
151
152     st.wMilliseconds = 0;
153     st.wSecond = time->tm_sec;
154     st.wMinute = time->tm_min;
155     st.wHour = time->tm_hour;
156     st.wDay = time->tm_mday;
157     st.wMonth = time->tm_mon+1;
158     st.wYear = time->tm_year+1900;
159
160     if(!SystemTimeToFileTime(&st, &ft))
161         return -1;
162
163     FileTimeToSystemTime(&ft, &st);
164     time->tm_wday = st.wDayOfWeek;
165
166     for(i=time->tm_yday=0; i<st.wMonth-1; i++)
167         time->tm_yday += MonthLengths[IsLeapYear(st.wYear)][i];
168     time->tm_yday += st.wDay-1;
169
170     ret = ((MSVCRT___time64_t)ft.dwHighDateTime<<32)+ft.dwLowDateTime;
171     ret = (ret-TICKS_1601_TO_1970)/TICKSPERSEC;
172     return ret;
173 }
174
175 /**********************************************************************
176  *              _mkgmtime32 (MSVCRT.@)
177  */
178 MSVCRT___time32_t CDECL MSVCRT__mkgmtime32(struct MSVCRT_tm *time)
179 {
180     return MSVCRT__mkgmtime64(time);
181 }
182
183 /**********************************************************************
184  *              _mkgmtime (MSVCRT.@)
185  */
186 #ifdef _WIN64
187 MSVCRT___time64_t CDECL MSVCRT__mkgmtime(struct MSVCRT_tm *time)
188 {
189     return MSVCRT__mkgmtime64(time);
190 }
191 #else
192 MSVCRT___time32_t CDECL MSVCRT__mkgmtime(struct MSVCRT_tm *time)
193 {
194     return MSVCRT__mkgmtime32(time);
195 }
196 #endif
197
198 /*********************************************************************
199  *      _localtime64 (MSVCRT.@)
200  */
201 struct MSVCRT_tm* CDECL MSVCRT__localtime64(const MSVCRT___time64_t* secs)
202 {
203     struct tm *tm;
204     thread_data_t *data;
205     time_t seconds = *secs;
206
207     if (seconds < 0) return NULL;
208
209     _mlock(_TIME_LOCK);
210     if (!(tm = localtime( &seconds))) {
211         _munlock(_TIME_LOCK);
212         return NULL;
213     }
214
215     data = msvcrt_get_thread_data();
216     if(!data->time_buffer)
217         data->time_buffer = MSVCRT_malloc(sizeof(struct MSVCRT_tm));
218
219     unix_tm_to_msvcrt( data->time_buffer, tm );
220     _munlock(_TIME_LOCK);
221
222     return data->time_buffer;
223 }
224
225 /*********************************************************************
226  *      _localtime64_s (MSVCRT.@)
227  */
228 int CDECL _localtime64_s(struct MSVCRT_tm *time, const MSVCRT___time64_t *secs)
229 {
230     struct tm *tm;
231     time_t seconds;
232
233     if (!time || !secs || *secs < 0 || *secs > _MAX__TIME64_T)
234     {
235         if (time)
236             write_invalid_msvcrt_tm(time);
237
238         *MSVCRT__errno() = MSVCRT_EINVAL;
239         return MSVCRT_EINVAL;
240     }
241
242     seconds = *secs;
243
244     _mlock(_TIME_LOCK);
245     if (!(tm = localtime(&seconds)))
246     {
247         _munlock(_TIME_LOCK);
248         *MSVCRT__errno() = MSVCRT_EINVAL;
249         return MSVCRT_EINVAL;
250     }
251
252     unix_tm_to_msvcrt(time, tm);
253     _munlock(_TIME_LOCK);
254     return 0;
255 }
256
257 /*********************************************************************
258  *      _localtime32 (MSVCRT.@)
259  */
260 struct MSVCRT_tm* CDECL MSVCRT__localtime32(const MSVCRT___time32_t* secs)
261 {
262     MSVCRT___time64_t secs64 = *secs;
263     return MSVCRT__localtime64( &secs64 );
264 }
265
266 /*********************************************************************
267  *      _localtime32_s (MSVCRT.@)
268  */
269 int CDECL _localtime32_s(struct MSVCRT_tm *time, const MSVCRT___time32_t *secs)
270 {
271     MSVCRT___time64_t secs64;
272
273     if (!time || !secs || *secs < 0)
274     {
275         if (time)
276             write_invalid_msvcrt_tm(time);
277
278         *MSVCRT__errno() = MSVCRT_EINVAL;
279         return MSVCRT_EINVAL;
280     }
281
282     secs64 = *secs;
283     return _localtime64_s(time, &secs64);
284 }
285
286 /*********************************************************************
287  *      localtime (MSVCRT.@)
288  */
289 #ifdef _WIN64
290 struct MSVCRT_tm* CDECL MSVCRT_localtime(const MSVCRT___time64_t* secs)
291 {
292     return MSVCRT__localtime64( secs );
293 }
294 #else
295 struct MSVCRT_tm* CDECL MSVCRT_localtime(const MSVCRT___time32_t* secs)
296 {
297     return MSVCRT__localtime32( secs );
298 }
299 #endif
300
301 /*********************************************************************
302  *      _gmtime64 (MSVCRT.@)
303  */
304 int CDECL MSVCRT__gmtime64_s(struct MSVCRT_tm *res, const MSVCRT___time64_t *secs)
305 {
306     int i;
307     FILETIME ft;
308     SYSTEMTIME st;
309     ULONGLONG time;
310
311     if (!res || !secs || *secs < 0) {
312         if (res) {
313             write_invalid_msvcrt_tm(res);
314         }
315
316         *MSVCRT__errno() = MSVCRT_EINVAL;
317         return MSVCRT_EINVAL;
318     }
319
320     time = *secs * (ULONGLONG)TICKSPERSEC + TICKS_1601_TO_1970;
321
322     ft.dwHighDateTime = (UINT)(time >> 32);
323     ft.dwLowDateTime  = (UINT)time;
324
325     FileTimeToSystemTime(&ft, &st);
326
327     res->tm_sec  = st.wSecond;
328     res->tm_min  = st.wMinute;
329     res->tm_hour = st.wHour;
330     res->tm_mday = st.wDay;
331     res->tm_year = st.wYear - 1900;
332     res->tm_mon  = st.wMonth - 1;
333     res->tm_wday = st.wDayOfWeek;
334     for (i = res->tm_yday = 0; i < st.wMonth - 1; i++) {
335         res->tm_yday += MonthLengths[IsLeapYear(st.wYear)][i];
336     }
337
338     res->tm_yday += st.wDay - 1;
339     res->tm_isdst = 0;
340
341     return 0;
342 }
343
344 /*********************************************************************
345  *      _gmtime64 (MSVCRT.@)
346  */
347 struct MSVCRT_tm* CDECL MSVCRT__gmtime64(const MSVCRT___time64_t *secs)
348 {
349     thread_data_t * const data = msvcrt_get_thread_data();
350
351     if(!data->time_buffer)
352         data->time_buffer = MSVCRT_malloc(sizeof(struct MSVCRT_tm));
353
354     if(MSVCRT__gmtime64_s(data->time_buffer, secs))
355         return NULL;
356     return data->time_buffer;
357 }
358
359 /*********************************************************************
360  *      _gmtime32_s (MSVCRT.@)
361  */
362 int CDECL MSVCRT__gmtime32_s(struct MSVCRT_tm *res, const MSVCRT___time32_t *secs)
363 {
364     MSVCRT___time64_t secs64;
365
366     if(secs) {
367         secs64 = *secs;
368         return MSVCRT__gmtime64_s(res, &secs64);
369     }
370     return MSVCRT__gmtime64_s(res, NULL);
371 }
372
373 /*********************************************************************
374  *      _gmtime32 (MSVCRT.@)
375  */
376 struct MSVCRT_tm* CDECL MSVCRT__gmtime32(const MSVCRT___time32_t* secs)
377 {
378     MSVCRT___time64_t secs64;
379
380     if(!secs)
381         return NULL;
382
383     secs64 = *secs;
384     return MSVCRT__gmtime64( &secs64 );
385 }
386
387 /*********************************************************************
388  *      gmtime (MSVCRT.@)
389  */
390 #ifdef _WIN64
391 struct MSVCRT_tm* CDECL MSVCRT_gmtime(const MSVCRT___time64_t* secs)
392 {
393     return MSVCRT__gmtime64( secs );
394 }
395 #else
396 struct MSVCRT_tm* CDECL MSVCRT_gmtime(const MSVCRT___time32_t* secs)
397 {
398     return MSVCRT__gmtime32( secs );
399 }
400 #endif
401
402 /**********************************************************************
403  *              _strdate (MSVCRT.@)
404  */
405 char* CDECL MSVCRT__strdate(char* date)
406 {
407   static const char format[] = "MM'/'dd'/'yy";
408
409   GetDateFormatA(LOCALE_NEUTRAL, 0, NULL, format, date, 9);
410
411   return date;
412 }
413
414 /**********************************************************************
415  *              _strdate_s (MSVCRT.@)
416  */
417 int CDECL _strdate_s(char* date, MSVCRT_size_t size)
418 {
419     if(date && size)
420         date[0] = '\0';
421
422     if(!date) {
423         *MSVCRT__errno() = MSVCRT_EINVAL;
424         return MSVCRT_EINVAL;
425     }
426
427     if(size < 9) {
428         *MSVCRT__errno() = MSVCRT_ERANGE;
429         return MSVCRT_ERANGE;
430     }
431
432     MSVCRT__strdate(date);
433     return 0;
434 }
435
436 /**********************************************************************
437  *              _wstrdate (MSVCRT.@)
438  */
439 MSVCRT_wchar_t* CDECL MSVCRT__wstrdate(MSVCRT_wchar_t* date)
440 {
441   static const WCHAR format[] = { 'M','M','\'','/','\'','d','d','\'','/','\'','y','y',0 };
442
443   GetDateFormatW(LOCALE_NEUTRAL, 0, NULL, format, date, 9);
444
445   return date;
446 }
447
448 /**********************************************************************
449  *              _wstrdate_s (MSVCRT.@)
450  */
451 int CDECL _wstrdate_s(MSVCRT_wchar_t* date, MSVCRT_size_t size)
452 {
453     if(date && size)
454         date[0] = '\0';
455
456     if(!date) {
457         *MSVCRT__errno() = MSVCRT_EINVAL;
458         return MSVCRT_EINVAL;
459     }
460
461     if(size < 9) {
462         *MSVCRT__errno() = MSVCRT_ERANGE;
463         return MSVCRT_ERANGE;
464     }
465
466     MSVCRT__wstrdate(date);
467     return 0;
468 }
469
470 /*********************************************************************
471  *              _strtime (MSVCRT.@)
472  */
473 char* CDECL MSVCRT__strtime(char* time)
474 {
475   static const char format[] = "HH':'mm':'ss";
476
477   GetTimeFormatA(LOCALE_NEUTRAL, 0, NULL, format, time, 9); 
478
479   return time;
480 }
481
482 /*********************************************************************
483  *              _strtime_s (MSVCRT.@)
484  */
485 int CDECL _strtime_s(char* time, MSVCRT_size_t size)
486 {
487     if(time && size)
488         time[0] = '\0';
489
490     if(!time) {
491         *MSVCRT__errno() = MSVCRT_EINVAL;
492         return MSVCRT_EINVAL;
493     }
494
495     if(size < 9) {
496         *MSVCRT__errno() = MSVCRT_ERANGE;
497         return MSVCRT_ERANGE;
498     }
499
500     MSVCRT__strtime(time);
501     return 0;
502 }
503
504 /*********************************************************************
505  *              _wstrtime (MSVCRT.@)
506  */
507 MSVCRT_wchar_t* CDECL MSVCRT__wstrtime(MSVCRT_wchar_t* time)
508 {
509   static const WCHAR format[] = { 'H','H','\'',':','\'','m','m','\'',':','\'','s','s',0 };
510
511   GetTimeFormatW(LOCALE_NEUTRAL, 0, NULL, format, time, 9);
512
513   return time;
514 }
515
516 /*********************************************************************
517  *              _wstrtime_s (MSVCRT.@)
518  */
519 int CDECL _wstrtime_s(MSVCRT_wchar_t* time, MSVCRT_size_t size)
520 {
521     if(time && size)
522         time[0] = '\0';
523
524     if(!time) {
525         *MSVCRT__errno() = MSVCRT_EINVAL;
526         return MSVCRT_EINVAL;
527     }
528
529     if(size < 9) {
530         *MSVCRT__errno() = MSVCRT_ERANGE;
531         return MSVCRT_ERANGE;
532     }
533
534     MSVCRT__wstrtime(time);
535     return 0;
536 }
537
538 /*********************************************************************
539  *              clock (MSVCRT.@)
540  */
541 MSVCRT_clock_t CDECL MSVCRT_clock(void)
542 {
543   FILETIME ftc, fte, ftk, ftu;
544   ULONGLONG utime, ktime;
545  
546   MSVCRT_clock_t clock;
547
548   GetProcessTimes(GetCurrentProcess(), &ftc, &fte, &ftk, &ftu);
549
550   ktime = ((ULONGLONG)ftk.dwHighDateTime << 32) | ftk.dwLowDateTime;
551   utime = ((ULONGLONG)ftu.dwHighDateTime << 32) | ftu.dwLowDateTime;
552
553   clock = (utime + ktime) / (TICKSPERSEC / MSVCRT_CLOCKS_PER_SEC);
554
555   return clock;
556 }
557
558 /*********************************************************************
559  *              _difftime64 (MSVCRT.@)
560  */
561 double CDECL MSVCRT__difftime64(MSVCRT___time64_t time1, MSVCRT___time64_t time2)
562 {
563   return (double)(time1 - time2);
564 }
565
566 /*********************************************************************
567  *              _difftime32 (MSVCRT.@)
568  */
569 double CDECL MSVCRT__difftime32(MSVCRT___time32_t time1, MSVCRT___time32_t time2)
570 {
571   return (double)(time1 - time2);
572 }
573
574 /*********************************************************************
575  *              difftime (MSVCRT.@)
576  */
577 #ifdef _WIN64
578 double CDECL MSVCRT_difftime(MSVCRT___time64_t time1, MSVCRT___time64_t time2)
579 {
580     return MSVCRT__difftime64( time1, time2 );
581 }
582 #else
583 double CDECL MSVCRT_difftime(MSVCRT___time32_t time1, MSVCRT___time32_t time2)
584 {
585     return MSVCRT__difftime32( time1, time2 );
586 }
587 #endif
588
589 /*********************************************************************
590  *              _ftime64 (MSVCRT.@)
591  */
592 void CDECL MSVCRT__ftime64(struct MSVCRT___timeb64 *buf)
593 {
594   TIME_ZONE_INFORMATION tzinfo;
595   FILETIME ft;
596   ULONGLONG time;
597
598   DWORD tzid = GetTimeZoneInformation(&tzinfo);
599   GetSystemTimeAsFileTime(&ft);
600
601   time = ((ULONGLONG)ft.dwHighDateTime << 32) | ft.dwLowDateTime;
602
603   buf->time = time / TICKSPERSEC - SECS_1601_TO_1970;
604   buf->millitm = (time % TICKSPERSEC) / TICKSPERMSEC;
605   buf->timezone = tzinfo.Bias +
606       ( tzid == TIME_ZONE_ID_STANDARD ? tzinfo.StandardBias :
607       ( tzid == TIME_ZONE_ID_DAYLIGHT ? tzinfo.DaylightBias : 0 ));
608   buf->dstflag = (tzid == TIME_ZONE_ID_DAYLIGHT?1:0);
609 }
610
611 /*********************************************************************
612  *              _ftime64_s (MSVCRT.@)
613  */
614 int CDECL MSVCRT__ftime64_s(struct MSVCRT___timeb64 *buf)
615 {
616     if( !MSVCRT_CHECK_PMT( buf != NULL ) )
617     {
618         *MSVCRT__errno() = MSVCRT_EINVAL;
619         return MSVCRT_EINVAL;
620     }
621     MSVCRT__ftime64(buf);
622     return 0;
623 }
624
625 /*********************************************************************
626  *              _ftime32 (MSVCRT.@)
627  */
628 void CDECL MSVCRT__ftime32(struct MSVCRT___timeb32 *buf)
629 {
630     struct MSVCRT___timeb64 buf64;
631
632     MSVCRT__ftime64( &buf64 );
633     buf->time     = buf64.time;
634     buf->millitm  = buf64.millitm;
635     buf->timezone = buf64.timezone;
636     buf->dstflag  = buf64.dstflag;
637 }
638
639 /*********************************************************************
640  *              _ftime32_s (MSVCRT.@)
641  */
642 int CDECL MSVCRT__ftime32_s(struct MSVCRT___timeb32 *buf)
643 {
644     if( !MSVCRT_CHECK_PMT( buf != NULL ) )
645     {
646         *MSVCRT__errno() = MSVCRT_EINVAL;
647         return MSVCRT_EINVAL;
648     }
649     MSVCRT__ftime32(buf);
650     return 0;
651 }
652
653 /*********************************************************************
654  *              _ftime (MSVCRT.@)
655  */
656 #ifdef _WIN64
657 void CDECL MSVCRT__ftime(struct MSVCRT___timeb64 *buf)
658 {
659     MSVCRT__ftime64( buf );
660 }
661 #else
662 void CDECL MSVCRT__ftime(struct MSVCRT___timeb32 *buf)
663 {
664     MSVCRT__ftime32( buf );
665 }
666 #endif
667
668 /*********************************************************************
669  *              _time64 (MSVCRT.@)
670  */
671 MSVCRT___time64_t CDECL MSVCRT__time64(MSVCRT___time64_t *buf)
672 {
673     MSVCRT___time64_t curtime;
674     struct MSVCRT___timeb64 tb;
675
676     MSVCRT__ftime64(&tb);
677
678     curtime = tb.time;
679     return buf ? *buf = curtime : curtime;
680 }
681
682 /*********************************************************************
683  *              _time32 (MSVCRT.@)
684  */
685 MSVCRT___time32_t CDECL MSVCRT__time32(MSVCRT___time32_t *buf)
686 {
687     MSVCRT___time32_t curtime;
688     struct MSVCRT___timeb64 tb;
689
690     MSVCRT__ftime64(&tb);
691
692     curtime = tb.time;
693     return buf ? *buf = curtime : curtime;
694 }
695
696 /*********************************************************************
697  *              time (MSVCRT.@)
698  */
699 #ifdef _WIN64
700 MSVCRT___time64_t CDECL MSVCRT_time(MSVCRT___time64_t* buf)
701 {
702     return MSVCRT__time64( buf );
703 }
704 #else
705 MSVCRT___time32_t CDECL MSVCRT_time(MSVCRT___time32_t* buf)
706 {
707     return MSVCRT__time32( buf );
708 }
709 #endif
710
711 /*********************************************************************
712  *              _daylight (MSVCRT.@)
713  */
714 int MSVCRT___daylight = 0;
715
716 /*********************************************************************
717  *              __p_daylight (MSVCRT.@)
718  */
719 int * CDECL MSVCRT___p__daylight(void)
720 {
721         return &MSVCRT___daylight;
722 }
723
724 /*********************************************************************
725  *              _dstbias (MSVCRT.@)
726  */
727 int MSVCRT__dstbias = 0;
728
729 /*********************************************************************
730  *              __p_dstbias (MSVCRT.@)
731  */
732 int * CDECL __p__dstbias(void)
733 {
734     return &MSVCRT__dstbias;
735 }
736
737 /*********************************************************************
738  *              _timezone (MSVCRT.@)
739  */
740 MSVCRT_long MSVCRT___timezone = 0;
741
742 /*********************************************************************
743  *              __p_timezone (MSVCRT.@)
744  */
745 MSVCRT_long * CDECL MSVCRT___p__timezone(void)
746 {
747         return &MSVCRT___timezone;
748 }
749
750 /*********************************************************************
751  *              _tzname (MSVCRT.@)
752  * NOTES
753  *  Some apps (notably Mozilla) insist on writing to these, so the buffer
754  *  must be large enough.  The size is picked based on observation of
755  *  Windows XP.
756  */
757 static char tzname_std[64] = "PST";
758 static char tzname_dst[64] = "PDT";
759 char *MSVCRT__tzname[2] = { tzname_std, tzname_dst };
760
761 /*********************************************************************
762  *              _get_tzname (MSVCRT.@)
763  */
764 int CDECL MSVCRT__get_tzname(MSVCRT_size_t *ret, char *buf, MSVCRT_size_t bufsize, int index)
765 {
766     char *timezone;
767
768     switch(index)
769     {
770     case 0:
771         timezone = tzname_std;
772         break;
773     case 1:
774         timezone = tzname_dst;
775         break;
776     default:
777         *MSVCRT__errno() = MSVCRT_EINVAL;
778         return MSVCRT_EINVAL;
779     }
780
781     if(!ret || (!buf && bufsize > 0) || (buf && !bufsize))
782     {
783         *MSVCRT__errno() = MSVCRT_EINVAL;
784         return MSVCRT_EINVAL;
785     }
786
787     *ret = strlen(timezone)+1;
788     if(!buf && !bufsize)
789         return 0;
790
791     strcpy(buf, timezone);
792     return 0;
793 }
794
795 /*********************************************************************
796  *              __p_tzname (MSVCRT.@)
797  */
798 char ** CDECL __p__tzname(void)
799 {
800         return MSVCRT__tzname;
801 }
802
803 /*********************************************************************
804  *              _tzset (MSVCRT.@)
805  */
806 void CDECL MSVCRT__tzset(void)
807 {
808     tzset();
809 #if defined(HAVE_TIMEZONE) && defined(HAVE_DAYLIGHT)
810     MSVCRT___daylight = daylight;
811     MSVCRT___timezone = timezone;
812 #else
813     {
814         static const time_t seconds_in_year = (365 * 24 + 6) * 3600;
815         time_t t;
816         struct tm *tmp;
817         int zone_january, zone_july;
818
819         _mlock(_TIME_LOCK);
820         t = (time(NULL) / seconds_in_year) * seconds_in_year;
821         tmp = localtime(&t);
822         zone_january = -tmp->tm_gmtoff;
823         t += seconds_in_year / 2;
824         tmp = localtime(&t);
825         zone_july = -tmp->tm_gmtoff;
826         _munlock(_TIME_LOCK);
827
828         MSVCRT___daylight = (zone_january != zone_july);
829         MSVCRT___timezone = max(zone_january, zone_july);
830     }
831 #endif
832     lstrcpynA(tzname_std, tzname[0], sizeof(tzname_std));
833     tzname_std[sizeof(tzname_std) - 1] = '\0';
834     lstrcpynA(tzname_dst, tzname[1], sizeof(tzname_dst));
835     tzname_dst[sizeof(tzname_dst) - 1] = '\0';
836 }
837
838 /*********************************************************************
839  *              strftime (MSVCRT.@)
840  */
841 MSVCRT_size_t CDECL MSVCRT_strftime( char *str, MSVCRT_size_t max, const char *format,
842                                      const struct MSVCRT_tm *mstm )
843 {
844     struct tm tm;
845
846     msvcrt_tm_to_unix( &tm, mstm );
847     return strftime( str, max, format, &tm );
848 }
849
850 /*********************************************************************
851  *              wcsftime (MSVCRT.@)
852  */
853 MSVCRT_size_t CDECL MSVCRT_wcsftime( MSVCRT_wchar_t *str, MSVCRT_size_t max,
854                                      const MSVCRT_wchar_t *format, const struct MSVCRT_tm *mstm )
855 {
856     char *s, *fmt;
857     MSVCRT_size_t len;
858
859     TRACE("%p %ld %s %p\n", str, max, debugstr_w(format), mstm );
860
861     len = WideCharToMultiByte( CP_UNIXCP, 0, format, -1, NULL, 0, NULL, NULL );
862     if (!(fmt = MSVCRT_malloc( len ))) return 0;
863     WideCharToMultiByte( CP_UNIXCP, 0, format, -1, fmt, len, NULL, NULL );
864
865     if ((s = MSVCRT_malloc( max*4 )))
866     {
867         struct tm tm;
868         msvcrt_tm_to_unix( &tm, mstm );
869         if (!strftime( s, max*4, fmt, &tm )) s[0] = 0;
870         len = MultiByteToWideChar( CP_UNIXCP, 0, s, -1, str, max );
871         if (len) len--;
872         MSVCRT_free( s );
873     }
874     else len = 0;
875
876     MSVCRT_free( fmt );
877     return len;
878 }
879
880 static char* asctime_buf(char *buf, const struct MSVCRT_tm *mstm)
881 {
882     static const char wday[7][4] = {"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"};
883     static const char month[12][4] = {"Jan", "Feb", "Mar", "Apr", "May",
884         "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"};
885
886     if (mstm->tm_sec<0 || mstm->tm_sec>59
887             || mstm->tm_min<0 || mstm->tm_min>59
888             || mstm->tm_hour<0 || mstm->tm_hour>23
889             || mstm->tm_mon<0 || mstm->tm_mon>11
890             || mstm->tm_wday<0 || mstm->tm_wday>6
891             || mstm->tm_year<0 || mstm->tm_mday<0
892             || mstm->tm_mday>MonthLengths[IsLeapYear(1900+mstm->tm_year)][mstm->tm_mon]) {
893         *MSVCRT__errno() = MSVCRT_EINVAL;
894         return NULL;
895     }
896
897     MSVCRT__snprintf(buf, 26, "%s %s %02d %02d:%02d:%02d %c%03d\n", wday[mstm->tm_wday],
898             month[mstm->tm_mon], mstm->tm_mday, mstm->tm_hour, mstm->tm_min,
899             mstm->tm_sec, '1'+(mstm->tm_year+900)/1000, (900+mstm->tm_year)%1000);
900     return buf;
901 }
902
903 /*********************************************************************
904  *              asctime (MSVCRT.@)
905  */
906 char * CDECL MSVCRT_asctime(const struct MSVCRT_tm *mstm)
907 {
908     thread_data_t *data = msvcrt_get_thread_data();
909
910     /* asctime returns date in format that always has exactly 26 characters */
911     if (!data->asctime_buffer) {
912         data->asctime_buffer = MSVCRT_malloc(26);
913         if (!data->asctime_buffer) {
914             *MSVCRT__errno() = MSVCRT_ENOMEM;
915             return NULL;
916         }
917     }
918
919     return asctime_buf(data->asctime_buffer, mstm);
920 }
921
922 /*********************************************************************
923  *      asctime_s (MSVCRT.@)
924  */
925 int CDECL MSVCRT_asctime_s(char* time, MSVCRT_size_t size, const struct MSVCRT_tm *mstm)
926 {
927     if (!MSVCRT_CHECK_PMT(time != NULL)
928             || !MSVCRT_CHECK_PMT(mstm != NULL)
929             || !MSVCRT_CHECK_PMT(size >= 26)) {
930         if (time && size)
931             time[0] = 0;
932         *MSVCRT__errno() = MSVCRT_EINVAL;
933         return MSVCRT_EINVAL;
934     }
935
936     if (!MSVCRT_CHECK_PMT(mstm->tm_sec>=0) || !MSVCRT_CHECK_PMT(mstm->tm_sec<60)
937             || !MSVCRT_CHECK_PMT(mstm->tm_min>=0) || !MSVCRT_CHECK_PMT(mstm->tm_min<60)
938             || !MSVCRT_CHECK_PMT(mstm->tm_hour>=0) || !MSVCRT_CHECK_PMT(mstm->tm_hour<24)
939             || !MSVCRT_CHECK_PMT(mstm->tm_mon>=0) || !MSVCRT_CHECK_PMT(mstm->tm_mon<12)
940             || !MSVCRT_CHECK_PMT(mstm->tm_wday>=0) || !MSVCRT_CHECK_PMT(mstm->tm_wday<7)
941             || !MSVCRT_CHECK_PMT(mstm->tm_year>=0) || !MSVCRT_CHECK_PMT(mstm->tm_mday>=0)
942             || !MSVCRT_CHECK_PMT(mstm->tm_mday <= MonthLengths[IsLeapYear(1900+mstm->tm_year)][mstm->tm_mon])) {
943         *MSVCRT__errno() = MSVCRT_EINVAL;
944         return MSVCRT_EINVAL;
945     }
946
947     asctime_buf(time, mstm);
948     return 0;
949 }
950
951 /*********************************************************************
952  *              _wasctime (MSVCRT.@)
953  */
954 MSVCRT_wchar_t * CDECL MSVCRT__wasctime(const struct MSVCRT_tm *mstm)
955 {
956     thread_data_t *data = msvcrt_get_thread_data();
957     struct tm tm;
958     char buffer[30];
959
960     msvcrt_tm_to_unix( &tm, mstm );
961
962     if (!data->wasctime_buffer)
963         data->wasctime_buffer = MSVCRT_malloc( 30*sizeof(MSVCRT_wchar_t) ); /* ought to be enough */
964 #ifdef HAVE_ASCTIME_R
965     asctime_r( &tm, buffer );
966 #else
967     strcpy( buffer, asctime(&tm) );
968 #endif
969     MultiByteToWideChar( CP_UNIXCP, 0, buffer, -1, data->wasctime_buffer, 30 );
970     return data->wasctime_buffer;
971 }
972
973 /*********************************************************************
974  *      _wasctime_s (MSVCRT.@)
975  */
976 int CDECL MSVCRT__wasctime_s(MSVCRT_wchar_t* time, MSVCRT_size_t size, const struct MSVCRT_tm *mstm)
977 {
978     WCHAR* asc;
979     unsigned int len;
980
981     if (!MSVCRT_CHECK_PMT(time != NULL) || !MSVCRT_CHECK_PMT(mstm != NULL)) {
982         *MSVCRT__errno() = MSVCRT_EINVAL;
983         return MSVCRT_EINVAL;
984     }
985
986     asc = MSVCRT__wasctime(mstm);
987     len = (strlenW(asc) + 1) * sizeof(WCHAR);
988
989     if(!MSVCRT_CHECK_PMT(size >= len)) {
990         *MSVCRT__errno() = MSVCRT_ERANGE;
991         return MSVCRT_ERANGE;
992     }
993
994     strcpyW(time, asc);
995     return 0;
996 }
997
998 /*********************************************************************
999  *              _ctime64 (MSVCRT.@)
1000  */
1001 char * CDECL MSVCRT__ctime64(const MSVCRT___time64_t *time)
1002 {
1003     struct MSVCRT_tm *t;
1004     t = MSVCRT__localtime64( time );
1005     if (!t) return NULL;
1006     return MSVCRT_asctime( t );
1007 }
1008
1009 /*********************************************************************
1010  *              _ctime64_s (MSVCRT.@)
1011  */
1012 int CDECL MSVCRT__ctime64_s(char *res, MSVCRT_size_t len, const MSVCRT___time64_t *time)
1013 {
1014     struct MSVCRT_tm *t;
1015     if( !MSVCRT_CHECK_PMT( res != NULL ) || !MSVCRT_CHECK_PMT( len >= 26 ) )
1016     {
1017         *MSVCRT__errno() = MSVCRT_EINVAL;
1018         return MSVCRT_EINVAL;
1019     }
1020     res[0] = '\0';
1021     if( !MSVCRT_CHECK_PMT( time != NULL ) || !MSVCRT_CHECK_PMT( *time > 0 ) )
1022     {
1023         *MSVCRT__errno() = MSVCRT_EINVAL;
1024         return MSVCRT_EINVAL;
1025     }
1026     t = MSVCRT__localtime64( time );
1027     strcpy( res, MSVCRT_asctime( t ) );
1028     return 0;
1029 }
1030
1031 /*********************************************************************
1032  *              _ctime32 (MSVCRT.@)
1033  */
1034 char * CDECL MSVCRT__ctime32(const MSVCRT___time32_t *time)
1035 {
1036     struct MSVCRT_tm *t;
1037     t = MSVCRT__localtime32( time );
1038     if (!t) return NULL;
1039     return MSVCRT_asctime( t );
1040 }
1041
1042 /*********************************************************************
1043  *              _ctime32_s (MSVCRT.@)
1044  */
1045 int CDECL MSVCRT__ctime32_s(char *res, MSVCRT_size_t len, const MSVCRT___time32_t *time)
1046 {
1047     struct MSVCRT_tm *t;
1048     if( !MSVCRT_CHECK_PMT( res != NULL ) || !MSVCRT_CHECK_PMT( len >= 26 ) )
1049     {
1050         *MSVCRT__errno() = MSVCRT_EINVAL;
1051         return MSVCRT_EINVAL;
1052     }
1053     res[0] = '\0';
1054     if( !MSVCRT_CHECK_PMT( time != NULL ) || !MSVCRT_CHECK_PMT( *time > 0 ) )
1055     {
1056         *MSVCRT__errno() = MSVCRT_EINVAL;
1057         return MSVCRT_EINVAL;
1058     }
1059     t = MSVCRT__localtime32( time );
1060     strcpy( res, MSVCRT_asctime( t ) );
1061     return 0;
1062 }
1063
1064 /*********************************************************************
1065  *              ctime (MSVCRT.@)
1066  */
1067 #ifdef _WIN64
1068 char * CDECL MSVCRT_ctime(const MSVCRT___time64_t *time)
1069 {
1070     return MSVCRT__ctime64( time );
1071 }
1072 #else
1073 char * CDECL MSVCRT_ctime(const MSVCRT___time32_t *time)
1074 {
1075     return MSVCRT__ctime32( time );
1076 }
1077 #endif
1078
1079 /*********************************************************************
1080  *              _wctime64 (MSVCRT.@)
1081  */
1082 MSVCRT_wchar_t * CDECL MSVCRT__wctime64(const MSVCRT___time64_t *time)
1083 {
1084     return MSVCRT__wasctime( MSVCRT__localtime64(time) );
1085 }
1086
1087 /*********************************************************************
1088  *              _wctime32 (MSVCRT.@)
1089  */
1090 MSVCRT_wchar_t * CDECL MSVCRT__wctime32(const MSVCRT___time32_t *time)
1091 {
1092     return MSVCRT__wasctime( MSVCRT__localtime32(time) );
1093 }
1094
1095 /*********************************************************************
1096  *              _wctime (MSVCRT.@)
1097  */
1098 #ifdef _WIN64
1099 MSVCRT_wchar_t * CDECL MSVCRT__wctime(const MSVCRT___time64_t *time)
1100 {
1101     return MSVCRT__wctime64( time );
1102 }
1103 #else
1104 MSVCRT_wchar_t * CDECL MSVCRT__wctime(const MSVCRT___time32_t *time)
1105 {
1106     return MSVCRT__wctime32( time );
1107 }
1108 #endif