9830e7ea42
Add ranged checked OSSL_PARAM conversions between the native types. A conversion is legal only if the given value can be exactly represented by the target type. Includes a test case that reads a stanza test case file and verified that param conversions are processed properly. Reviewed-by: Richard Levitte <levitte@openssl.org> (Merged from https://github.com/openssl/openssl/pull/8733)
910 lines
26 KiB
C
910 lines
26 KiB
C
/*
|
|
* Copyright 2019 The OpenSSL Project Authors. All Rights Reserved.
|
|
* Copyright (c) 2019, Oracle and/or its affiliates. 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 can obtain a copy
|
|
* in the file LICENSE in the source distribution or at
|
|
* https://www.openssl.org/source/license.html
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <openssl/params.h>
|
|
#include "internal/thread_once.h"
|
|
|
|
#define SET_RETURN_SIZE(p, sz) \
|
|
if ((p)->return_size != NULL) \
|
|
*(p)->return_size = (sz)
|
|
|
|
const OSSL_PARAM *OSSL_PARAM_locate(const OSSL_PARAM *p, const char *key)
|
|
{
|
|
if (p != NULL && key != NULL)
|
|
for (; p->key != NULL; p++)
|
|
if (strcmp(key, p->key) == 0)
|
|
return p;
|
|
return NULL;
|
|
}
|
|
|
|
static OSSL_PARAM ossl_param_construct(const char *key, unsigned int data_type,
|
|
void *data, size_t data_size,
|
|
size_t *return_size)
|
|
{
|
|
OSSL_PARAM res;
|
|
|
|
res.key = key;
|
|
res.data_type = data_type;
|
|
res.data = data;
|
|
res.data_size = data_size;
|
|
res.return_size = return_size;
|
|
return res;
|
|
}
|
|
|
|
int OSSL_PARAM_get_int(const OSSL_PARAM *p, int *val)
|
|
{
|
|
switch (sizeof(int)) {
|
|
case sizeof(int32_t):
|
|
return OSSL_PARAM_get_int32(p, (int32_t *)val);
|
|
case sizeof(int64_t):
|
|
return OSSL_PARAM_get_int64(p, (int64_t *)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_int(const OSSL_PARAM *p, int val)
|
|
{
|
|
switch (sizeof(int)) {
|
|
case sizeof(int32_t):
|
|
return OSSL_PARAM_set_int32(p, (int32_t)val);
|
|
case sizeof(int64_t):
|
|
return OSSL_PARAM_set_int64(p, (int64_t)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_int(const char *key, int *buf, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int),
|
|
rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_uint(const OSSL_PARAM *p, unsigned int *val)
|
|
{
|
|
switch (sizeof(unsigned int)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_get_uint32(p, (uint32_t *)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_get_uint64(p, (uint64_t *)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_uint(const OSSL_PARAM *p, unsigned int val)
|
|
{
|
|
switch (sizeof(unsigned int)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_set_uint32(p, (uint32_t)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_set_uint64(p, (uint64_t)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_uint(const char *key, unsigned int *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf,
|
|
sizeof(unsigned int), rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_long(const OSSL_PARAM *p, long int *val)
|
|
{
|
|
switch (sizeof(long int)) {
|
|
case sizeof(int32_t):
|
|
return OSSL_PARAM_get_int32(p, (int32_t *)val);
|
|
case sizeof(int64_t):
|
|
return OSSL_PARAM_get_int64(p, (int64_t *)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_long(const OSSL_PARAM *p, long int val)
|
|
{
|
|
switch (sizeof(long int)) {
|
|
case sizeof(int32_t):
|
|
return OSSL_PARAM_set_int32(p, (int32_t)val);
|
|
case sizeof(int64_t):
|
|
return OSSL_PARAM_set_int64(p, (int64_t)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_long(const char *key, long int *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(long int),
|
|
rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_ulong(const OSSL_PARAM *p, unsigned long int *val)
|
|
{
|
|
switch (sizeof(unsigned long int)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_get_uint32(p, (uint32_t *)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_get_uint64(p, (uint64_t *)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_ulong(const OSSL_PARAM *p, unsigned long int val)
|
|
{
|
|
switch (sizeof(unsigned long int)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_set_uint32(p, (uint32_t)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_set_uint64(p, (uint64_t)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_ulong(const char *key, unsigned long int *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf,
|
|
sizeof(unsigned long int), rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_int32(const OSSL_PARAM *p, int32_t *val)
|
|
{
|
|
int64_t i64;
|
|
uint32_t u32;
|
|
uint64_t u64;
|
|
double d;
|
|
|
|
if (val == NULL || p == NULL )
|
|
return 0;
|
|
|
|
if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
*val = *(const int32_t *)p->data;
|
|
return 1;
|
|
case sizeof(int64_t):
|
|
i64 = *(const int64_t *)p->data;
|
|
if (i64 >= INT32_MIN && i64 <= INT32_MAX) {
|
|
*val = (int32_t)i64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
u32 = *(const uint32_t *)p->data;
|
|
if (u32 <= INT32_MAX) {
|
|
*val = (int32_t)u32;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(uint64_t):
|
|
u64 = *(const uint64_t *)p->data;
|
|
if (u64 <= INT32_MAX) {
|
|
*val = (int32_t)u64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
d = *(const double *)p->data;
|
|
if (d >= INT32_MIN && d <= INT32_MAX && d == (int32_t)d) {
|
|
*val = (int32_t)d;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_int32(const OSSL_PARAM *p, int32_t val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(int32_t)); /* Minimum expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
*(int32_t *)p->data = val;
|
|
return 1;
|
|
case sizeof(int64_t):
|
|
SET_RETURN_SIZE(p, sizeof(int64_t));
|
|
*(int64_t *)p->data = (int64_t)val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) {
|
|
SET_RETURN_SIZE(p, sizeof(uint32_t)); /* Minimum expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*(uint32_t *)p->data = (uint32_t)val;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
SET_RETURN_SIZE(p, sizeof(uint64_t));
|
|
*(uint64_t *)p->data = (uint64_t)val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
*(double *)p->data = (double)val;
|
|
return 1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_int32(const char *key, int32_t *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf,
|
|
sizeof(int32_t), rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_uint32(const OSSL_PARAM *p, uint32_t *val)
|
|
{
|
|
int32_t i32;
|
|
int64_t i64;
|
|
uint64_t u64;
|
|
double d;
|
|
|
|
if (val == NULL || p == NULL)
|
|
return 0;
|
|
|
|
if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*val = *(const uint32_t *)p->data;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
u64 = *(const uint64_t *)p->data;
|
|
if (u64 <= UINT32_MAX) {
|
|
*val = (uint32_t)u64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
i32 = *(const int32_t *)p->data;
|
|
if (i32 >= 0) {
|
|
*val = i32;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
i64 = *(const int64_t *)p->data;
|
|
if (i64 >= 0 && i64 <= UINT32_MAX) {
|
|
*val = (uint32_t)i64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
d = *(const double *)p->data;
|
|
if (d >= 0 && d <= UINT32_MAX && d == (uint32_t)d) {
|
|
*val = (uint32_t)d;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_uint32(const OSSL_PARAM *p, uint32_t val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
|
|
if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(uint32_t)); /* Minimum expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*(uint32_t *)p->data = val;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
SET_RETURN_SIZE(p, sizeof(uint64_t));
|
|
*(uint64_t *)p->data = val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(int32_t)); /* Minimum expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
if (val <= INT32_MAX) {
|
|
*(int32_t *)p->data = (int32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
SET_RETURN_SIZE(p, sizeof(int64_t));
|
|
*(int64_t *)p->data = (int64_t)val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
*(double *)p->data = (double)val;
|
|
return 1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_uint32(const char *key, uint32_t *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf,
|
|
sizeof(uint32_t), rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_int64(const OSSL_PARAM *p, int64_t *val)
|
|
{
|
|
uint64_t u64;
|
|
double d;
|
|
|
|
if (val == NULL || p == NULL )
|
|
return 0;
|
|
|
|
if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
*val = *(const int32_t *)p->data;
|
|
return 1;
|
|
case sizeof(int64_t):
|
|
*val = *(const int64_t *)p->data;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*val = *(const uint32_t *)p->data;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
u64 = *(const uint64_t *)p->data;
|
|
if (u64 <= INT64_MAX) {
|
|
*val = (int64_t)u64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
d = *(const double *)p->data;
|
|
if (d >= INT64_MIN && d <= INT64_MAX && d == (int64_t)d) {
|
|
*val = (int64_t)d;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_int64(const OSSL_PARAM *p, int64_t val)
|
|
{
|
|
uint64_t u64;
|
|
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(int64_t)); /* Expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
if (val >= INT32_MIN && val <= INT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(int32_t));
|
|
*(int32_t *)p->data = (int32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
*(int64_t *)p->data = val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER && val >= 0) {
|
|
SET_RETURN_SIZE(p, sizeof(uint64_t)); /* Expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
if (val <= UINT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(uint32_t));
|
|
*(uint32_t *)p->data = (uint32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(uint64_t):
|
|
*(uint64_t *)p->data = (uint64_t)val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
u64 = val < 0 ? -val : val;
|
|
if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */
|
|
*(double *)p->data = (double)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_int64(const char *key, int64_t *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_INTEGER, buf, sizeof(int64_t),
|
|
rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_uint64(const OSSL_PARAM *p, uint64_t *val)
|
|
{
|
|
int32_t i32;
|
|
int64_t i64;
|
|
double d;
|
|
|
|
if (val == NULL || p == NULL)
|
|
return 0;
|
|
|
|
if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*val = *(const uint32_t *)p->data;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
*val = *(const uint64_t *)p->data;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
i32 = *(const int32_t *)p->data;
|
|
if (i32 >= 0) {
|
|
*val = (uint64_t)i32;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
i64 = *(const int64_t *)p->data;
|
|
if (i64 >= 0) {
|
|
*val = (uint64_t)i64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
d = *(const double *)p->data;
|
|
if (d >= 0 && d <= INT64_MAX && d == (uint64_t)d) {
|
|
*val = (uint64_t)d;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_uint64(const OSSL_PARAM *p, uint64_t val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
|
|
if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(uint64_t)); /* Expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
if (val <= UINT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(uint32_t));
|
|
*(uint32_t *)p->data = (uint32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(uint64_t):
|
|
*(uint64_t *)p->data = val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
SET_RETURN_SIZE(p, sizeof(int64_t)); /* Expected size */
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
if (val <= INT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(int32_t));
|
|
*(int32_t *)p->data = (int32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
if (val <= INT64_MAX) {
|
|
*(int64_t *)p->data = (int64_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_REAL) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
if ((val >> 53) == 0) { /* 53 significant bits in the mantissa */
|
|
*(double *)p->data = (double)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_uint64(const char *key, uint64_t *buf,
|
|
size_t *rsize) {
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf,
|
|
sizeof(uint64_t), rsize);
|
|
}
|
|
|
|
int OSSL_PARAM_get_size_t(const OSSL_PARAM *p, size_t *val)
|
|
{
|
|
switch (sizeof(size_t)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_get_uint32(p, (uint32_t *)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_get_uint64(p, (uint64_t *)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_size_t(const OSSL_PARAM *p, size_t val)
|
|
{
|
|
switch (sizeof(size_t)) {
|
|
case sizeof(uint32_t):
|
|
return OSSL_PARAM_set_uint32(p, (uint32_t)val);
|
|
case sizeof(uint64_t):
|
|
return OSSL_PARAM_set_uint64(p, (uint64_t)val);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_size_t(const char *key, size_t *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER, buf,
|
|
sizeof(size_t), rsize); }
|
|
|
|
#ifndef FIPS_MODE
|
|
/*
|
|
* TODO(3.0): Make this available in FIPS mode.
|
|
*
|
|
* Temporarily we don't include these functions in FIPS mode to avoid pulling
|
|
* in the entire BN sub-library into the module at this point.
|
|
*/
|
|
int OSSL_PARAM_get_BN(const OSSL_PARAM *p, BIGNUM **val)
|
|
{
|
|
BIGNUM *b;
|
|
|
|
if (val == NULL
|
|
|| p == NULL
|
|
|| p->data_type != OSSL_PARAM_UNSIGNED_INTEGER)
|
|
return 0;
|
|
|
|
b = BN_native2bn(p->data, (int)p->data_size, *val);
|
|
if (b != NULL) {
|
|
*val = b;
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_BN(const OSSL_PARAM *p, const BIGNUM *val)
|
|
{
|
|
size_t bytes;
|
|
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (val == NULL || p->data_type != OSSL_PARAM_UNSIGNED_INTEGER)
|
|
return 0;
|
|
|
|
/* For the moment, only positive values are permitted */
|
|
if (BN_is_negative(val))
|
|
return 0;
|
|
|
|
bytes = (size_t)BN_num_bytes(val);
|
|
SET_RETURN_SIZE(p, bytes);
|
|
return p->data_size >= bytes
|
|
&& BN_bn2nativepad(val, p->data, bytes) >= 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_BN(const char *key, unsigned char *buf,
|
|
size_t bsize, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UNSIGNED_INTEGER,
|
|
buf, bsize, rsize);
|
|
}
|
|
#endif
|
|
|
|
int OSSL_PARAM_get_double(const OSSL_PARAM *p, double *val)
|
|
{
|
|
int64_t i64;
|
|
uint64_t u64;
|
|
|
|
if (val == NULL || p == NULL)
|
|
return 0;
|
|
|
|
if (p->data_type == OSSL_PARAM_REAL) {
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
*val = *(const double *)p->data;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
*val = *(const uint32_t *)p->data;
|
|
return 1;
|
|
case sizeof(uint64_t):
|
|
u64 = *(const uint64_t *)p->data;
|
|
if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */
|
|
*val = (double)u64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER) {
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
*val = *(const int32_t *)p->data;
|
|
return 1;
|
|
case sizeof(int64_t):
|
|
i64 = *(const int64_t *)p->data;
|
|
u64 = i64 < 0 ? -i64 : i64;
|
|
if ((u64 >> 53) == 0) { /* 53 significant bits in the mantissa */
|
|
*val = 0.0 + i64;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int OSSL_PARAM_set_double(const OSSL_PARAM *p, double val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
|
|
if (p->data_type == OSSL_PARAM_REAL) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(double):
|
|
*(double *)p->data = val;
|
|
return 1;
|
|
}
|
|
} else if (p->data_type == OSSL_PARAM_UNSIGNED_INTEGER
|
|
&& val == (uintmax_t)val) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(uint32_t):
|
|
if (val >= 0 && val <= UINT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(uint32_t));
|
|
*(uint32_t *)p->data = (uint32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(uint64_t):
|
|
if (val >= 0 && val <= UINT64_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(uint64_t));
|
|
*(uint64_t *)p->data = (uint64_t)val;
|
|
return 1;
|
|
}
|
|
break; }
|
|
} else if (p->data_type == OSSL_PARAM_INTEGER && val == (intmax_t)val) {
|
|
SET_RETURN_SIZE(p, sizeof(double));
|
|
switch (p->data_size) {
|
|
case sizeof(int32_t):
|
|
if (val >= INT32_MIN && val <= INT32_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(int32_t));
|
|
*(int32_t *)p->data = (int32_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
case sizeof(int64_t):
|
|
if (val >= INT64_MIN && val <= INT64_MAX) {
|
|
SET_RETURN_SIZE(p, sizeof(int64_t));
|
|
*(int64_t *)p->data = (int64_t)val;
|
|
return 1;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_double(const char *key, double *buf,
|
|
size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_REAL, buf, sizeof(double),
|
|
rsize);
|
|
}
|
|
|
|
static int get_string_internal(const OSSL_PARAM *p, void **val, size_t max_len,
|
|
size_t *used_len, unsigned int type)
|
|
{
|
|
size_t sz;
|
|
|
|
if (val == NULL || p == NULL || p->data_type != type)
|
|
return 0;
|
|
|
|
sz = p->data_size;
|
|
|
|
if (used_len != NULL)
|
|
*used_len = sz;
|
|
|
|
if (*val == NULL) {
|
|
char *const q = OPENSSL_malloc(sz);
|
|
|
|
if (q == NULL)
|
|
return 0;
|
|
*val = q;
|
|
memcpy(q, p->data, sz);
|
|
return 1;
|
|
}
|
|
if (max_len < sz)
|
|
return 0;
|
|
memcpy(*val, p->data, sz);
|
|
return 1;
|
|
}
|
|
|
|
int OSSL_PARAM_get_utf8_string(const OSSL_PARAM *p, char **val, size_t max_len)
|
|
{
|
|
return get_string_internal(p, (void **)val, max_len, NULL,
|
|
OSSL_PARAM_UTF8_STRING);
|
|
}
|
|
|
|
int OSSL_PARAM_get_octet_string(const OSSL_PARAM *p, void **val, size_t max_len,
|
|
size_t *used_len)
|
|
{
|
|
return get_string_internal(p, val, max_len, used_len,
|
|
OSSL_PARAM_OCTET_STRING);
|
|
}
|
|
|
|
static int set_string_internal(const OSSL_PARAM *p, const void *val, size_t len,
|
|
unsigned int type)
|
|
{
|
|
SET_RETURN_SIZE(p, len);
|
|
if (p->data_type != type || p->data_size < len)
|
|
return 0;
|
|
|
|
memcpy(p->data, val, len);
|
|
return 1;
|
|
}
|
|
|
|
int OSSL_PARAM_set_utf8_string(const OSSL_PARAM *p, const char *val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (val == NULL)
|
|
return 0;
|
|
return set_string_internal(p, val, strlen(val) + 1, OSSL_PARAM_UTF8_STRING);
|
|
}
|
|
|
|
int OSSL_PARAM_set_octet_string(const OSSL_PARAM *p, const void *val,
|
|
size_t len)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (val == NULL)
|
|
return 0;
|
|
return set_string_internal(p, val, len, OSSL_PARAM_OCTET_STRING);
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_utf8_string(const char *key, char *buf,
|
|
size_t bsize, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UTF8_STRING, buf, bsize,
|
|
rsize);
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_octet_string(const char *key, void *buf,
|
|
size_t bsize, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_OCTET_STRING, buf, bsize,
|
|
rsize);
|
|
}
|
|
|
|
static int get_ptr_internal(const OSSL_PARAM *p, const void **val,
|
|
size_t *used_len, unsigned int type)
|
|
{
|
|
if (val == NULL || p == NULL || p->data_type != type)
|
|
return 0;
|
|
if (used_len != NULL)
|
|
*used_len = p->data_size;
|
|
*val = *(const void **)p->data;
|
|
return 1;
|
|
}
|
|
|
|
int OSSL_PARAM_get_utf8_ptr(const OSSL_PARAM *p, const char **val)
|
|
{
|
|
return get_ptr_internal(p, (const void **)val, NULL, OSSL_PARAM_UTF8_PTR);
|
|
}
|
|
|
|
int OSSL_PARAM_get_octet_ptr(const OSSL_PARAM *p, const void **val,
|
|
size_t *used_len)
|
|
{
|
|
return get_ptr_internal(p, val, used_len, OSSL_PARAM_OCTET_PTR);
|
|
}
|
|
|
|
static int set_ptr_internal(const OSSL_PARAM *p, const void *val,
|
|
unsigned int type, size_t len)
|
|
{
|
|
SET_RETURN_SIZE(p, len);
|
|
if (p->data_type != type)
|
|
return 0;
|
|
*(const void **)p->data = val;
|
|
return 1;
|
|
}
|
|
|
|
int OSSL_PARAM_set_utf8_ptr(const OSSL_PARAM *p, const char *val)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (val == NULL)
|
|
return 0;
|
|
return set_ptr_internal(p, val, OSSL_PARAM_UTF8_PTR, strlen(val) + 1);
|
|
}
|
|
|
|
int OSSL_PARAM_set_octet_ptr(const OSSL_PARAM *p, const void *val,
|
|
size_t used_len)
|
|
{
|
|
if (p == NULL)
|
|
return 0;
|
|
SET_RETURN_SIZE(p, 0);
|
|
if (val == NULL)
|
|
return 0;
|
|
return set_ptr_internal(p, val, OSSL_PARAM_OCTET_PTR, used_len);
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_utf8_ptr(const char *key, char **buf,
|
|
size_t bsize, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_UTF8_PTR, buf, bsize, rsize);
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_octet_ptr(const char *key, void **buf,
|
|
size_t bsize, size_t *rsize)
|
|
{
|
|
return ossl_param_construct(key, OSSL_PARAM_OCTET_PTR, buf, bsize, rsize);
|
|
}
|
|
|
|
OSSL_PARAM OSSL_PARAM_construct_end(void)
|
|
{
|
|
OSSL_PARAM end = OSSL_PARAM_END;
|
|
|
|
return end;
|
|
}
|