mirror of https://github.com/openssl/openssl.git
				
				
				
			
		
			
				
	
	
		
			713 lines
		
	
	
		
			24 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			713 lines
		
	
	
		
			24 KiB
		
	
	
	
		
			C
		
	
	
	
/*
 | 
						|
 * Copyright 2019-2024 The OpenSSL Project Authors. All Rights Reserved.
 | 
						|
 *
 | 
						|
 * Licensed under the Apache License 2.0 (the "License");
 | 
						|
 * you may not use this file except in compliance with the License.
 | 
						|
 * You may obtain a copy of the License at
 | 
						|
 * https://www.openssl.org/source/license.html
 | 
						|
 * or in the file LICENSE in the source distribution.
 | 
						|
 */
 | 
						|
 | 
						|
/*
 | 
						|
 * This program tests the use of OSSL_PARAM, currently in raw form.
 | 
						|
 */
 | 
						|
 | 
						|
#include <string.h>
 | 
						|
#include <openssl/bn.h>
 | 
						|
#include <openssl/core.h>
 | 
						|
#include <openssl/err.h>
 | 
						|
#include <openssl/params.h>
 | 
						|
#include "internal/numbers.h"
 | 
						|
#include "internal/nelem.h"
 | 
						|
#include "testutil.h"
 | 
						|
 | 
						|
/*-
 | 
						|
 * PROVIDER SECTION
 | 
						|
 * ================
 | 
						|
 *
 | 
						|
 * Even though it's not necessarily ONLY providers doing this part,
 | 
						|
 * they are naturally going to be the most common users of
 | 
						|
 * set_params and get_params functions.
 | 
						|
 */
 | 
						|
 | 
						|
/*
 | 
						|
 * In real use cases, setters and getters would take an object with
 | 
						|
 * which the parameters are associated.  This structure is a cheap
 | 
						|
 * simulation.
 | 
						|
 */
 | 
						|
struct object_st {
 | 
						|
    /*
 | 
						|
     * Documented as a native integer, of the size given by sizeof(int).
 | 
						|
     * Assumed data type OSSL_PARAM_INTEGER
 | 
						|
     */
 | 
						|
    int p1;
 | 
						|
    /*
 | 
						|
     * Documented as a native double, of the size given by sizeof(double).
 | 
						|
     * Assumed data type OSSL_PARAM_REAL
 | 
						|
     */
 | 
						|
    double p2;
 | 
						|
    /*
 | 
						|
     * Documented as an arbitrarily large unsigned integer.
 | 
						|
     * The data size must be large enough to accommodate.
 | 
						|
     * Assumed data type OSSL_PARAM_UNSIGNED_INTEGER
 | 
						|
     */
 | 
						|
    BIGNUM *p3;
 | 
						|
    /*
 | 
						|
     * Documented as a C string.
 | 
						|
     * The data size must be large enough to accommodate.
 | 
						|
     * Assumed data type OSSL_PARAM_UTF8_STRING
 | 
						|
     */
 | 
						|
    char *p4;
 | 
						|
    size_t p4_l;
 | 
						|
    /*
 | 
						|
     * Documented as a C string.
 | 
						|
     * Assumed data type OSSL_PARAM_UTF8_STRING
 | 
						|
     */
 | 
						|
    char p5[256];
 | 
						|
    size_t p5_l;
 | 
						|
    /*
 | 
						|
     * Documented as a pointer to a constant C string.
 | 
						|
     * Assumed data type OSSL_PARAM_UTF8_PTR
 | 
						|
     */
 | 
						|
    const char *p6;
 | 
						|
    size_t p6_l;
 | 
						|
};
 | 
						|
 | 
						|
#define p1_init 42                              /* The ultimate answer */
 | 
						|
#define p2_init 6.283                           /* Magic number */
 | 
						|
/* Stolen from evp_data, BLAKE2s256 test */
 | 
						|
#define p3_init                                 \
 | 
						|
    "4142434445464748494a4b4c4d4e4f50"          \
 | 
						|
    "5152535455565758595a616263646566"          \
 | 
						|
    "6768696a6b6c6d6e6f70717273747576"          \
 | 
						|
    "7778797a30313233343536373839"
 | 
						|
#define p4_init "BLAKE2s256"                    /* Random string */
 | 
						|
#define p5_init "Hellow World"                  /* Random string */
 | 
						|
#define p6_init OPENSSL_FULL_VERSION_STR        /* Static string */
 | 
						|
 | 
						|
static void cleanup_object(void *vobj)
 | 
						|
{
 | 
						|
    struct object_st *obj = vobj;
 | 
						|
 | 
						|
    BN_free(obj->p3);
 | 
						|
    obj->p3 = NULL;
 | 
						|
    OPENSSL_free(obj->p4);
 | 
						|
    obj->p4 = NULL;
 | 
						|
    OPENSSL_free(obj);
 | 
						|
}
 | 
						|
 | 
						|
