xref: /freebsd/crypto/openssl/crypto/evp/e_xcbc_d.c (revision ddd58736f08d9acef3606719eba2e38ed611705b)
174664626SKris Kennaway /* crypto/evp/e_xcbc_d.c */
274664626SKris Kennaway /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
374664626SKris Kennaway  * All rights reserved.
474664626SKris Kennaway  *
574664626SKris Kennaway  * This package is an SSL implementation written
674664626SKris Kennaway  * by Eric Young (eay@cryptsoft.com).
774664626SKris Kennaway  * The implementation was written so as to conform with Netscapes SSL.
874664626SKris Kennaway  *
974664626SKris Kennaway  * This library is free for commercial and non-commercial use as long as
1074664626SKris Kennaway  * the following conditions are aheared to.  The following conditions
1174664626SKris Kennaway  * apply to all code found in this distribution, be it the RC4, RSA,
1274664626SKris Kennaway  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
1374664626SKris Kennaway  * included with this distribution is covered by the same copyright terms
1474664626SKris Kennaway  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
1574664626SKris Kennaway  *
1674664626SKris Kennaway  * Copyright remains Eric Young's, and as such any Copyright notices in
1774664626SKris Kennaway  * the code are not to be removed.
1874664626SKris Kennaway  * If this package is used in a product, Eric Young should be given attribution
1974664626SKris Kennaway  * as the author of the parts of the library used.
2074664626SKris Kennaway  * This can be in the form of a textual message at program startup or
2174664626SKris Kennaway  * in documentation (online or textual) provided with the package.
2274664626SKris Kennaway  *
2374664626SKris Kennaway  * Redistribution and use in source and binary forms, with or without
2474664626SKris Kennaway  * modification, are permitted provided that the following conditions
2574664626SKris Kennaway  * are met:
2674664626SKris Kennaway  * 1. Redistributions of source code must retain the copyright
2774664626SKris Kennaway  *    notice, this list of conditions and the following disclaimer.
2874664626SKris Kennaway  * 2. Redistributions in binary form must reproduce the above copyright
2974664626SKris Kennaway  *    notice, this list of conditions and the following disclaimer in the
3074664626SKris Kennaway  *    documentation and/or other materials provided with the distribution.
3174664626SKris Kennaway  * 3. All advertising materials mentioning features or use of this software
3274664626SKris Kennaway  *    must display the following acknowledgement:
3374664626SKris Kennaway  *    "This product includes cryptographic software written by
3474664626SKris Kennaway  *     Eric Young (eay@cryptsoft.com)"
3574664626SKris Kennaway  *    The word 'cryptographic' can be left out if the rouines from the library
3674664626SKris Kennaway  *    being used are not cryptographic related :-).
3774664626SKris Kennaway  * 4. If you include any Windows specific code (or a derivative thereof) from
3874664626SKris Kennaway  *    the apps directory (application code) you must include an acknowledgement:
3974664626SKris Kennaway  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
4074664626SKris Kennaway  *
4174664626SKris Kennaway  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
4274664626SKris Kennaway  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
4374664626SKris Kennaway  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
4474664626SKris Kennaway  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
4574664626SKris Kennaway  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
4674664626SKris Kennaway  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
4774664626SKris Kennaway  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
4874664626SKris Kennaway  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
4974664626SKris Kennaway  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
5074664626SKris Kennaway  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
5174664626SKris Kennaway  * SUCH DAMAGE.
5274664626SKris Kennaway  *
5374664626SKris Kennaway  * The licence and distribution terms for any publically available version or
5474664626SKris Kennaway  * derivative of this code cannot be changed.  i.e. this code cannot simply be
5574664626SKris Kennaway  * copied and put under another distribution licence
5674664626SKris Kennaway  * [including the GNU Public Licence.]
5774664626SKris Kennaway  */
5874664626SKris Kennaway 
5974664626SKris Kennaway #ifndef NO_DES
6074664626SKris Kennaway #include <stdio.h>
6174664626SKris Kennaway #include "cryptlib.h"
6274664626SKris Kennaway #include <openssl/evp.h>
6374664626SKris Kennaway #include <openssl/objects.h>
6474664626SKris Kennaway 
65ddd58736SKris Kennaway static int desx_cbc_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
66ddd58736SKris Kennaway 			     const unsigned char *iv,int enc);
67ddd58736SKris Kennaway static int desx_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
68ddd58736SKris Kennaway 			   const unsigned char *in, unsigned int inl);
6974664626SKris Kennaway static EVP_CIPHER d_xcbc_cipher=
7074664626SKris Kennaway 	{
7174664626SKris Kennaway 	NID_desx_cbc,
7274664626SKris Kennaway 	8,24,8,
73ddd58736SKris Kennaway 	EVP_CIPH_CBC_MODE,
7474664626SKris Kennaway 	desx_cbc_init_key,
7574664626SKris Kennaway 	desx_cbc_cipher,
7674664626SKris Kennaway 	NULL,
7774664626SKris Kennaway 	sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+
7874664626SKris Kennaway 		sizeof((((EVP_CIPHER_CTX *)NULL)->c.desx_cbc)),
7974664626SKris Kennaway 	EVP_CIPHER_set_asn1_iv,
8074664626SKris Kennaway 	EVP_CIPHER_get_asn1_iv,
81ddd58736SKris Kennaway 	NULL
8274664626SKris Kennaway 	};
8374664626SKris Kennaway 
8474664626SKris Kennaway EVP_CIPHER *EVP_desx_cbc(void)
8574664626SKris Kennaway 	{
8674664626SKris Kennaway 	return(&d_xcbc_cipher);
8774664626SKris Kennaway 	}
8874664626SKris Kennaway 
89ddd58736SKris Kennaway static int desx_cbc_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
90ddd58736SKris Kennaway 			     const unsigned char *iv, int enc)
9174664626SKris Kennaway 	{
9274664626SKris Kennaway 	des_cblock *deskey = (des_cblock *)key;
9374664626SKris Kennaway 
94f579bf8eSKris Kennaway 	des_set_key_unchecked(deskey,ctx->c.desx_cbc.ks);
9574664626SKris Kennaway 	memcpy(&(ctx->c.desx_cbc.inw[0]),&(key[8]),8);
9674664626SKris Kennaway 	memcpy(&(ctx->c.desx_cbc.outw[0]),&(key[16]),8);
97ddd58736SKris Kennaway 
98ddd58736SKris Kennaway 	return 1;
9974664626SKris Kennaway 	}
10074664626SKris Kennaway 
101ddd58736SKris Kennaway static int desx_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
102ddd58736SKris Kennaway 			   const unsigned char *in, unsigned int inl)
10374664626SKris Kennaway 	{
10474664626SKris Kennaway 	des_xcbc_encrypt(in,out,inl,ctx->c.desx_cbc.ks,
10574664626SKris Kennaway 		(des_cblock *)&(ctx->iv[0]),
10674664626SKris Kennaway 		&ctx->c.desx_cbc.inw,
10774664626SKris Kennaway 		&ctx->c.desx_cbc.outw,
10874664626SKris Kennaway 		ctx->encrypt);
109ddd58736SKris Kennaway 	return 1;
11074664626SKris Kennaway 	}
11174664626SKris Kennaway #endif
112