]>
Commit | Line | Data |
---|---|---|
7ffbd7ca | 1 | /* |
fecb3aae | 2 | * Copyright 2019-2022 The OpenSSL Project Authors. All Rights Reserved. |
7ffbd7ca P |
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> | |
ac1082f0 | 13 | #include <openssl/err.h> |
7ffbd7ca | 14 | #include "internal/thread_once.h" |
c04a9916 | 15 | #include "internal/numbers.h" |
e9c5e642 | 16 | #include "internal/endian.h" |
7ffbd7ca | 17 | |
ac1082f0 P |
18 | /* Shortcuts for raising errors that are widely used */ |
19 | #define err_unsigned_negative \ | |
20 | ERR_raise(ERR_LIB_CRYPTO, \ | |
21 | CRYPTO_R_PARAM_UNSIGNED_INTEGER_NEGATIVE_VALUE_UNSUPPORTED) | |
22 | #define err_out_of_range \ | |
23 | ERR_raise(ERR_LIB_CRYPTO, \ | |
24 | CRYPTO_R_PARAM_VALUE_TOO_LARGE_FOR_DESTINATION) | |
25 | #define err_inexact \ | |
26 | ERR_raise(ERR_LIB_CRYPTO, \ | |
27 | CRYPTO_R_PARAM_CANNOT_BE_REPRESENTED_EXACTLY) | |
28 | #define err_not_integer \ | |
29 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_PARAM_NOT_INTEGER_TYPE) | |
30 | #define err_too_small \ | |
31 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_TOO_SMALL_BUFFER) | |
32 | #define err_bad_type \ | |
33 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_PARAM_OF_INCOMPATIBLE_TYPE) | |
34 | #define err_null_argument \ | |
35 | ERR_raise(ERR_LIB_CRYPTO, ERR_R_PASSED_NULL_PARAMETER) | |
36 | #define err_unsupported_real \ | |
37 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_PARAM_UNSUPPORTED_FLOATING_POINT_FORMAT) | |
38 | ||
5b1d94c1 P |
39 | /* |
40 | * Return the number of bits in the mantissa of a double. This is used to | |
41 | * shift a larger integral value to determine if it will exactly fit into a | |
42 | * double. | |
43 | */ | |
44 | static unsigned int real_shift(void) | |
45 | { | |
46 | return sizeof(double) == 4 ? 24 : 53; | |
47 | } | |
48 | ||
4e7991b4 | 49 | OSSL_PARAM *OSSL_PARAM_locate(OSSL_PARAM *p, const char *key) |
7ffbd7ca P |
50 | { |
51 | if (p != NULL && key != NULL) | |
52 | for (; p->key != NULL; p++) | |
53 | if (strcmp(key, p->key) == 0) | |
54 | return p; | |
55 | return NULL; | |
56 | } | |
57 | ||
4e7991b4 P |
58 | const OSSL_PARAM *OSSL_PARAM_locate_const(const OSSL_PARAM *p, const char *key) |
59 | { | |
60 | return OSSL_PARAM_locate((OSSL_PARAM *)p, key); | |
61 | } | |
62 | ||
7ffbd7ca | 63 | static OSSL_PARAM ossl_param_construct(const char *key, unsigned int data_type, |
4e7991b4 | 64 | void *data, size_t data_size) |
7ffbd7ca P |
65 | { |
66 | OSSL_PARAM res; | |
67 | ||
68 | res.key = key; | |
69 | res.data_type = data_type; | |
70 | res.data = data; | |
71 | res.data_size = data_size; | |
8d5fb648 | 72 | res.return_size = OSSL_PARAM_UNMODIFIED; |
7ffbd7ca P |
73 | return res; |
74 | } | |
75 | ||
8d5fb648 P |
76 | int OSSL_PARAM_modified(const OSSL_PARAM *p) |
77 | { | |
78 | return p != NULL && p->return_size != OSSL_PARAM_UNMODIFIED; | |
79 | } | |
80 | ||
3873887e | 81 | void OSSL_PARAM_set_all_unmodified(OSSL_PARAM *p) |
8d5fb648 P |
82 | { |
83 | if (p != NULL) | |
3873887e P |
84 | while (p->key != NULL) |
85 | p++->return_size = OSSL_PARAM_UNMODIFIED; | |
8d5fb648 P |
86 | } |
87 | ||
e9c5e642 P |
88 | /* Return non-zero if the signed number is negative */ |
89 | static int is_negative(const void *number, size_t s) | |
90 | { | |
91 | const unsigned char *n = number; | |
92 | DECLARE_IS_ENDIAN; | |
93 | ||
94 | return 0x80 & (IS_BIG_ENDIAN ? n[0] : n[s - 1]); | |
95 | } | |
96 | ||
97 | /* Check that all the bytes specified match the expected sign byte */ | |
98 | static int check_sign_bytes(const unsigned char *p, size_t n, unsigned char s) | |
99 | { | |
100 | size_t i; | |
101 | ||
102 | for (i = 0; i < n; i++) | |
103 | if (p[i] != s) | |
104 | return 0; | |
105 | return 1; | |
106 | } | |
107 | ||
108 | /* | |
109 | * Copy an integer to another integer. | |
110 | * Handle different length integers and signed and unsigned integers. | |
111 | * Both integers are in native byte ordering. | |
112 | */ | |
113 | static int copy_integer(unsigned char *dest, size_t dest_len, | |
114 | const unsigned char *src, size_t src_len, | |
115 | unsigned char pad, int signed_int) | |
116 | { | |
117 | size_t n; | |
118 | DECLARE_IS_ENDIAN; | |
119 | ||
120 | if (IS_BIG_ENDIAN) { | |
121 | if (src_len < dest_len) { | |
122 | n = dest_len - src_len; | |
123 | memset(dest, pad, n); | |
124 | memcpy(dest + n, src, src_len); | |
125 | } else { | |
126 | n = src_len - dest_len; | |
127 | if (!check_sign_bytes(src, n, pad) | |
128 | /* | |
129 | * Shortening a signed value must retain the correct sign. | |
130 | * Avoiding this kind of thing: -253 = 0xff03 -> 0x03 = 3 | |
131 | */ | |
ac1082f0 P |
132 | || (signed_int && ((pad ^ src[n]) & 0x80) != 0)) { |
133 | err_out_of_range; | |
e9c5e642 | 134 | return 0; |
ac1082f0 | 135 | } |
e9c5e642 P |
136 | memcpy(dest, src + n, dest_len); |
137 | } | |
138 | } else /* IS_LITTLE_ENDIAN */ { | |
139 | if (src_len < dest_len) { | |
140 | n = dest_len - src_len; | |
141 | memset(dest + src_len, pad, n); | |
142 | memcpy(dest, src, src_len); | |
143 | } else { | |
144 | n = src_len - dest_len; | |
145 | if (!check_sign_bytes(src + dest_len, n, pad) | |
146 | /* | |
147 | * Shortening a signed value must retain the correct sign. | |
148 | * Avoiding this kind of thing: 130 = 0x0082 -> 0x82 = -126 | |
149 | */ | |
ac1082f0 P |
150 | || (signed_int && ((pad ^ src[dest_len - 1]) & 0x80) != 0)) { |
151 | err_out_of_range; | |
e9c5e642 | 152 | return 0; |
ac1082f0 | 153 | } |
e9c5e642 P |
154 | memcpy(dest, src, dest_len); |
155 | } | |
156 | } | |
157 | return 1; | |
158 | } | |
159 | ||
160 | /* Copy a signed number to a signed number of possibly different length */ | |
161 | static int signed_from_signed(void *dest, size_t dest_len, | |
162 | const void *src, size_t src_len) | |
163 | { | |
164 | return copy_integer(dest, dest_len, src, src_len, | |
165 | is_negative(src, src_len) ? 0xff : 0, 1); | |
166 | } | |
167 | ||
168 | /* Copy an unsigned number to a signed number of possibly different length */ | |
169 | static int signed_from_unsigned(void *dest, size_t dest_len, | |
170 | const void *src, size_t src_len) | |
171 | { | |
172 | return copy_integer(dest, dest_len, src, src_len, 0, 1); | |
173 | } | |
174 | ||
175 | /* Copy a signed number to an unsigned number of possibly different length */ | |
176 | static int unsigned_from_signed(void *dest, size_t dest_len, | |
177 | const void *src, size_t src_len) | |
178 | { | |
ac1082f0 P |
179 | if (is_negative(src, src_len)) { |
180 | err_unsigned_negative; | |
e9c5e642 | 181 | return 0; |
ac1082f0 | 182 | } |
e9c5e642 P |
183 | return copy_integer(dest, dest_len, src, src_len, 0, 0); |
184 | } | |
185 | ||
186 | /* Copy an unsigned number to an unsigned number of possibly different length */ | |
187 | static int unsigned_from_unsigned(void *dest, size_t dest_len, | |
188 | const void *src, size_t src_len) | |
189 | { | |
190 | return copy_integer(dest, dest_len, src, src_len, 0, 0); | |
191 | } | |
192 | ||
193 | /* General purpose get integer parameter call that handles odd sizes */ | |
194 | static int general_get_int(const OSSL_PARAM *p, void *val, size_t val_size) | |
195 | { | |
196 | if (p->data_type == OSSL_PARAM_INTEGER) | |
197 | return signed_from_signed(val, val_size, p->data, p->data_size); | |
198 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) | |
199 | return signed_from_unsigned(val, val_size, p->data, p->data_size); | |
ac1082f0 | 200 | err_not_integer; |
e9c5e642 P |
201 | return 0; |
202 | } | |
203 | ||
204 | /* General purpose set integer parameter call that handles odd sizes */ | |
205 | static int general_set_int(OSSL_PARAM *p, void *val, size_t val_size) | |
206 | { | |
207 | int r = 0; | |
208 | ||
209 | p->return_size = val_size; /* Expected size */ | |
210 | if (p->data == NULL) | |
211 | return 1; | |
212 | if (p->data_type == OSSL_PARAM_INTEGER) | |
213 | r = signed_from_signed(p->data, p->data_size, val, val_size); | |
214 | else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) | |
215 | r = unsigned_from_signed(p->data, p->data_size, val, val_size); | |
ac1082f0 P |
216 | else |
217 | err_not_integer; | |
e9c5e642 P |
218 | p->return_size = r ? p->data_size : val_size; |
219 | return r; | |
220 | } | |
221 | ||
222 | /* General purpose get unsigned integer parameter call that handles odd sizes */ | |
223 | static int general_get_uint(const OSSL_PARAM *p, void *val, size_t val_size) | |
224 | { | |
225 | if (p->data_type == OSSL_PARAM_INTEGER) | |
226 | return unsigned_from_signed(val, val_size, p->data, p->data_size); | |
227 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) | |
228 | return unsigned_from_unsigned(val, val_size, p->data, p->data_size); | |
ac1082f0 | 229 | err_not_integer; |
e9c5e642 P |
230 | return 0; |
231 | } | |
232 | ||
233 | /* General purpose set unsigned integer parameter call that handles odd sizes */ | |
234 | static int general_set_uint(OSSL_PARAM *p, void *val, size_t val_size) | |
235 | { | |
236 | int r = 0; | |
237 | ||
238 | p->return_size = val_size; /* Expected size */ | |
239 | if (p->data == NULL) | |
240 | return 1; | |
241 | if (p->data_type == OSSL_PARAM_INTEGER) | |
242 | r = signed_from_unsigned(p->data, p->data_size, val, val_size); | |
243 | else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) | |
244 | r = unsigned_from_unsigned(p->data, p->data_size, val, val_size); | |
ac1082f0 P |
245 | else |
246 | err_not_integer; | |
e9c5e642 P |
247 | p->return_size = r ? p->data_size : val_size; |
248 | return r; | |
249 | } | |
250 | ||
7ffbd7ca P |
251 | int OSSL_PARAM_get_int(const OSSL_PARAM *p, int *val) |
252 | { | |
e9c5e642 | 253 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 254 | switch (sizeof(int)) { |
7ffbd7ca | 255 | case sizeof(int32_t): |
863360fb | 256 | return OSSL_PARAM_get_int32(p, (int32_t *)val); |
7ffbd7ca | 257 | case sizeof(int64_t): |
863360fb | 258 | return OSSL_PARAM_get_int64(p, (int64_t *)val); |
7ffbd7ca | 259 | } |
e9c5e642 P |
260 | #endif |
261 | return general_get_int(p, val, sizeof(*val)); | |
7ffbd7ca P |
262 | } |
263 | ||
4e7991b4 | 264 | int OSSL_PARAM_set_int(OSSL_PARAM *p, int val) |
7ffbd7ca | 265 | { |
e9c5e642 | 266 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 267 | switch (sizeof(int)) { |
7ffbd7ca | 268 | case sizeof(int32_t): |
863360fb | 269 | return OSSL_PARAM_set_int32(p, (int32_t)val); |
7ffbd7ca | 270 | case sizeof(int64_t): |
863360fb | 271 | return OSSL_PARAM_set_int64(p, (int64_t)val); |
7ffbd7ca | 272 | } |
e9c5e642 P |
273 | #endif |
274 | return general_set_int(p, &val, sizeof(val)); | |
7ffbd7ca P |
275 | } |
276 | ||
4e7991b4 | 277 | OSSL_PARAM OSSL_PARAM_construct_int(const char *key, int *buf) |
7ffbd7ca | 278 | { |
4e7991b4 | 279 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int)); |
7ffbd7ca P |
280 | } |
281 | ||
282 | int OSSL_PARAM_get_uint(const OSSL_PARAM *p, unsigned int *val) | |
283 | { | |
e9c5e642 | 284 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 285 | switch (sizeof(unsigned int)) { |
7ffbd7ca | 286 | case sizeof(uint32_t): |
863360fb | 287 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); |
7ffbd7ca | 288 | case sizeof(uint64_t): |
863360fb | 289 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); |
7ffbd7ca | 290 | } |
e9c5e642 P |
291 | #endif |
292 | return general_get_uint(p, val, sizeof(*val)); | |
7ffbd7ca P |
293 | } |
294 | ||
4e7991b4 | 295 | int OSSL_PARAM_set_uint(OSSL_PARAM *p, unsigned int val) |
7ffbd7ca | 296 | { |
e9c5e642 | 297 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 298 | switch (sizeof(unsigned int)) { |
7ffbd7ca | 299 | case sizeof(uint32_t): |
863360fb | 300 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); |
7ffbd7ca | 301 | case sizeof(uint64_t): |
863360fb | 302 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); |
7ffbd7ca | 303 | } |
e9c5e642 P |
304 | #endif |
305 | return general_set_uint(p, &val, sizeof(val)); | |
7ffbd7ca P |
306 | } |
307 | ||
4e7991b4 | 308 | OSSL_PARAM OSSL_PARAM_construct_uint(const char *key, unsigned int *buf) |
7ffbd7ca P |
309 | { |
310 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
4e7991b4 | 311 | sizeof(unsigned int)); |
7ffbd7ca P |
312 | } |
313 | ||
314 | int OSSL_PARAM_get_long(const OSSL_PARAM *p, long int *val) | |
315 | { | |
e9c5e642 | 316 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 317 | switch (sizeof(long int)) { |
7ffbd7ca | 318 | case sizeof(int32_t): |
863360fb | 319 | return OSSL_PARAM_get_int32(p, (int32_t *)val); |
7ffbd7ca | 320 | case sizeof(int64_t): |
863360fb | 321 | return OSSL_PARAM_get_int64(p, (int64_t *)val); |
7ffbd7ca | 322 | } |
e9c5e642 P |
323 | #endif |
324 | return general_get_int(p, val, sizeof(*val)); | |
7ffbd7ca P |
325 | } |
326 | ||
4e7991b4 | 327 | int OSSL_PARAM_set_long(OSSL_PARAM *p, long int val) |
7ffbd7ca | 328 | { |
e9c5e642 | 329 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 330 | switch (sizeof(long int)) { |
7ffbd7ca | 331 | case sizeof(int32_t): |
863360fb | 332 | return OSSL_PARAM_set_int32(p, (int32_t)val); |
7ffbd7ca | 333 | case sizeof(int64_t): |
863360fb | 334 | return OSSL_PARAM_set_int64(p, (int64_t)val); |
7ffbd7ca | 335 | } |
e9c5e642 P |
336 | #endif |
337 | return general_set_int(p, &val, sizeof(val)); | |
7ffbd7ca P |
338 | } |
339 | ||
4e7991b4 | 340 | OSSL_PARAM OSSL_PARAM_construct_long(const char *key, long int *buf) |
7ffbd7ca | 341 | { |
4e7991b4 | 342 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(long int)); |
7ffbd7ca P |
343 | } |
344 | ||
345 | int OSSL_PARAM_get_ulong(const OSSL_PARAM *p, unsigned long int *val) | |
346 | { | |
e9c5e642 | 347 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 348 | switch (sizeof(unsigned long int)) { |
7ffbd7ca | 349 | case sizeof(uint32_t): |
863360fb | 350 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); |
7ffbd7ca | 351 | case sizeof(uint64_t): |
863360fb | 352 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); |
7ffbd7ca | 353 | } |
e9c5e642 P |
354 | #endif |
355 | return general_get_uint(p, val, sizeof(*val)); | |
7ffbd7ca P |
356 | } |
357 | ||
4e7991b4 | 358 | int OSSL_PARAM_set_ulong(OSSL_PARAM *p, unsigned long int val) |
7ffbd7ca | 359 | { |
e9c5e642 | 360 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 361 | switch (sizeof(unsigned long int)) { |
7ffbd7ca | 362 | case sizeof(uint32_t): |
863360fb | 363 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); |
7ffbd7ca | 364 | case sizeof(uint64_t): |
863360fb | 365 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); |
7ffbd7ca | 366 | } |
e9c5e642 P |
367 | #endif |
368 | return general_set_uint(p, &val, sizeof(val)); | |
7ffbd7ca P |
369 | } |
370 | ||
4e7991b4 | 371 | OSSL_PARAM OSSL_PARAM_construct_ulong(const char *key, unsigned long int *buf) |
7ffbd7ca P |
372 | { |
373 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
4e7991b4 | 374 | sizeof(unsigned long int)); |
7ffbd7ca P |
375 | } |
376 | ||
377 | int OSSL_PARAM_get_int32(const OSSL_PARAM *p, int32_t *val) | |
378 | { | |
9830e7ea P |
379 | double d; |
380 | ||
ac1082f0 P |
381 | if (val == NULL || p == NULL) { |
382 | err_null_argument; | |
7ffbd7ca | 383 | return 0; |
ac1082f0 | 384 | } |
7ffbd7ca | 385 | |
9830e7ea | 386 | if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 P |
387 | #ifndef OPENSSL_SMALL_FOOTPRINT |
388 | int64_t i64; | |
389 | ||
9830e7ea P |
390 | switch (p->data_size) { |
391 | case sizeof(int32_t): | |
392 | *val = *(const int32_t *)p->data; | |
393 | return 1; | |
394 | case sizeof(int64_t): | |
395 | i64 = *(const int64_t *)p->data; | |
396 | if (i64 >= INT32_MIN && i64 <= INT32_MAX) { | |
397 | *val = (int32_t)i64; | |
398 | return 1; | |
399 | } | |
ac1082f0 | 400 | err_out_of_range; |
e9c5e642 | 401 | return 0; |
9830e7ea | 402 | } |
e9c5e642 P |
403 | #endif |
404 | return general_get_int(p, val, sizeof(*val)); | |
405 | ||
9830e7ea | 406 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 P |
407 | #ifndef OPENSSL_SMALL_FOOTPRINT |
408 | uint32_t u32; | |
409 | uint64_t u64; | |
410 | ||
9830e7ea P |
411 | switch (p->data_size) { |
412 | case sizeof(uint32_t): | |
413 | u32 = *(const uint32_t *)p->data; | |
414 | if (u32 <= INT32_MAX) { | |
415 | *val = (int32_t)u32; | |
416 | return 1; | |
417 | } | |
ac1082f0 | 418 | err_out_of_range; |
e9c5e642 | 419 | return 0; |
9830e7ea P |
420 | case sizeof(uint64_t): |
421 | u64 = *(const uint64_t *)p->data; | |
422 | if (u64 <= INT32_MAX) { | |
423 | *val = (int32_t)u64; | |
424 | return 1; | |
425 | } | |
ac1082f0 | 426 | err_out_of_range; |
e9c5e642 | 427 | return 0; |
9830e7ea | 428 | } |
e9c5e642 P |
429 | #endif |
430 | return general_get_int(p, val, sizeof(*val)); | |
431 | ||
9830e7ea P |
432 | } else if (p->data_type == OSSL_PARAM_REAL) { |
433 | switch (p->data_size) { | |
434 | case sizeof(double): | |
435 | d = *(const double *)p->data; | |
436 | if (d >= INT32_MIN && d <= INT32_MAX && d == (int32_t)d) { | |
437 | *val = (int32_t)d; | |
438 | return 1; | |
439 | } | |
ac1082f0 P |
440 | err_out_of_range; |
441 | return 0; | |
9830e7ea | 442 | } |
ac1082f0 P |
443 | err_unsupported_real; |
444 | return 0; | |
7ffbd7ca | 445 | } |
ac1082f0 | 446 | err_bad_type; |
7ffbd7ca P |
447 | return 0; |
448 | } | |
449 | ||
4e7991b4 | 450 | int OSSL_PARAM_set_int32(OSSL_PARAM *p, int32_t val) |
7ffbd7ca | 451 | { |
ac1082f0 P |
452 | uint32_t u32; |
453 | unsigned int shift; | |
454 | ||
455 | if (p == NULL) { | |
456 | err_null_argument; | |
7ffbd7ca | 457 | return 0; |
ac1082f0 | 458 | } |
4e7991b4 | 459 | p->return_size = 0; |
9830e7ea | 460 | if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 | 461 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 462 | p->return_size = sizeof(int32_t); /* Minimum expected size */ |
8f3b8fd6 RL |
463 | if (p->data == NULL) |
464 | return 1; | |
9830e7ea P |
465 | switch (p->data_size) { |
466 | case sizeof(int32_t): | |
467 | *(int32_t *)p->data = val; | |
468 | return 1; | |
469 | case sizeof(int64_t): | |
4e7991b4 | 470 | p->return_size = sizeof(int64_t); |
9830e7ea P |
471 | *(int64_t *)p->data = (int64_t)val; |
472 | return 1; | |
473 | } | |
e9c5e642 P |
474 | #endif |
475 | return general_set_int(p, &val, sizeof(val)); | |
9830e7ea | 476 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) { |
e9c5e642 | 477 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 478 | p->return_size = sizeof(uint32_t); /* Minimum expected size */ |
8f3b8fd6 RL |
479 | if (p->data == NULL) |
480 | return 1; | |
9830e7ea P |
481 | switch (p->data_size) { |
482 | case sizeof(uint32_t): | |
483 | *(uint32_t *)p->data = (uint32_t)val; | |
484 | return 1; | |
485 | case sizeof(uint64_t): | |
4e7991b4 | 486 | p->return_size = sizeof(uint64_t); |
9830e7ea P |
487 | *(uint64_t *)p->data = (uint64_t)val; |
488 | return 1; | |
489 | } | |
e9c5e642 P |
490 | #endif |
491 | return general_set_int(p, &val, sizeof(val)); | |
9830e7ea | 492 | } else if (p->data_type == OSSL_PARAM_REAL) { |
4e7991b4 | 493 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
494 | if (p->data == NULL) |
495 | return 1; | |
9830e7ea P |
496 | switch (p->data_size) { |
497 | case sizeof(double): | |
ac1082f0 P |
498 | shift = real_shift(); |
499 | if (shift < 8 * sizeof(val) - 1) { | |
500 | u32 = val < 0 ? -val : val; | |
501 | if ((u32 >> shift) != 0) { | |
502 | err_inexact; | |
503 | return 0; | |
504 | } | |
505 | } | |
9830e7ea P |
506 | *(double *)p->data = (double)val; |
507 | return 1; | |
508 | } | |
ac1082f0 P |
509 | err_unsupported_real; |
510 | return 0; | |
7ffbd7ca | 511 | } |
ac1082f0 | 512 | err_bad_type; |
7ffbd7ca P |
513 | return 0; |
514 | } | |
515 | ||
4e7991b4 | 516 | OSSL_PARAM OSSL_PARAM_construct_int32(const char *key, int32_t *buf) |
7ffbd7ca P |
517 | { |
518 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, | |
4e7991b4 | 519 | sizeof(int32_t)); |
7ffbd7ca P |
520 | } |
521 | ||
522 | int OSSL_PARAM_get_uint32(const OSSL_PARAM *p, uint32_t *val) | |
523 | { | |
9830e7ea P |
524 | double d; |
525 | ||
ac1082f0 P |
526 | if (val == NULL || p == NULL) { |
527 | err_null_argument; | |
7ffbd7ca | 528 | return 0; |
ac1082f0 | 529 | } |
7ffbd7ca | 530 | |
9830e7ea | 531 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 P |
532 | #ifndef OPENSSL_SMALL_FOOTPRINT |
533 | uint64_t u64; | |
534 | ||
9830e7ea P |
535 | switch (p->data_size) { |
536 | case sizeof(uint32_t): | |
537 | *val = *(const uint32_t *)p->data; | |
538 | return 1; | |
539 | case sizeof(uint64_t): | |
540 | u64 = *(const uint64_t *)p->data; | |
541 | if (u64 <= UINT32_MAX) { | |
542 | *val = (uint32_t)u64; | |
543 | return 1; | |
544 | } | |
ac1082f0 | 545 | err_out_of_range; |
e9c5e642 | 546 | return 0; |
9830e7ea | 547 | } |
e9c5e642 P |
548 | #endif |
549 | return general_get_uint(p, val, sizeof(*val)); | |
9830e7ea | 550 | } else if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 P |
551 | #ifndef OPENSSL_SMALL_FOOTPRINT |
552 | int32_t i32; | |
553 | int64_t i64; | |
554 | ||
9830e7ea P |
555 | switch (p->data_size) { |
556 | case sizeof(int32_t): | |
557 | i32 = *(const int32_t *)p->data; | |
558 | if (i32 >= 0) { | |
559 | *val = i32; | |
560 | return 1; | |
561 | } | |
ac1082f0 | 562 | err_unsigned_negative; |
e9c5e642 | 563 | return 0; |
9830e7ea P |
564 | case sizeof(int64_t): |
565 | i64 = *(const int64_t *)p->data; | |
566 | if (i64 >= 0 && i64 <= UINT32_MAX) { | |
567 | *val = (uint32_t)i64; | |
568 | return 1; | |
569 | } | |
ac1082f0 P |
570 | if (i64 < 0) |
571 | err_unsigned_negative; | |
572 | else | |
573 | err_out_of_range; | |
e9c5e642 | 574 | return 0; |
9830e7ea | 575 | } |
e9c5e642 P |
576 | #endif |
577 | return general_get_uint(p, val, sizeof(*val)); | |
9830e7ea P |
578 | } else if (p->data_type == OSSL_PARAM_REAL) { |
579 | switch (p->data_size) { | |
580 | case sizeof(double): | |
581 | d = *(const double *)p->data; | |
582 | if (d >= 0 && d <= UINT32_MAX && d == (uint32_t)d) { | |
583 | *val = (uint32_t)d; | |
584 | return 1; | |
585 | } | |
ac1082f0 P |
586 | err_inexact; |
587 | return 0; | |
9830e7ea | 588 | } |
ac1082f0 P |
589 | err_unsupported_real; |
590 | return 0; | |
7ffbd7ca | 591 | } |
ac1082f0 | 592 | err_bad_type; |
7ffbd7ca P |
593 | return 0; |
594 | } | |
595 | ||
4e7991b4 | 596 | int OSSL_PARAM_set_uint32(OSSL_PARAM *p, uint32_t val) |
7ffbd7ca | 597 | { |
ac1082f0 P |
598 | unsigned int shift; |
599 | ||
600 | if (p == NULL) { | |
601 | err_null_argument; | |
7ffbd7ca | 602 | return 0; |
ac1082f0 | 603 | } |
4e7991b4 | 604 | p->return_size = 0; |
7ffbd7ca | 605 | |
9830e7ea | 606 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 | 607 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 608 | p->return_size = sizeof(uint32_t); /* Minimum expected size */ |
8f3b8fd6 RL |
609 | if (p->data == NULL) |
610 | return 1; | |
9830e7ea P |
611 | switch (p->data_size) { |
612 | case sizeof(uint32_t): | |
613 | *(uint32_t *)p->data = val; | |
614 | return 1; | |
615 | case sizeof(uint64_t): | |
4e7991b4 | 616 | p->return_size = sizeof(uint64_t); |
9830e7ea P |
617 | *(uint64_t *)p->data = val; |
618 | return 1; | |
619 | } | |
e9c5e642 P |
620 | #endif |
621 | return general_set_uint(p, &val, sizeof(val)); | |
9830e7ea | 622 | } else if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 | 623 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 624 | p->return_size = sizeof(int32_t); /* Minimum expected size */ |
8f3b8fd6 RL |
625 | if (p->data == NULL) |
626 | return 1; | |
9830e7ea P |
627 | switch (p->data_size) { |
628 | case sizeof(int32_t): | |
629 | if (val <= INT32_MAX) { | |
630 | *(int32_t *)p->data = (int32_t)val; | |
631 | return 1; | |
632 | } | |
ac1082f0 | 633 | err_out_of_range; |
e9c5e642 | 634 | return 0; |
9830e7ea | 635 | case sizeof(int64_t): |
4e7991b4 | 636 | p->return_size = sizeof(int64_t); |
9830e7ea P |
637 | *(int64_t *)p->data = (int64_t)val; |
638 | return 1; | |
639 | } | |
e9c5e642 P |
640 | #endif |
641 | return general_set_uint(p, &val, sizeof(val)); | |
9830e7ea | 642 | } else if (p->data_type == OSSL_PARAM_REAL) { |
4e7991b4 | 643 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
644 | if (p->data == NULL) |
645 | return 1; | |
9830e7ea P |
646 | switch (p->data_size) { |
647 | case sizeof(double): | |
ac1082f0 P |
648 | shift = real_shift(); |
649 | if (shift < 8 * sizeof(val) && (val >> shift) != 0) { | |
650 | err_inexact; | |
651 | return 0; | |
652 | } | |
9830e7ea P |
653 | *(double *)p->data = (double)val; |
654 | return 1; | |
655 | } | |
ac1082f0 P |
656 | err_unsupported_real; |
657 | return 0; | |
7ffbd7ca | 658 | } |
ac1082f0 | 659 | err_bad_type; |
7ffbd7ca P |
660 | return 0; |
661 | } | |
662 | ||
4e7991b4 | 663 | OSSL_PARAM OSSL_PARAM_construct_uint32(const char *key, uint32_t *buf) |
7ffbd7ca P |
664 | { |
665 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
4e7991b4 | 666 | sizeof(uint32_t)); |
7ffbd7ca P |
667 | } |
668 | ||
669 | int OSSL_PARAM_get_int64(const OSSL_PARAM *p, int64_t *val) | |
670 | { | |
9830e7ea P |
671 | double d; |
672 | ||
ac1082f0 P |
673 | if (val == NULL || p == NULL) { |
674 | err_null_argument; | |
7ffbd7ca | 675 | return 0; |
ac1082f0 | 676 | } |
7ffbd7ca | 677 | |
9830e7ea | 678 | if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 | 679 | #ifndef OPENSSL_SMALL_FOOTPRINT |
9830e7ea P |
680 | switch (p->data_size) { |
681 | case sizeof(int32_t): | |
682 | *val = *(const int32_t *)p->data; | |
683 | return 1; | |
684 | case sizeof(int64_t): | |
685 | *val = *(const int64_t *)p->data; | |
686 | return 1; | |
687 | } | |
e9c5e642 P |
688 | #endif |
689 | return general_get_int(p, val, sizeof(*val)); | |
9830e7ea | 690 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 P |
691 | #ifndef OPENSSL_SMALL_FOOTPRINT |
692 | uint64_t u64; | |
693 | ||
9830e7ea P |
694 | switch (p->data_size) { |
695 | case sizeof(uint32_t): | |
696 | *val = *(const uint32_t *)p->data; | |
697 | return 1; | |
698 | case sizeof(uint64_t): | |
699 | u64 = *(const uint64_t *)p->data; | |
700 | if (u64 <= INT64_MAX) { | |
701 | *val = (int64_t)u64; | |
702 | return 1; | |
703 | } | |
ac1082f0 | 704 | err_out_of_range; |
e9c5e642 | 705 | return 0; |
9830e7ea | 706 | } |
e9c5e642 P |
707 | #endif |
708 | return general_get_int(p, val, sizeof(*val)); | |
9830e7ea P |
709 | } else if (p->data_type == OSSL_PARAM_REAL) { |
710 | switch (p->data_size) { | |
711 | case sizeof(double): | |
712 | d = *(const double *)p->data; | |
5b1d94c1 P |
713 | if (d >= INT64_MIN |
714 | /* | |
715 | * By subtracting 65535 (2^16-1) we cancel the low order | |
716 | * 15 bits of INT64_MAX to avoid using imprecise floating | |
717 | * point values. | |
718 | */ | |
719 | && d < (double)(INT64_MAX - 65535) + 65536.0 | |
720 | && d == (int64_t)d) { | |
9830e7ea P |
721 | *val = (int64_t)d; |
722 | return 1; | |
723 | } | |
ac1082f0 P |
724 | err_inexact; |
725 | return 0; | |
9830e7ea | 726 | } |
ac1082f0 P |
727 | err_unsupported_real; |
728 | return 0; | |
7ffbd7ca | 729 | } |
ac1082f0 | 730 | err_bad_type; |
7ffbd7ca P |
731 | return 0; |
732 | } | |
733 | ||
4e7991b4 | 734 | int OSSL_PARAM_set_int64(OSSL_PARAM *p, int64_t val) |
7ffbd7ca | 735 | { |
9830e7ea P |
736 | uint64_t u64; |
737 | ||
ac1082f0 P |
738 | if (p == NULL) { |
739 | err_null_argument; | |
7ffbd7ca | 740 | return 0; |
ac1082f0 | 741 | } |
4e7991b4 | 742 | p->return_size = 0; |
9830e7ea | 743 | if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 | 744 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 745 | p->return_size = sizeof(int64_t); /* Expected size */ |
8f3b8fd6 RL |
746 | if (p->data == NULL) |
747 | return 1; | |
9830e7ea P |
748 | switch (p->data_size) { |
749 | case sizeof(int32_t): | |
750 | if (val >= INT32_MIN && val <= INT32_MAX) { | |
4e7991b4 | 751 | p->return_size = sizeof(int32_t); |
9830e7ea P |
752 | *(int32_t *)p->data = (int32_t)val; |
753 | return 1; | |
754 | } | |
ac1082f0 | 755 | err_out_of_range; |
e9c5e642 | 756 | return 0; |
9830e7ea P |
757 | case sizeof(int64_t): |
758 | *(int64_t *)p->data = val; | |
759 | return 1; | |
760 | } | |
e9c5e642 P |
761 | #endif |
762 | return general_set_int(p, &val, sizeof(val)); | |
9830e7ea | 763 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) { |
e9c5e642 | 764 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 765 | p->return_size = sizeof(uint64_t); /* Expected size */ |
8f3b8fd6 RL |
766 | if (p->data == NULL) |
767 | return 1; | |
9830e7ea P |
768 | switch (p->data_size) { |
769 | case sizeof(uint32_t): | |
770 | if (val <= UINT32_MAX) { | |
4e7991b4 | 771 | p->return_size = sizeof(uint32_t); |
9830e7ea P |
772 | *(uint32_t *)p->data = (uint32_t)val; |
773 | return 1; | |
774 | } | |
ac1082f0 | 775 | err_out_of_range; |
e9c5e642 | 776 | return 0; |
9830e7ea P |
777 | case sizeof(uint64_t): |
778 | *(uint64_t *)p->data = (uint64_t)val; | |
779 | return 1; | |
780 | } | |
e9c5e642 P |
781 | #endif |
782 | return general_set_int(p, &val, sizeof(val)); | |
9830e7ea | 783 | } else if (p->data_type == OSSL_PARAM_REAL) { |
4e7991b4 | 784 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
785 | if (p->data == NULL) |
786 | return 1; | |
9830e7ea P |
787 | switch (p->data_size) { |
788 | case sizeof(double): | |
789 | u64 = val < 0 ? -val : val; | |
5b1d94c1 | 790 | if ((u64 >> real_shift()) == 0) { |
9830e7ea P |
791 | *(double *)p->data = (double)val; |
792 | return 1; | |
793 | } | |
ac1082f0 P |
794 | err_inexact; |
795 | return 0; | |
9830e7ea | 796 | } |
ac1082f0 P |
797 | err_unsupported_real; |
798 | return 0; | |
7ffbd7ca | 799 | } |
ac1082f0 | 800 | err_bad_type; |
7ffbd7ca P |
801 | return 0; |
802 | } | |
803 | ||
4e7991b4 | 804 | OSSL_PARAM OSSL_PARAM_construct_int64(const char *key, int64_t *buf) |
7ffbd7ca | 805 | { |
4e7991b4 | 806 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int64_t)); |
7ffbd7ca P |
807 | } |
808 | ||
809 | int OSSL_PARAM_get_uint64(const OSSL_PARAM *p, uint64_t *val) | |
810 | { | |
9830e7ea P |
811 | double d; |
812 | ||
ac1082f0 P |
813 | if (val == NULL || p == NULL) { |
814 | err_null_argument; | |
7ffbd7ca | 815 | return 0; |
ac1082f0 | 816 | } |
7ffbd7ca | 817 | |
9830e7ea | 818 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 | 819 | #ifndef OPENSSL_SMALL_FOOTPRINT |
9830e7ea P |
820 | switch (p->data_size) { |
821 | case sizeof(uint32_t): | |
822 | *val = *(const uint32_t *)p->data; | |
823 | return 1; | |
824 | case sizeof(uint64_t): | |
825 | *val = *(const uint64_t *)p->data; | |
826 | return 1; | |
827 | } | |
e9c5e642 P |
828 | #endif |
829 | return general_get_uint(p, val, sizeof(*val)); | |
9830e7ea | 830 | } else if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 P |
831 | #ifndef OPENSSL_SMALL_FOOTPRINT |
832 | int32_t i32; | |
833 | int64_t i64; | |
834 | ||
9830e7ea P |
835 | switch (p->data_size) { |
836 | case sizeof(int32_t): | |
837 | i32 = *(const int32_t *)p->data; | |
838 | if (i32 >= 0) { | |
839 | *val = (uint64_t)i32; | |
840 | return 1; | |
841 | } | |
ac1082f0 | 842 | err_unsigned_negative; |
e9c5e642 | 843 | return 0; |
9830e7ea P |
844 | case sizeof(int64_t): |
845 | i64 = *(const int64_t *)p->data; | |
846 | if (i64 >= 0) { | |
847 | *val = (uint64_t)i64; | |
848 | return 1; | |
849 | } | |
ac1082f0 | 850 | err_unsigned_negative; |
e9c5e642 | 851 | return 0; |
9830e7ea | 852 | } |
e9c5e642 P |
853 | #endif |
854 | return general_get_uint(p, val, sizeof(*val)); | |
9830e7ea P |
855 | } else if (p->data_type == OSSL_PARAM_REAL) { |
856 | switch (p->data_size) { | |
857 | case sizeof(double): | |
858 | d = *(const double *)p->data; | |
5b1d94c1 P |
859 | if (d >= 0 |
860 | /* | |
861 | * By subtracting 65535 (2^16-1) we cancel the low order | |
862 | * 15 bits of UINT64_MAX to avoid using imprecise floating | |
863 | * point values. | |
864 | */ | |
865 | && d < (double)(UINT64_MAX - 65535) + 65536.0 | |
866 | && d == (uint64_t)d) { | |
9830e7ea P |
867 | *val = (uint64_t)d; |
868 | return 1; | |
869 | } | |
ac1082f0 P |
870 | err_inexact; |
871 | return 0; | |
9830e7ea | 872 | } |
ac1082f0 P |
873 | err_unsupported_real; |
874 | return 0; | |
7ffbd7ca | 875 | } |
ac1082f0 | 876 | err_bad_type; |
7ffbd7ca P |
877 | return 0; |
878 | } | |
879 | ||
4e7991b4 | 880 | int OSSL_PARAM_set_uint64(OSSL_PARAM *p, uint64_t val) |
7ffbd7ca | 881 | { |
ac1082f0 P |
882 | if (p == NULL) { |
883 | err_null_argument; | |
7ffbd7ca | 884 | return 0; |
ac1082f0 | 885 | } |
4e7991b4 | 886 | p->return_size = 0; |
7ffbd7ca | 887 | |
9830e7ea | 888 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
e9c5e642 | 889 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 890 | p->return_size = sizeof(uint64_t); /* Expected size */ |
8f3b8fd6 RL |
891 | if (p->data == NULL) |
892 | return 1; | |
9830e7ea P |
893 | switch (p->data_size) { |
894 | case sizeof(uint32_t): | |
895 | if (val <= UINT32_MAX) { | |
4e7991b4 | 896 | p->return_size = sizeof(uint32_t); |
9830e7ea P |
897 | *(uint32_t *)p->data = (uint32_t)val; |
898 | return 1; | |
899 | } | |
ac1082f0 | 900 | err_out_of_range; |
e9c5e642 | 901 | return 0; |
9830e7ea P |
902 | case sizeof(uint64_t): |
903 | *(uint64_t *)p->data = val; | |
904 | return 1; | |
905 | } | |
e9c5e642 P |
906 | #endif |
907 | return general_set_uint(p, &val, sizeof(val)); | |
9830e7ea | 908 | } else if (p->data_type == OSSL_PARAM_INTEGER) { |
e9c5e642 | 909 | #ifndef OPENSSL_SMALL_FOOTPRINT |
4e7991b4 | 910 | p->return_size = sizeof(int64_t); /* Expected size */ |
8f3b8fd6 RL |
911 | if (p->data == NULL) |
912 | return 1; | |
9830e7ea P |
913 | switch (p->data_size) { |
914 | case sizeof(int32_t): | |
915 | if (val <= INT32_MAX) { | |
4e7991b4 | 916 | p->return_size = sizeof(int32_t); |
9830e7ea P |
917 | *(int32_t *)p->data = (int32_t)val; |
918 | return 1; | |
919 | } | |
ac1082f0 | 920 | err_out_of_range; |
e9c5e642 | 921 | return 0; |
9830e7ea P |
922 | case sizeof(int64_t): |
923 | if (val <= INT64_MAX) { | |
924 | *(int64_t *)p->data = (int64_t)val; | |
925 | return 1; | |
926 | } | |
ac1082f0 | 927 | err_out_of_range; |
e9c5e642 | 928 | return 0; |
9830e7ea | 929 | } |
e9c5e642 P |
930 | #endif |
931 | return general_set_uint(p, &val, sizeof(val)); | |
9830e7ea | 932 | } else if (p->data_type == OSSL_PARAM_REAL) { |
4e7991b4 | 933 | p->return_size = sizeof(double); |
9830e7ea P |
934 | switch (p->data_size) { |
935 | case sizeof(double): | |
5b1d94c1 | 936 | if ((val >> real_shift()) == 0) { |
9830e7ea P |
937 | *(double *)p->data = (double)val; |
938 | return 1; | |
939 | } | |
ac1082f0 P |
940 | err_inexact; |
941 | return 0; | |
9830e7ea | 942 | } |
ac1082f0 P |
943 | err_unsupported_real; |
944 | return 0; | |
7ffbd7ca | 945 | } |
ac1082f0 | 946 | err_bad_type; |
7ffbd7ca P |
947 | return 0; |
948 | } | |
949 | ||
4e7991b4 P |
950 | OSSL_PARAM OSSL_PARAM_construct_uint64(const char *key, uint64_t *buf) |
951 | { | |
7ffbd7ca | 952 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, |
4e7991b4 | 953 | sizeof(uint64_t)); |
7ffbd7ca P |
954 | } |
955 | ||
956 | int OSSL_PARAM_get_size_t(const OSSL_PARAM *p, size_t *val) | |
957 | { | |
e9c5e642 | 958 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 959 | switch (sizeof(size_t)) { |
7ffbd7ca | 960 | case sizeof(uint32_t): |
863360fb | 961 | return OSSL_PARAM_get_uint32(p, (uint32_t *)val); |
7ffbd7ca | 962 | case sizeof(uint64_t): |
863360fb | 963 | return OSSL_PARAM_get_uint64(p, (uint64_t *)val); |
7ffbd7ca | 964 | } |
e9c5e642 P |
965 | #endif |
966 | return general_get_uint(p, val, sizeof(*val)); | |
7ffbd7ca P |
967 | } |
968 | ||
4e7991b4 | 969 | int OSSL_PARAM_set_size_t(OSSL_PARAM *p, size_t val) |
7ffbd7ca | 970 | { |
e9c5e642 | 971 | #ifndef OPENSSL_SMALL_FOOTPRINT |
863360fb | 972 | switch (sizeof(size_t)) { |
7ffbd7ca | 973 | case sizeof(uint32_t): |
863360fb | 974 | return OSSL_PARAM_set_uint32(p, (uint32_t)val); |
7ffbd7ca | 975 | case sizeof(uint64_t): |
863360fb | 976 | return OSSL_PARAM_set_uint64(p, (uint64_t)val); |
7ffbd7ca | 977 | } |
e9c5e642 P |
978 | #endif |
979 | return general_set_uint(p, &val, sizeof(val)); | |
7ffbd7ca P |
980 | } |
981 | ||
4e7991b4 | 982 | OSSL_PARAM OSSL_PARAM_construct_size_t(const char *key, size_t *buf) |
7ffbd7ca P |
983 | { |
984 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf, | |
4e7991b4 P |
985 | sizeof(size_t)); |
986 | } | |
7ffbd7ca | 987 | |
5fdaa38f P |
988 | int OSSL_PARAM_get_time_t(const OSSL_PARAM *p, time_t *val) |
989 | { | |
e9c5e642 | 990 | #ifndef OPENSSL_SMALL_FOOTPRINT |
5fdaa38f P |
991 | switch (sizeof(time_t)) { |
992 | case sizeof(int32_t): | |
993 | return OSSL_PARAM_get_int32(p, (int32_t *)val); | |
994 | case sizeof(int64_t): | |
995 | return OSSL_PARAM_get_int64(p, (int64_t *)val); | |
996 | } | |
e9c5e642 P |
997 | #endif |
998 | return general_get_int(p, val, sizeof(*val)); | |
5fdaa38f P |
999 | } |
1000 | ||
1001 | int OSSL_PARAM_set_time_t(OSSL_PARAM *p, time_t val) | |
1002 | { | |
e9c5e642 | 1003 | #ifndef OPENSSL_SMALL_FOOTPRINT |
5fdaa38f P |
1004 | switch (sizeof(time_t)) { |
1005 | case sizeof(int32_t): | |
1006 | return OSSL_PARAM_set_int32(p, (int32_t)val); | |
1007 | case sizeof(int64_t): | |
1008 | return OSSL_PARAM_set_int64(p, (int64_t)val); | |
1009 | } | |
e9c5e642 P |
1010 | #endif |
1011 | return general_set_int(p, &val, sizeof(val)); | |
5fdaa38f P |
1012 | } |
1013 | ||
1014 | OSSL_PARAM OSSL_PARAM_construct_time_t(const char *key, time_t *buf) | |
1015 | { | |
1016 | return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(time_t)); | |
1017 | } | |
1018 | ||
7ffbd7ca P |
1019 | int OSSL_PARAM_get_BN(const OSSL_PARAM *p, BIGNUM **val) |
1020 | { | |
f1719858 | 1021 | BIGNUM *b = NULL; |
7ffbd7ca | 1022 | |
ac1082f0 P |
1023 | if (val == NULL || p == NULL) { |
1024 | err_null_argument; | |
1025 | return 0; | |
1026 | } | |
f1719858 RL |
1027 | |
1028 | switch (p->data_type) { | |
1029 | case OSSL_PARAM_UNSIGNED_INTEGER: | |
1030 | b = BN_native2bn(p->data, (int)p->data_size, *val); | |
1031 | break; | |
1032 | case OSSL_PARAM_INTEGER: | |
1033 | b = BN_signed_native2bn(p->data, (int)p->data_size, *val); | |
1034 | break; | |
1035 | default: | |
ac1082f0 | 1036 | err_bad_type; |
f1719858 | 1037 | break; |
ac1082f0 | 1038 | } |
7ffbd7ca | 1039 | |
f1719858 RL |
1040 | if (b == NULL) { |
1041 | ERR_raise(ERR_LIB_CRYPTO, ERR_R_MALLOC_FAILURE); | |
1042 | return 0; | |
7ffbd7ca | 1043 | } |
f1719858 RL |
1044 | |
1045 | *val = b; | |
1046 | return 1; | |
7ffbd7ca P |
1047 | } |
1048 | ||
4e7991b4 | 1049 | int OSSL_PARAM_set_BN(OSSL_PARAM *p, const BIGNUM *val) |
7ffbd7ca P |
1050 | { |
1051 | size_t bytes; | |
1052 | ||
ac1082f0 P |
1053 | if (p == NULL) { |
1054 | err_null_argument; | |
7ffbd7ca | 1055 | return 0; |
ac1082f0 | 1056 | } |
4e7991b4 | 1057 | p->return_size = 0; |
ac1082f0 P |
1058 | if (val == NULL) { |
1059 | err_null_argument; | |
7ffbd7ca | 1060 | return 0; |
ac1082f0 | 1061 | } |
f1719858 | 1062 | if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && BN_is_negative(val)) { |
ac1082f0 P |
1063 | err_bad_type; |
1064 | return 0; | |
1065 | } | |
7ffbd7ca P |
1066 | |
1067 | bytes = (size_t)BN_num_bytes(val); | |
f1719858 RL |
1068 | /* We add 1 byte for signed numbers, to make space for a sign extension */ |
1069 | if (p->data_type == OSSL_PARAM_INTEGER) | |
1070 | bytes++; | |
1071 | ||
4e7991b4 | 1072 | p->return_size = bytes; |
8f3b8fd6 RL |
1073 | if (p->data == NULL) |
1074 | return 1; | |
0f73e719 RL |
1075 | if (p->data_size >= bytes) { |
1076 | p->return_size = p->data_size; | |
f1719858 RL |
1077 | |
1078 | switch (p->data_type) { | |
1079 | case OSSL_PARAM_UNSIGNED_INTEGER: | |
1080 | if (BN_bn2nativepad(val, p->data, p->data_size) >= 0) | |
1081 | return 1; | |
1082 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_INTEGER_OVERFLOW); | |
1083 | break; | |
1084 | case OSSL_PARAM_INTEGER: | |
1085 | if (BN_signed_bn2native(val, p->data, p->data_size) >= 0) | |
1086 | return 1; | |
1087 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_INTEGER_OVERFLOW); | |
1088 | break; | |
1089 | default: | |
1090 | err_bad_type; | |
1091 | break; | |
1092 | } | |
ac1082f0 | 1093 | return 0; |
0f73e719 | 1094 | } |
ac1082f0 | 1095 | err_too_small; |
0f73e719 | 1096 | return 0; |
7ffbd7ca P |
1097 | } |
1098 | ||
1099 | OSSL_PARAM OSSL_PARAM_construct_BN(const char *key, unsigned char *buf, | |
4e7991b4 | 1100 | size_t bsize) |
7ffbd7ca P |
1101 | { |
1102 | return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, | |
4e7991b4 | 1103 | buf, bsize); |
7ffbd7ca P |
1104 | } |
1105 | ||
1106 | int OSSL_PARAM_get_double(const OSSL_PARAM *p, double *val) | |
1107 | { | |
9830e7ea P |
1108 | int64_t i64; |
1109 | uint64_t u64; | |
1110 | ||
ac1082f0 P |
1111 | if (val == NULL || p == NULL) { |
1112 | err_null_argument; | |
7ffbd7ca | 1113 | return 0; |
ac1082f0 | 1114 | } |
7ffbd7ca | 1115 | |
9830e7ea P |
1116 | if (p->data_type == OSSL_PARAM_REAL) { |
1117 | switch (p->data_size) { | |
1118 | case sizeof(double): | |
1119 | *val = *(const double *)p->data; | |
1120 | return 1; | |
1121 | } | |
ac1082f0 P |
1122 | err_unsupported_real; |
1123 | return 0; | |
9830e7ea P |
1124 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { |
1125 | switch (p->data_size) { | |
1126 | case sizeof(uint32_t): | |
1127 | *val = *(const uint32_t *)p->data; | |
1128 | return 1; | |
1129 | case sizeof(uint64_t): | |
1130 | u64 = *(const uint64_t *)p->data; | |
5b1d94c1 | 1131 | if ((u64 >> real_shift()) == 0) { |
9830e7ea P |
1132 | *val = (double)u64; |
1133 | return 1; | |
1134 | } | |
ac1082f0 P |
1135 | err_inexact; |
1136 | return 0; | |
9830e7ea P |
1137 | } |
1138 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
1139 | switch (p->data_size) { | |
1140 | case sizeof(int32_t): | |
1141 | *val = *(const int32_t *)p->data; | |
1142 | return 1; | |
1143 | case sizeof(int64_t): | |
1144 | i64 = *(const int64_t *)p->data; | |
1145 | u64 = i64 < 0 ? -i64 : i64; | |
5b1d94c1 | 1146 | if ((u64 >> real_shift()) == 0) { |
9830e7ea P |
1147 | *val = 0.0 + i64; |
1148 | return 1; | |
1149 | } | |
ac1082f0 P |
1150 | err_inexact; |
1151 | return 0; | |
9830e7ea | 1152 | } |
7ffbd7ca | 1153 | } |
ac1082f0 | 1154 | err_bad_type; |
7ffbd7ca P |
1155 | return 0; |
1156 | } | |
1157 | ||
4e7991b4 | 1158 | int OSSL_PARAM_set_double(OSSL_PARAM *p, double val) |
7ffbd7ca | 1159 | { |
ac1082f0 P |
1160 | if (p == NULL) { |
1161 | err_null_argument; | |
7ffbd7ca | 1162 | return 0; |
ac1082f0 | 1163 | } |
4e7991b4 | 1164 | p->return_size = 0; |
7ffbd7ca | 1165 | |
9830e7ea | 1166 | if (p->data_type == OSSL_PARAM_REAL) { |
4e7991b4 | 1167 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
1168 | if (p->data == NULL) |
1169 | return 1; | |
9830e7ea P |
1170 | switch (p->data_size) { |
1171 | case sizeof(double): | |
1172 | *(double *)p->data = val; | |
1173 | return 1; | |
1174 | } | |
ac1082f0 P |
1175 | err_unsupported_real; |
1176 | return 0; | |
1177 | } else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) { | |
4e7991b4 | 1178 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
1179 | if (p->data == NULL) |
1180 | return 1; | |
ac1082f0 P |
1181 | if (val != (uint64_t)val) { |
1182 | err_inexact; | |
1183 | return 0; | |
1184 | } | |
9830e7ea P |
1185 | switch (p->data_size) { |
1186 | case sizeof(uint32_t): | |
1187 | if (val >= 0 && val <= UINT32_MAX) { | |
4e7991b4 | 1188 | p->return_size = sizeof(uint32_t); |
9830e7ea P |
1189 | *(uint32_t *)p->data = (uint32_t)val; |
1190 | return 1; | |
1191 | } | |
ac1082f0 P |
1192 | err_out_of_range; |
1193 | return 0; | |
9830e7ea | 1194 | case sizeof(uint64_t): |
5b1d94c1 P |
1195 | if (val >= 0 |
1196 | /* | |
1197 | * By subtracting 65535 (2^16-1) we cancel the low order | |
1198 | * 15 bits of UINT64_MAX to avoid using imprecise floating | |
1199 | * point values. | |
1200 | */ | |
b9d022d7 | 1201 | && val < (double)(UINT64_MAX - 65535) + 65536.0) { |
4e7991b4 | 1202 | p->return_size = sizeof(uint64_t); |
9830e7ea P |
1203 | *(uint64_t *)p->data = (uint64_t)val; |
1204 | return 1; | |
1205 | } | |
ac1082f0 P |
1206 | err_out_of_range; |
1207 | return 0; | |
1208 | } | |
1209 | } else if (p->data_type == OSSL_PARAM_INTEGER) { | |
4e7991b4 | 1210 | p->return_size = sizeof(double); |
8f3b8fd6 RL |
1211 | if (p->data == NULL) |
1212 | return 1; | |
ac1082f0 P |
1213 | if (val != (int64_t)val) { |
1214 | err_inexact; | |
1215 | return 0; | |
1216 | } | |
9830e7ea P |
1217 | switch (p->data_size) { |
1218 | case sizeof(int32_t): | |
1219 | if (val >= INT32_MIN && val <= INT32_MAX) { | |
4e7991b4 | 1220 | p->return_size = sizeof(int32_t); |
9830e7ea P |
1221 | *(int32_t *)p->data = (int32_t)val; |
1222 | return 1; | |
1223 | } | |
ac1082f0 P |
1224 | err_out_of_range; |
1225 | return 0; | |
9830e7ea | 1226 | case sizeof(int64_t): |
5b1d94c1 P |
1227 | if (val >= INT64_MIN |
1228 | /* | |
1229 | * By subtracting 65535 (2^16-1) we cancel the low order | |
1230 | * 15 bits of INT64_MAX to avoid using imprecise floating | |
1231 | * point values. | |
1232 | */ | |
1233 | && val < (double)(INT64_MAX - 65535) + 65536.0) { | |
4e7991b4 | 1234 | p->return_size = sizeof(int64_t); |
9830e7ea P |
1235 | *(int64_t *)p->data = (int64_t)val; |
1236 | return 1; | |
1237 | } | |
ac1082f0 P |
1238 | err_out_of_range; |
1239 | return 0; | |
9830e7ea | 1240 | } |
7ffbd7ca | 1241 | } |
ac1082f0 | 1242 | err_bad_type; |
7ffbd7ca P |
1243 | return 0; |
1244 | } | |
1245 | ||
4e7991b4 | 1246 | OSSL_PARAM OSSL_PARAM_construct_double(const char *key, double *buf) |
7ffbd7ca | 1247 | { |
4e7991b4 | 1248 | return ossl_param_construct(key, OSSL_PARAM_REAL, buf, sizeof(double)); |
7ffbd7ca P |
1249 | } |
1250 | ||
247a1786 RL |
1251 | static int get_string_internal(const OSSL_PARAM *p, void **val, |
1252 | size_t *max_len, size_t *used_len, | |
1253 | unsigned int type) | |
7ffbd7ca | 1254 | { |
247a1786 | 1255 | size_t sz, alloc_sz; |
7ffbd7ca | 1256 | |
ac1082f0 P |
1257 | if ((val == NULL && used_len == NULL) || p == NULL) { |
1258 | err_null_argument; | |
1259 | return 0; | |
1260 | } | |
1261 | if (p->data_type != type) { | |
1262 | err_bad_type; | |
7ffbd7ca | 1263 | return 0; |
ac1082f0 | 1264 | } |
7ffbd7ca P |
1265 | |
1266 | sz = p->data_size; | |
247a1786 RL |
1267 | /* |
1268 | * If the input size is 0, or the input string needs NUL byte | |
1269 | * termination, allocate an extra byte. | |
1270 | */ | |
1271 | alloc_sz = sz + (type == OSSL_PARAM_UTF8_STRING || sz == 0); | |
7ffbd7ca P |
1272 | |
1273 | if (used_len != NULL) | |
1274 | *used_len = sz; | |
1275 | ||
ac1082f0 P |
1276 | if (p->data == NULL) { |
1277 | err_null_argument; | |
86f32187 | 1278 | return 0; |
ac1082f0 | 1279 | } |
46ef075a | 1280 | |
b756626a MC |
1281 | if (val == NULL) |
1282 | return 1; | |
1283 | ||
7ffbd7ca | 1284 | if (*val == NULL) { |
247a1786 | 1285 | char *const q = OPENSSL_malloc(alloc_sz); |
7ffbd7ca | 1286 | |
ac1082f0 P |
1287 | if (q == NULL) { |
1288 | ERR_raise(ERR_LIB_CRYPTO, ERR_R_MALLOC_FAILURE); | |
7ffbd7ca | 1289 | return 0; |
ac1082f0 | 1290 | } |
7ffbd7ca | 1291 | *val = q; |
247a1786 | 1292 | *max_len = alloc_sz; |
7ffbd7ca | 1293 | } |
247a1786 | 1294 | |
ac1082f0 P |
1295 | if (*max_len < sz) { |
1296 | err_too_small; | |
7ffbd7ca | 1297 | return 0; |
ac1082f0 | 1298 | } |
7ffbd7ca P |
1299 | memcpy(*val, p->data, sz); |
1300 | return 1; | |
1301 | } | |
1302 | ||
1303 | int OSSL_PARAM_get_utf8_string(const OSSL_PARAM *p, char **val, size_t max_len) | |
1304 | { | |
247a1786 RL |
1305 | int ret = get_string_internal(p, (void **)val, &max_len, NULL, |
1306 | OSSL_PARAM_UTF8_STRING); | |
1307 | ||
1308 | /* | |
1309 | * We try to ensure that the copied string is terminated with a | |
1310 | * NUL byte. That should be easy, just place a NUL byte at | |
1311 | * |((char*)*val)[p->data_size]|. | |
1312 | * Unfortunately, we have seen cases where |p->data_size| doesn't | |
1313 | * correctly reflect the length of the string, and just happens | |
1314 | * to be out of bounds according to |max_len|, so in that case, we | |
1315 | * make the extra step of trying to find the true length of the | |
1316 | * string that |p->data| points at, and use that as an index to | |
1317 | * place the NUL byte in |*val|. | |
1318 | */ | |
1319 | size_t data_length = p->data_size; | |
1320 | ||
1fac2705 TM |
1321 | if (ret == 0) |
1322 | return 0; | |
247a1786 RL |
1323 | if (data_length >= max_len) |
1324 | data_length = OPENSSL_strnlen(p->data, data_length); | |
ac1082f0 P |
1325 | if (data_length >= max_len) { |
1326 | ERR_raise(ERR_LIB_CRYPTO, CRYPTO_R_NO_SPACE_FOR_TERMINATING_NULL); | |
247a1786 | 1327 | return 0; /* No space for a terminating NUL byte */ |
ac1082f0 | 1328 | } |
1fac2705 | 1329 | (*val)[data_length] = '\0'; |
247a1786 RL |
1330 | |
1331 | return ret; | |
7ffbd7ca P |
1332 | } |
1333 | ||
1334 | int OSSL_PARAM_get_octet_string(const OSSL_PARAM *p, void **val, size_t max_len, | |
1335 | size_t *used_len) | |
1336 | { | |
247a1786 | 1337 | return get_string_internal(p, val, &max_len, used_len, |
7ffbd7ca P |
1338 | OSSL_PARAM_OCTET_STRING); |
1339 | } | |
1340 | ||
4e7991b4 | 1341 | static int set_string_internal(OSSL_PARAM *p, const void *val, size_t len, |
7ffbd7ca P |
1342 | unsigned int type) |
1343 | { | |
4e7991b4 | 1344 | p->return_size = len; |
8f3b8fd6 RL |
1345 | if (p->data == NULL) |
1346 | return 1; | |
ac1082f0 P |
1347 | if (p->data_type != type) { |
1348 | err_bad_type; | |
7ffbd7ca | 1349 | return 0; |
ac1082f0 P |
1350 | } |
1351 | if (p->data_size < len) { | |
1352 | err_too_small; | |
1353 | return 0; | |
1354 | } | |
7ffbd7ca P |
1355 | |
1356 | memcpy(p->data, val, len); | |
247a1786 RL |
1357 | /* If possible within the size of p->data, add a NUL terminator byte */ |
1358 | if (type == OSSL_PARAM_UTF8_STRING && p->data_size > len) | |
1359 | ((char *)p->data)[len] = '\0'; | |
7ffbd7ca P |
1360 | return 1; |
1361 | } | |
1362 | ||
4e7991b4 | 1363 | int OSSL_PARAM_set_utf8_string(OSSL_PARAM *p, const char *val) |
7ffbd7ca | 1364 | { |
ac1082f0 P |
1365 | if (p == NULL) { |
1366 | err_null_argument; | |
7ffbd7ca | 1367 | return 0; |
ac1082f0 | 1368 | } |
7ffbd7ca | 1369 | |
4e7991b4 | 1370 | p->return_size = 0; |
ac1082f0 P |
1371 | if (val == NULL) { |
1372 | err_null_argument; | |
7ffbd7ca | 1373 | return 0; |
ac1082f0 | 1374 | } |
247a1786 | 1375 | return set_string_internal(p, val, strlen(val), OSSL_PARAM_UTF8_STRING); |
7ffbd7ca P |
1376 | } |
1377 | ||
4e7991b4 | 1378 | int OSSL_PARAM_set_octet_string(OSSL_PARAM *p, const void *val, |
7ffbd7ca P |
1379 | size_t len) |
1380 | { | |
ac1082f0 P |
1381 | if (p == NULL) { |
1382 | err_null_argument; | |
7ffbd7ca | 1383 | return 0; |
ac1082f0 | 1384 | } |
7ffbd7ca | 1385 | |
4e7991b4 | 1386 | p->return_size = 0; |
ac1082f0 P |
1387 | if (val == NULL) { |
1388 | err_null_argument; | |
7ffbd7ca | 1389 | return 0; |
ac1082f0 | 1390 | } |
7ffbd7ca P |
1391 | return set_string_internal(p, val, len, OSSL_PARAM_OCTET_STRING); |
1392 | } | |
1393 | ||
1394 | OSSL_PARAM OSSL_PARAM_construct_utf8_string(const char *key, char *buf, | |
4e7991b4 | 1395 | size_t bsize) |
7ffbd7ca | 1396 | { |
7f588d20 | 1397 | if (buf != NULL && bsize == 0) |
247a1786 | 1398 | bsize = strlen(buf); |
4e7991b4 | 1399 | return ossl_param_construct(key, OSSL_PARAM_UTF8_STRING, buf, bsize); |
7ffbd7ca P |
1400 | } |
1401 | ||
1402 | OSSL_PARAM OSSL_PARAM_construct_octet_string(const char *key, void *buf, | |
4e7991b4 | 1403 | size_t bsize) |
7ffbd7ca | 1404 | { |
4e7991b4 | 1405 | return ossl_param_construct(key, OSSL_PARAM_OCTET_STRING, buf, bsize); |
7ffbd7ca P |
1406 | } |
1407 | ||
1408 | static int get_ptr_internal(const OSSL_PARAM *p, const void **val, | |
1409 | size_t *used_len, unsigned int type) | |
1410 | { | |
ac1082f0 P |
1411 | if (val == NULL || p == NULL) { |
1412 | err_null_argument; | |
1413 | return 0; | |
1414 | } | |
1415 | if (p->data_type != type) { | |
1416 | err_bad_type; | |
7ffbd7ca | 1417 | return 0; |
ac1082f0 | 1418 | } |
7ffbd7ca P |
1419 | if (used_len != NULL) |
1420 | *used_len = p->data_size; | |
1421 | *val = *(const void **)p->data; | |
1422 | return 1; | |
1423 | } | |
1424 | ||
1425 | int OSSL_PARAM_get_utf8_ptr(const OSSL_PARAM *p, const char **val) | |
1426 | { | |
1427 | return get_ptr_internal(p, (const void **)val, NULL, OSSL_PARAM_UTF8_PTR); | |
1428 | } | |
1429 | ||
1430 | int OSSL_PARAM_get_octet_ptr(const OSSL_PARAM *p, const void **val, | |
1431 | size_t *used_len) | |
1432 | { | |
1433 | return get_ptr_internal(p, val, used_len, OSSL_PARAM_OCTET_PTR); | |
1434 | } | |
1435 | ||
4e7991b4 | 1436 | static int set_ptr_internal(OSSL_PARAM *p, const void *val, |
7ffbd7ca P |
1437 | unsigned int type, size_t len) |
1438 | { | |
4e7991b4 | 1439 | p->return_size = len; |
ac1082f0 P |
1440 | if (p->data_type != type) { |
1441 | err_bad_type; | |
7ffbd7ca | 1442 | return 0; |
ac1082f0 | 1443 | } |
8f3b8fd6 RL |
1444 | if (p->data != NULL) |
1445 | *(const void **)p->data = val; | |
7ffbd7ca P |
1446 | return 1; |
1447 | } | |
1448 | ||
4e7991b4 | 1449 | int OSSL_PARAM_set_utf8_ptr(OSSL_PARAM *p, const char *val) |
7ffbd7ca | 1450 | { |
ac1082f0 P |
1451 | if (p == NULL) { |
1452 | err_null_argument; | |
7ffbd7ca | 1453 | return 0; |
ac1082f0 | 1454 | } |
4e7991b4 | 1455 | p->return_size = 0; |
b3f3ba70 | 1456 | return set_ptr_internal(p, val, OSSL_PARAM_UTF8_PTR, |
247a1786 | 1457 | val == NULL ? 0 : strlen(val)); |
7ffbd7ca P |
1458 | } |
1459 | ||
4e7991b4 | 1460 | int OSSL_PARAM_set_octet_ptr(OSSL_PARAM *p, const void *val, |
7ffbd7ca P |
1461 | size_t used_len) |
1462 | { | |
ac1082f0 P |
1463 | if (p == NULL) { |
1464 | err_null_argument; | |
7ffbd7ca | 1465 | return 0; |
ac1082f0 | 1466 | } |
4e7991b4 | 1467 | p->return_size = 0; |
7ffbd7ca P |
1468 | return set_ptr_internal(p, val, OSSL_PARAM_OCTET_PTR, used_len); |
1469 | } | |
1470 | ||
1471 | OSSL_PARAM OSSL_PARAM_construct_utf8_ptr(const char *key, char **buf, | |
4e7991b4 | 1472 | size_t bsize) |
7ffbd7ca | 1473 | { |
4e7991b4 | 1474 | return ossl_param_construct(key, OSSL_PARAM_UTF8_PTR, buf, bsize); |
7ffbd7ca P |
1475 | } |
1476 | ||
1477 | OSSL_PARAM OSSL_PARAM_construct_octet_ptr(const char *key, void **buf, | |
4e7991b4 | 1478 | size_t bsize) |
7ffbd7ca | 1479 | { |
4e7991b4 | 1480 | return ossl_param_construct(key, OSSL_PARAM_OCTET_PTR, buf, bsize); |
7ffbd7ca | 1481 | } |
195852fe RL |
1482 | |
1483 | OSSL_PARAM OSSL_PARAM_construct_end(void) | |
1484 | { | |
1485 | OSSL_PARAM end = OSSL_PARAM_END; | |
1486 | ||
1487 | return end; | |
1488 | } | |
ab00ddb5 RL |
1489 | |
1490 | static int get_string_ptr_internal(const OSSL_PARAM *p, const void **val, | |
1491 | size_t *used_len, unsigned int type) | |
1492 | { | |
ac1082f0 P |
1493 | if (val == NULL || p == NULL) { |
1494 | err_null_argument; | |
ab00ddb5 | 1495 | return 0; |
ac1082f0 P |
1496 | } |
1497 | if (p->data_type != type) { | |
1498 | err_bad_type; | |
1499 | return 0; | |
1500 | } | |
ab00ddb5 RL |
1501 | if (used_len != NULL) |
1502 | *used_len = p->data_size; | |
1503 | *val = p->data; | |
1504 | return 1; | |
1505 | } | |
1506 | ||
1507 | int OSSL_PARAM_get_utf8_string_ptr(const OSSL_PARAM *p, const char **val) | |
1508 | { | |
327a720d TM |
1509 | int rv; |
1510 | ||
1511 | ERR_set_mark(); | |
1512 | rv = OSSL_PARAM_get_utf8_ptr(p, val); | |
1513 | ERR_pop_to_mark(); | |
1514 | ||
1515 | return rv || get_string_ptr_internal(p, (const void **)val, NULL, | |
1516 | OSSL_PARAM_UTF8_STRING); | |
ab00ddb5 RL |
1517 | } |
1518 | ||
1519 | int OSSL_PARAM_get_octet_string_ptr(const OSSL_PARAM *p, const void **val, | |
1520 | size_t *used_len) | |
1521 | { | |
327a720d TM |
1522 | int rv; |
1523 | ||
1524 | ERR_set_mark(); | |
1525 | rv = OSSL_PARAM_get_octet_ptr(p, val, used_len); | |
1526 | ERR_pop_to_mark(); | |
1527 | ||
1528 | return rv || get_string_ptr_internal(p, val, used_len, | |
1529 | OSSL_PARAM_OCTET_STRING); | |
ab00ddb5 | 1530 | } |