static void *init_object(void)
 | 
						|
{
 | 
						|
    struct object_st *obj;
 | 
						|
 | 
						|
    if (!TEST_ptr(obj = OPENSSL_zalloc(sizeof(*obj))))
 | 
						|
        return NULL;
 | 
						|
 | 
						|
    obj->p1 = p1_init;
 | 
						|
    obj->p2 = p2_init;
 | 
						|
    if (!TEST_true(BN_hex2bn(&obj->p3, p3_init)))
 | 
						|
        goto fail;
 | 
						|
    if (!TEST_ptr(obj->p4 = OPENSSL_strdup(p4_init)))
 | 
						|
        goto fail;
 | 
						|
    strcpy(obj->p5, p5_init);
 | 
						|
    obj->p6 = p6_init;
 | 
						|
 | 
						|
    return obj;
 | 
						|
 fail:
 | 
						|
    cleanup_object(obj);
 | 
						|
    obj = NULL;
 | 
						|
 | 
						|
    return NULL;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
 * RAW provider, which handles the parameters in a very raw manner,
 | 
						|
 * with no fancy API and very minimal checking.  The application that
 | 
						|
 * calls these to set or request parameters MUST get its OSSL_PARAM
 | 
						|
 * array right.
 | 
						|
 */
 | 
						|
 | 
						|
static int raw_set_params(void *vobj, const OSSL_PARAM *params)
 | 
						|
{
 | 
						|
    struct object_st *obj = vobj;
 | 
						|
 | 
						|
    for (; params->key != NULL; params++)
 | 
						|
        if (strcmp(params->key, "p1") == 0) {
 | 
						|
            obj->p1 = *(int *)params->data;
 | 
						|
        } else if (strcmp(params->key, "p2") == 0) {
 | 
						|
            obj->p2 = *(double *)params->data;
 | 
						|
        } else if (strcmp(params->key, "p3") == 0) {
 | 
						|
            BN_free(obj->p3);
 | 
						|
            if (!TEST_ptr(obj->p3 = BN_native2bn(params->data,
 | 
						|
                                                 params->data_size, NULL)))
 | 
						|
                return 0;
 | 
						|
        } else if (strcmp(params->key, "p4") == 0) {
 | 
						|
            OPENSSL_free(obj->p4);
 | 
						|
            if (!TEST_ptr(obj->p4 = OPENSSL_strndup(params->data,
 | 
						|
                                                    params->data_size)))
 | 
						|
                return 0;
 | 
						|
            obj->p4_l = strlen(obj->p4);
 | 
						|
        } else if (strcmp(params->key, "p5") == 0) {
 | 
						|
            /*
 | 
						|
             * Protect obj->p5 against too much data.  This should not
 | 
						|
             * happen, we don't use that long strings.
 | 
						|
             */
 | 
						|
            size_t data_length =
 | 
						|
                OPENSSL_strnlen(params->data, params->data_size);
 | 
						|
 | 
						|
            if (!TEST_size_t_lt(data_length, sizeof(obj->p5)))
 | 
						|
                return 0;
 | 
						|
            strncpy(obj->p5, params->data, data_length);
 | 
						|
            obj->p5[data_length] = '\0';
 | 
						|
            obj->p5_l = strlen(obj->p5);
 | 
						|
        } else if (strcmp(params->key, "p6") == 0) {
 | 
						|
            obj->p6 = *(const char **)params->data;
 | 
						|
            obj->p6_l = params->data_size;
 | 
						|
        }
 | 
						|
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
static int raw_get_params(void *vobj, OSSL_PARAM *params)
 | 
						|
{
 | 
						|
    struct object_st *obj = vobj;
 | 
						|
 | 
						|
    for (; params->key != NULL; params++)
 | 
						|
        if (strcmp(params->key, "p1") == 0) {
 | 
						|
            params->return_size = sizeof(obj->p1);
 | 
						|
            *(int *)params->data = obj->p1;
 | 
						|
        } else if (strcmp(params->key, "p2") == 0) {
 | 
						|
            params->return_size = sizeof(obj->p2);
 | 
						|
            *(double *)params->data = obj->p2;
 | 
						|
        } else if (strcmp(params->key, "p3") == 0) {
 | 
						|
            params->return_size = BN_num_bytes(obj->p3);
 | 
						|
            if (!TEST_size_t_ge(params->data_size, params->return_size))
 | 
						|
                return 0;
 | 
						|
            BN_bn2nativepad(obj->p3, params->data, params->return_size);
 | 
						|
        } else if (strcmp(params->key, "p4") == 0) {
 | 
						|
            params->return_size = strlen(obj->p4);
 | 
						|
            if (!TEST_size_t_gt(params->data_size, params->return_size))
 | 
						|
                return 0;
 | 
						|
            strcpy(params->data, obj->p4);
 | 
						|
        } else if (strcmp(params->key, "p5") == 0) {
 | 
						|
            params->return_size = strlen(obj->p5);
 | 
						|
            if (!TEST_size_t_gt(params->data_size, params->return_size))
 | 
						|
                return 0;
 | 
						|
            strcpy(params->data, obj->p5);
 | 
						|
        } else if (strcmp(params->key, "p6") == 0) {
 | 
						|
            params->return_size = strlen(obj->p6);
 | 
						|
            *(const char **)params->data = obj->p6;
 | 
						|
        }
 | 
						|
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
 * API provider, which handles the parameters using the API from params.h
 | 
						|
 */
 | 
						|
 | 
						|
static int api_set_params(void *vobj, const OSSL_PARAM *params)
 | 
						|
{
 | 
						|
    struct object_st *obj = vobj;
 | 
						|
    const OSSL_PARAM *p = NULL;
 | 
						|
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p1")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_get_int(p, &obj->p1)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p2")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_get_double(p, &obj->p2)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p3")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_get_BN(p, &obj->p3)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p4")) != NULL) {
 | 
						|
        OPENSSL_free(obj->p4);
 | 
						|
        obj->p4 = NULL;
 | 
						|
        /* If the value pointer is NULL, we get it automatically allocated */
 | 
						|
        if (!TEST_true(OSSL_PARAM_get_utf8_string(p, &obj->p4, 0)))
 | 
						|
            return 0;
 | 
						|
    }
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p5")) != NULL) {
 | 
						|
        char *p5_ptr = obj->p5;
 | 
						|
        if (!TEST_true(OSSL_PARAM_get_utf8_string(p, &p5_ptr, sizeof(obj->p5))))
 | 
						|
            return 0;
 | 
						|
        obj->p5_l = strlen(obj->p5);
 | 
						|
    }
 | 
						|
    if ((p = OSSL_PARAM_locate_const(params, "p6")) != NULL) {
 | 
						|
        if (!TEST_true(OSSL_PARAM_get_utf8_ptr(p, &obj->p6)))
 | 
						|
            return 0;
 | 
						|
        obj->p6_l = strlen(obj->p6);
 | 
						|
    }
 | 
						|
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
static int api_get_params(void *vobj, OSSL_PARAM *params)
 | 
						|
{
 | 
						|
    struct object_st *obj = vobj;
 | 
						|
    OSSL_PARAM *p = NULL;
 | 
						|
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p1")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_int(p, obj->p1)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p2")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_double(p, obj->p2)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p3")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_BN(p, obj->p3)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p4")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_utf8_string(p, obj->p4)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p5")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_utf8_string(p, obj->p5)))
 | 
						|
        return 0;
 | 
						|
    if ((p = OSSL_PARAM_locate(params, "p6")) != NULL
 | 
						|
        && !TEST_true(OSSL_PARAM_set_utf8_ptr(p, obj->p6)))
 | 
						|
        return 0;
 | 
						|
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
 * This structure only simulates a provider dispatch, the real deal is
 | 
						|
 * a bit more code that's not necessary in these tests.
 | 
						|
 */
 | 
						|
