xref: /dragonfly/crypto/libressl/crypto/evp/e_idea.c (revision f9993810)
1 /* $OpenBSD: e_idea.c,v 1.17 2022/09/15 07:04:19 jsing Exp $ */
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 <limits.h>
60 #include <stdio.h>
61 #include <string.h>
62 
63 #include <openssl/opensslconf.h>
64 
65 #ifndef OPENSSL_NO_IDEA
66 
67 #include <openssl/evp.h>
68 #include <openssl/idea.h>
69 #include <openssl/objects.h>
70 
71 #include "evp_locl.h"
72 
73 /* NB idea_ecb_encrypt doesn't take an 'encrypt' argument so we treat it as a special
74  * case
75  */
76 
77 static int
78 idea_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
79     const unsigned char *iv, int enc)
80 {
81 	if (!enc) {
82 		if (EVP_CIPHER_CTX_mode(ctx) == EVP_CIPH_OFB_MODE)
83 			enc = 1;
84 		else if (EVP_CIPHER_CTX_mode(ctx) == EVP_CIPH_CFB_MODE)
85 			enc = 1;
86 	}
87 	if (enc)
88 		idea_set_encrypt_key(key, ctx->cipher_data);
89 	else {
90 		IDEA_KEY_SCHEDULE tmp;
91 
92 		idea_set_encrypt_key(key, &tmp);
93 		idea_set_decrypt_key(&tmp, ctx->cipher_data);
94 		explicit_bzero((unsigned char *)&tmp,
95 		    sizeof(IDEA_KEY_SCHEDULE));
96 	}
97 	return 1;
98 }
99 
100 static int
101 idea_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
102     const unsigned char *in, size_t inl)
103 {
104 	size_t i, bl;
105 
106 	bl = ctx->cipher->block_size;
107 
108 	if (inl < bl)
109 		return 1;
110 
111 	inl -= bl;
112 
113 	for (i = 0; i <= inl; i += bl)
114 		idea_ecb_encrypt(in + i, out + i, ctx->cipher_data);
115 
116 	return 1;
117 }
118 
119 typedef struct {
120 	IDEA_KEY_SCHEDULE ks;
121 } EVP_IDEA_KEY;
122 
123 static int
124 idea_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl)
125 {
126 	size_t chunk = LONG_MAX & ~0xff;
127 
128 	while (inl >= chunk) {
129 		idea_cbc_encrypt(in, out, (long)chunk, &((EVP_IDEA_KEY *)ctx->cipher_data)->ks, ctx->iv, ctx->encrypt);
130 		inl -= chunk;
131 		in += chunk;
132 		out += chunk;
133 	}
134 
135 	if (inl)
136 		idea_cbc_encrypt(in, out, (long)inl, &((EVP_IDEA_KEY *)ctx->cipher_data)->ks, ctx->iv, ctx->encrypt);
137 
138 	return 1;
139 }
140 
141 static int
142 idea_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl)
143 {
144 	size_t chunk = LONG_MAX & ~0xff;
145 
146 	while (inl >= chunk) {
147 		idea_ofb64_encrypt(in, out, (long)chunk, &((EVP_IDEA_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num);
148 		inl -= chunk;
149 		in += chunk;
150 		out += chunk;
151 	}
152 
153 	if (inl)
154 		idea_ofb64_encrypt(in, out, (long)inl, &((EVP_IDEA_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num);
155 
156 	return 1;
157 }
158 
159 static int
160 idea_cfb64_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl)
161 {
162 	size_t chunk = LONG_MAX & ~0xff;
163 
164 	if (inl < chunk)
165 		chunk = inl;
166 
167 	while (inl && inl >= chunk) {
168 		idea_cfb64_encrypt(in, out, (long)chunk, &((EVP_IDEA_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num, ctx->encrypt);
169 		inl -= chunk;
170 		in += chunk;
171 		out += chunk;
172 		if (inl < chunk)
173 			chunk = inl;
174 	}
175 
176 	return 1;
177 }
178 
179 static const EVP_CIPHER idea_cbc = {
180 	.nid = NID_idea_cbc,
181 	.block_size = 8,
182 	.key_len = 16,
183 	.iv_len = 8,
184 	.flags = 0 | EVP_CIPH_CBC_MODE,
185 	.init = idea_init_key,
186 	.do_cipher = idea_cbc_cipher,
187 	.cleanup = NULL,
188 	.ctx_size = sizeof(IDEA_KEY_SCHEDULE),
189 	.set_asn1_parameters = EVP_CIPHER_set_asn1_iv,
190 	.get_asn1_parameters = EVP_CIPHER_get_asn1_iv,
191 	.ctrl = NULL,
192 	.app_data = NULL,
193 };
194 
195 const EVP_CIPHER *
196 EVP_idea_cbc(void)
197 {
198 	return &idea_cbc;
199 }
200 
201 static const EVP_CIPHER idea_cfb64 = {
202 	.nid = NID_idea_cfb64,
203 	.block_size = 1,
204 	.key_len = 16,
205 	.iv_len = 8,
206 	.flags = 0 | EVP_CIPH_CFB_MODE,
207 	.init = idea_init_key,
208 	.do_cipher = idea_cfb64_cipher,
209 	.cleanup = NULL,
210 	.ctx_size = sizeof(IDEA_KEY_SCHEDULE),
211 	.set_asn1_parameters = EVP_CIPHER_set_asn1_iv,
212 	.get_asn1_parameters = EVP_CIPHER_get_asn1_iv,
213 	.ctrl = NULL,
214 	.app_data = NULL,
215 };
216 
217 const EVP_CIPHER *
218 EVP_idea_cfb64(void)
219 {
220 	return &idea_cfb64;
221 }
222 
223 static const EVP_CIPHER idea_ofb = {
224 	.nid = NID_idea_ofb64,
225 	.block_size = 1,
226 	.key_len = 16,
227 	.iv_len = 8,
228 	.flags = 0 | EVP_CIPH_OFB_MODE,
229 	.init = idea_init_key,
230 	.do_cipher = idea_ofb_cipher,
231 	.cleanup = NULL,
232 	.ctx_size = sizeof(IDEA_KEY_SCHEDULE),
233 	.set_asn1_parameters = EVP_CIPHER_set_asn1_iv,
234 	.get_asn1_parameters = EVP_CIPHER_get_asn1_iv,
235 	.ctrl = NULL,
236 	.app_data = NULL,
237 };
238 
239 const EVP_CIPHER *
240 EVP_idea_ofb(void)
241 {
242 	return &idea_ofb;
243 }
244 
245 static const EVP_CIPHER idea_ecb = {
246 	.nid = NID_idea_ecb,
247 	.block_size = 8,
248 	.key_len = 16,
249 	.iv_len = 0,
250 	.flags = 0 | EVP_CIPH_ECB_MODE,
251 	.init = idea_init_key,
252 	.do_cipher = idea_ecb_cipher,
253 	.cleanup = NULL,
254 	.ctx_size = sizeof(IDEA_KEY_SCHEDULE),
255 	.set_asn1_parameters = EVP_CIPHER_set_asn1_iv,
256 	.get_asn1_parameters = EVP_CIPHER_get_asn1_iv,
257 	.ctrl = NULL,
258 	.app_data = NULL,
259 };
260 
261 const EVP_CIPHER *
262 EVP_idea_ecb(void)
263 {
264 	return &idea_ecb;
265 }
266 #endif
267