Denislam Valeev / Mbed OS Nucleo_rtos_basic
Committer:
valeyev
Date:
Tue Mar 13 07:17:50 2018 +0000
Revision:
0:e056ac8fecf8
looking for...

Who changed what in which revision?

UserRevisionLine numberNew contents of line
valeyev 0:e056ac8fecf8 1 /*
valeyev 0:e056ac8fecf8 2 * FIPS-180-2 compliant SHA-384/512 implementation
valeyev 0:e056ac8fecf8 3 *
valeyev 0:e056ac8fecf8 4 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
valeyev 0:e056ac8fecf8 5 * SPDX-License-Identifier: Apache-2.0
valeyev 0:e056ac8fecf8 6 *
valeyev 0:e056ac8fecf8 7 * Licensed under the Apache License, Version 2.0 (the "License"); you may
valeyev 0:e056ac8fecf8 8 * not use this file except in compliance with the License.
valeyev 0:e056ac8fecf8 9 * You may obtain a copy of the License at
valeyev 0:e056ac8fecf8 10 *
valeyev 0:e056ac8fecf8 11 * http://www.apache.org/licenses/LICENSE-2.0
valeyev 0:e056ac8fecf8 12 *
valeyev 0:e056ac8fecf8 13 * Unless required by applicable law or agreed to in writing, software
valeyev 0:e056ac8fecf8 14 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
valeyev 0:e056ac8fecf8 15 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
valeyev 0:e056ac8fecf8 16 * See the License for the specific language governing permissions and
valeyev 0:e056ac8fecf8 17 * limitations under the License.
valeyev 0:e056ac8fecf8 18 *
valeyev 0:e056ac8fecf8 19 * This file is part of mbed TLS (https://tls.mbed.org)
valeyev 0:e056ac8fecf8 20 */
valeyev 0:e056ac8fecf8 21 /*
valeyev 0:e056ac8fecf8 22 * The SHA-512 Secure Hash Standard was published by NIST in 2002.
valeyev 0:e056ac8fecf8 23 *
valeyev 0:e056ac8fecf8 24 * http://csrc.nist.gov/publications/fips/fips180-2/fips180-2.pdf
valeyev 0:e056ac8fecf8 25 */
valeyev 0:e056ac8fecf8 26
valeyev 0:e056ac8fecf8 27 #if !defined(MBEDTLS_CONFIG_FILE)
valeyev 0:e056ac8fecf8 28 #include "mbedtls/config.h"
valeyev 0:e056ac8fecf8 29 #else
valeyev 0:e056ac8fecf8 30 #include MBEDTLS_CONFIG_FILE
valeyev 0:e056ac8fecf8 31 #endif
valeyev 0:e056ac8fecf8 32
valeyev 0:e056ac8fecf8 33 #if defined(MBEDTLS_SHA512_C)
valeyev 0:e056ac8fecf8 34
valeyev 0:e056ac8fecf8 35 #include "mbedtls/sha512.h"
valeyev 0:e056ac8fecf8 36
valeyev 0:e056ac8fecf8 37 #if defined(_MSC_VER) || defined(__WATCOMC__)
valeyev 0:e056ac8fecf8 38 #define UL64(x) x##ui64
valeyev 0:e056ac8fecf8 39 #else
valeyev 0:e056ac8fecf8 40 #define UL64(x) x##ULL
valeyev 0:e056ac8fecf8 41 #endif
valeyev 0:e056ac8fecf8 42
valeyev 0:e056ac8fecf8 43 #include <string.h>
valeyev 0:e056ac8fecf8 44
valeyev 0:e056ac8fecf8 45 #if defined(MBEDTLS_SELF_TEST)
valeyev 0:e056ac8fecf8 46 #if defined(MBEDTLS_PLATFORM_C)
valeyev 0:e056ac8fecf8 47 #include "mbedtls/platform.h"
valeyev 0:e056ac8fecf8 48 #else
valeyev 0:e056ac8fecf8 49 #include <stdio.h>
valeyev 0:e056ac8fecf8 50 #include <stdlib.h>
valeyev 0:e056ac8fecf8 51 #define mbedtls_printf printf
valeyev 0:e056ac8fecf8 52 #define mbedtls_calloc calloc
valeyev 0:e056ac8fecf8 53 #define mbedtls_free free
valeyev 0:e056ac8fecf8 54 #endif /* MBEDTLS_PLATFORM_C */
valeyev 0:e056ac8fecf8 55 #endif /* MBEDTLS_SELF_TEST */
valeyev 0:e056ac8fecf8 56
valeyev 0:e056ac8fecf8 57 #if !defined(MBEDTLS_SHA512_ALT)
valeyev 0:e056ac8fecf8 58
valeyev 0:e056ac8fecf8 59 /* Implementation that should never be optimized out by the compiler */
valeyev 0:e056ac8fecf8 60 static void mbedtls_zeroize( void *v, size_t n ) {
valeyev 0:e056ac8fecf8 61 volatile unsigned char *p = v; while( n-- ) *p++ = 0;
valeyev 0:e056ac8fecf8 62 }
valeyev 0:e056ac8fecf8 63
valeyev 0:e056ac8fecf8 64 /*
valeyev 0:e056ac8fecf8 65 * 64-bit integer manipulation macros (big endian)
valeyev 0:e056ac8fecf8 66 */
valeyev 0:e056ac8fecf8 67 #ifndef GET_UINT64_BE
valeyev 0:e056ac8fecf8 68 #define GET_UINT64_BE(n,b,i) \
valeyev 0:e056ac8fecf8 69 { \
valeyev 0:e056ac8fecf8 70 (n) = ( (uint64_t) (b)[(i) ] << 56 ) \
valeyev 0:e056ac8fecf8 71 | ( (uint64_t) (b)[(i) + 1] << 48 ) \
valeyev 0:e056ac8fecf8 72 | ( (uint64_t) (b)[(i) + 2] << 40 ) \
valeyev 0:e056ac8fecf8 73 | ( (uint64_t) (b)[(i) + 3] << 32 ) \
valeyev 0:e056ac8fecf8 74 | ( (uint64_t) (b)[(i) + 4] << 24 ) \
valeyev 0:e056ac8fecf8 75 | ( (uint64_t) (b)[(i) + 5] << 16 ) \
valeyev 0:e056ac8fecf8 76 | ( (uint64_t) (b)[(i) + 6] << 8 ) \
valeyev 0:e056ac8fecf8 77 | ( (uint64_t) (b)[(i) + 7] ); \
valeyev 0:e056ac8fecf8 78 }
valeyev 0:e056ac8fecf8 79 #endif /* GET_UINT64_BE */
valeyev 0:e056ac8fecf8 80
valeyev 0:e056ac8fecf8 81 #ifndef PUT_UINT64_BE
valeyev 0:e056ac8fecf8 82 #define PUT_UINT64_BE(n,b,i) \
valeyev 0:e056ac8fecf8 83 { \
valeyev 0:e056ac8fecf8 84 (b)[(i) ] = (unsigned char) ( (n) >> 56 ); \
valeyev 0:e056ac8fecf8 85 (b)[(i) + 1] = (unsigned char) ( (n) >> 48 ); \
valeyev 0:e056ac8fecf8 86 (b)[(i) + 2] = (unsigned char) ( (n) >> 40 ); \
valeyev 0:e056ac8fecf8 87 (b)[(i) + 3] = (unsigned char) ( (n) >> 32 ); \
valeyev 0:e056ac8fecf8 88 (b)[(i) + 4] = (unsigned char) ( (n) >> 24 ); \
valeyev 0:e056ac8fecf8 89 (b)[(i) + 5] = (unsigned char) ( (n) >> 16 ); \
valeyev 0:e056ac8fecf8 90 (b)[(i) + 6] = (unsigned char) ( (n) >> 8 ); \
valeyev 0:e056ac8fecf8 91 (b)[(i) + 7] = (unsigned char) ( (n) ); \
valeyev 0:e056ac8fecf8 92 }
valeyev 0:e056ac8fecf8 93 #endif /* PUT_UINT64_BE */
valeyev 0:e056ac8fecf8 94
valeyev 0:e056ac8fecf8 95 void mbedtls_sha512_init( mbedtls_sha512_context *ctx )
valeyev 0:e056ac8fecf8 96 {
valeyev 0:e056ac8fecf8 97 memset( ctx, 0, sizeof( mbedtls_sha512_context ) );
valeyev 0:e056ac8fecf8 98 }
valeyev 0:e056ac8fecf8 99
valeyev 0:e056ac8fecf8 100 void mbedtls_sha512_free( mbedtls_sha512_context *ctx )
valeyev 0:e056ac8fecf8 101 {
valeyev 0:e056ac8fecf8 102 if( ctx == NULL )
valeyev 0:e056ac8fecf8 103 return;
valeyev 0:e056ac8fecf8 104
valeyev 0:e056ac8fecf8 105 mbedtls_zeroize( ctx, sizeof( mbedtls_sha512_context ) );
valeyev 0:e056ac8fecf8 106 }
valeyev 0:e056ac8fecf8 107
valeyev 0:e056ac8fecf8 108 void mbedtls_sha512_clone( mbedtls_sha512_context *dst,
valeyev 0:e056ac8fecf8 109 const mbedtls_sha512_context *src )
valeyev 0:e056ac8fecf8 110 {
valeyev 0:e056ac8fecf8 111 *dst = *src;
valeyev 0:e056ac8fecf8 112 }
valeyev 0:e056ac8fecf8 113
valeyev 0:e056ac8fecf8 114 /*
valeyev 0:e056ac8fecf8 115 * SHA-512 context setup
valeyev 0:e056ac8fecf8 116 */
valeyev 0:e056ac8fecf8 117 int mbedtls_sha512_starts_ret( mbedtls_sha512_context *ctx, int is384 )
valeyev 0:e056ac8fecf8 118 {
valeyev 0:e056ac8fecf8 119 ctx->total[0] = 0;
valeyev 0:e056ac8fecf8 120 ctx->total[1] = 0;
valeyev 0:e056ac8fecf8 121
valeyev 0:e056ac8fecf8 122 if( is384 == 0 )
valeyev 0:e056ac8fecf8 123 {
valeyev 0:e056ac8fecf8 124 /* SHA-512 */
valeyev 0:e056ac8fecf8 125 ctx->state[0] = UL64(0x6A09E667F3BCC908);
valeyev 0:e056ac8fecf8 126 ctx->state[1] = UL64(0xBB67AE8584CAA73B);
valeyev 0:e056ac8fecf8 127 ctx->state[2] = UL64(0x3C6EF372FE94F82B);
valeyev 0:e056ac8fecf8 128 ctx->state[3] = UL64(0xA54FF53A5F1D36F1);
valeyev 0:e056ac8fecf8 129 ctx->state[4] = UL64(0x510E527FADE682D1);
valeyev 0:e056ac8fecf8 130 ctx->state[5] = UL64(0x9B05688C2B3E6C1F);
valeyev 0:e056ac8fecf8 131 ctx->state[6] = UL64(0x1F83D9ABFB41BD6B);
valeyev 0:e056ac8fecf8 132 ctx->state[7] = UL64(0x5BE0CD19137E2179);
valeyev 0:e056ac8fecf8 133 }
valeyev 0:e056ac8fecf8 134 else
valeyev 0:e056ac8fecf8 135 {
valeyev 0:e056ac8fecf8 136 /* SHA-384 */
valeyev 0:e056ac8fecf8 137 ctx->state[0] = UL64(0xCBBB9D5DC1059ED8);
valeyev 0:e056ac8fecf8 138 ctx->state[1] = UL64(0x629A292A367CD507);
valeyev 0:e056ac8fecf8 139 ctx->state[2] = UL64(0x9159015A3070DD17);
valeyev 0:e056ac8fecf8 140 ctx->state[3] = UL64(0x152FECD8F70E5939);
valeyev 0:e056ac8fecf8 141 ctx->state[4] = UL64(0x67332667FFC00B31);
valeyev 0:e056ac8fecf8 142 ctx->state[5] = UL64(0x8EB44A8768581511);
valeyev 0:e056ac8fecf8 143 ctx->state[6] = UL64(0xDB0C2E0D64F98FA7);
valeyev 0:e056ac8fecf8 144 ctx->state[7] = UL64(0x47B5481DBEFA4FA4);
valeyev 0:e056ac8fecf8 145 }
valeyev 0:e056ac8fecf8 146
valeyev 0:e056ac8fecf8 147 ctx->is384 = is384;
valeyev 0:e056ac8fecf8 148
valeyev 0:e056ac8fecf8 149 return( 0 );
valeyev 0:e056ac8fecf8 150 }
valeyev 0:e056ac8fecf8 151
valeyev 0:e056ac8fecf8 152 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
valeyev 0:e056ac8fecf8 153 void mbedtls_sha512_starts( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 154 int is384 )
valeyev 0:e056ac8fecf8 155 {
valeyev 0:e056ac8fecf8 156 mbedtls_sha512_starts_ret( ctx, is384 );
valeyev 0:e056ac8fecf8 157 }
valeyev 0:e056ac8fecf8 158 #endif
valeyev 0:e056ac8fecf8 159
valeyev 0:e056ac8fecf8 160 #if !defined(MBEDTLS_SHA512_PROCESS_ALT)
valeyev 0:e056ac8fecf8 161
valeyev 0:e056ac8fecf8 162 /*
valeyev 0:e056ac8fecf8 163 * Round constants
valeyev 0:e056ac8fecf8 164 */
valeyev 0:e056ac8fecf8 165 static const uint64_t K[80] =
valeyev 0:e056ac8fecf8 166 {
valeyev 0:e056ac8fecf8 167 UL64(0x428A2F98D728AE22), UL64(0x7137449123EF65CD),
valeyev 0:e056ac8fecf8 168 UL64(0xB5C0FBCFEC4D3B2F), UL64(0xE9B5DBA58189DBBC),
valeyev 0:e056ac8fecf8 169 UL64(0x3956C25BF348B538), UL64(0x59F111F1B605D019),
valeyev 0:e056ac8fecf8 170 UL64(0x923F82A4AF194F9B), UL64(0xAB1C5ED5DA6D8118),
valeyev 0:e056ac8fecf8 171 UL64(0xD807AA98A3030242), UL64(0x12835B0145706FBE),
valeyev 0:e056ac8fecf8 172 UL64(0x243185BE4EE4B28C), UL64(0x550C7DC3D5FFB4E2),
valeyev 0:e056ac8fecf8 173 UL64(0x72BE5D74F27B896F), UL64(0x80DEB1FE3B1696B1),
valeyev 0:e056ac8fecf8 174 UL64(0x9BDC06A725C71235), UL64(0xC19BF174CF692694),
valeyev 0:e056ac8fecf8 175 UL64(0xE49B69C19EF14AD2), UL64(0xEFBE4786384F25E3),
valeyev 0:e056ac8fecf8 176 UL64(0x0FC19DC68B8CD5B5), UL64(0x240CA1CC77AC9C65),
valeyev 0:e056ac8fecf8 177 UL64(0x2DE92C6F592B0275), UL64(0x4A7484AA6EA6E483),
valeyev 0:e056ac8fecf8 178 UL64(0x5CB0A9DCBD41FBD4), UL64(0x76F988DA831153B5),
valeyev 0:e056ac8fecf8 179 UL64(0x983E5152EE66DFAB), UL64(0xA831C66D2DB43210),
valeyev 0:e056ac8fecf8 180 UL64(0xB00327C898FB213F), UL64(0xBF597FC7BEEF0EE4),
valeyev 0:e056ac8fecf8 181 UL64(0xC6E00BF33DA88FC2), UL64(0xD5A79147930AA725),
valeyev 0:e056ac8fecf8 182 UL64(0x06CA6351E003826F), UL64(0x142929670A0E6E70),
valeyev 0:e056ac8fecf8 183 UL64(0x27B70A8546D22FFC), UL64(0x2E1B21385C26C926),
valeyev 0:e056ac8fecf8 184 UL64(0x4D2C6DFC5AC42AED), UL64(0x53380D139D95B3DF),
valeyev 0:e056ac8fecf8 185 UL64(0x650A73548BAF63DE), UL64(0x766A0ABB3C77B2A8),
valeyev 0:e056ac8fecf8 186 UL64(0x81C2C92E47EDAEE6), UL64(0x92722C851482353B),
valeyev 0:e056ac8fecf8 187 UL64(0xA2BFE8A14CF10364), UL64(0xA81A664BBC423001),
valeyev 0:e056ac8fecf8 188 UL64(0xC24B8B70D0F89791), UL64(0xC76C51A30654BE30),
valeyev 0:e056ac8fecf8 189 UL64(0xD192E819D6EF5218), UL64(0xD69906245565A910),
valeyev 0:e056ac8fecf8 190 UL64(0xF40E35855771202A), UL64(0x106AA07032BBD1B8),
valeyev 0:e056ac8fecf8 191 UL64(0x19A4C116B8D2D0C8), UL64(0x1E376C085141AB53),
valeyev 0:e056ac8fecf8 192 UL64(0x2748774CDF8EEB99), UL64(0x34B0BCB5E19B48A8),
valeyev 0:e056ac8fecf8 193 UL64(0x391C0CB3C5C95A63), UL64(0x4ED8AA4AE3418ACB),
valeyev 0:e056ac8fecf8 194 UL64(0x5B9CCA4F7763E373), UL64(0x682E6FF3D6B2B8A3),
valeyev 0:e056ac8fecf8 195 UL64(0x748F82EE5DEFB2FC), UL64(0x78A5636F43172F60),
valeyev 0:e056ac8fecf8 196 UL64(0x84C87814A1F0AB72), UL64(0x8CC702081A6439EC),
valeyev 0:e056ac8fecf8 197 UL64(0x90BEFFFA23631E28), UL64(0xA4506CEBDE82BDE9),
valeyev 0:e056ac8fecf8 198 UL64(0xBEF9A3F7B2C67915), UL64(0xC67178F2E372532B),
valeyev 0:e056ac8fecf8 199 UL64(0xCA273ECEEA26619C), UL64(0xD186B8C721C0C207),
valeyev 0:e056ac8fecf8 200 UL64(0xEADA7DD6CDE0EB1E), UL64(0xF57D4F7FEE6ED178),
valeyev 0:e056ac8fecf8 201 UL64(0x06F067AA72176FBA), UL64(0x0A637DC5A2C898A6),
valeyev 0:e056ac8fecf8 202 UL64(0x113F9804BEF90DAE), UL64(0x1B710B35131C471B),
valeyev 0:e056ac8fecf8 203 UL64(0x28DB77F523047D84), UL64(0x32CAAB7B40C72493),
valeyev 0:e056ac8fecf8 204 UL64(0x3C9EBE0A15C9BEBC), UL64(0x431D67C49C100D4C),
valeyev 0:e056ac8fecf8 205 UL64(0x4CC5D4BECB3E42B6), UL64(0x597F299CFC657E2A),
valeyev 0:e056ac8fecf8 206 UL64(0x5FCB6FAB3AD6FAEC), UL64(0x6C44198C4A475817)
valeyev 0:e056ac8fecf8 207 };
valeyev 0:e056ac8fecf8 208
valeyev 0:e056ac8fecf8 209 int mbedtls_internal_sha512_process( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 210 const unsigned char data[128] )
valeyev 0:e056ac8fecf8 211 {
valeyev 0:e056ac8fecf8 212 int i;
valeyev 0:e056ac8fecf8 213 uint64_t temp1, temp2, W[80];
valeyev 0:e056ac8fecf8 214 uint64_t A, B, C, D, E, F, G, H;
valeyev 0:e056ac8fecf8 215
valeyev 0:e056ac8fecf8 216 #define SHR(x,n) (x >> n)
valeyev 0:e056ac8fecf8 217 #define ROTR(x,n) (SHR(x,n) | (x << (64 - n)))
valeyev 0:e056ac8fecf8 218
valeyev 0:e056ac8fecf8 219 #define S0(x) (ROTR(x, 1) ^ ROTR(x, 8) ^ SHR(x, 7))
valeyev 0:e056ac8fecf8 220 #define S1(x) (ROTR(x,19) ^ ROTR(x,61) ^ SHR(x, 6))
valeyev 0:e056ac8fecf8 221
valeyev 0:e056ac8fecf8 222 #define S2(x) (ROTR(x,28) ^ ROTR(x,34) ^ ROTR(x,39))
valeyev 0:e056ac8fecf8 223 #define S3(x) (ROTR(x,14) ^ ROTR(x,18) ^ ROTR(x,41))
valeyev 0:e056ac8fecf8 224
valeyev 0:e056ac8fecf8 225 #define F0(x,y,z) ((x & y) | (z & (x | y)))
valeyev 0:e056ac8fecf8 226 #define F1(x,y,z) (z ^ (x & (y ^ z)))
valeyev 0:e056ac8fecf8 227
valeyev 0:e056ac8fecf8 228 #define P(a,b,c,d,e,f,g,h,x,K) \
valeyev 0:e056ac8fecf8 229 { \
valeyev 0:e056ac8fecf8 230 temp1 = h + S3(e) + F1(e,f,g) + K + x; \
valeyev 0:e056ac8fecf8 231 temp2 = S2(a) + F0(a,b,c); \
valeyev 0:e056ac8fecf8 232 d += temp1; h = temp1 + temp2; \
valeyev 0:e056ac8fecf8 233 }
valeyev 0:e056ac8fecf8 234
valeyev 0:e056ac8fecf8 235 for( i = 0; i < 16; i++ )
valeyev 0:e056ac8fecf8 236 {
valeyev 0:e056ac8fecf8 237 GET_UINT64_BE( W[i], data, i << 3 );
valeyev 0:e056ac8fecf8 238 }
valeyev 0:e056ac8fecf8 239
valeyev 0:e056ac8fecf8 240 for( ; i < 80; i++ )
valeyev 0:e056ac8fecf8 241 {
valeyev 0:e056ac8fecf8 242 W[i] = S1(W[i - 2]) + W[i - 7] +
valeyev 0:e056ac8fecf8 243 S0(W[i - 15]) + W[i - 16];
valeyev 0:e056ac8fecf8 244 }
valeyev 0:e056ac8fecf8 245
valeyev 0:e056ac8fecf8 246 A = ctx->state[0];
valeyev 0:e056ac8fecf8 247 B = ctx->state[1];
valeyev 0:e056ac8fecf8 248 C = ctx->state[2];
valeyev 0:e056ac8fecf8 249 D = ctx->state[3];
valeyev 0:e056ac8fecf8 250 E = ctx->state[4];
valeyev 0:e056ac8fecf8 251 F = ctx->state[5];
valeyev 0:e056ac8fecf8 252 G = ctx->state[6];
valeyev 0:e056ac8fecf8 253 H = ctx->state[7];
valeyev 0:e056ac8fecf8 254 i = 0;
valeyev 0:e056ac8fecf8 255
valeyev 0:e056ac8fecf8 256 do
valeyev 0:e056ac8fecf8 257 {
valeyev 0:e056ac8fecf8 258 P( A, B, C, D, E, F, G, H, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 259 P( H, A, B, C, D, E, F, G, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 260 P( G, H, A, B, C, D, E, F, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 261 P( F, G, H, A, B, C, D, E, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 262 P( E, F, G, H, A, B, C, D, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 263 P( D, E, F, G, H, A, B, C, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 264 P( C, D, E, F, G, H, A, B, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 265 P( B, C, D, E, F, G, H, A, W[i], K[i] ); i++;
valeyev 0:e056ac8fecf8 266 }
valeyev 0:e056ac8fecf8 267 while( i < 80 );
valeyev 0:e056ac8fecf8 268
valeyev 0:e056ac8fecf8 269 ctx->state[0] += A;
valeyev 0:e056ac8fecf8 270 ctx->state[1] += B;
valeyev 0:e056ac8fecf8 271 ctx->state[2] += C;
valeyev 0:e056ac8fecf8 272 ctx->state[3] += D;
valeyev 0:e056ac8fecf8 273 ctx->state[4] += E;
valeyev 0:e056ac8fecf8 274 ctx->state[5] += F;
valeyev 0:e056ac8fecf8 275 ctx->state[6] += G;
valeyev 0:e056ac8fecf8 276 ctx->state[7] += H;
valeyev 0:e056ac8fecf8 277
valeyev 0:e056ac8fecf8 278 return( 0 );
valeyev 0:e056ac8fecf8 279 }
valeyev 0:e056ac8fecf8 280
valeyev 0:e056ac8fecf8 281 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
valeyev 0:e056ac8fecf8 282 void mbedtls_sha512_process( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 283 const unsigned char data[128] )
valeyev 0:e056ac8fecf8 284 {
valeyev 0:e056ac8fecf8 285 mbedtls_internal_sha512_process( ctx, data );
valeyev 0:e056ac8fecf8 286 }
valeyev 0:e056ac8fecf8 287 #endif
valeyev 0:e056ac8fecf8 288 #endif /* !MBEDTLS_SHA512_PROCESS_ALT */
valeyev 0:e056ac8fecf8 289
valeyev 0:e056ac8fecf8 290 /*
valeyev 0:e056ac8fecf8 291 * SHA-512 process buffer
valeyev 0:e056ac8fecf8 292 */
valeyev 0:e056ac8fecf8 293 int mbedtls_sha512_update_ret( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 294 const unsigned char *input,
valeyev 0:e056ac8fecf8 295 size_t ilen )
valeyev 0:e056ac8fecf8 296 {
valeyev 0:e056ac8fecf8 297 int ret;
valeyev 0:e056ac8fecf8 298 size_t fill;
valeyev 0:e056ac8fecf8 299 unsigned int left;
valeyev 0:e056ac8fecf8 300
valeyev 0:e056ac8fecf8 301 if( ilen == 0 )
valeyev 0:e056ac8fecf8 302 return( 0 );
valeyev 0:e056ac8fecf8 303
valeyev 0:e056ac8fecf8 304 left = (unsigned int) (ctx->total[0] & 0x7F);
valeyev 0:e056ac8fecf8 305 fill = 128 - left;
valeyev 0:e056ac8fecf8 306
valeyev 0:e056ac8fecf8 307 ctx->total[0] += (uint64_t) ilen;
valeyev 0:e056ac8fecf8 308
valeyev 0:e056ac8fecf8 309 if( ctx->total[0] < (uint64_t) ilen )
valeyev 0:e056ac8fecf8 310 ctx->total[1]++;
valeyev 0:e056ac8fecf8 311
valeyev 0:e056ac8fecf8 312 if( left && ilen >= fill )
valeyev 0:e056ac8fecf8 313 {
valeyev 0:e056ac8fecf8 314 memcpy( (void *) (ctx->buffer + left), input, fill );
valeyev 0:e056ac8fecf8 315
valeyev 0:e056ac8fecf8 316 if( ( ret = mbedtls_internal_sha512_process( ctx, ctx->buffer ) ) != 0 )
valeyev 0:e056ac8fecf8 317 return( ret );
valeyev 0:e056ac8fecf8 318
valeyev 0:e056ac8fecf8 319 input += fill;
valeyev 0:e056ac8fecf8 320 ilen -= fill;
valeyev 0:e056ac8fecf8 321 left = 0;
valeyev 0:e056ac8fecf8 322 }
valeyev 0:e056ac8fecf8 323
valeyev 0:e056ac8fecf8 324 while( ilen >= 128 )
valeyev 0:e056ac8fecf8 325 {
valeyev 0:e056ac8fecf8 326 if( ( ret = mbedtls_internal_sha512_process( ctx, input ) ) != 0 )
valeyev 0:e056ac8fecf8 327 return( ret );
valeyev 0:e056ac8fecf8 328
valeyev 0:e056ac8fecf8 329 input += 128;
valeyev 0:e056ac8fecf8 330 ilen -= 128;
valeyev 0:e056ac8fecf8 331 }
valeyev 0:e056ac8fecf8 332
valeyev 0:e056ac8fecf8 333 if( ilen > 0 )
valeyev 0:e056ac8fecf8 334 memcpy( (void *) (ctx->buffer + left), input, ilen );
valeyev 0:e056ac8fecf8 335
valeyev 0:e056ac8fecf8 336 return( 0 );
valeyev 0:e056ac8fecf8 337 }
valeyev 0:e056ac8fecf8 338
valeyev 0:e056ac8fecf8 339 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
valeyev 0:e056ac8fecf8 340 void mbedtls_sha512_update( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 341 const unsigned char *input,
valeyev 0:e056ac8fecf8 342 size_t ilen )
valeyev 0:e056ac8fecf8 343 {
valeyev 0:e056ac8fecf8 344 mbedtls_sha512_update_ret( ctx, input, ilen );
valeyev 0:e056ac8fecf8 345 }
valeyev 0:e056ac8fecf8 346 #endif
valeyev 0:e056ac8fecf8 347
valeyev 0:e056ac8fecf8 348 static const unsigned char sha512_padding[128] =
valeyev 0:e056ac8fecf8 349 {
valeyev 0:e056ac8fecf8 350 0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 351 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 352 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 353 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 354 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 355 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 356 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
valeyev 0:e056ac8fecf8 357 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
valeyev 0:e056ac8fecf8 358 };
valeyev 0:e056ac8fecf8 359
valeyev 0:e056ac8fecf8 360 /*
valeyev 0:e056ac8fecf8 361 * SHA-512 final digest
valeyev 0:e056ac8fecf8 362 */
valeyev 0:e056ac8fecf8 363 int mbedtls_sha512_finish_ret( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 364 unsigned char output[64] )
valeyev 0:e056ac8fecf8 365 {
valeyev 0:e056ac8fecf8 366 int ret;
valeyev 0:e056ac8fecf8 367 size_t last, padn;
valeyev 0:e056ac8fecf8 368 uint64_t high, low;
valeyev 0:e056ac8fecf8 369 unsigned char msglen[16];
valeyev 0:e056ac8fecf8 370
valeyev 0:e056ac8fecf8 371 high = ( ctx->total[0] >> 61 )
valeyev 0:e056ac8fecf8 372 | ( ctx->total[1] << 3 );
valeyev 0:e056ac8fecf8 373 low = ( ctx->total[0] << 3 );
valeyev 0:e056ac8fecf8 374
valeyev 0:e056ac8fecf8 375 PUT_UINT64_BE( high, msglen, 0 );
valeyev 0:e056ac8fecf8 376 PUT_UINT64_BE( low, msglen, 8 );
valeyev 0:e056ac8fecf8 377
valeyev 0:e056ac8fecf8 378 last = (size_t)( ctx->total[0] & 0x7F );
valeyev 0:e056ac8fecf8 379 padn = ( last < 112 ) ? ( 112 - last ) : ( 240 - last );
valeyev 0:e056ac8fecf8 380
valeyev 0:e056ac8fecf8 381 if( ( ret = mbedtls_sha512_update_ret( ctx, sha512_padding, padn ) ) != 0 )
valeyev 0:e056ac8fecf8 382 return( ret );
valeyev 0:e056ac8fecf8 383
valeyev 0:e056ac8fecf8 384 if( ( ret = mbedtls_sha512_update_ret( ctx, msglen, 16 ) ) != 0 )
valeyev 0:e056ac8fecf8 385 return( ret );
valeyev 0:e056ac8fecf8 386
valeyev 0:e056ac8fecf8 387 PUT_UINT64_BE( ctx->state[0], output, 0 );
valeyev 0:e056ac8fecf8 388 PUT_UINT64_BE( ctx->state[1], output, 8 );
valeyev 0:e056ac8fecf8 389 PUT_UINT64_BE( ctx->state[2], output, 16 );
valeyev 0:e056ac8fecf8 390 PUT_UINT64_BE( ctx->state[3], output, 24 );
valeyev 0:e056ac8fecf8 391 PUT_UINT64_BE( ctx->state[4], output, 32 );
valeyev 0:e056ac8fecf8 392 PUT_UINT64_BE( ctx->state[5], output, 40 );
valeyev 0:e056ac8fecf8 393
valeyev 0:e056ac8fecf8 394 if( ctx->is384 == 0 )
valeyev 0:e056ac8fecf8 395 {
valeyev 0:e056ac8fecf8 396 PUT_UINT64_BE( ctx->state[6], output, 48 );
valeyev 0:e056ac8fecf8 397 PUT_UINT64_BE( ctx->state[7], output, 56 );
valeyev 0:e056ac8fecf8 398 }
valeyev 0:e056ac8fecf8 399
valeyev 0:e056ac8fecf8 400 return( 0 );
valeyev 0:e056ac8fecf8 401 }
valeyev 0:e056ac8fecf8 402
valeyev 0:e056ac8fecf8 403 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
valeyev 0:e056ac8fecf8 404 void mbedtls_sha512_finish( mbedtls_sha512_context *ctx,
valeyev 0:e056ac8fecf8 405 unsigned char output[64] )
valeyev 0:e056ac8fecf8 406 {
valeyev 0:e056ac8fecf8 407 mbedtls_sha512_finish_ret( ctx, output );
valeyev 0:e056ac8fecf8 408 }
valeyev 0:e056ac8fecf8 409 #endif
valeyev 0:e056ac8fecf8 410
valeyev 0:e056ac8fecf8 411 #endif /* !MBEDTLS_SHA512_ALT */
valeyev 0:e056ac8fecf8 412
valeyev 0:e056ac8fecf8 413 /*
valeyev 0:e056ac8fecf8 414 * output = SHA-512( input buffer )
valeyev 0:e056ac8fecf8 415 */
valeyev 0:e056ac8fecf8 416 int mbedtls_sha512_ret( const unsigned char *input,
valeyev 0:e056ac8fecf8 417 size_t ilen,
valeyev 0:e056ac8fecf8 418 unsigned char output[64],
valeyev 0:e056ac8fecf8 419 int is384 )
valeyev 0:e056ac8fecf8 420 {
valeyev 0:e056ac8fecf8 421 int ret;
valeyev 0:e056ac8fecf8 422 mbedtls_sha512_context ctx;
valeyev 0:e056ac8fecf8 423
valeyev 0:e056ac8fecf8 424 mbedtls_sha512_init( &ctx );
valeyev 0:e056ac8fecf8 425
valeyev 0:e056ac8fecf8 426 if( ( ret = mbedtls_sha512_starts_ret( &ctx, is384 ) ) != 0 )
valeyev 0:e056ac8fecf8 427 goto exit;
valeyev 0:e056ac8fecf8 428
valeyev 0:e056ac8fecf8 429 if( ( ret = mbedtls_sha512_update_ret( &ctx, input, ilen ) ) != 0 )
valeyev 0:e056ac8fecf8 430 goto exit;
valeyev 0:e056ac8fecf8 431
valeyev 0:e056ac8fecf8 432 if( ( ret = mbedtls_sha512_finish_ret( &ctx, output ) ) != 0 )
valeyev 0:e056ac8fecf8 433 goto exit;
valeyev 0:e056ac8fecf8 434
valeyev 0:e056ac8fecf8 435 exit:
valeyev 0:e056ac8fecf8 436 mbedtls_sha512_free( &ctx );
valeyev 0:e056ac8fecf8 437
valeyev 0:e056ac8fecf8 438 return( ret );
valeyev 0:e056ac8fecf8 439 }
valeyev 0:e056ac8fecf8 440
valeyev 0:e056ac8fecf8 441 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
valeyev 0:e056ac8fecf8 442 void mbedtls_sha512( const unsigned char *input,
valeyev 0:e056ac8fecf8 443 size_t ilen,
valeyev 0:e056ac8fecf8 444 unsigned char output[64],
valeyev 0:e056ac8fecf8 445 int is384 )
valeyev 0:e056ac8fecf8 446 {
valeyev 0:e056ac8fecf8 447 mbedtls_sha512_ret( input, ilen, output, is384 );
valeyev 0:e056ac8fecf8 448 }
valeyev 0:e056ac8fecf8 449 #endif
valeyev 0:e056ac8fecf8 450
valeyev 0:e056ac8fecf8 451 #if defined(MBEDTLS_SELF_TEST)
valeyev 0:e056ac8fecf8 452
valeyev 0:e056ac8fecf8 453 /*
valeyev 0:e056ac8fecf8 454 * FIPS-180-2 test vectors
valeyev 0:e056ac8fecf8 455 */
valeyev 0:e056ac8fecf8 456 static const unsigned char sha512_test_buf[3][113] =
valeyev 0:e056ac8fecf8 457 {
valeyev 0:e056ac8fecf8 458 { "abc" },
valeyev 0:e056ac8fecf8 459 { "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmn"
valeyev 0:e056ac8fecf8 460 "hijklmnoijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu" },
valeyev 0:e056ac8fecf8 461 { "" }
valeyev 0:e056ac8fecf8 462 };
valeyev 0:e056ac8fecf8 463
valeyev 0:e056ac8fecf8 464 static const size_t sha512_test_buflen[3] =
valeyev 0:e056ac8fecf8 465 {
valeyev 0:e056ac8fecf8 466 3, 112, 1000
valeyev 0:e056ac8fecf8 467 };
valeyev 0:e056ac8fecf8 468
valeyev 0:e056ac8fecf8 469 static const unsigned char sha512_test_sum[6][64] =
valeyev 0:e056ac8fecf8 470 {
valeyev 0:e056ac8fecf8 471 /*
valeyev 0:e056ac8fecf8 472 * SHA-384 test vectors
valeyev 0:e056ac8fecf8 473 */
valeyev 0:e056ac8fecf8 474 { 0xCB, 0x00, 0x75, 0x3F, 0x45, 0xA3, 0x5E, 0x8B,
valeyev 0:e056ac8fecf8 475 0xB5, 0xA0, 0x3D, 0x69, 0x9A, 0xC6, 0x50, 0x07,
valeyev 0:e056ac8fecf8 476 0x27, 0x2C, 0x32, 0xAB, 0x0E, 0xDE, 0xD1, 0x63,
valeyev 0:e056ac8fecf8 477 0x1A, 0x8B, 0x60, 0x5A, 0x43, 0xFF, 0x5B, 0xED,
valeyev 0:e056ac8fecf8 478 0x80, 0x86, 0x07, 0x2B, 0xA1, 0xE7, 0xCC, 0x23,
valeyev 0:e056ac8fecf8 479 0x58, 0xBA, 0xEC, 0xA1, 0x34, 0xC8, 0x25, 0xA7 },
valeyev 0:e056ac8fecf8 480 { 0x09, 0x33, 0x0C, 0x33, 0xF7, 0x11, 0x47, 0xE8,
valeyev 0:e056ac8fecf8 481 0x3D, 0x19, 0x2F, 0xC7, 0x82, 0xCD, 0x1B, 0x47,
valeyev 0:e056ac8fecf8 482 0x53, 0x11, 0x1B, 0x17, 0x3B, 0x3B, 0x05, 0xD2,
valeyev 0:e056ac8fecf8 483 0x2F, 0xA0, 0x80, 0x86, 0xE3, 0xB0, 0xF7, 0x12,
valeyev 0:e056ac8fecf8 484 0xFC, 0xC7, 0xC7, 0x1A, 0x55, 0x7E, 0x2D, 0xB9,
valeyev 0:e056ac8fecf8 485 0x66, 0xC3, 0xE9, 0xFA, 0x91, 0x74, 0x60, 0x39 },
valeyev 0:e056ac8fecf8 486 { 0x9D, 0x0E, 0x18, 0x09, 0x71, 0x64, 0x74, 0xCB,
valeyev 0:e056ac8fecf8 487 0x08, 0x6E, 0x83, 0x4E, 0x31, 0x0A, 0x4A, 0x1C,
valeyev 0:e056ac8fecf8 488 0xED, 0x14, 0x9E, 0x9C, 0x00, 0xF2, 0x48, 0x52,
valeyev 0:e056ac8fecf8 489 0x79, 0x72, 0xCE, 0xC5, 0x70, 0x4C, 0x2A, 0x5B,
valeyev 0:e056ac8fecf8 490 0x07, 0xB8, 0xB3, 0xDC, 0x38, 0xEC, 0xC4, 0xEB,
valeyev 0:e056ac8fecf8 491 0xAE, 0x97, 0xDD, 0xD8, 0x7F, 0x3D, 0x89, 0x85 },
valeyev 0:e056ac8fecf8 492
valeyev 0:e056ac8fecf8 493 /*
valeyev 0:e056ac8fecf8 494 * SHA-512 test vectors
valeyev 0:e056ac8fecf8 495 */
valeyev 0:e056ac8fecf8 496 { 0xDD, 0xAF, 0x35, 0xA1, 0x93, 0x61, 0x7A, 0xBA,
valeyev 0:e056ac8fecf8 497 0xCC, 0x41, 0x73, 0x49, 0xAE, 0x20, 0x41, 0x31,
valeyev 0:e056ac8fecf8 498 0x12, 0xE6, 0xFA, 0x4E, 0x89, 0xA9, 0x7E, 0xA2,
valeyev 0:e056ac8fecf8 499 0x0A, 0x9E, 0xEE, 0xE6, 0x4B, 0x55, 0xD3, 0x9A,
valeyev 0:e056ac8fecf8 500 0x21, 0x92, 0x99, 0x2A, 0x27, 0x4F, 0xC1, 0xA8,
valeyev 0:e056ac8fecf8 501 0x36, 0xBA, 0x3C, 0x23, 0xA3, 0xFE, 0xEB, 0xBD,
valeyev 0:e056ac8fecf8 502 0x45, 0x4D, 0x44, 0x23, 0x64, 0x3C, 0xE8, 0x0E,
valeyev 0:e056ac8fecf8 503 0x2A, 0x9A, 0xC9, 0x4F, 0xA5, 0x4C, 0xA4, 0x9F },
valeyev 0:e056ac8fecf8 504 { 0x8E, 0x95, 0x9B, 0x75, 0xDA, 0xE3, 0x13, 0xDA,
valeyev 0:e056ac8fecf8 505 0x8C, 0xF4, 0xF7, 0x28, 0x14, 0xFC, 0x14, 0x3F,
valeyev 0:e056ac8fecf8 506 0x8F, 0x77, 0x79, 0xC6, 0xEB, 0x9F, 0x7F, 0xA1,
valeyev 0:e056ac8fecf8 507 0x72, 0x99, 0xAE, 0xAD, 0xB6, 0x88, 0x90, 0x18,
valeyev 0:e056ac8fecf8 508 0x50, 0x1D, 0x28, 0x9E, 0x49, 0x00, 0xF7, 0xE4,
valeyev 0:e056ac8fecf8 509 0x33, 0x1B, 0x99, 0xDE, 0xC4, 0xB5, 0x43, 0x3A,
valeyev 0:e056ac8fecf8 510 0xC7, 0xD3, 0x29, 0xEE, 0xB6, 0xDD, 0x26, 0x54,
valeyev 0:e056ac8fecf8 511 0x5E, 0x96, 0xE5, 0x5B, 0x87, 0x4B, 0xE9, 0x09 },
valeyev 0:e056ac8fecf8 512 { 0xE7, 0x18, 0x48, 0x3D, 0x0C, 0xE7, 0x69, 0x64,
valeyev 0:e056ac8fecf8 513 0x4E, 0x2E, 0x42, 0xC7, 0xBC, 0x15, 0xB4, 0x63,
valeyev 0:e056ac8fecf8 514 0x8E, 0x1F, 0x98, 0xB1, 0x3B, 0x20, 0x44, 0x28,
valeyev 0:e056ac8fecf8 515 0x56, 0x32, 0xA8, 0x03, 0xAF, 0xA9, 0x73, 0xEB,
valeyev 0:e056ac8fecf8 516 0xDE, 0x0F, 0xF2, 0x44, 0x87, 0x7E, 0xA6, 0x0A,
valeyev 0:e056ac8fecf8 517 0x4C, 0xB0, 0x43, 0x2C, 0xE5, 0x77, 0xC3, 0x1B,
valeyev 0:e056ac8fecf8 518 0xEB, 0x00, 0x9C, 0x5C, 0x2C, 0x49, 0xAA, 0x2E,
valeyev 0:e056ac8fecf8 519 0x4E, 0xAD, 0xB2, 0x17, 0xAD, 0x8C, 0xC0, 0x9B }
valeyev 0:e056ac8fecf8 520 };
valeyev 0:e056ac8fecf8 521
valeyev 0:e056ac8fecf8 522 /*
valeyev 0:e056ac8fecf8 523 * Checkup routine
valeyev 0:e056ac8fecf8 524 */
valeyev 0:e056ac8fecf8 525 int mbedtls_sha512_self_test( int verbose )
valeyev 0:e056ac8fecf8 526 {
valeyev 0:e056ac8fecf8 527 int i, j, k, buflen, ret = 0;
valeyev 0:e056ac8fecf8 528 unsigned char *buf;
valeyev 0:e056ac8fecf8 529 unsigned char sha512sum[64];
valeyev 0:e056ac8fecf8 530 mbedtls_sha512_context ctx;
valeyev 0:e056ac8fecf8 531
valeyev 0:e056ac8fecf8 532 buf = mbedtls_calloc( 1024, sizeof(unsigned char) );
valeyev 0:e056ac8fecf8 533 if( NULL == buf )
valeyev 0:e056ac8fecf8 534 {
valeyev 0:e056ac8fecf8 535 if( verbose != 0 )
valeyev 0:e056ac8fecf8 536 mbedtls_printf( "Buffer allocation failed\n" );
valeyev 0:e056ac8fecf8 537
valeyev 0:e056ac8fecf8 538 return( 1 );
valeyev 0:e056ac8fecf8 539 }
valeyev 0:e056ac8fecf8 540
valeyev 0:e056ac8fecf8 541 mbedtls_sha512_init( &ctx );
valeyev 0:e056ac8fecf8 542
valeyev 0:e056ac8fecf8 543 for( i = 0; i < 6; i++ )
valeyev 0:e056ac8fecf8 544 {
valeyev 0:e056ac8fecf8 545 j = i % 3;
valeyev 0:e056ac8fecf8 546 k = i < 3;
valeyev 0:e056ac8fecf8 547
valeyev 0:e056ac8fecf8 548 if( verbose != 0 )
valeyev 0:e056ac8fecf8 549 mbedtls_printf( " SHA-%d test #%d: ", 512 - k * 128, j + 1 );
valeyev 0:e056ac8fecf8 550
valeyev 0:e056ac8fecf8 551 if( ( ret = mbedtls_sha512_starts_ret( &ctx, k ) ) != 0 )
valeyev 0:e056ac8fecf8 552 goto fail;
valeyev 0:e056ac8fecf8 553
valeyev 0:e056ac8fecf8 554 if( j == 2 )
valeyev 0:e056ac8fecf8 555 {
valeyev 0:e056ac8fecf8 556 memset( buf, 'a', buflen = 1000 );
valeyev 0:e056ac8fecf8 557
valeyev 0:e056ac8fecf8 558 for( j = 0; j < 1000; j++ )
valeyev 0:e056ac8fecf8 559 {
valeyev 0:e056ac8fecf8 560 ret = mbedtls_sha512_update_ret( &ctx, buf, buflen );
valeyev 0:e056ac8fecf8 561 if( ret != 0 )
valeyev 0:e056ac8fecf8 562 goto fail;
valeyev 0:e056ac8fecf8 563 }
valeyev 0:e056ac8fecf8 564 }
valeyev 0:e056ac8fecf8 565 else
valeyev 0:e056ac8fecf8 566 {
valeyev 0:e056ac8fecf8 567 ret = mbedtls_sha512_update_ret( &ctx, sha512_test_buf[j],
valeyev 0:e056ac8fecf8 568 sha512_test_buflen[j] );
valeyev 0:e056ac8fecf8 569 if( ret != 0 )
valeyev 0:e056ac8fecf8 570 goto fail;
valeyev 0:e056ac8fecf8 571 }
valeyev 0:e056ac8fecf8 572
valeyev 0:e056ac8fecf8 573 if( ( ret = mbedtls_sha512_finish_ret( &ctx, sha512sum ) ) != 0 )
valeyev 0:e056ac8fecf8 574 goto fail;
valeyev 0:e056ac8fecf8 575
valeyev 0:e056ac8fecf8 576 if( memcmp( sha512sum, sha512_test_sum[i], 64 - k * 16 ) != 0 )
valeyev 0:e056ac8fecf8 577 {
valeyev 0:e056ac8fecf8 578 ret = 1;
valeyev 0:e056ac8fecf8 579 goto fail;
valeyev 0:e056ac8fecf8 580 }
valeyev 0:e056ac8fecf8 581
valeyev 0:e056ac8fecf8 582 if( verbose != 0 )
valeyev 0:e056ac8fecf8 583 mbedtls_printf( "passed\n" );
valeyev 0:e056ac8fecf8 584 }
valeyev 0:e056ac8fecf8 585
valeyev 0:e056ac8fecf8 586 if( verbose != 0 )
valeyev 0:e056ac8fecf8 587 mbedtls_printf( "\n" );
valeyev 0:e056ac8fecf8 588
valeyev 0:e056ac8fecf8 589 goto exit;
valeyev 0:e056ac8fecf8 590
valeyev 0:e056ac8fecf8 591 fail:
valeyev 0:e056ac8fecf8 592 if( verbose != 0 )
valeyev 0:e056ac8fecf8 593 mbedtls_printf( "failed\n" );
valeyev 0:e056ac8fecf8 594
valeyev 0:e056ac8fecf8 595 exit:
valeyev 0:e056ac8fecf8 596 mbedtls_sha512_free( &ctx );
valeyev 0:e056ac8fecf8 597 mbedtls_free( buf );
valeyev 0:e056ac8fecf8 598
valeyev 0:e056ac8fecf8 599 return( ret );
valeyev 0:e056ac8fecf8 600 }
valeyev 0:e056ac8fecf8 601
valeyev 0:e056ac8fecf8 602 #endif /* MBEDTLS_SELF_TEST */
valeyev 0:e056ac8fecf8 603
valeyev 0:e056ac8fecf8 604 #endif /* MBEDTLS_SHA512_C */