]> git.ipfire.org Git - thirdparty/openssl.git/blob - apps/speed.c
projects / thirdparty / openssl.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Implement speed measurement for AES.
[thirdparty/openssl.git] / apps / speed.c
1 /* apps/speed.c -*- mode:C; c-file-style: "eay" -*- */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 * All rights reserved.
4 *
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
8 *
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 *
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
22 *
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
25 * are met:
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 *
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51 * SUCH DAMAGE.
52 *
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
57 */
58
59 /* most of this code has been pilfered from my libdes speed.c program */
60
61 #undef SECONDS
62 #define SECONDS 3
63 #define RSA_SECONDS 10
64 #define DSA_SECONDS 10
65
66 /* 11-Sep-92 Andrew Daviel Support for Silicon Graphics IRIX added */
67 /* 06-Apr-92 Luke Brennan Support for VMS and add extra signal calls */
68
69 #undef PROG
70 #define PROG speed_main
71
72 #include <stdio.h>
73 #include <stdlib.h>
74 #include <signal.h>
75 #include <string.h>
76 #include <math.h>
77 #include "apps.h"
78 #ifdef OPENSSL_NO_STDIO
79 #define APPS_WIN16
80 #endif
81 #include <openssl/crypto.h>
82 #include <openssl/rand.h>
83 #include <openssl/err.h>
84 #include <openssl/evp.h>
85 #include <openssl/objects.h>
86 #if !defined(OPENSSL_SYS_MSDOS)
87 #include OPENSSL_UNISTD
88 #endif
89
90 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(OPENSSL_SYS_MACOSX)
91 # define USE_TOD
92 #elif !defined(OPENSSL_SYS_MSDOS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC))
93 # define TIMES
94 #endif
95 #if !defined(_UNICOS) && !defined(__OpenBSD__) && !defined(sgi) && !defined(__FreeBSD__) && !(defined(__bsdi) || defined(__bsdi__)) && !defined(_AIX) && !defined(OPENSSL_SYS_MPE) && !defined(__NetBSD__) /* FIXME */
96 # define TIMEB
97 #endif
98
99 #ifndef _IRIX
100 # include <time.h>
101 #endif
102 #ifdef TIMES
103 # include <sys/types.h>
104 # include <sys/times.h>
105 #endif
106 #ifdef USE_TOD
107 # include <sys/time.h>
108 # include <sys/resource.h>
109 #endif
110
111 /* Depending on the VMS version, the tms structure is perhaps defined.
112 The __TMS macro will show if it was. If it wasn't defined, we should
113 undefine TIMES, since that tells the rest of the program how things
114 should be handled. -- Richard Levitte */
115 #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
116 #undef TIMES
117 #endif
118
119 #ifdef TIMEB
120 #include <sys/timeb.h>
121 #endif
122
123 #if !defined(TIMES) && !defined(TIMEB) && !defined(USE_TOD)
124 #error "It seems neither struct tms nor struct timeb is supported in this platform!"
125 #endif
126
127 #if defined(sun) || defined(__ultrix)
128 #define _POSIX_SOURCE
129 #include <limits.h>
130 #include <sys/param.h>
131 #endif
132
133 #ifndef OPENSSL_NO_DES
134 #include <openssl/des_old.h>
135 #endif
136 #ifndef OPENSSL_NO_AES
137 #include <openssl/aes.h>
138 #endif
139 #ifndef OPENSSL_NO_MD2
140 #include <openssl/md2.h>
141 #endif
142 #ifndef OPENSSL_NO_MDC2
143 #include <openssl/mdc2.h>
144 #endif
145 #ifndef OPENSSL_NO_MD4
146 #include <openssl/md4.h>
147 #endif
148 #ifndef OPENSSL_NO_MD5
149 #include <openssl/md5.h>
150 #endif
151 #ifndef OPENSSL_NO_HMAC
152 #include <openssl/hmac.h>
153 #endif
154 #include <openssl/evp.h>
155 #ifndef OPENSSL_NO_SHA
156 #include <openssl/sha.h>
157 #endif
158 #ifndef OPENSSL_NO_RIPEMD
159 #include <openssl/ripemd.h>
160 #endif
161 #ifndef OPENSSL_NO_RC4
162 #include <openssl/rc4.h>
163 #endif
164 #ifndef OPENSSL_NO_RC5
165 #include <openssl/rc5.h>
166 #endif
167 #ifndef OPENSSL_NO_RC2
168 #include <openssl/rc2.h>
169 #endif
170 #ifndef OPENSSL_NO_IDEA
171 #include <openssl/idea.h>
172 #endif
173 #ifndef OPENSSL_NO_BF
174 #include <openssl/blowfish.h>
175 #endif
176 #ifndef OPENSSL_NO_CAST
177 #include <openssl/cast.h>
178 #endif
179 #ifndef OPENSSL_NO_RSA
180 #include <openssl/rsa.h>
181 #include "./testrsa.h"
182 #endif
183 #include <openssl/x509.h>
184 #ifndef OPENSSL_NO_DSA
185 #include "./testdsa.h"
186 #endif
187
188 /* The following if from times(3) man page. It may need to be changed */
189 #ifndef HZ
190 # ifdef _SC_CLK_TCK
191 # define HZ ((double)sysconf(_SC_CLK_TCK))
192 # else
193 # ifndef CLK_TCK
194 # ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
195 # define HZ 100.0
196 # else /* _BSD_CLK_TCK_ */
197 # define HZ ((double)_BSD_CLK_TCK_)
198 # endif
199 # else /* CLK_TCK */
200 # define HZ ((double)CLK_TCK)
201 # endif
202 # endif
203 #endif
204
205 #if !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_WINDOWS) && !defined(OPENSSL_SYS_MACINTOSH_CLASSIC) && !defined(OPENSSL_SYS_OS2)
206 # define HAVE_FORK 1
207 #endif
208
209 #undef BUFSIZE
210 #define BUFSIZE ((long)1024*8+1)
211 int run=0;
212
213 static char ftime_used = 0, times_used = 0, gettimeofday_used = 0, getrusage_used = 0;
214 static int mr=0;
215 static int usertime=1;
216
217 static double Time_F(int s);
218 static void print_message(const char *s,long num,int length);
219 static void pkey_print_message(char *str,char *str2,long num,int bits,int sec);
220 static void print_result(int alg,int run_no,int count,double time_used);
221 #ifdef HAVE_FORK
222 static int do_multi(int multi);
223 #endif
224
225 #define ALGOR_NUM 19
226 #define SIZE_NUM 5
227 #define RSA_NUM 4
228 #define DSA_NUM 3
229 static const char *names[ALGOR_NUM]={
230 "md2","mdc2","md4","md5","hmac(md5)","sha1","rmd160","rc4",
231 "des cbc","des ede3","idea cbc",
232 "rc2 cbc","rc5-32/12 cbc","blowfish cbc","cast cbc",
233 "aes-128 cbc","aes-192 cbc","aes-256 cbc"};
234 static double results[ALGOR_NUM][SIZE_NUM];
235 static int lengths[SIZE_NUM]={16,64,256,1024,8*1024};
236 static double rsa_results[RSA_NUM][2];
237 static double dsa_results[DSA_NUM][2];
238
239 #ifdef SIGALRM
240 #if defined(__STDC__) || defined(sgi) || defined(_AIX)
241 #define SIGRETTYPE void
242 #else
243 #define SIGRETTYPE int
244 #endif
245
246 static SIGRETTYPE sig_done(int sig);
247 static SIGRETTYPE sig_done(int sig)
248 {
249 signal(SIGALRM,sig_done);
250 run=0;
251 #ifdef LINT
252 sig=sig;
253 #endif
254 }
255 #endif
256
257 #define START 0
258 #define STOP 1
259
260 static double Time_F(int s)
261 {
262 double ret;
263
264 #ifdef USE_TOD
265 if(usertime)
266 {
267 static struct rusage tstart,tend;
268
269 getrusage_used = 1;
270 if (s == START)
271 {
272 getrusage(RUSAGE_SELF,&tstart);
273 return(0);
274 }
275 else
276 {
277 long i;
278
279 getrusage(RUSAGE_SELF,&tend);
280 i=(long)tend.ru_utime.tv_usec-(long)tstart.ru_utime.tv_usec;
281 ret=((double)(tend.ru_utime.tv_sec-tstart.ru_utime.tv_sec))
282 +((double)i)/1000000.0;
283 return((ret < 0.001)?0.001:ret);
284 }
285 }
286 else
287 {
288 static struct timeval tstart,tend;
289 long i;
290
291 gettimeofday_used = 1;
292 if (s == START)
293 {
294 gettimeofday(&tstart,NULL);
295 return(0);
296 }
297 else
298 {
299 gettimeofday(&tend,NULL);
300 i=(long)tend.tv_usec-(long)tstart.tv_usec;
301 ret=((double)(tend.tv_sec-tstart.tv_sec))+((double)i)/1000000.0;
302 return((ret < 0.001)?0.001:ret);
303 }
304 }
305 #else /* ndef USE_TOD */
306
307 # ifdef TIMES
308 if (usertime)
309 {
310 static struct tms tstart,tend;
311
312 times_used = 1;
313 if (s == START)
314 {
315 times(&tstart);
316 return(0);
317 }
318 else
319 {
320 times(&tend);
321 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ;
322 return((ret < 1e-3)?1e-3:ret);
323 }
324 }
325 # endif /* times() */
326 # if defined(TIMES) && defined(TIMEB)
327 else
328 # endif
329 # ifdef TIMEB
330 {
331 static struct timeb tstart,tend;
332 long i;
333
334 ftime_used = 1;
335 if (s == START)
336 {
337 ftime(&tstart);
338 return(0);
339 }
340 else
341 {
342 ftime(&tend);
343 i=(long)tend.millitm-(long)tstart.millitm;
344 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
345 return((ret < 0.001)?0.001:ret);
346 }
347 }
348 # endif
349 #endif
350 }
351
352 int MAIN(int, char **);
353
354 int MAIN(int argc, char **argv)
355 {
356 ENGINE *e;
357 unsigned char *buf=NULL,*buf2=NULL;
358 int mret=1;
359 long count=0,save_count=0;
360 int i,j,k;
361 #ifndef OPENSSL_NO_RSA
362 unsigned rsa_num;
363 long rsa_count;
364 #endif
365 unsigned char md[EVP_MAX_MD_SIZE];
366 #ifndef OPENSSL_NO_MD2
367 unsigned char md2[MD2_DIGEST_LENGTH];
368 #endif
369 #ifndef OPENSSL_NO_MDC2
370 unsigned char mdc2[MDC2_DIGEST_LENGTH];
371 #endif
372 #ifndef OPENSSL_NO_MD4
373 unsigned char md4[MD4_DIGEST_LENGTH];
374 #endif
375 #ifndef OPENSSL_NO_MD5
376 unsigned char md5[MD5_DIGEST_LENGTH];
377 unsigned char hmac[MD5_DIGEST_LENGTH];
378 #endif
379 #ifndef OPENSSL_NO_SHA
380 unsigned char sha[SHA_DIGEST_LENGTH];
381 #endif
382 #ifndef OPENSSL_NO_RIPEMD
383 unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
384 #endif
385 #ifndef OPENSSL_NO_RC4
386 RC4_KEY rc4_ks;
387 #endif
388 #ifndef OPENSSL_NO_RC5
389 RC5_32_KEY rc5_ks;
390 #endif
391 #ifndef OPENSSL_NO_RC2
392 RC2_KEY rc2_ks;
393 #endif
394 #ifndef OPENSSL_NO_IDEA
395 IDEA_KEY_SCHEDULE idea_ks;
396 #endif
397 #ifndef OPENSSL_NO_BF
398 BF_KEY bf_ks;
399 #endif
400 #ifndef OPENSSL_NO_CAST
401 CAST_KEY cast_ks;
402 #endif
403 static const unsigned char key16[16]=
404 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
405 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
406 static const unsigned char key24[24]=
407 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
408 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
409 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
410 static const unsigned char key32[32]=
411 {0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
412 0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,
413 0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,
414 0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34,0x56};
415 #ifndef OPENSSL_NO_AES
416 #define MAX_BLOCK_SIZE 128
417 #else
418 #define MAX_BLOCK_SIZE 64
419 #endif
420 unsigned char DES_iv[8];
421 unsigned char iv[MAX_BLOCK_SIZE/8];
422 #ifndef OPENSSL_NO_DES
423 DES_cblock *buf_as_des_cblock = NULL;
424 static des_cblock key ={0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
425 static des_cblock key2={0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12};
426 static des_cblock key3={0x56,0x78,0x9a,0xbc,0xde,0xf0,0x12,0x34};
427 DES_key_schedule sch;
428 DES_key_schedule sch2;
429 DES_key_schedule sch3;
430 #endif
431 #ifndef OPENSSL_NO_AES
432 AES_KEY aes_ks1, aes_ks2, aes_ks3;
433 #endif
434 #define D_MD2 0
435 #define D_MDC2 1
436 #define D_MD4 2
437 #define D_MD5 3
438 #define D_HMAC 4
439 #define D_SHA1 5
440 #define D_RMD160 6
441 #define D_RC4 7
442 #define D_CBC_DES 8
443 #define D_EDE3_DES 9
444 #define D_CBC_IDEA 10
445 #define D_CBC_RC2 11
446 #define D_CBC_RC5 12
447 #define D_CBC_BF 13
448 #define D_CBC_CAST 14
449 #define D_CBC_128_AES 15
450 #define D_CBC_192_AES 16
451 #define D_CBC_256_AES 17
452 #define D_EVP 18
453 double d=0.0;
454 long c[ALGOR_NUM][SIZE_NUM];
455 #define R_DSA_512 0
456 #define R_DSA_1024 1
457 #define R_DSA_2048 2
458 #define R_RSA_512 0
459 #define R_RSA_1024 1
460 #define R_RSA_2048 2
461 #define R_RSA_4096 3
462 #ifndef OPENSSL_NO_RSA
463 RSA *rsa_key[RSA_NUM];
464 long rsa_c[RSA_NUM][2];
465 static unsigned int rsa_bits[RSA_NUM]={512,1024,2048,4096};
466 static unsigned char *rsa_data[RSA_NUM]=
467 {test512,test1024,test2048,test4096};
468 static int rsa_data_length[RSA_NUM]={
469 sizeof(test512),sizeof(test1024),
470 sizeof(test2048),sizeof(test4096)};
471 #endif
472 #ifndef OPENSSL_NO_DSA
473 DSA *dsa_key[DSA_NUM];
474 long dsa_c[DSA_NUM][2];
475 static unsigned int dsa_bits[DSA_NUM]={512,1024,2048};
476 #endif
477 int rsa_doit[RSA_NUM];
478 int dsa_doit[DSA_NUM];
479 int doit[ALGOR_NUM];
480 int pr_header=0;
481 const EVP_CIPHER *evp_cipher=NULL;
482 const EVP_MD *evp_md=NULL;
483 int decrypt=0;
484 #ifdef HAVE_FORK
485 int multi=0;
486 #endif
487
488 #ifndef TIMES
489 usertime=-1;
490 #endif
491
492 apps_startup();
493 memset(results, 0, sizeof(results));
494 #ifndef OPENSSL_NO_DSA
495 memset(dsa_key,0,sizeof(dsa_key));
496 #endif
497
498 if (bio_err == NULL)
499 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
500 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
501
502 #ifndef OPENSSL_NO_RSA
503 memset(rsa_key,0,sizeof(rsa_key));
504 for (i=0; i<RSA_NUM; i++)
505 rsa_key[i]=NULL;
506 #endif
507
508 if ((buf=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
509 {
510 BIO_printf(bio_err,"out of memory\n");
511 goto end;
512 }
513 #ifndef OPENSSL_NO_DES
514 buf_as_des_cblock = (des_cblock *)buf;
515 #endif
516 if ((buf2=(unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL)
517 {
518 BIO_printf(bio_err,"out of memory\n");
519 goto end;
520 }
521
522 memset(c,0,sizeof(c));
523 memset(DES_iv,0,sizeof(DES_iv));
524 memset(iv,0,sizeof(iv));
525
526 for (i=0; i<ALGOR_NUM; i++)
527 doit[i]=0;
528 for (i=0; i<RSA_NUM; i++)
529 rsa_doit[i]=0;
530 for (i=0; i<DSA_NUM; i++)
531 dsa_doit[i]=0;
532
533 j=0;
534 argc--;
535 argv++;
536 while (argc)
537 {
538 if ((argc > 0) && (strcmp(*argv,"-elapsed") == 0))
539 {
540 usertime = 0;
541 j--; /* Otherwise, -elapsed gets confused with
542 an algorithm. */
543 }
544 else if ((argc > 0) && (strcmp(*argv,"-evp") == 0))
545 {
546 argc--;
547 argv++;
548 if(argc == 0)
549 {
550 BIO_printf(bio_err,"no EVP given\n");
551 goto end;
552 }
553 evp_cipher=EVP_get_cipherbyname(*argv);
554 if(!evp_cipher)
555 {
556 evp_md=EVP_get_digestbyname(*argv);
557 }
558 if(!evp_cipher && !evp_md)
559 {
560 BIO_printf(bio_err,"%s is an unknown cipher or digest\n",*argv);
561 goto end;
562 }
563 doit[D_EVP]=1;
564 }
565 else if (argc > 0 && !strcmp(*argv,"-decrypt"))
566 {
567 decrypt=1;
568 j--; /* Otherwise, -elapsed gets confused with
569 an algorithm. */
570 }
571 else if ((argc > 0) && (strcmp(*argv,"-engine") == 0))
572 {
573 argc--;
574 argv++;
575 if(argc == 0)
576 {
577 BIO_printf(bio_err,"no engine given\n");
578 goto end;
579 }
580 e = setup_engine(bio_err, *argv, 0);
581 /* j will be increased again further down. We just
582 don't want speed to confuse an engine with an
583 algorithm, especially when none is given (which
584 means all of them should be run) */
585 j--;
586 }
587 #ifdef HAVE_FORK
588 else if ((argc > 0) && (strcmp(*argv,"-multi") == 0))
589 {
590 argc--;
591 argv++;
592 if(argc == 0)
593 {
594 BIO_printf(bio_err,"no multi count given\n");
595 goto end;
596 }
597 multi=atoi(argv[0]);
598 if(multi <= 0)
599 {
600 BIO_printf(bio_err,"bad multi count\n");
601 goto end;
602 }
603 j--; /* Otherwise, -mr gets confused with
604 an algorithm. */
605 }
606 #endif
607 else if (argc > 0 && !strcmp(*argv,"-mr"))
608 {
609 mr=1;
610 j--; /* Otherwise, -mr gets confused with
611 an algorithm. */
612 }
613 else
614 #ifndef OPENSSL_NO_MD2
615 if (strcmp(*argv,"md2") == 0) doit[D_MD2]=1;
616 else
617 #endif
618 #ifndef OPENSSL_NO_MDC2
619 if (strcmp(*argv,"mdc2") == 0) doit[D_MDC2]=1;
620 else
621 #endif
622 #ifndef OPENSSL_NO_MD4
623 if (strcmp(*argv,"md4") == 0) doit[D_MD4]=1;
624 else
625 #endif
626 #ifndef OPENSSL_NO_MD5
627 if (strcmp(*argv,"md5") == 0) doit[D_MD5]=1;
628 else
629 #endif
630 #ifndef OPENSSL_NO_MD5
631 if (strcmp(*argv,"hmac") == 0) doit[D_HMAC]=1;
632 else
633 #endif
634 #ifndef OPENSSL_NO_SHA
635 if (strcmp(*argv,"sha1") == 0) doit[D_SHA1]=1;
636 else
637 if (strcmp(*argv,"sha") == 0) doit[D_SHA1]=1;
638 else
639 #endif
640 #ifndef OPENSSL_NO_RIPEMD
641 if (strcmp(*argv,"ripemd") == 0) doit[D_RMD160]=1;
642 else
643 if (strcmp(*argv,"rmd160") == 0) doit[D_RMD160]=1;
644 else
645 if (strcmp(*argv,"ripemd160") == 0) doit[D_RMD160]=1;
646 else
647 #endif
648 #ifndef OPENSSL_NO_RC4
649 if (strcmp(*argv,"rc4") == 0) doit[D_RC4]=1;
650 else
651 #endif
652 #ifndef OPENSSL_NO_DES
653 if (strcmp(*argv,"des-cbc") == 0) doit[D_CBC_DES]=1;
654 else if (strcmp(*argv,"des-ede3") == 0) doit[D_EDE3_DES]=1;
655 else
656 #endif
657 #ifndef OPENSSL_NO_AES
658 if (strcmp(*argv,"aes-128-cbc") == 0) doit[D_CBC_128_AES]=1;
659 else if (strcmp(*argv,"aes-192-cbc") == 0) doit[D_CBC_192_AES]=1;
660 else if (strcmp(*argv,"aes-256-cbc") == 0) doit[D_CBC_256_AES]=1;
661 else
662 #endif
663 #ifndef OPENSSL_NO_RSA
664 #if 0 /* was: #ifdef RSAref */
665 if (strcmp(*argv,"rsaref") == 0)
666 {
667 RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
668 j--;
669 }
670 else
671 #endif
672 #ifndef RSA_NULL
673 if (strcmp(*argv,"openssl") == 0)
674 {
675 RSA_set_default_method(RSA_PKCS1_SSLeay());
676 j--;
677 }
678 else
679 #endif
680 #endif /* !OPENSSL_NO_RSA */
681 if (strcmp(*argv,"dsa512") == 0) dsa_doit[R_DSA_512]=2;
682 else if (strcmp(*argv,"dsa1024") == 0) dsa_doit[R_DSA_1024]=2;
683 else if (strcmp(*argv,"dsa2048") == 0) dsa_doit[R_DSA_2048]=2;
684 else if (strcmp(*argv,"rsa512") == 0) rsa_doit[R_RSA_512]=2;
685 else if (strcmp(*argv,"rsa1024") == 0) rsa_doit[R_RSA_1024]=2;
686 else if (strcmp(*argv,"rsa2048") == 0) rsa_doit[R_RSA_2048]=2;
687 else if (strcmp(*argv,"rsa4096") == 0) rsa_doit[R_RSA_4096]=2;
688 else
689 #ifndef OPENSSL_NO_RC2
690 if (strcmp(*argv,"rc2-cbc") == 0) doit[D_CBC_RC2]=1;
691 else if (strcmp(*argv,"rc2") == 0) doit[D_CBC_RC2]=1;
692 else
693 #endif
694 #ifndef OPENSSL_NO_RC5
695 if (strcmp(*argv,"rc5-cbc") == 0) doit[D_CBC_RC5]=1;
696 else if (strcmp(*argv,"rc5") == 0) doit[D_CBC_RC5]=1;
697 else
698 #endif
699 #ifndef OPENSSL_NO_IDEA
700 if (strcmp(*argv,"idea-cbc") == 0) doit[D_CBC_IDEA]=1;
701 else if (strcmp(*argv,"idea") == 0) doit[D_CBC_IDEA]=1;
702 else
703 #endif
704 #ifndef OPENSSL_NO_BF
705 if (strcmp(*argv,"bf-cbc") == 0) doit[D_CBC_BF]=1;
706 else if (strcmp(*argv,"blowfish") == 0) doit[D_CBC_BF]=1;
707 else if (strcmp(*argv,"bf") == 0) doit[D_CBC_BF]=1;
708 else
709 #endif
710 #ifndef OPENSSL_NO_CAST
711 if (strcmp(*argv,"cast-cbc") == 0) doit[D_CBC_CAST]=1;
712 else if (strcmp(*argv,"cast") == 0) doit[D_CBC_CAST]=1;
713 else if (strcmp(*argv,"cast5") == 0) doit[D_CBC_CAST]=1;
714 else
715 #endif
716 #ifndef OPENSSL_NO_DES
717 if (strcmp(*argv,"des") == 0)
718 {
719 doit[D_CBC_DES]=1;
720 doit[D_EDE3_DES]=1;
721 }
722 else
723 #endif
724 #ifndef OPENSSL_NO_AES
725 if (strcmp(*argv,"aes") == 0)
726 {
727 doit[D_CBC_128_AES]=1;
728 doit[D_CBC_192_AES]=1;
729 doit[D_CBC_256_AES]=1;
730 }
731 else
732 #endif
733 #ifndef OPENSSL_NO_RSA
734 if (strcmp(*argv,"rsa") == 0)
735 {
736 rsa_doit[R_RSA_512]=1;
737 rsa_doit[R_RSA_1024]=1;
738 rsa_doit[R_RSA_2048]=1;
739 rsa_doit[R_RSA_4096]=1;
740 }
741 else
742 #endif
743 #ifndef OPENSSL_NO_DSA
744 if (strcmp(*argv,"dsa") == 0)
745 {
746 dsa_doit[R_DSA_512]=1;
747 dsa_doit[R_DSA_1024]=1;
748 }
749 else
750 #endif
751 {
752 BIO_printf(bio_err,"Error: bad option or value\n");
753 BIO_printf(bio_err,"\n");
754 BIO_printf(bio_err,"Available values:\n");
755 #ifndef OPENSSL_NO_MD2
756 BIO_printf(bio_err,"md2 ");
757 #endif
758 #ifndef OPENSSL_NO_MDC2
759 BIO_printf(bio_err,"mdc2 ");
760 #endif
761 #ifndef OPENSSL_NO_MD4
762 BIO_printf(bio_err,"md4 ");
763 #endif
764 #ifndef OPENSSL_NO_MD5
765 BIO_printf(bio_err,"md5 ");
766 #ifndef OPENSSL_NO_HMAC
767 BIO_printf(bio_err,"hmac ");
768 #endif
769 #endif
770 #ifndef OPENSSL_NO_SHA1
771 BIO_printf(bio_err,"sha1 ");
772 #endif
773 #ifndef OPENSSL_NO_RIPEMD160
774 BIO_printf(bio_err,"rmd160");
775 #endif
776 #if !defined(OPENSSL_NO_MD2) || !defined(OPENSSL_NO_MDC2) || \
777 !defined(OPENSSL_NO_MD4) || !defined(OPENSSL_NO_MD5) || \
778 !defined(OPENSSL_NO_SHA1) || !defined(OPENSSL_NO_RIPEMD160)
779 BIO_printf(bio_err,"\n");
780 #endif
781
782 #ifndef OPENSSL_NO_IDEA
783 BIO_printf(bio_err,"idea-cbc ");
784 #endif
785 #ifndef OPENSSL_NO_RC2
786 BIO_printf(bio_err,"rc2-cbc ");
787 #endif
788 #ifndef OPENSSL_NO_RC5
789 BIO_printf(bio_err,"rc5-cbc ");
790 #endif
791 #ifndef OPENSSL_NO_BF
792 BIO_printf(bio_err,"bf-cbc");
793 #endif
794 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
795 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_RC5)
796 BIO_printf(bio_err,"\n");
797 #endif
798 #ifndef OPENSSL_NO_DES
799 BIO_printf(bio_err,"des-cbc des-ede3 ");
800 #endif
801 #ifndef OPENSSL_NO_AES
802 BIO_printf(bio_err,"aes-128-cbc aes-192-cbc aes-256-cbc ");
803 #endif
804 #ifndef OPENSSL_NO_RC4
805 BIO_printf(bio_err,"rc4");
806 #endif
807 BIO_printf(bio_err,"\n");
808
809 #ifndef OPENSSL_NO_RSA
810 BIO_printf(bio_err,"rsa512 rsa1024 rsa2048 rsa4096\n");
811 #endif
812
813 #ifndef OPENSSL_NO_DSA
814 BIO_printf(bio_err,"dsa512 dsa1024 dsa2048\n");
815 #endif
816
817 #ifndef OPENSSL_NO_IDEA
818 BIO_printf(bio_err,"idea ");
819 #endif
820 #ifndef OPENSSL_NO_RC2
821 BIO_printf(bio_err,"rc2 ");
822 #endif
823 #ifndef OPENSSL_NO_DES
824 BIO_printf(bio_err,"des ");
825 #endif
826 #ifndef OPENSSL_NO_AES
827 BIO_printf(bio_err,"aes ");
828 #endif
829 #ifndef OPENSSL_NO_RSA
830 BIO_printf(bio_err,"rsa ");
831 #endif
832 #ifndef OPENSSL_NO_BF
833 BIO_printf(bio_err,"blowfish");
834 #endif
835 #if !defined(OPENSSL_NO_IDEA) || !defined(OPENSSL_NO_RC2) || \
836 !defined(OPENSSL_NO_DES) || !defined(OPENSSL_NO_RSA) || \
837 !defined(OPENSSL_NO_BF) || !defined(OPENSSL_NO_AES)
838 BIO_printf(bio_err,"\n");
839 #endif
840
841 BIO_printf(bio_err,"\n");
842 BIO_printf(bio_err,"Available options:\n");
843 #ifdef TIMES
844 BIO_printf(bio_err,"-elapsed measure time in real time instead of CPU user time.\n");
845 #endif
846 BIO_printf(bio_err,"-engine e use engine e, possibly a hardware device.\n");
847 BIO_printf(bio_err,"-evp e use EVP e.\n");
848 BIO_printf(bio_err,"-decrypt time decryption instead of encryption (only EVP).\n");
849 BIO_printf(bio_err,"-mr produce machine readable output.\n");
850 #ifdef HAVE_FORK
851 BIO_printf(bio_err,"-multi n run n benchmarks in parallel.\n");
852 #endif
853 goto end;
854 }
855 argc--;
856 argv++;
857 j++;
858 }
859
860 #ifdef HAVE_FORK
861 if(multi && do_multi(multi))
862 goto show_res;
863 #endif
864
865 if (j == 0)
866 {
867 for (i=0; i<ALGOR_NUM; i++)
868 {
869 if (i != D_EVP)
870 doit[i]=1;
871 }
872 for (i=0; i<RSA_NUM; i++)
873 rsa_doit[i]=1;
874 for (i=0; i<DSA_NUM; i++)
875 dsa_doit[i]=1;
876 }
877 for (i=0; i<ALGOR_NUM; i++)
878 if (doit[i]) pr_header++;
879
880 if (usertime == 0 && !mr)
881 BIO_printf(bio_err,"You have chosen to measure elapsed time instead of user CPU time.\n");
882 if (usertime <= 0 && !mr)
883 {
884 BIO_printf(bio_err,"To get the most accurate results, try to run this\n");
885 BIO_printf(bio_err,"program when this computer is idle.\n");
886 }
887
888 #ifndef OPENSSL_NO_RSA
889 for (i=0; i<RSA_NUM; i++)
890 {
891 const unsigned char *p;
892
893 p=rsa_data[i];
894 rsa_key[i]=d2i_RSAPrivateKey(NULL,&p,rsa_data_length[i]);
895 if (rsa_key[i] == NULL)
896 {
897 BIO_printf(bio_err,"internal error loading RSA key number %d\n",i);
898 goto end;
899 }
900 #if 0
901 else
902 {
903 BIO_printf(bio_err,mr ? "+RK:%d:"
904 : "Loaded RSA key, %d bit modulus and e= 0x",
905 BN_num_bits(rsa_key[i]->n));
906 BN_print(bio_err,rsa_key[i]->e);
907 BIO_printf(bio_err,"\n");
908 }
909 #endif
910 }
911 #endif
912
913 #ifndef OPENSSL_NO_DSA
914 dsa_key[0]=get_dsa512();
915 dsa_key[1]=get_dsa1024();
916 dsa_key[2]=get_dsa2048();
917 #endif
918
919 #ifndef OPENSSL_NO_DES
920 DES_set_key_unchecked(&key,&sch);
921 DES_set_key_unchecked(&key2,&sch2);
922 DES_set_key_unchecked(&key3,&sch3);
923 #endif
924 #ifndef OPENSSL_NO_AES
925 AES_set_encrypt_key(key16,128,&aes_ks1);
926 AES_set_encrypt_key(key24,192,&aes_ks2);
927 AES_set_encrypt_key(key32,256,&aes_ks3);
928 #endif
929 #ifndef OPENSSL_NO_IDEA
930 idea_set_encrypt_key(key16,&idea_ks);
931 #endif
932 #ifndef OPENSSL_NO_RC4
933 RC4_set_key(&rc4_ks,16,key16);
934 #endif
935 #ifndef OPENSSL_NO_RC2
936 RC2_set_key(&rc2_ks,16,key16,128);
937 #endif
938 #ifndef OPENSSL_NO_RC5
939 RC5_32_set_key(&rc5_ks,16,key16,12);
940 #endif
941 #ifndef OPENSSL_NO_BF
942 BF_set_key(&bf_ks,16,key16);
943 #endif
944 #ifndef OPENSSL_NO_CAST
945 CAST_set_key(&cast_ks,16,key16);
946 #endif
947 #ifndef OPENSSL_NO_RSA
948 memset(rsa_c,0,sizeof(rsa_c));
949 #endif
950 #ifndef SIGALRM
951 #ifndef OPENSSL_NO_DES
952 BIO_printf(bio_err,"First we calculate the approximate speed ...\n");
953 count=10;
954 do {
955 long i;
956 count*=2;
957 Time_F(START);
958 for (i=count; i; i--)
959 DES_ecb_encrypt(buf_as_des_cblock,buf_as_des_cblock,
960 &sch,DES_ENCRYPT);
961 d=Time_F(STOP);
962 } while (d <3);
963 save_count=count;
964 c[D_MD2][0]=count/10;
965 c[D_MDC2][0]=count/10;
966 c[D_MD4][0]=count;
967 c[D_MD5][0]=count;
968 c[D_HMAC][0]=count;
969 c[D_SHA1][0]=count;
970 c[D_RMD160][0]=count;
971 c[D_RC4][0]=count*5;
972 c[D_CBC_DES][0]=count;
973 c[D_EDE3_DES][0]=count/3;
974 c[D_CBC_IDEA][0]=count;
975 c[D_CBC_RC2][0]=count;
976 c[D_CBC_RC5][0]=count;
977 c[D_CBC_BF][0]=count;
978 c[D_CBC_CAST][0]=count;
979
980 for (i=1; i<SIZE_NUM; i++)
981 {
982 c[D_MD2][i]=c[D_MD2][0]*4*lengths[0]/lengths[i];
983 c[D_MDC2][i]=c[D_MDC2][0]*4*lengths[0]/lengths[i];
984 c[D_MD4][i]=c[D_MD4][0]*4*lengths[0]/lengths[i];
985 c[D_MD5][i]=c[D_MD5][0]*4*lengths[0]/lengths[i];
986 c[D_HMAC][i]=c[D_HMAC][0]*4*lengths[0]/lengths[i];
987 c[D_SHA1][i]=c[D_SHA1][0]*4*lengths[0]/lengths[i];
988 c[D_RMD160][i]=c[D_RMD160][0]*4*lengths[0]/lengths[i];
989 }
990 for (i=1; i<SIZE_NUM; i++)
991 {
992 long l0,l1;
993
994 l0=(long)lengths[i-1];
995 l1=(long)lengths[i];
996 c[D_RC4][i]=c[D_RC4][i-1]*l0/l1;
997 c[D_CBC_DES][i]=c[D_CBC_DES][i-1]*l0/l1;
998 c[D_EDE3_DES][i]=c[D_EDE3_DES][i-1]*l0/l1;
999 c[D_CBC_IDEA][i]=c[D_CBC_IDEA][i-1]*l0/l1;
1000 c[D_CBC_RC2][i]=c[D_CBC_RC2][i-1]*l0/l1;
1001 c[D_CBC_RC5][i]=c[D_CBC_RC5][i-1]*l0/l1;
1002 c[D_CBC_BF][i]=c[D_CBC_BF][i-1]*l0/l1;
1003 c[D_CBC_CAST][i]=c[D_CBC_CAST][i-1]*l0/l1;
1004 }
1005 #ifndef OPENSSL_NO_RSA
1006 rsa_c[R_RSA_512][0]=count/2000;
1007 rsa_c[R_RSA_512][1]=count/400;
1008 for (i=1; i<RSA_NUM; i++)
1009 {
1010 rsa_c[i][0]=rsa_c[i-1][0]/8;
1011 rsa_c[i][1]=rsa_c[i-1][1]/4;
1012 if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1013 rsa_doit[i]=0;
1014 else
1015 {
1016 if (rsa_c[i][0] == 0)
1017 {
1018 rsa_c[i][0]=1;
1019 rsa_c[i][1]=20;
1020 }
1021 }
1022 }
1023 #endif
1024
1025 #ifndef OPENSSL_NO_DSA
1026 dsa_c[R_DSA_512][0]=count/1000;
1027 dsa_c[R_DSA_512][1]=count/1000/2;
1028 for (i=1; i<DSA_NUM; i++)
1029 {
1030 dsa_c[i][0]=dsa_c[i-1][0]/4;
1031 dsa_c[i][1]=dsa_c[i-1][1]/4;
1032 if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1033 dsa_doit[i]=0;
1034 else
1035 {
1036 if (dsa_c[i] == 0)
1037 {
1038 dsa_c[i][0]=1;
1039 dsa_c[i][1]=1;
1040 }
1041 }
1042 }
1043 #endif
1044
1045 #define COND(d) (count < (d))
1046 #define COUNT(d) (d)
1047 #else
1048 /* not worth fixing */
1049 # error "You cannot disable DES on systems without SIGALRM."
1050 #endif /* OPENSSL_NO_DES */
1051 #else
1052 #define COND(c) (run)
1053 #define COUNT(d) (count)
1054 signal(SIGALRM,sig_done);
1055 #endif /* SIGALRM */
1056
1057 #ifndef OPENSSL_NO_MD2
1058 if (doit[D_MD2])
1059 {
1060 for (j=0; j<SIZE_NUM; j++)
1061 {
1062 print_message(names[D_MD2],c[D_MD2][j],lengths[j]);
1063 Time_F(START);
1064 for (count=0,run=1; COND(c[D_MD2][j]); count++)
1065 EVP_Digest(buf,(unsigned long)lengths[j],&(md2[0]),NULL,EVP_md2(),NULL);
1066 d=Time_F(STOP);
1067 print_result(D_MD2,j,count,d);
1068 }
1069 }
1070 #endif
1071 #ifndef OPENSSL_NO_MDC2
1072 if (doit[D_MDC2])
1073 {
1074 for (j=0; j<SIZE_NUM; j++)
1075 {
1076 print_message(names[D_MDC2],c[D_MDC2][j],lengths[j]);
1077 Time_F(START);
1078 for (count=0,run=1; COND(c[D_MDC2][j]); count++)
1079 EVP_Digest(buf,(unsigned long)lengths[j],&(mdc2[0]),NULL,EVP_mdc2(),NULL);
1080 d=Time_F(STOP);
1081 print_result(D_MDC2,j,count,d);
1082 }
1083 }
1084 #endif
1085
1086 #ifndef OPENSSL_NO_MD4
1087 if (doit[D_MD4])
1088 {
1089 for (j=0; j<SIZE_NUM; j++)
1090 {
1091 print_message(names[D_MD4],c[D_MD4][j],lengths[j]);
1092 Time_F(START);
1093 for (count=0,run=1; COND(c[D_MD4][j]); count++)
1094 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md4[0]),NULL,EVP_md4(),NULL);
1095 d=Time_F(STOP);
1096 print_result(D_MD4,j,count,d);
1097 }
1098 }
1099 #endif
1100
1101 #ifndef OPENSSL_NO_MD5
1102 if (doit[D_MD5])
1103 {
1104 for (j=0; j<SIZE_NUM; j++)
1105 {
1106 print_message(names[D_MD5],c[D_MD5][j],lengths[j]);
1107 Time_F(START);
1108 for (count=0,run=1; COND(c[D_MD5][j]); count++)
1109 EVP_Digest(&(buf[0]),(unsigned long)lengths[j],&(md5[0]),NULL,EVP_get_digestbyname("md5"),NULL);
1110 d=Time_F(STOP);
1111 print_result(D_MD5,j,count,d);
1112 }
1113 }
1114 #endif
1115
1116 #if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
1117 if (doit[D_HMAC])
1118 {
1119 HMAC_CTX hctx;
1120
1121 HMAC_CTX_init(&hctx);
1122 HMAC_Init_ex(&hctx,(unsigned char *)"This is a key...",
1123 16,EVP_md5());
1124
1125 for (j=0; j<SIZE_NUM; j++)
1126 {
1127 print_message(names[D_HMAC],c[D_HMAC][j],lengths[j]);
1128 Time_F(START);
1129 for (count=0,run=1; COND(c[D_HMAC][j]); count++)
1130 {
1131 HMAC_Init_ex(&hctx,NULL,0,NULL);
1132 HMAC_Update(&hctx,buf,lengths[j]);
1133 HMAC_Final(&hctx,&(hmac[0]),NULL);
1134 }
1135 d=Time_F(STOP);
1136 print_result(D_HMAC,j,count,d);
1137 }
1138 HMAC_CTX_cleanup(&hctx);
1139 }
1140 #endif
1141 #ifndef OPENSSL_NO_SHA
1142 if (doit[D_SHA1])
1143 {
1144 for (j=0; j<SIZE_NUM; j++)
1145 {
1146 print_message(names[D_SHA1],c[D_SHA1][j],lengths[j]);
1147 Time_F(START);
1148 for (count=0,run=1; COND(c[D_SHA1][j]); count++)
1149 EVP_Digest(buf,(unsigned long)lengths[j],&(sha[0]),NULL,EVP_sha1(),NULL);
1150 d=Time_F(STOP);
1151 print_result(D_SHA1,j,count,d);
1152 }
1153 }
1154 #endif
1155 #ifndef OPENSSL_NO_RIPEMD
1156 if (doit[D_RMD160])
1157 {
1158 for (j=0; j<SIZE_NUM; j++)
1159 {
1160 print_message(names[D_RMD160],c[D_RMD160][j],lengths[j]);
1161 Time_F(START);
1162 for (count=0,run=1; COND(c[D_RMD160][j]); count++)
1163 EVP_Digest(buf,(unsigned long)lengths[j],&(rmd160[0]),NULL,EVP_ripemd160(),NULL);
1164 d=Time_F(STOP);
1165 print_result(D_RMD160,j,count,d);
1166 }
1167 }
1168 #endif
1169 #ifndef OPENSSL_NO_RC4
1170 if (doit[D_RC4])
1171 {
1172 for (j=0; j<SIZE_NUM; j++)
1173 {
1174 print_message(names[D_RC4],c[D_RC4][j],lengths[j]);
1175 Time_F(START);
1176 for (count=0,run=1; COND(c[D_RC4][j]); count++)
1177 RC4(&rc4_ks,(unsigned int)lengths[j],
1178 buf,buf);
1179 d=Time_F(STOP);
1180 print_result(D_RC4,j,count,d);
1181 }
1182 }
1183 #endif
1184 #ifndef OPENSSL_NO_DES
1185 if (doit[D_CBC_DES])
1186 {
1187 for (j=0; j<SIZE_NUM; j++)
1188 {
1189 print_message(names[D_CBC_DES],c[D_CBC_DES][j],lengths[j]);
1190 Time_F(START);
1191 for (count=0,run=1; COND(c[D_CBC_DES][j]); count++)
1192 DES_ncbc_encrypt(buf,buf,lengths[j],&sch,
1193 &DES_iv,DES_ENCRYPT);
1194 d=Time_F(STOP);
1195 print_result(D_CBC_DES,j,count,d);
1196 }
1197 }
1198
1199 if (doit[D_EDE3_DES])
1200 {
1201 for (j=0; j<SIZE_NUM; j++)
1202 {
1203 print_message(names[D_EDE3_DES],c[D_EDE3_DES][j],lengths[j]);
1204 Time_F(START);
1205 for (count=0,run=1; COND(c[D_EDE3_DES][j]); count++)
1206 DES_ede3_cbc_encrypt(buf,buf,lengths[j],
1207 &sch,&sch2,&sch3,
1208 &DES_iv,DES_ENCRYPT);
1209 d=Time_F(STOP);
1210 print_result(D_EDE3_DES,j,count,d);
1211 }
1212 }
1213 #endif
1214 #ifndef OPENSSL_NO_AES
1215 if (doit[D_CBC_128_AES])
1216 {
1217 for (j=0; j<SIZE_NUM; j++)
1218 {
1219 print_message(names[D_CBC_128_AES],c[D_CBC_128_AES][j],lengths[j]);
1220 Time_F(START);
1221 for (count=0,run=1; COND(c[D_CBC_128_AES][j]); count++)
1222 AES_cbc_encrypt(buf,buf,
1223 (unsigned long)lengths[j],&aes_ks1,
1224 iv,AES_ENCRYPT);
1225 d=Time_F(STOP);
1226 print_result(D_CBC_128_AES,j,count,d);
1227 }
1228 }
1229 if (doit[D_CBC_192_AES])
1230 {
1231 for (j=0; j<SIZE_NUM; j++)
1232 {
1233 print_message(names[D_CBC_192_AES],c[D_CBC_192_AES][j],lengths[j]);
1234 Time_F(START);
1235 for (count=0,run=1; COND(c[D_CBC_192_AES][j]); count++)
1236 AES_cbc_encrypt(buf,buf,
1237 (unsigned long)lengths[j],&aes_ks2,
1238 iv,AES_ENCRYPT);
1239 d=Time_F(STOP);
1240 print_result(D_CBC_192_AES,j,count,d);
1241 }
1242 }
1243 if (doit[D_CBC_256_AES])
1244 {
1245 for (j=0; j<SIZE_NUM; j++)
1246 {
1247 print_message(names[D_CBC_256_AES],c[D_CBC_256_AES][j],lengths[j]);
1248 Time_F(START);
1249 for (count=0,run=1; COND(c[D_CBC_256_AES][j]); count++)
1250 AES_cbc_encrypt(buf,buf,
1251 (unsigned long)lengths[j],&aes_ks3,
1252 iv,AES_ENCRYPT);
1253 d=Time_F(STOP);
1254 print_result(D_CBC_256_AES,j,count,d);
1255 }
1256 }
1257
1258 #endif
1259 #ifndef OPENSSL_NO_IDEA
1260 if (doit[D_CBC_IDEA])
1261 {
1262 for (j=0; j<SIZE_NUM; j++)
1263 {
1264 print_message(names[D_CBC_IDEA],c[D_CBC_IDEA][j],lengths[j]);
1265 Time_F(START);
1266 for (count=0,run=1; COND(c[D_CBC_IDEA][j]); count++)
1267 idea_cbc_encrypt(buf,buf,
1268 (unsigned long)lengths[j],&idea_ks,
1269 iv,IDEA_ENCRYPT);
1270 d=Time_F(STOP);
1271 print_result(D_CBC_IDEA,j,count,d);
1272 }
1273 }
1274 #endif
1275 #ifndef OPENSSL_NO_RC2
1276 if (doit[D_CBC_RC2])
1277 {
1278 for (j=0; j<SIZE_NUM; j++)
1279 {
1280 print_message(names[D_CBC_RC2],c[D_CBC_RC2][j],lengths[j]);
1281 Time_F(START);
1282 for (count=0,run=1; COND(c[D_CBC_RC2][j]); count++)
1283 RC2_cbc_encrypt(buf,buf,
1284 (unsigned long)lengths[j],&rc2_ks,
1285 iv,RC2_ENCRYPT);
1286 d=Time_F(STOP);
1287 print_result(D_CBC_RC2,j,count,d);
1288 }
1289 }
1290 #endif
1291 #ifndef OPENSSL_NO_RC5
1292 if (doit[D_CBC_RC5])
1293 {
1294 for (j=0; j<SIZE_NUM; j++)
1295 {
1296 print_message(names[D_CBC_RC5],c[D_CBC_RC5][j],lengths[j]);
1297 Time_F(START);
1298 for (count=0,run=1; COND(c[D_CBC_RC5][j]); count++)
1299 RC5_32_cbc_encrypt(buf,buf,
1300 (unsigned long)lengths[j],&rc5_ks,
1301 iv,RC5_ENCRYPT);
1302 d=Time_F(STOP);
1303 print_result(D_CBC_RC5,j,count,d);
1304 }
1305 }
1306 #endif
1307 #ifndef OPENSSL_NO_BF
1308 if (doit[D_CBC_BF])
1309 {
1310 for (j=0; j<SIZE_NUM; j++)
1311 {
1312 print_message(names[D_CBC_BF],c[D_CBC_BF][j],lengths[j]);
1313 Time_F(START);
1314 for (count=0,run=1; COND(c[D_CBC_BF][j]); count++)
1315 BF_cbc_encrypt(buf,buf,
1316 (unsigned long)lengths[j],&bf_ks,
1317 iv,BF_ENCRYPT);
1318 d=Time_F(STOP);
1319 print_result(D_CBC_BF,j,count,d);
1320 }
1321 }
1322 #endif
1323 #ifndef OPENSSL_NO_CAST
1324 if (doit[D_CBC_CAST])
1325 {
1326 for (j=0; j<SIZE_NUM; j++)
1327 {
1328 print_message(names[D_CBC_CAST],c[D_CBC_CAST][j],lengths[j]);
1329 Time_F(START);
1330 for (count=0,run=1; COND(c[D_CBC_CAST][j]); count++)
1331 CAST_cbc_encrypt(buf,buf,
1332 (unsigned long)lengths[j],&cast_ks,
1333 iv,CAST_ENCRYPT);
1334 d=Time_F(STOP);
1335 print_result(D_CBC_CAST,j,count,d);
1336 }
1337 }
1338 #endif
1339
1340 if (doit[D_EVP])
1341 {
1342 for (j=0; j<SIZE_NUM; j++)
1343 {
1344 if (evp_cipher)
1345 {
1346 EVP_CIPHER_CTX ctx;
1347 int outl;
1348
1349 names[D_EVP]=OBJ_nid2ln(evp_cipher->nid);
1350 /* -O3 -fschedule-insns messes up an
1351 * optimization here! names[D_EVP]
1352 * somehow becomes NULL */
1353 print_message(names[D_EVP],save_count,
1354 lengths[j]);
1355
1356 EVP_CIPHER_CTX_init(&ctx);
1357 if(decrypt)
1358 EVP_DecryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1359 else
1360 EVP_EncryptInit_ex(&ctx,evp_cipher,NULL,key16,iv);
1361
1362 Time_F(START);
1363 if(decrypt)
1364 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1365 EVP_DecryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1366 else
1367 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1368 EVP_EncryptUpdate(&ctx,buf,&outl,buf,lengths[j]);
1369 if(decrypt)
1370 EVP_DecryptFinal_ex(&ctx,buf,&outl);
1371 else
1372 EVP_EncryptFinal_ex(&ctx,buf,&outl);
1373 d=Time_F(STOP);
1374 }
1375 if (evp_md)
1376 {
1377 names[D_EVP]=OBJ_nid2ln(evp_md->type);
1378 print_message(names[D_EVP],save_count,
1379 lengths[j]);
1380
1381 Time_F(START);
1382 for (count=0,run=1; COND(save_count*4*lengths[0]/lengths[j]); count++)
1383 EVP_Digest(buf,lengths[j],&(md[0]),NULL,evp_md,NULL);
1384
1385 d=Time_F(STOP);
1386 }
1387 print_result(D_EVP,j,count,d);
1388 }
1389 }
1390
1391 RAND_pseudo_bytes(buf,36);
1392 #ifndef OPENSSL_NO_RSA
1393 for (j=0; j<RSA_NUM; j++)
1394 {
1395 int ret;
1396 if (!rsa_doit[j]) continue;
1397 ret=RSA_sign(NID_md5_sha1, buf,36, buf2, &rsa_num, rsa_key[j]);
1398 if (ret == 0)
1399 {
1400 BIO_printf(bio_err,"RSA sign failure. No RSA sign will be done.\n");
1401 ERR_print_errors(bio_err);
1402 rsa_count=1;
1403 }
1404 else
1405 {
1406 pkey_print_message("private","rsa",
1407 rsa_c[j][0],rsa_bits[j],
1408 RSA_SECONDS);
1409 /* RSA_blinding_on(rsa_key[j],NULL); */
1410 Time_F(START);
1411 for (count=0,run=1; COND(rsa_c[j][0]); count++)
1412 {
1413 ret=RSA_sign(NID_md5_sha1, buf,36, buf2,
1414 &rsa_num, rsa_key[j]);
1415 if (ret == 0)
1416 {
1417 BIO_printf(bio_err,
1418 "RSA sign failure\n");
1419 ERR_print_errors(bio_err);
1420 count=1;
1421 break;
1422 }
1423 }
1424 d=Time_F(STOP);
1425 BIO_printf(bio_err,mr ? "+R1:%ld:%d:%.2f\n"
1426 : "%ld %d bit private RSA's in %.2fs\n",
1427 count,rsa_bits[j],d);
1428 rsa_results[j][0]=d/(double)count;
1429 rsa_count=count;
1430 }
1431
1432 #if 1
1433 ret=RSA_verify(NID_md5_sha1, buf,36, buf2, rsa_num, rsa_key[j]);
1434 if (ret <= 0)
1435 {
1436 BIO_printf(bio_err,"RSA verify failure. No RSA verify will be done.\n");
1437 ERR_print_errors(bio_err);
1438 rsa_doit[j] = 0;
1439 }
1440 else
1441 {
1442 pkey_print_message("public","rsa",
1443 rsa_c[j][1],rsa_bits[j],
1444 RSA_SECONDS);
1445 Time_F(START);
1446 for (count=0,run=1; COND(rsa_c[j][1]); count++)
1447 {
1448 ret=RSA_verify(NID_md5_sha1, buf,36, buf2,
1449 rsa_num, rsa_key[j]);
1450 if (ret == 0)
1451 {
1452 BIO_printf(bio_err,
1453 "RSA verify failure\n");
1454 ERR_print_errors(bio_err);
1455 count=1;
1456 break;
1457 }
1458 }
1459 d=Time_F(STOP);
1460 BIO_printf(bio_err,mr ? "+R2:%ld:%d:%.2f\n"
1461 : "%ld %d bit public RSA's in %.2fs\n",
1462 count,rsa_bits[j],d);
1463 rsa_results[j][1]=d/(double)count;
1464 }
1465 #endif
1466
1467 if (rsa_count <= 1)
1468 {
1469 /* if longer than 10s, don't do any more */
1470 for (j++; j<RSA_NUM; j++)
1471 rsa_doit[j]=0;
1472 }
1473 }
1474 #endif
1475
1476 RAND_pseudo_bytes(buf,20);
1477 #ifndef OPENSSL_NO_DSA
1478 if (RAND_status() != 1)
1479 {
1480 RAND_seed(rnd_seed, sizeof rnd_seed);
1481 rnd_fake = 1;
1482 }
1483 for (j=0; j<DSA_NUM; j++)
1484 {
1485 unsigned int kk;
1486 int ret;
1487
1488 if (!dsa_doit[j]) continue;
1489 /* DSA_generate_key(dsa_key[j]); */
1490 /* DSA_sign_setup(dsa_key[j],NULL); */
1491 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1492 &kk,dsa_key[j]);
1493 if (ret == 0)
1494 {
1495 BIO_printf(bio_err,"DSA sign failure. No DSA sign will be done.\n");
1496 ERR_print_errors(bio_err);
1497 rsa_count=1;
1498 }
1499 else
1500 {
1501 pkey_print_message("sign","dsa",
1502 dsa_c[j][0],dsa_bits[j],
1503 DSA_SECONDS);
1504 Time_F(START);
1505 for (count=0,run=1; COND(dsa_c[j][0]); count++)
1506 {
1507 ret=DSA_sign(EVP_PKEY_DSA,buf,20,buf2,
1508 &kk,dsa_key[j]);
1509 if (ret == 0)
1510 {
1511 BIO_printf(bio_err,
1512 "DSA sign failure\n");
1513 ERR_print_errors(bio_err);
1514 count=1;
1515 break;
1516 }
1517 }
1518 d=Time_F(STOP);
1519 BIO_printf(bio_err,mr ? "+R3:%ld:%d:%.2f\n"
1520 : "%ld %d bit DSA signs in %.2fs\n",
1521 count,dsa_bits[j],d);
1522 dsa_results[j][0]=d/(double)count;
1523 rsa_count=count;
1524 }
1525
1526 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1527 kk,dsa_key[j]);
1528 if (ret <= 0)
1529 {
1530 BIO_printf(bio_err,"DSA verify failure. No DSA verify will be done.\n");
1531 ERR_print_errors(bio_err);
1532 dsa_doit[j] = 0;
1533 }
1534 else
1535 {
1536 pkey_print_message("verify","dsa",
1537 dsa_c[j][1],dsa_bits[j],
1538 DSA_SECONDS);
1539 Time_F(START);
1540 for (count=0,run=1; COND(dsa_c[j][1]); count++)
1541 {
1542 ret=DSA_verify(EVP_PKEY_DSA,buf,20,buf2,
1543 kk,dsa_key[j]);
1544 if (ret <= 0)
1545 {
1546 BIO_printf(bio_err,
1547 "DSA verify failure\n");
1548 ERR_print_errors(bio_err);
1549 count=1;
1550 break;
1551 }
1552 }
1553 d=Time_F(STOP);
1554 BIO_printf(bio_err,mr ? "+R4:%ld:%d:%.2f\n"
1555 : "%ld %d bit DSA verify in %.2fs\n",
1556 count,dsa_bits[j],d);
1557 dsa_results[j][1]=d/(double)count;
1558 }
1559
1560 if (rsa_count <= 1)
1561 {
1562 /* if longer than 10s, don't do any more */
1563 for (j++; j<DSA_NUM; j++)
1564 dsa_doit[j]=0;
1565 }
1566 }
1567 if (rnd_fake) RAND_cleanup();
1568 #endif
1569 #ifdef HAVE_FORK
1570 show_res:
1571 #endif
1572 if(!mr)
1573 {
1574 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_VERSION));
1575 fprintf(stdout,"%s\n",SSLeay_version(SSLEAY_BUILT_ON));
1576 printf("options:");
1577 printf("%s ",BN_options());
1578 #ifndef OPENSSL_NO_MD2
1579 printf("%s ",MD2_options());
1580 #endif
1581 #ifndef OPENSSL_NO_RC4
1582 printf("%s ",RC4_options());
1583 #endif
1584 #ifndef OPENSSL_NO_DES
1585 printf("%s ",des_options());
1586 #endif
1587 #ifndef OPENSSL_NO_AES
1588 printf("%s ",AES_options());
1589 #endif
1590 #ifndef OPENSSL_NO_IDEA
1591 printf("%s ",idea_options());
1592 #endif
1593 #ifndef OPENSSL_NO_BF
1594 printf("%s ",BF_options());
1595 #endif
1596 fprintf(stdout,"\n%s\n",SSLeay_version(SSLEAY_CFLAGS));
1597 printf("available timing options: ");
1598 #ifdef TIMES
1599 printf("TIMES ");
1600 #endif
1601 #ifdef TIMEB
1602 printf("TIMEB ");
1603 #endif
1604 #ifdef USE_TOD
1605 printf("USE_TOD ");
1606 #endif
1607 #ifdef HZ
1608 #define as_string(s) (#s)
1609 printf("HZ=%g", HZ);
1610 # ifdef _SC_CLK_TCK
1611 printf(" [sysconf value]");
1612 # endif
1613 #endif
1614 printf("\n");
1615 printf("timing function used: %s%s%s%s%s%s%s\n",
1616 (ftime_used ? "ftime" : ""),
1617 (ftime_used + times_used > 1 ? "," : ""),
1618 (times_used ? "times" : ""),
1619 (ftime_used + times_used + gettimeofday_used > 1 ? "," : ""),
1620 (gettimeofday_used ? "gettimeofday" : ""),
1621 (ftime_used + times_used + gettimeofday_used + getrusage_used > 1 ? "," : ""),
1622 (getrusage_used ? "getrusage" : ""));
1623 }
1624
1625 if (pr_header)
1626 {
1627 if(mr)
1628 fprintf(stdout,"+H");
1629 else
1630 {
1631 fprintf(stdout,"The 'numbers' are in 1000s of bytes per second processed.\n");
1632 fprintf(stdout,"type ");
1633 }
1634 for (j=0; j<SIZE_NUM; j++)
1635 fprintf(stdout,mr ? ":%d" : "%7d bytes",lengths[j]);
1636 fprintf(stdout,"\n");
1637 }
1638
1639 for (k=0; k<ALGOR_NUM; k++)
1640 {
1641 if (!doit[k]) continue;
1642 if(mr)
1643 fprintf(stdout,"+F:%d:%s",k,names[k]);
1644 else
1645 fprintf(stdout,"%-13s",names[k]);
1646 for (j=0; j<SIZE_NUM; j++)
1647 {
1648 if (results[k][j] > 10000 && !mr)
1649 fprintf(stdout," %11.2fk",results[k][j]/1e3);
1650 else
1651 fprintf(stdout,mr ? ":%.2f" : " %11.2f ",results[k][j]);
1652 }
1653 fprintf(stdout,"\n");
1654 }
1655 #ifndef OPENSSL_NO_RSA
1656 j=1;
1657 for (k=0; k<RSA_NUM; k++)
1658 {
1659 if (!rsa_doit[k]) continue;
1660 if (j && !mr)
1661 {
1662 printf("%18ssign verify sign/s verify/s\n"," ");
1663 j=0;
1664 }
1665 if(mr)
1666 fprintf(stdout,"+F2:%u:%u:%f:%f\n",
1667 k,rsa_bits[k],rsa_results[k][0],
1668 rsa_results[k][1]);
1669 else
1670 fprintf(stdout,"rsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
1671 rsa_bits[k],rsa_results[k][0],rsa_results[k][1],
1672 1.0/rsa_results[k][0],1.0/rsa_results[k][1]);
1673 }
1674 #endif
1675 #ifndef OPENSSL_NO_DSA
1676 j=1;
1677 for (k=0; k<DSA_NUM; k++)
1678 {
1679 if (!dsa_doit[k]) continue;
1680 if (j && !mr)
1681 {
1682 printf("%18ssign verify sign/s verify/s\n"," ");
1683 j=0;
1684 }
1685 if(mr)
1686 fprintf(stdout,"+F3:%u:%u:%f:%f\n",
1687 k,dsa_bits[k],dsa_results[k][0],dsa_results[k][1]);
1688 else
1689 fprintf(stdout,"dsa %4u bits %8.4fs %8.4fs %8.1f %8.1f\n",
1690 dsa_bits[k],dsa_results[k][0],dsa_results[k][1],
1691 1.0/dsa_results[k][0],1.0/dsa_results[k][1]);
1692 }
1693 #endif
1694 mret=0;
1695 end:
1696 ERR_print_errors(bio_err);
1697 if (buf != NULL) OPENSSL_free(buf);
1698 if (buf2 != NULL) OPENSSL_free(buf2);
1699 #ifndef OPENSSL_NO_RSA
1700 for (i=0; i<RSA_NUM; i++)
1701 if (rsa_key[i] != NULL)
1702 RSA_free(rsa_key[i]);
1703 #endif
1704 #ifndef OPENSSL_NO_DSA
1705 for (i=0; i<DSA_NUM; i++)
1706 if (dsa_key[i] != NULL)
1707 DSA_free(dsa_key[i]);
1708 #endif
1709 apps_shutdown();
1710 EXIT(mret);
1711 }
1712
1713 static void print_message(const char *s, long num, int length)
1714 {
1715 #ifdef SIGALRM
1716 BIO_printf(bio_err,mr ? "+DT:%s:%d:%d\n"
1717 : "Doing %s for %ds on %d size blocks: ",s,SECONDS,length);
1718 (void)BIO_flush(bio_err);
1719 alarm(SECONDS);
1720 #else
1721 BIO_printf(bio_err,mr ? "+DN:%s:%ld:%d\n"
1722 : "Doing %s %ld times on %d size blocks: ",s,num,length);
1723 (void)BIO_flush(bio_err);
1724 #endif
1725 #ifdef LINT
1726 num=num;
1727 #endif
1728 }
1729
1730 static void pkey_print_message(char *str, char *str2, long num, int bits,
1731 int tm)
1732 {
1733 #ifdef SIGALRM
1734 BIO_printf(bio_err,mr ? "+DTP:%d:%s:%s:%d\n"
1735 : "Doing %d bit %s %s's for %ds: ",bits,str,str2,tm);
1736 (void)BIO_flush(bio_err);
1737 alarm(RSA_SECONDS);
1738 #else
1739 BIO_printf(bio_err,mr ? "+DNP:%ld:%d:%s:%s\n"
1740 : "Doing %ld %d bit %s %s's: ",num,bits,str,str2);
1741 (void)BIO_flush(bio_err);
1742 #endif
1743 #ifdef LINT
1744 num=num;
1745 #endif
1746 }
1747
1748 static void print_result(int alg,int run_no,int count,double time_used)
1749 {
1750 BIO_printf(bio_err,mr ? "+R:%ld:%s:%f\n"
1751 : "%ld %s's in %.2fs\n",count,names[alg],time_used);
1752 results[alg][run_no]=((double)count)/time_used*lengths[run_no];
1753 }
1754
1755 static char *sstrsep(char **string, const char *delim)
1756 {
1757 char isdelim[256];
1758 char *token = *string;
1759
1760 if (**string == 0)
1761 return NULL;
1762
1763 memset(isdelim, 0, 256);
1764 isdelim[0] = 1;
1765
1766 while (*delim)
1767 {
1768 isdelim[(unsigned char)(*delim)] = 1;
1769 delim++;
1770 }
1771
1772 while (!isdelim[(unsigned char)(**string)])
1773 {
1774 (*string)++;
1775 }
1776
1777 if (**string)
1778 {
1779 **string = 0;
1780 (*string)++;
1781 }
1782
1783 return token;
1784 }
1785
1786 #ifdef HAVE_FORK
1787 static int do_multi(int multi)
1788 {
1789 int n;
1790 int fd[2];
1791 int *fds;
1792 static char sep[]=":";
1793
1794 fds=malloc(multi*sizeof *fds);
1795 for(n=0 ; n < multi ; ++n)
1796 {
1797 pipe(fd);
1798 if(fork())
1799 {
1800 close(fd[1]);
1801 fds[n]=fd[0];
1802 }
1803 else
1804 {
1805 close(fd[0]);
1806 close(1);
1807 dup(fd[1]);
1808 close(fd[1]);
1809 mr=1;
1810 usertime=0;
1811 return 0;
1812 }
1813 printf("Forked child %d\n",n);
1814 }
1815
1816 /* for now, assume the pipe is long enough to take all the output */
1817 for(n=0 ; n < multi ; ++n)
1818 {
1819 FILE *f;
1820 char buf[1024];
1821 char *p;
1822
1823 f=fdopen(fds[n],"r");
1824 while(fgets(buf,sizeof buf,f))
1825 {
1826 p=strchr(buf,'\n');
1827 if(p)
1828 *p='\0';
1829 if(buf[0] != '+')
1830 {
1831 fprintf(stderr,"Don't understand line '%s' from child %d\n",
1832 buf,n);
1833 continue;
1834 }
1835 printf("Got: %s from %d\n",buf,n);
1836 if(!strncmp(buf,"+F:",3))
1837 {
1838 int alg;
1839 int j;
1840
1841 p=buf+3;
1842 alg=atoi(sstrsep(&p,sep));
1843 sstrsep(&p,sep);
1844 for(j=0 ; j < SIZE_NUM ; ++j)
1845 results[alg][j]+=atof(sstrsep(&p,sep));
1846 }
1847 else if(!strncmp(buf,"+F2:",4))
1848 {
1849 int k;
1850 double d;
1851
1852 p=buf+4;
1853 k=atoi(sstrsep(&p,sep));
1854 sstrsep(&p,sep);
1855
1856 d=atof(sstrsep(&p,sep));
1857 if(n)
1858 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
1859 else
1860 rsa_results[k][0]=d;
1861
1862 d=atof(sstrsep(&p,sep));
1863 if(n)
1864 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
1865 else
1866 rsa_results[k][1]=d;
1867 }
1868 else if(!strncmp(buf,"+F2:",4))
1869 {
1870 int k;
1871 double d;
1872
1873 p=buf+4;
1874 k=atoi(sstrsep(&p,sep));
1875 sstrsep(&p,sep);
1876
1877 d=atof(sstrsep(&p,sep));
1878 if(n)
1879 rsa_results[k][0]=1/(1/rsa_results[k][0]+1/d);
1880 else
1881 rsa_results[k][0]=d;
1882
1883 d=atof(sstrsep(&p,sep));
1884 if(n)
1885 rsa_results[k][1]=1/(1/rsa_results[k][1]+1/d);
1886 else
1887 rsa_results[k][1]=d;
1888 }
1889 else if(!strncmp(buf,"+F3:",4))
1890 {
1891 int k;
1892 double d;
1893
1894 p=buf+4;
1895 k=atoi(sstrsep(&p,sep));
1896 sstrsep(&p,sep);
1897
1898 d=atof(sstrsep(&p,sep));
1899 if(n)
1900 dsa_results[k][0]=1/(1/dsa_results[k][0]+1/d);
1901 else
1902 dsa_results[k][0]=d;
1903
1904 d=atof(sstrsep(&p,sep));
1905 if(n)
1906 dsa_results[k][1]=1/(1/dsa_results[k][1]+1/d);
1907 else
1908 dsa_results[k][1]=d;
1909 }
1910 else if(!strncmp(buf,"+H:",3))
1911 {
1912 }
1913 else
1914 fprintf(stderr,"Unknown type '%s' from child %d\n",buf,n);
1915 }
1916 }
1917 return 1;
1918 }
1919 #endif
A mirror of the official openssl repository