Accept NULL in *_free.
[openssl.git] / crypto / rsa / rsa_sign.c
1 /* crypto/rsa/rsa_sign.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
5  * This package is an SSL implementation written
6  * by Eric Young (eay@cryptsoft.com).
7  * The implementation was written so as to conform with Netscapes SSL.
8  * 
9  * This library is free for commercial and non-commercial use as long as
10  * the following conditions are aheared to.  The following conditions
11  * apply to all code found in this distribution, be it the RC4, RSA,
12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
13  * included with this distribution is covered by the same copyright terms
14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15  * 
16  * Copyright remains Eric Young's, and as such any Copyright notices in
17  * the code are not to be removed.
18  * If this package is used in a product, Eric Young should be given attribution
19  * as the author of the parts of the library used.
20  * This can be in the form of a textual message at program startup or
21  * in documentation (online or textual) provided with the package.
22  * 
23  * Redistribution and use in source and binary forms, with or without
24  * modification, are permitted provided that the following conditions
25  * are met:
26  * 1. Redistributions of source code must retain the copyright
27  *    notice, this list of conditions and the following disclaimer.
28  * 2. Redistributions in binary form must reproduce the above copyright
29  *    notice, this list of conditions and the following disclaimer in the
30  *    documentation and/or other materials provided with the distribution.
31  * 3. All advertising materials mentioning features or use of this software
32  *    must display the following acknowledgement:
33  *    "This product includes cryptographic software written by
34  *     Eric Young (eay@cryptsoft.com)"
35  *    The word 'cryptographic' can be left out if the rouines from the library
36  *    being used are not cryptographic related :-).
37  * 4. If you include any Windows specific code (or a derivative thereof) from 
38  *    the apps directory (application code) you must include an acknowledgement:
39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40  * 
41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51  * SUCH DAMAGE.
52  * 
53  * The licence and distribution terms for any publically available version or
54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
55  * copied and put under another distribution licence
56  * [including the GNU Public Licence.]
57  */
58
59 #include <stdio.h>
60 #include "cryptlib.h"
61 #include "bn.h"
62 #include "rsa.h"
63 #include "objects.h"
64 #include "x509.h"
65
66 int RSA_sign(type,m,m_len,sigret,siglen,rsa)
67 int type;
68 unsigned char *m;
69 unsigned int m_len;
70 unsigned char *sigret;
71 unsigned int *siglen;
72 RSA *rsa;
73         {
74         X509_SIG sig;
75         ASN1_TYPE parameter;
76         int i,j,ret=1;
77         unsigned char *p,*s;
78         X509_ALGOR algor;
79         ASN1_OCTET_STRING digest;
80
81         sig.algor= &algor;
82         sig.algor->algorithm=OBJ_nid2obj(type);
83         if (sig.algor->algorithm == NULL)
84                 {
85                 RSAerr(RSA_F_RSA_SIGN,RSA_R_UNKNOWN_ALGORITHM_TYPE);
86                 return(0);
87                 }
88         if (sig.algor->algorithm->length == 0)
89                 {
90                 RSAerr(RSA_F_RSA_SIGN,RSA_R_THE_ASN1_OBJECT_IDENTIFIER_IS_NOT_KNOWN_FOR_THIS_MD);
91                 return(0);
92                 }
93         parameter.type=V_ASN1_NULL;
94         parameter.value.ptr=NULL;
95         sig.algor->parameter= &parameter;
96
97         sig.digest= &digest;
98         sig.digest->data=m;
99         sig.digest->length=m_len;
100
101         i=i2d_X509_SIG(&sig,NULL);
102         j=RSA_size(rsa);
103         if ((i-RSA_PKCS1_PADDING) > j)
104                 {
105                 RSAerr(RSA_F_RSA_SIGN,RSA_R_DIGEST_TOO_BIG_FOR_RSA_KEY);
106                 return(0);
107                 }
108         s=(unsigned char *)Malloc((unsigned int)j+1);
109         if (s == NULL)
110                 {
111                 RSAerr(RSA_F_RSA_SIGN,ERR_R_MALLOC_FAILURE);
112                 return(0);
113                 }
114         p=s;
115         i2d_X509_SIG(&sig,&p);
116         i=RSA_private_encrypt(i,s,sigret,rsa,RSA_PKCS1_PADDING);
117         if (i <= 0)
118                 ret=0;
119         else
120                 *siglen=i;
121
122         memset(s,0,(unsigned int)j+1);
123         Free(s);
124         return(ret);
125         }
126
127 int RSA_verify(dtype, m, m_len, sigbuf, siglen, rsa)
128 int dtype;
129 unsigned char *m;
130 unsigned int m_len;
131 unsigned char *sigbuf;
132 unsigned int siglen;
133 RSA *rsa;
134         {
135         int i,ret=0,sigtype;
136         unsigned char *p,*s;
137         X509_SIG *sig=NULL;
138
139         if (siglen != (unsigned int)RSA_size(rsa))
140                 {
141                 RSAerr(RSA_F_RSA_VERIFY,RSA_R_WRONG_SIGNATURE_LENGTH);
142                 return(0);
143                 }
144
145         s=(unsigned char *)Malloc((unsigned int)siglen);
146         if (s == NULL)
147                 {
148                 RSAerr(RSA_F_RSA_VERIFY,ERR_R_MALLOC_FAILURE);
149                 goto err;
150                 }
151         i=RSA_public_decrypt((int)siglen,sigbuf,s,rsa,RSA_PKCS1_PADDING);
152
153         if (i <= 0) goto err;
154
155         p=s;
156         sig=d2i_X509_SIG(NULL,&p,(long)i);
157
158         if (sig == NULL) goto err;
159         sigtype=OBJ_obj2nid(sig->algor->algorithm);
160
161
162 #ifdef RSA_DEBUG
163         /* put a backward compatability flag in EAY */
164         fprintf(stderr,"in(%s) expect(%s)\n",OBJ_nid2ln(sigtype),
165                 OBJ_nid2ln(dtype));
166 #endif
167         if (sigtype != dtype)
168                 {
169                 if (((dtype == NID_md5) &&
170                         (sigtype == NID_md5WithRSAEncryption)) ||
171                         ((dtype == NID_md2) &&
172                         (sigtype == NID_md2WithRSAEncryption)))
173                         {
174                         /* ok, we will let it through */
175 #if !defined(NO_STDIO) && !defined(WIN16)
176                         fprintf(stderr,"signature has problems, re-make with post SSLeay045\n");
177 #endif
178                         }
179                 else
180                         {
181                         RSAerr(RSA_F_RSA_VERIFY,RSA_R_ALGORITHM_MISMATCH);
182                         goto err;
183                         }
184                 }
185         if (    ((unsigned int)sig->digest->length != m_len) ||
186                 (memcmp(m,sig->digest->data,m_len) != 0))
187                 {
188                 RSAerr(RSA_F_RSA_VERIFY,RSA_R_BAD_SIGNATURE);
189                 }
190         else
191                 ret=1;
192 err:
193         if (sig != NULL) X509_SIG_free(sig);
194         memset(s,0,(unsigned int)siglen);
195         Free(s);
196         return(ret);
197         }
198