diff options
Diffstat (limited to 'src/lib/libcrypto/md4')
| -rw-r--r-- | src/lib/libcrypto/md4/Makefile.ssl | 91 | ||||
| -rw-r--r-- | src/lib/libcrypto/md4/md4.h | 120 | ||||
| -rw-r--r-- | src/lib/libcrypto/md4/md4_dgst.c | 174 | ||||
| -rw-r--r-- | src/lib/libcrypto/md4/md4_locl.h | 112 | ||||
| -rw-r--r-- | src/lib/libcrypto/md4/md4_one.c | 97 |
5 files changed, 594 insertions, 0 deletions
diff --git a/src/lib/libcrypto/md4/Makefile.ssl b/src/lib/libcrypto/md4/Makefile.ssl new file mode 100644 index 0000000000..7d2e8d8d3b --- /dev/null +++ b/src/lib/libcrypto/md4/Makefile.ssl | |||
| @@ -0,0 +1,91 @@ | |||
| 1 | # | ||
| 2 | # SSLeay/crypto/md4/Makefile | ||
| 3 | # | ||
| 4 | |||
| 5 | DIR= md4 | ||
| 6 | TOP= ../.. | ||
| 7 | CC= cc | ||
| 8 | CPP= $(CC) -E | ||
| 9 | INCLUDES= | ||
| 10 | CFLAG=-g | ||
| 11 | INSTALL_PREFIX= | ||
| 12 | OPENSSLDIR= /usr/local/ssl | ||
| 13 | INSTALLTOP=/usr/local/ssl | ||
| 14 | MAKE= make -f Makefile.ssl | ||
| 15 | MAKEDEPPROG= makedepend | ||
| 16 | MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG) | ||
| 17 | MAKEFILE= Makefile.ssl | ||
| 18 | AR= ar r | ||
| 19 | |||
| 20 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
| 21 | |||
| 22 | GENERAL=Makefile | ||
| 23 | TEST=md4test.c | ||
| 24 | APPS=md4.c | ||
| 25 | |||
| 26 | LIB=$(TOP)/libcrypto.a | ||
| 27 | LIBSRC=md4_dgst.c md4_one.c | ||
| 28 | LIBOBJ=md4_dgst.o md4_one.o | ||
| 29 | |||
| 30 | SRC= $(LIBSRC) | ||
| 31 | |||
| 32 | EXHEADER= md4.h | ||
| 33 | HEADER= md4_locl.h $(EXHEADER) | ||
| 34 | |||
| 35 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
| 36 | |||
| 37 | top: | ||
| 38 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
| 39 | |||
| 40 | all: lib | ||
| 41 | |||
| 42 | lib: $(LIBOBJ) | ||
| 43 | $(AR) $(LIB) $(LIBOBJ) | ||
| 44 | $(RANLIB) $(LIB) || echo Never mind. | ||
| 45 | @touch lib | ||
| 46 | |||
| 47 | files: | ||
| 48 | $(PERL) $(TOP)/util/files.pl Makefile.ssl >> $(TOP)/MINFO | ||
| 49 | |||
| 50 | links: | ||
| 51 | @sh $(TOP)/util/point.sh Makefile.ssl Makefile | ||
| 52 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
| 53 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
| 54 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
| 55 | |||
| 56 | install: | ||
| 57 | @for i in $(EXHEADER) ; \ | ||
| 58 | do \ | ||
| 59 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
| 60 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
| 61 | done; | ||
| 62 | |||
| 63 | tags: | ||
| 64 | ctags $(SRC) | ||
| 65 | |||
| 66 | tests: | ||
| 67 | |||
| 68 | lint: | ||
| 69 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
| 70 | |||
| 71 | depend: | ||
| 72 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
| 73 | |||
| 74 | dclean: | ||
| 75 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
| 76 | mv -f Makefile.new $(MAKEFILE) | ||
| 77 | |||
| 78 | clean: | ||
| 79 | rm -f asm/mx86unix.cpp *.o asm/*.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
| 80 | |||
| 81 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
| 82 | |||
| 83 | md4_dgst.o: ../../include/openssl/e_os2.h ../../include/openssl/md4.h | ||
| 84 | md4_dgst.o: ../../include/openssl/opensslconf.h | ||
| 85 | md4_dgst.o: ../../include/openssl/opensslv.h ../md32_common.h md4_dgst.c | ||
| 86 | md4_dgst.o: md4_locl.h | ||
| 87 | md4_one.o: ../../include/openssl/crypto.h ../../include/openssl/e_os2.h | ||
| 88 | md4_one.o: ../../include/openssl/md4.h ../../include/openssl/opensslconf.h | ||
| 89 | md4_one.o: ../../include/openssl/opensslv.h ../../include/openssl/safestack.h | ||
| 90 | md4_one.o: ../../include/openssl/stack.h ../../include/openssl/symhacks.h | ||
| 91 | md4_one.o: md4_one.c | ||
diff --git a/src/lib/libcrypto/md4/md4.h b/src/lib/libcrypto/md4/md4.h new file mode 100644 index 0000000000..ba1fe4a6ee --- /dev/null +++ b/src/lib/libcrypto/md4/md4.h | |||
| @@ -0,0 +1,120 @@ | |||
| 1 | /* crypto/md4/md4.h */ | ||
| 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 | #ifndef HEADER_MD4_H | ||
| 60 | #define HEADER_MD4_H | ||
| 61 | |||
| 62 | #include <openssl/e_os2.h> | ||
| 63 | #include <stddef.h> | ||
| 64 | |||
| 65 | #ifdef __cplusplus | ||
| 66 | extern "C" { | ||
| 67 | #endif | ||
| 68 | |||
| 69 | #ifdef OPENSSL_NO_MD4 | ||
| 70 | #error MD4 is disabled. | ||
| 71 | #endif | ||
| 72 | |||
| 73 | /* | ||
| 74 | * !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! | ||
| 75 | * ! MD4_LONG has to be at least 32 bits wide. If it's wider, then ! | ||
| 76 | * ! MD4_LONG_LOG2 has to be defined along. ! | ||
| 77 | * !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! | ||
| 78 | */ | ||
| 79 | |||
| 80 | #if defined(OPENSSL_SYS_WIN16) || defined(__LP32__) | ||
| 81 | #define MD4_LONG unsigned long | ||
| 82 | #elif defined(OPENSSL_SYS_CRAY) || defined(__ILP64__) | ||
| 83 | #define MD4_LONG unsigned long | ||
| 84 | #define MD4_LONG_LOG2 3 | ||
| 85 | /* | ||
| 86 | * _CRAY note. I could declare short, but I have no idea what impact | ||
| 87 | * does it have on performance on none-T3E machines. I could declare | ||
| 88 | * int, but at least on C90 sizeof(int) can be chosen at compile time. | ||
| 89 | * So I've chosen long... | ||
| 90 | * <appro@fy.chalmers.se> | ||
| 91 | */ | ||
| 92 | #else | ||
| 93 | #define MD4_LONG unsigned int | ||
| 94 | #endif | ||
| 95 | |||
| 96 | #define MD4_CBLOCK 64 | ||
| 97 | #define MD4_LBLOCK (MD4_CBLOCK/4) | ||
| 98 | #define MD4_DIGEST_LENGTH 16 | ||
| 99 | |||
| 100 | typedef struct MD4state_st | ||
| 101 | { | ||
| 102 | MD4_LONG A,B,C,D; | ||
| 103 | MD4_LONG Nl,Nh; | ||
| 104 | MD4_LONG data[MD4_LBLOCK]; | ||
| 105 | unsigned int num; | ||
| 106 | } MD4_CTX; | ||
| 107 | |||
| 108 | #ifdef OPENSSL_FIPS | ||
| 109 | int private_MD4_Init(MD4_CTX *c); | ||
| 110 | #endif | ||
| 111 | int MD4_Init(MD4_CTX *c); | ||
| 112 | int MD4_Update(MD4_CTX *c, const void *data, size_t len); | ||
| 113 | int MD4_Final(unsigned char *md, MD4_CTX *c); | ||
| 114 | unsigned char *MD4(const unsigned char *d, size_t n, unsigned char *md); | ||
| 115 | void MD4_Transform(MD4_CTX *c, const unsigned char *b); | ||
| 116 | #ifdef __cplusplus | ||
| 117 | } | ||
| 118 | #endif | ||
| 119 | |||
| 120 | #endif | ||
diff --git a/src/lib/libcrypto/md4/md4_dgst.c b/src/lib/libcrypto/md4/md4_dgst.c new file mode 100644 index 0000000000..0f5448601d --- /dev/null +++ b/src/lib/libcrypto/md4/md4_dgst.c | |||
| @@ -0,0 +1,174 @@ | |||
| 1 | /* crypto/md4/md4_dgst.c */ | ||
| 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 | #include "md4_locl.h" | ||
| 61 | #include <openssl/opensslv.h> | ||
| 62 | #include <openssl/err.h> | ||
| 63 | #ifdef OPENSSL_FIPS | ||
| 64 | #include <openssl/fips.h> | ||
| 65 | #endif | ||
| 66 | |||
| 67 | |||
| 68 | const char MD4_version[]="MD4" OPENSSL_VERSION_PTEXT; | ||
| 69 | |||
| 70 | /* Implemented from RFC1186 The MD4 Message-Digest Algorithm | ||
| 71 | */ | ||
| 72 | |||
| 73 | #define INIT_DATA_A (unsigned long)0x67452301L | ||
| 74 | #define INIT_DATA_B (unsigned long)0xefcdab89L | ||
| 75 | #define INIT_DATA_C (unsigned long)0x98badcfeL | ||
| 76 | #define INIT_DATA_D (unsigned long)0x10325476L | ||
| 77 | |||
| 78 | FIPS_NON_FIPS_MD_Init(MD4) | ||
| 79 | { | ||
| 80 | c->A=INIT_DATA_A; | ||
| 81 | c->B=INIT_DATA_B; | ||
| 82 | c->C=INIT_DATA_C; | ||
| 83 | c->D=INIT_DATA_D; | ||
| 84 | c->Nl=0; | ||
| 85 | c->Nh=0; | ||
| 86 | c->num=0; | ||
| 87 | return 1; | ||
| 88 | } | ||
| 89 | |||
| 90 | #ifndef md4_block_data_order | ||
| 91 | #ifdef X | ||
| 92 | #undef X | ||
| 93 | #endif | ||
| 94 | void md4_block_data_order (MD4_CTX *c, const void *data_, size_t num) | ||
| 95 | { | ||
| 96 | const unsigned char *data=data_; | ||
| 97 | register unsigned MD32_REG_T A,B,C,D,l; | ||
| 98 | #ifndef MD32_XARRAY | ||
| 99 | /* See comment in crypto/sha/sha_locl.h for details. */ | ||
| 100 | unsigned MD32_REG_T XX0, XX1, XX2, XX3, XX4, XX5, XX6, XX7, | ||
| 101 | XX8, XX9,XX10,XX11,XX12,XX13,XX14,XX15; | ||
| 102 | # define X(i) XX##i | ||
| 103 | #else | ||
| 104 | MD4_LONG XX[MD4_LBLOCK]; | ||
| 105 | # define X(i) XX[i] | ||
| 106 | #endif | ||
| 107 | |||
| 108 | A=c->A; | ||
| 109 | B=c->B; | ||
| 110 | C=c->C; | ||
| 111 | D=c->D; | ||
| 112 | |||
| 113 | for (;num--;) | ||
| 114 | { | ||
| 115 | HOST_c2l(data,l); X( 0)=l; HOST_c2l(data,l); X( 1)=l; | ||
| 116 | /* Round 0 */ | ||
| 117 | R0(A,B,C,D,X( 0), 3,0); HOST_c2l(data,l); X( 2)=l; | ||
| 118 | R0(D,A,B,C,X( 1), 7,0); HOST_c2l(data,l); X( 3)=l; | ||
| 119 | R0(C,D,A,B,X( 2),11,0); HOST_c2l(data,l); X( 4)=l; | ||
| 120 | R0(B,C,D,A,X( 3),19,0); HOST_c2l(data,l); X( 5)=l; | ||
| 121 | R0(A,B,C,D,X( 4), 3,0); HOST_c2l(data,l); X( 6)=l; | ||
| 122 | R0(D,A,B,C,X( 5), 7,0); HOST_c2l(data,l); X( 7)=l; | ||
| 123 | R0(C,D,A,B,X( 6),11,0); HOST_c2l(data,l); X( 8)=l; | ||
| 124 | R0(B,C,D,A,X( 7),19,0); HOST_c2l(data,l); X( 9)=l; | ||
| 125 | R0(A,B,C,D,X( 8), 3,0); HOST_c2l(data,l); X(10)=l; | ||
| 126 | R0(D,A,B,C,X( 9), 7,0); HOST_c2l(data,l); X(11)=l; | ||
| 127 | R0(C,D,A,B,X(10),11,0); HOST_c2l(data,l); X(12)=l; | ||
| 128 | R0(B,C,D,A,X(11),19,0); HOST_c2l(data,l); X(13)=l; | ||
| 129 | R0(A,B,C,D,X(12), 3,0); HOST_c2l(data,l); X(14)=l; | ||
| 130 | R0(D,A,B,C,X(13), 7,0); HOST_c2l(data,l); X(15)=l; | ||
| 131 | R0(C,D,A,B,X(14),11,0); | ||
| 132 | R0(B,C,D,A,X(15),19,0); | ||
| 133 | /* Round 1 */ | ||
| 134 | R1(A,B,C,D,X( 0), 3,0x5A827999L); | ||
| 135 | R1(D,A,B,C,X( 4), 5,0x5A827999L); | ||
| 136 | R1(C,D,A,B,X( 8), 9,0x5A827999L); | ||
| 137 | R1(B,C,D,A,X(12),13,0x5A827999L); | ||
| 138 | R1(A,B,C,D,X( 1), 3,0x5A827999L); | ||
| 139 | R1(D,A,B,C,X( 5), 5,0x5A827999L); | ||
| 140 | R1(C,D,A,B,X( 9), 9,0x5A827999L); | ||
| 141 | R1(B,C,D,A,X(13),13,0x5A827999L); | ||
| 142 | R1(A,B,C,D,X( 2), 3,0x5A827999L); | ||
| 143 | R1(D,A,B,C,X( 6), 5,0x5A827999L); | ||
| 144 | R1(C,D,A,B,X(10), 9,0x5A827999L); | ||
| 145 | R1(B,C,D,A,X(14),13,0x5A827999L); | ||
| 146 | R1(A,B,C,D,X( 3), 3,0x5A827999L); | ||
| 147 | R1(D,A,B,C,X( 7), 5,0x5A827999L); | ||
| 148 | R1(C,D,A,B,X(11), 9,0x5A827999L); | ||
| 149 | R1(B,C,D,A,X(15),13,0x5A827999L); | ||
| 150 | /* Round 2 */ | ||
| 151 | R2(A,B,C,D,X( 0), 3,0x6ED9EBA1L); | ||
| 152 | R2(D,A,B,C,X( 8), 9,0x6ED9EBA1L); | ||
| 153 | R2(C,D,A,B,X( 4),11,0x6ED9EBA1L); | ||
| 154 | R2(B,C,D,A,X(12),15,0x6ED9EBA1L); | ||
| 155 | R2(A,B,C,D,X( 2), 3,0x6ED9EBA1L); | ||
| 156 | R2(D,A,B,C,X(10), 9,0x6ED9EBA1L); | ||
| 157 | R2(C,D,A,B,X( 6),11,0x6ED9EBA1L); | ||
| 158 | R2(B,C,D,A,X(14),15,0x6ED9EBA1L); | ||
| 159 | R2(A,B,C,D,X( 1), 3,0x6ED9EBA1L); | ||
| 160 | R2(D,A,B,C,X( 9), 9,0x6ED9EBA1L); | ||
| 161 | R2(C,D,A,B,X( 5),11,0x6ED9EBA1L); | ||
| 162 | R2(B,C,D,A,X(13),15,0x6ED9EBA1L); | ||
| 163 | R2(A,B,C,D,X( 3), 3,0x6ED9EBA1L); | ||
| 164 | R2(D,A,B,C,X(11), 9,0x6ED9EBA1L); | ||
| 165 | R2(C,D,A,B,X( 7),11,0x6ED9EBA1L); | ||
| 166 | R2(B,C,D,A,X(15),15,0x6ED9EBA1L); | ||
| 167 | |||
| 168 | A = c->A += A; | ||
| 169 | B = c->B += B; | ||
| 170 | C = c->C += C; | ||
| 171 | D = c->D += D; | ||
| 172 | } | ||
| 173 | } | ||
| 174 | #endif | ||
diff --git a/src/lib/libcrypto/md4/md4_locl.h b/src/lib/libcrypto/md4/md4_locl.h new file mode 100644 index 0000000000..c8085b0ead --- /dev/null +++ b/src/lib/libcrypto/md4/md4_locl.h | |||
| @@ -0,0 +1,112 @@ | |||
| 1 | /* crypto/md4/md4_locl.h */ | ||
| 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 <stdlib.h> | ||
| 60 | #include <string.h> | ||
| 61 | #include <openssl/opensslconf.h> | ||
| 62 | #include <openssl/md4.h> | ||
| 63 | |||
| 64 | #ifndef MD4_LONG_LOG2 | ||
| 65 | #define MD4_LONG_LOG2 2 /* default to 32 bits */ | ||
| 66 | #endif | ||
| 67 | |||
| 68 | void md4_block_data_order (MD4_CTX *c, const void *p,size_t num); | ||
| 69 | |||
| 70 | #define DATA_ORDER_IS_LITTLE_ENDIAN | ||
| 71 | |||
| 72 | #define HASH_LONG MD4_LONG | ||
| 73 | #define HASH_CTX MD4_CTX | ||
| 74 | #define HASH_CBLOCK MD4_CBLOCK | ||
| 75 | #define HASH_UPDATE MD4_Update | ||
| 76 | #define HASH_TRANSFORM MD4_Transform | ||
| 77 | #define HASH_FINAL MD4_Final | ||
| 78 | #define HASH_MAKE_STRING(c,s) do { \ | ||
| 79 | unsigned long ll; \ | ||
| 80 | ll=(c)->A; HOST_l2c(ll,(s)); \ | ||
| 81 | ll=(c)->B; HOST_l2c(ll,(s)); \ | ||
| 82 | ll=(c)->C; HOST_l2c(ll,(s)); \ | ||
| 83 | ll=(c)->D; HOST_l2c(ll,(s)); \ | ||
| 84 | } while (0) | ||
| 85 | #define HASH_BLOCK_DATA_ORDER md4_block_data_order | ||
| 86 | |||
| 87 | #include "md32_common.h" | ||
| 88 | |||
| 89 | /* | ||
| 90 | #define F(x,y,z) (((x) & (y)) | ((~(x)) & (z))) | ||
| 91 | #define G(x,y,z) (((x) & (y)) | ((x) & ((z))) | ((y) & ((z)))) | ||
| 92 | */ | ||
| 93 | |||
| 94 | /* As pointed out by Wei Dai <weidai@eskimo.com>, the above can be | ||
| 95 | * simplified to the code below. Wei attributes these optimizations | ||
| 96 | * to Peter Gutmann's SHS code, and he attributes it to Rich Schroeppel. | ||
| 97 | */ | ||
| 98 | #define F(b,c,d) ((((c) ^ (d)) & (b)) ^ (d)) | ||
| 99 | #define G(b,c,d) (((b) & (c)) | ((b) & (d)) | ((c) & (d))) | ||
| 100 | #define H(b,c,d) ((b) ^ (c) ^ (d)) | ||
| 101 | |||
| 102 | #define R0(a,b,c,d,k,s,t) { \ | ||
| 103 | a+=((k)+(t)+F((b),(c),(d))); \ | ||
| 104 | a=ROTATE(a,s); }; | ||
| 105 | |||
| 106 | #define R1(a,b,c,d,k,s,t) { \ | ||
| 107 | a+=((k)+(t)+G((b),(c),(d))); \ | ||
| 108 | a=ROTATE(a,s); };\ | ||
| 109 | |||
| 110 | #define R2(a,b,c,d,k,s,t) { \ | ||
| 111 | a+=((k)+(t)+H((b),(c),(d))); \ | ||
| 112 | a=ROTATE(a,s); }; | ||
diff --git a/src/lib/libcrypto/md4/md4_one.c b/src/lib/libcrypto/md4/md4_one.c new file mode 100644 index 0000000000..bb64362638 --- /dev/null +++ b/src/lib/libcrypto/md4/md4_one.c | |||
| @@ -0,0 +1,97 @@ | |||
| 1 | /* crypto/md4/md4_one.c */ | ||
| 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 | #include <string.h> | ||
| 61 | #include <openssl/md4.h> | ||
| 62 | #include <openssl/crypto.h> | ||
| 63 | |||
| 64 | #ifdef CHARSET_EBCDIC | ||
| 65 | #include <openssl/ebcdic.h> | ||
| 66 | #endif | ||
| 67 | |||
| 68 | unsigned char *MD4(const unsigned char *d, size_t n, unsigned char *md) | ||
| 69 | { | ||
| 70 | MD4_CTX c; | ||
| 71 | static unsigned char m[MD4_DIGEST_LENGTH]; | ||
| 72 | |||
| 73 | if (md == NULL) md=m; | ||
| 74 | if (!MD4_Init(&c)) | ||
| 75 | return NULL; | ||
| 76 | #ifndef CHARSET_EBCDIC | ||
| 77 | MD4_Update(&c,d,n); | ||
| 78 | #else | ||
| 79 | { | ||
| 80 | char temp[1024]; | ||
| 81 | unsigned long chunk; | ||
| 82 | |||
| 83 | while (n > 0) | ||
| 84 | { | ||
| 85 | chunk = (n > sizeof(temp)) ? sizeof(temp) : n; | ||
| 86 | ebcdic2ascii(temp, d, chunk); | ||
| 87 | MD4_Update(&c,temp,chunk); | ||
| 88 | n -= chunk; | ||
| 89 | d += chunk; | ||
| 90 | } | ||
| 91 | } | ||
| 92 | #endif | ||
| 93 | MD4_Final(md,&c); | ||
| 94 | OPENSSL_cleanse(&c,sizeof(c)); /* security consideration */ | ||
| 95 | return(md); | ||
| 96 | } | ||
| 97 | |||
