+
+static int clock_cmp(const void *p1, const void *p2)
+{
+ const struct clock_entry *c1 = p1;
+ const struct clock_entry *c2 = p2;
+
+ if (c1->seq == c2->seq)
+ log_err("cs: bug in atomic sequence!\n");
+
+ return c1->seq - c2->seq;
+}
+
+int fio_monotonic_clocktest(void)
+{
+ struct clock_thread *threads;
+ unsigned int nr_cpus = cpus_online();
+ struct clock_entry *entries;
+ unsigned long tentries, failed;
+ uint64_t seq = 0;
+ int i;
+
+ log_info("cs: reliable_tsc: %s\n", tsc_reliable ? "yes" : "no");
+
+ fio_debug |= 1U << FD_TIME;
+ calibrate_cpu_clock();
+ fio_debug &= ~(1U << FD_TIME);
+
+ threads = malloc(nr_cpus * sizeof(struct clock_thread));
+ tentries = CLOCK_ENTRIES * nr_cpus;
+ entries = malloc(tentries * sizeof(struct clock_entry));
+
+ log_info("cs: Testing %u CPUs\n", nr_cpus);
+
+ for (i = 0; i < nr_cpus; i++) {
+ struct clock_thread *t = &threads[i];
+
+ t->cpu = i;
+ t->seq = &seq;
+ t->entries = &entries[i * CLOCK_ENTRIES];
+ pthread_mutex_init(&t->lock, NULL);
+ pthread_mutex_init(&t->started, NULL);
+ pthread_mutex_lock(&t->lock);
+ pthread_create(&t->thread, NULL, clock_thread_fn, t);
+ }
+
+ for (i = 0; i < nr_cpus; i++) {
+ struct clock_thread *t = &threads[i];
+
+ pthread_mutex_lock(&t->started);
+ }
+
+ for (i = 0; i < nr_cpus; i++) {
+ struct clock_thread *t = &threads[i];
+
+ pthread_mutex_unlock(&t->lock);
+ }
+
+ for (failed = i = 0; i < nr_cpus; i++) {
+ struct clock_thread *t = &threads[i];
+ void *ret;
+
+ pthread_join(t->thread, &ret);
+ if (ret)
+ failed++;
+ }
+ free(threads);
+
+ if (failed) {
+ log_err("Clocksource test: %u threads failed\n", failed);
+ goto err;
+ }
+
+ qsort(entries, tentries, sizeof(struct clock_entry), clock_cmp);
+
+ for (failed = i = 0; i < tentries; i++) {
+ struct clock_entry *prev, *this = &entries[i];
+
+ if (!i) {
+ prev = this;
+ continue;
+ }
+
+ if (prev->tsc > this->tsc) {
+ uint64_t diff = prev->tsc - this->tsc;
+
+ log_info("cs: CPU clock mismatch (diff=%lu):\n", diff);
+ log_info("\t CPU%3lu: TSC=%lu, SEQ=%lu\n", prev->cpu, prev->tsc, prev->seq);
+ log_info("\t CPU%3lu: TSC=%lu, SEQ=%lu\n", this->cpu, this->tsc, this->seq);
+ failed++;
+ }
+
+ prev = this;
+ }
+
+ if (failed)
+ log_info("cs: Failed: %lu\n", failed);
+ else
+ log_info("cs: Pass!\n");
+
+err:
+ free(entries);
+ return !!failed;
+}
+
+#else /* defined(FIO_HAVE_CPU_AFFINITY) && defined(ARCH_HAVE_CPU_CLOCK) */
+
+int fio_monotonic_clocktest(void)
+{
+ log_info("cs: current platform does not support CPU clocks\n");
+ return 0;
+}
+
+#endif