struct provider_dispatch_st {
 | 
						|
    int (*set_params)(void *obj, const OSSL_PARAM *params);
 | 
						|
    int (*get_params)(void *obj, OSSL_PARAM *params);
 | 
						|
};
 | 
						|
 | 
						|
/* "raw" provider */
 | 
						|
static const struct provider_dispatch_st provider_raw = {
 | 
						|
    raw_set_params, raw_get_params
 | 
						|
};
 | 
						|
 | 
						|
/* "api" provider */
 | 
						|
static const struct provider_dispatch_st provider_api = {
 | 
						|
    api_set_params, api_get_params
 | 
						|
};
 | 
						|
 | 
						|
/*-
 | 
						|
 * APPLICATION SECTION
 | 
						|
 * ===================
 | 
						|
 */
 | 
						|
 | 
						|
/* In all our tests, these are variables that get manipulated as parameters
 | 
						|
 *
 | 
						|
 * These arrays consistently do nothing with the "p2" parameter, and
 | 
						|
 * always include a "foo" parameter.  This is to check that the
 | 
						|
 * set_params and get_params calls ignore the lack of parameters that
 | 
						|
 * the application isn't interested in, as well as ignore parameters
 | 
						|
 * they don't understand (the application may have one big bag of
 | 
						|
 * parameters).
 | 
						|
 */
 | 
						|
static int app_p1;                    /* "p1" */
 | 
						|
