| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 1 | /* | 
|  | 2 | *  NIST SP800-38C compliant CCM implementation | 
|  | 3 | * | 
| Bence Szépkúti | 1e14827 | 2020-08-07 13:07:28 +0200 | [diff] [blame] | 4 | *  Copyright The Mbed TLS Contributors | 
| Manuel Pégourié-Gonnard | 37ff140 | 2015-09-04 14:21:07 +0200 | [diff] [blame] | 5 | *  SPDX-License-Identifier: Apache-2.0 | 
|  | 6 | * | 
|  | 7 | *  Licensed under the Apache License, Version 2.0 (the "License"); you may | 
|  | 8 | *  not use this file except in compliance with the License. | 
|  | 9 | *  You may obtain a copy of the License at | 
|  | 10 | * | 
|  | 11 | *  http://www.apache.org/licenses/LICENSE-2.0 | 
|  | 12 | * | 
|  | 13 | *  Unless required by applicable law or agreed to in writing, software | 
|  | 14 | *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT | 
|  | 15 | *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
|  | 16 | *  See the License for the specific language governing permissions and | 
|  | 17 | *  limitations under the License. | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 18 | */ | 
|  | 19 |  | 
|  | 20 | /* | 
|  | 21 | * Definition of CCM: | 
|  | 22 | * http://csrc.nist.gov/publications/nistpubs/800-38C/SP800-38C_updated-July20_2007.pdf | 
|  | 23 | * RFC 3610 "Counter with CBC-MAC (CCM)" | 
|  | 24 | * | 
|  | 25 | * Related: | 
|  | 26 | * RFC 5116 "An Interface and Algorithms for Authenticated Encryption" | 
|  | 27 | */ | 
|  | 28 |  | 
| Gilles Peskine | db09ef6 | 2020-06-03 01:43:33 +0200 | [diff] [blame] | 29 | #include "common.h" | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 30 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 31 | #if defined(MBEDTLS_CCM_C) | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 32 |  | 
| Manuel Pégourié-Gonnard | 7f80997 | 2015-03-09 17:05:11 +0000 | [diff] [blame] | 33 | #include "mbedtls/ccm.h" | 
| Andres Amaya Garcia | 1f6301b | 2018-04-17 09:51:09 -0500 | [diff] [blame] | 34 | #include "mbedtls/platform_util.h" | 
| Janos Follath | 24eed8d | 2019-11-22 13:21:35 +0000 | [diff] [blame] | 35 | #include "mbedtls/error.h" | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 36 |  | 
| Rich Evans | 00ab470 | 2015-02-06 13:43:58 +0000 | [diff] [blame] | 37 | #include <string.h> | 
|  | 38 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 39 | #if defined(MBEDTLS_PLATFORM_C) | 
| Manuel Pégourié-Gonnard | 7f80997 | 2015-03-09 17:05:11 +0000 | [diff] [blame] | 40 | #include "mbedtls/platform.h" | 
| Rich Evans | 00ab470 | 2015-02-06 13:43:58 +0000 | [diff] [blame] | 41 | #else | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 42 | #if defined(MBEDTLS_SELF_TEST) && defined(MBEDTLS_AES_C) | 
| Rich Evans | 00ab470 | 2015-02-06 13:43:58 +0000 | [diff] [blame] | 43 | #include <stdio.h> | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 44 | #define mbedtls_printf printf | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 45 | #endif /* MBEDTLS_SELF_TEST && MBEDTLS_AES_C */ | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 46 | #endif /* MBEDTLS_PLATFORM_C */ | 
| Rich Evans | 00ab470 | 2015-02-06 13:43:58 +0000 | [diff] [blame] | 47 |  | 
| Steven Cooreman | 222e2ff | 2017-04-04 11:37:15 +0200 | [diff] [blame] | 48 | #if !defined(MBEDTLS_CCM_ALT) | 
|  | 49 |  | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 50 |  | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 51 | /* | 
|  | 52 | * Initialize context | 
|  | 53 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 54 | void mbedtls_ccm_init(mbedtls_ccm_context *ctx) | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 55 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 56 | memset(ctx, 0, sizeof(mbedtls_ccm_context)); | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 57 | } | 
|  | 58 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 59 | int mbedtls_ccm_setkey(mbedtls_ccm_context *ctx, | 
|  | 60 | mbedtls_cipher_id_t cipher, | 
|  | 61 | const unsigned char *key, | 
|  | 62 | unsigned int keybits) | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 63 | { | 
| Janos Follath | 24eed8d | 2019-11-22 13:21:35 +0000 | [diff] [blame] | 64 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 65 | const mbedtls_cipher_info_t *cipher_info; | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 66 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 67 | cipher_info = mbedtls_cipher_info_from_values(cipher, keybits, | 
|  | 68 | MBEDTLS_MODE_ECB); | 
|  | 69 | if (cipher_info == NULL) { | 
|  | 70 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 71 | } | 
|  | 72 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 73 | if (cipher_info->block_size != 16) { | 
|  | 74 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 75 | } | 
|  | 76 |  | 
|  | 77 | mbedtls_cipher_free(&ctx->cipher_ctx); | 
|  | 78 |  | 
|  | 79 | if ((ret = mbedtls_cipher_setup(&ctx->cipher_ctx, cipher_info)) != 0) { | 
|  | 80 | return ret; | 
|  | 81 | } | 
|  | 82 |  | 
|  | 83 | if ((ret = mbedtls_cipher_setkey(&ctx->cipher_ctx, key, keybits, | 
|  | 84 | MBEDTLS_ENCRYPT)) != 0) { | 
|  | 85 | return ret; | 
|  | 86 | } | 
|  | 87 |  | 
|  | 88 | return 0; | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 89 | } | 
|  | 90 |  | 
|  | 91 | /* | 
|  | 92 | * Free context | 
|  | 93 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 94 | void mbedtls_ccm_free(mbedtls_ccm_context *ctx) | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 95 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 96 | if (ctx == NULL) { | 
| k-stachowiak | fd42d53 | 2018-12-11 14:37:51 +0100 | [diff] [blame] | 97 | return; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 98 | } | 
|  | 99 | mbedtls_cipher_free(&ctx->cipher_ctx); | 
|  | 100 | mbedtls_platform_zeroize(ctx, sizeof(mbedtls_ccm_context)); | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 101 | } | 
|  | 102 |  | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 103 | #define CCM_STATE__CLEAR                0 | 
| Mateusz Starzyk | a9cbdfb | 2021-07-27 13:49:54 +0200 | [diff] [blame] | 104 | #define CCM_STATE__STARTED              (1 << 0) | 
| bootstrap-prime | 6dbbf44 | 2022-05-17 19:30:44 -0400 | [diff] [blame] | 105 | #define CCM_STATE__LENGTHS_SET          (1 << 1) | 
| Mateusz Starzyk | 62d22f9 | 2021-08-09 15:53:41 +0200 | [diff] [blame] | 106 | #define CCM_STATE__AUTH_DATA_STARTED    (1 << 2) | 
|  | 107 | #define CCM_STATE__AUTH_DATA_FINISHED   (1 << 3) | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 108 | #define CCM_STATE__ERROR                (1 << 4) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 109 |  | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 110 | /* | 
|  | 111 | * Encrypt or decrypt a partial block with CTR | 
|  | 112 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 113 | static int mbedtls_ccm_crypt(mbedtls_ccm_context *ctx, | 
|  | 114 | size_t offset, size_t use_len, | 
|  | 115 | const unsigned char *input, | 
|  | 116 | unsigned char *output) | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 117 | { | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 118 | size_t olen = 0; | 
|  | 119 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 120 | unsigned char tmp_buf[16] = { 0 }; | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 121 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 122 | if ((ret = mbedtls_cipher_update(&ctx->cipher_ctx, ctx->ctr, 16, tmp_buf, | 
|  | 123 | &olen)) != 0) { | 
| Mateusz Starzyk | 2d5652a | 2021-07-27 16:07:54 +0200 | [diff] [blame] | 124 | ctx->state |= CCM_STATE__ERROR; | 
| Mateusz Starzyk | c52220d | 2021-07-27 13:54:55 +0200 | [diff] [blame] | 125 | mbedtls_platform_zeroize(tmp_buf, sizeof(tmp_buf)); | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 126 | return ret; | 
|  | 127 | } | 
|  | 128 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 129 | mbedtls_xor(output, input, tmp_buf + offset, use_len); | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 130 |  | 
| Mateusz Starzyk | c52220d | 2021-07-27 13:54:55 +0200 | [diff] [blame] | 131 | mbedtls_platform_zeroize(tmp_buf, sizeof(tmp_buf)); | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 132 | return ret; | 
|  | 133 | } | 
|  | 134 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 135 | static void mbedtls_ccm_clear_state(mbedtls_ccm_context *ctx) | 
|  | 136 | { | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 137 | ctx->state = CCM_STATE__CLEAR; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 138 | memset(ctx->y, 0, 16); | 
|  | 139 | memset(ctx->ctr, 0, 16); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 140 | } | 
|  | 141 |  | 
| Mateusz Starzyk | ca9dc8d | 2021-07-27 14:03:53 +0200 | [diff] [blame] | 142 | static int ccm_calculate_first_block_if_ready(mbedtls_ccm_context *ctx) | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 143 | { | 
| Janos Follath | 24eed8d | 2019-11-22 13:21:35 +0000 | [diff] [blame] | 144 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 145 | unsigned char i; | 
| Manuel Pégourié-Gonnard | aed6065 | 2014-05-07 13:14:42 +0200 | [diff] [blame] | 146 | size_t len_left, olen; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 147 |  | 
| Tom Cosgrove | 1797b05 | 2022-12-04 17:19:59 +0000 | [diff] [blame] | 148 | /* length calculation can be done only after both | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 149 | * mbedtls_ccm_starts() and mbedtls_ccm_set_lengths() have been executed | 
|  | 150 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 151 | if (!(ctx->state & CCM_STATE__STARTED) || !(ctx->state & CCM_STATE__LENGTHS_SET)) { | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 152 | return 0; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 153 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 154 |  | 
| Mateusz Starzyk | bb2ced3 | 2021-10-13 13:37:30 +0200 | [diff] [blame] | 155 | /* CCM expects non-empty tag. | 
|  | 156 | * CCM* allows empty tag. For CCM* without tag, ignore plaintext length. | 
|  | 157 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 158 | if (ctx->tag_len == 0) { | 
|  | 159 | if (ctx->mode == MBEDTLS_CCM_STAR_ENCRYPT || ctx->mode == MBEDTLS_CCM_STAR_DECRYPT) { | 
| Mateusz Starzyk | bb2ced3 | 2021-10-13 13:37:30 +0200 | [diff] [blame] | 160 | ctx->plaintext_len = 0; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 161 | } else { | 
|  | 162 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | bb2ced3 | 2021-10-13 13:37:30 +0200 | [diff] [blame] | 163 | } | 
|  | 164 | } | 
| Mateusz Starzyk | 05e92d6 | 2021-07-09 12:44:07 +0200 | [diff] [blame] | 165 |  | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 166 | /* | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 167 | * First block: | 
| Mateusz Starzyk | eb2ca96 | 2021-07-06 12:45:11 +0200 | [diff] [blame] | 168 | * 0        .. 0        flags | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 169 | * 1        .. iv_len   nonce (aka iv)  - set by: mbedtls_ccm_starts() | 
| Mateusz Starzyk | eb2ca96 | 2021-07-06 12:45:11 +0200 | [diff] [blame] | 170 | * iv_len+1 .. 15       length | 
|  | 171 | * | 
|  | 172 | * With flags as (bits): | 
|  | 173 | * 7        0 | 
|  | 174 | * 6        add present? | 
|  | 175 | * 5 .. 3   (t - 2) / 2 | 
|  | 176 | * 2 .. 0   q - 1 | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 177 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 178 | ctx->y[0] |= (ctx->add_len > 0) << 6; | 
|  | 179 | ctx->y[0] |= ((ctx->tag_len - 2) / 2) << 3; | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 180 | ctx->y[0] |= ctx->q - 1; | 
| Mateusz Starzyk | eb2ca96 | 2021-07-06 12:45:11 +0200 | [diff] [blame] | 181 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 182 | for (i = 0, len_left = ctx->plaintext_len; i < ctx->q; i++, len_left >>= 8) { | 
|  | 183 | ctx->y[15-i] = MBEDTLS_BYTE_0(len_left); | 
|  | 184 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 185 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 186 | if (len_left > 0) { | 
| Mateusz Starzyk | 88c4d62 | 2021-07-05 17:09:16 +0200 | [diff] [blame] | 187 | ctx->state |= CCM_STATE__ERROR; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 188 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 88c4d62 | 2021-07-05 17:09:16 +0200 | [diff] [blame] | 189 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 190 |  | 
|  | 191 | /* Start CBC-MAC with first block*/ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 192 | if ((ret = mbedtls_cipher_update(&ctx->cipher_ctx, ctx->y, 16, ctx->y, &olen)) != 0) { | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 193 | ctx->state |= CCM_STATE__ERROR; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 194 | return ret; | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 195 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 196 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 197 | return 0; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 198 | } | 
|  | 199 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 200 | int mbedtls_ccm_starts(mbedtls_ccm_context *ctx, | 
|  | 201 | int mode, | 
|  | 202 | const unsigned char *iv, | 
|  | 203 | size_t iv_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 204 | { | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 205 | /* Also implies q is within bounds */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 206 | if (iv_len < 7 || iv_len > 13) { | 
|  | 207 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 208 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 209 |  | 
| Mateusz Starzyk | 89d469c | 2021-06-22 16:24:28 +0200 | [diff] [blame] | 210 | ctx->mode = mode; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 211 | ctx->q = 16 - 1 - (unsigned char) iv_len; | 
|  | 212 |  | 
|  | 213 | /* | 
|  | 214 | * Prepare counter block for encryption: | 
|  | 215 | * 0        .. 0        flags | 
|  | 216 | * 1        .. iv_len   nonce (aka iv) | 
|  | 217 | * iv_len+1 .. 15       counter (initially 1) | 
|  | 218 | * | 
|  | 219 | * With flags as (bits): | 
|  | 220 | * 7 .. 3   0 | 
|  | 221 | * 2 .. 0   q - 1 | 
|  | 222 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 223 | memset(ctx->ctr, 0, 16); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 224 | ctx->ctr[0] = ctx->q - 1; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 225 | memcpy(ctx->ctr + 1, iv, iv_len); | 
|  | 226 | memset(ctx->ctr + 1 + iv_len, 0, ctx->q); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 227 | ctx->ctr[15] = 1; | 
|  | 228 |  | 
|  | 229 | /* | 
| Mateusz Starzyk | ca9dc8d | 2021-07-27 14:03:53 +0200 | [diff] [blame] | 230 | * See ccm_calculate_first_block_if_ready() for block layout description | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 231 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 232 | memcpy(ctx->y + 1, iv, iv_len); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 233 |  | 
|  | 234 | ctx->state |= CCM_STATE__STARTED; | 
| Mateusz Starzyk | ca9dc8d | 2021-07-27 14:03:53 +0200 | [diff] [blame] | 235 | return ccm_calculate_first_block_if_ready(ctx); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 236 | } | 
|  | 237 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 238 | int mbedtls_ccm_set_lengths(mbedtls_ccm_context *ctx, | 
|  | 239 | size_t total_ad_len, | 
|  | 240 | size_t plaintext_len, | 
|  | 241 | size_t tag_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 242 | { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 243 | /* | 
|  | 244 | * Check length requirements: SP800-38C A.1 | 
|  | 245 | * Additional requirement: a < 2^16 - 2^8 to simplify the code. | 
|  | 246 | * 'length' checked later (when writing it to the first block) | 
| Janos Follath | 997e85c | 2018-05-29 11:33:45 +0100 | [diff] [blame] | 247 | * | 
|  | 248 | * Also, loosen the requirements to enable support for CCM* (IEEE 802.15.4). | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 249 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 250 | if (tag_len == 2 || tag_len > 16 || tag_len % 2 != 0) { | 
|  | 251 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 252 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 253 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 254 | if (total_ad_len >= 0xFF00) { | 
|  | 255 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 256 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 257 |  | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 258 | ctx->plaintext_len = plaintext_len; | 
| Mateusz Starzyk | eb2ca96 | 2021-07-06 12:45:11 +0200 | [diff] [blame] | 259 | ctx->add_len = total_ad_len; | 
|  | 260 | ctx->tag_len = tag_len; | 
|  | 261 | ctx->processed = 0; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 262 |  | 
| bootstrap-prime | 6dbbf44 | 2022-05-17 19:30:44 -0400 | [diff] [blame] | 263 | ctx->state |= CCM_STATE__LENGTHS_SET; | 
| Mateusz Starzyk | ca9dc8d | 2021-07-27 14:03:53 +0200 | [diff] [blame] | 264 | return ccm_calculate_first_block_if_ready(ctx); | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 265 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 266 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 267 | int mbedtls_ccm_update_ad(mbedtls_ccm_context *ctx, | 
|  | 268 | const unsigned char *add, | 
|  | 269 | size_t add_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 270 | { | 
|  | 271 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 272 | size_t olen, use_len, offset; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 273 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 274 | if (ctx->state & CCM_STATE__ERROR) { | 
| Mateusz Starzyk | 64f0b5f | 2021-09-02 11:50:38 +0200 | [diff] [blame] | 275 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 2d5652a | 2021-07-27 16:07:54 +0200 | [diff] [blame] | 276 | } | 
|  | 277 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 278 | if (add_len > 0) { | 
|  | 279 | if (ctx->state & CCM_STATE__AUTH_DATA_FINISHED) { | 
| Mateusz Starzyk | 7251eda | 2021-09-01 13:26:44 +0200 | [diff] [blame] | 280 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 281 | } | 
|  | 282 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 283 | if (!(ctx->state & CCM_STATE__AUTH_DATA_STARTED)) { | 
|  | 284 | if (add_len > ctx->add_len) { | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 285 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 286 | } | 
|  | 287 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 288 | ctx->y[0] ^= (unsigned char) ((ctx->add_len >> 8) & 0xFF); | 
|  | 289 | ctx->y[1] ^= (unsigned char) ((ctx->add_len) & 0xFF); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 290 |  | 
| Mateusz Starzyk | 62d22f9 | 2021-08-09 15:53:41 +0200 | [diff] [blame] | 291 | ctx->state |= CCM_STATE__AUTH_DATA_STARTED; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 292 | } else if (ctx->processed + add_len > ctx->add_len) { | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 293 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 294 | } | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 295 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 296 | while (add_len > 0) { | 
| Mateusz Starzyk | 62d22f9 | 2021-08-09 15:53:41 +0200 | [diff] [blame] | 297 | offset = (ctx->processed + 2) % 16; /* account for y[0] and y[1] | 
|  | 298 | * holding total auth data length */ | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 299 | use_len = 16 - offset; | 
|  | 300 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 301 | if (use_len > add_len) { | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 302 | use_len = add_len; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 303 | } | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 304 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 305 | mbedtls_xor(ctx->y + offset, ctx->y + offset, add, use_len); | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 306 |  | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 307 | ctx->processed += use_len; | 
|  | 308 | add_len -= use_len; | 
|  | 309 | add += use_len; | 
|  | 310 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 311 | if (use_len + offset == 16 || ctx->processed == ctx->add_len) { | 
|  | 312 | if ((ret = | 
|  | 313 | mbedtls_cipher_update(&ctx->cipher_ctx, ctx->y, 16, ctx->y, &olen)) != 0) { | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 314 | ctx->state |= CCM_STATE__ERROR; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 315 | return ret; | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 316 | } | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 317 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 318 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 319 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 320 | if (ctx->processed == ctx->add_len) { | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 321 | ctx->state |= CCM_STATE__AUTH_DATA_FINISHED; | 
|  | 322 | ctx->processed = 0; // prepare for mbedtls_ccm_update() | 
|  | 323 | } | 
|  | 324 | } | 
| Mateusz Starzyk | 3339245 | 2021-07-06 15:38:35 +0200 | [diff] [blame] | 325 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 326 | return 0; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 327 | } | 
|  | 328 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 329 | int mbedtls_ccm_update(mbedtls_ccm_context *ctx, | 
|  | 330 | const unsigned char *input, size_t input_len, | 
|  | 331 | unsigned char *output, size_t output_size, | 
|  | 332 | size_t *output_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 333 | { | 
| Mateusz Starzyk | b73c3ec | 2021-08-09 15:55:38 +0200 | [diff] [blame] | 334 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 335 | unsigned char i; | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 336 | size_t use_len, offset, olen; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 337 |  | 
| Mateusz Starzyk | f337850 | 2021-08-09 11:32:11 +0200 | [diff] [blame] | 338 | unsigned char local_output[16]; | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 339 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 340 | if (ctx->state & CCM_STATE__ERROR) { | 
| Mateusz Starzyk | 64f0b5f | 2021-09-02 11:50:38 +0200 | [diff] [blame] | 341 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 2d5652a | 2021-07-27 16:07:54 +0200 | [diff] [blame] | 342 | } | 
|  | 343 |  | 
| Mateusz Starzyk | bb2ced3 | 2021-10-13 13:37:30 +0200 | [diff] [blame] | 344 | /* Check against plaintext length only if performing operation with | 
|  | 345 | * authentication | 
|  | 346 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 347 | if (ctx->tag_len != 0 && ctx->processed + input_len > ctx->plaintext_len) { | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 348 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 349 | } | 
|  | 350 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 351 | if (output_size < input_len) { | 
|  | 352 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
|  | 353 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 354 | *output_len = input_len; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 355 |  | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 356 | ret = 0; | 
|  | 357 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 358 | while (input_len > 0) { | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 359 | offset = ctx->processed % 16; | 
|  | 360 |  | 
|  | 361 | use_len = 16 - offset; | 
|  | 362 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 363 | if (use_len > input_len) { | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 364 | use_len = input_len; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 365 | } | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 366 |  | 
|  | 367 | ctx->processed += use_len; | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 368 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 369 | if (ctx->mode == MBEDTLS_CCM_ENCRYPT || \ | 
|  | 370 | ctx->mode == MBEDTLS_CCM_STAR_ENCRYPT) { | 
|  | 371 | mbedtls_xor(ctx->y + offset, ctx->y + offset, input, use_len); | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 372 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 373 | if (use_len + offset == 16 || ctx->processed == ctx->plaintext_len) { | 
|  | 374 | if ((ret = | 
|  | 375 | mbedtls_cipher_update(&ctx->cipher_ctx, ctx->y, 16, ctx->y, &olen)) != 0) { | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 376 | ctx->state |= CCM_STATE__ERROR; | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 377 | goto exit; | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 378 | } | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 379 | } | 
| Mateusz Starzyk | 663055f | 2021-07-12 19:13:52 +0200 | [diff] [blame] | 380 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 381 | ret = mbedtls_ccm_crypt(ctx, offset, use_len, input, output); | 
|  | 382 | if (ret != 0) { | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 383 | goto exit; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 384 | } | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 385 | } | 
|  | 386 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 387 | if (ctx->mode == MBEDTLS_CCM_DECRYPT || \ | 
|  | 388 | ctx->mode == MBEDTLS_CCM_STAR_DECRYPT) { | 
| Mateusz Starzyk | 2f17549 | 2021-08-09 16:05:14 +0200 | [diff] [blame] | 389 | /* Since output may be in shared memory, we cannot be sure that | 
|  | 390 | * it will contain what we wrote to it. Therefore, we should avoid using | 
|  | 391 | * it as input to any operations. | 
|  | 392 | * Write decrypted data to local_output to avoid using output variable as | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 393 | * input in the XOR operation for Y. | 
|  | 394 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 395 | ret = mbedtls_ccm_crypt(ctx, offset, use_len, input, local_output); | 
|  | 396 | if (ret != 0) { | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 397 | goto exit; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 398 | } | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 399 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 400 | mbedtls_xor(ctx->y + offset, ctx->y + offset, local_output, use_len); | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 401 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 402 | memcpy(output, local_output, use_len); | 
|  | 403 | mbedtls_platform_zeroize(local_output, 16); | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 404 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 405 | if (use_len + offset == 16 || ctx->processed == ctx->plaintext_len) { | 
|  | 406 | if ((ret = | 
|  | 407 | mbedtls_cipher_update(&ctx->cipher_ctx, ctx->y, 16, ctx->y, &olen)) != 0) { | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 408 | ctx->state |= CCM_STATE__ERROR; | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 409 | goto exit; | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 410 | } | 
|  | 411 | } | 
|  | 412 | } | 
|  | 413 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 414 | if (use_len + offset == 16 || ctx->processed == ctx->plaintext_len) { | 
|  | 415 | for (i = 0; i < ctx->q; i++) { | 
|  | 416 | if (++(ctx->ctr)[15-i] != 0) { | 
|  | 417 | break; | 
|  | 418 | } | 
|  | 419 | } | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 420 | } | 
| Mateusz Starzyk | 20bac2f | 2021-07-12 14:52:44 +0200 | [diff] [blame] | 421 |  | 
|  | 422 | input_len -= use_len; | 
|  | 423 | input += use_len; | 
|  | 424 | output += use_len; | 
| Mateusz Starzyk | 6a15bcf | 2021-07-07 13:41:30 +0200 | [diff] [blame] | 425 | } | 
|  | 426 |  | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 427 | exit: | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 428 | mbedtls_platform_zeroize(local_output, 16); | 
| Mateusz Starzyk | 22f7a35 | 2021-07-28 15:08:47 +0200 | [diff] [blame] | 429 |  | 
|  | 430 | return ret; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 431 | } | 
|  | 432 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 433 | int mbedtls_ccm_finish(mbedtls_ccm_context *ctx, | 
|  | 434 | unsigned char *tag, size_t tag_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 435 | { | 
| Mateusz Starzyk | b73c3ec | 2021-08-09 15:55:38 +0200 | [diff] [blame] | 436 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 437 | unsigned char i; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 438 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 439 | if (ctx->state & CCM_STATE__ERROR) { | 
| Mateusz Starzyk | 4f2dd8a | 2021-08-09 15:37:47 +0200 | [diff] [blame] | 440 | return MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Mateusz Starzyk | 2d5652a | 2021-07-27 16:07:54 +0200 | [diff] [blame] | 441 | } | 
|  | 442 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 443 | if (ctx->add_len > 0 && !(ctx->state & CCM_STATE__AUTH_DATA_FINISHED)) { | 
| Mateusz Starzyk | 7251eda | 2021-09-01 13:26:44 +0200 | [diff] [blame] | 444 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 445 | } | 
|  | 446 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 447 | if (ctx->plaintext_len > 0 && ctx->processed != ctx->plaintext_len) { | 
| Mateusz Starzyk | 7251eda | 2021-09-01 13:26:44 +0200 | [diff] [blame] | 448 | return MBEDTLS_ERR_CCM_BAD_INPUT; | 
| Mateusz Starzyk | 36d3b89 | 2021-07-28 14:14:58 +0200 | [diff] [blame] | 449 | } | 
|  | 450 |  | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 451 | /* | 
| Manuel Pégourié-Gonnard | aed6065 | 2014-05-07 13:14:42 +0200 | [diff] [blame] | 452 | * Authentication: reset counter and crypt/mask internal tag | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 453 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 454 | for (i = 0; i < ctx->q; i++) { | 
| Mateusz Starzyk | 89d469c | 2021-06-22 16:24:28 +0200 | [diff] [blame] | 455 | ctx->ctr[15-i] = 0; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 456 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 457 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 458 | ret = mbedtls_ccm_crypt(ctx, 0, 16, ctx->y, ctx->y); | 
|  | 459 | if (ret != 0) { | 
| Mateusz Starzyk | 2ad7d8e | 2021-07-07 11:05:45 +0200 | [diff] [blame] | 460 | return ret; | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 461 | } | 
|  | 462 | if (tag != NULL) { | 
|  | 463 | memcpy(tag, ctx->y, tag_len); | 
|  | 464 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 465 | mbedtls_ccm_clear_state(ctx); | 
|  | 466 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 467 | return 0; | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 468 | } | 
|  | 469 |  | 
|  | 470 | /* | 
|  | 471 | * Authenticated encryption or decryption | 
|  | 472 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 473 | static int ccm_auth_crypt(mbedtls_ccm_context *ctx, int mode, size_t length, | 
|  | 474 | const unsigned char *iv, size_t iv_len, | 
|  | 475 | const unsigned char *add, size_t add_len, | 
|  | 476 | const unsigned char *input, unsigned char *output, | 
|  | 477 | unsigned char *tag, size_t tag_len) | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 478 | { | 
|  | 479 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
|  | 480 | size_t olen; | 
|  | 481 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 482 | if ((ret = mbedtls_ccm_starts(ctx, mode, iv, iv_len)) != 0) { | 
|  | 483 | return ret; | 
|  | 484 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 485 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 486 | if ((ret = mbedtls_ccm_set_lengths(ctx, add_len, length, tag_len)) != 0) { | 
|  | 487 | return ret; | 
|  | 488 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 489 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 490 | if ((ret = mbedtls_ccm_update_ad(ctx, add, add_len)) != 0) { | 
|  | 491 | return ret; | 
|  | 492 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 493 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 494 | if ((ret = mbedtls_ccm_update(ctx, input, length, | 
|  | 495 | output, length, &olen)) != 0) { | 
|  | 496 | return ret; | 
|  | 497 | } | 
| Mateusz Starzyk | 793692c | 2021-06-22 20:34:20 +0200 | [diff] [blame] | 498 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 499 | if ((ret = mbedtls_ccm_finish(ctx, tag, tag_len)) != 0) { | 
|  | 500 | return ret; | 
|  | 501 | } | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 502 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 503 | return 0; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 504 | } | 
|  | 505 |  | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 506 | /* | 
|  | 507 | * Authenticated encryption | 
|  | 508 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 509 | int mbedtls_ccm_star_encrypt_and_tag(mbedtls_ccm_context *ctx, size_t length, | 
|  | 510 | const unsigned char *iv, size_t iv_len, | 
|  | 511 | const unsigned char *add, size_t add_len, | 
|  | 512 | const unsigned char *input, unsigned char *output, | 
|  | 513 | unsigned char *tag, size_t tag_len) | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 514 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 515 | return ccm_auth_crypt(ctx, MBEDTLS_CCM_STAR_ENCRYPT, length, iv, iv_len, | 
|  | 516 | add, add_len, input, output, tag, tag_len); | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 517 | } | 
|  | 518 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 519 | int mbedtls_ccm_encrypt_and_tag(mbedtls_ccm_context *ctx, size_t length, | 
|  | 520 | const unsigned char *iv, size_t iv_len, | 
|  | 521 | const unsigned char *add, size_t add_len, | 
|  | 522 | const unsigned char *input, unsigned char *output, | 
|  | 523 | unsigned char *tag, size_t tag_len) | 
| Janos Follath | b5734a2 | 2018-05-14 14:31:49 +0100 | [diff] [blame] | 524 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 525 | return ccm_auth_crypt(ctx, MBEDTLS_CCM_ENCRYPT, length, iv, iv_len, | 
|  | 526 | add, add_len, input, output, tag, tag_len); | 
| Mateusz Starzyk | 05e92d6 | 2021-07-09 12:44:07 +0200 | [diff] [blame] | 527 | } | 
| Janos Follath | b5734a2 | 2018-05-14 14:31:49 +0100 | [diff] [blame] | 528 |  | 
| Mateusz Starzyk | eb395c0 | 2021-07-28 15:10:54 +0200 | [diff] [blame] | 529 | /* | 
|  | 530 | * Authenticated decryption | 
|  | 531 | */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 532 | static int mbedtls_ccm_compare_tags(const unsigned char *tag1, | 
|  | 533 | const unsigned char *tag2, | 
|  | 534 | size_t tag_len) | 
| Mateusz Starzyk | 05e92d6 | 2021-07-09 12:44:07 +0200 | [diff] [blame] | 535 | { | 
|  | 536 | unsigned char i; | 
|  | 537 | int diff; | 
|  | 538 |  | 
|  | 539 | /* Check tag in "constant-time" */ | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 540 | for (diff = 0, i = 0; i < tag_len; i++) { | 
| Mateusz Starzyk | 05e92d6 | 2021-07-09 12:44:07 +0200 | [diff] [blame] | 541 | diff |= tag1[i] ^ tag2[i]; | 
| Mateusz Starzyk | 05e92d6 | 2021-07-09 12:44:07 +0200 | [diff] [blame] | 542 | } | 
|  | 543 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 544 | if (diff != 0) { | 
|  | 545 | return MBEDTLS_ERR_CCM_AUTH_FAILED; | 
|  | 546 | } | 
|  | 547 |  | 
|  | 548 | return 0; | 
| Janos Follath | b5734a2 | 2018-05-14 14:31:49 +0100 | [diff] [blame] | 549 | } | 
|  | 550 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 551 | static int ccm_auth_decrypt(mbedtls_ccm_context *ctx, int mode, size_t length, | 
|  | 552 | const unsigned char *iv, size_t iv_len, | 
|  | 553 | const unsigned char *add, size_t add_len, | 
|  | 554 | const unsigned char *input, unsigned char *output, | 
|  | 555 | const unsigned char *tag, size_t tag_len) | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 556 | { | 
| Janos Follath | 24eed8d | 2019-11-22 13:21:35 +0000 | [diff] [blame] | 557 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 558 | unsigned char check_tag[16]; | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 559 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 560 | if ((ret = ccm_auth_crypt(ctx, mode, length, | 
|  | 561 | iv, iv_len, add, add_len, | 
|  | 562 | input, output, check_tag, tag_len)) != 0) { | 
|  | 563 | return ret; | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 564 | } | 
|  | 565 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 566 | if ((ret = mbedtls_ccm_compare_tags(tag, check_tag, tag_len)) != 0) { | 
|  | 567 | mbedtls_platform_zeroize(output, length); | 
|  | 568 | return ret; | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 569 | } | 
|  | 570 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 571 | return 0; | 
| Manuel Pégourié-Gonnard | 0023233 | 2014-05-06 15:56:07 +0200 | [diff] [blame] | 572 | } | 
|  | 573 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 574 | int mbedtls_ccm_star_auth_decrypt(mbedtls_ccm_context *ctx, size_t length, | 
|  | 575 | const unsigned char *iv, size_t iv_len, | 
|  | 576 | const unsigned char *add, size_t add_len, | 
|  | 577 | const unsigned char *input, unsigned char *output, | 
|  | 578 | const unsigned char *tag, size_t tag_len) | 
| Mateusz Starzyk | 1bda945 | 2021-07-28 15:21:46 +0200 | [diff] [blame] | 579 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 580 | return ccm_auth_decrypt(ctx, MBEDTLS_CCM_STAR_DECRYPT, length, | 
|  | 581 | iv, iv_len, add, add_len, | 
|  | 582 | input, output, tag, tag_len); | 
| Mateusz Starzyk | 1bda945 | 2021-07-28 15:21:46 +0200 | [diff] [blame] | 583 | } | 
|  | 584 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 585 | int mbedtls_ccm_auth_decrypt(mbedtls_ccm_context *ctx, size_t length, | 
|  | 586 | const unsigned char *iv, size_t iv_len, | 
|  | 587 | const unsigned char *add, size_t add_len, | 
|  | 588 | const unsigned char *input, unsigned char *output, | 
|  | 589 | const unsigned char *tag, size_t tag_len) | 
| Janos Follath | b5734a2 | 2018-05-14 14:31:49 +0100 | [diff] [blame] | 590 | { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 591 | return ccm_auth_decrypt(ctx, MBEDTLS_CCM_DECRYPT, length, | 
|  | 592 | iv, iv_len, add, add_len, | 
|  | 593 | input, output, tag, tag_len); | 
| Janos Follath | b5734a2 | 2018-05-14 14:31:49 +0100 | [diff] [blame] | 594 | } | 
| Steven Cooreman | 222e2ff | 2017-04-04 11:37:15 +0200 | [diff] [blame] | 595 | #endif /* !MBEDTLS_CCM_ALT */ | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 596 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 597 | #if defined(MBEDTLS_SELF_TEST) && defined(MBEDTLS_AES_C) | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 598 | /* | 
|  | 599 | * Examples 1 to 3 from SP800-38C Appendix C | 
|  | 600 | */ | 
|  | 601 |  | 
|  | 602 | #define NB_TESTS 3 | 
| Ron Eldor | 1b9b217 | 2018-04-26 14:15:01 +0300 | [diff] [blame] | 603 | #define CCM_SELFTEST_PT_MAX_LEN 24 | 
|  | 604 | #define CCM_SELFTEST_CT_MAX_LEN 32 | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 605 | /* | 
|  | 606 | * The data is the same for all tests, only the used length changes | 
|  | 607 | */ | 
| Michał Janiszewski | c79e92b | 2018-10-31 20:43:05 +0100 | [diff] [blame] | 608 | static const unsigned char key_test_data[] = { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 609 | 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, | 
|  | 610 | 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f | 
|  | 611 | }; | 
|  | 612 |  | 
| Michał Janiszewski | c79e92b | 2018-10-31 20:43:05 +0100 | [diff] [blame] | 613 | static const unsigned char iv_test_data[] = { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 614 | 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, | 
|  | 615 | 0x18, 0x19, 0x1a, 0x1b | 
|  | 616 | }; | 
|  | 617 |  | 
| Michał Janiszewski | c79e92b | 2018-10-31 20:43:05 +0100 | [diff] [blame] | 618 | static const unsigned char ad_test_data[] = { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 619 | 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, | 
|  | 620 | 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, | 
|  | 621 | 0x10, 0x11, 0x12, 0x13 | 
|  | 622 | }; | 
|  | 623 |  | 
| Michał Janiszewski | c79e92b | 2018-10-31 20:43:05 +0100 | [diff] [blame] | 624 | static const unsigned char msg_test_data[CCM_SELFTEST_PT_MAX_LEN] = { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 625 | 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, | 
|  | 626 | 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, | 
|  | 627 | 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, | 
|  | 628 | }; | 
|  | 629 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 630 | static const size_t iv_len_test_data[NB_TESTS] = { 7, 8,  12 }; | 
| Michał Janiszewski | 9aeea93 | 2018-10-30 23:00:15 +0100 | [diff] [blame] | 631 | static const size_t add_len_test_data[NB_TESTS] = { 8, 16, 20 }; | 
|  | 632 | static const size_t msg_len_test_data[NB_TESTS] = { 4, 16, 24 }; | 
|  | 633 | static const size_t tag_len_test_data[NB_TESTS] = { 4, 6,  8  }; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 634 |  | 
| Michał Janiszewski | c79e92b | 2018-10-31 20:43:05 +0100 | [diff] [blame] | 635 | static const unsigned char res_test_data[NB_TESTS][CCM_SELFTEST_CT_MAX_LEN] = { | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 636 | {   0x71, 0x62, 0x01, 0x5b, 0x4d, 0xac, 0x25, 0x5d }, | 
|  | 637 | {   0xd2, 0xa1, 0xf0, 0xe0, 0x51, 0xea, 0x5f, 0x62, | 
|  | 638 | 0x08, 0x1a, 0x77, 0x92, 0x07, 0x3d, 0x59, 0x3d, | 
|  | 639 | 0x1f, 0xc6, 0x4f, 0xbf, 0xac, 0xcd }, | 
|  | 640 | {   0xe3, 0xb2, 0x01, 0xa9, 0xf5, 0xb7, 0x1a, 0x7a, | 
|  | 641 | 0x9b, 0x1c, 0xea, 0xec, 0xcd, 0x97, 0xe7, 0x0b, | 
|  | 642 | 0x61, 0x76, 0xaa, 0xd9, 0xa4, 0x42, 0x8a, 0xa5, | 
|  | 643 | 0x48, 0x43, 0x92, 0xfb, 0xc1, 0xb0, 0x99, 0x51 } | 
|  | 644 | }; | 
|  | 645 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 646 | int mbedtls_ccm_self_test(int verbose) | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 647 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 648 | mbedtls_ccm_context ctx; | 
| Ron Eldor | 1b9b217 | 2018-04-26 14:15:01 +0300 | [diff] [blame] | 649 | /* | 
|  | 650 | * Some hardware accelerators require the input and output buffers | 
|  | 651 | * would be in RAM, because the flash is not accessible. | 
|  | 652 | * Use buffers on the stack to hold the test vectors data. | 
|  | 653 | */ | 
|  | 654 | unsigned char plaintext[CCM_SELFTEST_PT_MAX_LEN]; | 
|  | 655 | unsigned char ciphertext[CCM_SELFTEST_CT_MAX_LEN]; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 656 | size_t i; | 
| Janos Follath | 24eed8d | 2019-11-22 13:21:35 +0000 | [diff] [blame] | 657 | int ret = MBEDTLS_ERR_ERROR_CORRUPTION_DETECTED; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 658 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 659 | mbedtls_ccm_init(&ctx); | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 660 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 661 | if (mbedtls_ccm_setkey(&ctx, MBEDTLS_CIPHER_ID_AES, key_test_data, | 
| Dave Rodgman | 6dd757a | 2023-02-02 12:40:50 +0000 | [diff] [blame] | 662 | 8 * sizeof(key_test_data)) != 0) { | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 663 | if (verbose != 0) { | 
|  | 664 | mbedtls_printf("  CCM: setup failed"); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 665 | } | 
|  | 666 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 667 | return 1; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 668 | } | 
|  | 669 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 670 | for (i = 0; i < NB_TESTS; i++) { | 
|  | 671 | if (verbose != 0) { | 
|  | 672 | mbedtls_printf("  CCM-AES #%u: ", (unsigned int) i + 1); | 
|  | 673 | } | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 674 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 675 | memset(plaintext, 0, CCM_SELFTEST_PT_MAX_LEN); | 
|  | 676 | memset(ciphertext, 0, CCM_SELFTEST_CT_MAX_LEN); | 
|  | 677 | memcpy(plaintext, msg_test_data, msg_len_test_data[i]); | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 678 |  | 
| Gilles Peskine | 449bd83 | 2023-01-11 14:50:10 +0100 | [diff] [blame] | 679 | ret = mbedtls_ccm_encrypt_and_tag(&ctx, msg_len_test_data[i], | 
|  | 680 | iv_test_data, iv_len_test_data[i], | 
|  | 681 | ad_test_data, add_len_test_data[i], | 
|  | 682 | plaintext, ciphertext, | 
|  | 683 | ciphertext + msg_len_test_data[i], | 
|  | 684 | tag_len_test_data[i]); | 
|  | 685 |  | 
|  | 686 | if (ret != 0 || | 
|  | 687 | memcmp(ciphertext, res_test_data[i], | 
|  | 688 | msg_len_test_data[i] + tag_len_test_data[i]) != 0) { | 
|  | 689 | if (verbose != 0) { | 
|  | 690 | mbedtls_printf("failed\n"); | 
|  | 691 | } | 
|  | 692 |  | 
|  | 693 | return 1; | 
|  | 694 | } | 
|  | 695 | memset(plaintext, 0, CCM_SELFTEST_PT_MAX_LEN); | 
|  | 696 |  | 
|  | 697 | ret = mbedtls_ccm_auth_decrypt(&ctx, msg_len_test_data[i], | 
|  | 698 | iv_test_data, iv_len_test_data[i], | 
|  | 699 | ad_test_data, add_len_test_data[i], | 
|  | 700 | ciphertext, plaintext, | 
|  | 701 | ciphertext + msg_len_test_data[i], | 
|  | 702 | tag_len_test_data[i]); | 
|  | 703 |  | 
|  | 704 | if (ret != 0 || | 
|  | 705 | memcmp(plaintext, msg_test_data, msg_len_test_data[i]) != 0) { | 
|  | 706 | if (verbose != 0) { | 
|  | 707 | mbedtls_printf("failed\n"); | 
|  | 708 | } | 
|  | 709 |  | 
|  | 710 | return 1; | 
|  | 711 | } | 
|  | 712 |  | 
|  | 713 | if (verbose != 0) { | 
|  | 714 | mbedtls_printf("passed\n"); | 
|  | 715 | } | 
|  | 716 | } | 
|  | 717 |  | 
|  | 718 | mbedtls_ccm_free(&ctx); | 
|  | 719 |  | 
|  | 720 | if (verbose != 0) { | 
|  | 721 | mbedtls_printf("\n"); | 
|  | 722 | } | 
|  | 723 |  | 
|  | 724 | return 0; | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 725 | } | 
|  | 726 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 727 | #endif /* MBEDTLS_SELF_TEST && MBEDTLS_AES_C */ | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 728 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 729 | #endif /* MBEDTLS_CCM_C */ |