idea_spd.c revision 61821
1/* crypto/idea/idea_spd.c */ 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 * $FreeBSD: head/crypto/openssl/crypto/idea/idea_spd.c 61821 2000-06-19 13:59:34Z markm $ 58 */ 59 60/* 11-Sep-92 Andrew Daviel Support for Silicon Graphics IRIX added */ 61/* 06-Apr-92 Luke Brennan Support for VMS and add extra signal calls */ 62 63#if !defined(MSDOS) && (!defined(VMS) || defined(__DECC)) 64#define TIMES 65#endif 66 67#include <stdio.h> 68 69#include <openssl/e_os2.h> 70#include OPENSSL_UNISTD_IO 71OPENSSL_DECLARE_EXIT 72 73#include <signal.h> 74#ifndef _IRIX 75#include <time.h> 76#endif 77#ifdef TIMES 78#include <sys/types.h> 79#include <sys/times.h> 80#endif 81 82/* Depending on the VMS version, the tms structure is perhaps defined. 83 The __TMS macro will show if it was. If it wasn't defined, we should 84 undefine TIMES, since that tells the rest of the program how things 85 should be handled. -- Richard Levitte */ 86#if defined(VMS) && defined(__DECC) && !defined(__TMS) 87#undef TIMES 88#endif 89 90#ifndef TIMES 91#include <sys/timeb.h> 92#endif 93 94#if defined(sun) || defined(__ultrix) 95#define _POSIX_SOURCE 96#include <limits.h> 97#include <sys/param.h> 98#endif 99 100#include <openssl/idea.h> 101 102/* The following if from times(3) man page. It may need to be changed */ 103#ifndef HZ 104#ifndef CLK_TCK 105#define HZ 100.0 106#else /* CLK_TCK */ 107#define HZ ((double)CLK_TCK) 108#endif 109#endif 110 111#define BUFSIZE ((long)1024) 112long run=0; 113 114double Time_F(int s); 115#ifdef SIGALRM 116#if defined(__STDC__) || defined(sgi) || defined(_AIX) 117#define SIGRETTYPE void 118#else 119#define SIGRETTYPE int 120#endif 121 122SIGRETTYPE sig_done(int sig); 123SIGRETTYPE sig_done(int sig) 124 { 125 signal(SIGALRM,sig_done); 126 run=0; 127#ifdef LINT 128 sig=sig; 129#endif 130 } 131#endif 132 133#define START 0 134#define STOP 1 135 136double Time_F(int s) 137 { 138 double ret; 139#ifdef TIMES 140 static struct tms tstart,tend; 141 142 if (s == START) 143 { 144 times(&tstart); 145 return(0); 146 } 147 else 148 { 149 times(&tend); 150 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ; 151 return((ret == 0.0)?1e-6:ret); 152 } 153#else /* !times() */ 154 static struct timeb tstart,tend; 155 long i; 156 157 if (s == START) 158 { 159 ftime(&tstart); 160 return(0); 161 } 162 else 163 { 164 ftime(&tend); 165 i=(long)tend.millitm-(long)tstart.millitm; 166 ret=((double)(tend.time-tstart.time))+((double)i)/1e3; 167 return((ret == 0.0)?1e-6:ret); 168 } 169#endif 170 } 171 172int main(int argc, char **argv) 173 { 174 long count; 175 static unsigned char buf[BUFSIZE]; 176 static unsigned char key[] ={ 177 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0, 178 0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10, 179 }; 180 IDEA_KEY_SCHEDULE sch; 181 double a,aa,b,c,d; 182#ifndef SIGALRM 183 long ca,cca,cb,cc; 184#endif 185 186#ifndef TIMES 187 printf("To get the most accurate results, try to run this\n"); 188 printf("program when this computer is idle.\n"); 189#endif 190 191#ifndef SIGALRM 192 printf("First we calculate the approximate speed ...\n"); 193 idea_set_encrypt_key(key,&sch); 194 count=10; 195 do { 196 long i; 197 IDEA_INT data[2]; 198 199 count*=2; 200 Time_F(START); 201 for (i=count; i; i--) 202 idea_encrypt(data,&sch); 203 d=Time_F(STOP); 204 } while (d < 3.0); 205 ca=count/4; 206 cca=count/200; 207 cb=count; 208 cc=count*8/BUFSIZE+1; 209 printf("idea_set_encrypt_key %ld times\n",ca); 210#define COND(d) (count <= (d)) 211#define COUNT(d) (d) 212#else 213#define COND(c) (run) 214#define COUNT(d) (count) 215 signal(SIGALRM,sig_done); 216 printf("Doing idea_set_encrypt_key for 10 seconds\n"); 217 alarm(10); 218#endif 219 220 Time_F(START); 221 for (count=0,run=1; COND(ca); count+=4) 222 { 223 idea_set_encrypt_key(key,&sch); 224 idea_set_encrypt_key(key,&sch); 225 idea_set_encrypt_key(key,&sch); 226 idea_set_encrypt_key(key,&sch); 227 } 228 d=Time_F(STOP); 229 printf("%ld idea idea_set_encrypt_key's in %.2f seconds\n",count,d); 230 a=((double)COUNT(ca))/d; 231 232#ifdef SIGALRM 233 printf("Doing idea_set_decrypt_key for 10 seconds\n"); 234 alarm(10); 235#else 236 printf("Doing idea_set_decrypt_key %ld times\n",cca); 237#endif 238 239 Time_F(START); 240 for (count=0,run=1; COND(cca); count+=4) 241 { 242 idea_set_decrypt_key(&sch,&sch); 243 idea_set_decrypt_key(&sch,&sch); 244 idea_set_decrypt_key(&sch,&sch); 245 idea_set_decrypt_key(&sch,&sch); 246 } 247 d=Time_F(STOP); 248 printf("%ld idea idea_set_decrypt_key's in %.2f seconds\n",count,d); 249 aa=((double)COUNT(cca))/d; 250 251#ifdef SIGALRM 252 printf("Doing idea_encrypt's for 10 seconds\n"); 253 alarm(10); 254#else 255 printf("Doing idea_encrypt %ld times\n",cb); 256#endif 257 Time_F(START); 258 for (count=0,run=1; COND(cb); count+=4) 259 { 260 unsigned long data[2]; 261 262 idea_encrypt(data,&sch); 263 idea_encrypt(data,&sch); 264 idea_encrypt(data,&sch); 265 idea_encrypt(data,&sch); 266 } 267 d=Time_F(STOP); 268 printf("%ld idea_encrypt's in %.2f second\n",count,d); 269 b=((double)COUNT(cb)*8)/d; 270 271#ifdef SIGALRM 272 printf("Doing idea_cbc_encrypt on %ld byte blocks for 10 seconds\n", 273 BUFSIZE); 274 alarm(10); 275#else 276 printf("Doing idea_cbc_encrypt %ld times on %ld byte blocks\n",cc, 277 BUFSIZE); 278#endif 279 Time_F(START); 280 for (count=0,run=1; COND(cc); count++) 281 idea_cbc_encrypt(buf,buf,BUFSIZE,&sch, 282 &(key[0]),IDEA_ENCRYPT); 283 d=Time_F(STOP); 284 printf("%ld idea_cbc_encrypt's of %ld byte blocks in %.2f second\n", 285 count,BUFSIZE,d); 286 c=((double)COUNT(cc)*BUFSIZE)/d; 287 288 printf("IDEA set_encrypt_key per sec = %12.2f (%9.3fuS)\n",a,1.0e6/a); 289 printf("IDEA set_decrypt_key per sec = %12.2f (%9.3fuS)\n",aa,1.0e6/aa); 290 printf("IDEA raw ecb bytes per sec = %12.2f (%9.3fuS)\n",b,8.0e6/b); 291 printf("IDEA cbc bytes per sec = %12.2f (%9.3fuS)\n",c,8.0e6/c); 292 exit(0); 293#if defined(LINT) || defined(MSDOS) 294 return(0); 295#endif 296 } 297 298