Backport CMAC support from HEAD.
[openssl.git] / crypto / cmac / cm_pmeth.c
1 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
2  * project 2010.
3  */
4 /* ====================================================================
5  * Copyright (c) 2010 The OpenSSL Project.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer. 
13  *
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in
16  *    the documentation and/or other materials provided with the
17  *    distribution.
18  *
19  * 3. All advertising materials mentioning features or use of this
20  *    software must display the following acknowledgment:
21  *    "This product includes software developed by the OpenSSL Project
22  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
23  *
24  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
25  *    endorse or promote products derived from this software without
26  *    prior written permission. For written permission, please contact
27  *    licensing@OpenSSL.org.
28  *
29  * 5. Products derived from this software may not be called "OpenSSL"
30  *    nor may "OpenSSL" appear in their names without prior written
31  *    permission of the OpenSSL Project.
32  *
33  * 6. Redistributions of any form whatsoever must retain the following
34  *    acknowledgment:
35  *    "This product includes software developed by the OpenSSL Project
36  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
37  *
38  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
39  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
40  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
41  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
42  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
43  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
44  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
45  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
46  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
47  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
48  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
49  * OF THE POSSIBILITY OF SUCH DAMAGE.
50  * ====================================================================
51  *
52  * This product includes cryptographic software written by Eric Young
53  * (eay@cryptsoft.com).  This product includes software written by Tim
54  * Hudson (tjh@cryptsoft.com).
55  *
56  */
57
58 #include <stdio.h>
59 #include "cryptlib.h"
60 #include <openssl/x509.h>
61 #include <openssl/x509v3.h>
62 #include <openssl/evp.h>
63 #include <openssl/cmac.h>
64 #include "evp_locl.h"
65
66 /* The context structure and "key" is simply a CMAC_CTX */
67
68 static int pkey_cmac_init(EVP_PKEY_CTX *ctx)
69         {
70         ctx->data = CMAC_CTX_new();
71         if (!ctx->data)
72                 return 0;
73         ctx->keygen_info_count = 0;
74         return 1;
75         }
76
77 static int pkey_cmac_copy(EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src)
78         {
79         if (!pkey_cmac_init(dst))
80                 return 0;
81         if (!CMAC_CTX_copy(dst->data, src->data))
82                 return 0;
83         return 1;
84         }
85
86 static void pkey_cmac_cleanup(EVP_PKEY_CTX *ctx)
87         {
88         CMAC_CTX_free(ctx->data);
89         }
90
91 static int pkey_cmac_keygen(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)
92         {
93         CMAC_CTX *cmkey = CMAC_CTX_new();
94         CMAC_CTX *cmctx = ctx->data;
95         if (!cmkey)
96                 return 0;
97         if (!CMAC_CTX_copy(cmkey, cmctx))
98                 {
99                 CMAC_CTX_free(cmkey);
100                 return 0;
101                 }
102         EVP_PKEY_assign(pkey, EVP_PKEY_CMAC, cmkey);
103         
104         return 1;
105         }
106
107 static int int_update(EVP_MD_CTX *ctx,const void *data,size_t count)
108         {
109         if (!CMAC_Update(ctx->pctx->data, data, count))
110                 return 0;
111         return 1;
112         }
113
114 static int cmac_signctx_init(EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx)
115         {
116         EVP_MD_CTX_set_flags(mctx, EVP_MD_CTX_FLAG_NO_INIT);
117         mctx->update = int_update;
118         return 1;
119         }
120
121 static int cmac_signctx(EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
122                                         EVP_MD_CTX *mctx)
123         {
124         return CMAC_Final(ctx->data, sig, siglen);
125         }
126
127 static int pkey_cmac_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2)
128         {
129         CMAC_CTX *cmctx = ctx->data;
130         switch (type)
131                 {
132
133                 case EVP_PKEY_CTRL_SET_MAC_KEY:
134                 if (!p2 || p1 < 0)
135                         return 0;
136                 if (!CMAC_Init(cmctx, p2, p1, NULL, NULL))
137                         return 0;
138                 break;
139
140                 case EVP_PKEY_CTRL_CIPHER:
141                 if (!CMAC_Init(cmctx, NULL, 0, p2, ctx->engine))
142                         return 0;
143                 break;
144
145                 case EVP_PKEY_CTRL_MD:
146                 if (ctx->pkey && !CMAC_CTX_copy(ctx->data,
147                                         (CMAC_CTX *)ctx->pkey->pkey.ptr))
148                         return 0;
149                 if (!CMAC_Init(cmctx, NULL, 0, NULL, NULL))
150                         return 0;
151                 break;
152
153                 default:
154                 return -2;
155
156                 }
157         return 1;
158         }
159
160 static int pkey_cmac_ctrl_str(EVP_PKEY_CTX *ctx,
161                         const char *type, const char *value)
162         {
163         if (!value)
164                 {
165                 return 0;
166                 }
167         if (!strcmp(type, "key"))
168                 {
169                 void *p = (void *)value;
170                 return pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_SET_MAC_KEY,
171                                                                 strlen(p), p);
172                 }
173         if (!strcmp(type, "cipher"))
174                 {
175                 const EVP_CIPHER *c;
176                 c = EVP_get_cipherbyname(value);
177                 if (!c)
178                         return 0;
179                 return pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_CIPHER, -1, (void *)c);
180                 }
181         if (!strcmp(type, "hexkey"))
182                 {
183                 unsigned char *key;
184                 int r;
185                 long keylen;
186                 key = string_to_hex(value, &keylen);
187                 if (!key)
188                         return 0;
189                 r = pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_SET_MAC_KEY, keylen, key);
190                 OPENSSL_free(key);
191                 return r;
192                 }
193         return -2;
194         }
195
196 const EVP_PKEY_METHOD cmac_pkey_meth = 
197         {
198         EVP_PKEY_CMAC,
199         EVP_PKEY_FLAG_SIGCTX_CUSTOM,
200         pkey_cmac_init,
201         pkey_cmac_copy,
202         pkey_cmac_cleanup,
203
204         0, 0,
205
206         0,
207         pkey_cmac_keygen,
208
209         0, 0,
210
211         0, 0,
212
213         0,0,
214
215         cmac_signctx_init,
216         cmac_signctx,
217
218         0,0,
219
220         0,0,
221
222         0,0,
223
224         0,0,
225
226         pkey_cmac_ctrl,
227         pkey_cmac_ctrl_str
228
229         };