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 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(OPENSSL_SYS_MACOSX)
109 #elif !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VXWORKS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC))
112 #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 # include <sys/types.h>
121 # include <sys/times.h>
124 # include <sys/time.h>
125 # include <sys/resource.h>
128 /* Depending on the VMS version, the tms structure is perhaps defined.
129 The __TMS macro will show if it was. If it wasn't defined, we should
130 undefine TIMES, since that tells the rest of the program how things
131 should be handled. -- Richard Levitte */
132 #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
137 #include <sys/timeb.h>
140 #if !defined(TIMES) && !defined(TIMEB) && !defined(USE_TOD) && !defined(OPENSSL_SYS_VXWORKS)
141 #error "It seems neither struct tms nor struct timeb is supported in this platform!"
144 #if defined(sun) || defined(__ultrix)
145 #define _POSIX_SOURCE
147 #include <sys/param.h>
150 #ifndef OPENSSL_NO_DES
151 #include <openssl/des.h>
153 #ifndef OPENSSL_NO_AES
154 #include <openssl/aes.h>
156 #ifndef OPENSSL_NO_MD2
157 #include <openssl/md2.h>
159 #ifndef OPENSSL_NO_MDC2
160 #include <openssl/mdc2.h>
162 #ifndef OPENSSL_NO_MD4
163 #include <openssl/md4.h>
165 #ifndef OPENSSL_NO_MD5
166 #include <openssl/md5.h>
168 #ifndef OPENSSL_NO_HMAC
169 #include <openssl/hmac.h>
171 #include <openssl/evp.h>
172 #ifndef OPENSSL_NO_SHA
173 #include <openssl/sha.h>
175 #ifndef OPENSSL_NO_RIPEMD
176 #include <openssl/ripemd.h>
178 #ifndef OPENSSL_NO_RC4
179 #include <openssl/rc4.h>
181 #ifndef OPENSSL_NO_RC5
182 #include <openssl/rc5.h>
184 #ifndef OPENSSL_NO_RC2
185 #include <openssl/rc2.h>
187 #ifndef OPENSSL_NO_IDEA
188 #include <openssl/idea.h>
190 #ifndef OPENSSL_NO_BF
191 #include <openssl/blowfish.h>
193 #ifndef OPENSSL_NO_CAST
194 #include <openssl/cast.h>
196 #ifndef OPENSSL_NO_RSA
197 #include <openssl/rsa.h>
198 #include "./testrsa.h"
200 #include <openssl/x509.h>
201 #ifndef OPENSSL_NO_DSA
202 #include "./testdsa.h"
204 #ifndef OPENSSL_NO_ECDSA
205 #include <openssl/ecdsa.h>
207 #ifndef OPENSSL_NO_ECDH
208 #include <openssl/ecdh.h>
212 * The following "HZ" timing stuff should be sync'd up with the code in
213 * crypto/tmdiff.[ch]. That appears to try to do the same job, though I think
214 * this code is more up to date than libcrypto's so there may be features to
215 * migrate over first. This is used in two places further down AFAICS.
216 * The point is that nothing in openssl actually *uses* that tmdiff stuff, so
217 * either speed.c should be using it or it should go because it's obviously not
218 * useful enough. Anyone want to do a janitorial job on this?
221 /* The following if from times(3) man page. It may need to be changed */
223 # if defined(_SC_CLK_TCK) \
224 && (!defined(OPENSSL_SYS_VMS) || __CTRL_VER >= 70000000)
225 # define HZ sysconf(_SC_CLK_TCK)
228 # ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
230 # else /* _BSD_CLK_TCK_ */
231 # define HZ ((double)_BSD_CLK_TCK_)
234 # define HZ ((double)CLK_TCK)
239 #if !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_WINDOWS) && !defined(OPENSSL_SYS_MACINTOSH_CLASSIC) && !defined(OPENSSL_SYS_OS2)
244 #define BUFSIZE ((long)1024*8+1)
247 static char ftime_used = 0, times_used = 0, gettimeofday_used = 0, getrusage_used = 0;
249 static int usertime=1;
251 static double Time_F(int s);
252 static void print_message(const char *s,long num,int length);
253 static void pkey_print_message(char *str,char *str2,long num,int bits,int sec);
254 static void print_result(int alg,int run_no,int count,double time_used);
256 static int do_multi(int multi);
265 #define MAX_ECDH_SIZE 256
267 static const char *names[ALGOR_NUM]={
268 "md2","mdc2","md4","md5","hmac(md5)","sha1","rmd160","rc4",
269 "des cbc","des ede3","idea cbc",
270 "rc2 cbc","rc5-32/12 cbc","blowfish cbc","cast cbc",
271 "aes-128 cbc","aes-192 cbc","aes-256 cbc"};
272 static double results[ALGOR_NUM][SIZE_NUM];
273 static int lengths[SIZE_NUM]={16,64,256,1024,8*1024};
274 static double rsa_results[RSA_NUM][2];
275 static double dsa_results[DSA_NUM][2];
276 static double ecdsa_results[EC_NUM][2];
277 static double ecdh_results[EC_NUM][1];
281 #if defined(__STDC__) || defined(sgi) || defined(_AIX)
282 #define SIGRETTYPE void
284 #define SIGRETTYPE int
287 static SIGRETTYPE sig_done(int sig);
288 static SIGRETTYPE sig_done(int sig)
290 signal(SIGALRM,sig_done);
301 static double Time_F(int s)
308 static struct rusage tstart,tend;
313 getrusage(RUSAGE_SELF,&tstart);
320 getrusage(RUSAGE_SELF,&tend);
321 i=(long)tend.ru_utime.tv_usec-(long)tstart.ru_utime.tv_usec;
322 ret=((double)(tend.ru_utime.tv_sec-tstart.ru_utime.tv_sec))
323 +((double)i)/1000000.0;
324 return((ret < 0.001)?0.001:ret);
329 static struct timeval tstart,tend;
332 gettimeofday_used = 1;
335 gettimeofday(&tstart,NULL);
340 gettimeofday(&tend,NULL);
341 i=(long)tend.tv_usec-(long)tstart.tv_usec;
342 ret=((double)(tend.tv_sec-tstart.tv_sec))+((double)i)/1000000.0;
343 return((ret < 0.001)?0.001:ret);
346 #else /* ndef USE_TOD */
351 static struct tms tstart,tend;
363 ret=(double)(tend.tms_utime-tstart.tms_utime) / ret;
364 return((ret < 1e-3)?1e-3:ret);
367 # endif /* times() */
368 # if defined(TIMES) && defined(TIMEB)
371 # ifdef OPENSSL_SYS_VXWORKS
373 static unsigned long tick_start, tick_end;
377 tick_start = tickGet();
382 tick_end = tickGet();
383 ret = (double)(tick_end - tick_start) / (double)sysClkRateGet();
384 return((ret < 0.001)?0.001:ret);
387 # elif defined(TIMEB)
389 static struct timeb tstart,tend;
401 i=(long)tend.millitm-(long)tstart.millitm;
402 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
403 return((ret < 0.001)?0.001:ret);
411 static const int KDF1_SHA1_len = 20;
412 static void *KDF1_SHA1(void *in, size_t inlen, void *out, size_t outlen)
414 #ifndef OPENSSL_NO_SHA
415 if (outlen != SHA_DIGEST_LENGTH)
417 return SHA1(in, inlen, out);
424 int MAIN(int, char **);
426 int MAIN(int argc, char **argv)
428 #ifndef OPENSSL_NO_ENGINE
431 unsigned char *buf=NULL,*buf2=NULL;
433 long count=0,save_count=0;
435 #if !defined(OPENSSL_NO_RSA) || !defined(OPENSSL_NO_DSA)
438 #ifndef OPENSSL_NO_RSA
441 unsigned char md[EVP_MAX_MD_SIZE];
442 #ifndef OPENSSL_NO_MD2
443 unsigned char md2[MD2_DIGEST_LENGTH];
445 #ifndef OPENSSL_NO_MDC2
446 unsigned char mdc2[MDC2_DIGEST_LENGTH];
448 #ifndef OPENSSL_NO_MD4
449 unsigned char md4[MD4_DIGEST_LENGTH];
451 #ifndef OPENSSL_NO_MD5
452 unsigned char md5[MD5_DIGEST_LENGTH];
453 unsigned char hmac[MD5_DIGEST_LENGTH];
455 #ifndef OPENSSL_NO_SHA
456 unsigned char sha[SHA_DIGEST_LENGTH];
458 #ifndef OPENSSL_NO_RIPEMD
459 unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
461 #ifndef OPENSSL_NO_RC4
464 #ifndef OPENSSL_NO_RC5
467 #ifndef OPENSSL_NO_RC2
470 #ifndef OPENSSL_NO_IDEA
471 IDEA_KEY_SCHEDULE idea_ks;
473 #ifndef OPENSSL_NO_BF
476 #ifndef OPENSSL_NO_CAST
479 static const unsigned char key16[16]=
480 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
481 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
482 static const unsigned char key24[24]=
483 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
484 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
485 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
486 static const unsigned char key32[32]=
487 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
488 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
489 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
490 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
491 #ifndef OPENSSL_NO_AES
492 #define MAX_BLOCK_SIZE 128
494 #define MAX_BLOCK_SIZE 64
496 unsigned char DES_iv[8];
497 unsigned char iv[MAX_BLOCK_SIZE/8];
498 #ifndef OPENSSL_NO_DES
499 DES_cblock *buf_as_des_cblock = NULL;
500 static DES_cblock key ={0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
501 static DES_cblock key2={0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
502 static DES_cblock key3={0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
503 DES_key_schedule sch;
504 DES_key_schedule sch2;
505 DES_key_schedule sch3;
507 #ifndef OPENSSL_NO_AES
508 AES_KEY aes_ks1, aes_ks2, aes_ks3;
520 #define D_CBC_IDEA 10
524 #define D_CBC_CAST 14
525 #define D_CBC_128_AES 15
526 #define D_CBC_192_AES 16
527 #define D_CBC_256_AES 17
530 long c[ALGOR_NUM][SIZE_NUM];
556 #ifndef OPENSSL_NO_RSA
557 RSA *rsa_key[RSA_NUM];
558 long rsa_c[RSA_NUM][2];
559 static unsigned int rsa_bits[RSA_NUM]={512,1024,2048,4096};
560 static unsigned char *rsa_data[RSA_NUM]=
561 {test512,test1024,test2048,test4096};
562 static int rsa_data_length[RSA_NUM]={
563 sizeof(test512),sizeof(test1024),
564 sizeof(test2048),sizeof(test4096)};
566 #ifndef OPENSSL_NO_DSA
567 DSA *dsa_key[DSA_NUM];
568 long dsa_c[DSA_NUM][2];
569 static unsigned int dsa_bits[DSA_NUM]={512,1024,2048};
571 #ifndef OPENSSL_NO_EC
572 /* We only test over the following curves as they are representative,
573 * To add tests over more curves, simply add the curve NID
574 * and curve name to the following arrays and increase the
575 * EC_NUM value accordingly.
577 static unsigned int test_curves[EC_NUM] =
581 NID_X9_62_prime192v1,
583 NID_X9_62_prime256v1,
598 static char * test_curves_names[EC_NUM] =
619 static int test_curves_bits[EC_NUM] =
621 160, 192, 224, 256, 384, 521,
622 163, 233, 283, 409, 571,
623 163, 233, 283, 409, 571
628 #ifndef OPENSSL_NO_ECDSA
629 unsigned char ecdsasig[256];
630 unsigned int ecdsasiglen;
631 EC_KEY *ecdsa[EC_NUM];
632 long ecdsa_c[EC_NUM][2];
635 #ifndef OPENSSL_NO_ECDH
636 EC_KEY *ecdh_a[EC_NUM], *ecdh_b[EC_NUM];
637 unsigned char secret_a[MAX_ECDH_SIZE], secret_b[MAX_ECDH_SIZE];
638 int secret_size_a, secret_size_b;
641 long ecdh_c[EC_NUM][2];
644 int rsa_doit[RSA_NUM];
645 int dsa_doit[DSA_NUM];
646 int ecdsa_doit[EC_NUM];
647 int ecdh_doit[EC_NUM];
650 const EVP_CIPHER *evp_cipher=NULL;
651 const EVP_MD *evp_md=NULL;
662 memset(results, 0, sizeof(results));
663 #ifndef OPENSSL_NO_DSA
664 memset(dsa_key,0,sizeof(dsa_key));
666 #ifndef OPENSSL_NO_ECDSA
667 for (i=0; i<EC_NUM; i++) ecdsa[i] = NULL;
669 #ifndef OPENSSL_NO_ECDH
670 for (i=0; i<EC_NUM; i++)
679 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
680 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
682 if (!load_config(bio_err, NULL))
685 #ifndef OPENSSL_NO_RSA
686 memset(rsa_key,0,sizeof(rsa_key));
687 for (i=0; i<RSA_NUM; i++)
691 if ((buf=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
693 BIO_printf(bio_err,"out of memory\n");
696 #ifndef OPENSSL_NO_DES
697 buf_as_des_cblock = (DES_cblock *)buf;
699 if ((buf2=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
701 BIO_printf(bio_err,"out of memory\n");
705 memset(c,0,sizeof(c));
706 memset(DES_iv,0,sizeof(DES_iv));
707 memset(iv,0,sizeof(iv));
709 for (i=0; i<ALGOR_NUM; i++)
711 for (i=0; i<RSA_NUM; i++)
713 for (i=0; i<DSA_NUM; i++)
715 #ifndef OPENSSL_NO_ECDSA
716 for (i=0; i<EC_NUM; i++)
719 #ifndef OPENSSL_NO_ECDH
720 for (i=0; i<EC_NUM; i++)
730 if ((argc > 0) && (strcmp(*argv,"-elapsed") == 0))
733 j--; /* Otherwise, -elapsed gets confused with
736 else if ((argc > 0) && (strcmp(*argv,"-evp") == 0))
742 BIO_printf(bio_err,"no EVP given\n");
745 evp_cipher=EVP_get_cipherbyname(*argv);
748 evp_md=EVP_get_digestbyname(*argv);
750 if(!evp_cipher && !evp_md)
752 BIO_printf(bio_err,"%s is an unknown cipher or digest\n",*argv);
757 else if (argc > 0 && !strcmp(*argv,"-decrypt"))
760 j--; /* Otherwise, -elapsed gets confused with
763 #ifndef OPENSSL_NO_ENGINE
764 else if ((argc > 0) && (strcmp(*argv,"-engine") == 0))
770 BIO_printf(bio_err,"no engine given\n");
773 e = setup_engine(bio_err, *argv, 0);
774 /* j will be increased again further down. We just
775 don't want speed to confuse an engine with an
776 algorithm, especially when none is given (which
777 means all of them should be run) */
782 else if ((argc > 0) && (strcmp(*argv,"-multi") == 0))
788 BIO_printf(bio_err,"no multi count given\n");
794 BIO_printf(bio_err,"bad multi count\n");
797 j--; /* Otherwise, -mr gets confused with
801 else if (argc > 0 && !strcmp(*argv,"-mr"))
804 j--; /* Otherwise, -mr gets confused with
808 #ifndef OPENSSL_NO_MD2
809 if (strcmp(*argv,"md2") == 0) doit[D_MD2]=1;
812 #ifndef OPENSSL_NO_MDC2
813 if (strcmp(*argv,"mdc2") == 0) doit[D_MDC2]=1;
816 #ifndef OPENSSL_NO_MD4
817 if (strcmp(*argv,"md4") == 0) doit[D_MD4]=1;
820 #ifndef OPENSSL_NO_MD5
821 if (strcmp(*argv,"md5") == 0) doit[D_MD5]=1;
824 #ifndef OPENSSL_NO_MD5
825 if (strcmp(*argv,"hmac") == 0) doit[D_HMAC]=1;
828 #ifndef OPENSSL_NO_SHA
829 if (strcmp(*argv,"sha1") == 0) doit[D_SHA1]=1;
831 if (strcmp(*argv,"sha") == 0) doit[D_SHA1]=1;
834 #ifndef OPENSSL_NO_RIPEMD
835 if (strcmp(*argv,"ripemd") == 0) doit[D_RMD160]=1;
837 if (strcmp(*argv,"rmd160") == 0) doit[D_RMD160]=1;
839 if (strcmp(*argv,"ripemd160") == 0) doit[D_RMD160]=1;
842 #ifndef OPENSSL_NO_RC4
843 if (strcmp(*argv,"rc4") == 0) doit[D_RC4]=1;
846 #ifndef OPENSSL_NO_DES
847 if (strcmp(*argv,"des-cbc") == 0) doit[D_CBC_DES]=1;
848 else if (strcmp(*argv,"des-ede3") == 0) doit[D_EDE3_DES]=1;
851 #ifndef OPENSSL_NO_AES
852 if (strcmp(*argv,"aes-128-cbc") == 0) doit[D_CBC_128_AES]=1;
853 else if (strcmp(*argv,"aes-192-cbc") == 0) doit[D_CBC_192_AES]=1;
854 else if (strcmp(*argv,"aes-256-cbc") == 0) doit[D_CBC_256_AES]=1;
857 #ifndef OPENSSL_NO_RSA
858 #if 0 /* was: #ifdef RSAref */
859 if (strcmp(*argv,"rsaref") == 0)
861 RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
867 if (strcmp(*argv,"openssl") == 0)
869 RSA_set_default_method(RSA_PKCS1_SSLeay());
874 #endif /* !OPENSSL_NO_RSA */
875 if (strcmp(*argv,"dsa512") == 0) dsa_doit[R_DSA_512]=2;
876 else if (strcmp(*argv,"dsa1024") == 0) dsa_doit[R_DSA_1024]=2;
877 else if (strcmp(*argv,"dsa2048") == 0) dsa_doit[R_DSA_2048]=2;
878 else if (strcmp(*argv,"rsa512") == 0) rsa_doit[R_RSA_512]=2;
879 else if (strcmp(*argv,"rsa1024") == 0) rsa_doit[R_RSA_1024]=2;
880 else if (strcmp(*argv,"rsa2048") == 0) rsa_doit[R_RSA_2048]=2;
881 else if (strcmp(*argv,"rsa4096") == 0) rsa_doit[R_RSA_4096]=2;
883 #ifndef OPENSSL_NO_RC2
884 if (strcmp(*argv,"rc2-cbc") == 0) doit[D_CBC_RC2]=1;
885 else if (strcmp(*argv,"rc2") == 0) doit[D_CBC_RC2]=1;
888 #ifndef OPENSSL_NO_RC5
889 if (strcmp(*argv,"rc5-cbc") == 0) doit[D_CBC_RC5]=1;
890 else if (strcmp(*argv,"rc5") == 0) doit[D_CBC_RC5]=1;
893 #ifndef OPENSSL_NO_IDEA
894 if (strcmp(*argv,"idea-cbc") == 0) doit[D_CBC_IDEA]=1;
895 else if (strcmp(*argv,"idea") == 0) doit[D_CBC_IDEA]=1;
898 #ifndef OPENSSL_NO_BF
899 if (strcmp(*argv,"bf-cbc") == 0) doit[D_CBC_BF]=1;
900 else if (strcmp(*argv,"blowfish") == 0) doit[D_CBC_BF]=1;
901 else if (strcmp(*argv,"bf") == 0) doit[D_CBC_BF]=1;
904 #ifndef OPENSSL_NO_CAST
905 if (strcmp(*argv,"cast-cbc") == 0) doit[D_CBC_CAST]=1;
906 else if (strcmp(*argv,"cast") == 0) doit[D_CBC_CAST]=1;
907 else if (strcmp(*argv,"cast5") == 0) doit[D_CBC_CAST]=1;
910 #ifndef OPENSSL_NO_DES
911 if (strcmp(*argv,"des") == 0)
918 #ifndef OPENSSL_NO_AES
919 if (strcmp(*argv,"aes") == 0)
921 doit[D_CBC_128_AES]=1;
922 doit[D_CBC_192_AES]=1;
923 doit[D_CBC_256_AES]=1;
927 #ifndef OPENSSL_NO_RSA
928 if (strcmp(*argv,"rsa") == 0)
930 rsa_doit[R_RSA_512]=1;
931 rsa_doit[R_RSA_1024]=1;
932 rsa_doit[R_RSA_2048]=1;
933 rsa_doit[R_RSA_4096]=1;
937 #ifndef OPENSSL_NO_DSA
938 if (strcmp(*argv,"dsa") == 0)
940 dsa_doit[R_DSA_512]=1;
941 dsa_doit[R_DSA_1024]=1;
945 #ifndef OPENSSL_NO_ECDSA
946 if (strcmp(*argv,"ecdsap160") == 0) ecdsa_doit[R_EC_P160]=2;
947 else if (strcmp(*argv,"ecdsap224") == 0) ecdsa_doit[R_EC_P224]=2;
948 else if (strcmp(*argv,"ecdsap256") == 0) ecdsa_doit[R_EC_P256]=2;
949 else if (strcmp(*argv,"ecdsap384") == 0) ecdsa_doit[R_EC_P384]=2;
950 else if (strcmp(*argv,"ecdsap521") == 0) ecdsa_doit[R_EC_P521]=2;
951 else if (strcmp(*argv,"ecdsak163") == 0) ecdsa_doit[R_EC_K163]=2;
952 else if (strcmp(*argv,"ecdsak233") == 0) ecdsa_doit[R_EC_K233]=2;
953 else if (strcmp(*argv,"ecdsak283") == 0) ecdsa_doit[R_EC_K283]=2;
954 else if (strcmp(*argv,"ecdsak409") == 0) ecdsa_doit[R_EC_K409]=2;
955 else if (strcmp(*argv,"ecdsak571") == 0) ecdsa_doit[R_EC_K571]=2;
956 else if (strcmp(*argv,"ecdsab163") == 0) ecdsa_doit[R_EC_B163]=2;
957 else if (strcmp(*argv,"ecdsab233") == 0) ecdsa_doit[R_EC_B233]=2;
958 else if (strcmp(*argv,"ecdsab283") == 0) ecdsa_doit[R_EC_B283]=2;
959 else if (strcmp(*argv,"ecdsab409") == 0) ecdsa_doit[R_EC_B409]=2;
960 else if (strcmp(*argv,"ecdsab571") == 0) ecdsa_doit[R_EC_B571]=2;
961 else if (strcmp(*argv,"ecdsa") == 0)
963 for (i=0; i < EC_NUM; i++)
968 #ifndef OPENSSL_NO_ECDH
969 if (strcmp(*argv,"ecdhp160") == 0) ecdh_doit[R_EC_P160]=2;
970 else if (strcmp(*argv,"ecdhp224") == 0) ecdh_doit[R_EC_P224]=2;
971 else if (strcmp(*argv,"ecdhp256") == 0) ecdh_doit[R_EC_P256]=2;
972 else if (strcmp(*argv,"ecdhp384") == 0) ecdh_doit[R_EC_P384]=2;
973 else if (strcmp(*argv,"ecdhp521") == 0) ecdh_doit[R_EC_P521]=2;
974 else if (strcmp(*argv,"ecdhk163") == 0) ecdh_doit[R_EC_K163]=2;
975 else if (strcmp(*argv,"ecdhk233") == 0) ecdh_doit[R_EC_K233]=2;
976 else if (strcmp(*argv,"ecdhk283") == 0) ecdh_doit[R_EC_K283]=2;
977 else if (strcmp(*argv,"ecdhk409") == 0) ecdh_doit[R_EC_K409]=2;
978 else if (strcmp(*argv,"ecdhk571") == 0) ecdh_doit[R_EC_K571]=2;
979 else if (strcmp(*argv,"ecdhb163") == 0) ecdh_doit[R_EC_B163]=2;
980 else if (strcmp(*argv,"ecdhb233") == 0) ecdh_doit[R_EC_B233]=2;
981 else if (strcmp(*argv,"ecdhb283") == 0) ecdh_doit[R_EC_B283]=2;
982 else if (strcmp(*argv,"ecdhb409") == 0) ecdh_doit[R_EC_B409]=2;
983 else if (strcmp(*argv,"ecdhb571") == 0) ecdh_doit[R_EC_B571]=2;
984 else if (strcmp(*argv,"ecdh") == 0)
986 for (i=0; i < EC_NUM; i++)
992 BIO_printf(bio_err,"Error: bad option or value\n");
993 BIO_printf(bio_err,"\n");
994 BIO_printf(bio_err,"Available values:\n");
995 #ifndef OPENSSL_NO_MD2
996 BIO_printf(bio_err,"md2 ");
998 #ifndef OPENSSL_NO_MDC2
999 BIO_printf(bio_err,"mdc2 ");
1001 #ifndef OPENSSL_NO_MD4
1002 BIO_printf(bio_err,"md4 ");
1004 #ifndef OPENSSL_NO_MD5
1005 BIO_printf(bio_err,"md5 ");
1006 #ifndef OPENSSL_NO_HMAC
1007 BIO_printf(bio_err,"hmac ");
1010 #ifndef OPENSSL_NO_SHA1
1011 BIO_printf(bio_err,"sha1 ");
1013 #ifndef OPENSSL_NO_RIPEMD160
1014 BIO_printf(bio_err,"rmd160");
1016 #if !defined(OPENSSL_NO_MD2) || !defined(OPENSSL_NO_MDC2) || \
1017 !defined(OPENSSL_NO_MD4) || !defined(OPENSSL_NO_MD5) || \
1018 !defined(OPENSSL_NO_SHA1) || !defined(OPENSSL_NO_RIPEMD160)
1019 BIO_printf(bio_err,"\n");
1022 #ifndef OPENSSL_NO_IDEA
1023 BIO_printf(bio_err,"idea-cbc ");
1025 #ifndef OPENSSL_NO_RC2
1026 BIO_printf(bio_err,"rc2-cbc ");
1028 #ifndef OPENSSL_NO_RC5
1029 BIO_printf(bio_err,"rc5-cbc ");
1031 #ifndef OPENSSL_NO_BF
1032 BIO_printf(bio_err,"bf-cbc");
1034 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1035 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_RC5)
1036 BIO_printf(bio_err,"\n");
1038 #ifndef OPENSSL_NO_DES
1039 BIO_printf(bio_err,"des-cbc des-ede3 ");
1041 #ifndef OPENSSL_NO_AES
1042 BIO_printf(bio_err,"aes-128-cbc aes-192-cbc aes-256-cbc ");
1044 #ifndef OPENSSL_NO_RC4
1045 BIO_printf(bio_err,"rc4");
1047 BIO_printf(bio_err,"\n");
1049 #ifndef OPENSSL_NO_RSA
1050 BIO_printf(bio_err,"rsa512 rsa1024 rsa2048 rsa4096\n");
1053 #ifndef OPENSSL_NO_DSA
1054 BIO_printf(bio_err,"dsa512 dsa1024 dsa2048\n");
1056 #ifndef OPENSSL_NO_ECDSA
1057 BIO_printf(bio_err,"ecdsap160 ecdsap224 ecdsap256 ecdsap384 ecdsap521\n");
1058 BIO_printf(bio_err,"ecdsak163 ecdsak233 ecdsak283 ecdsak409 ecdsak571\n");
1059 BIO_printf(bio_err,"ecdsab163 ecdsab233 ecdsab283 ecdsab409 ecdsab571\n");
1060 BIO_printf(bio_err,"ecdsa\n");
1062 #ifndef OPENSSL_NO_ECDH
1063 BIO_printf(bio_err,"ecdhp160 ecdhp224 ecdhp256 ecdhp384 ecdhp521\n");
1064 BIO_printf(bio_err,"ecdhk163 ecdhk233 ecdhk283 ecdhk409 ecdhk571\n");
1065 BIO_printf(bio_err,"ecdhb163 ecdhb233 ecdhb283 ecdhb409 ecdhb571\n");
1066 BIO_printf(bio_err,"ecdh\n");
1069 #ifndef OPENSSL_NO_IDEA
1070 BIO_printf(bio_err,"idea ");
1072 #ifndef OPENSSL_NO_RC2
1073 BIO_printf(bio_err,"rc2 ");
1075 #ifndef OPENSSL_NO_DES
1076 BIO_printf(bio_err,"des ");
1078 #ifndef OPENSSL_NO_AES
1079 BIO_printf(bio_err,"aes ");
1081 #ifndef OPENSSL_NO_RSA
1082 BIO_printf(bio_err,"rsa ");
1084 #ifndef OPENSSL_NO_BF
1085 BIO_printf(bio_err,"blowfish");
1087 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
1088 !defined(OPENSSL_NO_DES) || !defined(OPENSSL_NO_RSA) || \
1089 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_AES)
1090 BIO_printf(bio_err,"\n");
1093 BIO_printf(bio_err,"\n");
1094 BIO_printf(bio_err,"Available options:\n");
1095 #if defined(TIMES) || defined(USE_TOD)
1096 BIO_printf(bio_err,"-elapsed measure time in real time instead of CPU user time.\n");
1098 #ifndef OPENSSL_NO_ENGINE
1099 BIO_printf(bio_err,"-engine e use engine e, possibly a hardware device.\n");
1101 BIO_printf(bio_err,"-evp e use EVP e.\n");
1102 BIO_printf(bio_err,"-decrypt time decryption instead of encryption (only EVP).\n");
1103 BIO_printf(bio_err,"-mr produce machine readable output.\n");
1105 BIO_printf(bio_err,"-multi n run n benchmarks in parallel.\n");
1115 if(multi && do_multi(multi))
1121 for (i=0; i<ALGOR_NUM; i++)
1126 for (i=0; i<RSA_NUM; i++)
1128 for (i=0; i<DSA_NUM; i++)
1131 for (i=0; i<ALGOR_NUM; i++)
1132 if (doit[i]) pr_header++;
1134 if (usertime == 0 && !mr)
1135 BIO_printf(bio_err,"You have chosen to measure elapsed time instead of user CPU time.\n");
1136 if (usertime <= 0 && !mr)
1138 BIO_printf(bio_err,"To get the most accurate results, try to run this\n");
1139 BIO_printf(bio_err,"program when this computer is idle.\n");
1142 #ifndef OPENSSL_NO_RSA
1143 for (i=0; i<RSA_NUM; i++)
1145 const unsigned char *p;
1148 rsa_key[i]=d2i_RSAPrivateKey(NULL,&p,rsa_data_length[i]);
1149 if (rsa_key[i] == NULL)
1151 BIO_printf(bio_err,"internal error loading RSA key number %d\n",i);
1157 BIO_printf(bio_err,mr ? "+RK:%d:"
1158 : "Loaded RSA key, %d bit modulus and e= 0x",
1159 BN_num_bits(rsa_key[i]->n));
1160 BN_print(bio_err,rsa_key[i]->e);
1161 BIO_printf(bio_err,"\n");
1167 #ifndef OPENSSL_NO_DSA
1168 dsa_key[0]=get_dsa512();
1169 dsa_key[1]=get_dsa1024();
1170 dsa_key[2]=get_dsa2048();
1173 #ifndef OPENSSL_NO_DES
1174 DES_set_key_unchecked(&key,&sch);
1175 DES_set_key_unchecked(&key2,&sch2);
1176 DES_set_key_unchecked(&key3,&sch3);
1178 #ifndef OPENSSL_NO_AES
1179 AES_set_encrypt_key(key16,128,&aes_ks1);
1180 AES_set_encrypt_key(key24,192,&aes_ks2);
1181 AES_set_encrypt_key(key32,256,&aes_ks3);
1183 #ifndef OPENSSL_NO_IDEA
1184 idea_set_encrypt_key(key16,&idea_ks);
1186 #ifndef OPENSSL_NO_RC4
1187 RC4_set_key(&rc4_ks,16,key16);
1189 #ifndef OPENSSL_NO_RC2
1190 RC2_set_key(&rc2_ks,16,key16,128);
1192 #ifndef OPENSSL_NO_RC5
1193 RC5_32_set_key(&rc5_ks,16,key16,12);
1195 #ifndef OPENSSL_NO_BF
1196 BF_set_key(&bf_ks,16,key16);
1198 #ifndef OPENSSL_NO_CAST
1199 CAST_set_key(&cast_ks,16,key16);
1201 #ifndef OPENSSL_NO_RSA
1202 memset(rsa_c,0,sizeof(rsa_c));
1205 #ifndef OPENSSL_NO_DES
1206 BIO_printf(bio_err,"First we calculate the approximate speed ...\n");
1212 for (i=count; i; i--)
1213 DES_ecb_encrypt(buf_as_des_cblock,buf_as_des_cblock,
1218 c[D_MD2][0]=count/10;
1219 c[D_MDC2][0]=count/10;
1224 c[D_RMD160][0]=count;
1225 c[D_RC4][0]=count*5;
1226 c[D_CBC_DES][0]=count;
1227 c[D_EDE3_DES][0]=count/3;
1228 c[D_CBC_IDEA][0]=count;
1229 c[D_CBC_RC2][0]=count;
1230 c[D_CBC_RC5][0]=count;
1231 c[D_CBC_BF][0]=count;
1232 c[D_CBC_CAST][0]=count;
1234 for (i=1; i<SIZE_NUM; i++)
1236 c[D_MD2][i]=c[D_MD2][0]*4*lengths[0]/lengths[i];
1237 c[D_MDC2][i]=c[D_MDC2][0]*4*lengths[0]/lengths[i];
1238 c[D_MD4][i]=c[D_MD4][0]*4*lengths[0]/lengths[i];
1239 c[D_MD5][i]=c[D_MD5][0]*4*lengths[0]/lengths[i];
1240 c[D_HMAC][i]=c[D_HMAC][0]*4*lengths[0]/lengths[i];
1241 c[D_SHA1][i]=c[D_SHA1][0]*4*lengths[0]/lengths[i];
1242 c[D_RMD160][i]=c[D_RMD160][0]*4*lengths[0]/lengths[i];
1244 for (i=1; i<SIZE_NUM; i++)
1248 l0=(long)lengths[i-1];
1249 l1=(long)lengths[i];
1250 c[D_RC4][i]=c[D_RC4][i-1]*l0/l1;
1251 c[D_CBC_DES][i]=c[D_CBC_DES][i-1]*l0/l1;
1252 c[D_EDE3_DES][i]=c[D_EDE3_DES][i-1]*l0/l1;
1253 c[D_CBC_IDEA][i]=c[D_CBC_IDEA][i-1]*l0/l1;
1254 c[D_CBC_RC2][i]=c[D_CBC_RC2][i-1]*l0/l1;
1255 c[D_CBC_RC5][i]=c[D_CBC_RC5][i-1]*l0/l1;
1256 c[D_CBC_BF][i]=c[D_CBC_BF][i-1]*l0/l1;
1257 c[D_CBC_CAST][i]=c[D_CBC_CAST][i-1]*l0/l1;
1259 #ifndef OPENSSL_NO_RSA
1260 rsa_c[R_RSA_512][0]=count/2000;
1261 rsa_c[R_RSA_512][1]=count/400;
1262 for (i=1; i<RSA_NUM; i++)
1264 rsa_c[i][0]=rsa_c[i-1][0]/8;
1265 rsa_c[i][1]=rsa_c[i-1][1]/4;
1266 if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1270 if (rsa_c[i][0] == 0)
1279 #ifndef OPENSSL_NO_DSA
1280 dsa_c[R_DSA_512][0]=count/1000;
1281 dsa_c[R_DSA_512][1]=count/1000/2;
1282 for (i=1; i<DSA_NUM; i++)
1284 dsa_c[i][0]=dsa_c[i-1][0]/4;
1285 dsa_c[i][1]=dsa_c[i-1][1]/4;
1286 if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1299 #ifndef OPENSSL_NO_ECDSA
1300 ecdsa_c[R_EC_P160][0]=count/1000;
1301 ecdsa_c[R_EC_P160][1]=count/1000/2;
1302 for (i=R_EC_P224; i<=R_EC_P521; i++)
1304 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1305 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1306 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1310 if (ecdsa_c[i] == 0)
1317 ecdsa_c[R_EC_K163][0]=count/1000;
1318 ecdsa_c[R_EC_K163][1]=count/1000/2;
1319 for (i=R_EC_K233; i<=R_EC_K571; i++)
1321 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1322 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1323 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1327 if (ecdsa_c[i] == 0)
1334 ecdsa_c[R_EC_B163][0]=count/1000;
1335 ecdsa_c[R_EC_B163][1]=count/1000/2;
1336 for (i=R_EC_B233; i<=R_EC_B571; i++)
1338 ecdsa_c[i][0]=ecdsa_c[i-1][0]/2;
1339 ecdsa_c[i][1]=ecdsa_c[i-1][1]/2;
1340 if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1344 if (ecdsa_c[i] == 0)
1353 #ifndef OPENSSL_NO_ECDH
1354 ecdh_c[R_EC_P160][0]=count/1000;
1355 ecdh_c[R_EC_P160][1]=count/1000;
1356 for (i=R_EC_P224; i<=R_EC_P521; i++)
1358 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1359 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1360 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1371 ecdh_c[R_EC_K163][0]=count/1000;
1372 ecdh_c[R_EC_K163][1]=count/1000;
1373 for (i=R_EC_K233; i<=R_EC_K571; i++)
1375 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1376 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1377 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1388 ecdh_c[R_EC_B163][0]=count/1000;
1389 ecdh_c[R_EC_B163][1]=count/1000;
1390 for (i=R_EC_B233; i<=R_EC_B571; i++)
1392 ecdh_c[i][0]=ecdh_c[i-1][0]/2;
1393 ecdh_c[i][1]=ecdh_c[i-1][1]/2;
1394 if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1407 #define COND(d) (count < (d))
1408 #define COUNT(d) (d)
1410 /* not worth fixing */
1411 # error "You cannot disable DES on systems without SIGALRM."
1412 #endif /* OPENSSL_NO_DES */
1414 #define COND(c) (run)
1415 #define COUNT(d) (count)
1416 signal(SIGALRM,sig_done);
1417 #endif /* SIGALRM */
1419 #ifndef OPENSSL_NO_MD2
1422 for (j=0; j<SIZE_NUM; j++)
1424 print_message(names[D_MD2],c[D_MD2][j],lengths[j]);
1426 for (count=0,run=1; COND(c[D_MD2][j]); count++)
1427 EVP_Digest(buf,(unsigned long)lengths[j],&(md2[0]),NULL,EVP_md2(),NULL);
1429 print_result(D_MD2,j,count,d);
1433 #ifndef OPENSSL_NO_MDC2
1436 for (j=0; j<SIZE_NUM; j++)
1438 print_message(names[D_MDC2],c[D_MDC2][j],lengths[j]);
1440 for (count=0,run=1; COND(c[D_MDC2][j]); count++)
1441 EVP_Digest(buf,(unsigned long)lengths[j],&(mdc2[0]),NULL,EVP_mdc2(),NULL);
1443 print_result(D_MDC2,j,count,d);
1448 #ifndef OPENSSL_NO_MD4
1451 for (j=0; j<SIZE_NUM; j++)
1453 print_message(names[D_MD4],c[D_MD4][j],lengths[j]);
1455 for (count=0,run=1; COND(c[D_MD4][j]); count++)
1456 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md4[0]),NULL,EVP_md4(),NULL);
1458 print_result(D_MD4,j,count,d);
1463 #ifndef OPENSSL_NO_MD5
1466 for (j=0; j<SIZE_NUM; j++)
1468 print_message(names[D_MD5],c[D_MD5][j],lengths[j]);
1470 for (count=0,run=1; COND(c[D_MD5][j]); count++)
1471 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md5[0]),NULL,EVP_get_digestbyname("md5"),NULL);
1473 print_result(D_MD5,j,count,d);
1478 #if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
1483 HMAC_CTX_init(&hctx);
1484 HMAC_Init_ex(&hctx,(unsigned char *)"This is a key...",
1485 16,EVP_md5(), NULL);
1487 for (j=0; j<SIZE_NUM; j++)
1489 print_message(names[D_HMAC],c[D_HMAC][j],lengths[j]);
1491 for (count=0,run=1; COND(c[D_HMAC][j]); count++)
1493 HMAC_Init_ex(&hctx,NULL,0,NULL,NULL);
1494 HMAC_Update(&hctx,buf,lengths[j]);
1495 HMAC_Final(&hctx,&(hmac[0]),NULL);
1498 print_result(D_HMAC,j,count,d);
1500 HMAC_CTX_cleanup(&hctx);
1503 #ifndef OPENSSL_NO_SHA
1506 for (j=0; j<SIZE_NUM; j++)
1508 print_message(names[D_SHA1],c[D_SHA1][j],lengths[j]);
1510 for (count=0,run=1; COND(c[D_SHA1][j]); count++)
1511 EVP_Digest(buf,(unsigned long)lengths[j],&(sha[0]),NULL,EVP_sha1(),NULL);
1513 print_result(D_SHA1,j,count,d);
1517 #ifndef OPENSSL_NO_RIPEMD
1520 for (j=0; j<SIZE_NUM; j++)
1522 print_message(names[D_RMD160],c[D_RMD160][j],lengths[j]);
1524 for (count=0,run=1; COND(c[D_RMD160][j]); count++)
1525 EVP_Digest(buf,(unsigned long)lengths[j],&(rmd160[0]),NULL,EVP_ripemd160(),NULL);
1527 print_result(D_RMD160,j,count,d);
1531 #ifndef OPENSSL_NO_RC4
1534 for (j=0; j<SIZE_NUM; j++)
1536 print_message(names[D_RC4],c[D_RC4][j],lengths[j]);
1538 for (count=0,run=1; COND(c[D_RC4][j]); count++)
1539 RC4(&rc4_ks,(unsigned int)lengths[j],
1542 print_result(D_RC4,j,count,d);
1546 #ifndef OPENSSL_NO_DES
1547 if (doit[D_CBC_DES])
1549 for (j=0; j<SIZE_NUM; j++)
1551 print_message(names[D_CBC_DES],c[D_CBC_DES][j],lengths[j]);
1553 for (count=0,run=1; COND(c[D_CBC_DES][j]); count++)
1554 DES_ncbc_encrypt(buf,buf,lengths[j],&sch,
1555 &DES_iv,DES_ENCRYPT);
1557 print_result(D_CBC_DES,j,count,d);
1561 if (doit[D_EDE3_DES])
1563 for (j=0; j<SIZE_NUM; j++)
1565 print_message(names[D_EDE3_DES],c[D_EDE3_DES][j],lengths[j]);
1567 for (count=0,run=1; COND(c[D_EDE3_DES][j]); count++)
1568 DES_ede3_cbc_encrypt(buf,buf,lengths[j],
1570 &DES_iv,DES_ENCRYPT);
1572 print_result(D_EDE3_DES,j,count,d);
1576 #ifndef OPENSSL_NO_AES
1577 if (doit[D_CBC_128_AES])
1579 for (j=0; j<SIZE_NUM; j++)
1581 print_message(names[D_CBC_128_AES],c[D_CBC_128_AES][j],lengths[j]);
1583 for (count=0,run=1; COND(c[D_CBC_128_AES][j]); count++)
1584 AES_cbc_encrypt(buf,buf,
1585 (unsigned long)lengths[j],&aes_ks1,
1588 print_result(D_CBC_128_AES,j,count,d);
1591 if (doit[D_CBC_192_AES])
1593 for (j=0; j<SIZE_NUM; j++)
1595 print_message(names[D_CBC_192_AES],c[D_CBC_192_AES][j],lengths[j]);
1597 for (count=0,run=1; COND(c[D_CBC_192_AES][j]); count++)
1598 AES_cbc_encrypt(buf,buf,
1599 (unsigned long)lengths[j],&aes_ks2,
1602 print_result(D_CBC_192_AES,j,count,d);
1605 if (doit[D_CBC_256_AES])
1607 for (j=0; j<SIZE_NUM; j++)
1609 print_message(names[D_CBC_256_AES],c[D_CBC_256_AES][j],lengths[j]);
1611 for (count=0,run=1; COND(c[D_CBC_256_AES][j]); count++)
1612 AES_cbc_encrypt(buf,buf,
1613 (unsigned long)lengths[j],&aes_ks3,
1616 print_result(D_CBC_256_AES,j,count,d);
1621 #ifndef OPENSSL_NO_IDEA
1622 if (doit[D_CBC_IDEA])
1624 for (j=0; j<SIZE_NUM; j++)
1626 print_message(names[D_CBC_IDEA],c[D_CBC_IDEA][j],lengths[j]);
1628 for (count=0,run=1; COND(c[D_CBC_IDEA][j]); count++)
1629 idea_cbc_encrypt(buf,buf,
1630 (unsigned long)lengths[j],&idea_ks,
1633 print_result(D_CBC_IDEA,j,count,d);
1637 #ifndef OPENSSL_NO_RC2
1638 if (doit[D_CBC_RC2])
1640 for (j=0; j<SIZE_NUM; j++)
1642 print_message(names[D_CBC_RC2],c[D_CBC_RC2][j],lengths[j]);
1644 for (count=0,run=1; COND(c[D_CBC_RC2][j]); count++)
1645 RC2_cbc_encrypt(buf,buf,
1646 (unsigned long)lengths[j],&rc2_ks,
1649 print_result(D_CBC_RC2,j,count,d);
1653 #ifndef OPENSSL_NO_RC5
1654 if (doit[D_CBC_RC5])
1656 for (j=0; j<SIZE_NUM; j++)
1658 print_message(names[D_CBC_RC5],c[D_CBC_RC5][j],lengths[j]);
1660 for (count=0,run=1; COND(c[D_CBC_RC5][j]); count++)
1661 RC5_32_cbc_encrypt(buf,buf,
1662 (unsigned long)lengths[j],&rc5_ks,
1665 print_result(D_CBC_RC5,j,count,d);
1669 #ifndef OPENSSL_NO_BF
1672 for (j=0; j<SIZE_NUM; j++)
1674 print_message(names[D_CBC_BF],c[D_CBC_BF][j],lengths[j]);
1676 for (count=0,run=1; COND(c[D_CBC_BF][j]); count++)
1677 BF_cbc_encrypt(buf,buf,
1678 (unsigned long)lengths[j],&bf_ks,
1681 print_result(D_CBC_BF,j,count,d);
1685 #ifndef OPENSSL_NO_CAST
1686 if (doit[D_CBC_CAST])
1688 for (j=0; j<SIZE_NUM; j++)
1690 print_message(names[D_CBC_CAST],c[D_CBC_CAST][j],lengths[j]);
1692 for (count=0,run=1; COND(c[D_CBC_CAST][j]); count++)
1693 CAST_cbc_encrypt(buf,buf,
1694 (unsigned long)lengths[j],&cast_ks,
1697 print_result(D_CBC_CAST,j,count,d);
1704 for (j=0; j<SIZE_NUM; j++)
1711 names[D_EVP]=OBJ_nid2ln(evp_cipher->nid);
1712 /* -O3 -fschedule-insns messes up an
1713 * optimization here! names[D_EVP]
1714 * somehow becomes NULL */
1715 print_message(names[D_EVP],save_count,
1718 EVP_CIPHER_CTX_init(&ctx);
1720 EVP_DecryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1722 EVP_EncryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1726 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1727 EVP_DecryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1729 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1730 EVP_EncryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1732 EVP_DecryptFinal_ex(&ctx,buf,&outl);
1734 EVP_EncryptFinal_ex(&ctx,buf,&outl);
1736 EVP_CIPHER_CTX_cleanup(&ctx);
1740 names[D_EVP]=OBJ_nid2ln(evp_md->type);
1741 print_message(names[D_EVP],save_count,
1745 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1746 EVP_Digest(buf,lengths[j],&(md[0]),NULL,evp_md,NULL);
1750 print_result(D_EVP,j,count,d);
1754 RAND_pseudo_bytes(buf,36);
1755 #ifndef OPENSSL_NO_RSA
1756 for (j=0; j<RSA_NUM; j++)
1759 if (!rsa_doit[j]) continue;
1760 ret=RSA_sign(NID_md5_sha1, buf,36, buf2, &rsa_num, rsa_key[j]);
1763 BIO_printf(bio_err,"RSA sign failure. No RSA sign will be done.\n");
1764 ERR_print_errors(bio_err);
1769 pkey_print_message("private","rsa",
1770 rsa_c[j][0],rsa_bits[j],
1772 /* RSA_blinding_on(rsa_key[j],NULL); */
1774 for (count=0,run=1; COND(rsa_c[j][0]); count++)
1776 ret=RSA_sign(NID_md5_sha1, buf,36, buf2,
1777 &rsa_num, rsa_key[j]);
1781 "RSA sign failure\n");
1782 ERR_print_errors(bio_err);
1788 BIO_printf(bio_err,mr ? "+R1:%ld:%d:%.2f\n"
1789 : "%ld %d bit private RSA's in %.2fs\n",
1790 count,rsa_bits[j],d);
1791 rsa_results[j][0]=d/(double)count;
1796 ret=RSA_verify(NID_md5_sha1, buf,36, buf2, rsa_num, rsa_key[j]);
1799 BIO_printf(bio_err,"RSA verify failure. No RSA verify will be done.\n");
1800 ERR_print_errors(bio_err);
1805 pkey_print_message("public","rsa",
1806 rsa_c[j][1],rsa_bits[j],
1809 for (count=0,run=1; COND(rsa_c[j][1]); count++)
1811 ret=RSA_verify(NID_md5_sha1, buf,36, buf2,
1812 rsa_num, rsa_key[j]);
1816 "RSA verify failure\n");
1817 ERR_print_errors(bio_err);
1823 BIO_printf(bio_err,mr ? "+R2:%ld:%d:%.2f\n"
1824 : "%ld %d bit public RSA's in %.2fs\n",
1825 count,rsa_bits[j],d);
1826 rsa_results[j][1]=d/(double)count;
1832 /* if longer than 10s, don't do any more */
1833 for (j++; j<RSA_NUM; j++)
1839 RAND_pseudo_bytes(buf,20);
1840 #ifndef OPENSSL_NO_DSA
1841 if (RAND_status() != 1)
1843 RAND_seed(rnd_seed, sizeof rnd_seed);
1846 for (j=0; j<DSA_NUM; j++)
1851 if (!dsa_doit[j]) continue;
1852 /* DSA_generate_key(dsa_key[j]); */
1853 /* DSA_sign_setup(dsa_key[j],NULL); */
1854 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1858 BIO_printf(bio_err,"DSA sign failure. No DSA sign will be done.\n");
1859 ERR_print_errors(bio_err);
1864 pkey_print_message("sign","dsa",
1865 dsa_c[j][0],dsa_bits[j],
1868 for (count=0,run=1; COND(dsa_c[j][0]); count++)
1870 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1875 "DSA sign failure\n");
1876 ERR_print_errors(bio_err);
1882 BIO_printf(bio_err,mr ? "+R3:%ld:%d:%.2f\n"
1883 : "%ld %d bit DSA signs in %.2fs\n",
1884 count,dsa_bits[j],d);
1885 dsa_results[j][0]=d/(double)count;
1889 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1893 BIO_printf(bio_err,"DSA verify failure. No DSA verify will be done.\n");
1894 ERR_print_errors(bio_err);
1899 pkey_print_message("verify","dsa",
1900 dsa_c[j][1],dsa_bits[j],
1903 for (count=0,run=1; COND(dsa_c[j][1]); count++)
1905 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1910 "DSA verify failure\n");
1911 ERR_print_errors(bio_err);
1917 BIO_printf(bio_err,mr ? "+R4:%ld:%d:%.2f\n"
1918 : "%ld %d bit DSA verify in %.2fs\n",
1919 count,dsa_bits[j],d);
1920 dsa_results[j][1]=d/(double)count;
1925 /* if longer than 10s, don't do any more */
1926 for (j++; j<DSA_NUM; j++)
1930 if (rnd_fake) RAND_cleanup();
1933 #ifndef OPENSSL_NO_ECDSA
1934 if (RAND_status() != 1)
1936 RAND_seed(rnd_seed, sizeof rnd_seed);
1939 for (j=0; j<EC_NUM; j++)
1943 if (!ecdsa_doit[j]) continue; /* Ignore Curve */
1944 ecdsa[j] = EC_KEY_new();
1945 if (ecdsa[j] == NULL)
1947 BIO_printf(bio_err,"ECDSA failure.\n");
1948 ERR_print_errors(bio_err);
1953 ecdsa[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
1954 /* Could not obtain group information */
1955 if (ecdsa[j]->group == NULL)
1957 BIO_printf(bio_err,"ECDSA failure.Could not obtain group information\n");
1958 ERR_print_errors(bio_err);
1964 EC_GROUP_precompute_mult(ecdsa[j]->group, NULL);
1966 /* Perform ECDSA signature test */
1967 EC_KEY_generate_key(ecdsa[j]);
1968 ret = ECDSA_sign(0, buf, 20, ecdsasig,
1969 &ecdsasiglen, ecdsa[j]);
1972 BIO_printf(bio_err,"ECDSA sign failure. No ECDSA sign will be done.\n");
1973 ERR_print_errors(bio_err);
1978 pkey_print_message("sign","ecdsa",
1980 test_curves_bits[j],
1984 for (count=0,run=1; COND(ecdsa_c[j][0]);
1987 ret=ECDSA_sign(0, buf, 20,
1988 ecdsasig, &ecdsasiglen,
1992 BIO_printf(bio_err, "ECDSA sign failure\n");
1993 ERR_print_errors(bio_err);
2000 BIO_printf(bio_err, mr ? "+R5:%ld:%d:%.2f\n" :
2001 "%ld %d bit ECDSA signs in %.2fs \n",
2002 count, test_curves_bits[j], d);
2003 ecdsa_results[j][0]=d/(double)count;
2007 /* Perform ECDSA verification test */
2008 ret=ECDSA_verify(0, buf, 20, ecdsasig,
2009 ecdsasiglen, ecdsa[j]);
2012 BIO_printf(bio_err,"ECDSA verify failure. No ECDSA verify will be done.\n");
2013 ERR_print_errors(bio_err);
2018 pkey_print_message("verify","ecdsa",
2020 test_curves_bits[j],
2023 for (count=0,run=1; COND(ecdsa_c[j][1]); count++)
2025 ret=ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen, ecdsa[j]);
2028 BIO_printf(bio_err, "ECDSA verify failure\n");
2029 ERR_print_errors(bio_err);
2035 BIO_printf(bio_err, mr? "+R6:%ld:%d:%.2f\n"
2036 : "%ld %d bit ECDSA verify in %.2fs\n",
2037 count, test_curves_bits[j], d);
2038 ecdsa_results[j][1]=d/(double)count;
2043 /* if longer than 10s, don't do any more */
2044 for (j++; j<EC_NUM; j++)
2050 if (rnd_fake) RAND_cleanup();
2053 #ifndef OPENSSL_NO_ECDH
2054 if (RAND_status() != 1)
2056 RAND_seed(rnd_seed, sizeof rnd_seed);
2059 for (j=0; j<EC_NUM; j++)
2061 if (!ecdh_doit[j]) continue;
2062 ecdh_a[j] = EC_KEY_new();
2063 ecdh_b[j] = EC_KEY_new();
2064 if ((ecdh_a[j] == NULL) || (ecdh_b[j] == NULL))
2066 BIO_printf(bio_err,"ECDH failure.\n");
2067 ERR_print_errors(bio_err);
2072 ecdh_a[j]->group = EC_GROUP_new_by_nid(test_curves[j]);
2073 if (ecdh_a[j]->group == NULL)
2075 BIO_printf(bio_err,"ECDH failure.\n");
2076 ERR_print_errors(bio_err);
2081 ecdh_b[j]->group = EC_GROUP_dup(ecdh_a[j]->group);
2083 /* generate two ECDH key pairs */
2084 if (!EC_KEY_generate_key(ecdh_a[j]) ||
2085 !EC_KEY_generate_key(ecdh_b[j]))
2087 BIO_printf(bio_err,"ECDH key generation failure.\n");
2088 ERR_print_errors(bio_err);
2093 /* If field size is not more than 24 octets, then use SHA-1 hash of result;
2094 * otherwise, use result (see section 4.8 of draft-ietf-tls-ecc-03.txt).
2096 int field_size, outlen;
2097 void *(*kdf)(void *in, size_t inlen, void *out, size_t xoutlen);
2098 field_size = EC_GROUP_get_degree(ecdh_a[j]->group);
2099 if (field_size <= 24 * 8)
2101 outlen = KDF1_SHA1_len;
2106 outlen = (field_size+7)/8;
2109 secret_size_a = ECDH_compute_key(secret_a, outlen,
2112 secret_size_b = ECDH_compute_key(secret_b, outlen,
2115 if (secret_size_a != secret_size_b)
2120 for (secret_idx = 0;
2121 (secret_idx < secret_size_a)
2122 && (ecdh_checks == 1);
2125 if (secret_a[secret_idx] != secret_b[secret_idx])
2129 if (ecdh_checks == 0)
2131 BIO_printf(bio_err,"ECDH computations don't match.\n");
2132 ERR_print_errors(bio_err);
2136 pkey_print_message("","ecdh",
2138 test_curves_bits[j],
2141 for (count=0,run=1; COND(ecdh_c[j][0]); count++)
2143 ECDH_compute_key(secret_a, outlen,
2148 BIO_printf(bio_err, mr ? "+R7:%ld:%d:%.2f\n" :"%ld %d-bit ECDH ops in %.2fs\n",
2149 count, test_curves_bits[j], d);
2150 ecdh_results[j][0]=d/(double)count;
2158 /* if longer than 10s, don't do any more */
2159 for (j++; j<EC_NUM; j++)
2163 if (rnd_fake) RAND_cleanup();
2170 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_VERSION));
2171 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_BUILT_ON));
2173 printf("%s ",BN_options());
2174 #ifndef OPENSSL_NO_MD2
2175 printf("%s ",MD2_options());
2177 #ifndef OPENSSL_NO_RC4
2178 printf("%s ",RC4_options());
2180 #ifndef OPENSSL_NO_DES
2181 printf("%s ",DES_options());
2183 #ifndef OPENSSL_NO_AES
2184 printf("%s ",AES_options());
2186 #ifndef OPENSSL_NO_IDEA
2187 printf("%s ",idea_options());
2189 #ifndef OPENSSL_NO_BF
2190 printf("%s ",BF_options());
2192 fprintf(stdout,"\n%s\n",SSLeay_version(SSLEAY_CFLAGS));
2193 printf("available timing options: ");
2204 #define as_string(s) (#s)
2207 printf("HZ=%g", dbl);
2210 printf(" [sysconf value]");
2214 printf("timing function used: %s%s%s%s%s%s%s\n",
2215 (ftime_used ? "ftime" : ""),
2216 (ftime_used + times_used > 1 ? "," : ""),
2217 (times_used ? "times" : ""),
2218 (ftime_used + times_used + gettimeofday_used > 1 ? "," : ""),
2219 (gettimeofday_used ? "gettimeofday" : ""),
2220 (ftime_used + times_used + gettimeofday_used + getrusage_used > 1 ? "," : ""),
2221 (getrusage_used ? "getrusage" : ""));
2227 fprintf(stdout,"+H");
2230 fprintf(stdout,"The 'numbers' are in 1000s of bytes per second processed.\n");
2231 fprintf(stdout,"type ");
2233 for (j=0; j<SIZE_NUM; j++)
2234 fprintf(stdout,mr ? ":%d" : "%7d bytes",lengths[j]);
2235 fprintf(stdout,"\n");
2238 for (k=0; k<ALGOR_NUM; k++)
2240 if (!doit[k]) continue;
2242 fprintf(stdout,"+F:%d:%s",k,names[k]);
2244 fprintf(stdout,"%-13s",names[k]);
2245 for (j=0; j<SIZE_NUM; j++)
2247 if (results[k][j] > 10000 && !mr)
2248 fprintf(stdout," %11.2fk",results[k][j]/1e3);
2250 fprintf(stdout,mr ? ":%.2f" : " %11.2f ",results[k][j]);
2252 fprintf(stdout,"\n");
2254 #ifndef OPENSSL_NO_RSA
2256 for (k=0; k<RSA_NUM; k++)
2258 if (!rsa_doit[k]) continue;
2261 printf("%18ssign verify sign/s verify/s\n"," ");
2265 fprintf(stdout,"+F2:%u:%u:%f:%f\n",
2266 k,rsa_bits[k],rsa_results[k][0],
2269 fprintf(stdout,"rsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2270 rsa_bits[k],rsa_results[k][0],rsa_results[k][1],
2271 1.0/rsa_results[k][0],1.0/rsa_results[k][1]);
2274 #ifndef OPENSSL_NO_DSA
2276 for (k=0; k<DSA_NUM; k++)
2278 if (!dsa_doit[k]) continue;
2281 printf("%18ssign verify sign/s verify/s\n"," ");
2285 fprintf(stdout,"+F3:%u:%u:%f:%f\n",
2286 k,dsa_bits[k],dsa_results[k][0],dsa_results[k][1]);
2288 fprintf(stdout,"dsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
2289 dsa_bits[k],dsa_results[k][0],dsa_results[k][1],
2290 1.0/dsa_results[k][0],1.0/dsa_results[k][1]);
2293 #ifndef OPENSSL_NO_ECDSA
2295 for (k=0; k<EC_NUM; k++)
2297 if (!ecdsa_doit[k]) continue;
2300 printf("%30ssign verify sign/s verify/s\n"," ");
2305 fprintf(stdout,"+F4:%u:%u:%f:%f\n",
2306 k, test_curves_bits[k],
2307 ecdsa_results[k][0],ecdsa_results[k][1]);
2310 "%4u bit ecdsa (%s) %8.4fs %8.4fs %8.1f %8.1f\n",
2311 test_curves_bits[k],
2312 test_curves_names[k],
2313 ecdsa_results[k][0],ecdsa_results[k][1],
2314 1.0/ecdsa_results[k][0],1.0/ecdsa_results[k][1]);
2319 #ifndef OPENSSL_NO_ECDH
2321 for (k=0; k<EC_NUM; k++)
2323 if (!ecdh_doit[k]) continue;
2326 printf("%30sop op/s\n"," ");
2330 fprintf(stdout,"+F5:%u:%u:%f:%f\n",
2331 k, test_curves_bits[k],
2332 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2335 fprintf(stdout,"%4u bit ecdh (%s) %8.4fs %8.1f\n",
2336 test_curves_bits[k],
2337 test_curves_names[k],
2338 ecdh_results[k][0], 1.0/ecdh_results[k][0]);
2345 ERR_print_errors(bio_err);
2346 if (buf != NULL) OPENSSL_free(buf);
2347 if (buf2 != NULL) OPENSSL_free(buf2);
2348 #ifndef OPENSSL_NO_RSA
2349 for (i=0; i<RSA_NUM; i++)
2350 if (rsa_key[i] != NULL)
2351 RSA_free(rsa_key[i]);
2353 #ifndef OPENSSL_NO_DSA
2354 for (i=0; i<DSA_NUM; i++)
2355 if (dsa_key[i] != NULL)
2356 DSA_free(dsa_key[i]);
2359 #ifndef OPENSSL_NO_ECDSA
2360 for (i=0; i<EC_NUM; i++)
2361 if (ecdsa[i] != NULL)
2362 EC_KEY_free(ecdsa[i]);
2364 #ifndef OPENSSL_NO_ECDH
2365 for (i=0; i<EC_NUM; i++)
2367 if (ecdh_a[i] != NULL)
2368 EC_KEY_free(ecdh_a[i]);
2369 if (ecdh_b[i] != NULL)
2370 EC_KEY_free(ecdh_b[i]);
2378 static void print_message(const char *s, long num, int length)
2381 BIO_printf(bio_err,mr ? "+DT:%s:%d:%d\n"
2382 : "Doing %s for %ds on %d size blocks: ",s,SECONDS,length);
2383 (void)BIO_flush(bio_err);
2386 BIO_printf(bio_err,mr ? "+DN:%s:%ld:%d\n"
2387 : "Doing %s %ld times on %d size blocks: ",s,num,length);
2388 (void)BIO_flush(bio_err);
2395 static void pkey_print_message(char *str, char *str2, long num, int bits,
2399 BIO_printf(bio_err,mr ? "+DTP:%d:%s:%s:%d\n"
2400 : "Doing %d bit %s %s's for %ds: ",bits,str,str2,tm);
2401 (void)BIO_flush(bio_err);
2404 BIO_printf(bio_err,mr ? "+DNP:%ld:%d:%s:%s\n"
2405 : "Doing %ld %d bit %s %s's: ",num,bits,str,str2);
2406 (void)BIO_flush(bio_err);
2413 static void print_result(int alg,int run_no,int count,double time_used)
2415 BIO_printf(bio_err,mr ? "+R:%d:%s:%f\n"
2416 : "%d %s's in %.2fs\n",count,names[alg],time_used);
2417 results[alg][run_no]=((double)count)/time_used*lengths[run_no];
2420 static char *sstrsep(char **string, const char *delim)
2423 char *token = *string;
2428 memset(isdelim, 0, sizeof isdelim);
2433 isdelim[(unsigned char)(*delim)] = 1;
2437 while (!isdelim[(unsigned char)(**string)])
2452 static int do_multi(int multi)
2457 static char sep[]=":";
2459 fds=malloc(multi*sizeof *fds);
2460 for(n=0 ; n < multi ; ++n)
2478 printf("Forked child %d\n",n);
2481 /* for now, assume the pipe is long enough to take all the output */
2482 for(n=0 ; n < multi ; ++n)
2488 f=fdopen(fds[n],"r");
2489 while(fgets(buf,sizeof buf,f))
2496 fprintf(stderr,"Don't understand line '%s' from child %d\n",
2500 printf("Got: %s from %d\n",buf,n);
2501 if(!strncmp(buf,"+F:",3))
2507 alg=atoi(sstrsep(&p,sep));
2509 for(j=0 ; j < SIZE_NUM ; ++j)
2510 results[alg][j]+=atof(sstrsep(&p,sep));
2512 else if(!strncmp(buf,"+F2:",4))
2518 k=atoi(sstrsep(&p,sep));
2521 d=atof(sstrsep(&p,sep));
2523 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2525 rsa_results[k][0]=d;
2527 d=atof(sstrsep(&p,sep));
2529 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2531 rsa_results[k][1]=d;
2533 else if(!strncmp(buf,"+F2:",4))
2539 k=atoi(sstrsep(&p,sep));
2542 d=atof(sstrsep(&p,sep));
2544 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
2546 rsa_results[k][0]=d;
2548 d=atof(sstrsep(&p,sep));
2550 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
2552 rsa_results[k][1]=d;
2554 else if(!strncmp(buf,"+F3:",4))
2560 k=atoi(sstrsep(&p,sep));
2563 d=atof(sstrsep(&p,sep));
2565 dsa_results[k][0]=1/(1/dsa_results[k][0]+1/d);
2567 dsa_results[k][0]=d;
2569 d=atof(sstrsep(&p,sep));
2571 dsa_results[k][1]=1/(1/dsa_results[k][1]+1/d);
2573 dsa_results[k][1]=d;
2575 #ifndef OPENSSL_NO_ECDSA
2576 else if(!strncmp(buf,"+F4:",4))
2582 k=atoi(sstrsep(&p,sep));
2585 d=atof(sstrsep(&p,sep));
2587 ecdsa_results[k][0]=1/(1/ecdsa_results[k][0]+1/d);
2589 ecdsa_results[k][0]=d;
2591 d=atof(sstrsep(&p,sep));
2593 ecdsa_results[k][1]=1/(1/ecdsa_results[k][1]+1/d);
2595 ecdsa_results[k][1]=d;
2599 #ifndef OPENSSL_NO_ECDH
2600 else if(!strncmp(buf,"+F5:",4))
2606 k=atoi(sstrsep(&p,sep));
2609 d=atof(sstrsep(&p,sep));
2611 ecdh_results[k][0]=1/(1/ecdh_results[k][0]+1/d);
2613 ecdh_results[k][0]=d;
2618 else if(!strncmp(buf,"+H:",3))
2622 fprintf(stderr,"Unknown type '%s' from child %d\n",buf,n);