VirtualBox

source: vbox/trunk/src/VBox/Runtime/testcase/tstTime.cpp@ 6677

Last change on this file since 6677 was 5999, checked in by vboxsync, 17 years ago

The Giant CDDL Dual-License Header Change.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 4.1 KB
Line 
1/* $Id: tstTime.cpp 5999 2007-12-07 15:05:06Z vboxsync $ */
2/** @file
3 * innotek Portable Runtime Testcase - Simple RTTime tests.
4 */
5
6/*
7 * Copyright (C) 2006-2007 innotek GmbH
8 *
9 * This file is part of VirtualBox Open Source Edition (OSE), as
10 * available from http://www.virtualbox.org. This file is free software;
11 * you can redistribute it and/or modify it under the terms of the GNU
12 * General Public License (GPL) as published by the Free Software
13 * Foundation, in version 2 as it comes in the "COPYING" file of the
14 * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15 * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16 *
17 * The contents of this file may alternatively be used under the terms
18 * of the Common Development and Distribution License Version 1.0
19 * (CDDL) only, as it comes in the "COPYING.CDDL" file of the
20 * VirtualBox OSE distribution, in which case the provisions of the
21 * CDDL are applicable instead of those of the GPL.
22 *
23 * You may elect to license modified versions of this file under the
24 * terms and conditions of either the GPL or the CDDL or both.
25 */
26
27/*******************************************************************************
28* Header Files *
29*******************************************************************************/
30#include <iprt/time.h>
31#include <iprt/stream.h>
32#include <iprt/initterm.h>
33#include <iprt/thread.h>
34#include <VBox/sup.h>
35
36
37int main()
38{
39 unsigned cErrors = 0;
40 int i;
41 RTR3Init();
42 RTPrintf("tstTime: TESTING...\n");
43
44 /*
45 * RTNanoTimeTS() shall never return something which
46 * is less or equal to the return of the previous call.
47 */
48
49 RTTimeSystemNanoTS(); RTTimeNanoTS(); RTThreadYield();
50 uint64_t u64RTStartTS = RTTimeNanoTS();
51 uint64_t u64OSStartTS = RTTimeSystemNanoTS();
52
53 uint64_t u64Prev = RTTimeNanoTS();
54 for (i = 0; i < 100*_1M; i++)
55 {
56 uint64_t u64 = RTTimeNanoTS();
57 if (u64 <= u64Prev)
58 {
59 /** @todo wrapping detection. */
60 RTPrintf("tstTime: error: i=%#010x u64=%#llx u64Prev=%#llx (1)\n", i, u64, u64Prev);
61 cErrors++;
62 RTThreadYield();
63 u64 = RTTimeNanoTS();
64 }
65 else if (u64 - u64Prev > 1000000000 /* 1sec */)
66 {
67 RTPrintf("tstTime: error: i=%#010x u64=%#llx u64Prev=%#llx delta=%lld\n", i, u64, u64Prev, u64 - u64Prev);
68 cErrors++;
69 RTThreadYield();
70 u64 = RTTimeNanoTS();
71 }
72 if (!(i & (_1M*2 - 1)))
73 {
74 RTPrintf("tstTime: i=%#010x u64=%#llx u64Prev=%#llx delta=%lld\n", i, u64, u64Prev, u64 - u64Prev);
75 RTThreadYield();
76 u64 = RTTimeNanoTS();
77 }
78 u64Prev = u64;
79 }
80
81 RTTimeSystemNanoTS(); RTTimeNanoTS(); RTThreadYield();
82 uint64_t u64RTElapsedTS = RTTimeNanoTS();
83 uint64_t u64OSElapsedTS = RTTimeSystemNanoTS();
84 u64RTElapsedTS -= u64RTStartTS;
85 u64OSElapsedTS -= u64OSStartTS;
86 int64_t i64Diff = u64OSElapsedTS >= u64RTElapsedTS ? u64OSElapsedTS - u64RTElapsedTS : u64RTElapsedTS - u64OSElapsedTS;
87 if (i64Diff > (int64_t)(u64OSElapsedTS / 1000))
88 {
89 RTPrintf("tstTime: error: total time differs too much! u64OSElapsedTS=%#llx u64RTElapsedTS=%#llx delta=%lld\n",
90 u64OSElapsedTS, u64RTElapsedTS, u64OSElapsedTS - u64RTElapsedTS);
91 cErrors++;
92 }
93 else
94 RTPrintf("tstTime: total time difference: u64OSElapsedTS=%#llx u64RTElapsedTS=%#llx delta=%lld\n",
95 u64OSElapsedTS, u64RTElapsedTS, u64OSElapsedTS - u64RTElapsedTS);
96
97 RTPrintf("RTTimeDbgSteps -> %u (%d ppt)\n", RTTimeDbgSteps(), ((uint64_t)RTTimeDbgSteps() * 1000) / i);
98 RTPrintf("RTTimeDbgExpired -> %u (%d ppt)\n", RTTimeDbgExpired(), ((uint64_t)RTTimeDbgExpired() * 1000) / i);
99 RTPrintf("RTTimeDbgBad -> %u (%d ppt)\n", RTTimeDbgBad(), ((uint64_t)RTTimeDbgBad() * 1000) / i);
100 RTPrintf("RTTimeDbgRaces -> %u (%d ppt)\n", RTTimeDbgRaces(), ((uint64_t)RTTimeDbgRaces() * 1000) / i);
101 if (!cErrors)
102 RTPrintf("tstTime: SUCCESS\n");
103 else
104 RTPrintf("tstTime: FAILURE - %d errors\n", cErrors);
105 return !!cErrors;
106}
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette