1 /* apps/speed.c -*- mode:C; c-file-style: "eay" -*- */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
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.
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).
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.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
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)"
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
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.]
58 /* ====================================================================
59 * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.
61 * Portions of the attached software ("Contribution") are developed by
62 * SUN MICROSYSTEMS, INC., and are contributed to the OpenSSL project.
64 * The Contribution is licensed pursuant to the OpenSSL open source
65 * license provided above.
67 * The ECDH and ECDSA speed test software is originally written by
68 * Sumit Gupta of Sun Microsystems Laboratories.
72 /* most of this code has been pilfered from my libdes speed.c program */
74 #ifndef OPENSSL_NO_SPEED
78 #define RSA_SECONDS 10
79 #define DSA_SECONDS 10
80 #define ECDSA_SECONDS 10
81 #define ECDH_SECONDS 10
83 /* 11-Sep-92 Andrew Daviel Support for Silicon Graphics IRIX added */
84 /* 06-Apr-92 Luke Brennan Support for VMS and add extra signal calls */
87 #define PROG speed_main
95 #ifdef OPENSSL_NO_STDIO
98 #include <openssl/crypto.h>
99 #include <openssl/rand.h>
100 #include <openssl/err.h>
101 #include <openssl/evp.h>
102 #include <openssl/objects.h>
103 #if !defined(OPENSSL_SYS_MSDOS)
104 #include OPENSSL_UNISTD
107 #ifndef OPENSSL_SYS_NETWARE
111 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(OPENSSL_SYS_MACOSX)
113 #elif !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VXWORKS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC))
116 #if !defined(_UNICOS) && !defined(__OpenBSD__) && !defined(sgi) && !defined(__FreeBSD__) && !(defined(__bsdi) || defined(__bsdi__)) && !defined(_AIX) && !defined(OPENSSL_SYS_MPE) && !defined(__NetBSD__) && !defined(OPENSSL_SYS_VXWORKS) /* FIXME */
120 #if defined(OPENSSL_SYS_NETWARE)
130 # include <sys/types.h>
131 # include <sys/times.h>
134 # include <sys/time.h>
135 # include <sys/resource.h>
138 /* Depending on the VMS version, the tms structure is perhaps defined.
139 The __TMS macro will show if it was. If it wasn't defined, we should
140 undefine TIMES, since that tells the rest of the program how things
141 should be handled. -- Richard Levitte */
142 #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
147 #include <sys/timeb.h>
150 #if !defined(TIMES) && !defined(TIMEB) && !defined(USE_TOD) && !defined(OPENSSL_SYS_VXWORKS) && !defined(OPENSSL_SYS_NETWARE)
151 #error "It seems neither struct tms nor struct timeb is supported in this platform!"
154 #if defined(sun) || defined(__ultrix)
155 #define _POSIX_SOURCE
157 #include <sys/param.h>
160 #include <openssl/bn.h>
161 #ifndef OPENSSL_NO_DES
162 #include <openssl/des.h>
164 #ifndef OPENSSL_NO_AES
165 #include <openssl/aes.h>
167 #ifndef OPENSSL_NO_CAMELLIA
168 #include <openssl/camellia.h>
170 #ifndef OPENSSL_NO_MD2
171 #include <openssl/md2.h>
173 #ifndef OPENSSL_NO_MDC2
174 #include <openssl/mdc2.h>
176 #ifndef OPENSSL_NO_MD4
177 #include <openssl/md4.h>
179 #ifndef OPENSSL_NO_MD5
180 #include <openssl/md5.h>
182 #ifndef OPENSSL_NO_HMAC
183 #include <openssl/hmac.h>
185 #include <openssl/evp.h>
186 #ifndef OPENSSL_NO_SHA
187 #include <openssl/sha.h>
189 #ifndef OPENSSL_NO_RIPEMD
190 #include <openssl/ripemd.h>
192 #ifndef OPENSSL_NO_RC4
193 #include <openssl/rc4.h>
195 #ifndef OPENSSL_NO_RC5
196 #include <openssl/rc5.h>
198 #ifndef OPENSSL_NO_RC2
199 #include <openssl/rc2.h>
201 #ifndef OPENSSL_NO_IDEA
202 #include <openssl/idea.h>
204 #ifndef OPENSSL_NO_SEED
205 #include <openssl/seed.h>
207 #ifndef OPENSSL_NO_BF
208 #include <openssl/blowfish.h>
210 #ifndef OPENSSL_NO_CAST
211 #include <openssl/cast.h>
213 #ifndef OPENSSL_NO_RSA
214 #include <openssl/rsa.h>
215 #include "./testrsa.h"
217 #include <openssl/x509.h>
218 #ifndef OPENSSL_NO_DSA
219 #include <openssl/dsa.h>
220 #include "./testdsa.h"
222 #ifndef OPENSSL_NO_ECDSA
223 #include <openssl/ecdsa.h>
225 #ifndef OPENSSL_NO_ECDH
226 #include <openssl/ecdh.h>
230 * The following "HZ" timing stuff should be sync'd up with the code in
231 * crypto/tmdiff.[ch]. That appears to try to do the same job, though I think
232 * this code is more up to date than libcrypto's so there may be features to
233 * migrate over first. This is used in two places further down AFAICS.
234 * The point is that nothing in openssl actually *uses* that tmdiff stuff, so
235 * either speed.c should be using it or it should go because it's obviously not
236 * useful enough. Anyone want to do a janitorial job on this?
239 /* The following if from times(3) man page. It may need to be changed */
241 # if defined(_SC_CLK_TCK) \
242 && (!defined(OPENSSL_SYS_VMS) || __CTRL_VER >= 70000000)
243 # define HZ sysconf(_SC_CLK_TCK)
246 # ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
248 # else /* _BSD_CLK_TCK_ */
249 # define HZ ((double)_BSD_CLK_TCK_)
252 # define HZ ((double)CLK_TCK)
257 #if defined(OPENSSL_SYS_VMS) || defined(OPENSSL_SYS_WINDOWS) || defined(OPENSSL_SYS_MACINTOSH_CLASSIC) || defined(OPENSSL_SYS_OS2) || defined(OPENSSL_SYS_NETWARE)
266 #define BUFSIZE ((long)1024*8+1)
269 static char ftime_used = 0, times_used = 0, gettimeofday_used = 0, getrusage_used = 0;
271 static int usertime=1;
273 static double Time_F(int s);
274 static void print_message(const char *s,long num,int length);
275 static void pkey_print_message(const char *str, const char *str2,
276 long num, int bits, int sec);
277 static void print_result(int alg,int run_no,int count,double time_used);
279 static int do_multi(int multi);
288 #define MAX_ECDH_SIZE 256
290 static const char *names[ALGOR_NUM]={
291 "md2","mdc2","md4","md5","hmac(md5)","sha1","rmd160","rc4",
292 "des cbc","des ede3","idea cbc","seed cbc",
293 "rc2 cbc","rc5-32/12 cbc","blowfish cbc","cast cbc",
294 "aes-128 cbc","aes-192 cbc","aes-256 cbc",
295 "camellia-128 cbc","camellia-192 cbc","camellia-256 cbc",
296 "evp","sha256","sha512",
297 "aes-128 ige","aes-192 ige","aes-256 ige"};
298 static double results[ALGOR_NUM][SIZE_NUM];
299 static int lengths[SIZE_NUM]={16,64,256,1024,8*1024};
300 #ifndef OPENSSL_NO_RSA
301 static double rsa_results[RSA_NUM][2];
303 #ifndef OPENSSL_NO_DSA
304 static double dsa_results[DSA_NUM][2];
306 #ifndef OPENSSL_NO_ECDSA
307 static double ecdsa_results[EC_NUM][2];
309 #ifndef OPENSSL_NO_ECDH
310 static double ecdh_results[EC_NUM][1];
313 #if defined(OPENSSL_NO_DSA) && !(defined(OPENSSL_NO_ECDSA) && defined(OPENSSL_NO_ECDH))
314 static const char rnd_seed[] = "string to make the random number generator think it has entropy";
315 static int rnd_fake = 0;
319 #if defined(__STDC__) || defined(sgi) || defined(_AIX)
320 #define SIGRETTYPE void
322 #define SIGRETTYPE int
325 static SIGRETTYPE sig_done(int sig);
326 static SIGRETTYPE sig_done(int sig)
328 signal(SIGALRM,sig_done);
339 #if defined(OPENSSL_SYS_NETWARE)
341 /* for NetWare the best we can do is use clock() which returns the
342 * time, in hundredths of a second, since the NLM began executing
344 static double Time_F(int s)
348 static clock_t tstart,tend;
358 ret=(double)((double)(tend)-(double)(tstart));
359 return((ret < 0.001)?0.001:ret);
365 static double Time_F(int s)
372 static struct rusage tstart,tend;
377 getrusage(RUSAGE_SELF,&tstart);
384 getrusage(RUSAGE_SELF,&tend);
385 i=(long)tend.ru_utime.tv_usec-(long)tstart.ru_utime.tv_usec;
386 ret=((double)(tend.ru_utime.tv_sec-tstart.ru_utime.tv_sec))
387 +((double)i)/1000000.0;
388 return((ret < 0.001)?0.001:ret);
393 static struct timeval tstart,tend;
396 gettimeofday_used = 1;
399 gettimeofday(&tstart,NULL);
404 gettimeofday(&tend,NULL);
405 i=(long)tend.tv_usec-(long)tstart.tv_usec;
406 ret=((double)(tend.tv_sec-tstart.tv_sec))+((double)i)/1000000.0;
407 return((ret < 0.001)?0.001:ret);
410 #else /* ndef USE_TOD */
415 static struct tms tstart,tend;
427 ret=(double)(tend.tms_utime-tstart.tms_utime) / ret;
428 return((ret < 1e-3)?1e-3:ret);
431 # endif /* times() */
432 # if defined(TIMES) && defined(TIMEB)
435 # ifdef OPENSSL_SYS_VXWORKS
437 static unsigned long tick_start, tick_end;
441 tick_start = tickGet();
446 tick_end = tickGet();
447 ret = (double)(tick_end - tick_start) / (double)sysClkRateGet();
448 return((ret < 0.001)?0.001:ret);
451 # elif defined(TIMEB)
453 static struct timeb tstart,tend;
465 i=(long)tend.millitm-(long)tstart.millitm;
466 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
467 return((ret < 0.001)?0.001:ret);
473 #endif /* if defined(OPENSSL_SYS_NETWARE) */
476 #ifndef OPENSSL_NO_ECDH
477 static const int KDF1_SHA1_len = 20;
478 static void *KDF1_SHA1(const void *in, size_t inlen, void *out, size_t *outlen)
480 #ifndef OPENSSL_NO_SHA
481 if (*outlen < SHA_DIGEST_LENGTH)
484 *outlen = SHA_DIGEST_LENGTH;
485 return SHA1(in, inlen, out);
488 #endif /* OPENSSL_NO_SHA */
490 #endif /* OPENSSL_NO_ECDH */
493 int MAIN(int, char **);
495 int MAIN(int argc, char **argv)
497 #ifndef OPENSSL_NO_ENGINE
500 unsigned char *buf=NULL,*buf2=NULL;
502 long count=0,save_count=0;
504 #if !defined(OPENSSL_NO_RSA) || !defined(OPENSSL_NO_DSA)
507 #ifndef OPENSSL_NO_RSA
510 unsigned char md[EVP_MAX_MD_SIZE];
511 #ifndef OPENSSL_NO_MD2
512 unsigned char md2[MD2_DIGEST_LENGTH];
514 #ifndef OPENSSL_NO_MDC2
515 unsigned char mdc2[MDC2_DIGEST_LENGTH];
517 #ifndef OPENSSL_NO_MD4
518 unsigned char md4[MD4_DIGEST_LENGTH];
520 #ifndef OPENSSL_NO_MD5
521 unsigned char md5[MD5_DIGEST_LENGTH];
522 unsigned char hmac[MD5_DIGEST_LENGTH];
524 #ifndef OPENSSL_NO_SHA
525 unsigned char sha[SHA_DIGEST_LENGTH];
526 #ifndef OPENSSL_NO_SHA256
527 unsigned char sha256[SHA256_DIGEST_LENGTH];
529 #ifndef OPENSSL_NO_SHA512
530 unsigned char sha512[SHA512_DIGEST_LENGTH];
533 #ifndef OPENSSL_NO_RIPEMD
534 unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
536 #ifndef OPENSSL_NO_RC4
539 #ifndef OPENSSL_NO_RC5
542 #ifndef OPENSSL_NO_RC2
545 #ifndef OPENSSL_NO_IDEA
546 IDEA_KEY_SCHEDULE idea_ks;
548 #ifndef OPENSSL_NO_SEED
549 SEED_KEY_SCHEDULE seed_ks;
551 #ifndef OPENSSL_NO_BF
554 #ifndef OPENSSL_NO_CAST
557 static const unsigned char key16[16]=
558 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
559 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
560 #ifndef OPENSSL_NO_AES
561 static const unsigned char key24[24]=
562 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
563 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
564 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
565 static const unsigned char key32[32]=
566 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
567 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
568 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
569 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
571 #ifndef OPENSSL_NO_CAMELLIA
572 static const unsigned char ckey24[24]=
573 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
574 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
575 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
576 static const unsigned char ckey32[32]=
577 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
578 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
579 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
580 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
582 #ifndef OPENSSL_NO_AES
583 #define MAX_BLOCK_SIZE 128
585 #define MAX_BLOCK_SIZE 64
587 unsigned char DES_iv[8];
588 unsigned char iv[2*MAX_BLOCK_SIZE/8];
589 #ifndef OPENSSL_NO_DES
590 DES_cblock *buf_as_des_cblock = NULL;
591 static DES_cblock key ={0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
592 static DES_cblock key2={0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
593 static DES_cblock key3={0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
594 DES_key_schedule sch;
595 DES_key_schedule sch2;
596 DES_key_schedule sch3;
598 #ifndef OPENSSL_NO_AES
599 AES_KEY aes_ks1, aes_ks2, aes_ks3;
601 #ifndef OPENSSL_NO_CAMELLIA
602 CAMELLIA_KEY camellia_ks1, camellia_ks2, camellia_ks3;
614 #define D_CBC_IDEA 10
615 #define D_CBC_SEED 11
619 #define D_CBC_CAST 15
620 #define D_CBC_128_AES 16
621 #define D_CBC_192_AES 17
622 #define D_CBC_256_AES 18
623 #define D_CBC_128_CML 19
624 #define D_CBC_192_CML 20
625 #define D_CBC_256_CML 21
629 #define D_IGE_128_AES 25
630 #define D_IGE_192_AES 26
631 #define D_IGE_256_AES 27
633 long c[ALGOR_NUM][SIZE_NUM];
659 #ifndef OPENSSL_NO_RSA
660 RSA *rsa_key[RSA_NUM];
661 long rsa_c[RSA_NUM][2];
662 static unsigned int rsa_bits[RSA_NUM]={512,1024,2048,4096};
663 static unsigned char *rsa_data[RSA_NUM]=
664 {test512,test1024,test2048,test4096};
665 static int rsa_data_length[RSA_NUM]={
666 sizeof(test512),sizeof(test1024),
667 sizeof(test2048),sizeof(test4096)};
669 #ifndef OPENSSL_NO_DSA
670 DSA *dsa_key[DSA_NUM];
671 long dsa_c[DSA_NUM][2];
672 static unsigned int dsa_bits[DSA_NUM]={512,1024,2048};
674 #ifndef OPENSSL_NO_EC
675 /* We only test over the following curves as they are representative,
676 * To add tests over more curves, simply add the curve NID
677 * and curve name to the following arrays and increase the
678 * EC_NUM value accordingly.
680 static unsigned int test_curves[EC_NUM] =
684 NID_X9_62_prime192v1,
686 NID_X9_62_prime256v1,
701 static const char * test_curves_names[EC_NUM] =
722 static int test_curves_bits[EC_NUM] =
724 160, 192, 224, 256, 384, 521,
725 163, 233, 283, 409, 571,
726 163, 233, 283, 409, 571
731 #ifndef OPENSSL_NO_ECDSA
732 unsigned char ecdsasig[256];
733 unsigned int ecdsasiglen;
734 EC_KEY *ecdsa[EC_NUM];
735 long ecdsa_c[EC_NUM][2];
738 #ifndef OPENSSL_NO_ECDH
739 EC_KEY *ecdh_a[EC_NUM], *ecdh_b[EC_NUM];
740 unsigned char secret_a[MAX_ECDH_SIZE], secret_b[MAX_ECDH_SIZE];
741 int secret_size_a, secret_size_b;
744 long ecdh_c[EC_NUM][2];
747 int rsa_doit[RSA_NUM];
748 int dsa_doit[DSA_NUM];
749 #ifndef OPENSSL_NO_ECDSA
750 int ecdsa_doit[EC_NUM];
752 #ifndef OPENSSL_NO_ECDH
753 int ecdh_doit[EC_NUM];
757 const EVP_CIPHER *evp_cipher=NULL;
758 const EVP_MD *evp_md=NULL;
769 memset(results, 0, sizeof(results));
770 #ifndef OPENSSL_NO_DSA
771 memset(dsa_key,0,sizeof(dsa_key));
773 #ifndef OPENSSL_NO_ECDSA
774 for (i=0; i<EC_NUM; i++) ecdsa[i] = NULL;
776 #ifndef OPENSSL_NO_ECDH
777 for (i=0; i<EC_NUM; i++)
786 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
787 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
789 if (!load_config(bio_err, NULL))
792 #ifndef OPENSSL_NO_RSA
793 memset(rsa_key,0,sizeof(rsa_key));
794 for (i=0; i<RSA_NUM; i++)
798 if ((buf=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
800 BIO_printf(bio_err,"out of memory\n");
803 #ifndef OPENSSL_NO_DES
804 buf_as_des_cblock = (DES_cblock *)buf;
806 if ((buf2=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
808 BIO_printf(bio_err,"out of memory\n");
812 memset(c,0,sizeof(c));
813 memset(DES_iv,0,sizeof(DES_iv));
814 memset(iv,0,sizeof(iv));
816 for (i=0; i<ALGOR_NUM; i++)
818 for (i=0; i<RSA_NUM; i++)
820 for (i=0; i<DSA_NUM; i++)
822 #ifndef OPENSSL_NO_ECDSA
823 for (i=0; i<EC_NUM; i++)
826 #ifndef OPENSSL_NO_ECDH
827 for (i=0; i<EC_NUM; i++)
837 if ((argc > 0) && (strcmp(*argv,"-elapsed") == 0))
840 j--; /* Otherwise, -elapsed gets confused with
843 else if ((argc > 0) && (strcmp(*argv,"-evp") == 0))
849 BIO_printf(bio_err,"no EVP given\n");
852 evp_cipher=EVP_get_cipherbyname(*argv);
855 evp_md=EVP_get_digestbyname(*argv);
857 if(!evp_cipher && !evp_md)
859 BIO_printf(bio_err,"%s is an unknown cipher or digest\n",*argv);
864 else if (argc > 0 && !strcmp(*argv,"-decrypt"))
867 j--; /* Otherwise, -elapsed gets confused with
870 #ifndef OPENSSL_NO_ENGINE
871 else if ((argc > 0) && (strcmp(*argv,"-engine") == 0))
877 BIO_printf(bio_err,"no engine given\n");
880 e = setup_engine(bio_err, *argv, 0);
881 /* j will be increased again further down. We just
882 don't want speed to confuse an engine with an
883 algorithm, especially when none is given (which
884 means all of them should be run) */
889 else if ((argc > 0) && (strcmp(*argv,"-multi") == 0))
895 BIO_printf(bio_err,"no multi count given\n");
901 BIO_printf(bio_err,"bad multi count\n");
904 j--; /* Otherwise, -mr gets confused with
908 else if (argc > 0 && !strcmp(*argv,"-mr"))
911 j--; /* Otherwise, -mr gets confused with
915 #ifndef OPENSSL_NO_MD2
916 if (strcmp(*argv,"md2") == 0) doit[D_MD2]=1;
919 #ifndef OPENSSL_NO_MDC2
920 if (strcmp(*argv,"mdc2") == 0) doit[D_MDC2]=1;
923 #ifndef OPENSSL_NO_MD4
924 if (strcmp(*argv,"md4") == 0) doit[D_MD4]=1;
927 #ifndef OPENSSL_NO_MD5
928 if (strcmp(*argv,"md5") == 0) doit[D_MD5]=1;
931 #ifndef OPENSSL_NO_MD5
932 if (strcmp(*argv,"hmac") == 0) doit[D_HMAC]=1;
935 #ifndef OPENSSL_NO_SHA
936 if (strcmp(*argv,"sha1") == 0) doit[D_SHA1]=1;
938 if (strcmp(*argv,"sha") == 0) doit[D_SHA1]=1,
942 #ifndef OPENSSL_NO_SHA256
943 if (strcmp(*argv,"sha256") == 0) doit[D_SHA256]=1;
946 #ifndef OPENSSL_NO_SHA512
947 if (strcmp(*argv,"sha512") == 0) doit[D_SHA512]=1;
951 #ifndef OPENSSL_NO_RIPEMD
952 if (strcmp(*argv,"ripemd") == 0) doit[D_RMD160]=1;
954 if (strcmp(*argv,"rmd160") == 0) doit[D_RMD160]=1;
956 if (strcmp(*argv,"ripemd160") == 0) doit[D_RMD160]=1;
959 #ifndef OPENSSL_NO_RC4
960 if (strcmp(*argv,"rc4") == 0) doit[D_RC4]=1;
963 #ifndef OPENSSL_NO_DES
964 if (strcmp(*argv,"des-cbc") == 0) doit[D_CBC_DES]=1;
965 else if (strcmp(*argv,"des-ede3") == 0) doit[D_EDE3_DES]=1;
968 #ifndef OPENSSL_NO_AES
969 if (strcmp(*argv,"aes-128-cbc") == 0) doit[D_CBC_128_AES]=1;
970 else if (strcmp(*argv,"aes-192-cbc") == 0) doit[D_CBC_192_AES]=1;
971 else if (strcmp(*argv,"aes-256-cbc") == 0) doit[D_CBC_256_AES]=1;
972 else if (strcmp(*argv,"aes-128-ige") == 0) doit[D_IGE_128_AES]=1;
973 else if (strcmp(*argv,"aes-192-ige") == 0) doit[D_IGE_192_AES]=1;
974 else if (strcmp(*argv,"aes-256-ige") == 0) doit[D_IGE_256_AES]=1;
977 #ifndef OPENSSL_NO_CAMELLIA
978 if (strcmp(*argv,"camellia-128-cbc") == 0) doit[D_CBC_128_CML]=1;
979 else if (strcmp(*argv,"camellia-192-cbc") == 0) doit[D_CBC_192_CML]=1;
980 else if (strcmp(*argv,"camellia-256-cbc") == 0) doit[D_CBC_256_CML]=1;
983 #ifndef OPENSSL_NO_RSA
984 #if 0 /* was: #ifdef RSAref */
985 if (strcmp(*argv,"rsaref") == 0)
987 RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
993 if (strcmp(*argv,"openssl") == 0)
995 RSA_set_default_method(RSA_PKCS1_SSLeay());
1000 #endif /* !OPENSSL_NO_RSA */
1001 if (strcmp(*argv,"dsa512") == 0) dsa_doit[R_DSA_512]=2;
1002 else if (strcmp(*argv,"dsa1024") == 0) dsa_doit[R_DSA_1024]=2;
1003 else if (strcmp(*argv,"dsa2048") == 0) dsa_doit[R_DSA_2048]=2;
1004 else if (strcmp(*argv,"rsa512") == 0) rsa_doit[R_RSA_512]=2;
1005 else if (strcmp(*argv,"rsa1024") == 0) rsa_doit[R_RSA_1024]=2;
1006 else if (strcmp(*argv,"rsa2048") == 0) rsa_doit[R_RSA_2048]=2;
1007 else if (strcmp(*argv,"rsa4096") == 0) rsa_doit[R_RSA_4096]=2;
1009 #ifndef OPENSSL_NO_RC2
1010 if (strcmp(*argv,"rc2-cbc") == 0) doit[D_CBC_RC2]=1;
1011 else if (strcmp(*argv,"rc2") == 0) doit[D_CBC_RC2]=1;
1014 #ifndef OPENSSL_NO_RC5
1015 if (strcmp(*argv,"rc5-cbc") == 0) doit[D_CBC_RC5]=1;
1016 else if (strcmp(*argv,"rc5") == 0) doit[D_CBC_RC5]=1;
1019 #ifndef OPENSSL_NO_IDEA
1020 if (strcmp(*argv,"idea-cbc") == 0) doit[D_CBC_IDEA]=1;
1021 else if (strcmp(*argv,"idea") == 0) doit[D_CBC_IDEA]=1;
1024 #ifndef OPENSSL_NO_SEED
1025 if (strcmp(*argv,"seed-cbc") == 0) doit[D_CBC_SEED]=1;
1026 else if (strcmp(*argv,"seed") == 0) doit[D_CBC_SEED]=1;
1029 #ifndef OPENSSL_NO_BF
1030 if (strcmp(*argv,"bf-cbc") == 0) doit[D_CBC_BF]=1;
1031 else if (strcmp(*argv,"blowfish") == 0) doit[D_CBC_BF]=1;
1032 else if (strcmp(*argv,"bf") == 0) doit[D_CBC_BF]=1;
1035 #ifndef OPENSSL_NO_CAST
1036 if (strcmp(*argv,"cast-cbc") == 0) doit[D_CBC_CAST]=1;
1037 else if (strcmp(*argv,"cast") == 0) doit[D_CBC_CAST]=1;
1038 else if (strcmp(*argv,"cast5") == 0) doit[D_CBC_CAST]=1;
1041 #ifndef OPENSSL_NO_DES
1042 if (strcmp(*argv,"des") == 0)
1049 #ifndef OPENSSL_NO_AES
1050 if (strcmp(*argv,"aes") == 0)
1052 doit[D_CBC_128_AES]=1;
1053 doit[D_CBC_192_AES]=1;
1054 doit[D_CBC_256_AES]=1;
1058 #ifndef OPENSSL_NO_CAMELLIA
1059 if (strcmp(*argv,"camellia") == 0)
1061 doit[D_CBC_128_CML]=1;
1062 doit[D_CBC_192_CML]=1;
1063 doit[D_CBC_256_CML]=1;
1067 #ifndef OPENSSL_NO_RSA
1068 if (strcmp(*argv,"rsa") == 0)
1070 rsa_doit[R_RSA_512]=1;
1071 rsa_doit[R_RSA_1024]=1;
1072 rsa_doit[R_RSA_2048]=1;
1073 rsa_doit[R_RSA_4096]=1;
1077 #ifndef OPENSSL_NO_DSA
1078 if (strcmp(*argv,"dsa") == 0)
1080 dsa_doit[R_DSA_512]=1;
1081 dsa_doit[R_DSA_1024]=1;
1082 dsa_doit[R_DSA_2048]=1;
1086 #ifndef OPENSSL_NO_ECDSA
1087 if (strcmp(*argv,"ecdsap160") == 0) ecdsa_doit[R_EC_P160]=2;
1088 else if (strcmp(*argv,"ecdsap192") == 0) ecdsa_doit[R_EC_P192]=2;
1089 else if (strcmp(*argv,"ecdsap224") == 0) ecdsa_doit[R_EC_P224]=2;
1090 else if (strcmp(*argv,"ecdsap256") == 0) ecdsa_doit[R_EC_P256]=2;
1091 else if (strcmp(*argv,"ecdsap384") == 0) ecdsa_doit[R_EC_P384]=2;
1092 else if (strcmp(*argv,"ecdsap521") == 0) ecdsa_doit[R_EC_P521]=2;
1093 else if (strcmp(*argv,"ecdsak163") == 0) ecdsa_doit[R_EC_K163]=2;
1094 else if (strcmp(*argv,"ecdsak233") == 0) ecdsa_doit[R_EC_K233]=2;
1095 else if (strcmp(*argv,"ecdsak283") == 0) ecdsa_doit[R_EC_K283]=2;
1096 else if (strcmp(*argv,"ecdsak409") == 0) ecdsa_doit[R_EC_K409]=2;
1097 else if (strcmp(*argv,"ecdsak571") == 0) ecdsa_doit[R_EC_K571]=2;
1098 else if (strcmp(*argv,"ecdsab163") == 0) ecdsa_doit[R_EC_B163]=2;
1099 else if (strcmp(*argv,"ecdsab233") == 0) ecdsa_doit[R_EC_B233]=2;
1100 else if (strcmp(*argv,"ecdsab283") == 0) ecdsa_doit[R_EC_B283]=2;
1101 else if (strcmp(*argv,"ecdsab409") == 0) ecdsa_doit[R_EC_B409]=2;
1102 else if (strcmp(*argv,"ecdsab571") == 0) ecdsa_doit[R_EC_B571]=2;
1103 else if (strcmp(*argv,"ecdsa") == 0)
1105 for (i=0; i < EC_NUM; i++)
1110 #ifndef OPENSSL_NO_ECDH
1111 if (strcmp(*argv,"ecdhp160") == 0) ecdh_doit[R_EC_P160]=2;
1112 else if (strcmp(*argv,"ecdhp192") == 0) ecdh_doit[R_EC_P192]=2;
1113 else if (strcmp(*argv,"ecdhp224") == 0) ecdh_doit[R_EC_P224]=2;
1114 else if (strcmp(*argv,"ecdhp256") == 0) ecdh_doit[R_EC_P256]=2;
1115 else if (strcmp(*argv,"ecdhp384") == 0) ecdh_doit[R_EC_P384]=2;
1116 else if (strcmp(*argv,"ecdhp521") == 0) ecdh_doit[R_EC_P521]=2;
1117 else if (strcmp(*argv,"ecdhk163") == 0) ecdh_doit[R_EC_K163]=2;
1118 else if (strcmp(*argv,"ecdhk233") == 0) ecdh_doit[R_EC_K233]=2;
1119 else if (strcmp(*argv,"ecdhk283") == 0) ecdh_doit[R_EC_K283]=2;
1120 else if (strcmp(*argv,"ecdhk409") == 0) ecdh_doit[R_EC_K409]=2;
1121 else if (strcmp(*argv,"ecdhk571") == 0) ecdh_doit[R_EC_K571]=2;
1122 else if (strcmp(*argv,"ecdhb163") == 0) ecdh_doit[R_EC_B163]=2;
1123 else if (strcmp(*argv,"ecdhb233") == 0) ecdh_doit[R_EC_B233]=2;
1124 else if (strcmp(*argv,"ecdhb283") == 0) ecdh_doit[R_EC_B283]=2;
1125 else if (strcmp(*argv,"ecdhb409") == 0) ecdh_doit[R_EC_B409]=2;
1126 else if (strcmp(*argv,"ecdhb571") == 0) ecdh_doit[R_EC_B571]=2;
1127 else if (strcmp(*argv,"ecdh") == 0)
1129 for (i=0; i < EC_NUM; i++)
1135 BIO_printf(bio_err,"Error: bad option or value\n");
1136 BIO_printf(bio_err,"\n");
1137 BIO_printf(bio_err,"Available values:\n");
1138 #ifndef OPENSSL_NO_MD2
1139 BIO_printf(bio_err,"md2 ");
1141 #ifndef OPENSSL_NO_MDC2
1142 BIO_printf(bio_err,"mdc2 ");
1144 #ifndef OPENSSL_NO_MD4
1145 BIO_printf(bio_err,"md4 ");
1147 #ifndef OPENSSL_NO_MD5
1148 BIO_printf(bio_err,"md5 ");
1149 #ifndef OPENSSL_NO_HMAC
1150 BIO_printf(bio_err,"hmac ");
1153 #ifndef OPENSSL_NO_SHA1
1154 BIO_printf(bio_err,"sha1 ");
1156 #ifndef OPENSSL_NO_SHA256
1157 BIO_printf(bio_err,"sha256 ");
1159 #ifndef OPENSSL_NO_SHA512
1160 BIO_printf(bio_err,"sha512 ");
1162 #ifndef OPENSSL_NO_RIPEMD160
1163 BIO_printf(bio_err,"rmd160");
1165 #if !defined(OPENSSL_NO_MD2) || !defined(OPENSSL_NO_MDC2) || \
1166 !defined(OPENSSL_NO_MD4) || !defined(OPENSSL_NO_MD5) || \
1167 !defined(OPENSSL_NO_SHA1) || !defined(OPENSSL_NO_RIPEMD160)
1168 BIO_printf(bio_err,"\n");
1171 #ifndef OPENSSL_NO_IDEA
1172 BIO_printf(bio_err,"idea-cbc ");
1174 #ifndef OPENSSL_NO_SEED
1175 BIO_printf(bio_err,"seed-cbc ");
1177 #ifndef OPENSSL_NO_RC2
1178 BIO_printf(bio_err,"rc2-cbc ");
1180 #ifndef OPENSSL_NO_RC5
1181 BIO_printf(bio_err,"rc5-cbc ");
1183 #ifndef OPENSSL_NO_BF
1184 BIO_printf(bio_err,"bf-cbc");
1186 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_SEED) || !defined(OPENSSL_NO_RC2) || \
1187 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_RC5)
1188 BIO_printf(bio_err,"\n");
1190 #ifndef OPENSSL_NO_DES
1191 BIO_printf(bio_err,"des-cbc des-ede3 ");
1193 #ifndef OPENSSL_NO_AES
1194 BIO_printf(bio_err,"aes-128-cbc aes-192-cbc aes-256-cbc ");
1195 BIO_printf(bio_err,"aes-128-ige aes-192-ige aes-256-ige ");
1197 #ifndef OPENSSL_NO_CAMELLIA
1198 BIO_printf(bio_err,"\n");
1199 BIO_printf(bio_err,"camellia-128-cbc camellia-192-cbc camellia-256-cbc ");
1201 #ifndef OPENSSL_NO_RC4
1202 BIO_printf(bio_err,"rc4");
1204 BIO_printf(bio_err,"\n");
1206 #ifndef OPENSSL_NO_RSA
1207 BIO_printf(bio_err,"rsa512 rsa1024 rsa2048 rsa4096\n");
1210 #ifndef OPENSSL_NO_DSA
1211 BIO_printf(bio_err,"dsa512 dsa1024 dsa2048\n");
1213 #ifndef OPENSSL_NO_ECDSA
1214 BIO_printf(bio_err,"ecdsap160 ecdsap192 ecdsap224 ecdsap256 ecdsap384 ecdsap521\n");
1215 BIO_printf(bio_err,"ecdsak163 ecdsak233 ecdsak283 ecdsak409 ecdsak571\n");
1216 BIO_printf(bio_err,"ecdsab163 ecdsab233 ecdsab283 ecdsab409 ecdsab571\n");
1217 BIO_printf(bio_err,"ecdsa\n");
1219 #ifndef OPENSSL_NO_ECDH
1220 BIO_printf(bio_err,"ecdhp160 ecdhp192 ecdhp224 ecdhp256 ecdhp384 ecdhp521\n");
1221 BIO_printf(bio_err,"ecdhk163 ecdhk233 ecdhk283 ecdhk409 ecdhk571\n");
1222 BIO_printf(bio_err,"ecdhb163 ecdhb233 ecdhb283 ecdhb409 ecdhb571\n");
1223 BIO_printf(bio_err,"ecdh\n");
1226 #ifndef OPENSSL_NO_IDEA
1227 BIO_printf(bio_err,"idea ");
1229 #ifndef OPENSSL_NO_SEED
1230 BIO_printf(bio_err,"seed ");
1232 #ifndef OPENSSL_NO_RC2
1233 BIO_printf(bio_err,"rc2 ");
1235 #ifndef OPENSSL_NO_DES
1236 BIO_printf(bio_err,"des ");
1238 #ifndef OPENSSL_NO_AES
1239 BIO_printf(bio_err,"aes ");
1241 #ifndef OPENSSL_NO_CAMELLIA
1242 BIO_printf(bio_err,"camellia ");
1244 #ifndef OPENSSL_NO_RSA
1245 BIO_printf(bio_err,"rsa ");
1247 #ifndef OPENSSL_NO_BF
1248 BIO_printf(bio_err,"blowfish");
1250 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_SEED) || \
1251 !defined(OPENSSL_NO_RC2) || !defined(OPENSSL_NO_DES) || \
1252 !defined(OPENSSL_NO_RSA) || !defined(OPENSSL_NO_BF) || \
1253 !defined(OPENSSL_NO_AES) || !defined(OPENSSL_NO_CAMELLIA)
1254 BIO_printf(bio_err,"\n");
1257 BIO_printf(bio_err,"\n");
1258 BIO_printf(bio_err,"Available options:\n");
1259 #if defined(TIMES) || defined(USE_TOD)
1260 BIO_printf(bio_err,"-elapsed measure time in real time instead of CPU user time.\n");
1262 #ifndef OPENSSL_NO_ENGINE
1263 BIO_printf(bio_err,"-engine e use engine e, possibly a hardware device.\n");
1265 BIO_printf(bio_err,"-evp e use EVP e.\n");
1266 BIO_printf(bio_err,"-decrypt time decryption instead of encryption (only EVP).\n");
1267 BIO_printf(bio_err,"-mr produce machine readable output.\n");
1269 BIO_printf(bio_err,"-multi n run n benchmarks in parallel.\n");
1279 if(multi && do_multi(multi))
1285 for (i=0; i<ALGOR_NUM; i++)
1290 for (i=0; i<RSA_NUM; i++)
1292 for (i=0; i<DSA_NUM; i++)
1295 for (i=0; i<ALGOR_NUM; i++)
1296 if (doit[i]) pr_header++;
1298 if (usertime == 0 && !mr)
1299 BIO_printf(bio_err,"You have chosen to measure elapsed time instead of user CPU time.\n");
1300 if (usertime <= 0 && !mr)
1302 BIO_printf(bio_err,"To get the most accurate results, try to run this\n");
1303 BIO_printf(bio_err,"program when this computer is idle.\n");
1306 #ifndef OPENSSL_NO_RSA
1307 for (i=0; i<RSA_NUM; i++)
1309 const unsigned char *p;
1312 rsa_key[i]=d2i_RSAPrivateKey(NULL,&p,rsa_data_length[i]);
1313 if (rsa_key[i] == NULL)
1315 BIO_printf(bio_err,"internal error loading RSA key number %d\n",i);
1321 BIO_printf(bio_err,mr ? "+RK:%d:"
1322 : "Loaded RSA key, %d bit modulus and e= 0x",
1323 BN_num_bits(rsa_key[i]->n));
1324 BN_print(bio_err,rsa_key[i]->e);
1325 BIO_printf(bio_err,"\n");
1331 #ifndef OPENSSL_NO_DSA
1332 dsa_key[0]=get_dsa512();
1333 dsa_key[1]=get_dsa1024();
1334 dsa_key[2]=get_dsa2048();
1337 #ifndef OPENSSL_NO_DES
1338 DES_set_key_unchecked(&key,&sch);
1339 DES_set_key_unchecked(&key2,&sch2);
1340 DES_set_key_unchecked(&key3,&sch3);
1342 #ifndef OPENSSL_NO_AES
1343 AES_set_encrypt_key(key16,128,&aes_ks1);
1344 AES_set_encrypt_key(key24,192,&aes_ks2);
1345 AES_set_encrypt_key(key32,256,&aes_ks3);
1347 #ifndef OPENSSL_NO_CAMELLIA
1348 Camellia_set_key(key16,128,&camellia_ks1);
1349 Camellia_set_key(ckey24,192,&camellia_ks2);
1350 Camellia_set_key(ckey32,256,&camellia_ks3);
1352 #ifndef OPENSSL_NO_IDEA
1353 idea_set_encrypt_key(key16,&idea_ks);
1355 #ifndef OPENSSL_NO_SEED
1356 SEED_set_key(key16,&seed_ks);
1358 #ifndef OPENSSL_NO_RC4
1359 RC4_set_key(&rc4_ks,16,key16);
1361 #ifndef OPENSSL_NO_RC2
1362 RC2_set_key(&rc2_ks,16,key16,128);
1364 #ifndef OPENSSL_NO_RC5
1365 RC5_32_set_key(&rc5_ks,16,key16,12);
1367 #ifndef OPENSSL_NO_BF
1368 BF_set_key(&bf_ks,16,key16);
1370 #ifndef OPENSSL_NO_CAST
1371 CAST_set_key(&cast_ks,16,key16);
1373 #ifndef OPENSSL_NO_RSA
1374 memset(rsa_c,0,sizeof(rsa_c));
1377 #ifndef OPENSSL_NO_DES
1378 BIO_printf(bio_err,"First we calculate the approximate speed ...\n");
1384 for (it=count; it; it--)
1385 DES_ecb_encrypt(buf_as_des_cblock,buf_as_des_cblock,
1390 c[D_MD2][0]=count/10;
1391 c[D_MDC2][0]=count/10;
1396 c[D_RMD160][0]=count;
1397 c[D_RC4][0]=count*5;
1398 c[D_CBC_DES][0]=count;
1399 c[D_EDE3_DES][0]=count/3;
1400 c[D_CBC_IDEA][0]=count;
1401 c[D_CBC_SEED][0]=count;
1402 c[D_CBC_RC2][0]=count;
1403 c[D_CBC_RC5][0]=count;
1404 c[D_CBC_BF][0]=count;
1405 c[D_CBC_CAST][0]=count;
1406 c[D_CBC_128_AES][0]=count;
1407 c[D_CBC_192_AES][0]=count;
1408 c[D_CBC_256_AES][0]=count;
1409 c[D_CBC_128_CML][0]=count;
1410 c[D_CBC_192_CML][0]=count;
1411 c[D_CBC_256_CML][0]=count;
1412 c[D_SHA256][0]=count;
1413 c[D_SHA512][0]=count;
1414 c[D_IGE_128_AES][0]=count;
1415 c[D_IGE_192_AES][0]=count;
1416 c[D_IGE_256_AES][0]=count;
1418 for (i=1; i<SIZE_NUM; i++)
1420 c[D_MD2][i]=c[D_MD2][0]*4*lengths[0]/lengths[i];
1421 c[D_MDC2][i]=c[D_MDC2][0]*4*lengths[0]/lengths[i];
1422 c[D_MD4][i]=c[D_MD4][0]*4*lengths[0]/lengths[i];
1423 c[D_MD5][i]=c[D_MD5][0]*4*lengths[0]/lengths[i];
1424 c[D_HMAC][i]=c[D_HMAC][0]*4*lengths[0]/lengths[i];
1425 c[D_SHA1][i]=c[D_SHA1][0]*4*lengths[0]/lengths[i];
1426 c[D_RMD160][i]=c[D_RMD160][0]*4*lengths[0]/lengths[i];
1427 c[D_SHA256][i]=c[D_SHA256][0]*4*lengths[0]/lengths[i];
1428 c[D_SHA512][i]=c[D_SHA512][0]*4*lengths[0]/lengths[i];
1430 for (i=1; i<SIZE_NUM; i++)
1434 l0=(long)lengths[i-1];
1435 l1=(long)lengths[i];
1436 c[D_RC4][i]=c[D_RC4][i-1]*l0/l1;
1437 c[D_CBC_DES][i]=c[D_CBC_DES][i-1]*l0/l1;
1438 c[D_EDE3_DES][i]=c[D_EDE3_DES][i-1]*l0/l1;
1439 c[D_CBC_IDEA][i]=c[D_CBC_IDEA][i-1]*l0/l1;
1440 c[D_CBC_SEED][i]=c[D_CBC_SEED][i-1]*l0/l1;
1441 c[D_CBC_RC2][i]=c[D_CBC_RC2][i-1]*l0/l1;
1442 c[D_CBC_RC5][i]=c[D_CBC_RC5][i-1]*l0/l1;
1443 c[D_CBC_BF][i]=c[D_CBC_BF][i-1]*l0/l1;
1444 c[D_CBC_CAST][i]=c[D_CBC_CAST][i-1]*l0/l1;
1445 c[D_CBC_128_AES][i]=c[D_CBC_128_AES][i-1]*l0/l1;
1446 c[D_CBC_192_AES][i]=c[D_CBC_192_AES][i-1]*l0/l1;
1447 c[D_CBC_256_AES][i]=c[D_CBC_256_AES][i-1]*l0/l1;
1448 c[D_CBC_128_CML][i]=c[D_CBC_128_CML][i-1]*l0/l1;
1449 c[D_CBC_192_CML][i]=c[D_CBC_192_CML][i-1]*l0/l1;
1450 c[D_CBC_256_CML][i]=c[D_CBC_256_CML][i-1]*l0/l1;
1451 c[D_IGE_128_AES][i]=c[D_IGE_128_AES][i-1]*l0/l1;
1452 c[D_IGE_192_AES][i]=c[D_IGE_192_AES][i-1]*l0/l1;
1453 c[D_IGE_256_AES][i]=c[D_IGE_256_AES][i-1]*l0/l1;
1455 #ifndef OPENSSL_NO_RSA
1456 rsa_c[R_RSA_512][0]=count/2000;
1457 rsa_c[R_RSA_512][1]=count/400;
1458 for (i=1; i<RSA_NUM; i++)
1460 rsa_c[i][0]=rsa_c[i-1][0]/8;
1461 rsa_c[i][1]=rsa_c[i-1][1]/4;
1462 if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1466 if (rsa_c[i][0] == 0)
1475 #ifndef OPENSSL_NO_DSA
1476 dsa_c[R_DSA_512][0]=count/1000;
1477 dsa_c[R_DSA_512][1]=count/1000/2;
1478 for (i=1; i<DSA_NUM; i++)
1480 dsa_c[i][0]=dsa_c[i-1][0]/4;
1481 dsa_c[i][1]=dsa_c[i-1][1]/4;
1482 if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1495 #ifndef OPENSSL_NO_ECDSA
1496 ecdsa_c[R_EC_P160][0]=count/1000;
1497 ecdsa_c[R_EC_P160][1]=count/1000/2;
1498 for (i=R_EC_P192; i<=R_EC_P521; i++)
1500 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1501 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1502 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1506 if (ecdsa_c[i] == 0)
1513 ecdsa_c[R_EC_K163][0]=count/1000;
1514 ecdsa_c[R_EC_K163][1]=count/1000/2;
1515 for (i=R_EC_K233; i<=R_EC_K571; i++)
1517 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1518 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1519 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1523 if (ecdsa_c[i] == 0)
1530 ecdsa_c[R_EC_B163][0]=count/1000;
1531 ecdsa_c[R_EC_B163][1]=count/1000/2;
1532 for (i=R_EC_B233; i<=R_EC_B571; i++)
1534 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1535 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1536 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1540 if (ecdsa_c[i] == 0)
1549 #ifndef OPENSSL_NO_ECDH
1550 ecdh_c[R_EC_P160][0]=count/1000;
1551 ecdh_c[R_EC_P160][1]=count/1000;
1552 for (i=R_EC_P192; i<=R_EC_P521; i++)
1554 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1555 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1556 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1567 ecdh_c[R_EC_K163][0]=count/1000;
1568 ecdh_c[R_EC_K163][1]=count/1000;
1569 for (i=R_EC_K233; i<=R_EC_K571; i++)
1571 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1572 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1573 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1584 ecdh_c[R_EC_B163][0]=count/1000;
1585 ecdh_c[R_EC_B163][1]=count/1000;
1586 for (i=R_EC_B233; i<=R_EC_B571; i++)
1588 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1589 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1590 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1603 #define COND(d) (count < (d))
1604 #define COUNT(d) (d)
1606 /* not worth fixing */
1607 # error "You cannot disable DES on systems without SIGALRM."
1608 #endif /* OPENSSL_NO_DES */
1610 #define COND(c) (run)
1611 #define COUNT(d) (count)
1612 signal(SIGALRM,sig_done);
1613 #endif /* SIGALRM */
1615 #ifndef OPENSSL_NO_MD2
1618 for (j=0; j<SIZE_NUM; j++)
1620 print_message(names[D_MD2],c[D_MD2][j],lengths[j]);
1622 for (count=0,run=1; COND(c[D_MD2][j]); count++)
1623 EVP_Digest(buf,(unsigned long)lengths[j],&(md2[0]),NULL,EVP_md2(),NULL);
1625 print_result(D_MD2,j,count,d);
1629 #ifndef OPENSSL_NO_MDC2
1632 for (j=0; j<SIZE_NUM; j++)
1634 print_message(names[D_MDC2],c[D_MDC2][j],lengths[j]);
1636 for (count=0,run=1; COND(c[D_MDC2][j]); count++)
1637 EVP_Digest(buf,(unsigned long)lengths[j],&(mdc2[0]),NULL,EVP_mdc2(),NULL);
1639 print_result(D_MDC2,j,count,d);
1644 #ifndef OPENSSL_NO_MD4
1647 for (j=0; j<SIZE_NUM; j++)
1649 print_message(names[D_MD4],c[D_MD4][j],lengths[j]);
1651 for (count=0,run=1; COND(c[D_MD4][j]); count++)
1652 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md4[0]),NULL,EVP_md4(),NULL);
1654 print_result(D_MD4,j,count,d);
1659 #ifndef OPENSSL_NO_MD5
1662 for (j=0; j<SIZE_NUM; j++)
1664 print_message(names[D_MD5],c[D_MD5][j],lengths[j]);
1666 for (count=0,run=1; COND(c[D_MD5][j]); count++)
1667 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md5[0]),NULL,EVP_get_digestbyname("md5"),NULL);
1669 print_result(D_MD5,j,count,d);
1674 #if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
1679 HMAC_CTX_init(&hctx);
1680 HMAC_Init_ex(&hctx,(unsigned char *)"This is a key...",
1681 16,EVP_md5(), NULL);
1683 for (j=0; j<SIZE_NUM; j++)
1685 print_message(names[D_HMAC],c[D_HMAC][j],lengths[j]);
1687 for (count=0,run=1; COND(c[D_HMAC][j]); count++)
1689 HMAC_Init_ex(&hctx,NULL,0,NULL,NULL);
1690 HMAC_Update(&hctx,buf,lengths[j]);
1691 HMAC_Final(&hctx,&(hmac[0]),NULL);
1694 print_result(D_HMAC,j,count,d);
1696 HMAC_CTX_cleanup(&hctx);
1699 #ifndef OPENSSL_NO_SHA
1702 for (j=0; j<SIZE_NUM; j++)
1704 print_message(names[D_SHA1],c[D_SHA1][j],lengths[j]);
1706 for (count=0,run=1; COND(c[D_SHA1][j]); count++)
1707 EVP_Digest(buf,(unsigned long)lengths[j],&(sha[0]),NULL,EVP_sha1(),NULL);
1709 print_result(D_SHA1,j,count,d);
1713 #ifndef OPENSSL_NO_SHA256
1716 for (j=0; j<SIZE_NUM; j++)
1718 print_message(names[D_SHA256],c[D_SHA256][j],lengths[j]);
1720 for (count=0,run=1; COND(c[D_SHA256][j]); count++)
1721 SHA256(buf,lengths[j],sha256);
1723 print_result(D_SHA256,j,count,d);
1728 #ifndef OPENSSL_NO_SHA512
1731 for (j=0; j<SIZE_NUM; j++)
1733 print_message(names[D_SHA512],c[D_SHA512][j],lengths[j]);
1735 for (count=0,run=1; COND(c[D_SHA512][j]); count++)
1736 SHA512(buf,lengths[j],sha512);
1738 print_result(D_SHA512,j,count,d);
1744 #ifndef OPENSSL_NO_RIPEMD
1747 for (j=0; j<SIZE_NUM; j++)
1749 print_message(names[D_RMD160],c[D_RMD160][j],lengths[j]);
1751 for (count=0,run=1; COND(c[D_RMD160][j]); count++)
1752 EVP_Digest(buf,(unsigned long)lengths[j],&(rmd160[0]),NULL,EVP_ripemd160(),NULL);
1754 print_result(D_RMD160,j,count,d);
1758 #ifndef OPENSSL_NO_RC4
1761 for (j=0; j<SIZE_NUM; j++)
1763 print_message(names[D_RC4],c[D_RC4][j],lengths[j]);
1765 for (count=0,run=1; COND(c[D_RC4][j]); count++)
1766 RC4(&rc4_ks,(unsigned int)lengths[j],
1769 print_result(D_RC4,j,count,d);
1773 #ifndef OPENSSL_NO_DES
1774 if (doit[D_CBC_DES])
1776 for (j=0; j<SIZE_NUM; j++)
1778 print_message(names[D_CBC_DES],c[D_CBC_DES][j],lengths[j]);
1780 for (count=0,run=1; COND(c[D_CBC_DES][j]); count++)
1781 DES_ncbc_encrypt(buf,buf,lengths[j],&sch,
1782 &DES_iv,DES_ENCRYPT);
1784 print_result(D_CBC_DES,j,count,d);
1788 if (doit[D_EDE3_DES])
1790 for (j=0; j<SIZE_NUM; j++)
1792 print_message(names[D_EDE3_DES],c[D_EDE3_DES][j],lengths[j]);
1794 for (count=0,run=1; COND(c[D_EDE3_DES][j]); count++)
1795 DES_ede3_cbc_encrypt(buf,buf,lengths[j],
1797 &DES_iv,DES_ENCRYPT);
1799 print_result(D_EDE3_DES,j,count,d);
1803 #ifndef OPENSSL_NO_AES
1804 if (doit[D_CBC_128_AES])
1806 for (j=0; j<SIZE_NUM; j++)
1808 print_message(names[D_CBC_128_AES],c[D_CBC_128_AES][j],lengths[j]);
1810 for (count=0,run=1; COND(c[D_CBC_128_AES][j]); count++)
1811 AES_cbc_encrypt(buf,buf,
1812 (unsigned long)lengths[j],&aes_ks1,
1815 print_result(D_CBC_128_AES,j,count,d);
1818 if (doit[D_CBC_192_AES])
1820 for (j=0; j<SIZE_NUM; j++)
1822 print_message(names[D_CBC_192_AES],c[D_CBC_192_AES][j],lengths[j]);
1824 for (count=0,run=1; COND(c[D_CBC_192_AES][j]); count++)
1825 AES_cbc_encrypt(buf,buf,
1826 (unsigned long)lengths[j],&aes_ks2,
1829 print_result(D_CBC_192_AES,j,count,d);
1832 if (doit[D_CBC_256_AES])
1834 for (j=0; j<SIZE_NUM; j++)
1836 print_message(names[D_CBC_256_AES],c[D_CBC_256_AES][j],lengths[j]);
1838 for (count=0,run=1; COND(c[D_CBC_256_AES][j]); count++)
1839 AES_cbc_encrypt(buf,buf,
1840 (unsigned long)lengths[j],&aes_ks3,
1843 print_result(D_CBC_256_AES,j,count,d);
1847 if (doit[D_IGE_128_AES])
1849 for (j=0; j<SIZE_NUM; j++)
1851 print_message(names[D_IGE_128_AES],c[D_IGE_128_AES][j],lengths[j]);
1853 for (count=0,run=1; COND(c[D_IGE_128_AES][j]); count++)
1854 AES_ige_encrypt(buf,buf2,
1855 (unsigned long)lengths[j],&aes_ks1,
1858 print_result(D_IGE_128_AES,j,count,d);
1861 if (doit[D_IGE_192_AES])
1863 for (j=0; j<SIZE_NUM; j++)
1865 print_message(names[D_IGE_192_AES],c[D_IGE_192_AES][j],lengths[j]);
1867 for (count=0,run=1; COND(c[D_IGE_192_AES][j]); count++)
1868 AES_ige_encrypt(buf,buf2,
1869 (unsigned long)lengths[j],&aes_ks2,
1872 print_result(D_IGE_192_AES,j,count,d);
1875 if (doit[D_IGE_256_AES])
1877 for (j=0; j<SIZE_NUM; j++)
1879 print_message(names[D_IGE_256_AES],c[D_IGE_256_AES][j],lengths[j]);
1881 for (count=0,run=1; COND(c[D_IGE_256_AES][j]); count++)
1882 AES_ige_encrypt(buf,buf2,
1883 (unsigned long)lengths[j],&aes_ks3,
1886 print_result(D_IGE_256_AES,j,count,d);
1890 #ifndef OPENSSL_NO_CAMELLIA
1891 if (doit[D_CBC_128_CML])
1893 for (j=0; j<SIZE_NUM; j++)
1895 print_message(names[D_CBC_128_CML],c[D_CBC_128_CML][j],lengths[j]);
1897 for (count=0,run=1; COND(c[D_CBC_128_CML][j]); count++)
1898 Camellia_cbc_encrypt(buf,buf,
1899 (unsigned long)lengths[j],&camellia_ks1,
1900 iv,CAMELLIA_ENCRYPT);
1902 print_result(D_CBC_128_CML,j,count,d);
1905 if (doit[D_CBC_192_CML])
1907 for (j=0; j<SIZE_NUM; j++)
1909 print_message(names[D_CBC_192_CML],c[D_CBC_192_CML][j],lengths[j]);
1911 for (count=0,run=1; COND(c[D_CBC_192_CML][j]); count++)
1912 Camellia_cbc_encrypt(buf,buf,
1913 (unsigned long)lengths[j],&camellia_ks2,
1914 iv,CAMELLIA_ENCRYPT);
1916 print_result(D_CBC_192_CML,j,count,d);
1919 if (doit[D_CBC_256_CML])
1921 for (j=0; j<SIZE_NUM; j++)
1923 print_message(names[D_CBC_256_CML],c[D_CBC_256_CML][j],lengths[j]);
1925 for (count=0,run=1; COND(c[D_CBC_256_CML][j]); count++)
1926 Camellia_cbc_encrypt(buf,buf,
1927 (unsigned long)lengths[j],&camellia_ks3,
1928 iv,CAMELLIA_ENCRYPT);
1930 print_result(D_CBC_256_CML,j,count,d);
1935 #ifndef OPENSSL_NO_IDEA
1936 if (doit[D_CBC_IDEA])
1938 for (j=0; j<SIZE_NUM; j++)
1940 print_message(names[D_CBC_IDEA],c[D_CBC_IDEA][j],lengths[j]);
1942 for (count=0,run=1; COND(c[D_CBC_IDEA][j]); count++)
1943 idea_cbc_encrypt(buf,buf,
1944 (unsigned long)lengths[j],&idea_ks,
1947 print_result(D_CBC_IDEA,j,count,d);
1951 #ifndef OPENSSL_NO_SEED
1952 if (doit[D_CBC_SEED])
1954 for (j=0; j<SIZE_NUM; j++)
1956 print_message(names[D_CBC_SEED],c[D_CBC_SEED][j],lengths[j]);
1958 for (count=0,run=1; COND(c[D_CBC_SEED][j]); count++)
1959 SEED_cbc_encrypt(buf,buf,
1960 (unsigned long)lengths[j],&seed_ks,iv,1);
1962 print_result(D_CBC_SEED,j,count,d);
1966 #ifndef OPENSSL_NO_RC2
1967 if (doit[D_CBC_RC2])
1969 for (j=0; j<SIZE_NUM; j++)
1971 print_message(names[D_CBC_RC2],c[D_CBC_RC2][j],lengths[j]);
1973 for (count=0,run=1; COND(c[D_CBC_RC2][j]); count++)
1974 RC2_cbc_encrypt(buf,buf,
1975 (unsigned long)lengths[j],&rc2_ks,
1978 print_result(D_CBC_RC2,j,count,d);
1982 #ifndef OPENSSL_NO_RC5
1983 if (doit[D_CBC_RC5])
1985 for (j=0; j<SIZE_NUM; j++)
1987 print_message(names[D_CBC_RC5],c[D_CBC_RC5][j],lengths[j]);
1989 for (count=0,run=1; COND(c[D_CBC_RC5][j]); count++)
1990 RC5_32_cbc_encrypt(buf,buf,
1991 (unsigned long)lengths[j],&rc5_ks,
1994 print_result(D_CBC_RC5,j,count,d);
1998 #ifndef OPENSSL_NO_BF
2001 for (j=0; j<SIZE_NUM; j++)
2003 print_message(names[D_CBC_BF],c[D_CBC_BF][j],lengths[j]);
2005 for (count=0,run=1; COND(c[D_CBC_BF][j]); count++)
2006 BF_cbc_encrypt(buf,buf,
2007 (unsigned long)lengths[j],&bf_ks,
2010 print_result(D_CBC_BF,j,count,d);
2014 #ifndef OPENSSL_NO_CAST
2015 if (doit[D_CBC_CAST])
2017 for (j=0; j<SIZE_NUM; j++)
2019 print_message(names[D_CBC_CAST],c[D_CBC_CAST][j],lengths[j]);
2021 for (count=0,run=1; COND(c[D_CBC_CAST][j]); count++)
2022 CAST_cbc_encrypt(buf,buf,
2023 (unsigned long)lengths[j],&cast_ks,
2026 print_result(D_CBC_CAST,j,count,d);
2033 for (j=0; j<SIZE_NUM; j++)
2040 names[D_EVP]=OBJ_nid2ln(evp_cipher->nid);
2041 /* -O3 -fschedule-insns messes up an
2042 * optimization here! names[D_EVP]
2043 * somehow becomes NULL */
2044 print_message(names[D_EVP],save_count,
2047 EVP_CIPHER_CTX_init(&ctx);
2049 EVP_DecryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
2051 EVP_EncryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
2052 EVP_CIPHER_CTX_set_padding(&ctx, 0);
2056 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
2057 EVP_DecryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
2059 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
2060 EVP_EncryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
2062 EVP_DecryptFinal_ex(&ctx,buf,&outl);
2064 EVP_EncryptFinal_ex(&ctx,buf,&outl);
2066 EVP_CIPHER_CTX_cleanup(&ctx);
2070 names[D_EVP]=OBJ_nid2ln(evp_md->type);
2071 print_message(names[D_EVP],save_count,
2075 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
2076 EVP_Digest(buf,lengths[j],&(md[0]),NULL,evp_md,NULL);
2080 print_result(D_EVP,j,count,d);
2084 RAND_pseudo_bytes(buf,36);
2085 #ifndef OPENSSL_NO_RSA
2086 for (j=0; j<RSA_NUM; j++)
2089 if (!rsa_doit[j]) continue;
2090 ret=RSA_sign(NID_md5_sha1, buf,36, buf2, &rsa_num, rsa_key[j]);
2093 BIO_printf(bio_err,"RSA sign failure. No RSA sign will be done.\n");
2094 ERR_print_errors(bio_err);
2099 pkey_print_message("private","rsa",
2100 rsa_c[j][0],rsa_bits[j],
2102 /* RSA_blinding_on(rsa_key[j],NULL); */
2104 for (count=0,run=1; COND(rsa_c[j][0]); count++)
2106 ret=RSA_sign(NID_md5_sha1, buf,36, buf2,
2107 &rsa_num, rsa_key[j]);
2111 "RSA sign failure\n");
2112 ERR_print_errors(bio_err);
2118 BIO_printf(bio_err,mr ? "+R1:%ld:%d:%.2f\n"
2119 : "%ld %d bit private RSA's in %.2fs\n",
2120 count,rsa_bits[j],d);
2121 rsa_results[j][0]=d/(double)count;
2126 ret=RSA_verify(NID_md5_sha1, buf,36, buf2, rsa_num, rsa_key[j]);
2129 BIO_printf(bio_err,"RSA verify failure. No RSA verify will be done.\n");
2130 ERR_print_errors(bio_err);
2135 pkey_print_message("public","rsa",
2136 rsa_c[j][1],rsa_bits[j],
2139 for (count=0,run=1; COND(rsa_c[j][1]); count++)
2141 ret=RSA_verify(NID_md5_sha1, buf,36, buf2,
2142 rsa_num, rsa_key[j]);
2146 "RSA verify failure\n");
2147 ERR_print_errors(bio_err);
2153 BIO_printf(bio_err,mr ? "+R2:%ld:%d:%.2f\n"
2154 : "%ld %d bit public RSA's in %.2fs\n",
2155 count,rsa_bits[j],d);
2156 rsa_results[j][1]=d/(double)count;
2162 /* if longer than 10s, don't do any more */
2163 for (j++; j<RSA_NUM; j++)
2169 RAND_pseudo_bytes(buf,20);
2170 #ifndef OPENSSL_NO_DSA
2171 if (RAND_status() != 1)
2173 RAND_seed(rnd_seed, sizeof rnd_seed);
2176 for (j=0; j<DSA_NUM; j++)
2181 if (!dsa_doit[j]) continue;
2182 /* DSA_generate_key(dsa_key[j]); */
2183 /* DSA_sign_setup(dsa_key[j],NULL); */
2184 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
2188 BIO_printf(bio_err,"DSA sign failure. No DSA sign will be done.\n");
2189 ERR_print_errors(bio_err);
2194 pkey_print_message("sign","dsa",
2195 dsa_c[j][0],dsa_bits[j],
2198 for (count=0,run=1; COND(dsa_c[j][0]); count++)
2200 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
2205 "DSA sign failure\n");
2206 ERR_print_errors(bio_err);
2212 BIO_printf(bio_err,mr ? "+R3:%ld:%d:%.2f\n"
2213 : "%ld %d bit DSA signs in %.2fs\n",
2214 count,dsa_bits[j],d);
2215 dsa_results[j][0]=d/(double)count;
2219 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
2223 BIO_printf(bio_err,"DSA verify failure. No DSA verify will be done.\n");
2224 ERR_print_errors(bio_err);
2229 pkey_print_message("verify","dsa",
2230 dsa_c[j][1],dsa_bits[j],
2233 for (count=0,run=1; COND(dsa_c[j][1]); count++)
2235 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
2240 "DSA verify failure\n");
2241 ERR_print_errors(bio_err);
2247 BIO_printf(bio_err,mr ? "+R4:%ld:%d:%.2f\n"
2248 : "%ld %d bit DSA verify in %.2fs\n",
2249 count,dsa_bits[j],d);
2250 dsa_results[j][1]=d/(double)count;
2255 /* if longer than 10s, don't do any more */
2256 for (j++; j<DSA_NUM; j++)
2260 if (rnd_fake) RAND_cleanup();
2263 #ifndef OPENSSL_NO_ECDSA
2264 if (RAND_status() != 1)
2266 RAND_seed(rnd_seed, sizeof rnd_seed);
2269 for (j=0; j<EC_NUM; j++)
2273 if (!ecdsa_doit[j]) continue; /* Ignore Curve */
2274 ecdsa[j] = EC_KEY_new_by_curve_name(test_curves[j]);
2275 if (ecdsa[j] == NULL)
2277 BIO_printf(bio_err,"ECDSA failure.\n");
2278 ERR_print_errors(bio_err);
2284 EC_KEY_precompute_mult(ecdsa[j], NULL);
2286 /* Perform ECDSA signature test */
2287 EC_KEY_generate_key(ecdsa[j]);
2288 ret = ECDSA_sign(0, buf, 20, ecdsasig,
2289 &ecdsasiglen, ecdsa[j]);
2292 BIO_printf(bio_err,"ECDSA sign failure. No ECDSA sign will be done.\n");
2293 ERR_print_errors(bio_err);
2298 pkey_print_message("sign","ecdsa",
2300 test_curves_bits[j],
2304 for (count=0,run=1; COND(ecdsa_c[j][0]);
2307 ret=ECDSA_sign(0, buf, 20,
2308 ecdsasig, &ecdsasiglen,
2312 BIO_printf(bio_err, "ECDSA sign failure\n");
2313 ERR_print_errors(bio_err);
2320 BIO_printf(bio_err, mr ? "+R5:%ld:%d:%.2f\n" :
2321 "%ld %d bit ECDSA signs in %.2fs \n",
2322 count, test_curves_bits[j], d);
2323 ecdsa_results[j][0]=d/(double)count;
2327 /* Perform ECDSA verification test */
2328 ret=ECDSA_verify(0, buf, 20, ecdsasig,
2329 ecdsasiglen, ecdsa[j]);
2332 BIO_printf(bio_err,"ECDSA verify failure. No ECDSA verify will be done.\n");
2333 ERR_print_errors(bio_err);
2338 pkey_print_message("verify","ecdsa",
2340 test_curves_bits[j],
2343 for (count=0,run=1; COND(ecdsa_c[j][1]); count++)
2345 ret=ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen, ecdsa[j]);
2348 BIO_printf(bio_err, "ECDSA verify failure\n");
2349 ERR_print_errors(bio_err);
2355 BIO_printf(bio_err, mr? "+R6:%ld:%d:%.2f\n"
2356 : "%ld %d bit ECDSA verify in %.2fs\n",
2357 count, test_curves_bits[j], d);
2358 ecdsa_results[j][1]=d/(double)count;
2363 /* if longer than 10s, don't do any more */
2364 for (j++; j<EC_NUM; j++)
2369 if (rnd_fake) RAND_cleanup();
2372 #ifndef OPENSSL_NO_ECDH
2373 if (RAND_status() != 1)
2375 RAND_seed(rnd_seed, sizeof rnd_seed);
2378 for (j=0; j<EC_NUM; j++)
2380 if (!ecdh_doit[j]) continue;
2381 ecdh_a[j] = EC_KEY_new_by_curve_name(test_curves[j]);
2382 ecdh_b[j] = EC_KEY_new_by_curve_name(test_curves[j]);
2383 if ((ecdh_a[j] == NULL) || (ecdh_b[j] == NULL))
2385 BIO_printf(bio_err,"ECDH failure.\n");
2386 ERR_print_errors(bio_err);
2391 /* generate two ECDH key pairs */
2392 if (!EC_KEY_generate_key(ecdh_a[j]) ||
2393 !EC_KEY_generate_key(ecdh_b[j]))
2395 BIO_printf(bio_err,"ECDH key generation failure.\n");
2396 ERR_print_errors(bio_err);
2401 /* If field size is not more than 24 octets, then use SHA-1 hash of result;
2402 * otherwise, use result (see section 4.8 of draft-ietf-tls-ecc-03.txt).
2404 int field_size, outlen;
2405 void *(*kdf)(const void *in, size_t inlen, void *out, size_t *xoutlen);
2406 field_size = EC_GROUP_get_degree(EC_KEY_get0_group(ecdh_a[j]));
2407 if (field_size <= 24 * 8)
2409 outlen = KDF1_SHA1_len;
2414 outlen = (field_size+7)/8;
2417 secret_size_a = ECDH_compute_key(secret_a, outlen,
2418 EC_KEY_get0_public_key(ecdh_b[j]),
2420 secret_size_b = ECDH_compute_key(secret_b, outlen,
2421 EC_KEY_get0_public_key(ecdh_a[j]),
2423 if (secret_size_a != secret_size_b)
2428 for (secret_idx = 0;
2429 (secret_idx < secret_size_a)
2430 && (ecdh_checks == 1);
2433 if (secret_a[secret_idx] != secret_b[secret_idx])
2437 if (ecdh_checks == 0)
2439 BIO_printf(bio_err,"ECDH computations don't match.\n");
2440 ERR_print_errors(bio_err);
2444 pkey_print_message("","ecdh",
2446 test_curves_bits[j],
2449 for (count=0,run=1; COND(ecdh_c[j][0]); count++)
2451 ECDH_compute_key(secret_a, outlen,
2452 EC_KEY_get0_public_key(ecdh_b[j]),
2456 BIO_printf(bio_err, mr ? "+R7:%ld:%d:%.2f\n" :"%ld %d-bit ECDH ops in %.2fs\n",
2457 count, test_curves_bits[j], d);
2458 ecdh_results[j][0]=d/(double)count;
2466 /* if longer than 10s, don't do any more */
2467 for (j++; j<EC_NUM; j++)
2471 if (rnd_fake) RAND_cleanup();
2478 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_VERSION));
2479 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_BUILT_ON));
2481 printf("%s ",BN_options());
2482 #ifndef OPENSSL_NO_MD2
2483 printf("%s ",MD2_options());
2485 #ifndef OPENSSL_NO_RC4
2486 printf("%s ",RC4_options());
2488 #ifndef OPENSSL_NO_DES
2489 printf("%s ",DES_options());
2491 #ifndef OPENSSL_NO_AES
2492 printf("%s ",AES_options());
2494 #ifndef OPENSSL_NO_IDEA
2495 printf("%s ",idea_options());
2497 #ifndef OPENSSL_NO_BF
2498 printf("%s ",BF_options());
2500 fprintf(stdout,"\n%s\n",SSLeay_version(SSLEAY_CFLAGS));
2501 printf("available timing options: ");
2512 #define as_string(s) (#s)
2515 printf("HZ=%g", dbl);
2518 printf(" [sysconf value]");
2522 printf("timing function used: %s%s%s%s%s%s%s\n",
2523 (ftime_used ? "ftime" : ""),
2524 (ftime_used + times_used > 1 ? "," : ""),
2525 (times_used ? "times" : ""),
2526 (ftime_used + times_used + gettimeofday_used > 1 ? "," : ""),
2527 (gettimeofday_used ? "gettimeofday" : ""),
2528 (ftime_used + times_used + gettimeofday_used + getrusage_used > 1 ? "," : ""),
2529 (getrusage_used ? "getrusage" : ""));
2535 fprintf(stdout,"+H");
2538 fprintf(stdout,"The 'numbers' are in 1000s of bytes per second processed.\n");
2539 fprintf(stdout,"type ");
2541 for (j=0; j<SIZE_NUM; j++)
2542 fprintf(stdout,mr ? ":%d" : "%7d bytes",lengths[j]);
2543 fprintf(stdout,"\n");
2546 for (k=0; k<ALGOR_NUM; k++)
2548 if (!doit[k]) continue;
2550 fprintf(stdout,"+F:%d:%s",k,names[k]);
2552 fprintf(stdout,"%-13s",names[k]);
2553 for (j=0; j<SIZE_NUM; j++)
2555 if (results[k][j] > 10000 && !mr)
2556 fprintf(stdout," %11.2fk",results[k][j]/1e3);
2558 fprintf(stdout,mr ? ":%.2f" : " %11.2f ",results[k][j]);
2560 fprintf(stdout,"\n");
2562 #ifndef OPENSSL_NO_RSA
2564 for (k=0; k<RSA_NUM; k++)
2566 if (!rsa_doit[k]) continue;
2569 printf("%18ssign verify sign/s verify/s\n"," ");
2573 fprintf(stdout,"+F2:%u:%u:%f:%f\n",
2574 k,rsa_bits[k],rsa_results[k][0],
2577 fprintf(stdout,"rsa %4u bits %8.6fs %8.6fs %8.1f %8.1f\n",
2578 rsa_bits[k],rsa_results[k][0],rsa_results[k][1],
2579 1.0/rsa_results[k][0],1.0/rsa_results[k][1]);
2582 #ifndef OPENSSL_NO_DSA
2584 for (k=0; k<DSA_NUM; k++)
2586 if (!dsa_doit[k]) continue;
2589 printf("%18ssign verify sign/s verify/s\n"," ");
2593 fprintf(stdout,"+F3:%u:%u:%f:%f\n",
2594 k,dsa_bits[k],dsa_results[k][0],dsa_results[k][1]);
2596 fprintf(stdout,"dsa %4u bits %8.6fs %8.6fs %8.1f %8.1f\n",
2597 dsa_bits[k],dsa_results[k][0],dsa_results[k][1],
2598 1.0/dsa_results[k][0],1.0/dsa_results[k][1]);
2601 #ifndef OPENSSL_NO_ECDSA
2603 for (k=0; k<EC_NUM; k++)
2605 if (!ecdsa_doit[k]) continue;
2608 printf("%30ssign verify sign/s verify/s\n"," ");
2613 fprintf(stdout,"+F4:%u:%u:%f:%f\n",
2614 k, test_curves_bits[k],
2615 ecdsa_results[k][0],ecdsa_results[k][1]);
2618 "%4u bit ecdsa (%s) %8.4fs %8.4fs %8.1f %8.1f\n",
2619 test_curves_bits[k],
2620 test_curves_names[k],
2621 ecdsa_results[k][0],ecdsa_results[k][1],
2622 1.0/ecdsa_results[k][0],1.0/ecdsa_results[k][1]);
2627 #ifndef OPENSSL_NO_ECDH
2629 for (k=0; k<EC_NUM; k++)
2631 if (!ecdh_doit[k]) continue;
2634 printf("%30sop op/s\n"," ");
2638 fprintf(stdout,"+F5:%u:%u:%f:%f\n",
2639 k, test_curves_bits[k],
2640 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2643 fprintf(stdout,"%4u bit ecdh (%s) %8.4fs %8.1f\n",
2644 test_curves_bits[k],
2645 test_curves_names[k],
2646 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2653 ERR_print_errors(bio_err);
2654 if (buf != NULL) OPENSSL_free(buf);
2655 if (buf2 != NULL) OPENSSL_free(buf2);
2656 #ifndef OPENSSL_NO_RSA
2657 for (i=0; i<RSA_NUM; i++)
2658 if (rsa_key[i] != NULL)
2659 RSA_free(rsa_key[i]);
2661 #ifndef OPENSSL_NO_DSA
2662 for (i=0; i<DSA_NUM; i++)
2663 if (dsa_key[i] != NULL)
2664 DSA_free(dsa_key[i]);
2667 #ifndef OPENSSL_NO_ECDSA
2668 for (i=0; i<EC_NUM; i++)
2669 if (ecdsa[i] != NULL)
2670 EC_KEY_free(ecdsa[i]);
2672 #ifndef OPENSSL_NO_ECDH
2673 for (i=0; i<EC_NUM; i++)
2675 if (ecdh_a[i] != NULL)
2676 EC_KEY_free(ecdh_a[i]);
2677 if (ecdh_b[i] != NULL)
2678 EC_KEY_free(ecdh_b[i]);
2686 static void print_message(const char *s, long num, int length)
2689 BIO_printf(bio_err,mr ? "+DT:%s:%d:%d\n"
2690 : "Doing %s for %ds on %d size blocks: ",s,SECONDS,length);
2691 (void)BIO_flush(bio_err);
2694 BIO_printf(bio_err,mr ? "+DN:%s:%ld:%d\n"
2695 : "Doing %s %ld times on %d size blocks: ",s,num,length);
2696 (void)BIO_flush(bio_err);
2703 static void pkey_print_message(const char *str, const char *str2, long num,
2707 BIO_printf(bio_err,mr ? "+DTP:%d:%s:%s:%d\n"
2708 : "Doing %d bit %s %s's for %ds: ",bits,str,str2,tm);
2709 (void)BIO_flush(bio_err);
2712 BIO_printf(bio_err,mr ? "+DNP:%ld:%d:%s:%s\n"
2713 : "Doing %ld %d bit %s %s's: ",num,bits,str,str2);
2714 (void)BIO_flush(bio_err);
2721 static void print_result(int alg,int run_no,int count,double time_used)
2723 BIO_printf(bio_err,mr ? "+R:%d:%s:%f\n"
2724 : "%d %s's in %.2fs\n",count,names[alg],time_used);
2725 results[alg][run_no]=((double)count)/time_used*lengths[run_no];
2729 static char *sstrsep(char **string, const char *delim)
2732 char *token = *string;
2737 memset(isdelim, 0, sizeof isdelim);
2742 isdelim[(unsigned char)(*delim)] = 1;
2746 while (!isdelim[(unsigned char)(**string)])
2760 static int do_multi(int multi)
2765 static char sep[]=":";
2767 fds=malloc(multi*sizeof *fds);
2768 for(n=0 ; n < multi ; ++n)
2788 printf("Forked child %d\n",n);
2791 /* for now, assume the pipe is long enough to take all the output */
2792 for(n=0 ; n < multi ; ++n)
2798 f=fdopen(fds[n],"r");
2799 while(fgets(buf,sizeof buf,f))
2806 fprintf(stderr,"Don't understand line '%s' from child %d\n",
2810 printf("Got: %s from %d\n",buf,n);
2811 if(!strncmp(buf,"+F:",3))
2817 alg=atoi(sstrsep(&p,sep));
2819 for(j=0 ; j < SIZE_NUM ; ++j)
2820 results[alg][j]+=atof(sstrsep(&p,sep));
2822 else if(!strncmp(buf,"+F2:",4))
2828 k=atoi(sstrsep(&p,sep));
2831 d=atof(sstrsep(&p,sep));
2833 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2835 rsa_results[k][0]=d;
2837 d=atof(sstrsep(&p,sep));
2839 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2841 rsa_results[k][1]=d;
2843 else if(!strncmp(buf,"+F2:",4))
2849 k=atoi(sstrsep(&p,sep));
2852 d=atof(sstrsep(&p,sep));
2854 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2856 rsa_results[k][0]=d;
2858 d=atof(sstrsep(&p,sep));
2860 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2862 rsa_results[k][1]=d;
2864 else if(!strncmp(buf,"+F3:",4))
2870 k=atoi(sstrsep(&p,sep));
2873 d=atof(sstrsep(&p,sep));
2875 dsa_results[k][0]=1/(1/dsa_results[k][0]+1/d);
2877 dsa_results[k][0]=d;
2879 d=atof(sstrsep(&p,sep));
2881 dsa_results[k][1]=1/(1/dsa_results[k][1]+1/d);
2883 dsa_results[k][1]=d;
2885 #ifndef OPENSSL_NO_ECDSA
2886 else if(!strncmp(buf,"+F4:",4))
2892 k=atoi(sstrsep(&p,sep));
2895 d=atof(sstrsep(&p,sep));
2897 ecdsa_results[k][0]=1/(1/ecdsa_results[k][0]+1/d);
2899 ecdsa_results[k][0]=d;
2901 d=atof(sstrsep(&p,sep));
2903 ecdsa_results[k][1]=1/(1/ecdsa_results[k][1]+1/d);
2905 ecdsa_results[k][1]=d;
2909 #ifndef OPENSSL_NO_ECDH
2910 else if(!strncmp(buf,"+F5:",4))
2916 k=atoi(sstrsep(&p,sep));
2919 d=atof(sstrsep(&p,sep));
2921 ecdh_results[k][0]=1/(1/ecdh_results[k][0]+1/d);
2923 ecdh_results[k][0]=d;
2928 else if(!strncmp(buf,"+H:",3))
2932 fprintf(stderr,"Unknown type '%s' from child %d\n",buf,n);