/src/openssl31/crypto/des/xcbc_enc.c
Line | Count | Source (jump to first uncovered line) |
1 | | /* |
2 | | * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved. |
3 | | * |
4 | | * Licensed under the Apache License 2.0 (the "License"). You may not use |
5 | | * this file except in compliance with the License. You can obtain a copy |
6 | | * in the file LICENSE in the source distribution or at |
7 | | * https://www.openssl.org/source/license.html |
8 | | */ |
9 | | |
10 | | /* |
11 | | * DES low level APIs are deprecated for public use, but still ok for internal |
12 | | * use. |
13 | | */ |
14 | | #include "internal/deprecated.h" |
15 | | |
16 | | #include "des_local.h" |
17 | | |
18 | | /* RSA's DESX */ |
19 | | |
20 | | void DES_xcbc_encrypt(const unsigned char *in, unsigned char *out, |
21 | | long length, DES_key_schedule *schedule, |
22 | | DES_cblock *ivec, const_DES_cblock *inw, |
23 | | const_DES_cblock *outw, int enc) |
24 | 0 | { |
25 | 0 | register DES_LONG tin0, tin1; |
26 | 0 | register DES_LONG tout0, tout1, xor0, xor1; |
27 | 0 | register DES_LONG inW0, inW1, outW0, outW1; |
28 | 0 | register const unsigned char *in2; |
29 | 0 | register long l = length; |
30 | 0 | DES_LONG tin[2]; |
31 | 0 | unsigned char *iv; |
32 | |
|
33 | 0 | in2 = &(*inw)[0]; |
34 | 0 | c2l(in2, inW0); |
35 | 0 | c2l(in2, inW1); |
36 | 0 | in2 = &(*outw)[0]; |
37 | 0 | c2l(in2, outW0); |
38 | 0 | c2l(in2, outW1); |
39 | |
|
40 | 0 | iv = &(*ivec)[0]; |
41 | |
|
42 | 0 | if (enc) { |
43 | 0 | c2l(iv, tout0); |
44 | 0 | c2l(iv, tout1); |
45 | 0 | for (l -= 8; l >= 0; l -= 8) { |
46 | 0 | c2l(in, tin0); |
47 | 0 | c2l(in, tin1); |
48 | 0 | tin0 ^= tout0 ^ inW0; |
49 | 0 | tin[0] = tin0; |
50 | 0 | tin1 ^= tout1 ^ inW1; |
51 | 0 | tin[1] = tin1; |
52 | 0 | DES_encrypt1(tin, schedule, DES_ENCRYPT); |
53 | 0 | tout0 = tin[0] ^ outW0; |
54 | 0 | l2c(tout0, out); |
55 | 0 | tout1 = tin[1] ^ outW1; |
56 | 0 | l2c(tout1, out); |
57 | 0 | } |
58 | 0 | if (l != -8) { |
59 | 0 | c2ln(in, tin0, tin1, l + 8); |
60 | 0 | tin0 ^= tout0 ^ inW0; |
61 | 0 | tin[0] = tin0; |
62 | 0 | tin1 ^= tout1 ^ inW1; |
63 | 0 | tin[1] = tin1; |
64 | 0 | DES_encrypt1(tin, schedule, DES_ENCRYPT); |
65 | 0 | tout0 = tin[0] ^ outW0; |
66 | 0 | l2c(tout0, out); |
67 | 0 | tout1 = tin[1] ^ outW1; |
68 | 0 | l2c(tout1, out); |
69 | 0 | } |
70 | 0 | iv = &(*ivec)[0]; |
71 | 0 | l2c(tout0, iv); |
72 | 0 | l2c(tout1, iv); |
73 | 0 | } else { |
74 | 0 | c2l(iv, xor0); |
75 | 0 | c2l(iv, xor1); |
76 | 0 | for (l -= 8; l > 0; l -= 8) { |
77 | 0 | c2l(in, tin0); |
78 | 0 | tin[0] = tin0 ^ outW0; |
79 | 0 | c2l(in, tin1); |
80 | 0 | tin[1] = tin1 ^ outW1; |
81 | 0 | DES_encrypt1(tin, schedule, DES_DECRYPT); |
82 | 0 | tout0 = tin[0] ^ xor0 ^ inW0; |
83 | 0 | tout1 = tin[1] ^ xor1 ^ inW1; |
84 | 0 | l2c(tout0, out); |
85 | 0 | l2c(tout1, out); |
86 | 0 | xor0 = tin0; |
87 | 0 | xor1 = tin1; |
88 | 0 | } |
89 | 0 | if (l != -8) { |
90 | 0 | c2l(in, tin0); |
91 | 0 | tin[0] = tin0 ^ outW0; |
92 | 0 | c2l(in, tin1); |
93 | 0 | tin[1] = tin1 ^ outW1; |
94 | 0 | DES_encrypt1(tin, schedule, DES_DECRYPT); |
95 | 0 | tout0 = tin[0] ^ xor0 ^ inW0; |
96 | 0 | tout1 = tin[1] ^ xor1 ^ inW1; |
97 | 0 | l2cn(tout0, tout1, out, l + 8); |
98 | 0 | xor0 = tin0; |
99 | 0 | xor1 = tin1; |
100 | 0 | } |
101 | |
|
102 | 0 | iv = &(*ivec)[0]; |
103 | 0 | l2c(xor0, iv); |
104 | 0 | l2c(xor1, iv); |
105 | 0 | } |
106 | 0 | tin0 = tin1 = tout0 = tout1 = xor0 = xor1 = 0; |
107 | 0 | inW0 = inW1 = outW0 = outW1 = 0; |
108 | 0 | tin[0] = tin[1] = 0; |
109 | 0 | } |