2 * COPYRIGHT: See COPYING.ARM in the top level directory
3 * PROJECT: ReactOS UEFI Boot Library
4 * FILE: boot/environ/lib/platform/time.c
5 * PURPOSE: Boot Library Time Management Routines
6 * PROGRAMMER: Alex Ionescu (alex.ionescu@reactos.org)
9 /* INCLUDES ******************************************************************/
13 /* DATA VARIABLES ************************************************************/
15 ULONGLONG BlpTimePerformanceFrequency
;
17 /* FUNCTIONS *****************************************************************/
20 BlpTimeMeasureTscFrequency (
26 ULONGLONG TimeStamp1
, TimeStamp2
, Delta
;
28 /* Check if the ISVM bit it set, meaning we're in a hypervisor */
30 Count
= CpuInfo
[2] & 0x80000000 ? 10 : 1;
32 /* Loop trying to get an accurate TSC */
35 /* Stall for 1us and get count 1 */
37 TimeStamp1
= __rdtsc();
39 /* Stall for 1000us and get count 2*/
41 TimeStamp2
= __rdtsc();
43 /* Stall for 9000us and get the difference */
45 Delta
= __rdtsc() - TimeStamp2
;
47 /* Keep going as long as the TSC is fluctuating */
49 } while (((TimeStamp2
- TimeStamp1
) > Delta
) && (Count
));
51 /* Set the frequency based on the two measurements we took */
52 BlpTimePerformanceFrequency
= 125 * (Delta
- (TimeStamp2
- TimeStamp1
)) & 0x1FFFFFFFFFFFFFF;
53 return STATUS_SUCCESS
;
57 BlpTimeCalibratePerformanceCounter (
63 /* Check if the ISVM bit it set, meaning we're in a hypervisor */
65 if (CpuInfo
[2] & 0x80000000)
67 /* Get the Hypervisor Identification Leaf */
68 __cpuid(CpuInfo
, 0x40000001);
70 /* Is this Hyper-V? */
71 if (CpuInfo
[0] == '1#vH')
73 /* Get the Hypervisor Feature Identification Leaf */
74 __cpuid(CpuInfo
, 0x40000003);
76 /* Check if HV_X64_MSR_REFERENCE_TSC is present */
77 if (CpuInfo
[3] & 0x100)
79 /* Read the TSC frequency from the MSR */
80 BlpTimePerformanceFrequency
= __readmsr(0x40000022);
81 EfiPrintf(L
"Using Hyper-V frequency as: %I64d\r\n", BlpTimePerformanceFrequency
);
82 return STATUS_SUCCESS
;
87 /* On other systems, compute it */
88 return BlpTimeMeasureTscFrequency();
92 BlTimeQueryPerformanceCounter (
93 _Out_opt_ PLARGE_INTEGER Frequency
96 /* Check if caller wants frequency */
100 Frequency
->QuadPart
= BlpTimePerformanceFrequency
;
103 /* Return the TSC value */