rc5speed.c revision 296465 
1/* crypto/rc5/rc5speed.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#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/rc5.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)
108long run = 0;
109
110double 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
118SIGRETTYPE sig_done(int sig);
119SIGRETTYPE 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
132double 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
162int 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    RC5_32_KEY sch;
171    double a, b, c, d;
172#ifndef SIGALRM
173    long ca, 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    RC5_32_set_key(&sch, 16, key, 12);
184    count = 10;
185    do {
186        long i;
187        unsigned long data[2];
188
189        count *= 2;
190        Time_F(START);
191        for (i = count; i; i--)
192            RC5_32_encrypt(data, &sch);
193        d = Time_F(STOP);
194    } while (d < 3.0);
195    ca = count / 512;
196    cb = count;
197    cc = count * 8 / BUFSIZE + 1;
198    printf("Doing RC5_32_set_key %ld times\n", ca);
199# define COND(d) (count != (d))
200# define COUNT(d) (d)
201#else
202# define COND(c) (run)
203# define COUNT(d) (count)
204    signal(SIGALRM, sig_done);
205    printf("Doing RC5_32_set_key for 10 seconds\n");
206    alarm(10);
207#endif
208
209    Time_F(START);
210    for (count = 0, run = 1; COND(ca); count += 4) {
211        RC5_32_set_key(&sch, 16, key, 12);
212        RC5_32_set_key(&sch, 16, key, 12);
213        RC5_32_set_key(&sch, 16, key, 12);
214        RC5_32_set_key(&sch, 16, key, 12);
215    }
216    d = Time_F(STOP);
217    printf("%ld RC5_32_set_key's in %.2f seconds\n", count, d);
218    a = ((double)COUNT(ca)) / d;
219
220#ifdef SIGALRM
221    printf("Doing RC5_32_encrypt's for 10 seconds\n");
222    alarm(10);
223#else
224    printf("Doing RC5_32_encrypt %ld times\n", cb);
225#endif
226    Time_F(START);
227    for (count = 0, run = 1; COND(cb); count += 4) {
228        unsigned long data[2];
229
230        RC5_32_encrypt(data, &sch);
231        RC5_32_encrypt(data, &sch);
232        RC5_32_encrypt(data, &sch);
233        RC5_32_encrypt(data, &sch);
234    }
235    d = Time_F(STOP);
236    printf("%ld RC5_32_encrypt's in %.2f second\n", count, d);
237    b = ((double)COUNT(cb) * 8) / d;
238
239#ifdef SIGALRM
240    printf("Doing RC5_32_cbc_encrypt on %ld byte blocks for 10 seconds\n",
241           BUFSIZE);
242    alarm(10);
243#else
244    printf("Doing RC5_32_cbc_encrypt %ld times on %ld byte blocks\n", cc,
245           BUFSIZE);
246#endif
247    Time_F(START);
248    for (count = 0, run = 1; COND(cc); count++)
249        RC5_32_cbc_encrypt(buf, buf, BUFSIZE, &sch, &(key[0]), RC5_ENCRYPT);
250    d = Time_F(STOP);
251    printf("%ld RC5_32_cbc_encrypt's of %ld byte blocks in %.2f second\n",
252           count, BUFSIZE, d);
253    c = ((double)COUNT(cc) * BUFSIZE) / d;
254
255    printf("RC5_32/12/16 set_key       per sec = %12.2f (%9.3fuS)\n", a,
256           1.0e6 / a);
257    printf("RC5_32/12/16 raw ecb bytes per sec = %12.2f (%9.3fuS)\n", b,
258           8.0e6 / b);
259    printf("RC5_32/12/16 cbc     bytes per sec = %12.2f (%9.3fuS)\n", c,
260           8.0e6 / c);
261    exit(0);
262#if defined(LINT) || defined(OPENSSL_SYS_MSDOS)
263    return (0);
264#endif
265}
266