summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/lib/libcrypto/cast/cast_spd.c277
-rw-r--r--src/lib/libcrypto/cast/castopts.c341
-rw-r--r--src/lib/libssl/src/crypto/cast/cast_spd.c277
-rw-r--r--src/lib/libssl/src/crypto/cast/castopts.c341
4 files changed, 0 insertions, 1236 deletions
diff --git a/src/lib/libcrypto/cast/cast_spd.c b/src/lib/libcrypto/cast/cast_spd.c
deleted file mode 100644
index 46eb2ee8cc..0000000000
--- a/src/lib/libcrypto/cast/cast_spd.c
+++ /dev/null
@@ -1,277 +0,0 @@
1/* crypto/cast/cast_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 <unistd.h>
70
71#ifndef OPENSSL_SYS_NETWARE
72#include <signal.h>
73#endif
74
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#if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
88#undef TIMES
89#endif
90
91#ifndef TIMES
92#include <sys/timeb.h>
93#endif
94
95#if defined(sun) || defined(__ultrix)
96#define _POSIX_SOURCE
97#include <limits.h>
98#include <sys/param.h>
99#endif
100
101#include <openssl/cast.h>
102
103/* The following if from times(3) man page. It may need to be changed */
104#ifndef HZ
105#ifndef CLK_TCK
106#define HZ 100.0
107#else /* CLK_TCK */
108#define HZ ((double)CLK_TCK)
109#endif
110#endif
111
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 {
145 times(&tstart);
146 return(0);
147 }
148 else
149 {
150 times(&tend);
151 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ;
152 return((ret == 0.0)?1e-6:ret);
153 }
154#else /* !times() */
155 static struct timeb tstart,tend;
156 long i;
157
158 if (s == START)
159 {
160 ftime(&tstart);
161 return(0);
162 }
163 else
164 {
165 ftime(&tend);
166 i=(long)tend.millitm-(long)tstart.millitm;
167 ret=((double)(tend.time-tstart.time))+((double)i)/1e3;
168 return((ret == 0.0)?1e-6:ret);
169 }
170#endif
171 }
172
173int main(int argc, char **argv)
174 {
175 long count;
176 static unsigned char buf[BUFSIZE];
177 static unsigned char key[] ={
178 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
179 0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10,
180 };
181 CAST_KEY sch;
182 double a,b,c,d;
183#ifndef SIGALRM
184 long ca,cb,cc;
185#endif
186
187#ifndef TIMES
188 printf("To get the most accurate results, try to run this\n");
189 printf("program when this computer is idle.\n");
190#endif
191
192#ifndef SIGALRM
193 printf("First we calculate the approximate speed ...\n");
194 CAST_set_key(&sch,16,key);
195 count=10;
196 do {
197 long i;
198 CAST_LONG data[2];
199
200 count*=2;
201 Time_F(START);
202 for (i=count; i; i--)
203 CAST_encrypt(data,&sch);
204 d=Time_F(STOP);
205 } while (d < 3.0);
206 ca=count/512;
207 cb=count;
208 cc=count*8/BUFSIZE+1;
209 printf("Doing CAST_set_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 CAST_set_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 CAST_set_key(&sch,16,key);
224 CAST_set_key(&sch,16,key);
225 CAST_set_key(&sch,16,key);
226 CAST_set_key(&sch,16,key);
227 }
228 d=Time_F(STOP);
229 printf("%ld cast set_key's in %.2f seconds\n",count,d);
230 a=((double)COUNT(ca))/d;
231
232#ifdef SIGALRM
233 printf("Doing CAST_encrypt's for 10 seconds\n");
234 alarm(10);
235#else
236 printf("Doing CAST_encrypt %ld times\n",cb);
237#endif
238 Time_F(START);
239 for (count=0,run=1; COND(cb); count+=4)
240 {
241 CAST_LONG data[2];
242
243 CAST_encrypt(data,&sch);
244 CAST_encrypt(data,&sch);
245 CAST_encrypt(data,&sch);
246 CAST_encrypt(data,&sch);
247 }
248 d=Time_F(STOP);
249 printf("%ld CAST_encrypt's in %.2f second\n",count,d);
250 b=((double)COUNT(cb)*8)/d;
251
252#ifdef SIGALRM
253 printf("Doing CAST_cbc_encrypt on %ld byte blocks for 10 seconds\n",
254 BUFSIZE);
255 alarm(10);
256#else
257 printf("Doing CAST_cbc_encrypt %ld times on %ld byte blocks\n",cc,
258 BUFSIZE);
259#endif
260 Time_F(START);
261 for (count=0,run=1; COND(cc); count++)
262 CAST_cbc_encrypt(buf,buf,BUFSIZE,&sch,
263 &(key[0]),CAST_ENCRYPT);
264 d=Time_F(STOP);
265 printf("%ld CAST_cbc_encrypt's of %ld byte blocks in %.2f second\n",
266 count,BUFSIZE,d);
267 c=((double)COUNT(cc)*BUFSIZE)/d;
268
269 printf("CAST set_key per sec = %12.2f (%9.3fuS)\n",a,1.0e6/a);
270 printf("CAST raw ecb bytes per sec = %12.2f (%9.3fuS)\n",b,8.0e6/b);
271 printf("CAST cbc bytes per sec = %12.2f (%9.3fuS)\n",c,8.0e6/c);
272 exit(0);
273#if defined(LINT) || defined(OPENSSL_SYS_MSDOS)
274 return(0);
275#endif
276 }
277
diff --git a/src/lib/libcrypto/cast/castopts.c b/src/lib/libcrypto/cast/castopts.c
deleted file mode 100644
index e594577160..0000000000
--- a/src/lib/libcrypto/cast/castopts.c
+++ /dev/null
@@ -1,341 +0,0 @@
1/* crypto/cast/castopts.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/* define PART1, PART2, PART3 or PART4 to build only with a few of the options.
60 * This is for machines with 64k code segment size restrictions. */
61
62#if !defined(OPENSSL_SYS_MSDOS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC))
63#define TIMES
64#endif
65
66#include <stdio.h>
67
68#include <openssl/e_os2.h>
69#include <unistd.h>
70
71#ifndef OPENSSL_SYS_NETWARE
72#include <signal.h>
73#endif
74
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#if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
88#undef TIMES
89#endif
90
91#ifndef TIMES
92#include <sys/timeb.h>
93#endif
94
95#if defined(sun) || defined(__ultrix)
96#define _POSIX_SOURCE
97#include <limits.h>
98#include <sys/param.h>
99#endif
100
101#include <openssl/cast.h>
102
103#define CAST_DEFAULT_OPTIONS
104
105#undef E_CAST
106#define CAST_encrypt CAST_encrypt_normal
107#define CAST_decrypt CAST_decrypt_normal
108#define CAST_cbc_encrypt CAST_cbc_encrypt_normal
109#undef HEADER_CAST_LOCL_H
110#include "c_enc.c"
111
112#define CAST_PTR
113#undef CAST_PTR2
114#undef E_CAST
115#undef CAST_encrypt
116#undef CAST_decrypt
117#undef CAST_cbc_encrypt
118#define CAST_encrypt CAST_encrypt_ptr
119#define CAST_decrypt CAST_decrypt_ptr
120#define CAST_cbc_encrypt CAST_cbc_encrypt_ptr
121#undef HEADER_CAST_LOCL_H
122#include "c_enc.c"
123
124#undef CAST_PTR
125#define CAST_PTR2
126#undef E_CAST
127#undef CAST_encrypt
128#undef CAST_decrypt
129#undef CAST_cbc_encrypt
130#define CAST_encrypt CAST_encrypt_ptr2
131#define CAST_decrypt CAST_decrypt_ptr2
132#define CAST_cbc_encrypt CAST_cbc_encrypt_ptr2
133#undef HEADER_CAST_LOCL_H
134#include "c_enc.c"
135
136/* The following if from times(3) man page. It may need to be changed */
137#ifndef HZ
138# ifndef CLK_TCK
139# ifndef _BSD_CLK_TCK_ /* FreeBSD fix */
140# define HZ 100.0
141# else /* _BSD_CLK_TCK_ */
142# define HZ ((double)_BSD_CLK_TCK_)
143# endif
144# else /* CLK_TCK */
145# define HZ ((double)CLK_TCK)
146# endif
147#endif
148
149#define BUFSIZE ((long)1024)
150long run=0;
151
152double Time_F(int s);
153#ifdef SIGALRM
154#if defined(__STDC__) || defined(sgi)
155#define SIGRETTYPE void
156#else
157#define SIGRETTYPE int
158#endif
159
160SIGRETTYPE sig_done(int sig);
161SIGRETTYPE sig_done(int sig)
162 {
163 signal(SIGALRM,sig_done);
164 run=0;
165#ifdef LINT
166 sig=sig;
167#endif
168 }
169#endif
170
171#define START 0
172#define STOP 1
173
174double Time_F(int s)
175 {
176 double ret;
177#ifdef TIMES
178 static struct tms tstart,tend;
179
180 if (s == START)
181 {
182 times(&tstart);
183 return(0);
184 }
185 else
186 {
187 times(&tend);
188 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ;
189 return((ret == 0.0)?1e-6:ret);
190 }
191#else /* !times() */
192 static struct timeb tstart,tend;
193 long i;
194
195 if (s == START)
196 {
197 ftime(&tstart);
198 return(0);
199 }
200 else
201 {
202 ftime(&tend);
203 i=(long)tend.millitm-(long)tstart.millitm;
204 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
205 return((ret == 0.0)?1e-6:ret);
206 }
207#endif
208 }
209
210#ifdef SIGALRM
211#define print_name(name) fprintf(stderr,"Doing %s's for 10 seconds\n",name); alarm(10);
212#else
213#define print_name(name) fprintf(stderr,"Doing %s %ld times\n",name,cb);
214#endif
215
216#define time_it(func,name,index) \
217 print_name(name); \
218 Time_F(START); \
219 for (count=0,run=1; COND(cb); count+=4) \
220 { \
221 unsigned long d[2]; \
222 func(d,&sch); \
223 func(d,&sch); \
224 func(d,&sch); \
225 func(d,&sch); \
226 } \
227 tm[index]=Time_F(STOP); \
228 fprintf(stderr,"%ld %s's in %.2f second\n",count,name,tm[index]); \
229 tm[index]=((double)COUNT(cb))/tm[index];
230
231#define print_it(name,index) \
232 fprintf(stderr,"%s bytes per sec = %12.2f (%5.1fuS)\n",name, \
233 tm[index]*8,1.0e6/tm[index]);
234
235int main(int argc, char **argv)
236 {
237 long count;
238 static unsigned char buf[BUFSIZE];
239 static char key[16]={ 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
240 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
241 CAST_KEY sch;
242 double d,tm[16],max=0;
243 int rank[16];
244 char *str[16];
245 int max_idx=0,i,num=0,j;
246#ifndef SIGALARM
247 long ca,cb,cc,cd,ce;
248#endif
249
250 for (i=0; i<12; i++)
251 {
252 tm[i]=0.0;
253 rank[i]=0;
254 }
255
256#ifndef TIMES
257 fprintf(stderr,"To get the most accurate results, try to run this\n");
258 fprintf(stderr,"program when this computer is idle.\n");
259#endif
260
261 CAST_set_key(&sch,16,key);
262
263#ifndef SIGALRM
264 fprintf(stderr,"First we calculate the approximate speed ...\n");
265 count=10;
266 do {
267 long i;
268 unsigned long data[2];
269
270 count*=2;
271 Time_F(START);
272 for (i=count; i; i--)
273 CAST_encrypt(data,&sch);
274 d=Time_F(STOP);
275 } while (d < 3.0);
276 ca=count;
277 cb=count*3;
278 cc=count*3*8/BUFSIZE+1;
279 cd=count*8/BUFSIZE+1;
280
281 ce=count/20+1;
282#define COND(d) (count != (d))
283#define COUNT(d) (d)
284#else
285#define COND(c) (run)
286#define COUNT(d) (count)
287 signal(SIGALRM,sig_done);
288 alarm(10);
289#endif
290
291 time_it(CAST_encrypt_normal, "CAST_encrypt_normal ", 0);
292 time_it(CAST_encrypt_ptr, "CAST_encrypt_ptr ", 1);
293 time_it(CAST_encrypt_ptr2, "CAST_encrypt_ptr2 ", 2);
294 num+=3;
295
296 str[0]="<nothing>";
297 print_it("CAST_encrypt_normal ",0);
298 max=tm[0];
299 max_idx=0;
300 str[1]="ptr ";
301 print_it("CAST_encrypt_ptr ",1);
302 if (max < tm[1]) { max=tm[1]; max_idx=1; }
303 str[2]="ptr2 ";
304 print_it("CAST_encrypt_ptr2 ",2);
305 if (max < tm[2]) { max=tm[2]; max_idx=2; }
306
307 printf("options CAST ecb/s\n");
308 printf("%s %12.2f 100.0%%\n",str[max_idx],tm[max_idx]);
309 d=tm[max_idx];
310 tm[max_idx]= -2.0;
311 max= -1.0;
312 for (;;)
313 {
314 for (i=0; i<3; i++)
315 {
316 if (max < tm[i]) { max=tm[i]; j=i; }
317 }
318 if (max < 0.0) break;
319 printf("%s %12.2f %4.1f%%\n",str[j],tm[j],tm[j]/d*100.0);
320 tm[j]= -2.0;
321 max= -1.0;
322 }
323
324 switch (max_idx)
325 {
326 case 0:
327 printf("-DCAST_DEFAULT_OPTIONS\n");
328 break;
329 case 1:
330 printf("-DCAST_PTR\n");
331 break;
332 case 2:
333 printf("-DCAST_PTR2\n");
334 break;
335 }
336 exit(0);
337#if defined(LINT) || defined(OPENSSL_SYS_MSDOS)
338 return(0);
339#endif
340 }
341
diff --git a/src/lib/libssl/src/crypto/cast/cast_spd.c b/src/lib/libssl/src/crypto/cast/cast_spd.c
deleted file mode 100644
index 46eb2ee8cc..0000000000
--- a/src/lib/libssl/src/crypto/cast/cast_spd.c
+++ /dev/null
@@ -1,277 +0,0 @@
1/* crypto/cast/cast_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 <unistd.h>
70
71#ifndef OPENSSL_SYS_NETWARE
72#include <signal.h>
73#endif
74
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#if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
88#undef TIMES
89#endif
90
91#ifndef TIMES
92#include <sys/timeb.h>
93#endif
94
95#if defined(sun) || defined(__ultrix)
96#define _POSIX_SOURCE
97#include <limits.h>
98#include <sys/param.h>
99#endif
100
101#include <openssl/cast.h>
102
103/* The following if from times(3) man page. It may need to be changed */
104#ifndef HZ
105#ifndef CLK_TCK
106#define HZ 100.0
107#else /* CLK_TCK */
108#define HZ ((double)CLK_TCK)
109#endif
110#endif
111
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 {
145 times(&tstart);
146 return(0);
147 }
148 else
149 {
150 times(&tend);
151 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ;
152 return((ret == 0.0)?1e-6:ret);
153 }
154#else /* !times() */
155 static struct timeb tstart,tend;
156 long i;
157
158 if (s == START)
159 {
160 ftime(&tstart);
161 return(0);
162 }
163 else
164 {
165 ftime(&tend);
166 i=(long)tend.millitm-(long)tstart.millitm;
167 ret=((double)(tend.time-tstart.time))+((double)i)/1e3;
168 return((ret == 0.0)?1e-6:ret);
169 }
170#endif
171 }
172
173int main(int argc, char **argv)
174 {
175 long count;
176 static unsigned char buf[BUFSIZE];
177 static unsigned char key[] ={
178 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
179 0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10,
180 };
181 CAST_KEY sch;
182 double a,b,c,d;
183#ifndef SIGALRM
184 long ca,cb,cc;
185#endif
186
187#ifndef TIMES
188 printf("To get the most accurate results, try to run this\n");
189 printf("program when this computer is idle.\n");
190#endif
191
192#ifndef SIGALRM
193 printf("First we calculate the approximate speed ...\n");
194 CAST_set_key(&sch,16,key);
195 count=10;
196 do {
197 long i;
198 CAST_LONG data[2];
199
200 count*=2;
201 Time_F(START);
202 for (i=count; i; i--)
203 CAST_encrypt(data,&sch);
204 d=Time_F(STOP);
205 } while (d < 3.0);
206 ca=count/512;
207 cb=count;
208 cc=count*8/BUFSIZE+1;
209 printf("Doing CAST_set_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 CAST_set_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 CAST_set_key(&sch,16,key);
224 CAST_set_key(&sch,16,key);
225 CAST_set_key(&sch,16,key);
226 CAST_set_key(&sch,16,key);
227 }
228 d=Time_F(STOP);
229 printf("%ld cast set_key's in %.2f seconds\n",count,d);
230 a=((double)COUNT(ca))/d;
231
232#ifdef SIGALRM
233 printf("Doing CAST_encrypt's for 10 seconds\n");
234 alarm(10);
235#else
236 printf("Doing CAST_encrypt %ld times\n",cb);
237#endif
238 Time_F(START);
239 for (count=0,run=1; COND(cb); count+=4)
240 {
241 CAST_LONG data[2];
242
243 CAST_encrypt(data,&sch);
244 CAST_encrypt(data,&sch);
245 CAST_encrypt(data,&sch);
246 CAST_encrypt(data,&sch);
247 }
248 d=Time_F(STOP);
249 printf("%ld CAST_encrypt's in %.2f second\n",count,d);
250 b=((double)COUNT(cb)*8)/d;
251
252#ifdef SIGALRM
253 printf("Doing CAST_cbc_encrypt on %ld byte blocks for 10 seconds\n",
254 BUFSIZE);
255 alarm(10);
256#else
257 printf("Doing CAST_cbc_encrypt %ld times on %ld byte blocks\n",cc,
258 BUFSIZE);
259#endif
260 Time_F(START);
261 for (count=0,run=1; COND(cc); count++)
262 CAST_cbc_encrypt(buf,buf,BUFSIZE,&sch,
263 &(key[0]),CAST_ENCRYPT);
264 d=Time_F(STOP);
265 printf("%ld CAST_cbc_encrypt's of %ld byte blocks in %.2f second\n",
266 count,BUFSIZE,d);
267 c=((double)COUNT(cc)*BUFSIZE)/d;
268
269 printf("CAST set_key per sec = %12.2f (%9.3fuS)\n",a,1.0e6/a);
270 printf("CAST raw ecb bytes per sec = %12.2f (%9.3fuS)\n",b,8.0e6/b);
271 printf("CAST cbc bytes per sec = %12.2f (%9.3fuS)\n",c,8.0e6/c);
272 exit(0);
273#if defined(LINT) || defined(OPENSSL_SYS_MSDOS)
274 return(0);
275#endif
276 }
277
diff --git a/src/lib/libssl/src/crypto/cast/castopts.c b/src/lib/libssl/src/crypto/cast/castopts.c
deleted file mode 100644
index e594577160..0000000000
--- a/src/lib/libssl/src/crypto/cast/castopts.c
+++ /dev/null
@@ -1,341 +0,0 @@
1/* crypto/cast/castopts.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/* define PART1, PART2, PART3 or PART4 to build only with a few of the options.
60 * This is for machines with 64k code segment size restrictions. */
61
62#if !defined(OPENSSL_SYS_MSDOS) && (!defined(OPENSSL_SYS_VMS) || defined(__DECC))
63#define TIMES
64#endif
65
66#include <stdio.h>
67
68#include <openssl/e_os2.h>
69#include <unistd.h>
70
71#ifndef OPENSSL_SYS_NETWARE
72#include <signal.h>
73#endif
74
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#if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
88#undef TIMES
89#endif
90
91#ifndef TIMES
92#include <sys/timeb.h>
93#endif
94
95#if defined(sun) || defined(__ultrix)
96#define _POSIX_SOURCE
97#include <limits.h>
98#include <sys/param.h>
99#endif
100
101#include <openssl/cast.h>
102
103#define CAST_DEFAULT_OPTIONS
104
105#undef E_CAST
106#define CAST_encrypt CAST_encrypt_normal
107#define CAST_decrypt CAST_decrypt_normal
108#define CAST_cbc_encrypt CAST_cbc_encrypt_normal
109#undef HEADER_CAST_LOCL_H
110#include "c_enc.c"
111
112#define CAST_PTR
113#undef CAST_PTR2
114#undef E_CAST
115#undef CAST_encrypt
116#undef CAST_decrypt
117#undef CAST_cbc_encrypt
118#define CAST_encrypt CAST_encrypt_ptr
119#define CAST_decrypt CAST_decrypt_ptr
120#define CAST_cbc_encrypt CAST_cbc_encrypt_ptr
121#undef HEADER_CAST_LOCL_H
122#include "c_enc.c"
123
124#undef CAST_PTR
125#define CAST_PTR2
126#undef E_CAST
127#undef CAST_encrypt
128#undef CAST_decrypt
129#undef CAST_cbc_encrypt
130#define CAST_encrypt CAST_encrypt_ptr2
131#define CAST_decrypt CAST_decrypt_ptr2
132#define CAST_cbc_encrypt CAST_cbc_encrypt_ptr2
133#undef HEADER_CAST_LOCL_H
134#include "c_enc.c"
135
136/* The following if from times(3) man page. It may need to be changed */
137#ifndef HZ
138# ifndef CLK_TCK
139# ifndef _BSD_CLK_TCK_ /* FreeBSD fix */
140# define HZ 100.0
141# else /* _BSD_CLK_TCK_ */
142# define HZ ((double)_BSD_CLK_TCK_)
143# endif
144# else /* CLK_TCK */
145# define HZ ((double)CLK_TCK)
146# endif
147#endif
148
149#define BUFSIZE ((long)1024)
150long run=0;
151
152double Time_F(int s);
153#ifdef SIGALRM
154#if defined(__STDC__) || defined(sgi)
155#define SIGRETTYPE void
156#else
157#define SIGRETTYPE int
158#endif
159
160SIGRETTYPE sig_done(int sig);
161SIGRETTYPE sig_done(int sig)
162 {
163 signal(SIGALRM,sig_done);
164 run=0;
165#ifdef LINT
166 sig=sig;
167#endif
168 }
169#endif
170
171#define START 0
172#define STOP 1
173
174double Time_F(int s)
175 {
176 double ret;
177#ifdef TIMES
178 static struct tms tstart,tend;
179
180 if (s == START)
181 {
182 times(&tstart);
183 return(0);
184 }
185 else
186 {
187 times(&tend);
188 ret=((double)(tend.tms_utime-tstart.tms_utime))/HZ;
189 return((ret == 0.0)?1e-6:ret);
190 }
191#else /* !times() */
192 static struct timeb tstart,tend;
193 long i;
194
195 if (s == START)
196 {
197 ftime(&tstart);
198 return(0);
199 }
200 else
201 {
202 ftime(&tend);
203 i=(long)tend.millitm-(long)tstart.millitm;
204 ret=((double)(tend.time-tstart.time))+((double)i)/1000.0;
205 return((ret == 0.0)?1e-6:ret);
206 }
207#endif
208 }
209
210#ifdef SIGALRM
211#define print_name(name) fprintf(stderr,"Doing %s's for 10 seconds\n",name); alarm(10);
212#else
213#define print_name(name) fprintf(stderr,"Doing %s %ld times\n",name,cb);
214#endif
215
216#define time_it(func,name,index) \
217 print_name(name); \
218 Time_F(START); \
219 for (count=0,run=1; COND(cb); count+=4) \
220 { \
221 unsigned long d[2]; \
222 func(d,&sch); \
223 func(d,&sch); \
224 func(d,&sch); \
225 func(d,&sch); \
226 } \
227 tm[index]=Time_F(STOP); \
228 fprintf(stderr,"%ld %s's in %.2f second\n",count,name,tm[index]); \
229 tm[index]=((double)COUNT(cb))/tm[index];
230
231#define print_it(name,index) \
232 fprintf(stderr,"%s bytes per sec = %12.2f (%5.1fuS)\n",name, \
233 tm[index]*8,1.0e6/tm[index]);
234
235int main(int argc, char **argv)
236 {
237 long count;
238 static unsigned char buf[BUFSIZE];
239 static char key[16]={ 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0,
240 0x12,0x34,0x56,0x78,0x9a,0xbc,0xde,0xf0};
241 CAST_KEY sch;
242 double d,tm[16],max=0;
243 int rank[16];
244 char *str[16];
245 int max_idx=0,i,num=0,j;
246#ifndef SIGALARM
247 long ca,cb,cc,cd,ce;
248#endif
249
250 for (i=0; i<12; i++)
251 {
252 tm[i]=0.0;
253 rank[i]=0;
254 }
255
256#ifndef TIMES
257 fprintf(stderr,"To get the most accurate results, try to run this\n");
258 fprintf(stderr,"program when this computer is idle.\n");
259#endif
260
261 CAST_set_key(&sch,16,key);
262
263#ifndef SIGALRM
264 fprintf(stderr,"First we calculate the approximate speed ...\n");
265 count=10;
266 do {
267 long i;
268 unsigned long data[2];
269
270 count*=2;
271 Time_F(START);
272 for (i=count; i; i--)
273 CAST_encrypt(data,&sch);
274 d=Time_F(STOP);
275 } while (d < 3.0);
276 ca=count;
277 cb=count*3;
278 cc=count*3*8/BUFSIZE+1;
279 cd=count*8/BUFSIZE+1;
280
281 ce=count/20+1;
282#define COND(d) (count != (d))
283#define COUNT(d) (d)
284#else
285#define COND(c) (run)
286#define COUNT(d) (count)
287 signal(SIGALRM,sig_done);
288 alarm(10);
289#endif
290
291 time_it(CAST_encrypt_normal, "CAST_encrypt_normal ", 0);
292 time_it(CAST_encrypt_ptr, "CAST_encrypt_ptr ", 1);
293 time_it(CAST_encrypt_ptr2, "CAST_encrypt_ptr2 ", 2);
294 num+=3;
295
296 str[0]="<nothing>";
297 print_it("CAST_encrypt_normal ",0);
298 max=tm[0];
299 max_idx=0;
300 str[1]="ptr ";
301 print_it("CAST_encrypt_ptr ",1);
302 if (max < tm[1]) { max=tm[1]; max_idx=1; }
303 str[2]="ptr2 ";
304 print_it("CAST_encrypt_ptr2 ",2);
305 if (max < tm[2]) { max=tm[2]; max_idx=2; }
306
307 printf("options CAST ecb/s\n");
308 printf("%s %12.2f 100.0%%\n",str[max_idx],tm[max_idx]);
309 d=tm[max_idx];
310 tm[max_idx]= -2.0;
311 max= -1.0;
312 for (;;)
313 {
314 for (i=0; i<3; i++)
315 {
316 if (max < tm[i]) { max=tm[i]; j=i; }
317 }
318 if (max < 0.0) break;
319 printf("%s %12.2f %4.1f%%\n",str[j],tm[j],tm[j]/d*100.0);
320 tm[j]= -2.0;
321 max= -1.0;
322 }
323
324 switch (max_idx)
325 {
326 case 0:
327 printf("-DCAST_DEFAULT_OPTIONS\n");
328 break;
329 case 1:
330 printf("-DCAST_PTR\n");
331 break;
332 case 2:
333 printf("-DCAST_PTR2\n");
334 break;
335 }
336 exit(0);
337#if defined(LINT) || defined(OPENSSL_SYS_MSDOS)
338 return(0);
339#endif
340 }
341
generated by cgit v1.2.3-55-g6feb (git 2.39.1) at 2025-11-02 19:59:07 +0000