1/* $OpenBSD: e_idea.c,v 1.22 2024/04/09 13:52:41 beck 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_local.h"
72
73/* NB idea_ecb_encrypt doesn't take an 'encrypt' argument so we treat it as a special
74 * case
75 */
76
77static int
78idea_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
100static int
101idea_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
119typedef struct {
120	IDEA_KEY_SCHEDULE ks;
121} EVP_IDEA_KEY;
122
123static int
124idea_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
141static int
142idea_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
159static int
160idea_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
179static 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};
193
194const EVP_CIPHER *
195EVP_idea_cbc(void)
196{
197	return &idea_cbc;
198}
199LCRYPTO_ALIAS(EVP_idea_cbc);
200
201static 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};
215
216const EVP_CIPHER *
217EVP_idea_cfb64(void)
218{
219	return &idea_cfb64;
220}
221LCRYPTO_ALIAS(EVP_idea_cfb64);
222
223static 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};
237
238const EVP_CIPHER *
239EVP_idea_ofb(void)
240{
241	return &idea_ofb;
242}
243LCRYPTO_ALIAS(EVP_idea_ofb);
244
245static 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};
259
260const EVP_CIPHER *
261EVP_idea_ecb(void)
262{
263	return &idea_ecb;
264}
265LCRYPTO_ALIAS(EVP_idea_ecb);
266#endif
267