static double app_p2;                 /* "p2" is ignored */
 | 
						|
static BIGNUM *app_p3 = NULL;         /* "p3" */
 | 
						|
static unsigned char bignumbin[4096]; /* "p3" */
 | 
						|
static char app_p4[256];              /* "p4" */
 | 
						|
static char app_p5[256];              /* "p5" */
 | 
						|
static const char *app_p6 = NULL;     /* "p6" */
 | 
						|
static unsigned char foo[1];          /* "foo" */
 | 
						|
 | 
						|
#define app_p1_init 17           /* A random number */
 | 
						|
#define app_p2_init 47.11        /* Another random number */
 | 
						|
#define app_p3_init "deadbeef"   /* Classic */
 | 
						|
#define app_p4_init "Hello"
 | 
						|
#define app_p5_init "World"
 | 
						|
#define app_p6_init "Cookie"
 | 
						|
#define app_foo_init 'z'
 | 
						|
 | 
						|
static int cleanup_app_variables(void)
 | 
						|
{
 | 
						|
    BN_free(app_p3);
 | 
						|
    app_p3 = NULL;
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
static int init_app_variables(void)
 | 
						|
{
 | 
						|
    int l = 0;
 | 
						|
 | 
						|
    cleanup_app_variables();
 | 
						|
 | 
						|
    app_p1 = app_p1_init;
 | 
						|
    app_p2 = app_p2_init;
 | 
						|
    if (!BN_hex2bn(&app_p3, app_p3_init)
 | 
						|
        || (l = BN_bn2nativepad(app_p3, bignumbin, sizeof(bignumbin))) < 0)
 | 
						|
        return 0;
 | 
						|
    strcpy(app_p4, app_p4_init);
 | 
						|
    strcpy(app_p5, app_p5_init);
 | 
						|
    app_p6 = app_p6_init;
 | 
						|
    foo[0] = app_foo_init;
 | 
						|
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
 * Here, we define test OSSL_PARAM arrays
 | 
						|
 */
 | 
						|
 | 
						|
/* An array of OSSL_PARAM, specific in the most raw manner possible */
 | 
						|
static OSSL_PARAM static_raw_params[] = {
 | 
						|
    { "p1", OSSL_PARAM_INTEGER, &app_p1, sizeof(app_p1), 0 },
 | 
						|
    { "p3", OSSL_PARAM_UNSIGNED_INTEGER, &bignumbin, sizeof(bignumbin), 0 },
 | 
						|
    { "p4", OSSL_PARAM_UTF8_STRING, &app_p4, sizeof(app_p4), 0 },
 | 
						|
    { "p5", OSSL_PARAM_UTF8_STRING, &app_p5, sizeof(app_p5), 0 },
 | 
						|
    /* sizeof(app_p6_init) - 1, because we know that's what we're using */
 | 
						|
    { "p6", OSSL_PARAM_UTF8_PTR, &app_p6, sizeof(app_p6_init) - 1, 0 },
 | 
						|
    { "foo", OSSL_PARAM_OCTET_STRING, &foo, sizeof(foo), 0 },
 | 
						|
    { NULL, 0, NULL, 0, 0 }
 | 
						|
};
 | 
						|
 | 
						|
/* The same array of OSSL_PARAM, specified with the macros from params.h */
 | 
						|
static OSSL_PARAM static_api_params[] = {
 | 
						|
    OSSL_PARAM_int("p1", &app_p1),
 | 
						|
    OSSL_PARAM_BN("p3", &bignumbin, sizeof(bignumbin)),
 | 
						|
    OSSL_PARAM_DEFN("p4", OSSL_PARAM_UTF8_STRING, &app_p4, sizeof(app_p4)),
 | 
						|
    OSSL_PARAM_DEFN("p5", OSSL_PARAM_UTF8_STRING, &app_p5, sizeof(app_p5)),
 | 
						|
    /* sizeof(app_p6_init), because we know that's what we're using */
 | 
						|
    OSSL_PARAM_DEFN("p6", OSSL_PARAM_UTF8_PTR, &app_p6,
 | 
						|
                    sizeof(app_p6_init) - 1),
 | 
						|
    OSSL_PARAM_DEFN("foo", OSSL_PARAM_OCTET_STRING, &foo, sizeof(foo)),
 | 
						|
    OSSL_PARAM_END
 | 
						|
};
 | 
						|
 | 
						|
/*
 | 
						|
 * The same array again, but constructed at run-time
 | 
						|
 * This exercises the OSSL_PARAM constructor functions
 | 
						|
 */
 | 
						|
static OSSL_PARAM *construct_api_params(void)
 | 
						|
{
 | 
						|
    size_t n = 0;
 | 
						|
    static OSSL_PARAM params[10];
 | 
						|
 | 
						|
    params[n++] = OSSL_PARAM_construct_int("p1", &app_p1);
 | 
						|
    params[n++] = OSSL_PARAM_construct_BN("p3", bignumbin, sizeof(bignumbin));
 | 
						|
    params[n++] = OSSL_PARAM_construct_utf8_string("p4", app_p4,
 | 
						|
                                                   sizeof(app_p4));
 | 
						|
    params[n++] = OSSL_PARAM_construct_utf8_string("p5", app_p5,
 | 
						|
                                                   sizeof(app_p5));
 | 
						|
    /* sizeof(app_p6_init), because we know that's what we're using */
 | 
						|
    params[n++] = OSSL_PARAM_construct_utf8_ptr("p6", (char **)&app_p6,
 | 
						|
                                                sizeof(app_p6_init));
 | 
						|
    params[n++] = OSSL_PARAM_construct_octet_string("foo", &foo, sizeof(foo));
 | 
						|
    params[n++] = OSSL_PARAM_construct_end();
 | 
						|
 | 
						|
    return params;
 | 
						|
}
 | 
						|
 | 
						|
struct param_owner_st {
 | 
						|
    OSSL_PARAM *static_params;
 | 
						|
    OSSL_PARAM *(*constructed_params)(void);
 | 
						|
};
 | 
						|
 | 
						|
static const struct param_owner_st raw_params = {
 | 
						|
    static_raw_params, NULL
 | 
						|
};
 | 
						|
 | 
						|
static const struct param_owner_st api_params = {
 | 
						|
    static_api_params, construct_api_params
 | 
						|
};
 | 
						|
 | 
						|
/*-
 | 
						|
 * TESTING
 | 
						|
 * =======
 | 
						|
 */
 | 
						|
 | 
						|
/*
 | 
						|
 * Test cases to combine parameters with "provider side" functions
 | 
						|
 */
 | 
						|
static struct {
 | 
						|
    const struct provider_dispatch_st *prov;
 | 
						|
    const struct param_owner_st *app;
 | 
						|
    const char *desc;
 | 
						|
} test_cases[] = {
 | 
						|
    /* Tests within specific methods */
 | 
						|
    { &provider_raw, &raw_params, "raw provider vs raw params" },
 | 
						|
    { &provider_api, &api_params, "api provider vs api params" },
 | 
						|
 | 
						|
    /* Mixed methods */
 | 
						|
    { &provider_raw, &api_params, "raw provider vs api params" },
 | 
						|
    { &provider_api, &raw_params, "api provider vs raw params" },
 | 
						|
};
 | 
						|
 | 
						|
/* Generic tester of combinations of "providers" and params */
 | 
						|
static int test_case_variant(OSSL_PARAM *params, const struct provider_dispatch_st *prov)
 | 
						|
{
 | 
						|
    BIGNUM *verify_p3 = NULL;
 | 
						|
    void *obj = NULL;
 | 
						|
    int errcnt = 0;
 | 
						|
    OSSL_PARAM *p;
 | 
						|
 | 
						|
    /*
 | 
						|
     * Initialize
 | 
						|
     */
 | 
						|
    if (!TEST_ptr(obj = init_object())
 | 
						|
        || !TEST_true(BN_hex2bn(&verify_p3, p3_init))) {
 | 
						|
        errcnt++;
 | 
						|
        goto fin;
 | 
						|
    }
 | 
						|
 | 
						|
    /*
 | 
						|
     * Get parameters a first time, just to see that getting works and
 | 
						|
     * gets us the values we expect.
 | 
						|
     */
 | 
						|
    init_app_variables();
 | 
						|
 | 
						|
    if (!TEST_true(prov->get_params(obj, params))
 | 
						|
        || !TEST_int_eq(app_p1, p1_init)        /* "provider" value */
 | 
						|
        || !TEST_double_eq(app_p2, app_p2_init) /* Should remain untouched */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p3"))
 | 
						|
        || !TEST_ptr(BN_native2bn(bignumbin, p->return_size, app_p3))
 | 
						|
        || !TEST_BN_eq(app_p3, verify_p3)       /* "provider" value */
 | 
						|
        || !TEST_str_eq(app_p4, p4_init)        /* "provider" value */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p5"))
 | 
						|
        || !TEST_size_t_eq(p->return_size,
 | 
						|
                           sizeof(p5_init) - 1) /* "provider" value */
 | 
						|
        || !TEST_str_eq(app_p5, p5_init)        /* "provider" value */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p6"))
 | 
						|
        || !TEST_size_t_eq(p->return_size,
 | 
						|
                           sizeof(p6_init) - 1) /* "provider" value */
 | 
						|
        || !TEST_str_eq(app_p6, p6_init)        /* "provider" value */
 | 
						|
        || !TEST_char_eq(foo[0], app_foo_init)  /* Should remain untouched */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "foo")))
 | 
						|
        errcnt++;
 | 
						|
 | 
						|
    /*
 | 
						|
     * Set parameters, then sneak into the object itself and check
 | 
						|
     * that its attributes got set (or ignored) properly.
 | 
						|
     */
 | 
						|
    init_app_variables();
 | 
						|
 | 
						|
    if (!TEST_true(prov->set_params(obj, params))) {
 | 
						|
        errcnt++;
 | 
						|
    } else {
 | 
						|
        struct object_st *sneakpeek = obj;
 | 
						|
 | 
						|
        if (!TEST_int_eq(sneakpeek->p1, app_p1)         /* app value set */
 | 
						|
            || !TEST_double_eq(sneakpeek->p2, p2_init)  /* Should remain untouched */
 | 
						|
            || !TEST_BN_eq(sneakpeek->p3, app_p3)       /* app value set */
 | 
						|
            || !TEST_str_eq(sneakpeek->p4, app_p4)      /* app value set */
 | 
						|
            || !TEST_str_eq(sneakpeek->p5, app_p5)      /* app value set */
 | 
						|
            || !TEST_str_eq(sneakpeek->p6, app_p6))     /* app value set */
 | 
						|
            errcnt++;
 | 
						|
    }
 | 
						|
 | 
						|
    /*
 | 
						|
     * Get parameters again, checking that we get different values
 | 
						|
     * than earlier where relevant.
 | 
						|
     */
 | 
						|
    BN_free(verify_p3);
 | 
						|
    verify_p3 = NULL;
 | 
						|
 | 
						|
    if (!TEST_true(BN_hex2bn(&verify_p3, app_p3_init))) {
 | 
						|
        errcnt++;
 | 
						|
        goto fin;
 | 
						|
    }
 | 
						|
 | 
						|
    if (!TEST_true(prov->get_params(obj, params))
 | 
						|
        || !TEST_int_eq(app_p1, app_p1_init)    /* app value */
 | 
						|
        || !TEST_double_eq(app_p2, app_p2_init) /* Should remain untouched */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p3"))
 | 
						|
        || !TEST_ptr(BN_native2bn(bignumbin, p->return_size, app_p3))
 | 
						|
        || !TEST_BN_eq(app_p3, verify_p3)       /* app value */
 | 
						|
        || !TEST_str_eq(app_p4, app_p4_init)    /* app value */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p5"))
 | 
						|
        || !TEST_size_t_eq(p->return_size,
 | 
						|
                           sizeof(app_p5_init) - 1) /* app value */
 | 
						|
        || !TEST_str_eq(app_p5, app_p5_init)    /* app value */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "p6"))
 | 
						|
        || !TEST_size_t_eq(p->return_size,
 | 
						|
                           sizeof(app_p6_init) - 1) /* app value */
 | 
						|
        || !TEST_str_eq(app_p6, app_p6_init)    /* app value */
 | 
						|
        || !TEST_char_eq(foo[0], app_foo_init)  /* Should remain untouched */
 | 
						|
        || !TEST_ptr(p = OSSL_PARAM_locate(params, "foo")))
 | 
						|
        errcnt++;
 | 
						|
 | 
						|
 fin:
 | 
						|
    BN_free(verify_p3);
 | 
						|
    verify_p3 = NULL;
 | 
						|
    cleanup_app_variables();
 | 
						|
    cleanup_object(obj);
 | 
						|
 | 
						|
    return errcnt == 0;
 | 
						|
}
 | 
						|
 | 
						|
