1 /*
2 * Copyright 2019-2024 The OpenSSL Project Authors. All Rights Reserved.
3 *
4 * Licensed under the Apache License 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at
7 * https://www.openssl.org/source/license.html
8 * or in the file LICENSE in the source distribution.
9 */
10
11 /*
12 * This program tests the use of OSSL_PARAM, currently in raw form.
13 */
14
15 #include <string.h>
16 #include <openssl/bn.h>
17 #include <openssl/core.h>
18 #include <openssl/err.h>
19 #include <openssl/params.h>
20 #include "internal/numbers.h"
21 #include "internal/nelem.h"
22 #include "testutil.h"
23
24 /*-
25 * PROVIDER SECTION
26 * ================
27 *
28 * Even though it's not necessarily ONLY providers doing this part,
29 * they are naturally going to be the most common users of
30 * set_params and get_params functions.
31 */
32
33 /*
34 * In real use cases, setters and getters would take an object with
35 * which the parameters are associated. This structure is a cheap
36 * simulation.
37 */
38 struct object_st {
39 /*
40 * Documented as a native integer, of the size given by sizeof(int).
41 * Assumed data type OSSL_PARAM_INTEGER
42 */
43 int p1;
44 /*
45 * Documented as a native double, of the size given by sizeof(double).
46 * Assumed data type OSSL_PARAM_REAL
47 */
48 double p2;
49 /*
50 * Documented as an arbitrarly large unsigned integer.
51 * The data size must be large enough to accommodate.
52 * Assumed data type OSSL_PARAM_UNSIGNED_INTEGER
53 */
54 BIGNUM *p3;
55 /*
56 * Documented as a C string.
57 * The data size must be large enough to accommodate.
58 * Assumed data type OSSL_PARAM_UTF8_STRING
59 */
60 char *p4;
61 size_t p4_l;
62 /*
63 * Documented as a C string.
64 * Assumed data type OSSL_PARAM_UTF8_STRING
65 */
66 char p5[256];
67 size_t p5_l;
68 /*
69 * Documented as a pointer to a constant C string.
70 * Assumed data type OSSL_PARAM_UTF8_PTR
71 */
72 const char *p6;
73 size_t p6_l;
74 };
75
76 #define p1_init 42 /* The ultimate answer */
77 #define p2_init 6.283 /* Magic number */
78 /* Stolen from evp_data, BLAKE2s256 test */
79 #define p3_init \
80 "4142434445464748494a4b4c4d4e4f50" \
81 "5152535455565758595a616263646566" \
82 "6768696a6b6c6d6e6f70717273747576" \
83 "7778797a30313233343536373839"
84 #define p4_init "BLAKE2s256" /* Random string */
85 #define p5_init "Hellow World" /* Random string */
86 #define p6_init OPENSSL_FULL_VERSION_STR /* Static string */
87
cleanup_object(void * vobj)88 static void cleanup_object(void *vobj)
89 {
90 struct object_st *obj = vobj;
91
92 BN_free(obj->p3);
93 obj->p3 = NULL;
94 OPENSSL_free(obj->p4);
95 obj->p4 = NULL;
96 OPENSSL_free(obj);
97 }
98
init_object(void)99 static void *init_object(void)
100 {
101 struct object_st *obj;
102
103 if (!TEST_ptr(obj = OPENSSL_zalloc(sizeof(*obj))))
104 return NULL;
105
106 obj->p1 = p1_init;
107 obj->p2 = p2_init;
108 if (!TEST_true(BN_hex2bn(&obj->p3, p3_init)))
109 goto fail;
110 if (!TEST_ptr(obj->p4 = OPENSSL_strdup(p4_init)))
111 goto fail;
112 strcpy(obj->p5, p5_init);
113 obj->p6 = p6_init;
114
115 return obj;
116 fail:
117 cleanup_object(obj);
118 obj = NULL;
119
120 return NULL;
121 }
122
123 /*
124 * RAW provider, which handles the parameters in a very raw manner,
125 * with no fancy API and very minimal checking. The application that
126 * calls these to set or request parameters MUST get its OSSL_PARAM
127 * array right.
128 */
129
raw_set_params(void * vobj,const OSSL_PARAM * params)130 static int raw_set_params(void *vobj, const OSSL_PARAM *params)
131 {
132 struct object_st *obj = vobj;
133
134 for (; params->key != NULL; params++)
135 if (strcmp(params->key, "p1") == 0) {
136 obj->p1 = *(int *)params->data;
137 } else if (strcmp(params->key, "p2") == 0) {
138 obj->p2 = *(double *)params->data;
139 } else if (strcmp(params->key, "p3") == 0) {
140 BN_free(obj->p3);
141 if (!TEST_ptr(obj->p3 = BN_native2bn(params->data,
142 params->data_size, NULL)))
143 return 0;
144 } else if (strcmp(params->key, "p4") == 0) {
145 OPENSSL_free(obj->p4);
146 if (!TEST_ptr(obj->p4 = OPENSSL_strndup(params->data,
147 params->data_size)))
148 return 0;
149 obj->p4_l = strlen(obj->p4);
150 } else if (strcmp(params->key, "p5") == 0) {
151 /*
152 * Protect obj->p5 against too much data. This should not
153 * happen, we don't use that long strings.
154 */
155 size_t data_length =
156 OPENSSL_strnlen(params->data, params->data_size);
157
158 if (!TEST_size_t_lt(data_length, sizeof(obj->p5)))
159 return 0;
160 strncpy(obj->p5, params->data, data_length);
161 obj->p5[data_length] = '\0';
162 obj->p5_l = strlen(obj->p5);
163 } else if (strcmp(params->key, "p6") == 0) {
164 obj->p6 = *(const char **)params->data;
165 obj->p6_l = params->data_size;
166 }
167
168 return 1;
169 }
170
raw_get_params(void * vobj,OSSL_PARAM * params)171 static int raw_get_params(void *vobj, OSSL_PARAM *params)
172 {
173 struct object_st *obj = vobj;
174
175 for (; params->key != NULL; params++)
176 if (strcmp(params->key, "p1") == 0) {
177 params->return_size = sizeof(obj->p1);
178 *(int *)params->data = obj->p1;
179 } else if (strcmp(params->key, "p2") == 0) {
180 params->return_size = sizeof(obj->p2);
181 *(double *)params->data = obj->p2;
182 } else if (strcmp(params->key, "p3") == 0) {
183 params->return_size = BN_num_bytes(obj->p3);
184 if (!TEST_size_t_ge(params->data_size, params->return_size))
185 return 0;
186 BN_bn2nativepad(obj->p3, params->data, params->return_size);
187 } else if (strcmp(params->key, "p4") == 0) {
188 params->return_size = strlen(obj->p4);
189 if (!TEST_size_t_gt(params->data_size, params->return_size))
190 return 0;
191 strcpy(params->data, obj->p4);
192 } else if (strcmp(params->key, "p5") == 0) {
193 params->return_size = strlen(obj->p5);
194 if (!TEST_size_t_gt(params->data_size, params->return_size))
195 return 0;
196 strcpy(params->data, obj->p5);
197 } else if (strcmp(params->key, "p6") == 0) {
198 params->return_size = strlen(obj->p6);
199 *(const char **)params->data = obj->p6;
200 }
201
202 return 1;
203 }
204
205 /*
206 * API provider, which handles the parameters using the API from params.h
207 */
208
api_set_params(void * vobj,const OSSL_PARAM * params)209 static int api_set_params(void *vobj, const OSSL_PARAM *params)
210 {
211 struct object_st *obj = vobj;
212 const OSSL_PARAM *p = NULL;
213
214 if ((p = OSSL_PARAM_locate_const(params, "p1")) != NULL
215 && !TEST_true(OSSL_PARAM_get_int(p, &obj->p1)))
216 return 0;
217 if ((p = OSSL_PARAM_locate_const(params, "p2")) != NULL
218 && !TEST_true(OSSL_PARAM_get_double(p, &obj->p2)))
219 return 0;
220 if ((p = OSSL_PARAM_locate_const(params, "p3")) != NULL
221 && !TEST_true(OSSL_PARAM_get_BN(p, &obj->p3)))
222 return 0;
223 if ((p = OSSL_PARAM_locate_const(params, "p4")) != NULL) {
224 OPENSSL_free(obj->p4);
225 obj->p4 = NULL;
226 /* If the value pointer is NULL, we get it automatically allocated */
227 if (!TEST_true(OSSL_PARAM_get_utf8_string(p, &obj->p4, 0)))
228 return 0;
229 }
230 if ((p = OSSL_PARAM_locate_const(params, "p5")) != NULL) {
231 char *p5_ptr = obj->p5;
232 if (!TEST_true(OSSL_PARAM_get_utf8_string(p, &p5_ptr, sizeof(obj->p5))))
233 return 0;
234 obj->p5_l = strlen(obj->p5);
235 }
236 if ((p = OSSL_PARAM_locate_const(params, "p6")) != NULL) {
237 if (!TEST_true(OSSL_PARAM_get_utf8_ptr(p, &obj->p6)))
238 return 0;
239 obj->p6_l = strlen(obj->p6);
240 }
241
242 return 1;
243 }
244
api_get_params(void * vobj,OSSL_PARAM * params)245 static int api_get_params(void *vobj, OSSL_PARAM *params)
246 {
247 struct object_st *obj = vobj;
248 OSSL_PARAM *p = NULL;
249
250 if ((p = OSSL_PARAM_locate(params, "p1")) != NULL
251 && !TEST_true(OSSL_PARAM_set_int(p, obj->p1)))
252 return 0;
253 if ((p = OSSL_PARAM_locate(params, "p2")) != NULL
254 && !TEST_true(OSSL_PARAM_set_double(p, obj->p2)))
255 return 0;
256 if ((p = OSSL_PARAM_locate(params, "p3")) != NULL
257 && !TEST_true(OSSL_PARAM_set_BN(p, obj->p3)))
258 return 0;
259 if ((p = OSSL_PARAM_locate(params, "p4")) != NULL
260 && !TEST_true(OSSL_PARAM_set_utf8_string(p, obj->p4)))
261 return 0;
262 if ((p = OSSL_PARAM_locate(params, "p5")) != NULL
263 && !TEST_true(OSSL_PARAM_set_utf8_string(p, obj->p5)))
264 return 0;
265 if ((p = OSSL_PARAM_locate(params, "p6")) != NULL
266 && !TEST_true(OSSL_PARAM_set_utf8_ptr(p, obj->p6)))
267 return 0;
268
269 return 1;
270 }
271
272 /*
273 * This structure only simulates a provider dispatch, the real deal is
274 * a bit more code that's not necessary in these tests.
275 */
276 struct provider_dispatch_st {
277 int (*set_params)(void *obj, const OSSL_PARAM *params);
278 int (*get_params)(void *obj, OSSL_PARAM *params);
279 };
280
281 /* "raw" provider */
282 static const struct provider_dispatch_st provider_raw = {
283 raw_set_params, raw_get_params
284 };
285
286 /* "api" provider */
287 static const struct provider_dispatch_st provider_api = {
288 api_set_params, api_get_params
289 };
290
291 /*-
292 * APPLICATION SECTION
293 * ===================
294 */
295
296 /* In all our tests, these are variables that get manipulated as parameters
297 *
298 * These arrays consistently do nothing with the "p2" parameter, and
299 * always include a "foo" parameter. This is to check that the
300 * set_params and get_params calls ignore the lack of parameters that
301 * the application isn't interested in, as well as ignore parameters
302 * they don't understand (the application may have one big bag of
303 * parameters).
304 */
305 static int app_p1; /* "p1" */
306 static double app_p2; /* "p2" is ignored */
307 static BIGNUM *app_p3 = NULL; /* "p3" */
308 static unsigned char bignumbin[4096]; /* "p3" */
309 static char app_p4[256]; /* "p4" */
310 static char app_p5[256]; /* "p5" */
311 static const char *app_p6 = NULL; /* "p6" */
312 static unsigned char foo[1]; /* "foo" */
313
314 #define app_p1_init 17 /* A random number */
315 #define app_p2_init 47.11 /* Another random number */
316 #define app_p3_init "deadbeef" /* Classic */
317 #define app_p4_init "Hello"
318 #define app_p5_init "World"
319 #define app_p6_init "Cookie"
320 #define app_foo_init 'z'
321
cleanup_app_variables(void)322 static int cleanup_app_variables(void)
323 {
324 BN_free(app_p3);
325 app_p3 = NULL;
326 return 1;
327 }
328
init_app_variables(void)329 static int init_app_variables(void)
330 {
331 int l = 0;
332
333 cleanup_app_variables();
334
335 app_p1 = app_p1_init;
336 app_p2 = app_p2_init;
337 if (!BN_hex2bn(&app_p3, app_p3_init)
338 || (l = BN_bn2nativepad(app_p3, bignumbin, sizeof(bignumbin))) < 0)
339 return 0;
340 strcpy(app_p4, app_p4_init);
341 strcpy(app_p5, app_p5_init);
342 app_p6 = app_p6_init;
343 foo[0] = app_foo_init;
344
345 return 1;
346 }
347
348 /*
349 * Here, we define test OSSL_PARAM arrays
350 */
351
352 /* An array of OSSL_PARAM, specific in the most raw manner possible */
353 static OSSL_PARAM static_raw_params[] = {
354 { "p1", OSSL_PARAM_INTEGER, &app_p1, sizeof(app_p1), 0 },
355 { "p3", OSSL_PARAM_UNSIGNED_INTEGER, &bignumbin, sizeof(bignumbin), 0 },
356 { "p4", OSSL_PARAM_UTF8_STRING, &app_p4, sizeof(app_p4), 0 },
357 { "p5", OSSL_PARAM_UTF8_STRING, &app_p5, sizeof(app_p5), 0 },
358 /* sizeof(app_p6_init) - 1, because we know that's what we're using */
359 { "p6", OSSL_PARAM_UTF8_PTR, &app_p6, sizeof(app_p6_init) - 1, 0 },
360 { "foo", OSSL_PARAM_OCTET_STRING, &foo, sizeof(foo), 0 },
361 { NULL, 0, NULL, 0, 0 }
362 };
363
364 /* The same array of OSSL_PARAM, specified with the macros from params.h */
365 static OSSL_PARAM static_api_params[] = {
366 OSSL_PARAM_int("p1", &app_p1),
367 OSSL_PARAM_BN("p3", &bignumbin, sizeof(bignumbin)),
368 OSSL_PARAM_DEFN("p4", OSSL_PARAM_UTF8_STRING, &app_p4, sizeof(app_p4)),
369 OSSL_PARAM_DEFN("p5", OSSL_PARAM_UTF8_STRING, &app_p5, sizeof(app_p5)),
370 /* sizeof(app_p6_init), because we know that's what we're using */
371 OSSL_PARAM_DEFN("p6", OSSL_PARAM_UTF8_PTR, &app_p6,
372 sizeof(app_p6_init) - 1),
373 OSSL_PARAM_DEFN("foo", OSSL_PARAM_OCTET_STRING, &foo, sizeof(foo)),
374 OSSL_PARAM_END
375 };
376
377 /*
378 * The same array again, but constructed at run-time
379 * This exercises the OSSL_PARAM constructor functions
380 */
construct_api_params(void)381 static OSSL_PARAM *construct_api_params(void)
382 {
383 size_t n = 0;
384 static OSSL_PARAM params[10];
385
386 params[n++] = OSSL_PARAM_construct_int("p1", &app_p1);
387 params[n++] = OSSL_PARAM_construct_BN("p3", bignumbin, sizeof(bignumbin));
388 params[n++] = OSSL_PARAM_construct_utf8_string("p4", app_p4,
389 sizeof(app_p4));
390 params[n++] = OSSL_PARAM_construct_utf8_string("p5", app_p5,
391 sizeof(app_p5));
392 /* sizeof(app_p6_init), because we know that's what we're using */
393 params[n++] = OSSL_PARAM_construct_utf8_ptr("p6", (char **)&app_p6,
394 sizeof(app_p6_init));
395 params[n++] = OSSL_PARAM_construct_octet_string("foo", &foo, sizeof(foo));
396 params[n++] = OSSL_PARAM_construct_end();
397
398 return params;
399 }
400
401 struct param_owner_st {
402 OSSL_PARAM *static_params;
403 OSSL_PARAM *(*constructed_params)(void);
404 };
405
406 static const struct param_owner_st raw_params = {
407 static_raw_params, NULL
408 };
409
410 static const struct param_owner_st api_params = {
411 static_api_params, construct_api_params
412 };
413
414 /*-
415 * TESTING
416 * =======
417 */
418
419 /*
420 * Test cases to combine parameters with "provider side" functions
421 */
422 static struct {
423 const struct provider_dispatch_st *prov;
424 const struct param_owner_st *app;
425 const char *desc;
426 } test_cases[] = {
427 /* Tests within specific methods */
428 { &provider_raw, &raw_params, "raw provider vs raw params" },
429 { &provider_api, &api_params, "api provider vs api params" },
430
431 /* Mixed methods */
432 { &provider_raw, &api_params, "raw provider vs api params" },
433 { &provider_api, &raw_params, "api provider vs raw params" },
434 };
435
436 /* Generic tester of combinations of "providers" and params */
test_case_variant(OSSL_PARAM * params,const struct provider_dispatch_st * prov)437 static int test_case_variant(OSSL_PARAM *params, const struct provider_dispatch_st *prov)
438 {
439 BIGNUM *verify_p3 = NULL;
440 void *obj = NULL;
441 int errcnt = 0;
442 OSSL_PARAM *p;
443
444 /*
445 * Initialize
446 */
447 if (!TEST_ptr(obj = init_object())
448 || !TEST_true(BN_hex2bn(&verify_p3, p3_init))) {
449 errcnt++;
450 goto fin;
451 }
452
453 /*
454 * Get parameters a first time, just to see that getting works and
455 * gets us the values we expect.
456 */
457 init_app_variables();
458
459 if (!TEST_true(prov->get_params(obj, params))
460 || !TEST_int_eq(app_p1, p1_init) /* "provider" value */
461 || !TEST_double_eq(app_p2, app_p2_init) /* Should remain untouched */
462 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p3"))
463 || !TEST_ptr(BN_native2bn(bignumbin, p->return_size, app_p3))
464 || !TEST_BN_eq(app_p3, verify_p3) /* "provider" value */
465 || !TEST_str_eq(app_p4, p4_init) /* "provider" value */
466 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p5"))
467 || !TEST_size_t_eq(p->return_size,
468 sizeof(p5_init) - 1) /* "provider" value */
469 || !TEST_str_eq(app_p5, p5_init) /* "provider" value */
470 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p6"))
471 || !TEST_size_t_eq(p->return_size,
472 sizeof(p6_init) - 1) /* "provider" value */
473 || !TEST_str_eq(app_p6, p6_init) /* "provider" value */
474 || !TEST_char_eq(foo[0], app_foo_init) /* Should remain untouched */
475 || !TEST_ptr(p = OSSL_PARAM_locate(params, "foo")))
476 errcnt++;
477
478 /*
479 * Set parameters, then sneak into the object itself and check
480 * that its attributes got set (or ignored) properly.
481 */
482 init_app_variables();
483
484 if (!TEST_true(prov->set_params(obj, params))) {
485 errcnt++;
486 } else {
487 struct object_st *sneakpeek = obj;
488
489 if (!TEST_int_eq(sneakpeek->p1, app_p1) /* app value set */
490 || !TEST_double_eq(sneakpeek->p2, p2_init) /* Should remain untouched */
491 || !TEST_BN_eq(sneakpeek->p3, app_p3) /* app value set */
492 || !TEST_str_eq(sneakpeek->p4, app_p4) /* app value set */
493 || !TEST_str_eq(sneakpeek->p5, app_p5) /* app value set */
494 || !TEST_str_eq(sneakpeek->p6, app_p6)) /* app value set */
495 errcnt++;
496 }
497
498 /*
499 * Get parameters again, checking that we get different values
500 * than earlier where relevant.
501 */
502 BN_free(verify_p3);
503 verify_p3 = NULL;
504
505 if (!TEST_true(BN_hex2bn(&verify_p3, app_p3_init))) {
506 errcnt++;
507 goto fin;
508 }
509
510 if (!TEST_true(prov->get_params(obj, params))
511 || !TEST_int_eq(app_p1, app_p1_init) /* app value */
512 || !TEST_double_eq(app_p2, app_p2_init) /* Should remain untouched */
513 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p3"))
514 || !TEST_ptr(BN_native2bn(bignumbin, p->return_size, app_p3))
515 || !TEST_BN_eq(app_p3, verify_p3) /* app value */
516 || !TEST_str_eq(app_p4, app_p4_init) /* app value */
517 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p5"))
518 || !TEST_size_t_eq(p->return_size,
519 sizeof(app_p5_init) - 1) /* app value */
520 || !TEST_str_eq(app_p5, app_p5_init) /* app value */
521 || !TEST_ptr(p = OSSL_PARAM_locate(params, "p6"))
522 || !TEST_size_t_eq(p->return_size,
523 sizeof(app_p6_init) - 1) /* app value */
524 || !TEST_str_eq(app_p6, app_p6_init) /* app value */
525 || !TEST_char_eq(foo[0], app_foo_init) /* Should remain untouched */
526 || !TEST_ptr(p = OSSL_PARAM_locate(params, "foo")))
527 errcnt++;
528
529 fin:
530 BN_free(verify_p3);
531 verify_p3 = NULL;
532 cleanup_app_variables();
533 cleanup_object(obj);
534
535 return errcnt == 0;
536 }
537
test_case(int i)538 static int test_case(int i)
539 {
540 TEST_info("Case: %s", test_cases[i].desc);
541
542 return test_case_variant(test_cases[i].app->static_params,
543 test_cases[i].prov)
544 && (test_cases[i].app->constructed_params == NULL
545 || test_case_variant(test_cases[i].app->constructed_params(),
546 test_cases[i].prov));
547 }
548
549 /*-
550 * OSSL_PARAM_allocate_from_text() tests
551 * =====================================
552 */
553
554 static const OSSL_PARAM params_from_text[] = {
555 /* Fixed size buffer */
556 OSSL_PARAM_int32("int", NULL),
557 OSSL_PARAM_DEFN("short", OSSL_PARAM_INTEGER, NULL, sizeof(int16_t)),
558 OSSL_PARAM_DEFN("ushort", OSSL_PARAM_UNSIGNED_INTEGER, NULL, sizeof(uint16_t)),
559 /* Arbitrary size buffer. Make sure the result fits in a long */
560 OSSL_PARAM_DEFN("num", OSSL_PARAM_INTEGER, NULL, 0),
561 OSSL_PARAM_DEFN("unum", OSSL_PARAM_UNSIGNED_INTEGER, NULL, 0),
562 OSSL_PARAM_DEFN("octets", OSSL_PARAM_OCTET_STRING, NULL, 0),
563 OSSL_PARAM_END,
564 };
565
566 struct int_from_text_test_st {
567 const char *argname;
568 const char *strval;
569 long int expected_intval;
570 int expected_res;
571 size_t expected_bufsize;
572 };
573
574 static struct int_from_text_test_st int_from_text_test_cases[] = {
575 { "int", "", 0, 0, 0 },
576 { "int", "0", 0, 1, 4 },
577 { "int", "101", 101, 1, 4 },
578 { "int", "-102", -102, 1, 4 },
579 { "int", "12A", 12, 1, 4 }, /* incomplete */
580 { "int", "0x12B", 0x12B, 1, 4 },
581 { "hexint", "12C", 0x12C, 1, 4 },
582 { "hexint", "0x12D", 0, 1, 4 }, /* zero */
583 /* test check of the target buffer size */
584 { "int", "0x7fffffff", INT32_MAX, 1, 4 },
585 { "int", "2147483647", INT32_MAX, 1, 4 },
586 { "int", "2147483648", 0, 0, 0 }, /* too small buffer */
587 { "int", "-2147483648", INT32_MIN, 1, 4 },
588 { "int", "-2147483649", 0, 0, 4 }, /* too small buffer */
589 { "short", "0x7fff", INT16_MAX, 1, 2 },
590 { "short", "32767", INT16_MAX, 1, 2 },
591 { "short", "32768", 0, 0, 0 }, /* too small buffer */
592 { "ushort", "0xffff", UINT16_MAX, 1, 2 },
593 { "ushort", "65535", UINT16_MAX, 1, 2 },
594 { "ushort", "65536", 0, 0, 0 }, /* too small buffer */
595 /* test check of sign extension in arbitrary size results */
596 { "num", "0", 0, 1, 1 },
597 { "num", "0", 0, 1, 1 },
598 { "num", "0xff", 0xff, 1, 2 }, /* sign extension */
599 { "num", "-0xff", -0xff, 1, 2 }, /* sign extension */
600 { "num", "0x7f", 0x7f, 1, 1 }, /* no sign extension */
601 { "num", "-0x7f", -0x7f, 1, 1 }, /* no sign extension */
602 { "num", "0x80", 0x80, 1, 2 }, /* sign extension */
603 { "num", "-0x80", -0x80, 1, 1 }, /* no sign extension */
604 { "num", "0x81", 0x81, 1, 2 }, /* sign extension */
605 { "num", "-0x81", -0x81, 1, 2 }, /* sign extension */
606 { "unum", "0xff", 0xff, 1, 1 },
607 { "unum", "-0xff", -0xff, 0, 0 }, /* invalid neg number */
608 { "unum", "0x7f", 0x7f, 1, 1 },
609 { "unum", "-0x7f", -0x7f, 0, 0 }, /* invalid neg number */
610 { "unum", "0x80", 0x80, 1, 1 },
611 { "unum", "-0x80", -0x80, 0, 0 }, /* invalid neg number */
612 { "unum", "0x81", 0x81, 1, 1 },
613 { "unum", "-0x81", -0x81, 0, 0 }, /* invalid neg number */
614 };
615
check_int_from_text(const struct int_from_text_test_st a)616 static int check_int_from_text(const struct int_from_text_test_st a)
617 {
618 OSSL_PARAM param;
619 long int val = 0;
620 int res;
621
622 if (!OSSL_PARAM_allocate_from_text(¶m, params_from_text,
623 a.argname, a.strval, 0, NULL)) {
624 if (a.expected_res)
625 TEST_error("unexpected OSSL_PARAM_allocate_from_text() return for %s \"%s\"",
626 a.argname, a.strval);
627 return !a.expected_res;
628 }
629
630 /* For data size zero, OSSL_PARAM_get_long() may crash */
631 if (param.data_size == 0) {
632 OPENSSL_free(param.data);
633 TEST_error("unexpected zero size for %s \"%s\"",
634 a.argname, a.strval);
635 return 0;
636 }
637 res = OSSL_PARAM_get_long(¶m, &val);
638 OPENSSL_free(param.data);
639
640 if (res ^ a.expected_res) {
641 TEST_error("unexpected OSSL_PARAM_get_long() return for %s \"%s\": "
642 "%d != %d", a.argname, a.strval, a.expected_res, res);
643 return 0;
644 }
645 if (val != a.expected_intval) {
646 TEST_error("unexpected result for %s \"%s\": %li != %li",
647 a.argname, a.strval, a.expected_intval, val);
648 return 0;
649 }
650 if (param.data_size != a.expected_bufsize) {
651 TEST_error("unexpected size for %s \"%s\": %d != %d",
652 a.argname, a.strval,
653 (int)a.expected_bufsize, (int)param.data_size);
654 return 0;
655 }
656
657 return a.expected_res;
658 }
659
check_octetstr_from_hexstr(void)660 static int check_octetstr_from_hexstr(void)
661 {
662 OSSL_PARAM param;
663 static const char *values[] = { "", "F", "FF", "FFF", "FFFF", NULL };
664 int i;
665 int errcnt = 0;
666
667 /* Test odd vs even number of hex digits */
668 for (i = 0; values[i] != NULL; i++) {
669 int expected = (strlen(values[i]) % 2) != 1;
670 int result;
671
672 ERR_clear_error();
673 memset(¶m, 0, sizeof(param));
674 if (expected)
675 result =
676 TEST_true(OSSL_PARAM_allocate_from_text(¶m,
677 params_from_text,
678 "hexoctets", values[i], 0,
679 NULL));
680 else
681 result =
682 TEST_false(OSSL_PARAM_allocate_from_text(¶m,
683 params_from_text,
684 "hexoctets", values[i], 0,
685 NULL));
686 if (!result) {
687 TEST_error("unexpected OSSL_PARAM_allocate_from_text() %s for 'octets' \"%s\"",
688 (expected ? "failure" : "success"), values[i]);
689 errcnt++;
690 }
691 OPENSSL_free(param.data);
692 }
693 return errcnt == 0;
694 }
695
test_allocate_from_text(int i)696 static int test_allocate_from_text(int i)
697 {
698 return check_int_from_text(int_from_text_test_cases[i]);
699 }
700
test_more_allocate_from_text(void)701 static int test_more_allocate_from_text(void)
702 {
703 return check_octetstr_from_hexstr();
704 }
705
setup_tests(void)706 int setup_tests(void)
707 {
708 ADD_ALL_TESTS(test_case, OSSL_NELEM(test_cases));
709 ADD_ALL_TESTS(test_allocate_from_text, OSSL_NELEM(int_from_text_test_cases));
710 ADD_TEST(test_more_allocate_from_text);
711 return 1;
712 }
713