2 *------------------------------------------------------------------
3 * Copyright (c) 2020 Cisco and/or its affiliates.
4 * Licensed under the Apache License, Version 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at:
8 * http://www.apache.org/licenses/LICENSE-2.0
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
15 *------------------------------------------------------------------
28 #define AES_KEY_ROUNDS(x) (10 + x * 2)
29 #define AES_KEY_BYTES(x) (16 + x * 8)
31 static_always_inline u8x16
32 aes_block_load (u8 * p)
37 static_always_inline u8x16
38 aes_enc_round (u8x16 a, u8x16 k)
41 return (u8x16) _mm_aesenc_si128 ((__m128i) a, (__m128i) k);
42 #elif defined (__ARM_FEATURE_CRYPTO)
43 return vaesmcq_u8 (vaeseq_u8 (a, u8x16_splat (0))) ^ k;
47 #if defined(__VAES__) && defined(__AVX512F__)
48 static_always_inline u8x64
49 aes_enc_round_x4 (u8x64 a, u8x64 k)
51 return (u8x64) _mm512_aesenc_epi128 ((__m512i) a, (__m512i) k);
54 static_always_inline u8x64
55 aes_enc_last_round_x4 (u8x64 a, u8x64 k)
57 return (u8x64) _mm512_aesenclast_epi128 ((__m512i) a, (__m512i) k);
60 static_always_inline u8x64
61 aes_dec_round_x4 (u8x64 a, u8x64 k)
63 return (u8x64) _mm512_aesdec_epi128 ((__m512i) a, (__m512i) k);
66 static_always_inline u8x64
67 aes_dec_last_round_x4 (u8x64 a, u8x64 k)
69 return (u8x64) _mm512_aesdeclast_epi128 ((__m512i) a, (__m512i) k);
74 static_always_inline u8x32
75 aes_enc_round_x2 (u8x32 a, u8x32 k)
77 return (u8x32) _mm256_aesenc_epi128 ((__m256i) a, (__m256i) k);
80 static_always_inline u8x32
81 aes_enc_last_round_x2 (u8x32 a, u8x32 k)
83 return (u8x32) _mm256_aesenclast_epi128 ((__m256i) a, (__m256i) k);
86 static_always_inline u8x32
87 aes_dec_round_x2 (u8x32 a, u8x32 k)
89 return (u8x32) _mm256_aesdec_epi128 ((__m256i) a, (__m256i) k);
92 static_always_inline u8x32
93 aes_dec_last_round_x2 (u8x32 a, u8x32 k)
95 return (u8x32) _mm256_aesdeclast_epi128 ((__m256i) a, (__m256i) k);
99 static_always_inline u8x16
100 aes_enc_last_round (u8x16 a, u8x16 k)
102 #if defined (__AES__)
103 return (u8x16) _mm_aesenclast_si128 ((__m128i) a, (__m128i) k);
104 #elif defined (__ARM_FEATURE_CRYPTO)
105 return vaeseq_u8 (a, u8x16_splat (0)) ^ k;
111 static_always_inline u8x16
112 aes_dec_round (u8x16 a, u8x16 k)
114 return (u8x16) _mm_aesdec_si128 ((__m128i) a, (__m128i) k);
117 static_always_inline u8x16
118 aes_dec_last_round (u8x16 a, u8x16 k)
120 return (u8x16) _mm_aesdeclast_si128 ((__m128i) a, (__m128i) k);
124 static_always_inline void
125 aes_block_store (u8 * p, u8x16 r)
130 static_always_inline u8x16
131 aes_encrypt_block (u8x16 block, const u8x16 * round_keys, aes_key_size_t ks)
133 int rounds = AES_KEY_ROUNDS (ks);
134 block ^= round_keys[0];
135 for (int i = 1; i < rounds; i += 1)
136 block = aes_enc_round (block, round_keys[i]);
137 return aes_enc_last_round (block, round_keys[rounds]);
140 static_always_inline u8x16
141 aes_inv_mix_column (u8x16 a)
143 #if defined (__AES__)
144 return (u8x16) _mm_aesimc_si128 ((__m128i) a);
145 #elif defined (__ARM_FEATURE_CRYPTO)
146 return vaesimcq_u8 (a);
151 #define aes_keygen_assist(a, b) \
152 (u8x16) _mm_aeskeygenassist_si128((__m128i) a, b)
154 /* AES-NI based AES key expansion based on code samples from
155 Intel(r) Advanced Encryption Standard (AES) New Instructions White Paper
158 static_always_inline void
159 aes128_key_assist (u8x16 * rk, u8x16 r)
162 t ^= u8x16_word_shift_left (t, 4);
163 t ^= u8x16_word_shift_left (t, 4);
164 t ^= u8x16_word_shift_left (t, 4);
165 rk[0] = t ^ (u8x16) u32x4_shuffle ((u32x4) r, 3, 3, 3, 3);
168 static_always_inline void
169 aes128_key_expand (u8x16 *rk, u8x16u const *k)
172 aes128_key_assist (rk + 1, aes_keygen_assist (rk[0], 0x01));
173 aes128_key_assist (rk + 2, aes_keygen_assist (rk[1], 0x02));
174 aes128_key_assist (rk + 3, aes_keygen_assist (rk[2], 0x04));
175 aes128_key_assist (rk + 4, aes_keygen_assist (rk[3], 0x08));
176 aes128_key_assist (rk + 5, aes_keygen_assist (rk[4], 0x10));
177 aes128_key_assist (rk + 6, aes_keygen_assist (rk[5], 0x20));
178 aes128_key_assist (rk + 7, aes_keygen_assist (rk[6], 0x40));
179 aes128_key_assist (rk + 8, aes_keygen_assist (rk[7], 0x80));
180 aes128_key_assist (rk + 9, aes_keygen_assist (rk[8], 0x1b));
181 aes128_key_assist (rk + 10, aes_keygen_assist (rk[9], 0x36));
184 static_always_inline void
185 aes192_key_assist (u8x16 * r1, u8x16 * r2, u8x16 key_assist)
188 r1[0] ^= t = u8x16_word_shift_left (r1[0], 4);
189 r1[0] ^= t = u8x16_word_shift_left (t, 4);
190 r1[0] ^= u8x16_word_shift_left (t, 4);
191 r1[0] ^= (u8x16) _mm_shuffle_epi32 ((__m128i) key_assist, 0x55);
192 r2[0] ^= u8x16_word_shift_left (r2[0], 4);
193 r2[0] ^= (u8x16) _mm_shuffle_epi32 ((__m128i) r1[0], 0xff);
196 static_always_inline void
197 aes192_key_expand (u8x16 * rk, u8x16u const *k)
203 rk[1] = r2 = (u8x16) (u64x2) { *(u64 *) (k + 1), 0 };
206 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x1));
207 rk[1] = (u8x16) _mm_shuffle_pd ((__m128d) rk[1], (__m128d) r1, 0);
208 rk[2] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
210 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x2));
214 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x4));
215 rk[4] = (u8x16) _mm_shuffle_pd ((__m128d) rk[4], (__m128d) r1, 0);
216 rk[5] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
218 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x8));
222 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x10));
223 rk[7] = (u8x16) _mm_shuffle_pd ((__m128d) rk[7], (__m128d) r1, 0);
224 rk[8] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
226 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x20));
230 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x40));
231 rk[10] = (u8x16) _mm_shuffle_pd ((__m128d) rk[10], (__m128d) r1, 0);
232 rk[11] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
234 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x80));
238 static_always_inline void
239 aes256_key_assist (u8x16 * rk, int i, u8x16 key_assist)
244 r ^= t = u8x16_word_shift_left (r, 4);
245 r ^= t = u8x16_word_shift_left (t, 4);
246 r ^= u8x16_word_shift_left (t, 4);
247 r ^= (u8x16) u32x4_shuffle ((u32x4) key_assist, 3, 3, 3, 3);
253 key_assist = aes_keygen_assist (rk[0], 0x0);
255 r ^= t = u8x16_word_shift_left (r, 4);
256 r ^= t = u8x16_word_shift_left (t, 4);
257 r ^= u8x16_word_shift_left (t, 4);
258 r ^= (u8x16) u32x4_shuffle ((u32x4) key_assist, 2, 2, 2, 2);
262 static_always_inline void
263 aes256_key_expand (u8x16 * rk, u8x16u const *k)
267 aes256_key_assist (rk, 2, aes_keygen_assist (rk[1], 0x01));
268 aes256_key_assist (rk, 4, aes_keygen_assist (rk[3], 0x02));
269 aes256_key_assist (rk, 6, aes_keygen_assist (rk[5], 0x04));
270 aes256_key_assist (rk, 8, aes_keygen_assist (rk[7], 0x08));
271 aes256_key_assist (rk, 10, aes_keygen_assist (rk[9], 0x10));
272 aes256_key_assist (rk, 12, aes_keygen_assist (rk[11], 0x20));
273 aes256_key_assist (rk, 14, aes_keygen_assist (rk[13], 0x40));
279 static const u8x16 aese_prep_mask1 =
280 { 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12 };
281 static const u8x16 aese_prep_mask2 =
282 { 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15 };
284 static_always_inline void
285 aes128_key_expand_round_neon (u8x16 * rk, u32 rcon)
287 u8x16 r, t, last_round = rk[-1], z = { };
288 r = vqtbl1q_u8 (last_round, aese_prep_mask1);
289 r = vaeseq_u8 (r, z);
290 r ^= (u8x16) vdupq_n_u32 (rcon);
292 r ^= t = vextq_u8 (z, last_round, 12);
293 r ^= t = vextq_u8 (z, t, 12);
294 r ^= vextq_u8 (z, t, 12);
298 static_always_inline void
299 aes128_key_expand (u8x16 *rk, u8x16u const *k)
302 aes128_key_expand_round_neon (rk + 1, 0x01);
303 aes128_key_expand_round_neon (rk + 2, 0x02);
304 aes128_key_expand_round_neon (rk + 3, 0x04);
305 aes128_key_expand_round_neon (rk + 4, 0x08);
306 aes128_key_expand_round_neon (rk + 5, 0x10);
307 aes128_key_expand_round_neon (rk + 6, 0x20);
308 aes128_key_expand_round_neon (rk + 7, 0x40);
309 aes128_key_expand_round_neon (rk + 8, 0x80);
310 aes128_key_expand_round_neon (rk + 9, 0x1b);
311 aes128_key_expand_round_neon (rk + 10, 0x36);
314 static_always_inline void
315 aes192_key_expand_round_neon (u8x8 * rk, u32 rcon)
317 u8x8 r, last_round = rk[-1], z = { };
320 r2 = (u8x16) vdupq_lane_u64 ((uint64x1_t) last_round, 0);
321 r2 = vqtbl1q_u8 (r2, aese_prep_mask1);
322 r2 = vaeseq_u8 (r2, z2);
323 r2 ^= (u8x16) vdupq_n_u32 (rcon);
325 r = (u8x8) vdup_laneq_u64 ((u64x2) r2, 0);
327 r ^= vext_u8 (z, rk[-3], 4);
330 r = rk[-2] ^ vext_u8 (r, z, 4);
331 r ^= vext_u8 (z, r, 4);
337 r = rk[-1] ^ vext_u8 (r, z, 4);
338 r ^= vext_u8 (z, r, 4);
342 static_always_inline void
343 aes192_key_expand (u8x16 * ek, const u8x16u * k)
345 u8x8 *rk = (u8x8 *) ek;
347 rk[2] = *(u8x8u *) (k + 1);
348 aes192_key_expand_round_neon (rk + 3, 0x01);
349 aes192_key_expand_round_neon (rk + 6, 0x02);
350 aes192_key_expand_round_neon (rk + 9, 0x04);
351 aes192_key_expand_round_neon (rk + 12, 0x08);
352 aes192_key_expand_round_neon (rk + 15, 0x10);
353 aes192_key_expand_round_neon (rk + 18, 0x20);
354 aes192_key_expand_round_neon (rk + 21, 0x40);
355 aes192_key_expand_round_neon (rk + 24, 0x80);
359 static_always_inline void
360 aes256_key_expand_round_neon (u8x16 * rk, u32 rcon)
364 r = vqtbl1q_u8 (rk[-1], rcon ? aese_prep_mask1 : aese_prep_mask2);
365 r = vaeseq_u8 (r, z);
367 r ^= (u8x16) vdupq_n_u32 (rcon);
369 r ^= t = vextq_u8 (z, rk[-2], 12);
370 r ^= t = vextq_u8 (z, t, 12);
371 r ^= vextq_u8 (z, t, 12);
375 static_always_inline void
376 aes256_key_expand (u8x16 *rk, u8x16u const *k)
380 aes256_key_expand_round_neon (rk + 2, 0x01);
381 aes256_key_expand_round_neon (rk + 3, 0);
382 aes256_key_expand_round_neon (rk + 4, 0x02);
383 aes256_key_expand_round_neon (rk + 5, 0);
384 aes256_key_expand_round_neon (rk + 6, 0x04);
385 aes256_key_expand_round_neon (rk + 7, 0);
386 aes256_key_expand_round_neon (rk + 8, 0x08);
387 aes256_key_expand_round_neon (rk + 9, 0);
388 aes256_key_expand_round_neon (rk + 10, 0x10);
389 aes256_key_expand_round_neon (rk + 11, 0);
390 aes256_key_expand_round_neon (rk + 12, 0x20);
391 aes256_key_expand_round_neon (rk + 13, 0);
392 aes256_key_expand_round_neon (rk + 14, 0x40);
397 static_always_inline void
398 aes_key_expand (u8x16 * key_schedule, u8 const *key, aes_key_size_t ks)
403 aes128_key_expand (key_schedule, (u8x16u const *) key);
406 aes192_key_expand (key_schedule, (u8x16u const *) key);
409 aes256_key_expand (key_schedule, (u8x16u const *) key);
414 static_always_inline void
415 aes_key_enc_to_dec (u8x16 * ke, u8x16 * kd, aes_key_size_t ks)
417 int rounds = AES_KEY_ROUNDS (ks);
422 for (int i = 1; i < (rounds / 2); i++)
424 kd[rounds - i] = aes_inv_mix_column (ke[i]);
425 kd[i] = aes_inv_mix_column (ke[rounds - i]);
428 kd[rounds / 2] = aes_inv_mix_column (ke[rounds / 2]);
431 #endif /* __aesni_h__ */
434 * fd.io coding-style-patch-verification: ON
437 * eval: (c-set-style "gnu")