2 * Copyright 2019-2020 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the Apache License 2.0 (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
10 #include "internal/ffc.h"
14 * SP800-56Ar3 5.6.1.1.4 Key pair generation by testing candidates.
15 * Generates a private key in the interval [1, min(2 ^ N - 1, q - 1)].
17 * ctx must be set up with a libctx (for fips mode).
18 * params contains the FFC domain parameters p, q and g (for DH or DSA).
19 * N is the maximum bit length of the generated private key,
20 * s is the security strength.
21 * priv_key is the returned private key,
23 int ffc_generate_private_key(BN_CTX *ctx, const FFC_PARAMS *params,
24 int N, int s, BIGNUM *priv)
27 return ffc_generate_private_key_fips(ctx, params, N, s, priv);
30 if (!BN_priv_rand_range_ex(priv, params->q, ctx))
32 } while (BN_is_zero(priv) || BN_is_one(priv));
34 #endif /* FIPS_MODE */
37 int ffc_generate_private_key_fips(BN_CTX *ctx, const FFC_PARAMS *params,
38 int N, int s, BIGNUM *priv)
40 int ret = 0, qbits = BN_num_bits(params->q);
41 BIGNUM *m, *two_powN = NULL;
43 /* Step (2) : check range of N */
44 if (N < 2 * s || N > qbits)
47 /* Deal with the edge case where the value of N is not set */
55 if (two_powN == NULL || !BN_lshift(two_powN, BN_value_one(), N))
58 /* Step (5) : M = min(2 ^ N, q) */
59 m = (BN_cmp(two_powN, params->q) > 0) ? params->q : two_powN;
62 /* Steps (3, 4 & 7) : c + 1 = 1 + random[0..2^N - 1] */
63 if (!BN_priv_rand_range_ex(priv, two_powN, ctx)
64 || !BN_add_word(priv, 1))
66 /* Step (6) : loop if c > M - 2 (i.e. c + 1 >= M) */
67 if (BN_cmp(priv, m) < 0)