2 RSA Asymmetric Cipher Wrapper Implementation over OpenSSL.
4 This file implements following APIs which provide more capabilities for RSA:
10 Copyright (c) 2009 - 2015, Intel Corporation. All rights reserved.<BR>
11 This program and the accompanying materials
12 are licensed and made available under the terms and conditions of the BSD License
13 which accompanies this distribution. The full text of the license may be found at
14 http://opensource.org/licenses/bsd-license.php
16 THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
17 WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
21 #include "InternalCryptLib.h"
23 #include <openssl/bn.h>
24 #include <openssl/rsa.h>
25 #include <openssl/err.h>
26 #include <openssl/objects.h>
29 Gets the tag-designated RSA key component from the established RSA context.
31 This function retrieves the tag-designated RSA key component from the
32 established RSA context as a non-negative integer (octet string format
33 represented in RSA PKCS#1).
34 If specified key component has not been set or has been cleared, then returned
36 If the BigNumber buffer is too small to hold the contents of the key, FALSE
37 is returned and BnSize is set to the required buffer size to obtain the key.
39 If RsaContext is NULL, then return FALSE.
40 If BnSize is NULL, then return FALSE.
41 If BnSize is large enough but BigNumber is NULL, then return FALSE.
43 @param[in, out] RsaContext Pointer to RSA context being set.
44 @param[in] KeyTag Tag of RSA key component being set.
45 @param[out] BigNumber Pointer to octet integer buffer.
46 @param[in, out] BnSize On input, the size of big number buffer in bytes.
47 On output, the size of data returned in big number buffer in bytes.
49 @retval TRUE RSA key component was retrieved successfully.
50 @retval FALSE Invalid RSA key component tag.
51 @retval FALSE BnSize is too small.
57 IN OUT VOID
*RsaContext
,
58 IN RSA_KEY_TAG KeyTag
,
68 // Check input parameters.
70 if (RsaContext
== NULL
|| BnSize
== NULL
) {
74 RsaKey
= (RSA
*) RsaContext
;
81 // RSA Public Modulus (N)
84 if (RsaKey
->n
== NULL
) {
91 // RSA Public Exponent (e)
94 if (RsaKey
->e
== NULL
) {
101 // RSA Private Exponent (d)
104 if (RsaKey
->d
== NULL
) {
111 // RSA Secret Prime Factor of Modulus (p)
114 if (RsaKey
->p
== NULL
) {
121 // RSA Secret Prime Factor of Modules (q)
124 if (RsaKey
->q
== NULL
) {
131 // p's CRT Exponent (== d mod (p - 1))
134 if (RsaKey
->dmp1
== NULL
) {
137 BnKey
= RsaKey
->dmp1
;
141 // q's CRT Exponent (== d mod (q - 1))
144 if (RsaKey
->dmq1
== NULL
) {
147 BnKey
= RsaKey
->dmq1
;
151 // The CRT Coefficient (== 1/q mod p)
154 if (RsaKey
->iqmp
== NULL
) {
157 BnKey
= RsaKey
->iqmp
;
165 Size
= BN_num_bytes (BnKey
);
167 if (*BnSize
< Size
) {
172 if (BigNumber
== NULL
) {
175 *BnSize
= BN_bn2bin (BnKey
, BigNumber
) ;
181 Generates RSA key components.
183 This function generates RSA key components. It takes RSA public exponent E and
184 length in bits of RSA modulus N as input, and generates all key components.
185 If PublicExponent is NULL, the default RSA public exponent (0x10001) will be used.
187 Before this function can be invoked, pseudorandom number generator must be correctly
188 initialized by RandomSeed().
190 If RsaContext is NULL, then return FALSE.
192 @param[in, out] RsaContext Pointer to RSA context being set.
193 @param[in] ModulusLength Length of RSA modulus N in bits.
194 @param[in] PublicExponent Pointer to RSA public exponent.
195 @param[in] PublicExponentSize Size of RSA public exponent buffer in bytes.
197 @retval TRUE RSA key component was generated successfully.
198 @retval FALSE Invalid RSA key component tag.
204 IN OUT VOID
*RsaContext
,
205 IN UINTN ModulusLength
,
206 IN CONST UINT8
*PublicExponent
,
207 IN UINTN PublicExponentSize
214 // Check input parameters.
216 if (RsaContext
== NULL
|| ModulusLength
> INT_MAX
|| PublicExponentSize
> INT_MAX
) {
227 if (PublicExponent
== NULL
) {
228 if (BN_set_word (KeyE
, 0x10001) == 0) {
232 if (BN_bin2bn (PublicExponent
, (UINT32
) PublicExponentSize
, KeyE
) == NULL
) {
237 if (RSA_generate_key_ex ((RSA
*) RsaContext
, (UINT32
) ModulusLength
, KeyE
, NULL
) == 1) {
247 Validates key components of RSA context.
248 NOTE: This function performs integrity checks on all the RSA key material, so
249 the RSA key structure must contain all the private key data.
251 This function validates key compoents of RSA context in following aspects:
252 - Whether p is a prime
253 - Whether q is a prime
255 - Whether d*e = 1 mod lcm(p-1,q-1)
257 If RsaContext is NULL, then return FALSE.
259 @param[in] RsaContext Pointer to RSA context to check.
261 @retval TRUE RSA key components are valid.
262 @retval FALSE RSA key components are not valid.
274 // Check input parameters.
276 if (RsaContext
== NULL
) {
280 if (RSA_check_key ((RSA
*) RsaContext
) != 1) {
281 Reason
= ERR_GET_REASON (ERR_peek_last_error ());
282 if (Reason
== RSA_R_P_NOT_PRIME
||
283 Reason
== RSA_R_Q_NOT_PRIME
||
284 Reason
== RSA_R_N_DOES_NOT_EQUAL_P_Q
||
285 Reason
== RSA_R_D_E_NOT_CONGRUENT_TO_1
) {
294 Carries out the RSA-SSA signature generation with EMSA-PKCS1-v1_5 encoding scheme.
296 This function carries out the RSA-SSA signature generation with EMSA-PKCS1-v1_5 encoding scheme defined in
298 If the Signature buffer is too small to hold the contents of signature, FALSE
299 is returned and SigSize is set to the required buffer size to obtain the signature.
301 If RsaContext is NULL, then return FALSE.
302 If MessageHash is NULL, then return FALSE.
303 If HashSize is not equal to the size of MD5, SHA-1 or SHA-256 digest, then return FALSE.
304 If SigSize is large enough but Signature is NULL, then return FALSE.
306 @param[in] RsaContext Pointer to RSA context for signature generation.
307 @param[in] MessageHash Pointer to octet message hash to be signed.
308 @param[in] HashSize Size of the message hash in bytes.
309 @param[out] Signature Pointer to buffer to receive RSA PKCS1-v1_5 signature.
310 @param[in, out] SigSize On input, the size of Signature buffer in bytes.
311 On output, the size of data returned in Signature buffer in bytes.
313 @retval TRUE Signature successfully generated in PKCS1-v1_5.
314 @retval FALSE Signature generation failed.
315 @retval FALSE SigSize is too small.
322 IN CONST UINT8
*MessageHash
,
324 OUT UINT8
*Signature
,
325 IN OUT UINTN
*SigSize
333 // Check input parameters.
335 if (RsaContext
== NULL
|| MessageHash
== NULL
) {
339 Rsa
= (RSA
*) RsaContext
;
340 Size
= BN_num_bytes (Rsa
->n
);
342 if (*SigSize
< Size
) {
347 if (Signature
== NULL
) {
352 // Determine the message digest algorithm according to digest size.
353 // Only MD5, SHA-1 or SHA-256 algorithm is supported.
356 case MD5_DIGEST_SIZE
:
357 DigestType
= NID_md5
;
360 case SHA1_DIGEST_SIZE
:
361 DigestType
= NID_sha1
;
364 case SHA256_DIGEST_SIZE
:
365 DigestType
= NID_sha256
;
372 return (BOOLEAN
) RSA_sign (