ON Semiconductor / mbed-os

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependents:   mbed-TFT-example-NCS36510 mbed-Accelerometer-example-NCS36510 mbed-Accelerometer-example-NCS36510

features/mbedtls/src/dhm.c@0:098463de4c5d, 2017-01-25 (annotated)

Committer:
group-onsemi
Date:
Wed Jan 25 20:34:15 2017 +0000
Revision:
0:098463de4c5d
Initial commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
group-onsemi 0:098463de4c5d 1 /*
group-onsemi 0:098463de4c5d 2 * Diffie-Hellman-Merkle key exchange
group-onsemi 0:098463de4c5d 3 *
group-onsemi 0:098463de4c5d 4 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
group-onsemi 0:098463de4c5d 5 * SPDX-License-Identifier: Apache-2.0
group-onsemi 0:098463de4c5d 6 *
group-onsemi 0:098463de4c5d 7 * Licensed under the Apache License, Version 2.0 (the "License"); you may
group-onsemi 0:098463de4c5d 8 * not use this file except in compliance with the License.
group-onsemi 0:098463de4c5d 9 * You may obtain a copy of the License at
group-onsemi 0:098463de4c5d 10 *
group-onsemi 0:098463de4c5d 11 * http://www.apache.org/licenses/LICENSE-2.0
group-onsemi 0:098463de4c5d 12 *
group-onsemi 0:098463de4c5d 13 * Unless required by applicable law or agreed to in writing, software
group-onsemi 0:098463de4c5d 14 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
group-onsemi 0:098463de4c5d 15 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
group-onsemi 0:098463de4c5d 16 * See the License for the specific language governing permissions and
group-onsemi 0:098463de4c5d 17 * limitations under the License.
group-onsemi 0:098463de4c5d 18 *
group-onsemi 0:098463de4c5d 19 * This file is part of mbed TLS (https://tls.mbed.org)
group-onsemi 0:098463de4c5d 20 */
group-onsemi 0:098463de4c5d 21 /*
group-onsemi 0:098463de4c5d 22 * The following sources were referenced in the design of this implementation
group-onsemi 0:098463de4c5d 23 * of the Diffie-Hellman-Merkle algorithm:
group-onsemi 0:098463de4c5d 24 *
group-onsemi 0:098463de4c5d 25 * [1] Handbook of Applied Cryptography - 1997, Chapter 12
group-onsemi 0:098463de4c5d 26 * Menezes, van Oorschot and Vanstone
group-onsemi 0:098463de4c5d 27 *
group-onsemi 0:098463de4c5d 28 */
group-onsemi 0:098463de4c5d 29
group-onsemi 0:098463de4c5d 30 #if !defined(MBEDTLS_CONFIG_FILE)
group-onsemi 0:098463de4c5d 31 #include "mbedtls/config.h"
group-onsemi 0:098463de4c5d 32 #else
group-onsemi 0:098463de4c5d 33 #include MBEDTLS_CONFIG_FILE
group-onsemi 0:098463de4c5d 34 #endif
group-onsemi 0:098463de4c5d 35
group-onsemi 0:098463de4c5d 36 #if defined(MBEDTLS_DHM_C)
group-onsemi 0:098463de4c5d 37
group-onsemi 0:098463de4c5d 38 #include "mbedtls/dhm.h"
group-onsemi 0:098463de4c5d 39
group-onsemi 0:098463de4c5d 40 #include <string.h>
group-onsemi 0:098463de4c5d 41
group-onsemi 0:098463de4c5d 42 #if defined(MBEDTLS_PEM_PARSE_C)
group-onsemi 0:098463de4c5d 43 #include "mbedtls/pem.h"
group-onsemi 0:098463de4c5d 44 #endif
group-onsemi 0:098463de4c5d 45
group-onsemi 0:098463de4c5d 46 #if defined(MBEDTLS_ASN1_PARSE_C)
group-onsemi 0:098463de4c5d 47 #include "mbedtls/asn1.h"
group-onsemi 0:098463de4c5d 48 #endif
group-onsemi 0:098463de4c5d 49
group-onsemi 0:098463de4c5d 50 #if defined(MBEDTLS_PLATFORM_C)
group-onsemi 0:098463de4c5d 51 #include "mbedtls/platform.h"
group-onsemi 0:098463de4c5d 52 #else
group-onsemi 0:098463de4c5d 53 #include <stdlib.h>
group-onsemi 0:098463de4c5d 54 #include <stdio.h>
group-onsemi 0:098463de4c5d 55 #define mbedtls_printf printf
group-onsemi 0:098463de4c5d 56 #define mbedtls_calloc calloc
group-onsemi 0:098463de4c5d 57 #define mbedtls_free free
group-onsemi 0:098463de4c5d 58 #endif
group-onsemi 0:098463de4c5d 59
group-onsemi 0:098463de4c5d 60 /* Implementation that should never be optimized out by the compiler */
group-onsemi 0:098463de4c5d 61 static void mbedtls_zeroize( void *v, size_t n ) {
group-onsemi 0:098463de4c5d 62 volatile unsigned char *p = v; while( n-- ) *p++ = 0;
group-onsemi 0:098463de4c5d 63 }
group-onsemi 0:098463de4c5d 64
group-onsemi 0:098463de4c5d 65 /*
group-onsemi 0:098463de4c5d 66 * helper to validate the mbedtls_mpi size and import it
group-onsemi 0:098463de4c5d 67 */
group-onsemi 0:098463de4c5d 68 static int dhm_read_bignum( mbedtls_mpi *X,
group-onsemi 0:098463de4c5d 69 unsigned char **p,
group-onsemi 0:098463de4c5d 70 const unsigned char *end )
group-onsemi 0:098463de4c5d 71 {
group-onsemi 0:098463de4c5d 72 int ret, n;
group-onsemi 0:098463de4c5d 73
group-onsemi 0:098463de4c5d 74 if( end - *p < 2 )
group-onsemi 0:098463de4c5d 75 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 76
group-onsemi 0:098463de4c5d 77 n = ( (*p)[0] << 8 ) | (*p)[1];
group-onsemi 0:098463de4c5d 78 (*p) += 2;
group-onsemi 0:098463de4c5d 79
group-onsemi 0:098463de4c5d 80 if( (int)( end - *p ) < n )
group-onsemi 0:098463de4c5d 81 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 82
group-onsemi 0:098463de4c5d 83 if( ( ret = mbedtls_mpi_read_binary( X, *p, n ) ) != 0 )
group-onsemi 0:098463de4c5d 84 return( MBEDTLS_ERR_DHM_READ_PARAMS_FAILED + ret );
group-onsemi 0:098463de4c5d 85
group-onsemi 0:098463de4c5d 86 (*p) += n;
group-onsemi 0:098463de4c5d 87
group-onsemi 0:098463de4c5d 88 return( 0 );
group-onsemi 0:098463de4c5d 89 }
group-onsemi 0:098463de4c5d 90
group-onsemi 0:098463de4c5d 91 /*
group-onsemi 0:098463de4c5d 92 * Verify sanity of parameter with regards to P
group-onsemi 0:098463de4c5d 93 *
group-onsemi 0:098463de4c5d 94 * Parameter should be: 2 <= public_param <= P - 2
group-onsemi 0:098463de4c5d 95 *
group-onsemi 0:098463de4c5d 96 * For more information on the attack, see:
group-onsemi 0:098463de4c5d 97 * http://www.cl.cam.ac.uk/~rja14/Papers/psandqs.pdf
group-onsemi 0:098463de4c5d 98 * http://web.nvd.nist.gov/view/vuln/detail?vulnId=CVE-2005-2643
group-onsemi 0:098463de4c5d 99 */
group-onsemi 0:098463de4c5d 100 static int dhm_check_range( const mbedtls_mpi *param, const mbedtls_mpi *P )
group-onsemi 0:098463de4c5d 101 {
group-onsemi 0:098463de4c5d 102 mbedtls_mpi L, U;
group-onsemi 0:098463de4c5d 103 int ret = MBEDTLS_ERR_DHM_BAD_INPUT_DATA;
group-onsemi 0:098463de4c5d 104
group-onsemi 0:098463de4c5d 105 mbedtls_mpi_init( &L ); mbedtls_mpi_init( &U );
group-onsemi 0:098463de4c5d 106
group-onsemi 0:098463de4c5d 107 MBEDTLS_MPI_CHK( mbedtls_mpi_lset( &L, 2 ) );
group-onsemi 0:098463de4c5d 108 MBEDTLS_MPI_CHK( mbedtls_mpi_sub_int( &U, P, 2 ) );
group-onsemi 0:098463de4c5d 109
group-onsemi 0:098463de4c5d 110 if( mbedtls_mpi_cmp_mpi( param, &L ) >= 0 &&
group-onsemi 0:098463de4c5d 111 mbedtls_mpi_cmp_mpi( param, &U ) <= 0 )
group-onsemi 0:098463de4c5d 112 {
group-onsemi 0:098463de4c5d 113 ret = 0;
group-onsemi 0:098463de4c5d 114 }
group-onsemi 0:098463de4c5d 115
group-onsemi 0:098463de4c5d 116 cleanup:
group-onsemi 0:098463de4c5d 117 mbedtls_mpi_free( &L ); mbedtls_mpi_free( &U );
group-onsemi 0:098463de4c5d 118 return( ret );
group-onsemi 0:098463de4c5d 119 }
group-onsemi 0:098463de4c5d 120
group-onsemi 0:098463de4c5d 121 void mbedtls_dhm_init( mbedtls_dhm_context *ctx )
group-onsemi 0:098463de4c5d 122 {
group-onsemi 0:098463de4c5d 123 memset( ctx, 0, sizeof( mbedtls_dhm_context ) );
group-onsemi 0:098463de4c5d 124 }
group-onsemi 0:098463de4c5d 125
group-onsemi 0:098463de4c5d 126 /*
group-onsemi 0:098463de4c5d 127 * Parse the ServerKeyExchange parameters
group-onsemi 0:098463de4c5d 128 */
group-onsemi 0:098463de4c5d 129 int mbedtls_dhm_read_params( mbedtls_dhm_context *ctx,
group-onsemi 0:098463de4c5d 130 unsigned char **p,
group-onsemi 0:098463de4c5d 131 const unsigned char *end )
group-onsemi 0:098463de4c5d 132 {
group-onsemi 0:098463de4c5d 133 int ret;
group-onsemi 0:098463de4c5d 134
group-onsemi 0:098463de4c5d 135 if( ( ret = dhm_read_bignum( &ctx->P, p, end ) ) != 0 ||
group-onsemi 0:098463de4c5d 136 ( ret = dhm_read_bignum( &ctx->G, p, end ) ) != 0 ||
group-onsemi 0:098463de4c5d 137 ( ret = dhm_read_bignum( &ctx->GY, p, end ) ) != 0 )
group-onsemi 0:098463de4c5d 138 return( ret );
group-onsemi 0:098463de4c5d 139
group-onsemi 0:098463de4c5d 140 if( ( ret = dhm_check_range( &ctx->GY, &ctx->P ) ) != 0 )
group-onsemi 0:098463de4c5d 141 return( ret );
group-onsemi 0:098463de4c5d 142
group-onsemi 0:098463de4c5d 143 ctx->len = mbedtls_mpi_size( &ctx->P );
group-onsemi 0:098463de4c5d 144
group-onsemi 0:098463de4c5d 145 return( 0 );
group-onsemi 0:098463de4c5d 146 }
group-onsemi 0:098463de4c5d 147
group-onsemi 0:098463de4c5d 148 /*
group-onsemi 0:098463de4c5d 149 * Setup and write the ServerKeyExchange parameters
group-onsemi 0:098463de4c5d 150 */
group-onsemi 0:098463de4c5d 151 int mbedtls_dhm_make_params( mbedtls_dhm_context *ctx, int x_size,
group-onsemi 0:098463de4c5d 152 unsigned char *output, size_t *olen,
group-onsemi 0:098463de4c5d 153 int (*f_rng)(void *, unsigned char *, size_t),
group-onsemi 0:098463de4c5d 154 void *p_rng )
group-onsemi 0:098463de4c5d 155 {
group-onsemi 0:098463de4c5d 156 int ret, count = 0;
group-onsemi 0:098463de4c5d 157 size_t n1, n2, n3;
group-onsemi 0:098463de4c5d 158 unsigned char *p;
group-onsemi 0:098463de4c5d 159
group-onsemi 0:098463de4c5d 160 if( mbedtls_mpi_cmp_int( &ctx->P, 0 ) == 0 )
group-onsemi 0:098463de4c5d 161 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 162
group-onsemi 0:098463de4c5d 163 /*
group-onsemi 0:098463de4c5d 164 * Generate X as large as possible ( < P )
group-onsemi 0:098463de4c5d 165 */
group-onsemi 0:098463de4c5d 166 do
group-onsemi 0:098463de4c5d 167 {
group-onsemi 0:098463de4c5d 168 mbedtls_mpi_fill_random( &ctx->X, x_size, f_rng, p_rng );
group-onsemi 0:098463de4c5d 169
group-onsemi 0:098463de4c5d 170 while( mbedtls_mpi_cmp_mpi( &ctx->X, &ctx->P ) >= 0 )
group-onsemi 0:098463de4c5d 171 MBEDTLS_MPI_CHK( mbedtls_mpi_shift_r( &ctx->X, 1 ) );
group-onsemi 0:098463de4c5d 172
group-onsemi 0:098463de4c5d 173 if( count++ > 10 )
group-onsemi 0:098463de4c5d 174 return( MBEDTLS_ERR_DHM_MAKE_PARAMS_FAILED );
group-onsemi 0:098463de4c5d 175 }
group-onsemi 0:098463de4c5d 176 while( dhm_check_range( &ctx->X, &ctx->P ) != 0 );
group-onsemi 0:098463de4c5d 177
group-onsemi 0:098463de4c5d 178 /*
group-onsemi 0:098463de4c5d 179 * Calculate GX = G^X mod P
group-onsemi 0:098463de4c5d 180 */
group-onsemi 0:098463de4c5d 181 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &ctx->GX, &ctx->G, &ctx->X,
group-onsemi 0:098463de4c5d 182 &ctx->P , &ctx->RP ) );
group-onsemi 0:098463de4c5d 183
group-onsemi 0:098463de4c5d 184 if( ( ret = dhm_check_range( &ctx->GX, &ctx->P ) ) != 0 )
group-onsemi 0:098463de4c5d 185 return( ret );
group-onsemi 0:098463de4c5d 186
group-onsemi 0:098463de4c5d 187 /*
group-onsemi 0:098463de4c5d 188 * export P, G, GX
group-onsemi 0:098463de4c5d 189 */
group-onsemi 0:098463de4c5d 190 #define DHM_MPI_EXPORT(X,n) \
group-onsemi 0:098463de4c5d 191 MBEDTLS_MPI_CHK( mbedtls_mpi_write_binary( X, p + 2, n ) ); \
group-onsemi 0:098463de4c5d 192 *p++ = (unsigned char)( n >> 8 ); \
group-onsemi 0:098463de4c5d 193 *p++ = (unsigned char)( n ); p += n;
group-onsemi 0:098463de4c5d 194
group-onsemi 0:098463de4c5d 195 n1 = mbedtls_mpi_size( &ctx->P );
group-onsemi 0:098463de4c5d 196 n2 = mbedtls_mpi_size( &ctx->G );
group-onsemi 0:098463de4c5d 197 n3 = mbedtls_mpi_size( &ctx->GX );
group-onsemi 0:098463de4c5d 198
group-onsemi 0:098463de4c5d 199 p = output;
group-onsemi 0:098463de4c5d 200 DHM_MPI_EXPORT( &ctx->P , n1 );
group-onsemi 0:098463de4c5d 201 DHM_MPI_EXPORT( &ctx->G , n2 );
group-onsemi 0:098463de4c5d 202 DHM_MPI_EXPORT( &ctx->GX, n3 );
group-onsemi 0:098463de4c5d 203
group-onsemi 0:098463de4c5d 204 *olen = p - output;
group-onsemi 0:098463de4c5d 205
group-onsemi 0:098463de4c5d 206 ctx->len = n1;
group-onsemi 0:098463de4c5d 207
group-onsemi 0:098463de4c5d 208 cleanup:
group-onsemi 0:098463de4c5d 209
group-onsemi 0:098463de4c5d 210 if( ret != 0 )
group-onsemi 0:098463de4c5d 211 return( MBEDTLS_ERR_DHM_MAKE_PARAMS_FAILED + ret );
group-onsemi 0:098463de4c5d 212
group-onsemi 0:098463de4c5d 213 return( 0 );
group-onsemi 0:098463de4c5d 214 }
group-onsemi 0:098463de4c5d 215
group-onsemi 0:098463de4c5d 216 /*
group-onsemi 0:098463de4c5d 217 * Import the peer's public value G^Y
group-onsemi 0:098463de4c5d 218 */
group-onsemi 0:098463de4c5d 219 int mbedtls_dhm_read_public( mbedtls_dhm_context *ctx,
group-onsemi 0:098463de4c5d 220 const unsigned char *input, size_t ilen )
group-onsemi 0:098463de4c5d 221 {
group-onsemi 0:098463de4c5d 222 int ret;
group-onsemi 0:098463de4c5d 223
group-onsemi 0:098463de4c5d 224 if( ctx == NULL || ilen < 1 || ilen > ctx->len )
group-onsemi 0:098463de4c5d 225 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 226
group-onsemi 0:098463de4c5d 227 if( ( ret = mbedtls_mpi_read_binary( &ctx->GY, input, ilen ) ) != 0 )
group-onsemi 0:098463de4c5d 228 return( MBEDTLS_ERR_DHM_READ_PUBLIC_FAILED + ret );
group-onsemi 0:098463de4c5d 229
group-onsemi 0:098463de4c5d 230 return( 0 );
group-onsemi 0:098463de4c5d 231 }
group-onsemi 0:098463de4c5d 232
group-onsemi 0:098463de4c5d 233 /*
group-onsemi 0:098463de4c5d 234 * Create own private value X and export G^X
group-onsemi 0:098463de4c5d 235 */
group-onsemi 0:098463de4c5d 236 int mbedtls_dhm_make_public( mbedtls_dhm_context *ctx, int x_size,
group-onsemi 0:098463de4c5d 237 unsigned char *output, size_t olen,
group-onsemi 0:098463de4c5d 238 int (*f_rng)(void *, unsigned char *, size_t),
group-onsemi 0:098463de4c5d 239 void *p_rng )
group-onsemi 0:098463de4c5d 240 {
group-onsemi 0:098463de4c5d 241 int ret, count = 0;
group-onsemi 0:098463de4c5d 242
group-onsemi 0:098463de4c5d 243 if( ctx == NULL || olen < 1 || olen > ctx->len )
group-onsemi 0:098463de4c5d 244 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 245
group-onsemi 0:098463de4c5d 246 if( mbedtls_mpi_cmp_int( &ctx->P, 0 ) == 0 )
group-onsemi 0:098463de4c5d 247 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 248
group-onsemi 0:098463de4c5d 249 /*
group-onsemi 0:098463de4c5d 250 * generate X and calculate GX = G^X mod P
group-onsemi 0:098463de4c5d 251 */
group-onsemi 0:098463de4c5d 252 do
group-onsemi 0:098463de4c5d 253 {
group-onsemi 0:098463de4c5d 254 mbedtls_mpi_fill_random( &ctx->X, x_size, f_rng, p_rng );
group-onsemi 0:098463de4c5d 255
group-onsemi 0:098463de4c5d 256 while( mbedtls_mpi_cmp_mpi( &ctx->X, &ctx->P ) >= 0 )
group-onsemi 0:098463de4c5d 257 MBEDTLS_MPI_CHK( mbedtls_mpi_shift_r( &ctx->X, 1 ) );
group-onsemi 0:098463de4c5d 258
group-onsemi 0:098463de4c5d 259 if( count++ > 10 )
group-onsemi 0:098463de4c5d 260 return( MBEDTLS_ERR_DHM_MAKE_PUBLIC_FAILED );
group-onsemi 0:098463de4c5d 261 }
group-onsemi 0:098463de4c5d 262 while( dhm_check_range( &ctx->X, &ctx->P ) != 0 );
group-onsemi 0:098463de4c5d 263
group-onsemi 0:098463de4c5d 264 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &ctx->GX, &ctx->G, &ctx->X,
group-onsemi 0:098463de4c5d 265 &ctx->P , &ctx->RP ) );
group-onsemi 0:098463de4c5d 266
group-onsemi 0:098463de4c5d 267 if( ( ret = dhm_check_range( &ctx->GX, &ctx->P ) ) != 0 )
group-onsemi 0:098463de4c5d 268 return( ret );
group-onsemi 0:098463de4c5d 269
group-onsemi 0:098463de4c5d 270 MBEDTLS_MPI_CHK( mbedtls_mpi_write_binary( &ctx->GX, output, olen ) );
group-onsemi 0:098463de4c5d 271
group-onsemi 0:098463de4c5d 272 cleanup:
group-onsemi 0:098463de4c5d 273
group-onsemi 0:098463de4c5d 274 if( ret != 0 )
group-onsemi 0:098463de4c5d 275 return( MBEDTLS_ERR_DHM_MAKE_PUBLIC_FAILED + ret );
group-onsemi 0:098463de4c5d 276
group-onsemi 0:098463de4c5d 277 return( 0 );
group-onsemi 0:098463de4c5d 278 }
group-onsemi 0:098463de4c5d 279
group-onsemi 0:098463de4c5d 280 /*
group-onsemi 0:098463de4c5d 281 * Use the blinding method and optimisation suggested in section 10 of:
group-onsemi 0:098463de4c5d 282 * KOCHER, Paul C. Timing attacks on implementations of Diffie-Hellman, RSA,
group-onsemi 0:098463de4c5d 283 * DSS, and other systems. In : Advances in Cryptology-CRYPTO'96. Springer
group-onsemi 0:098463de4c5d 284 * Berlin Heidelberg, 1996. p. 104-113.
group-onsemi 0:098463de4c5d 285 */
group-onsemi 0:098463de4c5d 286 static int dhm_update_blinding( mbedtls_dhm_context *ctx,
group-onsemi 0:098463de4c5d 287 int (*f_rng)(void *, unsigned char *, size_t), void *p_rng )
group-onsemi 0:098463de4c5d 288 {
group-onsemi 0:098463de4c5d 289 int ret, count;
group-onsemi 0:098463de4c5d 290
group-onsemi 0:098463de4c5d 291 /*
group-onsemi 0:098463de4c5d 292 * Don't use any blinding the first time a particular X is used,
group-onsemi 0:098463de4c5d 293 * but remember it to use blinding next time.
group-onsemi 0:098463de4c5d 294 */
group-onsemi 0:098463de4c5d 295 if( mbedtls_mpi_cmp_mpi( &ctx->X, &ctx->pX ) != 0 )
group-onsemi 0:098463de4c5d 296 {
group-onsemi 0:098463de4c5d 297 MBEDTLS_MPI_CHK( mbedtls_mpi_copy( &ctx->pX, &ctx->X ) );
group-onsemi 0:098463de4c5d 298 MBEDTLS_MPI_CHK( mbedtls_mpi_lset( &ctx->Vi, 1 ) );
group-onsemi 0:098463de4c5d 299 MBEDTLS_MPI_CHK( mbedtls_mpi_lset( &ctx->Vf, 1 ) );
group-onsemi 0:098463de4c5d 300
group-onsemi 0:098463de4c5d 301 return( 0 );
group-onsemi 0:098463de4c5d 302 }
group-onsemi 0:098463de4c5d 303
group-onsemi 0:098463de4c5d 304 /*
group-onsemi 0:098463de4c5d 305 * Ok, we need blinding. Can we re-use existing values?
group-onsemi 0:098463de4c5d 306 * If yes, just update them by squaring them.
group-onsemi 0:098463de4c5d 307 */
group-onsemi 0:098463de4c5d 308 if( mbedtls_mpi_cmp_int( &ctx->Vi, 1 ) != 0 )
group-onsemi 0:098463de4c5d 309 {
group-onsemi 0:098463de4c5d 310 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &ctx->Vi, &ctx->Vi, &ctx->Vi ) );
group-onsemi 0:098463de4c5d 311 MBEDTLS_MPI_CHK( mbedtls_mpi_mod_mpi( &ctx->Vi, &ctx->Vi, &ctx->P ) );
group-onsemi 0:098463de4c5d 312
group-onsemi 0:098463de4c5d 313 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &ctx->Vf, &ctx->Vf, &ctx->Vf ) );
group-onsemi 0:098463de4c5d 314 MBEDTLS_MPI_CHK( mbedtls_mpi_mod_mpi( &ctx->Vf, &ctx->Vf, &ctx->P ) );
group-onsemi 0:098463de4c5d 315
group-onsemi 0:098463de4c5d 316 return( 0 );
group-onsemi 0:098463de4c5d 317 }
group-onsemi 0:098463de4c5d 318
group-onsemi 0:098463de4c5d 319 /*
group-onsemi 0:098463de4c5d 320 * We need to generate blinding values from scratch
group-onsemi 0:098463de4c5d 321 */
group-onsemi 0:098463de4c5d 322
group-onsemi 0:098463de4c5d 323 /* Vi = random( 2, P-1 ) */
group-onsemi 0:098463de4c5d 324 count = 0;
group-onsemi 0:098463de4c5d 325 do
group-onsemi 0:098463de4c5d 326 {
group-onsemi 0:098463de4c5d 327 mbedtls_mpi_fill_random( &ctx->Vi, mbedtls_mpi_size( &ctx->P ), f_rng, p_rng );
group-onsemi 0:098463de4c5d 328
group-onsemi 0:098463de4c5d 329 while( mbedtls_mpi_cmp_mpi( &ctx->Vi, &ctx->P ) >= 0 )
group-onsemi 0:098463de4c5d 330 MBEDTLS_MPI_CHK( mbedtls_mpi_shift_r( &ctx->Vi, 1 ) );
group-onsemi 0:098463de4c5d 331
group-onsemi 0:098463de4c5d 332 if( count++ > 10 )
group-onsemi 0:098463de4c5d 333 return( MBEDTLS_ERR_MPI_NOT_ACCEPTABLE );
group-onsemi 0:098463de4c5d 334 }
group-onsemi 0:098463de4c5d 335 while( mbedtls_mpi_cmp_int( &ctx->Vi, 1 ) <= 0 );
group-onsemi 0:098463de4c5d 336
group-onsemi 0:098463de4c5d 337 /* Vf = Vi^-X mod P */
group-onsemi 0:098463de4c5d 338 MBEDTLS_MPI_CHK( mbedtls_mpi_inv_mod( &ctx->Vf, &ctx->Vi, &ctx->P ) );
group-onsemi 0:098463de4c5d 339 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &ctx->Vf, &ctx->Vf, &ctx->X, &ctx->P, &ctx->RP ) );
group-onsemi 0:098463de4c5d 340
group-onsemi 0:098463de4c5d 341 cleanup:
group-onsemi 0:098463de4c5d 342 return( ret );
group-onsemi 0:098463de4c5d 343 }
group-onsemi 0:098463de4c5d 344
group-onsemi 0:098463de4c5d 345 /*
group-onsemi 0:098463de4c5d 346 * Derive and export the shared secret (G^Y)^X mod P
group-onsemi 0:098463de4c5d 347 */
group-onsemi 0:098463de4c5d 348 int mbedtls_dhm_calc_secret( mbedtls_dhm_context *ctx,
group-onsemi 0:098463de4c5d 349 unsigned char *output, size_t output_size, size_t *olen,
group-onsemi 0:098463de4c5d 350 int (*f_rng)(void *, unsigned char *, size_t),
group-onsemi 0:098463de4c5d 351 void *p_rng )
group-onsemi 0:098463de4c5d 352 {
group-onsemi 0:098463de4c5d 353 int ret;
group-onsemi 0:098463de4c5d 354 mbedtls_mpi GYb;
group-onsemi 0:098463de4c5d 355
group-onsemi 0:098463de4c5d 356 if( ctx == NULL || output_size < ctx->len )
group-onsemi 0:098463de4c5d 357 return( MBEDTLS_ERR_DHM_BAD_INPUT_DATA );
group-onsemi 0:098463de4c5d 358
group-onsemi 0:098463de4c5d 359 if( ( ret = dhm_check_range( &ctx->GY, &ctx->P ) ) != 0 )
group-onsemi 0:098463de4c5d 360 return( ret );
group-onsemi 0:098463de4c5d 361
group-onsemi 0:098463de4c5d 362 mbedtls_mpi_init( &GYb );
group-onsemi 0:098463de4c5d 363
group-onsemi 0:098463de4c5d 364 /* Blind peer's value */
group-onsemi 0:098463de4c5d 365 if( f_rng != NULL )
group-onsemi 0:098463de4c5d 366 {
group-onsemi 0:098463de4c5d 367 MBEDTLS_MPI_CHK( dhm_update_blinding( ctx, f_rng, p_rng ) );
group-onsemi 0:098463de4c5d 368 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &GYb, &ctx->GY, &ctx->Vi ) );
group-onsemi 0:098463de4c5d 369 MBEDTLS_MPI_CHK( mbedtls_mpi_mod_mpi( &GYb, &GYb, &ctx->P ) );
group-onsemi 0:098463de4c5d 370 }
group-onsemi 0:098463de4c5d 371 else
group-onsemi 0:098463de4c5d 372 MBEDTLS_MPI_CHK( mbedtls_mpi_copy( &GYb, &ctx->GY ) );
group-onsemi 0:098463de4c5d 373
group-onsemi 0:098463de4c5d 374 /* Do modular exponentiation */
group-onsemi 0:098463de4c5d 375 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &ctx->K, &GYb, &ctx->X,
group-onsemi 0:098463de4c5d 376 &ctx->P, &ctx->RP ) );
group-onsemi 0:098463de4c5d 377
group-onsemi 0:098463de4c5d 378 /* Unblind secret value */
group-onsemi 0:098463de4c5d 379 if( f_rng != NULL )
group-onsemi 0:098463de4c5d 380 {
group-onsemi 0:098463de4c5d 381 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &ctx->K, &ctx->K, &ctx->Vf ) );
group-onsemi 0:098463de4c5d 382 MBEDTLS_MPI_CHK( mbedtls_mpi_mod_mpi( &ctx->K, &ctx->K, &ctx->P ) );
group-onsemi 0:098463de4c5d 383 }
group-onsemi 0:098463de4c5d 384
group-onsemi 0:098463de4c5d 385 *olen = mbedtls_mpi_size( &ctx->K );
group-onsemi 0:098463de4c5d 386
group-onsemi 0:098463de4c5d 387 MBEDTLS_MPI_CHK( mbedtls_mpi_write_binary( &ctx->K, output, *olen ) );
group-onsemi 0:098463de4c5d 388
group-onsemi 0:098463de4c5d 389 cleanup:
group-onsemi 0:098463de4c5d 390 mbedtls_mpi_free( &GYb );
group-onsemi 0:098463de4c5d 391
group-onsemi 0:098463de4c5d 392 if( ret != 0 )
group-onsemi 0:098463de4c5d 393 return( MBEDTLS_ERR_DHM_CALC_SECRET_FAILED + ret );
group-onsemi 0:098463de4c5d 394
group-onsemi 0:098463de4c5d 395 return( 0 );
group-onsemi 0:098463de4c5d 396 }
group-onsemi 0:098463de4c5d 397
group-onsemi 0:098463de4c5d 398 /*
group-onsemi 0:098463de4c5d 399 * Free the components of a DHM key
group-onsemi 0:098463de4c5d 400 */
group-onsemi 0:098463de4c5d 401 void mbedtls_dhm_free( mbedtls_dhm_context *ctx )
group-onsemi 0:098463de4c5d 402 {
group-onsemi 0:098463de4c5d 403 mbedtls_mpi_free( &ctx->pX); mbedtls_mpi_free( &ctx->Vf ); mbedtls_mpi_free( &ctx->Vi );
group-onsemi 0:098463de4c5d 404 mbedtls_mpi_free( &ctx->RP ); mbedtls_mpi_free( &ctx->K ); mbedtls_mpi_free( &ctx->GY );
group-onsemi 0:098463de4c5d 405 mbedtls_mpi_free( &ctx->GX ); mbedtls_mpi_free( &ctx->X ); mbedtls_mpi_free( &ctx->G );
group-onsemi 0:098463de4c5d 406 mbedtls_mpi_free( &ctx->P );
group-onsemi 0:098463de4c5d 407
group-onsemi 0:098463de4c5d 408 mbedtls_zeroize( ctx, sizeof( mbedtls_dhm_context ) );
group-onsemi 0:098463de4c5d 409 }
group-onsemi 0:098463de4c5d 410
group-onsemi 0:098463de4c5d 411 #if defined(MBEDTLS_ASN1_PARSE_C)
group-onsemi 0:098463de4c5d 412 /*
group-onsemi 0:098463de4c5d 413 * Parse DHM parameters
group-onsemi 0:098463de4c5d 414 */
group-onsemi 0:098463de4c5d 415 int mbedtls_dhm_parse_dhm( mbedtls_dhm_context *dhm, const unsigned char *dhmin,
group-onsemi 0:098463de4c5d 416 size_t dhminlen )
group-onsemi 0:098463de4c5d 417 {
group-onsemi 0:098463de4c5d 418 int ret;
group-onsemi 0:098463de4c5d 419 size_t len;
group-onsemi 0:098463de4c5d 420 unsigned char *p, *end;
group-onsemi 0:098463de4c5d 421 #if defined(MBEDTLS_PEM_PARSE_C)
group-onsemi 0:098463de4c5d 422 mbedtls_pem_context pem;
group-onsemi 0:098463de4c5d 423
group-onsemi 0:098463de4c5d 424 mbedtls_pem_init( &pem );
group-onsemi 0:098463de4c5d 425
group-onsemi 0:098463de4c5d 426 /* Avoid calling mbedtls_pem_read_buffer() on non-null-terminated string */
group-onsemi 0:098463de4c5d 427 if( dhminlen == 0 || dhmin[dhminlen - 1] != '\0' )
group-onsemi 0:098463de4c5d 428 ret = MBEDTLS_ERR_PEM_NO_HEADER_FOOTER_PRESENT;
group-onsemi 0:098463de4c5d 429 else
group-onsemi 0:098463de4c5d 430 ret = mbedtls_pem_read_buffer( &pem,
group-onsemi 0:098463de4c5d 431 "-----BEGIN DH PARAMETERS-----",
group-onsemi 0:098463de4c5d 432 "-----END DH PARAMETERS-----",
group-onsemi 0:098463de4c5d 433 dhmin, NULL, 0, &dhminlen );
group-onsemi 0:098463de4c5d 434
group-onsemi 0:098463de4c5d 435 if( ret == 0 )
group-onsemi 0:098463de4c5d 436 {
group-onsemi 0:098463de4c5d 437 /*
group-onsemi 0:098463de4c5d 438 * Was PEM encoded
group-onsemi 0:098463de4c5d 439 */
group-onsemi 0:098463de4c5d 440 dhminlen = pem.buflen;
group-onsemi 0:098463de4c5d 441 }
group-onsemi 0:098463de4c5d 442 else if( ret != MBEDTLS_ERR_PEM_NO_HEADER_FOOTER_PRESENT )
group-onsemi 0:098463de4c5d 443 goto exit;
group-onsemi 0:098463de4c5d 444
group-onsemi 0:098463de4c5d 445 p = ( ret == 0 ) ? pem.buf : (unsigned char *) dhmin;
group-onsemi 0:098463de4c5d 446 #else
group-onsemi 0:098463de4c5d 447 p = (unsigned char *) dhmin;
group-onsemi 0:098463de4c5d 448 #endif /* MBEDTLS_PEM_PARSE_C */
group-onsemi 0:098463de4c5d 449 end = p + dhminlen;
group-onsemi 0:098463de4c5d 450
group-onsemi 0:098463de4c5d 451 /*
group-onsemi 0:098463de4c5d 452 * DHParams ::= SEQUENCE {
group-onsemi 0:098463de4c5d 453 * prime INTEGER, -- P
group-onsemi 0:098463de4c5d 454 * generator INTEGER, -- g
group-onsemi 0:098463de4c5d 455 * privateValueLength INTEGER OPTIONAL
group-onsemi 0:098463de4c5d 456 * }
group-onsemi 0:098463de4c5d 457 */
group-onsemi 0:098463de4c5d 458 if( ( ret = mbedtls_asn1_get_tag( &p, end, &len,
group-onsemi 0:098463de4c5d 459 MBEDTLS_ASN1_CONSTRUCTED | MBEDTLS_ASN1_SEQUENCE ) ) != 0 )
group-onsemi 0:098463de4c5d 460 {
group-onsemi 0:098463de4c5d 461 ret = MBEDTLS_ERR_DHM_INVALID_FORMAT + ret;
group-onsemi 0:098463de4c5d 462 goto exit;
group-onsemi 0:098463de4c5d 463 }
group-onsemi 0:098463de4c5d 464
group-onsemi 0:098463de4c5d 465 end = p + len;
group-onsemi 0:098463de4c5d 466
group-onsemi 0:098463de4c5d 467 if( ( ret = mbedtls_asn1_get_mpi( &p, end, &dhm->P ) ) != 0 ||
group-onsemi 0:098463de4c5d 468 ( ret = mbedtls_asn1_get_mpi( &p, end, &dhm->G ) ) != 0 )
group-onsemi 0:098463de4c5d 469 {
group-onsemi 0:098463de4c5d 470 ret = MBEDTLS_ERR_DHM_INVALID_FORMAT + ret;
group-onsemi 0:098463de4c5d 471 goto exit;
group-onsemi 0:098463de4c5d 472 }
group-onsemi 0:098463de4c5d 473
group-onsemi 0:098463de4c5d 474 if( p != end )
group-onsemi 0:098463de4c5d 475 {
group-onsemi 0:098463de4c5d 476 /* This might be the optional privateValueLength.
group-onsemi 0:098463de4c5d 477 * If so, we can cleanly discard it */
group-onsemi 0:098463de4c5d 478 mbedtls_mpi rec;
group-onsemi 0:098463de4c5d 479 mbedtls_mpi_init( &rec );
group-onsemi 0:098463de4c5d 480 ret = mbedtls_asn1_get_mpi( &p, end, &rec );
group-onsemi 0:098463de4c5d 481 mbedtls_mpi_free( &rec );
group-onsemi 0:098463de4c5d 482 if ( ret != 0 )
group-onsemi 0:098463de4c5d 483 {
group-onsemi 0:098463de4c5d 484 ret = MBEDTLS_ERR_DHM_INVALID_FORMAT + ret;
group-onsemi 0:098463de4c5d 485 goto exit;
group-onsemi 0:098463de4c5d 486 }
group-onsemi 0:098463de4c5d 487 if ( p != end )
group-onsemi 0:098463de4c5d 488 {
group-onsemi 0:098463de4c5d 489 ret = MBEDTLS_ERR_DHM_INVALID_FORMAT +
group-onsemi 0:098463de4c5d 490 MBEDTLS_ERR_ASN1_LENGTH_MISMATCH;
group-onsemi 0:098463de4c5d 491 goto exit;
group-onsemi 0:098463de4c5d 492 }
group-onsemi 0:098463de4c5d 493 }
group-onsemi 0:098463de4c5d 494
group-onsemi 0:098463de4c5d 495 ret = 0;
group-onsemi 0:098463de4c5d 496
group-onsemi 0:098463de4c5d 497 dhm->len = mbedtls_mpi_size( &dhm->P );
group-onsemi 0:098463de4c5d 498
group-onsemi 0:098463de4c5d 499 exit:
group-onsemi 0:098463de4c5d 500 #if defined(MBEDTLS_PEM_PARSE_C)
group-onsemi 0:098463de4c5d 501 mbedtls_pem_free( &pem );
group-onsemi 0:098463de4c5d 502 #endif
group-onsemi 0:098463de4c5d 503 if( ret != 0 )
group-onsemi 0:098463de4c5d 504 mbedtls_dhm_free( dhm );
group-onsemi 0:098463de4c5d 505
group-onsemi 0:098463de4c5d 506 return( ret );
group-onsemi 0:098463de4c5d 507 }
group-onsemi 0:098463de4c5d 508
group-onsemi 0:098463de4c5d 509 #if defined(MBEDTLS_FS_IO)
group-onsemi 0:098463de4c5d 510 /*
group-onsemi 0:098463de4c5d 511 * Load all data from a file into a given buffer.
group-onsemi 0:098463de4c5d 512 *
group-onsemi 0:098463de4c5d 513 * The file is expected to contain either PEM or DER encoded data.
group-onsemi 0:098463de4c5d 514 * A terminating null byte is always appended. It is included in the announced
group-onsemi 0:098463de4c5d 515 * length only if the data looks like it is PEM encoded.
group-onsemi 0:098463de4c5d 516 */
group-onsemi 0:098463de4c5d 517 static int load_file( const char *path, unsigned char **buf, size_t *n )
group-onsemi 0:098463de4c5d 518 {
group-onsemi 0:098463de4c5d 519 FILE *f;
group-onsemi 0:098463de4c5d 520 long size;
group-onsemi 0:098463de4c5d 521
group-onsemi 0:098463de4c5d 522 if( ( f = fopen( path, "rb" ) ) == NULL )
group-onsemi 0:098463de4c5d 523 return( MBEDTLS_ERR_DHM_FILE_IO_ERROR );
group-onsemi 0:098463de4c5d 524
group-onsemi 0:098463de4c5d 525 fseek( f, 0, SEEK_END );
group-onsemi 0:098463de4c5d 526 if( ( size = ftell( f ) ) == -1 )
group-onsemi 0:098463de4c5d 527 {
group-onsemi 0:098463de4c5d 528 fclose( f );
group-onsemi 0:098463de4c5d 529 return( MBEDTLS_ERR_DHM_FILE_IO_ERROR );
group-onsemi 0:098463de4c5d 530 }
group-onsemi 0:098463de4c5d 531 fseek( f, 0, SEEK_SET );
group-onsemi 0:098463de4c5d 532
group-onsemi 0:098463de4c5d 533 *n = (size_t) size;
group-onsemi 0:098463de4c5d 534
group-onsemi 0:098463de4c5d 535 if( *n + 1 == 0 ||
group-onsemi 0:098463de4c5d 536 ( *buf = mbedtls_calloc( 1, *n + 1 ) ) == NULL )
group-onsemi 0:098463de4c5d 537 {
group-onsemi 0:098463de4c5d 538 fclose( f );
group-onsemi 0:098463de4c5d 539 return( MBEDTLS_ERR_DHM_ALLOC_FAILED );
group-onsemi 0:098463de4c5d 540 }
group-onsemi 0:098463de4c5d 541
group-onsemi 0:098463de4c5d 542 if( fread( *buf, 1, *n, f ) != *n )
group-onsemi 0:098463de4c5d 543 {
group-onsemi 0:098463de4c5d 544 fclose( f );
group-onsemi 0:098463de4c5d 545 mbedtls_free( *buf );
group-onsemi 0:098463de4c5d 546 return( MBEDTLS_ERR_DHM_FILE_IO_ERROR );
group-onsemi 0:098463de4c5d 547 }
group-onsemi 0:098463de4c5d 548
group-onsemi 0:098463de4c5d 549 fclose( f );
group-onsemi 0:098463de4c5d 550
group-onsemi 0:098463de4c5d 551 (*buf)[*n] = '\0';
group-onsemi 0:098463de4c5d 552
group-onsemi 0:098463de4c5d 553 if( strstr( (const char *) *buf, "-----BEGIN " ) != NULL )
group-onsemi 0:098463de4c5d 554 ++*n;
group-onsemi 0:098463de4c5d 555
group-onsemi 0:098463de4c5d 556 return( 0 );
group-onsemi 0:098463de4c5d 557 }
group-onsemi 0:098463de4c5d 558
group-onsemi 0:098463de4c5d 559 /*
group-onsemi 0:098463de4c5d 560 * Load and parse DHM parameters
group-onsemi 0:098463de4c5d 561 */
group-onsemi 0:098463de4c5d 562 int mbedtls_dhm_parse_dhmfile( mbedtls_dhm_context *dhm, const char *path )
group-onsemi 0:098463de4c5d 563 {
group-onsemi 0:098463de4c5d 564 int ret;
group-onsemi 0:098463de4c5d 565 size_t n;
group-onsemi 0:098463de4c5d 566 unsigned char *buf;
group-onsemi 0:098463de4c5d 567
group-onsemi 0:098463de4c5d 568 if( ( ret = load_file( path, &buf, &n ) ) != 0 )
group-onsemi 0:098463de4c5d 569 return( ret );
group-onsemi 0:098463de4c5d 570
group-onsemi 0:098463de4c5d 571 ret = mbedtls_dhm_parse_dhm( dhm, buf, n );
group-onsemi 0:098463de4c5d 572
group-onsemi 0:098463de4c5d 573 mbedtls_zeroize( buf, n );
group-onsemi 0:098463de4c5d 574 mbedtls_free( buf );
group-onsemi 0:098463de4c5d 575
group-onsemi 0:098463de4c5d 576 return( ret );
group-onsemi 0:098463de4c5d 577 }
group-onsemi 0:098463de4c5d 578 #endif /* MBEDTLS_FS_IO */
group-onsemi 0:098463de4c5d 579 #endif /* MBEDTLS_ASN1_PARSE_C */
group-onsemi 0:098463de4c5d 580
group-onsemi 0:098463de4c5d 581 #if defined(MBEDTLS_SELF_TEST)
group-onsemi 0:098463de4c5d 582
group-onsemi 0:098463de4c5d 583 static const char mbedtls_test_dhm_params[] =
group-onsemi 0:098463de4c5d 584 "-----BEGIN DH PARAMETERS-----\r\n"
group-onsemi 0:098463de4c5d 585 "MIGHAoGBAJ419DBEOgmQTzo5qXl5fQcN9TN455wkOL7052HzxxRVMyhYmwQcgJvh\r\n"
group-onsemi 0:098463de4c5d 586 "1sa18fyfR9OiVEMYglOpkqVoGLN7qd5aQNNi5W7/C+VBdHTBJcGZJyyP5B3qcz32\r\n"
group-onsemi 0:098463de4c5d 587 "9mLJKudlVudV0Qxk5qUJaPZ/xupz0NyoVpviuiBOI1gNi8ovSXWzAgEC\r\n"
group-onsemi 0:098463de4c5d 588 "-----END DH PARAMETERS-----\r\n";
group-onsemi 0:098463de4c5d 589
group-onsemi 0:098463de4c5d 590 static const size_t mbedtls_test_dhm_params_len = sizeof( mbedtls_test_dhm_params );
group-onsemi 0:098463de4c5d 591
group-onsemi 0:098463de4c5d 592 /*
group-onsemi 0:098463de4c5d 593 * Checkup routine
group-onsemi 0:098463de4c5d 594 */
group-onsemi 0:098463de4c5d 595 int mbedtls_dhm_self_test( int verbose )
group-onsemi 0:098463de4c5d 596 {
group-onsemi 0:098463de4c5d 597 int ret;
group-onsemi 0:098463de4c5d 598 mbedtls_dhm_context dhm;
group-onsemi 0:098463de4c5d 599
group-onsemi 0:098463de4c5d 600 mbedtls_dhm_init( &dhm );
group-onsemi 0:098463de4c5d 601
group-onsemi 0:098463de4c5d 602 if( verbose != 0 )
group-onsemi 0:098463de4c5d 603 mbedtls_printf( " DHM parameter load: " );
group-onsemi 0:098463de4c5d 604
group-onsemi 0:098463de4c5d 605 if( ( ret = mbedtls_dhm_parse_dhm( &dhm,
group-onsemi 0:098463de4c5d 606 (const unsigned char *) mbedtls_test_dhm_params,
group-onsemi 0:098463de4c5d 607 mbedtls_test_dhm_params_len ) ) != 0 )
group-onsemi 0:098463de4c5d 608 {
group-onsemi 0:098463de4c5d 609 if( verbose != 0 )
group-onsemi 0:098463de4c5d 610 mbedtls_printf( "failed\n" );
group-onsemi 0:098463de4c5d 611
group-onsemi 0:098463de4c5d 612 ret = 1;
group-onsemi 0:098463de4c5d 613 goto exit;
group-onsemi 0:098463de4c5d 614 }
group-onsemi 0:098463de4c5d 615
group-onsemi 0:098463de4c5d 616 if( verbose != 0 )
group-onsemi 0:098463de4c5d 617 mbedtls_printf( "passed\n\n" );
group-onsemi 0:098463de4c5d 618
group-onsemi 0:098463de4c5d 619 exit:
group-onsemi 0:098463de4c5d 620 mbedtls_dhm_free( &dhm );
group-onsemi 0:098463de4c5d 621
group-onsemi 0:098463de4c5d 622 return( ret );
group-onsemi 0:098463de4c5d 623 }
group-onsemi 0:098463de4c5d 624
group-onsemi 0:098463de4c5d 625 #endif /* MBEDTLS_SELF_TEST */
group-onsemi 0:098463de4c5d 626
group-onsemi 0:098463de4c5d 627 #endif /* MBEDTLS_DHM_C */