xref: /xnu-8796.101.5/tests/entropy.c (revision aca3beaa3dfbd42498b42c5e5ce20a938e6554e5)
1*aca3beaaSApple OSS Distributions #include <stdlib.h>
2*aca3beaaSApple OSS Distributions #include <sys/sysctl.h>
3*aca3beaaSApple OSS Distributions #include <darwintest.h>
4*aca3beaaSApple OSS Distributions #include <perfdata/perfdata.h>
5*aca3beaaSApple OSS Distributions 
6*aca3beaaSApple OSS Distributions typedef uint32_t entropy_sample_t;
7*aca3beaaSApple OSS Distributions 
8*aca3beaaSApple OSS Distributions T_GLOBAL_META(T_META_NAMESPACE("xnu.crypto"),
9*aca3beaaSApple OSS Distributions     T_META_RADAR_COMPONENT_NAME("xnu"),
10*aca3beaaSApple OSS Distributions     T_META_RADAR_COMPONENT_VERSION("crypto"));
11*aca3beaaSApple OSS Distributions 
12*aca3beaaSApple OSS Distributions T_DECL(entropy_collect, "Collect entropy for offline analysis",
13*aca3beaaSApple OSS Distributions     T_META_REQUIRES_SYSCTL_EQ("kern.development", 1),
14*aca3beaaSApple OSS Distributions     T_META_BOOTARGS_SET("entropy-analysis-sample-count=1000"))
15*aca3beaaSApple OSS Distributions {
16*aca3beaaSApple OSS Distributions 	int ret;
17*aca3beaaSApple OSS Distributions 	uint32_t entropy_size = 0;
18*aca3beaaSApple OSS Distributions 	size_t size = sizeof(entropy_size);
19*aca3beaaSApple OSS Distributions 
20*aca3beaaSApple OSS Distributions 	ret = sysctlbyname("kern.entropy.analysis.buffer_size", &entropy_size, &size, NULL, 0);
21*aca3beaaSApple OSS Distributions 	T_ASSERT_POSIX_SUCCESS(ret, "sysctlbyname kern.entropy.analysis.buffer_size");
22*aca3beaaSApple OSS Distributions 
23*aca3beaaSApple OSS Distributions 	uint32_t entropy_count = entropy_size / sizeof(entropy_sample_t);
24*aca3beaaSApple OSS Distributions 	entropy_sample_t *entropy = calloc(entropy_count, sizeof(entropy_sample_t));
25*aca3beaaSApple OSS Distributions 	size = entropy_size;
26*aca3beaaSApple OSS Distributions 
27*aca3beaaSApple OSS Distributions 	ret = sysctlbyname("kern.entropy.analysis.buffer", entropy, &size, NULL, 0);
28*aca3beaaSApple OSS Distributions 	T_ASSERT_POSIX_SUCCESS(ret, "sysctlbyname kern.entropy.analysis.buffer");
29*aca3beaaSApple OSS Distributions 
30*aca3beaaSApple OSS Distributions 	// This test is not an entropy assessment. We're just checking to
31*aca3beaaSApple OSS Distributions 	// make sure the machinery of the entropy collection sysctl seems
32*aca3beaaSApple OSS Distributions 	// to be working.
33*aca3beaaSApple OSS Distributions 	for (uint32_t i = 0; i < entropy_count; i += 1) {
34*aca3beaaSApple OSS Distributions 		T_QUIET; T_EXPECT_NE(entropy[i], 0, "entropy buffer null sample %u", i);
35*aca3beaaSApple OSS Distributions 	}
36*aca3beaaSApple OSS Distributions 
37*aca3beaaSApple OSS Distributions 	free(entropy);
38*aca3beaaSApple OSS Distributions }
39*aca3beaaSApple OSS Distributions 
40*aca3beaaSApple OSS Distributions T_DECL(entropy_filter_rate, "Sample entropy filter rate")
41*aca3beaaSApple OSS Distributions {
42*aca3beaaSApple OSS Distributions 	int ret;
43*aca3beaaSApple OSS Distributions 	uint64_t total_sample_count = 0;
44*aca3beaaSApple OSS Distributions 	uint64_t rejected_sample_count = 0;
45*aca3beaaSApple OSS Distributions 	size_t size = sizeof(total_sample_count);
46*aca3beaaSApple OSS Distributions 
47*aca3beaaSApple OSS Distributions 	ret = sysctlbyname("kern.entropy.filter.total_sample_count", &total_sample_count, &size, NULL, 0);
48*aca3beaaSApple OSS Distributions 	T_ASSERT_POSIX_SUCCESS(ret, "kern.entropy.filter.total_sample_count");
49*aca3beaaSApple OSS Distributions 
50*aca3beaaSApple OSS Distributions 	size = sizeof(rejected_sample_count);
51*aca3beaaSApple OSS Distributions 	ret = sysctlbyname("kern.entropy.filter.rejected_sample_count", &rejected_sample_count, &size, NULL, 0);
52*aca3beaaSApple OSS Distributions 	T_ASSERT_POSIX_SUCCESS(ret, "kern.entropy.filter.rejected_sample_count");
53*aca3beaaSApple OSS Distributions 
54*aca3beaaSApple OSS Distributions 	double rejection_rate = (double) rejected_sample_count / (double) total_sample_count;
55*aca3beaaSApple OSS Distributions 
56*aca3beaaSApple OSS Distributions 	pdwriter_t writer = pdwriter_open_tmp("xnu", "entropy_filter_rate", 0, 0, NULL, 0);
57*aca3beaaSApple OSS Distributions 	T_ASSERT_NOTNULL(writer, "pdwriter_open_tmp");
58*aca3beaaSApple OSS Distributions 
59*aca3beaaSApple OSS Distributions 	pdwriter_new_value(writer, "Rejection Rate", PDUNIT_CUSTOM(rejectrate), rejection_rate);
60*aca3beaaSApple OSS Distributions 
61*aca3beaaSApple OSS Distributions 	pdwriter_close(writer);
62*aca3beaaSApple OSS Distributions }
63