gitweb.dragonflybsd.org Git - dragonfly.git/blame

Commit	Line	Data
56276539 SS	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.
9eaaad39	8	*
56276539 SS	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).
9eaaad39	15	*
56276539 SS	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.
9eaaad39	22	*
56276539 SS	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 :-).
9eaaad39	37	* 4. If you include any Windows specific code (or a derivative thereof) from
56276539 SS	38	* the apps directory (application code) you must include an acknowledgement:
56276539 SS	39	* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
9eaaad39	40	*
56276539 SS	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.
9eaaad39	52	*
56276539 SS	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	* Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.
	60	*
9eaaad39	61	* Portions of the attached software ("Contribution") are developed by
56276539 SS	62	* SUN MICROSYSTEMS, INC., and are contributed to the OpenSSL project.
	63	*
	64	* The Contribution is licensed pursuant to the OpenSSL open source
	65	* license provided above.
	66	*
9eaaad39	67	* The ECDH and ECDSA speed test software is originally written by
56276539 SS	68	* Sumit Gupta of Sun Microsystems Laboratories.
	69	*
	70	*/
	71
	72	/* most of this code has been pilfered from my libdes speed.c program */
	73
	74	#ifndef OPENSSL_NO_SPEED
	75
9eaaad39 SW	76	# undef SECONDS
	77	# define SECONDS 3
	78	# define RSA_SECONDS 10
	79	# define DSA_SECONDS 10
	80	# define ECDSA_SECONDS 10
	81	# define ECDH_SECONDS 10
56276539 SS	82
	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 */
	85
9eaaad39 SW	86	# undef PROG
9eaaad39 SW	87	# define PROG speed_main
56276539	88
9eaaad39 SW	89	# include <stdio.h>
9eaaad39 SW	90	# include <stdlib.h>
56276539	91
9eaaad39 SW	92	# include <string.h>
	93	# include <math.h>
	94	# include "apps.h"
	95	# ifdef OPENSSL_NO_STDIO
	96	# define APPS_WIN16
	97	# endif
	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
	105	# endif
56276539	106
9eaaad39 SW	107	# ifndef OPENSSL_SYS_NETWARE
	108	# include <signal.h>
	109	# endif
56276539	110
9eaaad39 SW	111	# if defined(_WIN32) \|\| defined(__CYGWIN__)
	112	# include <windows.h>
	113	# if defined(__CYGWIN__) && !defined(_WIN32)
	114	/*
	115	* <windows.h> should define _WIN32, which normally is mutually exclusive
	116	* with __CYGWIN__, but if it didn't...
	117	*/
	118	# define _WIN32
672590bc	119	/* this is done because Cygwin alarm() fails sometimes. */
9eaaad39	120	# endif
672590bc	121	# endif
56276539	122
9eaaad39 SW	123	# include <openssl/bn.h>
	124	# ifndef OPENSSL_NO_DES
	125	# include <openssl/des.h>
	126	# endif
	127	# ifndef OPENSSL_NO_AES
	128	# include <openssl/aes.h>
	129	# endif
	130	# ifndef OPENSSL_NO_CAMELLIA
	131	# include <openssl/camellia.h>
	132	# endif
	133	# ifndef OPENSSL_NO_MD2
	134	# include <openssl/md2.h>
	135	# endif
	136	# ifndef OPENSSL_NO_MDC2
	137	# include <openssl/mdc2.h>
	138	# endif
	139	# ifndef OPENSSL_NO_MD4
	140	# include <openssl/md4.h>
	141	# endif
	142	# ifndef OPENSSL_NO_MD5
	143	# include <openssl/md5.h>
	144	# endif
	145	# ifndef OPENSSL_NO_HMAC
	146	# include <openssl/hmac.h>
	147	# endif
	148	# include <openssl/evp.h>
	149	# ifndef OPENSSL_NO_SHA
	150	# include <openssl/sha.h>
	151	# endif
	152	# ifndef OPENSSL_NO_RIPEMD
	153	# include <openssl/ripemd.h>
	154	# endif
	155	# ifndef OPENSSL_NO_WHIRLPOOL
	156	# include <openssl/whrlpool.h>
	157	# endif
	158	# ifndef OPENSSL_NO_RC4
	159	# include <openssl/rc4.h>
	160	# endif
	161	# ifndef OPENSSL_NO_RC5
	162	# include <openssl/rc5.h>
	163	# endif
	164	# ifndef OPENSSL_NO_RC2
	165	# include <openssl/rc2.h>
	166	# endif
	167	# ifndef OPENSSL_NO_IDEA
	168	# include <openssl/idea.h>
	169	# endif
	170	# ifndef OPENSSL_NO_SEED
	171	# include <openssl/seed.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 <openssl/dsa.h>
	186	# include "./testdsa.h"
187	# endif
188	# ifndef OPENSSL_NO_ECDSA
189	# include <openssl/ecdsa.h>
190	# endif
191	# ifndef OPENSSL_NO_ECDH
192	# include <openssl/ecdh.h>
193	# endif
194	# include <openssl/modes.h>
195
196	# ifdef OPENSSL_FIPS
197	# ifdef OPENSSL_DOING_MAKEDEPEND
198	# undef AES_set_encrypt_key
199	# undef AES_set_decrypt_key
200	# undef DES_set_key_unchecked
201	# endif
202	# define BF_set_key private_BF_set_key
203	# define CAST_set_key private_CAST_set_key
204	# define idea_set_encrypt_key private_idea_set_encrypt_key
205	# define SEED_set_key private_SEED_set_key
206	# define RC2_set_key private_RC2_set_key
207	# define RC4_set_key private_RC4_set_key
208	# define DES_set_key_unchecked private_DES_set_key_unchecked
209	# define AES_set_encrypt_key private_AES_set_encrypt_key
210	# define AES_set_decrypt_key private_AES_set_decrypt_key
211	# define Camellia_set_key private_Camellia_set_key
212	# endif
672590bc	213
9eaaad39 SW	214	# ifndef HAVE_FORK
	215	# if defined(OPENSSL_SYS_VMS) \|\| defined(OPENSSL_SYS_WINDOWS) \|\| defined(OPENSSL_SYS_MACINTOSH_CLASSIC) \|\| defined(OPENSSL_SYS_OS2) \|\| defined(OPENSSL_SYS_NETWARE)
	216	# define HAVE_FORK 0
	217	# else
	218	# define HAVE_FORK 1
	219	# endif
	220	# endif
56276539	221
9eaaad39 SW	222	# if HAVE_FORK
9eaaad39 SW	223	# undef NO_FORK
56276539	224	# else
9eaaad39	225	# define NO_FORK
56276539	226	# endif
56276539	227
9eaaad39 SW	228	# undef BUFSIZE
	229	# define BUFSIZE ((long)1024*8+1)
	230	static volatile int run = 0;
56276539	231
9eaaad39 SW	232	static int mr = 0;
9eaaad39 SW	233	static int usertime = 1;
56276539 SS	234
56276539 SS	235	static double Time_F(int s);
9eaaad39	236	static void print_message(const char *s, long num, int length);
56276539	237	static void pkey_print_message(const char str, const char str2,
9eaaad39 SW	238	long num, int bits, int sec);
	239	static void print_result(int alg, int run_no, int count, double time_used);
	240	# ifndef NO_FORK
56276539	241	static int do_multi(int multi);
9eaaad39 SW	242	# endif
	243
	244	# define ALGOR_NUM 30
	245	# define SIZE_NUM 5
	246	# define RSA_NUM 4
	247	# define DSA_NUM 3
	248
	249	# define EC_NUM 16
	250	# define MAX_ECDH_SIZE 256
	251
	252	static const char *names[ALGOR_NUM] = {
	253	"md2", "mdc2", "md4", "md5", "hmac(md5)", "sha1", "rmd160", "rc4",
	254	"des cbc", "des ede3", "idea cbc", "seed cbc",
	255	"rc2 cbc", "rc5-32/12 cbc", "blowfish cbc", "cast cbc",
	256	"aes-128 cbc", "aes-192 cbc", "aes-256 cbc",
	257	"camellia-128 cbc", "camellia-192 cbc", "camellia-256 cbc",
	258	"evp", "sha256", "sha512", "whirlpool",
	259	"aes-128 ige", "aes-192 ige", "aes-256 ige", "ghash"
	260	};
56276539	261
56276539	262	static double results[ALGOR_NUM][SIZE_NUM];
9eaaad39 SW	263	static int lengths[SIZE_NUM] = { 16, 64, 256, 1024, 8 * 1024 };
	264
	265	# ifndef OPENSSL_NO_RSA
56276539	266	static double rsa_results[RSA_NUM][2];
9eaaad39 SW	267	# endif
9eaaad39 SW	268	# ifndef OPENSSL_NO_DSA
56276539	269	static double dsa_results[DSA_NUM][2];
9eaaad39 SW	270	# endif
9eaaad39 SW	271	# ifndef OPENSSL_NO_ECDSA
56276539	272	static double ecdsa_results[EC_NUM][2];
9eaaad39 SW	273	# endif
9eaaad39 SW	274	# ifndef OPENSSL_NO_ECDH
56276539	275	static double ecdh_results[EC_NUM][1];
9eaaad39	276	# endif
56276539	277
9eaaad39 SW	278	# if defined(OPENSSL_NO_DSA) && !(defined(OPENSSL_NO_ECDSA) && defined(OPENSSL_NO_ECDH))
	279	static const char rnd_seed[] =
	280	"string to make the random number generator think it has entropy";
5bd86ce5	281	static int rnd_fake = 0;
9eaaad39	282	# endif
56276539	283
9eaaad39 SW	284	# ifdef SIGALRM
	285	# if defined(__STDC__) \|\| defined(sgi) \|\| defined(_AIX)
	286	# define SIGRETTYPE void
	287	# else
	288	# define SIGRETTYPE int
	289	# endif
56276539 SS	290
	291	static SIGRETTYPE sig_done(int sig);
	292	static SIGRETTYPE sig_done(int sig)
9eaaad39 SW	293	{
	294	signal(SIGALRM, sig_done);
	295	run = 0;
	296	# ifdef LINT
	297	sig = sig;
	298	# endif
	299	}
	300	# endif
56276539	301
9eaaad39 SW	302	# define START 0
9eaaad39 SW	303	# define STOP 1
56276539	304
9eaaad39	305	# if defined(_WIN32)
56276539	306
9eaaad39 SW	307	# if !defined(SIGALRM)
	308	# define SIGALRM
	309	# endif
	310	static unsigned int lapse, schlock;
	311	static void alarm_win32(unsigned int secs)
	312	{
	313	lapse = secs * 1000;
	314	}
56276539	315
9eaaad39 SW	316	# define alarm alarm_win32
	317
	318	static DWORD WINAPI sleepy(VOID * arg)
	319	{
	320	schlock = 1;
	321	Sleep(lapse);
	322	run = 0;
	323	return 0;
	324	}
56276539	325
919b01cc	326	static double Time_F(int s)
9eaaad39 SW	327	{
	328	if (s == START) {
	329	HANDLE thr;
	330	schlock = 0;
	331	thr = CreateThread(NULL, 4096, sleepy, NULL, 0, NULL);
	332	if (thr == NULL) {
	333	DWORD ret = GetLastError();
	334	BIO_printf(bio_err, "unable to CreateThread (%d)", ret);
	335	ExitProcess(ret);
	336	}
	337	CloseHandle(thr); /* detach the thread */
	338	while (!schlock)
	339	Sleep(0); /* scheduler spinlock */
	340	}
56276539	341
9eaaad39 SW	342	return app_tminterval(s, usertime);
	343	}
	344	# else
56276539	345
9eaaad39 SW	346	static double Time_F(int s)
	347	{
	348	return app_tminterval(s, usertime);
	349	}
	350	# endif
56276539	351
9eaaad39 SW	352	# ifndef OPENSSL_NO_ECDH
	353	static const int KDF1_SHA1_len = 20;
	354	static void KDF1_SHA1(const void in, size_t inlen, void *out,
	355	size_t *outlen)
	356	{
	357	# ifndef OPENSSL_NO_SHA
	358	if (*outlen < SHA_DIGEST_LENGTH)
	359	return NULL;
	360	else
	361	*outlen = SHA_DIGEST_LENGTH;
	362	return SHA1(in, inlen, out);
	363	# else
	364	return NULL;
	365	# endif /* OPENSSL_NO_SHA */
	366	}
	367	# endif /* OPENSSL_NO_ECDH */
56276539 SS	368
	369	int MAIN(int, char **);
	370
	371	int MAIN(int argc, char **argv)
