Index: openssl/crypto/des/des_enc.c |
diff --git a/openssl/crypto/des/des_enc.c b/openssl/crypto/des/des_enc.c |
deleted file mode 100644 |
index 828feba208af3ff066173f4b42919eccc29e4618..0000000000000000000000000000000000000000 |
--- a/openssl/crypto/des/des_enc.c |
+++ /dev/null |
@@ -1,400 +0,0 @@ |
-/* crypto/des/des_enc.c */ |
-/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) |
- * All rights reserved. |
- * |
- * This package is an SSL implementation written |
- * by Eric Young (eay@cryptsoft.com). |
- * The implementation was written so as to conform with Netscapes SSL. |
- * |
- * This library is free for commercial and non-commercial use as long as |
- * the following conditions are aheared to. The following conditions |
- * apply to all code found in this distribution, be it the RC4, RSA, |
- * lhash, DES, etc., code; not just the SSL code. The SSL documentation |
- * included with this distribution is covered by the same copyright terms |
- * except that the holder is Tim Hudson (tjh@cryptsoft.com). |
- * |
- * Copyright remains Eric Young's, and as such any Copyright notices in |
- * the code are not to be removed. |
- * If this package is used in a product, Eric Young should be given attribution |
- * as the author of the parts of the library used. |
- * This can be in the form of a textual message at program startup or |
- * in documentation (online or textual) provided with the package. |
- * |
- * Redistribution and use in source and binary forms, with or without |
- * modification, are permitted provided that the following conditions |
- * are met: |
- * 1. Redistributions of source code must retain the copyright |
- * notice, this list of conditions and the following disclaimer. |
- * 2. Redistributions in binary form must reproduce the above copyright |
- * notice, this list of conditions and the following disclaimer in the |
- * documentation and/or other materials provided with the distribution. |
- * 3. All advertising materials mentioning features or use of this software |
- * must display the following acknowledgement: |
- * "This product includes cryptographic software written by |
- * Eric Young (eay@cryptsoft.com)" |
- * The word 'cryptographic' can be left out if the rouines from the library |
- * being used are not cryptographic related :-). |
- * 4. If you include any Windows specific code (or a derivative thereof) from |
- * the apps directory (application code) you must include an acknowledgement: |
- * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" |
- * |
- * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND |
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
- * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE |
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
- * SUCH DAMAGE. |
- * |
- * The licence and distribution terms for any publically available version or |
- * derivative of this code cannot be changed. i.e. this code cannot simply be |
- * copied and put under another distribution licence |
- * [including the GNU Public Licence.] |
- */ |
- |
-#include "des_locl.h" |
-#include "spr.h" |
- |
-void DES_encrypt1(DES_LONG *data, DES_key_schedule *ks, int enc) |
- { |
- register DES_LONG l,r,t,u; |
-#ifdef DES_PTR |
- register const unsigned char *des_SP=(const unsigned char *)DES_SPtrans; |
-#endif |
-#ifndef DES_UNROLL |
- register int i; |
-#endif |
- register DES_LONG *s; |
- |
- r=data[0]; |
- l=data[1]; |
- |
- IP(r,l); |
- /* Things have been modified so that the initial rotate is |
- * done outside the loop. This required the |
- * DES_SPtrans values in sp.h to be rotated 1 bit to the right. |
- * One perl script later and things have a 5% speed up on a sparc2. |
- * Thanks to Richard Outerbridge <71755.204@CompuServe.COM> |
- * for pointing this out. */ |
- /* clear the top bits on machines with 8byte longs */ |
- /* shift left by 2 */ |
- r=ROTATE(r,29)&0xffffffffL; |
- l=ROTATE(l,29)&0xffffffffL; |
- |
- s=ks->ks->deslong; |
- /* I don't know if it is worth the effort of loop unrolling the |
- * inner loop */ |
- if (enc) |
- { |
-#ifdef DES_UNROLL |
- D_ENCRYPT(l,r, 0); /* 1 */ |
- D_ENCRYPT(r,l, 2); /* 2 */ |
- D_ENCRYPT(l,r, 4); /* 3 */ |
- D_ENCRYPT(r,l, 6); /* 4 */ |
- D_ENCRYPT(l,r, 8); /* 5 */ |
- D_ENCRYPT(r,l,10); /* 6 */ |
- D_ENCRYPT(l,r,12); /* 7 */ |
- D_ENCRYPT(r,l,14); /* 8 */ |
- D_ENCRYPT(l,r,16); /* 9 */ |
- D_ENCRYPT(r,l,18); /* 10 */ |
- D_ENCRYPT(l,r,20); /* 11 */ |
- D_ENCRYPT(r,l,22); /* 12 */ |
- D_ENCRYPT(l,r,24); /* 13 */ |
- D_ENCRYPT(r,l,26); /* 14 */ |
- D_ENCRYPT(l,r,28); /* 15 */ |
- D_ENCRYPT(r,l,30); /* 16 */ |
-#else |
- for (i=0; i<32; i+=4) |
- { |
- D_ENCRYPT(l,r,i+0); /* 1 */ |
- D_ENCRYPT(r,l,i+2); /* 2 */ |
- } |
-#endif |
- } |
- else |
- { |
-#ifdef DES_UNROLL |
- D_ENCRYPT(l,r,30); /* 16 */ |
- D_ENCRYPT(r,l,28); /* 15 */ |
- D_ENCRYPT(l,r,26); /* 14 */ |
- D_ENCRYPT(r,l,24); /* 13 */ |
- D_ENCRYPT(l,r,22); /* 12 */ |
- D_ENCRYPT(r,l,20); /* 11 */ |
- D_ENCRYPT(l,r,18); /* 10 */ |
- D_ENCRYPT(r,l,16); /* 9 */ |
- D_ENCRYPT(l,r,14); /* 8 */ |
- D_ENCRYPT(r,l,12); /* 7 */ |
- D_ENCRYPT(l,r,10); /* 6 */ |
- D_ENCRYPT(r,l, 8); /* 5 */ |
- D_ENCRYPT(l,r, 6); /* 4 */ |
- D_ENCRYPT(r,l, 4); /* 3 */ |
- D_ENCRYPT(l,r, 2); /* 2 */ |
- D_ENCRYPT(r,l, 0); /* 1 */ |
-#else |
- for (i=30; i>0; i-=4) |
- { |
- D_ENCRYPT(l,r,i-0); /* 16 */ |
- D_ENCRYPT(r,l,i-2); /* 15 */ |
- } |
-#endif |
- } |
- |
- /* rotate and clear the top bits on machines with 8byte longs */ |
- l=ROTATE(l,3)&0xffffffffL; |
- r=ROTATE(r,3)&0xffffffffL; |
- |
- FP(r,l); |
- data[0]=l; |
- data[1]=r; |
- l=r=t=u=0; |
- } |
- |
-void DES_encrypt2(DES_LONG *data, DES_key_schedule *ks, int enc) |
- { |
- register DES_LONG l,r,t,u; |
-#ifdef DES_PTR |
- register const unsigned char *des_SP=(const unsigned char *)DES_SPtrans; |
-#endif |
-#ifndef DES_UNROLL |
- register int i; |
-#endif |
- register DES_LONG *s; |
- |
- r=data[0]; |
- l=data[1]; |
- |
- /* Things have been modified so that the initial rotate is |
- * done outside the loop. This required the |
- * DES_SPtrans values in sp.h to be rotated 1 bit to the right. |
- * One perl script later and things have a 5% speed up on a sparc2. |
- * Thanks to Richard Outerbridge <71755.204@CompuServe.COM> |
- * for pointing this out. */ |
- /* clear the top bits on machines with 8byte longs */ |
- r=ROTATE(r,29)&0xffffffffL; |
- l=ROTATE(l,29)&0xffffffffL; |
- |
- s=ks->ks->deslong; |
- /* I don't know if it is worth the effort of loop unrolling the |
- * inner loop */ |
- if (enc) |
- { |
-#ifdef DES_UNROLL |
- D_ENCRYPT(l,r, 0); /* 1 */ |
- D_ENCRYPT(r,l, 2); /* 2 */ |
- D_ENCRYPT(l,r, 4); /* 3 */ |
- D_ENCRYPT(r,l, 6); /* 4 */ |
- D_ENCRYPT(l,r, 8); /* 5 */ |
- D_ENCRYPT(r,l,10); /* 6 */ |
- D_ENCRYPT(l,r,12); /* 7 */ |
- D_ENCRYPT(r,l,14); /* 8 */ |
- D_ENCRYPT(l,r,16); /* 9 */ |
- D_ENCRYPT(r,l,18); /* 10 */ |
- D_ENCRYPT(l,r,20); /* 11 */ |
- D_ENCRYPT(r,l,22); /* 12 */ |
- D_ENCRYPT(l,r,24); /* 13 */ |
- D_ENCRYPT(r,l,26); /* 14 */ |
- D_ENCRYPT(l,r,28); /* 15 */ |
- D_ENCRYPT(r,l,30); /* 16 */ |
-#else |
- for (i=0; i<32; i+=4) |
- { |
- D_ENCRYPT(l,r,i+0); /* 1 */ |
- D_ENCRYPT(r,l,i+2); /* 2 */ |
- } |
-#endif |
- } |
- else |
- { |
-#ifdef DES_UNROLL |
- D_ENCRYPT(l,r,30); /* 16 */ |
- D_ENCRYPT(r,l,28); /* 15 */ |
- D_ENCRYPT(l,r,26); /* 14 */ |
- D_ENCRYPT(r,l,24); /* 13 */ |
- D_ENCRYPT(l,r,22); /* 12 */ |
- D_ENCRYPT(r,l,20); /* 11 */ |
- D_ENCRYPT(l,r,18); /* 10 */ |
- D_ENCRYPT(r,l,16); /* 9 */ |
- D_ENCRYPT(l,r,14); /* 8 */ |
- D_ENCRYPT(r,l,12); /* 7 */ |
- D_ENCRYPT(l,r,10); /* 6 */ |
- D_ENCRYPT(r,l, 8); /* 5 */ |
- D_ENCRYPT(l,r, 6); /* 4 */ |
- D_ENCRYPT(r,l, 4); /* 3 */ |
- D_ENCRYPT(l,r, 2); /* 2 */ |
- D_ENCRYPT(r,l, 0); /* 1 */ |
-#else |
- for (i=30; i>0; i-=4) |
- { |
- D_ENCRYPT(l,r,i-0); /* 16 */ |
- D_ENCRYPT(r,l,i-2); /* 15 */ |
- } |
-#endif |
- } |
- /* rotate and clear the top bits on machines with 8byte longs */ |
- data[0]=ROTATE(l,3)&0xffffffffL; |
- data[1]=ROTATE(r,3)&0xffffffffL; |
- l=r=t=u=0; |
- } |
- |
-void DES_encrypt3(DES_LONG *data, DES_key_schedule *ks1, |
- DES_key_schedule *ks2, DES_key_schedule *ks3) |
- { |
- register DES_LONG l,r; |
- |
- l=data[0]; |
- r=data[1]; |
- IP(l,r); |
- data[0]=l; |
- data[1]=r; |
- DES_encrypt2((DES_LONG *)data,ks1,DES_ENCRYPT); |
- DES_encrypt2((DES_LONG *)data,ks2,DES_DECRYPT); |
- DES_encrypt2((DES_LONG *)data,ks3,DES_ENCRYPT); |
- l=data[0]; |
- r=data[1]; |
- FP(r,l); |
- data[0]=l; |
- data[1]=r; |
- } |
- |
-void DES_decrypt3(DES_LONG *data, DES_key_schedule *ks1, |
- DES_key_schedule *ks2, DES_key_schedule *ks3) |
- { |
- register DES_LONG l,r; |
- |
- l=data[0]; |
- r=data[1]; |
- IP(l,r); |
- data[0]=l; |
- data[1]=r; |
- DES_encrypt2((DES_LONG *)data,ks3,DES_DECRYPT); |
- DES_encrypt2((DES_LONG *)data,ks2,DES_ENCRYPT); |
- DES_encrypt2((DES_LONG *)data,ks1,DES_DECRYPT); |
- l=data[0]; |
- r=data[1]; |
- FP(r,l); |
- data[0]=l; |
- data[1]=r; |
- } |
- |
-#ifndef DES_DEFAULT_OPTIONS |
- |
-#undef CBC_ENC_C__DONT_UPDATE_IV |
-#include "ncbc_enc.c" /* DES_ncbc_encrypt */ |
- |
-void DES_ede3_cbc_encrypt(const unsigned char *input, unsigned char *output, |
- long length, DES_key_schedule *ks1, |
- DES_key_schedule *ks2, DES_key_schedule *ks3, |
- DES_cblock *ivec, int enc) |
- { |
- register DES_LONG tin0,tin1; |
- register DES_LONG tout0,tout1,xor0,xor1; |
- register const unsigned char *in; |
- unsigned char *out; |
- register long l=length; |
- DES_LONG tin[2]; |
- unsigned char *iv; |
- |
- in=input; |
- out=output; |
- iv = &(*ivec)[0]; |
- |
- if (enc) |
- { |
- c2l(iv,tout0); |
- c2l(iv,tout1); |
- for (l-=8; l>=0; l-=8) |
- { |
- c2l(in,tin0); |
- c2l(in,tin1); |
- tin0^=tout0; |
- tin1^=tout1; |
- |
- tin[0]=tin0; |
- tin[1]=tin1; |
- DES_encrypt3((DES_LONG *)tin,ks1,ks2,ks3); |
- tout0=tin[0]; |
- tout1=tin[1]; |
- |
- l2c(tout0,out); |
- l2c(tout1,out); |
- } |
- if (l != -8) |
- { |
- c2ln(in,tin0,tin1,l+8); |
- tin0^=tout0; |
- tin1^=tout1; |
- |
- tin[0]=tin0; |
- tin[1]=tin1; |
- DES_encrypt3((DES_LONG *)tin,ks1,ks2,ks3); |
- tout0=tin[0]; |
- tout1=tin[1]; |
- |
- l2c(tout0,out); |
- l2c(tout1,out); |
- } |
- iv = &(*ivec)[0]; |
- l2c(tout0,iv); |
- l2c(tout1,iv); |
- } |
- else |
- { |
- register DES_LONG t0,t1; |
- |
- c2l(iv,xor0); |
- c2l(iv,xor1); |
- for (l-=8; l>=0; l-=8) |
- { |
- c2l(in,tin0); |
- c2l(in,tin1); |
- |
- t0=tin0; |
- t1=tin1; |
- |
- tin[0]=tin0; |
- tin[1]=tin1; |
- DES_decrypt3((DES_LONG *)tin,ks1,ks2,ks3); |
- tout0=tin[0]; |
- tout1=tin[1]; |
- |
- tout0^=xor0; |
- tout1^=xor1; |
- l2c(tout0,out); |
- l2c(tout1,out); |
- xor0=t0; |
- xor1=t1; |
- } |
- if (l != -8) |
- { |
- c2l(in,tin0); |
- c2l(in,tin1); |
- |
- t0=tin0; |
- t1=tin1; |
- |
- tin[0]=tin0; |
- tin[1]=tin1; |
- DES_decrypt3((DES_LONG *)tin,ks1,ks2,ks3); |
- tout0=tin[0]; |
- tout1=tin[1]; |
- |
- tout0^=xor0; |
- tout1^=xor1; |
- l2cn(tout0,tout1,out,l+8); |
- xor0=t0; |
- xor1=t1; |
- } |
- |
- iv = &(*ivec)[0]; |
- l2c(xor0,iv); |
- l2c(xor1,iv); |
- } |
- tin0=tin1=tout0=tout1=xor0=xor1=0; |
- tin[0]=tin[1]=0; |
- } |
- |
-#endif /* DES_DEFAULT_OPTIONS */ |