1*e7776783SApple OSS Distributions #include <darwintest.h>
2*e7776783SApple OSS Distributions #include <inttypes.h>
3*e7776783SApple OSS Distributions #include <mach/coalition.h>
4*e7776783SApple OSS Distributions #include <stdint.h>
5*e7776783SApple OSS Distributions #include <sys/coalition.h>
6*e7776783SApple OSS Distributions #include <sys/sysctl.h>
7*e7776783SApple OSS Distributions #include <libproc.h>
8*e7776783SApple OSS Distributions #include <unistd.h>
9*e7776783SApple OSS Distributions
10*e7776783SApple OSS Distributions T_GLOBAL_META(T_META_NAMESPACE("xnu.RM"),
11*e7776783SApple OSS Distributions T_META_RUN_CONCURRENTLY(true),
12*e7776783SApple OSS Distributions T_META_ASROOT(true),
13*e7776783SApple OSS Distributions T_META_CHECK_LEAKS(false),
14*e7776783SApple OSS Distributions T_META_RADAR_COMPONENT_NAME("xnu"),
15*e7776783SApple OSS Distributions T_META_RADAR_COMPONENT_VERSION("RM"),
16*e7776783SApple OSS Distributions T_META_OWNER("mwidmann"));
17*e7776783SApple OSS Distributions
18*e7776783SApple OSS Distributions static void
skip_if_monotonic_unsupported(void)19*e7776783SApple OSS Distributions skip_if_monotonic_unsupported(void)
20*e7776783SApple OSS Distributions {
21*e7776783SApple OSS Distributions int r;
22*e7776783SApple OSS Distributions int supported = 0;
23*e7776783SApple OSS Distributions size_t supported_size = sizeof(supported);
24*e7776783SApple OSS Distributions
25*e7776783SApple OSS Distributions r = sysctlbyname("kern.monotonic.supported", &supported, &supported_size,
26*e7776783SApple OSS Distributions NULL, 0);
27*e7776783SApple OSS Distributions if (r < 0) {
28*e7776783SApple OSS Distributions T_WITH_ERRNO;
29*e7776783SApple OSS Distributions T_SKIP("could not find \"kern.monotonic.supported\" sysctl");
30*e7776783SApple OSS Distributions }
31*e7776783SApple OSS Distributions
32*e7776783SApple OSS Distributions if (!supported) {
33*e7776783SApple OSS Distributions T_SKIP("monotonic is not supported on this platform");
34*e7776783SApple OSS Distributions }
35*e7776783SApple OSS Distributions }
36*e7776783SApple OSS Distributions
37*e7776783SApple OSS Distributions T_DECL(coalition_resource_info_counters,
38*e7776783SApple OSS Distributions "ensure that coalition resource info produces valid counter data")
39*e7776783SApple OSS Distributions {
40*e7776783SApple OSS Distributions skip_if_monotonic_unsupported();
41*e7776783SApple OSS Distributions
42*e7776783SApple OSS Distributions T_SETUPBEGIN;
43*e7776783SApple OSS Distributions
44*e7776783SApple OSS Distributions struct proc_pidcoalitioninfo idinfo = {};
45*e7776783SApple OSS Distributions int ret = proc_pidinfo(getpid(), PROC_PIDCOALITIONINFO, 0,
46*e7776783SApple OSS Distributions &idinfo, sizeof(idinfo));
47*e7776783SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "proc_pidinfo(... PROC_PIDCOALITIONINFO ...)");
48*e7776783SApple OSS Distributions
49*e7776783SApple OSS Distributions uint64_t resid = idinfo.coalition_id[COALITION_TYPE_RESOURCE];
50*e7776783SApple OSS Distributions
51*e7776783SApple OSS Distributions struct coalition_resource_usage coalusage[2] = {};
52*e7776783SApple OSS Distributions ret = coalition_info_resource_usage(resid, &coalusage[0],
53*e7776783SApple OSS Distributions sizeof(coalusage[0]));
54*e7776783SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage()");
55*e7776783SApple OSS Distributions
56*e7776783SApple OSS Distributions T_SETUPEND;
57*e7776783SApple OSS Distributions
58*e7776783SApple OSS Distributions T_EXPECT_GT(coalusage[0].cpu_instructions, UINT64_C(0),
59*e7776783SApple OSS Distributions "instruction count is non-zero");
60*e7776783SApple OSS Distributions T_EXPECT_GT(coalusage[0].cpu_cycles, UINT64_C(0),
61*e7776783SApple OSS Distributions "cycle count is non-zero");
62*e7776783SApple OSS Distributions
63*e7776783SApple OSS Distributions sleep(1);
64*e7776783SApple OSS Distributions
65*e7776783SApple OSS Distributions T_SETUPBEGIN;
66*e7776783SApple OSS Distributions ret = coalition_info_resource_usage(resid, &coalusage[1],
67*e7776783SApple OSS Distributions sizeof(coalusage[1]));
68*e7776783SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage()");
69*e7776783SApple OSS Distributions T_SETUPEND;
70*e7776783SApple OSS Distributions
71*e7776783SApple OSS Distributions T_EXPECT_GE(coalusage[1].cpu_instructions, coalusage[0].cpu_instructions,
72*e7776783SApple OSS Distributions "instruction count is monotonically increasing (+%" PRIu64 ")",
73*e7776783SApple OSS Distributions coalusage[1].cpu_instructions - coalusage[0].cpu_instructions);
74*e7776783SApple OSS Distributions T_EXPECT_GE(coalusage[1].cpu_cycles, coalusage[0].cpu_cycles,
75*e7776783SApple OSS Distributions "cycle count is monotonically increasing (+%" PRIu64 ")",
76*e7776783SApple OSS Distributions coalusage[1].cpu_cycles - coalusage[0].cpu_cycles);
77*e7776783SApple OSS Distributions }
78*e7776783SApple OSS Distributions
79*e7776783SApple OSS Distributions T_DECL(coalition_resource_info_kernel_ptime_sane,
80*e7776783SApple OSS Distributions "ensure that coalition resource info for the kernel has a sane P-CPU time")
81*e7776783SApple OSS Distributions {
82*e7776783SApple OSS Distributions T_SETUPBEGIN;
83*e7776783SApple OSS Distributions struct proc_pidcoalitioninfo idinfo = {};
84*e7776783SApple OSS Distributions int ret = proc_pidinfo(0, PROC_PIDCOALITIONINFO, 0, &idinfo,
85*e7776783SApple OSS Distributions sizeof(idinfo));
86*e7776783SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "proc_pidinfo(... PROC_PIDCOALITIONINFO ...)");
87*e7776783SApple OSS Distributions
88*e7776783SApple OSS Distributions uint64_t resid = idinfo.coalition_id[COALITION_TYPE_RESOURCE];
89*e7776783SApple OSS Distributions
90*e7776783SApple OSS Distributions struct coalition_resource_usage coalusage = {};
91*e7776783SApple OSS Distributions ret = coalition_info_resource_usage(resid, &coalusage,
92*e7776783SApple OSS Distributions sizeof(coalusage));
93*e7776783SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage()");
94*e7776783SApple OSS Distributions T_SETUPEND;
95*e7776783SApple OSS Distributions
96*e7776783SApple OSS Distributions T_EXPECT_GT(coalusage.cpu_time, UINT64_C(0), "CPU time is non-zero");
97*e7776783SApple OSS Distributions T_EXPECT_GT(coalusage.cpu_time, coalusage.cpu_ptime,
98*e7776783SApple OSS Distributions "P-CPU time is <= CPU time");
99*e7776783SApple OSS Distributions }
100