1 /* Time inconsistency check test 2 * by: john stultz (johnstul@us.ibm.com) 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 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 */ 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 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 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