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