static int test_case(int i)
 | 
						|
{
 | 
						|
    TEST_info("Case: %s", test_cases[i].desc);
 | 
						|
 | 
						|
    return test_case_variant(test_cases[i].app->static_params,
 | 
						|
                             test_cases[i].prov)
 | 
						|
        && (test_cases[i].app->constructed_params == NULL
 | 
						|
            || test_case_variant(test_cases[i].app->constructed_params(),
 | 
						|
                                 test_cases[i].prov));
 | 
						|
}
 | 
						|
 | 
						|
/*-
 | 
						|
 * OSSL_PARAM_allocate_from_text() tests
 | 
						|
 * =====================================
 | 
						|
 */
 | 
						|
 | 
						|
static const OSSL_PARAM params_from_text[] = {
 | 
						|
    /* Fixed size buffer */
 | 
						|
    OSSL_PARAM_int32("int", NULL),
 | 
						|
    OSSL_PARAM_DEFN("short", OSSL_PARAM_INTEGER, NULL, sizeof(int16_t)),
 | 
						|
    OSSL_PARAM_DEFN("ushort", OSSL_PARAM_UNSIGNED_INTEGER, NULL, sizeof(uint16_t)),
 | 
						|
    /* Arbitrary size buffer.  Make sure the result fits in a long */
 | 
						|
    OSSL_PARAM_DEFN("num", OSSL_PARAM_INTEGER, NULL, 0),
 | 
						|
    OSSL_PARAM_DEFN("unum", OSSL_PARAM_UNSIGNED_INTEGER, NULL, 0),
 | 
						|
    OSSL_PARAM_DEFN("octets", OSSL_PARAM_OCTET_STRING, NULL, 0),
 | 
						|
    OSSL_PARAM_END,
 | 
						|
};
 | 
						|
 | 
						|
