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