sl@0
|
1 |
/* evp_locl.h */
|
sl@0
|
2 |
/* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
|
sl@0
|
3 |
* project 2000.
|
sl@0
|
4 |
*/
|
sl@0
|
5 |
/* ====================================================================
|
sl@0
|
6 |
* Copyright (c) 1999 The OpenSSL Project. All rights reserved.
|
sl@0
|
7 |
*
|
sl@0
|
8 |
* Redistribution and use in source and binary forms, with or without
|
sl@0
|
9 |
* modification, are permitted provided that the following conditions
|
sl@0
|
10 |
* are met:
|
sl@0
|
11 |
*
|
sl@0
|
12 |
* 1. Redistributions of source code must retain the above copyright
|
sl@0
|
13 |
* notice, this list of conditions and the following disclaimer.
|
sl@0
|
14 |
*
|
sl@0
|
15 |
* 2. Redistributions in binary form must reproduce the above copyright
|
sl@0
|
16 |
* notice, this list of conditions and the following disclaimer in
|
sl@0
|
17 |
* the documentation and/or other materials provided with the
|
sl@0
|
18 |
* distribution.
|
sl@0
|
19 |
*
|
sl@0
|
20 |
* 3. All advertising materials mentioning features or use of this
|
sl@0
|
21 |
* software must display the following acknowledgment:
|
sl@0
|
22 |
* "This product includes software developed by the OpenSSL Project
|
sl@0
|
23 |
* for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
|
sl@0
|
24 |
*
|
sl@0
|
25 |
* 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
|
sl@0
|
26 |
* endorse or promote products derived from this software without
|
sl@0
|
27 |
* prior written permission. For written permission, please contact
|
sl@0
|
28 |
* licensing@OpenSSL.org.
|
sl@0
|
29 |
*
|
sl@0
|
30 |
* 5. Products derived from this software may not be called "OpenSSL"
|
sl@0
|
31 |
* nor may "OpenSSL" appear in their names without prior written
|
sl@0
|
32 |
* permission of the OpenSSL Project.
|
sl@0
|
33 |
*
|
sl@0
|
34 |
* 6. Redistributions of any form whatsoever must retain the following
|
sl@0
|
35 |
* acknowledgment:
|
sl@0
|
36 |
* "This product includes software developed by the OpenSSL Project
|
sl@0
|
37 |
* for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
|
sl@0
|
38 |
*
|
sl@0
|
39 |
* THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
|
sl@0
|
40 |
* EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
sl@0
|
41 |
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
sl@0
|
42 |
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
|
sl@0
|
43 |
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
sl@0
|
44 |
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
sl@0
|
45 |
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
sl@0
|
46 |
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
sl@0
|
47 |
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
sl@0
|
48 |
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
sl@0
|
49 |
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
sl@0
|
50 |
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
sl@0
|
51 |
* ====================================================================
|
sl@0
|
52 |
*
|
sl@0
|
53 |
* This product includes cryptographic software written by Eric Young
|
sl@0
|
54 |
* (eay@cryptsoft.com). This product includes software written by Tim
|
sl@0
|
55 |
* Hudson (tjh@cryptsoft.com).
|
sl@0
|
56 |
*
|
sl@0
|
57 |
*/
|
sl@0
|
58 |
|
sl@0
|
59 |
/* Macros to code block cipher wrappers */
|
sl@0
|
60 |
|
sl@0
|
61 |
/* Wrapper functions for each cipher mode */
|
sl@0
|
62 |
|
sl@0
|
63 |
#define BLOCK_CIPHER_ecb_loop() \
|
sl@0
|
64 |
unsigned int i, bl; \
|
sl@0
|
65 |
bl = ctx->cipher->block_size;\
|
sl@0
|
66 |
if(inl < bl) return 1;\
|
sl@0
|
67 |
inl -= bl; \
|
sl@0
|
68 |
for(i=0; i <= inl; i+=bl)
|
sl@0
|
69 |
|
sl@0
|
70 |
#define BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
|
sl@0
|
71 |
static int cname##_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, unsigned int inl) \
|
sl@0
|
72 |
{\
|
sl@0
|
73 |
BLOCK_CIPHER_ecb_loop() \
|
sl@0
|
74 |
cprefix##_ecb_encrypt(in + i, out + i, &((kstruct *)ctx->cipher_data)->ksched, ctx->encrypt);\
|
sl@0
|
75 |
return 1;\
|
sl@0
|
76 |
}
|
sl@0
|
77 |
|
sl@0
|
78 |
#define BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched) \
|
sl@0
|
79 |
static int cname##_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, unsigned int inl) \
|
sl@0
|
80 |
{\
|
sl@0
|
81 |
cprefix##_ofb##cbits##_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num);\
|
sl@0
|
82 |
return 1;\
|
sl@0
|
83 |
}
|
sl@0
|
84 |
|
sl@0
|
85 |
#define BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
|
sl@0
|
86 |
static int cname##_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, unsigned int inl) \
|
sl@0
|
87 |
{\
|
sl@0
|
88 |
cprefix##_cbc_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, ctx->encrypt);\
|
sl@0
|
89 |
return 1;\
|
sl@0
|
90 |
}
|
sl@0
|
91 |
|
sl@0
|
92 |
#define BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
|
sl@0
|
93 |
static int cname##_cfb##cbits##_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, unsigned int inl) \
|
sl@0
|
94 |
{\
|
sl@0
|
95 |
cprefix##_cfb##cbits##_encrypt(in, out, (long)(cbits==1?inl*8:inl), &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num, ctx->encrypt);\
|
sl@0
|
96 |
return 1;\
|
sl@0
|
97 |
}
|
sl@0
|
98 |
|
sl@0
|
99 |
#define BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
|
sl@0
|
100 |
BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
|
sl@0
|
101 |
BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
|
sl@0
|
102 |
BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
|
sl@0
|
103 |
BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched)
|
sl@0
|
104 |
|
sl@0
|
105 |
#define BLOCK_CIPHER_def1(cname, nmode, mode, MODE, kstruct, nid, block_size, \
|
sl@0
|
106 |
key_len, iv_len, flags, init_key, cleanup, \
|
sl@0
|
107 |
set_asn1, get_asn1, ctrl) \
|
sl@0
|
108 |
static const EVP_CIPHER cname##_##mode = { \
|
sl@0
|
109 |
nid##_##nmode, block_size, key_len, iv_len, \
|
sl@0
|
110 |
flags | EVP_CIPH_##MODE##_MODE, \
|
sl@0
|
111 |
init_key, \
|
sl@0
|
112 |
cname##_##mode##_cipher, \
|
sl@0
|
113 |
cleanup, \
|
sl@0
|
114 |
sizeof(kstruct), \
|
sl@0
|
115 |
set_asn1, get_asn1,\
|
sl@0
|
116 |
ctrl, \
|
sl@0
|
117 |
NULL \
|
sl@0
|
118 |
}; \
|
sl@0
|
119 |
EXPORT_C const EVP_CIPHER *EVP_##cname##_##mode(void) { return &cname##_##mode; }
|
sl@0
|
120 |
|
sl@0
|
121 |
#define BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, \
|
sl@0
|
122 |
iv_len, flags, init_key, cleanup, set_asn1, \
|
sl@0
|
123 |
get_asn1, ctrl) \
|
sl@0
|
124 |
BLOCK_CIPHER_def1(cname, cbc, cbc, CBC, kstruct, nid, block_size, key_len, \
|
sl@0
|
125 |
iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
|
sl@0
|
126 |
|
sl@0
|
127 |
#define BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, \
|
sl@0
|
128 |
iv_len, cbits, flags, init_key, cleanup, \
|
sl@0
|
129 |
set_asn1, get_asn1, ctrl) \
|
sl@0
|
130 |
BLOCK_CIPHER_def1(cname, cfb##cbits, cfb##cbits, CFB, kstruct, nid, 1, \
|
sl@0
|
131 |
key_len, iv_len, flags, init_key, cleanup, set_asn1, \
|
sl@0
|
132 |
get_asn1, ctrl)
|
sl@0
|
133 |
|
sl@0
|
134 |
#define BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, \
|
sl@0
|
135 |
iv_len, cbits, flags, init_key, cleanup, \
|
sl@0
|
136 |
set_asn1, get_asn1, ctrl) \
|
sl@0
|
137 |
BLOCK_CIPHER_def1(cname, ofb##cbits, ofb, OFB, kstruct, nid, 1, \
|
sl@0
|
138 |
key_len, iv_len, flags, init_key, cleanup, set_asn1, \
|
sl@0
|
139 |
get_asn1, ctrl)
|
sl@0
|
140 |
|
sl@0
|
141 |
#define BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, \
|
sl@0
|
142 |
iv_len, flags, init_key, cleanup, set_asn1, \
|
sl@0
|
143 |
get_asn1, ctrl) \
|
sl@0
|
144 |
BLOCK_CIPHER_def1(cname, ecb, ecb, ECB, kstruct, nid, block_size, key_len, \
|
sl@0
|
145 |
iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
|
sl@0
|
146 |
|
sl@0
|
147 |
#define BLOCK_CIPHER_defs(cname, kstruct, \
|
sl@0
|
148 |
nid, block_size, key_len, iv_len, cbits, flags, \
|
sl@0
|
149 |
init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
sl@0
|
150 |
BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
|
sl@0
|
151 |
init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
sl@0
|
152 |
BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, iv_len, cbits, \
|
sl@0
|
153 |
flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
sl@0
|
154 |
BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, iv_len, cbits, \
|
sl@0
|
155 |
flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
sl@0
|
156 |
BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
|
sl@0
|
157 |
init_key, cleanup, set_asn1, get_asn1, ctrl)
|
sl@0
|
158 |
|
sl@0
|
159 |
|
sl@0
|
160 |
/*
|
sl@0
|
161 |
#define BLOCK_CIPHER_defs(cname, kstruct, \
|
sl@0
|
162 |
nid, block_size, key_len, iv_len, flags,\
|
sl@0
|
163 |
init_key, cleanup, set_asn1, get_asn1, ctrl)\
|
sl@0
|
164 |
static const EVP_CIPHER cname##_cbc = {\
|
sl@0
|
165 |
nid##_cbc, block_size, key_len, iv_len, \
|
sl@0
|
166 |
flags | EVP_CIPH_CBC_MODE,\
|
sl@0
|
167 |
init_key,\
|
sl@0
|
168 |
cname##_cbc_cipher,\
|
sl@0
|
169 |
cleanup,\
|
sl@0
|
170 |
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
sl@0
|
171 |
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
sl@0
|
172 |
set_asn1, get_asn1,\
|
sl@0
|
173 |
ctrl, \
|
sl@0
|
174 |
NULL \
|
sl@0
|
175 |
};\
|
sl@0
|
176 |
const EVP_CIPHER *EVP_##cname##_cbc(void) { return &cname##_cbc; }\
|
sl@0
|
177 |
static const EVP_CIPHER cname##_cfb = {\
|
sl@0
|
178 |
nid##_cfb64, 1, key_len, iv_len, \
|
sl@0
|
179 |
flags | EVP_CIPH_CFB_MODE,\
|
sl@0
|
180 |
init_key,\
|
sl@0
|
181 |
cname##_cfb_cipher,\
|
sl@0
|
182 |
cleanup,\
|
sl@0
|
183 |
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
sl@0
|
184 |
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
sl@0
|
185 |
set_asn1, get_asn1,\
|
sl@0
|
186 |
ctrl,\
|
sl@0
|
187 |
NULL \
|
sl@0
|
188 |
};\
|
sl@0
|
189 |
const EVP_CIPHER *EVP_##cname##_cfb(void) { return &cname##_cfb; }\
|
sl@0
|
190 |
static const EVP_CIPHER cname##_ofb = {\
|
sl@0
|
191 |
nid##_ofb64, 1, key_len, iv_len, \
|
sl@0
|
192 |
flags | EVP_CIPH_OFB_MODE,\
|
sl@0
|
193 |
init_key,\
|
sl@0
|
194 |
cname##_ofb_cipher,\
|
sl@0
|
195 |
cleanup,\
|
sl@0
|
196 |
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
sl@0
|
197 |
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
sl@0
|
198 |
set_asn1, get_asn1,\
|
sl@0
|
199 |
ctrl,\
|
sl@0
|
200 |
NULL \
|
sl@0
|
201 |
};\
|
sl@0
|
202 |
const EVP_CIPHER *EVP_##cname##_ofb(void) { return &cname##_ofb; }\
|
sl@0
|
203 |
static const EVP_CIPHER cname##_ecb = {\
|
sl@0
|
204 |
nid##_ecb, block_size, key_len, iv_len, \
|
sl@0
|
205 |
flags | EVP_CIPH_ECB_MODE,\
|
sl@0
|
206 |
init_key,\
|
sl@0
|
207 |
cname##_ecb_cipher,\
|
sl@0
|
208 |
cleanup,\
|
sl@0
|
209 |
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
sl@0
|
210 |
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
sl@0
|
211 |
set_asn1, get_asn1,\
|
sl@0
|
212 |
ctrl,\
|
sl@0
|
213 |
NULL \
|
sl@0
|
214 |
};\
|
sl@0
|
215 |
const EVP_CIPHER *EVP_##cname##_ecb(void) { return &cname##_ecb; }
|
sl@0
|
216 |
*/
|
sl@0
|
217 |
|
sl@0
|
218 |
#define IMPLEMENT_BLOCK_CIPHER(cname, ksched, cprefix, kstruct, nid, \
|
sl@0
|
219 |
block_size, key_len, iv_len, cbits, \
|
sl@0
|
220 |
flags, init_key, \
|
sl@0
|
221 |
cleanup, set_asn1, get_asn1, ctrl) \
|
sl@0
|
222 |
BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
|
sl@0
|
223 |
BLOCK_CIPHER_defs(cname, kstruct, nid, block_size, key_len, iv_len, \
|
sl@0
|
224 |
cbits, flags, init_key, cleanup, set_asn1, \
|
sl@0
|
225 |
get_asn1, ctrl)
|
sl@0
|
226 |
|
sl@0
|
227 |
#define EVP_C_DATA(kstruct, ctx) ((kstruct *)(ctx)->cipher_data)
|
sl@0
|
228 |
|
sl@0
|
229 |
#define IMPLEMENT_CFBR(cipher,cprefix,kstruct,ksched,keysize,cbits,iv_len) \
|
sl@0
|
230 |
BLOCK_CIPHER_func_cfb(cipher##_##keysize,cprefix,cbits,kstruct,ksched) \
|
sl@0
|
231 |
BLOCK_CIPHER_def_cfb(cipher##_##keysize,kstruct, \
|
sl@0
|
232 |
NID_##cipher##_##keysize, keysize/8, iv_len, cbits, \
|
sl@0
|
233 |
0, cipher##_init_key, NULL, \
|
sl@0
|
234 |
EVP_CIPHER_set_asn1_iv, \
|
sl@0
|
235 |
EVP_CIPHER_get_asn1_iv, \
|
sl@0
|
236 |
NULL)
|