modules/rostests/winetests/ntdll/time.c

   1 /*
   2  * Unit test suite for ntdll time functions
   3  *
   4  * Copyright 2004 Rein Klazes
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "ntdll_test.h"
  22
  23 /* FIXME: Inspect */
  24
  25 typedef struct _KSYSTEM_TIME {
  26     ULONG LowPart;
  27     LONG High1Time;
  28     LONG High2Time;
  29 } KSYSTEM_TIME, *PKSYSTEM_TIME;
  30
  31 typedef enum _NT_PRODUCT_TYPE {
  32     NtProductWinNt = 1,
  33     NtProductLanManNt,
  34     NtProductServer
  35 } NT_PRODUCT_TYPE, *PNT_PRODUCT_TYPE;
  36
  37 #define PROCESSOR_FEATURE_MAX 64
  38
  39 typedef enum _ALTERNATIVE_ARCHITECTURE_TYPE
  40 {
  41    StandardDesign,
  42    NEC98x86,
  43    EndAlternatives
  44 } ALTERNATIVE_ARCHITECTURE_TYPE;
  45
  46 #define MAX_WOW64_SHARED_ENTRIES 16
  47
  48 typedef struct _KUSER_SHARED_DATA {
  49     ULONG TickCountLowDeprecated;
  50     ULONG TickCountMultiplier;
  51     volatile KSYSTEM_TIME InterruptTime;
  52     volatile KSYSTEM_TIME SystemTime;
  53     volatile KSYSTEM_TIME TimeZoneBias;
  54     USHORT ImageNumberLow;
  55     USHORT ImageNumberHigh;
  56     WCHAR NtSystemRoot[260];
  57     ULONG MaxStackTraceDepth;
  58     ULONG CryptoExponent;
  59     ULONG TimeZoneId;
  60     ULONG LargePageMinimum;
  61     ULONG Reserved2[7];
  62     NT_PRODUCT_TYPE NtProductType;
  63     BOOLEAN ProductTypeIsValid;
  64     ULONG NtMajorVersion;
  65     ULONG NtMinorVersion;
  66     BOOLEAN ProcessorFeatures[PROCESSOR_FEATURE_MAX];
  67     ULONG Reserved1;
  68     ULONG Reserved3;
  69     volatile ULONG TimeSlip;
  70     ALTERNATIVE_ARCHITECTURE_TYPE AlternativeArchitecture;
  71     LARGE_INTEGER SystemExpirationDate;
  72     ULONG SuiteMask;
  73     BOOLEAN KdDebuggerEnabled;
  74     UCHAR NXSupportPolicy;
  75     volatile ULONG ActiveConsoleId;
  76     volatile ULONG DismountCount;
  77     ULONG ComPlusPackage;
  78     ULONG LastSystemRITEventTickCount;
  79     ULONG NumberOfPhysicalPages;
  80     BOOLEAN SafeBootMode;
  81     ULONG TraceLogging;
  82     ULONGLONG TestRetInstruction;
  83     ULONG SystemCall;
  84     ULONG SystemCallReturn;
  85     ULONGLONG SystemCallPad[3];
  86     union {
  87         volatile KSYSTEM_TIME TickCount;
  88         volatile ULONG64 TickCountQuad;
  89     } DUMMYUNIONNAME;
  90     ULONG Cookie;
  91     ULONG Wow64SharedInformation[MAX_WOW64_SHARED_ENTRIES];
  92 } KSHARED_USER_DATA, *PKSHARED_USER_DATA;
  93
  94 #define TICKSPERSEC        10000000
  95 #define TICKSPERMSEC       10000
  96 #define SECSPERDAY         86400
  97
  98 static VOID (WINAPI *pRtlTimeToTimeFields)( const LARGE_INTEGER *liTime, PTIME_FIELDS TimeFields) ;
  99 static VOID (WINAPI *pRtlTimeFieldsToTime)(  PTIME_FIELDS TimeFields,  PLARGE_INTEGER Time) ;
 100 static NTSTATUS (WINAPI *pNtQueryPerformanceCounter)( LARGE_INTEGER *counter, LARGE_INTEGER *frequency );
 101 static ULONG (WINAPI *pNtGetTickCount)(void);
 102
 103 static const int MonthLengths[2][12] =
 104 {
 105         { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
 106         { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }
 107 };
 108
 109 static inline BOOL IsLeapYear(int Year)
 110 {
 111     return Year % 4 == 0 && (Year % 100 != 0 || Year % 400 == 0);
 112 }
 113
 114 /* start time of the tests */
 115 static TIME_FIELDS tftest = {1889,12,31,23,59,59,0,0};
 116
 117 static void test_pRtlTimeToTimeFields(void)
 118 {
 119     LARGE_INTEGER litime , liresult;
 120     TIME_FIELDS tfresult;
 121     int i=0;
 122     litime.QuadPart = ((ULONGLONG)0x0144017a << 32) | 0xf0b0a980;
 123     while( tftest.Year < 2110 ) {
 124         /* test at the last second of the month */
 125         pRtlTimeToTimeFields( &litime, &tfresult);
 126         ok( tfresult.Year == tftest.Year && tfresult.Month == tftest.Month &&
 127             tfresult.Day == tftest.Day && tfresult.Hour == tftest.Hour &&
 128             tfresult.Minute == tftest.Minute && tfresult.Second == tftest.Second,
 129             "#%d expected: %d-%d-%d %d:%d:%d  got:  %d-%d-%d %d:%d:%d\n", ++i,
 130             tftest.Year, tftest.Month, tftest.Day,
 131             tftest.Hour, tftest.Minute,tftest.Second,
 132             tfresult.Year, tfresult.Month, tfresult.Day,
 133             tfresult.Hour, tfresult.Minute, tfresult.Second);
 134         /* test the inverse */
 135         pRtlTimeFieldsToTime( &tfresult, &liresult);
 136         ok( liresult.QuadPart == litime.QuadPart," TimeFieldsToTime failed on %d-%d-%d %d:%d:%d. Error is %d ticks\n",
 137             tfresult.Year, tfresult.Month, tfresult.Day,
 138             tfresult.Hour, tfresult.Minute, tfresult.Second,
 139             (int) (liresult.QuadPart - litime.QuadPart) );
 140         /*  one second later is beginning of next month */
 141         litime.QuadPart +=  TICKSPERSEC ;
 142         pRtlTimeToTimeFields( &litime, &tfresult);
 143         ok( tfresult.Year == tftest.Year + (tftest.Month ==12) &&
 144             tfresult.Month == tftest.Month % 12 + 1 &&
 145             tfresult.Day == 1 && tfresult.Hour == 0 &&
 146             tfresult.Minute == 0 && tfresult.Second == 0,
 147             "#%d expected: %d-%d-%d %d:%d:%d  got:  %d-%d-%d %d:%d:%d\n", ++i,
 148             tftest.Year + (tftest.Month ==12),
 149             tftest.Month % 12 + 1, 1, 0, 0, 0,
 150             tfresult.Year, tfresult.Month, tfresult.Day,
 151             tfresult.Hour, tfresult.Minute, tfresult.Second);
 152         /* test the inverse */
 153         pRtlTimeFieldsToTime( &tfresult, &liresult);
 154         ok( liresult.QuadPart == litime.QuadPart," TimeFieldsToTime failed on %d-%d-%d %d:%d:%d. Error is %d ticks\n",
 155             tfresult.Year, tfresult.Month, tfresult.Day,
 156             tfresult.Hour, tfresult.Minute, tfresult.Second,
 157             (int) (liresult.QuadPart - litime.QuadPart) );
 158         /* advance to the end of the month */
 159         litime.QuadPart -=  TICKSPERSEC ;
 160         if( tftest.Month == 12) {
 161             tftest.Month = 1;
 162             tftest.Year += 1;
 163         } else
 164             tftest.Month += 1;
 165         tftest.Day = MonthLengths[IsLeapYear(tftest.Year)][tftest.Month - 1];
 166         litime.QuadPart +=  (LONGLONG) tftest.Day * TICKSPERSEC * SECSPERDAY;
 167     }
 168 }
 169
 170 static void test_NtQueryPerformanceCounter(void)
 171 {
 172     LARGE_INTEGER counter, frequency;
 173     NTSTATUS status;
 174
 175     status = pNtQueryPerformanceCounter(NULL, NULL);
 176     ok(status == STATUS_ACCESS_VIOLATION, "expected STATUS_ACCESS_VIOLATION, got %08x\n", status);
 177     status = pNtQueryPerformanceCounter(NULL, &frequency);
 178     ok(status == STATUS_ACCESS_VIOLATION, "expected STATUS_ACCESS_VIOLATION, got %08x\n", status);
 179     status = pNtQueryPerformanceCounter(&counter, (void *)0xdeadbee0);
 180     ok(status == STATUS_ACCESS_VIOLATION, "expected STATUS_ACCESS_VIOLATION, got %08x\n", status);
 181     status = pNtQueryPerformanceCounter((void *)0xdeadbee0, &frequency);
 182     ok(status == STATUS_ACCESS_VIOLATION, "expected STATUS_ACCESS_VIOLATION, got %08x\n", status);
 183
 184     status = pNtQueryPerformanceCounter(&counter, NULL);
 185     ok(status == STATUS_SUCCESS, "expected STATUS_SUCCESS, got %08x\n", status);
 186     status = pNtQueryPerformanceCounter(&counter, &frequency);
 187     ok(status == STATUS_SUCCESS, "expected STATUS_SUCCESS, got %08x\n", status);
 188 }
 189
 190 static void test_NtGetTickCount(void)
 191 {
 192 #ifndef _WIN64
 193     KSHARED_USER_DATA *user_shared_data = (void *)0x7ffe0000;
 194     LONG diff;
 195     int i;
 196
 197     if (!pNtGetTickCount)
 198     {
 199         win_skip("NtGetTickCount is not available\n");
 200         return;
 201     }
 202
 203     for (i = 0; i < 5; ++i)
 204     {
 205         diff = (user_shared_data->TickCountQuad * user_shared_data->TickCountMultiplier) >> 24;
 206         diff = pNtGetTickCount() - diff;
 207         ok(diff < 32, "NtGetTickCount - TickCountQuad too high, expected < 32 got %d\n", diff);
 208         Sleep(50);
 209     }
 210 #endif
 211 }
 212
 213 START_TEST(time)
 214 {
 215     HMODULE mod = GetModuleHandleA("ntdll.dll");
 216     pRtlTimeToTimeFields = (void *)GetProcAddress(mod,"RtlTimeToTimeFields");
 217     pRtlTimeFieldsToTime = (void *)GetProcAddress(mod,"RtlTimeFieldsToTime");
 218     pNtQueryPerformanceCounter = (void *)GetProcAddress(mod, "NtQueryPerformanceCounter");
 219     pNtGetTickCount = (void *)GetProcAddress(mod,"NtGetTickCount");
 220     if (pRtlTimeToTimeFields && pRtlTimeFieldsToTime)
 221         test_pRtlTimeToTimeFields();
 222     else
 223         win_skip("Required time conversion functions are not available\n");
 224     test_NtQueryPerformanceCounter();
 225     test_NtGetTickCount();
 226 }