summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/bf
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libcrypto/bf')
-rw-r--r--src/lib/libcrypto/bf/Makefile116
-rw-r--r--src/lib/libcrypto/bf/Makefile.ssl115
-rw-r--r--src/lib/libcrypto/bf/asm/bf-586.pl2
-rw-r--r--src/lib/libcrypto/bf/asm/bf-686.pl127
-rw-r--r--src/lib/libcrypto/bf/asm/readme10
-rw-r--r--src/lib/libcrypto/bf/bf_opts.c328
-rw-r--r--src/lib/libcrypto/bf/bf_skey.c1
-rw-r--r--src/lib/libcrypto/bf/bfs.cpp67
-rw-r--r--src/lib/libcrypto/bf/bfspeed.c274
-rw-r--r--src/lib/libcrypto/bf/bftest.c536
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
5DIR= bf
6TOP= ../..
7CC= cc
8CPP= $(CC) -E
9INCLUDES=
10CFLAG=-g
11INSTALL_PREFIX=
12OPENSSLDIR= /usr/local/ssl
13INSTALLTOP=/usr/local/ssl
14MAKEDEPPROG= makedepend
15MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG)
16MAKEFILE= Makefile
17AR= ar r
18
19BF_ENC= bf_enc.o
20# or use
21#DES_ENC= bx86-elf.o
22
23CFLAGS= $(INCLUDES) $(CFLAG)
24ASFLAGS= $(INCLUDES) $(ASFLAG)
25
26GENERAL=Makefile
27TEST=bftest.c
28APPS=
29
30LIB=$(TOP)/libcrypto.a
31LIBSRC=bf_skey.c bf_ecb.c bf_enc.c bf_cfb64.c bf_ofb64.c
32LIBOBJ=bf_skey.o bf_ecb.o $(BF_ENC) bf_cfb64.o bf_ofb64.o
33
34SRC= $(LIBSRC)
35
36EXHEADER= blowfish.h
37HEADER= bf_pi.h bf_locl.h $(EXHEADER)
38
39ALL= $(GENERAL) $(SRC) $(HEADER)
40
41top:
42 (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all)
43
44all: lib
45
46lib: $(LIBOBJ)
47 $(AR) $(LIB) $(LIBOBJ)
48 $(RANLIB) $(LIB) || echo Never mind.
49 @touch lib
50
51# elf
52asm/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
56asm/bx86-out.o: asm/bx86unix.cpp
57 $(CPP) -DOUT asm/bx86unix.cpp | as -o asm/bx86-out.o
58
59# bsdi
60asm/bx86bsdi.o: asm/bx86unix.cpp
61 $(CPP) -DBSDI asm/bx86unix.cpp | sed 's/ :/:/' | as -o asm/bx86bsdi.o
62
63asm/bx86unix.cpp: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl
64 (cd asm; $(PERL) bf-586.pl cpp $(PROCESSOR) >bx86unix.cpp)
65
66files:
67 $(PERL) $(TOP)/util/files.pl Makefile >> $(TOP)/MINFO
68
69links:
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
74install: installs
75
76installs:
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
83tags:
84 ctags $(SRC)
85
86tests:
87
88lint:
89 lint -DLINT $(INCLUDES) $(SRC)>fluff
90
91depend:
92 $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC)
93
94dclean:
95 $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new
96 mv -f Makefile.new $(MAKEFILE)
97
98clean:
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
103bf_cfb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
104bf_cfb64.o: ../../include/openssl/opensslconf.h bf_cfb64.c bf_locl.h
105bf_ecb.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
106bf_ecb.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h
107bf_ecb.o: bf_ecb.c bf_locl.h
108bf_enc.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
109bf_enc.o: ../../include/openssl/opensslconf.h bf_enc.c bf_locl.h
110bf_ofb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
111bf_ofb64.o: ../../include/openssl/opensslconf.h bf_locl.h bf_ofb64.c
112bf_skey.o: ../../include/openssl/blowfish.h ../../include/openssl/crypto.h
113bf_skey.o: ../../include/openssl/e_os2.h ../../include/openssl/fips.h
114bf_skey.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h
115bf_skey.o: ../../include/openssl/safestack.h ../../include/openssl/stack.h
116bf_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
5DIR= bf
6TOP= ../..
7CC= cc
8CPP= $(CC) -E
9INCLUDES=
10CFLAG=-g
11INSTALL_PREFIX=
12OPENSSLDIR= /usr/local/ssl
13INSTALLTOP=/usr/local/ssl
14MAKE= make -f Makefile.ssl
15MAKEDEPPROG= makedepend
16MAKEDEPEND= $(TOP)/util/domd $(TOP) -MD $(MAKEDEPPROG)
17MAKEFILE= Makefile.ssl
18AR= ar r
19
20BF_ENC= bf_enc.o
21# or use
22#DES_ENC= bx86-elf.o
23
24CFLAGS= $(INCLUDES) $(CFLAG)
25ASFLAGS= $(INCLUDES) $(ASFLAG)
26
27GENERAL=Makefile
28TEST=bftest.c
29APPS=
30
31LIB=$(TOP)/libcrypto.a
32LIBSRC=bf_skey.c bf_ecb.c bf_enc.c bf_cfb64.c bf_ofb64.c
33LIBOBJ=bf_skey.o bf_ecb.o $(BF_ENC) bf_cfb64.o bf_ofb64.o
34
35SRC= $(LIBSRC)
36
37EXHEADER= blowfish.h
38HEADER= bf_pi.h bf_locl.h $(EXHEADER)
39
40ALL= $(GENERAL) $(SRC) $(HEADER)
41
42top:
43 (cd ../..; $(MAKE) DIRS=crypto SDIRS=$(DIR) sub_all)
44
45all: lib
46
47lib: $(LIBOBJ)
48 $(AR) $(LIB) $(LIBOBJ)
49 $(RANLIB) $(LIB) || echo Never mind.
50 @touch lib
51
52# elf
53asm/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
57asm/bx86-out.o: asm/bx86unix.cpp
58 $(CPP) -DOUT asm/bx86unix.cpp | as -o asm/bx86-out.o
59
60# bsdi
61asm/bx86bsdi.o: asm/bx86unix.cpp
62 $(CPP) -DBSDI asm/bx86unix.cpp | sed 's/ :/:/' | as -o asm/bx86bsdi.o
63
64asm/bx86unix.cpp: asm/bf-586.pl ../perlasm/x86asm.pl ../perlasm/cbc.pl
65 (cd asm; $(PERL) bf-586.pl cpp $(PROCESSOR) >bx86unix.cpp)
66
67files:
68 $(PERL) $(TOP)/util/files.pl Makefile.ssl >> $(TOP)/MINFO
69
70links:
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
76install: installs
77
78installs:
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
85tags:
86 ctags $(SRC)
87
88tests:
89
90lint:
91 lint -DLINT $(INCLUDES) $(SRC)>fluff
92
93depend:
94 $(MAKEDEPEND) -- $(CFLAG) $(INCLUDES) $(DEPFLAG) -- $(PROGS) $(LIBSRC)
95
96dclean:
97 $(PERL) -pe 'if (/^# DO NOT DELETE THIS LINE/) {print; exit(0);}' $(MAKEFILE) >Makefile.new
98 mv -f Makefile.new $(MAKEFILE)
99
100clean:
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
105bf_cfb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
106bf_cfb64.o: ../../include/openssl/opensslconf.h bf_cfb64.c bf_locl.h
107bf_ecb.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
108bf_ecb.o: ../../include/openssl/opensslconf.h ../../include/openssl/opensslv.h
109bf_ecb.o: bf_ecb.c bf_locl.h
110bf_enc.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
111bf_enc.o: ../../include/openssl/opensslconf.h bf_enc.c bf_locl.h
112bf_ofb64.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
113bf_ofb64.o: ../../include/openssl/opensslconf.h bf_locl.h bf_ofb64.c
114bf_skey.o: ../../include/openssl/blowfish.h ../../include/openssl/e_os2.h
115bf_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
24sub BF_encrypt 24sub 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
3push(@INC,"perlasm","../../perlasm");
4require "x86asm.pl";
5require "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
27sub 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
91sub 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
123sub 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 @@
1There are blowfish assembler generation scripts.
2bf-586.pl version is for the pentium and
3bf-686.pl is my original version, which is faster on the pentium pro.
4
5When using a bf-586.pl, the pentium pro/II is %8 slower than using
6bf-686.pl. When using a bf-686.pl, the pentium is %16 slower
7than bf-586.pl
8
9So 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
70OPENSSL_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)
138long run=0;
139
140double 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
148SIGRETTYPE sig_done(int sig);
149SIGRETTYPE 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
162double 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
223int 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__)
10void GetTSC(unsigned long&);
11#pragma aux GetTSC = 0x0f 0x31 "mov [edi], eax" parm [edi] modify [edx eax];
12#elif defined(__GNUC__)
13inline
14void 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)
22inline
23void 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
37void 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
70OPENSSL_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)
111long run=0;
112
113double 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
121SIGRETTYPE sig_done(int sig);
122SIGRETTYPE 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
135double 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
171int 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
69int 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
81static char *bf_key[2]={
82 "abcdefghijklmnopqrstuvwxyz",
83 "Who is John Galt?"
84 };
85
86/* big endian */
87static BF_LONG bf_plain[2][2]={
88 {0x424c4f57L,0x46495348L},
89 {0xfedcba98L,0x76543210L}
90 };
91
92static 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
100static 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
136static 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
172static 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
209static unsigned char cbc_key [16]={
210 0x01,0x23,0x45,0x67,0x89,0xab,0xcd,0xef,
211 0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87};
212static unsigned char cbc_iv [8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10};
213static char cbc_data[40]="7654321 Now is the time for ";
214static 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
220static 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
226static 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
233static 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
239static unsigned char key_data[8]=
240 {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10};
241
242static 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
269static int test(void );
270static int print_test_data(void );
271int 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
284static 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
351static 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