BA / Mbed OS BaBoRo_test2

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.

mbed-os/features/mbedtls/src/ripemd160.c@0:02dd72d1d465, 2018-04-24 (annotated)

Committer:
borlanic
Date:
Tue Apr 24 11:45:18 2018 +0000
Revision:
0:02dd72d1d465
BaBoRo_test2 - backup 1

Who changed what in which revision?

UserRevisionLine numberNew contents of line
borlanic 0:02dd72d1d465 1 /*
borlanic 0:02dd72d1d465 2 * RIPE MD-160 implementation
borlanic 0:02dd72d1d465 3 *
borlanic 0:02dd72d1d465 4 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
borlanic 0:02dd72d1d465 5 * SPDX-License-Identifier: Apache-2.0
borlanic 0:02dd72d1d465 6 *
borlanic 0:02dd72d1d465 7 * Licensed under the Apache License, Version 2.0 (the "License"); you may
borlanic 0:02dd72d1d465 8 * not use this file except in compliance with the License.
borlanic 0:02dd72d1d465 9 * You may obtain a copy of the License at
borlanic 0:02dd72d1d465 10 *
borlanic 0:02dd72d1d465 11 * http://www.apache.org/licenses/LICENSE-2.0
borlanic 0:02dd72d1d465 12 *
borlanic 0:02dd72d1d465 13 * Unless required by applicable law or agreed to in writing, software
borlanic 0:02dd72d1d465 14 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
borlanic 0:02dd72d1d465 15 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
borlanic 0:02dd72d1d465 16 * See the License for the specific language governing permissions and
borlanic 0:02dd72d1d465 17 * limitations under the License.
borlanic 0:02dd72d1d465 18 *
borlanic 0:02dd72d1d465 19 * This file is part of mbed TLS (https://tls.mbed.org)
borlanic 0:02dd72d1d465 20 */
borlanic 0:02dd72d1d465 21
borlanic 0:02dd72d1d465 22 /*
borlanic 0:02dd72d1d465 23 * The RIPEMD-160 algorithm was designed by RIPE in 1996
borlanic 0:02dd72d1d465 24 * http://homes.esat.kuleuven.be/~bosselae/mbedtls_ripemd160.html
borlanic 0:02dd72d1d465 25 * http://ehash.iaik.tugraz.at/wiki/RIPEMD-160
borlanic 0:02dd72d1d465 26 */
borlanic 0:02dd72d1d465 27
borlanic 0:02dd72d1d465 28 #if !defined(MBEDTLS_CONFIG_FILE)
borlanic 0:02dd72d1d465 29 #include "mbedtls/config.h"
borlanic 0:02dd72d1d465 30 #else
borlanic 0:02dd72d1d465 31 #include MBEDTLS_CONFIG_FILE
borlanic 0:02dd72d1d465 32 #endif
borlanic 0:02dd72d1d465 33
borlanic 0:02dd72d1d465 34 #if defined(MBEDTLS_RIPEMD160_C)
borlanic 0:02dd72d1d465 35
borlanic 0:02dd72d1d465 36 #include "mbedtls/ripemd160.h"
borlanic 0:02dd72d1d465 37
borlanic 0:02dd72d1d465 38 #include <string.h>
borlanic 0:02dd72d1d465 39
borlanic 0:02dd72d1d465 40 #if defined(MBEDTLS_SELF_TEST)
borlanic 0:02dd72d1d465 41 #if defined(MBEDTLS_PLATFORM_C)
borlanic 0:02dd72d1d465 42 #include "mbedtls/platform.h"
borlanic 0:02dd72d1d465 43 #else
borlanic 0:02dd72d1d465 44 #include <stdio.h>
borlanic 0:02dd72d1d465 45 #define mbedtls_printf printf
borlanic 0:02dd72d1d465 46 #endif /* MBEDTLS_PLATFORM_C */
borlanic 0:02dd72d1d465 47 #endif /* MBEDTLS_SELF_TEST */
borlanic 0:02dd72d1d465 48
borlanic 0:02dd72d1d465 49 #if !defined(MBEDTLS_RIPEMD160_ALT)
borlanic 0:02dd72d1d465 50
borlanic 0:02dd72d1d465 51 /*
borlanic 0:02dd72d1d465 52 * 32-bit integer manipulation macros (little endian)
borlanic 0:02dd72d1d465 53 */
borlanic 0:02dd72d1d465 54 #ifndef GET_UINT32_LE
borlanic 0:02dd72d1d465 55 #define GET_UINT32_LE(n,b,i) \
borlanic 0:02dd72d1d465 56 { \
borlanic 0:02dd72d1d465 57 (n) = ( (uint32_t) (b)[(i) ] ) \
borlanic 0:02dd72d1d465 58 | ( (uint32_t) (b)[(i) + 1] << 8 ) \
borlanic 0:02dd72d1d465 59 | ( (uint32_t) (b)[(i) + 2] << 16 ) \
borlanic 0:02dd72d1d465 60 | ( (uint32_t) (b)[(i) + 3] << 24 ); \
borlanic 0:02dd72d1d465 61 }
borlanic 0:02dd72d1d465 62 #endif
borlanic 0:02dd72d1d465 63
borlanic 0:02dd72d1d465 64 #ifndef PUT_UINT32_LE
borlanic 0:02dd72d1d465 65 #define PUT_UINT32_LE(n,b,i) \
borlanic 0:02dd72d1d465 66 { \
borlanic 0:02dd72d1d465 67 (b)[(i) ] = (unsigned char) ( ( (n) ) & 0xFF ); \
borlanic 0:02dd72d1d465 68 (b)[(i) + 1] = (unsigned char) ( ( (n) >> 8 ) & 0xFF ); \
borlanic 0:02dd72d1d465 69 (b)[(i) + 2] = (unsigned char) ( ( (n) >> 16 ) & 0xFF ); \
borlanic 0:02dd72d1d465 70 (b)[(i) + 3] = (unsigned char) ( ( (n) >> 24 ) & 0xFF ); \
borlanic 0:02dd72d1d465 71 }
borlanic 0:02dd72d1d465 72 #endif
borlanic 0:02dd72d1d465 73
borlanic 0:02dd72d1d465 74 /* Implementation that should never be optimized out by the compiler */
borlanic 0:02dd72d1d465 75 static void mbedtls_zeroize( void *v, size_t n ) {
borlanic 0:02dd72d1d465 76 volatile unsigned char *p = v; while( n-- ) *p++ = 0;
borlanic 0:02dd72d1d465 77 }
borlanic 0:02dd72d1d465 78
borlanic 0:02dd72d1d465 79 void mbedtls_ripemd160_init( mbedtls_ripemd160_context *ctx )
borlanic 0:02dd72d1d465 80 {
borlanic 0:02dd72d1d465 81 memset( ctx, 0, sizeof( mbedtls_ripemd160_context ) );
borlanic 0:02dd72d1d465 82 }
borlanic 0:02dd72d1d465 83
borlanic 0:02dd72d1d465 84 void mbedtls_ripemd160_free( mbedtls_ripemd160_context *ctx )
borlanic 0:02dd72d1d465 85 {
borlanic 0:02dd72d1d465 86 if( ctx == NULL )
borlanic 0:02dd72d1d465 87 return;
borlanic 0:02dd72d1d465 88
borlanic 0:02dd72d1d465 89 mbedtls_zeroize( ctx, sizeof( mbedtls_ripemd160_context ) );
borlanic 0:02dd72d1d465 90 }
borlanic 0:02dd72d1d465 91
borlanic 0:02dd72d1d465 92 void mbedtls_ripemd160_clone( mbedtls_ripemd160_context *dst,
borlanic 0:02dd72d1d465 93 const mbedtls_ripemd160_context *src )
borlanic 0:02dd72d1d465 94 {
borlanic 0:02dd72d1d465 95 *dst = *src;
borlanic 0:02dd72d1d465 96 }
borlanic 0:02dd72d1d465 97
borlanic 0:02dd72d1d465 98 /*
borlanic 0:02dd72d1d465 99 * RIPEMD-160 context setup
borlanic 0:02dd72d1d465 100 */
borlanic 0:02dd72d1d465 101 int mbedtls_ripemd160_starts_ret( mbedtls_ripemd160_context *ctx )
borlanic 0:02dd72d1d465 102 {
borlanic 0:02dd72d1d465 103 ctx->total[0] = 0;
borlanic 0:02dd72d1d465 104 ctx->total[1] = 0;
borlanic 0:02dd72d1d465 105
borlanic 0:02dd72d1d465 106 ctx->state[0] = 0x67452301;
borlanic 0:02dd72d1d465 107 ctx->state[1] = 0xEFCDAB89;
borlanic 0:02dd72d1d465 108 ctx->state[2] = 0x98BADCFE;
borlanic 0:02dd72d1d465 109 ctx->state[3] = 0x10325476;
borlanic 0:02dd72d1d465 110 ctx->state[4] = 0xC3D2E1F0;
borlanic 0:02dd72d1d465 111
borlanic 0:02dd72d1d465 112 return( 0 );
borlanic 0:02dd72d1d465 113 }
borlanic 0:02dd72d1d465 114
borlanic 0:02dd72d1d465 115 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
borlanic 0:02dd72d1d465 116 void mbedtls_ripemd160_starts( mbedtls_ripemd160_context *ctx )
borlanic 0:02dd72d1d465 117 {
borlanic 0:02dd72d1d465 118 mbedtls_ripemd160_starts_ret( ctx );
borlanic 0:02dd72d1d465 119 }
borlanic 0:02dd72d1d465 120 #endif
borlanic 0:02dd72d1d465 121
borlanic 0:02dd72d1d465 122 #if !defined(MBEDTLS_RIPEMD160_PROCESS_ALT)
borlanic 0:02dd72d1d465 123 /*
borlanic 0:02dd72d1d465 124 * Process one block
borlanic 0:02dd72d1d465 125 */
borlanic 0:02dd72d1d465 126 int mbedtls_internal_ripemd160_process( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 127 const unsigned char data[64] )
borlanic 0:02dd72d1d465 128 {
borlanic 0:02dd72d1d465 129 uint32_t A, B, C, D, E, Ap, Bp, Cp, Dp, Ep, X[16];
borlanic 0:02dd72d1d465 130
borlanic 0:02dd72d1d465 131 GET_UINT32_LE( X[ 0], data, 0 );
borlanic 0:02dd72d1d465 132 GET_UINT32_LE( X[ 1], data, 4 );
borlanic 0:02dd72d1d465 133 GET_UINT32_LE( X[ 2], data, 8 );
borlanic 0:02dd72d1d465 134 GET_UINT32_LE( X[ 3], data, 12 );
borlanic 0:02dd72d1d465 135 GET_UINT32_LE( X[ 4], data, 16 );
borlanic 0:02dd72d1d465 136 GET_UINT32_LE( X[ 5], data, 20 );
borlanic 0:02dd72d1d465 137 GET_UINT32_LE( X[ 6], data, 24 );
borlanic 0:02dd72d1d465 138 GET_UINT32_LE( X[ 7], data, 28 );
borlanic 0:02dd72d1d465 139 GET_UINT32_LE( X[ 8], data, 32 );
borlanic 0:02dd72d1d465 140 GET_UINT32_LE( X[ 9], data, 36 );
borlanic 0:02dd72d1d465 141 GET_UINT32_LE( X[10], data, 40 );
borlanic 0:02dd72d1d465 142 GET_UINT32_LE( X[11], data, 44 );
borlanic 0:02dd72d1d465 143 GET_UINT32_LE( X[12], data, 48 );
borlanic 0:02dd72d1d465 144 GET_UINT32_LE( X[13], data, 52 );
borlanic 0:02dd72d1d465 145 GET_UINT32_LE( X[14], data, 56 );
borlanic 0:02dd72d1d465 146 GET_UINT32_LE( X[15], data, 60 );
borlanic 0:02dd72d1d465 147
borlanic 0:02dd72d1d465 148 A = Ap = ctx->state[0];
borlanic 0:02dd72d1d465 149 B = Bp = ctx->state[1];
borlanic 0:02dd72d1d465 150 C = Cp = ctx->state[2];
borlanic 0:02dd72d1d465 151 D = Dp = ctx->state[3];
borlanic 0:02dd72d1d465 152 E = Ep = ctx->state[4];
borlanic 0:02dd72d1d465 153
borlanic 0:02dd72d1d465 154 #define F1( x, y, z ) ( x ^ y ^ z )
borlanic 0:02dd72d1d465 155 #define F2( x, y, z ) ( ( x & y ) | ( ~x & z ) )
borlanic 0:02dd72d1d465 156 #define F3( x, y, z ) ( ( x | ~y ) ^ z )
borlanic 0:02dd72d1d465 157 #define F4( x, y, z ) ( ( x & z ) | ( y & ~z ) )
borlanic 0:02dd72d1d465 158 #define F5( x, y, z ) ( x ^ ( y | ~z ) )
borlanic 0:02dd72d1d465 159
borlanic 0:02dd72d1d465 160 #define S( x, n ) ( ( x << n ) | ( x >> (32 - n) ) )
borlanic 0:02dd72d1d465 161
borlanic 0:02dd72d1d465 162 #define P( a, b, c, d, e, r, s, f, k ) \
borlanic 0:02dd72d1d465 163 a += f( b, c, d ) + X[r] + k; \
borlanic 0:02dd72d1d465 164 a = S( a, s ) + e; \
borlanic 0:02dd72d1d465 165 c = S( c, 10 );
borlanic 0:02dd72d1d465 166
borlanic 0:02dd72d1d465 167 #define P2( a, b, c, d, e, r, s, rp, sp ) \
borlanic 0:02dd72d1d465 168 P( a, b, c, d, e, r, s, F, K ); \
borlanic 0:02dd72d1d465 169 P( a ## p, b ## p, c ## p, d ## p, e ## p, rp, sp, Fp, Kp );
borlanic 0:02dd72d1d465 170
borlanic 0:02dd72d1d465 171 #define F F1
borlanic 0:02dd72d1d465 172 #define K 0x00000000
borlanic 0:02dd72d1d465 173 #define Fp F5
borlanic 0:02dd72d1d465 174 #define Kp 0x50A28BE6
borlanic 0:02dd72d1d465 175 P2( A, B, C, D, E, 0, 11, 5, 8 );
borlanic 0:02dd72d1d465 176 P2( E, A, B, C, D, 1, 14, 14, 9 );
borlanic 0:02dd72d1d465 177 P2( D, E, A, B, C, 2, 15, 7, 9 );
borlanic 0:02dd72d1d465 178 P2( C, D, E, A, B, 3, 12, 0, 11 );
borlanic 0:02dd72d1d465 179 P2( B, C, D, E, A, 4, 5, 9, 13 );
borlanic 0:02dd72d1d465 180 P2( A, B, C, D, E, 5, 8, 2, 15 );
borlanic 0:02dd72d1d465 181 P2( E, A, B, C, D, 6, 7, 11, 15 );
borlanic 0:02dd72d1d465 182 P2( D, E, A, B, C, 7, 9, 4, 5 );
borlanic 0:02dd72d1d465 183 P2( C, D, E, A, B, 8, 11, 13, 7 );
borlanic 0:02dd72d1d465 184 P2( B, C, D, E, A, 9, 13, 6, 7 );
borlanic 0:02dd72d1d465 185 P2( A, B, C, D, E, 10, 14, 15, 8 );
borlanic 0:02dd72d1d465 186 P2( E, A, B, C, D, 11, 15, 8, 11 );
borlanic 0:02dd72d1d465 187 P2( D, E, A, B, C, 12, 6, 1, 14 );
borlanic 0:02dd72d1d465 188 P2( C, D, E, A, B, 13, 7, 10, 14 );
borlanic 0:02dd72d1d465 189 P2( B, C, D, E, A, 14, 9, 3, 12 );
borlanic 0:02dd72d1d465 190 P2( A, B, C, D, E, 15, 8, 12, 6 );
borlanic 0:02dd72d1d465 191 #undef F
borlanic 0:02dd72d1d465 192 #undef K
borlanic 0:02dd72d1d465 193 #undef Fp
borlanic 0:02dd72d1d465 194 #undef Kp
borlanic 0:02dd72d1d465 195
borlanic 0:02dd72d1d465 196 #define F F2
borlanic 0:02dd72d1d465 197 #define K 0x5A827999
borlanic 0:02dd72d1d465 198 #define Fp F4
borlanic 0:02dd72d1d465 199 #define Kp 0x5C4DD124
borlanic 0:02dd72d1d465 200 P2( E, A, B, C, D, 7, 7, 6, 9 );
borlanic 0:02dd72d1d465 201 P2( D, E, A, B, C, 4, 6, 11, 13 );
borlanic 0:02dd72d1d465 202 P2( C, D, E, A, B, 13, 8, 3, 15 );
borlanic 0:02dd72d1d465 203 P2( B, C, D, E, A, 1, 13, 7, 7 );
borlanic 0:02dd72d1d465 204 P2( A, B, C, D, E, 10, 11, 0, 12 );
borlanic 0:02dd72d1d465 205 P2( E, A, B, C, D, 6, 9, 13, 8 );
borlanic 0:02dd72d1d465 206 P2( D, E, A, B, C, 15, 7, 5, 9 );
borlanic 0:02dd72d1d465 207 P2( C, D, E, A, B, 3, 15, 10, 11 );
borlanic 0:02dd72d1d465 208 P2( B, C, D, E, A, 12, 7, 14, 7 );
borlanic 0:02dd72d1d465 209 P2( A, B, C, D, E, 0, 12, 15, 7 );
borlanic 0:02dd72d1d465 210 P2( E, A, B, C, D, 9, 15, 8, 12 );
borlanic 0:02dd72d1d465 211 P2( D, E, A, B, C, 5, 9, 12, 7 );
borlanic 0:02dd72d1d465 212 P2( C, D, E, A, B, 2, 11, 4, 6 );
borlanic 0:02dd72d1d465 213 P2( B, C, D, E, A, 14, 7, 9, 15 );
borlanic 0:02dd72d1d465 214 P2( A, B, C, D, E, 11, 13, 1, 13 );
borlanic 0:02dd72d1d465 215 P2( E, A, B, C, D, 8, 12, 2, 11 );
borlanic 0:02dd72d1d465 216 #undef F
borlanic 0:02dd72d1d465 217 #undef K
borlanic 0:02dd72d1d465 218 #undef Fp
borlanic 0:02dd72d1d465 219 #undef Kp
borlanic 0:02dd72d1d465 220
borlanic 0:02dd72d1d465 221 #define F F3
borlanic 0:02dd72d1d465 222 #define K 0x6ED9EBA1
borlanic 0:02dd72d1d465 223 #define Fp F3
borlanic 0:02dd72d1d465 224 #define Kp 0x6D703EF3
borlanic 0:02dd72d1d465 225 P2( D, E, A, B, C, 3, 11, 15, 9 );
borlanic 0:02dd72d1d465 226 P2( C, D, E, A, B, 10, 13, 5, 7 );
borlanic 0:02dd72d1d465 227 P2( B, C, D, E, A, 14, 6, 1, 15 );
borlanic 0:02dd72d1d465 228 P2( A, B, C, D, E, 4, 7, 3, 11 );
borlanic 0:02dd72d1d465 229 P2( E, A, B, C, D, 9, 14, 7, 8 );
borlanic 0:02dd72d1d465 230 P2( D, E, A, B, C, 15, 9, 14, 6 );
borlanic 0:02dd72d1d465 231 P2( C, D, E, A, B, 8, 13, 6, 6 );
borlanic 0:02dd72d1d465 232 P2( B, C, D, E, A, 1, 15, 9, 14 );
borlanic 0:02dd72d1d465 233 P2( A, B, C, D, E, 2, 14, 11, 12 );
borlanic 0:02dd72d1d465 234 P2( E, A, B, C, D, 7, 8, 8, 13 );
borlanic 0:02dd72d1d465 235 P2( D, E, A, B, C, 0, 13, 12, 5 );
borlanic 0:02dd72d1d465 236 P2( C, D, E, A, B, 6, 6, 2, 14 );
borlanic 0:02dd72d1d465 237 P2( B, C, D, E, A, 13, 5, 10, 13 );
borlanic 0:02dd72d1d465 238 P2( A, B, C, D, E, 11, 12, 0, 13 );
borlanic 0:02dd72d1d465 239 P2( E, A, B, C, D, 5, 7, 4, 7 );
borlanic 0:02dd72d1d465 240 P2( D, E, A, B, C, 12, 5, 13, 5 );
borlanic 0:02dd72d1d465 241 #undef F
borlanic 0:02dd72d1d465 242 #undef K
borlanic 0:02dd72d1d465 243 #undef Fp
borlanic 0:02dd72d1d465 244 #undef Kp
borlanic 0:02dd72d1d465 245
borlanic 0:02dd72d1d465 246 #define F F4
borlanic 0:02dd72d1d465 247 #define K 0x8F1BBCDC
borlanic 0:02dd72d1d465 248 #define Fp F2
borlanic 0:02dd72d1d465 249 #define Kp 0x7A6D76E9
borlanic 0:02dd72d1d465 250 P2( C, D, E, A, B, 1, 11, 8, 15 );
borlanic 0:02dd72d1d465 251 P2( B, C, D, E, A, 9, 12, 6, 5 );
borlanic 0:02dd72d1d465 252 P2( A, B, C, D, E, 11, 14, 4, 8 );
borlanic 0:02dd72d1d465 253 P2( E, A, B, C, D, 10, 15, 1, 11 );
borlanic 0:02dd72d1d465 254 P2( D, E, A, B, C, 0, 14, 3, 14 );
borlanic 0:02dd72d1d465 255 P2( C, D, E, A, B, 8, 15, 11, 14 );
borlanic 0:02dd72d1d465 256 P2( B, C, D, E, A, 12, 9, 15, 6 );
borlanic 0:02dd72d1d465 257 P2( A, B, C, D, E, 4, 8, 0, 14 );
borlanic 0:02dd72d1d465 258 P2( E, A, B, C, D, 13, 9, 5, 6 );
borlanic 0:02dd72d1d465 259 P2( D, E, A, B, C, 3, 14, 12, 9 );
borlanic 0:02dd72d1d465 260 P2( C, D, E, A, B, 7, 5, 2, 12 );
borlanic 0:02dd72d1d465 261 P2( B, C, D, E, A, 15, 6, 13, 9 );
borlanic 0:02dd72d1d465 262 P2( A, B, C, D, E, 14, 8, 9, 12 );
borlanic 0:02dd72d1d465 263 P2( E, A, B, C, D, 5, 6, 7, 5 );
borlanic 0:02dd72d1d465 264 P2( D, E, A, B, C, 6, 5, 10, 15 );
borlanic 0:02dd72d1d465 265 P2( C, D, E, A, B, 2, 12, 14, 8 );
borlanic 0:02dd72d1d465 266 #undef F
borlanic 0:02dd72d1d465 267 #undef K
borlanic 0:02dd72d1d465 268 #undef Fp
borlanic 0:02dd72d1d465 269 #undef Kp
borlanic 0:02dd72d1d465 270
borlanic 0:02dd72d1d465 271 #define F F5
borlanic 0:02dd72d1d465 272 #define K 0xA953FD4E
borlanic 0:02dd72d1d465 273 #define Fp F1
borlanic 0:02dd72d1d465 274 #define Kp 0x00000000
borlanic 0:02dd72d1d465 275 P2( B, C, D, E, A, 4, 9, 12, 8 );
borlanic 0:02dd72d1d465 276 P2( A, B, C, D, E, 0, 15, 15, 5 );
borlanic 0:02dd72d1d465 277 P2( E, A, B, C, D, 5, 5, 10, 12 );
borlanic 0:02dd72d1d465 278 P2( D, E, A, B, C, 9, 11, 4, 9 );
borlanic 0:02dd72d1d465 279 P2( C, D, E, A, B, 7, 6, 1, 12 );
borlanic 0:02dd72d1d465 280 P2( B, C, D, E, A, 12, 8, 5, 5 );
borlanic 0:02dd72d1d465 281 P2( A, B, C, D, E, 2, 13, 8, 14 );
borlanic 0:02dd72d1d465 282 P2( E, A, B, C, D, 10, 12, 7, 6 );
borlanic 0:02dd72d1d465 283 P2( D, E, A, B, C, 14, 5, 6, 8 );
borlanic 0:02dd72d1d465 284 P2( C, D, E, A, B, 1, 12, 2, 13 );
borlanic 0:02dd72d1d465 285 P2( B, C, D, E, A, 3, 13, 13, 6 );
borlanic 0:02dd72d1d465 286 P2( A, B, C, D, E, 8, 14, 14, 5 );
borlanic 0:02dd72d1d465 287 P2( E, A, B, C, D, 11, 11, 0, 15 );
borlanic 0:02dd72d1d465 288 P2( D, E, A, B, C, 6, 8, 3, 13 );
borlanic 0:02dd72d1d465 289 P2( C, D, E, A, B, 15, 5, 9, 11 );
borlanic 0:02dd72d1d465 290 P2( B, C, D, E, A, 13, 6, 11, 11 );
borlanic 0:02dd72d1d465 291 #undef F
borlanic 0:02dd72d1d465 292 #undef K
borlanic 0:02dd72d1d465 293 #undef Fp
borlanic 0:02dd72d1d465 294 #undef Kp
borlanic 0:02dd72d1d465 295
borlanic 0:02dd72d1d465 296 C = ctx->state[1] + C + Dp;
borlanic 0:02dd72d1d465 297 ctx->state[1] = ctx->state[2] + D + Ep;
borlanic 0:02dd72d1d465 298 ctx->state[2] = ctx->state[3] + E + Ap;
borlanic 0:02dd72d1d465 299 ctx->state[3] = ctx->state[4] + A + Bp;
borlanic 0:02dd72d1d465 300 ctx->state[4] = ctx->state[0] + B + Cp;
borlanic 0:02dd72d1d465 301 ctx->state[0] = C;
borlanic 0:02dd72d1d465 302
borlanic 0:02dd72d1d465 303 return( 0 );
borlanic 0:02dd72d1d465 304 }
borlanic 0:02dd72d1d465 305
borlanic 0:02dd72d1d465 306 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
borlanic 0:02dd72d1d465 307 void mbedtls_ripemd160_process( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 308 const unsigned char data[64] )
borlanic 0:02dd72d1d465 309 {
borlanic 0:02dd72d1d465 310 mbedtls_internal_ripemd160_process( ctx, data );
borlanic 0:02dd72d1d465 311 }
borlanic 0:02dd72d1d465 312 #endif
borlanic 0:02dd72d1d465 313 #endif /* !MBEDTLS_RIPEMD160_PROCESS_ALT */
borlanic 0:02dd72d1d465 314
borlanic 0:02dd72d1d465 315 /*
borlanic 0:02dd72d1d465 316 * RIPEMD-160 process buffer
borlanic 0:02dd72d1d465 317 */
borlanic 0:02dd72d1d465 318 int mbedtls_ripemd160_update_ret( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 319 const unsigned char *input,
borlanic 0:02dd72d1d465 320 size_t ilen )
borlanic 0:02dd72d1d465 321 {
borlanic 0:02dd72d1d465 322 int ret;
borlanic 0:02dd72d1d465 323 size_t fill;
borlanic 0:02dd72d1d465 324 uint32_t left;
borlanic 0:02dd72d1d465 325
borlanic 0:02dd72d1d465 326 if( ilen == 0 )
borlanic 0:02dd72d1d465 327 return( 0 );
borlanic 0:02dd72d1d465 328
borlanic 0:02dd72d1d465 329 left = ctx->total[0] & 0x3F;
borlanic 0:02dd72d1d465 330 fill = 64 - left;
borlanic 0:02dd72d1d465 331
borlanic 0:02dd72d1d465 332 ctx->total[0] += (uint32_t) ilen;
borlanic 0:02dd72d1d465 333 ctx->total[0] &= 0xFFFFFFFF;
borlanic 0:02dd72d1d465 334
borlanic 0:02dd72d1d465 335 if( ctx->total[0] < (uint32_t) ilen )
borlanic 0:02dd72d1d465 336 ctx->total[1]++;
borlanic 0:02dd72d1d465 337
borlanic 0:02dd72d1d465 338 if( left && ilen >= fill )
borlanic 0:02dd72d1d465 339 {
borlanic 0:02dd72d1d465 340 memcpy( (void *) (ctx->buffer + left), input, fill );
borlanic 0:02dd72d1d465 341
borlanic 0:02dd72d1d465 342 if( ( ret = mbedtls_internal_ripemd160_process( ctx, ctx->buffer ) ) != 0 )
borlanic 0:02dd72d1d465 343 return( ret );
borlanic 0:02dd72d1d465 344
borlanic 0:02dd72d1d465 345 input += fill;
borlanic 0:02dd72d1d465 346 ilen -= fill;
borlanic 0:02dd72d1d465 347 left = 0;
borlanic 0:02dd72d1d465 348 }
borlanic 0:02dd72d1d465 349
borlanic 0:02dd72d1d465 350 while( ilen >= 64 )
borlanic 0:02dd72d1d465 351 {
borlanic 0:02dd72d1d465 352 if( ( ret = mbedtls_internal_ripemd160_process( ctx, input ) ) != 0 )
borlanic 0:02dd72d1d465 353 return( ret );
borlanic 0:02dd72d1d465 354
borlanic 0:02dd72d1d465 355 input += 64;
borlanic 0:02dd72d1d465 356 ilen -= 64;
borlanic 0:02dd72d1d465 357 }
borlanic 0:02dd72d1d465 358
borlanic 0:02dd72d1d465 359 if( ilen > 0 )
borlanic 0:02dd72d1d465 360 {
borlanic 0:02dd72d1d465 361 memcpy( (void *) (ctx->buffer + left), input, ilen );
borlanic 0:02dd72d1d465 362 }
borlanic 0:02dd72d1d465 363
borlanic 0:02dd72d1d465 364 return( 0 );
borlanic 0:02dd72d1d465 365 }
borlanic 0:02dd72d1d465 366
borlanic 0:02dd72d1d465 367 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
borlanic 0:02dd72d1d465 368 void mbedtls_ripemd160_update( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 369 const unsigned char *input,
borlanic 0:02dd72d1d465 370 size_t ilen )
borlanic 0:02dd72d1d465 371 {
borlanic 0:02dd72d1d465 372 mbedtls_ripemd160_update_ret( ctx, input, ilen );
borlanic 0:02dd72d1d465 373 }
borlanic 0:02dd72d1d465 374 #endif
borlanic 0:02dd72d1d465 375
borlanic 0:02dd72d1d465 376 static const unsigned char ripemd160_padding[64] =
borlanic 0:02dd72d1d465 377 {
borlanic 0:02dd72d1d465 378 0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
borlanic 0:02dd72d1d465 379 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
borlanic 0:02dd72d1d465 380 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
borlanic 0:02dd72d1d465 381 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
borlanic 0:02dd72d1d465 382 };
borlanic 0:02dd72d1d465 383
borlanic 0:02dd72d1d465 384 /*
borlanic 0:02dd72d1d465 385 * RIPEMD-160 final digest
borlanic 0:02dd72d1d465 386 */
borlanic 0:02dd72d1d465 387 int mbedtls_ripemd160_finish_ret( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 388 unsigned char output[20] )
borlanic 0:02dd72d1d465 389 {
borlanic 0:02dd72d1d465 390 int ret;
borlanic 0:02dd72d1d465 391 uint32_t last, padn;
borlanic 0:02dd72d1d465 392 uint32_t high, low;
borlanic 0:02dd72d1d465 393 unsigned char msglen[8];
borlanic 0:02dd72d1d465 394
borlanic 0:02dd72d1d465 395 high = ( ctx->total[0] >> 29 )
borlanic 0:02dd72d1d465 396 | ( ctx->total[1] << 3 );
borlanic 0:02dd72d1d465 397 low = ( ctx->total[0] << 3 );
borlanic 0:02dd72d1d465 398
borlanic 0:02dd72d1d465 399 PUT_UINT32_LE( low, msglen, 0 );
borlanic 0:02dd72d1d465 400 PUT_UINT32_LE( high, msglen, 4 );
borlanic 0:02dd72d1d465 401
borlanic 0:02dd72d1d465 402 last = ctx->total[0] & 0x3F;
borlanic 0:02dd72d1d465 403 padn = ( last < 56 ) ? ( 56 - last ) : ( 120 - last );
borlanic 0:02dd72d1d465 404
borlanic 0:02dd72d1d465 405 ret = mbedtls_ripemd160_update_ret( ctx, ripemd160_padding, padn );
borlanic 0:02dd72d1d465 406 if( ret != 0 )
borlanic 0:02dd72d1d465 407 return( ret );
borlanic 0:02dd72d1d465 408
borlanic 0:02dd72d1d465 409 ret = mbedtls_ripemd160_update_ret( ctx, msglen, 8 );
borlanic 0:02dd72d1d465 410 if( ret != 0 )
borlanic 0:02dd72d1d465 411 return( ret );
borlanic 0:02dd72d1d465 412
borlanic 0:02dd72d1d465 413 PUT_UINT32_LE( ctx->state[0], output, 0 );
borlanic 0:02dd72d1d465 414 PUT_UINT32_LE( ctx->state[1], output, 4 );
borlanic 0:02dd72d1d465 415 PUT_UINT32_LE( ctx->state[2], output, 8 );
borlanic 0:02dd72d1d465 416 PUT_UINT32_LE( ctx->state[3], output, 12 );
borlanic 0:02dd72d1d465 417 PUT_UINT32_LE( ctx->state[4], output, 16 );
borlanic 0:02dd72d1d465 418
borlanic 0:02dd72d1d465 419 return( 0 );
borlanic 0:02dd72d1d465 420 }
borlanic 0:02dd72d1d465 421
borlanic 0:02dd72d1d465 422 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
borlanic 0:02dd72d1d465 423 void mbedtls_ripemd160_finish( mbedtls_ripemd160_context *ctx,
borlanic 0:02dd72d1d465 424 unsigned char output[20] )
borlanic 0:02dd72d1d465 425 {
borlanic 0:02dd72d1d465 426 mbedtls_ripemd160_finish_ret( ctx, output );
borlanic 0:02dd72d1d465 427 }
borlanic 0:02dd72d1d465 428 #endif
borlanic 0:02dd72d1d465 429
borlanic 0:02dd72d1d465 430 #endif /* ! MBEDTLS_RIPEMD160_ALT */
borlanic 0:02dd72d1d465 431
borlanic 0:02dd72d1d465 432 /*
borlanic 0:02dd72d1d465 433 * output = RIPEMD-160( input buffer )
borlanic 0:02dd72d1d465 434 */
borlanic 0:02dd72d1d465 435 int mbedtls_ripemd160_ret( const unsigned char *input,
borlanic 0:02dd72d1d465 436 size_t ilen,
borlanic 0:02dd72d1d465 437 unsigned char output[20] )
borlanic 0:02dd72d1d465 438 {
borlanic 0:02dd72d1d465 439 int ret;
borlanic 0:02dd72d1d465 440 mbedtls_ripemd160_context ctx;
borlanic 0:02dd72d1d465 441
borlanic 0:02dd72d1d465 442 mbedtls_ripemd160_init( &ctx );
borlanic 0:02dd72d1d465 443
borlanic 0:02dd72d1d465 444 if( ( ret = mbedtls_ripemd160_starts_ret( &ctx ) ) != 0 )
borlanic 0:02dd72d1d465 445 goto exit;
borlanic 0:02dd72d1d465 446
borlanic 0:02dd72d1d465 447 if( ( ret = mbedtls_ripemd160_update_ret( &ctx, input, ilen ) ) != 0 )
borlanic 0:02dd72d1d465 448 goto exit;
borlanic 0:02dd72d1d465 449
borlanic 0:02dd72d1d465 450 if( ( ret = mbedtls_ripemd160_finish_ret( &ctx, output ) ) != 0 )
borlanic 0:02dd72d1d465 451 goto exit;
borlanic 0:02dd72d1d465 452
borlanic 0:02dd72d1d465 453 exit:
borlanic 0:02dd72d1d465 454 mbedtls_ripemd160_free( &ctx );
borlanic 0:02dd72d1d465 455
borlanic 0:02dd72d1d465 456 return( ret );
borlanic 0:02dd72d1d465 457 }
borlanic 0:02dd72d1d465 458
borlanic 0:02dd72d1d465 459 #if !defined(MBEDTLS_DEPRECATED_REMOVED)
borlanic 0:02dd72d1d465 460 void mbedtls_ripemd160( const unsigned char *input,
borlanic 0:02dd72d1d465 461 size_t ilen,
borlanic 0:02dd72d1d465 462 unsigned char output[20] )
borlanic 0:02dd72d1d465 463 {
borlanic 0:02dd72d1d465 464 mbedtls_ripemd160_ret( input, ilen, output );
borlanic 0:02dd72d1d465 465 }
borlanic 0:02dd72d1d465 466 #endif
borlanic 0:02dd72d1d465 467
borlanic 0:02dd72d1d465 468 #if defined(MBEDTLS_SELF_TEST)
borlanic 0:02dd72d1d465 469 /*
borlanic 0:02dd72d1d465 470 * Test vectors from the RIPEMD-160 paper and
borlanic 0:02dd72d1d465 471 * http://homes.esat.kuleuven.be/~bosselae/mbedtls_ripemd160.html#HMAC
borlanic 0:02dd72d1d465 472 */
borlanic 0:02dd72d1d465 473 #define TESTS 8
borlanic 0:02dd72d1d465 474 static const unsigned char ripemd160_test_str[TESTS][81] =
borlanic 0:02dd72d1d465 475 {
borlanic 0:02dd72d1d465 476 { "" },
borlanic 0:02dd72d1d465 477 { "a" },
borlanic 0:02dd72d1d465 478 { "abc" },
borlanic 0:02dd72d1d465 479 { "message digest" },
borlanic 0:02dd72d1d465 480 { "abcdefghijklmnopqrstuvwxyz" },
borlanic 0:02dd72d1d465 481 { "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq" },
borlanic 0:02dd72d1d465 482 { "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" },
borlanic 0:02dd72d1d465 483 { "12345678901234567890123456789012345678901234567890123456789012"
borlanic 0:02dd72d1d465 484 "345678901234567890" },
borlanic 0:02dd72d1d465 485 };
borlanic 0:02dd72d1d465 486
borlanic 0:02dd72d1d465 487 static const size_t ripemd160_test_strlen[TESTS] =
borlanic 0:02dd72d1d465 488 {
borlanic 0:02dd72d1d465 489 0, 1, 3, 14, 26, 56, 62, 80
borlanic 0:02dd72d1d465 490 };
borlanic 0:02dd72d1d465 491
borlanic 0:02dd72d1d465 492 static const unsigned char ripemd160_test_md[TESTS][20] =
borlanic 0:02dd72d1d465 493 {
borlanic 0:02dd72d1d465 494 { 0x9c, 0x11, 0x85, 0xa5, 0xc5, 0xe9, 0xfc, 0x54, 0x61, 0x28,
borlanic 0:02dd72d1d465 495 0x08, 0x97, 0x7e, 0xe8, 0xf5, 0x48, 0xb2, 0x25, 0x8d, 0x31 },
borlanic 0:02dd72d1d465 496 { 0x0b, 0xdc, 0x9d, 0x2d, 0x25, 0x6b, 0x3e, 0xe9, 0xda, 0xae,
borlanic 0:02dd72d1d465 497 0x34, 0x7b, 0xe6, 0xf4, 0xdc, 0x83, 0x5a, 0x46, 0x7f, 0xfe },
borlanic 0:02dd72d1d465 498 { 0x8e, 0xb2, 0x08, 0xf7, 0xe0, 0x5d, 0x98, 0x7a, 0x9b, 0x04,
borlanic 0:02dd72d1d465 499 0x4a, 0x8e, 0x98, 0xc6, 0xb0, 0x87, 0xf1, 0x5a, 0x0b, 0xfc },
borlanic 0:02dd72d1d465 500 { 0x5d, 0x06, 0x89, 0xef, 0x49, 0xd2, 0xfa, 0xe5, 0x72, 0xb8,
borlanic 0:02dd72d1d465 501 0x81, 0xb1, 0x23, 0xa8, 0x5f, 0xfa, 0x21, 0x59, 0x5f, 0x36 },
borlanic 0:02dd72d1d465 502 { 0xf7, 0x1c, 0x27, 0x10, 0x9c, 0x69, 0x2c, 0x1b, 0x56, 0xbb,
borlanic 0:02dd72d1d465 503 0xdc, 0xeb, 0x5b, 0x9d, 0x28, 0x65, 0xb3, 0x70, 0x8d, 0xbc },
borlanic 0:02dd72d1d465 504 { 0x12, 0xa0, 0x53, 0x38, 0x4a, 0x9c, 0x0c, 0x88, 0xe4, 0x05,
borlanic 0:02dd72d1d465 505 0xa0, 0x6c, 0x27, 0xdc, 0xf4, 0x9a, 0xda, 0x62, 0xeb, 0x2b },
borlanic 0:02dd72d1d465 506 { 0xb0, 0xe2, 0x0b, 0x6e, 0x31, 0x16, 0x64, 0x02, 0x86, 0xed,
borlanic 0:02dd72d1d465 507 0x3a, 0x87, 0xa5, 0x71, 0x30, 0x79, 0xb2, 0x1f, 0x51, 0x89 },
borlanic 0:02dd72d1d465 508 { 0x9b, 0x75, 0x2e, 0x45, 0x57, 0x3d, 0x4b, 0x39, 0xf4, 0xdb,
borlanic 0:02dd72d1d465 509 0xd3, 0x32, 0x3c, 0xab, 0x82, 0xbf, 0x63, 0x32, 0x6b, 0xfb },
borlanic 0:02dd72d1d465 510 };
borlanic 0:02dd72d1d465 511
borlanic 0:02dd72d1d465 512 /*
borlanic 0:02dd72d1d465 513 * Checkup routine
borlanic 0:02dd72d1d465 514 */
borlanic 0:02dd72d1d465 515 int mbedtls_ripemd160_self_test( int verbose )
borlanic 0:02dd72d1d465 516 {
borlanic 0:02dd72d1d465 517 int i, ret = 0;
borlanic 0:02dd72d1d465 518 unsigned char output[20];
borlanic 0:02dd72d1d465 519
borlanic 0:02dd72d1d465 520 memset( output, 0, sizeof output );
borlanic 0:02dd72d1d465 521
borlanic 0:02dd72d1d465 522 for( i = 0; i < TESTS; i++ )
borlanic 0:02dd72d1d465 523 {
borlanic 0:02dd72d1d465 524 if( verbose != 0 )
borlanic 0:02dd72d1d465 525 mbedtls_printf( " RIPEMD-160 test #%d: ", i + 1 );
borlanic 0:02dd72d1d465 526
borlanic 0:02dd72d1d465 527 ret = mbedtls_ripemd160_ret( ripemd160_test_str[i],
borlanic 0:02dd72d1d465 528 ripemd160_test_strlen[i], output );
borlanic 0:02dd72d1d465 529 if( ret != 0 )
borlanic 0:02dd72d1d465 530 goto fail;
borlanic 0:02dd72d1d465 531
borlanic 0:02dd72d1d465 532 if( memcmp( output, ripemd160_test_md[i], 20 ) != 0 )
borlanic 0:02dd72d1d465 533 {
borlanic 0:02dd72d1d465 534 ret = 1;
borlanic 0:02dd72d1d465 535 goto fail;
borlanic 0:02dd72d1d465 536 }
borlanic 0:02dd72d1d465 537
borlanic 0:02dd72d1d465 538 if( verbose != 0 )
borlanic 0:02dd72d1d465 539 mbedtls_printf( "passed\n" );
borlanic 0:02dd72d1d465 540 }
borlanic 0:02dd72d1d465 541
borlanic 0:02dd72d1d465 542 if( verbose != 0 )
borlanic 0:02dd72d1d465 543 mbedtls_printf( "\n" );
borlanic 0:02dd72d1d465 544
borlanic 0:02dd72d1d465 545 return( 0 );
borlanic 0:02dd72d1d465 546
borlanic 0:02dd72d1d465 547 fail:
borlanic 0:02dd72d1d465 548 if( verbose != 0 )
borlanic 0:02dd72d1d465 549 mbedtls_printf( "failed\n" );
borlanic 0:02dd72d1d465 550
borlanic 0:02dd72d1d465 551 return( ret );
borlanic 0:02dd72d1d465 552 }
borlanic 0:02dd72d1d465 553
borlanic 0:02dd72d1d465 554 #endif /* MBEDTLS_SELF_TEST */
borlanic 0:02dd72d1d465 555
borlanic 0:02dd72d1d465 556 #endif /* MBEDTLS_RIPEMD160_C */