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