]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * Copyright 2019 The OpenSSL Project Authors. All Rights Reserved. | |
3 | * Copyright (c) 2019, Oracle and/or its affiliates. All rights reserved. | |
4 | * | |
5 | * Licensed under the Apache License 2.0 (the "License"). You may not use | |
6 | * this file except in compliance with the License. You can obtain a copy | |
7 | * in the file LICENSE in the source distribution or at | |
8 | * https://www.openssl.org/source/license.html | |
9 | */ | |
10 | ||
11 | #include <string.h> | |
12 | #include <openssl/params.h> | |
13 | #include "internal/thread_once.h" | |
14 | ||
15 | OSSL_PARAM *OSSL_PARAM_locate(OSSL_PARAM *p, const char *key) | |
16 | { | |
17 | if (p != NULL && key != NULL) | |
18 | for (; p->key != NULL; p++) | |
19 | if (strcmp(key, p->key) == 0) | |
20 | return p; | |
21 | return NULL; | |
22 | } | |
23 | ||
24 | const OSSL_PARAM *OSSL_PARAM_locate_const(const OSSL_PARAM *p, const char *key) | |
25 | { | |
26 | return OSSL_PARAM_locate((OSSL_PARAM *)p, key); | |
27 | } | |
28 | ||
29 | static OSSL_PARAM ossl_param_construct(const char *key, unsigned int data_type, | |
30 | void *data, size_t data_size) | |
31 | { | |
32 | OSSL_PARAM res; | |
33 | ||
34 | res.key = key; | |
35 | res.data_type = data_type; | |
36 | res.data = data; | |
37 | res.data_size = data_size; | |
38 | res.return_size = 0; | |
39 | return res; | |
40 | } | |
41 | ||
42 | int OSSL_PARAM_get_int(const OSSL_PARAM *p, int *val) | |
43 | { | |
44 | switch (sizeof(int)) { | |
45 | case sizeof(int32_t): | |
46 | return OSSL_PARAM_get_int32(p, (int32_t *)val); | |
47 | case sizeof(int64_t): | |
48 | return OSSL_PARAM_get_int64(p, (int64_t *)val); | |
49 | } | |
50 | return 0; | |
51 | } | |
52 | ||
53 | int OSSL_PARAM_set_int(OSSL_PARAM *p, int val) | |
54 | { | |
55 | switch (sizeof(int)) { | |
56 | case sizeof(int32_t): | |
57 | return OSSL_PARAM_set_int32(p, (int32_t)val); | |
58 | case sizeof(int64_t): | |
59 | return OSSL_PARAM_set_int64(p, (int64_t)val); | |
60 | } | |
61 | return 0; | |
62 | } | |
63 | ||
64 | OSSL_PARAM OSSL_PARAM_construct_int(const char *key, int *buf) | |
65 | { | |
66 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int)); | |
67 | } | |
68 | ||
69 | int OSSL_PARAM_get_uint(const OSSL_PARAM *p, unsigned int *val) | |
70 | { | |
71 | switch (sizeof(unsigned int)) { | |
72 | case sizeof(uint32_t): | |
73 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); | |
74 | case sizeof(uint64_t): | |
75 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); | |
76 | } | |
77 | return 0; | |
78 | } | |
79 | ||
80 | int OSSL_PARAM_set_uint(OSSL_PARAM *p, unsigned int val) | |
81 | { | |
82 | switch (sizeof(unsigned int)) { | |
83 | case sizeof(uint32_t): | |
84 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); | |
85 | case sizeof(uint64_t): | |
86 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); | |
87 | } | |
88 | return 0; | |
89 | } | |
90 | ||
91 | OSSL_PARAM OSSL_PARAM_construct_uint(const char *key, unsigned int *buf) | |
92 | { | |
93 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
94 | sizeof(unsigned int)); | |
95 | } | |
96 | ||
97 | int OSSL_PARAM_get_long(const OSSL_PARAM *p, long int *val) | |
98 | { | |
99 | switch (sizeof(long int)) { | |
100 | case sizeof(int32_t): | |
101 | return OSSL_PARAM_get_int32(p, (int32_t *)val); | |
102 | case sizeof(int64_t): | |
103 | return OSSL_PARAM_get_int64(p, (int64_t *)val); | |
104 | } | |
105 | return 0; | |
106 | } | |
107 | ||
108 | int OSSL_PARAM_set_long(OSSL_PARAM *p, long int val) | |
109 | { | |
110 | switch (sizeof(long int)) { | |
111 | case sizeof(int32_t): | |
112 | return OSSL_PARAM_set_int32(p, (int32_t)val); | |
113 | case sizeof(int64_t): | |
114 | return OSSL_PARAM_set_int64(p, (int64_t)val); | |
115 | } | |
116 | return 0; | |
117 | } | |
118 | ||
119 | OSSL_PARAM OSSL_PARAM_construct_long(const char *key, long int *buf) | |
120 | { | |
121 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(long int)); | |
122 | } | |
123 | ||
124 | int OSSL_PARAM_get_ulong(const OSSL_PARAM *p, unsigned long int *val) | |
125 | { | |
126 | switch (sizeof(unsigned long int)) { | |
127 | case sizeof(uint32_t): | |
128 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); | |
129 | case sizeof(uint64_t): | |
130 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); | |
131 | } | |
132 | return 0; | |
133 | } | |
134 | ||
135 | int OSSL_PARAM_set_ulong(OSSL_PARAM *p, unsigned long int val) | |
136 | { | |
137 | switch (sizeof(unsigned long int)) { | |
138 | case sizeof(uint32_t): | |
139 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); | |
140 | case sizeof(uint64_t): | |
141 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); | |
142 | } | |
143 | return 0; | |
144 | } | |
145 | ||
146 | OSSL_PARAM OSSL_PARAM_construct_ulong(const char *key, unsigned long int *buf) | |
147 | { | |
148 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
149 | sizeof(unsigned long int)); | |
150 | } | |
151 | ||
152 | int OSSL_PARAM_get_int32(const OSSL_PARAM *p, int32_t *val) | |
153 | { | |
154 | int64_t i64; | |
155 | uint32_t u32; | |
156 | uint64_t u64; | |
157 | double d; | |
158 | ||
159 | if (val == NULL || p == NULL ) | |
160 | return 0; | |
161 | ||
162 | if (p->data_type == OSSL_PARAM_INTEGER) { | |
163 | switch (p->data_size) { | |
164 | case sizeof(int32_t): | |
165 | *val = *(const int32_t *)p->data; | |
166 | return 1; | |
167 | case sizeof(int64_t): | |
168 | i64 = *(const int64_t *)p->data; | |
169 | if (i64 >= INT32_MIN && i64 <= INT32_MAX) { | |
170 | *val = (int32_t)i64; | |
171 | return 1; | |
172 | } | |
173 | break; | |
174 | } | |
175 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
176 | switch (p->data_size) { | |
177 | case sizeof(uint32_t): | |
178 | u32 = *(const uint32_t *)p->data; | |
179 | if (u32 <= INT32_MAX) { | |
180 | *val = (int32_t)u32; | |
181 | return 1; | |
182 | } | |
183 | break; | |
184 | case sizeof(uint64_t): | |
185 | u64 = *(const uint64_t *)p->data; | |
186 | if (u64 <= INT32_MAX) { | |
187 | *val = (int32_t)u64; | |
188 | return 1; | |
189 | } | |
190 | break; | |
191 | } | |
192 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
193 | switch (p->data_size) { | |
194 | case sizeof(double): | |
195 | d = *(const double *)p->data; | |
196 | if (d >= INT32_MIN && d <= INT32_MAX && d == (int32_t)d) { | |
197 | *val = (int32_t)d; | |
198 | return 1; | |
199 | } | |
200 | break; | |
201 | } | |
202 | } | |
203 | return 0; | |
204 | } | |
205 | ||
206 | int OSSL_PARAM_set_int32(OSSL_PARAM *p, int32_t val) | |
207 | { | |
208 | if (p == NULL) | |
209 | return 0; | |
210 | p->return_size = 0; | |
211 | if (p->data_type == OSSL_PARAM_INTEGER) { | |
212 | p->return_size = sizeof(int32_t); /* Minimum expected size */ | |
213 | switch (p->data_size) { | |
214 | case sizeof(int32_t): | |
215 | *(int32_t *)p->data = val; | |
216 | return 1; | |
217 | case sizeof(int64_t): | |
218 | p->return_size = sizeof(int64_t); | |
219 | *(int64_t *)p->data = (int64_t)val; | |
220 | return 1; | |
221 | } | |
222 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) { | |
223 | p->return_size = sizeof(uint32_t); /* Minimum expected size */ | |
224 | switch (p->data_size) { | |
225 | case sizeof(uint32_t): | |
226 | *(uint32_t *)p->data = (uint32_t)val; | |
227 | return 1; | |
228 | case sizeof(uint64_t): | |
229 | p->return_size = sizeof(uint64_t); | |
230 | *(uint64_t *)p->data = (uint64_t)val; | |
231 | return 1; | |
232 | } | |
233 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
234 | p->return_size = sizeof(double); | |
235 | switch (p->data_size) { | |
236 | case sizeof(double): | |
237 | *(double *)p->data = (double)val; | |
238 | return 1; | |
239 | } | |
240 | } | |
241 | return 0; | |
242 | } | |
243 | ||
244 | OSSL_PARAM OSSL_PARAM_construct_int32(const char *key, int32_t *buf) | |
245 | { | |
246 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, | |
247 | sizeof(int32_t)); | |
248 | } | |
249 | ||
250 | int OSSL_PARAM_get_uint32(const OSSL_PARAM *p, uint32_t *val) | |
251 | { | |
252 | int32_t i32; | |
253 | int64_t i64; | |
254 | uint64_t u64; | |
255 | double d; | |
256 | ||
257 | if (val == NULL || p == NULL) | |
258 | return 0; | |
259 | ||
260 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
261 | switch (p->data_size) { | |
262 | case sizeof(uint32_t): | |
263 | *val = *(const uint32_t *)p->data; | |
264 | return 1; | |
265 | case sizeof(uint64_t): | |
266 | u64 = *(const uint64_t *)p->data; | |
267 | if (u64 <= UINT32_MAX) { | |
268 | *val = (uint32_t)u64; | |
269 | return 1; | |
270 | } | |
271 | break; | |
272 | } | |
273 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
274 | switch (p->data_size) { | |
275 | case sizeof(int32_t): | |
276 | i32 = *(const int32_t *)p->data; | |
277 | if (i32 >= 0) { | |
278 | *val = i32; | |
279 | return 1; | |
280 | } | |
281 | break; | |
282 | case sizeof(int64_t): | |
283 | i64 = *(const int64_t *)p->data; | |
284 | if (i64 >= 0 && i64 <= UINT32_MAX) { | |
285 | *val = (uint32_t)i64; | |
286 | return 1; | |
287 | } | |
288 | break; | |
289 | } | |
290 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
291 | switch (p->data_size) { | |
292 | case sizeof(double): | |
293 | d = *(const double *)p->data; | |
294 | if (d >= 0 && d <= UINT32_MAX && d == (uint32_t)d) { | |
295 | *val = (uint32_t)d; | |
296 | return 1; | |
297 | } | |
298 | break; | |
299 | } | |
300 | } | |
301 | return 0; | |
302 | } | |
303 | ||
304 | int OSSL_PARAM_set_uint32(OSSL_PARAM *p, uint32_t val) | |
305 | { | |
306 | if (p == NULL) | |
307 | return 0; | |
308 | p->return_size = 0; | |
309 | ||
310 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
311 | p->return_size = sizeof(uint32_t); /* Minimum expected size */ | |
312 | switch (p->data_size) { | |
313 | case sizeof(uint32_t): | |
314 | *(uint32_t *)p->data = val; | |
315 | return 1; | |
316 | case sizeof(uint64_t): | |
317 | p->return_size = sizeof(uint64_t); | |
318 | *(uint64_t *)p->data = val; | |
319 | return 1; | |
320 | } | |
321 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
322 | p->return_size = sizeof(int32_t); /* Minimum expected size */ | |
323 | switch (p->data_size) { | |
324 | case sizeof(int32_t): | |
325 | if (val <= INT32_MAX) { | |
326 | *(int32_t *)p->data = (int32_t)val; | |
327 | return 1; | |
328 | } | |
329 | break; | |
330 | case sizeof(int64_t): | |
331 | p->return_size = sizeof(int64_t); | |
332 | *(int64_t *)p->data = (int64_t)val; | |
333 | return 1; | |
334 | } | |
335 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
336 | p->return_size = sizeof(double); | |
337 | switch (p->data_size) { | |
338 | case sizeof(double): | |
339 | *(double *)p->data = (double)val; | |
340 | return 1; | |
341 | } | |
342 | } | |
343 | return 0; | |
344 | } | |
345 | ||
346 | OSSL_PARAM OSSL_PARAM_construct_uint32(const char *key, uint32_t *buf) | |
347 | { | |
348 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
349 | sizeof(uint32_t)); | |
350 | } | |
351 | ||
352 | int OSSL_PARAM_get_int64(const OSSL_PARAM *p, int64_t *val) | |
353 | { | |
354 | uint64_t u64; | |
355 | double d; | |
356 | ||
357 | if (val == NULL || p == NULL ) | |
358 | return 0; | |
359 | ||
360 | if (p->data_type == OSSL_PARAM_INTEGER) { | |
361 | switch (p->data_size) { | |
362 | case sizeof(int32_t): | |
363 | *val = *(const int32_t *)p->data; | |
364 | return 1; | |
365 | case sizeof(int64_t): | |
366 | *val = *(const int64_t *)p->data; | |
367 | return 1; | |
368 | } | |
369 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
370 | switch (p->data_size) { | |
371 | case sizeof(uint32_t): | |
372 | *val = *(const uint32_t *)p->data; | |
373 | return 1; | |
374 | case sizeof(uint64_t): | |
375 | u64 = *(const uint64_t *)p->data; | |
376 | if (u64 <= INT64_MAX) { | |
377 | *val = (int64_t)u64; | |
378 | return 1; | |
379 | } | |
380 | break; | |
381 | } | |
382 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
383 | switch (p->data_size) { | |
384 | case sizeof(double): | |
385 | d = *(const double *)p->data; | |
386 | if (d >= INT64_MIN && d <= INT64_MAX && d == (int64_t)d) { | |
387 | *val = (int64_t)d; | |
388 | return 1; | |
389 | } | |
390 | break; | |
391 | } | |
392 | } | |
393 | return 0; | |
394 | } | |
395 | ||
396 | int OSSL_PARAM_set_int64(OSSL_PARAM *p, int64_t val) | |
397 | { | |
398 | uint64_t u64; | |
399 | ||
400 | if (p == NULL) | |
401 | return 0; | |
402 | p->return_size = 0; | |
403 | if (p->data_type == OSSL_PARAM_INTEGER) { | |
404 | p->return_size = sizeof(int64_t); /* Expected size */ | |
405 | switch (p->data_size) { | |
406 | case sizeof(int32_t): | |
407 | if (val >= INT32_MIN && val <= INT32_MAX) { | |
408 | p->return_size = sizeof(int32_t); | |
409 | *(int32_t *)p->data = (int32_t)val; | |
410 | return 1; | |
411 | } | |
412 | break; | |
413 | case sizeof(int64_t): | |
414 | *(int64_t *)p->data = val; | |
415 | return 1; | |
416 | } | |
417 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) { | |
418 | p->return_size = sizeof(uint64_t); /* Expected size */ | |
419 | switch (p->data_size) { | |
420 | case sizeof(uint32_t): | |
421 | if (val <= UINT32_MAX) { | |
422 | p->return_size = sizeof(uint32_t); | |
423 | *(uint32_t *)p->data = (uint32_t)val; | |
424 | return 1; | |
425 | } | |
426 | break; | |
427 | case sizeof(uint64_t): | |
428 | *(uint64_t *)p->data = (uint64_t)val; | |
429 | return 1; | |
430 | } | |
431 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
432 | p->return_size = sizeof(double); | |
433 | switch (p->data_size) { | |
434 | case sizeof(double): | |
435 | u64 = val < 0 ? -val : val; | |
436 | if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */ | |
437 | *(double *)p->data = (double)val; | |
438 | return 1; | |
439 | } | |
440 | break; | |
441 | } | |
442 | } | |
443 | return 0; | |
444 | } | |
445 | ||
446 | OSSL_PARAM OSSL_PARAM_construct_int64(const char *key, int64_t *buf) | |
447 | { | |
448 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int64_t)); | |
449 | } | |
450 | ||
451 | int OSSL_PARAM_get_uint64(const OSSL_PARAM *p, uint64_t *val) | |
452 | { | |
453 | int32_t i32; | |
454 | int64_t i64; | |
455 | double d; | |
456 | ||
457 | if (val == NULL || p == NULL) | |
458 | return 0; | |
459 | ||
460 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
461 | switch (p->data_size) { | |
462 | case sizeof(uint32_t): | |
463 | *val = *(const uint32_t *)p->data; | |
464 | return 1; | |
465 | case sizeof(uint64_t): | |
466 | *val = *(const uint64_t *)p->data; | |
467 | return 1; | |
468 | } | |
469 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
470 | switch (p->data_size) { | |
471 | case sizeof(int32_t): | |
472 | i32 = *(const int32_t *)p->data; | |
473 | if (i32 >= 0) { | |
474 | *val = (uint64_t)i32; | |
475 | return 1; | |
476 | } | |
477 | break; | |
478 | case sizeof(int64_t): | |
479 | i64 = *(const int64_t *)p->data; | |
480 | if (i64 >= 0) { | |
481 | *val = (uint64_t)i64; | |
482 | return 1; | |
483 | } | |
484 | break; | |
485 | } | |
486 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
487 | switch (p->data_size) { | |
488 | case sizeof(double): | |
489 | d = *(const double *)p->data; | |
490 | if (d >= 0 && d <= INT64_MAX && d == (uint64_t)d) { | |
491 | *val = (uint64_t)d; | |
492 | return 1; | |
493 | } | |
494 | break; | |
495 | } | |
496 | } | |
497 | return 0; | |
498 | } | |
499 | ||
500 | int OSSL_PARAM_set_uint64(OSSL_PARAM *p, uint64_t val) | |
501 | { | |
502 | if (p == NULL) | |
503 | return 0; | |
504 | p->return_size = 0; | |
505 | ||
506 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
507 | p->return_size = sizeof(uint64_t); /* Expected size */ | |
508 | switch (p->data_size) { | |
509 | case sizeof(uint32_t): | |
510 | if (val <= UINT32_MAX) { | |
511 | p->return_size = sizeof(uint32_t); | |
512 | *(uint32_t *)p->data = (uint32_t)val; | |
513 | return 1; | |
514 | } | |
515 | break; | |
516 | case sizeof(uint64_t): | |
517 | *(uint64_t *)p->data = val; | |
518 | return 1; | |
519 | } | |
520 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
521 | p->return_size = sizeof(int64_t); /* Expected size */ | |
522 | switch (p->data_size) { | |
523 | case sizeof(int32_t): | |
524 | if (val <= INT32_MAX) { | |
525 | p->return_size = sizeof(int32_t); | |
526 | *(int32_t *)p->data = (int32_t)val; | |
527 | return 1; | |
528 | } | |
529 | break; | |
530 | case sizeof(int64_t): | |
531 | if (val <= INT64_MAX) { | |
532 | *(int64_t *)p->data = (int64_t)val; | |
533 | return 1; | |
534 | } | |
535 | break; | |
536 | } | |
537 | } else if (p->data_type == OSSL_PARAM_REAL) { | |
538 | p->return_size = sizeof(double); | |
539 | switch (p->data_size) { | |
540 | case sizeof(double): | |
541 | if ((val >> 53) == 0) { /* 53 significant bits in the mantissa */ | |
542 | *(double *)p->data = (double)val; | |
543 | return 1; | |
544 | } | |
545 | break; | |
546 | } | |
547 | } | |
548 | return 0; | |
549 | } | |
550 | ||
551 | OSSL_PARAM OSSL_PARAM_construct_uint64(const char *key, uint64_t *buf) | |
552 | { | |
553 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
554 | sizeof(uint64_t)); | |
555 | } | |
556 | ||
557 | int OSSL_PARAM_get_size_t(const OSSL_PARAM *p, size_t *val) | |
558 | { | |
559 | switch (sizeof(size_t)) { | |
560 | case sizeof(uint32_t): | |
561 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); | |
562 | case sizeof(uint64_t): | |
563 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); | |
564 | } | |
565 | return 0; | |
566 | } | |
567 | ||
568 | int OSSL_PARAM_set_size_t(OSSL_PARAM *p, size_t val) | |
569 | { | |
570 | switch (sizeof(size_t)) { | |
571 | case sizeof(uint32_t): | |
572 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); | |
573 | case sizeof(uint64_t): | |
574 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); | |
575 | } | |
576 | return 0; | |
577 | } | |
578 | ||
579 | OSSL_PARAM OSSL_PARAM_construct_size_t(const char *key, size_t *buf) | |
580 | { | |
581 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
582 | sizeof(size_t)); | |
583 | } | |
584 | ||
585 | int OSSL_PARAM_get_BN(const OSSL_PARAM *p, BIGNUM **val) | |
586 | { | |
587 | BIGNUM *b; | |
588 | ||
589 | if (val == NULL | |
590 | || p == NULL | |
591 | || p->data_type != OSSL_PARAM_UNSIGNED_INTEGER) | |
592 | return 0; | |
593 | ||
594 | b = BN_native2bn(p->data, (int)p->data_size, *val); | |
595 | if (b != NULL) { | |
596 | *val = b; | |
597 | return 1; | |
598 | } | |
599 | return 0; | |
600 | } | |
601 | ||
602 | int OSSL_PARAM_set_BN(OSSL_PARAM *p, const BIGNUM *val) | |
603 | { | |
604 | size_t bytes; | |
605 | ||
606 | if (p == NULL) | |
607 | return 0; | |
608 | p->return_size = 0; | |
609 | if (val == NULL || p->data_type != OSSL_PARAM_UNSIGNED_INTEGER) | |
610 | return 0; | |
611 | ||
612 | /* For the moment, only positive values are permitted */ | |
613 | if (BN_is_negative(val)) | |
614 | return 0; | |
615 | ||
616 | bytes = (size_t)BN_num_bytes(val); | |
617 | p->return_size = bytes; | |
618 | return p->data_size >= bytes | |
619 | && BN_bn2nativepad(val, p->data, bytes) >= 0; | |
620 | } | |
621 | ||
622 | OSSL_PARAM OSSL_PARAM_construct_BN(const char *key, unsigned char *buf, | |
623 | size_t bsize) | |
624 | { | |
625 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, | |
626 | buf, bsize); | |
627 | } | |
628 | ||
629 | int OSSL_PARAM_get_double(const OSSL_PARAM *p, double *val) | |
630 | { | |
631 | int64_t i64; | |
632 | uint64_t u64; | |
633 | ||
634 | if (val == NULL || p == NULL) | |
635 | return 0; | |
636 | ||
637 | if (p->data_type == OSSL_PARAM_REAL) { | |
638 | switch (p->data_size) { | |
639 | case sizeof(double): | |
640 | *val = *(const double *)p->data; | |
641 | return 1; | |
642 | } | |
643 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
644 | switch (p->data_size) { | |
645 | case sizeof(uint32_t): | |
646 | *val = *(const uint32_t *)p->data; | |
647 | return 1; | |
648 | case sizeof(uint64_t): | |
649 | u64 = *(const uint64_t *)p->data; | |
650 | if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */ | |
651 | *val = (double)u64; | |
652 | return 1; | |
653 | } | |
654 | break; | |
655 | } | |
656 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
657 | switch (p->data_size) { | |
658 | case sizeof(int32_t): | |
659 | *val = *(const int32_t *)p->data; | |
660 | return 1; | |
661 | case sizeof(int64_t): | |
662 | i64 = *(const int64_t *)p->data; | |
663 | u64 = i64 < 0 ? -i64 : i64; | |
664 | if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */ | |
665 | *val = 0.0 + i64; | |
666 | return 1; | |
667 | } | |
668 | break; | |
669 | } | |
670 | } | |
671 | return 0; | |
672 | } | |
673 | ||
674 | int OSSL_PARAM_set_double(OSSL_PARAM *p, double val) | |
675 | { | |
676 | if (p == NULL) | |
677 | return 0; | |
678 | p->return_size = 0; | |
679 | ||
680 | if (p->data_type == OSSL_PARAM_REAL) { | |
681 | p->return_size = sizeof(double); | |
682 | switch (p->data_size) { | |
683 | case sizeof(double): | |
684 | *(double *)p->data = val; | |
685 | return 1; | |
686 | } | |
687 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER | |
688 | && val == (uintmax_t)val) { | |
689 | p->return_size = sizeof(double); | |
690 | switch (p->data_size) { | |
691 | case sizeof(uint32_t): | |
692 | if (val >= 0 && val <= UINT32_MAX) { | |
693 | p->return_size = sizeof(uint32_t); | |
694 | *(uint32_t *)p->data = (uint32_t)val; | |
695 | return 1; | |
696 | } | |
697 | break; | |
698 | case sizeof(uint64_t): | |
699 | if (val >= 0 && val <= UINT64_MAX) { | |
700 | p->return_size = sizeof(uint64_t); | |
701 | *(uint64_t *)p->data = (uint64_t)val; | |
702 | return 1; | |
703 | } | |
704 | break; } | |
705 | } else if (p->data_type == OSSL_PARAM_INTEGER && val == (intmax_t)val) { | |
706 | p->return_size = sizeof(double); | |
707 | switch (p->data_size) { | |
708 | case sizeof(int32_t): | |
709 | if (val >= INT32_MIN && val <= INT32_MAX) { | |
710 | p->return_size = sizeof(int32_t); | |
711 | *(int32_t *)p->data = (int32_t)val; | |
712 | return 1; | |
713 | } | |
714 | break; | |
715 | case sizeof(int64_t): | |
716 | if (val >= INT64_MIN && val <= INT64_MAX) { | |
717 | p->return_size = sizeof(int64_t); | |
718 | *(int64_t *)p->data = (int64_t)val; | |
719 | return 1; | |
720 | } | |
721 | break; | |
722 | } | |
723 | } | |
724 | return 0; | |
725 | } | |
726 | ||
727 | OSSL_PARAM OSSL_PARAM_construct_double(const char *key, double *buf) | |
728 | { | |
729 | return ossl_param_construct(key, OSSL_PARAM_REAL, buf, sizeof(double)); | |
730 | } | |
731 | ||
732 | static int get_string_internal(const OSSL_PARAM *p, void **val, size_t max_len, | |
733 | size_t *used_len, unsigned int type) | |
734 | { | |
735 | size_t sz; | |
736 | ||
737 | if (val == NULL || p == NULL || p->data_type != type) | |
738 | return 0; | |
739 | ||
740 | sz = p->data_size; | |
741 | ||
742 | if (used_len != NULL) | |
743 | *used_len = sz; | |
744 | ||
745 | if (*val == NULL) { | |
746 | char *const q = OPENSSL_malloc(sz); | |
747 | ||
748 | if (q == NULL) | |
749 | return 0; | |
750 | *val = q; | |
751 | memcpy(q, p->data, sz); | |
752 | return 1; | |
753 | } | |
754 | if (max_len < sz) | |
755 | return 0; | |
756 | memcpy(*val, p->data, sz); | |
757 | return 1; | |
758 | } | |
759 | ||
760 | int OSSL_PARAM_get_utf8_string(const OSSL_PARAM *p, char **val, size_t max_len) | |
761 | { | |
762 | return get_string_internal(p, (void **)val, max_len, NULL, | |
763 | OSSL_PARAM_UTF8_STRING); | |
764 | } | |
765 | ||
766 | int OSSL_PARAM_get_octet_string(const OSSL_PARAM *p, void **val, size_t max_len, | |
767 | size_t *used_len) | |
768 | { | |
769 | return get_string_internal(p, val, max_len, used_len, | |
770 | OSSL_PARAM_OCTET_STRING); | |
771 | } | |
772 | ||
773 | static int set_string_internal(OSSL_PARAM *p, const void *val, size_t len, | |
774 | unsigned int type) | |
775 | { | |
776 | p->return_size = len; | |
777 | if (p->data_type != type || p->data_size < len) | |
778 | return 0; | |
779 | ||
780 | memcpy(p->data, val, len); | |
781 | return 1; | |
782 | } | |
783 | ||
784 | int OSSL_PARAM_set_utf8_string(OSSL_PARAM *p, const char *val) | |
785 | { | |
786 | if (p == NULL) | |
787 | return 0; | |
788 | ||
789 | p->return_size = 0; | |
790 | if (val == NULL) | |
791 | return 0; | |
792 | return set_string_internal(p, val, strlen(val) + 1, OSSL_PARAM_UTF8_STRING); | |
793 | } | |
794 | ||
795 | int OSSL_PARAM_set_octet_string(OSSL_PARAM *p, const void *val, | |
796 | size_t len) | |
797 | { | |
798 | if (p == NULL) | |
799 | return 0; | |
800 | ||
801 | p->return_size = 0; | |
802 | if (val == NULL) | |
803 | return 0; | |
804 | return set_string_internal(p, val, len, OSSL_PARAM_OCTET_STRING); | |
805 | } | |
806 | ||
807 | OSSL_PARAM OSSL_PARAM_construct_utf8_string(const char *key, char *buf, | |
808 | size_t bsize) | |
809 | { | |
810 | return ossl_param_construct(key, OSSL_PARAM_UTF8_STRING, buf, bsize); | |
811 | } | |
812 | ||
813 | OSSL_PARAM OSSL_PARAM_construct_octet_string(const char *key, void *buf, | |
814 | size_t bsize) | |
815 | { | |
816 | return ossl_param_construct(key, OSSL_PARAM_OCTET_STRING, buf, bsize); | |
817 | } | |
818 | ||
819 | static int get_ptr_internal(const OSSL_PARAM *p, const void **val, | |
820 | size_t *used_len, unsigned int type) | |
821 | { | |
822 | if (val == NULL || p == NULL || p->data_type != type) | |
823 | return 0; | |
824 | if (used_len != NULL) | |
825 | *used_len = p->data_size; | |
826 | *val = *(const void **)p->data; | |
827 | return 1; | |
828 | } | |
829 | ||
830 | int OSSL_PARAM_get_utf8_ptr(const OSSL_PARAM *p, const char **val) | |
831 | { | |
832 | return get_ptr_internal(p, (const void **)val, NULL, OSSL_PARAM_UTF8_PTR); | |
833 | } | |
834 | ||
835 | int OSSL_PARAM_get_octet_ptr(const OSSL_PARAM *p, const void **val, | |
836 | size_t *used_len) | |
837 | { | |
838 | return get_ptr_internal(p, val, used_len, OSSL_PARAM_OCTET_PTR); | |
839 | } | |
840 | ||
841 | static int set_ptr_internal(OSSL_PARAM *p, const void *val, | |
842 | unsigned int type, size_t len) | |
843 | { | |
844 | p->return_size = len; | |
845 | if (p->data_type != type) | |
846 | return 0; | |
847 | *(const void **)p->data = val; | |
848 | return 1; | |
849 | } | |
850 | ||
851 | int OSSL_PARAM_set_utf8_ptr(OSSL_PARAM *p, const char *val) | |
852 | { | |
853 | if (p == NULL) | |
854 | return 0; | |
855 | p->return_size = 0; | |
856 | if (val == NULL) | |
857 | return 0; | |
858 | return set_ptr_internal(p, val, OSSL_PARAM_UTF8_PTR, strlen(val) + 1); | |
859 | } | |
860 | ||
861 | int OSSL_PARAM_set_octet_ptr(OSSL_PARAM *p, const void *val, | |
862 | size_t used_len) | |
863 | { | |
864 | if (p == NULL) | |
865 | return 0; | |
866 | p->return_size = 0; | |
867 | if (val == NULL) | |
868 | return 0; | |
869 | return set_ptr_internal(p, val, OSSL_PARAM_OCTET_PTR, used_len); | |
870 | } | |
871 | ||
872 | OSSL_PARAM OSSL_PARAM_construct_utf8_ptr(const char *key, char **buf, | |
873 | size_t bsize) | |
874 | { | |
875 | return ossl_param_construct(key, OSSL_PARAM_UTF8_PTR, buf, bsize); | |
876 | } | |
877 | ||
878 | OSSL_PARAM OSSL_PARAM_construct_octet_ptr(const char *key, void **buf, | |
879 | size_t bsize) | |
880 | { | |
881 | return ossl_param_construct(key, OSSL_PARAM_OCTET_PTR, buf, bsize); | |
882 | } | |
883 | ||
884 | OSSL_PARAM OSSL_PARAM_construct_end(void) | |
885 | { | |
886 | OSSL_PARAM end = OSSL_PARAM_END; | |
887 | ||
888 | return end; | |
889 | } |