struct int_from_text_test_st {
 | 
						|
    const char *argname;
 | 
						|
    const char *strval;
 | 
						|
    long int expected_intval;
 | 
						|
    int expected_res;
 | 
						|
    size_t expected_bufsize;
 | 
						|
};
 | 
						|
 | 
						|
static struct int_from_text_test_st int_from_text_test_cases[] = {
 | 
						|
    { "int",               "",          0, 0, 0 },
 | 
						|
    { "int",              "0",          0, 1, 4 },
 | 
						|
    { "int",            "101",        101, 1, 4 },
 | 
						|
    { "int",           "-102",       -102, 1, 4 },
 | 
						|
    { "int",            "12A",         12, 1, 4 }, /* incomplete */
 | 
						|
    { "int",          "0x12B",      0x12B, 1, 4 },
 | 
						|
    { "hexint",         "12C",      0x12C, 1, 4 },
 | 
						|
    { "hexint",       "0x12D",          0, 1, 4 }, /* zero */
 | 
						|
    /* test check of the target buffer size */
 | 
						|
    { "int",     "0x7fffffff",  INT32_MAX, 1, 4 },
 | 
						|
    { "int",     "2147483647",  INT32_MAX, 1, 4 },
 | 
						|
    { "int",     "2147483648",          0, 0, 0 }, /* too small buffer */
 | 
						|
    { "int",    "-2147483648",  INT32_MIN, 1, 4 },
 | 
						|
    { "int",    "-2147483649",          0, 0, 4 }, /* too small buffer */
 | 
						|
    { "short",       "0x7fff",  INT16_MAX, 1, 2 },
 | 
						|
    { "short",        "32767",  INT16_MAX, 1, 2 },
 | 
						|
    { "short",        "32768",          0, 0, 0 }, /* too small buffer */
 | 
						|
    { "ushort",      "0xffff", UINT16_MAX, 1, 2 },
 | 
						|
    { "ushort",       "65535", UINT16_MAX, 1, 2 },
 | 
						|
    { "ushort",       "65536",          0, 0, 0 }, /* too small buffer */
 | 
						|
    /* test check of sign extension in arbitrary size results */
 | 
						|
    { "num",              "0",          0, 1, 1 },
 | 
						|
    { "num",              "0",          0, 1, 1 },
 | 
						|
    { "num",           "0xff",       0xff, 1, 2 }, /* sign extension */
 | 
						|
    { "num",          "-0xff",      -0xff, 1, 2 }, /* sign extension */
 | 
						|
    { "num",           "0x7f",       0x7f, 1, 1 }, /* no sign extension */
 | 
						|
    { "num",          "-0x7f",      -0x7f, 1, 1 }, /* no sign extension */
 | 
						|
    { "num",           "0x80",       0x80, 1, 2 }, /* sign extension */
 | 
						|
    { "num",          "-0x80",      -0x80, 1, 1 }, /* no sign extension */
 | 
						|
    { "num",           "0x81",       0x81, 1, 2 }, /* sign extension */
 | 
						|
    { "num",          "-0x81",      -0x81, 1, 2 }, /* sign extension */
 | 
						|
    { "unum",          "0xff",       0xff, 1, 1 },
 | 
						|
    { "unum",         "-0xff",      -0xff, 0, 0 }, /* invalid neg number */
 | 
						|
    { "unum",          "0x7f",       0x7f, 1, 1 },
 | 
						|
    { "unum",         "-0x7f",      -0x7f, 0, 0 }, /* invalid neg number */
 | 
						|
    { "unum",          "0x80",       0x80, 1, 1 },
 | 
						|
    { "unum",         "-0x80",      -0x80, 0, 0 }, /* invalid neg number */
 | 
						|
    { "unum",          "0x81",       0x81, 1, 1 },
 | 
						|
    { "unum",         "-0x81",      -0x81, 0, 0 }, /* invalid neg number */
 | 
						|
};
 | 
						|
 | 
						|
