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 uint32_t value; 37 } reading_t; 38 39 static bool 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 uint32_t tick_delta; 45 46 if (after.value < before.value) { 47 /* handle rollover */ 48 tick_delta = (UINT32_MAX - before.value) + after.value; 49 } else { 50 tick_delta = after.value - before.value; 51 } 52 53 /* is the number of ticks OK? */ 54 if (tick_delta < HPET_TARGET_TICKS) { 55 test_fail_msg("inadequate passage of ticks %u < %u\n", 56 tick_delta, HPET_TARGET_TICKS); 57 } else if ((tick_delta - HPET_TARGET_TICKS) > tick_margin) { 58 (void) printf("%u ticks outside margin %u\n", tick_delta, 59 HPET_TARGET_TICKS + tick_margin); 60 return (false); 61 } 62 63 hrtime_t time_target = (tick_delta * NANOSEC) / HPET_FREQ; 64 65 hrtime_t offset; 66 if (time_delta < time_target) { 67 offset = time_target - time_delta; 68 } else { 69 offset = time_delta - time_target; 70 } 71 uint64_t ppm = (offset * 1000000) / time_target; 72 (void) printf("margin limits: ticks=%u ppm=%lu\n", 73 tick_margin, ppm_margin); 74 (void) printf("%u ticks in %lu ns (error %lu ppm)\n", 75 tick_delta, time_delta, ppm); 76 if (ppm > ppm_margin) { 77 (void) printf("UNACCEPTABLE!\n"); 78 return (false); 79 } 80 return (true); 81 } 82 83 int 84 main(int argc, char *argv[]) 85 { 86 const char *test_suite_name = basename(argv[0]); 87 struct vmctx *ctx = NULL; 88 struct vcpu *vcpu; 89 int err; 90 91 ctx = test_initialize(test_suite_name); 92 93 if ((vcpu = vm_vcpu_open(ctx, 0)) == NULL) { 94 test_fail_errno(errno, "Could not open vcpu0"); 95 } 96 97 err = test_setup_vcpu(vcpu, MEM_LOC_PAYLOAD, MEM_LOC_STACK); 98 if (err != 0) { 99 test_fail_errno(err, "Could not initialize vcpu0"); 100 } 101 102 struct vm_entry ventry = { 0 }; 103 struct vm_exit vexit = { 0 }; 104 reading_t readings[2]; 105 uint_t nread = 0; 106 uint_t nrepeat = 0; 107 108 const uint_t margin_ticks = MAX(1, HPET_TARGET_TICKS / 10000); 109 const uint_t margin_ppm = 400; 110 111 do { 112 const enum vm_exit_kind kind = 113 test_run_vcpu(vcpu, &ventry, &vexit); 114 if (kind == VEK_REENTR) { 115 continue; 116 } else if (kind != VEK_UNHANDLED) { 117 test_fail_vmexit(&vexit); 118 } 119 120 uint32_t v; 121 if (vexit_match_inout(&vexit, false, IOP_TEST_VALUE, 4, &v)) { 122 readings[nread].when = gethrtime(); 123 readings[nread].value = v; 124 125 ventry_fulfill_inout(&vexit, &ventry, 0); 126 127 nread++; 128 if (nread != 2) { 129 continue; 130 } 131 132 if (check_reading(readings[0], readings[1], 133 margin_ticks, margin_ppm)) { 134 test_pass(); 135 } else { 136 nrepeat++; 137 if (nrepeat < 3) { 138 nread = 0; 139 (void) printf("retry %u\n", nrepeat); 140 continue; 141 } 142 test_fail_msg("bad result after %u retries\n", 143 nrepeat); 144 } 145 } else { 146 test_fail_vmexit(&vexit); 147 } 148 149 } while (true); 150 151 return (0); 152 } 153