summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/des/des_enc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libcrypto/des/des_enc.c')
-rw-r--r--src/lib/libcrypto/des/des_enc.c409
1 files changed, 0 insertions, 409 deletions
diff --git a/src/lib/libcrypto/des/des_enc.c b/src/lib/libcrypto/des/des_enc.c
deleted file mode 100644
index 4f09804c44..0000000000
--- a/src/lib/libcrypto/des/des_enc.c
+++ /dev/null
@@ -1,409 +0,0 @@
1/* crypto/des/des_enc.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#include "des_locl.h"
60
61#ifndef OPENBSD_DES_ASM
62void DES_encrypt1(DES_LONG *data, DES_key_schedule *ks, int enc)
63 {
64 register DES_LONG l,r,t,u;
65#ifdef DES_PTR
66 register const unsigned char *des_SP=(const unsigned char *)DES_SPtrans;
67#endif
68#ifndef DES_UNROLL
69 register int i;
70#endif
71 register DES_LONG *s;
72
73 r=data[0];
74 l=data[1];
75
76 IP(r,l);
77 /* Things have been modified so that the initial rotate is
78 * done outside the loop. This required the
79 * DES_SPtrans values in sp.h to be rotated 1 bit to the right.
80 * One perl script later and things have a 5% speed up on a sparc2.
81 * Thanks to Richard Outerbridge <71755.204@CompuServe.COM>
82 * for pointing this out. */
83 /* clear the top bits on machines with 8byte longs */
84 /* shift left by 2 */
85 r=ROTATE(r,29)&0xffffffffL;
86 l=ROTATE(l,29)&0xffffffffL;
87
88 s=ks->ks->deslong;
89 /* I don't know if it is worth the effort of loop unrolling the
90 * inner loop */
91 if (enc)
92 {
93#ifdef DES_UNROLL
94 D_ENCRYPT(l,r, 0); /* 1 */
95 D_ENCRYPT(r,l, 2); /* 2 */
96 D_ENCRYPT(l,r, 4); /* 3 */
97 D_ENCRYPT(r,l, 6); /* 4 */
98 D_ENCRYPT(l,r, 8); /* 5 */
99 D_ENCRYPT(r,l,10); /* 6 */
100 D_ENCRYPT(l,r,12); /* 7 */
101 D_ENCRYPT(r,l,14); /* 8 */
102 D_ENCRYPT(l,r,16); /* 9 */
103 D_ENCRYPT(r,l,18); /* 10 */
104 D_ENCRYPT(l,r,20); /* 11 */
105 D_ENCRYPT(r,l,22); /* 12 */
106 D_ENCRYPT(l,r,24); /* 13 */
107 D_ENCRYPT(r,l,26); /* 14 */
108 D_ENCRYPT(l,r,28); /* 15 */
109 D_ENCRYPT(r,l,30); /* 16 */
110#else
111 for (i=0; i<32; i+=8)
112 {
113 D_ENCRYPT(l,r,i+0); /* 1 */
114 D_ENCRYPT(r,l,i+2); /* 2 */
115 D_ENCRYPT(l,r,i+4); /* 3 */
116 D_ENCRYPT(r,l,i+6); /* 4 */
117 }
118#endif
119 }
120 else
121 {
122#ifdef DES_UNROLL
123 D_ENCRYPT(l,r,30); /* 16 */
124 D_ENCRYPT(r,l,28); /* 15 */
125 D_ENCRYPT(l,r,26); /* 14 */
126 D_ENCRYPT(r,l,24); /* 13 */
127 D_ENCRYPT(l,r,22); /* 12 */
128 D_ENCRYPT(r,l,20); /* 11 */
129 D_ENCRYPT(l,r,18); /* 10 */
130 D_ENCRYPT(r,l,16); /* 9 */
131 D_ENCRYPT(l,r,14); /* 8 */
132 D_ENCRYPT(r,l,12); /* 7 */
133 D_ENCRYPT(l,r,10); /* 6 */
134 D_ENCRYPT(r,l, 8); /* 5 */
135 D_ENCRYPT(l,r, 6); /* 4 */
136 D_ENCRYPT(r,l, 4); /* 3 */
137 D_ENCRYPT(l,r, 2); /* 2 */
138 D_ENCRYPT(r,l, 0); /* 1 */
139#else
140 for (i=30; i>0; i-=8)
141 {
142 D_ENCRYPT(l,r,i-0); /* 16 */
143 D_ENCRYPT(r,l,i-2); /* 15 */
144 D_ENCRYPT(l,r,i-4); /* 14 */
145 D_ENCRYPT(r,l,i-6); /* 13 */
146 }
147#endif
148 }
149
150 /* rotate and clear the top bits on machines with 8byte longs */
151 l=ROTATE(l,3)&0xffffffffL;
152 r=ROTATE(r,3)&0xffffffffL;
153
154 FP(r,l);
155 data[0]=l;
156 data[1]=r;
157 l=r=t=u=0;
158 }
159
160void DES_encrypt2(DES_LONG *data, DES_key_schedule *ks, int enc)
161 {
162 register DES_LONG l,r,t,u;
163#ifdef DES_PTR
164 register const unsigned char *des_SP=(const unsigned char *)DES_SPtrans;
165#endif
166#ifndef DES_UNROLL
167 register int i;
168#endif
169 register DES_LONG *s;
170
171 r=data[0];
172 l=data[1];
173
174 /* Things have been modified so that the initial rotate is
175 * done outside the loop. This required the
176 * DES_SPtrans values in sp.h to be rotated 1 bit to the right.
177 * One perl script later and things have a 5% speed up on a sparc2.
178 * Thanks to Richard Outerbridge <71755.204@CompuServe.COM>
179 * for pointing this out. */
180 /* clear the top bits on machines with 8byte longs */
181 r=ROTATE(r,29)&0xffffffffL;
182 l=ROTATE(l,29)&0xffffffffL;
183
184 s=ks->ks->deslong;
185 /* I don't know if it is worth the effort of loop unrolling the
186 * inner loop */
187 if (enc)
188 {
189#ifdef DES_UNROLL
190 D_ENCRYPT(l,r, 0); /* 1 */
191 D_ENCRYPT(r,l, 2); /* 2 */
192 D_ENCRYPT(l,r, 4); /* 3 */
193 D_ENCRYPT(r,l, 6); /* 4 */
194 D_ENCRYPT(l,r, 8); /* 5 */
195 D_ENCRYPT(r,l,10); /* 6 */
196 D_ENCRYPT(l,r,12); /* 7 */
197 D_ENCRYPT(r,l,14); /* 8 */
198 D_ENCRYPT(l,r,16); /* 9 */
199 D_ENCRYPT(r,l,18); /* 10 */
200 D_ENCRYPT(l,r,20); /* 11 */
201 D_ENCRYPT(r,l,22); /* 12 */
202 D_ENCRYPT(l,r,24); /* 13 */
203 D_ENCRYPT(r,l,26); /* 14 */
204 D_ENCRYPT(l,r,28); /* 15 */
205 D_ENCRYPT(r,l,30); /* 16 */
206#else
207 for (i=0; i<32; i+=8)
208 {
209 D_ENCRYPT(l,r,i+0); /* 1 */
210 D_ENCRYPT(r,l,i+2); /* 2 */
211 D_ENCRYPT(l,r,i+4); /* 3 */
212 D_ENCRYPT(r,l,i+6); /* 4 */
213 }
214#endif
215 }
216 else
217 {
218#ifdef DES_UNROLL
219 D_ENCRYPT(l,r,30); /* 16 */
220 D_ENCRYPT(r,l,28); /* 15 */
221 D_ENCRYPT(l,r,26); /* 14 */
222 D_ENCRYPT(r,l,24); /* 13 */
223 D_ENCRYPT(l,r,22); /* 12 */
224 D_ENCRYPT(r,l,20); /* 11 */
225 D_ENCRYPT(l,r,18); /* 10 */
226 D_ENCRYPT(r,l,16); /* 9 */
227 D_ENCRYPT(l,r,14); /* 8 */
228 D_ENCRYPT(r,l,12); /* 7 */
229 D_ENCRYPT(l,r,10); /* 6 */
230 D_ENCRYPT(r,l, 8); /* 5 */
231 D_ENCRYPT(l,r, 6); /* 4 */
232 D_ENCRYPT(r,l, 4); /* 3 */
233 D_ENCRYPT(l,r, 2); /* 2 */
234 D_ENCRYPT(r,l, 0); /* 1 */
235#else
236 for (i=30; i>0; i-=8)
237 {
238 D_ENCRYPT(l,r,i-0); /* 16 */
239 D_ENCRYPT(r,l,i-2); /* 15 */
240 D_ENCRYPT(l,r,i-4); /* 14 */
241 D_ENCRYPT(r,l,i-6); /* 13 */
242 }
243#endif
244 }
245 /* rotate and clear the top bits on machines with 8byte longs */
246 data[0]=ROTATE(l,3)&0xffffffffL;
247 data[1]=ROTATE(r,3)&0xffffffffL;
248 l=r=t=u=0;
249 }
250#endif
251
252void DES_encrypt3(DES_LONG *data, DES_key_schedule *ks1,
253 DES_key_schedule *ks2, DES_key_schedule *ks3)
254 {
255 register DES_LONG l,r;
256
257 l=data[0];
258 r=data[1];
259 IP(l,r);
260 data[0]=l;
261 data[1]=r;
262 DES_encrypt2((DES_LONG *)data,ks1,DES_ENCRYPT);
263 DES_encrypt2((DES_LONG *)data,ks2,DES_DECRYPT);
264 DES_encrypt2((DES_LONG *)data,ks3,DES_ENCRYPT);
265 l=data[0];
266 r=data[1];
267 FP(r,l);
268 data[0]=l;
269 data[1]=r;
270 }
271
272void DES_decrypt3(DES_LONG *data, DES_key_schedule *ks1,
273 DES_key_schedule *ks2, DES_key_schedule *ks3)
274 {
275 register DES_LONG l,r;
276
277 l=data[0];
278 r=data[1];
279 IP(l,r);
280 data[0]=l;
281 data[1]=r;
282 DES_encrypt2((DES_LONG *)data,ks3,DES_DECRYPT);
283 DES_encrypt2((DES_LONG *)data,ks2,DES_ENCRYPT);
284 DES_encrypt2((DES_LONG *)data,ks1,DES_DECRYPT);
285 l=data[0];
286 r=data[1];
287 FP(r,l);
288 data[0]=l;
289 data[1]=r;
290 }
291
292#ifndef DES_DEFAULT_OPTIONS
293
294#undef CBC_ENC_C__DONT_UPDATE_IV
295#include "ncbc_enc.c" /* DES_ncbc_encrypt */
296
297void DES_ede3_cbc_encrypt(const unsigned char *input, unsigned char *output,
298 long length, DES_key_schedule *ks1,
299 DES_key_schedule *ks2, DES_key_schedule *ks3,
300 DES_cblock *ivec, int enc)
301 {
302 register DES_LONG tin0,tin1;
303 register DES_LONG tout0,tout1,xor0,xor1;
304 register const unsigned char *in;
305 unsigned char *out;
306 register long l=length;
307 DES_LONG tin[2];
308 unsigned char *iv;
309
310 in=input;
311 out=output;
312 iv = &(*ivec)[0];
313
314 if (enc)
315 {
316 c2l(iv,tout0);
317 c2l(iv,tout1);
318 for (l-=8; l>=0; l-=8)
319 {
320 c2l(in,tin0);
321 c2l(in,tin1);
322 tin0^=tout0;
323 tin1^=tout1;
324
325 tin[0]=tin0;
326 tin[1]=tin1;
327 DES_encrypt3((DES_LONG *)tin,ks1,ks2,ks3);
328 tout0=tin[0];
329 tout1=tin[1];
330
331 l2c(tout0,out);
332 l2c(tout1,out);
333 }
334 if (l != -8)
335 {
336 c2ln(in,tin0,tin1,l+8);
337 tin0^=tout0;
338 tin1^=tout1;
339
340 tin[0]=tin0;
341 tin[1]=tin1;
342 DES_encrypt3((DES_LONG *)tin,ks1,ks2,ks3);
343 tout0=tin[0];
344 tout1=tin[1];
345
346 l2c(tout0,out);
347 l2c(tout1,out);
348 }
349 iv = &(*ivec)[0];
350 l2c(tout0,iv);
351 l2c(tout1,iv);
352 }
353 else
354 {
355 register DES_LONG t0,t1;
356
357 c2l(iv,xor0);
358 c2l(iv,xor1);
359 for (l-=8; l>=0; l-=8)
360 {
361 c2l(in,tin0);
362 c2l(in,tin1);
363
364 t0=tin0;
365 t1=tin1;
366
367 tin[0]=tin0;
368 tin[1]=tin1;
369 DES_decrypt3((DES_LONG *)tin,ks1,ks2,ks3);
370 tout0=tin[0];
371 tout1=tin[1];
372
373 tout0^=xor0;
374 tout1^=xor1;
375 l2c(tout0,out);
376 l2c(tout1,out);
377 xor0=t0;
378 xor1=t1;
379 }
380 if (l != -8)
381 {
382 c2l(in,tin0);
383 c2l(in,tin1);
384
385 t0=tin0;
386 t1=tin1;
387
388 tin[0]=tin0;
389 tin[1]=tin1;
390 DES_decrypt3((DES_LONG *)tin,ks1,ks2,ks3);
391 tout0=tin[0];
392 tout1=tin[1];
393
394 tout0^=xor0;
395 tout1^=xor1;
396 l2cn(tout0,tout1,out,l+8);
397 xor0=t0;
398 xor1=t1;
399 }
400
401 iv = &(*ivec)[0];
402 l2c(xor0,iv);
403 l2c(xor1,iv);
404 }
405 tin0=tin1=tout0=tout1=xor0=xor1=0;
406 tin[0]=tin[1]=0;
407 }
408
409#endif /* DES_DEFAULT_OPTIONS */
generated by cgit v1.2.3-55-g6feb (git 2.39.1) at 2025-03-22 17:14:08 +0000