static int check_int_from_text(const struct int_from_text_test_st a)
 | 
						|
{
 | 
						|
    OSSL_PARAM param;
 | 
						|
    long int val = 0;
 | 
						|
    int res;
 | 
						|
 | 
						|
    if (!OSSL_PARAM_allocate_from_text(¶m, params_from_text,
 | 
						|
                                       a.argname, a.strval, 0, NULL)) {
 | 
						|
        if (a.expected_res)
 | 
						|
            TEST_error("unexpected OSSL_PARAM_allocate_from_text() return for %s \"%s\"",
 | 
						|
                       a.argname, a.strval);
 | 
						|
        return !a.expected_res;
 | 
						|
    }
 | 
						|
 | 
						|
    /* For data size zero, OSSL_PARAM_get_long() may crash */
 | 
						|
    if (param.data_size == 0) {
 | 
						|
        OPENSSL_free(param.data);
 | 
						|
        TEST_error("unexpected zero size for %s \"%s\"",
 | 
						|
                   a.argname, a.strval);
 | 
						|
        return 0;
 | 
						|
    }
 | 
						|
    res = OSSL_PARAM_get_long(¶m, &val);
 | 
						|
    OPENSSL_free(param.data);
 | 
						|
 | 
						|
    if (res ^ a.expected_res) {
 | 
						|
        TEST_error("unexpected OSSL_PARAM_get_long() return for %s \"%s\": "
 | 
						|
                   "%d != %d", a.argname, a.strval, a.expected_res, res);
 | 
						|
        return 0;
 | 
						|
    }
 | 
						|
    if (val != a.expected_intval) {
 | 
						|
        TEST_error("unexpected result for %s \"%s\":  %li != %li",
 | 
						|
                   a.argname, a.strval, a.expected_intval, val);
 | 
						|
        return 0;
 | 
						|
    }
 | 
						|
    if (param.data_size != a.expected_bufsize) {
 | 
						|
        TEST_error("unexpected size for %s \"%s\":  %d != %d",
 | 
						|
                   a.argname, a.strval,
 | 
						|
                   (int)a.expected_bufsize, (int)param.data_size);
 | 
						|
        return 0;
 | 
						|
    }
 | 
						|
 | 
						|
    return a.expected_res;
 | 
						|
}
 | 
						|
 | 
						|
