mbed client lightswitch demo

Dependencies:   mbed Socket lwip-eth lwip-sys lwip

Fork of mbed-client-classic-example-lwip by Austin Blackstone

Committer:
mbedAustin
Date:
Thu Jun 09 17:08:36 2016 +0000
Revision:
11:cada08fc8a70
Commit for public Consumption

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mbedAustin 11:cada08fc8a70 1 /**
mbedAustin 11:cada08fc8a70 2 * \file pkcs5.c
mbedAustin 11:cada08fc8a70 3 *
mbedAustin 11:cada08fc8a70 4 * \brief PKCS#5 functions
mbedAustin 11:cada08fc8a70 5 *
mbedAustin 11:cada08fc8a70 6 * \author Mathias Olsson <mathias@kompetensum.com>
mbedAustin 11:cada08fc8a70 7 *
mbedAustin 11:cada08fc8a70 8 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
mbedAustin 11:cada08fc8a70 9 * SPDX-License-Identifier: Apache-2.0
mbedAustin 11:cada08fc8a70 10 *
mbedAustin 11:cada08fc8a70 11 * Licensed under the Apache License, Version 2.0 (the "License"); you may
mbedAustin 11:cada08fc8a70 12 * not use this file except in compliance with the License.
mbedAustin 11:cada08fc8a70 13 * You may obtain a copy of the License at
mbedAustin 11:cada08fc8a70 14 *
mbedAustin 11:cada08fc8a70 15 * http://www.apache.org/licenses/LICENSE-2.0
mbedAustin 11:cada08fc8a70 16 *
mbedAustin 11:cada08fc8a70 17 * Unless required by applicable law or agreed to in writing, software
mbedAustin 11:cada08fc8a70 18 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
mbedAustin 11:cada08fc8a70 19 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
mbedAustin 11:cada08fc8a70 20 * See the License for the specific language governing permissions and
mbedAustin 11:cada08fc8a70 21 * limitations under the License.
mbedAustin 11:cada08fc8a70 22 *
mbedAustin 11:cada08fc8a70 23 * This file is part of mbed TLS (https://tls.mbed.org)
mbedAustin 11:cada08fc8a70 24 */
mbedAustin 11:cada08fc8a70 25 /*
mbedAustin 11:cada08fc8a70 26 * PKCS#5 includes PBKDF2 and more
mbedAustin 11:cada08fc8a70 27 *
mbedAustin 11:cada08fc8a70 28 * http://tools.ietf.org/html/rfc2898 (Specification)
mbedAustin 11:cada08fc8a70 29 * http://tools.ietf.org/html/rfc6070 (Test vectors)
mbedAustin 11:cada08fc8a70 30 */
mbedAustin 11:cada08fc8a70 31
mbedAustin 11:cada08fc8a70 32 #if !defined(MBEDTLS_CONFIG_FILE)
mbedAustin 11:cada08fc8a70 33 #include "mbedtls/config.h"
mbedAustin 11:cada08fc8a70 34 #else
mbedAustin 11:cada08fc8a70 35 #include MBEDTLS_CONFIG_FILE
mbedAustin 11:cada08fc8a70 36 #endif
mbedAustin 11:cada08fc8a70 37
mbedAustin 11:cada08fc8a70 38 #if defined(MBEDTLS_PKCS5_C)
mbedAustin 11:cada08fc8a70 39
mbedAustin 11:cada08fc8a70 40 #include "mbedtls/pkcs5.h"
mbedAustin 11:cada08fc8a70 41 #include "mbedtls/asn1.h"
mbedAustin 11:cada08fc8a70 42 #include "mbedtls/cipher.h"
mbedAustin 11:cada08fc8a70 43 #include "mbedtls/oid.h"
mbedAustin 11:cada08fc8a70 44
mbedAustin 11:cada08fc8a70 45 #include <string.h>
mbedAustin 11:cada08fc8a70 46
mbedAustin 11:cada08fc8a70 47 #if defined(MBEDTLS_PLATFORM_C)
mbedAustin 11:cada08fc8a70 48 #include "mbedtls/platform.h"
mbedAustin 11:cada08fc8a70 49 #else
mbedAustin 11:cada08fc8a70 50 #include <stdio.h>
mbedAustin 11:cada08fc8a70 51 #define mbedtls_printf printf
mbedAustin 11:cada08fc8a70 52 #endif
mbedAustin 11:cada08fc8a70 53
mbedAustin 11:cada08fc8a70 54 static int pkcs5_parse_pbkdf2_params( const mbedtls_asn1_buf *params,
mbedAustin 11:cada08fc8a70 55 mbedtls_asn1_buf *salt, int *iterations,
mbedAustin 11:cada08fc8a70 56 int *keylen, mbedtls_md_type_t *md_type )
mbedAustin 11:cada08fc8a70 57 {
mbedAustin 11:cada08fc8a70 58 int ret;
mbedAustin 11:cada08fc8a70 59 mbedtls_asn1_buf prf_alg_oid;
mbedAustin 11:cada08fc8a70 60 unsigned char *p = params->p;
mbedAustin 11:cada08fc8a70 61 const unsigned char *end = params->p + params->len;
mbedAustin 11:cada08fc8a70 62
mbedAustin 11:cada08fc8a70 63 if( params->tag != ( MBEDTLS_ASN1_CONSTRUCTED | MBEDTLS_ASN1_SEQUENCE ) )
mbedAustin 11:cada08fc8a70 64 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT +
mbedAustin 11:cada08fc8a70 65 MBEDTLS_ERR_ASN1_UNEXPECTED_TAG );
mbedAustin 11:cada08fc8a70 66 /*
mbedAustin 11:cada08fc8a70 67 * PBKDF2-params ::= SEQUENCE {
mbedAustin 11:cada08fc8a70 68 * salt OCTET STRING,
mbedAustin 11:cada08fc8a70 69 * iterationCount INTEGER,
mbedAustin 11:cada08fc8a70 70 * keyLength INTEGER OPTIONAL
mbedAustin 11:cada08fc8a70 71 * prf AlgorithmIdentifier DEFAULT algid-hmacWithSHA1
mbedAustin 11:cada08fc8a70 72 * }
mbedAustin 11:cada08fc8a70 73 *
mbedAustin 11:cada08fc8a70 74 */
mbedAustin 11:cada08fc8a70 75 if( ( ret = mbedtls_asn1_get_tag( &p, end, &salt->len, MBEDTLS_ASN1_OCTET_STRING ) ) != 0 )
mbedAustin 11:cada08fc8a70 76 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 77
mbedAustin 11:cada08fc8a70 78 salt->p = p;
mbedAustin 11:cada08fc8a70 79 p += salt->len;
mbedAustin 11:cada08fc8a70 80
mbedAustin 11:cada08fc8a70 81 if( ( ret = mbedtls_asn1_get_int( &p, end, iterations ) ) != 0 )
mbedAustin 11:cada08fc8a70 82 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 83
mbedAustin 11:cada08fc8a70 84 if( p == end )
mbedAustin 11:cada08fc8a70 85 return( 0 );
mbedAustin 11:cada08fc8a70 86
mbedAustin 11:cada08fc8a70 87 if( ( ret = mbedtls_asn1_get_int( &p, end, keylen ) ) != 0 )
mbedAustin 11:cada08fc8a70 88 {
mbedAustin 11:cada08fc8a70 89 if( ret != MBEDTLS_ERR_ASN1_UNEXPECTED_TAG )
mbedAustin 11:cada08fc8a70 90 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 91 }
mbedAustin 11:cada08fc8a70 92
mbedAustin 11:cada08fc8a70 93 if( p == end )
mbedAustin 11:cada08fc8a70 94 return( 0 );
mbedAustin 11:cada08fc8a70 95
mbedAustin 11:cada08fc8a70 96 if( ( ret = mbedtls_asn1_get_alg_null( &p, end, &prf_alg_oid ) ) != 0 )
mbedAustin 11:cada08fc8a70 97 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 98
mbedAustin 11:cada08fc8a70 99 if( MBEDTLS_OID_CMP( MBEDTLS_OID_HMAC_SHA1, &prf_alg_oid ) != 0 )
mbedAustin 11:cada08fc8a70 100 return( MBEDTLS_ERR_PKCS5_FEATURE_UNAVAILABLE );
mbedAustin 11:cada08fc8a70 101
mbedAustin 11:cada08fc8a70 102 *md_type = MBEDTLS_MD_SHA1;
mbedAustin 11:cada08fc8a70 103
mbedAustin 11:cada08fc8a70 104 if( p != end )
mbedAustin 11:cada08fc8a70 105 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT +
mbedAustin 11:cada08fc8a70 106 MBEDTLS_ERR_ASN1_LENGTH_MISMATCH );
mbedAustin 11:cada08fc8a70 107
mbedAustin 11:cada08fc8a70 108 return( 0 );
mbedAustin 11:cada08fc8a70 109 }
mbedAustin 11:cada08fc8a70 110
mbedAustin 11:cada08fc8a70 111 int mbedtls_pkcs5_pbes2( const mbedtls_asn1_buf *pbe_params, int mode,
mbedAustin 11:cada08fc8a70 112 const unsigned char *pwd, size_t pwdlen,
mbedAustin 11:cada08fc8a70 113 const unsigned char *data, size_t datalen,
mbedAustin 11:cada08fc8a70 114 unsigned char *output )
mbedAustin 11:cada08fc8a70 115 {
mbedAustin 11:cada08fc8a70 116 int ret, iterations = 0, keylen = 0;
mbedAustin 11:cada08fc8a70 117 unsigned char *p, *end;
mbedAustin 11:cada08fc8a70 118 mbedtls_asn1_buf kdf_alg_oid, enc_scheme_oid, kdf_alg_params, enc_scheme_params;
mbedAustin 11:cada08fc8a70 119 mbedtls_asn1_buf salt;
mbedAustin 11:cada08fc8a70 120 mbedtls_md_type_t md_type = MBEDTLS_MD_SHA1;
mbedAustin 11:cada08fc8a70 121 unsigned char key[32], iv[32];
mbedAustin 11:cada08fc8a70 122 size_t olen = 0;
mbedAustin 11:cada08fc8a70 123 const mbedtls_md_info_t *md_info;
mbedAustin 11:cada08fc8a70 124 const mbedtls_cipher_info_t *cipher_info;
mbedAustin 11:cada08fc8a70 125 mbedtls_md_context_t md_ctx;
mbedAustin 11:cada08fc8a70 126 mbedtls_cipher_type_t cipher_alg;
mbedAustin 11:cada08fc8a70 127 mbedtls_cipher_context_t cipher_ctx;
mbedAustin 11:cada08fc8a70 128
mbedAustin 11:cada08fc8a70 129 p = pbe_params->p;
mbedAustin 11:cada08fc8a70 130 end = p + pbe_params->len;
mbedAustin 11:cada08fc8a70 131
mbedAustin 11:cada08fc8a70 132 /*
mbedAustin 11:cada08fc8a70 133 * PBES2-params ::= SEQUENCE {
mbedAustin 11:cada08fc8a70 134 * keyDerivationFunc AlgorithmIdentifier {{PBES2-KDFs}},
mbedAustin 11:cada08fc8a70 135 * encryptionScheme AlgorithmIdentifier {{PBES2-Encs}}
mbedAustin 11:cada08fc8a70 136 * }
mbedAustin 11:cada08fc8a70 137 */
mbedAustin 11:cada08fc8a70 138 if( pbe_params->tag != ( MBEDTLS_ASN1_CONSTRUCTED | MBEDTLS_ASN1_SEQUENCE ) )
mbedAustin 11:cada08fc8a70 139 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT +
mbedAustin 11:cada08fc8a70 140 MBEDTLS_ERR_ASN1_UNEXPECTED_TAG );
mbedAustin 11:cada08fc8a70 141
mbedAustin 11:cada08fc8a70 142 if( ( ret = mbedtls_asn1_get_alg( &p, end, &kdf_alg_oid, &kdf_alg_params ) ) != 0 )
mbedAustin 11:cada08fc8a70 143 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 144
mbedAustin 11:cada08fc8a70 145 // Only PBKDF2 supported at the moment
mbedAustin 11:cada08fc8a70 146 //
mbedAustin 11:cada08fc8a70 147 if( MBEDTLS_OID_CMP( MBEDTLS_OID_PKCS5_PBKDF2, &kdf_alg_oid ) != 0 )
mbedAustin 11:cada08fc8a70 148 return( MBEDTLS_ERR_PKCS5_FEATURE_UNAVAILABLE );
mbedAustin 11:cada08fc8a70 149
mbedAustin 11:cada08fc8a70 150 if( ( ret = pkcs5_parse_pbkdf2_params( &kdf_alg_params,
mbedAustin 11:cada08fc8a70 151 &salt, &iterations, &keylen,
mbedAustin 11:cada08fc8a70 152 &md_type ) ) != 0 )
mbedAustin 11:cada08fc8a70 153 {
mbedAustin 11:cada08fc8a70 154 return( ret );
mbedAustin 11:cada08fc8a70 155 }
mbedAustin 11:cada08fc8a70 156
mbedAustin 11:cada08fc8a70 157 md_info = mbedtls_md_info_from_type( md_type );
mbedAustin 11:cada08fc8a70 158 if( md_info == NULL )
mbedAustin 11:cada08fc8a70 159 return( MBEDTLS_ERR_PKCS5_FEATURE_UNAVAILABLE );
mbedAustin 11:cada08fc8a70 160
mbedAustin 11:cada08fc8a70 161 if( ( ret = mbedtls_asn1_get_alg( &p, end, &enc_scheme_oid,
mbedAustin 11:cada08fc8a70 162 &enc_scheme_params ) ) != 0 )
mbedAustin 11:cada08fc8a70 163 {
mbedAustin 11:cada08fc8a70 164 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT + ret );
mbedAustin 11:cada08fc8a70 165 }
mbedAustin 11:cada08fc8a70 166
mbedAustin 11:cada08fc8a70 167 if( mbedtls_oid_get_cipher_alg( &enc_scheme_oid, &cipher_alg ) != 0 )
mbedAustin 11:cada08fc8a70 168 return( MBEDTLS_ERR_PKCS5_FEATURE_UNAVAILABLE );
mbedAustin 11:cada08fc8a70 169
mbedAustin 11:cada08fc8a70 170 cipher_info = mbedtls_cipher_info_from_type( cipher_alg );
mbedAustin 11:cada08fc8a70 171 if( cipher_info == NULL )
mbedAustin 11:cada08fc8a70 172 return( MBEDTLS_ERR_PKCS5_FEATURE_UNAVAILABLE );
mbedAustin 11:cada08fc8a70 173
mbedAustin 11:cada08fc8a70 174 /*
mbedAustin 11:cada08fc8a70 175 * The value of keylen from pkcs5_parse_pbkdf2_params() is ignored
mbedAustin 11:cada08fc8a70 176 * since it is optional and we don't know if it was set or not
mbedAustin 11:cada08fc8a70 177 */
mbedAustin 11:cada08fc8a70 178 keylen = cipher_info->key_bitlen / 8;
mbedAustin 11:cada08fc8a70 179
mbedAustin 11:cada08fc8a70 180 if( enc_scheme_params.tag != MBEDTLS_ASN1_OCTET_STRING ||
mbedAustin 11:cada08fc8a70 181 enc_scheme_params.len != cipher_info->iv_size )
mbedAustin 11:cada08fc8a70 182 {
mbedAustin 11:cada08fc8a70 183 return( MBEDTLS_ERR_PKCS5_INVALID_FORMAT );
mbedAustin 11:cada08fc8a70 184 }
mbedAustin 11:cada08fc8a70 185
mbedAustin 11:cada08fc8a70 186 mbedtls_md_init( &md_ctx );
mbedAustin 11:cada08fc8a70 187 mbedtls_cipher_init( &cipher_ctx );
mbedAustin 11:cada08fc8a70 188
mbedAustin 11:cada08fc8a70 189 memcpy( iv, enc_scheme_params.p, enc_scheme_params.len );
mbedAustin 11:cada08fc8a70 190
mbedAustin 11:cada08fc8a70 191 if( ( ret = mbedtls_md_setup( &md_ctx, md_info, 1 ) ) != 0 )
mbedAustin 11:cada08fc8a70 192 goto exit;
mbedAustin 11:cada08fc8a70 193
mbedAustin 11:cada08fc8a70 194 if( ( ret = mbedtls_pkcs5_pbkdf2_hmac( &md_ctx, pwd, pwdlen, salt.p, salt.len,
mbedAustin 11:cada08fc8a70 195 iterations, keylen, key ) ) != 0 )
mbedAustin 11:cada08fc8a70 196 {
mbedAustin 11:cada08fc8a70 197 goto exit;
mbedAustin 11:cada08fc8a70 198 }
mbedAustin 11:cada08fc8a70 199
mbedAustin 11:cada08fc8a70 200 if( ( ret = mbedtls_cipher_setup( &cipher_ctx, cipher_info ) ) != 0 )
mbedAustin 11:cada08fc8a70 201 goto exit;
mbedAustin 11:cada08fc8a70 202
mbedAustin 11:cada08fc8a70 203 if( ( ret = mbedtls_cipher_setkey( &cipher_ctx, key, 8 * keylen, (mbedtls_operation_t) mode ) ) != 0 )
mbedAustin 11:cada08fc8a70 204 goto exit;
mbedAustin 11:cada08fc8a70 205
mbedAustin 11:cada08fc8a70 206 if( ( ret = mbedtls_cipher_crypt( &cipher_ctx, iv, enc_scheme_params.len,
mbedAustin 11:cada08fc8a70 207 data, datalen, output, &olen ) ) != 0 )
mbedAustin 11:cada08fc8a70 208 ret = MBEDTLS_ERR_PKCS5_PASSWORD_MISMATCH;
mbedAustin 11:cada08fc8a70 209
mbedAustin 11:cada08fc8a70 210 exit:
mbedAustin 11:cada08fc8a70 211 mbedtls_md_free( &md_ctx );
mbedAustin 11:cada08fc8a70 212 mbedtls_cipher_free( &cipher_ctx );
mbedAustin 11:cada08fc8a70 213
mbedAustin 11:cada08fc8a70 214 return( ret );
mbedAustin 11:cada08fc8a70 215 }
mbedAustin 11:cada08fc8a70 216
mbedAustin 11:cada08fc8a70 217 int mbedtls_pkcs5_pbkdf2_hmac( mbedtls_md_context_t *ctx, const unsigned char *password,
mbedAustin 11:cada08fc8a70 218 size_t plen, const unsigned char *salt, size_t slen,
mbedAustin 11:cada08fc8a70 219 unsigned int iteration_count,
mbedAustin 11:cada08fc8a70 220 uint32_t key_length, unsigned char *output )
mbedAustin 11:cada08fc8a70 221 {
mbedAustin 11:cada08fc8a70 222 int ret, j;
mbedAustin 11:cada08fc8a70 223 unsigned int i;
mbedAustin 11:cada08fc8a70 224 unsigned char md1[MBEDTLS_MD_MAX_SIZE];
mbedAustin 11:cada08fc8a70 225 unsigned char work[MBEDTLS_MD_MAX_SIZE];
mbedAustin 11:cada08fc8a70 226 unsigned char md_size = mbedtls_md_get_size( ctx->md_info );
mbedAustin 11:cada08fc8a70 227 size_t use_len;
mbedAustin 11:cada08fc8a70 228 unsigned char *out_p = output;
mbedAustin 11:cada08fc8a70 229 unsigned char counter[4];
mbedAustin 11:cada08fc8a70 230
mbedAustin 11:cada08fc8a70 231 memset( counter, 0, 4 );
mbedAustin 11:cada08fc8a70 232 counter[3] = 1;
mbedAustin 11:cada08fc8a70 233
mbedAustin 11:cada08fc8a70 234 if( iteration_count > 0xFFFFFFFF )
mbedAustin 11:cada08fc8a70 235 return( MBEDTLS_ERR_PKCS5_BAD_INPUT_DATA );
mbedAustin 11:cada08fc8a70 236
mbedAustin 11:cada08fc8a70 237 while( key_length )
mbedAustin 11:cada08fc8a70 238 {
mbedAustin 11:cada08fc8a70 239 // U1 ends up in work
mbedAustin 11:cada08fc8a70 240 //
mbedAustin 11:cada08fc8a70 241 if( ( ret = mbedtls_md_hmac_starts( ctx, password, plen ) ) != 0 )
mbedAustin 11:cada08fc8a70 242 return( ret );
mbedAustin 11:cada08fc8a70 243
mbedAustin 11:cada08fc8a70 244 if( ( ret = mbedtls_md_hmac_update( ctx, salt, slen ) ) != 0 )
mbedAustin 11:cada08fc8a70 245 return( ret );
mbedAustin 11:cada08fc8a70 246
mbedAustin 11:cada08fc8a70 247 if( ( ret = mbedtls_md_hmac_update( ctx, counter, 4 ) ) != 0 )
mbedAustin 11:cada08fc8a70 248 return( ret );
mbedAustin 11:cada08fc8a70 249
mbedAustin 11:cada08fc8a70 250 if( ( ret = mbedtls_md_hmac_finish( ctx, work ) ) != 0 )
mbedAustin 11:cada08fc8a70 251 return( ret );
mbedAustin 11:cada08fc8a70 252
mbedAustin 11:cada08fc8a70 253 memcpy( md1, work, md_size );
mbedAustin 11:cada08fc8a70 254
mbedAustin 11:cada08fc8a70 255 for( i = 1; i < iteration_count; i++ )
mbedAustin 11:cada08fc8a70 256 {
mbedAustin 11:cada08fc8a70 257 // U2 ends up in md1
mbedAustin 11:cada08fc8a70 258 //
mbedAustin 11:cada08fc8a70 259 if( ( ret = mbedtls_md_hmac_starts( ctx, password, plen ) ) != 0 )
mbedAustin 11:cada08fc8a70 260 return( ret );
mbedAustin 11:cada08fc8a70 261
mbedAustin 11:cada08fc8a70 262 if( ( ret = mbedtls_md_hmac_update( ctx, md1, md_size ) ) != 0 )
mbedAustin 11:cada08fc8a70 263 return( ret );
mbedAustin 11:cada08fc8a70 264
mbedAustin 11:cada08fc8a70 265 if( ( ret = mbedtls_md_hmac_finish( ctx, md1 ) ) != 0 )
mbedAustin 11:cada08fc8a70 266 return( ret );
mbedAustin 11:cada08fc8a70 267
mbedAustin 11:cada08fc8a70 268 // U1 xor U2
mbedAustin 11:cada08fc8a70 269 //
mbedAustin 11:cada08fc8a70 270 for( j = 0; j < md_size; j++ )
mbedAustin 11:cada08fc8a70 271 work[j] ^= md1[j];
mbedAustin 11:cada08fc8a70 272 }
mbedAustin 11:cada08fc8a70 273
mbedAustin 11:cada08fc8a70 274 use_len = ( key_length < md_size ) ? key_length : md_size;
mbedAustin 11:cada08fc8a70 275 memcpy( out_p, work, use_len );
mbedAustin 11:cada08fc8a70 276
mbedAustin 11:cada08fc8a70 277 key_length -= (uint32_t) use_len;
mbedAustin 11:cada08fc8a70 278 out_p += use_len;
mbedAustin 11:cada08fc8a70 279
mbedAustin 11:cada08fc8a70 280 for( i = 4; i > 0; i-- )
mbedAustin 11:cada08fc8a70 281 if( ++counter[i - 1] != 0 )
mbedAustin 11:cada08fc8a70 282 break;
mbedAustin 11:cada08fc8a70 283 }
mbedAustin 11:cada08fc8a70 284
mbedAustin 11:cada08fc8a70 285 return( 0 );
mbedAustin 11:cada08fc8a70 286 }
mbedAustin 11:cada08fc8a70 287
mbedAustin 11:cada08fc8a70 288 #if defined(MBEDTLS_SELF_TEST)
mbedAustin 11:cada08fc8a70 289
mbedAustin 11:cada08fc8a70 290 #if !defined(MBEDTLS_SHA1_C)
mbedAustin 11:cada08fc8a70 291 int mbedtls_pkcs5_self_test( int verbose )
mbedAustin 11:cada08fc8a70 292 {
mbedAustin 11:cada08fc8a70 293 if( verbose != 0 )
mbedAustin 11:cada08fc8a70 294 mbedtls_printf( " PBKDF2 (SHA1): skipped\n\n" );
mbedAustin 11:cada08fc8a70 295
mbedAustin 11:cada08fc8a70 296 return( 0 );
mbedAustin 11:cada08fc8a70 297 }
mbedAustin 11:cada08fc8a70 298 #else
mbedAustin 11:cada08fc8a70 299
mbedAustin 11:cada08fc8a70 300 #define MAX_TESTS 6
mbedAustin 11:cada08fc8a70 301
mbedAustin 11:cada08fc8a70 302 static const size_t plen[MAX_TESTS] =
mbedAustin 11:cada08fc8a70 303 { 8, 8, 8, 24, 9 };
mbedAustin 11:cada08fc8a70 304
mbedAustin 11:cada08fc8a70 305 static const unsigned char password[MAX_TESTS][32] =
mbedAustin 11:cada08fc8a70 306 {
mbedAustin 11:cada08fc8a70 307 "password",
mbedAustin 11:cada08fc8a70 308 "password",
mbedAustin 11:cada08fc8a70 309 "password",
mbedAustin 11:cada08fc8a70 310 "passwordPASSWORDpassword",
mbedAustin 11:cada08fc8a70 311 "pass\0word",
mbedAustin 11:cada08fc8a70 312 };
mbedAustin 11:cada08fc8a70 313
mbedAustin 11:cada08fc8a70 314 static const size_t slen[MAX_TESTS] =
mbedAustin 11:cada08fc8a70 315 { 4, 4, 4, 36, 5 };
mbedAustin 11:cada08fc8a70 316
mbedAustin 11:cada08fc8a70 317 static const unsigned char salt[MAX_TESTS][40] =
mbedAustin 11:cada08fc8a70 318 {
mbedAustin 11:cada08fc8a70 319 "salt",
mbedAustin 11:cada08fc8a70 320 "salt",
mbedAustin 11:cada08fc8a70 321 "salt",
mbedAustin 11:cada08fc8a70 322 "saltSALTsaltSALTsaltSALTsaltSALTsalt",
mbedAustin 11:cada08fc8a70 323 "sa\0lt",
mbedAustin 11:cada08fc8a70 324 };
mbedAustin 11:cada08fc8a70 325
mbedAustin 11:cada08fc8a70 326 static const uint32_t it_cnt[MAX_TESTS] =
mbedAustin 11:cada08fc8a70 327 { 1, 2, 4096, 4096, 4096 };
mbedAustin 11:cada08fc8a70 328
mbedAustin 11:cada08fc8a70 329 static const uint32_t key_len[MAX_TESTS] =
mbedAustin 11:cada08fc8a70 330 { 20, 20, 20, 25, 16 };
mbedAustin 11:cada08fc8a70 331
mbedAustin 11:cada08fc8a70 332 static const unsigned char result_key[MAX_TESTS][32] =
mbedAustin 11:cada08fc8a70 333 {
mbedAustin 11:cada08fc8a70 334 { 0x0c, 0x60, 0xc8, 0x0f, 0x96, 0x1f, 0x0e, 0x71,
mbedAustin 11:cada08fc8a70 335 0xf3, 0xa9, 0xb5, 0x24, 0xaf, 0x60, 0x12, 0x06,
mbedAustin 11:cada08fc8a70 336 0x2f, 0xe0, 0x37, 0xa6 },
mbedAustin 11:cada08fc8a70 337 { 0xea, 0x6c, 0x01, 0x4d, 0xc7, 0x2d, 0x6f, 0x8c,
mbedAustin 11:cada08fc8a70 338 0xcd, 0x1e, 0xd9, 0x2a, 0xce, 0x1d, 0x41, 0xf0,
mbedAustin 11:cada08fc8a70 339 0xd8, 0xde, 0x89, 0x57 },
mbedAustin 11:cada08fc8a70 340 { 0x4b, 0x00, 0x79, 0x01, 0xb7, 0x65, 0x48, 0x9a,
mbedAustin 11:cada08fc8a70 341 0xbe, 0xad, 0x49, 0xd9, 0x26, 0xf7, 0x21, 0xd0,
mbedAustin 11:cada08fc8a70 342 0x65, 0xa4, 0x29, 0xc1 },
mbedAustin 11:cada08fc8a70 343 { 0x3d, 0x2e, 0xec, 0x4f, 0xe4, 0x1c, 0x84, 0x9b,
mbedAustin 11:cada08fc8a70 344 0x80, 0xc8, 0xd8, 0x36, 0x62, 0xc0, 0xe4, 0x4a,
mbedAustin 11:cada08fc8a70 345 0x8b, 0x29, 0x1a, 0x96, 0x4c, 0xf2, 0xf0, 0x70,
mbedAustin 11:cada08fc8a70 346 0x38 },
mbedAustin 11:cada08fc8a70 347 { 0x56, 0xfa, 0x6a, 0xa7, 0x55, 0x48, 0x09, 0x9d,
mbedAustin 11:cada08fc8a70 348 0xcc, 0x37, 0xd7, 0xf0, 0x34, 0x25, 0xe0, 0xc3 },
mbedAustin 11:cada08fc8a70 349 };
mbedAustin 11:cada08fc8a70 350
mbedAustin 11:cada08fc8a70 351 int mbedtls_pkcs5_self_test( int verbose )
mbedAustin 11:cada08fc8a70 352 {
mbedAustin 11:cada08fc8a70 353 mbedtls_md_context_t sha1_ctx;
mbedAustin 11:cada08fc8a70 354 const mbedtls_md_info_t *info_sha1;
mbedAustin 11:cada08fc8a70 355 int ret, i;
mbedAustin 11:cada08fc8a70 356 unsigned char key[64];
mbedAustin 11:cada08fc8a70 357
mbedAustin 11:cada08fc8a70 358 mbedtls_md_init( &sha1_ctx );
mbedAustin 11:cada08fc8a70 359
mbedAustin 11:cada08fc8a70 360 info_sha1 = mbedtls_md_info_from_type( MBEDTLS_MD_SHA1 );
mbedAustin 11:cada08fc8a70 361 if( info_sha1 == NULL )
mbedAustin 11:cada08fc8a70 362 {
mbedAustin 11:cada08fc8a70 363 ret = 1;
mbedAustin 11:cada08fc8a70 364 goto exit;
mbedAustin 11:cada08fc8a70 365 }
mbedAustin 11:cada08fc8a70 366
mbedAustin 11:cada08fc8a70 367 if( ( ret = mbedtls_md_setup( &sha1_ctx, info_sha1, 1 ) ) != 0 )
mbedAustin 11:cada08fc8a70 368 {
mbedAustin 11:cada08fc8a70 369 ret = 1;
mbedAustin 11:cada08fc8a70 370 goto exit;
mbedAustin 11:cada08fc8a70 371 }
mbedAustin 11:cada08fc8a70 372
mbedAustin 11:cada08fc8a70 373 for( i = 0; i < MAX_TESTS; i++ )
mbedAustin 11:cada08fc8a70 374 {
mbedAustin 11:cada08fc8a70 375 if( verbose != 0 )
mbedAustin 11:cada08fc8a70 376 mbedtls_printf( " PBKDF2 (SHA1) #%d: ", i );
mbedAustin 11:cada08fc8a70 377
mbedAustin 11:cada08fc8a70 378 ret = mbedtls_pkcs5_pbkdf2_hmac( &sha1_ctx, password[i], plen[i], salt[i],
mbedAustin 11:cada08fc8a70 379 slen[i], it_cnt[i], key_len[i], key );
mbedAustin 11:cada08fc8a70 380 if( ret != 0 ||
mbedAustin 11:cada08fc8a70 381 memcmp( result_key[i], key, key_len[i] ) != 0 )
mbedAustin 11:cada08fc8a70 382 {
mbedAustin 11:cada08fc8a70 383 if( verbose != 0 )
mbedAustin 11:cada08fc8a70 384 mbedtls_printf( "failed\n" );
mbedAustin 11:cada08fc8a70 385
mbedAustin 11:cada08fc8a70 386 ret = 1;
mbedAustin 11:cada08fc8a70 387 goto exit;
mbedAustin 11:cada08fc8a70 388 }
mbedAustin 11:cada08fc8a70 389
mbedAustin 11:cada08fc8a70 390 if( verbose != 0 )
mbedAustin 11:cada08fc8a70 391 mbedtls_printf( "passed\n" );
mbedAustin 11:cada08fc8a70 392 }
mbedAustin 11:cada08fc8a70 393
mbedAustin 11:cada08fc8a70 394 mbedtls_printf( "\n" );
mbedAustin 11:cada08fc8a70 395
mbedAustin 11:cada08fc8a70 396 exit:
mbedAustin 11:cada08fc8a70 397 mbedtls_md_free( &sha1_ctx );
mbedAustin 11:cada08fc8a70 398
mbedAustin 11:cada08fc8a70 399 return( ret );
mbedAustin 11:cada08fc8a70 400 }
mbedAustin 11:cada08fc8a70 401 #endif /* MBEDTLS_SHA1_C */
mbedAustin 11:cada08fc8a70 402
mbedAustin 11:cada08fc8a70 403 #endif /* MBEDTLS_SELF_TEST */
mbedAustin 11:cada08fc8a70 404
mbedAustin 11:cada08fc8a70 405 #endif /* MBEDTLS_PKCS5_C */