1 /* Time inconsistency check test
2 * by: john stultz ([email protected])
3 * (C) Copyright IBM 2003, 2004, 2005, 2012
4 * (C) Copyright Linaro Limited 2015
5 * Licensed under the GPLv2
6 *
7 * To build:
8 * $ gcc inconsistency-check.c -o inconsistency-check -lrt
9 *
10 * This program is free software: you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation, either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program 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
18 * GNU General Public License for more details.
19 */
20
21
22
23 #include <stdio.h>
24 #include <unistd.h>
25 #include <stdlib.h>
26 #include <time.h>
27 #include <sys/time.h>
28 #include <sys/timex.h>
29 #include <string.h>
30 #include <signal.h>
31 #include <include/vdso/time64.h>
32 #include "../kselftest.h"
33
34 /* CLOCK_HWSPECIFIC == CLOCK_SGI_CYCLE (Deprecated) */
35 #define CLOCK_HWSPECIFIC 10
36
37 #define CALLS_PER_LOOP 64
38
clockstring(int clockid)39 char *clockstring(int clockid)
40 {
41 switch (clockid) {
42 case CLOCK_REALTIME:
43 return "CLOCK_REALTIME";
44 case CLOCK_MONOTONIC:
45 return "CLOCK_MONOTONIC";
46 case CLOCK_PROCESS_CPUTIME_ID:
47 return "CLOCK_PROCESS_CPUTIME_ID";
48 case CLOCK_THREAD_CPUTIME_ID:
49 return "CLOCK_THREAD_CPUTIME_ID";
50 case CLOCK_MONOTONIC_RAW:
51 return "CLOCK_MONOTONIC_RAW";
52 case CLOCK_REALTIME_COARSE:
53 return "CLOCK_REALTIME_COARSE";
54 case CLOCK_MONOTONIC_COARSE:
55 return "CLOCK_MONOTONIC_COARSE";
56 case CLOCK_BOOTTIME:
57 return "CLOCK_BOOTTIME";
58 case CLOCK_REALTIME_ALARM:
59 return "CLOCK_REALTIME_ALARM";
60 case CLOCK_BOOTTIME_ALARM:
61 return "CLOCK_BOOTTIME_ALARM";
62 case CLOCK_TAI:
63 return "CLOCK_TAI";
64 }
65 return "UNKNOWN_CLOCKID";
66 }
67
68 /* returns 1 if a <= b, 0 otherwise */
in_order(struct timespec a,struct timespec b)69 static inline int in_order(struct timespec a, struct timespec b)
70 {
71 /* use unsigned to avoid false positives on 2038 rollover */
72 if ((unsigned long)a.tv_sec < (unsigned long)b.tv_sec)
73 return 1;
74 if ((unsigned long)a.tv_sec > (unsigned long)b.tv_sec)
75 return 0;
76 if (a.tv_nsec > b.tv_nsec)
77 return 0;
78 return 1;
79 }
80
81
82
consistency_test(int clock_type,unsigned long seconds)83 int consistency_test(int clock_type, unsigned long seconds)
84 {
85 struct timespec list[CALLS_PER_LOOP];
86 int i, inconsistent;
87 long now, then;
88 time_t t;
89 char *start_str;
90
91 clock_gettime(clock_type, &list[0]);
92 now = then = list[0].tv_sec;
93
94 /* timestamp start of test */
95 t = time(0);
96 start_str = ctime(&t);
97
98 while (seconds == -1 || now - then < seconds) {
99 inconsistent = -1;
100
101 /* Fill list */
102 for (i = 0; i < CALLS_PER_LOOP; i++)
103 clock_gettime(clock_type, &list[i]);
104
105 /* Check for inconsistencies */
106 for (i = 0; i < CALLS_PER_LOOP - 1; i++)
107 if (!in_order(list[i], list[i+1]))
108 inconsistent = i;
109
110 /* display inconsistency */
111 if (inconsistent >= 0) {
112 unsigned long long delta;
113
114 ksft_print_msg("\%s\n", start_str);
115 for (i = 0; i < CALLS_PER_LOOP; i++) {
116 if (i == inconsistent)
117 ksft_print_msg("--------------------\n");
118 ksft_print_msg("%lu:%lu\n", list[i].tv_sec,
119 list[i].tv_nsec);
120 if (i == inconsistent + 1)
121 ksft_print_msg("--------------------\n");
122 }
123 delta = list[inconsistent].tv_sec * NSEC_PER_SEC;
124 delta += list[inconsistent].tv_nsec;
125 delta -= list[inconsistent+1].tv_sec * NSEC_PER_SEC;
126 delta -= list[inconsistent+1].tv_nsec;
127 ksft_print_msg("Delta: %llu ns\n", delta);
128 fflush(0);
129 /* timestamp inconsistency*/
130 t = time(0);
131 ksft_print_msg("%s\n", ctime(&t));
132 return -1;
133 }
134 now = list[0].tv_sec;
135 }
136 return 0;
137 }
138
139
main(int argc,char * argv[])140 int main(int argc, char *argv[])
141 {
142 int clockid, opt;
143 int userclock = CLOCK_REALTIME;
144 int maxclocks = CLOCK_TAI + 1;
145 int runtime = 10;
146 struct timespec ts;
147
148 /* Process arguments */
149 while ((opt = getopt(argc, argv, "t:c:")) != -1) {
150 switch (opt) {
151 case 't':
152 runtime = atoi(optarg);
153 break;
154 case 'c':
155 userclock = atoi(optarg);
156 maxclocks = userclock + 1;
157 break;
158 default:
159 printf("Usage: %s [-t <secs>] [-c <clockid>]\n", argv[0]);
160 printf(" -t: Number of seconds to run\n");
161 printf(" -c: clockid to use (default, all clockids)\n");
162 exit(-1);
163 }
164 }
165
166 setbuf(stdout, NULL);
167
168 ksft_print_header();
169 ksft_set_plan(maxclocks - userclock);
170
171 for (clockid = userclock; clockid < maxclocks; clockid++) {
172
173 if (clockid == CLOCK_HWSPECIFIC || clock_gettime(clockid, &ts)) {
174 ksft_test_result_skip("%-31s\n", clockstring(clockid));
175 continue;
176 }
177
178 if (consistency_test(clockid, runtime)) {
179 ksft_test_result_fail("%-31s\n", clockstring(clockid));
180 ksft_exit_fail();
181 } else {
182 ksft_test_result_pass("%-31s\n", clockstring(clockid));
183 }
184 }
185 ksft_exit_pass();
186 }
187