1/* Clocksource change test
2 *		by: john stultz (johnstul@us.ibm.com)
3 *		(C) Copyright IBM 2012
4 *		Licensed under the GPLv2
5 *
6 *  NOTE: This is a meta-test which quickly changes the clocksourc and
7 *  then uses other tests to detect problems. Thus this test requires
8 *  that the inconsistency-check and nanosleep tests be present in the
9 *  same directory it is run from.
10 *
11 *  To build:
12 *	$ gcc clocksource-switch.c -o clocksource-switch -lrt
13 *
14 *   This program is free software: you can redistribute it and/or modify
15 *   it under the terms of the GNU General Public License as published by
16 *   the Free Software Foundation, either version 2 of the License, or
17 *   (at your option) any later version.
18 *
19 *   This program is distributed in the hope that it will be useful,
20 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
21 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 *   GNU General Public License for more details.
23 */
24
25
26#include <stdio.h>
27#include <unistd.h>
28#include <stdlib.h>
29#include <sys/time.h>
30#include <sys/timex.h>
31#include <time.h>
32#include <sys/types.h>
33#include <sys/stat.h>
34#include <fcntl.h>
35#include <string.h>
36#include <sys/wait.h>
37#include "../kselftest.h"
38
39
40int get_clocksources(char list[][30])
41{
42	int fd, i;
43	size_t size;
44	char buf[512];
45	char *head, *tmp;
46
47	fd = open("/sys/devices/system/clocksource/clocksource0/available_clocksource", O_RDONLY);
48
49	size = read(fd, buf, 512);
50
51	close(fd);
52
53	for (i = 0; i < 10; i++)
54		list[i][0] = '\0';
55
56	head = buf;
57	i = 0;
58	while (head - buf < size) {
59		/* Find the next space */
60		for (tmp = head; *tmp != ' '; tmp++) {
61			if (*tmp == '\n')
62				break;
63			if (*tmp == '\0')
64				break;
65		}
66		*tmp = '\0';
67		strcpy(list[i], head);
68		head = tmp + 1;
69		i++;
70	}
71
72	return i-1;
73}
74
75int get_cur_clocksource(char *buf, size_t size)
76{
77	int fd;
78
79	fd = open("/sys/devices/system/clocksource/clocksource0/current_clocksource", O_RDONLY);
80
81	size = read(fd, buf, size);
82
83	return 0;
84}
85
86int change_clocksource(char *clocksource)
87{
88	int fd;
89	ssize_t size;
90
91	fd = open("/sys/devices/system/clocksource/clocksource0/current_clocksource", O_WRONLY);
92
93	if (fd < 0)
94		return -1;
95
96	size = write(fd, clocksource, strlen(clocksource));
97
98	if (size < 0)
99		return -1;
100
101	close(fd);
102	return 0;
103}
104
105
106int run_tests(int secs)
107{
108	int ret;
109	char buf[255];
110
111	sprintf(buf, "./inconsistency-check -t %i", secs);
112	ret = system(buf);
113	if (WIFEXITED(ret) && WEXITSTATUS(ret))
114		return WEXITSTATUS(ret);
115	ret = system("./nanosleep");
116	return WIFEXITED(ret) ? WEXITSTATUS(ret) : 0;
117}
118
119
120char clocksource_list[10][30];
121
122int main(int argv, char **argc)
123{
124	char orig_clk[512];
125	int count, i, status;
126	pid_t pid;
127
128	get_cur_clocksource(orig_clk, 512);
129
130	count = get_clocksources(clocksource_list);
131
132	if (change_clocksource(clocksource_list[0])) {
133		printf("Error: You probably need to run this as root\n");
134		return -1;
135	}
136
137	/* Check everything is sane before we start switching asyncrhonously */
138	for (i = 0; i < count; i++) {
139		printf("Validating clocksource %s\n", clocksource_list[i]);
140		if (change_clocksource(clocksource_list[i])) {
141			status = -1;
142			goto out;
143		}
144		if (run_tests(5)) {
145			status = -1;
146			goto out;
147		}
148	}
149
150
151	printf("Running Asynchronous Switching Tests...\n");
152	pid = fork();
153	if (!pid)
154		return run_tests(60);
155
156	while (pid != waitpid(pid, &status, WNOHANG))
157		for (i = 0; i < count; i++)
158			if (change_clocksource(clocksource_list[i])) {
159				status = -1;
160				goto out;
161			}
162out:
163	change_clocksource(orig_clk);
164
165	if (status)
166		return ksft_exit_fail();
167	return ksft_exit_pass();
168}
169