static int check_octetstr_from_hexstr(void)
 | 
						|
{
 | 
						|
    OSSL_PARAM param;
 | 
						|
    static const char *values[] = { "", "F", "FF", "FFF", "FFFF", NULL };
 | 
						|
    int i;
 | 
						|
    int errcnt = 0;
 | 
						|
 | 
						|
    /* Test odd vs even number of hex digits */
 | 
						|
    for (i = 0; values[i] != NULL; i++) {
 | 
						|
        int expected = (strlen(values[i]) % 2) != 1;
 | 
						|
        int result;
 | 
						|
 | 
						|
        ERR_clear_error();
 | 
						|
        memset(¶m, 0, sizeof(param));
 | 
						|
        if (expected)
 | 
						|
            result =
 | 
						|
                TEST_true(OSSL_PARAM_allocate_from_text(¶m,
 | 
						|
                                                        params_from_text,
 | 
						|
                                                        "hexoctets", values[i], 0,
 | 
						|
                                                        NULL));
 | 
						|
        else
 | 
						|
            result =
 | 
						|
                TEST_false(OSSL_PARAM_allocate_from_text(¶m,
 | 
						|
                                                         params_from_text,
 | 
						|
                                                         "hexoctets", values[i], 0,
 | 
						|
                                                         NULL));
 | 
						|
        if (!result) {
 | 
						|
            TEST_error("unexpected OSSL_PARAM_allocate_from_text() %s for 'octets' \"%s\"",
 | 
						|
                       (expected ? "failure" : "success"), values[i]);
 | 
						|
            errcnt++;
 | 
						|
        }
 | 
						|
        OPENSSL_free(param.data);
 | 
						|
    }
 | 
						|
    return errcnt == 0;
 | 
						|
}
 | 
						|
 | 
						|
static int test_allocate_from_text(int i)
 | 
						|
{
 | 
						|
    return check_int_from_text(int_from_text_test_cases[i]);
 | 
						|
}
 | 
						|
 | 
						|
static int test_more_allocate_from_text(void)
 | 
						|
{
 | 
						|
    return check_octetstr_from_hexstr();
 | 
						|
}
 | 
						|
 | 
						|
int setup_tests(void)
 | 
						|
{
 | 
						|
    ADD_ALL_TESTS(test_case, OSSL_NELEM(test_cases));
 | 
						|
    ADD_ALL_TESTS(test_allocate_from_text, OSSL_NELEM(int_from_text_test_cases));
 | 
						|
    ADD_TEST(test_more_allocate_from_text);
 | 
						|
    return 1;
 | 
						|
}
 |