| /* |
| * Copyright (c) 2017-2018 The Linux Foundation. All rights reserved. |
| */ |
| /* |
| * Counter with CBC-MAC (CCM) with AES |
| * |
| * Copyright (c) 2010-2012, Jouni Malinen <j@w1.fi> |
| * |
| * This software may be distributed under the terms of the BSD license. |
| * See README for more details. |
| */ |
| |
| #include <qdf_types.h> |
| #include <qdf_mem.h> |
| #include <qdf_util.h> |
| #include "wlan_crypto_aes_i.h" |
| #include "wlan_crypto_def_i.h" |
| |
| static void xor_aes_block(uint8_t *dst, const uint8_t *src) |
| { |
| uint32_t *d = (uint32_t *) dst; |
| uint32_t *s = (uint32_t *) src; |
| *d++ ^= *s++; |
| *d++ ^= *s++; |
| *d++ ^= *s++; |
| *d++ ^= *s++; |
| } |
| |
| |
| static void aes_ccm_auth_start(void *aes, size_t M, size_t L, |
| const uint8_t *nonce, const uint8_t *aad, |
| size_t aad_len, size_t plain_len, |
| uint8_t *x){ |
| uint8_t aad_buf[2 * AES_BLOCK_SIZE]; |
| uint8_t b[AES_BLOCK_SIZE]; |
| |
| /* Authentication */ |
| /* B_0: Flags | Nonce N | l(m) */ |
| b[0] = aad_len ? 0x40 : 0 /* Adata */; |
| b[0] |= (((M - 2) / 2) /* M' */ << 3); |
| b[0] |= (L - 1) /* L' */; |
| qdf_mem_copy(&b[1], nonce, 15 - L); |
| wlan_crypto_put_be16(&b[AES_BLOCK_SIZE - L], plain_len); |
| |
| wpa_hexdump_key(MSG_EXCESSIVE, "CCM B_0", b, AES_BLOCK_SIZE); |
| wlan_crypto_aes_encrypt(aes, b, x); /* X_1 = E(K, B_0) */ |
| |
| if (!aad_len) { |
| crypto_err("aad length should be non zero"); |
| return; |
| } |
| |
| wlan_crypto_put_be16(aad_buf, aad_len); |
| qdf_mem_copy(aad_buf + AAD_LEN_FIELD, aad, aad_len); |
| if ((AAD_LEN_FIELD + aad_len) < sizeof(aad_buf)) |
| qdf_mem_set(aad_buf + AAD_LEN_FIELD + aad_len, |
| sizeof(aad_buf) - AAD_LEN_FIELD - aad_len, 0); |
| |
| xor_aes_block(aad_buf, x); |
| wlan_crypto_aes_encrypt(aes, aad_buf, x); /* X_2 = E(K, X_1 XOR B_1) */ |
| |
| if (aad_len > AES_BLOCK_SIZE - AAD_LEN_FIELD) { |
| xor_aes_block(&aad_buf[AES_BLOCK_SIZE], x); |
| /* X_3 = E(K, X_2 XOR B_2) */ |
| wlan_crypto_aes_encrypt(aes, &aad_buf[AES_BLOCK_SIZE], x); |
| } |
| } |
| |
| |
| static void aes_ccm_auth(void *aes, const uint8_t *data, size_t len, uint8_t *x) |
| { |
| size_t last = len % AES_BLOCK_SIZE; |
| size_t i; |
| |
| for (i = 0; i < len / AES_BLOCK_SIZE; i++) { |
| /* X_i+1 = E(K, X_i XOR B_i) */ |
| xor_aes_block(x, data); |
| data += AES_BLOCK_SIZE; |
| wlan_crypto_aes_encrypt(aes, x, x); |
| } |
| if (last) { |
| /* XOR zero-padded last block */ |
| for (i = 0; i < last; i++) |
| x[i] ^= *data++; |
| wlan_crypto_aes_encrypt(aes, x, x); |
| } |
| } |
| |
| |
| static void aes_ccm_encr_start(size_t L, const uint8_t *nonce, uint8_t *a) |
| { |
| /* A_i = Flags | Nonce N | Counter i */ |
| a[0] = L - 1; /* Flags = L' */ |
| qdf_mem_copy(&a[1], nonce, 15 - L); |
| } |
| |
| |
| static void aes_ccm_encr(void *aes, size_t L, const uint8_t *in, size_t len, |
| uint8_t *out, uint8_t *a){ |
| size_t last = len % AES_BLOCK_SIZE; |
| size_t i; |
| |
| /* crypt = msg XOR (S_1 | S_2 | ... | S_n) */ |
| for (i = 1; i <= len / AES_BLOCK_SIZE; i++) { |
| wlan_crypto_put_be16(&a[AES_BLOCK_SIZE - 2], i); |
| /* S_i = E(K, A_i) */ |
| wlan_crypto_aes_encrypt(aes, a, out); |
| xor_aes_block(out, in); |
| out += AES_BLOCK_SIZE; |
| in += AES_BLOCK_SIZE; |
| } |
| if (last) { |
| wlan_crypto_put_be16(&a[AES_BLOCK_SIZE - 2], i); |
| wlan_crypto_aes_encrypt(aes, a, out); |
| /* XOR zero-padded last block */ |
| for (i = 0; i < last; i++) |
| *out++ ^= *in++; |
| } |
| } |
| |
| |
| static void aes_ccm_encr_auth(void *aes, size_t M, uint8_t *x, uint8_t *a, |
| uint8_t *auth){ |
| size_t i; |
| uint8_t tmp[AES_BLOCK_SIZE]; |
| |
| wpa_hexdump_key(MSG_EXCESSIVE, "CCM T", x, M); |
| /* U = T XOR S_0; S_0 = E(K, A_0) */ |
| wlan_crypto_put_be16(&a[AES_BLOCK_SIZE - 2], 0); |
| wlan_crypto_aes_encrypt(aes, a, tmp); |
| for (i = 0; i < M; i++) |
| auth[i] = x[i] ^ tmp[i]; |
| wpa_hexdump_key(MSG_EXCESSIVE, "CCM U", auth, M); |
| } |
| |
| |
| static void aes_ccm_decr_auth(void *aes, size_t M, uint8_t *a, |
| const uint8_t *auth, uint8_t *t){ |
| size_t i; |
| uint8_t tmp[AES_BLOCK_SIZE]; |
| |
| wpa_hexdump_key(MSG_EXCESSIVE, "CCM U", auth, M); |
| /* U = T XOR S_0; S_0 = E(K, A_0) */ |
| wlan_crypto_put_be16(&a[AES_BLOCK_SIZE - 2], 0); |
| wlan_crypto_aes_encrypt(aes, a, tmp); |
| for (i = 0; i < M; i++) |
| t[i] = auth[i] ^ tmp[i]; |
| wpa_hexdump_key(MSG_EXCESSIVE, "CCM T", t, M); |
| } |
| |
| |
| /* AES-CCM with fixed L=2 and aad_len <= 30 assumption */ |
| int wlan_crypto_aes_ccm_ae(const uint8_t *key, size_t key_len, |
| const uint8_t *nonce, size_t M, |
| const uint8_t *plain, size_t plain_len, |
| const uint8_t *aad, size_t aad_len, |
| uint8_t *crypt, uint8_t *auth){ |
| const size_t L = 2; |
| void *aes; |
| uint8_t x[AES_BLOCK_SIZE], a[AES_BLOCK_SIZE]; |
| int32_t status = -1; |
| |
| if (aad_len > 30 || M > AES_BLOCK_SIZE) |
| return status; |
| |
| aes = wlan_crypto_aes_encrypt_init(key, key_len); |
| if (aes == NULL) |
| return status; |
| |
| aes_ccm_auth_start(aes, M, L, nonce, aad, aad_len, plain_len, x); |
| aes_ccm_auth(aes, plain, plain_len, x); |
| |
| /* Encryption */ |
| aes_ccm_encr_start(L, nonce, a); |
| aes_ccm_encr(aes, L, plain, plain_len, crypt, a); |
| aes_ccm_encr_auth(aes, M, x, a, auth); |
| |
| wlan_crypto_aes_encrypt_deinit(aes); |
| |
| return 0; |
| } |
| |
| |
| /* AES-CCM with fixed L=2 and aad_len <= 30 assumption */ |
| int wlan_crypto_aes_ccm_ad(const uint8_t *key, size_t key_len, |
| const uint8_t *nonce, size_t M, const uint8_t *crypt, |
| size_t crypt_len, const uint8_t *aad, size_t aad_len, |
| const uint8_t *auth, uint8_t *plain){ |
| const size_t L = 2; |
| void *aes; |
| uint8_t x[AES_BLOCK_SIZE], a[AES_BLOCK_SIZE]; |
| uint8_t t[AES_BLOCK_SIZE]; |
| int32_t status = -1; |
| |
| if (aad_len > 30 || M > AES_BLOCK_SIZE) |
| return status; |
| |
| aes = wlan_crypto_aes_encrypt_init(key, key_len); |
| if (aes == NULL) |
| return status; |
| |
| /* Decryption */ |
| aes_ccm_encr_start(L, nonce, a); |
| aes_ccm_decr_auth(aes, M, a, auth, t); |
| |
| /* plaintext = msg XOR (S_1 | S_2 | ... | S_n) */ |
| aes_ccm_encr(aes, L, crypt, crypt_len, plain, a); |
| |
| aes_ccm_auth_start(aes, M, L, nonce, aad, aad_len, crypt_len, x); |
| aes_ccm_auth(aes, plain, crypt_len, x); |
| |
| wlan_crypto_aes_encrypt_deinit(aes); |
| |
| if (qdf_mem_cmp(x, t, M) != 0) { |
| wpa_printf(MSG_EXCESSIVE, "CCM: Auth mismatch"); |
| return status; |
| } |
| |
| return 0; |
| } |