fips_rsa_lib.c revision 296465 
1/* fips_rsa_sign.c */
2/*
3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
4 * 2007.
5 */
6/* ====================================================================
7 * Copyright (c) 2007 The OpenSSL Project.  All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 *
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 *
16 * 2. Redistributions in binary form must reproduce the above copyright
17 *    notice, this list of conditions and the following disclaimer in
18 *    the documentation and/or other materials provided with the
19 *    distribution.
20 *
21 * 3. All advertising materials mentioning features or use of this
22 *    software must display the following acknowledgment:
23 *    "This product includes software developed by the OpenSSL Project
24 *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25 *
26 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27 *    endorse or promote products derived from this software without
28 *    prior written permission. For written permission, please contact
29 *    licensing@OpenSSL.org.
30 *
31 * 5. Products derived from this software may not be called "OpenSSL"
32 *    nor may "OpenSSL" appear in their names without prior written
33 *    permission of the OpenSSL Project.
34 *
35 * 6. Redistributions of any form whatsoever must retain the following
36 *    acknowledgment:
37 *    "This product includes software developed by the OpenSSL Project
38 *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39 *
40 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
44 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51 * OF THE POSSIBILITY OF SUCH DAMAGE.
52 * ====================================================================
53 *
54 * This product includes cryptographic software written by Eric Young
55 * (eay@cryptsoft.com).  This product includes software written by Tim
56 * Hudson (tjh@cryptsoft.com).
57 *
58 */
59
60#include <string.h>
61#include <openssl/evp.h>
62#include <openssl/rsa.h>
63#include <openssl/bn.h>
64#include <openssl/err.h>
65
66/*
67 * Minimal FIPS versions of FIPS_rsa_new() and FIPS_rsa_free: to reduce
68 * external dependencies.
69 */
70
71RSA *FIPS_rsa_new(void)
72{
73    RSA *ret;
74    ret = OPENSSL_malloc(sizeof(RSA));
75    if (!ret)
76        return NULL;
77    memset(ret, 0, sizeof(RSA));
78    ret->meth = RSA_PKCS1_SSLeay();
79    if (ret->meth->init)
80        ret->meth->init(ret);
81    return ret;
82}
83
84void FIPS_rsa_free(RSA *r)
85{
86    if (!r)
87        return;
88    if (r->meth->finish)
89        r->meth->finish(r);
90    if (r->n != NULL)
91        BN_clear_free(r->n);
92    if (r->e != NULL)
93        BN_clear_free(r->e);
94    if (r->d != NULL)
95        BN_clear_free(r->d);
96    if (r->p != NULL)
97        BN_clear_free(r->p);
98    if (r->q != NULL)
99        BN_clear_free(r->q);
100    if (r->dmp1 != NULL)
101        BN_clear_free(r->dmp1);
102    if (r->dmq1 != NULL)
103        BN_clear_free(r->dmq1);
104    if (r->iqmp != NULL)
105        BN_clear_free(r->iqmp);
106    if (r->blinding != NULL)
107        BN_BLINDING_free(r->blinding);
108    if (r->mt_blinding != NULL)
109        BN_BLINDING_free(r->mt_blinding);
110    if (r->bignum_data != NULL)
111        OPENSSL_free_locked(r->bignum_data);
112    OPENSSL_free(r);
113}
114