make reinitialisation work for CMAC
[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
53 #include <stdio.h>
54 #include "cryptlib.h"
55 #include <openssl/x509.h>
56 #include <openssl/x509v3.h>
57 #include <openssl/evp.h>
58 #include <openssl/cmac.h>
59 #include "evp_locl.h"
60
61 /* The context structure and "key" is simply a CMAC_CTX */
62
63 static int pkey_cmac_init(EVP_PKEY_CTX *ctx)
64         {
65         ctx->data = CMAC_CTX_new();
66         if (!ctx->data)
67                 return 0;
68         ctx->keygen_info_count = 0;
69         return 1;
70         }
71
72 static int pkey_cmac_copy(EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src)
73         {
74         if (!pkey_cmac_init(dst))
75                 return 0;
76         if (!CMAC_CTX_copy(dst->data, src->data))
77                 return 0;
78         return 1;
79         }
80
81 static void pkey_cmac_cleanup(EVP_PKEY_CTX *ctx)
82         {
83         CMAC_CTX_free(ctx->data);
84         }
85
86 static int pkey_cmac_keygen(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)
87         {
88         CMAC_CTX *cmkey = CMAC_CTX_new();
89         CMAC_CTX *cmctx = ctx->data;
90         if (!cmkey)
91                 return 0;
92         if (!CMAC_CTX_copy(cmkey, cmctx))
93                 {
94                 CMAC_CTX_free(cmkey);
95                 return 0;
96                 }
97         EVP_PKEY_assign(pkey, EVP_PKEY_CMAC, cmkey);
98         
99         return 1;
100         }
101
102 static int int_update(EVP_MD_CTX *ctx,const void *data,size_t count)
103         {
104         if (!CMAC_Update(ctx->pctx->data, data, count))
105                 return 0;
106         return 1;
107         }
108
109 static int cmac_signctx_init(EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx)
110         {
111         EVP_MD_CTX_set_flags(mctx, EVP_MD_CTX_FLAG_NO_INIT);
112         mctx->update = int_update;
113         return 1;
114         }
115
116 static int cmac_signctx(EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
117                                         EVP_MD_CTX *mctx)
118         {
119         return CMAC_Final(ctx->data, sig, siglen);
120         }
121
122 static int pkey_cmac_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2)
123         {
124         CMAC_CTX *cmctx = ctx->data;
125         switch (type)
126                 {
127
128                 case EVP_PKEY_CTRL_SET_MAC_KEY:
129                 if (!p2 || p1 < 0)
130                         return 0;
131                 if (!CMAC_Init(cmctx, p2, p1, NULL, NULL))
132                         return 0;
133                 break;
134
135                 case EVP_PKEY_CTRL_CIPHER:
136                 if (!CMAC_Init(cmctx, NULL, 0, p2, ctx->engine))
137                         return 0;
138                 break;
139
140                 case EVP_PKEY_CTRL_MD:
141                 if (ctx->pkey && !CMAC_CTX_copy(ctx->data,
142                                         (CMAC_CTX *)ctx->pkey->pkey.ptr))
143                         return 0;
144                 if (!CMAC_Init(cmctx, NULL, 0, NULL, NULL))
145                         return 0;
146                 break;
147
148                 default:
149                 return -2;
150
151                 }
152         return 1;
153         }
154
155 static int pkey_cmac_ctrl_str(EVP_PKEY_CTX *ctx,
156                         const char *type, const char *value)
157         {
158         if (!value)
159                 {
160                 return 0;
161                 }
162         if (!strcmp(type, "key"))
163                 {
164                 void *p = (void *)value;
165                 return pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_SET_MAC_KEY,
166                                                                 strlen(p), p);
167                 }
168         if (!strcmp(type, "cipher"))
169                 {
170                 const EVP_CIPHER *c;
171                 c = EVP_get_cipherbyname(value);
172                 if (!c)
173                         return 0;
174                 return pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_CIPHER, -1, (void *)c);
175                 }
176         if (!strcmp(type, "hexkey"))
177                 {
178                 unsigned char *key;
179                 int r;
180                 long keylen;
181                 key = string_to_hex(value, &keylen);
182                 if (!key)
183                         return 0;
184                 r = pkey_cmac_ctrl(ctx, EVP_PKEY_CTRL_SET_MAC_KEY, keylen, key);
185                 OPENSSL_free(key);
186                 return r;
187                 }
188         return -2;
189         }
190
191 const EVP_PKEY_METHOD cmac_pkey_meth = 
192         {
193         EVP_PKEY_CMAC,
194         EVP_PKEY_FLAG_SIGCTX_CUSTOM,
195         pkey_cmac_init,
196         pkey_cmac_copy,
197         pkey_cmac_cleanup,
198
199         0, 0,
200
201         0,
202         pkey_cmac_keygen,
203
204         0, 0,
205
206         0, 0,
207
208         0,0,
209
210         cmac_signctx_init,
211         cmac_signctx,
212
213         0,0,
214
215         0,0,
216
217         0,0,
218
219         0,0,
220
221         pkey_cmac_ctrl,
222         pkey_cmac_ctrl_str
223
224         };