3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
6 /* ====================================================================
7 * Copyright (c) 1999 The OpenSSL Project. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
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
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/)"
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.
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.
35 * 6. Redistributions of any form whatsoever must retain the following
37 * "This product includes software developed by the OpenSSL Project
38 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
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 * ====================================================================
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).
60 /* Macros to code block cipher wrappers */
62 /* Wrapper functions for each cipher mode */
64 #define BLOCK_CIPHER_ecb_loop() \
66 bl = ctx->cipher->block_size;\
67 if(inl < bl) return 1;\
69 for(i=0; i <= inl; i+=bl)
71 #define BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
72 static int cname##_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
74 BLOCK_CIPHER_ecb_loop() \
75 cprefix##_ecb_encrypt(in + i, out + i, &((kstruct *)ctx->cipher_data)->ksched, ctx->encrypt);\
79 #define EVP_MAXCHUNK ((size_t)1<<(sizeof(long)*8-2))
81 #define BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched) \
82 static int cname##_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
84 while(inl>=EVP_MAXCHUNK)\
86 cprefix##_ofb##cbits##_encrypt(in, out, (long)EVP_MAXCHUNK, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num);\
92 cprefix##_ofb##cbits##_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num);\
96 #define BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
97 static int cname##_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
99 while(inl>=EVP_MAXCHUNK) \
101 cprefix##_cbc_encrypt(in, out, (long)EVP_MAXCHUNK, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, ctx->encrypt);\
107 cprefix##_cbc_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, ctx->encrypt);\
111 #define BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
112 static int cname##_cfb##cbits##_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
114 size_t chunk=EVP_MAXCHUNK;\
115 if (cbits==1) chunk>>=3;\
116 if (inl<chunk) chunk=inl;\
117 while(inl && inl>=chunk)\
119 cprefix##_cfb##cbits##_encrypt(in, out, (long)((cbits==1) && !(ctx->flags & EVP_CIPH_FLAG_LENGTH_BITS) ?inl*8:inl), &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num, ctx->encrypt);\
123 if(inl<chunk) chunk=inl;\
128 #define BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
129 BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
130 BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
131 BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
132 BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched)
134 #define BLOCK_CIPHER_def1(cname, nmode, mode, MODE, kstruct, nid, block_size, \
135 key_len, iv_len, flags, init_key, cleanup, \
136 set_asn1, get_asn1, ctrl) \
137 static const EVP_CIPHER cname##_##mode = { \
138 nid##_##nmode, block_size, key_len, iv_len, \
139 flags | EVP_CIPH_##MODE##_MODE, \
141 cname##_##mode##_cipher, \
148 const EVP_CIPHER *EVP_##cname##_##mode(void) { return &cname##_##mode; }
150 #define BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, \
151 iv_len, flags, init_key, cleanup, set_asn1, \
153 BLOCK_CIPHER_def1(cname, cbc, cbc, CBC, kstruct, nid, block_size, key_len, \
154 iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
156 #define BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, \
157 iv_len, cbits, flags, init_key, cleanup, \
158 set_asn1, get_asn1, ctrl) \
159 BLOCK_CIPHER_def1(cname, cfb##cbits, cfb##cbits, CFB, kstruct, nid, 1, \
160 key_len, iv_len, flags, init_key, cleanup, set_asn1, \
163 #define BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, \
164 iv_len, cbits, flags, init_key, cleanup, \
165 set_asn1, get_asn1, ctrl) \
166 BLOCK_CIPHER_def1(cname, ofb##cbits, ofb, OFB, kstruct, nid, 1, \
167 key_len, iv_len, flags, init_key, cleanup, set_asn1, \
170 #define BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, \
171 flags, init_key, cleanup, set_asn1, \
173 BLOCK_CIPHER_def1(cname, ecb, ecb, ECB, kstruct, nid, block_size, key_len, \
174 0, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
176 #define BLOCK_CIPHER_defs(cname, kstruct, \
177 nid, block_size, key_len, iv_len, cbits, flags, \
178 init_key, cleanup, set_asn1, get_asn1, ctrl) \
179 BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
180 init_key, cleanup, set_asn1, get_asn1, ctrl) \
181 BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, iv_len, cbits, \
182 flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
183 BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, iv_len, cbits, \
184 flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
185 BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, flags, \
186 init_key, cleanup, set_asn1, get_asn1, ctrl)
189 #define BLOCK_CIPHER_defs(cname, kstruct, \
190 nid, block_size, key_len, iv_len, flags,\
191 init_key, cleanup, set_asn1, get_asn1, ctrl)\
192 static const EVP_CIPHER cname##_cbc = {\
193 nid##_cbc, block_size, key_len, iv_len, \
194 flags | EVP_CIPH_CBC_MODE,\
198 sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
199 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
204 const EVP_CIPHER *EVP_##cname##_cbc(void) { return &cname##_cbc; }\
205 static const EVP_CIPHER cname##_cfb = {\
206 nid##_cfb64, 1, key_len, iv_len, \
207 flags | EVP_CIPH_CFB_MODE,\
211 sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
212 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
217 const EVP_CIPHER *EVP_##cname##_cfb(void) { return &cname##_cfb; }\
218 static const EVP_CIPHER cname##_ofb = {\
219 nid##_ofb64, 1, key_len, iv_len, \
220 flags | EVP_CIPH_OFB_MODE,\
224 sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
225 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
230 const EVP_CIPHER *EVP_##cname##_ofb(void) { return &cname##_ofb; }\
231 static const EVP_CIPHER cname##_ecb = {\
232 nid##_ecb, block_size, key_len, iv_len, \
233 flags | EVP_CIPH_ECB_MODE,\
237 sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
238 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
243 const EVP_CIPHER *EVP_##cname##_ecb(void) { return &cname##_ecb; }
246 #define IMPLEMENT_BLOCK_CIPHER(cname, ksched, cprefix, kstruct, nid, \
247 block_size, key_len, iv_len, cbits, \
249 cleanup, set_asn1, get_asn1, ctrl) \
250 BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
251 BLOCK_CIPHER_defs(cname, kstruct, nid, block_size, key_len, iv_len, \
252 cbits, flags, init_key, cleanup, set_asn1, \
255 #define EVP_C_DATA(kstruct, ctx) ((kstruct *)(ctx)->cipher_data)
257 #define IMPLEMENT_CFBR(cipher,cprefix,kstruct,ksched,keysize,cbits,iv_len,fl) \
258 BLOCK_CIPHER_func_cfb(cipher##_##keysize,cprefix,cbits,kstruct,ksched) \
259 BLOCK_CIPHER_def_cfb(cipher##_##keysize,kstruct, \
260 NID_##cipher##_##keysize, keysize/8, iv_len, cbits, \
261 (fl)|EVP_CIPH_FLAG_DEFAULT_ASN1, \
262 cipher##_init_key, NULL, NULL, NULL, NULL)
264 struct evp_pkey_ctx_st {
265 /* Method associated with this operation */
266 const EVP_PKEY_METHOD *pmeth;
267 /* Engine that implements this method or NULL if builtin */
269 /* Key: may be NULL */
271 /* Peer key for key agreement, may be NULL */
273 /* Actual operation */
275 /* Algorithm specific data */
277 /* Application specific data */
279 /* Keygen callback */
280 EVP_PKEY_gen_cb *pkey_gencb;
281 /* implementation specific keygen data */
283 int keygen_info_count;
284 } /* EVP_PKEY_CTX */ ;
286 #define EVP_PKEY_FLAG_DYNAMIC 1
288 struct evp_pkey_method_st {
291 int (*init) (EVP_PKEY_CTX *ctx);
292 int (*copy) (EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src);
293 void (*cleanup) (EVP_PKEY_CTX *ctx);
294 int (*paramgen_init) (EVP_PKEY_CTX *ctx);
295 int (*paramgen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
296 int (*keygen_init) (EVP_PKEY_CTX *ctx);
297 int (*keygen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
298 int (*sign_init) (EVP_PKEY_CTX *ctx);
299 int (*sign) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
300 const unsigned char *tbs, size_t tbslen);
301 int (*verify_init) (EVP_PKEY_CTX *ctx);
302 int (*verify) (EVP_PKEY_CTX *ctx,
303 const unsigned char *sig, size_t siglen,
304 const unsigned char *tbs, size_t tbslen);
305 int (*verify_recover_init) (EVP_PKEY_CTX *ctx);
306 int (*verify_recover) (EVP_PKEY_CTX *ctx,
307 unsigned char *rout, size_t *routlen,
308 const unsigned char *sig, size_t siglen);
309 int (*signctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
310 int (*signctx) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
312 int (*verifyctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
313 int (*verifyctx) (EVP_PKEY_CTX *ctx, const unsigned char *sig, int siglen,
315 int (*encrypt_init) (EVP_PKEY_CTX *ctx);
316 int (*encrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
317 const unsigned char *in, size_t inlen);
318 int (*decrypt_init) (EVP_PKEY_CTX *ctx);
319 int (*decrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
320 const unsigned char *in, size_t inlen);
321 int (*derive_init) (EVP_PKEY_CTX *ctx);
322 int (*derive) (EVP_PKEY_CTX *ctx, unsigned char *key, size_t *keylen);
323 int (*ctrl) (EVP_PKEY_CTX *ctx, int type, int p1, void *p2);
324 int (*ctrl_str) (EVP_PKEY_CTX *ctx, const char *type, const char *value);
325 } /* EVP_PKEY_METHOD */ ;
327 void evp_pkey_set_cb_translate(BN_GENCB *cb, EVP_PKEY_CTX *ctx);
329 int PKCS5_v2_PBKDF2_keyivgen(EVP_CIPHER_CTX *ctx, const char *pass,
330 int passlen, ASN1_TYPE *param,
331 const EVP_CIPHER *c, const EVP_MD *md,