~mdw / kalyna-python / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Adding reference implementation
[kalyna-python] / main.c
CommitLineData
22eafbca
RO		 1/*\r
2\r
3main.c, printing test vectors of reference implementation of the Kalyna block cipher (DSTU 7624:2014), all block and key length variants\r
4\r
5Authors: Ruslan Kiianchuk, Ruslan Mordvinov, Roman Oliynykov\r
6\r
7*/\r
8\r
9#include <stdio.h>\r
10#include <memory.h>\r
11\r
12#include "kalyna.h"\r
13#include "transformations.h"\r
14\r
15void print (int data_size, uint64_t data []);\r
16\r
17int main(int argc, char** argv) {\r
18 \r
19 int i;\r
20 kalyna_t* ctx22_e = KalynaInit(128, 128);\r
21 kalyna_t* ctx24_e = KalynaInit(128, 256);\r
22 kalyna_t* ctx44_e = KalynaInit(256, 256);\r
23 kalyna_t* ctx48_e = KalynaInit(256, 512);\r
24 kalyna_t* ctx88_e = KalynaInit(512, 512);\r
25\r
26 uint64_t pt22_e[2] = {0x1716151413121110ULL, 0x1f1e1d1c1b1a1918ULL};\r
27 uint64_t ct22_e[2];\r
28 uint64_t key22_e[2] = {0x0706050403020100ULL, 0x0f0e0d0c0b0a0908ULL};\r
29 uint64_t expect22_e[2] = {0x20ac9b777d1cbf81ULL, 0x06add2b439eac9e1ULL};\r
30\r
31 uint64_t pt24_e[2] = {0x2726252423222120ULL, 0x2f2e2d2c2b2a2928ULL};\r
32 uint64_t ct24_e[2];\r
33 uint64_t key24_e[4] = {0x0706050403020100ULL, 0x0f0e0d0c0b0a0908ULL, 0x1716151413121110ULL, 0x1f1e1d1c1b1a1918ULL};\r
34 uint64_t expect24_e[2] = { 0x8a150010093eec58ULL, 0x144f336f16f74811ULL};\r
35\r
36 uint64_t pt44_e[4] = {0x2726252423222120ULL, 0x2f2e2d2c2b2a2928ULL, 0x3736353433323130ULL, 0x3f3e3d3c3b3a3938ULL};\r
37 uint64_t ct44_e[4];\r
38 uint64_t key44_e[4] = {0x0706050403020100ULL, 0x0f0e0d0c0b0a0908ULL, 0x1716151413121110ULL, 0x1f1e1d1c1b1a1918ULL};\r
39 uint64_t expect44_e[4] = {0x3521c90e573d6ef6ULL, 0x8c2abddc23e3daaeULL, 0x5a0d6a20ec6339a0ULL, 0x2cd97f61245c3888ULL};\r
40\r
41 uint64_t pt48_e[4] = {0x4746454443424140ULL, 0x4f4e4d4c4b4a4948ULL, 0x5756555453525150ULL, 0x5f5e5d5c5b5a5958ULL};\r
42 uint64_t ct48_e[4];\r
43 uint64_t key48_e[8] = {0x0706050403020100ULL, 0x0f0e0d0c0b0a0908ULL, 0x1716151413121110ULL, 0x1f1e1d1c1b1a1918ULL,\r
44 0x2726252423222120ULL, 0x2f2e2d2c2b2a2928ULL, 0x3736353433323130ULL, 0x3f3e3d3c3b3a3938ULL};\r
45 uint64_t expect48_e[4] = {0x7ab6b7e6e9906960ULL, 0xb76822d793d8d64bULL, 0x02e1d73c3cc8028eULL, 0xd95dfefda8742efdULL};\r
46\r
47\r
48 uint64_t pt88_e[8] = { 0x4746454443424140ULL, 0x4f4e4d4c4b4a4948ULL, 0x5756555453525150ULL, 0x5f5e5d5c5b5a5958ULL,\r
49 0x6766656463626160ULL, 0x6f6e6d6c6b6a6968ULL, 0x7776757473727170ULL, 0x7f7e7d7c7b7a7978ULL};\r
50 uint64_t ct88_e[8];\r
51 uint64_t key88_e[8] = { 0x0706050403020100ULL, 0x0f0e0d0c0b0a0908ULL, 0x1716151413121110ULL, 0x1f1e1d1c1b1a1918ULL,\r
52 0x2726252423222120ULL, 0x2f2e2d2c2b2a2928ULL, 0x3736353433323130ULL, 0x3f3e3d3c3b3a3938ULL};\r
53 uint64_t expect88_e[8] = { 0x6a351c811be3264aULL, 0x1a239605cad61da6ULL, 0xa1f347aa5483ba67ULL, 0xb856eb20c3ee1d3eULL,\r
54 0x66ab5b1717f4d095ULL, 0x6cc815bb34f1d62fULL, 0xb7fe6e85266a90cbULL, 0xd9d90d947264bcc5ULL};\r
55\r
56 uint64_t ct22_d[2] = {0x18191a1b1c1d1e1fULL, 0x1011121314151617ULL};\r
57 uint64_t pt22_d[2];\r
58 uint64_t key22_d[2] = {0x08090a0b0c0d0e0fULL, 0x0001020304050607ULL};\r
59 uint64_t expect22_d[2] = {0x84c70c472bef9172ULL, 0xd7da733930c2096fULL};\r
60\r
61 uint64_t ct24_d[2] = {0x28292a2b2c2d2e2fULL, 0x2021222324252627ULL};\r
62 uint64_t pt24_d[2];\r
63 uint64_t key24_d[4] = {0x18191a1b1c1d1e1fULL, 0x1011121314151617ULL, 0x08090a0b0c0d0e0fULL, 0x0001020304050607ULL};\r
64 uint64_t expect24_d[2] = {0xe1dffdce56b46df3ULL, 0x96d9ca30705f5bb4ULL};\r
65\r
66 uint64_t ct44_d[4] = {0x38393a3b3c3d3e3fULL, 0x3031323334353637ULL, 0x28292a2b2c2d2e2fULL, 0x2021222324252627ULL};\r
67 uint64_t pt44_d[4];\r
68 uint64_t key44_d[4] = {0x18191a1b1c1d1e1fULL, 0x1011121314151617ULL, 0x08090a0b0c0d0e0fULL, 0x0001020304050607ULL};\r
69 uint64_t expect44_d[4] = {0x864e67967823c57fULL, 0xa34b8b3fb0e9c103ULL, 0xd3c33f2c597c5babULL, 0xe30fb28625d1ed61ULL};\r
70\r
71 uint64_t ct48_d[4] = {0x58595a5b5c5d5e5fULL, 0x5051525354555657ULL, 0x48494a4b4c4d4e4fULL, 0x4041424344454647ULL};\r
72 uint64_t pt48_d[4];\r
73 uint64_t key48_d[8] = {0x38393a3b3c3d3e3fULL, 0x3031323334353637ULL, 0x28292a2b2c2d2e2fULL, 0x2021222324252627ULL,\r
74 0x18191a1b1c1d1e1fULL, 0x1011121314151617ULL, 0x08090a0b0c0d0e0fULL, 0x0001020304050607ULL};\r
75 uint64_t expect48_d[4] = {0x82d4da67277a3118ULL, 0x078d78a1b907cdbcULL, 0x97845f9e1898705eULL, 0xe06aba796d910b2dULL};\r
76\r
77 uint64_t ct88_d[8] = {0x78797a7b7c7d7e7fULL, 0x7071727374757677ULL, 0x68696a6b6c6d6e6fULL, 0x6061626364656667ULL,\r
78 0x58595a5b5c5d5e5fULL, 0x5051525354555657ULL, 0x48494a4b4c4d4e4fULL, 0x4041424344454647ULL};\r
79 uint64_t pt88_d[8];\r
80 uint64_t key88_d[8] = {0x38393a3b3c3d3e3fULL, 0x3031323334353637ULL, 0x28292a2b2c2d2e2fULL, 0x2021222324252627ULL,\r
81 0x18191a1b1c1d1e1fULL, 0x1011121314151617ULL, 0x08090a0b0c0d0e0fULL, 0x0001020304050607ULL};\r
82 uint64_t expect88_d[8] = {0x5252a025338480ceULL, 0x29d8a9e614d7ea1bULL, 0xbd45a8e90e1e38fdULL, 0xa346fad954450492ULL,\r
83 0xf2b13b85dbef7f75ULL, 0x6ae6753b839dff97ULL, 0xdc1b29b5ab5741afULL, 0x22ff5aaa13bb94f0ULL };\r
84\r
85 kalyna_t* ctx22_d = KalynaInit(128, 128);\r
86 kalyna_t* ctx24_d = KalynaInit(128, 256);\r
87 kalyna_t* ctx44_d = KalynaInit(256, 256);\r
88 kalyna_t* ctx48_d = KalynaInit(256, 512);\r
89 kalyna_t* ctx88_d = KalynaInit(512, 512);\r
90\r
91 // kalyna 22 enc\r
92 KalynaKeyExpand(key22_e, ctx22_e);\r
93\r
94 printf("\n=============\n");\r
95 printf("Kalyna (%lu, %lu)\n", ctx22_e->nb * 64, ctx22_e->nk * 64);\r
96 \r
97 printf("\n--- ENCIPHERING ---\n");\r
98 printf("Key:\n");\r
99 print(ctx22_e->nk, key22_e);\r
100\r
101 printf("Plaintext:\n");\r
102 print(ctx22_e->nb, pt22_e);\r
103\r
104 KalynaEncipher(pt22_e, ctx22_e, ct22_e);\r
105 printf("Ciphertext:\n");\r
106 print(ctx22_e->nb, ct22_e);\r
107\r
108 if (memcmp(ct22_e, expect22_e, sizeof(ct22_e)) != 0) printf("Failed enciphering\n");\r
109 else printf("Success enciphering\n\n");\r
110\r
111 KalynaDelete(ctx22_e);\r
112\r
113 // kalyna 22 dec\r
114 KalynaKeyExpand(key22_d, ctx22_d);\r
115\r
116 printf("\n=============\n");\r
117 printf("Kalyna (%lu, %lu)\n", ctx22_d->nb * 64, ctx22_d->nk * 64);\r
118 \r
119 printf("\n--- DECIPHERING ---\n");\r
120 printf("Key:\n");\r
121 print(ctx22_d->nk, key22_d);\r
122\r
123 printf("Ciphertext:\n");\r
124 print(ctx22_d->nb, ct22_d);\r
125\r
126 KalynaDecipher(ct22_d, ctx22_d, pt22_d);\r
127 printf("Plaintext:\n");\r
128 print(ctx22_d->nb, pt22_d);\r
129\r
130 if (memcmp(pt22_d, expect22_d, sizeof(pt22_d)) != 0) printf("Failed deciphering\n");\r
131 else printf("Success deciphering\n\n");\r
132\r
133 KalynaDelete(ctx22_d);\r
134 \r
135 // kalyna 24 enc\r
136 KalynaKeyExpand(key24_e, ctx24_e);\r
137\r
138 printf("\n=============\n");\r
139 printf("Kalyna (%lu, %lu)\n", ctx24_e->nb * 64, ctx24_e->nk * 64);\r
140\r
141 printf("\n--- ENCIPHERING ---\n");\r
142 printf("Key:\n");\r
143 print(ctx24_e->nk, key24_e);\r
144\r
145 printf("Plaintext:\n");\r
146 print(ctx24_e->nb, pt24_e);\r
147\r
148 KalynaEncipher(pt24_e, ctx24_e, ct24_e);\r
149 printf("Ciphertext:\n");\r
150 print(ctx24_e->nb, ct24_e);\r
151\r
152 if (memcmp(ct24_e, expect24_e, sizeof(ct24_e)) != 0) printf("Failed enciphering\n");\r
153 else printf("Success enciphering\n\n");\r
154\r
155 KalynaDelete(ctx24_e);\r
156\r
157 // kalyna 24 dec\r
158 KalynaKeyExpand(key24_d, ctx24_d);\r
159\r
160 printf("\n=============\n");\r
161 printf("Kalyna (%lu, %lu)\n", ctx24_d->nb * 64, ctx24_d->nk * 64);\r
162 \r
163 printf("\n--- DECIPHERING ---\n");\r
164 printf("Key:\n");\r
165 print(ctx24_d->nk, key24_d);\r
166\r
167 printf("Ciphertext:\n");\r
168 print(ctx24_d->nb, ct24_d);\r
169\r
170 KalynaDecipher(ct24_d, ctx24_d, pt24_d);\r
171 printf("Plaintext:\n");\r
172 print(ctx24_d->nb, pt24_d);\r
173\r
174 if (memcmp(pt24_d, expect24_d, sizeof(pt24_d)) != 0) printf("Failed deciphering\n");\r
175 else printf("Success deciphering\n\n");\r
176\r
177 KalynaDelete(ctx24_d);\r
178\r
179 // kalyna 44 enc\r
180 KalynaKeyExpand(key44_e, ctx44_e);\r
181\r
182 printf("\n=============\n");\r
183 printf("Kalyna (%lu, %lu)\n", ctx44_e->nb * 64, ctx44_e->nk * 64);\r
184\r
185 printf("\n--- ENCIPHERING ---\n");\r
186 printf("Key:\n");\r
187 print(ctx44_e->nk, key44_e);\r
188\r
189 printf("Plaintext:\n");\r
190 print(ctx44_e->nb, pt44_e);\r
191\r
192 KalynaEncipher(pt44_e, ctx44_e, ct44_e);\r
193 printf("Ciphertext:\n");\r
194 print(ctx44_e->nb, ct44_e);\r
195\r
196 if (memcmp(ct44_e, expect44_e, sizeof(ct44_e)) != 0) printf("Failed enciphering\n");\r
197 else printf("Success enciphering\n\n");\r
198\r
199 KalynaDelete(ctx44_e);\r
200\r
201 // kalyna 44 dec\r
202 KalynaKeyExpand(key44_d, ctx44_d);\r
203\r
204 printf("\n=============\n");\r
205 printf("Kalyna (%lu, %lu)\n", ctx44_d->nb * 64, ctx44_d->nk * 64);\r
206 \r
207 printf("\n--- DECIPHERING ---\n");\r
208 printf("Key:\n");\r
209 print(ctx44_d->nk, key44_d);\r
210\r
211 printf("Ciphertext:\n");\r
212 print(ctx44_d->nb, ct44_d);\r
213\r
214 KalynaDecipher(ct44_d, ctx44_d, pt44_d);\r
215 printf("Plaintext:\n");\r
216 print(ctx44_d->nb, pt44_d);\r
217\r
218 if (memcmp(pt44_d, expect44_d, sizeof(pt44_d)) != 0) printf("Failed deciphering\n");\r
219 else printf("Success deciphering\n\n");\r
220\r
221 KalynaDelete(ctx44_d);\r
222\r
223 // kalyna 48 enc\r
224 KalynaKeyExpand(key48_e, ctx48_e);\r
225\r
226 printf("\n=============\n");\r
227 printf("Kalyna (%lu, %lu)\n", ctx48_e->nb * 64, ctx48_e->nk * 64);\r
228 \r
229 printf("\n--- ENCIPHERING ---\n");\r
230 printf("Key:\n");\r
231 print(ctx48_e->nk, key48_e);\r
232\r
233 printf("Plaintext:\n");\r
234 print(ctx48_e->nb, pt48_e);\r
235\r
236 KalynaEncipher(pt48_e, ctx48_e, ct48_e);\r
237 printf("Ciphertext:\n");\r
238 print(ctx48_e->nb, ct48_e);\r
239\r
240 if (memcmp(ct48_e, expect48_e, sizeof(ct48_e)) != 0) printf("Failed enciphering\n");\r
241 else printf("Success enciphering\n\n");\r
242\r
243 KalynaDelete(ctx48_e);\r
244\r
245 // kalyna 48 dec\r
246 KalynaKeyExpand(key48_d, ctx48_d);\r
247\r
248 printf("\n=============\n");\r
249 printf("Kalyna (%lu, %lu)\n", ctx48_d->nb * 64, ctx48_d->nk * 64);\r
250 \r
251 printf("\n--- DECIPHERING ---\n");\r
252 printf("Key:\n");\r
253 print(ctx48_d->nk, key48_d);\r
254\r
255 printf("Ciphertext:\n");\r
256 print(ctx48_d->nb, ct48_d);\r
257\r
258 KalynaDecipher(ct48_d, ctx48_d, pt48_d);\r
259 printf("Plaintext:\n");\r
260 print(ctx48_d->nb, pt48_d);\r
261\r
262 if (memcmp(pt48_d, expect48_d, sizeof(pt48_d)) != 0) printf("Failed deciphering\n");\r
263 else printf("Success deciphering\n\n");\r
264\r
265 KalynaDelete(ctx48_d);\r
266\r
267 // kalyna 88 enc\r
268 KalynaKeyExpand(key88_e, ctx88_e);\r
269\r
270 printf("\n=============\n");\r
271 printf("Kalyna (%lu, %lu)\n", ctx88_e->nb * 64, ctx88_e->nk * 64);\r
272\r
273 printf("\n--- ENCIPHERING ---\n");\r
274 printf("Key:\n");\r
275 print(ctx88_e->nk, key88_e);\r
276\r
277 printf("Plaintext:\n");\r
278 print(ctx88_e->nb, pt88_e);\r
279\r
280 KalynaEncipher(pt88_e, ctx88_e, ct88_e);\r
281 printf("Ciphertext:\n");\r
282 print(ctx88_e->nb, ct88_e);\r
283\r
284 if (memcmp(ct88_e, expect88_e, sizeof(ct88_e)) != 0) printf("Failed enciphering\n");\r
285 else printf("Success enciphering\n\n");\r
286\r
287 KalynaDelete(ctx88_e);\r
288\r
289 // kalyna 88 dec\r
290 KalynaKeyExpand(key88_d, ctx88_d);\r
291\r
292 printf("\n=============\n");\r
293 printf("Kalyna (%lu, %lu)\n", ctx88_d->nb * 64, ctx88_d->nk * 64);\r
294 \r
295 printf("\n--- DECIPHERING ---\n");\r
296 printf("Key:\n");\r
297 print(ctx88_d->nk, key88_d);\r
298\r
299 printf("Ciphertext:\n");\r
300 print(ctx88_d->nb, ct88_d);\r
301\r
302 KalynaDecipher(ct88_d, ctx88_d, pt88_d);\r
303 printf("Plaintext:\n");\r
304 print(ctx88_d->nb, pt88_d);\r
305\r
306 if (memcmp(pt88_d, expect88_d, sizeof(pt88_d)) != 0) printf("Failed deciphering\n");\r
307 else printf("Success deciphering\n\n");\r
308\r
309 KalynaDelete(ctx88_d);\r
310\r
311 return 0;\r
312}\r
313\r
314\r
315void print (int data_size, uint64_t data [])\r
316{\r
317 int i;\r
318 uint8_t * tmp = (uint8_t *) data; \r
319 for (i = 0; i < data_size * 8; i ++)\r
320 {\r
321 if (! (i % 16)) printf (" ");\r
322 printf ("%02X", (unsigned int) tmp [i]);\r
323 if (!((i + 1) % 16)) printf ("\n");\r
324 };\r
325 printf ("\n");\r
326};\r
Python bindings for Kalyna block cipher; see https://eprint.iacr.org/2015/650