11#include <botan/internal/des.h>
13#include <botan/internal/loadstor.h>
14#include <botan/internal/rotate.h>
34alignas(256)
const uint8_t SPBOX_CATS[64 * 8] = {
35 0x54, 0x00, 0x10, 0x55, 0x51, 0x15, 0x01, 0x10, 0x04, 0x54, 0x55, 0x04, 0x45, 0x51, 0x40, 0x01,
36 0x05, 0x44, 0x44, 0x14, 0x14, 0x50, 0x50, 0x45, 0x11, 0x41, 0x41, 0x11, 0x00, 0x05, 0x15, 0x40,
37 0x10, 0x55, 0x01, 0x50, 0x54, 0x40, 0x40, 0x04, 0x51, 0x10, 0x14, 0x41, 0x04, 0x01, 0x45, 0x15,
38 0x55, 0x11, 0x50, 0x45, 0x41, 0x05, 0x15, 0x54, 0x05, 0x44, 0x44, 0x00, 0x11, 0x14, 0x00, 0x51,
40 0x55, 0x44, 0x04, 0x15, 0x10, 0x01, 0x51, 0x45, 0x41, 0x55, 0x54, 0x40, 0x44, 0x10, 0x01, 0x51,
41 0x14, 0x11, 0x45, 0x00, 0x40, 0x04, 0x15, 0x50, 0x11, 0x41, 0x00, 0x14, 0x05, 0x54, 0x50, 0x05,
42 0x00, 0x15, 0x51, 0x10, 0x45, 0x50, 0x54, 0x04, 0x50, 0x44, 0x01, 0x55, 0x15, 0x01, 0x04, 0x40,
43 0x05, 0x54, 0x10, 0x41, 0x11, 0x45, 0x41, 0x11, 0x14, 0x00, 0x44, 0x05, 0x40, 0x51, 0x55, 0x14,
45 0x09, 0xA8, 0x00, 0xA1, 0x88, 0x00, 0x29, 0x88, 0x21, 0x81, 0x81, 0x20, 0xA9, 0x21, 0xA0, 0x09,
46 0x80, 0x01, 0xA8, 0x08, 0x28, 0xA0, 0xA1, 0x29, 0x89, 0x28, 0x20, 0x89, 0x01, 0xA9, 0x08, 0x80,
47 0xA8, 0x80, 0x21, 0x09, 0x20, 0xA8, 0x88, 0x00, 0x08, 0x21, 0xA9, 0x88, 0x81, 0x08, 0x00, 0xA1,
48 0x89, 0x20, 0x80, 0xA9, 0x01, 0x29, 0x28, 0x81, 0xA0, 0x89, 0x09, 0xA0, 0x29, 0x01, 0xA1, 0x28,
50 0x51, 0x15, 0x15, 0x04, 0x54, 0x45, 0x41, 0x11, 0x00, 0x50, 0x50, 0x55, 0x05, 0x00, 0x44, 0x41,
51 0x01, 0x10, 0x40, 0x51, 0x04, 0x40, 0x11, 0x14, 0x45, 0x01, 0x14, 0x44, 0x10, 0x54, 0x55, 0x05,
52 0x44, 0x41, 0x50, 0x55, 0x05, 0x00, 0x00, 0x50, 0x14, 0x44, 0x45, 0x01, 0x51, 0x15, 0x15, 0x04,
53 0x55, 0x05, 0x01, 0x10, 0x41, 0x11, 0x54, 0x45, 0x11, 0x14, 0x40, 0x51, 0x04, 0x40, 0x10, 0x54,
55 0x01, 0x29, 0x28, 0xA1, 0x08, 0x01, 0x80, 0x28, 0x89, 0x08, 0x21, 0x89, 0xA1, 0xA8, 0x09, 0x80,
56 0x20, 0x88, 0x88, 0x00, 0x81, 0xA9, 0xA9, 0x21, 0xA8, 0x81, 0x00, 0xA0, 0x29, 0x20, 0xA0, 0x09,
57 0x08, 0xA1, 0x01, 0x20, 0x80, 0x28, 0xA1, 0x89, 0x21, 0x80, 0xA8, 0x29, 0x89, 0x01, 0x20, 0xA8,
58 0xA9, 0x09, 0xA0, 0xA9, 0x28, 0x00, 0x88, 0xA0, 0x09, 0x21, 0x81, 0x08, 0x00, 0x88, 0x29, 0x81,
60 0x41, 0x50, 0x04, 0x55, 0x50, 0x01, 0x55, 0x10, 0x44, 0x15, 0x10, 0x41, 0x11, 0x44, 0x40, 0x05,
61 0x00, 0x11, 0x45, 0x04, 0x14, 0x45, 0x01, 0x51, 0x51, 0x00, 0x15, 0x54, 0x05, 0x14, 0x54, 0x40,
62 0x44, 0x01, 0x51, 0x14, 0x55, 0x10, 0x05, 0x41, 0x10, 0x44, 0x40, 0x05, 0x41, 0x55, 0x14, 0x50,
63 0x15, 0x54, 0x00, 0x51, 0x01, 0x04, 0x50, 0x15, 0x04, 0x11, 0x45, 0x00, 0x54, 0x40, 0x11, 0x45,
65 0x10, 0x51, 0x45, 0x00, 0x04, 0x45, 0x15, 0x54, 0x55, 0x10, 0x00, 0x41, 0x01, 0x40, 0x51, 0x05,
66 0x44, 0x15, 0x11, 0x44, 0x41, 0x50, 0x54, 0x11, 0x50, 0x04, 0x05, 0x55, 0x14, 0x01, 0x40, 0x14,
67 0x40, 0x14, 0x10, 0x45, 0x45, 0x51, 0x51, 0x01, 0x11, 0x40, 0x44, 0x10, 0x54, 0x05, 0x15, 0x54,
68 0x05, 0x41, 0x55, 0x50, 0x14, 0x00, 0x01, 0x55, 0x00, 0x15, 0x50, 0x04, 0x41, 0x44, 0x04, 0x11,
70 0x89, 0x08, 0x20, 0xA9, 0x80, 0x89, 0x01, 0x80, 0x21, 0xA0, 0xA9, 0x28, 0xA8, 0x29, 0x08, 0x01,
71 0xA0, 0x81, 0x88, 0x09, 0x28, 0x21, 0xA1, 0xA8, 0x09, 0x00, 0x00, 0xA1, 0x81, 0x88, 0x29, 0x20,
72 0x29, 0x20, 0xa8, 0x08, 0x01, 0xA1, 0x08, 0x29, 0x88, 0x01, 0x81, 0xA0, 0xA1, 0x80, 0x20, 0x89,
73 0x00, 0xA9, 0x21, 0x81, 0xA0, 0x88, 0x89, 0x00, 0xA9, 0x28, 0x28, 0x09, 0x09, 0x21, 0x80, 0xA8,
76const uint32_t SPBOX_CAT_0_MUL = 0x70041106;
77const uint32_t SPBOX_CAT_1_MUL = 0x02012020;
78const uint32_t SPBOX_CAT_2_MUL = 0x00901048;
79const uint32_t SPBOX_CAT_3_MUL = 0x8e060221;
80const uint32_t SPBOX_CAT_4_MUL = 0x00912140;
81const uint32_t SPBOX_CAT_5_MUL = 0x80841018;
82const uint32_t SPBOX_CAT_6_MUL = 0xe0120202;
83const uint32_t SPBOX_CAT_7_MUL = 0x00212240;
85const uint32_t SPBOX_CAT_0_MASK = 0x01010404;
86const uint32_t SPBOX_CAT_1_MASK = 0x80108020;
87const uint32_t SPBOX_CAT_2_MASK = 0x08020208;
88const uint32_t SPBOX_CAT_3_MASK = 0x00802081;
89const uint32_t SPBOX_CAT_4_MASK = 0x42080100;
90const uint32_t SPBOX_CAT_5_MASK = 0x20404010;
91const uint32_t SPBOX_CAT_6_MASK = 0x04200802;
92const uint32_t SPBOX_CAT_7_MASK = 0x10041040;
97void des_key_schedule(std::span<uint32_t, 32> round_key,
const uint8_t key[8]) {
98 static const uint8_t ROT[16] = {1, 1, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 1};
100 uint32_t C = ((key[7] & 0x80) << 20) | ((key[6] & 0x80) << 19) | ((key[5] & 0x80) << 18) | ((key[4] & 0x80) << 17) |
101 ((key[3] & 0x80) << 16) | ((key[2] & 0x80) << 15) | ((key[1] & 0x80) << 14) | ((key[0] & 0x80) << 13) |
102 ((key[7] & 0x40) << 13) | ((key[6] & 0x40) << 12) | ((key[5] & 0x40) << 11) | ((key[4] & 0x40) << 10) |
103 ((key[3] & 0x40) << 9) | ((key[2] & 0x40) << 8) | ((key[1] & 0x40) << 7) | ((key[0] & 0x40) << 6) |
104 ((key[7] & 0x20) << 6) | ((key[6] & 0x20) << 5) | ((key[5] & 0x20) << 4) | ((key[4] & 0x20) << 3) |
105 ((key[3] & 0x20) << 2) | ((key[2] & 0x20) << 1) | ((key[1] & 0x20)) | ((key[0] & 0x20) >> 1) |
106 ((key[7] & 0x10) >> 1) | ((key[6] & 0x10) >> 2) | ((key[5] & 0x10) >> 3) | ((key[4] & 0x10) >> 4);
107 uint32_t D = ((key[7] & 0x02) << 26) | ((key[6] & 0x02) << 25) | ((key[5] & 0x02) << 24) | ((key[4] & 0x02) << 23) |
108 ((key[3] & 0x02) << 22) | ((key[2] & 0x02) << 21) | ((key[1] & 0x02) << 20) | ((key[0] & 0x02) << 19) |
109 ((key[7] & 0x04) << 17) | ((key[6] & 0x04) << 16) | ((key[5] & 0x04) << 15) | ((key[4] & 0x04) << 14) |
110 ((key[3] & 0x04) << 13) | ((key[2] & 0x04) << 12) | ((key[1] & 0x04) << 11) | ((key[0] & 0x04) << 10) |
111 ((key[7] & 0x08) << 8) | ((key[6] & 0x08) << 7) | ((key[5] & 0x08) << 6) | ((key[4] & 0x08) << 5) |
112 ((key[3] & 0x08) << 4) | ((key[2] & 0x08) << 3) | ((key[1] & 0x08) << 2) | ((key[0] & 0x08) << 1) |
113 ((key[3] & 0x10) >> 1) | ((key[2] & 0x10) >> 2) | ((key[1] & 0x10) >> 3) | ((key[0] & 0x10) >> 4);
115 for(
size_t i = 0; i != 16; ++i) {
116 C = ((C << ROT[i]) | (C >> (28 - ROT[i]))) & 0x0FFFFFFF;
117 D = ((D << ROT[i]) | (D >> (28 - ROT[i]))) & 0x0FFFFFFF;
118 round_key[2 * i] = ((C & 0x00000010) << 22) | ((C & 0x00000800) << 17) | ((C & 0x00000020) << 16) |
119 ((C & 0x00004004) << 15) | ((C & 0x00000200) << 11) | ((C & 0x00020000) << 10) |
120 ((C & 0x01000000) >> 6) | ((C & 0x00100000) >> 4) | ((C & 0x00010000) << 3) |
121 ((C & 0x08000000) >> 2) | ((C & 0x00800000) << 1) | ((D & 0x00000010) << 8) |
122 ((D & 0x00000002) << 7) | ((D & 0x00000001) << 2) | ((D & 0x00000200)) |
123 ((D & 0x00008000) >> 2) | ((D & 0x00000088) >> 3) | ((D & 0x00001000) >> 7) |
124 ((D & 0x00080000) >> 9) | ((D & 0x02020000) >> 14) | ((D & 0x00400000) >> 21);
125 round_key[2 * i + 1] =
126 ((C & 0x00000001) << 28) | ((C & 0x00000082) << 18) | ((C & 0x00002000) << 14) | ((C & 0x00000100) << 10) |
127 ((C & 0x00001000) << 9) | ((C & 0x00040000) << 6) | ((C & 0x02400000) << 4) | ((C & 0x00008000) << 2) |
128 ((C & 0x00200000) >> 1) | ((C & 0x04000000) >> 10) | ((D & 0x00000020) << 6) | ((D & 0x00000100)) |
129 ((D & 0x00000800) >> 1) | ((D & 0x00000040) >> 3) | ((D & 0x00010000) >> 4) | ((D & 0x00000400) >> 5) |
130 ((D & 0x00004000) >> 10) | ((D & 0x04000000) >> 13) | ((D & 0x00800000) >> 14) | ((D & 0x00100000) >> 18) |
131 ((D & 0x01000000) >> 24) | ((D & 0x08000000) >> 26);
135inline uint32_t spbox(uint32_t T0, uint32_t T1) {
136 return ((SPBOX_CATS[0 * 64 + ((T0 >> 24) & 0x3F)] * SPBOX_CAT_0_MUL) & SPBOX_CAT_0_MASK) ^
137 ((SPBOX_CATS[1 * 64 + ((T1 >> 24) & 0x3F)] * SPBOX_CAT_1_MUL) & SPBOX_CAT_1_MASK) ^
138 ((SPBOX_CATS[2 * 64 + ((T0 >> 16) & 0x3F)] * SPBOX_CAT_2_MUL) & SPBOX_CAT_2_MASK) ^
139 ((SPBOX_CATS[3 * 64 + ((T1 >> 16) & 0x3F)] * SPBOX_CAT_3_MUL) & SPBOX_CAT_3_MASK) ^
140 ((SPBOX_CATS[4 * 64 + ((T0 >> 8) & 0x3F)] * SPBOX_CAT_4_MUL) & SPBOX_CAT_4_MASK) ^
141 ((SPBOX_CATS[5 * 64 + ((T1 >> 8) & 0x3F)] * SPBOX_CAT_5_MUL) & SPBOX_CAT_5_MASK) ^
142 ((SPBOX_CATS[6 * 64 + ((T0 >> 0) & 0x3F)] * SPBOX_CAT_6_MUL) & SPBOX_CAT_6_MASK) ^
143 ((SPBOX_CATS[7 * 64 + ((T1 >> 0) & 0x3F)] * SPBOX_CAT_7_MUL) & SPBOX_CAT_7_MASK);
149inline void des_encrypt(uint32_t& Lr, uint32_t& Rr, std::span<const uint32_t, 32> round_key) {
152 for(
size_t i = 0; i != 16; i += 2) {
153 L ^= spbox(
rotr<4>(R) ^ round_key[2 * i], R ^ round_key[2 * i + 1]);
154 R ^= spbox(
rotr<4>(L) ^ round_key[2 * i + 2], L ^ round_key[2 * i + 3]);
161inline void des_encrypt_x2(
162 uint32_t& L0r, uint32_t& R0r, uint32_t& L1r, uint32_t& R1r, std::span<const uint32_t, 32> round_key) {
168 for(
size_t i = 0; i != 16; i += 2) {
169 L0 ^= spbox(
rotr<4>(R0) ^ round_key[2 * i], R0 ^ round_key[2 * i + 1]);
170 L1 ^= spbox(
rotr<4>(R1) ^ round_key[2 * i], R1 ^ round_key[2 * i + 1]);
172 R0 ^= spbox(
rotr<4>(L0) ^ round_key[2 * i + 2], L0 ^ round_key[2 * i + 3]);
173 R1 ^= spbox(
rotr<4>(L1) ^ round_key[2 * i + 2], L1 ^ round_key[2 * i + 3]);
185inline void des_decrypt(uint32_t& Lr, uint32_t& Rr, std::span<const uint32_t, 32> round_key) {
188 for(
size_t i = 16; i != 0; i -= 2) {
189 L ^= spbox(
rotr<4>(R) ^ round_key[2 * i - 2], R ^ round_key[2 * i - 1]);
190 R ^= spbox(
rotr<4>(L) ^ round_key[2 * i - 4], L ^ round_key[2 * i - 3]);
196inline void des_decrypt_x2(
197 uint32_t& L0r, uint32_t& R0r, uint32_t& L1r, uint32_t& R1r, std::span<const uint32_t, 32> round_key) {
203 for(
size_t i = 16; i != 0; i -= 2) {
204 L0 ^= spbox(
rotr<4>(R0) ^ round_key[2 * i - 2], R0 ^ round_key[2 * i - 1]);
205 L1 ^= spbox(
rotr<4>(R1) ^ round_key[2 * i - 2], R1 ^ round_key[2 * i - 1]);
207 R0 ^= spbox(
rotr<4>(L0) ^ round_key[2 * i - 4], L0 ^ round_key[2 * i - 3]);
208 R1 ^= spbox(
rotr<4>(L1) ^ round_key[2 * i - 4], L1 ^ round_key[2 * i - 3]);
217inline void des_IP(uint32_t& L, uint32_t& R) {
220 uint32_t T = (L ^ R) & 0xF0F0F0F0;
223 T = (L ^ R) & 0xFFFF0000;
226 T = (L ^ R) & 0x33333333;
229 T = (L ^ R) & 0x00FF00FF;
232 T = (L ^ R) & 0xAAAAAAAA;
237inline void des_FP(uint32_t& L, uint32_t& R) {
241 uint32_t T = (L ^ R) & 0xAAAAAAAA;
244 T = (L ^ R) & 0x00FF00FF;
247 T = (L ^ R) & 0x33333333;
250 T = (L ^ R) & 0xFFFF0000;
253 T = (L ^ R) & 0xF0F0F0F0;
275 des_encrypt_x2(L0, R0, L1, R1, std::span<const uint32_t, 32>{m_round_key});
291 des_encrypt(L0, R0, std::span<const uint32_t, 32>{m_round_key});
307 const auto KS = std::span<const uint32_t, 32>{m_round_key};
318 des_decrypt_x2(L0, R0, L1, R1, KS);
334 des_decrypt(L0, R0, KS);
345 return !m_round_key.empty();
351void DES::key_schedule(std::span<const uint8_t> key) {
352 m_round_key.resize(32);
353 const auto KS = std::span<uint32_t, 32>{m_round_key};
354 des_key_schedule(KS, key.data());
367 const auto KS = std::span<const uint32_t, 3 * 32>{m_round_key};
368 const auto K1 = KS.subspan<0, 32>();
369 const auto K2 = KS.subspan<32, 32>();
370 const auto K3 = KS.subspan<64, 32>();
381 des_encrypt_x2(L0, R0, L1, R1, K1);
382 des_decrypt_x2(R0, L0, R1, L1, K2);
383 des_encrypt_x2(L0, R0, L1, R1, K3);
400 des_encrypt(L0, R0, K1);
401 des_decrypt(R0, L0, K2);
402 des_encrypt(L0, R0, K3);
419 const auto KS = std::span<const uint32_t, 3 * 32>{m_round_key};
420 const auto K1 = KS.subspan<0, 32>();
421 const auto K2 = KS.subspan<32, 32>();
422 const auto K3 = KS.subspan<64, 32>();
433 des_decrypt_x2(L0, R0, L1, R1, K3);
434 des_encrypt_x2(R0, L0, R1, L1, K2);
435 des_decrypt_x2(L0, R0, L1, R1, K1);
452 des_decrypt(L0, R0, K3);
453 des_encrypt(R0, L0, K2);
454 des_decrypt(L0, R0, K1);
466 return !m_round_key.empty();
472void TripleDES::key_schedule(std::span<const uint8_t> key) {
473 m_round_key.resize(3 * 32);
475 auto KS = std::span<uint32_t, 3 * 32>{m_round_key};
476 auto K1 = KS.subspan<0, 32>();
477 auto K2 = KS.subspan<32, 32>();
478 auto K3 = KS.subspan<64, 32>();
480 des_key_schedule(K1, key.first(8).data());
481 des_key_schedule(K2, key.subspan(8, 8).data());
483 if(key.size() == 24) {
484 des_key_schedule(K3, key.last(8).data());
void encrypt_n(const uint8_t in[], uint8_t out[], size_t blocks) const override
void decrypt_n(const uint8_t in[], uint8_t out[], size_t blocks) const override
bool has_keying_material() const override
void assert_key_material_set() const
void decrypt_n(const uint8_t in[], uint8_t out[], size_t blocks) const override
bool has_keying_material() const override
void encrypt_n(const uint8_t in[], uint8_t out[], size_t blocks) const override
constexpr void copy_mem(T *out, const T *in, size_t n)
void zap(std::vector< T, Alloc > &vec)
BOTAN_FORCE_INLINE constexpr T rotr(T input)
BOTAN_FORCE_INLINE constexpr T rotl(T input)
constexpr auto store_be(ParamTs &&... params)
constexpr auto load_be(ParamTs &&... params)