Kev Mann / mbed-dev-OS5_10_4

RTC auf true

features/mbedtls/src/chachapoly.c@2:7aab896b1a3b, 2019-03-13 (annotated)

Committer:
kevman
Date:
Wed Mar 13 11:03:24 2019 +0000
Revision:
2:7aab896b1a3b
Parent:
0:38ceb79fef03 
2019-03-13

Who changed what in which revision?

UserRevisionLine numberNew contents of line
kevman 0:38ceb79fef03 1 /**
kevman 0:38ceb79fef03 2 * \file chachapoly.c
kevman 0:38ceb79fef03 3 *
kevman 0:38ceb79fef03 4 * \brief ChaCha20-Poly1305 AEAD construction based on RFC 7539.
kevman 0:38ceb79fef03 5 *
kevman 0:38ceb79fef03 6 * Copyright (C) 2006-2016, ARM Limited, All Rights Reserved
kevman 0:38ceb79fef03 7 * SPDX-License-Identifier: Apache-2.0
kevman 0:38ceb79fef03 8 *
kevman 0:38ceb79fef03 9 * Licensed under the Apache License, Version 2.0 (the "License"); you may
kevman 0:38ceb79fef03 10 * not use this file except in compliance with the License.
kevman 0:38ceb79fef03 11 * You may obtain a copy of the License at
kevman 0:38ceb79fef03 12 *
kevman 0:38ceb79fef03 13 * http://www.apache.org/licenses/LICENSE-2.0
kevman 0:38ceb79fef03 14 *
kevman 0:38ceb79fef03 15 * Unless required by applicable law or agreed to in writing, software
kevman 0:38ceb79fef03 16 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
kevman 0:38ceb79fef03 17 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
kevman 0:38ceb79fef03 18 * See the License for the specific language governing permissions and
kevman 0:38ceb79fef03 19 * limitations under the License.
kevman 0:38ceb79fef03 20 *
kevman 0:38ceb79fef03 21 * This file is part of mbed TLS (https://tls.mbed.org)
kevman 0:38ceb79fef03 22 */
kevman 0:38ceb79fef03 23 #if !defined(MBEDTLS_CONFIG_FILE)
kevman 0:38ceb79fef03 24 #include "mbedtls/config.h"
kevman 0:38ceb79fef03 25 #else
kevman 0:38ceb79fef03 26 #include MBEDTLS_CONFIG_FILE
kevman 0:38ceb79fef03 27 #endif
kevman 0:38ceb79fef03 28
kevman 0:38ceb79fef03 29 #if defined(MBEDTLS_CHACHAPOLY_C)
kevman 0:38ceb79fef03 30
kevman 0:38ceb79fef03 31 #include "mbedtls/chachapoly.h"
kevman 0:38ceb79fef03 32 #include "mbedtls/platform_util.h"
kevman 0:38ceb79fef03 33
kevman 0:38ceb79fef03 34 #include <string.h>
kevman 0:38ceb79fef03 35
kevman 0:38ceb79fef03 36 #if defined(MBEDTLS_SELF_TEST)
kevman 0:38ceb79fef03 37 #if defined(MBEDTLS_PLATFORM_C)
kevman 0:38ceb79fef03 38 #include "mbedtls/platform.h"
kevman 0:38ceb79fef03 39 #else
kevman 0:38ceb79fef03 40 #include <stdio.h>
kevman 0:38ceb79fef03 41 #define mbedtls_printf printf
kevman 0:38ceb79fef03 42 #endif /* MBEDTLS_PLATFORM_C */
kevman 0:38ceb79fef03 43 #endif /* MBEDTLS_SELF_TEST */
kevman 0:38ceb79fef03 44
kevman 0:38ceb79fef03 45 #if !defined(MBEDTLS_CHACHAPOLY_ALT)
kevman 0:38ceb79fef03 46
kevman 0:38ceb79fef03 47 #define CHACHAPOLY_STATE_INIT ( 0 )
kevman 0:38ceb79fef03 48 #define CHACHAPOLY_STATE_AAD ( 1 )
kevman 0:38ceb79fef03 49 #define CHACHAPOLY_STATE_CIPHERTEXT ( 2 ) /* Encrypting or decrypting */
kevman 0:38ceb79fef03 50 #define CHACHAPOLY_STATE_FINISHED ( 3 )
kevman 0:38ceb79fef03 51
kevman 0:38ceb79fef03 52 /**
kevman 0:38ceb79fef03 53 * \brief Adds nul bytes to pad the AAD for Poly1305.
kevman 0:38ceb79fef03 54 *
kevman 0:38ceb79fef03 55 * \param ctx The ChaCha20-Poly1305 context.
kevman 0:38ceb79fef03 56 */
kevman 0:38ceb79fef03 57 static int chachapoly_pad_aad( mbedtls_chachapoly_context *ctx )
kevman 0:38ceb79fef03 58 {
kevman 0:38ceb79fef03 59 uint32_t partial_block_len = (uint32_t) ( ctx->aad_len % 16U );
kevman 0:38ceb79fef03 60 unsigned char zeroes[15];
kevman 0:38ceb79fef03 61
kevman 0:38ceb79fef03 62 if( partial_block_len == 0U )
kevman 0:38ceb79fef03 63 return( 0 );
kevman 0:38ceb79fef03 64
kevman 0:38ceb79fef03 65 memset( zeroes, 0, sizeof( zeroes ) );
kevman 0:38ceb79fef03 66
kevman 0:38ceb79fef03 67 return( mbedtls_poly1305_update( &ctx->poly1305_ctx,
kevman 0:38ceb79fef03 68 zeroes,
kevman 0:38ceb79fef03 69 16U - partial_block_len ) );
kevman 0:38ceb79fef03 70 }
kevman 0:38ceb79fef03 71
kevman 0:38ceb79fef03 72 /**
kevman 0:38ceb79fef03 73 * \brief Adds nul bytes to pad the ciphertext for Poly1305.
kevman 0:38ceb79fef03 74 *
kevman 0:38ceb79fef03 75 * \param ctx The ChaCha20-Poly1305 context.
kevman 0:38ceb79fef03 76 */
kevman 0:38ceb79fef03 77 static int chachapoly_pad_ciphertext( mbedtls_chachapoly_context *ctx )
kevman 0:38ceb79fef03 78 {
kevman 0:38ceb79fef03 79 uint32_t partial_block_len = (uint32_t) ( ctx->ciphertext_len % 16U );
kevman 0:38ceb79fef03 80 unsigned char zeroes[15];
kevman 0:38ceb79fef03 81
kevman 0:38ceb79fef03 82 if( partial_block_len == 0U )
kevman 0:38ceb79fef03 83 return( 0 );
kevman 0:38ceb79fef03 84
kevman 0:38ceb79fef03 85 memset( zeroes, 0, sizeof( zeroes ) );
kevman 0:38ceb79fef03 86 return( mbedtls_poly1305_update( &ctx->poly1305_ctx,
kevman 0:38ceb79fef03 87 zeroes,
kevman 0:38ceb79fef03 88 16U - partial_block_len ) );
kevman 0:38ceb79fef03 89 }
kevman 0:38ceb79fef03 90
kevman 0:38ceb79fef03 91 void mbedtls_chachapoly_init( mbedtls_chachapoly_context *ctx )
kevman 0:38ceb79fef03 92 {
kevman 0:38ceb79fef03 93 if( ctx != NULL )
kevman 0:38ceb79fef03 94 {
kevman 0:38ceb79fef03 95 mbedtls_chacha20_init( &ctx->chacha20_ctx );
kevman 0:38ceb79fef03 96 mbedtls_poly1305_init( &ctx->poly1305_ctx );
kevman 0:38ceb79fef03 97 ctx->aad_len = 0U;
kevman 0:38ceb79fef03 98 ctx->ciphertext_len = 0U;
kevman 0:38ceb79fef03 99 ctx->state = CHACHAPOLY_STATE_INIT;
kevman 0:38ceb79fef03 100 ctx->mode = MBEDTLS_CHACHAPOLY_ENCRYPT;
kevman 0:38ceb79fef03 101 }
kevman 0:38ceb79fef03 102 }
kevman 0:38ceb79fef03 103
kevman 0:38ceb79fef03 104 void mbedtls_chachapoly_free( mbedtls_chachapoly_context *ctx )
kevman 0:38ceb79fef03 105 {
kevman 0:38ceb79fef03 106 if( ctx != NULL )
kevman 0:38ceb79fef03 107 {
kevman 0:38ceb79fef03 108 mbedtls_chacha20_free( &ctx->chacha20_ctx );
kevman 0:38ceb79fef03 109 mbedtls_poly1305_free( &ctx->poly1305_ctx );
kevman 0:38ceb79fef03 110 ctx->aad_len = 0U;
kevman 0:38ceb79fef03 111 ctx->ciphertext_len = 0U;
kevman 0:38ceb79fef03 112 ctx->state = CHACHAPOLY_STATE_INIT;
kevman 0:38ceb79fef03 113 ctx->mode = MBEDTLS_CHACHAPOLY_ENCRYPT;
kevman 0:38ceb79fef03 114 }
kevman 0:38ceb79fef03 115 }
kevman 0:38ceb79fef03 116
kevman 0:38ceb79fef03 117 int mbedtls_chachapoly_setkey( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 118 const unsigned char key[32] )
kevman 0:38ceb79fef03 119 {
kevman 0:38ceb79fef03 120 int ret;
kevman 0:38ceb79fef03 121
kevman 0:38ceb79fef03 122 if( ( ctx == NULL ) || ( key == NULL ) )
kevman 0:38ceb79fef03 123 {
kevman 0:38ceb79fef03 124 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 125 }
kevman 0:38ceb79fef03 126
kevman 0:38ceb79fef03 127 ret = mbedtls_chacha20_setkey( &ctx->chacha20_ctx, key );
kevman 0:38ceb79fef03 128
kevman 0:38ceb79fef03 129 return( ret );
kevman 0:38ceb79fef03 130 }
kevman 0:38ceb79fef03 131
kevman 0:38ceb79fef03 132 int mbedtls_chachapoly_starts( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 133 const unsigned char nonce[12],
kevman 0:38ceb79fef03 134 mbedtls_chachapoly_mode_t mode )
kevman 0:38ceb79fef03 135 {
kevman 0:38ceb79fef03 136 int ret;
kevman 0:38ceb79fef03 137 unsigned char poly1305_key[64];
kevman 0:38ceb79fef03 138
kevman 0:38ceb79fef03 139 if( ( ctx == NULL ) || ( nonce == NULL ) )
kevman 0:38ceb79fef03 140 {
kevman 0:38ceb79fef03 141 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 142 }
kevman 0:38ceb79fef03 143
kevman 0:38ceb79fef03 144 /* Set counter = 0, will be update to 1 when generating Poly1305 key */
kevman 0:38ceb79fef03 145 ret = mbedtls_chacha20_starts( &ctx->chacha20_ctx, nonce, 0U );
kevman 0:38ceb79fef03 146 if( ret != 0 )
kevman 0:38ceb79fef03 147 goto cleanup;
kevman 0:38ceb79fef03 148
kevman 0:38ceb79fef03 149 /* Generate the Poly1305 key by getting the ChaCha20 keystream output with
kevman 0:38ceb79fef03 150 * counter = 0. This is the same as encrypting a buffer of zeroes.
kevman 0:38ceb79fef03 151 * Only the first 256-bits (32 bytes) of the key is used for Poly1305.
kevman 0:38ceb79fef03 152 * The other 256 bits are discarded.
kevman 0:38ceb79fef03 153 */
kevman 0:38ceb79fef03 154 memset( poly1305_key, 0, sizeof( poly1305_key ) );
kevman 0:38ceb79fef03 155 ret = mbedtls_chacha20_update( &ctx->chacha20_ctx, sizeof( poly1305_key ),
kevman 0:38ceb79fef03 156 poly1305_key, poly1305_key );
kevman 0:38ceb79fef03 157 if( ret != 0 )
kevman 0:38ceb79fef03 158 goto cleanup;
kevman 0:38ceb79fef03 159
kevman 0:38ceb79fef03 160 ret = mbedtls_poly1305_starts( &ctx->poly1305_ctx, poly1305_key );
kevman 0:38ceb79fef03 161
kevman 0:38ceb79fef03 162 if( ret == 0 )
kevman 0:38ceb79fef03 163 {
kevman 0:38ceb79fef03 164 ctx->aad_len = 0U;
kevman 0:38ceb79fef03 165 ctx->ciphertext_len = 0U;
kevman 0:38ceb79fef03 166 ctx->state = CHACHAPOLY_STATE_AAD;
kevman 0:38ceb79fef03 167 ctx->mode = mode;
kevman 0:38ceb79fef03 168 }
kevman 0:38ceb79fef03 169
kevman 0:38ceb79fef03 170 cleanup:
kevman 0:38ceb79fef03 171 mbedtls_platform_zeroize( poly1305_key, 64U );
kevman 0:38ceb79fef03 172 return( ret );
kevman 0:38ceb79fef03 173 }
kevman 0:38ceb79fef03 174
kevman 0:38ceb79fef03 175 int mbedtls_chachapoly_update_aad( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 176 const unsigned char *aad,
kevman 0:38ceb79fef03 177 size_t aad_len )
kevman 0:38ceb79fef03 178 {
kevman 0:38ceb79fef03 179 if( ctx == NULL )
kevman 0:38ceb79fef03 180 {
kevman 0:38ceb79fef03 181 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 182 }
kevman 0:38ceb79fef03 183 else if( ( aad_len > 0U ) && ( aad == NULL ) )
kevman 0:38ceb79fef03 184 {
kevman 0:38ceb79fef03 185 /* aad pointer is allowed to be NULL if aad_len == 0 */
kevman 0:38ceb79fef03 186 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 187 }
kevman 0:38ceb79fef03 188 else if( ctx->state != CHACHAPOLY_STATE_AAD )
kevman 0:38ceb79fef03 189 {
kevman 0:38ceb79fef03 190 return( MBEDTLS_ERR_CHACHAPOLY_BAD_STATE );
kevman 0:38ceb79fef03 191 }
kevman 0:38ceb79fef03 192
kevman 0:38ceb79fef03 193 ctx->aad_len += aad_len;
kevman 0:38ceb79fef03 194
kevman 0:38ceb79fef03 195 return( mbedtls_poly1305_update( &ctx->poly1305_ctx, aad, aad_len ) );
kevman 0:38ceb79fef03 196 }
kevman 0:38ceb79fef03 197
kevman 0:38ceb79fef03 198 int mbedtls_chachapoly_update( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 199 size_t len,
kevman 0:38ceb79fef03 200 const unsigned char *input,
kevman 0:38ceb79fef03 201 unsigned char *output )
kevman 0:38ceb79fef03 202 {
kevman 0:38ceb79fef03 203 int ret;
kevman 0:38ceb79fef03 204
kevman 0:38ceb79fef03 205 if( ctx == NULL )
kevman 0:38ceb79fef03 206 {
kevman 0:38ceb79fef03 207 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 208 }
kevman 0:38ceb79fef03 209 else if( ( len > 0U ) && ( ( input == NULL ) || ( output == NULL ) ) )
kevman 0:38ceb79fef03 210 {
kevman 0:38ceb79fef03 211 /* input and output pointers are allowed to be NULL if len == 0 */
kevman 0:38ceb79fef03 212 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 213 }
kevman 0:38ceb79fef03 214 else if( ( ctx->state != CHACHAPOLY_STATE_AAD ) &&
kevman 0:38ceb79fef03 215 ( ctx->state != CHACHAPOLY_STATE_CIPHERTEXT ) )
kevman 0:38ceb79fef03 216 {
kevman 0:38ceb79fef03 217 return( MBEDTLS_ERR_CHACHAPOLY_BAD_STATE );
kevman 0:38ceb79fef03 218 }
kevman 0:38ceb79fef03 219
kevman 0:38ceb79fef03 220 if( ctx->state == CHACHAPOLY_STATE_AAD )
kevman 0:38ceb79fef03 221 {
kevman 0:38ceb79fef03 222 ctx->state = CHACHAPOLY_STATE_CIPHERTEXT;
kevman 0:38ceb79fef03 223
kevman 0:38ceb79fef03 224 ret = chachapoly_pad_aad( ctx );
kevman 0:38ceb79fef03 225 if( ret != 0 )
kevman 0:38ceb79fef03 226 return( ret );
kevman 0:38ceb79fef03 227 }
kevman 0:38ceb79fef03 228
kevman 0:38ceb79fef03 229 ctx->ciphertext_len += len;
kevman 0:38ceb79fef03 230
kevman 0:38ceb79fef03 231 if( ctx->mode == MBEDTLS_CHACHAPOLY_ENCRYPT )
kevman 0:38ceb79fef03 232 {
kevman 0:38ceb79fef03 233 ret = mbedtls_chacha20_update( &ctx->chacha20_ctx, len, input, output );
kevman 0:38ceb79fef03 234 if( ret != 0 )
kevman 0:38ceb79fef03 235 return( ret );
kevman 0:38ceb79fef03 236
kevman 0:38ceb79fef03 237 ret = mbedtls_poly1305_update( &ctx->poly1305_ctx, output, len );
kevman 0:38ceb79fef03 238 if( ret != 0 )
kevman 0:38ceb79fef03 239 return( ret );
kevman 0:38ceb79fef03 240 }
kevman 0:38ceb79fef03 241 else /* DECRYPT */
kevman 0:38ceb79fef03 242 {
kevman 0:38ceb79fef03 243 ret = mbedtls_poly1305_update( &ctx->poly1305_ctx, input, len );
kevman 0:38ceb79fef03 244 if( ret != 0 )
kevman 0:38ceb79fef03 245 return( ret );
kevman 0:38ceb79fef03 246
kevman 0:38ceb79fef03 247 ret = mbedtls_chacha20_update( &ctx->chacha20_ctx, len, input, output );
kevman 0:38ceb79fef03 248 if( ret != 0 )
kevman 0:38ceb79fef03 249 return( ret );
kevman 0:38ceb79fef03 250 }
kevman 0:38ceb79fef03 251
kevman 0:38ceb79fef03 252 return( 0 );
kevman 0:38ceb79fef03 253 }
kevman 0:38ceb79fef03 254
kevman 0:38ceb79fef03 255 int mbedtls_chachapoly_finish( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 256 unsigned char mac[16] )
kevman 0:38ceb79fef03 257 {
kevman 0:38ceb79fef03 258 int ret;
kevman 0:38ceb79fef03 259 unsigned char len_block[16];
kevman 0:38ceb79fef03 260
kevman 0:38ceb79fef03 261 if( ( ctx == NULL ) || ( mac == NULL ) )
kevman 0:38ceb79fef03 262 {
kevman 0:38ceb79fef03 263 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 264 }
kevman 0:38ceb79fef03 265 else if( ctx->state == CHACHAPOLY_STATE_INIT )
kevman 0:38ceb79fef03 266 {
kevman 0:38ceb79fef03 267 return( MBEDTLS_ERR_CHACHAPOLY_BAD_STATE );
kevman 0:38ceb79fef03 268 }
kevman 0:38ceb79fef03 269
kevman 0:38ceb79fef03 270 if( ctx->state == CHACHAPOLY_STATE_AAD )
kevman 0:38ceb79fef03 271 {
kevman 0:38ceb79fef03 272 ret = chachapoly_pad_aad( ctx );
kevman 0:38ceb79fef03 273 if( ret != 0 )
kevman 0:38ceb79fef03 274 return( ret );
kevman 0:38ceb79fef03 275 }
kevman 0:38ceb79fef03 276 else if( ctx->state == CHACHAPOLY_STATE_CIPHERTEXT )
kevman 0:38ceb79fef03 277 {
kevman 0:38ceb79fef03 278 ret = chachapoly_pad_ciphertext( ctx );
kevman 0:38ceb79fef03 279 if( ret != 0 )
kevman 0:38ceb79fef03 280 return( ret );
kevman 0:38ceb79fef03 281 }
kevman 0:38ceb79fef03 282
kevman 0:38ceb79fef03 283 ctx->state = CHACHAPOLY_STATE_FINISHED;
kevman 0:38ceb79fef03 284
kevman 0:38ceb79fef03 285 /* The lengths of the AAD and ciphertext are processed by
kevman 0:38ceb79fef03 286 * Poly1305 as the final 128-bit block, encoded as little-endian integers.
kevman 0:38ceb79fef03 287 */
kevman 0:38ceb79fef03 288 len_block[ 0] = (unsigned char)( ctx->aad_len );
kevman 0:38ceb79fef03 289 len_block[ 1] = (unsigned char)( ctx->aad_len >> 8 );
kevman 0:38ceb79fef03 290 len_block[ 2] = (unsigned char)( ctx->aad_len >> 16 );
kevman 0:38ceb79fef03 291 len_block[ 3] = (unsigned char)( ctx->aad_len >> 24 );
kevman 0:38ceb79fef03 292 len_block[ 4] = (unsigned char)( ctx->aad_len >> 32 );
kevman 0:38ceb79fef03 293 len_block[ 5] = (unsigned char)( ctx->aad_len >> 40 );
kevman 0:38ceb79fef03 294 len_block[ 6] = (unsigned char)( ctx->aad_len >> 48 );
kevman 0:38ceb79fef03 295 len_block[ 7] = (unsigned char)( ctx->aad_len >> 56 );
kevman 0:38ceb79fef03 296 len_block[ 8] = (unsigned char)( ctx->ciphertext_len );
kevman 0:38ceb79fef03 297 len_block[ 9] = (unsigned char)( ctx->ciphertext_len >> 8 );
kevman 0:38ceb79fef03 298 len_block[10] = (unsigned char)( ctx->ciphertext_len >> 16 );
kevman 0:38ceb79fef03 299 len_block[11] = (unsigned char)( ctx->ciphertext_len >> 24 );
kevman 0:38ceb79fef03 300 len_block[12] = (unsigned char)( ctx->ciphertext_len >> 32 );
kevman 0:38ceb79fef03 301 len_block[13] = (unsigned char)( ctx->ciphertext_len >> 40 );
kevman 0:38ceb79fef03 302 len_block[14] = (unsigned char)( ctx->ciphertext_len >> 48 );
kevman 0:38ceb79fef03 303 len_block[15] = (unsigned char)( ctx->ciphertext_len >> 56 );
kevman 0:38ceb79fef03 304
kevman 0:38ceb79fef03 305 ret = mbedtls_poly1305_update( &ctx->poly1305_ctx, len_block, 16U );
kevman 0:38ceb79fef03 306 if( ret != 0 )
kevman 0:38ceb79fef03 307 return( ret );
kevman 0:38ceb79fef03 308
kevman 0:38ceb79fef03 309 ret = mbedtls_poly1305_finish( &ctx->poly1305_ctx, mac );
kevman 0:38ceb79fef03 310
kevman 0:38ceb79fef03 311 return( ret );
kevman 0:38ceb79fef03 312 }
kevman 0:38ceb79fef03 313
kevman 0:38ceb79fef03 314 static int chachapoly_crypt_and_tag( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 315 mbedtls_chachapoly_mode_t mode,
kevman 0:38ceb79fef03 316 size_t length,
kevman 0:38ceb79fef03 317 const unsigned char nonce[12],
kevman 0:38ceb79fef03 318 const unsigned char *aad,
kevman 0:38ceb79fef03 319 size_t aad_len,
kevman 0:38ceb79fef03 320 const unsigned char *input,
kevman 0:38ceb79fef03 321 unsigned char *output,
kevman 0:38ceb79fef03 322 unsigned char tag[16] )
kevman 0:38ceb79fef03 323 {
kevman 0:38ceb79fef03 324 int ret;
kevman 0:38ceb79fef03 325
kevman 0:38ceb79fef03 326 ret = mbedtls_chachapoly_starts( ctx, nonce, mode );
kevman 0:38ceb79fef03 327 if( ret != 0 )
kevman 0:38ceb79fef03 328 goto cleanup;
kevman 0:38ceb79fef03 329
kevman 0:38ceb79fef03 330 ret = mbedtls_chachapoly_update_aad( ctx, aad, aad_len );
kevman 0:38ceb79fef03 331 if( ret != 0 )
kevman 0:38ceb79fef03 332 goto cleanup;
kevman 0:38ceb79fef03 333
kevman 0:38ceb79fef03 334 ret = mbedtls_chachapoly_update( ctx, length, input, output );
kevman 0:38ceb79fef03 335 if( ret != 0 )
kevman 0:38ceb79fef03 336 goto cleanup;
kevman 0:38ceb79fef03 337
kevman 0:38ceb79fef03 338 ret = mbedtls_chachapoly_finish( ctx, tag );
kevman 0:38ceb79fef03 339
kevman 0:38ceb79fef03 340 cleanup:
kevman 0:38ceb79fef03 341 return( ret );
kevman 0:38ceb79fef03 342 }
kevman 0:38ceb79fef03 343
kevman 0:38ceb79fef03 344 int mbedtls_chachapoly_encrypt_and_tag( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 345 size_t length,
kevman 0:38ceb79fef03 346 const unsigned char nonce[12],
kevman 0:38ceb79fef03 347 const unsigned char *aad,
kevman 0:38ceb79fef03 348 size_t aad_len,
kevman 0:38ceb79fef03 349 const unsigned char *input,
kevman 0:38ceb79fef03 350 unsigned char *output,
kevman 0:38ceb79fef03 351 unsigned char tag[16] )
kevman 0:38ceb79fef03 352 {
kevman 0:38ceb79fef03 353 return( chachapoly_crypt_and_tag( ctx, MBEDTLS_CHACHAPOLY_ENCRYPT,
kevman 0:38ceb79fef03 354 length, nonce, aad, aad_len,
kevman 0:38ceb79fef03 355 input, output, tag ) );
kevman 0:38ceb79fef03 356 }
kevman 0:38ceb79fef03 357
kevman 0:38ceb79fef03 358 int mbedtls_chachapoly_auth_decrypt( mbedtls_chachapoly_context *ctx,
kevman 0:38ceb79fef03 359 size_t length,
kevman 0:38ceb79fef03 360 const unsigned char nonce[12],
kevman 0:38ceb79fef03 361 const unsigned char *aad,
kevman 0:38ceb79fef03 362 size_t aad_len,
kevman 0:38ceb79fef03 363 const unsigned char tag[16],
kevman 0:38ceb79fef03 364 const unsigned char *input,
kevman 0:38ceb79fef03 365 unsigned char *output )
kevman 0:38ceb79fef03 366 {
kevman 0:38ceb79fef03 367 int ret;
kevman 0:38ceb79fef03 368 unsigned char check_tag[16];
kevman 0:38ceb79fef03 369 size_t i;
kevman 0:38ceb79fef03 370 int diff;
kevman 0:38ceb79fef03 371
kevman 0:38ceb79fef03 372 if( tag == NULL )
kevman 0:38ceb79fef03 373 return( MBEDTLS_ERR_POLY1305_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 374
kevman 0:38ceb79fef03 375 if( ( ret = chachapoly_crypt_and_tag( ctx,
kevman 0:38ceb79fef03 376 MBEDTLS_CHACHAPOLY_DECRYPT, length, nonce,
kevman 0:38ceb79fef03 377 aad, aad_len, input, output, check_tag ) ) != 0 )
kevman 0:38ceb79fef03 378 {
kevman 0:38ceb79fef03 379 return( ret );
kevman 0:38ceb79fef03 380 }
kevman 0:38ceb79fef03 381
kevman 0:38ceb79fef03 382 /* Check tag in "constant-time" */
kevman 0:38ceb79fef03 383 for( diff = 0, i = 0; i < sizeof( check_tag ); i++ )
kevman 0:38ceb79fef03 384 diff |= tag[i] ^ check_tag[i];
kevman 0:38ceb79fef03 385
kevman 0:38ceb79fef03 386 if( diff != 0 )
kevman 0:38ceb79fef03 387 {
kevman 0:38ceb79fef03 388 mbedtls_platform_zeroize( output, length );
kevman 0:38ceb79fef03 389 return( MBEDTLS_ERR_CHACHAPOLY_AUTH_FAILED );
kevman 0:38ceb79fef03 390 }
kevman 0:38ceb79fef03 391
kevman 0:38ceb79fef03 392 return( 0 );
kevman 0:38ceb79fef03 393 }
kevman 0:38ceb79fef03 394
kevman 0:38ceb79fef03 395 #endif /* MBEDTLS_CHACHAPOLY_ALT */
kevman 0:38ceb79fef03 396
kevman 0:38ceb79fef03 397 #if defined(MBEDTLS_SELF_TEST)
kevman 0:38ceb79fef03 398
kevman 0:38ceb79fef03 399 static const unsigned char test_key[1][32] =
kevman 0:38ceb79fef03 400 {
kevman 0:38ceb79fef03 401 {
kevman 0:38ceb79fef03 402 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
kevman 0:38ceb79fef03 403 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f,
kevman 0:38ceb79fef03 404 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97,
kevman 0:38ceb79fef03 405 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f
kevman 0:38ceb79fef03 406 }
kevman 0:38ceb79fef03 407 };
kevman 0:38ceb79fef03 408
kevman 0:38ceb79fef03 409 static const unsigned char test_nonce[1][12] =
kevman 0:38ceb79fef03 410 {
kevman 0:38ceb79fef03 411 {
kevman 0:38ceb79fef03 412 0x07, 0x00, 0x00, 0x00, /* 32-bit common part */
kevman 0:38ceb79fef03 413 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47 /* 64-bit IV */
kevman 0:38ceb79fef03 414 }
kevman 0:38ceb79fef03 415 };
kevman 0:38ceb79fef03 416
kevman 0:38ceb79fef03 417 static const unsigned char test_aad[1][12] =
kevman 0:38ceb79fef03 418 {
kevman 0:38ceb79fef03 419 {
kevman 0:38ceb79fef03 420 0x50, 0x51, 0x52, 0x53, 0xc0, 0xc1, 0xc2, 0xc3,
kevman 0:38ceb79fef03 421 0xc4, 0xc5, 0xc6, 0xc7
kevman 0:38ceb79fef03 422 }
kevman 0:38ceb79fef03 423 };
kevman 0:38ceb79fef03 424
kevman 0:38ceb79fef03 425 static const size_t test_aad_len[1] =
kevman 0:38ceb79fef03 426 {
kevman 0:38ceb79fef03 427 12U
kevman 0:38ceb79fef03 428 };
kevman 0:38ceb79fef03 429
kevman 0:38ceb79fef03 430 static const unsigned char test_input[1][114] =
kevman 0:38ceb79fef03 431 {
kevman 0:38ceb79fef03 432 {
kevman 0:38ceb79fef03 433 0x4c, 0x61, 0x64, 0x69, 0x65, 0x73, 0x20, 0x61,
kevman 0:38ceb79fef03 434 0x6e, 0x64, 0x20, 0x47, 0x65, 0x6e, 0x74, 0x6c,
kevman 0:38ceb79fef03 435 0x65, 0x6d, 0x65, 0x6e, 0x20, 0x6f, 0x66, 0x20,
kevman 0:38ceb79fef03 436 0x74, 0x68, 0x65, 0x20, 0x63, 0x6c, 0x61, 0x73,
kevman 0:38ceb79fef03 437 0x73, 0x20, 0x6f, 0x66, 0x20, 0x27, 0x39, 0x39,
kevman 0:38ceb79fef03 438 0x3a, 0x20, 0x49, 0x66, 0x20, 0x49, 0x20, 0x63,
kevman 0:38ceb79fef03 439 0x6f, 0x75, 0x6c, 0x64, 0x20, 0x6f, 0x66, 0x66,
kevman 0:38ceb79fef03 440 0x65, 0x72, 0x20, 0x79, 0x6f, 0x75, 0x20, 0x6f,
kevman 0:38ceb79fef03 441 0x6e, 0x6c, 0x79, 0x20, 0x6f, 0x6e, 0x65, 0x20,
kevman 0:38ceb79fef03 442 0x74, 0x69, 0x70, 0x20, 0x66, 0x6f, 0x72, 0x20,
kevman 0:38ceb79fef03 443 0x74, 0x68, 0x65, 0x20, 0x66, 0x75, 0x74, 0x75,
kevman 0:38ceb79fef03 444 0x72, 0x65, 0x2c, 0x20, 0x73, 0x75, 0x6e, 0x73,
kevman 0:38ceb79fef03 445 0x63, 0x72, 0x65, 0x65, 0x6e, 0x20, 0x77, 0x6f,
kevman 0:38ceb79fef03 446 0x75, 0x6c, 0x64, 0x20, 0x62, 0x65, 0x20, 0x69,
kevman 0:38ceb79fef03 447 0x74, 0x2e
kevman 0:38ceb79fef03 448 }
kevman 0:38ceb79fef03 449 };
kevman 0:38ceb79fef03 450
kevman 0:38ceb79fef03 451 static const unsigned char test_output[1][114] =
kevman 0:38ceb79fef03 452 {
kevman 0:38ceb79fef03 453 {
kevman 0:38ceb79fef03 454 0xd3, 0x1a, 0x8d, 0x34, 0x64, 0x8e, 0x60, 0xdb,
kevman 0:38ceb79fef03 455 0x7b, 0x86, 0xaf, 0xbc, 0x53, 0xef, 0x7e, 0xc2,
kevman 0:38ceb79fef03 456 0xa4, 0xad, 0xed, 0x51, 0x29, 0x6e, 0x08, 0xfe,
kevman 0:38ceb79fef03 457 0xa9, 0xe2, 0xb5, 0xa7, 0x36, 0xee, 0x62, 0xd6,
kevman 0:38ceb79fef03 458 0x3d, 0xbe, 0xa4, 0x5e, 0x8c, 0xa9, 0x67, 0x12,
kevman 0:38ceb79fef03 459 0x82, 0xfa, 0xfb, 0x69, 0xda, 0x92, 0x72, 0x8b,
kevman 0:38ceb79fef03 460 0x1a, 0x71, 0xde, 0x0a, 0x9e, 0x06, 0x0b, 0x29,
kevman 0:38ceb79fef03 461 0x05, 0xd6, 0xa5, 0xb6, 0x7e, 0xcd, 0x3b, 0x36,
kevman 0:38ceb79fef03 462 0x92, 0xdd, 0xbd, 0x7f, 0x2d, 0x77, 0x8b, 0x8c,
kevman 0:38ceb79fef03 463 0x98, 0x03, 0xae, 0xe3, 0x28, 0x09, 0x1b, 0x58,
kevman 0:38ceb79fef03 464 0xfa, 0xb3, 0x24, 0xe4, 0xfa, 0xd6, 0x75, 0x94,
kevman 0:38ceb79fef03 465 0x55, 0x85, 0x80, 0x8b, 0x48, 0x31, 0xd7, 0xbc,
kevman 0:38ceb79fef03 466 0x3f, 0xf4, 0xde, 0xf0, 0x8e, 0x4b, 0x7a, 0x9d,
kevman 0:38ceb79fef03 467 0xe5, 0x76, 0xd2, 0x65, 0x86, 0xce, 0xc6, 0x4b,
kevman 0:38ceb79fef03 468 0x61, 0x16
kevman 0:38ceb79fef03 469 }
kevman 0:38ceb79fef03 470 };
kevman 0:38ceb79fef03 471
kevman 0:38ceb79fef03 472 static const size_t test_input_len[1] =
kevman 0:38ceb79fef03 473 {
kevman 0:38ceb79fef03 474 114U
kevman 0:38ceb79fef03 475 };
kevman 0:38ceb79fef03 476
kevman 0:38ceb79fef03 477 static const unsigned char test_mac[1][16] =
kevman 0:38ceb79fef03 478 {
kevman 0:38ceb79fef03 479 {
kevman 0:38ceb79fef03 480 0x1a, 0xe1, 0x0b, 0x59, 0x4f, 0x09, 0xe2, 0x6a,
kevman 0:38ceb79fef03 481 0x7e, 0x90, 0x2e, 0xcb, 0xd0, 0x60, 0x06, 0x91
kevman 0:38ceb79fef03 482 }
kevman 0:38ceb79fef03 483 };
kevman 0:38ceb79fef03 484
kevman 0:38ceb79fef03 485 #define ASSERT( cond, args ) \
kevman 0:38ceb79fef03 486 do \
kevman 0:38ceb79fef03 487 { \
kevman 0:38ceb79fef03 488 if( ! ( cond ) ) \
kevman 0:38ceb79fef03 489 { \
kevman 0:38ceb79fef03 490 if( verbose != 0 ) \
kevman 0:38ceb79fef03 491 mbedtls_printf args; \
kevman 0:38ceb79fef03 492 \
kevman 0:38ceb79fef03 493 return( -1 ); \
kevman 0:38ceb79fef03 494 } \
kevman 0:38ceb79fef03 495 } \
kevman 0:38ceb79fef03 496 while( 0 )
kevman 0:38ceb79fef03 497
kevman 0:38ceb79fef03 498 int mbedtls_chachapoly_self_test( int verbose )
kevman 0:38ceb79fef03 499 {
kevman 0:38ceb79fef03 500 mbedtls_chachapoly_context ctx;
kevman 0:38ceb79fef03 501 unsigned i;
kevman 0:38ceb79fef03 502 int ret;
kevman 0:38ceb79fef03 503 unsigned char output[200];
kevman 0:38ceb79fef03 504 unsigned char mac[16];
kevman 0:38ceb79fef03 505
kevman 0:38ceb79fef03 506 for( i = 0U; i < 1U; i++ )
kevman 0:38ceb79fef03 507 {
kevman 0:38ceb79fef03 508 if( verbose != 0 )
kevman 0:38ceb79fef03 509 mbedtls_printf( " ChaCha20-Poly1305 test %u ", i );
kevman 0:38ceb79fef03 510
kevman 0:38ceb79fef03 511 mbedtls_chachapoly_init( &ctx );
kevman 0:38ceb79fef03 512
kevman 0:38ceb79fef03 513 ret = mbedtls_chachapoly_setkey( &ctx, test_key[i] );
kevman 0:38ceb79fef03 514 ASSERT( 0 == ret, ( "setkey() error code: %i\n", ret ) );
kevman 0:38ceb79fef03 515
kevman 0:38ceb79fef03 516 ret = mbedtls_chachapoly_encrypt_and_tag( &ctx,
kevman 0:38ceb79fef03 517 test_input_len[i],
kevman 0:38ceb79fef03 518 test_nonce[i],
kevman 0:38ceb79fef03 519 test_aad[i],
kevman 0:38ceb79fef03 520 test_aad_len[i],
kevman 0:38ceb79fef03 521 test_input[i],
kevman 0:38ceb79fef03 522 output,
kevman 0:38ceb79fef03 523 mac );
kevman 0:38ceb79fef03 524
kevman 0:38ceb79fef03 525 ASSERT( 0 == ret, ( "crypt_and_tag() error code: %i\n", ret ) );
kevman 0:38ceb79fef03 526
kevman 0:38ceb79fef03 527 ASSERT( 0 == memcmp( output, test_output[i], test_input_len[i] ),
kevman 0:38ceb79fef03 528 ( "failure (wrong output)\n" ) );
kevman 0:38ceb79fef03 529
kevman 0:38ceb79fef03 530 ASSERT( 0 == memcmp( mac, test_mac[i], 16U ),
kevman 0:38ceb79fef03 531 ( "failure (wrong MAC)\n" ) );
kevman 0:38ceb79fef03 532
kevman 0:38ceb79fef03 533 mbedtls_chachapoly_free( &ctx );
kevman 0:38ceb79fef03 534
kevman 0:38ceb79fef03 535 if( verbose != 0 )
kevman 0:38ceb79fef03 536 mbedtls_printf( "passed\n" );
kevman 0:38ceb79fef03 537 }
kevman 0:38ceb79fef03 538
kevman 0:38ceb79fef03 539 if( verbose != 0 )
kevman 0:38ceb79fef03 540 mbedtls_printf( "\n" );
kevman 0:38ceb79fef03 541
kevman 0:38ceb79fef03 542 return( 0 );
kevman 0:38ceb79fef03 543 }
kevman 0:38ceb79fef03 544
kevman 0:38ceb79fef03 545 #endif /* MBEDTLS_SELF_TEST */
kevman 0:38ceb79fef03 546
kevman 0:38ceb79fef03 547 #endif /* MBEDTLS_CHACHAPOLY_C */