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 const u8x16 byte_mask_scale = {
32 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15
35 static_always_inline u8x16
36 aes_block_load (u8 * p)
41 static_always_inline u8x16
42 aes_enc_round (u8x16 a, u8x16 k)
45 return (u8x16) _mm_aesenc_si128 ((__m128i) a, (__m128i) k);
46 #elif defined (__ARM_FEATURE_CRYPTO)
47 return vaesmcq_u8 (vaeseq_u8 (a, u8x16_splat (0))) ^ k;
51 #if defined (__VAES__)
52 static_always_inline u8x64
53 aes_enc_round_x4 (u8x64 a, u8x64 k)
55 return (u8x64) _mm512_aesenc_epi128 ((__m512i) a, (__m512i) k);
58 static_always_inline u8x64
59 aes_enc_last_round_x4 (u8x64 a, u8x64 k)
61 return (u8x64) _mm512_aesenclast_epi128 ((__m512i) a, (__m512i) k);
64 static_always_inline u8x64
65 aes_dec_round_x4 (u8x64 a, u8x64 k)
67 return (u8x64) _mm512_aesdec_epi128 ((__m512i) a, (__m512i) k);
70 static_always_inline u8x64
71 aes_dec_last_round_x4 (u8x64 a, u8x64 k)
73 return (u8x64) _mm512_aesdeclast_epi128 ((__m512i) a, (__m512i) k);
77 static_always_inline u8x16
78 aes_enc_last_round (u8x16 a, u8x16 k)
81 return (u8x16) _mm_aesenclast_si128 ((__m128i) a, (__m128i) k);
82 #elif defined (__ARM_FEATURE_CRYPTO)
83 return vaeseq_u8 (a, u8x16_splat (0)) ^ k;
89 static_always_inline u8x16
90 aes_dec_round (u8x16 a, u8x16 k)
92 return (u8x16) _mm_aesdec_si128 ((__m128i) a, (__m128i) k);
95 static_always_inline u8x16
96 aes_dec_last_round (u8x16 a, u8x16 k)
98 return (u8x16) _mm_aesdeclast_si128 ((__m128i) a, (__m128i) k);
102 static_always_inline void
103 aes_block_store (u8 * p, u8x16 r)
108 static_always_inline u8x16
109 aes_byte_mask (u8x16 x, u8 n_bytes)
111 return x & (u8x16_splat (n_bytes) > byte_mask_scale);
114 static_always_inline u8x16
115 aes_load_partial (u8x16u * p, int n_bytes)
117 ASSERT (n_bytes <= 16);
120 return (u8x16) _mm_mask_loadu_epi8 (zero, (1 << n_bytes) - 1, p);
123 CLIB_ASSUME (n_bytes < 16);
124 clib_memcpy_fast (&v, p, n_bytes);
129 static_always_inline void
130 aes_store_partial (void *p, u8x16 r, int n_bytes)
133 clib_memcpy_fast (p, &r, n_bytes);
136 _mm_mask_storeu_epi8 (p, (1 << n_bytes) - 1, (__m128i) r);
138 u8x16 mask = u8x16_splat (n_bytes) > byte_mask_scale;
139 _mm_maskmoveu_si128 ((__m128i) r, (__m128i) mask, p);
145 static_always_inline u8x16
146 aes_encrypt_block (u8x16 block, const u8x16 * round_keys, aes_key_size_t ks)
148 int rounds = AES_KEY_ROUNDS (ks);
149 block ^= round_keys[0];
150 for (int i = 1; i < rounds; i += 1)
151 block = aes_enc_round (block, round_keys[i]);
152 return aes_enc_last_round (block, round_keys[rounds]);
155 static_always_inline u8x16
156 aes_inv_mix_column (u8x16 a)
158 #if defined (__AES__)
159 return (u8x16) _mm_aesimc_si128 ((__m128i) a);
160 #elif defined (__ARM_FEATURE_CRYPTO)
161 return vaesimcq_u8 (a);
166 #define aes_keygen_assist(a, b) \
167 (u8x16) _mm_aeskeygenassist_si128((__m128i) a, b)
169 /* AES-NI based AES key expansion based on code samples from
170 Intel(r) Advanced Encryption Standard (AES) New Instructions White Paper
173 static_always_inline void
174 aes128_key_assist (u8x16 * rk, u8x16 r)
177 t ^= u8x16_word_shift_left (t, 4);
178 t ^= u8x16_word_shift_left (t, 4);
179 t ^= u8x16_word_shift_left (t, 4);
180 rk[0] = t ^ (u8x16) u32x4_shuffle ((u32x4) r, 3, 3, 3, 3);
183 static_always_inline void
184 aes128_key_expand (u8x16 *rk, u8x16u const *k)
187 aes128_key_assist (rk + 1, aes_keygen_assist (rk[0], 0x01));
188 aes128_key_assist (rk + 2, aes_keygen_assist (rk[1], 0x02));
189 aes128_key_assist (rk + 3, aes_keygen_assist (rk[2], 0x04));
190 aes128_key_assist (rk + 4, aes_keygen_assist (rk[3], 0x08));
191 aes128_key_assist (rk + 5, aes_keygen_assist (rk[4], 0x10));
192 aes128_key_assist (rk + 6, aes_keygen_assist (rk[5], 0x20));
193 aes128_key_assist (rk + 7, aes_keygen_assist (rk[6], 0x40));
194 aes128_key_assist (rk + 8, aes_keygen_assist (rk[7], 0x80));
195 aes128_key_assist (rk + 9, aes_keygen_assist (rk[8], 0x1b));
196 aes128_key_assist (rk + 10, aes_keygen_assist (rk[9], 0x36));
199 static_always_inline void
200 aes192_key_assist (u8x16 * r1, u8x16 * r2, u8x16 key_assist)
203 r1[0] ^= t = u8x16_word_shift_left (r1[0], 4);
204 r1[0] ^= t = u8x16_word_shift_left (t, 4);
205 r1[0] ^= u8x16_word_shift_left (t, 4);
206 r1[0] ^= (u8x16) _mm_shuffle_epi32 ((__m128i) key_assist, 0x55);
207 r2[0] ^= u8x16_word_shift_left (r2[0], 4);
208 r2[0] ^= (u8x16) _mm_shuffle_epi32 ((__m128i) r1[0], 0xff);
211 static_always_inline void
212 aes192_key_expand (u8x16 * rk, u8x16u const *k)
218 rk[1] = r2 = (u8x16) (u64x2) { *(u64 *) (k + 1), 0 };
221 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x1));
222 rk[1] = (u8x16) _mm_shuffle_pd ((__m128d) rk[1], (__m128d) r1, 0);
223 rk[2] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
225 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x2));
229 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x4));
230 rk[4] = (u8x16) _mm_shuffle_pd ((__m128d) rk[4], (__m128d) r1, 0);
231 rk[5] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
233 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x8));
237 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x10));
238 rk[7] = (u8x16) _mm_shuffle_pd ((__m128d) rk[7], (__m128d) r1, 0);
239 rk[8] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
241 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x20));
245 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x40));
246 rk[10] = (u8x16) _mm_shuffle_pd ((__m128d) rk[10], (__m128d) r1, 0);
247 rk[11] = (u8x16) _mm_shuffle_pd ((__m128d) r1, (__m128d) r2, 1);
249 aes192_key_assist (&r1, &r2, aes_keygen_assist (r2, 0x80));
253 static_always_inline void
254 aes256_key_assist (u8x16 * rk, int i, u8x16 key_assist)
259 r ^= t = u8x16_word_shift_left (r, 4);
260 r ^= t = u8x16_word_shift_left (t, 4);
261 r ^= u8x16_word_shift_left (t, 4);
262 r ^= (u8x16) u32x4_shuffle ((u32x4) key_assist, 3, 3, 3, 3);
268 key_assist = aes_keygen_assist (rk[0], 0x0);
270 r ^= t = u8x16_word_shift_left (r, 4);
271 r ^= t = u8x16_word_shift_left (t, 4);
272 r ^= u8x16_word_shift_left (t, 4);
273 r ^= (u8x16) u32x4_shuffle ((u32x4) key_assist, 2, 2, 2, 2);
277 static_always_inline void
278 aes256_key_expand (u8x16 * rk, u8x16u const *k)
282 aes256_key_assist (rk, 2, aes_keygen_assist (rk[1], 0x01));
283 aes256_key_assist (rk, 4, aes_keygen_assist (rk[3], 0x02));
284 aes256_key_assist (rk, 6, aes_keygen_assist (rk[5], 0x04));
285 aes256_key_assist (rk, 8, aes_keygen_assist (rk[7], 0x08));
286 aes256_key_assist (rk, 10, aes_keygen_assist (rk[9], 0x10));
287 aes256_key_assist (rk, 12, aes_keygen_assist (rk[11], 0x20));
288 aes256_key_assist (rk, 14, aes_keygen_assist (rk[13], 0x40));
294 static const u8x16 aese_prep_mask1 =
295 { 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12 };
296 static const u8x16 aese_prep_mask2 =
297 { 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15, 12, 13, 14, 15 };
299 static_always_inline void
300 aes128_key_expand_round_neon (u8x16 * rk, u32 rcon)
302 u8x16 r, t, last_round = rk[-1], z = { };
303 r = vqtbl1q_u8 (last_round, aese_prep_mask1);
304 r = vaeseq_u8 (r, z);
305 r ^= (u8x16) vdupq_n_u32 (rcon);
307 r ^= t = vextq_u8 (z, last_round, 12);
308 r ^= t = vextq_u8 (z, t, 12);
309 r ^= vextq_u8 (z, t, 12);
313 static_always_inline void
314 aes128_key_expand (u8x16 *rk, u8x16u const *k)
317 aes128_key_expand_round_neon (rk + 1, 0x01);
318 aes128_key_expand_round_neon (rk + 2, 0x02);
319 aes128_key_expand_round_neon (rk + 3, 0x04);
320 aes128_key_expand_round_neon (rk + 4, 0x08);
321 aes128_key_expand_round_neon (rk + 5, 0x10);
322 aes128_key_expand_round_neon (rk + 6, 0x20);
323 aes128_key_expand_round_neon (rk + 7, 0x40);
324 aes128_key_expand_round_neon (rk + 8, 0x80);
325 aes128_key_expand_round_neon (rk + 9, 0x1b);
326 aes128_key_expand_round_neon (rk + 10, 0x36);
329 static_always_inline void
330 aes192_key_expand_round_neon (u8x8 * rk, u32 rcon)
332 u8x8 r, last_round = rk[-1], z = { };
335 r2 = (u8x16) vdupq_lane_u64 ((uint64x1_t) last_round, 0);
336 r2 = vqtbl1q_u8 (r2, aese_prep_mask1);
337 r2 = vaeseq_u8 (r2, z2);
338 r2 ^= (u8x16) vdupq_n_u32 (rcon);
340 r = (u8x8) vdup_laneq_u64 ((u64x2) r2, 0);
342 r ^= vext_u8 (z, rk[-3], 4);
345 r = rk[-2] ^ vext_u8 (r, z, 4);
346 r ^= vext_u8 (z, r, 4);
352 r = rk[-1] ^ vext_u8 (r, z, 4);
353 r ^= vext_u8 (z, r, 4);
357 static_always_inline void
358 aes192_key_expand (u8x16 * ek, const u8x16u * k)
360 u8x8 *rk = (u8x8 *) ek;
362 rk[2] = *(u8x8u *) (k + 1);
363 aes192_key_expand_round_neon (rk + 3, 0x01);
364 aes192_key_expand_round_neon (rk + 6, 0x02);
365 aes192_key_expand_round_neon (rk + 9, 0x04);
366 aes192_key_expand_round_neon (rk + 12, 0x08);
367 aes192_key_expand_round_neon (rk + 15, 0x10);
368 aes192_key_expand_round_neon (rk + 18, 0x20);
369 aes192_key_expand_round_neon (rk + 21, 0x40);
370 aes192_key_expand_round_neon (rk + 24, 0x80);
374 static_always_inline void
375 aes256_key_expand_round_neon (u8x16 * rk, u32 rcon)
379 r = vqtbl1q_u8 (rk[-1], rcon ? aese_prep_mask1 : aese_prep_mask2);
380 r = vaeseq_u8 (r, z);
382 r ^= (u8x16) vdupq_n_u32 (rcon);
384 r ^= t = vextq_u8 (z, rk[-2], 12);
385 r ^= t = vextq_u8 (z, t, 12);
386 r ^= vextq_u8 (z, t, 12);
390 static_always_inline void
391 aes256_key_expand (u8x16 *rk, u8x16u const *k)
395 aes256_key_expand_round_neon (rk + 2, 0x01);
396 aes256_key_expand_round_neon (rk + 3, 0);
397 aes256_key_expand_round_neon (rk + 4, 0x02);
398 aes256_key_expand_round_neon (rk + 5, 0);
399 aes256_key_expand_round_neon (rk + 6, 0x04);
400 aes256_key_expand_round_neon (rk + 7, 0);
401 aes256_key_expand_round_neon (rk + 8, 0x08);
402 aes256_key_expand_round_neon (rk + 9, 0);
403 aes256_key_expand_round_neon (rk + 10, 0x10);
404 aes256_key_expand_round_neon (rk + 11, 0);
405 aes256_key_expand_round_neon (rk + 12, 0x20);
406 aes256_key_expand_round_neon (rk + 13, 0);
407 aes256_key_expand_round_neon (rk + 14, 0x40);
412 static_always_inline void
413 aes_key_expand (u8x16 * key_schedule, u8 const *key, aes_key_size_t ks)
418 aes128_key_expand (key_schedule, (u8x16u const *) key);
421 aes192_key_expand (key_schedule, (u8x16u const *) key);
424 aes256_key_expand (key_schedule, (u8x16u const *) key);
429 static_always_inline void
430 aes_key_enc_to_dec (u8x16 * ke, u8x16 * kd, aes_key_size_t ks)
432 int rounds = AES_KEY_ROUNDS (ks);
437 for (int i = 1; i < (rounds / 2); i++)
439 kd[rounds - i] = aes_inv_mix_column (ke[i]);
440 kd[i] = aes_inv_mix_column (ke[rounds - i]);
443 kd[rounds / 2] = aes_inv_mix_column (ke[rounds / 2]);
446 #endif /* __aesni_h__ */
449 * fd.io coding-style-patch-verification: ON
452 * eval: (c-set-style "gnu")