Crypto++ 8.9
Free C++ class library of cryptographic schemes
hight.cpp
1// lea.cpp - written and placed in the public domain by Kim Sung Hee and Jeffrey Walton
2// Based on "HIGHT: A 128-Bit Block Cipher for Fast Encryption on Common
3// Processors" by Deukjo Hong, Jung-Keun Lee, Dong-Chan Kim, Daesung Kwon,
4// Kwon Ho Ryu, and Dong-Geon Lee.
5//
6// This implementation is based on source files found in a zip file at the
7// Korea Internet and Security Agency (https://www.kisa.or.kr/eng/main.jsp).
8// The zip files was downloaded from the Korean language area of the site so we
9// don't have a url or english zip filename to cite. The source filename from
10// the zip is KISA_HIGHT_ECB.c.
11
12#include "pch.h"
13#include "config.h"
14
15#include "hight.h"
16#include "misc.h"
17
18ANONYMOUS_NAMESPACE_BEGIN
19
20using CryptoPP::byte;
21
22const byte DELTA[128] = {
23 0x5A,0x6D,0x36,0x1B,0x0D,0x06,0x03,0x41,
24 0x60,0x30,0x18,0x4C,0x66,0x33,0x59,0x2C,
25 0x56,0x2B,0x15,0x4A,0x65,0x72,0x39,0x1C,
26 0x4E,0x67,0x73,0x79,0x3C,0x5E,0x6F,0x37,
27 0x5B,0x2D,0x16,0x0B,0x05,0x42,0x21,0x50,
28 0x28,0x54,0x2A,0x55,0x6A,0x75,0x7A,0x7D,
29 0x3E,0x5F,0x2F,0x17,0x4B,0x25,0x52,0x29,
30 0x14,0x0A,0x45,0x62,0x31,0x58,0x6C,0x76,
31 0x3B,0x1D,0x0E,0x47,0x63,0x71,0x78,0x7C,
32 0x7E,0x7F,0x3F,0x1F,0x0F,0x07,0x43,0x61,
33 0x70,0x38,0x5C,0x6E,0x77,0x7B,0x3D,0x1E,
34 0x4F,0x27,0x53,0x69,0x34,0x1A,0x4D,0x26,
35 0x13,0x49,0x24,0x12,0x09,0x04,0x02,0x01,
36 0x40,0x20,0x10,0x08,0x44,0x22,0x11,0x48,
37 0x64,0x32,0x19,0x0C,0x46,0x23,0x51,0x68,
38 0x74,0x3A,0x5D,0x2E,0x57,0x6B,0x35,0x5A
39};
40
41const byte HIGHT_F0[256] = {
42 0x00,0x86,0x0D,0x8B,0x1A,0x9C,0x17,0x91,
43 0x34,0xB2,0x39,0xBF,0x2E,0xA8,0x23,0xA5,
44 0x68,0xEE,0x65,0xE3,0x72,0xF4,0x7F,0xF9,
45 0x5C,0xDA,0x51,0xD7,0x46,0xC0,0x4B,0xCD,
46 0xD0,0x56,0xDD,0x5B,0xCA,0x4C,0xC7,0x41,
47 0xE4,0x62,0xE9,0x6F,0xFE,0x78,0xF3,0x75,
48 0xB8,0x3E,0xB5,0x33,0xA2,0x24,0xAF,0x29,
49 0x8C,0x0A,0x81,0x07,0x96,0x10,0x9B,0x1D,
50 0xA1,0x27,0xAC,0x2A,0xBB,0x3D,0xB6,0x30,
51 0x95,0x13,0x98,0x1E,0x8F,0x09,0x82,0x04,
52 0xC9,0x4F,0xC4,0x42,0xD3,0x55,0xDE,0x58,
53 0xFD,0x7B,0xF0,0x76,0xE7,0x61,0xEA,0x6C,
54 0x71,0xF7,0x7C,0xFA,0x6B,0xED,0x66,0xE0,
55 0x45,0xC3,0x48,0xCE,0x5F,0xD9,0x52,0xD4,
56 0x19,0x9F,0x14,0x92,0x03,0x85,0x0E,0x88,
57 0x2D,0xAB,0x20,0xA6,0x37,0xB1,0x3A,0xBC,
58 0x43,0xC5,0x4E,0xC8,0x59,0xDF,0x54,0xD2,
59 0x77,0xF1,0x7A,0xFC,0x6D,0xEB,0x60,0xE6,
60 0x2B,0xAD,0x26,0xA0,0x31,0xB7,0x3C,0xBA,
61 0x1F,0x99,0x12,0x94,0x05,0x83,0x08,0x8E,
62 0x93,0x15,0x9E,0x18,0x89,0x0F,0x84,0x02,
63 0xA7,0x21,0xAA,0x2C,0xBD,0x3B,0xB0,0x36,
64 0xFB,0x7D,0xF6,0x70,0xE1,0x67,0xEC,0x6A,
65 0xCF,0x49,0xC2,0x44,0xD5,0x53,0xD8,0x5E,
66 0xE2,0x64,0xEF,0x69,0xF8,0x7E,0xF5,0x73,
67 0xD6,0x50,0xDB,0x5D,0xCC,0x4A,0xC1,0x47,
68 0x8A,0x0C,0x87,0x01,0x90,0x16,0x9D,0x1B,
69 0xBE,0x38,0xB3,0x35,0xA4,0x22,0xA9,0x2F,
70 0x32,0xB4,0x3F,0xB9,0x28,0xAE,0x25,0xA3,
71 0x06,0x80,0x0B,0x8D,0x1C,0x9A,0x11,0x97,
72 0x5A,0xDC,0x57,0xD1,0x40,0xC6,0x4D,0xCB,
73 0x6E,0xE8,0x63,0xE5,0x74,0xF2,0x79,0xFF
74};
75
76const byte HIGHT_F1[256] = {
77 0x00,0x58,0xB0,0xE8,0x61,0x39,0xD1,0x89,
78 0xC2,0x9A,0x72,0x2A,0xA3,0xFB,0x13,0x4B,
79 0x85,0xDD,0x35,0x6D,0xE4,0xBC,0x54,0x0C,
80 0x47,0x1F,0xF7,0xAF,0x26,0x7E,0x96,0xCE,
81 0x0B,0x53,0xBB,0xE3,0x6A,0x32,0xDA,0x82,
82 0xC9,0x91,0x79,0x21,0xA8,0xF0,0x18,0x40,
83 0x8E,0xD6,0x3E,0x66,0xEF,0xB7,0x5F,0x07,
84 0x4C,0x14,0xFC,0xA4,0x2D,0x75,0x9D,0xC5,
85 0x16,0x4E,0xA6,0xFE,0x77,0x2F,0xC7,0x9F,
86 0xD4,0x8C,0x64,0x3C,0xB5,0xED,0x05,0x5D,
87 0x93,0xCB,0x23,0x7B,0xF2,0xAA,0x42,0x1A,
88 0x51,0x09,0xE1,0xB9,0x30,0x68,0x80,0xD8,
89 0x1D,0x45,0xAD,0xF5,0x7C,0x24,0xCC,0x94,
90 0xDF,0x87,0x6F,0x37,0xBE,0xE6,0x0E,0x56,
91 0x98,0xC0,0x28,0x70,0xF9,0xA1,0x49,0x11,
92 0x5A,0x02,0xEA,0xB2,0x3B,0x63,0x8B,0xD3,
93 0x2C,0x74,0x9C,0xC4,0x4D,0x15,0xFD,0xA5,
94 0xEE,0xB6,0x5E,0x06,0x8F,0xD7,0x3F,0x67,
95 0xA9,0xF1,0x19,0x41,0xC8,0x90,0x78,0x20,
96 0x6B,0x33,0xDB,0x83,0x0A,0x52,0xBA,0xE2,
97 0x27,0x7F,0x97,0xCF,0x46,0x1E,0xF6,0xAE,
98 0xE5,0xBD,0x55,0x0D,0x84,0xDC,0x34,0x6C,
99 0xA2,0xFA,0x12,0x4A,0xC3,0x9B,0x73,0x2B,
100 0x60,0x38,0xD0,0x88,0x01,0x59,0xB1,0xE9,
101 0x3A,0x62,0x8A,0xD2,0x5B,0x03,0xEB,0xB3,
102 0xF8,0xA0,0x48,0x10,0x99,0xC1,0x29,0x71,
103 0xBF,0xE7,0x0F,0x57,0xDE,0x86,0x6E,0x36,
104 0x7D,0x25,0xCD,0x95,0x1C,0x44,0xAC,0xF4,
105 0x31,0x69,0x81,0xD9,0x50,0x08,0xE0,0xB8,
106 0xF3,0xAB,0x43,0x1B,0x92,0xCA,0x22,0x7A,
107 0xB4,0xEC,0x04,0x5C,0xD5,0x8D,0x65,0x3D,
108 0x76,0x2E,0xC6,0x9E,0x17,0x4F,0xA7,0xFF
109};
110
111ANONYMOUS_NAMESPACE_END
112
113NAMESPACE_BEGIN(CryptoPP)
114
115void HIGHT::Base::UncheckedSetKey(const byte *userKey, unsigned int keyLength, const NameValuePairs &params)
116{
117 CRYPTOPP_UNUSED(params);
118 CRYPTOPP_UNUSED(keyLength);
119
120 for(unsigned int i=0; i<4; i++) {
121 m_rkey[i ] = userKey[i+12];
122 m_rkey[i+4] = userKey[i ];
123 }
124
125 for(unsigned int i=0; i<8; i++) {
126 for(unsigned int j=0; j<8; j++) {
127 m_rkey[8+16*i+j] = static_cast<byte>(userKey[(j-i)&7] + DELTA[16*i+j]);
128 }
129
130 for(unsigned int j=0; j<8; j++) {
131 m_rkey[8+16*i+j+8] = static_cast<byte>(userKey[((j-i)&7)+8] + DELTA[16*i+j+8]);
132 }
133 }
134}
135
136void HIGHT::Enc::ProcessAndXorBlock(const byte *inBlock, const byte *xorBlock, byte *outBlock) const
137{
138 // First Round
139 m_xx[1] = inBlock[1];
140 m_xx[3] = inBlock[3];
141 m_xx[5] = inBlock[5];
142 m_xx[7] = inBlock[7];
143
144 m_xx[0] = (inBlock[0] + m_rkey[0]) & 0xFF;
145 m_xx[2] = (inBlock[2] ^ m_rkey[1]);
146 m_xx[4] = (inBlock[4] + m_rkey[2]) & 0xFF;
147 m_xx[6] = (inBlock[6] ^ m_rkey[3]);
148
149 // Encryption Round
150 #define HIGHT_ENC(k, i0,i1,i2,i3,i4,i5,i6,i7) { \
151 m_xx[i0] = (m_xx[i0] ^ (HIGHT_F0[m_xx[i1]] + m_rkey[4*k+3])) & 0xFF; \
152 m_xx[i2] = (m_xx[i2] + (HIGHT_F1[m_xx[i3]] ^ m_rkey[4*k+2])) & 0xFF; \
153 m_xx[i4] = (m_xx[i4] ^ (HIGHT_F0[m_xx[i5]] + m_rkey[4*k+1])) & 0xFF; \
154 m_xx[i6] = (m_xx[i6] + (HIGHT_F1[m_xx[i7]] ^ m_rkey[4*k+0])) & 0xFF; \
155 }
156
157 HIGHT_ENC( 2, 7,6,5,4,3,2,1,0);
158 HIGHT_ENC( 3, 6,5,4,3,2,1,0,7);
159 HIGHT_ENC( 4, 5,4,3,2,1,0,7,6);
160 HIGHT_ENC( 5, 4,3,2,1,0,7,6,5);
161 HIGHT_ENC( 6, 3,2,1,0,7,6,5,4);
162 HIGHT_ENC( 7, 2,1,0,7,6,5,4,3);
163 HIGHT_ENC( 8, 1,0,7,6,5,4,3,2);
164 HIGHT_ENC( 9, 0,7,6,5,4,3,2,1);
165 HIGHT_ENC(10, 7,6,5,4,3,2,1,0);
166 HIGHT_ENC(11, 6,5,4,3,2,1,0,7);
167 HIGHT_ENC(12, 5,4,3,2,1,0,7,6);
168 HIGHT_ENC(13, 4,3,2,1,0,7,6,5);
169 HIGHT_ENC(14, 3,2,1,0,7,6,5,4);
170 HIGHT_ENC(15, 2,1,0,7,6,5,4,3);
171 HIGHT_ENC(16, 1,0,7,6,5,4,3,2);
172 HIGHT_ENC(17, 0,7,6,5,4,3,2,1);
173 HIGHT_ENC(18, 7,6,5,4,3,2,1,0);
174 HIGHT_ENC(19, 6,5,4,3,2,1,0,7);
175 HIGHT_ENC(20, 5,4,3,2,1,0,7,6);
176 HIGHT_ENC(21, 4,3,2,1,0,7,6,5);
177 HIGHT_ENC(22, 3,2,1,0,7,6,5,4);
178 HIGHT_ENC(23, 2,1,0,7,6,5,4,3);
179 HIGHT_ENC(24, 1,0,7,6,5,4,3,2);
180 HIGHT_ENC(25, 0,7,6,5,4,3,2,1);
181 HIGHT_ENC(26, 7,6,5,4,3,2,1,0);
182 HIGHT_ENC(27, 6,5,4,3,2,1,0,7);
183 HIGHT_ENC(28, 5,4,3,2,1,0,7,6);
184 HIGHT_ENC(29, 4,3,2,1,0,7,6,5);
185 HIGHT_ENC(30, 3,2,1,0,7,6,5,4);
186 HIGHT_ENC(31, 2,1,0,7,6,5,4,3);
187 HIGHT_ENC(32, 1,0,7,6,5,4,3,2);
188 HIGHT_ENC(33, 0,7,6,5,4,3,2,1);
189
190 if (xorBlock)
191 {
192 // Final Round
193 outBlock[1] = static_cast<byte>(m_xx[2] ^ xorBlock[1]);
194 outBlock[3] = static_cast<byte>(m_xx[4] ^ xorBlock[3]);
195 outBlock[5] = static_cast<byte>(m_xx[6] ^ xorBlock[5]);
196 outBlock[7] = static_cast<byte>(m_xx[0] ^ xorBlock[7]);
197
198 outBlock[0] = static_cast<byte>((m_xx[1] + m_rkey[4]) ^ xorBlock[0]);
199 outBlock[2] = static_cast<byte>((m_xx[3] ^ m_rkey[5]) ^ xorBlock[2]);
200 outBlock[4] = static_cast<byte>((m_xx[5] + m_rkey[6]) ^ xorBlock[4]);
201 outBlock[6] = static_cast<byte>((m_xx[7] ^ m_rkey[7]) ^ xorBlock[6]);
202 }
203 else
204 {
205 // Final Round
206 outBlock[1] = static_cast<byte>(m_xx[2]);
207 outBlock[3] = static_cast<byte>(m_xx[4]);
208 outBlock[5] = static_cast<byte>(m_xx[6]);
209 outBlock[7] = static_cast<byte>(m_xx[0]);
210
211 outBlock[0] = static_cast<byte>(m_xx[1] + m_rkey[4]);
212 outBlock[2] = static_cast<byte>(m_xx[3] ^ m_rkey[5]);
213 outBlock[4] = static_cast<byte>(m_xx[5] + m_rkey[6]);
214 outBlock[6] = static_cast<byte>(m_xx[7] ^ m_rkey[7]);
215 }
216}
217
218void HIGHT::Dec::ProcessAndXorBlock(const byte *inBlock, const byte *xorBlock, byte *outBlock) const
219{
220 m_xx[2] = static_cast<byte>(inBlock[1]);
221 m_xx[4] = static_cast<byte>(inBlock[3]);
222 m_xx[6] = static_cast<byte>(inBlock[5]);
223 m_xx[0] = static_cast<byte>(inBlock[7]);
224
225 m_xx[1] = static_cast<byte>(inBlock[0] - m_rkey[4]);
226 m_xx[3] = static_cast<byte>(inBlock[2] ^ m_rkey[5]);
227 m_xx[5] = static_cast<byte>(inBlock[4] - m_rkey[6]);
228 m_xx[7] = static_cast<byte>(inBlock[6] ^ m_rkey[7]);
229
230 #define HIGHT_DEC(k, i0,i1,i2,i3,i4,i5,i6,i7) { \
231 m_xx[i1] = (m_xx[i1] - (HIGHT_F1[m_xx[i2]] ^ m_rkey[4*k+2])) & 0xFF; \
232 m_xx[i3] = (m_xx[i3] ^ (HIGHT_F0[m_xx[i4]] + m_rkey[4*k+1])) & 0xFF; \
233 m_xx[i5] = (m_xx[i5] - (HIGHT_F1[m_xx[i6]] ^ m_rkey[4*k+0])) & 0xFF; \
234 m_xx[i7] = (m_xx[i7] ^ (HIGHT_F0[m_xx[i0]] + m_rkey[4*k+3])) & 0xFF; \
235 }
236
237 HIGHT_DEC(33, 7,6,5,4,3,2,1,0);
238 HIGHT_DEC(32, 0,7,6,5,4,3,2,1);
239 HIGHT_DEC(31, 1,0,7,6,5,4,3,2);
240 HIGHT_DEC(30, 2,1,0,7,6,5,4,3);
241 HIGHT_DEC(29, 3,2,1,0,7,6,5,4);
242 HIGHT_DEC(28, 4,3,2,1,0,7,6,5);
243 HIGHT_DEC(27, 5,4,3,2,1,0,7,6);
244 HIGHT_DEC(26, 6,5,4,3,2,1,0,7);
245 HIGHT_DEC(25, 7,6,5,4,3,2,1,0);
246 HIGHT_DEC(24, 0,7,6,5,4,3,2,1);
247 HIGHT_DEC(23, 1,0,7,6,5,4,3,2);
248 HIGHT_DEC(22, 2,1,0,7,6,5,4,3);
249 HIGHT_DEC(21, 3,2,1,0,7,6,5,4);
250 HIGHT_DEC(20, 4,3,2,1,0,7,6,5);
251 HIGHT_DEC(19, 5,4,3,2,1,0,7,6);
252 HIGHT_DEC(18, 6,5,4,3,2,1,0,7);
253 HIGHT_DEC(17, 7,6,5,4,3,2,1,0);
254 HIGHT_DEC(16, 0,7,6,5,4,3,2,1);
255 HIGHT_DEC(15, 1,0,7,6,5,4,3,2);
256 HIGHT_DEC(14, 2,1,0,7,6,5,4,3);
257 HIGHT_DEC(13, 3,2,1,0,7,6,5,4);
258 HIGHT_DEC(12, 4,3,2,1,0,7,6,5);
259 HIGHT_DEC(11, 5,4,3,2,1,0,7,6);
260 HIGHT_DEC(10, 6,5,4,3,2,1,0,7);
261 HIGHT_DEC( 9, 7,6,5,4,3,2,1,0);
262 HIGHT_DEC( 8, 0,7,6,5,4,3,2,1);
263 HIGHT_DEC( 7, 1,0,7,6,5,4,3,2);
264 HIGHT_DEC( 6, 2,1,0,7,6,5,4,3);
265 HIGHT_DEC( 5, 3,2,1,0,7,6,5,4);
266 HIGHT_DEC( 4, 4,3,2,1,0,7,6,5);
267 HIGHT_DEC( 3, 5,4,3,2,1,0,7,6);
268 HIGHT_DEC( 2, 6,5,4,3,2,1,0,7);
269
270 if (xorBlock)
271 {
272 // Final Round
273 outBlock[1] = static_cast<byte>(m_xx[1] ^ xorBlock[1]);
274 outBlock[3] = static_cast<byte>(m_xx[3] ^ xorBlock[3]);
275 outBlock[5] = static_cast<byte>(m_xx[5] ^ xorBlock[5]);
276 outBlock[7] = static_cast<byte>(m_xx[7] ^ xorBlock[7]);
277
278 outBlock[0] = static_cast<byte>((m_xx[0] - m_rkey[0]) ^ xorBlock[0]);
279 outBlock[2] = static_cast<byte>((m_xx[2] ^ m_rkey[1]) ^ xorBlock[2]);
280 outBlock[4] = static_cast<byte>((m_xx[4] - m_rkey[2]) ^ xorBlock[4]);
281 outBlock[6] = static_cast<byte>((m_xx[6] ^ m_rkey[3]) ^ xorBlock[6]);
282 }
283 else
284 {
285 // Final Round
286 outBlock[1] = static_cast<byte>(m_xx[1]);
287 outBlock[3] = static_cast<byte>(m_xx[3]);
288 outBlock[5] = static_cast<byte>(m_xx[5]);
289 outBlock[7] = static_cast<byte>(m_xx[7]);
290
291 outBlock[0] = static_cast<byte>(m_xx[0] - m_rkey[0]);
292 outBlock[2] = static_cast<byte>(m_xx[2] ^ m_rkey[1]);
293 outBlock[4] = static_cast<byte>(m_xx[4] - m_rkey[2]);
294 outBlock[6] = static_cast<byte>(m_xx[6] ^ m_rkey[3]);
295 }
296}
297
298NAMESPACE_END
Interface for retrieving values given their names.
Definition cryptlib.h:327
Library configuration file.
Classes for the HIGHT block cipher.
Utility functions for the Crypto++ library.
Crypto++ library namespace.
Precompiled header file.