| /* |
| * Unit test suite for time functions. |
| * |
| * Copyright 2004 Uwe Bonnes |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #include "wine/test.h" |
| #include "winbase.h" |
| #include "winnls.h" |
| #include "time.h" |
| |
| #include <stdlib.h> /*setenv*/ |
| #include <stdio.h> /*printf*/ |
| |
| #define SECSPERDAY 86400 |
| #define SECSPERHOUR 3600 |
| #define SECSPERMIN 60 |
| #define MINSPERHOUR 60 |
| #define HOURSPERDAY 24 |
| |
| static int get_test_year(time_t *start) |
| { |
| time_t now = time(NULL); |
| struct tm *tm = localtime(&now); |
| |
| /* compute start of year in seconds */ |
| *start = SECSPERDAY * ((tm->tm_year - 70) * 365 + |
| (tm->tm_year - 69) / 4 - |
| (tm->tm_year - 1) / 100 + |
| (tm->tm_year + 299) / 400); |
| return tm->tm_year; |
| } |
| |
| static void test_ctime(void) |
| { |
| time_t badtime = -1; |
| char* ret; |
| ret = ctime(&badtime); |
| ok(ret == NULL, "expected ctime to return NULL, got %s\n", ret); |
| } |
| static void test_gmtime(void) |
| { |
| time_t gmt = 0; |
| struct tm* gmt_tm = gmtime(&gmt); |
| if(gmt_tm == 0) |
| { |
| ok(0,"gmtime() error\n"); |
| return; |
| } |
| ok(((gmt_tm->tm_year == 70) && (gmt_tm->tm_mon == 0) && (gmt_tm->tm_yday == 0) && |
| (gmt_tm->tm_mday == 1) && (gmt_tm->tm_wday == 4) && (gmt_tm->tm_hour == 0) && |
| (gmt_tm->tm_min == 0) && (gmt_tm->tm_sec == 0) && (gmt_tm->tm_isdst == 0)), |
| "Wrong date:Year %4d mon %2d yday %3d mday %2d wday %1d hour%2d min %2d sec %2d dst %2d\n", |
| gmt_tm->tm_year, gmt_tm->tm_mon, gmt_tm->tm_yday, gmt_tm->tm_mday, gmt_tm->tm_wday, |
| gmt_tm->tm_hour, gmt_tm->tm_min, gmt_tm->tm_sec, gmt_tm->tm_isdst); |
| |
| } |
| |
| static void test_mktime(void) |
| { |
| TIME_ZONE_INFORMATION tzinfo; |
| DWORD res = GetTimeZoneInformation(&tzinfo); |
| struct tm my_tm, sav_tm; |
| time_t nulltime, local_time; |
| char TZ_env[256]; |
| char buffer[64]; |
| int year; |
| time_t ref, secs; |
| |
| year = get_test_year( &ref ); |
| ref += SECSPERDAY; |
| |
| ok (res != TIME_ZONE_ID_INVALID, "GetTimeZoneInformation failed\n"); |
| WideCharToMultiByte( CP_ACP, 0, tzinfo.StandardName, -1, buffer, sizeof(buffer), NULL, NULL ); |
| trace( "bias %d std %d dst %d zone %s\n", |
| tzinfo.Bias, tzinfo.StandardBias, tzinfo.DaylightBias, buffer ); |
| /* Bias may be positive or negative, to use offset of one day */ |
| my_tm = *localtime(&ref); /* retrieve current dst flag */ |
| secs = SECSPERDAY - tzinfo.Bias * SECSPERMIN; |
| secs -= (my_tm.tm_isdst ? tzinfo.DaylightBias : tzinfo.StandardBias) * SECSPERMIN; |
| my_tm.tm_mday = 1 + secs/SECSPERDAY; |
| secs = secs % SECSPERDAY; |
| my_tm.tm_hour = secs / SECSPERHOUR; |
| secs = secs % SECSPERHOUR; |
| my_tm.tm_min = secs / SECSPERMIN; |
| secs = secs % SECSPERMIN; |
| my_tm.tm_sec = secs; |
| |
| my_tm.tm_year = year; |
| my_tm.tm_mon = 0; |
| |
| sav_tm = my_tm; |
| |
| local_time = mktime(&my_tm); |
| ok(local_time == ref, "mktime returned %u, expected %u\n", |
| (DWORD)local_time, (DWORD)ref); |
| /* now test some unnormalized struct tm's */ |
| my_tm = sav_tm; |
| my_tm.tm_sec += 60; |
| my_tm.tm_min -= 1; |
| local_time = mktime(&my_tm); |
| ok(local_time == ref, "Unnormalized mktime returned %u, expected %u\n", |
| (DWORD)local_time, (DWORD)ref); |
| ok( my_tm.tm_year == sav_tm.tm_year && my_tm.tm_mon == sav_tm.tm_mon && |
| my_tm.tm_mday == sav_tm.tm_mday && my_tm.tm_hour == sav_tm.tm_hour && |
| my_tm.tm_sec == sav_tm.tm_sec, |
| "mktime returned %2d-%02d-%02d %02d:%02d expected %2d-%02d-%02d %02d:%02d\n", |
| my_tm.tm_year,my_tm.tm_mon,my_tm.tm_mday, |
| my_tm.tm_hour,my_tm.tm_sec, |
| sav_tm.tm_year,sav_tm.tm_mon,sav_tm.tm_mday, |
| sav_tm.tm_hour,sav_tm.tm_sec); |
| my_tm = sav_tm; |
| my_tm.tm_min -= 60; |
| my_tm.tm_hour += 1; |
| local_time = mktime(&my_tm); |
| ok(local_time == ref, "Unnormalized mktime returned %u, expected %u\n", |
| (DWORD)local_time, (DWORD)ref); |
| ok( my_tm.tm_year == sav_tm.tm_year && my_tm.tm_mon == sav_tm.tm_mon && |
| my_tm.tm_mday == sav_tm.tm_mday && my_tm.tm_hour == sav_tm.tm_hour && |
| my_tm.tm_sec == sav_tm.tm_sec, |
| "mktime returned %2d-%02d-%02d %02d:%02d expected %2d-%02d-%02d %02d:%02d\n", |
| my_tm.tm_year,my_tm.tm_mon,my_tm.tm_mday, |
| my_tm.tm_hour,my_tm.tm_sec, |
| sav_tm.tm_year,sav_tm.tm_mon,sav_tm.tm_mday, |
| sav_tm.tm_hour,sav_tm.tm_sec); |
| my_tm = sav_tm; |
| my_tm.tm_mon -= 12; |
| my_tm.tm_year += 1; |
| local_time = mktime(&my_tm); |
| ok(local_time == ref, "Unnormalized mktime returned %u, expected %u\n", |
| (DWORD)local_time, (DWORD)ref); |
| ok( my_tm.tm_year == sav_tm.tm_year && my_tm.tm_mon == sav_tm.tm_mon && |
| my_tm.tm_mday == sav_tm.tm_mday && my_tm.tm_hour == sav_tm.tm_hour && |
| my_tm.tm_sec == sav_tm.tm_sec, |
| "mktime returned %2d-%02d-%02d %02d:%02d expected %2d-%02d-%02d %02d:%02d\n", |
| my_tm.tm_year,my_tm.tm_mon,my_tm.tm_mday, |
| my_tm.tm_hour,my_tm.tm_sec, |
| sav_tm.tm_year,sav_tm.tm_mon,sav_tm.tm_mday, |
| sav_tm.tm_hour,sav_tm.tm_sec); |
| my_tm = sav_tm; |
| my_tm.tm_mon += 12; |
| my_tm.tm_year -= 1; |
| local_time = mktime(&my_tm); |
| ok(local_time == ref, "Unnormalized mktime returned %u, expected %u\n", |
| (DWORD)local_time, (DWORD)ref); |
| ok( my_tm.tm_year == sav_tm.tm_year && my_tm.tm_mon == sav_tm.tm_mon && |
| my_tm.tm_mday == sav_tm.tm_mday && my_tm.tm_hour == sav_tm.tm_hour && |
| my_tm.tm_sec == sav_tm.tm_sec, |
| "mktime returned %2d-%02d-%02d %02d:%02d expected %2d-%02d-%02d %02d:%02d\n", |
| my_tm.tm_year,my_tm.tm_mon,my_tm.tm_mday, |
| my_tm.tm_hour,my_tm.tm_sec, |
| sav_tm.tm_year,sav_tm.tm_mon,sav_tm.tm_mday, |
| sav_tm.tm_hour,sav_tm.tm_sec); |
| /* now a bad time example */ |
| my_tm = sav_tm; |
| my_tm.tm_year = 69; |
| local_time = mktime(&my_tm); |
| ok((local_time == -1), "(bad time) mktime returned %d, expected -1\n", (int)local_time); |
| |
| my_tm = sav_tm; |
| /* TEST that we are independent from the TZ variable */ |
| /*Argh, msvcrt doesn't have setenv() */ |
| _snprintf(TZ_env,255,"TZ=%s",(getenv("TZ")?getenv("TZ"):"")); |
| putenv("TZ=GMT"); |
| nulltime = mktime(&my_tm); |
| ok(nulltime == ref,"mktime returned 0x%08x\n",(DWORD)nulltime); |
| putenv(TZ_env); |
| } |
| |
| static void test_localtime(void) |
| { |
| TIME_ZONE_INFORMATION tzinfo; |
| DWORD res = GetTimeZoneInformation(&tzinfo); |
| time_t gmt, ref; |
| |
| char TZ_env[256]; |
| struct tm* lt; |
| int year = get_test_year( &ref ); |
| int is_leap = !(year % 4) && ((year % 100) || !((year + 300) % 400)); |
| |
| gmt = ref + SECSPERDAY + tzinfo.Bias * SECSPERMIN; |
| ok (res != TIME_ZONE_ID_INVALID, "GetTimeZoneInformation failed\n"); |
| lt = localtime(&gmt); |
| gmt += (lt->tm_isdst ? tzinfo.DaylightBias : tzinfo.StandardBias) * SECSPERMIN; |
| lt = localtime(&gmt); |
| ok(((lt->tm_year == year) && (lt->tm_mon == 0) && (lt->tm_yday == 1) && |
| (lt->tm_mday == 2) && (lt->tm_hour == 0) && |
| (lt->tm_min == 0) && (lt->tm_sec == 0)), |
| "Wrong date:Year %d mon %d yday %d mday %d wday %d hour %d min %d sec %d dst %d\n", |
| lt->tm_year, lt->tm_mon, lt->tm_yday, lt->tm_mday, lt->tm_wday, lt->tm_hour, |
| lt->tm_min, lt->tm_sec, lt->tm_isdst); |
| |
| _snprintf(TZ_env,255,"TZ=%s",(getenv("TZ")?getenv("TZ"):"")); |
| putenv("TZ=GMT"); |
| lt = localtime(&gmt); |
| ok(((lt->tm_year == year) && (lt->tm_mon == 0) && (lt->tm_yday == 1) && |
| (lt->tm_mday == 2) && (lt->tm_hour == 0) && |
| (lt->tm_min == 0) && (lt->tm_sec == 0)), |
| "Wrong date:Year %d mon %d yday %d mday %d wday %d hour %d min %d sec %d dst %d\n", |
| lt->tm_year, lt->tm_mon, lt->tm_yday, lt->tm_mday, lt->tm_wday, lt->tm_hour, |
| lt->tm_min, lt->tm_sec, lt->tm_isdst); |
| putenv(TZ_env); |
| |
| /* June 22 */ |
| gmt = ref + 202 * SECSPERDAY + tzinfo.Bias * SECSPERMIN; |
| lt = localtime(&gmt); |
| gmt += (lt->tm_isdst ? tzinfo.DaylightBias : tzinfo.StandardBias) * SECSPERMIN; |
| lt = localtime(&gmt); |
| ok(((lt->tm_year == year) && (lt->tm_mon == 6) && (lt->tm_yday == 202) && |
| (lt->tm_mday == 22 - is_leap) && (lt->tm_hour == 0) && |
| (lt->tm_min == 0) && (lt->tm_sec == 0)), |
| "Wrong date:Year %d mon %d yday %d mday %d wday %d hour %d min %d sec %d dst %d\n", |
| lt->tm_year, lt->tm_mon, lt->tm_yday, lt->tm_mday, lt->tm_wday, lt->tm_hour, |
| lt->tm_min, lt->tm_sec, lt->tm_isdst); |
| } |
| |
| static void test_strdate(void) |
| { |
| char date[16], * result; |
| int month, day, year, count, len; |
| |
| result = _strdate(date); |
| ok(result == date, "Wrong return value\n"); |
| len = strlen(date); |
| ok(len == 8, "Wrong length: returned %d, should be 8\n", len); |
| count = sscanf(date, "%02d/%02d/%02d", &month, &day, &year); |
| ok(count == 3, "Wrong format: count = %d, should be 3\n", count); |
| } |
| |
| static void test_strtime(void) |
| { |
| char time[16], * result; |
| int hour, minute, second, count, len; |
| |
| result = _strtime(time); |
| ok(result == time, "Wrong return value\n"); |
| len = strlen(time); |
| ok(len == 8, "Wrong length: returned %d, should be 8\n", len); |
| count = sscanf(time, "%02d:%02d:%02d", &hour, &minute, &second); |
| ok(count == 3, "Wrong format: count = %d, should be 3\n", count); |
| } |
| |
| static void test_wstrdate(void) |
| { |
| wchar_t date[16], * result; |
| int month, day, year, count, len; |
| wchar_t format[] = { '%','0','2','d','/','%','0','2','d','/','%','0','2','d',0 }; |
| |
| result = _wstrdate(date); |
| ok(result == date, "Wrong return value\n"); |
| len = wcslen(date); |
| ok(len == 8, "Wrong length: returned %d, should be 8\n", len); |
| count = swscanf(date, format, &month, &day, &year); |
| ok(count == 3, "Wrong format: count = %d, should be 3\n", count); |
| } |
| |
| static void test_wstrtime(void) |
| { |
| wchar_t time[16], * result; |
| int hour, minute, second, count, len; |
| wchar_t format[] = { '%','0','2','d',':','%','0','2','d',':','%','0','2','d',0 }; |
| |
| result = _wstrtime(time); |
| ok(result == time, "Wrong return value\n"); |
| len = wcslen(time); |
| ok(len == 8, "Wrong length: returned %d, should be 8\n", len); |
| count = swscanf(time, format, &hour, &minute, &second); |
| ok(count == 3, "Wrong format: count = %d, should be 3\n", count); |
| } |
| |
| START_TEST(time) |
| { |
| test_ctime(); |
| test_gmtime(); |
| test_mktime(); |
| test_localtime(); |
| test_strdate(); |
| test_strtime(); |
| test_wstrdate(); |
| test_wstrtime(); |
| } |