e_cast.c revision 1.10
1/* $OpenBSD: e_cast.c,v 1.10 2022/09/04 13:55:39 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 <stdio.h> 60 61#include <openssl/opensslconf.h> 62 63#ifndef OPENSSL_NO_CAST 64 65#include <openssl/cast.h> 66#include <openssl/evp.h> 67#include <openssl/objects.h> 68 69#include "evp_locl.h" 70 71typedef struct { 72 CAST_KEY ks; 73} EVP_CAST_KEY; 74 75#define data(ctx) ((EVP_CAST_KEY *)(ctx)->cipher_data) 76 77static int 78cast_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key, 79 const unsigned char *iv, int enc) 80{ 81 CAST_set_key(&data(ctx)->ks, EVP_CIPHER_CTX_key_length(ctx), key); 82 return 1; 83} 84 85static int 86cast5_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) 87{ 88 while (inl >= EVP_MAXCHUNK) { 89 CAST_cbc_encrypt(in, out, (long)EVP_MAXCHUNK, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->iv, ctx->encrypt); 90 inl -= EVP_MAXCHUNK; 91 in += EVP_MAXCHUNK; 92 out += EVP_MAXCHUNK; 93 } 94 95 if (inl) 96 CAST_cbc_encrypt(in, out, (long)inl, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->iv, ctx->encrypt); 97 98 return 1; 99} 100 101static int 102cast5_cfb64_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) 103{ 104 size_t chunk = EVP_MAXCHUNK; 105 106 if (inl < chunk) 107 chunk = inl; 108 109 while (inl && inl >= chunk) { 110 CAST_cfb64_encrypt(in, out, (long)inl, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num, ctx->encrypt); 111 inl -= chunk; 112 in += chunk; 113 out += chunk; 114 if (inl < chunk) 115 chunk = inl; 116 } 117 118 return 1; 119} 120 121static int 122cast5_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) 123{ 124 size_t i, bl; 125 126 bl = ctx->cipher->block_size; 127 128 if (inl < bl) 129 return 1; 130 131 inl -= bl; 132 133 for (i = 0; i <= inl; i += bl) 134 CAST_ecb_encrypt(in + i, out + i, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->encrypt); 135 136 return 1; 137} 138 139static int 140cast5_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) 141{ 142 while (inl >= EVP_MAXCHUNK) { 143 CAST_ofb64_encrypt(in, out, (long)EVP_MAXCHUNK, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num); 144 inl -= EVP_MAXCHUNK; 145 in += EVP_MAXCHUNK; 146 out += EVP_MAXCHUNK; 147 } 148 149 if (inl) 150 CAST_ofb64_encrypt(in, out, (long)inl, &((EVP_CAST_KEY *)ctx->cipher_data)->ks, ctx->iv, &ctx->num); 151 152 return 1; 153} 154 155static const EVP_CIPHER cast5_cbc = { 156 .nid = NID_cast5_cbc, 157 .block_size = 8, 158 .key_len = CAST_KEY_LENGTH, 159 .iv_len = 8, 160 .flags = EVP_CIPH_VARIABLE_LENGTH | EVP_CIPH_CBC_MODE, 161 .init = cast_init_key, 162 .do_cipher = cast5_cbc_cipher, 163 .cleanup = NULL, 164 .ctx_size = sizeof(EVP_CAST_KEY), 165 .set_asn1_parameters = EVP_CIPHER_set_asn1_iv, 166 .get_asn1_parameters = EVP_CIPHER_get_asn1_iv, 167 .ctrl = NULL, 168 .app_data = NULL, 169}; 170 171const EVP_CIPHER * 172EVP_cast5_cbc(void) 173{ 174 return &cast5_cbc; 175} 176 177static const EVP_CIPHER cast5_cfb64 = { 178 .nid = NID_cast5_cfb64, 179 .block_size = 1, 180 .key_len = CAST_KEY_LENGTH, 181 .iv_len = 8, 182 .flags = EVP_CIPH_VARIABLE_LENGTH | EVP_CIPH_CFB_MODE, 183 .init = cast_init_key, 184 .do_cipher = cast5_cfb64_cipher, 185 .cleanup = NULL, 186 .ctx_size = sizeof(EVP_CAST_KEY), 187 .set_asn1_parameters = EVP_CIPHER_set_asn1_iv, 188 .get_asn1_parameters = EVP_CIPHER_get_asn1_iv, 189 .ctrl = NULL, 190 .app_data = NULL, 191}; 192 193const EVP_CIPHER * 194EVP_cast5_cfb64(void) 195{ 196 return &cast5_cfb64; 197} 198 199static const EVP_CIPHER cast5_ofb = { 200 .nid = NID_cast5_ofb64, 201 .block_size = 1, 202 .key_len = CAST_KEY_LENGTH, 203 .iv_len = 8, 204 .flags = EVP_CIPH_VARIABLE_LENGTH | EVP_CIPH_OFB_MODE, 205 .init = cast_init_key, 206 .do_cipher = cast5_ofb_cipher, 207 .cleanup = NULL, 208 .ctx_size = sizeof(EVP_CAST_KEY), 209 .set_asn1_parameters = EVP_CIPHER_set_asn1_iv, 210 .get_asn1_parameters = EVP_CIPHER_get_asn1_iv, 211 .ctrl = NULL, 212 .app_data = NULL, 213}; 214 215const EVP_CIPHER * 216EVP_cast5_ofb(void) 217{ 218 return &cast5_ofb; 219} 220 221static const EVP_CIPHER cast5_ecb = { 222 .nid = NID_cast5_ecb, 223 .block_size = 8, 224 .key_len = CAST_KEY_LENGTH, 225 .iv_len = 0, 226 .flags = EVP_CIPH_VARIABLE_LENGTH | EVP_CIPH_ECB_MODE, 227 .init = cast_init_key, 228 .do_cipher = cast5_ecb_cipher, 229 .cleanup = NULL, 230 .ctx_size = sizeof(EVP_CAST_KEY), 231 .set_asn1_parameters = EVP_CIPHER_set_asn1_iv, 232 .get_asn1_parameters = EVP_CIPHER_get_asn1_iv, 233 .ctrl = NULL, 234 .app_data = NULL, 235}; 236 237const EVP_CIPHER * 238EVP_cast5_ecb(void) 239{ 240 return &cast5_ecb; 241} 242#endif 243