1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3 * Cryptographic API.
4 *
5 * ARIA Cipher Algorithm.
6 *
7 * Documentation of ARIA can be found in RFC 5794.
8 * Copyright (c) 2022 Taehee Yoo <[email protected]>
9 *
10 * Information for ARIA
11 * http://210.104.33.10/ARIA/index-e.html (English)
12 * http://seed.kisa.or.kr/ (Korean)
13 *
14 * Public domain version is distributed above.
15 */
16
17 #include <crypto/aria.h>
18 #include <linux/unaligned.h>
19
20 static const u32 key_rc[20] = {
21 0x517cc1b7, 0x27220a94, 0xfe13abe8, 0xfa9a6ee0,
22 0x6db14acc, 0x9e21c820, 0xff28b1d5, 0xef5de2b0,
23 0xdb92371d, 0x2126e970, 0x03249775, 0x04e8c90e,
24 0x517cc1b7, 0x27220a94, 0xfe13abe8, 0xfa9a6ee0,
25 0x6db14acc, 0x9e21c820, 0xff28b1d5, 0xef5de2b0
26 };
27
aria_set_encrypt_key(struct aria_ctx * ctx,const u8 * in_key,unsigned int key_len)28 static void aria_set_encrypt_key(struct aria_ctx *ctx, const u8 *in_key,
29 unsigned int key_len)
30 {
31 u32 w0[4], w1[4], w2[4], w3[4];
32 u32 reg0, reg1, reg2, reg3;
33 const u32 *ck;
34 int rkidx = 0;
35
36 ck = &key_rc[(key_len - 16) / 2];
37
38 w0[0] = get_unaligned_be32(&in_key[0]);
39 w0[1] = get_unaligned_be32(&in_key[4]);
40 w0[2] = get_unaligned_be32(&in_key[8]);
41 w0[3] = get_unaligned_be32(&in_key[12]);
42
43 reg0 = w0[0] ^ ck[0];
44 reg1 = w0[1] ^ ck[1];
45 reg2 = w0[2] ^ ck[2];
46 reg3 = w0[3] ^ ck[3];
47
48 aria_subst_diff_odd(®0, ®1, ®2, ®3);
49
50 if (key_len > 16) {
51 w1[0] = get_unaligned_be32(&in_key[16]);
52 w1[1] = get_unaligned_be32(&in_key[20]);
53 if (key_len > 24) {
54 w1[2] = get_unaligned_be32(&in_key[24]);
55 w1[3] = get_unaligned_be32(&in_key[28]);
56 } else {
57 w1[2] = 0;
58 w1[3] = 0;
59 }
60 } else {
61 w1[0] = 0;
62 w1[1] = 0;
63 w1[2] = 0;
64 w1[3] = 0;
65 }
66
67 w1[0] ^= reg0;
68 w1[1] ^= reg1;
69 w1[2] ^= reg2;
70 w1[3] ^= reg3;
71
72 reg0 = w1[0];
73 reg1 = w1[1];
74 reg2 = w1[2];
75 reg3 = w1[3];
76
77 reg0 ^= ck[4];
78 reg1 ^= ck[5];
79 reg2 ^= ck[6];
80 reg3 ^= ck[7];
81
82 aria_subst_diff_even(®0, ®1, ®2, ®3);
83
84 reg0 ^= w0[0];
85 reg1 ^= w0[1];
86 reg2 ^= w0[2];
87 reg3 ^= w0[3];
88
89 w2[0] = reg0;
90 w2[1] = reg1;
91 w2[2] = reg2;
92 w2[3] = reg3;
93
94 reg0 ^= ck[8];
95 reg1 ^= ck[9];
96 reg2 ^= ck[10];
97 reg3 ^= ck[11];
98
99 aria_subst_diff_odd(®0, ®1, ®2, ®3);
100
101 w3[0] = reg0 ^ w1[0];
102 w3[1] = reg1 ^ w1[1];
103 w3[2] = reg2 ^ w1[2];
104 w3[3] = reg3 ^ w1[3];
105
106 aria_gsrk(ctx->enc_key[rkidx], w0, w1, 19);
107 rkidx++;
108 aria_gsrk(ctx->enc_key[rkidx], w1, w2, 19);
109 rkidx++;
110 aria_gsrk(ctx->enc_key[rkidx], w2, w3, 19);
111 rkidx++;
112 aria_gsrk(ctx->enc_key[rkidx], w3, w0, 19);
113
114 rkidx++;
115 aria_gsrk(ctx->enc_key[rkidx], w0, w1, 31);
116 rkidx++;
117 aria_gsrk(ctx->enc_key[rkidx], w1, w2, 31);
118 rkidx++;
119 aria_gsrk(ctx->enc_key[rkidx], w2, w3, 31);
120 rkidx++;
121 aria_gsrk(ctx->enc_key[rkidx], w3, w0, 31);
122
123 rkidx++;
124 aria_gsrk(ctx->enc_key[rkidx], w0, w1, 67);
125 rkidx++;
126 aria_gsrk(ctx->enc_key[rkidx], w1, w2, 67);
127 rkidx++;
128 aria_gsrk(ctx->enc_key[rkidx], w2, w3, 67);
129 rkidx++;
130 aria_gsrk(ctx->enc_key[rkidx], w3, w0, 67);
131
132 rkidx++;
133 aria_gsrk(ctx->enc_key[rkidx], w0, w1, 97);
134 if (key_len > 16) {
135 rkidx++;
136 aria_gsrk(ctx->enc_key[rkidx], w1, w2, 97);
137 rkidx++;
138 aria_gsrk(ctx->enc_key[rkidx], w2, w3, 97);
139
140 if (key_len > 24) {
141 rkidx++;
142 aria_gsrk(ctx->enc_key[rkidx], w3, w0, 97);
143
144 rkidx++;
145 aria_gsrk(ctx->enc_key[rkidx], w0, w1, 109);
146 }
147 }
148 }
149
aria_set_decrypt_key(struct aria_ctx * ctx)150 static void aria_set_decrypt_key(struct aria_ctx *ctx)
151 {
152 int i;
153
154 for (i = 0; i < 4; i++) {
155 ctx->dec_key[0][i] = ctx->enc_key[ctx->rounds][i];
156 ctx->dec_key[ctx->rounds][i] = ctx->enc_key[0][i];
157 }
158
159 for (i = 1; i < ctx->rounds; i++) {
160 ctx->dec_key[i][0] = aria_m(ctx->enc_key[ctx->rounds - i][0]);
161 ctx->dec_key[i][1] = aria_m(ctx->enc_key[ctx->rounds - i][1]);
162 ctx->dec_key[i][2] = aria_m(ctx->enc_key[ctx->rounds - i][2]);
163 ctx->dec_key[i][3] = aria_m(ctx->enc_key[ctx->rounds - i][3]);
164
165 aria_diff_word(&ctx->dec_key[i][0], &ctx->dec_key[i][1],
166 &ctx->dec_key[i][2], &ctx->dec_key[i][3]);
167 aria_diff_byte(&ctx->dec_key[i][1],
168 &ctx->dec_key[i][2], &ctx->dec_key[i][3]);
169 aria_diff_word(&ctx->dec_key[i][0], &ctx->dec_key[i][1],
170 &ctx->dec_key[i][2], &ctx->dec_key[i][3]);
171 }
172 }
173
aria_set_key(struct crypto_tfm * tfm,const u8 * in_key,unsigned int key_len)174 int aria_set_key(struct crypto_tfm *tfm, const u8 *in_key, unsigned int key_len)
175 {
176 struct aria_ctx *ctx = crypto_tfm_ctx(tfm);
177
178 if (key_len != 16 && key_len != 24 && key_len != 32)
179 return -EINVAL;
180
181 BUILD_BUG_ON(sizeof(ctx->enc_key) != 272);
182 BUILD_BUG_ON(sizeof(ctx->dec_key) != 272);
183 BUILD_BUG_ON(sizeof(int) != sizeof(ctx->rounds));
184
185 ctx->key_length = key_len;
186 ctx->rounds = (key_len + 32) / 4;
187
188 aria_set_encrypt_key(ctx, in_key, key_len);
189 aria_set_decrypt_key(ctx);
190
191 return 0;
192 }
193 EXPORT_SYMBOL_GPL(aria_set_key);
194
__aria_crypt(struct aria_ctx * ctx,u8 * out,const u8 * in,u32 key[][ARIA_RD_KEY_WORDS])195 static void __aria_crypt(struct aria_ctx *ctx, u8 *out, const u8 *in,
196 u32 key[][ARIA_RD_KEY_WORDS])
197 {
198 u32 reg0, reg1, reg2, reg3;
199 int rounds, rkidx = 0;
200
201 rounds = ctx->rounds;
202
203 reg0 = get_unaligned_be32(&in[0]);
204 reg1 = get_unaligned_be32(&in[4]);
205 reg2 = get_unaligned_be32(&in[8]);
206 reg3 = get_unaligned_be32(&in[12]);
207
208 aria_add_round_key(key[rkidx], ®0, ®1, ®2, ®3);
209 rkidx++;
210
211 aria_subst_diff_odd(®0, ®1, ®2, ®3);
212 aria_add_round_key(key[rkidx], ®0, ®1, ®2, ®3);
213 rkidx++;
214
215 while ((rounds -= 2) > 0) {
216 aria_subst_diff_even(®0, ®1, ®2, ®3);
217 aria_add_round_key(key[rkidx], ®0, ®1, ®2, ®3);
218 rkidx++;
219
220 aria_subst_diff_odd(®0, ®1, ®2, ®3);
221 aria_add_round_key(key[rkidx], ®0, ®1, ®2, ®3);
222 rkidx++;
223 }
224
225 reg0 = key[rkidx][0] ^ make_u32((u8)(x1[get_u8(reg0, 0)]),
226 (u8)(x2[get_u8(reg0, 1)] >> 8),
227 (u8)(s1[get_u8(reg0, 2)]),
228 (u8)(s2[get_u8(reg0, 3)]));
229 reg1 = key[rkidx][1] ^ make_u32((u8)(x1[get_u8(reg1, 0)]),
230 (u8)(x2[get_u8(reg1, 1)] >> 8),
231 (u8)(s1[get_u8(reg1, 2)]),
232 (u8)(s2[get_u8(reg1, 3)]));
233 reg2 = key[rkidx][2] ^ make_u32((u8)(x1[get_u8(reg2, 0)]),
234 (u8)(x2[get_u8(reg2, 1)] >> 8),
235 (u8)(s1[get_u8(reg2, 2)]),
236 (u8)(s2[get_u8(reg2, 3)]));
237 reg3 = key[rkidx][3] ^ make_u32((u8)(x1[get_u8(reg3, 0)]),
238 (u8)(x2[get_u8(reg3, 1)] >> 8),
239 (u8)(s1[get_u8(reg3, 2)]),
240 (u8)(s2[get_u8(reg3, 3)]));
241
242 put_unaligned_be32(reg0, &out[0]);
243 put_unaligned_be32(reg1, &out[4]);
244 put_unaligned_be32(reg2, &out[8]);
245 put_unaligned_be32(reg3, &out[12]);
246 }
247
aria_encrypt(void * _ctx,u8 * out,const u8 * in)248 void aria_encrypt(void *_ctx, u8 *out, const u8 *in)
249 {
250 struct aria_ctx *ctx = (struct aria_ctx *)_ctx;
251
252 __aria_crypt(ctx, out, in, ctx->enc_key);
253 }
254 EXPORT_SYMBOL_GPL(aria_encrypt);
255
aria_decrypt(void * _ctx,u8 * out,const u8 * in)256 void aria_decrypt(void *_ctx, u8 *out, const u8 *in)
257 {
258 struct aria_ctx *ctx = (struct aria_ctx *)_ctx;
259
260 __aria_crypt(ctx, out, in, ctx->dec_key);
261 }
262 EXPORT_SYMBOL_GPL(aria_decrypt);
263
__aria_encrypt(struct crypto_tfm * tfm,u8 * out,const u8 * in)264 static void __aria_encrypt(struct crypto_tfm *tfm, u8 *out, const u8 *in)
265 {
266 struct aria_ctx *ctx = crypto_tfm_ctx(tfm);
267
268 __aria_crypt(ctx, out, in, ctx->enc_key);
269 }
270
__aria_decrypt(struct crypto_tfm * tfm,u8 * out,const u8 * in)271 static void __aria_decrypt(struct crypto_tfm *tfm, u8 *out, const u8 *in)
272 {
273 struct aria_ctx *ctx = crypto_tfm_ctx(tfm);
274
275 __aria_crypt(ctx, out, in, ctx->dec_key);
276 }
277
278 static struct crypto_alg aria_alg = {
279 .cra_name = "aria",
280 .cra_driver_name = "aria-generic",
281 .cra_priority = 100,
282 .cra_flags = CRYPTO_ALG_TYPE_CIPHER,
283 .cra_blocksize = ARIA_BLOCK_SIZE,
284 .cra_ctxsize = sizeof(struct aria_ctx),
285 .cra_module = THIS_MODULE,
286 .cra_u = {
287 .cipher = {
288 .cia_min_keysize = ARIA_MIN_KEY_SIZE,
289 .cia_max_keysize = ARIA_MAX_KEY_SIZE,
290 .cia_setkey = aria_set_key,
291 .cia_encrypt = __aria_encrypt,
292 .cia_decrypt = __aria_decrypt
293 }
294 }
295 };
296
aria_init(void)297 static int __init aria_init(void)
298 {
299 return crypto_register_alg(&aria_alg);
300 }
301
aria_fini(void)302 static void __exit aria_fini(void)
303 {
304 crypto_unregister_alg(&aria_alg);
305 }
306
307 subsys_initcall(aria_init);
308 module_exit(aria_fini);
309
310 MODULE_DESCRIPTION("ARIA Cipher Algorithm");
311 MODULE_LICENSE("GPL");
312 MODULE_AUTHOR("Taehee Yoo <[email protected]>");
313 MODULE_ALIAS_CRYPTO("aria");
314 MODULE_ALIAS_CRYPTO("aria-generic");
315