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 "../kselftest.h"
 32
 33#define CALLS_PER_LOOP 64
 34#define NSEC_PER_SEC 1000000000ULL
 35
 36#define CLOCK_REALTIME			0
 37#define CLOCK_MONOTONIC			1
 38#define CLOCK_PROCESS_CPUTIME_ID	2
 39#define CLOCK_THREAD_CPUTIME_ID		3
 40#define CLOCK_MONOTONIC_RAW		4
 41#define CLOCK_REALTIME_COARSE		5
 42#define CLOCK_MONOTONIC_COARSE		6
 43#define CLOCK_BOOTTIME			7
 44#define CLOCK_REALTIME_ALARM		8
 45#define CLOCK_BOOTTIME_ALARM		9
 46#define CLOCK_HWSPECIFIC		10
 47#define CLOCK_TAI			11
 48#define NR_CLOCKIDS			12
 49
 50char *clockstring(int clockid)
 51{
 52	switch (clockid) {
 53	case CLOCK_REALTIME:
 54		return "CLOCK_REALTIME";
 55	case CLOCK_MONOTONIC:
 56		return "CLOCK_MONOTONIC";
 57	case CLOCK_PROCESS_CPUTIME_ID:
 58		return "CLOCK_PROCESS_CPUTIME_ID";
 59	case CLOCK_THREAD_CPUTIME_ID:
 60		return "CLOCK_THREAD_CPUTIME_ID";
 61	case CLOCK_MONOTONIC_RAW:
 62		return "CLOCK_MONOTONIC_RAW";
 63	case CLOCK_REALTIME_COARSE:
 64		return "CLOCK_REALTIME_COARSE";
 65	case CLOCK_MONOTONIC_COARSE:
 66		return "CLOCK_MONOTONIC_COARSE";
 67	case CLOCK_BOOTTIME:
 68		return "CLOCK_BOOTTIME";
 69	case CLOCK_REALTIME_ALARM:
 70		return "CLOCK_REALTIME_ALARM";
 71	case CLOCK_BOOTTIME_ALARM:
 72		return "CLOCK_BOOTTIME_ALARM";
 73	case CLOCK_TAI:
 74		return "CLOCK_TAI";
 75	}
 76	return "UNKNOWN_CLOCKID";
 77}
 78
 79/* returns 1 if a <= b, 0 otherwise */
 80static inline int in_order(struct timespec a, struct timespec b)
 81{
 82	/* use unsigned to avoid false positives on 2038 rollover */
 83	if ((unsigned long)a.tv_sec < (unsigned long)b.tv_sec)
 84		return 1;
 85	if ((unsigned long)a.tv_sec > (unsigned long)b.tv_sec)
 86		return 0;
 87	if (a.tv_nsec > b.tv_nsec)
 88		return 0;
 89	return 1;
 90}
 91
 92
 93
 94int consistency_test(int clock_type, unsigned long seconds)
 95{
 96	struct timespec list[CALLS_PER_LOOP];
 97	int i, inconsistent;
 98	long now, then;
 99	time_t t;
100	char *start_str;
101
102	clock_gettime(clock_type, &list[0]);
103	now = then = list[0].tv_sec;
104
105	/* timestamp start of test */
106	t = time(0);
107	start_str = ctime(&t);
108
109	while (seconds == -1 || now - then < seconds) {
110		inconsistent = -1;
111
112		/* Fill list */
113		for (i = 0; i < CALLS_PER_LOOP; i++)
114			clock_gettime(clock_type, &list[i]);
115
116		/* Check for inconsistencies */
117		for (i = 0; i < CALLS_PER_LOOP - 1; i++)
118			if (!in_order(list[i], list[i+1]))
119				inconsistent = i;
120
121		/* display inconsistency */
122		if (inconsistent >= 0) {
123			unsigned long long delta;
124
125			ksft_print_msg("\%s\n", start_str);
126			for (i = 0; i < CALLS_PER_LOOP; i++) {
127				if (i == inconsistent)
128					ksft_print_msg("--------------------\n");
129				ksft_print_msg("%lu:%lu\n", list[i].tv_sec,
130							list[i].tv_nsec);
131				if (i == inconsistent + 1)
132					ksft_print_msg("--------------------\n");
133			}
134			delta = list[inconsistent].tv_sec * NSEC_PER_SEC;
135			delta += list[inconsistent].tv_nsec;
136			delta -= list[inconsistent+1].tv_sec * NSEC_PER_SEC;
137			delta -= list[inconsistent+1].tv_nsec;
138			ksft_print_msg("Delta: %llu ns\n", delta);
139			fflush(0);
140			/* timestamp inconsistency*/
141			t = time(0);
142			ksft_print_msg("%s\n", ctime(&t));
143			return -1;
144		}
145		now = list[0].tv_sec;
146	}
147	return 0;
148}
149
150
151int main(int argc, char *argv[])
152{
153	int clockid, opt;
154	int userclock = CLOCK_REALTIME;
155	int maxclocks = NR_CLOCKIDS;
156	int runtime = 10;
157	struct timespec ts;
158
159	/* Process arguments */
160	while ((opt = getopt(argc, argv, "t:c:")) != -1) {
161		switch (opt) {
162		case 't':
163			runtime = atoi(optarg);
164			break;
165		case 'c':
166			userclock = atoi(optarg);
167			maxclocks = userclock + 1;
168			break;
169		default:
170			printf("Usage: %s [-t <secs>] [-c <clockid>]\n", argv[0]);
171			printf("	-t: Number of seconds to run\n");
172			printf("	-c: clockid to use (default, all clockids)\n");
173			exit(-1);
174		}
175	}
176
177	setbuf(stdout, NULL);
178
179	ksft_print_header();
180	ksft_set_plan(maxclocks - userclock);
181
182	for (clockid = userclock; clockid < maxclocks; clockid++) {
183
184		if (clockid == CLOCK_HWSPECIFIC || clock_gettime(clockid, &ts)) {
185			ksft_test_result_skip("%-31s\n", clockstring(clockid));
186			continue;
187		}
188
189		if (consistency_test(clockid, runtime)) {
190			ksft_test_result_fail("%-31s\n", clockstring(clockid));
191			ksft_exit_fail();
192		} else {
193			ksft_test_result_pass("%-31s\n", clockstring(clockid));
194		}
195	}
196	ksft_exit_pass();
197}