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 #ifndef OPENSSL_NO_DES
161 #include <openssl/des.h>
163 #ifndef OPENSSL_NO_AES
164 #include <openssl/aes.h>
166 #ifndef OPENSSL_NO_MD2
167 #include <openssl/md2.h>
169 #ifndef OPENSSL_NO_MDC2
170 #include <openssl/mdc2.h>
172 #ifndef OPENSSL_NO_MD4
173 #include <openssl/md4.h>
175 #ifndef OPENSSL_NO_MD5
176 #include <openssl/md5.h>
178 #ifndef OPENSSL_NO_HMAC
179 #include <openssl/hmac.h>
181 #include <openssl/evp.h>
182 #ifndef OPENSSL_NO_SHA
183 #include <openssl/sha.h>
185 #ifndef OPENSSL_NO_RIPEMD
186 #include <openssl/ripemd.h>
188 #ifndef OPENSSL_NO_RC4
189 #include <openssl/rc4.h>
191 #ifndef OPENSSL_NO_RC5
192 #include <openssl/rc5.h>
194 #ifndef OPENSSL_NO_RC2
195 #include <openssl/rc2.h>
197 #ifndef OPENSSL_NO_IDEA
198 #include <openssl/idea.h>
200 #ifndef OPENSSL_NO_BF
201 #include <openssl/blowfish.h>
203 #ifndef OPENSSL_NO_CAST
204 #include <openssl/cast.h>
206 #ifndef OPENSSL_NO_RSA
207 #include <openssl/rsa.h>
208 #include "./testrsa.h"
210 #include <openssl/x509.h>
211 #ifndef OPENSSL_NO_DSA
212 #include <openssl/dsa.h>
213 #include "./testdsa.h"
215 #ifndef OPENSSL_NO_ECDSA
216 #include <openssl/ecdsa.h>
218 #ifndef OPENSSL_NO_ECDH
219 #include <openssl/ecdh.h>
223 * The following "HZ" timing stuff should be sync'd up with the code in
224 * crypto/tmdiff.[ch]. That appears to try to do the same job, though I think
225 * this code is more up to date than libcrypto's so there may be features to
226 * migrate over first. This is used in two places further down AFAICS.
227 * The point is that nothing in openssl actually *uses* that tmdiff stuff, so
228 * either speed.c should be using it or it should go because it's obviously not
229 * useful enough. Anyone want to do a janitorial job on this?
232 /* The following if from times(3) man page. It may need to be changed */
234 # if defined(_SC_CLK_TCK) \
235 && (!defined(OPENSSL_SYS_VMS) || __CTRL_VER >= 70000000)
236 # define HZ sysconf(_SC_CLK_TCK)
239 # ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
241 # else /* _BSD_CLK_TCK_ */
242 # define HZ ((double)_BSD_CLK_TCK_)
245 # define HZ ((double)CLK_TCK)
250 #if !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_WINDOWS) && !defined(OPENSSL_SYS_MACINTOSH_CLASSIC) && !defined(OPENSSL_SYS_OS2) && !defined(OPENSSL_SYS_NETWARE)
255 #define BUFSIZE ((long)1024*8+1)
258 static char ftime_used = 0, times_used = 0, gettimeofday_used = 0, getrusage_used = 0;
260 static int usertime=1;
262 static double Time_F(int s);
263 static void print_message(const char *s,long num,int length);
264 static void pkey_print_message(char *str,char *str2,long num,int bits,int sec);
265 static void print_result(int alg,int run_no,int count,double time_used);
267 static int do_multi(int multi);
276 #define MAX_ECDH_SIZE 256
278 static const char *names[ALGOR_NUM]={
279 "md2","mdc2","md4","md5","hmac(md5)","sha1","rmd160","rc4",
280 "des cbc","des ede3","idea cbc",
281 "rc2 cbc","rc5-32/12 cbc","blowfish cbc","cast cbc",
282 "aes-128 cbc","aes-192 cbc","aes-256 cbc"};
283 static double results[ALGOR_NUM][SIZE_NUM];
284 static int lengths[SIZE_NUM]={16,64,256,1024,8*1024};
285 static double rsa_results[RSA_NUM][2];
286 static double dsa_results[DSA_NUM][2];
287 static double ecdsa_results[EC_NUM][2];
288 static double ecdh_results[EC_NUM][1];
292 #if defined(__STDC__) || defined(sgi) || defined(_AIX)
293 #define SIGRETTYPE void
295 #define SIGRETTYPE int
298 static SIGRETTYPE sig_done(int sig);
299 static SIGRETTYPE sig_done(int sig)
301 signal(SIGALRM,sig_done);
312 #if defined(OPENSSL_SYS_NETWARE)
314 /* for NetWare the best we can do is use clock() which returns the
315 * time, in hundredths of a second, since the NLM began executing
317 static double Time_F(int s)
321 static clock_t tstart,tend;
331 ret=(double)((double)(tend)-(double)(tstart));
332 return((ret < 0.001)?0.001:ret);
338 static double Time_F(int s)
345 static struct rusage tstart,tend;
350 getrusage(RUSAGE_SELF,&tstart);
357 getrusage(RUSAGE_SELF,&tend);
358 i=(long)tend.ru_utime.tv_usec-(long)tstart.ru_utime.tv_usec;
359 ret=((double)(tend.ru_utime.tv_sec-tstart.ru_utime.tv_sec))
360 +((double)i)/1000000.0;
361 return((ret < 0.001)?0.001:ret);
366 static struct timeval tstart,tend;
369 gettimeofday_used = 1;
372 gettimeofday(&tstart,NULL);
377 gettimeofday(&tend,NULL);
378 i=(long)tend.tv_usec-(long)tstart.tv_usec;
379 ret=((double)(tend.tv_sec-tstart.tv_sec))+((double)i)/1000000.0;
380 return((ret < 0.001)?0.001:ret);
383 #else /* ndef USE_TOD */
388 static struct tms tstart,tend;
400 ret=(double)(tend.tms_utime-tstart.tms_utime) / ret;
401 return((ret < 1e-3)?1e-3:ret);
404 # endif /* times() */
405 # if defined(TIMES) && defined(TIMEB)
408 # ifdef OPENSSL_SYS_VXWORKS
410 static unsigned long tick_start, tick_end;
414 tick_start = tickGet();
419 tick_end = tickGet();
420 ret = (double)(tick_end - tick_start) / (double)sysClkRateGet();
421 return((ret < 0.001)?0.001:ret);
424 # elif defined(TIMEB)
426 static struct timeb tstart,tend;
438 i=(long)tend.millitm-(long)tstart.millitm;
439 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
440 return((ret < 0.001)?0.001:ret);
446 #endif /* if defined(OPENSSL_SYS_NETWARE) */
449 static const int KDF1_SHA1_len = 20;
450 static void *KDF1_SHA1(void *in, size_t inlen, void *out, size_t outlen)
452 #ifndef OPENSSL_NO_SHA
453 if (outlen != SHA_DIGEST_LENGTH)
455 return SHA1(in, inlen, out);
462 int MAIN(int, char **);
464 int MAIN(int argc, char **argv)
466 #ifndef OPENSSL_NO_ENGINE
469 unsigned char *buf=NULL,*buf2=NULL;
471 long count=0,save_count=0;
473 #if !defined(OPENSSL_NO_RSA) || !defined(OPENSSL_NO_DSA)
476 #ifndef OPENSSL_NO_RSA
479 unsigned char md[EVP_MAX_MD_SIZE];
480 #ifndef OPENSSL_NO_MD2
481 unsigned char md2[MD2_DIGEST_LENGTH];
483 #ifndef OPENSSL_NO_MDC2
484 unsigned char mdc2[MDC2_DIGEST_LENGTH];
486 #ifndef OPENSSL_NO_MD4
487 unsigned char md4[MD4_DIGEST_LENGTH];
489 #ifndef OPENSSL_NO_MD5
490 unsigned char md5[MD5_DIGEST_LENGTH];
491 unsigned char hmac[MD5_DIGEST_LENGTH];
493 #ifndef OPENSSL_NO_SHA
494 unsigned char sha[SHA_DIGEST_LENGTH];
496 #ifndef OPENSSL_NO_RIPEMD
497 unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
499 #ifndef OPENSSL_NO_RC4
502 #ifndef OPENSSL_NO_RC5
505 #ifndef OPENSSL_NO_RC2
508 #ifndef OPENSSL_NO_IDEA
509 IDEA_KEY_SCHEDULE idea_ks;
511 #ifndef OPENSSL_NO_BF
514 #ifndef OPENSSL_NO_CAST
517 static const unsigned char key16[16]=
518 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
519 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
520 static const unsigned char key24[24]=
521 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
522 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
523 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
524 static const unsigned char key32[32]=
525 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
526 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
527 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
528 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
529 #ifndef OPENSSL_NO_AES
530 #define MAX_BLOCK_SIZE 128
532 #define MAX_BLOCK_SIZE 64
534 unsigned char DES_iv[8];
535 unsigned char iv[MAX_BLOCK_SIZE/8];
536 #ifndef OPENSSL_NO_DES
537 DES_cblock *buf_as_des_cblock = NULL;
538 static DES_cblock key ={0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
539 static DES_cblock key2={0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
540 static DES_cblock key3={0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
541 DES_key_schedule sch;
542 DES_key_schedule sch2;
543 DES_key_schedule sch3;
545 #ifndef OPENSSL_NO_AES
546 AES_KEY aes_ks1, aes_ks2, aes_ks3;
558 #define D_CBC_IDEA 10
562 #define D_CBC_CAST 14
563 #define D_CBC_128_AES 15
564 #define D_CBC_192_AES 16
565 #define D_CBC_256_AES 17
568 long c[ALGOR_NUM][SIZE_NUM];
594 #ifndef OPENSSL_NO_RSA
595 RSA *rsa_key[RSA_NUM];
596 long rsa_c[RSA_NUM][2];
597 static unsigned int rsa_bits[RSA_NUM]={512,1024,2048,4096};
598 static unsigned char *rsa_data[RSA_NUM]=
599 {test512,test1024,test2048,test4096};
600 static int rsa_data_length[RSA_NUM]={
601 sizeof(test512),sizeof(test1024),
602 sizeof(test2048),sizeof(test4096)};
604 #ifndef OPENSSL_NO_DSA
605 DSA *dsa_key[DSA_NUM];
606 long dsa_c[DSA_NUM][2];
607 static unsigned int dsa_bits[DSA_NUM]={512,1024,2048};
609 #ifndef OPENSSL_NO_EC
610 /* We only test over the following curves as they are representative,
611 * To add tests over more curves, simply add the curve NID
612 * and curve name to the following arrays and increase the
613 * EC_NUM value accordingly.
615 static unsigned int test_curves[EC_NUM] =
619 NID_X9_62_prime192v1,
621 NID_X9_62_prime256v1,
636 static char * test_curves_names[EC_NUM] =
657 static int test_curves_bits[EC_NUM] =
659 160, 192, 224, 256, 384, 521,
660 163, 233, 283, 409, 571,
661 163, 233, 283, 409, 571
666 #ifndef OPENSSL_NO_ECDSA
667 unsigned char ecdsasig[256];
668 unsigned int ecdsasiglen;
669 EC_KEY *ecdsa[EC_NUM];
670 long ecdsa_c[EC_NUM][2];
673 #ifndef OPENSSL_NO_ECDH
674 EC_KEY *ecdh_a[EC_NUM], *ecdh_b[EC_NUM];
675 unsigned char secret_a[MAX_ECDH_SIZE], secret_b[MAX_ECDH_SIZE];
676 int secret_size_a, secret_size_b;
679 long ecdh_c[EC_NUM][2];
682 int rsa_doit[RSA_NUM];
683 int dsa_doit[DSA_NUM];
684 int ecdsa_doit[EC_NUM];
685 int ecdh_doit[EC_NUM];
688 const EVP_CIPHER *evp_cipher=NULL;
689 const EVP_MD *evp_md=NULL;
700 memset(results, 0, sizeof(results));
701 #ifndef OPENSSL_NO_DSA
702 memset(dsa_key,0,sizeof(dsa_key));
704 #ifndef OPENSSL_NO_ECDSA
705 for (i=0; i<EC_NUM; i++) ecdsa[i] = NULL;
707 #ifndef OPENSSL_NO_ECDH
708 for (i=0; i<EC_NUM; i++)
717 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
718 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
720 if (!load_config(bio_err, NULL))
723 #ifndef OPENSSL_NO_RSA
724 memset(rsa_key,0,sizeof(rsa_key));
725 for (i=0; i<RSA_NUM; i++)
729 if ((buf=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
731 BIO_printf(bio_err,"out of memory\n");
734 #ifndef OPENSSL_NO_DES
735 buf_as_des_cblock = (DES_cblock *)buf;
737 if ((buf2=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
739 BIO_printf(bio_err,"out of memory\n");
743 memset(c,0,sizeof(c));
744 memset(DES_iv,0,sizeof(DES_iv));
745 memset(iv,0,sizeof(iv));
747 for (i=0; i<ALGOR_NUM; i++)
749 for (i=0; i<RSA_NUM; i++)
751 for (i=0; i<DSA_NUM; i++)
753 #ifndef OPENSSL_NO_ECDSA
754 for (i=0; i<EC_NUM; i++)
757 #ifndef OPENSSL_NO_ECDH
758 for (i=0; i<EC_NUM; i++)
768 if ((argc > 0) && (strcmp(*argv,"-elapsed") == 0))
771 j--; /* Otherwise, -elapsed gets confused with
774 else if ((argc > 0) && (strcmp(*argv,"-evp") == 0))
780 BIO_printf(bio_err,"no EVP given\n");
783 evp_cipher=EVP_get_cipherbyname(*argv);
786 evp_md=EVP_get_digestbyname(*argv);
788 if(!evp_cipher && !evp_md)
790 BIO_printf(bio_err,"%s is an unknown cipher or digest\n",*argv);
795 else if (argc > 0 && !strcmp(*argv,"-decrypt"))
798 j--; /* Otherwise, -elapsed gets confused with
801 #ifndef OPENSSL_NO_ENGINE
802 else if ((argc > 0) && (strcmp(*argv,"-engine") == 0))
808 BIO_printf(bio_err,"no engine given\n");
811 e = setup_engine(bio_err, *argv, 0);
812 /* j will be increased again further down. We just
813 don't want speed to confuse an engine with an
814 algorithm, especially when none is given (which
815 means all of them should be run) */
820 else if ((argc > 0) && (strcmp(*argv,"-multi") == 0))
826 BIO_printf(bio_err,"no multi count given\n");
832 BIO_printf(bio_err,"bad multi count\n");
835 j--; /* Otherwise, -mr gets confused with
839 else if (argc > 0 && !strcmp(*argv,"-mr"))
842 j--; /* Otherwise, -mr gets confused with
846 #ifndef OPENSSL_NO_MD2
847 if (strcmp(*argv,"md2") == 0) doit[D_MD2]=1;
850 #ifndef OPENSSL_NO_MDC2
851 if (strcmp(*argv,"mdc2") == 0) doit[D_MDC2]=1;
854 #ifndef OPENSSL_NO_MD4
855 if (strcmp(*argv,"md4") == 0) doit[D_MD4]=1;
858 #ifndef OPENSSL_NO_MD5
859 if (strcmp(*argv,"md5") == 0) doit[D_MD5]=1;
862 #ifndef OPENSSL_NO_MD5
863 if (strcmp(*argv,"hmac") == 0) doit[D_HMAC]=1;
866 #ifndef OPENSSL_NO_SHA
867 if (strcmp(*argv,"sha1") == 0) doit[D_SHA1]=1;
869 if (strcmp(*argv,"sha") == 0) doit[D_SHA1]=1;
872 #ifndef OPENSSL_NO_RIPEMD
873 if (strcmp(*argv,"ripemd") == 0) doit[D_RMD160]=1;
875 if (strcmp(*argv,"rmd160") == 0) doit[D_RMD160]=1;
877 if (strcmp(*argv,"ripemd160") == 0) doit[D_RMD160]=1;
880 #ifndef OPENSSL_NO_RC4
881 if (strcmp(*argv,"rc4") == 0) doit[D_RC4]=1;
884 #ifndef OPENSSL_NO_DES
885 if (strcmp(*argv,"des-cbc") == 0) doit[D_CBC_DES]=1;
886 else if (strcmp(*argv,"des-ede3") == 0) doit[D_EDE3_DES]=1;
889 #ifndef OPENSSL_NO_AES
890 if (strcmp(*argv,"aes-128-cbc") == 0) doit[D_CBC_128_AES]=1;
891 else if (strcmp(*argv,"aes-192-cbc") == 0) doit[D_CBC_192_AES]=1;
892 else if (strcmp(*argv,"aes-256-cbc") == 0) doit[D_CBC_256_AES]=1;
895 #ifndef OPENSSL_NO_RSA
896 #if 0 /* was: #ifdef RSAref */
897 if (strcmp(*argv,"rsaref") == 0)
899 RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
905 if (strcmp(*argv,"openssl") == 0)
907 RSA_set_default_method(RSA_PKCS1_SSLeay());
912 #endif /* !OPENSSL_NO_RSA */
913 if (strcmp(*argv,"dsa512") == 0) dsa_doit[R_DSA_512]=2;
914 else if (strcmp(*argv,"dsa1024") == 0) dsa_doit[R_DSA_1024]=2;
915 else if (strcmp(*argv,"dsa2048") == 0) dsa_doit[R_DSA_2048]=2;
916 else if (strcmp(*argv,"rsa512") == 0) rsa_doit[R_RSA_512]=2;
917 else if (strcmp(*argv,"rsa1024") == 0) rsa_doit[R_RSA_1024]=2;
918 else if (strcmp(*argv,"rsa2048") == 0) rsa_doit[R_RSA_2048]=2;
919 else if (strcmp(*argv,"rsa4096") == 0) rsa_doit[R_RSA_4096]=2;
921 #ifndef OPENSSL_NO_RC2
922 if (strcmp(*argv,"rc2-cbc") == 0) doit[D_CBC_RC2]=1;
923 else if (strcmp(*argv,"rc2") == 0) doit[D_CBC_RC2]=1;
926 #ifndef OPENSSL_NO_RC5
927 if (strcmp(*argv,"rc5-cbc") == 0) doit[D_CBC_RC5]=1;
928 else if (strcmp(*argv,"rc5") == 0) doit[D_CBC_RC5]=1;
931 #ifndef OPENSSL_NO_IDEA
932 if (strcmp(*argv,"idea-cbc") == 0) doit[D_CBC_IDEA]=1;
933 else if (strcmp(*argv,"idea") == 0) doit[D_CBC_IDEA]=1;
936 #ifndef OPENSSL_NO_BF
937 if (strcmp(*argv,"bf-cbc") == 0) doit[D_CBC_BF]=1;
938 else if (strcmp(*argv,"blowfish") == 0) doit[D_CBC_BF]=1;
939 else if (strcmp(*argv,"bf") == 0) doit[D_CBC_BF]=1;
942 #ifndef OPENSSL_NO_CAST
943 if (strcmp(*argv,"cast-cbc") == 0) doit[D_CBC_CAST]=1;
944 else if (strcmp(*argv,"cast") == 0) doit[D_CBC_CAST]=1;
945 else if (strcmp(*argv,"cast5") == 0) doit[D_CBC_CAST]=1;
948 #ifndef OPENSSL_NO_DES
949 if (strcmp(*argv,"des") == 0)
956 #ifndef OPENSSL_NO_AES
957 if (strcmp(*argv,"aes") == 0)
959 doit[D_CBC_128_AES]=1;
960 doit[D_CBC_192_AES]=1;
961 doit[D_CBC_256_AES]=1;
965 #ifndef OPENSSL_NO_RSA
966 if (strcmp(*argv,"rsa") == 0)
968 rsa_doit[R_RSA_512]=1;
969 rsa_doit[R_RSA_1024]=1;
970 rsa_doit[R_RSA_2048]=1;
971 rsa_doit[R_RSA_4096]=1;
975 #ifndef OPENSSL_NO_DSA
976 if (strcmp(*argv,"dsa") == 0)
978 dsa_doit[R_DSA_512]=1;
979 dsa_doit[R_DSA_1024]=1;
980 dsa_doit[R_DSA_2048]=1;
984 #ifndef OPENSSL_NO_ECDSA
985 if (strcmp(*argv,"ecdsap160") == 0) ecdsa_doit[R_EC_P160]=2;
986 else if (strcmp(*argv,"ecdsap224") == 0) ecdsa_doit[R_EC_P224]=2;
987 else if (strcmp(*argv,"ecdsap256") == 0) ecdsa_doit[R_EC_P256]=2;
988 else if (strcmp(*argv,"ecdsap384") == 0) ecdsa_doit[R_EC_P384]=2;
989 else if (strcmp(*argv,"ecdsap521") == 0) ecdsa_doit[R_EC_P521]=2;
990 else if (strcmp(*argv,"ecdsak163") == 0) ecdsa_doit[R_EC_K163]=2;
991 else if (strcmp(*argv,"ecdsak233") == 0) ecdsa_doit[R_EC_K233]=2;
992 else if (strcmp(*argv,"ecdsak283") == 0) ecdsa_doit[R_EC_K283]=2;
993 else if (strcmp(*argv,"ecdsak409") == 0) ecdsa_doit[R_EC_K409]=2;
994 else if (strcmp(*argv,"ecdsak571") == 0) ecdsa_doit[R_EC_K571]=2;
995 else if (strcmp(*argv,"ecdsab163") == 0) ecdsa_doit[R_EC_B163]=2;
996 else if (strcmp(*argv,"ecdsab233") == 0) ecdsa_doit[R_EC_B233]=2;
997 else if (strcmp(*argv,"ecdsab283") == 0) ecdsa_doit[R_EC_B283]=2;
998 else if (strcmp(*argv,"ecdsab409") == 0) ecdsa_doit[R_EC_B409]=2;
999 else if (strcmp(*argv,"ecdsab571") == 0) ecdsa_doit[R_EC_B571]=2;
1000 else if (strcmp(*argv,"ecdsa") == 0)
1002 for (i=0; i < EC_NUM; i++)
1007 #ifndef OPENSSL_NO_ECDH
1008 if (strcmp(*argv,"ecdhp160") == 0) ecdh_doit[R_EC_P160]=2;
1009 else if (strcmp(*argv,"ecdhp224") == 0) ecdh_doit[R_EC_P224]=2;
1010 else if (strcmp(*argv,"ecdhp256") == 0) ecdh_doit[R_EC_P256]=2;
1011 else if (strcmp(*argv,"ecdhp384") == 0) ecdh_doit[R_EC_P384]=2;
1012 else if (strcmp(*argv,"ecdhp521") == 0) ecdh_doit[R_EC_P521]=2;
1013 else if (strcmp(*argv,"ecdhk163") == 0) ecdh_doit[R_EC_K163]=2;
1014 else if (strcmp(*argv,"ecdhk233") == 0) ecdh_doit[R_EC_K233]=2;
1015 else if (strcmp(*argv,"ecdhk283") == 0) ecdh_doit[R_EC_K283]=2;
1016 else if (strcmp(*argv,"ecdhk409") == 0) ecdh_doit[R_EC_K409]=2;
1017 else if (strcmp(*argv,"ecdhk571") == 0) ecdh_doit[R_EC_K571]=2;
1018 else if (strcmp(*argv,"ecdhb163") == 0) ecdh_doit[R_EC_B163]=2;
1019 else if (strcmp(*argv,"ecdhb233") == 0) ecdh_doit[R_EC_B233]=2;
1020 else if (strcmp(*argv,"ecdhb283") == 0) ecdh_doit[R_EC_B283]=2;
1021 else if (strcmp(*argv,"ecdhb409") == 0) ecdh_doit[R_EC_B409]=2;
1022 else if (strcmp(*argv,"ecdhb571") == 0) ecdh_doit[R_EC_B571]=2;
1023 else if (strcmp(*argv,"ecdh") == 0)
1025 for (i=0; i < EC_NUM; i++)
1031 BIO_printf(bio_err,"Error: bad option or value\n");
1032 BIO_printf(bio_err,"\n");
1033 BIO_printf(bio_err,"Available values:\n");
1034 #ifndef OPENSSL_NO_MD2
1035 BIO_printf(bio_err,"md2 ");
1037 #ifndef OPENSSL_NO_MDC2
1038 BIO_printf(bio_err,"mdc2 ");
1040 #ifndef OPENSSL_NO_MD4
1041 BIO_printf(bio_err,"md4 ");
1043 #ifndef OPENSSL_NO_MD5
1044 BIO_printf(bio_err,"md5 ");
1045 #ifndef OPENSSL_NO_HMAC
1046 BIO_printf(bio_err,"hmac ");
1049 #ifndef OPENSSL_NO_SHA1
1050 BIO_printf(bio_err,"sha1 ");
1052 #ifndef OPENSSL_NO_RIPEMD160
1053 BIO_printf(bio_err,"rmd160");
1055 #if !defined(OPENSSL_NO_MD2) || !defined(OPENSSL_NO_MDC2) || \
1056 !defined(OPENSSL_NO_MD4) || !defined(OPENSSL_NO_MD5) || \
1057 !defined(OPENSSL_NO_SHA1) || !defined(OPENSSL_NO_RIPEMD160)
1058 BIO_printf(bio_err,"\n");
1061 #ifndef OPENSSL_NO_IDEA
1062 BIO_printf(bio_err,"idea-cbc ");
1064 #ifndef OPENSSL_NO_RC2
1065 BIO_printf(bio_err,"rc2-cbc ");
1067 #ifndef OPENSSL_NO_RC5
1068 BIO_printf(bio_err,"rc5-cbc ");
1070 #ifndef OPENSSL_NO_BF
1071 BIO_printf(bio_err,"bf-cbc");
1073 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1074 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_RC5)
1075 BIO_printf(bio_err,"\n");
1077 #ifndef OPENSSL_NO_DES
1078 BIO_printf(bio_err,"des-cbc des-ede3 ");
1080 #ifndef OPENSSL_NO_AES
1081 BIO_printf(bio_err,"aes-128-cbc aes-192-cbc aes-256-cbc ");
1083 #ifndef OPENSSL_NO_RC4
1084 BIO_printf(bio_err,"rc4");
1086 BIO_printf(bio_err,"\n");
1088 #ifndef OPENSSL_NO_RSA
1089 BIO_printf(bio_err,"rsa512 rsa1024 rsa2048 rsa4096\n");
1092 #ifndef OPENSSL_NO_DSA
1093 BIO_printf(bio_err,"dsa512 dsa1024 dsa2048\n");
1095 #ifndef OPENSSL_NO_ECDSA
1096 BIO_printf(bio_err,"ecdsap160 ecdsap224 ecdsap256 ecdsap384 ecdsap521\n");
1097 BIO_printf(bio_err,"ecdsak163 ecdsak233 ecdsak283 ecdsak409 ecdsak571\n");
1098 BIO_printf(bio_err,"ecdsab163 ecdsab233 ecdsab283 ecdsab409 ecdsab571\n");
1099 BIO_printf(bio_err,"ecdsa\n");
1101 #ifndef OPENSSL_NO_ECDH
1102 BIO_printf(bio_err,"ecdhp160 ecdhp224 ecdhp256 ecdhp384 ecdhp521\n");
1103 BIO_printf(bio_err,"ecdhk163 ecdhk233 ecdhk283 ecdhk409 ecdhk571\n");
1104 BIO_printf(bio_err,"ecdhb163 ecdhb233 ecdhb283 ecdhb409 ecdhb571\n");
1105 BIO_printf(bio_err,"ecdh\n");
1108 #ifndef OPENSSL_NO_IDEA
1109 BIO_printf(bio_err,"idea ");
1111 #ifndef OPENSSL_NO_RC2
1112 BIO_printf(bio_err,"rc2 ");
1114 #ifndef OPENSSL_NO_DES
1115 BIO_printf(bio_err,"des ");
1117 #ifndef OPENSSL_NO_AES
1118 BIO_printf(bio_err,"aes ");
1120 #ifndef OPENSSL_NO_RSA
1121 BIO_printf(bio_err,"rsa ");
1123 #ifndef OPENSSL_NO_BF
1124 BIO_printf(bio_err,"blowfish");
1126 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1127 !defined(OPENSSL_NO_DES) || !defined(OPENSSL_NO_RSA) || \
1128 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_AES)
1129 BIO_printf(bio_err,"\n");
1132 BIO_printf(bio_err,"\n");
1133 BIO_printf(bio_err,"Available options:\n");
1134 #if defined(TIMES) || defined(USE_TOD)
1135 BIO_printf(bio_err,"-elapsed measure time in real time instead of CPU user time.\n");
1137 #ifndef OPENSSL_NO_ENGINE
1138 BIO_printf(bio_err,"-engine e use engine e, possibly a hardware device.\n");
1140 BIO_printf(bio_err,"-evp e use EVP e.\n");
1141 BIO_printf(bio_err,"-decrypt time decryption instead of encryption (only EVP).\n");
1142 BIO_printf(bio_err,"-mr produce machine readable output.\n");
1144 BIO_printf(bio_err,"-multi n run n benchmarks in parallel.\n");
1154 if(multi && do_multi(multi))
1160 for (i=0; i<ALGOR_NUM; i++)
1165 for (i=0; i<RSA_NUM; i++)
1167 for (i=0; i<DSA_NUM; i++)
1170 for (i=0; i<ALGOR_NUM; i++)
1171 if (doit[i]) pr_header++;
1173 if (usertime == 0 && !mr)
1174 BIO_printf(bio_err,"You have chosen to measure elapsed time instead of user CPU time.\n");
1175 if (usertime <= 0 && !mr)
1177 BIO_printf(bio_err,"To get the most accurate results, try to run this\n");
1178 BIO_printf(bio_err,"program when this computer is idle.\n");
1181 #ifndef OPENSSL_NO_RSA
1182 for (i=0; i<RSA_NUM; i++)
1184 const unsigned char *p;
1187 rsa_key[i]=d2i_RSAPrivateKey(NULL,&p,rsa_data_length[i]);
1188 if (rsa_key[i] == NULL)
1190 BIO_printf(bio_err,"internal error loading RSA key number %d\n",i);
1196 BIO_printf(bio_err,mr ? "+RK:%d:"
1197 : "Loaded RSA key, %d bit modulus and e= 0x",
1198 BN_num_bits(rsa_key[i]->n));
1199 BN_print(bio_err,rsa_key[i]->e);
1200 BIO_printf(bio_err,"\n");
1206 #ifndef OPENSSL_NO_DSA
1207 dsa_key[0]=get_dsa512();
1208 dsa_key[1]=get_dsa1024();
1209 dsa_key[2]=get_dsa2048();
1212 #ifndef OPENSSL_NO_DES
1213 DES_set_key_unchecked(&key,&sch);
1214 DES_set_key_unchecked(&key2,&sch2);
1215 DES_set_key_unchecked(&key3,&sch3);
1217 #ifndef OPENSSL_NO_AES
1218 AES_set_encrypt_key(key16,128,&aes_ks1);
1219 AES_set_encrypt_key(key24,192,&aes_ks2);
1220 AES_set_encrypt_key(key32,256,&aes_ks3);
1222 #ifndef OPENSSL_NO_IDEA
1223 idea_set_encrypt_key(key16,&idea_ks);
1225 #ifndef OPENSSL_NO_RC4
1226 RC4_set_key(&rc4_ks,16,key16);
1228 #ifndef OPENSSL_NO_RC2
1229 RC2_set_key(&rc2_ks,16,key16,128);
1231 #ifndef OPENSSL_NO_RC5
1232 RC5_32_set_key(&rc5_ks,16,key16,12);
1234 #ifndef OPENSSL_NO_BF
1235 BF_set_key(&bf_ks,16,key16);
1237 #ifndef OPENSSL_NO_CAST
1238 CAST_set_key(&cast_ks,16,key16);
1240 #ifndef OPENSSL_NO_RSA
1241 memset(rsa_c,0,sizeof(rsa_c));
1244 #ifndef OPENSSL_NO_DES
1245 BIO_printf(bio_err,"First we calculate the approximate speed ...\n");
1251 for (i=count; i; i--)
1252 DES_ecb_encrypt(buf_as_des_cblock,buf_as_des_cblock,
1257 c[D_MD2][0]=count/10;
1258 c[D_MDC2][0]=count/10;
1263 c[D_RMD160][0]=count;
1264 c[D_RC4][0]=count*5;
1265 c[D_CBC_DES][0]=count;
1266 c[D_EDE3_DES][0]=count/3;
1267 c[D_CBC_IDEA][0]=count;
1268 c[D_CBC_RC2][0]=count;
1269 c[D_CBC_RC5][0]=count;
1270 c[D_CBC_BF][0]=count;
1271 c[D_CBC_CAST][0]=count;
1272 c[D_CBC_128_AES][0]=count;
1273 c[D_CBC_192_AES][0]=count;
1274 c[D_CBC_256_AES][0]=count;
1276 for (i=1; i<SIZE_NUM; i++)
1278 c[D_MD2][i]=c[D_MD2][0]*4*lengths[0]/lengths[i];
1279 c[D_MDC2][i]=c[D_MDC2][0]*4*lengths[0]/lengths[i];
1280 c[D_MD4][i]=c[D_MD4][0]*4*lengths[0]/lengths[i];
1281 c[D_MD5][i]=c[D_MD5][0]*4*lengths[0]/lengths[i];
1282 c[D_HMAC][i]=c[D_HMAC][0]*4*lengths[0]/lengths[i];
1283 c[D_SHA1][i]=c[D_SHA1][0]*4*lengths[0]/lengths[i];
1284 c[D_RMD160][i]=c[D_RMD160][0]*4*lengths[0]/lengths[i];
1286 for (i=1; i<SIZE_NUM; i++)
1290 l0=(long)lengths[i-1];
1291 l1=(long)lengths[i];
1292 c[D_RC4][i]=c[D_RC4][i-1]*l0/l1;
1293 c[D_CBC_DES][i]=c[D_CBC_DES][i-1]*l0/l1;
1294 c[D_EDE3_DES][i]=c[D_EDE3_DES][i-1]*l0/l1;
1295 c[D_CBC_IDEA][i]=c[D_CBC_IDEA][i-1]*l0/l1;
1296 c[D_CBC_RC2][i]=c[D_CBC_RC2][i-1]*l0/l1;
1297 c[D_CBC_RC5][i]=c[D_CBC_RC5][i-1]*l0/l1;
1298 c[D_CBC_BF][i]=c[D_CBC_BF][i-1]*l0/l1;
1299 c[D_CBC_CAST][i]=c[D_CBC_CAST][i-1]*l0/l1;
1300 c[D_CBC_128_AES][i]=c[D_CBC_128_AES][i-1]*l0/l1;
1301 c[D_CBC_192_AES][i]=c[D_CBC_192_AES][i-1]*l0/l1;
1302 c[D_CBC_256_AES][i]=c[D_CBC_256_AES][i-1]*l0/l1;
1304 #ifndef OPENSSL_NO_RSA
1305 rsa_c[R_RSA_512][0]=count/2000;
1306 rsa_c[R_RSA_512][1]=count/400;
1307 for (i=1; i<RSA_NUM; i++)
1309 rsa_c[i][0]=rsa_c[i-1][0]/8;
1310 rsa_c[i][1]=rsa_c[i-1][1]/4;
1311 if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1315 if (rsa_c[i][0] == 0)
1324 #ifndef OPENSSL_NO_DSA
1325 dsa_c[R_DSA_512][0]=count/1000;
1326 dsa_c[R_DSA_512][1]=count/1000/2;
1327 for (i=1; i<DSA_NUM; i++)
1329 dsa_c[i][0]=dsa_c[i-1][0]/4;
1330 dsa_c[i][1]=dsa_c[i-1][1]/4;
1331 if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1344 #ifndef OPENSSL_NO_ECDSA
1345 ecdsa_c[R_EC_P160][0]=count/1000;
1346 ecdsa_c[R_EC_P160][1]=count/1000/2;
1347 for (i=R_EC_P224; i<=R_EC_P521; i++)
1349 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1350 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1351 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1355 if (ecdsa_c[i] == 0)
1362 ecdsa_c[R_EC_K163][0]=count/1000;
1363 ecdsa_c[R_EC_K163][1]=count/1000/2;
1364 for (i=R_EC_K233; i<=R_EC_K571; i++)
1366 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1367 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1368 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1372 if (ecdsa_c[i] == 0)
1379 ecdsa_c[R_EC_B163][0]=count/1000;
1380 ecdsa_c[R_EC_B163][1]=count/1000/2;
1381 for (i=R_EC_B233; i<=R_EC_B571; i++)
1383 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1384 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1385 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1389 if (ecdsa_c[i] == 0)
1398 #ifndef OPENSSL_NO_ECDH
1399 ecdh_c[R_EC_P160][0]=count/1000;
1400 ecdh_c[R_EC_P160][1]=count/1000;
1401 for (i=R_EC_P224; i<=R_EC_P521; i++)
1403 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1404 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1405 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1416 ecdh_c[R_EC_K163][0]=count/1000;
1417 ecdh_c[R_EC_K163][1]=count/1000;
1418 for (i=R_EC_K233; i<=R_EC_K571; i++)
1420 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1421 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1422 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1433 ecdh_c[R_EC_B163][0]=count/1000;
1434 ecdh_c[R_EC_B163][1]=count/1000;
1435 for (i=R_EC_B233; i<=R_EC_B571; i++)
1437 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1438 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1439 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1452 #define COND(d) (count < (d))
1453 #define COUNT(d) (d)
1455 /* not worth fixing */
1456 # error "You cannot disable DES on systems without SIGALRM."
1457 #endif /* OPENSSL_NO_DES */
1459 #define COND(c) (run)
1460 #define COUNT(d) (count)
1461 signal(SIGALRM,sig_done);
1462 #endif /* SIGALRM */
1464 #ifndef OPENSSL_NO_MD2
1467 for (j=0; j<SIZE_NUM; j++)
1469 print_message(names[D_MD2],c[D_MD2][j],lengths[j]);
1471 for (count=0,run=1; COND(c[D_MD2][j]); count++)
1472 EVP_Digest(buf,(unsigned long)lengths[j],&(md2[0]),NULL,EVP_md2(),NULL);
1474 print_result(D_MD2,j,count,d);
1478 #ifndef OPENSSL_NO_MDC2
1481 for (j=0; j<SIZE_NUM; j++)
1483 print_message(names[D_MDC2],c[D_MDC2][j],lengths[j]);
1485 for (count=0,run=1; COND(c[D_MDC2][j]); count++)
1486 EVP_Digest(buf,(unsigned long)lengths[j],&(mdc2[0]),NULL,EVP_mdc2(),NULL);
1488 print_result(D_MDC2,j,count,d);
1493 #ifndef OPENSSL_NO_MD4
1496 for (j=0; j<SIZE_NUM; j++)
1498 print_message(names[D_MD4],c[D_MD4][j],lengths[j]);
1500 for (count=0,run=1; COND(c[D_MD4][j]); count++)
1501 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md4[0]),NULL,EVP_md4(),NULL);
1503 print_result(D_MD4,j,count,d);
1508 #ifndef OPENSSL_NO_MD5
1511 for (j=0; j<SIZE_NUM; j++)
1513 print_message(names[D_MD5],c[D_MD5][j],lengths[j]);
1515 for (count=0,run=1; COND(c[D_MD5][j]); count++)
1516 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md5[0]),NULL,EVP_get_digestbyname("md5"),NULL);
1518 print_result(D_MD5,j,count,d);
1523 #if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
1528 HMAC_CTX_init(&hctx);
1529 HMAC_Init_ex(&hctx,(unsigned char *)"This is a key...",
1530 16,EVP_md5(), NULL);
1532 for (j=0; j<SIZE_NUM; j++)
1534 print_message(names[D_HMAC],c[D_HMAC][j],lengths[j]);
1536 for (count=0,run=1; COND(c[D_HMAC][j]); count++)
1538 HMAC_Init_ex(&hctx,NULL,0,NULL,NULL);
1539 HMAC_Update(&hctx,buf,lengths[j]);
1540 HMAC_Final(&hctx,&(hmac[0]),NULL);
1543 print_result(D_HMAC,j,count,d);
1545 HMAC_CTX_cleanup(&hctx);
1548 #ifndef OPENSSL_NO_SHA
1551 for (j=0; j<SIZE_NUM; j++)
1553 print_message(names[D_SHA1],c[D_SHA1][j],lengths[j]);
1555 for (count=0,run=1; COND(c[D_SHA1][j]); count++)
1556 EVP_Digest(buf,(unsigned long)lengths[j],&(sha[0]),NULL,EVP_sha1(),NULL);
1558 print_result(D_SHA1,j,count,d);
1562 #ifndef OPENSSL_NO_RIPEMD
1565 for (j=0; j<SIZE_NUM; j++)
1567 print_message(names[D_RMD160],c[D_RMD160][j],lengths[j]);
1569 for (count=0,run=1; COND(c[D_RMD160][j]); count++)
1570 EVP_Digest(buf,(unsigned long)lengths[j],&(rmd160[0]),NULL,EVP_ripemd160(),NULL);
1572 print_result(D_RMD160,j,count,d);
1576 #ifndef OPENSSL_NO_RC4
1579 for (j=0; j<SIZE_NUM; j++)
1581 print_message(names[D_RC4],c[D_RC4][j],lengths[j]);
1583 for (count=0,run=1; COND(c[D_RC4][j]); count++)
1584 RC4(&rc4_ks,(unsigned int)lengths[j],
1587 print_result(D_RC4,j,count,d);
1591 #ifndef OPENSSL_NO_DES
1592 if (doit[D_CBC_DES])
1594 for (j=0; j<SIZE_NUM; j++)
1596 print_message(names[D_CBC_DES],c[D_CBC_DES][j],lengths[j]);
1598 for (count=0,run=1; COND(c[D_CBC_DES][j]); count++)
1599 DES_ncbc_encrypt(buf,buf,lengths[j],&sch,
1600 &DES_iv,DES_ENCRYPT);
1602 print_result(D_CBC_DES,j,count,d);
1606 if (doit[D_EDE3_DES])
1608 for (j=0; j<SIZE_NUM; j++)
1610 print_message(names[D_EDE3_DES],c[D_EDE3_DES][j],lengths[j]);
1612 for (count=0,run=1; COND(c[D_EDE3_DES][j]); count++)
1613 DES_ede3_cbc_encrypt(buf,buf,lengths[j],
1615 &DES_iv,DES_ENCRYPT);
1617 print_result(D_EDE3_DES,j,count,d);
1621 #ifndef OPENSSL_NO_AES
1622 if (doit[D_CBC_128_AES])
1624 for (j=0; j<SIZE_NUM; j++)
1626 print_message(names[D_CBC_128_AES],c[D_CBC_128_AES][j],lengths[j]);
1628 for (count=0,run=1; COND(c[D_CBC_128_AES][j]); count++)
1629 AES_cbc_encrypt(buf,buf,
1630 (unsigned long)lengths[j],&aes_ks1,
1633 print_result(D_CBC_128_AES,j,count,d);
1636 if (doit[D_CBC_192_AES])
1638 for (j=0; j<SIZE_NUM; j++)
1640 print_message(names[D_CBC_192_AES],c[D_CBC_192_AES][j],lengths[j]);
1642 for (count=0,run=1; COND(c[D_CBC_192_AES][j]); count++)
1643 AES_cbc_encrypt(buf,buf,
1644 (unsigned long)lengths[j],&aes_ks2,
1647 print_result(D_CBC_192_AES,j,count,d);
1650 if (doit[D_CBC_256_AES])
1652 for (j=0; j<SIZE_NUM; j++)
1654 print_message(names[D_CBC_256_AES],c[D_CBC_256_AES][j],lengths[j]);
1656 for (count=0,run=1; COND(c[D_CBC_256_AES][j]); count++)
1657 AES_cbc_encrypt(buf,buf,
1658 (unsigned long)lengths[j],&aes_ks3,
1661 print_result(D_CBC_256_AES,j,count,d);
1666 #ifndef OPENSSL_NO_IDEA
1667 if (doit[D_CBC_IDEA])
1669 for (j=0; j<SIZE_NUM; j++)
1671 print_message(names[D_CBC_IDEA],c[D_CBC_IDEA][j],lengths[j]);
1673 for (count=0,run=1; COND(c[D_CBC_IDEA][j]); count++)
1674 idea_cbc_encrypt(buf,buf,
1675 (unsigned long)lengths[j],&idea_ks,
1678 print_result(D_CBC_IDEA,j,count,d);
1682 #ifndef OPENSSL_NO_RC2
1683 if (doit[D_CBC_RC2])
1685 for (j=0; j<SIZE_NUM; j++)
1687 print_message(names[D_CBC_RC2],c[D_CBC_RC2][j],lengths[j]);
1689 for (count=0,run=1; COND(c[D_CBC_RC2][j]); count++)
1690 RC2_cbc_encrypt(buf,buf,
1691 (unsigned long)lengths[j],&rc2_ks,
1694 print_result(D_CBC_RC2,j,count,d);
1698 #ifndef OPENSSL_NO_RC5
1699 if (doit[D_CBC_RC5])
1701 for (j=0; j<SIZE_NUM; j++)
1703 print_message(names[D_CBC_RC5],c[D_CBC_RC5][j],lengths[j]);
1705 for (count=0,run=1; COND(c[D_CBC_RC5][j]); count++)
1706 RC5_32_cbc_encrypt(buf,buf,
1707 (unsigned long)lengths[j],&rc5_ks,
1710 print_result(D_CBC_RC5,j,count,d);
1714 #ifndef OPENSSL_NO_BF
1717 for (j=0; j<SIZE_NUM; j++)
1719 print_message(names[D_CBC_BF],c[D_CBC_BF][j],lengths[j]);
1721 for (count=0,run=1; COND(c[D_CBC_BF][j]); count++)
1722 BF_cbc_encrypt(buf,buf,
1723 (unsigned long)lengths[j],&bf_ks,
1726 print_result(D_CBC_BF,j,count,d);
1730 #ifndef OPENSSL_NO_CAST
1731 if (doit[D_CBC_CAST])
1733 for (j=0; j<SIZE_NUM; j++)
1735 print_message(names[D_CBC_CAST],c[D_CBC_CAST][j],lengths[j]);
1737 for (count=0,run=1; COND(c[D_CBC_CAST][j]); count++)
1738 CAST_cbc_encrypt(buf,buf,
1739 (unsigned long)lengths[j],&cast_ks,
1742 print_result(D_CBC_CAST,j,count,d);
1749 for (j=0; j<SIZE_NUM; j++)
1756 names[D_EVP]=OBJ_nid2ln(evp_cipher->nid);
1757 /* -O3 -fschedule-insns messes up an
1758 * optimization here! names[D_EVP]
1759 * somehow becomes NULL */
1760 print_message(names[D_EVP],save_count,
1763 EVP_CIPHER_CTX_init(&ctx);
1765 EVP_DecryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1767 EVP_EncryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1771 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1772 EVP_DecryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1774 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1775 EVP_EncryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1777 EVP_DecryptFinal_ex(&ctx,buf,&outl);
1779 EVP_EncryptFinal_ex(&ctx,buf,&outl);
1781 EVP_CIPHER_CTX_cleanup(&ctx);
1785 names[D_EVP]=OBJ_nid2ln(evp_md->type);
1786 print_message(names[D_EVP],save_count,
1790 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1791 EVP_Digest(buf,lengths[j],&(md[0]),NULL,evp_md,NULL);
1795 print_result(D_EVP,j,count,d);
1799 RAND_pseudo_bytes(buf,36);
1800 #ifndef OPENSSL_NO_RSA
1801 for (j=0; j<RSA_NUM; j++)
1804 if (!rsa_doit[j]) continue;
1805 ret=RSA_sign(NID_md5_sha1, buf,36, buf2, &rsa_num, rsa_key[j]);
1808 BIO_printf(bio_err,"RSA sign failure. No RSA sign will be done.\n");
1809 ERR_print_errors(bio_err);
1814 pkey_print_message("private","rsa",
1815 rsa_c[j][0],rsa_bits[j],
1817 /* RSA_blinding_on(rsa_key[j],NULL); */
1819 for (count=0,run=1; COND(rsa_c[j][0]); count++)
1821 ret=RSA_sign(NID_md5_sha1, buf,36, buf2,
1822 &rsa_num, rsa_key[j]);
1826 "RSA sign failure\n");
1827 ERR_print_errors(bio_err);
1833 BIO_printf(bio_err,mr ? "+R1:%ld:%d:%.2f\n"
1834 : "%ld %d bit private RSA's in %.2fs\n",
1835 count,rsa_bits[j],d);
1836 rsa_results[j][0]=d/(double)count;
1841 ret=RSA_verify(NID_md5_sha1, buf,36, buf2, rsa_num, rsa_key[j]);
1844 BIO_printf(bio_err,"RSA verify failure. No RSA verify will be done.\n");
1845 ERR_print_errors(bio_err);
1850 pkey_print_message("public","rsa",
1851 rsa_c[j][1],rsa_bits[j],
1854 for (count=0,run=1; COND(rsa_c[j][1]); count++)
1856 ret=RSA_verify(NID_md5_sha1, buf,36, buf2,
1857 rsa_num, rsa_key[j]);
1861 "RSA verify failure\n");
1862 ERR_print_errors(bio_err);
1868 BIO_printf(bio_err,mr ? "+R2:%ld:%d:%.2f\n"
1869 : "%ld %d bit public RSA's in %.2fs\n",
1870 count,rsa_bits[j],d);
1871 rsa_results[j][1]=d/(double)count;
1877 /* if longer than 10s, don't do any more */
1878 for (j++; j<RSA_NUM; j++)
1884 RAND_pseudo_bytes(buf,20);
1885 #ifndef OPENSSL_NO_DSA
1886 if (RAND_status() != 1)
1888 RAND_seed(rnd_seed, sizeof rnd_seed);
1891 for (j=0; j<DSA_NUM; j++)
1896 if (!dsa_doit[j]) continue;
1897 /* DSA_generate_key(dsa_key[j]); */
1898 /* DSA_sign_setup(dsa_key[j],NULL); */
1899 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1903 BIO_printf(bio_err,"DSA sign failure. No DSA sign will be done.\n");
1904 ERR_print_errors(bio_err);
1909 pkey_print_message("sign","dsa",
1910 dsa_c[j][0],dsa_bits[j],
1913 for (count=0,run=1; COND(dsa_c[j][0]); count++)
1915 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1920 "DSA sign failure\n");
1921 ERR_print_errors(bio_err);
1927 BIO_printf(bio_err,mr ? "+R3:%ld:%d:%.2f\n"
1928 : "%ld %d bit DSA signs in %.2fs\n",
1929 count,dsa_bits[j],d);
1930 dsa_results[j][0]=d/(double)count;
1934 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1938 BIO_printf(bio_err,"DSA verify failure. No DSA verify will be done.\n");
1939 ERR_print_errors(bio_err);
1944 pkey_print_message("verify","dsa",
1945 dsa_c[j][1],dsa_bits[j],
1948 for (count=0,run=1; COND(dsa_c[j][1]); count++)
1950 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1955 "DSA verify failure\n");
1956 ERR_print_errors(bio_err);
1962 BIO_printf(bio_err,mr ? "+R4:%ld:%d:%.2f\n"
1963 : "%ld %d bit DSA verify in %.2fs\n",
1964 count,dsa_bits[j],d);
1965 dsa_results[j][1]=d/(double)count;
1970 /* if longer than 10s, don't do any more */
1971 for (j++; j<DSA_NUM; j++)
1975 if (rnd_fake) RAND_cleanup();
1978 #ifndef OPENSSL_NO_ECDSA
1979 if (RAND_status() != 1)
1981 RAND_seed(rnd_seed, sizeof rnd_seed);
1984 for (j=0; j<EC_NUM; j++)
1988 if (!ecdsa_doit[j]) continue; /* Ignore Curve */
1989 ecdsa[j] = EC_KEY_new();
1990 if (ecdsa[j] == NULL)
1992 BIO_printf(bio_err,"ECDSA failure.\n");
1993 ERR_print_errors(bio_err);
1998 ecdsa[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
1999 /* Could not obtain group information */
2000 if (ecdsa[j]->group == NULL)
2002 BIO_printf(bio_err,"ECDSA failure.Could not obtain group information\n");
2003 ERR_print_errors(bio_err);
2009 EC_GROUP_precompute_mult(ecdsa[j]->group, NULL);
2011 /* Perform ECDSA signature test */
2012 EC_KEY_generate_key(ecdsa[j]);
2013 ret = ECDSA_sign(0, buf, 20, ecdsasig,
2014 &ecdsasiglen, ecdsa[j]);
2017 BIO_printf(bio_err,"ECDSA sign failure. No ECDSA sign will be done.\n");
2018 ERR_print_errors(bio_err);
2023 pkey_print_message("sign","ecdsa",
2025 test_curves_bits[j],
2029 for (count=0,run=1; COND(ecdsa_c[j][0]);
2032 ret=ECDSA_sign(0, buf, 20,
2033 ecdsasig, &ecdsasiglen,
2037 BIO_printf(bio_err, "ECDSA sign failure\n");
2038 ERR_print_errors(bio_err);
2045 BIO_printf(bio_err, mr ? "+R5:%ld:%d:%.2f\n" :
2046 "%ld %d bit ECDSA signs in %.2fs \n",
2047 count, test_curves_bits[j], d);
2048 ecdsa_results[j][0]=d/(double)count;
2052 /* Perform ECDSA verification test */
2053 ret=ECDSA_verify(0, buf, 20, ecdsasig,
2054 ecdsasiglen, ecdsa[j]);
2057 BIO_printf(bio_err,"ECDSA verify failure. No ECDSA verify will be done.\n");
2058 ERR_print_errors(bio_err);
2063 pkey_print_message("verify","ecdsa",
2065 test_curves_bits[j],
2068 for (count=0,run=1; COND(ecdsa_c[j][1]); count++)
2070 ret=ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen, ecdsa[j]);
2073 BIO_printf(bio_err, "ECDSA verify failure\n");
2074 ERR_print_errors(bio_err);
2080 BIO_printf(bio_err, mr? "+R6:%ld:%d:%.2f\n"
2081 : "%ld %d bit ECDSA verify in %.2fs\n",
2082 count, test_curves_bits[j], d);
2083 ecdsa_results[j][1]=d/(double)count;
2088 /* if longer than 10s, don't do any more */
2089 for (j++; j<EC_NUM; j++)
2095 if (rnd_fake) RAND_cleanup();
2098 #ifndef OPENSSL_NO_ECDH
2099 if (RAND_status() != 1)
2101 RAND_seed(rnd_seed, sizeof rnd_seed);
2104 for (j=0; j<EC_NUM; j++)
2106 if (!ecdh_doit[j]) continue;
2107 ecdh_a[j] = EC_KEY_new();
2108 ecdh_b[j] = EC_KEY_new();
2109 if ((ecdh_a[j] == NULL) || (ecdh_b[j] == NULL))
2111 BIO_printf(bio_err,"ECDH failure.\n");
2112 ERR_print_errors(bio_err);
2117 ecdh_a[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
2118 if (ecdh_a[j]->group == NULL)
2120 BIO_printf(bio_err,"ECDH failure.\n");
2121 ERR_print_errors(bio_err);
2126 ecdh_b[j]->group = EC_GROUP_dup(ecdh_a[j]->group);
2128 /* generate two ECDH key pairs */
2129 if (!EC_KEY_generate_key(ecdh_a[j]) ||
2130 !EC_KEY_generate_key(ecdh_b[j]))
2132 BIO_printf(bio_err,"ECDH key generation failure.\n");
2133 ERR_print_errors(bio_err);
2138 /* If field size is not more than 24 octets, then use SHA-1 hash of result;
2139 * otherwise, use result (see section 4.8 of draft-ietf-tls-ecc-03.txt).
2141 int field_size, outlen;
2142 void *(*kdf)(void *in, size_t inlen, void *out, size_t xoutlen);
2143 field_size = EC_GROUP_get_degree(ecdh_a[j]->group);
2144 if (field_size <= 24 * 8)
2146 outlen = KDF1_SHA1_len;
2151 outlen = (field_size+7)/8;
2154 secret_size_a = ECDH_compute_key(secret_a, outlen,
2157 secret_size_b = ECDH_compute_key(secret_b, outlen,
2160 if (secret_size_a != secret_size_b)
2165 for (secret_idx = 0;
2166 (secret_idx < secret_size_a)
2167 && (ecdh_checks == 1);
2170 if (secret_a[secret_idx] != secret_b[secret_idx])
2174 if (ecdh_checks == 0)
2176 BIO_printf(bio_err,"ECDH computations don't match.\n");
2177 ERR_print_errors(bio_err);
2181 pkey_print_message("","ecdh",
2183 test_curves_bits[j],
2186 for (count=0,run=1; COND(ecdh_c[j][0]); count++)
2188 ECDH_compute_key(secret_a, outlen,
2193 BIO_printf(bio_err, mr ? "+R7:%ld:%d:%.2f\n" :"%ld %d-bit ECDH ops in %.2fs\n",
2194 count, test_curves_bits[j], d);
2195 ecdh_results[j][0]=d/(double)count;
2203 /* if longer than 10s, don't do any more */
2204 for (j++; j<EC_NUM; j++)
2208 if (rnd_fake) RAND_cleanup();
2215 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_VERSION));
2216 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_BUILT_ON));
2218 printf("%s ",BN_options());
2219 #ifndef OPENSSL_NO_MD2
2220 printf("%s ",MD2_options());
2222 #ifndef OPENSSL_NO_RC4
2223 printf("%s ",RC4_options());
2225 #ifndef OPENSSL_NO_DES
2226 printf("%s ",DES_options());
2228 #ifndef OPENSSL_NO_AES
2229 printf("%s ",AES_options());
2231 #ifndef OPENSSL_NO_IDEA
2232 printf("%s ",idea_options());
2234 #ifndef OPENSSL_NO_BF
2235 printf("%s ",BF_options());
2237 fprintf(stdout,"\n%s\n",SSLeay_version(SSLEAY_CFLAGS));
2238 printf("available timing options: ");
2249 #define as_string(s) (#s)
2252 printf("HZ=%g", dbl);
2255 printf(" [sysconf value]");
2259 printf("timing function used: %s%s%s%s%s%s%s\n",
2260 (ftime_used ? "ftime" : ""),
2261 (ftime_used + times_used > 1 ? "," : ""),
2262 (times_used ? "times" : ""),
2263 (ftime_used + times_used + gettimeofday_used > 1 ? "," : ""),
2264 (gettimeofday_used ? "gettimeofday" : ""),
2265 (ftime_used + times_used + gettimeofday_used + getrusage_used > 1 ? "," : ""),
2266 (getrusage_used ? "getrusage" : ""));
2272 fprintf(stdout,"+H");
2275 fprintf(stdout,"The 'numbers' are in 1000s of bytes per second processed.\n");
2276 fprintf(stdout,"type ");
2278 for (j=0; j<SIZE_NUM; j++)
2279 fprintf(stdout,mr ? ":%d" : "%7d bytes",lengths[j]);
2280 fprintf(stdout,"\n");
2283 for (k=0; k<ALGOR_NUM; k++)
2285 if (!doit[k]) continue;
2287 fprintf(stdout,"+F:%d:%s",k,names[k]);
2289 fprintf(stdout,"%-13s",names[k]);
2290 for (j=0; j<SIZE_NUM; j++)
2292 if (results[k][j] > 10000 && !mr)
2293 fprintf(stdout," %11.2fk",results[k][j]/1e3);
2295 fprintf(stdout,mr ? ":%.2f" : " %11.2f ",results[k][j]);
2297 fprintf(stdout,"\n");
2299 #ifndef OPENSSL_NO_RSA
2301 for (k=0; k<RSA_NUM; k++)
2303 if (!rsa_doit[k]) continue;
2306 printf("%18ssign verify sign/s verify/s\n"," ");
2310 fprintf(stdout,"+F2:%u:%u:%f:%f\n",
2311 k,rsa_bits[k],rsa_results[k][0],
2314 fprintf(stdout,"rsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2315 rsa_bits[k],rsa_results[k][0],rsa_results[k][1],
2316 1.0/rsa_results[k][0],1.0/rsa_results[k][1]);
2319 #ifndef OPENSSL_NO_DSA
2321 for (k=0; k<DSA_NUM; k++)
2323 if (!dsa_doit[k]) continue;
2326 printf("%18ssign verify sign/s verify/s\n"," ");
2330 fprintf(stdout,"+F3:%u:%u:%f:%f\n",
2331 k,dsa_bits[k],dsa_results[k][0],dsa_results[k][1]);
2333 fprintf(stdout,"dsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2334 dsa_bits[k],dsa_results[k][0],dsa_results[k][1],
2335 1.0/dsa_results[k][0],1.0/dsa_results[k][1]);
2338 #ifndef OPENSSL_NO_ECDSA
2340 for (k=0; k<EC_NUM; k++)
2342 if (!ecdsa_doit[k]) continue;
2345 printf("%30ssign verify sign/s verify/s\n"," ");
2350 fprintf(stdout,"+F4:%u:%u:%f:%f\n",
2351 k, test_curves_bits[k],
2352 ecdsa_results[k][0],ecdsa_results[k][1]);
2355 "%4u bit ecdsa (%s) %8.4fs %8.4fs %8.1f %8.1f\n",
2356 test_curves_bits[k],
2357 test_curves_names[k],
2358 ecdsa_results[k][0],ecdsa_results[k][1],
2359 1.0/ecdsa_results[k][0],1.0/ecdsa_results[k][1]);
2364 #ifndef OPENSSL_NO_ECDH
2366 for (k=0; k<EC_NUM; k++)
2368 if (!ecdh_doit[k]) continue;
2371 printf("%30sop op/s\n"," ");
2375 fprintf(stdout,"+F5:%u:%u:%f:%f\n",
2376 k, test_curves_bits[k],
2377 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2380 fprintf(stdout,"%4u bit ecdh (%s) %8.4fs %8.1f\n",
2381 test_curves_bits[k],
2382 test_curves_names[k],
2383 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2390 ERR_print_errors(bio_err);
2391 if (buf != NULL) OPENSSL_free(buf);
2392 if (buf2 != NULL) OPENSSL_free(buf2);
2393 #ifndef OPENSSL_NO_RSA
2394 for (i=0; i<RSA_NUM; i++)
2395 if (rsa_key[i] != NULL)
2396 RSA_free(rsa_key[i]);
2398 #ifndef OPENSSL_NO_DSA
2399 for (i=0; i<DSA_NUM; i++)
2400 if (dsa_key[i] != NULL)
2401 DSA_free(dsa_key[i]);
2404 #ifndef OPENSSL_NO_ECDSA
2405 for (i=0; i<EC_NUM; i++)
2406 if (ecdsa[i] != NULL)
2407 EC_KEY_free(ecdsa[i]);
2409 #ifndef OPENSSL_NO_ECDH
2410 for (i=0; i<EC_NUM; i++)
2412 if (ecdh_a[i] != NULL)
2413 EC_KEY_free(ecdh_a[i]);
2414 if (ecdh_b[i] != NULL)
2415 EC_KEY_free(ecdh_b[i]);
2423 static void print_message(const char *s, long num, int length)
2426 BIO_printf(bio_err,mr ? "+DT:%s:%d:%d\n"
2427 : "Doing %s for %ds on %d size blocks: ",s,SECONDS,length);
2428 (void)BIO_flush(bio_err);
2431 BIO_printf(bio_err,mr ? "+DN:%s:%ld:%d\n"
2432 : "Doing %s %ld times on %d size blocks: ",s,num,length);
2433 (void)BIO_flush(bio_err);
2440 static void pkey_print_message(char *str, char *str2, long num, int bits,
2444 BIO_printf(bio_err,mr ? "+DTP:%d:%s:%s:%d\n"
2445 : "Doing %d bit %s %s's for %ds: ",bits,str,str2,tm);
2446 (void)BIO_flush(bio_err);
2449 BIO_printf(bio_err,mr ? "+DNP:%ld:%d:%s:%s\n"
2450 : "Doing %ld %d bit %s %s's: ",num,bits,str,str2);
2451 (void)BIO_flush(bio_err);
2458 static void print_result(int alg,int run_no,int count,double time_used)
2460 BIO_printf(bio_err,mr ? "+R:%d:%s:%f\n"
2461 : "%d %s's in %.2fs\n",count,names[alg],time_used);
2462 results[alg][run_no]=((double)count)/time_used*lengths[run_no];
2465 static char *sstrsep(char **string, const char *delim)
2468 char *token = *string;
2473 memset(isdelim, 0, sizeof isdelim);
2478 isdelim[(unsigned char)(*delim)] = 1;
2482 while (!isdelim[(unsigned char)(**string)])
2497 static int do_multi(int multi)
2502 static char sep[]=":";
2504 fds=malloc(multi*sizeof *fds);
2505 for(n=0 ; n < multi ; ++n)
2523 printf("Forked child %d\n",n);
2526 /* for now, assume the pipe is long enough to take all the output */
2527 for(n=0 ; n < multi ; ++n)
2533 f=fdopen(fds[n],"r");
2534 while(fgets(buf,sizeof buf,f))
2541 fprintf(stderr,"Don't understand line '%s' from child %d\n",
2545 printf("Got: %s from %d\n",buf,n);
2546 if(!strncmp(buf,"+F:",3))
2552 alg=atoi(sstrsep(&p,sep));
2554 for(j=0 ; j < SIZE_NUM ; ++j)
2555 results[alg][j]+=atof(sstrsep(&p,sep));
2557 else if(!strncmp(buf,"+F2:",4))
2563 k=atoi(sstrsep(&p,sep));
2566 d=atof(sstrsep(&p,sep));
2568 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2570 rsa_results[k][0]=d;
2572 d=atof(sstrsep(&p,sep));
2574 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2576 rsa_results[k][1]=d;
2578 else if(!strncmp(buf,"+F2:",4))
2584 k=atoi(sstrsep(&p,sep));
2587 d=atof(sstrsep(&p,sep));
2589 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2591 rsa_results[k][0]=d;
2593 d=atof(sstrsep(&p,sep));
2595 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2597 rsa_results[k][1]=d;
2599 else if(!strncmp(buf,"+F3:",4))
2605 k=atoi(sstrsep(&p,sep));
2608 d=atof(sstrsep(&p,sep));
2610 dsa_results[k][0]=1/(1/dsa_results[k][0]+1/d);
2612 dsa_results[k][0]=d;
2614 d=atof(sstrsep(&p,sep));
2616 dsa_results[k][1]=1/(1/dsa_results[k][1]+1/d);
2618 dsa_results[k][1]=d;
2620 #ifndef OPENSSL_NO_ECDSA
2621 else if(!strncmp(buf,"+F4:",4))
2627 k=atoi(sstrsep(&p,sep));
2630 d=atof(sstrsep(&p,sep));
2632 ecdsa_results[k][0]=1/(1/ecdsa_results[k][0]+1/d);
2634 ecdsa_results[k][0]=d;
2636 d=atof(sstrsep(&p,sep));
2638 ecdsa_results[k][1]=1/(1/ecdsa_results[k][1]+1/d);
2640 ecdsa_results[k][1]=d;
2644 #ifndef OPENSSL_NO_ECDH
2645 else if(!strncmp(buf,"+F5:",4))
2651 k=atoi(sstrsep(&p,sep));
2654 d=atof(sstrsep(&p,sep));
2656 ecdh_results[k][0]=1/(1/ecdh_results[k][0]+1/d);
2658 ecdh_results[k][0]=d;
2663 else if(!strncmp(buf,"+H:",3))
2667 fprintf(stderr,"Unknown type '%s' from child %d\n",buf,n);