diff options
Diffstat (limited to 'src/lib/libcrypto/bf')
-rw-r--r-- | src/lib/libcrypto/bf/Makefile | 116 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/Makefile.ssl | 115 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/asm/bf-586.pl | 2 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/asm/bf-686.pl | 127 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/asm/readme | 10 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/bf_opts.c | 328 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/bf_skey.c | 1 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/bfs.cpp | 67 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/bfspeed.c | 274 | ||||
-rw-r--r-- | src/lib/libcrypto/bf/bftest.c | 536 |
10 files changed, 1574 insertions, 2 deletions
diff --git a/src/lib/libcrypto/bf/Makefile b/src/lib/libcrypto/bf/Makefile new file mode 100644 index 0000000000..42e2c050f8 --- /dev/null +++ b/src/lib/libcrypto/bf/Makefile | |||
@@ -0,0 +1,116 @@ | |||
1 | # | ||
2 | # OpenSSL/crypto/blowfish/Makefile | ||
3 | # | ||
4 | |||
5 | DIR= bf | ||
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 | MAKEDEPPROG= makedepend | ||
15 | MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG) | ||
16 | MAKEFILE= Makefile | ||
17 | AR= ar r | ||
18 | |||
19 | BF_ENC= bf_enc.o | ||
20 | # or use | ||
21 | #DES_ENC= bx86-elf.o | ||
22 | |||
23 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
24 | ASFLAGS= $(INCLUDES) $(ASFLAG) | ||
25 | |||
26 | GENERAL=Makefile | ||
27 | TEST=bftest.c | ||
28 | APPS= | ||
29 | |||
30 | LIB=$(TOP)/libcrypto.a | ||
31 | LIBSRC=bf_skey.c bf_ecb.c bf_enc.c bf_cfb64.c bf_ofb64.c | ||
32 | LIBOBJ=bf_skey.o bf_ecb.o $(BF_ENC) bf_cfb64.o bf_ofb64.o | ||
33 | |||
34 | SRC= $(LIBSRC) | ||
35 | |||
36 | EXHEADER= blowfish.h | ||
37 | HEADER= bf_pi.h bf_locl.h $(EXHEADER) | ||
38 | |||
39 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
40 | |||
41 | top: | ||
42 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
43 | |||
44 | all: lib | ||
45 | |||
46 | lib: $(LIBOBJ) | ||
47 | $(AR) $(LIB) $(LIBOBJ) | ||
48 | $(RANLIB) $(LIB) || echo Never mind. | ||
49 | @touch lib | ||
50 | |||
51 | # elf | ||
52 | asm/bx86-elf.s: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl | ||
53 | (cd asm; $(PERL) bf-586.pl elf $(CFLAGS) $(PROCESSOR) > bx86-elf.s) | ||
54 | |||
55 | # a.out | ||
56 | asm/bx86-out.o: asm/bx86unix.cpp | ||
57 | $(CPP) -DOUT asm/bx86unix.cpp | as -o asm/bx86-out.o | ||
58 | |||
59 | # bsdi | ||
60 | asm/bx86bsdi.o: asm/bx86unix.cpp | ||
61 | $(CPP) -DBSDI asm/bx86unix.cpp | sed 's/ :/:/' | as -o asm/bx86bsdi.o | ||
62 | |||
63 | asm/bx86unix.cpp: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl | ||
64 | (cd asm; $(PERL) bf-586.pl cpp $(PROCESSOR) >bx86unix.cpp) | ||
65 | |||
66 | files: | ||
67 | $(PERL) $(TOP)/util/files.pl Makefile >> $(TOP)/MINFO | ||
68 | |||
69 | links: | ||
70 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
71 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
72 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
73 | |||
74 | install: installs | ||
75 | |||
76 | installs: | ||
77 | @headerlist="$(EXHEADER)"; for i in $$headerlist ; \ | ||
78 | do \ | ||
79 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
80 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
81 | done; | ||
82 | |||
83 | tags: | ||
84 | ctags $(SRC) | ||
85 | |||
86 | tests: | ||
87 | |||
88 | lint: | ||
89 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
90 | |||
91 | depend: | ||
92 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
93 | |||
94 | dclean: | ||
95 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
96 | mv -f Makefile.new $(MAKEFILE) | ||
97 | |||
98 | clean: | ||
99 | rm -f asm/bx86unix.cpp asm/*-elf.* *.o asm/*.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
100 | |||
101 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
102 | |||
103 | bf_cfb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
104 | bf_cfb64.o: ../../include/openssl/opensslconf.h bf_cfb64.c bf_locl.h | ||
105 | bf_ecb.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
106 | bf_ecb.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
107 | bf_ecb.o: bf_ecb.c bf_locl.h | ||
108 | bf_enc.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
109 | bf_enc.o: ../../include/openssl/opensslconf.h bf_enc.c bf_locl.h | ||
110 | bf_ofb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
111 | bf_ofb64.o: ../../include/openssl/opensslconf.h bf_locl.h bf_ofb64.c | ||
112 | bf_skey.o: ../../include/openssl/blowfish.h ../../include/openssl/crypto.h | ||
113 | bf_skey.o: ../../include/openssl/e_os2.h ../../include/openssl/fips.h | ||
114 | bf_skey.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
115 | bf_skey.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h | ||
116 | bf_skey.o: ../../include/openssl/symhacks.h bf_locl.h bf_pi.h bf_skey.c | ||
diff --git a/src/lib/libcrypto/bf/Makefile.ssl b/src/lib/libcrypto/bf/Makefile.ssl new file mode 100644 index 0000000000..be3ad77a05 --- /dev/null +++ b/src/lib/libcrypto/bf/Makefile.ssl | |||
@@ -0,0 +1,115 @@ | |||
1 | # | ||
2 | # SSLeay/crypto/blowfish/Makefile | ||
3 | # | ||
4 | |||
5 | DIR= bf | ||
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 | BF_ENC= bf_enc.o | ||
21 | # or use | ||
22 | #DES_ENC= bx86-elf.o | ||
23 | |||
24 | CFLAGS= $(INCLUDES) $(CFLAG) | ||
25 | ASFLAGS= $(INCLUDES) $(ASFLAG) | ||
26 | |||
27 | GENERAL=Makefile | ||
28 | TEST=bftest.c | ||
29 | APPS= | ||
30 | |||
31 | LIB=$(TOP)/libcrypto.a | ||
32 | LIBSRC=bf_skey.c bf_ecb.c bf_enc.c bf_cfb64.c bf_ofb64.c | ||
33 | LIBOBJ=bf_skey.o bf_ecb.o $(BF_ENC) bf_cfb64.o bf_ofb64.o | ||
34 | |||
35 | SRC= $(LIBSRC) | ||
36 | |||
37 | EXHEADER= blowfish.h | ||
38 | HEADER= bf_pi.h bf_locl.h $(EXHEADER) | ||
39 | |||
40 | ALL= $(GENERAL) $(SRC) $(HEADER) | ||
41 | |||
42 | top: | ||
43 | (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all) | ||
44 | |||
45 | all: lib | ||
46 | |||
47 | lib: $(LIBOBJ) | ||
48 | $(AR) $(LIB) $(LIBOBJ) | ||
49 | $(RANLIB) $(LIB) || echo Never mind. | ||
50 | @touch lib | ||
51 | |||
52 | # elf | ||
53 | asm/bx86-elf.s: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl | ||
54 | (cd asm; $(PERL) bf-586.pl elf $(CFLAGS) $(PROCESSOR) > bx86-elf.s) | ||
55 | |||
56 | # a.out | ||
57 | asm/bx86-out.o: asm/bx86unix.cpp | ||
58 | $(CPP) -DOUT asm/bx86unix.cpp | as -o asm/bx86-out.o | ||
59 | |||
60 | # bsdi | ||
61 | asm/bx86bsdi.o: asm/bx86unix.cpp | ||
62 | $(CPP) -DBSDI asm/bx86unix.cpp | sed 's/ :/:/' | as -o asm/bx86bsdi.o | ||
63 | |||
64 | asm/bx86unix.cpp: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl | ||
65 | (cd asm; $(PERL) bf-586.pl cpp $(PROCESSOR) >bx86unix.cpp) | ||
66 | |||
67 | files: | ||
68 | $(PERL) $(TOP)/util/files.pl Makefile.ssl >> $(TOP)/MINFO | ||
69 | |||
70 | links: | ||
71 | @sh $(TOP)/util/point.sh Makefile.ssl Makefile | ||
72 | @$(PERL) $(TOP)/util/mklink.pl ../../include/openssl $(EXHEADER) | ||
73 | @$(PERL) $(TOP)/util/mklink.pl ../../test $(TEST) | ||
74 | @$(PERL) $(TOP)/util/mklink.pl ../../apps $(APPS) | ||
75 | |||
76 | install: installs | ||
77 | |||
78 | installs: | ||
79 | @for i in $(EXHEADER) ; \ | ||
80 | do \ | ||
81 | (cp $$i $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i; \ | ||
82 | chmod 644 $(INSTALL_PREFIX)$(INSTALLTOP)/include/openssl/$$i ); \ | ||
83 | done; | ||
84 | |||
85 | tags: | ||
86 | ctags $(SRC) | ||
87 | |||
88 | tests: | ||
89 | |||
90 | lint: | ||
91 | lint -DLINT $(INCLUDES) $(SRC)>fluff | ||
92 | |||
93 | depend: | ||
94 | $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC) | ||
95 | |||
96 | dclean: | ||
97 | $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new | ||
98 | mv -f Makefile.new $(MAKEFILE) | ||
99 | |||
100 | clean: | ||
101 | rm -f asm/bx86unix.cpp asm/*-elf.* *.o asm/*.o *.obj lib tags core .pure .nfs* *.old *.bak fluff | ||
102 | |||
103 | # DO NOT DELETE THIS LINE -- make depend depends on it. | ||
104 | |||
105 | bf_cfb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
106 | bf_cfb64.o: ../../include/openssl/opensslconf.h bf_cfb64.c bf_locl.h | ||
107 | bf_ecb.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
108 | bf_ecb.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h | ||
109 | bf_ecb.o: bf_ecb.c bf_locl.h | ||
110 | bf_enc.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
111 | bf_enc.o: ../../include/openssl/opensslconf.h bf_enc.c bf_locl.h | ||
112 | bf_ofb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
113 | bf_ofb64.o: ../../include/openssl/opensslconf.h bf_locl.h bf_ofb64.c | ||
114 | bf_skey.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h | ||
115 | bf_skey.o: ../../include/openssl/opensslconf.h bf_locl.h bf_pi.h bf_skey.c | ||
diff --git a/src/lib/libcrypto/bf/asm/bf-586.pl b/src/lib/libcrypto/bf/asm/bf-586.pl index b556642c94..b5a4760d09 100644 --- a/src/lib/libcrypto/bf/asm/bf-586.pl +++ b/src/lib/libcrypto/bf/asm/bf-586.pl | |||
@@ -18,7 +18,7 @@ $tmp4="edx"; | |||
18 | 18 | ||
19 | &BF_encrypt("BF_encrypt",1); | 19 | &BF_encrypt("BF_encrypt",1); |
20 | &BF_encrypt("BF_decrypt",0); | 20 | &BF_encrypt("BF_decrypt",0); |
21 | &cbc("BF_cbc_encrypt","BF_encrypt","BF_decrypt",1,4,5,3,-1,-1); | 21 | &cbc("BF_cbc_encrypt","BF_encrypt","BF_decrypt",1,4,5,3,-1,-1) unless $main'openbsd; |
22 | &asm_finish(); | 22 | &asm_finish(); |
23 | 23 | ||
24 | sub BF_encrypt | 24 | sub BF_encrypt |
diff --git a/src/lib/libcrypto/bf/asm/bf-686.pl b/src/lib/libcrypto/bf/asm/bf-686.pl new file mode 100644 index 0000000000..8e4c25f598 --- /dev/null +++ b/src/lib/libcrypto/bf/asm/bf-686.pl | |||
@@ -0,0 +1,127 @@ | |||
1 | #!/usr/local/bin/perl | ||
2 | |||
3 | push(@INC,"perlasm","../../perlasm"); | ||
4 | require "x86asm.pl"; | ||
5 | require "cbc.pl"; | ||
6 | |||
7 | &asm_init($ARGV[0],"bf-686.pl"); | ||
8 | |||
9 | $BF_ROUNDS=16; | ||
10 | $BF_OFF=($BF_ROUNDS+2)*4; | ||
11 | $L="ecx"; | ||
12 | $R="edx"; | ||
13 | $P="edi"; | ||
14 | $tot="esi"; | ||
15 | $tmp1="eax"; | ||
16 | $tmp2="ebx"; | ||
17 | $tmp3="ebp"; | ||
18 | |||
19 | &des_encrypt("BF_encrypt",1); | ||
20 | &des_encrypt("BF_decrypt",0); | ||
21 | &cbc("BF_cbc_encrypt","BF_encrypt","BF_decrypt",1,4,5,3,-1,-1); | ||
22 | |||
23 | &asm_finish(); | ||
24 | |||
25 | &file_end(); | ||
26 | |||
27 | sub des_encrypt | ||
28 | { | ||
29 | local($name,$enc)=@_; | ||
30 | |||
31 | &function_begin($name,""); | ||
32 | |||
33 | &comment(""); | ||
34 | &comment("Load the 2 words"); | ||
35 | &mov("eax",&wparam(0)); | ||
36 | &mov($L,&DWP(0,"eax","",0)); | ||
37 | &mov($R,&DWP(4,"eax","",0)); | ||
38 | |||
39 | &comment(""); | ||
40 | &comment("P pointer, s and enc flag"); | ||
41 | &mov($P,&wparam(1)); | ||
42 | |||
43 | &xor( $tmp1, $tmp1); | ||
44 | &xor( $tmp2, $tmp2); | ||
45 | |||
46 | # encrypting part | ||
47 | |||
48 | if ($enc) | ||
49 | { | ||
50 | &xor($L,&DWP(0,$P,"",0)); | ||
51 | for ($i=0; $i<$BF_ROUNDS; $i+=2) | ||
52 | { | ||
53 | &comment(""); | ||
54 | &comment("Round $i"); | ||
55 | &BF_ENCRYPT($i+1,$R,$L,$P,$tot,$tmp1,$tmp2,$tmp3); | ||
56 | |||
57 | &comment(""); | ||
58 | &comment("Round ".sprintf("%d",$i+1)); | ||
59 | &BF_ENCRYPT($i+2,$L,$R,$P,$tot,$tmp1,$tmp2,$tmp3); | ||
60 | } | ||
61 | &xor($R,&DWP(($BF_ROUNDS+1)*4,$P,"",0)); | ||
62 | |||
63 | &mov("eax",&wparam(0)); | ||
64 | &mov(&DWP(0,"eax","",0),$R); | ||
65 | &mov(&DWP(4,"eax","",0),$L); | ||
66 | &function_end_A($name); | ||
67 | } | ||
68 | else | ||
69 | { | ||
70 | &xor($L,&DWP(($BF_ROUNDS+1)*4,$P,"",0)); | ||
71 | for ($i=$BF_ROUNDS; $i>0; $i-=2) | ||
72 | { | ||
73 | &comment(""); | ||
74 | &comment("Round $i"); | ||
75 | &BF_ENCRYPT($i,$R,$L,$P,$tot,$tmp1,$tmp2,$tmp3); | ||
76 | &comment(""); | ||
77 | &comment("Round ".sprintf("%d",$i-1)); | ||
78 | &BF_ENCRYPT($i-1,$L,$R,$P,$tot,$tmp1,$tmp2,$tmp3); | ||
79 | } | ||
80 | &xor($R,&DWP(0,$P,"",0)); | ||
81 | |||
82 | &mov("eax",&wparam(0)); | ||
83 | &mov(&DWP(0,"eax","",0),$R); | ||
84 | &mov(&DWP(4,"eax","",0),$L); | ||
85 | &function_end_A($name); | ||
86 | } | ||
87 | |||
88 | &function_end_B($name); | ||
89 | } | ||
90 | |||
91 | sub BF_ENCRYPT | ||
92 | { | ||
93 | local($i,$L,$R,$P,$tot,$tmp1,$tmp2,$tmp3)=@_; | ||
94 | |||
95 | &rotr( $R, 16); | ||
96 | &mov( $tot, &DWP(&n2a($i*4),$P,"",0)); | ||
97 | |||
98 | &movb( &LB($tmp1), &HB($R)); | ||
99 | &movb( &LB($tmp2), &LB($R)); | ||
100 | |||
101 | &rotr( $R, 16); | ||
102 | &xor( $L, $tot); | ||
103 | |||
104 | &mov( $tot, &DWP(&n2a($BF_OFF+0x0000),$P,$tmp1,4)); | ||
105 | &mov( $tmp3, &DWP(&n2a($BF_OFF+0x0400),$P,$tmp2,4)); | ||
106 | |||
107 | &movb( &LB($tmp1), &HB($R)); | ||
108 | &movb( &LB($tmp2), &LB($R)); | ||
109 | |||
110 | &add( $tot, $tmp3); | ||
111 | &mov( $tmp1, &DWP(&n2a($BF_OFF+0x0800),$P,$tmp1,4)); # delay | ||
112 | |||
113 | &xor( $tot, $tmp1); | ||
114 | &mov( $tmp3, &DWP(&n2a($BF_OFF+0x0C00),$P,$tmp2,4)); | ||
115 | |||
116 | &add( $tot, $tmp3); | ||
117 | &xor( $tmp1, $tmp1); | ||
118 | |||
119 | &xor( $L, $tot); | ||
120 | # delay | ||
121 | } | ||
122 | |||
123 | sub n2a | ||
124 | { | ||
125 | sprintf("%d",$_[0]); | ||
126 | } | ||
127 | |||
diff --git a/src/lib/libcrypto/bf/asm/readme b/src/lib/libcrypto/bf/asm/readme new file mode 100644 index 0000000000..2385fa3812 --- /dev/null +++ b/src/lib/libcrypto/bf/asm/readme | |||
@@ -0,0 +1,10 @@ | |||
1 | There are blowfish assembler generation scripts. | ||
2 | bf-586.pl version is for the pentium and | ||
3 | bf-686.pl is my original version, which is faster on the pentium pro. | ||
4 | |||
5 | When using a bf-586.pl, the pentium pro/II is %8 slower than using | ||
6 | bf-686.pl. When using a bf-686.pl, the pentium is %16 slower | ||
7 | than bf-586.pl | ||
8 | |||
9 | So the default is bf-586.pl | ||
10 | |||
diff --git a/src/lib/libcrypto/bf/bf_opts.c b/src/lib/libcrypto/bf/bf_opts.c new file mode 100644 index 0000000000..171dada2ca --- /dev/null +++ b/src/lib/libcrypto/bf/bf_opts.c | |||
@@ -0,0 +1,328 @@ | |||
1 | /* crypto/bf/bf_opts.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 | /* define PART1, PART2, PART3 or PART4 to build only with a few of the options. | ||
60 | * This is for machines with 64k code segment size restrictions. */ | ||
61 | |||
62 | #if !defined(OPENSSL_SYS_MSDOS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC)) && !defined(OPENSSL_SYS_MACOSX) | ||
63 | #define TIMES | ||
64 | #endif | ||
65 | |||
66 | #include <stdio.h> | ||
67 | |||
68 | #include <openssl/e_os2.h> | ||
69 | #include OPENSSL_UNISTD_IO | ||
70 | OPENSSL_DECLARE_EXIT | ||
71 | |||
72 | #include <signal.h> | ||
73 | #ifndef _IRIX | ||
74 | #include <time.h> | ||
75 | #endif | ||
76 | #ifdef TIMES | ||
77 | #include <sys/types.h> | ||
78 | #include <sys/times.h> | ||
79 | #endif | ||
80 | |||
81 | /* Depending on the VMS version, the tms structure is perhaps defined. | ||
82 | The __TMS macro will show if it was. If it wasn't defined, we should | ||
83 | undefine TIMES, since that tells the rest of the program how things | ||
84 | should be handled. -- Richard Levitte */ | ||
85 | #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS) | ||
86 | #undef TIMES | ||
87 | #endif | ||
88 | |||
89 | #ifndef TIMES | ||
90 | #include <sys/timeb.h> | ||
91 | #endif | ||
92 | |||
93 | #if defined(sun) || defined(__ultrix) | ||
94 | #define _POSIX_SOURCE | ||
95 | #include <limits.h> | ||
96 | #include <sys/param.h> | ||
97 | #endif | ||
98 | |||
99 | #include <openssl/blowfish.h> | ||
100 | |||
101 | #define BF_DEFAULT_OPTIONS | ||
102 | |||
103 | #undef BF_ENC | ||
104 | #define BF_encrypt BF_encrypt_normal | ||
105 | #undef HEADER_BF_LOCL_H | ||
106 | #include "bf_enc.c" | ||
107 | |||
108 | #define BF_PTR | ||
109 | #undef BF_PTR2 | ||
110 | #undef BF_ENC | ||
111 | #undef BF_encrypt | ||
112 | #define BF_encrypt BF_encrypt_ptr | ||
113 | #undef HEADER_BF_LOCL_H | ||
114 | #include "bf_enc.c" | ||
115 | |||
116 | #undef BF_PTR | ||
117 | #define BF_PTR2 | ||
118 | #undef BF_ENC | ||
119 | #undef BF_encrypt | ||
120 | #define BF_encrypt BF_encrypt_ptr2 | ||
121 | #undef HEADER_BF_LOCL_H | ||
122 | #include "bf_enc.c" | ||
123 | |||
124 | /* The following if from times(3) man page. It may need to be changed */ | ||
125 | #ifndef HZ | ||
126 | # ifndef CLK_TCK | ||
127 | # ifndef _BSD_CLK_TCK_ /* FreeBSD fix */ | ||
128 | # define HZ 100.0 | ||
129 | # else /* _BSD_CLK_TCK_ */ | ||
130 | # define HZ ((double)_BSD_CLK_TCK_) | ||
131 | # endif | ||
132 | # else /* CLK_TCK */ | ||
133 | # define HZ ((double)CLK_TCK) | ||
134 | # endif | ||
135 | #endif | ||
136 | |||
137 | #define BUFSIZE ((long)1024) | ||
138 | long run=0; | ||
139 | |||
140 | double Time_F(int s); | ||
141 | #ifdef SIGALRM | ||
142 | #if defined(__STDC__) || defined(sgi) | ||
143 | #define SIGRETTYPE void | ||
144 | #else | ||
145 | #define SIGRETTYPE int | ||
146 | #endif | ||
147 | |||
148 | SIGRETTYPE sig_done(int sig); | ||
149 | SIGRETTYPE sig_done(int sig) | ||
150 | { | ||
151 | signal(SIGALRM,sig_done); | ||
152 | run=0; | ||
153 | #ifdef LINT | ||
154 | sig=sig; | ||
155 | #endif | ||
156 | } | ||
157 | #endif | ||
158 | |||
159 | #define START 0 | ||
160 | #define STOP 1 | ||
161 | |||
162 | double Time_F(int s) | ||
163 | { | ||
164 | double ret; | ||
165 | #ifdef TIMES | ||
166 | static struct tms tstart,tend; | ||
167 | |||
168 | if (s == START) | ||
169 | { | ||
170 | times(&tstart); | ||
171 | return(0); | ||
172 | } | ||
173 | else | ||
174 | { | ||
175 | times(&tend); | ||
176 | ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ; | ||
177 | return((ret == 0.0)?1e-6:ret); | ||
178 | } | ||
179 | #else /* !times() */ | ||
180 | static struct timeb tstart,tend; | ||
181 | long i; | ||
182 | |||
183 | if (s == START) | ||
184 | { | ||
185 | ftime(&tstart); | ||
186 | return(0); | ||
187 | } | ||
188 | else | ||
189 | { | ||
190 | ftime(&tend); | ||
191 | i=(long)tend.millitm-(long)tstart.millitm; | ||
192 | ret=((double)(tend.time-tstart.time))+((double)i)/1000.0; | ||
193 | return((ret == 0.0)?1e-6:ret); | ||
194 | } | ||
195 | #endif | ||
196 | } | ||
197 | |||
198 | #ifdef SIGALRM | ||
199 | #define print_name(name) fprintf(stderr,"Doing %s's for 10 seconds\n",name); alarm(10); | ||
200 | #else | ||
201 | #define print_name(name) fprintf(stderr,"Doing %s %ld times\n",name,cb); | ||
202 | #endif | ||
203 | |||
204 | #define time_it(func,name,index) \ | ||
205 | print_name(name); \ | ||
206 | Time_F(START); \ | ||
207 | for (count=0,run=1; COND(cb); count+=4) \ | ||
208 | { \ | ||
209 | unsigned long d[2]; \ | ||
210 | func(d,&sch); \ | ||
211 | func(d,&sch); \ | ||
212 | func(d,&sch); \ | ||
213 | func(d,&sch); \ | ||
214 | } \ | ||
215 | tm[index]=Time_F(STOP); \ | ||
216 | fprintf(stderr,"%ld %s's in %.2f second\n",count,name,tm[index]); \ | ||
217 | tm[index]=((double)COUNT(cb))/tm[index]; | ||
218 | |||
219 | #define print_it(name,index) \ | ||
220 | fprintf(stderr,"%s bytes per sec = %12.2f (%5.1fuS)\n",name, \ | ||
221 | tm[index]*8,1.0e6/tm[index]); | ||
222 | |||
223 | int main(int argc, char **argv) | ||
224 | { | ||
225 | long count; | ||
226 | static unsigned char buf[BUFSIZE]; | ||
227 | static char key[16]={ 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0, | ||
228 | 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0}; | ||
229 | BF_KEY sch; | ||
230 | double d,tm[16],max=0; | ||
231 | int rank[16]; | ||
232 | char *str[16]; | ||
233 | int max_idx=0,i,num=0,j; | ||
234 | #ifndef SIGALARM | ||
235 | long ca,cb,cc,cd,ce; | ||
236 | #endif | ||
237 | |||
238 | for (i=0; i<12; i++) | ||
239 | { | ||
240 | tm[i]=0.0; | ||
241 | rank[i]=0; | ||
242 | } | ||
243 | |||
244 | #ifndef TIMES | ||
245 | fprintf(stderr,"To get the most accurate results, try to run this\n"); | ||
246 | fprintf(stderr,"program when this computer is idle.\n"); | ||
247 | #endif | ||
248 | |||
249 | BF_set_key(&sch,16,key); | ||
250 | |||
251 | #ifndef SIGALRM | ||
252 | fprintf(stderr,"First we calculate the approximate speed ...\n"); | ||
253 | count=10; | ||
254 | do { | ||
255 | long i; | ||
256 | unsigned long data[2]; | ||
257 | |||
258 | count*=2; | ||
259 | Time_F(START); | ||
260 | for (i=count; i; i--) | ||
261 | BF_encrypt(data,&sch); | ||
262 | d=Time_F(STOP); | ||
263 | } while (d < 3.0); | ||
264 | ca=count; | ||
265 | cb=count*3; | ||
266 | cc=count*3*8/BUFSIZE+1; | ||
267 | cd=count*8/BUFSIZE+1; | ||
268 | |||
269 | ce=count/20+1; | ||
270 | #define COND(d) (count != (d)) | ||
271 | #define COUNT(d) (d) | ||
272 | #else | ||
273 | #define COND(c) (run) | ||
274 | #define COUNT(d) (count) | ||
275 | signal(SIGALRM,sig_done); | ||
276 | alarm(10); | ||
277 | #endif | ||
278 | |||
279 | time_it(BF_encrypt_normal, "BF_encrypt_normal ", 0); | ||
280 | time_it(BF_encrypt_ptr, "BF_encrypt_ptr ", 1); | ||
281 | time_it(BF_encrypt_ptr2, "BF_encrypt_ptr2 ", 2); | ||
282 | num+=3; | ||
283 | |||
284 | str[0]="<nothing>"; | ||
285 | print_it("BF_encrypt_normal ",0); | ||
286 | max=tm[0]; | ||
287 | max_idx=0; | ||
288 | str[1]="ptr "; | ||
289 | print_it("BF_encrypt_ptr ",1); | ||
290 | if (max < tm[1]) { max=tm[1]; max_idx=1; } | ||
291 | str[2]="ptr2 "; | ||
292 | print_it("BF_encrypt_ptr2 ",2); | ||
293 | if (max < tm[2]) { max=tm[2]; max_idx=2; } | ||
294 | |||
295 | printf("options BF ecb/s\n"); | ||
296 | printf("%s %12.2f 100.0%%\n",str[max_idx],tm[max_idx]); | ||
297 | d=tm[max_idx]; | ||
298 | tm[max_idx]= -2.0; | ||
299 | max= -1.0; | ||
300 | for (;;) | ||
301 | { | ||
302 | for (i=0; i<3; i++) | ||
303 | { | ||
304 | if (max < tm[i]) { max=tm[i]; j=i; } | ||
305 | } | ||
306 | if (max < 0.0) break; | ||
307 | printf("%s %12.2f %4.1f%%\n",str[j],tm[j],tm[j]/d*100.0); | ||
308 | tm[j]= -2.0; | ||
309 | max= -1.0; | ||
310 | } | ||
311 | |||
312 | switch (max_idx) | ||
313 | { | ||
314 | case 0: | ||
315 | printf("-DBF_DEFAULT_OPTIONS\n"); | ||
316 | break; | ||
317 | case 1: | ||
318 | printf("-DBF_PTR\n"); | ||
319 | break; | ||
320 | case 2: | ||
321 | printf("-DBF_PTR2\n"); | ||
322 | break; | ||
323 | } | ||
324 | exit(0); | ||
325 | #if defined(LINT) || defined(OPENSSL_SYS_MSDOS) | ||
326 | return(0); | ||
327 | #endif | ||
328 | } | ||
diff --git a/src/lib/libcrypto/bf/bf_skey.c b/src/lib/libcrypto/bf/bf_skey.c index 1931aba83f..fc5bebefce 100644 --- a/src/lib/libcrypto/bf/bf_skey.c +++ b/src/lib/libcrypto/bf/bf_skey.c | |||
@@ -60,7 +60,6 @@ | |||
60 | #include <string.h> | 60 | #include <string.h> |
61 | #include <openssl/crypto.h> | 61 | #include <openssl/crypto.h> |
62 | #include <openssl/blowfish.h> | 62 | #include <openssl/blowfish.h> |
63 | #include <openssl/fips.h> | ||
64 | #include "bf_locl.h" | 63 | #include "bf_locl.h" |
65 | #include "bf_pi.h" | 64 | #include "bf_pi.h" |
66 | 65 | ||
diff --git a/src/lib/libcrypto/bf/bfs.cpp b/src/lib/libcrypto/bf/bfs.cpp new file mode 100644 index 0000000000..d74c457760 --- /dev/null +++ b/src/lib/libcrypto/bf/bfs.cpp | |||
@@ -0,0 +1,67 @@ | |||
1 | // | ||
2 | // gettsc.inl | ||
3 | // | ||
4 | // gives access to the Pentium's (secret) cycle counter | ||
5 | // | ||
6 | // This software was written by Leonard Janke (janke@unixg.ubc.ca) | ||
7 | // in 1996-7 and is entered, by him, into the public domain. | ||
8 | |||
9 | #if defined(__WATCOMC__) | ||
10 | void GetTSC(unsigned long&); | ||
11 | #pragma aux GetTSC = 0x0f 0x31 "mov [edi], eax" parm [edi] modify [edx eax]; | ||
12 | #elif defined(__GNUC__) | ||
13 | inline | ||
14 | void GetTSC(unsigned long& tsc) | ||
15 | { | ||
16 | asm volatile(".byte 15, 49\n\t" | ||
17 | : "=eax" (tsc) | ||
18 | : | ||
19 | : "%edx", "%eax"); | ||
20 | } | ||
21 | #elif defined(_MSC_VER) | ||
22 | inline | ||
23 | void GetTSC(unsigned long& tsc) | ||
24 | { | ||
25 | unsigned long a; | ||
26 | __asm _emit 0fh | ||
27 | __asm _emit 31h | ||
28 | __asm mov a, eax; | ||
29 | tsc=a; | ||
30 | } | ||
31 | #endif | ||
32 | |||
33 | #include <stdio.h> | ||
34 | #include <stdlib.h> | ||
35 | #include <openssl/blowfish.h> | ||
36 | |||
37 | void main(int argc,char *argv[]) | ||
38 | { | ||
39 | BF_KEY key; | ||
40 | unsigned long s1,s2,e1,e2; | ||
41 | unsigned long data[2]; | ||
42 | int i,j; | ||
43 | |||
44 | for (j=0; j<6; j++) | ||
45 | { | ||
46 | for (i=0; i<1000; i++) /**/ | ||
47 | { | ||
48 | BF_encrypt(&data[0],&key); | ||
49 | GetTSC(s1); | ||
50 | BF_encrypt(&data[0],&key); | ||
51 | BF_encrypt(&data[0],&key); | ||
52 | BF_encrypt(&data[0],&key); | ||
53 | GetTSC(e1); | ||
54 | GetTSC(s2); | ||
55 | BF_encrypt(&data[0],&key); | ||
56 | BF_encrypt(&data[0],&key); | ||
57 | BF_encrypt(&data[0],&key); | ||
58 | BF_encrypt(&data[0],&key); | ||
59 | GetTSC(e2); | ||
60 | BF_encrypt(&data[0],&key); | ||
61 | } | ||
62 | |||
63 | printf("blowfish %d %d (%d)\n", | ||
64 | e1-s1,e2-s2,((e2-s2)-(e1-s1))); | ||
65 | } | ||
66 | } | ||
67 | |||
diff --git a/src/lib/libcrypto/bf/bfspeed.c b/src/lib/libcrypto/bf/bfspeed.c new file mode 100644 index 0000000000..f346af64f3 --- /dev/null +++ b/src/lib/libcrypto/bf/bfspeed.c | |||
@@ -0,0 +1,274 @@ | |||
1 | /* crypto/bf/bfspeed.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 | /* 11-Sep-92 Andrew Daviel Support for Silicon Graphics IRIX added */ | ||
60 | /* 06-Apr-92 Luke Brennan Support for VMS and add extra signal calls */ | ||
61 | |||
62 | #if !defined(OPENSSL_SYS_MSDOS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC)) && !defined(OPENSSL_SYS_MACOSX) | ||
63 | #define TIMES | ||
64 | #endif | ||
65 | |||
66 | #include <stdio.h> | ||
67 | |||
68 | #include <openssl/e_os2.h> | ||
69 | #include OPENSSL_UNISTD_IO | ||
70 | OPENSSL_DECLARE_EXIT | ||
71 | |||
72 | #include <signal.h> | ||
73 | #ifndef _IRIX | ||
74 | #include <time.h> | ||
75 | #endif | ||
76 | #ifdef TIMES | ||
77 | #include <sys/types.h> | ||
78 | #include <sys/times.h> | ||
79 | #endif | ||
80 | |||
81 | /* Depending on the VMS version, the tms structure is perhaps defined. | ||
82 | The __TMS macro will show if it was. If it wasn't defined, we should | ||
83 | undefine TIMES, since that tells the rest of the program how things | ||
84 | should be handled. -- Richard Levitte */ | ||
85 | #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS) | ||
86 | #undef TIMES | ||
87 | #endif | ||
88 | |||
89 | #ifndef TIMES | ||
90 | #include <sys/timeb.h> | ||
91 | #endif | ||
92 | |||
93 | #if defined(sun) || defined(__ultrix) | ||
94 | #define _POSIX_SOURCE | ||
95 | #include <limits.h> | ||
96 | #include <sys/param.h> | ||
97 | #endif | ||
98 | |||
99 | #include <openssl/blowfish.h> | ||
100 | |||
101 | /* The following if from times(3) man page. It may need to be changed */ | ||
102 | #ifndef HZ | ||
103 | #ifndef CLK_TCK | ||
104 | #define HZ 100.0 | ||
105 | #else /* CLK_TCK */ | ||
106 | #define HZ ((double)CLK_TCK) | ||
107 | #endif | ||
108 | #endif | ||
109 | |||
110 | #define BUFSIZE ((long)1024) | ||
111 | long run=0; | ||
112 | |||
113 | double Time_F(int s); | ||
114 | #ifdef SIGALRM | ||
115 | #if defined(__STDC__) || defined(sgi) || defined(_AIX) | ||
116 | #define SIGRETTYPE void | ||
117 | #else | ||
118 | #define SIGRETTYPE int | ||
119 | #endif | ||
120 | |||
121 | SIGRETTYPE sig_done(int sig); | ||
122 | SIGRETTYPE sig_done(int sig) | ||
123 | { | ||
124 | signal(SIGALRM,sig_done); | ||
125 | run=0; | ||
126 | #ifdef LINT | ||
127 | sig=sig; | ||
128 | #endif | ||
129 | } | ||
130 | #endif | ||
131 | |||
132 | #define START 0 | ||
133 | #define STOP 1 | ||
134 | |||
135 | double Time_F(int s) | ||
136 | { | ||
137 | double ret; | ||
138 | #ifdef TIMES | ||
139 | static struct tms tstart,tend; | ||
140 | |||
141 | if (s == START) | ||
142 | { | ||
143 | times(&tstart); | ||
144 | return(0); | ||
145 | } | ||
146 | else | ||
147 | { | ||
148 | times(&tend); | ||
149 | ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ; | ||
150 | return((ret == 0.0)?1e-6:ret); | ||
151 | } | ||
152 | #else /* !times() */ | ||
153 | static struct timeb tstart,tend; | ||
154 | long i; | ||
155 | |||
156 | if (s == START) | ||
157 | { | ||
158 | ftime(&tstart); | ||
159 | return(0); | ||
160 | } | ||
161 | else | ||
162 | { | ||
163 | ftime(&tend); | ||
164 | i=(long)tend.millitm-(long)tstart.millitm; | ||
165 | ret=((double)(tend.time-tstart.time))+((double)i)/1e3; | ||
166 | return((ret == 0.0)?1e-6:ret); | ||
167 | } | ||
168 | #endif | ||
169 | } | ||
170 | |||
171 | int main(int argc, char **argv) | ||
172 | { | ||
173 | long count; | ||
174 | static unsigned char buf[BUFSIZE]; | ||
175 | static unsigned char key[] ={ | ||
176 | 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0, | ||
177 | 0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10, | ||
178 | }; | ||
179 | BF_KEY sch; | ||
180 | double a,b,c,d; | ||
181 | #ifndef SIGALRM | ||
182 | long ca,cb,cc; | ||
183 | #endif | ||
184 | |||
185 | #ifndef TIMES | ||
186 | printf("To get the most accurate results, try to run this\n"); | ||
187 | printf("program when this computer is idle.\n"); | ||
188 | #endif | ||
189 | |||
190 | #ifndef SIGALRM | ||
191 | printf("First we calculate the approximate speed ...\n"); | ||
192 | BF_set_key(&sch,16,key); | ||
193 | count=10; | ||
194 | do { | ||
195 | long i; | ||
196 | BF_LONG data[2]; | ||
197 | |||
198 | count*=2; | ||
199 | Time_F(START); | ||
200 | for (i=count; i; i--) | ||
201 | BF_encrypt(data,&sch); | ||
202 | d=Time_F(STOP); | ||
203 | } while (d < 3.0); | ||
204 | ca=count/512; | ||
205 | cb=count; | ||
206 | cc=count*8/BUFSIZE+1; | ||
207 | printf("Doing BF_set_key %ld times\n",ca); | ||
208 | #define COND(d) (count != (d)) | ||
209 | #define COUNT(d) (d) | ||
210 | #else | ||
211 | #define COND(c) (run) | ||
212 | #define COUNT(d) (count) | ||
213 | signal(SIGALRM,sig_done); | ||
214 | printf("Doing BF_set_key for 10 seconds\n"); | ||
215 | alarm(10); | ||
216 | #endif | ||
217 | |||
218 | Time_F(START); | ||
219 | for (count=0,run=1; COND(ca); count+=4) | ||
220 | { | ||
221 | BF_set_key(&sch,16,key); | ||
222 | BF_set_key(&sch,16,key); | ||
223 | BF_set_key(&sch,16,key); | ||
224 | BF_set_key(&sch,16,key); | ||
225 | } | ||
226 | d=Time_F(STOP); | ||
227 | printf("%ld BF_set_key's in %.2f seconds\n",count,d); | ||
228 | a=((double)COUNT(ca))/d; | ||
229 | |||
230 | #ifdef SIGALRM | ||
231 | printf("Doing BF_encrypt's for 10 seconds\n"); | ||
232 | alarm(10); | ||
233 | #else | ||
234 | printf("Doing BF_encrypt %ld times\n",cb); | ||
235 | #endif | ||
236 | Time_F(START); | ||
237 | for (count=0,run=1; COND(cb); count+=4) | ||
238 | { | ||
239 | BF_LONG data[2]; | ||
240 | |||
241 | BF_encrypt(data,&sch); | ||
242 | BF_encrypt(data,&sch); | ||
243 | BF_encrypt(data,&sch); | ||
244 | BF_encrypt(data,&sch); | ||
245 | } | ||
246 | d=Time_F(STOP); | ||
247 | printf("%ld BF_encrypt's in %.2f second\n",count,d); | ||
248 | b=((double)COUNT(cb)*8)/d; | ||
249 | |||
250 | #ifdef SIGALRM | ||
251 | printf("Doing BF_cbc_encrypt on %ld byte blocks for 10 seconds\n", | ||
252 | BUFSIZE); | ||
253 | alarm(10); | ||
254 | #else | ||
255 | printf("Doing BF_cbc_encrypt %ld times on %ld byte blocks\n",cc, | ||
256 | BUFSIZE); | ||
257 | #endif | ||
258 | Time_F(START); | ||
259 | for (count=0,run=1; COND(cc); count++) | ||
260 | BF_cbc_encrypt(buf,buf,BUFSIZE,&sch, | ||
261 | &(key[0]),BF_ENCRYPT); | ||
262 | d=Time_F(STOP); | ||
263 | printf("%ld BF_cbc_encrypt's of %ld byte blocks in %.2f second\n", | ||
264 | count,BUFSIZE,d); | ||
265 | c=((double)COUNT(cc)*BUFSIZE)/d; | ||
266 | |||
267 | printf("Blowfish set_key per sec = %12.3f (%9.3fuS)\n",a,1.0e6/a); | ||
268 | printf("Blowfish raw ecb bytes per sec = %12.3f (%9.3fuS)\n",b,8.0e6/b); | ||
269 | printf("Blowfish cbc bytes per sec = %12.3f (%9.3fuS)\n",c,8.0e6/c); | ||
270 | exit(0); | ||
271 | #if defined(LINT) || defined(OPENSSL_SYS_MSDOS) | ||
272 | return(0); | ||
273 | #endif | ||
274 | } | ||
diff --git a/src/lib/libcrypto/bf/bftest.c b/src/lib/libcrypto/bf/bftest.c new file mode 100644 index 0000000000..24d526b14b --- /dev/null +++ b/src/lib/libcrypto/bf/bftest.c | |||
@@ -0,0 +1,536 @@ | |||
1 | /* crypto/bf/bftest.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 | /* This has been a quickly hacked 'ideatest.c'. When I add tests for other | ||
60 | * RC2 modes, more of the code will be uncommented. */ | ||
61 | |||
62 | #include <stdio.h> | ||
63 | #include <string.h> | ||
64 | #include <stdlib.h> | ||
65 | |||
66 | #include "../e_os.h" | ||
67 | |||
68 | #ifdef OPENSSL_NO_BF | ||
69 | int main(int argc, char *argv[]) | ||
70 | { | ||
71 | printf("No BF support\n"); | ||
72 | return(0); | ||
73 | } | ||
74 | #else | ||
75 | #include <openssl/blowfish.h> | ||
76 | |||
77 | #ifdef CHARSET_EBCDIC | ||
78 | #include <openssl/ebcdic.h> | ||
79 | #endif | ||
80 | |||
81 | static char *bf_key[2]={ | ||
82 | "abcdefghijklmnopqrstuvwxyz", | ||
83 | "Who is John Galt?" | ||
84 | }; | ||
85 | |||
86 | /* big endian */ | ||
87 | static BF_LONG bf_plain[2][2]={ | ||
88 | {0x424c4f57L,0x46495348L}, | ||
89 | {0xfedcba98L,0x76543210L} | ||
90 | }; | ||
91 | |||
92 | static BF_LONG bf_cipher[2][2]={ | ||
93 | {0x324ed0feL,0xf413a203L}, | ||
94 | {0xcc91732bL,0x8022f684L} | ||
95 | }; | ||
96 | /************/ | ||
97 | |||
98 | /* Lets use the DES test vectors :-) */ | ||
99 | #define NUM_TESTS 34 | ||
100 | static unsigned char ecb_data[NUM_TESTS][8]={ | ||
101 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
102 | {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}, | ||
103 | {0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
104 | {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11}, | ||
105 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
106 | {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11}, | ||
107 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
108 | {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}, | ||
109 | {0x7C,0xA1,0x10,0x45,0x4A,0x1A,0x6E,0x57}, | ||
110 | {0x01,0x31,0xD9,0x61,0x9D,0xC1,0x37,0x6E}, | ||
111 | {0x07,0xA1,0x13,0x3E,0x4A,0x0B,0x26,0x86}, | ||
112 | {0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E}, | ||
113 | {0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6}, | ||
114 | {0x01,0x13,0xB9,0x70,0xFD,0x34,0xF2,0xCE}, | ||
115 | {0x01,0x70,0xF1,0x75,0x46,0x8F,0xB5,0xE6}, | ||
116 | {0x43,0x29,0x7F,0xAD,0x38,0xE3,0x73,0xFE}, | ||
117 | {0x07,0xA7,0x13,0x70,0x45,0xDA,0x2A,0x16}, | ||
118 | {0x04,0x68,0x91,0x04,0xC2,0xFD,0x3B,0x2F}, | ||
119 | {0x37,0xD0,0x6B,0xB5,0x16,0xCB,0x75,0x46}, | ||
120 | {0x1F,0x08,0x26,0x0D,0x1A,0xC2,0x46,0x5E}, | ||
121 | {0x58,0x40,0x23,0x64,0x1A,0xBA,0x61,0x76}, | ||
122 | {0x02,0x58,0x16,0x16,0x46,0x29,0xB0,0x07}, | ||
123 | {0x49,0x79,0x3E,0xBC,0x79,0xB3,0x25,0x8F}, | ||
124 | {0x4F,0xB0,0x5E,0x15,0x15,0xAB,0x73,0xA7}, | ||
125 | {0x49,0xE9,0x5D,0x6D,0x4C,0xA2,0x29,0xBF}, | ||
126 | {0x01,0x83,0x10,0xDC,0x40,0x9B,0x26,0xD6}, | ||
127 | {0x1C,0x58,0x7F,0x1C,0x13,0x92,0x4F,0xEF}, | ||
128 | {0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01}, | ||
129 | {0x1F,0x1F,0x1F,0x1F,0x0E,0x0E,0x0E,0x0E}, | ||
130 | {0xE0,0xFE,0xE0,0xFE,0xF1,0xFE,0xF1,0xFE}, | ||
131 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
132 | {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}, | ||
133 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
134 | {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}}; | ||
135 | |||
136 | static unsigned char plain_data[NUM_TESTS][8]={ | ||
137 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
138 | {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}, | ||
139 | {0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x01}, | ||
140 | {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11}, | ||
141 | {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11}, | ||
142 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
143 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
144 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
145 | {0x01,0xA1,0xD6,0xD0,0x39,0x77,0x67,0x42}, | ||
146 | {0x5C,0xD5,0x4C,0xA8,0x3D,0xEF,0x57,0xDA}, | ||
147 | {0x02,0x48,0xD4,0x38,0x06,0xF6,0x71,0x72}, | ||
148 | {0x51,0x45,0x4B,0x58,0x2D,0xDF,0x44,0x0A}, | ||
149 | {0x42,0xFD,0x44,0x30,0x59,0x57,0x7F,0xA2}, | ||
150 | {0x05,0x9B,0x5E,0x08,0x51,0xCF,0x14,0x3A}, | ||
151 | {0x07,0x56,0xD8,0xE0,0x77,0x47,0x61,0xD2}, | ||
152 | {0x76,0x25,0x14,0xB8,0x29,0xBF,0x48,0x6A}, | ||
153 | {0x3B,0xDD,0x11,0x90,0x49,0x37,0x28,0x02}, | ||
154 | {0x26,0x95,0x5F,0x68,0x35,0xAF,0x60,0x9A}, | ||
155 | {0x16,0x4D,0x5E,0x40,0x4F,0x27,0x52,0x32}, | ||
156 | {0x6B,0x05,0x6E,0x18,0x75,0x9F,0x5C,0xCA}, | ||
157 | {0x00,0x4B,0xD6,0xEF,0x09,0x17,0x60,0x62}, | ||
158 | {0x48,0x0D,0x39,0x00,0x6E,0xE7,0x62,0xF2}, | ||
159 | {0x43,0x75,0x40,0xC8,0x69,0x8F,0x3C,0xFA}, | ||
160 | {0x07,0x2D,0x43,0xA0,0x77,0x07,0x52,0x92}, | ||
161 | {0x02,0xFE,0x55,0x77,0x81,0x17,0xF1,0x2A}, | ||
162 | {0x1D,0x9D,0x5C,0x50,0x18,0xF7,0x28,0xC2}, | ||
163 | {0x30,0x55,0x32,0x28,0x6D,0x6F,0x29,0x5A}, | ||
164 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
165 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
166 | {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}, | ||
167 | {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}, | ||
168 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
169 | {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}, | ||
170 | {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}}; | ||
171 | |||
172 | static unsigned char cipher_data[NUM_TESTS][8]={ | ||
173 | {0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78}, | ||
174 | {0x51,0x86,0x6F,0xD5,0xB8,0x5E,0xCB,0x8A}, | ||
175 | {0x7D,0x85,0x6F,0x9A,0x61,0x30,0x63,0xF2}, | ||
176 | {0x24,0x66,0xDD,0x87,0x8B,0x96,0x3C,0x9D}, | ||
177 | {0x61,0xF9,0xC3,0x80,0x22,0x81,0xB0,0x96}, | ||
178 | {0x7D,0x0C,0xC6,0x30,0xAF,0xDA,0x1E,0xC7}, | ||
179 | {0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78}, | ||
180 | {0x0A,0xCE,0xAB,0x0F,0xC6,0xA0,0xA2,0x8D}, | ||
181 | {0x59,0xC6,0x82,0x45,0xEB,0x05,0x28,0x2B}, | ||
182 | {0xB1,0xB8,0xCC,0x0B,0x25,0x0F,0x09,0xA0}, | ||
183 | {0x17,0x30,0xE5,0x77,0x8B,0xEA,0x1D,0xA4}, | ||
184 | {0xA2,0x5E,0x78,0x56,0xCF,0x26,0x51,0xEB}, | ||
185 | {0x35,0x38,0x82,0xB1,0x09,0xCE,0x8F,0x1A}, | ||
186 | {0x48,0xF4,0xD0,0x88,0x4C,0x37,0x99,0x18}, | ||
187 | {0x43,0x21,0x93,0xB7,0x89,0x51,0xFC,0x98}, | ||
188 | {0x13,0xF0,0x41,0x54,0xD6,0x9D,0x1A,0xE5}, | ||
189 | {0x2E,0xED,0xDA,0x93,0xFF,0xD3,0x9C,0x79}, | ||
190 | {0xD8,0x87,0xE0,0x39,0x3C,0x2D,0xA6,0xE3}, | ||
191 | {0x5F,0x99,0xD0,0x4F,0x5B,0x16,0x39,0x69}, | ||
192 | {0x4A,0x05,0x7A,0x3B,0x24,0xD3,0x97,0x7B}, | ||
193 | {0x45,0x20,0x31,0xC1,0xE4,0xFA,0xDA,0x8E}, | ||
194 | {0x75,0x55,0xAE,0x39,0xF5,0x9B,0x87,0xBD}, | ||
195 | {0x53,0xC5,0x5F,0x9C,0xB4,0x9F,0xC0,0x19}, | ||
196 | {0x7A,0x8E,0x7B,0xFA,0x93,0x7E,0x89,0xA3}, | ||
197 | {0xCF,0x9C,0x5D,0x7A,0x49,0x86,0xAD,0xB5}, | ||
198 | {0xD1,0xAB,0xB2,0x90,0x65,0x8B,0xC7,0x78}, | ||
199 | {0x55,0xCB,0x37,0x74,0xD1,0x3E,0xF2,0x01}, | ||
200 | {0xFA,0x34,0xEC,0x48,0x47,0xB2,0x68,0xB2}, | ||
201 | {0xA7,0x90,0x79,0x51,0x08,0xEA,0x3C,0xAE}, | ||
202 | {0xC3,0x9E,0x07,0x2D,0x9F,0xAC,0x63,0x1D}, | ||
203 | {0x01,0x49,0x33,0xE0,0xCD,0xAF,0xF6,0xE4}, | ||
204 | {0xF2,0x1E,0x9A,0x77,0xB7,0x1C,0x49,0xBC}, | ||
205 | {0x24,0x59,0x46,0x88,0x57,0x54,0x36,0x9A}, | ||
206 | {0x6B,0x5C,0x5A,0x9C,0x5D,0x9E,0x0A,0x5A}, | ||
207 | }; | ||
208 | |||
209 | static unsigned char cbc_key [16]={ | ||
210 | 0x01,0x23,0x45,0x67,0x89,0xab,0xcd,0xef, | ||
211 | 0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87}; | ||
212 | static unsigned char cbc_iv [8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10}; | ||
213 | static char cbc_data[40]="7654321 Now is the time for "; | ||
214 | static unsigned char cbc_ok[32]={ | ||
215 | 0x6B,0x77,0xB4,0xD6,0x30,0x06,0xDE,0xE6, | ||
216 | 0x05,0xB1,0x56,0xE2,0x74,0x03,0x97,0x93, | ||
217 | 0x58,0xDE,0xB9,0xE7,0x15,0x46,0x16,0xD9, | ||
218 | 0x59,0xF1,0x65,0x2B,0xD5,0xFF,0x92,0xCC}; | ||
219 | |||
220 | static unsigned char cfb64_ok[]={ | ||
221 | 0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA, | ||
222 | 0xF2,0x6E,0xCF,0x6D,0x2E,0xB9,0xE7,0x6E, | ||
223 | 0x3D,0xA3,0xDE,0x04,0xD1,0x51,0x72,0x00, | ||
224 | 0x51,0x9D,0x57,0xA6,0xC3}; | ||
225 | |||
226 | static unsigned char ofb64_ok[]={ | ||
227 | 0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA, | ||
228 | 0x62,0xB3,0x43,0xCC,0x5B,0x65,0x58,0x73, | ||
229 | 0x10,0xDD,0x90,0x8D,0x0C,0x24,0x1B,0x22, | ||
230 | 0x63,0xC2,0xCF,0x80,0xDA}; | ||
231 | |||
232 | #define KEY_TEST_NUM 25 | ||
233 | static unsigned char key_test[KEY_TEST_NUM]={ | ||
234 | 0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87, | ||
235 | 0x78,0x69,0x5a,0x4b,0x3c,0x2d,0x1e,0x0f, | ||
236 | 0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77, | ||
237 | 0x88}; | ||
238 | |||
239 | static unsigned char key_data[8]= | ||
240 | {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}; | ||
241 | |||
242 | static unsigned char key_out[KEY_TEST_NUM][8]={ | ||
243 | {0xF9,0xAD,0x59,0x7C,0x49,0xDB,0x00,0x5E}, | ||
244 | {0xE9,0x1D,0x21,0xC1,0xD9,0x61,0xA6,0xD6}, | ||
245 | {0xE9,0xC2,0xB7,0x0A,0x1B,0xC6,0x5C,0xF3}, | ||
246 | {0xBE,0x1E,0x63,0x94,0x08,0x64,0x0F,0x05}, | ||
247 | {0xB3,0x9E,0x44,0x48,0x1B,0xDB,0x1E,0x6E}, | ||
248 | {0x94,0x57,0xAA,0x83,0xB1,0x92,0x8C,0x0D}, | ||
249 | {0x8B,0xB7,0x70,0x32,0xF9,0x60,0x62,0x9D}, | ||
250 | {0xE8,0x7A,0x24,0x4E,0x2C,0xC8,0x5E,0x82}, | ||
251 | {0x15,0x75,0x0E,0x7A,0x4F,0x4E,0xC5,0x77}, | ||
252 | {0x12,0x2B,0xA7,0x0B,0x3A,0xB6,0x4A,0xE0}, | ||
253 | {0x3A,0x83,0x3C,0x9A,0xFF,0xC5,0x37,0xF6}, | ||
254 | {0x94,0x09,0xDA,0x87,0xA9,0x0F,0x6B,0xF2}, | ||
255 | {0x88,0x4F,0x80,0x62,0x50,0x60,0xB8,0xB4}, | ||
256 | {0x1F,0x85,0x03,0x1C,0x19,0xE1,0x19,0x68}, | ||
257 | {0x79,0xD9,0x37,0x3A,0x71,0x4C,0xA3,0x4F}, | ||
258 | {0x93,0x14,0x28,0x87,0xEE,0x3B,0xE1,0x5C}, | ||
259 | {0x03,0x42,0x9E,0x83,0x8C,0xE2,0xD1,0x4B}, | ||
260 | {0xA4,0x29,0x9E,0x27,0x46,0x9F,0xF6,0x7B}, | ||
261 | {0xAF,0xD5,0xAE,0xD1,0xC1,0xBC,0x96,0xA8}, | ||
262 | {0x10,0x85,0x1C,0x0E,0x38,0x58,0xDA,0x9F}, | ||
263 | {0xE6,0xF5,0x1E,0xD7,0x9B,0x9D,0xB2,0x1F}, | ||
264 | {0x64,0xA6,0xE1,0x4A,0xFD,0x36,0xB4,0x6F}, | ||
265 | {0x80,0xC7,0xD7,0xD4,0x5A,0x54,0x79,0xAD}, | ||
266 | {0x05,0x04,0x4B,0x62,0xFA,0x52,0xD0,0x80}, | ||
267 | }; | ||
268 | |||
269 | static int test(void ); | ||
270 | static int print_test_data(void ); | ||
271 | int main(int argc, char *argv[]) | ||
272 | { | ||
273 | int ret; | ||
274 | |||
275 | if (argc > 1) | ||
276 | ret=print_test_data(); | ||
277 | else | ||
278 | ret=test(); | ||
279 | |||
280 | EXIT(ret); | ||
281 | return(0); | ||
282 | } | ||
283 | |||
284 | static int print_test_data(void) | ||
285 | { | ||
286 | unsigned int i,j; | ||
287 | |||
288 | printf("ecb test data\n"); | ||
289 | printf("key bytes\t\tclear bytes\t\tcipher bytes\n"); | ||
290 | for (i=0; i<NUM_TESTS; i++) | ||
291 | { | ||
292 | for (j=0; j<8; j++) | ||
293 | printf("%02X",ecb_data[i][j]); | ||
294 | printf("\t"); | ||
295 | for (j=0; j<8; j++) | ||
296 | printf("%02X",plain_data[i][j]); | ||
297 | printf("\t"); | ||
298 | for (j=0; j<8; j++) | ||
299 | printf("%02X",cipher_data[i][j]); | ||
300 | printf("\n"); | ||
301 | } | ||
302 | |||
303 | printf("set_key test data\n"); | ||
304 | printf("data[8]= "); | ||
305 | for (j=0; j<8; j++) | ||
306 | printf("%02X",key_data[j]); | ||
307 | printf("\n"); | ||
308 | for (i=0; i<KEY_TEST_NUM-1; i++) | ||
309 | { | ||
310 | printf("c="); | ||
311 | for (j=0; j<8; j++) | ||
312 | printf("%02X",key_out[i][j]); | ||
313 | printf(" k[%2u]=",i+1); | ||
314 | for (j=0; j<i+1; j++) | ||
315 | printf("%02X",key_test[j]); | ||
316 | printf("\n"); | ||
317 | } | ||
318 | |||
319 | printf("\nchaining mode test data\n"); | ||
320 | printf("key[16] = "); | ||
321 | for (j=0; j<16; j++) | ||
322 | printf("%02X",cbc_key[j]); | ||
323 | printf("\niv[8] = "); | ||
324 | for (j=0; j<8; j++) | ||
325 | printf("%02X",cbc_iv[j]); | ||
326 | printf("\ndata[%d] = '%s'",(int)strlen(cbc_data)+1,cbc_data); | ||
327 | printf("\ndata[%d] = ",(int)strlen(cbc_data)+1); | ||
328 | for (j=0; j<strlen(cbc_data)+1; j++) | ||
329 | printf("%02X",cbc_data[j]); | ||
330 | printf("\n"); | ||
331 | printf("cbc cipher text\n"); | ||
332 | printf("cipher[%d]= ",32); | ||
333 | for (j=0; j<32; j++) | ||
334 | printf("%02X",cbc_ok[j]); | ||
335 | printf("\n"); | ||
336 | |||
337 | printf("cfb64 cipher text\n"); | ||
338 | printf("cipher[%d]= ",(int)strlen(cbc_data)+1); | ||
339 | for (j=0; j<strlen(cbc_data)+1; j++) | ||
340 | printf("%02X",cfb64_ok[j]); | ||
341 | printf("\n"); | ||
342 | |||
343 | printf("ofb64 cipher text\n"); | ||
344 | printf("cipher[%d]= ",(int)strlen(cbc_data)+1); | ||
345 | for (j=0; j<strlen(cbc_data)+1; j++) | ||
346 | printf("%02X",ofb64_ok[j]); | ||
347 | printf("\n"); | ||
348 | return(0); | ||
349 | } | ||
350 | |||
351 | static int test(void) | ||
352 | { | ||
353 | unsigned char cbc_in[40],cbc_out[40],iv[8]; | ||
354 | int i,n,err=0; | ||
355 | BF_KEY key; | ||
356 | BF_LONG data[2]; | ||
357 | unsigned char out[8]; | ||
358 | BF_LONG len; | ||
359 | |||
360 | #ifdef CHARSET_EBCDIC | ||
361 | ebcdic2ascii(cbc_data, cbc_data, strlen(cbc_data)); | ||
362 | #endif | ||
363 | |||
364 | printf("testing blowfish in raw ecb mode\n"); | ||
365 | for (n=0; n<2; n++) | ||
366 | { | ||
367 | #ifdef CHARSET_EBCDIC | ||
368 | ebcdic2ascii(bf_key[n], bf_key[n], strlen(bf_key[n])); | ||
369 | #endif | ||
370 | BF_set_key(&key,strlen(bf_key[n]),(unsigned char *)bf_key[n]); | ||
371 | |||
372 | data[0]=bf_plain[n][0]; | ||
373 | data[1]=bf_plain[n][1]; | ||
374 | BF_encrypt(data,&key); | ||
375 | if (memcmp(&(bf_cipher[n][0]),&(data[0]),8) != 0) | ||
376 | { | ||
377 | printf("BF_encrypt error encrypting\n"); | ||
378 | printf("got :"); | ||
379 | for (i=0; i<2; i++) | ||
380 | printf("%08lX ",(unsigned long)data[i]); | ||
381 | printf("\n"); | ||
382 | printf("expected:"); | ||
383 | for (i=0; i<2; i++) | ||
384 | printf("%08lX ",(unsigned long)bf_cipher[n][i]); | ||
385 | err=1; | ||
386 | printf("\n"); | ||
387 | } | ||
388 | |||
389 | BF_decrypt(&(data[0]),&key); | ||
390 | if (memcmp(&(bf_plain[n][0]),&(data[0]),8) != 0) | ||
391 | { | ||
392 | printf("BF_encrypt error decrypting\n"); | ||
393 | printf("got :"); | ||
394 | for (i=0; i<2; i++) | ||
395 | printf("%08lX ",(unsigned long)data[i]); | ||
396 | printf("\n"); | ||
397 | printf("expected:"); | ||
398 | for (i=0; i<2; i++) | ||
399 | printf("%08lX ",(unsigned long)bf_plain[n][i]); | ||
400 | printf("\n"); | ||
401 | err=1; | ||
402 | } | ||
403 | } | ||
404 | |||
405 | printf("testing blowfish in ecb mode\n"); | ||
406 | |||
407 | for (n=0; n<NUM_TESTS; n++) | ||
408 | { | ||
409 | BF_set_key(&key,8,ecb_data[n]); | ||
410 | |||
411 | BF_ecb_encrypt(&(plain_data[n][0]),out,&key,BF_ENCRYPT); | ||
412 | if (memcmp(&(cipher_data[n][0]),out,8) != 0) | ||
413 | { | ||
414 | printf("BF_ecb_encrypt blowfish error encrypting\n"); | ||
415 | printf("got :"); | ||
416 | for (i=0; i<8; i++) | ||
417 | printf("%02X ",out[i]); | ||
418 | printf("\n"); | ||
419 | printf("expected:"); | ||
420 | for (i=0; i<8; i++) | ||
421 | printf("%02X ",cipher_data[n][i]); | ||
422 | err=1; | ||
423 | printf("\n"); | ||
424 | } | ||
425 | |||
426 | BF_ecb_encrypt(out,out,&key,BF_DECRYPT); | ||
427 | if (memcmp(&(plain_data[n][0]),out,8) != 0) | ||
428 | { | ||
429 | printf("BF_ecb_encrypt error decrypting\n"); | ||
430 | printf("got :"); | ||
431 | for (i=0; i<8; i++) | ||
432 | printf("%02X ",out[i]); | ||
433 | printf("\n"); | ||
434 | printf("expected:"); | ||
435 | for (i=0; i<8; i++) | ||
436 | printf("%02X ",plain_data[n][i]); | ||
437 | printf("\n"); | ||
438 | err=1; | ||
439 | } | ||
440 | } | ||
441 | |||
442 | printf("testing blowfish set_key\n"); | ||
443 | for (n=1; n<KEY_TEST_NUM; n++) | ||
444 | { | ||
445 | BF_set_key(&key,n,key_test); | ||
446 | BF_ecb_encrypt(key_data,out,&key,BF_ENCRYPT); | ||
447 | /* mips-sgi-irix6.5-gcc vv -mabi=64 bug workaround */ | ||
448 | if (memcmp(out,&(key_out[i=n-1][0]),8) != 0) | ||
449 | { | ||
450 | printf("blowfish setkey error\n"); | ||
451 | err=1; | ||
452 | } | ||
453 | } | ||
454 | |||
455 | printf("testing blowfish in cbc mode\n"); | ||
456 | len=strlen(cbc_data)+1; | ||
457 | |||
458 | BF_set_key(&key,16,cbc_key); | ||
459 | memset(cbc_in,0,sizeof cbc_in); | ||
460 | memset(cbc_out,0,sizeof cbc_out); | ||
461 | memcpy(iv,cbc_iv,sizeof iv); | ||
462 | BF_cbc_encrypt((unsigned char *)cbc_data,cbc_out,len, | ||
463 | &key,iv,BF_ENCRYPT); | ||
464 | if (memcmp(cbc_out,cbc_ok,32) != 0) | ||
465 | { | ||
466 | err=1; | ||
467 | printf("BF_cbc_encrypt encrypt error\n"); | ||
468 | for (i=0; i<32; i++) printf("0x%02X,",cbc_out[i]); | ||
469 | } | ||
470 | memcpy(iv,cbc_iv,8); | ||
471 | BF_cbc_encrypt(cbc_out,cbc_in,len, | ||
472 | &key,iv,BF_DECRYPT); | ||
473 | if (memcmp(cbc_in,cbc_data,strlen(cbc_data)+1) != 0) | ||
474 | { | ||
475 | printf("BF_cbc_encrypt decrypt error\n"); | ||
476 | err=1; | ||
477 | } | ||
478 | |||
479 | printf("testing blowfish in cfb64 mode\n"); | ||
480 | |||
481 | BF_set_key(&key,16,cbc_key); | ||
482 | memset(cbc_in,0,40); | ||
483 | memset(cbc_out,0,40); | ||
484 | memcpy(iv,cbc_iv,8); | ||
485 | n=0; | ||
486 | BF_cfb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13, | ||
487 | &key,iv,&n,BF_ENCRYPT); | ||
488 | BF_cfb64_encrypt((unsigned char *)&(cbc_data[13]),&(cbc_out[13]),len-13, | ||
489 | &key,iv,&n,BF_ENCRYPT); | ||
490 | if (memcmp(cbc_out,cfb64_ok,(int)len) != 0) | ||
491 | { | ||
492 | err=1; | ||
493 | printf("BF_cfb64_encrypt encrypt error\n"); | ||
494 | for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]); | ||
495 | } | ||
496 | n=0; | ||
497 | memcpy(iv,cbc_iv,8); | ||
498 | BF_cfb64_encrypt(cbc_out,cbc_in,17, | ||
499 | &key,iv,&n,BF_DECRYPT); | ||
500 | BF_cfb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17, | ||
501 | &key,iv,&n,BF_DECRYPT); | ||
502 | if (memcmp(cbc_in,cbc_data,(int)len) != 0) | ||
503 | { | ||
504 | printf("BF_cfb64_encrypt decrypt error\n"); | ||
505 | err=1; | ||
506 | } | ||
507 | |||
508 | printf("testing blowfish in ofb64\n"); | ||
509 | |||
510 | BF_set_key(&key,16,cbc_key); | ||
511 | memset(cbc_in,0,40); | ||
512 | memset(cbc_out,0,40); | ||
513 | memcpy(iv,cbc_iv,8); | ||
514 | n=0; | ||
515 | BF_ofb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,&key,iv,&n); | ||
516 | BF_ofb64_encrypt((unsigned char *)&(cbc_data[13]), | ||
517 | &(cbc_out[13]),len-13,&key,iv,&n); | ||
518 | if (memcmp(cbc_out,ofb64_ok,(int)len) != 0) | ||
519 | { | ||
520 | err=1; | ||
521 | printf("BF_ofb64_encrypt encrypt error\n"); | ||
522 | for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]); | ||
523 | } | ||
524 | n=0; | ||
525 | memcpy(iv,cbc_iv,8); | ||
526 | BF_ofb64_encrypt(cbc_out,cbc_in,17,&key,iv,&n); | ||
527 | BF_ofb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,&key,iv,&n); | ||
528 | if (memcmp(cbc_in,cbc_data,(int)len) != 0) | ||
529 | { | ||
530 | printf("BF_ofb64_encrypt decrypt error\n"); | ||
531 | err=1; | ||
532 | } | ||
533 | |||
534 | return(err); | ||
535 | } | ||
536 | #endif | ||