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_MD2
168 #include <openssl/md2.h>
170 #ifndef OPENSSL_NO_MDC2
171 #include <openssl/mdc2.h>
173 #ifndef OPENSSL_NO_MD4
174 #include <openssl/md4.h>
176 #ifndef OPENSSL_NO_MD5
177 #include <openssl/md5.h>
179 #ifndef OPENSSL_NO_HMAC
180 #include <openssl/hmac.h>
182 #include <openssl/evp.h>
183 #ifndef OPENSSL_NO_SHA
184 #include <openssl/sha.h>
186 #ifndef OPENSSL_NO_RIPEMD
187 #include <openssl/ripemd.h>
189 #ifndef OPENSSL_NO_RC4
190 #include <openssl/rc4.h>
192 #ifndef OPENSSL_NO_RC5
193 #include <openssl/rc5.h>
195 #ifndef OPENSSL_NO_RC2
196 #include <openssl/rc2.h>
198 #ifndef OPENSSL_NO_IDEA
199 #include <openssl/idea.h>
201 #ifndef OPENSSL_NO_BF
202 #include <openssl/blowfish.h>
204 #ifndef OPENSSL_NO_CAST
205 #include <openssl/cast.h>
207 #ifndef OPENSSL_NO_RSA
208 #include <openssl/rsa.h>
209 #include "./testrsa.h"
211 #include <openssl/x509.h>
212 #ifndef OPENSSL_NO_DSA
213 #include <openssl/dsa.h>
214 #include "./testdsa.h"
216 #ifndef OPENSSL_NO_ECDSA
217 #include <openssl/ecdsa.h>
219 #ifndef OPENSSL_NO_ECDH
220 #include <openssl/ecdh.h>
224 * The following "HZ" timing stuff should be sync'd up with the code in
225 * crypto/tmdiff.[ch]. That appears to try to do the same job, though I think
226 * this code is more up to date than libcrypto's so there may be features to
227 * migrate over first. This is used in two places further down AFAICS.
228 * The point is that nothing in openssl actually *uses* that tmdiff stuff, so
229 * either speed.c should be using it or it should go because it's obviously not
230 * useful enough. Anyone want to do a janitorial job on this?
233 /* The following if from times(3) man page. It may need to be changed */
235 # if defined(_SC_CLK_TCK) \
236 && (!defined(OPENSSL_SYS_VMS) || __CTRL_VER >= 70000000)
237 # define HZ sysconf(_SC_CLK_TCK)
240 # ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
242 # else /* _BSD_CLK_TCK_ */
243 # define HZ ((double)_BSD_CLK_TCK_)
246 # define HZ ((double)CLK_TCK)
251 #if !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_WINDOWS) && !defined(OPENSSL_SYS_MACINTOSH_CLASSIC) && !defined(OPENSSL_SYS_OS2) && !defined(OPENSSL_SYS_NETWARE)
256 #define BUFSIZE ((long)1024*8+1)
259 static char ftime_used = 0, times_used = 0, gettimeofday_used = 0, getrusage_used = 0;
261 static int usertime=1;
263 static double Time_F(int s);
264 static void print_message(const char *s,long num,int length);
265 static void pkey_print_message(const char *str, const char *str2,
266 long num, int bits, int sec);
267 static void print_result(int alg,int run_no,int count,double time_used);
269 static int do_multi(int multi);
278 #define MAX_ECDH_SIZE 256
280 static const char *names[ALGOR_NUM]={
281 "md2","mdc2","md4","md5","hmac(md5)","sha1","rmd160","rc4",
282 "des cbc","des ede3","idea cbc",
283 "rc2 cbc","rc5-32/12 cbc","blowfish cbc","cast cbc",
284 "aes-128 cbc","aes-192 cbc","aes-256 cbc","evp","sha256","sha512"};
285 static double results[ALGOR_NUM][SIZE_NUM];
286 static int lengths[SIZE_NUM]={16,64,256,1024,8*1024};
287 static double rsa_results[RSA_NUM][2];
288 static double dsa_results[DSA_NUM][2];
289 static double ecdsa_results[EC_NUM][2];
290 static double ecdh_results[EC_NUM][1];
294 #if defined(__STDC__) || defined(sgi) || defined(_AIX)
295 #define SIGRETTYPE void
297 #define SIGRETTYPE int
300 static SIGRETTYPE sig_done(int sig);
301 static SIGRETTYPE sig_done(int sig)
303 signal(SIGALRM,sig_done);
314 #if defined(OPENSSL_SYS_NETWARE)
316 /* for NetWare the best we can do is use clock() which returns the
317 * time, in hundredths of a second, since the NLM began executing
319 static double Time_F(int s)
323 static clock_t tstart,tend;
333 ret=(double)((double)(tend)-(double)(tstart));
334 return((ret < 0.001)?0.001:ret);
340 static double Time_F(int s)
347 static struct rusage tstart,tend;
352 getrusage(RUSAGE_SELF,&tstart);
359 getrusage(RUSAGE_SELF,&tend);
360 i=(long)tend.ru_utime.tv_usec-(long)tstart.ru_utime.tv_usec;
361 ret=((double)(tend.ru_utime.tv_sec-tstart.ru_utime.tv_sec))
362 +((double)i)/1000000.0;
363 return((ret < 0.001)?0.001:ret);
368 static struct timeval tstart,tend;
371 gettimeofday_used = 1;
374 gettimeofday(&tstart,NULL);
379 gettimeofday(&tend,NULL);
380 i=(long)tend.tv_usec-(long)tstart.tv_usec;
381 ret=((double)(tend.tv_sec-tstart.tv_sec))+((double)i)/1000000.0;
382 return((ret < 0.001)?0.001:ret);
385 #else /* ndef USE_TOD */
390 static struct tms tstart,tend;
402 ret=(double)(tend.tms_utime-tstart.tms_utime) / ret;
403 return((ret < 1e-3)?1e-3:ret);
406 # endif /* times() */
407 # if defined(TIMES) && defined(TIMEB)
410 # ifdef OPENSSL_SYS_VXWORKS
412 static unsigned long tick_start, tick_end;
416 tick_start = tickGet();
421 tick_end = tickGet();
422 ret = (double)(tick_end - tick_start) / (double)sysClkRateGet();
423 return((ret < 0.001)?0.001:ret);
426 # elif defined(TIMEB)
428 static struct timeb tstart,tend;
440 i=(long)tend.millitm-(long)tstart.millitm;
441 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
442 return((ret < 0.001)?0.001:ret);
448 #endif /* if defined(OPENSSL_SYS_NETWARE) */
451 static const int KDF1_SHA1_len = 20;
452 static void *KDF1_SHA1(const void *in, size_t inlen, void *out, size_t *outlen)
454 #ifndef OPENSSL_NO_SHA
455 if (*outlen < SHA_DIGEST_LENGTH)
458 *outlen = SHA_DIGEST_LENGTH;
459 return SHA1(in, inlen, out);
466 int MAIN(int, char **);
468 int MAIN(int argc, char **argv)
470 #ifndef OPENSSL_NO_ENGINE
473 unsigned char *buf=NULL,*buf2=NULL;
475 long count=0,save_count=0;
477 #if !defined(OPENSSL_NO_RSA) || !defined(OPENSSL_NO_DSA)
480 #ifndef OPENSSL_NO_RSA
483 unsigned char md[EVP_MAX_MD_SIZE];
484 #ifndef OPENSSL_NO_MD2
485 unsigned char md2[MD2_DIGEST_LENGTH];
487 #ifndef OPENSSL_NO_MDC2
488 unsigned char mdc2[MDC2_DIGEST_LENGTH];
490 #ifndef OPENSSL_NO_MD4
491 unsigned char md4[MD4_DIGEST_LENGTH];
493 #ifndef OPENSSL_NO_MD5
494 unsigned char md5[MD5_DIGEST_LENGTH];
495 unsigned char hmac[MD5_DIGEST_LENGTH];
497 #ifndef OPENSSL_NO_SHA
498 unsigned char sha[SHA_DIGEST_LENGTH];
499 unsigned char sha256[SHA256_DIGEST_LENGTH];
500 unsigned char sha512[SHA512_DIGEST_LENGTH];
502 #ifndef OPENSSL_NO_RIPEMD
503 unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
505 #ifndef OPENSSL_NO_RC4
508 #ifndef OPENSSL_NO_RC5
511 #ifndef OPENSSL_NO_RC2
514 #ifndef OPENSSL_NO_IDEA
515 IDEA_KEY_SCHEDULE idea_ks;
517 #ifndef OPENSSL_NO_BF
520 #ifndef OPENSSL_NO_CAST
523 static const unsigned char key16[16]=
524 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
525 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
526 static const unsigned char key24[24]=
527 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
528 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
529 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
530 static const unsigned char key32[32]=
531 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
532 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
533 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
534 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
535 #ifndef OPENSSL_NO_AES
536 #define MAX_BLOCK_SIZE 128
538 #define MAX_BLOCK_SIZE 64
540 unsigned char DES_iv[8];
541 unsigned char iv[MAX_BLOCK_SIZE/8];
542 #ifndef OPENSSL_NO_DES
543 DES_cblock *buf_as_des_cblock = NULL;
544 static DES_cblock key ={0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
545 static DES_cblock key2={0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
546 static DES_cblock key3={0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
547 DES_key_schedule sch;
548 DES_key_schedule sch2;
549 DES_key_schedule sch3;
551 #ifndef OPENSSL_NO_AES
552 AES_KEY aes_ks1, aes_ks2, aes_ks3;
564 #define D_CBC_IDEA 10
568 #define D_CBC_CAST 14
569 #define D_CBC_128_AES 15
570 #define D_CBC_192_AES 16
571 #define D_CBC_256_AES 17
576 long c[ALGOR_NUM][SIZE_NUM];
602 #ifndef OPENSSL_NO_RSA
603 RSA *rsa_key[RSA_NUM];
604 long rsa_c[RSA_NUM][2];
605 static unsigned int rsa_bits[RSA_NUM]={512,1024,2048,4096};
606 static unsigned char *rsa_data[RSA_NUM]=
607 {test512,test1024,test2048,test4096};
608 static int rsa_data_length[RSA_NUM]={
609 sizeof(test512),sizeof(test1024),
610 sizeof(test2048),sizeof(test4096)};
612 #ifndef OPENSSL_NO_DSA
613 DSA *dsa_key[DSA_NUM];
614 long dsa_c[DSA_NUM][2];
615 static unsigned int dsa_bits[DSA_NUM]={512,1024,2048};
617 #ifndef OPENSSL_NO_EC
618 /* We only test over the following curves as they are representative,
619 * To add tests over more curves, simply add the curve NID
620 * and curve name to the following arrays and increase the
621 * EC_NUM value accordingly.
623 static unsigned int test_curves[EC_NUM] =
627 NID_X9_62_prime192v1,
629 NID_X9_62_prime256v1,
644 static const char * test_curves_names[EC_NUM] =
665 static int test_curves_bits[EC_NUM] =
667 160, 192, 224, 256, 384, 521,
668 163, 233, 283, 409, 571,
669 163, 233, 283, 409, 571
674 #ifndef OPENSSL_NO_ECDSA
675 unsigned char ecdsasig[256];
676 unsigned int ecdsasiglen;
677 EC_KEY *ecdsa[EC_NUM];
678 long ecdsa_c[EC_NUM][2];
681 #ifndef OPENSSL_NO_ECDH
682 EC_KEY *ecdh_a[EC_NUM], *ecdh_b[EC_NUM];
683 unsigned char secret_a[MAX_ECDH_SIZE], secret_b[MAX_ECDH_SIZE];
684 int secret_size_a, secret_size_b;
687 long ecdh_c[EC_NUM][2];
690 int rsa_doit[RSA_NUM];
691 int dsa_doit[DSA_NUM];
692 int ecdsa_doit[EC_NUM];
693 int ecdh_doit[EC_NUM];
696 const EVP_CIPHER *evp_cipher=NULL;
697 const EVP_MD *evp_md=NULL;
708 memset(results, 0, sizeof(results));
709 #ifndef OPENSSL_NO_DSA
710 memset(dsa_key,0,sizeof(dsa_key));
712 #ifndef OPENSSL_NO_ECDSA
713 for (i=0; i<EC_NUM; i++) ecdsa[i] = NULL;
715 #ifndef OPENSSL_NO_ECDH
716 for (i=0; i<EC_NUM; i++)
725 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
726 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
728 if (!load_config(bio_err, NULL))
731 #ifndef OPENSSL_NO_RSA
732 memset(rsa_key,0,sizeof(rsa_key));
733 for (i=0; i<RSA_NUM; i++)
737 if ((buf=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
739 BIO_printf(bio_err,"out of memory\n");
742 #ifndef OPENSSL_NO_DES
743 buf_as_des_cblock = (DES_cblock *)buf;
745 if ((buf2=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
747 BIO_printf(bio_err,"out of memory\n");
751 memset(c,0,sizeof(c));
752 memset(DES_iv,0,sizeof(DES_iv));
753 memset(iv,0,sizeof(iv));
755 for (i=0; i<ALGOR_NUM; i++)
757 for (i=0; i<RSA_NUM; i++)
759 for (i=0; i<DSA_NUM; i++)
761 #ifndef OPENSSL_NO_ECDSA
762 for (i=0; i<EC_NUM; i++)
765 #ifndef OPENSSL_NO_ECDH
766 for (i=0; i<EC_NUM; i++)
776 if ((argc > 0) && (strcmp(*argv,"-elapsed") == 0))
779 j--; /* Otherwise, -elapsed gets confused with
782 else if ((argc > 0) && (strcmp(*argv,"-evp") == 0))
788 BIO_printf(bio_err,"no EVP given\n");
791 evp_cipher=EVP_get_cipherbyname(*argv);
794 evp_md=EVP_get_digestbyname(*argv);
796 if(!evp_cipher && !evp_md)
798 BIO_printf(bio_err,"%s is an unknown cipher or digest\n",*argv);
803 else if (argc > 0 && !strcmp(*argv,"-decrypt"))
806 j--; /* Otherwise, -elapsed gets confused with
809 #ifndef OPENSSL_NO_ENGINE
810 else if ((argc > 0) && (strcmp(*argv,"-engine") == 0))
816 BIO_printf(bio_err,"no engine given\n");
819 e = setup_engine(bio_err, *argv, 0);
820 /* j will be increased again further down. We just
821 don't want speed to confuse an engine with an
822 algorithm, especially when none is given (which
823 means all of them should be run) */
828 else if ((argc > 0) && (strcmp(*argv,"-multi") == 0))
834 BIO_printf(bio_err,"no multi count given\n");
840 BIO_printf(bio_err,"bad multi count\n");
843 j--; /* Otherwise, -mr gets confused with
847 else if (argc > 0 && !strcmp(*argv,"-mr"))
850 j--; /* Otherwise, -mr gets confused with
854 #ifndef OPENSSL_NO_MD2
855 if (strcmp(*argv,"md2") == 0) doit[D_MD2]=1;
858 #ifndef OPENSSL_NO_MDC2
859 if (strcmp(*argv,"mdc2") == 0) doit[D_MDC2]=1;
862 #ifndef OPENSSL_NO_MD4
863 if (strcmp(*argv,"md4") == 0) doit[D_MD4]=1;
866 #ifndef OPENSSL_NO_MD5
867 if (strcmp(*argv,"md5") == 0) doit[D_MD5]=1;
870 #ifndef OPENSSL_NO_MD5
871 if (strcmp(*argv,"hmac") == 0) doit[D_HMAC]=1;
874 #ifndef OPENSSL_NO_SHA
875 if (strcmp(*argv,"sha1") == 0) doit[D_SHA1]=1;
877 if (strcmp(*argv,"sha") == 0) doit[D_SHA1]=1,
881 if (strcmp(*argv,"sha256") == 0) doit[D_SHA256]=1;
883 if (strcmp(*argv,"sha512") == 0) doit[D_SHA512]=1;
886 #ifndef OPENSSL_NO_RIPEMD
887 if (strcmp(*argv,"ripemd") == 0) doit[D_RMD160]=1;
889 if (strcmp(*argv,"rmd160") == 0) doit[D_RMD160]=1;
891 if (strcmp(*argv,"ripemd160") == 0) doit[D_RMD160]=1;
894 #ifndef OPENSSL_NO_RC4
895 if (strcmp(*argv,"rc4") == 0) doit[D_RC4]=1;
898 #ifndef OPENSSL_NO_DES
899 if (strcmp(*argv,"des-cbc") == 0) doit[D_CBC_DES]=1;
900 else if (strcmp(*argv,"des-ede3") == 0) doit[D_EDE3_DES]=1;
903 #ifndef OPENSSL_NO_AES
904 if (strcmp(*argv,"aes-128-cbc") == 0) doit[D_CBC_128_AES]=1;
905 else if (strcmp(*argv,"aes-192-cbc") == 0) doit[D_CBC_192_AES]=1;
906 else if (strcmp(*argv,"aes-256-cbc") == 0) doit[D_CBC_256_AES]=1;
909 #ifndef OPENSSL_NO_RSA
910 #if 0 /* was: #ifdef RSAref */
911 if (strcmp(*argv,"rsaref") == 0)
913 RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
919 if (strcmp(*argv,"openssl") == 0)
921 RSA_set_default_method(RSA_PKCS1_SSLeay());
926 #endif /* !OPENSSL_NO_RSA */
927 if (strcmp(*argv,"dsa512") == 0) dsa_doit[R_DSA_512]=2;
928 else if (strcmp(*argv,"dsa1024") == 0) dsa_doit[R_DSA_1024]=2;
929 else if (strcmp(*argv,"dsa2048") == 0) dsa_doit[R_DSA_2048]=2;
930 else if (strcmp(*argv,"rsa512") == 0) rsa_doit[R_RSA_512]=2;
931 else if (strcmp(*argv,"rsa1024") == 0) rsa_doit[R_RSA_1024]=2;
932 else if (strcmp(*argv,"rsa2048") == 0) rsa_doit[R_RSA_2048]=2;
933 else if (strcmp(*argv,"rsa4096") == 0) rsa_doit[R_RSA_4096]=2;
935 #ifndef OPENSSL_NO_RC2
936 if (strcmp(*argv,"rc2-cbc") == 0) doit[D_CBC_RC2]=1;
937 else if (strcmp(*argv,"rc2") == 0) doit[D_CBC_RC2]=1;
940 #ifndef OPENSSL_NO_RC5
941 if (strcmp(*argv,"rc5-cbc") == 0) doit[D_CBC_RC5]=1;
942 else if (strcmp(*argv,"rc5") == 0) doit[D_CBC_RC5]=1;
945 #ifndef OPENSSL_NO_IDEA
946 if (strcmp(*argv,"idea-cbc") == 0) doit[D_CBC_IDEA]=1;
947 else if (strcmp(*argv,"idea") == 0) doit[D_CBC_IDEA]=1;
950 #ifndef OPENSSL_NO_BF
951 if (strcmp(*argv,"bf-cbc") == 0) doit[D_CBC_BF]=1;
952 else if (strcmp(*argv,"blowfish") == 0) doit[D_CBC_BF]=1;
953 else if (strcmp(*argv,"bf") == 0) doit[D_CBC_BF]=1;
956 #ifndef OPENSSL_NO_CAST
957 if (strcmp(*argv,"cast-cbc") == 0) doit[D_CBC_CAST]=1;
958 else if (strcmp(*argv,"cast") == 0) doit[D_CBC_CAST]=1;
959 else if (strcmp(*argv,"cast5") == 0) doit[D_CBC_CAST]=1;
962 #ifndef OPENSSL_NO_DES
963 if (strcmp(*argv,"des") == 0)
970 #ifndef OPENSSL_NO_AES
971 if (strcmp(*argv,"aes") == 0)
973 doit[D_CBC_128_AES]=1;
974 doit[D_CBC_192_AES]=1;
975 doit[D_CBC_256_AES]=1;
979 #ifndef OPENSSL_NO_RSA
980 if (strcmp(*argv,"rsa") == 0)
982 rsa_doit[R_RSA_512]=1;
983 rsa_doit[R_RSA_1024]=1;
984 rsa_doit[R_RSA_2048]=1;
985 rsa_doit[R_RSA_4096]=1;
989 #ifndef OPENSSL_NO_DSA
990 if (strcmp(*argv,"dsa") == 0)
992 dsa_doit[R_DSA_512]=1;
993 dsa_doit[R_DSA_1024]=1;
994 dsa_doit[R_DSA_2048]=1;
998 #ifndef OPENSSL_NO_ECDSA
999 if (strcmp(*argv,"ecdsap160") == 0) ecdsa_doit[R_EC_P160]=2;
1000 else if (strcmp(*argv,"ecdsap224") == 0) ecdsa_doit[R_EC_P224]=2;
1001 else if (strcmp(*argv,"ecdsap256") == 0) ecdsa_doit[R_EC_P256]=2;
1002 else if (strcmp(*argv,"ecdsap384") == 0) ecdsa_doit[R_EC_P384]=2;
1003 else if (strcmp(*argv,"ecdsap521") == 0) ecdsa_doit[R_EC_P521]=2;
1004 else if (strcmp(*argv,"ecdsak163") == 0) ecdsa_doit[R_EC_K163]=2;
1005 else if (strcmp(*argv,"ecdsak233") == 0) ecdsa_doit[R_EC_K233]=2;
1006 else if (strcmp(*argv,"ecdsak283") == 0) ecdsa_doit[R_EC_K283]=2;
1007 else if (strcmp(*argv,"ecdsak409") == 0) ecdsa_doit[R_EC_K409]=2;
1008 else if (strcmp(*argv,"ecdsak571") == 0) ecdsa_doit[R_EC_K571]=2;
1009 else if (strcmp(*argv,"ecdsab163") == 0) ecdsa_doit[R_EC_B163]=2;
1010 else if (strcmp(*argv,"ecdsab233") == 0) ecdsa_doit[R_EC_B233]=2;
1011 else if (strcmp(*argv,"ecdsab283") == 0) ecdsa_doit[R_EC_B283]=2;
1012 else if (strcmp(*argv,"ecdsab409") == 0) ecdsa_doit[R_EC_B409]=2;
1013 else if (strcmp(*argv,"ecdsab571") == 0) ecdsa_doit[R_EC_B571]=2;
1014 else if (strcmp(*argv,"ecdsa") == 0)
1016 for (i=0; i < EC_NUM; i++)
1021 #ifndef OPENSSL_NO_ECDH
1022 if (strcmp(*argv,"ecdhp160") == 0) ecdh_doit[R_EC_P160]=2;
1023 else if (strcmp(*argv,"ecdhp224") == 0) ecdh_doit[R_EC_P224]=2;
1024 else if (strcmp(*argv,"ecdhp256") == 0) ecdh_doit[R_EC_P256]=2;
1025 else if (strcmp(*argv,"ecdhp384") == 0) ecdh_doit[R_EC_P384]=2;
1026 else if (strcmp(*argv,"ecdhp521") == 0) ecdh_doit[R_EC_P521]=2;
1027 else if (strcmp(*argv,"ecdhk163") == 0) ecdh_doit[R_EC_K163]=2;
1028 else if (strcmp(*argv,"ecdhk233") == 0) ecdh_doit[R_EC_K233]=2;
1029 else if (strcmp(*argv,"ecdhk283") == 0) ecdh_doit[R_EC_K283]=2;
1030 else if (strcmp(*argv,"ecdhk409") == 0) ecdh_doit[R_EC_K409]=2;
1031 else if (strcmp(*argv,"ecdhk571") == 0) ecdh_doit[R_EC_K571]=2;
1032 else if (strcmp(*argv,"ecdhb163") == 0) ecdh_doit[R_EC_B163]=2;
1033 else if (strcmp(*argv,"ecdhb233") == 0) ecdh_doit[R_EC_B233]=2;
1034 else if (strcmp(*argv,"ecdhb283") == 0) ecdh_doit[R_EC_B283]=2;
1035 else if (strcmp(*argv,"ecdhb409") == 0) ecdh_doit[R_EC_B409]=2;
1036 else if (strcmp(*argv,"ecdhb571") == 0) ecdh_doit[R_EC_B571]=2;
1037 else if (strcmp(*argv,"ecdh") == 0)
1039 for (i=0; i < EC_NUM; i++)
1045 BIO_printf(bio_err,"Error: bad option or value\n");
1046 BIO_printf(bio_err,"\n");
1047 BIO_printf(bio_err,"Available values:\n");
1048 #ifndef OPENSSL_NO_MD2
1049 BIO_printf(bio_err,"md2 ");
1051 #ifndef OPENSSL_NO_MDC2
1052 BIO_printf(bio_err,"mdc2 ");
1054 #ifndef OPENSSL_NO_MD4
1055 BIO_printf(bio_err,"md4 ");
1057 #ifndef OPENSSL_NO_MD5
1058 BIO_printf(bio_err,"md5 ");
1059 #ifndef OPENSSL_NO_HMAC
1060 BIO_printf(bio_err,"hmac ");
1063 #ifndef OPENSSL_NO_SHA1
1064 BIO_printf(bio_err,"sha1 ");
1065 BIO_printf(bio_err,"sha256 ");
1066 BIO_printf(bio_err,"sha512 ");
1068 #ifndef OPENSSL_NO_RIPEMD160
1069 BIO_printf(bio_err,"rmd160");
1071 #if !defined(OPENSSL_NO_MD2) || !defined(OPENSSL_NO_MDC2) || \
1072 !defined(OPENSSL_NO_MD4) || !defined(OPENSSL_NO_MD5) || \
1073 !defined(OPENSSL_NO_SHA1) || !defined(OPENSSL_NO_RIPEMD160)
1074 BIO_printf(bio_err,"\n");
1077 #ifndef OPENSSL_NO_IDEA
1078 BIO_printf(bio_err,"idea-cbc ");
1080 #ifndef OPENSSL_NO_RC2
1081 BIO_printf(bio_err,"rc2-cbc ");
1083 #ifndef OPENSSL_NO_RC5
1084 BIO_printf(bio_err,"rc5-cbc ");
1086 #ifndef OPENSSL_NO_BF
1087 BIO_printf(bio_err,"bf-cbc");
1089 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1090 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_RC5)
1091 BIO_printf(bio_err,"\n");
1093 #ifndef OPENSSL_NO_DES
1094 BIO_printf(bio_err,"des-cbc des-ede3 ");
1096 #ifndef OPENSSL_NO_AES
1097 BIO_printf(bio_err,"aes-128-cbc aes-192-cbc aes-256-cbc ");
1099 #ifndef OPENSSL_NO_RC4
1100 BIO_printf(bio_err,"rc4");
1102 BIO_printf(bio_err,"\n");
1104 #ifndef OPENSSL_NO_RSA
1105 BIO_printf(bio_err,"rsa512 rsa1024 rsa2048 rsa4096\n");
1108 #ifndef OPENSSL_NO_DSA
1109 BIO_printf(bio_err,"dsa512 dsa1024 dsa2048\n");
1111 #ifndef OPENSSL_NO_ECDSA
1112 BIO_printf(bio_err,"ecdsap160 ecdsap224 ecdsap256 ecdsap384 ecdsap521\n");
1113 BIO_printf(bio_err,"ecdsak163 ecdsak233 ecdsak283 ecdsak409 ecdsak571\n");
1114 BIO_printf(bio_err,"ecdsab163 ecdsab233 ecdsab283 ecdsab409 ecdsab571\n");
1115 BIO_printf(bio_err,"ecdsa\n");
1117 #ifndef OPENSSL_NO_ECDH
1118 BIO_printf(bio_err,"ecdhp160 ecdhp224 ecdhp256 ecdhp384 ecdhp521\n");
1119 BIO_printf(bio_err,"ecdhk163 ecdhk233 ecdhk283 ecdhk409 ecdhk571\n");
1120 BIO_printf(bio_err,"ecdhb163 ecdhb233 ecdhb283 ecdhb409 ecdhb571\n");
1121 BIO_printf(bio_err,"ecdh\n");
1124 #ifndef OPENSSL_NO_IDEA
1125 BIO_printf(bio_err,"idea ");
1127 #ifndef OPENSSL_NO_RC2
1128 BIO_printf(bio_err,"rc2 ");
1130 #ifndef OPENSSL_NO_DES
1131 BIO_printf(bio_err,"des ");
1133 #ifndef OPENSSL_NO_AES
1134 BIO_printf(bio_err,"aes ");
1136 #ifndef OPENSSL_NO_RSA
1137 BIO_printf(bio_err,"rsa ");
1139 #ifndef OPENSSL_NO_BF
1140 BIO_printf(bio_err,"blowfish");
1142 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1143 !defined(OPENSSL_NO_DES) || !defined(OPENSSL_NO_RSA) || \
1144 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_AES)
1145 BIO_printf(bio_err,"\n");
1148 BIO_printf(bio_err,"\n");
1149 BIO_printf(bio_err,"Available options:\n");
1150 #if defined(TIMES) || defined(USE_TOD)
1151 BIO_printf(bio_err,"-elapsed measure time in real time instead of CPU user time.\n");
1153 #ifndef OPENSSL_NO_ENGINE
1154 BIO_printf(bio_err,"-engine e use engine e, possibly a hardware device.\n");
1156 BIO_printf(bio_err,"-evp e use EVP e.\n");
1157 BIO_printf(bio_err,"-decrypt time decryption instead of encryption (only EVP).\n");
1158 BIO_printf(bio_err,"-mr produce machine readable output.\n");
1160 BIO_printf(bio_err,"-multi n run n benchmarks in parallel.\n");
1170 if(multi && do_multi(multi))
1176 for (i=0; i<ALGOR_NUM; i++)
1181 for (i=0; i<RSA_NUM; i++)
1183 for (i=0; i<DSA_NUM; i++)
1186 for (i=0; i<ALGOR_NUM; i++)
1187 if (doit[i]) pr_header++;
1189 if (usertime == 0 && !mr)
1190 BIO_printf(bio_err,"You have chosen to measure elapsed time instead of user CPU time.\n");
1191 if (usertime <= 0 && !mr)
1193 BIO_printf(bio_err,"To get the most accurate results, try to run this\n");
1194 BIO_printf(bio_err,"program when this computer is idle.\n");
1197 #ifndef OPENSSL_NO_RSA
1198 for (i=0; i<RSA_NUM; i++)
1200 const unsigned char *p;
1203 rsa_key[i]=d2i_RSAPrivateKey(NULL,&p,rsa_data_length[i]);
1204 if (rsa_key[i] == NULL)
1206 BIO_printf(bio_err,"internal error loading RSA key number %d\n",i);
1212 BIO_printf(bio_err,mr ? "+RK:%d:"
1213 : "Loaded RSA key, %d bit modulus and e= 0x",
1214 BN_num_bits(rsa_key[i]->n));
1215 BN_print(bio_err,rsa_key[i]->e);
1216 BIO_printf(bio_err,"\n");
1222 #ifndef OPENSSL_NO_DSA
1223 dsa_key[0]=get_dsa512();
1224 dsa_key[1]=get_dsa1024();
1225 dsa_key[2]=get_dsa2048();
1228 #ifndef OPENSSL_NO_DES
1229 DES_set_key_unchecked(&key,&sch);
1230 DES_set_key_unchecked(&key2,&sch2);
1231 DES_set_key_unchecked(&key3,&sch3);
1233 #ifndef OPENSSL_NO_AES
1234 AES_set_encrypt_key(key16,128,&aes_ks1);
1235 AES_set_encrypt_key(key24,192,&aes_ks2);
1236 AES_set_encrypt_key(key32,256,&aes_ks3);
1238 #ifndef OPENSSL_NO_IDEA
1239 idea_set_encrypt_key(key16,&idea_ks);
1241 #ifndef OPENSSL_NO_RC4
1242 RC4_set_key(&rc4_ks,16,key16);
1244 #ifndef OPENSSL_NO_RC2
1245 RC2_set_key(&rc2_ks,16,key16,128);
1247 #ifndef OPENSSL_NO_RC5
1248 RC5_32_set_key(&rc5_ks,16,key16,12);
1250 #ifndef OPENSSL_NO_BF
1251 BF_set_key(&bf_ks,16,key16);
1253 #ifndef OPENSSL_NO_CAST
1254 CAST_set_key(&cast_ks,16,key16);
1256 #ifndef OPENSSL_NO_RSA
1257 memset(rsa_c,0,sizeof(rsa_c));
1260 #ifndef OPENSSL_NO_DES
1261 BIO_printf(bio_err,"First we calculate the approximate speed ...\n");
1267 for (it=count; it; it--)
1268 DES_ecb_encrypt(buf_as_des_cblock,buf_as_des_cblock,
1273 c[D_MD2][0]=count/10;
1274 c[D_MDC2][0]=count/10;
1279 c[D_RMD160][0]=count;
1280 c[D_RC4][0]=count*5;
1281 c[D_CBC_DES][0]=count;
1282 c[D_EDE3_DES][0]=count/3;
1283 c[D_CBC_IDEA][0]=count;
1284 c[D_CBC_RC2][0]=count;
1285 c[D_CBC_RC5][0]=count;
1286 c[D_CBC_BF][0]=count;
1287 c[D_CBC_CAST][0]=count;
1288 c[D_CBC_128_AES][0]=count;
1289 c[D_CBC_192_AES][0]=count;
1290 c[D_CBC_256_AES][0]=count;
1291 c[D_SHA256][0]=count;
1292 c[D_SHA512][0]=count;
1294 for (i=1; i<SIZE_NUM; i++)
1296 c[D_MD2][i]=c[D_MD2][0]*4*lengths[0]/lengths[i];
1297 c[D_MDC2][i]=c[D_MDC2][0]*4*lengths[0]/lengths[i];
1298 c[D_MD4][i]=c[D_MD4][0]*4*lengths[0]/lengths[i];
1299 c[D_MD5][i]=c[D_MD5][0]*4*lengths[0]/lengths[i];
1300 c[D_HMAC][i]=c[D_HMAC][0]*4*lengths[0]/lengths[i];
1301 c[D_SHA1][i]=c[D_SHA1][0]*4*lengths[0]/lengths[i];
1302 c[D_RMD160][i]=c[D_RMD160][0]*4*lengths[0]/lengths[i];
1303 c[D_SHA256][i]=c[D_SHA256][0]*4*lengths[0]/lengths[i];
1304 c[D_SHA512][i]=c[D_SHA512][0]*4*lengths[0]/lengths[i];
1306 for (i=1; i<SIZE_NUM; i++)
1310 l0=(long)lengths[i-1];
1311 l1=(long)lengths[i];
1312 c[D_RC4][i]=c[D_RC4][i-1]*l0/l1;
1313 c[D_CBC_DES][i]=c[D_CBC_DES][i-1]*l0/l1;
1314 c[D_EDE3_DES][i]=c[D_EDE3_DES][i-1]*l0/l1;
1315 c[D_CBC_IDEA][i]=c[D_CBC_IDEA][i-1]*l0/l1;
1316 c[D_CBC_RC2][i]=c[D_CBC_RC2][i-1]*l0/l1;
1317 c[D_CBC_RC5][i]=c[D_CBC_RC5][i-1]*l0/l1;
1318 c[D_CBC_BF][i]=c[D_CBC_BF][i-1]*l0/l1;
1319 c[D_CBC_CAST][i]=c[D_CBC_CAST][i-1]*l0/l1;
1320 c[D_CBC_128_AES][i]=c[D_CBC_128_AES][i-1]*l0/l1;
1321 c[D_CBC_192_AES][i]=c[D_CBC_192_AES][i-1]*l0/l1;
1322 c[D_CBC_256_AES][i]=c[D_CBC_256_AES][i-1]*l0/l1;
1324 #ifndef OPENSSL_NO_RSA
1325 rsa_c[R_RSA_512][0]=count/2000;
1326 rsa_c[R_RSA_512][1]=count/400;
1327 for (i=1; i<RSA_NUM; i++)
1329 rsa_c[i][0]=rsa_c[i-1][0]/8;
1330 rsa_c[i][1]=rsa_c[i-1][1]/4;
1331 if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1335 if (rsa_c[i][0] == 0)
1344 #ifndef OPENSSL_NO_DSA
1345 dsa_c[R_DSA_512][0]=count/1000;
1346 dsa_c[R_DSA_512][1]=count/1000/2;
1347 for (i=1; i<DSA_NUM; i++)
1349 dsa_c[i][0]=dsa_c[i-1][0]/4;
1350 dsa_c[i][1]=dsa_c[i-1][1]/4;
1351 if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1364 #ifndef OPENSSL_NO_ECDSA
1365 ecdsa_c[R_EC_P160][0]=count/1000;
1366 ecdsa_c[R_EC_P160][1]=count/1000/2;
1367 for (i=R_EC_P192; i<=R_EC_P521; i++)
1369 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1370 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1371 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1375 if (ecdsa_c[i] == 0)
1382 ecdsa_c[R_EC_K163][0]=count/1000;
1383 ecdsa_c[R_EC_K163][1]=count/1000/2;
1384 for (i=R_EC_K233; i<=R_EC_K571; i++)
1386 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1387 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1388 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1392 if (ecdsa_c[i] == 0)
1399 ecdsa_c[R_EC_B163][0]=count/1000;
1400 ecdsa_c[R_EC_B163][1]=count/1000/2;
1401 for (i=R_EC_B233; i<=R_EC_B571; i++)
1403 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1404 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1405 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1409 if (ecdsa_c[i] == 0)
1418 #ifndef OPENSSL_NO_ECDH
1419 ecdh_c[R_EC_P160][0]=count/1000;
1420 ecdh_c[R_EC_P160][1]=count/1000;
1421 for (i=R_EC_P192; i<=R_EC_P521; i++)
1423 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1424 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1425 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1436 ecdh_c[R_EC_K163][0]=count/1000;
1437 ecdh_c[R_EC_K163][1]=count/1000;
1438 for (i=R_EC_K233; i<=R_EC_K571; i++)
1440 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1441 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1442 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1453 ecdh_c[R_EC_B163][0]=count/1000;
1454 ecdh_c[R_EC_B163][1]=count/1000;
1455 for (i=R_EC_B233; i<=R_EC_B571; i++)
1457 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1458 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1459 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1472 #define COND(d) (count < (d))
1473 #define COUNT(d) (d)
1475 /* not worth fixing */
1476 # error "You cannot disable DES on systems without SIGALRM."
1477 #endif /* OPENSSL_NO_DES */
1479 #define COND(c) (run)
1480 #define COUNT(d) (count)
1481 signal(SIGALRM,sig_done);
1482 #endif /* SIGALRM */
1484 #ifndef OPENSSL_NO_MD2
1487 for (j=0; j<SIZE_NUM; j++)
1489 print_message(names[D_MD2],c[D_MD2][j],lengths[j]);
1491 for (count=0,run=1; COND(c[D_MD2][j]); count++)
1492 EVP_Digest(buf,(unsigned long)lengths[j],&(md2[0]),NULL,EVP_md2(),NULL);
1494 print_result(D_MD2,j,count,d);
1498 #ifndef OPENSSL_NO_MDC2
1501 for (j=0; j<SIZE_NUM; j++)
1503 print_message(names[D_MDC2],c[D_MDC2][j],lengths[j]);
1505 for (count=0,run=1; COND(c[D_MDC2][j]); count++)
1506 EVP_Digest(buf,(unsigned long)lengths[j],&(mdc2[0]),NULL,EVP_mdc2(),NULL);
1508 print_result(D_MDC2,j,count,d);
1513 #ifndef OPENSSL_NO_MD4
1516 for (j=0; j<SIZE_NUM; j++)
1518 print_message(names[D_MD4],c[D_MD4][j],lengths[j]);
1520 for (count=0,run=1; COND(c[D_MD4][j]); count++)
1521 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md4[0]),NULL,EVP_md4(),NULL);
1523 print_result(D_MD4,j,count,d);
1528 #ifndef OPENSSL_NO_MD5
1531 for (j=0; j<SIZE_NUM; j++)
1533 print_message(names[D_MD5],c[D_MD5][j],lengths[j]);
1535 for (count=0,run=1; COND(c[D_MD5][j]); count++)
1536 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md5[0]),NULL,EVP_get_digestbyname("md5"),NULL);
1538 print_result(D_MD5,j,count,d);
1543 #if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
1548 HMAC_CTX_init(&hctx);
1549 HMAC_Init_ex(&hctx,(unsigned char *)"This is a key...",
1550 16,EVP_md5(), NULL);
1552 for (j=0; j<SIZE_NUM; j++)
1554 print_message(names[D_HMAC],c[D_HMAC][j],lengths[j]);
1556 for (count=0,run=1; COND(c[D_HMAC][j]); count++)
1558 HMAC_Init_ex(&hctx,NULL,0,NULL,NULL);
1559 HMAC_Update(&hctx,buf,lengths[j]);
1560 HMAC_Final(&hctx,&(hmac[0]),NULL);
1563 print_result(D_HMAC,j,count,d);
1565 HMAC_CTX_cleanup(&hctx);
1568 #ifndef OPENSSL_NO_SHA
1571 for (j=0; j<SIZE_NUM; j++)
1573 print_message(names[D_SHA1],c[D_SHA1][j],lengths[j]);
1575 for (count=0,run=1; COND(c[D_SHA1][j]); count++)
1576 EVP_Digest(buf,(unsigned long)lengths[j],&(sha[0]),NULL,EVP_sha1(),NULL);
1578 print_result(D_SHA1,j,count,d);
1582 #ifndef OPENSSL_NO_SHA256
1585 for (j=0; j<SIZE_NUM; j++)
1587 print_message(names[D_SHA256],c[D_SHA256][j],lengths[j]);
1589 for (count=0,run=1; COND(c[D_SHA256][j]); count++)
1590 SHA256(buf,lengths[j],sha256);
1592 print_result(D_SHA256,j,count,d);
1597 #ifndef OPENSSL_NO_SHA512
1600 for (j=0; j<SIZE_NUM; j++)
1602 print_message(names[D_SHA512],c[D_SHA512][j],lengths[j]);
1604 for (count=0,run=1; COND(c[D_SHA512][j]); count++)
1605 SHA512(buf,lengths[j],sha512);
1607 print_result(D_SHA512,j,count,d);
1613 #ifndef OPENSSL_NO_RIPEMD
1616 for (j=0; j<SIZE_NUM; j++)
1618 print_message(names[D_RMD160],c[D_RMD160][j],lengths[j]);
1620 for (count=0,run=1; COND(c[D_RMD160][j]); count++)
1621 EVP_Digest(buf,(unsigned long)lengths[j],&(rmd160[0]),NULL,EVP_ripemd160(),NULL);
1623 print_result(D_RMD160,j,count,d);
1627 #ifndef OPENSSL_NO_RC4
1630 for (j=0; j<SIZE_NUM; j++)
1632 print_message(names[D_RC4],c[D_RC4][j],lengths[j]);
1634 for (count=0,run=1; COND(c[D_RC4][j]); count++)
1635 RC4(&rc4_ks,(unsigned int)lengths[j],
1638 print_result(D_RC4,j,count,d);
1642 #ifndef OPENSSL_NO_DES
1643 if (doit[D_CBC_DES])
1645 for (j=0; j<SIZE_NUM; j++)
1647 print_message(names[D_CBC_DES],c[D_CBC_DES][j],lengths[j]);
1649 for (count=0,run=1; COND(c[D_CBC_DES][j]); count++)
1650 DES_ncbc_encrypt(buf,buf,lengths[j],&sch,
1651 &DES_iv,DES_ENCRYPT);
1653 print_result(D_CBC_DES,j,count,d);
1657 if (doit[D_EDE3_DES])
1659 for (j=0; j<SIZE_NUM; j++)
1661 print_message(names[D_EDE3_DES],c[D_EDE3_DES][j],lengths[j]);
1663 for (count=0,run=1; COND(c[D_EDE3_DES][j]); count++)
1664 DES_ede3_cbc_encrypt(buf,buf,lengths[j],
1666 &DES_iv,DES_ENCRYPT);
1668 print_result(D_EDE3_DES,j,count,d);
1672 #ifndef OPENSSL_NO_AES
1673 if (doit[D_CBC_128_AES])
1675 for (j=0; j<SIZE_NUM; j++)
1677 print_message(names[D_CBC_128_AES],c[D_CBC_128_AES][j],lengths[j]);
1679 for (count=0,run=1; COND(c[D_CBC_128_AES][j]); count++)
1680 AES_cbc_encrypt(buf,buf,
1681 (unsigned long)lengths[j],&aes_ks1,
1684 print_result(D_CBC_128_AES,j,count,d);
1687 if (doit[D_CBC_192_AES])
1689 for (j=0; j<SIZE_NUM; j++)
1691 print_message(names[D_CBC_192_AES],c[D_CBC_192_AES][j],lengths[j]);
1693 for (count=0,run=1; COND(c[D_CBC_192_AES][j]); count++)
1694 AES_cbc_encrypt(buf,buf,
1695 (unsigned long)lengths[j],&aes_ks2,
1698 print_result(D_CBC_192_AES,j,count,d);
1701 if (doit[D_CBC_256_AES])
1703 for (j=0; j<SIZE_NUM; j++)
1705 print_message(names[D_CBC_256_AES],c[D_CBC_256_AES][j],lengths[j]);
1707 for (count=0,run=1; COND(c[D_CBC_256_AES][j]); count++)
1708 AES_cbc_encrypt(buf,buf,
1709 (unsigned long)lengths[j],&aes_ks3,
1712 print_result(D_CBC_256_AES,j,count,d);
1717 #ifndef OPENSSL_NO_IDEA
1718 if (doit[D_CBC_IDEA])
1720 for (j=0; j<SIZE_NUM; j++)
1722 print_message(names[D_CBC_IDEA],c[D_CBC_IDEA][j],lengths[j]);
1724 for (count=0,run=1; COND(c[D_CBC_IDEA][j]); count++)
1725 idea_cbc_encrypt(buf,buf,
1726 (unsigned long)lengths[j],&idea_ks,
1729 print_result(D_CBC_IDEA,j,count,d);
1733 #ifndef OPENSSL_NO_RC2
1734 if (doit[D_CBC_RC2])
1736 for (j=0; j<SIZE_NUM; j++)
1738 print_message(names[D_CBC_RC2],c[D_CBC_RC2][j],lengths[j]);
1740 for (count=0,run=1; COND(c[D_CBC_RC2][j]); count++)
1741 RC2_cbc_encrypt(buf,buf,
1742 (unsigned long)lengths[j],&rc2_ks,
1745 print_result(D_CBC_RC2,j,count,d);
1749 #ifndef OPENSSL_NO_RC5
1750 if (doit[D_CBC_RC5])
1752 for (j=0; j<SIZE_NUM; j++)
1754 print_message(names[D_CBC_RC5],c[D_CBC_RC5][j],lengths[j]);
1756 for (count=0,run=1; COND(c[D_CBC_RC5][j]); count++)
1757 RC5_32_cbc_encrypt(buf,buf,
1758 (unsigned long)lengths[j],&rc5_ks,
1761 print_result(D_CBC_RC5,j,count,d);
1765 #ifndef OPENSSL_NO_BF
1768 for (j=0; j<SIZE_NUM; j++)
1770 print_message(names[D_CBC_BF],c[D_CBC_BF][j],lengths[j]);
1772 for (count=0,run=1; COND(c[D_CBC_BF][j]); count++)
1773 BF_cbc_encrypt(buf,buf,
1774 (unsigned long)lengths[j],&bf_ks,
1777 print_result(D_CBC_BF,j,count,d);
1781 #ifndef OPENSSL_NO_CAST
1782 if (doit[D_CBC_CAST])
1784 for (j=0; j<SIZE_NUM; j++)
1786 print_message(names[D_CBC_CAST],c[D_CBC_CAST][j],lengths[j]);
1788 for (count=0,run=1; COND(c[D_CBC_CAST][j]); count++)
1789 CAST_cbc_encrypt(buf,buf,
1790 (unsigned long)lengths[j],&cast_ks,
1793 print_result(D_CBC_CAST,j,count,d);
1800 for (j=0; j<SIZE_NUM; j++)
1807 names[D_EVP]=OBJ_nid2ln(evp_cipher->nid);
1808 /* -O3 -fschedule-insns messes up an
1809 * optimization here! names[D_EVP]
1810 * somehow becomes NULL */
1811 print_message(names[D_EVP],save_count,
1814 EVP_CIPHER_CTX_init(&ctx);
1816 EVP_DecryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1818 EVP_EncryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1819 EVP_CIPHER_CTX_set_padding(&ctx, 0);
1823 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1824 EVP_DecryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1826 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1827 EVP_EncryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1829 EVP_DecryptFinal_ex(&ctx,buf,&outl);
1831 EVP_EncryptFinal_ex(&ctx,buf,&outl);
1833 EVP_CIPHER_CTX_cleanup(&ctx);
1837 names[D_EVP]=OBJ_nid2ln(evp_md->type);
1838 print_message(names[D_EVP],save_count,
1842 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1843 EVP_Digest(buf,lengths[j],&(md[0]),NULL,evp_md,NULL);
1847 print_result(D_EVP,j,count,d);
1851 RAND_pseudo_bytes(buf,36);
1852 #ifndef OPENSSL_NO_RSA
1853 for (j=0; j<RSA_NUM; j++)
1856 if (!rsa_doit[j]) continue;
1857 ret=RSA_sign(NID_md5_sha1, buf,36, buf2, &rsa_num, rsa_key[j]);
1860 BIO_printf(bio_err,"RSA sign failure. No RSA sign will be done.\n");
1861 ERR_print_errors(bio_err);
1866 pkey_print_message("private","rsa",
1867 rsa_c[j][0],rsa_bits[j],
1869 /* RSA_blinding_on(rsa_key[j],NULL); */
1871 for (count=0,run=1; COND(rsa_c[j][0]); count++)
1873 ret=RSA_sign(NID_md5_sha1, buf,36, buf2,
1874 &rsa_num, rsa_key[j]);
1878 "RSA sign failure\n");
1879 ERR_print_errors(bio_err);
1885 BIO_printf(bio_err,mr ? "+R1:%ld:%d:%.2f\n"
1886 : "%ld %d bit private RSA's in %.2fs\n",
1887 count,rsa_bits[j],d);
1888 rsa_results[j][0]=d/(double)count;
1893 ret=RSA_verify(NID_md5_sha1, buf,36, buf2, rsa_num, rsa_key[j]);
1896 BIO_printf(bio_err,"RSA verify failure. No RSA verify will be done.\n");
1897 ERR_print_errors(bio_err);
1902 pkey_print_message("public","rsa",
1903 rsa_c[j][1],rsa_bits[j],
1906 for (count=0,run=1; COND(rsa_c[j][1]); count++)
1908 ret=RSA_verify(NID_md5_sha1, buf,36, buf2,
1909 rsa_num, rsa_key[j]);
1913 "RSA verify failure\n");
1914 ERR_print_errors(bio_err);
1920 BIO_printf(bio_err,mr ? "+R2:%ld:%d:%.2f\n"
1921 : "%ld %d bit public RSA's in %.2fs\n",
1922 count,rsa_bits[j],d);
1923 rsa_results[j][1]=d/(double)count;
1929 /* if longer than 10s, don't do any more */
1930 for (j++; j<RSA_NUM; j++)
1936 RAND_pseudo_bytes(buf,20);
1937 #ifndef OPENSSL_NO_DSA
1938 if (RAND_status() != 1)
1940 RAND_seed(rnd_seed, sizeof rnd_seed);
1943 for (j=0; j<DSA_NUM; j++)
1948 if (!dsa_doit[j]) continue;
1949 /* DSA_generate_key(dsa_key[j]); */
1950 /* DSA_sign_setup(dsa_key[j],NULL); */
1951 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1955 BIO_printf(bio_err,"DSA sign failure. No DSA sign will be done.\n");
1956 ERR_print_errors(bio_err);
1961 pkey_print_message("sign","dsa",
1962 dsa_c[j][0],dsa_bits[j],
1965 for (count=0,run=1; COND(dsa_c[j][0]); count++)
1967 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1972 "DSA sign failure\n");
1973 ERR_print_errors(bio_err);
1979 BIO_printf(bio_err,mr ? "+R3:%ld:%d:%.2f\n"
1980 : "%ld %d bit DSA signs in %.2fs\n",
1981 count,dsa_bits[j],d);
1982 dsa_results[j][0]=d/(double)count;
1986 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1990 BIO_printf(bio_err,"DSA verify failure. No DSA verify will be done.\n");
1991 ERR_print_errors(bio_err);
1996 pkey_print_message("verify","dsa",
1997 dsa_c[j][1],dsa_bits[j],
2000 for (count=0,run=1; COND(dsa_c[j][1]); count++)
2002 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
2007 "DSA verify failure\n");
2008 ERR_print_errors(bio_err);
2014 BIO_printf(bio_err,mr ? "+R4:%ld:%d:%.2f\n"
2015 : "%ld %d bit DSA verify in %.2fs\n",
2016 count,dsa_bits[j],d);
2017 dsa_results[j][1]=d/(double)count;
2022 /* if longer than 10s, don't do any more */
2023 for (j++; j<DSA_NUM; j++)
2027 if (rnd_fake) RAND_cleanup();
2030 #ifndef OPENSSL_NO_ECDSA
2031 if (RAND_status() != 1)
2033 RAND_seed(rnd_seed, sizeof rnd_seed);
2036 for (j=0; j<EC_NUM; j++)
2040 if (!ecdsa_doit[j]) continue; /* Ignore Curve */
2041 ecdsa[j] = EC_KEY_new();
2042 if (ecdsa[j] == NULL)
2044 BIO_printf(bio_err,"ECDSA failure.\n");
2045 ERR_print_errors(bio_err);
2050 ecdsa[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
2051 /* Could not obtain group information */
2052 if (ecdsa[j]->group == NULL)
2054 BIO_printf(bio_err,"ECDSA failure.Could not obtain group information\n");
2055 ERR_print_errors(bio_err);
2061 EC_GROUP_precompute_mult(ecdsa[j]->group, NULL);
2063 /* Perform ECDSA signature test */
2064 EC_KEY_generate_key(ecdsa[j]);
2065 ret = ECDSA_sign(0, buf, 20, ecdsasig,
2066 &ecdsasiglen, ecdsa[j]);
2069 BIO_printf(bio_err,"ECDSA sign failure. No ECDSA sign will be done.\n");
2070 ERR_print_errors(bio_err);
2075 pkey_print_message("sign","ecdsa",
2077 test_curves_bits[j],
2081 for (count=0,run=1; COND(ecdsa_c[j][0]);
2084 ret=ECDSA_sign(0, buf, 20,
2085 ecdsasig, &ecdsasiglen,
2089 BIO_printf(bio_err, "ECDSA sign failure\n");
2090 ERR_print_errors(bio_err);
2097 BIO_printf(bio_err, mr ? "+R5:%ld:%d:%.2f\n" :
2098 "%ld %d bit ECDSA signs in %.2fs \n",
2099 count, test_curves_bits[j], d);
2100 ecdsa_results[j][0]=d/(double)count;
2104 /* Perform ECDSA verification test */
2105 ret=ECDSA_verify(0, buf, 20, ecdsasig,
2106 ecdsasiglen, ecdsa[j]);
2109 BIO_printf(bio_err,"ECDSA verify failure. No ECDSA verify will be done.\n");
2110 ERR_print_errors(bio_err);
2115 pkey_print_message("verify","ecdsa",
2117 test_curves_bits[j],
2120 for (count=0,run=1; COND(ecdsa_c[j][1]); count++)
2122 ret=ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen, ecdsa[j]);
2125 BIO_printf(bio_err, "ECDSA verify failure\n");
2126 ERR_print_errors(bio_err);
2132 BIO_printf(bio_err, mr? "+R6:%ld:%d:%.2f\n"
2133 : "%ld %d bit ECDSA verify in %.2fs\n",
2134 count, test_curves_bits[j], d);
2135 ecdsa_results[j][1]=d/(double)count;
2140 /* if longer than 10s, don't do any more */
2141 for (j++; j<EC_NUM; j++)
2147 if (rnd_fake) RAND_cleanup();
2150 #ifndef OPENSSL_NO_ECDH
2151 if (RAND_status() != 1)
2153 RAND_seed(rnd_seed, sizeof rnd_seed);
2156 for (j=0; j<EC_NUM; j++)
2158 if (!ecdh_doit[j]) continue;
2159 ecdh_a[j] = EC_KEY_new();
2160 ecdh_b[j] = EC_KEY_new();
2161 if ((ecdh_a[j] == NULL) || (ecdh_b[j] == NULL))
2163 BIO_printf(bio_err,"ECDH failure.\n");
2164 ERR_print_errors(bio_err);
2169 ecdh_a[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
2170 if (ecdh_a[j]->group == NULL)
2172 BIO_printf(bio_err,"ECDH failure.\n");
2173 ERR_print_errors(bio_err);
2178 ecdh_b[j]->group = EC_GROUP_dup(ecdh_a[j]->group);
2180 /* generate two ECDH key pairs */
2181 if (!EC_KEY_generate_key(ecdh_a[j]) ||
2182 !EC_KEY_generate_key(ecdh_b[j]))
2184 BIO_printf(bio_err,"ECDH key generation failure.\n");
2185 ERR_print_errors(bio_err);
2190 /* If field size is not more than 24 octets, then use SHA-1 hash of result;
2191 * otherwise, use result (see section 4.8 of draft-ietf-tls-ecc-03.txt).
2193 int field_size, outlen;
2194 void *(*kdf)(const void *in, size_t inlen, void *out, size_t *xoutlen);
2195 field_size = EC_GROUP_get_degree(ecdh_a[j]->group);
2196 if (field_size <= 24 * 8)
2198 outlen = KDF1_SHA1_len;
2203 outlen = (field_size+7)/8;
2206 secret_size_a = ECDH_compute_key(secret_a, outlen,
2209 secret_size_b = ECDH_compute_key(secret_b, outlen,
2212 if (secret_size_a != secret_size_b)
2217 for (secret_idx = 0;
2218 (secret_idx < secret_size_a)
2219 && (ecdh_checks == 1);
2222 if (secret_a[secret_idx] != secret_b[secret_idx])
2226 if (ecdh_checks == 0)
2228 BIO_printf(bio_err,"ECDH computations don't match.\n");
2229 ERR_print_errors(bio_err);
2233 pkey_print_message("","ecdh",
2235 test_curves_bits[j],
2238 for (count=0,run=1; COND(ecdh_c[j][0]); count++)
2240 ECDH_compute_key(secret_a, outlen,
2245 BIO_printf(bio_err, mr ? "+R7:%ld:%d:%.2f\n" :"%ld %d-bit ECDH ops in %.2fs\n",
2246 count, test_curves_bits[j], d);
2247 ecdh_results[j][0]=d/(double)count;
2255 /* if longer than 10s, don't do any more */
2256 for (j++; j<EC_NUM; j++)
2260 if (rnd_fake) RAND_cleanup();
2267 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_VERSION));
2268 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_BUILT_ON));
2270 printf("%s ",BN_options());
2271 #ifndef OPENSSL_NO_MD2
2272 printf("%s ",MD2_options());
2274 #ifndef OPENSSL_NO_RC4
2275 printf("%s ",RC4_options());
2277 #ifndef OPENSSL_NO_DES
2278 printf("%s ",DES_options());
2280 #ifndef OPENSSL_NO_AES
2281 printf("%s ",AES_options());
2283 #ifndef OPENSSL_NO_IDEA
2284 printf("%s ",idea_options());
2286 #ifndef OPENSSL_NO_BF
2287 printf("%s ",BF_options());
2289 fprintf(stdout,"\n%s\n",SSLeay_version(SSLEAY_CFLAGS));
2290 printf("available timing options: ");
2301 #define as_string(s) (#s)
2304 printf("HZ=%g", dbl);
2307 printf(" [sysconf value]");
2311 printf("timing function used: %s%s%s%s%s%s%s\n",
2312 (ftime_used ? "ftime" : ""),
2313 (ftime_used + times_used > 1 ? "," : ""),
2314 (times_used ? "times" : ""),
2315 (ftime_used + times_used + gettimeofday_used > 1 ? "," : ""),
2316 (gettimeofday_used ? "gettimeofday" : ""),
2317 (ftime_used + times_used + gettimeofday_used + getrusage_used > 1 ? "," : ""),
2318 (getrusage_used ? "getrusage" : ""));
2324 fprintf(stdout,"+H");
2327 fprintf(stdout,"The 'numbers' are in 1000s of bytes per second processed.\n");
2328 fprintf(stdout,"type ");
2330 for (j=0; j<SIZE_NUM; j++)
2331 fprintf(stdout,mr ? ":%d" : "%7d bytes",lengths[j]);
2332 fprintf(stdout,"\n");
2335 for (k=0; k<ALGOR_NUM; k++)
2337 if (!doit[k]) continue;
2339 fprintf(stdout,"+F:%d:%s",k,names[k]);
2341 fprintf(stdout,"%-13s",names[k]);
2342 for (j=0; j<SIZE_NUM; j++)
2344 if (results[k][j] > 10000 && !mr)
2345 fprintf(stdout," %11.2fk",results[k][j]/1e3);
2347 fprintf(stdout,mr ? ":%.2f" : " %11.2f ",results[k][j]);
2349 fprintf(stdout,"\n");
2351 #ifndef OPENSSL_NO_RSA
2353 for (k=0; k<RSA_NUM; k++)
2355 if (!rsa_doit[k]) continue;
2358 printf("%18ssign verify sign/s verify/s\n"," ");
2362 fprintf(stdout,"+F2:%u:%u:%f:%f\n",
2363 k,rsa_bits[k],rsa_results[k][0],
2366 fprintf(stdout,"rsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2367 rsa_bits[k],rsa_results[k][0],rsa_results[k][1],
2368 1.0/rsa_results[k][0],1.0/rsa_results[k][1]);
2371 #ifndef OPENSSL_NO_DSA
2373 for (k=0; k<DSA_NUM; k++)
2375 if (!dsa_doit[k]) continue;
2378 printf("%18ssign verify sign/s verify/s\n"," ");
2382 fprintf(stdout,"+F3:%u:%u:%f:%f\n",
2383 k,dsa_bits[k],dsa_results[k][0],dsa_results[k][1]);
2385 fprintf(stdout,"dsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2386 dsa_bits[k],dsa_results[k][0],dsa_results[k][1],
2387 1.0/dsa_results[k][0],1.0/dsa_results[k][1]);
2390 #ifndef OPENSSL_NO_ECDSA
2392 for (k=0; k<EC_NUM; k++)
2394 if (!ecdsa_doit[k]) continue;
2397 printf("%30ssign verify sign/s verify/s\n"," ");
2402 fprintf(stdout,"+F4:%u:%u:%f:%f\n",
2403 k, test_curves_bits[k],
2404 ecdsa_results[k][0],ecdsa_results[k][1]);
2407 "%4u bit ecdsa (%s) %8.4fs %8.4fs %8.1f %8.1f\n",
2408 test_curves_bits[k],
2409 test_curves_names[k],
2410 ecdsa_results[k][0],ecdsa_results[k][1],
2411 1.0/ecdsa_results[k][0],1.0/ecdsa_results[k][1]);
2416 #ifndef OPENSSL_NO_ECDH
2418 for (k=0; k<EC_NUM; k++)
2420 if (!ecdh_doit[k]) continue;
2423 printf("%30sop op/s\n"," ");
2427 fprintf(stdout,"+F5:%u:%u:%f:%f\n",
2428 k, test_curves_bits[k],
2429 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2432 fprintf(stdout,"%4u bit ecdh (%s) %8.4fs %8.1f\n",
2433 test_curves_bits[k],
2434 test_curves_names[k],
2435 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2442 ERR_print_errors(bio_err);
2443 if (buf != NULL) OPENSSL_free(buf);
2444 if (buf2 != NULL) OPENSSL_free(buf2);
2445 #ifndef OPENSSL_NO_RSA
2446 for (i=0; i<RSA_NUM; i++)
2447 if (rsa_key[i] != NULL)
2448 RSA_free(rsa_key[i]);
2450 #ifndef OPENSSL_NO_DSA
2451 for (i=0; i<DSA_NUM; i++)
2452 if (dsa_key[i] != NULL)
2453 DSA_free(dsa_key[i]);
2456 #ifndef OPENSSL_NO_ECDSA
2457 for (i=0; i<EC_NUM; i++)
2458 if (ecdsa[i] != NULL)
2459 EC_KEY_free(ecdsa[i]);
2461 #ifndef OPENSSL_NO_ECDH
2462 for (i=0; i<EC_NUM; i++)
2464 if (ecdh_a[i] != NULL)
2465 EC_KEY_free(ecdh_a[i]);
2466 if (ecdh_b[i] != NULL)
2467 EC_KEY_free(ecdh_b[i]);
2475 static void print_message(const char *s, long num, int length)
2478 BIO_printf(bio_err,mr ? "+DT:%s:%d:%d\n"
2479 : "Doing %s for %ds on %d size blocks: ",s,SECONDS,length);
2480 (void)BIO_flush(bio_err);
2483 BIO_printf(bio_err,mr ? "+DN:%s:%ld:%d\n"
2484 : "Doing %s %ld times on %d size blocks: ",s,num,length);
2485 (void)BIO_flush(bio_err);
2492 static void pkey_print_message(const char *str, const char *str2, long num,
2496 BIO_printf(bio_err,mr ? "+DTP:%d:%s:%s:%d\n"
2497 : "Doing %d bit %s %s's for %ds: ",bits,str,str2,tm);
2498 (void)BIO_flush(bio_err);
2501 BIO_printf(bio_err,mr ? "+DNP:%ld:%d:%s:%s\n"
2502 : "Doing %ld %d bit %s %s's: ",num,bits,str,str2);
2503 (void)BIO_flush(bio_err);
2510 static void print_result(int alg,int run_no,int count,double time_used)
2512 BIO_printf(bio_err,mr ? "+R:%d:%s:%f\n"
2513 : "%d %s's in %.2fs\n",count,names[alg],time_used);
2514 results[alg][run_no]=((double)count)/time_used*lengths[run_no];
2517 static char *sstrsep(char **string, const char *delim)
2520 char *token = *string;
2525 memset(isdelim, 0, sizeof isdelim);
2530 isdelim[(unsigned char)(*delim)] = 1;
2534 while (!isdelim[(unsigned char)(**string)])
2549 static int do_multi(int multi)
2554 static char sep[]=":";
2556 fds=malloc(multi*sizeof *fds);
2557 for(n=0 ; n < multi ; ++n)
2575 printf("Forked child %d\n",n);
2578 /* for now, assume the pipe is long enough to take all the output */
2579 for(n=0 ; n < multi ; ++n)
2585 f=fdopen(fds[n],"r");
2586 while(fgets(buf,sizeof buf,f))
2593 fprintf(stderr,"Don't understand line '%s' from child %d\n",
2597 printf("Got: %s from %d\n",buf,n);
2598 if(!strncmp(buf,"+F:",3))
2604 alg=atoi(sstrsep(&p,sep));
2606 for(j=0 ; j < SIZE_NUM ; ++j)
2607 results[alg][j]+=atof(sstrsep(&p,sep));
2609 else if(!strncmp(buf,"+F2:",4))
2615 k=atoi(sstrsep(&p,sep));
2618 d=atof(sstrsep(&p,sep));
2620 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2622 rsa_results[k][0]=d;
2624 d=atof(sstrsep(&p,sep));
2626 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2628 rsa_results[k][1]=d;
2630 else if(!strncmp(buf,"+F2:",4))
2636 k=atoi(sstrsep(&p,sep));
2639 d=atof(sstrsep(&p,sep));
2641 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2643 rsa_results[k][0]=d;
2645 d=atof(sstrsep(&p,sep));
2647 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2649 rsa_results[k][1]=d;
2651 else if(!strncmp(buf,"+F3:",4))
2657 k=atoi(sstrsep(&p,sep));
2660 d=atof(sstrsep(&p,sep));
2662 dsa_results[k][0]=1/(1/dsa_results[k][0]+1/d);
2664 dsa_results[k][0]=d;
2666 d=atof(sstrsep(&p,sep));
2668 dsa_results[k][1]=1/(1/dsa_results[k][1]+1/d);
2670 dsa_results[k][1]=d;
2672 #ifndef OPENSSL_NO_ECDSA
2673 else if(!strncmp(buf,"+F4:",4))
2679 k=atoi(sstrsep(&p,sep));
2682 d=atof(sstrsep(&p,sep));
2684 ecdsa_results[k][0]=1/(1/ecdsa_results[k][0]+1/d);
2686 ecdsa_results[k][0]=d;
2688 d=atof(sstrsep(&p,sep));
2690 ecdsa_results[k][1]=1/(1/ecdsa_results[k][1]+1/d);
2692 ecdsa_results[k][1]=d;
2696 #ifndef OPENSSL_NO_ECDH
2697 else if(!strncmp(buf,"+F5:",4))
2703 k=atoi(sstrsep(&p,sep));
2706 d=atof(sstrsep(&p,sep));
2708 ecdh_results[k][0]=1/(1/ecdh_results[k][0]+1/d);
2710 ecdh_results[k][0]=d;
2715 else if(!strncmp(buf,"+H:",3))
2719 fprintf(stderr,"Unknown type '%s' from child %d\n",buf,n);