1*a1e26a70SApple OSS Distributions /*
2*a1e26a70SApple OSS Distributions * Copyright (c) 2024 Apple Inc. All rights reserved.
3*a1e26a70SApple OSS Distributions *
4*a1e26a70SApple OSS Distributions * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
5*a1e26a70SApple OSS Distributions *
6*a1e26a70SApple OSS Distributions * This file contains Original Code and/or Modifications of Original Code
7*a1e26a70SApple OSS Distributions * as defined in and that are subject to the Apple Public Source License
8*a1e26a70SApple OSS Distributions * Version 2.0 (the 'License'). You may not use this file except in
9*a1e26a70SApple OSS Distributions * compliance with the License. The rights granted to you under the License
10*a1e26a70SApple OSS Distributions * may not be used to create, or enable the creation or redistribution of,
11*a1e26a70SApple OSS Distributions * unlawful or unlicensed copies of an Apple operating system, or to
12*a1e26a70SApple OSS Distributions * circumvent, violate, or enable the circumvention or violation of, any
13*a1e26a70SApple OSS Distributions * terms of an Apple operating system software license agreement.
14*a1e26a70SApple OSS Distributions *
15*a1e26a70SApple OSS Distributions * Please obtain a copy of the License at
16*a1e26a70SApple OSS Distributions * http://www.opensource.apple.com/apsl/ and read it before using this file.
17*a1e26a70SApple OSS Distributions *
18*a1e26a70SApple OSS Distributions * The Original Code and all software distributed under the License are
19*a1e26a70SApple OSS Distributions * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
20*a1e26a70SApple OSS Distributions * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
21*a1e26a70SApple OSS Distributions * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
22*a1e26a70SApple OSS Distributions * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
23*a1e26a70SApple OSS Distributions * Please see the License for the specific language governing rights and
24*a1e26a70SApple OSS Distributions * limitations under the License.
25*a1e26a70SApple OSS Distributions *
26*a1e26a70SApple OSS Distributions * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
27*a1e26a70SApple OSS Distributions */
28*a1e26a70SApple OSS Distributions
29*a1e26a70SApple OSS Distributions #include <mach/coalition.h>
30*a1e26a70SApple OSS Distributions #include <sys/coalition.h>
31*a1e26a70SApple OSS Distributions #include <libproc.h>
32*a1e26a70SApple OSS Distributions
33*a1e26a70SApple OSS Distributions #include <sys/types.h>
34*a1e26a70SApple OSS Distributions #include <unistd.h>
35*a1e26a70SApple OSS Distributions
36*a1e26a70SApple OSS Distributions #include <darwintest.h>
37*a1e26a70SApple OSS Distributions #include <darwintest_utils.h>
38*a1e26a70SApple OSS Distributions #include <mach/task.h>
39*a1e26a70SApple OSS Distributions #include <mach/mach.h>
40*a1e26a70SApple OSS Distributions
41*a1e26a70SApple OSS Distributions T_GLOBAL_META(T_META_NAMESPACE("xnu.scheduler"),
42*a1e26a70SApple OSS Distributions T_META_RADAR_COMPONENT_NAME("xnu"),
43*a1e26a70SApple OSS Distributions T_META_RADAR_COMPONENT_VERSION("scheduler"),
44*a1e26a70SApple OSS Distributions T_META_OWNER("chimene"),
45*a1e26a70SApple OSS Distributions T_META_RUN_CONCURRENTLY(false));
46*a1e26a70SApple OSS Distributions
47*a1e26a70SApple OSS Distributions static uint64_t
get_res_id(void)48*a1e26a70SApple OSS Distributions get_res_id(void)
49*a1e26a70SApple OSS Distributions {
50*a1e26a70SApple OSS Distributions struct proc_pidcoalitioninfo idinfo;
51*a1e26a70SApple OSS Distributions
52*a1e26a70SApple OSS Distributions int ret = proc_pidinfo(getpid(), PROC_PIDCOALITIONINFO, 0,
53*a1e26a70SApple OSS Distributions &idinfo, sizeof(idinfo));
54*a1e26a70SApple OSS Distributions T_QUIET; T_ASSERT_POSIX_SUCCESS(ret, "proc_pidinfo(... PROC_PIDCOALITIONINFO ...)");
55*a1e26a70SApple OSS Distributions
56*a1e26a70SApple OSS Distributions uint64_t res_id = idinfo.coalition_id[COALITION_TYPE_RESOURCE];
57*a1e26a70SApple OSS Distributions uint64_t jet_id = idinfo.coalition_id[COALITION_TYPE_JETSAM];
58*a1e26a70SApple OSS Distributions
59*a1e26a70SApple OSS Distributions T_LOG("Resource coalition: %lld, Jetsam coalition: %lld", res_id, jet_id);
60*a1e26a70SApple OSS Distributions
61*a1e26a70SApple OSS Distributions return res_id;
62*a1e26a70SApple OSS Distributions }
63*a1e26a70SApple OSS Distributions
64*a1e26a70SApple OSS Distributions static uint64_t
get_energy_id(void)65*a1e26a70SApple OSS Distributions get_energy_id(void)
66*a1e26a70SApple OSS Distributions {
67*a1e26a70SApple OSS Distributions int ret;
68*a1e26a70SApple OSS Distributions uint64_t out_val = 0;
69*a1e26a70SApple OSS Distributions size_t out_size = sizeof(out_val);
70*a1e26a70SApple OSS Distributions
71*a1e26a70SApple OSS Distributions uint64_t param[4] = {
72*a1e26a70SApple OSS Distributions 1,
73*a1e26a70SApple OSS Distributions };
74*a1e26a70SApple OSS Distributions
75*a1e26a70SApple OSS Distributions ret = sysctlbyname("kern.coalition_gpu_energy_test",
76*a1e26a70SApple OSS Distributions &out_val, &out_size, param, sizeof(param));
77*a1e26a70SApple OSS Distributions
78*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "get_energy_id() = %lld", out_val);
79*a1e26a70SApple OSS Distributions
80*a1e26a70SApple OSS Distributions return out_val;
81*a1e26a70SApple OSS Distributions }
82*a1e26a70SApple OSS Distributions
83*a1e26a70SApple OSS Distributions static int
test_task_id_token_to_energy_id(mach_port_name_t name,uint64_t * energy_id_out)84*a1e26a70SApple OSS Distributions test_task_id_token_to_energy_id(mach_port_name_t name, uint64_t *energy_id_out)
85*a1e26a70SApple OSS Distributions {
86*a1e26a70SApple OSS Distributions int ret;
87*a1e26a70SApple OSS Distributions uint64_t out_val = 0;
88*a1e26a70SApple OSS Distributions size_t out_size = sizeof(out_val);
89*a1e26a70SApple OSS Distributions
90*a1e26a70SApple OSS Distributions uint64_t param[4] = {
91*a1e26a70SApple OSS Distributions 2,
92*a1e26a70SApple OSS Distributions name,
93*a1e26a70SApple OSS Distributions };
94*a1e26a70SApple OSS Distributions
95*a1e26a70SApple OSS Distributions ret = sysctlbyname("kern.coalition_gpu_energy_test",
96*a1e26a70SApple OSS Distributions &out_val, &out_size, param, sizeof(param));
97*a1e26a70SApple OSS Distributions
98*a1e26a70SApple OSS Distributions *energy_id_out = out_val;
99*a1e26a70SApple OSS Distributions
100*a1e26a70SApple OSS Distributions return ret;
101*a1e26a70SApple OSS Distributions }
102*a1e26a70SApple OSS Distributions
103*a1e26a70SApple OSS Distributions static int
test_energy_id_report_energy(uint64_t self_id,uint64_t on_behalf_of_id,uint64_t energy)104*a1e26a70SApple OSS Distributions test_energy_id_report_energy(uint64_t self_id, uint64_t on_behalf_of_id, uint64_t energy)
105*a1e26a70SApple OSS Distributions {
106*a1e26a70SApple OSS Distributions uint64_t out_val = 0;
107*a1e26a70SApple OSS Distributions size_t out_size = sizeof(out_val);
108*a1e26a70SApple OSS Distributions
109*a1e26a70SApple OSS Distributions uint64_t param[4] = {
110*a1e26a70SApple OSS Distributions 3,
111*a1e26a70SApple OSS Distributions self_id,
112*a1e26a70SApple OSS Distributions on_behalf_of_id,
113*a1e26a70SApple OSS Distributions energy,
114*a1e26a70SApple OSS Distributions };
115*a1e26a70SApple OSS Distributions
116*a1e26a70SApple OSS Distributions return sysctlbyname("kern.coalition_gpu_energy_test",
117*a1e26a70SApple OSS Distributions &out_val, &out_size, param, sizeof(param));
118*a1e26a70SApple OSS Distributions }
119*a1e26a70SApple OSS Distributions
120*a1e26a70SApple OSS Distributions
121*a1e26a70SApple OSS Distributions T_DECL(current_energy_id, "current_energy_id returns res id")
122*a1e26a70SApple OSS Distributions {
123*a1e26a70SApple OSS Distributions uint64_t res_id = get_res_id();
124*a1e26a70SApple OSS Distributions uint64_t energy_id = get_energy_id();
125*a1e26a70SApple OSS Distributions
126*a1e26a70SApple OSS Distributions T_ASSERT_EQ(energy_id, res_id, "energy id is res id");
127*a1e26a70SApple OSS Distributions }
128*a1e26a70SApple OSS Distributions
129*a1e26a70SApple OSS Distributions
130*a1e26a70SApple OSS Distributions T_DECL(task_id_token_to_energy_id, "task_id_token_to_energy_id looks up energy id")
131*a1e26a70SApple OSS Distributions {
132*a1e26a70SApple OSS Distributions uint64_t energy_id = get_energy_id();
133*a1e26a70SApple OSS Distributions
134*a1e26a70SApple OSS Distributions uint64_t energy_id_out = 0;
135*a1e26a70SApple OSS Distributions
136*a1e26a70SApple OSS Distributions task_id_token_t token;
137*a1e26a70SApple OSS Distributions
138*a1e26a70SApple OSS Distributions kern_return_t kr = task_create_identity_token(mach_task_self(), &token);
139*a1e26a70SApple OSS Distributions T_ASSERT_MACH_SUCCESS(kr, "task_create_identity_token() = 0x%x", token);
140*a1e26a70SApple OSS Distributions
141*a1e26a70SApple OSS Distributions int ret = test_task_id_token_to_energy_id(token, &energy_id_out);
142*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "task_id_token_to_energy_id(0x%x) = %lld", token, energy_id_out);
143*a1e26a70SApple OSS Distributions
144*a1e26a70SApple OSS Distributions T_EXPECT_EQ(energy_id_out, energy_id, "token energy id is self energy id");
145*a1e26a70SApple OSS Distributions
146*a1e26a70SApple OSS Distributions kr = mach_port_deallocate(mach_task_self(), token);
147*a1e26a70SApple OSS Distributions T_ASSERT_MACH_SUCCESS(kr, "mach_port_deallocate(0x%x)", token);
148*a1e26a70SApple OSS Distributions }
149*a1e26a70SApple OSS Distributions
150*a1e26a70SApple OSS Distributions
151*a1e26a70SApple OSS Distributions T_DECL(energy_id_report_energy_time_bad_value, "energy_id_report_energy_time handles bad value")
152*a1e26a70SApple OSS Distributions {
153*a1e26a70SApple OSS Distributions int ret = test_energy_id_report_energy((uint64_t)-1, 0, 1);
154*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_FAILURE(ret, ENOENT, "energy_id_report_energy(-1) = ENOENT");
155*a1e26a70SApple OSS Distributions
156*a1e26a70SApple OSS Distributions ret = test_energy_id_report_energy(0, 0, 1);
157*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_FAILURE(ret, EINVAL, "energy_id_report_energy(0) = EINVAL");
158*a1e26a70SApple OSS Distributions
159*a1e26a70SApple OSS Distributions uint64_t res_id = get_res_id();
160*a1e26a70SApple OSS Distributions
161*a1e26a70SApple OSS Distributions /* It ignores bad on_behalf_of_ids */
162*a1e26a70SApple OSS Distributions ret = test_energy_id_report_energy(res_id, (uint64_t)-1, 1);
163*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "energy_id_report_energy(%lld, -1)", res_id);
164*a1e26a70SApple OSS Distributions }
165*a1e26a70SApple OSS Distributions
166*a1e26a70SApple OSS Distributions
167*a1e26a70SApple OSS Distributions T_DECL(energy_id_report_energy_time_self, "energy_id_report_energy_time increments gpu energy for self")
168*a1e26a70SApple OSS Distributions {
169*a1e26a70SApple OSS Distributions uint64_t res_id = get_res_id();
170*a1e26a70SApple OSS Distributions uint64_t energy_id = get_energy_id();
171*a1e26a70SApple OSS Distributions
172*a1e26a70SApple OSS Distributions struct coalition_resource_usage coalusage_1 = {0};
173*a1e26a70SApple OSS Distributions int ret = coalition_info_resource_usage(res_id, &coalusage_1, sizeof(coalusage_1));
174*a1e26a70SApple OSS Distributions T_QUIET; T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage() 1");
175*a1e26a70SApple OSS Distributions
176*a1e26a70SApple OSS Distributions T_LOG("before: gpu_energy_nj: %lld, gpu_energy_nj_billed_to_me: %lld, gpu_energy_nj_billed_to_others: %lld",
177*a1e26a70SApple OSS Distributions coalusage_1.gpu_energy_nj, coalusage_1.gpu_energy_nj_billed_to_me,
178*a1e26a70SApple OSS Distributions coalusage_1.gpu_energy_nj_billed_to_others);
179*a1e26a70SApple OSS Distributions
180*a1e26a70SApple OSS Distributions ret = test_energy_id_report_energy(energy_id, 0, 1);
181*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "energy_id_report_energy(%lld, 0, 1)", energy_id);
182*a1e26a70SApple OSS Distributions
183*a1e26a70SApple OSS Distributions struct coalition_resource_usage coalusage_2 = {0};
184*a1e26a70SApple OSS Distributions ret = coalition_info_resource_usage(res_id, &coalusage_2, sizeof(coalusage_2));
185*a1e26a70SApple OSS Distributions T_QUIET; T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage() 2");
186*a1e26a70SApple OSS Distributions
187*a1e26a70SApple OSS Distributions T_LOG("after: gpu_energy_nj: %lld, gpu_energy_nj_billed_to_me: %lld, gpu_energy_nj_billed_to_others: %lld",
188*a1e26a70SApple OSS Distributions coalusage_2.gpu_energy_nj, coalusage_2.gpu_energy_nj_billed_to_me,
189*a1e26a70SApple OSS Distributions coalusage_2.gpu_energy_nj_billed_to_others);
190*a1e26a70SApple OSS Distributions
191*a1e26a70SApple OSS Distributions T_EXPECT_LT(coalusage_1.gpu_energy_nj, coalusage_2.gpu_energy_nj,
192*a1e26a70SApple OSS Distributions "gpu_energy_nj should have increased");
193*a1e26a70SApple OSS Distributions }
194*a1e26a70SApple OSS Distributions
195*a1e26a70SApple OSS Distributions
196*a1e26a70SApple OSS Distributions T_DECL(energy_id_report_energy_time_billed, "energy_id_report_energy_time increments billed energy")
197*a1e26a70SApple OSS Distributions {
198*a1e26a70SApple OSS Distributions uint64_t res_id = get_res_id();
199*a1e26a70SApple OSS Distributions uint64_t energy_id = get_energy_id();
200*a1e26a70SApple OSS Distributions
201*a1e26a70SApple OSS Distributions struct coalition_resource_usage coalusage_1 = {0};
202*a1e26a70SApple OSS Distributions int ret = coalition_info_resource_usage(res_id, &coalusage_1, sizeof(coalusage_1));
203*a1e26a70SApple OSS Distributions T_QUIET; T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage() 1");
204*a1e26a70SApple OSS Distributions
205*a1e26a70SApple OSS Distributions T_LOG("before: gpu_energy_nj: %lld, gpu_energy_nj_billed_to_me: %lld, gpu_energy_nj_billed_to_others: %lld",
206*a1e26a70SApple OSS Distributions coalusage_1.gpu_energy_nj, coalusage_1.gpu_energy_nj_billed_to_me,
207*a1e26a70SApple OSS Distributions coalusage_1.gpu_energy_nj_billed_to_others);
208*a1e26a70SApple OSS Distributions
209*a1e26a70SApple OSS Distributions ret = test_energy_id_report_energy(energy_id, energy_id, 1);
210*a1e26a70SApple OSS Distributions T_ASSERT_POSIX_SUCCESS(ret, "energy_id_report_energy(%lld, %lld, 1)", energy_id, energy_id);
211*a1e26a70SApple OSS Distributions
212*a1e26a70SApple OSS Distributions struct coalition_resource_usage coalusage_2 = {0};
213*a1e26a70SApple OSS Distributions ret = coalition_info_resource_usage(res_id, &coalusage_2, sizeof(coalusage_2));
214*a1e26a70SApple OSS Distributions T_QUIET; T_ASSERT_POSIX_SUCCESS(ret, "coalition_info_resource_usage() 2");
215*a1e26a70SApple OSS Distributions
216*a1e26a70SApple OSS Distributions T_LOG("after: gpu_energy_nj: %lld, gpu_energy_nj_billed_to_me: %lld, gpu_energy_nj_billed_to_others: %lld",
217*a1e26a70SApple OSS Distributions coalusage_2.gpu_energy_nj, coalusage_2.gpu_energy_nj_billed_to_me,
218*a1e26a70SApple OSS Distributions coalusage_2.gpu_energy_nj_billed_to_others);
219*a1e26a70SApple OSS Distributions
220*a1e26a70SApple OSS Distributions T_EXPECT_LT(coalusage_1.gpu_energy_nj, coalusage_2.gpu_energy_nj,
221*a1e26a70SApple OSS Distributions "gpu_energy_nj should have increased");
222*a1e26a70SApple OSS Distributions T_EXPECT_LT(coalusage_1.gpu_energy_nj_billed_to_me, coalusage_2.gpu_energy_nj_billed_to_me,
223*a1e26a70SApple OSS Distributions "gpu_energy_nj_billed_to_me should have increased");
224*a1e26a70SApple OSS Distributions T_EXPECT_LT(coalusage_1.gpu_energy_nj_billed_to_others, coalusage_2.gpu_energy_nj_billed_to_others,
225*a1e26a70SApple OSS Distributions "gpu_energy_nj_billed_to_others should have increased");
226*a1e26a70SApple OSS Distributions }
227