cprng_fast.c revision 1.20 1 /* $NetBSD: cprng_fast.c,v 1.20 2024/10/15 17:34:06 riastradh Exp $ */
2
3 /*-
4 * Copyright (c) 2014 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Taylor R. Campbell.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: cprng_fast.c,v 1.20 2024/10/15 17:34:06 riastradh Exp $");
34
35 #include <sys/types.h>
36 #include <sys/param.h>
37 #include <sys/bitops.h>
38 #include <sys/cprng.h>
39 #include <sys/cpu.h>
40 #include <sys/entropy.h>
41 #include <sys/evcnt.h>
42 #include <sys/intr.h>
43 #include <sys/kmem.h>
44 #include <sys/percpu.h>
45
46 #include <crypto/chacha/chacha.h>
47
48 #define CPRNG_FAST_SEED_BYTES CHACHA_STREAM_KEYBYTES
50
51 struct cprng_fast {
52 /* 128-bit vector unit generates 256 bytes at once */
53 uint8_t buf[256];
54 uint8_t key[CPRNG_FAST_SEED_BYTES];
55 uint8_t nonce[CHACHA_STREAM_NONCEBYTES];
56 unsigned i;
57 struct evcnt *reseed_evcnt;
58 unsigned epoch;
59 };
60
61 static void cprng_fast_init_cpu(void *, void *, struct cpu_info *);
62 static void cprng_fast_schedule_reseed(struct cprng_fast *);
63 static void cprng_fast_intr(void *);
64
65 static void cprng_fast_seed(struct cprng_fast *, const void *);
66 static void cprng_fast_buf(struct cprng_fast *, void *, unsigned);
67
68 static void cprng_fast_buf_short(void *, size_t);
69 static void cprng_fast_buf_long(void *, size_t);
70
71 static percpu_t *cprng_fast_percpu __read_mostly;
72 static void *cprng_fast_softint __read_mostly;
73
74 void
75 cprng_fast_init(void)
76 {
77
78 cprng_fast_percpu = percpu_create(sizeof(struct cprng_fast),
79 cprng_fast_init_cpu, NULL, NULL);
80 cprng_fast_softint = softint_establish(SOFTINT_SERIAL|SOFTINT_MPSAFE,
81 &cprng_fast_intr, NULL);
82 }
83
84 static void
85 cprng_fast_init_cpu(void *p, void *arg __unused, struct cpu_info *ci)
86 {
87 struct cprng_fast *const cprng = p;
88 uint8_t seed[CPRNG_FAST_SEED_BYTES];
89
90 cprng->epoch = entropy_epoch();
91 cprng_strong(kern_cprng, seed, sizeof seed, 0);
92 cprng_fast_seed(cprng, seed);
93 (void)explicit_memset(seed, 0, sizeof seed);
94
95 cprng->reseed_evcnt = kmem_alloc(sizeof(*cprng->reseed_evcnt),
96 KM_SLEEP);
97 evcnt_attach_dynamic(cprng->reseed_evcnt, EVCNT_TYPE_MISC, NULL,
98 ci->ci_cpuname, "cprng_fast reseed");
99 }
100
101 static int
103 cprng_fast_get(struct cprng_fast **cprngp)
104 {
105 struct cprng_fast *cprng;
106 int s;
107
108 *cprngp = cprng = percpu_getref(cprng_fast_percpu);
109 s = splvm();
110
111 if (__predict_false(cprng->epoch != entropy_epoch()))
112 cprng_fast_schedule_reseed(cprng);
113
114 return s;
115 }
116
117 static void
118 cprng_fast_put(struct cprng_fast *cprng, int s)
119 {
120
121 KASSERT((cprng == percpu_getref(cprng_fast_percpu)) &&
122 (percpu_putref(cprng_fast_percpu), true));
123 splx(s);
124 percpu_putref(cprng_fast_percpu);
125 }
126
127 static void
128 cprng_fast_schedule_reseed(struct cprng_fast *cprng __unused)
129 {
130
131 softint_schedule(cprng_fast_softint);
132 }
133
134 static void
135 cprng_fast_intr(void *cookie __unused)
136 {
137 unsigned epoch = entropy_epoch();
138 struct cprng_fast *cprng;
139 uint8_t seed[CPRNG_FAST_SEED_BYTES];
140 int s;
141
142 cprng_strong(kern_cprng, seed, sizeof(seed), 0);
143
144 cprng = percpu_getref(cprng_fast_percpu);
145 s = splvm();
146 cprng_fast_seed(cprng, seed);
147 cprng->epoch = epoch;
148 cprng->reseed_evcnt->ev_count++;
149 splx(s);
150 percpu_putref(cprng_fast_percpu);
151
152 explicit_memset(seed, 0, sizeof(seed));
153 }
154
155 /* CPRNG algorithm */
157
158 static void
159 cprng_fast_seed(struct cprng_fast *cprng, const void *seed)
160 {
161
162 (void)memset(cprng->buf, 0, sizeof cprng->buf);
163 (void)memcpy(cprng->key, seed, sizeof cprng->key);
164 (void)memset(cprng->nonce, 0, sizeof cprng->nonce);
165 cprng->i = sizeof cprng->buf;
166 }
167
168 static void
169 cprng_fast_buf(struct cprng_fast *cprng, void *buf, unsigned len)
170 {
171 uint8_t *p = buf;
172 unsigned n = len, n0;
173
174 KASSERT(cprng->i <= sizeof(cprng->buf));
175 KASSERT(len <= sizeof(cprng->buf));
176
177 n0 = MIN(n, sizeof(cprng->buf) - cprng->i);
178 memcpy(p, &cprng->buf[cprng->i], n0);
179 if ((n -= n0) == 0) {
180 cprng->i += n0;
181 KASSERT(cprng->i <= sizeof(cprng->buf));
182 return;
183 }
184 p += n0;
185 le64enc(cprng->nonce, 1 + le64dec(cprng->nonce));
186 chacha_stream(cprng->buf, sizeof(cprng->buf), 0, cprng->nonce,
187 cprng->key, 8);
188 memcpy(p, cprng->buf, n);
189 cprng->i = n;
190 }
191
192 /* Public API */
194
195 static void
196 cprng_fast_buf_short(void *buf, size_t len)
197 {
198 struct cprng_fast *cprng;
199 int s;
200
201 KASSERT(len <= sizeof(cprng->buf));
202
203 s = cprng_fast_get(&cprng);
204 cprng_fast_buf(cprng, buf, len);
205 cprng_fast_put(cprng, s);
206 }
207
208 static void
209 cprng_fast_buf_long(void *buf, size_t len)
210 {
211 uint8_t seed[CHACHA_STREAM_KEYBYTES];
212 uint8_t nonce[CHACHA_STREAM_NONCEBYTES] = {0};
213
214 CTASSERT(sizeof(seed) <= sizeof(((struct cprng_fast *)0)->buf));
215
216 #if SIZE_MAX >= 0x3fffffffff
217 /* >=256 GB is not reasonable */
218 KASSERT(len <= 0x3fffffffff);
219 #endif
220
221 cprng_fast_buf_short(seed, sizeof seed);
222 chacha_stream(buf, len, 0, nonce, seed, 8);
223
224 (void)explicit_memset(seed, 0, sizeof seed);
225 }
226
227 uint32_t
228 cprng_fast32(void)
229 {
230 uint32_t v;
231
232 cprng_fast_buf_short(&v, sizeof v);
233
234 return v;
235 }
236
237 uint64_t
238 cprng_fast64(void)
239 {
240 uint64_t v;
241
242 cprng_fast_buf_short(&v, sizeof v);
243
244 return v;
245 }
246
247 size_t
248 cprng_fast(void *buf, size_t len)
249 {
250
251 /*
252 * We don't want to hog the CPU, so we use the short version,
253 * to generate output without preemption, only if we can do it
254 * with at most one ChaCha call.
255 */
256 if (len <= sizeof(((struct cprng_fast *)0)->buf))
257 cprng_fast_buf_short(buf, len);
258 else
259 cprng_fast_buf_long(buf, len);
260
261 return len; /* hysterical raisins */
262 }
263