calog/vendor/openssl/crypto/slh_dsa/slh_adrs.c

184 lines
6.7 KiB
C
Vendored

/*
* Copyright 2024-2025 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 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/byteorder.h>
#include "slh_adrs.h"
/* See FIPS 205 - Section 4.3 Table 1 Uncompressed Addresses */
#define SLH_ADRS_OFF_LAYER_ADR 0
#define SLH_ADRS_OFF_TREE_ADR 4
#define SLH_ADRS_OFF_TYPE 16
#define SLH_ADRS_OFF_KEYPAIR_ADDR 20
#define SLH_ADRS_OFF_CHAIN_ADDR 24
#define SLH_ADRS_OFF_HASH_ADDR 28
#define SLH_ADRS_OFF_TREE_INDEX SLH_ADRS_OFF_HASH_ADDR
#define SLH_ADRS_SIZE_TYPE 4
/* Number of bytes after type to clear */
#define SLH_ADRS_SIZE_TYPECLEAR SLH_ADRS_SIZE - (SLH_ADRS_OFF_TYPE + SLH_ADRS_SIZE_TYPE)
#define SLH_ADRS_SIZE_KEYPAIR_ADDR 4
/* See FIPS 205 - Section 11.2 Table 3 Compressed Addresses */
#define SLH_ADRSC_OFF_LAYER_ADR 0
#define SLH_ADRSC_OFF_TREE_ADR 1
#define SLH_ADRSC_OFF_TYPE 9
#define SLH_ADRSC_OFF_KEYPAIR_ADDR 10
#define SLH_ADRSC_OFF_CHAIN_ADDR 14
#define SLH_ADRSC_OFF_HASH_ADDR 18
#define SLH_ADRSC_OFF_TREE_INDEX SLH_ADRSC_OFF_HASH_ADDR
#define SLH_ADRSC_SIZE_TYPE 1
#define SLH_ADRSC_SIZE_TYPECLEAR SLH_ADRS_SIZE_TYPECLEAR
#define SLH_ADRSC_SIZE_KEYPAIR_ADDR SLH_ADRS_SIZE_KEYPAIR_ADDR
#define slh_adrs_set_tree_height slh_adrs_set_chain_address
#define slh_adrs_set_tree_index slh_adrs_set_hash_address
#define slh_adrsc_set_tree_height slh_adrsc_set_chain_address
#define slh_adrsc_set_tree_index slh_adrsc_set_hash_address
static OSSL_SLH_ADRS_FUNC_set_layer_address slh_adrs_set_layer_address;
static OSSL_SLH_ADRS_FUNC_set_tree_address slh_adrs_set_tree_address;
static OSSL_SLH_ADRS_FUNC_set_type_and_clear slh_adrs_set_type_and_clear;
static OSSL_SLH_ADRS_FUNC_set_keypair_address slh_adrs_set_keypair_address;
static OSSL_SLH_ADRS_FUNC_copy_keypair_address slh_adrs_copy_keypair_address;
static OSSL_SLH_ADRS_FUNC_set_chain_address slh_adrs_set_chain_address;
static OSSL_SLH_ADRS_FUNC_set_hash_address slh_adrs_set_hash_address;
static OSSL_SLH_ADRS_FUNC_zero slh_adrs_zero;
static OSSL_SLH_ADRS_FUNC_copy slh_adrs_copy;
static OSSL_SLH_ADRS_FUNC_set_layer_address slh_adrsc_set_layer_address;
static OSSL_SLH_ADRS_FUNC_set_tree_address slh_adrsc_set_tree_address;
static OSSL_SLH_ADRS_FUNC_set_type_and_clear slh_adrsc_set_type_and_clear;
static OSSL_SLH_ADRS_FUNC_set_keypair_address slh_adrsc_set_keypair_address;
static OSSL_SLH_ADRS_FUNC_copy_keypair_address slh_adrsc_copy_keypair_address;
static OSSL_SLH_ADRS_FUNC_set_chain_address slh_adrsc_set_chain_address;
static OSSL_SLH_ADRS_FUNC_set_hash_address slh_adrsc_set_hash_address;
static OSSL_SLH_ADRS_FUNC_zero slh_adrsc_zero;
static OSSL_SLH_ADRS_FUNC_copy slh_adrsc_copy;
/*
* The non compressed versions of the ADRS functions use 32 bytes
* This is only used by SHAKE.
*/
static void slh_adrs_set_layer_address(uint8_t *adrs, uint32_t layer)
{
OPENSSL_store_u32_be(adrs + SLH_ADRS_OFF_LAYER_ADR, layer);
}
static void slh_adrs_set_tree_address(uint8_t *adrs, uint64_t address)
{
/*
* There are 12 bytes reserved for this - but the largest number
* used by the parameter sets is only 64 bits. Because this is BE the
* first 4 of the 12 bytes will be zeros. This assumes that the 4 bytes
* are zero initially.
*/
OPENSSL_store_u64_be(adrs + SLH_ADRS_OFF_TREE_ADR + 4, address);
}
static void slh_adrs_set_type_and_clear(uint8_t *adrs, uint32_t type)
{
OPENSSL_store_u32_be(adrs + SLH_ADRS_OFF_TYPE, type);
memset(adrs + SLH_ADRS_OFF_TYPE + SLH_ADRS_SIZE_TYPE, 0, SLH_ADRS_SIZE_TYPECLEAR);
}
static void slh_adrs_set_keypair_address(uint8_t *adrs, uint32_t in)
{
OPENSSL_store_u32_be(adrs + SLH_ADRS_OFF_KEYPAIR_ADDR, in);
}
static void slh_adrs_copy_keypair_address(uint8_t *dst, const uint8_t *src)
{
memcpy(dst + SLH_ADRS_OFF_KEYPAIR_ADDR, src + SLH_ADRS_OFF_KEYPAIR_ADDR,
SLH_ADRS_SIZE_KEYPAIR_ADDR);
}
static void slh_adrs_set_chain_address(uint8_t *adrs, uint32_t in)
{
OPENSSL_store_u32_be(adrs + SLH_ADRS_OFF_CHAIN_ADDR, in);
}
static void slh_adrs_set_hash_address(uint8_t *adrs, uint32_t in)
{
OPENSSL_store_u32_be(adrs + SLH_ADRS_OFF_HASH_ADDR, in);
}
static void slh_adrs_zero(uint8_t *adrs)
{
memset(adrs, 0, SLH_ADRS_SIZE);
}
static void slh_adrs_copy(uint8_t *dst, const uint8_t *src)
{
memcpy(dst, src, SLH_ADRS_SIZE);
}
/* Compressed versions of ADRS functions See Table 3 */
static void slh_adrsc_set_layer_address(uint8_t *adrsc, uint32_t layer)
{
adrsc[SLH_ADRSC_OFF_LAYER_ADR] = (uint8_t)layer;
}
static void slh_adrsc_set_tree_address(uint8_t *adrsc, uint64_t in)
{
OPENSSL_store_u64_be(adrsc + SLH_ADRSC_OFF_TREE_ADR, in);
}
static void slh_adrsc_set_type_and_clear(uint8_t *adrsc, uint32_t type)
{
adrsc[SLH_ADRSC_OFF_TYPE] = (uint8_t)type;
memset(adrsc + SLH_ADRSC_OFF_TYPE + SLH_ADRSC_SIZE_TYPE, 0, SLH_ADRSC_SIZE_TYPECLEAR);
}
static void slh_adrsc_set_keypair_address(uint8_t *adrsc, uint32_t in)
{
OPENSSL_store_u32_be(adrsc + SLH_ADRSC_OFF_KEYPAIR_ADDR, in);
}
static void slh_adrsc_copy_keypair_address(uint8_t *dst, const uint8_t *src)
{
memcpy(dst + SLH_ADRSC_OFF_KEYPAIR_ADDR, src + SLH_ADRSC_OFF_KEYPAIR_ADDR,
SLH_ADRSC_SIZE_KEYPAIR_ADDR);
}
static void slh_adrsc_set_chain_address(uint8_t *adrsc, uint32_t in)
{
OPENSSL_store_u32_be(adrsc + SLH_ADRSC_OFF_CHAIN_ADDR, in);
}
static void slh_adrsc_set_hash_address(uint8_t *adrsc, uint32_t in)
{
OPENSSL_store_u32_be(adrsc + SLH_ADRSC_OFF_HASH_ADDR, in);
}
static void slh_adrsc_zero(uint8_t *adrsc)
{
memset(adrsc, 0, SLH_ADRSC_SIZE);
}
static void slh_adrsc_copy(uint8_t *dst, const uint8_t *src)
{
memcpy(dst, src, SLH_ADRSC_SIZE);
}
const SLH_ADRS_FUNC *ossl_slh_get_adrs_fn(int is_compressed)
{
static const SLH_ADRS_FUNC methods[] = {
{
slh_adrs_set_layer_address,
slh_adrs_set_tree_address,
slh_adrs_set_type_and_clear,
slh_adrs_set_keypair_address,
slh_adrs_copy_keypair_address,
slh_adrs_set_chain_address,
slh_adrs_set_tree_height,
slh_adrs_set_hash_address,
slh_adrs_set_tree_index,
slh_adrs_zero,
slh_adrs_copy,
},
{
slh_adrsc_set_layer_address,
slh_adrsc_set_tree_address,
slh_adrsc_set_type_and_clear,
slh_adrsc_set_keypair_address,
slh_adrsc_copy_keypair_address,
slh_adrsc_set_chain_address,
slh_adrsc_set_tree_height,
slh_adrsc_set_hash_address,
slh_adrsc_set_tree_index,
slh_adrsc_zero,
slh_adrsc_copy,
}
};
return &methods[is_compressed == 0 ? 0 : 1];
}