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