release/src/router/openssl/crypto/idea/idea_spd.c

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