wolf SSL / CyaSSL-2.9.4

SSL/TLS Library

Dependents:  

CyaSSL is SSL/TLS library for embedded systems.

wolfssl.com

ctaocrypt/src/sha256.c@0:9d17e4342598, 2014-04-20 (annotated)

Committer:
wolfSSL
Date:
Sun Apr 20 12:40:57 2014 +0000
Revision:
0:9d17e4342598
CyaSSL SSL/TLS Library 2.9.4;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
wolfSSL 0:9d17e4342598 1 /* sha256.c
wolfSSL 0:9d17e4342598 2 *
wolfSSL 0:9d17e4342598 3 * Copyright (C) 2006-2013 wolfSSL Inc.
wolfSSL 0:9d17e4342598 4 *
wolfSSL 0:9d17e4342598 5 * This file is part of CyaSSL.
wolfSSL 0:9d17e4342598 6 *
wolfSSL 0:9d17e4342598 7 * CyaSSL is free software; you can redistribute it and/or modify
wolfSSL 0:9d17e4342598 8 * it under the terms of the GNU General Public License as published by
wolfSSL 0:9d17e4342598 9 * the Free Software Foundation; either version 2 of the License, or
wolfSSL 0:9d17e4342598 10 * (at your option) any later version.
wolfSSL 0:9d17e4342598 11 *
wolfSSL 0:9d17e4342598 12 * CyaSSL is distributed in the hope that it will be useful,
wolfSSL 0:9d17e4342598 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
wolfSSL 0:9d17e4342598 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
wolfSSL 0:9d17e4342598 15 * GNU General Public License for more details.
wolfSSL 0:9d17e4342598 16 *
wolfSSL 0:9d17e4342598 17 * You should have received a copy of the GNU General Public License
wolfSSL 0:9d17e4342598 18 * along with this program; if not, write to the Free Software
wolfSSL 0:9d17e4342598 19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
wolfSSL 0:9d17e4342598 20 */
wolfSSL 0:9d17e4342598 21
wolfSSL 0:9d17e4342598 22
wolfSSL 0:9d17e4342598 23 /* code submitted by raphael.huck@efixo.com */
wolfSSL 0:9d17e4342598 24
wolfSSL 0:9d17e4342598 25 #ifdef HAVE_CONFIG_H
wolfSSL 0:9d17e4342598 26 #include <config.h>
wolfSSL 0:9d17e4342598 27 #endif
wolfSSL 0:9d17e4342598 28
wolfSSL 0:9d17e4342598 29 #include <cyassl/ctaocrypt/settings.h>
wolfSSL 0:9d17e4342598 30
wolfSSL 0:9d17e4342598 31 #if !defined(NO_SHA256)
wolfSSL 0:9d17e4342598 32
wolfSSL 0:9d17e4342598 33 #ifdef CYASSL_PIC32MZ_HASH
wolfSSL 0:9d17e4342598 34 #define InitSha256 InitSha256_sw
wolfSSL 0:9d17e4342598 35 #define Sha256Update Sha256Update_sw
wolfSSL 0:9d17e4342598 36 #define Sha256Final Sha256Final_sw
wolfSSL 0:9d17e4342598 37 #endif
wolfSSL 0:9d17e4342598 38
wolfSSL 0:9d17e4342598 39 #ifdef HAVE_FIPS
wolfSSL 0:9d17e4342598 40 /* set NO_WRAPPERS before headers, use direct internal f()s not wrappers */
wolfSSL 0:9d17e4342598 41 #define FIPS_NO_WRAPPERS
wolfSSL 0:9d17e4342598 42 #endif
wolfSSL 0:9d17e4342598 43
wolfSSL 0:9d17e4342598 44 #include <cyassl/ctaocrypt/sha256.h>
wolfSSL 0:9d17e4342598 45 #ifdef NO_INLINE
wolfSSL 0:9d17e4342598 46 #include <cyassl/ctaocrypt/misc.h>
wolfSSL 0:9d17e4342598 47 #else
wolfSSL 0:9d17e4342598 48 #include <ctaocrypt/src/misc.c>
wolfSSL 0:9d17e4342598 49 #endif
wolfSSL 0:9d17e4342598 50
wolfSSL 0:9d17e4342598 51 #ifdef FREESCALE_MMCAU
wolfSSL 0:9d17e4342598 52 #include "cau_api.h"
wolfSSL 0:9d17e4342598 53 #define XTRANSFORM(S,B) cau_sha256_hash_n((B), 1, ((S))->digest)
wolfSSL 0:9d17e4342598 54 #else
wolfSSL 0:9d17e4342598 55 #define XTRANSFORM(S,B) Transform((S))
wolfSSL 0:9d17e4342598 56 #endif
wolfSSL 0:9d17e4342598 57
wolfSSL 0:9d17e4342598 58
wolfSSL 0:9d17e4342598 59 #ifndef min
wolfSSL 0:9d17e4342598 60
wolfSSL 0:9d17e4342598 61 static INLINE word32 min(word32 a, word32 b)
wolfSSL 0:9d17e4342598 62 {
wolfSSL 0:9d17e4342598 63 return a > b ? b : a;
wolfSSL 0:9d17e4342598 64 }
wolfSSL 0:9d17e4342598 65
wolfSSL 0:9d17e4342598 66 #endif /* min */
wolfSSL 0:9d17e4342598 67
wolfSSL 0:9d17e4342598 68
wolfSSL 0:9d17e4342598 69 int InitSha256(Sha256* sha256)
wolfSSL 0:9d17e4342598 70 {
wolfSSL 0:9d17e4342598 71 #ifdef FREESCALE_MMCAU
wolfSSL 0:9d17e4342598 72 cau_sha256_initialize_output(sha256->digest);
wolfSSL 0:9d17e4342598 73 #else
wolfSSL 0:9d17e4342598 74 sha256->digest[0] = 0x6A09E667L;
wolfSSL 0:9d17e4342598 75 sha256->digest[1] = 0xBB67AE85L;
wolfSSL 0:9d17e4342598 76 sha256->digest[2] = 0x3C6EF372L;
wolfSSL 0:9d17e4342598 77 sha256->digest[3] = 0xA54FF53AL;
wolfSSL 0:9d17e4342598 78 sha256->digest[4] = 0x510E527FL;
wolfSSL 0:9d17e4342598 79 sha256->digest[5] = 0x9B05688CL;
wolfSSL 0:9d17e4342598 80 sha256->digest[6] = 0x1F83D9ABL;
wolfSSL 0:9d17e4342598 81 sha256->digest[7] = 0x5BE0CD19L;
wolfSSL 0:9d17e4342598 82 #endif
wolfSSL 0:9d17e4342598 83
wolfSSL 0:9d17e4342598 84 sha256->buffLen = 0;
wolfSSL 0:9d17e4342598 85 sha256->loLen = 0;
wolfSSL 0:9d17e4342598 86 sha256->hiLen = 0;
wolfSSL 0:9d17e4342598 87
wolfSSL 0:9d17e4342598 88 return 0;
wolfSSL 0:9d17e4342598 89 }
wolfSSL 0:9d17e4342598 90
wolfSSL 0:9d17e4342598 91 #ifndef FREESCALE_MMCAU
wolfSSL 0:9d17e4342598 92
wolfSSL 0:9d17e4342598 93 static const word32 K[64] = {
wolfSSL 0:9d17e4342598 94 0x428A2F98L, 0x71374491L, 0xB5C0FBCFL, 0xE9B5DBA5L, 0x3956C25BL,
wolfSSL 0:9d17e4342598 95 0x59F111F1L, 0x923F82A4L, 0xAB1C5ED5L, 0xD807AA98L, 0x12835B01L,
wolfSSL 0:9d17e4342598 96 0x243185BEL, 0x550C7DC3L, 0x72BE5D74L, 0x80DEB1FEL, 0x9BDC06A7L,
wolfSSL 0:9d17e4342598 97 0xC19BF174L, 0xE49B69C1L, 0xEFBE4786L, 0x0FC19DC6L, 0x240CA1CCL,
wolfSSL 0:9d17e4342598 98 0x2DE92C6FL, 0x4A7484AAL, 0x5CB0A9DCL, 0x76F988DAL, 0x983E5152L,
wolfSSL 0:9d17e4342598 99 0xA831C66DL, 0xB00327C8L, 0xBF597FC7L, 0xC6E00BF3L, 0xD5A79147L,
wolfSSL 0:9d17e4342598 100 0x06CA6351L, 0x14292967L, 0x27B70A85L, 0x2E1B2138L, 0x4D2C6DFCL,
wolfSSL 0:9d17e4342598 101 0x53380D13L, 0x650A7354L, 0x766A0ABBL, 0x81C2C92EL, 0x92722C85L,
wolfSSL 0:9d17e4342598 102 0xA2BFE8A1L, 0xA81A664BL, 0xC24B8B70L, 0xC76C51A3L, 0xD192E819L,
wolfSSL 0:9d17e4342598 103 0xD6990624L, 0xF40E3585L, 0x106AA070L, 0x19A4C116L, 0x1E376C08L,
wolfSSL 0:9d17e4342598 104 0x2748774CL, 0x34B0BCB5L, 0x391C0CB3L, 0x4ED8AA4AL, 0x5B9CCA4FL,
wolfSSL 0:9d17e4342598 105 0x682E6FF3L, 0x748F82EEL, 0x78A5636FL, 0x84C87814L, 0x8CC70208L,
wolfSSL 0:9d17e4342598 106 0x90BEFFFAL, 0xA4506CEBL, 0xBEF9A3F7L, 0xC67178F2L
wolfSSL 0:9d17e4342598 107 };
wolfSSL 0:9d17e4342598 108
wolfSSL 0:9d17e4342598 109 #define Ch(x,y,z) (z ^ (x & (y ^ z)))
wolfSSL 0:9d17e4342598 110 #define Maj(x,y,z) (((x | y) & z) | (x & y))
wolfSSL 0:9d17e4342598 111 #define S(x, n) rotrFixed(x, n)
wolfSSL 0:9d17e4342598 112 #define R(x, n) (((x)&0xFFFFFFFFU)>>(n))
wolfSSL 0:9d17e4342598 113 #define Sigma0(x) (S(x, 2) ^ S(x, 13) ^ S(x, 22))
wolfSSL 0:9d17e4342598 114 #define Sigma1(x) (S(x, 6) ^ S(x, 11) ^ S(x, 25))
wolfSSL 0:9d17e4342598 115 #define Gamma0(x) (S(x, 7) ^ S(x, 18) ^ R(x, 3))
wolfSSL 0:9d17e4342598 116 #define Gamma1(x) (S(x, 17) ^ S(x, 19) ^ R(x, 10))
wolfSSL 0:9d17e4342598 117
wolfSSL 0:9d17e4342598 118 #define RND(a,b,c,d,e,f,g,h,i) \
wolfSSL 0:9d17e4342598 119 t0 = h + Sigma1(e) + Ch(e, f, g) + K[i] + W[i]; \
wolfSSL 0:9d17e4342598 120 t1 = Sigma0(a) + Maj(a, b, c); \
wolfSSL 0:9d17e4342598 121 d += t0; \
wolfSSL 0:9d17e4342598 122 h = t0 + t1;
wolfSSL 0:9d17e4342598 123
wolfSSL 0:9d17e4342598 124
wolfSSL 0:9d17e4342598 125 static void Transform(Sha256* sha256)
wolfSSL 0:9d17e4342598 126 {
wolfSSL 0:9d17e4342598 127 word32 S[8], W[64], t0, t1;
wolfSSL 0:9d17e4342598 128 int i;
wolfSSL 0:9d17e4342598 129
wolfSSL 0:9d17e4342598 130 /* Copy context->state[] to working vars */
wolfSSL 0:9d17e4342598 131 for (i = 0; i < 8; i++)
wolfSSL 0:9d17e4342598 132 S[i] = sha256->digest[i];
wolfSSL 0:9d17e4342598 133
wolfSSL 0:9d17e4342598 134 for (i = 0; i < 16; i++)
wolfSSL 0:9d17e4342598 135 W[i] = sha256->buffer[i];
wolfSSL 0:9d17e4342598 136
wolfSSL 0:9d17e4342598 137 for (i = 16; i < 64; i++)
wolfSSL 0:9d17e4342598 138 W[i] = Gamma1(W[i-2]) + W[i-7] + Gamma0(W[i-15]) + W[i-16];
wolfSSL 0:9d17e4342598 139
wolfSSL 0:9d17e4342598 140 for (i = 0; i < 64; i += 8) {
wolfSSL 0:9d17e4342598 141 RND(S[0],S[1],S[2],S[3],S[4],S[5],S[6],S[7],i+0);
wolfSSL 0:9d17e4342598 142 RND(S[7],S[0],S[1],S[2],S[3],S[4],S[5],S[6],i+1);
wolfSSL 0:9d17e4342598 143 RND(S[6],S[7],S[0],S[1],S[2],S[3],S[4],S[5],i+2);
wolfSSL 0:9d17e4342598 144 RND(S[5],S[6],S[7],S[0],S[1],S[2],S[3],S[4],i+3);
wolfSSL 0:9d17e4342598 145 RND(S[4],S[5],S[6],S[7],S[0],S[1],S[2],S[3],i+4);
wolfSSL 0:9d17e4342598 146 RND(S[3],S[4],S[5],S[6],S[7],S[0],S[1],S[2],i+5);
wolfSSL 0:9d17e4342598 147 RND(S[2],S[3],S[4],S[5],S[6],S[7],S[0],S[1],i+6);
wolfSSL 0:9d17e4342598 148 RND(S[1],S[2],S[3],S[4],S[5],S[6],S[7],S[0],i+7);
wolfSSL 0:9d17e4342598 149 }
wolfSSL 0:9d17e4342598 150
wolfSSL 0:9d17e4342598 151 /* Add the working vars back into digest state[] */
wolfSSL 0:9d17e4342598 152 for (i = 0; i < 8; i++) {
wolfSSL 0:9d17e4342598 153 sha256->digest[i] += S[i];
wolfSSL 0:9d17e4342598 154 }
wolfSSL 0:9d17e4342598 155 }
wolfSSL 0:9d17e4342598 156
wolfSSL 0:9d17e4342598 157 #endif /* FREESCALE_MMCAU */
wolfSSL 0:9d17e4342598 158
wolfSSL 0:9d17e4342598 159
wolfSSL 0:9d17e4342598 160 static INLINE void AddLength(Sha256* sha256, word32 len)
wolfSSL 0:9d17e4342598 161 {
wolfSSL 0:9d17e4342598 162 word32 tmp = sha256->loLen;
wolfSSL 0:9d17e4342598 163 if ( (sha256->loLen += len) < tmp)
wolfSSL 0:9d17e4342598 164 sha256->hiLen++; /* carry low to high */
wolfSSL 0:9d17e4342598 165 }
wolfSSL 0:9d17e4342598 166
wolfSSL 0:9d17e4342598 167
wolfSSL 0:9d17e4342598 168 int Sha256Update(Sha256* sha256, const byte* data, word32 len)
wolfSSL 0:9d17e4342598 169 {
wolfSSL 0:9d17e4342598 170 /* do block size increments */
wolfSSL 0:9d17e4342598 171 byte* local = (byte*)sha256->buffer;
wolfSSL 0:9d17e4342598 172
wolfSSL 0:9d17e4342598 173 while (len) {
wolfSSL 0:9d17e4342598 174 word32 add = min(len, SHA256_BLOCK_SIZE - sha256->buffLen);
wolfSSL 0:9d17e4342598 175 XMEMCPY(&local[sha256->buffLen], data, add);
wolfSSL 0:9d17e4342598 176
wolfSSL 0:9d17e4342598 177 sha256->buffLen += add;
wolfSSL 0:9d17e4342598 178 data += add;
wolfSSL 0:9d17e4342598 179 len -= add;
wolfSSL 0:9d17e4342598 180
wolfSSL 0:9d17e4342598 181 if (sha256->buffLen == SHA256_BLOCK_SIZE) {
wolfSSL 0:9d17e4342598 182 #if defined(LITTLE_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU)
wolfSSL 0:9d17e4342598 183 ByteReverseWords(sha256->buffer, sha256->buffer,
wolfSSL 0:9d17e4342598 184 SHA256_BLOCK_SIZE);
wolfSSL 0:9d17e4342598 185 #endif
wolfSSL 0:9d17e4342598 186 XTRANSFORM(sha256, local);
wolfSSL 0:9d17e4342598 187 AddLength(sha256, SHA256_BLOCK_SIZE);
wolfSSL 0:9d17e4342598 188 sha256->buffLen = 0;
wolfSSL 0:9d17e4342598 189 }
wolfSSL 0:9d17e4342598 190 }
wolfSSL 0:9d17e4342598 191
wolfSSL 0:9d17e4342598 192 return 0;
wolfSSL 0:9d17e4342598 193 }
wolfSSL 0:9d17e4342598 194
wolfSSL 0:9d17e4342598 195
wolfSSL 0:9d17e4342598 196 int Sha256Final(Sha256* sha256, byte* hash)
wolfSSL 0:9d17e4342598 197 {
wolfSSL 0:9d17e4342598 198 byte* local = (byte*)sha256->buffer;
wolfSSL 0:9d17e4342598 199
wolfSSL 0:9d17e4342598 200 AddLength(sha256, sha256->buffLen); /* before adding pads */
wolfSSL 0:9d17e4342598 201
wolfSSL 0:9d17e4342598 202 local[sha256->buffLen++] = 0x80; /* add 1 */
wolfSSL 0:9d17e4342598 203
wolfSSL 0:9d17e4342598 204 /* pad with zeros */
wolfSSL 0:9d17e4342598 205 if (sha256->buffLen > SHA256_PAD_SIZE) {
wolfSSL 0:9d17e4342598 206 XMEMSET(&local[sha256->buffLen], 0, SHA256_BLOCK_SIZE - sha256->buffLen);
wolfSSL 0:9d17e4342598 207 sha256->buffLen += SHA256_BLOCK_SIZE - sha256->buffLen;
wolfSSL 0:9d17e4342598 208
wolfSSL 0:9d17e4342598 209 #if defined(LITTLE_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU)
wolfSSL 0:9d17e4342598 210 ByteReverseWords(sha256->buffer, sha256->buffer, SHA256_BLOCK_SIZE);
wolfSSL 0:9d17e4342598 211 #endif
wolfSSL 0:9d17e4342598 212 XTRANSFORM(sha256, local);
wolfSSL 0:9d17e4342598 213 sha256->buffLen = 0;
wolfSSL 0:9d17e4342598 214 }
wolfSSL 0:9d17e4342598 215 XMEMSET(&local[sha256->buffLen], 0, SHA256_PAD_SIZE - sha256->buffLen);
wolfSSL 0:9d17e4342598 216
wolfSSL 0:9d17e4342598 217 /* put lengths in bits */
wolfSSL 0:9d17e4342598 218 sha256->hiLen = (sha256->loLen >> (8*sizeof(sha256->loLen) - 3)) +
wolfSSL 0:9d17e4342598 219 (sha256->hiLen << 3);
wolfSSL 0:9d17e4342598 220 sha256->loLen = sha256->loLen << 3;
wolfSSL 0:9d17e4342598 221
wolfSSL 0:9d17e4342598 222 /* store lengths */
wolfSSL 0:9d17e4342598 223 #if defined(LITTLE_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU)
wolfSSL 0:9d17e4342598 224 ByteReverseWords(sha256->buffer, sha256->buffer, SHA256_BLOCK_SIZE);
wolfSSL 0:9d17e4342598 225 #endif
wolfSSL 0:9d17e4342598 226 /* ! length ordering dependent on digest endian type ! */
wolfSSL 0:9d17e4342598 227 XMEMCPY(&local[SHA256_PAD_SIZE], &sha256->hiLen, sizeof(word32));
wolfSSL 0:9d17e4342598 228 XMEMCPY(&local[SHA256_PAD_SIZE + sizeof(word32)], &sha256->loLen,
wolfSSL 0:9d17e4342598 229 sizeof(word32));
wolfSSL 0:9d17e4342598 230
wolfSSL 0:9d17e4342598 231 #ifdef FREESCALE_MMCAU
wolfSSL 0:9d17e4342598 232 /* Kinetis requires only these bytes reversed */
wolfSSL 0:9d17e4342598 233 ByteReverseWords(&sha256->buffer[SHA256_PAD_SIZE/sizeof(word32)],
wolfSSL 0:9d17e4342598 234 &sha256->buffer[SHA256_PAD_SIZE/sizeof(word32)],
wolfSSL 0:9d17e4342598 235 2 * sizeof(word32));
wolfSSL 0:9d17e4342598 236 #endif
wolfSSL 0:9d17e4342598 237
wolfSSL 0:9d17e4342598 238 XTRANSFORM(sha256, local);
wolfSSL 0:9d17e4342598 239 #ifdef LITTLE_ENDIAN_ORDER
wolfSSL 0:9d17e4342598 240 ByteReverseWords(sha256->digest, sha256->digest, SHA256_DIGEST_SIZE);
wolfSSL 0:9d17e4342598 241 #endif
wolfSSL 0:9d17e4342598 242 XMEMCPY(hash, sha256->digest, SHA256_DIGEST_SIZE);
wolfSSL 0:9d17e4342598 243
wolfSSL 0:9d17e4342598 244 return InitSha256(sha256); /* reset state */
wolfSSL 0:9d17e4342598 245 }
wolfSSL 0:9d17e4342598 246
wolfSSL 0:9d17e4342598 247
wolfSSL 0:9d17e4342598 248 #endif /* NO_SHA256 */
wolfSSL 0:9d17e4342598 249