9eaaad39 SW	372	{
	373	unsigned char buf = NULL, buf2 = NULL;
	374	int mret = 1;
	375	long count = 0, save_count = 0;
	376	int i, j, k;
	377	# if !defined(OPENSSL_NO_RSA) \|\| !defined(OPENSSL_NO_DSA)
	378	long rsa_count;
	379	# endif
	380	# ifndef OPENSSL_NO_RSA
	381	unsigned rsa_num;
	382	# endif
	383	unsigned char md[EVP_MAX_MD_SIZE];
	384	# ifndef OPENSSL_NO_MD2
	385	unsigned char md2[MD2_DIGEST_LENGTH];
	386	# endif
	387	# ifndef OPENSSL_NO_MDC2
	388	unsigned char mdc2[MDC2_DIGEST_LENGTH];
	389	# endif
	390	# ifndef OPENSSL_NO_MD4
	391	unsigned char md4[MD4_DIGEST_LENGTH];
	392	# endif
	393	# ifndef OPENSSL_NO_MD5
	394	unsigned char md5[MD5_DIGEST_LENGTH];
	395	unsigned char hmac[MD5_DIGEST_LENGTH];
	396	# endif
	397	# ifndef OPENSSL_NO_SHA
	398	unsigned char sha[SHA_DIGEST_LENGTH];
	399	# ifndef OPENSSL_NO_SHA256
	400	unsigned char sha256[SHA256_DIGEST_LENGTH];
	401	# endif
	402	# ifndef OPENSSL_NO_SHA512
	403	unsigned char sha512[SHA512_DIGEST_LENGTH];
	404	# endif
	405	# endif
	406	# ifndef OPENSSL_NO_WHIRLPOOL
	407	unsigned char whirlpool[WHIRLPOOL_DIGEST_LENGTH];
	408	# endif
	409	# ifndef OPENSSL_NO_RIPEMD
	410	unsigned char rmd160[RIPEMD160_DIGEST_LENGTH];
	411	# endif
	412	# ifndef OPENSSL_NO_RC4
	413	RC4_KEY rc4_ks;
	414	# endif
	415	# ifndef OPENSSL_NO_RC5
	416	RC5_32_KEY rc5_ks;
	417	# endif
	418	# ifndef OPENSSL_NO_RC2
	419	RC2_KEY rc2_ks;
	420	# endif
	421	# ifndef OPENSSL_NO_IDEA
	422	IDEA_KEY_SCHEDULE idea_ks;
	423	# endif
	424	# ifndef OPENSSL_NO_SEED
	425	SEED_KEY_SCHEDULE seed_ks;
	426	# endif
	427	# ifndef OPENSSL_NO_BF
	428	BF_KEY bf_ks;
	429	# endif
	430	# ifndef OPENSSL_NO_CAST
	431	CAST_KEY cast_ks;
	432	# endif
	433	static const unsigned char key16[16] = {
	434	0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0,
	435	0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12
436	};
437	# ifndef OPENSSL_NO_AES
438	static const unsigned char key24[24] = {
439	0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0,
440	0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12,
441	0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34
442	};
443	static const unsigned char key32[32] = {
444	0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0,
445	0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12,
446	0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34,
447	0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34, 0x56
448	};
449	# endif
450	# ifndef OPENSSL_NO_CAMELLIA
451	static const unsigned char ckey24[24] = {
452	0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0,
453	0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12,
454	0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34
455	};
456	static const unsigned char ckey32[32] = {
457	0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0,
458	0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12,
459	0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34,
460	0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34, 0x56
461	};
462	# endif
463	# ifndef OPENSSL_NO_AES
464	# define MAX_BLOCK_SIZE 128
465	# else
466	# define MAX_BLOCK_SIZE 64
467	# endif
468	unsigned char DES_iv[8];
469	unsigned char iv[2 * MAX_BLOCK_SIZE / 8];
470	# ifndef OPENSSL_NO_DES
471	static DES_cblock key =
472	{ 0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0 };
473	static DES_cblock key2 =
474	{ 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12 };
475	static DES_cblock key3 =
476	{ 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xf0, 0x12, 0x34 };
477	DES_key_schedule sch;
478	DES_key_schedule sch2;
479	DES_key_schedule sch3;
480	# endif
481	# ifndef OPENSSL_NO_AES
482	AES_KEY aes_ks1, aes_ks2, aes_ks3;
483	# endif
484	# ifndef OPENSSL_NO_CAMELLIA
485	CAMELLIA_KEY camellia_ks1, camellia_ks2, camellia_ks3;
486	# endif
487	# define D_MD2 0
488	# define D_MDC2 1
489	# define D_MD4 2
490	# define D_MD5 3
491	# define D_HMAC 4
492	# define D_SHA1 5
493	# define D_RMD160 6
494	# define D_RC4 7
495	# define D_CBC_DES 8
496	# define D_EDE3_DES 9
497	# define D_CBC_IDEA 10
498	# define D_CBC_SEED 11
499	# define D_CBC_RC2 12
500	# define D_CBC_RC5 13
501	# define D_CBC_BF 14
502	# define D_CBC_CAST 15
503	# define D_CBC_128_AES 16
504	# define D_CBC_192_AES 17
505	# define D_CBC_256_AES 18
506	# define D_CBC_128_CML 19
507	# define D_CBC_192_CML 20
508	# define D_CBC_256_CML 21
509	# define D_EVP 22
510	# define D_SHA256 23
511	# define D_SHA512 24
512	# define D_WHIRLPOOL 25
513	# define D_IGE_128_AES 26
514	# define D_IGE_192_AES 27
515	# define D_IGE_256_AES 28
516	# define D_GHASH 29
517	double d = 0.0;
518	long c[ALGOR_NUM][SIZE_NUM];
519	# define R_DSA_512 0
520	# define R_DSA_1024 1
521	# define R_DSA_2048 2
522	# define R_RSA_512 0
523	# define R_RSA_1024 1
524	# define R_RSA_2048 2
525	# define R_RSA_4096 3
526
527	# define R_EC_P160 0
528	# define R_EC_P192 1
529	# define R_EC_P224 2
530	# define R_EC_P256 3
531	# define R_EC_P384 4
532	# define R_EC_P521 5
533	# define R_EC_K163 6
534	# define R_EC_K233 7
535	# define R_EC_K283 8
536	# define R_EC_K409 9
537	# define R_EC_K571 10
538	# define R_EC_B163 11
539	# define R_EC_B233 12
540	# define R_EC_B283 13
541	# define R_EC_B409 14
542	# define R_EC_B571 15
543
544	# ifndef OPENSSL_NO_RSA
545	RSA *rsa_key[RSA_NUM];
546	long rsa_c[RSA_NUM][2];
547	static unsigned int rsa_bits[RSA_NUM] = {
548	512, 1024, 2048, 4096
549	};
550	static unsigned char *rsa_data[RSA_NUM] = {
551	test512, test1024, test2048, test4096
552	};
553	static int rsa_data_length[RSA_NUM] = {
554	sizeof(test512), sizeof(test1024),
555	sizeof(test2048), sizeof(test4096)
556	};
557	# endif
558	# ifndef OPENSSL_NO_DSA
559	DSA *dsa_key[DSA_NUM];
560	long dsa_c[DSA_NUM][2];
561	static unsigned int dsa_bits[DSA_NUM] = { 512, 1024, 2048 };
562	# endif
563	# ifndef OPENSSL_NO_EC
564	/*
565	* We only test over the following curves as they are representative, To
566	* add tests over more curves, simply add the curve NID and curve name to
567	* the following arrays and increase the EC_NUM value accordingly.
568	*/
569	static unsigned int test_curves[EC_NUM] = {
570	/* Prime Curves */
571	NID_secp160r1,
572	NID_X9_62_prime192v1,
573	NID_secp224r1,
574	NID_X9_62_prime256v1,
575	NID_secp384r1,
576	NID_secp521r1,
577	/* Binary Curves */
578	NID_sect163k1,
579	NID_sect233k1,
580	NID_sect283k1,
581	NID_sect409k1,
582	NID_sect571k1,
583	NID_sect163r2,
584	NID_sect233r1,
585	NID_sect283r1,
586	NID_sect409r1,
587	NID_sect571r1
588	};
589	static const char *test_curves_names[EC_NUM] = {
590	/* Prime Curves */
591	"secp160r1",
592	"nistp192",
593	"nistp224",
594	"nistp256",
595	"nistp384",
596	"nistp521",
597	/* Binary Curves */
598	"nistk163",
599	"nistk233",
600	"nistk283",
601	"nistk409",
602	"nistk571",
603	"nistb163",
604	"nistb233",
605	"nistb283",
606	"nistb409",
607	"nistb571"
608	};
609	static int test_curves_bits[EC_NUM] = {
56276539 SS	610	160, 192, 224, 256, 384, 521,
	611	163, 233, 283, 409, 571,
	612	163, 233, 283, 409, 571
9eaaad39	613	};
56276539	614
9eaaad39	615	# endif
56276539	616
9eaaad39 SW	617	# ifndef OPENSSL_NO_ECDSA
	618	unsigned char ecdsasig[256];
	619	unsigned int ecdsasiglen;
	620	EC_KEY *ecdsa[EC_NUM];
	621	long ecdsa_c[EC_NUM][2];
	622	# endif
56276539	623
9eaaad39 SW	624	# ifndef OPENSSL_NO_ECDH
	625	EC_KEY ecdh_a[EC_NUM], ecdh_b[EC_NUM];
	626	unsigned char secret_a[MAX_ECDH_SIZE], secret_b[MAX_ECDH_SIZE];
	627	int secret_size_a, secret_size_b;
	628	int ecdh_checks = 0;
	629	int secret_idx = 0;
	630	long ecdh_c[EC_NUM][2];
	631	# endif
56276539	632
9eaaad39 SW	633	int rsa_doit[RSA_NUM];
	634	int dsa_doit[DSA_NUM];
	635	# ifndef OPENSSL_NO_ECDSA
	636	int ecdsa_doit[EC_NUM];
	637	# endif
	638	# ifndef OPENSSL_NO_ECDH
	639	int ecdh_doit[EC_NUM];
	640	# endif
	641	int doit[ALGOR_NUM];
	642	int pr_header = 0;
	643	const EVP_CIPHER *evp_cipher = NULL;
	644	const EVP_MD *evp_md = NULL;
	645	int decrypt = 0;
	646	# ifndef NO_FORK
	647	int multi = 0;
	648	# endif
56276539	649
9eaaad39 SW	650	# ifndef TIMES
	651	usertime = -1;
	652	# endif
56276539	653
9eaaad39 SW	654	apps_startup();
	655	memset(results, 0, sizeof(results));
	656	# ifndef OPENSSL_NO_DSA
	657	memset(dsa_key, 0, sizeof(dsa_key));
	658	# endif
	659	# ifndef OPENSSL_NO_ECDSA
	660	for (i = 0; i < EC_NUM; i++)
	661	ecdsa[i] = NULL;
	662	# endif
	663	# ifndef OPENSSL_NO_ECDH
	664	for (i = 0; i < EC_NUM; i++) {
	665	ecdh_a[i] = NULL;
	666	ecdh_b[i] = NULL;
	667	}
	668	# endif
56276539	669
9eaaad39 SW	670	if (bio_err == NULL)
	671	if ((bio_err = BIO_new(BIO_s_file())) != NULL)
	672	BIO_set_fp(bio_err, stderr, BIO_NOCLOSE \| BIO_FP_TEXT);
56276539	673
9eaaad39 SW	674	if (!load_config(bio_err, NULL))
9eaaad39 SW	675	goto end;
56276539	676
9eaaad39 SW	677	# ifndef OPENSSL_NO_RSA
	678	memset(rsa_key, 0, sizeof(rsa_key));
	679	for (i = 0; i < RSA_NUM; i++)
	680	rsa_key[i] = NULL;
	681	# endif
56276539	682
9eaaad39 SW	683	if ((buf = (unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL) {
	684	BIO_printf(bio_err, "out of memory\n");
	685	goto end;
	686	}
	687	if ((buf2 = (unsigned char *)OPENSSL_malloc((int)BUFSIZE)) == NULL) {
	688	BIO_printf(bio_err, "out of memory\n");
	689	goto end;
	690	}
56276539	691
9eaaad39 SW	692	memset(c, 0, sizeof(c));
	693	memset(DES_iv, 0, sizeof(DES_iv));
	694	memset(iv, 0, sizeof(iv));
	695
	696	for (i = 0; i < ALGOR_NUM; i++)
	697	doit[i] = 0;
	698	for (i = 0; i < RSA_NUM; i++)
	699	rsa_doit[i] = 0;
	700	for (i = 0; i < DSA_NUM; i++)
	701	dsa_doit[i] = 0;
	702	# ifndef OPENSSL_NO_ECDSA
	703	for (i = 0; i < EC_NUM; i++)
	704	ecdsa_doit[i] = 0;
	705	# endif
	706	# ifndef OPENSSL_NO_ECDH
	707	for (i = 0; i < EC_NUM; i++)
	708	ecdh_doit[i] = 0;
	709	# endif
56276539	710
9eaaad39 SW	711	j = 0;
	712	argc--;
	713	argv++;
	714	while (argc) {
	715	if ((argc > 0) && (strcmp(*argv, "-elapsed") == 0)) {
	716	usertime = 0;
	717	j--; /* Otherwise, -elapsed gets confused with an
	718	* algorithm. */
	719	} else if ((argc > 0) && (strcmp(*argv, "-evp") == 0)) {
	720	argc--;
	721	argv++;
	722	if (argc == 0) {
	723	BIO_printf(bio_err, "no EVP given\n");
	724	goto end;
	725	}
	726	evp_cipher = EVP_get_cipherbyname(*argv);
	727	if (!evp_cipher) {
	728	evp_md = EVP_get_digestbyname(*argv);
	729	}
	730	if (!evp_cipher && !evp_md) {
	731	BIO_printf(bio_err, "%s is an unknown cipher or digest\n",
	732	*argv);
	733	goto end;
	734	}
	735	doit[D_EVP] = 1;
	736	} else if (argc > 0 && !strcmp(*argv, "-decrypt")) {
	737	decrypt = 1;
	738	j--; /* Otherwise, -elapsed gets confused with an
	739	* algorithm. */
	740	}
	741	# ifndef OPENSSL_NO_ENGINE
	742	else if ((argc > 0) && (strcmp(*argv, "-engine") == 0)) {
	743	argc--;
	744	argv++;
	745	if (argc == 0) {
	746	BIO_printf(bio_err, "no engine given\n");
	747	goto end;
	748	}
	749	setup_engine(bio_err, *argv, 0);
	750	/*
	751	* j will be increased again further down. We just don't want
	752	* speed to confuse an engine with an algorithm, especially when
	753	* none is given (which means all of them should be run)
	754	*/
	755	j--;
	756	}
	757	# endif
	758	# ifndef NO_FORK
	759	else if ((argc > 0) && (strcmp(*argv, "-multi") == 0)) {
	760	argc--;
	761	argv++;
	762	if (argc == 0) {
	763	BIO_printf(bio_err, "no multi count given\n");
	764	goto end;
	765	}
	766	multi = atoi(argv[0]);
	767	if (multi <= 0) {
	768	BIO_printf(bio_err, "bad multi count\n");
	769	goto end;
	770	}
	771	j--; /* Otherwise, -mr gets confused with an
	772	* algorithm. */
	773	}
	774	# endif
775	else if (argc > 0 && !strcmp(*argv, "-mr")) {
776	mr = 1;
777	j--; /* Otherwise, -mr gets confused with an
778	* algorithm. */
779	} else
780	# ifndef OPENSSL_NO_MD2
781	if (strcmp(*argv, "md2") == 0)
782	doit[D_MD2] = 1;
783	else
784	# endif
785	# ifndef OPENSSL_NO_MDC2
786	if (strcmp(*argv, "mdc2") == 0)
787	doit[D_MDC2] = 1;
788	else
789	# endif
790	# ifndef OPENSSL_NO_MD4
791	if (strcmp(*argv, "md4") == 0)
792	doit[D_MD4] = 1;
793	else
794	# endif
795	# ifndef OPENSSL_NO_MD5
796	if (strcmp(*argv, "md5") == 0)
797	doit[D_MD5] = 1;
798	else
799	# endif
800	# ifndef OPENSSL_NO_MD5
801	if (strcmp(*argv, "hmac") == 0)
802	doit[D_HMAC] = 1;
803	else
804	# endif
805	# ifndef OPENSSL_NO_SHA
806	if (strcmp(*argv, "sha1") == 0)
807	doit[D_SHA1] = 1;
808	else if (strcmp(*argv, "sha") == 0)
809	doit[D_SHA1] = 1, doit[D_SHA256] = 1, doit[D_SHA512] = 1;
810	else
811	# ifndef OPENSSL_NO_SHA256
812	if (strcmp(*argv, "sha256") == 0)
813	doit[D_SHA256] = 1;
814	else
815	# endif
816	# ifndef OPENSSL_NO_SHA512
817	if (strcmp(*argv, "sha512") == 0)
818	doit[D_SHA512] = 1;
819	else
820	# endif
821	# endif
822	# ifndef OPENSSL_NO_WHIRLPOOL
823	if (strcmp(*argv, "whirlpool") == 0)
824	doit[D_WHIRLPOOL] = 1;
825	else
826	# endif
827	# ifndef OPENSSL_NO_RIPEMD
828	if (strcmp(*argv, "ripemd") == 0)
829	doit[D_RMD160] = 1;
830	else if (strcmp(*argv, "rmd160") == 0)
831	doit[D_RMD160] = 1;
832	else if (strcmp(*argv, "ripemd160") == 0)
833	doit[D_RMD160] = 1;
834	else
835	# endif
836	# ifndef OPENSSL_NO_RC4
837	if (strcmp(*argv, "rc4") == 0)
838	doit[D_RC4] = 1;
839	else
840	# endif
841	# ifndef OPENSSL_NO_DES
842	if (strcmp(*argv, "des-cbc") == 0)
843	doit[D_CBC_DES] = 1;
844	else if (strcmp(*argv, "des-ede3") == 0)
845	doit[D_EDE3_DES] = 1;
846	else
847	# endif
848	# ifndef OPENSSL_NO_AES
849	if (strcmp(*argv, "aes-128-cbc") == 0)
850	doit[D_CBC_128_AES] = 1;
851	else if (strcmp(*argv, "aes-192-cbc") == 0)
852	doit[D_CBC_192_AES] = 1;
853	else if (strcmp(*argv, "aes-256-cbc") == 0)
854	doit[D_CBC_256_AES] = 1;
855	else if (strcmp(*argv, "aes-128-ige") == 0)
856	doit[D_IGE_128_AES] = 1;
857	else if (strcmp(*argv, "aes-192-ige") == 0)
858	doit[D_IGE_192_AES] = 1;
859	else if (strcmp(*argv, "aes-256-ige") == 0)
860	doit[D_IGE_256_AES] = 1;
861	else
862	# endif
863	# ifndef OPENSSL_NO_CAMELLIA
864	if (strcmp(*argv, "camellia-128-cbc") == 0)
865	doit[D_CBC_128_CML] = 1;
866	else if (strcmp(*argv, "camellia-192-cbc") == 0)
867	doit[D_CBC_192_CML] = 1;
868	else if (strcmp(*argv, "camellia-256-cbc") == 0)
869	doit[D_CBC_256_CML] = 1;
870	else
871	# endif
872	# ifndef OPENSSL_NO_RSA
873	# if 0 /* was: #ifdef RSAref */
874	if (strcmp(*argv, "rsaref") == 0) {
875	RSA_set_default_openssl_method(RSA_PKCS1_RSAref());
876	j--;
877	} else
878	# endif
879	# ifndef RSA_NULL
880	if (strcmp(*argv, "openssl") == 0) {
881	RSA_set_default_method(RSA_PKCS1_SSLeay());
882	j--;
883	} else
884	# endif
885	# endif /* !OPENSSL_NO_RSA */
886	if (strcmp(*argv, "dsa512") == 0)
887	dsa_doit[R_DSA_512] = 2;
888	else if (strcmp(*argv, "dsa1024") == 0)
889	dsa_doit[R_DSA_1024] = 2;
890	else if (strcmp(*argv, "dsa2048") == 0)
891	dsa_doit[R_DSA_2048] = 2;
892	else if (strcmp(*argv, "rsa512") == 0)
893	rsa_doit[R_RSA_512] = 2;
894	else if (strcmp(*argv, "rsa1024") == 0)
895	rsa_doit[R_RSA_1024] = 2;
896	else if (strcmp(*argv, "rsa2048") == 0)
897	rsa_doit[R_RSA_2048] = 2;
898	else if (strcmp(*argv, "rsa4096") == 0)
899	rsa_doit[R_RSA_4096] = 2;
900	else
901	# ifndef OPENSSL_NO_RC2
902	if (strcmp(*argv, "rc2-cbc") == 0)
903	doit[D_CBC_RC2] = 1;
904	else if (strcmp(*argv, "rc2") == 0)
905	doit[D_CBC_RC2] = 1;
906	else
907	# endif
908	# ifndef OPENSSL_NO_RC5
909	if (strcmp(*argv, "rc5-cbc") == 0)
910	doit[D_CBC_RC5] = 1;
911	else if (strcmp(*argv, "rc5") == 0)
912	doit[D_CBC_RC5] = 1;
913	else
914	# endif
915	# ifndef OPENSSL_NO_IDEA
916	if (strcmp(*argv, "idea-cbc") == 0)
917	doit[D_CBC_IDEA] = 1;
918	else if (strcmp(*argv, "idea") == 0)
919	doit[D_CBC_IDEA] = 1;
920	else
921	# endif
922	# ifndef OPENSSL_NO_SEED
923	if (strcmp(*argv, "seed-cbc") == 0)
924	doit[D_CBC_SEED] = 1;
925	else if (strcmp(*argv, "seed") == 0)
926	doit[D_CBC_SEED] = 1;
927	else
928	# endif
929	# ifndef OPENSSL_NO_BF
930	if (strcmp(*argv, "bf-cbc") == 0)
931	doit[D_CBC_BF] = 1;
932	else if (strcmp(*argv, "blowfish") == 0)
933	doit[D_CBC_BF] = 1;
934	else if (strcmp(*argv, "bf") == 0)
935	doit[D_CBC_BF] = 1;
936	else
937	# endif
938	# ifndef OPENSSL_NO_CAST
939	if (strcmp(*argv, "cast-cbc") == 0)
940	doit[D_CBC_CAST] = 1;
941	else if (strcmp(*argv, "cast") == 0)
942	doit[D_CBC_CAST] = 1;
943	else if (strcmp(*argv, "cast5") == 0)
944	doit[D_CBC_CAST] = 1;
945	else
946	# endif
947	# ifndef OPENSSL_NO_DES
948	if (strcmp(*argv, "des") == 0) {
949	doit[D_CBC_DES] = 1;
950	doit[D_EDE3_DES] = 1;
951	} else
952	# endif
953	# ifndef OPENSSL_NO_AES
954	if (strcmp(*argv, "aes") == 0) {
955	doit[D_CBC_128_AES] = 1;
956	doit[D_CBC_192_AES] = 1;
957	doit[D_CBC_256_AES] = 1;
958	} else if (strcmp(*argv, "ghash") == 0) {
959	doit[D_GHASH] = 1;
960	} else
961	# endif
962	# ifndef OPENSSL_NO_CAMELLIA
963	if (strcmp(*argv, "camellia") == 0) {
964	doit[D_CBC_128_CML] = 1;
965	doit[D_CBC_192_CML] = 1;
966	doit[D_CBC_256_CML] = 1;
967	} else
968	# endif
969	# ifndef OPENSSL_NO_RSA
970	if (strcmp(*argv, "rsa") == 0) {
971	rsa_doit[R_RSA_512] = 1;
972	rsa_doit[R_RSA_1024] = 1;
973	rsa_doit[R_RSA_2048] = 1;
974	rsa_doit[R_RSA_4096] = 1;
975	} else
976	# endif
977	# ifndef OPENSSL_NO_DSA
978	if (strcmp(*argv, "dsa") == 0) {
979	dsa_doit[R_DSA_512] = 1;
980	dsa_doit[R_DSA_1024] = 1;
981	dsa_doit[R_DSA_2048] = 1;
982	} else
983	# endif
984	# ifndef OPENSSL_NO_ECDSA
985	if (strcmp(*argv, "ecdsap160") == 0)
986	ecdsa_doit[R_EC_P160] = 2;
987	else if (strcmp(*argv, "ecdsap192") == 0)
988	ecdsa_doit[R_EC_P192] = 2;
989	else if (strcmp(*argv, "ecdsap224") == 0)
990	ecdsa_doit[R_EC_P224] = 2;
991	else if (strcmp(*argv, "ecdsap256") == 0)
992	ecdsa_doit[R_EC_P256] = 2;
993	else if (strcmp(*argv, "ecdsap384") == 0)
994	ecdsa_doit[R_EC_P384] = 2;
995	else if (strcmp(*argv, "ecdsap521") == 0)
996	ecdsa_doit[R_EC_P521] = 2;
997	else if (strcmp(*argv, "ecdsak163") == 0)
998	ecdsa_doit[R_EC_K163] = 2;
999	else if (strcmp(*argv, "ecdsak233") == 0)
1000	ecdsa_doit[R_EC_K233] = 2;
1001	else if (strcmp(*argv, "ecdsak283") == 0)
1002	ecdsa_doit[R_EC_K283] = 2;
1003	else if (strcmp(*argv, "ecdsak409") == 0)
1004	ecdsa_doit[R_EC_K409] = 2;
1005	else if (strcmp(*argv, "ecdsak571") == 0)
1006	ecdsa_doit[R_EC_K571] = 2;
1007	else if (strcmp(*argv, "ecdsab163") == 0)
1008	ecdsa_doit[R_EC_B163] = 2;
1009	else if (strcmp(*argv, "ecdsab233") == 0)
1010	ecdsa_doit[R_EC_B233] = 2;
1011	else if (strcmp(*argv, "ecdsab283") == 0)
1012	ecdsa_doit[R_EC_B283] = 2;
1013	else if (strcmp(*argv, "ecdsab409") == 0)
1014	ecdsa_doit[R_EC_B409] = 2;
1015	else if (strcmp(*argv, "ecdsab571") == 0)
1016	ecdsa_doit[R_EC_B571] = 2;
1017	else if (strcmp(*argv, "ecdsa") == 0) {
1018	for (i = 0; i < EC_NUM; i++)
1019	ecdsa_doit[i] = 1;
1020	} else
1021	# endif
1022	# ifndef OPENSSL_NO_ECDH
1023	if (strcmp(*argv, "ecdhp160") == 0)
1024	ecdh_doit[R_EC_P160] = 2;
1025	else if (strcmp(*argv, "ecdhp192") == 0)
1026	ecdh_doit[R_EC_P192] = 2;
1027	else if (strcmp(*argv, "ecdhp224") == 0)
1028	ecdh_doit[R_EC_P224] = 2;
1029	else if (strcmp(*argv, "ecdhp256") == 0)
1030	ecdh_doit[R_EC_P256] = 2;
1031	else if (strcmp(*argv, "ecdhp384") == 0)
1032	ecdh_doit[R_EC_P384] = 2;
1033	else if (strcmp(*argv, "ecdhp521") == 0)
1034	ecdh_doit[R_EC_P521] = 2;
1035	else if (strcmp(*argv, "ecdhk163") == 0)
1036	ecdh_doit[R_EC_K163] = 2;
1037	else if (strcmp(*argv, "ecdhk233") == 0)
1038	ecdh_doit[R_EC_K233] = 2;
1039	else if (strcmp(*argv, "ecdhk283") == 0)
1040	ecdh_doit[R_EC_K283] = 2;
1041	else if (strcmp(*argv, "ecdhk409") == 0)
1042	ecdh_doit[R_EC_K409] = 2;
1043	else if (strcmp(*argv, "ecdhk571") == 0)
1044	ecdh_doit[R_EC_K571] = 2;
1045	else if (strcmp(*argv, "ecdhb163") == 0)
1046	ecdh_doit[R_EC_B163] = 2;
1047	else if (strcmp(*argv, "ecdhb233") == 0)
1048	ecdh_doit[R_EC_B233] = 2;
1049	else if (strcmp(*argv, "ecdhb283") == 0)
1050	ecdh_doit[R_EC_B283] = 2;
1051	else if (strcmp(*argv, "ecdhb409") == 0)
1052	ecdh_doit[R_EC_B409] = 2;
1053	else if (strcmp(*argv, "ecdhb571") == 0)
1054	ecdh_doit[R_EC_B571] = 2;
1055	else if (strcmp(*argv, "ecdh") == 0) {
1056	for (i = 0; i < EC_NUM; i++)
1057	ecdh_doit[i] = 1;
1058	} else
1059	# endif
1060	{
1061	BIO_printf(bio_err, "Error: bad option or value\n");
1062	BIO_printf(bio_err, "\n");
1063	BIO_printf(bio_err, "Available values:\n");
1064	# ifndef OPENSSL_NO_MD2
1065	BIO_printf(bio_err, "md2 ");
1066	# endif
1067	# ifndef OPENSSL_NO_MDC2
1068	BIO_printf(bio_err, "mdc2 ");
1069	# endif
1070	# ifndef OPENSSL_NO_MD4
1071	BIO_printf(bio_err, "md4 ");
1072	# endif
1073	# ifndef OPENSSL_NO_MD5
1074	BIO_printf(bio_err, "md5 ");
1075	# ifndef OPENSSL_NO_HMAC
1076	BIO_printf(bio_err, "hmac ");
1077	# endif
1078	# endif
1079	# ifndef OPENSSL_NO_SHA1
1080	BIO_printf(bio_err, "sha1 ");
1081	# endif
1082	# ifndef OPENSSL_NO_SHA256
1083	BIO_printf(bio_err, "sha256 ");
1084	# endif
1085	# ifndef OPENSSL_NO_SHA512
1086	BIO_printf(bio_err, "sha512 ");
1087	# endif
1088	# ifndef OPENSSL_NO_WHIRLPOOL
1089	BIO_printf(bio_err, "whirlpool");
1090	# endif
1091	# ifndef OPENSSL_NO_RIPEMD160
1092	BIO_printf(bio_err, "rmd160");
1093	# endif
1094	# if !defined(OPENSSL_NO_MD2) \|\| !defined(OPENSSL_NO_MDC2) \|\| \
1095	!defined(OPENSSL_NO_MD4) \|\| !defined(OPENSSL_NO_MD5) \|\| \
1096	!defined(OPENSSL_NO_SHA1) \|\| !defined(OPENSSL_NO_RIPEMD160) \|\| \
1097	!defined(OPENSSL_NO_WHIRLPOOL)
1098	BIO_printf(bio_err, "\n");
1099	# endif
56276539	1100
9eaaad39 SW	1101	# ifndef OPENSSL_NO_IDEA
	1102	BIO_printf(bio_err, "idea-cbc ");
	1103	# endif
	1104	# ifndef OPENSSL_NO_SEED
	1105	BIO_printf(bio_err, "seed-cbc ");
	1106	# endif
	1107	# ifndef OPENSSL_NO_RC2
	1108	BIO_printf(bio_err, "rc2-cbc ");
	1109	# endif
	1110	# ifndef OPENSSL_NO_RC5
	1111	BIO_printf(bio_err, "rc5-cbc ");
	1112	# endif
	1113	# ifndef OPENSSL_NO_BF
	1114	BIO_printf(bio_err, "bf-cbc");
	1115	# endif
	1116	# if !defined(OPENSSL_NO_IDEA) \|\| !defined(OPENSSL_NO_SEED) \|\| !defined(OPENSSL_NO_RC2) \|\| \
	1117	!defined(OPENSSL_NO_BF) \|\| !defined(OPENSSL_NO_RC5)
	1118	BIO_printf(bio_err, "\n");
	1119	# endif
	1120	# ifndef OPENSSL_NO_DES
	1121	BIO_printf(bio_err, "des-cbc des-ede3 ");
	1122	# endif
	1123	# ifndef OPENSSL_NO_AES
	1124	BIO_printf(bio_err, "aes-128-cbc aes-192-cbc aes-256-cbc ");
	1125	BIO_printf(bio_err, "aes-128-ige aes-192-ige aes-256-ige ");
	1126	# endif
	1127	# ifndef OPENSSL_NO_CAMELLIA
	1128	BIO_printf(bio_err, "\n");
	1129	BIO_printf(bio_err,
	1130	"camellia-128-cbc camellia-192-cbc camellia-256-cbc ");
	1131	# endif
	1132	# ifndef OPENSSL_NO_RC4
	1133	BIO_printf(bio_err, "rc4");
	1134	# endif
	1135	BIO_printf(bio_err, "\n");
56276539	1136
9eaaad39 SW	1137	# ifndef OPENSSL_NO_RSA
	1138	BIO_printf(bio_err, "rsa512 rsa1024 rsa2048 rsa4096\n");
	1139	# endif
56276539	1140
9eaaad39 SW	1141	# ifndef OPENSSL_NO_DSA
	1142	BIO_printf(bio_err, "dsa512 dsa1024 dsa2048\n");
	1143	# endif
	1144	# ifndef OPENSSL_NO_ECDSA
	1145	BIO_printf(bio_err, "ecdsap160 ecdsap192 ecdsap224 "
	1146	"ecdsap256 ecdsap384 ecdsap521\n");
	1147	BIO_printf(bio_err,
	1148	"ecdsak163 ecdsak233 ecdsak283 ecdsak409 ecdsak571\n");
	1149	BIO_printf(bio_err,
	1150	"ecdsab163 ecdsab233 ecdsab283 ecdsab409 ecdsab571\n");
	1151	BIO_printf(bio_err, "ecdsa\n");
	1152	# endif
	1153	# ifndef OPENSSL_NO_ECDH
	1154	BIO_printf(bio_err, "ecdhp160 ecdhp192 ecdhp224 "
	1155	"ecdhp256 ecdhp384 ecdhp521\n");
	1156	BIO_printf(bio_err,
	1157	"ecdhk163 ecdhk233 ecdhk283 ecdhk409 ecdhk571\n");
	1158	BIO_printf(bio_err,
	1159	"ecdhb163 ecdhb233 ecdhb283 ecdhb409 ecdhb571\n");
	1160	BIO_printf(bio_err, "ecdh\n");
	1161	# endif
56276539	1162
9eaaad39 SW	1163	# ifndef OPENSSL_NO_IDEA
	1164	BIO_printf(bio_err, "idea ");
	1165	# endif
	1166	# ifndef OPENSSL_NO_SEED
	1167	BIO_printf(bio_err, "seed ");
	1168	# endif
	1169	# ifndef OPENSSL_NO_RC2
	1170	BIO_printf(bio_err, "rc2 ");
	1171	# endif
	1172	# ifndef OPENSSL_NO_DES
	1173	BIO_printf(bio_err, "des ");
	1174	# endif
	1175	# ifndef OPENSSL_NO_AES
	1176	BIO_printf(bio_err, "aes ");
	1177	# endif
	1178	# ifndef OPENSSL_NO_CAMELLIA
	1179	BIO_printf(bio_err, "camellia ");
	1180	# endif
	1181	# ifndef OPENSSL_NO_RSA
	1182	BIO_printf(bio_err, "rsa ");
	1183	# endif
	1184	# ifndef OPENSSL_NO_BF
	1185	BIO_printf(bio_err, "blowfish");
	1186	# endif
	1187	# if !defined(OPENSSL_NO_IDEA) \|\| !defined(OPENSSL_NO_SEED) \|\| \
	1188	!defined(OPENSSL_NO_RC2) \|\| !defined(OPENSSL_NO_DES) \|\| \
	1189	!defined(OPENSSL_NO_RSA) \|\| !defined(OPENSSL_NO_BF) \|\| \
	1190	!defined(OPENSSL_NO_AES) \|\| !defined(OPENSSL_NO_CAMELLIA)
	1191	BIO_printf(bio_err, "\n");
	1192	# endif
56276539	1193
9eaaad39 SW	1194	BIO_printf(bio_err, "\n");
	1195	BIO_printf(bio_err, "Available options:\n");
	1196	# if defined(TIMES) \|\| defined(USE_TOD)
	1197	BIO_printf(bio_err, "-elapsed "
	1198	"measure time in real time instead of CPU user time.\n");
	1199	# endif
	1200	# ifndef OPENSSL_NO_ENGINE
	1201	BIO_printf(bio_err,
	1202	"-engine e "
	1203	"use engine e, possibly a hardware device.\n");
	1204	# endif
	1205	BIO_printf(bio_err, "-evp e " "use EVP e.\n");
	1206	BIO_printf(bio_err,
	1207	"-decrypt "
	1208	"time decryption instead of encryption (only EVP).\n");
	1209	BIO_printf(bio_err,
	1210	"-mr "
	1211	"produce machine readable output.\n");
	1212	# ifndef NO_FORK
	1213	BIO_printf(bio_err,
	1214	"-multi n " "run n benchmarks in parallel.\n");
	1215	# endif
	1216	goto end;
	1217	}
	1218	argc--;
	1219	argv++;
	1220	j++;
	1221	}
56276539	1222
9eaaad39 SW	1223	# ifndef NO_FORK
	1224	if (multi && do_multi(multi))
	1225	goto show_res;
	1226	# endif
	1227
	1228	if (j == 0) {
	1229	for (i = 0; i < ALGOR_NUM; i++) {
	1230	if (i != D_EVP)
	1231	doit[i] = 1;
	1232	}
	1233	for (i = 0; i < RSA_NUM; i++)
	1234	rsa_doit[i] = 1;
	1235	for (i = 0; i < DSA_NUM; i++)
	1236	dsa_doit[i] = 1;
	1237	# ifndef OPENSSL_NO_ECDSA
	1238	for (i = 0; i < EC_NUM; i++)
	1239	ecdsa_doit[i] = 1;
	1240	# endif
	1241	# ifndef OPENSSL_NO_ECDH
	1242	for (i = 0; i < EC_NUM; i++)
	1243	ecdh_doit[i] = 1;
	1244	# endif
	1245	}
	1246	for (i = 0; i < ALGOR_NUM; i++)
	1247	if (doit[i])
	1248	pr_header++;
	1249
	1250	if (usertime == 0 && !mr)
	1251	BIO_printf(bio_err,
	1252	"You have chosen to measure elapsed time "
	1253	"instead of user CPU time.\n");
	1254
	1255	# ifndef OPENSSL_NO_RSA
	1256	for (i = 0; i < RSA_NUM; i++) {
	1257	const unsigned char *p;
	1258
	1259	p = rsa_data[i];
	1260	rsa_key[i] = d2i_RSAPrivateKey(NULL, &p, rsa_data_length[i]);
	1261	if (rsa_key[i] == NULL) {
	1262	BIO_printf(bio_err, "internal error loading RSA key number %d\n",
	1263	i);
	1264	goto end;
	1265	}
	1266	# if 0
	1267	else {
	1268	BIO_printf(bio_err,
	1269	mr ? "+RK:%d:"
	1270	: "Loaded RSA key, %d bit modulus and e= 0x",
	1271	BN_num_bits(rsa_key[i]->n));
	1272	BN_print(bio_err, rsa_key[i]->e);
	1273	BIO_printf(bio_err, "\n");
	1274	}
	1275	# endif
	1276	}
	1277	# endif
	1278
	1279	# ifndef OPENSSL_NO_DSA
	1280	dsa_key[0] = get_dsa512();
	1281	dsa_key[1] = get_dsa1024();
	1282	dsa_key[2] = get_dsa2048();
	1283	# endif
	1284
	1285	# ifndef OPENSSL_NO_DES
	1286	DES_set_key_unchecked(&key, &sch);
1287	DES_set_key_unchecked(&key2, &sch2);
1288	DES_set_key_unchecked(&key3, &sch3);
1289	# endif
1290	# ifndef OPENSSL_NO_AES
1291	AES_set_encrypt_key(key16, 128, &aes_ks1);
1292	AES_set_encrypt_key(key24, 192, &aes_ks2);
1293	AES_set_encrypt_key(key32, 256, &aes_ks3);
1294	# endif
1295	# ifndef OPENSSL_NO_CAMELLIA
1296	Camellia_set_key(key16, 128, &camellia_ks1);
1297	Camellia_set_key(ckey24, 192, &camellia_ks2);
1298	Camellia_set_key(ckey32, 256, &camellia_ks3);
1299	# endif
1300	# ifndef OPENSSL_NO_IDEA
1301	idea_set_encrypt_key(key16, &idea_ks);
1302	# endif
1303	# ifndef OPENSSL_NO_SEED
1304	SEED_set_key(key16, &seed_ks);
1305	# endif
1306	# ifndef OPENSSL_NO_RC4
1307	RC4_set_key(&rc4_ks, 16, key16);
1308	# endif
1309	# ifndef OPENSSL_NO_RC2
1310	RC2_set_key(&rc2_ks, 16, key16, 128);
1311	# endif
1312	# ifndef OPENSSL_NO_RC5
1313	RC5_32_set_key(&rc5_ks, 16, key16, 12);
1314	# endif
1315	# ifndef OPENSSL_NO_BF
1316	BF_set_key(&bf_ks, 16, key16);
1317	# endif
1318	# ifndef OPENSSL_NO_CAST
1319	CAST_set_key(&cast_ks, 16, key16);
1320	# endif
1321	# ifndef OPENSSL_NO_RSA
1322	memset(rsa_c, 0, sizeof(rsa_c));
1323	# endif
1324	# ifndef SIGALRM
1325	# ifndef OPENSSL_NO_DES
1326	BIO_printf(bio_err, "First we calculate the approximate speed ...\n");
1327	count = 10;
1328	do {
1329	long it;
1330	count *= 2;
1331	Time_F(START);
1332	for (it = count; it; it--)
1333	DES_ecb_encrypt((DES_cblock *)buf,
1334	(DES_cblock *)buf, &sch, DES_ENCRYPT);
1335	d = Time_F(STOP);
1336	} while (d < 3);
1337	save_count = count;
1338	c[D_MD2][0] = count / 10;
1339	c[D_MDC2][0] = count / 10;
1340	c[D_MD4][0] = count;
1341	c[D_MD5][0] = count;
1342	c[D_HMAC][0] = count;
1343	c[D_SHA1][0] = count;
1344	c[D_RMD160][0] = count;
1345	c[D_RC4][0] = count * 5;
1346	c[D_CBC_DES][0] = count;
1347	c[D_EDE3_DES][0] = count / 3;
1348	c[D_CBC_IDEA][0] = count;
1349	c[D_CBC_SEED][0] = count;
1350	c[D_CBC_RC2][0] = count;
1351	c[D_CBC_RC5][0] = count;
1352	c[D_CBC_BF][0] = count;
1353	c[D_CBC_CAST][0] = count;
1354	c[D_CBC_128_AES][0] = count;
1355	c[D_CBC_192_AES][0] = count;
1356	c[D_CBC_256_AES][0] = count;
1357	c[D_CBC_128_CML][0] = count;
1358	c[D_CBC_192_CML][0] = count;
1359	c[D_CBC_256_CML][0] = count;
1360	c[D_SHA256][0] = count;
1361	c[D_SHA512][0] = count;
1362	c[D_WHIRLPOOL][0] = count;
1363	c[D_IGE_128_AES][0] = count;
1364	c[D_IGE_192_AES][0] = count;
1365	c[D_IGE_256_AES][0] = count;
1366	c[D_GHASH][0] = count;
1367
1368	for (i = 1; i < SIZE_NUM; i++) {
1369	c[D_MD2][i] = c[D_MD2][0] * 4 * lengths[0] / lengths[i];
1370	c[D_MDC2][i] = c[D_MDC2][0] * 4 * lengths[0] / lengths[i];
1371	c[D_MD4][i] = c[D_MD4][0] * 4 * lengths[0] / lengths[i];
1372	c[D_MD5][i] = c[D_MD5][0] * 4 * lengths[0] / lengths[i];
1373	c[D_HMAC][i] = c[D_HMAC][0] * 4 * lengths[0] / lengths[i];
1374	c[D_SHA1][i] = c[D_SHA1][0] * 4 * lengths[0] / lengths[i];
1375	c[D_RMD160][i] = c[D_RMD160][0] * 4 * lengths[0] / lengths[i];
1376	c[D_SHA256][i] = c[D_SHA256][0] * 4 * lengths[0] / lengths[i];
1377	c[D_SHA512][i] = c[D_SHA512][0] * 4 * lengths[0] / lengths[i];
1378	c[D_WHIRLPOOL][i] = c[D_WHIRLPOOL][0] * 4 * lengths[0] / lengths[i];
1379	}
1380	for (i = 1; i < SIZE_NUM; i++) {
1381	long l0, l1;
1382
1383	l0 = (long)lengths[i - 1];
1384	l1 = (long)lengths[i];
1385	c[D_RC4][i] = c[D_RC4][i - 1] * l0 / l1;
1386	c[D_CBC_DES][i] = c[D_CBC_DES][i - 1] * l0 / l1;
1387	c[D_EDE3_DES][i] = c[D_EDE3_DES][i - 1] * l0 / l1;
1388	c[D_CBC_IDEA][i] = c[D_CBC_IDEA][i - 1] * l0 / l1;
1389	c[D_CBC_SEED][i] = c[D_CBC_SEED][i - 1] * l0 / l1;
1390	c[D_CBC_RC2][i] = c[D_CBC_RC2][i - 1] * l0 / l1;
1391	c[D_CBC_RC5][i] = c[D_CBC_RC5][i - 1] * l0 / l1;
1392	c[D_CBC_BF][i] = c[D_CBC_BF][i - 1] * l0 / l1;
1393	c[D_CBC_CAST][i] = c[D_CBC_CAST][i - 1] * l0 / l1;
1394	c[D_CBC_128_AES][i] = c[D_CBC_128_AES][i - 1] * l0 / l1;
1395	c[D_CBC_192_AES][i] = c[D_CBC_192_AES][i - 1] * l0 / l1;
1396	c[D_CBC_256_AES][i] = c[D_CBC_256_AES][i - 1] * l0 / l1;
1397	c[D_CBC_128_CML][i] = c[D_CBC_128_CML][i - 1] * l0 / l1;
1398	c[D_CBC_192_CML][i] = c[D_CBC_192_CML][i - 1] * l0 / l1;
1399	c[D_CBC_256_CML][i] = c[D_CBC_256_CML][i - 1] * l0 / l1;
1400	c[D_IGE_128_AES][i] = c[D_IGE_128_AES][i - 1] * l0 / l1;
1401	c[D_IGE_192_AES][i] = c[D_IGE_192_AES][i - 1] * l0 / l1;
1402	c[D_IGE_256_AES][i] = c[D_IGE_256_AES][i - 1] * l0 / l1;
1403	}
1404	# ifndef OPENSSL_NO_RSA
1405	rsa_c[R_RSA_512][0] = count / 2000;
1406	rsa_c[R_RSA_512][1] = count / 400;
1407	for (i = 1; i < RSA_NUM; i++) {
1408	rsa_c[i][0] = rsa_c[i - 1][0] / 8;
1409	rsa_c[i][1] = rsa_c[i - 1][1] / 4;
1410	if ((rsa_doit[i] <= 1) && (rsa_c[i][0] == 0))
1411	rsa_doit[i] = 0;
1412	else {
1413	if (rsa_c[i][0] == 0) {
1414	rsa_c[i][0] = 1;
1415	rsa_c[i][1] = 20;
1416	}
1417	}
1418	}
1419	# endif
1420
1421	# ifndef OPENSSL_NO_DSA
1422	dsa_c[R_DSA_512][0] = count / 1000;
1423	dsa_c[R_DSA_512][1] = count / 1000 / 2;
1424	for (i = 1; i < DSA_NUM; i++) {
1425	dsa_c[i][0] = dsa_c[i - 1][0] / 4;
1426	dsa_c[i][1] = dsa_c[i - 1][1] / 4;
1427	if ((dsa_doit[i] <= 1) && (dsa_c[i][0] == 0))
1428	dsa_doit[i] = 0;
1429	else {
1430	if (dsa_c[i] == 0) {
1431	dsa_c[i][0] = 1;
1432	dsa_c[i][1] = 1;
1433	}
1434	}
1435	}
1436	# endif
1437
1438	# ifndef OPENSSL_NO_ECDSA
1439	ecdsa_c[R_EC_P160][0] = count / 1000;
1440	ecdsa_c[R_EC_P160][1] = count / 1000 / 2;
1441	for (i = R_EC_P192; i <= R_EC_P521; i++) {
1442	ecdsa_c[i][0] = ecdsa_c[i - 1][0] / 2;
1443	ecdsa_c[i][1] = ecdsa_c[i - 1][1] / 2;
1444	if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1445	ecdsa_doit[i] = 0;
1446	else {
1447	if (ecdsa_c[i] == 0) {
1448	ecdsa_c[i][0] = 1;
1449	ecdsa_c[i][1] = 1;
1450	}
1451	}
1452	}
1453	ecdsa_c[R_EC_K163][0] = count / 1000;
1454	ecdsa_c[R_EC_K163][1] = count / 1000 / 2;
1455	for (i = R_EC_K233; i <= R_EC_K571; i++) {
1456	ecdsa_c[i][0] = ecdsa_c[i - 1][0] / 2;
1457	ecdsa_c[i][1] = ecdsa_c[i - 1][1] / 2;
1458	if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1459	ecdsa_doit[i] = 0;
1460	else {
1461	if (ecdsa_c[i] == 0) {
1462	ecdsa_c[i][0] = 1;
1463	ecdsa_c[i][1] = 1;
1464	}
1465	}
1466	}
1467	ecdsa_c[R_EC_B163][0] = count / 1000;
1468	ecdsa_c[R_EC_B163][1] = count / 1000 / 2;
1469	for (i = R_EC_B233; i <= R_EC_B571; i++) {
1470	ecdsa_c[i][0] = ecdsa_c[i - 1][0] / 2;
1471	ecdsa_c[i][1] = ecdsa_c[i - 1][1] / 2;
1472	if ((ecdsa_doit[i] <= 1) && (ecdsa_c[i][0] == 0))
1473	ecdsa_doit[i] = 0;
1474	else {
1475	if (ecdsa_c[i] == 0) {
1476	ecdsa_c[i][0] = 1;
1477	ecdsa_c[i][1] = 1;
1478	}
1479	}
1480	}
1481	# endif
1482
1483	# ifndef OPENSSL_NO_ECDH
1484	ecdh_c[R_EC_P160][0] = count / 1000;
1485	ecdh_c[R_EC_P160][1] = count / 1000;
1486	for (i = R_EC_P192; i <= R_EC_P521; i++) {
1487	ecdh_c[i][0] = ecdh_c[i - 1][0] / 2;
1488	ecdh_c[i][1] = ecdh_c[i - 1][1] / 2;
1489	if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1490	ecdh_doit[i] = 0;
1491	else {
1492	if (ecdh_c[i] == 0) {
1493	ecdh_c[i][0] = 1;
1494	ecdh_c[i][1] = 1;
1495	}
1496	}
1497	}
1498	ecdh_c[R_EC_K163][0] = count / 1000;
1499	ecdh_c[R_EC_K163][1] = count / 1000;
1500	for (i = R_EC_K233; i <= R_EC_K571; i++) {
1501	ecdh_c[i][0] = ecdh_c[i - 1][0] / 2;
1502	ecdh_c[i][1] = ecdh_c[i - 1][1] / 2;
1503	if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1504	ecdh_doit[i] = 0;
1505	else {
1506	if (ecdh_c[i] == 0) {
1507	ecdh_c[i][0] = 1;
1508	ecdh_c[i][1] = 1;
1509	}
1510	}
1511	}
1512	ecdh_c[R_EC_B163][0] = count / 1000;
1513	ecdh_c[R_EC_B163][1] = count / 1000;
1514	for (i = R_EC_B233; i <= R_EC_B571; i++) {
1515	ecdh_c[i][0] = ecdh_c[i - 1][0] / 2;
1516	ecdh_c[i][1] = ecdh_c[i - 1][1] / 2;
1517	if ((ecdh_doit[i] <= 1) && (ecdh_c[i][0] == 0))
1518	ecdh_doit[i] = 0;
1519	else {
1520	if (ecdh_c[i] == 0) {
1521	ecdh_c[i][0] = 1;
1522	ecdh_c[i][1] = 1;
1523	}
1524	}
1525	}
1526	# endif
56276539	1527
9eaaad39 SW	1528	# define COND(d) (count < (d))
	1529	# define COUNT(d) (d)
	1530	# else
56276539	1531	/* not worth fixing */
9eaaad39 SW	1532	# error "You cannot disable DES on systems without SIGALRM."
	1533	# endif /* OPENSSL_NO_DES */
	1534	# else
	1535	# define COND(c) (run && count<0x7fffffff)
	1536	# define COUNT(d) (count)
	1537	# ifndef _WIN32
	1538	signal(SIGALRM, sig_done);
	1539	# endif
	1540	# endif /* SIGALRM */
	1541
	1542	# ifndef OPENSSL_NO_MD2
	1543	if (doit[D_MD2]) {
	1544	for (j = 0; j < SIZE_NUM; j++) {
	1545	print_message(names[D_MD2], c[D_MD2][j], lengths[j]);
	1546	Time_F(START);
	1547	for (count = 0, run = 1; COND(c[D_MD2][j]); count++)
	1548	EVP_Digest(buf, (unsigned long)lengths[j], &(md2[0]), NULL,
	1549	EVP_md2(), NULL);
	1550	d = Time_F(STOP);
	1551	print_result(D_MD2, j, count, d);
	1552	}
	1553	}
	1554	# endif
	1555	# ifndef OPENSSL_NO_MDC2
	1556	if (doit[D_MDC2]) {
	1557	for (j = 0; j < SIZE_NUM; j++) {
	1558	print_message(names[D_MDC2], c[D_MDC2][j], lengths[j]);
	1559	Time_F(START);
	1560	for (count = 0, run = 1; COND(c[D_MDC2][j]); count++)
	1561	EVP_Digest(buf, (unsigned long)lengths[j], &(mdc2[0]), NULL,
	1562	EVP_mdc2(), NULL);
	1563	d = Time_F(STOP);
	1564	print_result(D_MDC2, j, count, d);
	1565	}
	1566	}
	1567	# endif
56276539	1568
9eaaad39 SW	1569	# ifndef OPENSSL_NO_MD4
	1570	if (doit[D_MD4]) {
	1571	for (j = 0; j < SIZE_NUM; j++) {
	1572	print_message(names[D_MD4], c[D_MD4][j], lengths[j]);
	1573	Time_F(START);
	1574	for (count = 0, run = 1; COND(c[D_MD4][j]); count++)
	1575	EVP_Digest(&(buf[0]), (unsigned long)lengths[j], &(md4[0]),
	1576	NULL, EVP_md4(), NULL);
	1577	d = Time_F(STOP);
	1578	print_result(D_MD4, j, count, d);
	1579	}
	1580	}
	1581	# endif
56276539	1582
9eaaad39 SW	1583	# ifndef OPENSSL_NO_MD5
	1584	if (doit[D_MD5]) {
	1585	for (j = 0; j < SIZE_NUM; j++) {
	1586	print_message(names[D_MD5], c[D_MD5][j], lengths[j]);
	1587	Time_F(START);
	1588	for (count = 0, run = 1; COND(c[D_MD5][j]); count++)
	1589	EVP_Digest(&(buf[0]), (unsigned long)lengths[j], &(md5[0]),
	1590	NULL, EVP_get_digestbyname("md5"), NULL);
	1591	d = Time_F(STOP);
	1592	print_result(D_MD5, j, count, d);
	1593	}
	1594	}
	1595	# endif
56276539	1596
9eaaad39 SW	1597	# if !defined(OPENSSL_NO_MD5) && !defined(OPENSSL_NO_HMAC)
	1598	if (doit[D_HMAC]) {
	1599	HMAC_CTX hctx;
	1600
	1601	HMAC_CTX_init(&hctx);
	1602	HMAC_Init_ex(&hctx, (unsigned char *)"This is a key...",
	1603	16, EVP_md5(), NULL);
	1604
	1605	for (j = 0; j < SIZE_NUM; j++) {
	1606	print_message(names[D_HMAC], c[D_HMAC][j], lengths[j]);
	1607	Time_F(START);
	1608	for (count = 0, run = 1; COND(c[D_HMAC][j]); count++) {
	1609	HMAC_Init_ex(&hctx, NULL, 0, NULL, NULL);
	1610	HMAC_Update(&hctx, buf, lengths[j]);
	1611	HMAC_Final(&hctx, &(hmac[0]), NULL);
	1612	}
	1613	d = Time_F(STOP);
	1614	print_result(D_HMAC, j, count, d);
	1615	}
	1616	HMAC_CTX_cleanup(&hctx);
	1617	}
	1618	# endif
	1619	# ifndef OPENSSL_NO_SHA
	1620	if (doit[D_SHA1]) {
	1621	for (j = 0; j < SIZE_NUM; j++) {
	1622	print_message(names[D_SHA1], c[D_SHA1][j], lengths[j]);
	1623	Time_F(START);
	1624	for (count = 0, run = 1; COND(c[D_SHA1][j]); count++)
	1625	EVP_Digest(buf, (unsigned long)lengths[j], &(sha[0]), NULL,
	1626	EVP_sha1(), NULL);
	1627	d = Time_F(STOP);
	1628	print_result(D_SHA1, j, count, d);
	1629	}
	1630	}
	1631	# ifndef OPENSSL_NO_SHA256
	1632	if (doit[D_SHA256]) {
	1633	for (j = 0; j < SIZE_NUM; j++) {
	1634	print_message(names[D_SHA256], c[D_SHA256][j], lengths[j]);
	1635	Time_F(START);
	1636	for (count = 0, run = 1; COND(c[D_SHA256][j]); count++)
	1637	SHA256(buf, lengths[j], sha256);
	1638	d = Time_F(STOP);
	1639	print_result(D_SHA256, j, count, d);
	1640	}
	1641	}
	1642	# endif
	1643
	1644	# ifndef OPENSSL_NO_SHA512
	1645	if (doit[D_SHA512]) {
	1646	for (j = 0; j < SIZE_NUM; j++) {
	1647	print_message(names[D_SHA512], c[D_SHA512][j], lengths[j]);
	1648	Time_F(START);
	1649	for (count = 0, run = 1; COND(c[D_SHA512][j]); count++)
	1650	SHA512(buf, lengths[j], sha512);
	1651	d = Time_F(STOP);
	1652	print_result(D_SHA512, j, count, d);
	1653	}
	1654	}
	1655	# endif
	1656	# endif
56276539	1657
9eaaad39 SW	1658	# ifndef OPENSSL_NO_WHIRLPOOL
	1659	if (doit[D_WHIRLPOOL]) {
	1660	for (j = 0; j < SIZE_NUM; j++) {
	1661	print_message(names[D_WHIRLPOOL], c[D_WHIRLPOOL][j], lengths[j]);
	1662	Time_F(START);
	1663	for (count = 0, run = 1; COND(c[D_WHIRLPOOL][j]); count++)
	1664	WHIRLPOOL(buf, lengths[j], whirlpool);
	1665	d = Time_F(STOP);
	1666	print_result(D_WHIRLPOOL, j, count, d);
	1667	}
	1668	}
	1669	# endif
56276539	1670
9eaaad39 SW	1671	# ifndef OPENSSL_NO_RIPEMD
	1672	if (doit[D_RMD160]) {
	1673	for (j = 0; j < SIZE_NUM; j++) {
	1674	print_message(names[D_RMD160], c[D_RMD160][j], lengths[j]);
	1675	Time_F(START);
	1676	for (count = 0, run = 1; COND(c[D_RMD160][j]); count++)
	1677	EVP_Digest(buf, (unsigned long)lengths[j], &(rmd160[0]), NULL,
	1678	EVP_ripemd160(), NULL);
	1679	d = Time_F(STOP);
	1680	print_result(D_RMD160, j, count, d);
	1681	}
	1682	}
	1683	# endif
	1684	# ifndef OPENSSL_NO_RC4
	1685	if (doit[D_RC4]) {
	1686	for (j = 0; j < SIZE_NUM; j++) {
	1687	print_message(names[D_RC4], c[D_RC4][j], lengths[j]);
	1688	Time_F(START);
	1689	for (count = 0, run = 1; COND(c[D_RC4][j]); count++)
	1690	RC4(&rc4_ks, (unsigned int)lengths[j], buf, buf);
	1691	d = Time_F(STOP);
	1692	print_result(D_RC4, j, count, d);
	1693	}
	1694	}
	1695	# endif
	1696	# ifndef OPENSSL_NO_DES
	1697	if (doit[D_CBC_DES]) {
	1698	for (j = 0; j < SIZE_NUM; j++) {
	1699	print_message(names[D_CBC_DES], c[D_CBC_DES][j], lengths[j]);
	1700	Time_F(START);
	1701	for (count = 0, run = 1; COND(c[D_CBC_DES][j]); count++)
	1702	DES_ncbc_encrypt(buf, buf, lengths[j], &sch,
	1703	&DES_iv, DES_ENCRYPT);
	1704	d = Time_F(STOP);
	1705	print_result(D_CBC_DES, j, count, d);
	1706	}
	1707	}
919b01cc	1708
9eaaad39 SW	1709	if (doit[D_EDE3_DES]) {
	1710	for (j = 0; j < SIZE_NUM; j++) {
	1711	print_message(names[D_EDE3_DES], c[D_EDE3_DES][j], lengths[j]);
	1712	Time_F(START);
	1713	for (count = 0, run = 1; COND(c[D_EDE3_DES][j]); count++)
	1714	DES_ede3_cbc_encrypt(buf, buf, lengths[j],
	1715	&sch, &sch2, &sch3,
	1716	&DES_iv, DES_ENCRYPT);
	1717	d = Time_F(STOP);
	1718	print_result(D_EDE3_DES, j, count, d);
	1719	}
	1720	}
	1721	# endif
	1722	# ifndef OPENSSL_NO_AES
	1723	if (doit[D_CBC_128_AES]) {
	1724	for (j = 0; j < SIZE_NUM; j++) {
	1725	print_message(names[D_CBC_128_AES], c[D_CBC_128_AES][j],
	1726	lengths[j]);
	1727	Time_F(START);
	1728	for (count = 0, run = 1; COND(c[D_CBC_128_AES][j]); count++)
	1729	AES_cbc_encrypt(buf, buf,
	1730	(unsigned long)lengths[j], &aes_ks1,
	1731	iv, AES_ENCRYPT);
	1732	d = Time_F(STOP);
	1733	print_result(D_CBC_128_AES, j, count, d);
	1734	}
	1735	}
	1736	if (doit[D_CBC_192_AES]) {
	1737	for (j = 0; j < SIZE_NUM; j++) {
	1738	print_message(names[D_CBC_192_AES], c[D_CBC_192_AES][j],
	1739	lengths[j]);
	1740	Time_F(START);
	1741	for (count = 0, run = 1; COND(c[D_CBC_192_AES][j]); count++)
	1742	AES_cbc_encrypt(buf, buf,
	1743	(unsigned long)lengths[j], &aes_ks2,
	1744	iv, AES_ENCRYPT);
	1745	d = Time_F(STOP);
	1746	print_result(D_CBC_192_AES, j, count, d);
	1747	}
	1748	}
	1749	if (doit[D_CBC_256_AES]) {
	1750	for (j = 0; j < SIZE_NUM; j++) {
	1751	print_message(names[D_CBC_256_AES], c[D_CBC_256_AES][j],
	1752	lengths[j]);
	1753	Time_F(START);
	1754	for (count = 0, run = 1; COND(c[D_CBC_256_AES][j]); count++)
	1755	AES_cbc_encrypt(buf, buf,
	1756	(unsigned long)lengths[j], &aes_ks3,
	1757	iv, AES_ENCRYPT);
	1758	d = Time_F(STOP);
	1759	print_result(D_CBC_256_AES, j, count, d);
	1760	}
	1761	}
919b01cc	1762
9eaaad39 SW	1763	if (doit[D_IGE_128_AES]) {
	1764	for (j = 0; j < SIZE_NUM; j++) {
	1765	print_message(names[D_IGE_128_AES], c[D_IGE_128_AES][j],
	1766	lengths[j]);
	1767	Time_F(START);
	1768	for (count = 0, run = 1; COND(c[D_IGE_128_AES][j]); count++)
	1769	AES_ige_encrypt(buf, buf2,
	1770	(unsigned long)lengths[j], &aes_ks1,
	1771	iv, AES_ENCRYPT);
	1772	d = Time_F(STOP);
	1773	print_result(D_IGE_128_AES, j, count, d);
	1774	}
	1775	}
	1776	if (doit[D_IGE_192_AES]) {
	1777	for (j = 0; j < SIZE_NUM; j++) {
	1778	print_message(names[D_IGE_192_AES], c[D_IGE_192_AES][j],
	1779	lengths[j]);
	1780	Time_F(START);
	1781	for (count = 0, run = 1; COND(c[D_IGE_192_AES][j]); count++)
	1782	AES_ige_encrypt(buf, buf2,
	1783	(unsigned long)lengths[j], &aes_ks2,
	1784	iv, AES_ENCRYPT);
	1785	d = Time_F(STOP);
	1786	print_result(D_IGE_192_AES, j, count, d);
	1787	}
	1788	}
	1789	if (doit[D_IGE_256_AES]) {
	1790	for (j = 0; j < SIZE_NUM; j++) {
	1791	print_message(names[D_IGE_256_AES], c[D_IGE_256_AES][j],
	1792	lengths[j]);
	1793	Time_F(START);
	1794	for (count = 0, run = 1; COND(c[D_IGE_256_AES][j]); count++)
	1795	AES_ige_encrypt(buf, buf2,
	1796	(unsigned long)lengths[j], &aes_ks3,
	1797	iv, AES_ENCRYPT);
	1798	d = Time_F(STOP);
	1799	print_result(D_IGE_256_AES, j, count, d);
	1800	}
	1801	}
	1802	if (doit[D_GHASH]) {
	1803	GCM128_CONTEXT *ctx =
	1804	CRYPTO_gcm128_new(&aes_ks1, (block128_f) AES_encrypt);
	1805	CRYPTO_gcm128_setiv(ctx, (unsigned char *)"0123456789ab", 12);
	1806
	1807	for (j = 0; j < SIZE_NUM; j++) {
	1808	print_message(names[D_GHASH], c[D_GHASH][j], lengths[j]);
	1809	Time_F(START);
	1810	for (count = 0, run = 1; COND(c[D_GHASH][j]); count++)
	1811	CRYPTO_gcm128_aad(ctx, buf, lengths[j]);
	1812	d = Time_F(STOP);
	1813	print_result(D_GHASH, j, count, d);
	1814	}
	1815	CRYPTO_gcm128_release(ctx);
	1816	}
	1817	# endif
	1818	# ifndef OPENSSL_NO_CAMELLIA
	1819	if (doit[D_CBC_128_CML]) {
	1820	for (j = 0; j < SIZE_NUM; j++) {
	1821	print_message(names[D_CBC_128_CML], c[D_CBC_128_CML][j],
	1822	lengths[j]);
	1823	Time_F(START);
	1824	for (count = 0, run = 1; COND(c[D_CBC_128_CML][j]); count++)
	1825	Camellia_cbc_encrypt(buf, buf,
	1826	(unsigned long)lengths[j], &camellia_ks1,
1827	iv, CAMELLIA_ENCRYPT);
1828	d = Time_F(STOP);
1829	print_result(D_CBC_128_CML, j, count, d);
1830	}
1831	}
1832	if (doit[D_CBC_192_CML]) {
1833	for (j = 0; j < SIZE_NUM; j++) {
1834	print_message(names[D_CBC_192_CML], c[D_CBC_192_CML][j],
1835	lengths[j]);
1836	Time_F(START);
1837	for (count = 0, run = 1; COND(c[D_CBC_192_CML][j]); count++)
1838	Camellia_cbc_encrypt(buf, buf,
1839	(unsigned long)lengths[j], &camellia_ks2,
1840	iv, CAMELLIA_ENCRYPT);
1841	d = Time_F(STOP);
1842	print_result(D_CBC_192_CML, j, count, d);
1843	}
1844	}
1845	if (doit[D_CBC_256_CML]) {
1846	for (j = 0; j < SIZE_NUM; j++) {
1847	print_message(names[D_CBC_256_CML], c[D_CBC_256_CML][j],
1848	lengths[j]);
1849	Time_F(START);
1850	for (count = 0, run = 1; COND(c[D_CBC_256_CML][j]); count++)
1851	Camellia_cbc_encrypt(buf, buf,
1852	(unsigned long)lengths[j], &camellia_ks3,
1853	iv, CAMELLIA_ENCRYPT);
1854	d = Time_F(STOP);
1855	print_result(D_CBC_256_CML, j, count, d);
1856	}
1857	}
1858	# endif
1859	# ifndef OPENSSL_NO_IDEA
1860	if (doit[D_CBC_IDEA]) {
1861	for (j = 0; j < SIZE_NUM; j++) {
1862	print_message(names[D_CBC_IDEA], c[D_CBC_IDEA][j], lengths[j]);
1863	Time_F(START);
1864	for (count = 0, run = 1; COND(c[D_CBC_IDEA][j]); count++)
1865	idea_cbc_encrypt(buf, buf,
1866	(unsigned long)lengths[j], &idea_ks,
1867	iv, IDEA_ENCRYPT);
1868	d = Time_F(STOP);
1869	print_result(D_CBC_IDEA, j, count, d);
1870	}
1871	}
1872	# endif
1873	# ifndef OPENSSL_NO_SEED
1874	if (doit[D_CBC_SEED]) {
1875	for (j = 0; j < SIZE_NUM; j++) {
1876	print_message(names[D_CBC_SEED], c[D_CBC_SEED][j], lengths[j]);
1877	Time_F(START);
1878	for (count = 0, run = 1; COND(c[D_CBC_SEED][j]); count++)
1879	SEED_cbc_encrypt(buf, buf,
1880	(unsigned long)lengths[j], &seed_ks, iv, 1);
1881	d = Time_F(STOP);
1882	print_result(D_CBC_SEED, j, count, d);
1883	}
1884	}
1885	# endif
1886	# ifndef OPENSSL_NO_RC2
1887	if (doit[D_CBC_RC2]) {
1888	for (j = 0; j < SIZE_NUM; j++) {
1889	print_message(names[D_CBC_RC2], c[D_CBC_RC2][j], lengths[j]);
1890	Time_F(START);
1891	for (count = 0, run = 1; COND(c[D_CBC_RC2][j]); count++)
1892	RC2_cbc_encrypt(buf, buf,
1893	(unsigned long)lengths[j], &rc2_ks,
1894	iv, RC2_ENCRYPT);
1895	d = Time_F(STOP);
1896	print_result(D_CBC_RC2, j, count, d);
1897	}
1898	}
1899	# endif
1900	# ifndef OPENSSL_NO_RC5
1901	if (doit[D_CBC_RC5]) {
1902	for (j = 0; j < SIZE_NUM; j++) {
1903	print_message(names[D_CBC_RC5], c[D_CBC_RC5][j], lengths[j]);
1904	Time_F(START);
1905	for (count = 0, run = 1; COND(c[D_CBC_RC5][j]); count++)
1906	RC5_32_cbc_encrypt(buf, buf,
1907	(unsigned long)lengths[j], &rc5_ks,
1908	iv, RC5_ENCRYPT);
1909	d = Time_F(STOP);
1910	print_result(D_CBC_RC5, j, count, d);
1911	}
1912	}
1913	# endif
1914	# ifndef OPENSSL_NO_BF
1915	if (doit[D_CBC_BF]) {
1916	for (j = 0; j < SIZE_NUM; j++) {
1917	print_message(names[D_CBC_BF], c[D_CBC_BF][j], lengths[j]);
1918	Time_F(START);
1919	for (count = 0, run = 1; COND(c[D_CBC_BF][j]); count++)
1920	BF_cbc_encrypt(buf, buf,
1921	(unsigned long)lengths[j], &bf_ks,
1922	iv, BF_ENCRYPT);
1923	d = Time_F(STOP);
1924	print_result(D_CBC_BF, j, count, d);
1925	}
1926	}
1927	# endif
1928	# ifndef OPENSSL_NO_CAST
1929	if (doit[D_CBC_CAST]) {
1930	for (j = 0; j < SIZE_NUM; j++) {
1931	print_message(names[D_CBC_CAST], c[D_CBC_CAST][j], lengths[j]);
1932	Time_F(START);
1933	for (count = 0, run = 1; COND(c[D_CBC_CAST][j]); count++)
1934	CAST_cbc_encrypt(buf, buf,
1935	(unsigned long)lengths[j], &cast_ks,
1936	iv, CAST_ENCRYPT);
1937	d = Time_F(STOP);
1938	print_result(D_CBC_CAST, j, count, d);
1939	}
1940	}
1941	# endif
74093195	1942
9eaaad39 SW	1943	if (doit[D_EVP]) {
	1944	for (j = 0; j < SIZE_NUM; j++) {
	1945	if (evp_cipher) {
	1946	EVP_CIPHER_CTX ctx;
	1947	int outl;
	1948
	1949	names[D_EVP] = OBJ_nid2ln(evp_cipher->nid);
	1950	/*
	1951	* -O3 -fschedule-insns messes up an optimization here!
	1952	* names[D_EVP] somehow becomes NULL
	1953	*/
	1954	print_message(names[D_EVP], save_count, lengths[j]);
	1955
	1956	EVP_CIPHER_CTX_init(&ctx);
	1957	if (decrypt)
	1958	EVP_DecryptInit_ex(&ctx, evp_cipher, NULL, key16, iv);
	1959	else
	1960	EVP_EncryptInit_ex(&ctx, evp_cipher, NULL, key16, iv);
	1961	EVP_CIPHER_CTX_set_padding(&ctx, 0);
	1962
	1963	Time_F(START);
	1964	if (decrypt)
	1965	for (count = 0, run = 1;
	1966	COND(save_count * 4 * lengths[0] / lengths[j]);
	1967	count++)
	1968	EVP_DecryptUpdate(&ctx, buf, &outl, buf, lengths[j]);
	1969	else
	1970	for (count = 0, run = 1;
	1971	COND(save_count * 4 * lengths[0] / lengths[j]);
	1972	count++)
	1973	EVP_EncryptUpdate(&ctx, buf, &outl, buf, lengths[j]);
	1974	if (decrypt)
	1975	EVP_DecryptFinal_ex(&ctx, buf, &outl);
	1976	else
	1977	EVP_EncryptFinal_ex(&ctx, buf, &outl);
	1978	d = Time_F(STOP);
	1979	EVP_CIPHER_CTX_cleanup(&ctx);
	1980	}
	1981	if (evp_md) {
	1982	names[D_EVP] = OBJ_nid2ln(evp_md->type);
	1983	print_message(names[D_EVP], save_count, lengths[j]);
	1984
	1985	Time_F(START);
	1986	for (count = 0, run = 1;
	1987	COND(save_count * 4 * lengths[0] / lengths[j]); count++)
	1988	EVP_Digest(buf, lengths[j], &(md[0]), NULL, evp_md, NULL);
	1989
	1990	d = Time_F(STOP);
	1991	}
	1992	print_result(D_EVP, j, count, d);
	1993	}
	1994	}
56276539	1995
9eaaad39 SW	1996	RAND_pseudo_bytes(buf, 36);
	1997	# ifndef OPENSSL_NO_RSA
	1998	for (j = 0; j < RSA_NUM; j++) {
	1999	int ret;
	2000	if (!rsa_doit[j])
	2001	continue;
	2002	ret = RSA_sign(NID_md5_sha1, buf, 36, buf2, &rsa_num, rsa_key[j]);
	2003	if (ret == 0) {
	2004	BIO_printf(bio_err,
	2005	"RSA sign failure. No RSA sign will be done.\n");
	2006	ERR_print_errors(bio_err);
	2007	rsa_count = 1;
	2008	} else {
	2009	pkey_print_message("private", "rsa",
	2010	rsa_c[j][0], rsa_bits[j], RSA_SECONDS);
	2011	/* RSA_blinding_on(rsa_key[j],NULL); */
	2012	Time_F(START);
	2013	for (count = 0, run = 1; COND(rsa_c[j][0]); count++) {
	2014	ret = RSA_sign(NID_md5_sha1, buf, 36, buf2,
	2015	&rsa_num, rsa_key[j]);
	2016	if (ret == 0) {
	2017	BIO_printf(bio_err, "RSA sign failure\n");
	2018	ERR_print_errors(bio_err);
	2019	count = 1;
	2020	break;
	2021	}
	2022	}
	2023	d = Time_F(STOP);
	2024	BIO_printf(bio_err,
	2025	mr ? "+R1:%ld:%d:%.2f\n"
	2026	: "%ld %d bit private RSA's in %.2fs\n",
	2027	count, rsa_bits[j], d);
	2028	rsa_results[j][0] = d / (double)count;
	2029	rsa_count = count;
	2030	}
56276539	2031
9eaaad39 SW	2032	# if 1
	2033	ret = RSA_verify(NID_md5_sha1, buf, 36, buf2, rsa_num, rsa_key[j]);
	2034	if (ret <= 0) {
	2035	BIO_printf(bio_err,
	2036	"RSA verify failure. No RSA verify will be done.\n");
	2037	ERR_print_errors(bio_err);
	2038	rsa_doit[j] = 0;
	2039	} else {
	2040	pkey_print_message("public", "rsa",
	2041	rsa_c[j][1], rsa_bits[j], RSA_SECONDS);
	2042	Time_F(START);
	2043	for (count = 0, run = 1; COND(rsa_c[j][1]); count++) {
	2044	ret = RSA_verify(NID_md5_sha1, buf, 36, buf2,
	2045	rsa_num, rsa_key[j]);
	2046	if (ret <= 0) {
	2047	BIO_printf(bio_err, "RSA verify failure\n");
	2048	ERR_print_errors(bio_err);
	2049	count = 1;
	2050	break;
	2051	}
	2052	}
	2053	d = Time_F(STOP);
	2054	BIO_printf(bio_err,
	2055	mr ? "+R2:%ld:%d:%.2f\n"
	2056	: "%ld %d bit public RSA's in %.2fs\n",
	2057	count, rsa_bits[j], d);
	2058	rsa_results[j][1] = d / (double)count;
	2059	}
	2060	# endif
56276539	2061
9eaaad39 SW	2062	if (rsa_count <= 1) {
	2063	/* if longer than 10s, don't do any more */
	2064	for (j++; j < RSA_NUM; j++)
	2065	rsa_doit[j] = 0;
	2066	}
	2067	}
	2068	# endif
56276539	2069
9eaaad39 SW	2070	RAND_pseudo_bytes(buf, 20);
	2071	# ifndef OPENSSL_NO_DSA
	2072	if (RAND_status() != 1) {
	2073	RAND_seed(rnd_seed, sizeof rnd_seed);
	2074	rnd_fake = 1;
	2075	}
	2076	for (j = 0; j < DSA_NUM; j++) {
	2077	unsigned int kk;
	2078	int ret;
	2079
	2080	if (!dsa_doit[j])
	2081	continue;
	2082
	2083	/* DSA_generate_key(dsa_key[j]); */
	2084	/* DSA_sign_setup(dsa_key[j],NULL); */
	2085	ret = DSA_sign(EVP_PKEY_DSA, buf, 20, buf2, &kk, dsa_key[j]);
	2086	if (ret == 0) {
	2087	BIO_printf(bio_err,
	2088	"DSA sign failure. No DSA sign will be done.\n");
	2089	ERR_print_errors(bio_err);
	2090	rsa_count = 1;
	2091	} else {
	2092	pkey_print_message("sign", "dsa",
	2093	dsa_c[j][0], dsa_bits[j], DSA_SECONDS);
	2094	Time_F(START);
	2095	for (count = 0, run = 1; COND(dsa_c[j][0]); count++) {
	2096	ret = DSA_sign(EVP_PKEY_DSA, buf, 20, buf2, &kk, dsa_key[j]);
	2097	if (ret == 0) {
	2098	BIO_printf(bio_err, "DSA sign failure\n");
	2099	ERR_print_errors(bio_err);
	2100	count = 1;
	2101	break;
	2102	}
	2103	}
	2104	d = Time_F(STOP);
	2105	BIO_printf(bio_err,
	2106	mr ? "+R3:%ld:%d:%.2f\n"
	2107	: "%ld %d bit DSA signs in %.2fs\n",
	2108	count, dsa_bits[j], d);
	2109	dsa_results[j][0] = d / (double)count;
	2110	rsa_count = count;
	2111	}
56276539	2112
9eaaad39 SW	2113	ret = DSA_verify(EVP_PKEY_DSA, buf, 20, buf2, kk, dsa_key[j]);
	2114	if (ret <= 0) {
	2115	BIO_printf(bio_err,
	2116	"DSA verify failure. No DSA verify will be done.\n");
	2117	ERR_print_errors(bio_err);
	2118	dsa_doit[j] = 0;
	2119	} else {
	2120	pkey_print_message("verify", "dsa",
	2121	dsa_c[j][1], dsa_bits[j], DSA_SECONDS);
	2122	Time_F(START);
	2123	for (count = 0, run = 1; COND(dsa_c[j][1]); count++) {
	2124	ret = DSA_verify(EVP_PKEY_DSA, buf, 20, buf2, kk, dsa_key[j]);
	2125	if (ret <= 0) {
	2126	BIO_printf(bio_err, "DSA verify failure\n");
	2127	ERR_print_errors(bio_err);
	2128	count = 1;
	2129	break;
	2130	}
	2131	}
	2132	d = Time_F(STOP);
	2133	BIO_printf(bio_err,
	2134	mr ? "+R4:%ld:%d:%.2f\n"
	2135	: "%ld %d bit DSA verify in %.2fs\n",
	2136	count, dsa_bits[j], d);
	2137	dsa_results[j][1] = d / (double)count;
	2138	}
56276539	2139
9eaaad39 SW	2140	if (rsa_count <= 1) {
	2141	/* if longer than 10s, don't do any more */
	2142	for (j++; j < DSA_NUM; j++)
	2143	dsa_doit[j] = 0;
	2144	}
	2145	}
	2146	if (rnd_fake)
	2147	RAND_cleanup();
	2148	# endif
56276539	2149
9eaaad39 SW	2150	# ifndef OPENSSL_NO_ECDSA
	2151	if (RAND_status() != 1) {
	2152	RAND_seed(rnd_seed, sizeof rnd_seed);
	2153	rnd_fake = 1;
	2154	}
	2155	for (j = 0; j < EC_NUM; j++) {
	2156	int ret;
	2157
	2158	if (!ecdsa_doit[j])
	2159	continue; /* Ignore Curve */
	2160	ecdsa[j] = EC_KEY_new_by_curve_name(test_curves[j]);
	2161	if (ecdsa[j] == NULL) {
	2162	BIO_printf(bio_err, "ECDSA failure.\n");
	2163	ERR_print_errors(bio_err);
	2164	rsa_count = 1;
	2165	} else {
	2166	# if 1
	2167	EC_KEY_precompute_mult(ecdsa[j], NULL);
	2168	# endif
	2169	/* Perform ECDSA signature test */
	2170	EC_KEY_generate_key(ecdsa[j]);
	2171	ret = ECDSA_sign(0, buf, 20, ecdsasig, &ecdsasiglen, ecdsa[j]);
	2172	if (ret == 0) {
	2173	BIO_printf(bio_err,
	2174	"ECDSA sign failure. No ECDSA sign will be done.\n");
	2175	ERR_print_errors(bio_err);
	2176	rsa_count = 1;
	2177	} else {
	2178	pkey_print_message("sign", "ecdsa",
	2179	ecdsa_c[j][0],
	2180	test_curves_bits[j], ECDSA_SECONDS);
	2181
	2182	Time_F(START);
	2183	for (count = 0, run = 1; COND(ecdsa_c[j][0]); count++) {
	2184	ret = ECDSA_sign(0, buf, 20,
	2185	ecdsasig, &ecdsasiglen, ecdsa[j]);
	2186	if (ret == 0) {
	2187	BIO_printf(bio_err, "ECDSA sign failure\n");
	2188	ERR_print_errors(bio_err);
	2189	count = 1;
	2190	break;
	2191	}
	2192	}
	2193	d = Time_F(STOP);
	2194
	2195	BIO_printf(bio_err,
	2196	mr ? "+R5:%ld:%d:%.2f\n" :
	2197	"%ld %d bit ECDSA signs in %.2fs \n",
	2198	count, test_curves_bits[j], d);
	2199	ecdsa_results[j][0] = d / (double)count;
	2200	rsa_count = count;
	2201	}
	2202
	2203	/* Perform ECDSA verification test */
	2204	ret = ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen, ecdsa[j]);
	2205	if (ret != 1) {
	2206	BIO_printf(bio_err,
	2207	"ECDSA verify failure. No ECDSA verify will be done.\n");
	2208	ERR_print_errors(bio_err);
	2209	ecdsa_doit[j] = 0;
	2210	} else {
	2211	pkey_print_message("verify", "ecdsa",
	2212	ecdsa_c[j][1],
	2213	test_curves_bits[j], ECDSA_SECONDS);
2214	Time_F(START);
2215	for (count = 0, run = 1; COND(ecdsa_c[j][1]); count++) {
2216	ret =
2217	ECDSA_verify(0, buf, 20, ecdsasig, ecdsasiglen,
2218	ecdsa[j]);
2219	if (ret != 1) {
2220	BIO_printf(bio_err, "ECDSA verify failure\n");
2221	ERR_print_errors(bio_err);
2222	count = 1;
2223	break;
2224	}
2225	}
2226	d = Time_F(STOP);
2227	BIO_printf(bio_err,
2228	mr ? "+R6:%ld:%d:%.2f\n"
2229	: "%ld %d bit ECDSA verify in %.2fs\n",
2230	count, test_curves_bits[j], d);
2231	ecdsa_results[j][1] = d / (double)count;
2232	}
2233
2234	if (rsa_count <= 1) {
2235	/* if longer than 10s, don't do any more */
2236	for (j++; j < EC_NUM; j++)
2237	ecdsa_doit[j] = 0;
2238	}
2239	}
2240	}
2241	if (rnd_fake)
2242	RAND_cleanup();
2243	# endif
56276539	2244
9eaaad39 SW	2245	# ifndef OPENSSL_NO_ECDH
	2246	if (RAND_status() != 1) {
	2247	RAND_seed(rnd_seed, sizeof rnd_seed);
	2248	rnd_fake = 1;
	2249	}
	2250	for (j = 0; j < EC_NUM; j++) {
	2251	if (!ecdh_doit[j])
	2252	continue;
	2253	ecdh_a[j] = EC_KEY_new_by_curve_name(test_curves[j]);
	2254	ecdh_b[j] = EC_KEY_new_by_curve_name(test_curves[j]);
	2255	if ((ecdh_a[j] == NULL) \|\| (ecdh_b[j] == NULL)) {
	2256	BIO_printf(bio_err, "ECDH failure.\n");
	2257	ERR_print_errors(bio_err);
	2258	rsa_count = 1;
	2259	} else {
	2260	/* generate two ECDH key pairs */
	2261	if (!EC_KEY_generate_key(ecdh_a[j]) \|\|
	2262	!EC_KEY_generate_key(ecdh_b[j])) {
	2263	BIO_printf(bio_err, "ECDH key generation failure.\n");
	2264	ERR_print_errors(bio_err);
	2265	rsa_count = 1;
	2266	} else {
	2267	/*
	2268	* If field size is not more than 24 octets, then use SHA-1
	2269	* hash of result; otherwise, use result (see section 4.8 of
	2270	* draft-ietf-tls-ecc-03.txt).
	2271	*/
	2272	int field_size, outlen;
	2273	void (kdf) (const void in, size_t inlen, void out,
	2274	size_t *xoutlen);
	2275	field_size =
	2276	EC_GROUP_get_degree(EC_KEY_get0_group(ecdh_a[j]));
	2277	if (field_size <= 24 * 8) {
	2278	outlen = KDF1_SHA1_len;
	2279	kdf = KDF1_SHA1;
	2280	} else {
	2281	outlen = (field_size + 7) / 8;
	2282	kdf = NULL;
	2283	}
	2284	secret_size_a =
	2285	ECDH_compute_key(secret_a, outlen,
	2286	EC_KEY_get0_public_key(ecdh_b[j]),
	2287	ecdh_a[j], kdf);
	2288	secret_size_b =
	2289	ECDH_compute_key(secret_b, outlen,
	2290	EC_KEY_get0_public_key(ecdh_a[j]),
	2291	ecdh_b[j], kdf);
	2292	if (secret_size_a != secret_size_b)
	2293	ecdh_checks = 0;
	2294	else
	2295	ecdh_checks = 1;
	2296
	2297	for (secret_idx = 0; (secret_idx < secret_size_a)
	2298	&& (ecdh_checks == 1); secret_idx++) {
	2299	if (secret_a[secret_idx] != secret_b[secret_idx])
	2300	ecdh_checks = 0;
	2301	}
	2302
	2303	if (ecdh_checks == 0) {
	2304	BIO_printf(bio_err, "ECDH computations don't match.\n");
	2305	ERR_print_errors(bio_err);
	2306	rsa_count = 1;
	2307	}
	2308
2309	pkey_print_message("", "ecdh",
2310	ecdh_c[j][0],
2311	test_curves_bits[j], ECDH_SECONDS);
2312	Time_F(START);
2313	for (count = 0, run = 1; COND(ecdh_c[j][0]); count++) {
2314	ECDH_compute_key(secret_a, outlen,
2315	EC_KEY_get0_public_key(ecdh_b[j]),
2316	ecdh_a[j], kdf);
2317	}
2318	d = Time_F(STOP);
2319	BIO_printf(bio_err,
2320	mr ? "+R7:%ld:%d:%.2f\n" :
2321	"%ld %d-bit ECDH ops in %.2fs\n", count,
2322	test_curves_bits[j], d);
2323	ecdh_results[j][0] = d / (double)count;
2324	rsa_count = count;
2325	}
2326	}
56276539	2327
9eaaad39 SW	2328	if (rsa_count <= 1) {
	2329	/* if longer than 10s, don't do any more */
	2330	for (j++; j < EC_NUM; j++)
	2331	ecdh_doit[j] = 0;
	2332	}
	2333	}
	2334	if (rnd_fake)
	2335	RAND_cleanup();
	2336	# endif
	2337	# ifndef NO_FORK
	2338	show_res:
	2339	# endif
	2340	if (!mr) {
	2341	fprintf(stdout, "%s\n", SSLeay_version(SSLEAY_VERSION));
	2342	fprintf(stdout, "%s\n", SSLeay_version(SSLEAY_BUILT_ON));
	2343	printf("options:");
	2344	printf("%s ", BN_options());
	2345	# ifndef OPENSSL_NO_MD2
	2346	printf("%s ", MD2_options());
	2347	# endif
	2348	# ifndef OPENSSL_NO_RC4
	2349	printf("%s ", RC4_options());
	2350	# endif
	2351	# ifndef OPENSSL_NO_DES
	2352	printf("%s ", DES_options());
	2353	# endif
	2354	# ifndef OPENSSL_NO_AES
	2355	printf("%s ", AES_options());
	2356	# endif
	2357	# ifndef OPENSSL_NO_IDEA
	2358	printf("%s ", idea_options());
	2359	# endif
	2360	# ifndef OPENSSL_NO_BF
	2361	printf("%s ", BF_options());
	2362	# endif
	2363	fprintf(stdout, "\n%s\n", SSLeay_version(SSLEAY_CFLAGS));
	2364	}
56276539	2365
9eaaad39 SW	2366	if (pr_header) {
	2367	if (mr)
	2368	fprintf(stdout, "+H");
	2369	else {
	2370	fprintf(stdout,
	2371	"The 'numbers' are in 1000s of bytes per second processed.\n");
	2372	fprintf(stdout, "type ");
	2373	}
	2374	for (j = 0; j < SIZE_NUM; j++)
	2375	fprintf(stdout, mr ? ":%d" : "%7d bytes", lengths[j]);
	2376	fprintf(stdout, "\n");
	2377	}
	2378
	2379	for (k = 0; k < ALGOR_NUM; k++) {
	2380	if (!doit[k])
	2381	continue;
	2382	if (mr)
	2383	fprintf(stdout, "+F:%d:%s", k, names[k]);
	2384	else
	2385	fprintf(stdout, "%-13s", names[k]);
	2386	for (j = 0; j < SIZE_NUM; j++) {
	2387	if (results[k][j] > 10000 && !mr)
	2388	fprintf(stdout, " %11.2fk", results[k][j] / 1e3);
	2389	else
	2390	fprintf(stdout, mr ? ":%.2f" : " %11.2f ", results[k][j]);
	2391	}
	2392	fprintf(stdout, "\n");
	2393	}
	2394	# ifndef OPENSSL_NO_RSA
	2395	j = 1;
	2396	for (k = 0; k < RSA_NUM; k++) {
	2397	if (!rsa_doit[k])
	2398	continue;
	2399	if (j && !mr) {
	2400	printf("%18ssign verify sign/s verify/s\n", " ");
	2401	j = 0;
	2402	}
	2403	if (mr)
	2404	fprintf(stdout, "+F2:%u:%u:%f:%f\n",
	2405	k, rsa_bits[k], rsa_results[k][0], rsa_results[k][1]);
	2406	else
	2407	fprintf(stdout, "rsa %4u bits %8.6fs %8.6fs %8.1f %8.1f\n",
	2408	rsa_bits[k], rsa_results[k][0], rsa_results[k][1],
	2409	1.0 / rsa_results[k][0], 1.0 / rsa_results[k][1]);
	2410	}
	2411	# endif
	2412	# ifndef OPENSSL_NO_DSA
	2413	j = 1;
	2414	for (k = 0; k < DSA_NUM; k++) {
	2415	if (!dsa_doit[k])
	2416	continue;
	2417	if (j && !mr) {
	2418	printf("%18ssign verify sign/s verify/s\n", " ");
	2419	j = 0;
	2420	}
	2421	if (mr)
	2422	fprintf(stdout, "+F3:%u:%u:%f:%f\n",
	2423	k, dsa_bits[k], dsa_results[k][0], dsa_results[k][1]);
	2424	else
	2425	fprintf(stdout, "dsa %4u bits %8.6fs %8.6fs %8.1f %8.1f\n",
	2426	dsa_bits[k], dsa_results[k][0], dsa_results[k][1],
	2427	1.0 / dsa_results[k][0], 1.0 / dsa_results[k][1]);
	2428	}
	2429	# endif
2430	# ifndef OPENSSL_NO_ECDSA
2431	j = 1;
2432	for (k = 0; k < EC_NUM; k++) {
2433	if (!ecdsa_doit[k])
2434	continue;
2435	if (j && !mr) {
2436	printf("%30ssign verify sign/s verify/s\n", " ");
2437	j = 0;
2438	}
2439
2440	if (mr)
2441	fprintf(stdout, "+F4:%u:%u:%f:%f\n",
2442	k, test_curves_bits[k],
2443	ecdsa_results[k][0], ecdsa_results[k][1]);
2444	else
2445	fprintf(stdout,
2446	"%4u bit ecdsa (%s) %8.4fs %8.4fs %8.1f %8.1f\n",
2447	test_curves_bits[k],
2448	test_curves_names[k],
2449	ecdsa_results[k][0], ecdsa_results[k][1],
2450	1.0 / ecdsa_results[k][0], 1.0 / ecdsa_results[k][1]);
2451	}
2452	# endif
2453
2454	# ifndef OPENSSL_NO_ECDH
2455	j = 1;
2456	for (k = 0; k < EC_NUM; k++) {
2457	if (!ecdh_doit[k])
2458	continue;
2459	if (j && !mr) {
2460	printf("%30sop op/s\n", " ");
2461	j = 0;
2462	}
2463	if (mr)
2464	fprintf(stdout, "+F5:%u:%u:%f:%f\n",
2465	k, test_curves_bits[k],
2466	ecdh_results[k][0], 1.0 / ecdh_results[k][0]);
2467
2468	else
2469	fprintf(stdout, "%4u bit ecdh (%s) %8.4fs %8.1f\n",
2470	test_curves_bits[k],
2471	test_curves_names[k],
2472	ecdh_results[k][0], 1.0 / ecdh_results[k][0]);
2473	}
2474	# endif
2475
2476	mret = 0;
2477
2478	end:
2479	ERR_print_errors(bio_err);
2480	if (buf != NULL)
2481	OPENSSL_free(buf);
2482	if (buf2 != NULL)
2483	OPENSSL_free(buf2);
2484	# ifndef OPENSSL_NO_RSA
2485	for (i = 0; i < RSA_NUM; i++)
2486	if (rsa_key[i] != NULL)
2487	RSA_free(rsa_key[i]);
2488	# endif
2489	# ifndef OPENSSL_NO_DSA
2490	for (i = 0; i < DSA_NUM; i++)
2491	if (dsa_key[i] != NULL)
2492	DSA_free(dsa_key[i]);
2493	# endif
2494
2495	# ifndef OPENSSL_NO_ECDSA
2496	for (i = 0; i < EC_NUM; i++)
2497	if (ecdsa[i] != NULL)
2498	EC_KEY_free(ecdsa[i]);
2499	# endif
2500	# ifndef OPENSSL_NO_ECDH
2501	for (i = 0; i < EC_NUM; i++) {
2502	if (ecdh_a[i] != NULL)
2503	EC_KEY_free(ecdh_a[i]);
2504	if (ecdh_b[i] != NULL)
2505	EC_KEY_free(ecdh_b[i]);
2506	}
2507	# endif
56276539	2508
9eaaad39 SW	2509	apps_shutdown();
	2510	OPENSSL_EXIT(mret);
	2511	}
56276539 SS	2512
56276539 SS	2513	static void print_message(const char *s, long num, int length)
9eaaad39 SW	2514	{
	2515	# ifdef SIGALRM
	2516	BIO_printf(bio_err,
	2517	mr ? "+DT:%s:%d:%d\n"
	2518	: "Doing %s for %ds on %d size blocks: ", s, SECONDS, length);
	2519	(void)BIO_flush(bio_err);
	2520	alarm(SECONDS);
	2521	# else
	2522	BIO_printf(bio_err,
	2523	mr ? "+DN:%s:%ld:%d\n"
	2524	: "Doing %s %ld times on %d size blocks: ", s, num, length);
	2525	(void)BIO_flush(bio_err);
	2526	# endif
	2527	# ifdef LINT
	2528	num = num;
	2529	# endif
	2530	}
56276539 SS	2531
56276539 SS	2532	static void pkey_print_message(const char str, const char str2, long num,
9eaaad39 SW	2533	int bits, int tm)
	2534	{
	2535	# ifdef SIGALRM
	2536	BIO_printf(bio_err,
	2537	mr ? "+DTP:%d:%s:%s:%d\n"
	2538	: "Doing %d bit %s %s's for %ds: ", bits, str, str2, tm);
	2539	(void)BIO_flush(bio_err);
	2540	alarm(tm);
	2541	# else
	2542	BIO_printf(bio_err,
	2543	mr ? "+DNP:%ld:%d:%s:%s\n"
	2544	: "Doing %ld %d bit %s %s's: ", num, bits, str, str2);
	2545	(void)BIO_flush(bio_err);
	2546	# endif
	2547	# ifdef LINT
	2548	num = num;
	2549	# endif
	2550	}
56276539	2551
9eaaad39 SW	2552	static void print_result(int alg, int run_no, int count, double time_used)
	2553	{
	2554	BIO_printf(bio_err,
	2555	mr ? "+R:%d:%s:%f\n"
	2556	: "%d %s's in %.2fs\n", count, names[alg], time_used);
	2557	results[alg][run_no] = ((double)count) / time_used * lengths[run_no];
	2558	}
56276539	2559
9eaaad39	2560	# ifndef NO_FORK
56276539	2561	static char sstrsep(char string, const char delim)
9eaaad39	2562	{
56276539 SS	2563	char isdelim[256];
	2564	char token = string;
	2565
	2566	if (**string == 0)
	2567	return NULL;
	2568
	2569	memset(isdelim, 0, sizeof isdelim);
	2570	isdelim[0] = 1;
	2571
9eaaad39	2572	while (*delim) {
56276539 SS	2573	isdelim[(unsigned char)(*delim)] = 1;
56276539 SS	2574	delim++;
9eaaad39	2575	}
56276539	2576
9eaaad39	2577	while (!isdelim[(unsigned char)(**string)]) {
56276539	2578	(*string)++;
9eaaad39	2579	}
56276539	2580
9eaaad39	2581	if (**string) {
56276539 SS	2582	**string = 0;
56276539 SS	2583	(*string)++;
9eaaad39	2584	}
56276539 SS	2585
56276539 SS	2586	return token;
9eaaad39	2587	}
56276539	2588
56276539	2589	static int do_multi(int multi)
9eaaad39 SW	2590	{
	2591	int n;
	2592	int fd[2];
	2593	int *fds;
	2594	static char sep[] = ":";
	2595
	2596	fds = malloc(multi * sizeof *fds);
	2597	for (n = 0; n < multi; ++n) {
	2598	if (pipe(fd) == -1) {
	2599	fprintf(stderr, "pipe failure\n");
	2600	exit(1);
	2601	}
	2602	fflush(stdout);
	2603	fflush(stderr);
	2604	if (fork()) {
	2605	close(fd[1]);
	2606	fds[n] = fd[0];
	2607	} else {
	2608	close(fd[0]);
	2609	close(1);
	2610	if (dup(fd[1]) == -1) {
	2611	fprintf(stderr, "dup failed\n");
	2612	exit(1);
	2613	}
	2614	close(fd[1]);
	2615	mr = 1;
	2616	usertime = 0;
	2617	free(fds);
	2618	return 0;
	2619	}
	2620	printf("Forked child %d\n", n);
	2621	}
56276539	2622
9eaaad39 SW	2623	/* for now, assume the pipe is long enough to take all the output */
	2624	for (n = 0; n < multi; ++n) {
	2625	FILE *f;
	2626	char buf[1024];
	2627	char *p;
	2628
	2629	f = fdopen(fds[n], "r");
	2630	while (fgets(buf, sizeof buf, f)) {
	2631	p = strchr(buf, '\n');
	2632	if (p)
	2633	*p = '\0';
	2634	if (buf[0] != '+') {
	2635	fprintf(stderr, "Don't understand line '%s' from child %d\n",
	2636	buf, n);
	2637	continue;
	2638	}
	2639	printf("Got: %s from %d\n", buf, n);
	2640	if (!strncmp(buf, "+F:", 3)) {
	2641	int alg;
	2642	int j;
	2643
	2644	p = buf + 3;
	2645	alg = atoi(sstrsep(&p, sep));
	2646	sstrsep(&p, sep);
	2647	for (j = 0; j < SIZE_NUM; ++j)
	2648	results[alg][j] += atof(sstrsep(&p, sep));
	2649	} else if (!strncmp(buf, "+F2:", 4)) {
	2650	int k;
	2651	double d;
	2652
	2653	p = buf + 4;
	2654	k = atoi(sstrsep(&p, sep));
	2655	sstrsep(&p, sep);
	2656
	2657	d = atof(sstrsep(&p, sep));
	2658	if (n)
	2659	rsa_results[k][0] = 1 / (1 / rsa_results[k][0] + 1 / d);
	2660	else
	2661	rsa_results[k][0] = d;
	2662
	2663	d = atof(sstrsep(&p, sep));
	2664	if (n)
	2665	rsa_results[k][1] = 1 / (1 / rsa_results[k][1] + 1 / d);
	2666	else
	2667	rsa_results[k][1] = d;
	2668	}
	2669	# ifndef OPENSSL_NO_DSA
	2670	else if (!strncmp(buf, "+F3:", 4)) {
	2671	int k;
	2672	double d;
	2673
	2674	p = buf + 4;
	2675	k = atoi(sstrsep(&p, sep));
	2676	sstrsep(&p, sep);
	2677
	2678	d = atof(sstrsep(&p, sep));
	2679	if (n)
	2680	dsa_results[k][0] = 1 / (1 / dsa_results[k][0] + 1 / d);
	2681	else
	2682	dsa_results[k][0] = d;
	2683
	2684	d = atof(sstrsep(&p, sep));
	2685	if (n)
	2686	dsa_results[k][1] = 1 / (1 / dsa_results[k][1] + 1 / d);
2687	else
2688	dsa_results[k][1] = d;
2689	}
2690	# endif
2691	# ifndef OPENSSL_NO_ECDSA
2692	else if (!strncmp(buf, "+F4:", 4)) {
2693	int k;
2694	double d;
2695
2696	p = buf + 4;
2697	k = atoi(sstrsep(&p, sep));
2698	sstrsep(&p, sep);
2699
2700	d = atof(sstrsep(&p, sep));
2701	if (n)
2702	ecdsa_results[k][0] =
2703	1 / (1 / ecdsa_results[k][0] + 1 / d);
2704	else
2705	ecdsa_results[k][0] = d;
2706
2707	d = atof(sstrsep(&p, sep));
2708	if (n)
2709	ecdsa_results[k][1] =
2710	1 / (1 / ecdsa_results[k][1] + 1 / d);
2711	else
2712	ecdsa_results[k][1] = d;
2713	}
2714	# endif
2715
2716	# ifndef OPENSSL_NO_ECDH
2717	else if (!strncmp(buf, "+F5:", 4)) {
2718	int k;
2719	double d;
2720
2721	p = buf + 4;
2722	k = atoi(sstrsep(&p, sep));
2723	sstrsep(&p, sep);
2724
2725	d = atof(sstrsep(&p, sep));
2726	if (n)
2727	ecdh_results[k][0] = 1 / (1 / ecdh_results[k][0] + 1 / d);
2728	else
2729	ecdh_results[k][0] = d;
2730
2731	}
2732	# endif
2733
2734	else if (!strncmp(buf, "+H:", 3)) {
2735	} else
2736	fprintf(stderr, "Unknown type '%s' from child %d\n", buf, n);
2737	}
2738
2739	fclose(f);
2740	}
2741	free(fds);
2742	return 1;
2743	}
2744	# endif
56276539	2745	#endif