1 /*
2 * This file and its contents are supplied under the terms of the
3 * Common Development and Distribution License ("CDDL"), version 1.0.
4 * You may only use this file in accordance with the terms of version
5 * 1.0 of the CDDL.
6 *
7 * A full copy of the text of the CDDL should have accompanied this
8 * source. A copy of the CDDL is also available via the Internet at
9 * http://www.illumos.org/license/CDDL.
10 */
11
12 /*
13 * Copyright 2022 Oxide Computer Company
14 */
15
16 #include <stdio.h>
17 #include <unistd.h>
18 #include <stdlib.h>
19 #include <strings.h>
20 #include <libgen.h>
21 #include <assert.h>
22 #include <errno.h>
23
24 #include <sys/types.h>
25 #include <sys/sysmacros.h>
26 #include <sys/debug.h>
27 #include <sys/vmm.h>
28 #include <sys/vmm_dev.h>
29 #include <vmmapi.h>
30
31 #include "in_guest.h"
32 #include "test_defs.h"
33
34 typedef struct reading {
35 hrtime_t when;
36 uint16_t value;
37 } reading_t;
38
39 static bool
check_reading(reading_t before,reading_t after,uint_t tick_margin,uint_t ppm_margin)40 check_reading(reading_t before, reading_t after, uint_t tick_margin,
41 uint_t ppm_margin)
42 {
43 hrtime_t time_delta = after.when - before.when;
44 uint16_t tick_delta;
45
46 tick_delta = before.value - after.value;
47
48 /* is the number of ticks OK? */
49 if (tick_delta < ATPIT_TARGET_TICKS) {
50 test_fail_msg("inadequate passage of ticks %u < %u\n",
51 tick_delta, ATPIT_TARGET_TICKS);
52 } else if ((tick_delta - ATPIT_TARGET_TICKS) > tick_margin) {
53 (void) printf("%u ticks outside margin %u\n", tick_delta,
54 ATPIT_TARGET_TICKS + tick_margin);
55 return (false);
56 }
57
58 hrtime_t time_target = (tick_delta * NANOSEC) / ATPIT_FREQ;
59
60 hrtime_t offset;
61 if (time_delta < time_target) {
62 offset = time_target - time_delta;
63 } else {
64 offset = time_delta - time_target;
65 }
66 uint64_t ppm = (offset * 1000000) / time_target;
67 (void) printf("margin limits: ticks=%u ppm=%lu\n",
68 tick_margin, ppm_margin);
69 (void) printf("%u ticks in %lu ns (error %lu ppm)\n",
70 tick_delta, time_delta, ppm);
71 if (ppm > ppm_margin) {
72 (void) printf("UNACCEPTABLE!\n");
73 return (false);
74 }
75 return (true);
76 }
77
78 int
main(int argc,char * argv[])79 main(int argc, char *argv[])
80 {
81 const char *test_suite_name = basename(argv[0]);
82 struct vmctx *ctx = NULL;
83 struct vcpu *vcpu;
84 int err;
85
86 ctx = test_initialize(test_suite_name);
87
88 if ((vcpu = vm_vcpu_open(ctx, 0)) == NULL) {
89 test_fail_errno(errno, "Could not open vcpu0");
90 }
91
92 err = test_setup_vcpu(vcpu, MEM_LOC_PAYLOAD, MEM_LOC_STACK);
93 if (err != 0) {
94 test_fail_errno(err, "Could not initialize vcpu0");
95 }
96
97 struct vm_entry ventry = { 0 };
98 struct vm_exit vexit = { 0 };
99 reading_t readings[2];
100 uint_t nread = 0;
101 uint_t nrepeat = 0;
102
103 /*
104 * Since the PIT is slower to read back (requiring 3 emulated reads),
105 * operate with a more loose ticks margin.
106 */
107 const uint_t margin_ticks = MAX(1, ATPIT_TARGET_TICKS / 2500);
108 const uint_t margin_ppm = 400;
109
110 do {
111 const enum vm_exit_kind kind =
112 test_run_vcpu(vcpu, &ventry, &vexit);
113 if (kind == VEK_REENTR) {
114 continue;
115 } else if (kind != VEK_UNHANDLED) {
116 test_fail_vmexit(&vexit);
117 }
118
119 uint32_t v;
120 if (vexit_match_inout(&vexit, false, IOP_TEST_VALUE, 2, &v)) {
121 readings[nread].when = gethrtime();
122 readings[nread].value = v;
123
124 ventry_fulfill_inout(&vexit, &ventry, 0);
125
126 nread++;
127 if (nread != 2) {
128 continue;
129 }
130
131 if (check_reading(readings[0], readings[1],
132 margin_ticks, margin_ppm)) {
133 test_pass();
134 } else {
135 nrepeat++;
136 if (nrepeat < 3) {
137 nread = 0;
138 (void) printf("retry %u\n", nrepeat);
139 continue;
140 }
141 test_fail_msg("bad result after %u retries\n",
142 nrepeat);
143 }
144 } else {
145 test_fail_vmexit(&vexit);
146 }
147
148 } while (true);
149
150 return (0);
151 }
152