sha2/sha256.c

   1 /* sha256.c */
   2 /*
   3     This file is part of the ARM-Crypto-Lib.
   4     Copyright (C) 2006-2015 Daniel Otte (bg@nerilex.org)
   5
   6     This program is free software: you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation, either version 3 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19 /**
  20  * \file                sha256.c
  21  * \author              Daniel Otte
  22  * \date                16.05.2006
  23  *
  24  * \par License:
  25  *      GPL
  26  *
  27  * \brief SHA-256 implementation.
  28  *
  29  *
  30  */
  31
  32 #include <stdint.h>
  33 #include <string.h> /* for memcpy, memmove, memset */
  34 #include <avr/pgmspace.h>
  35 #include "sha2_small_common.h"
  36 #include "sha256.h"
  37
  38 #define LITTLE_ENDIAN
  39
  40 #if defined LITTLE_ENDIAN
  41 #elif defined BIG_ENDIAN
  42 #else
  43         #error specify endianess!!!
  44 #endif
  45
  46
  47 /*************************************************************************/
  48
  49 const
  50 uint32_t sha256_init_vector[] PROGMEM = {
  51         0x6A09E667, 0xBB67AE85, 0x3C6EF372, 0xA54FF53A,
  52     0x510E527F, 0x9B05688C, 0x1F83D9AB, 0x5BE0CD19 };
  53
  54
  55 /*************************************************************************/
  56
  57 /**
  58  * \brief \c sh256_init initialises a sha256 context for hashing.
  59  * \c sh256_init c initialises the given sha256 context for hashing
  60  * @param state pointer to a sha256 context
  61  * @return none
  62  */
  63 void sha256_init(sha256_ctx_t *state){
  64         state->length=0;
  65         memcpy_P(state->h, sha256_init_vector, 8*4);
  66 }
  67
  68 /*************************************************************************/
  69 void sha256_nextBlock (sha256_ctx_t *state, const void *block){
  70         sha2_small_common_nextBlock(state, block);
  71 }
  72
  73 /*************************************************************************/
  74 void sha256_lastBlock (sha256_ctx_t *state, const void *block, uint16_t length_b){
  75         sha2_small_common_lastBlock(state, block, length_b);
  76 }
  77 /*************************************************************************/
  78
  79 /**
  80  * \brief function to process the last block being hashed
  81  * @param state Pointer to the context in which this block should be processed.
  82  * @param block Pointer to the message wich should be hashed.
  83  * @param length is the length of only THIS block in BITS not in bytes!
  84  *  bits are big endian, meaning high bits come first.
  85  *      if you have a message with bits at the end, the byte must be padded with zeros
  86  */
  87
  88 /*************************************************************************/
  89
  90 /*
  91  * length in bits!
  92  */
  93 void sha256(void *dest, const void *msg, uint32_t length_b){ /* length could be choosen longer but this is for µC */
  94         sha256_ctx_t s;
  95         sha256_init(&s);
  96         while(length_b >= SHA256_BLOCK_BITS){
  97                 sha256_nextBlock(&s, msg);
  98                 msg = (uint8_t*)msg + SHA256_BLOCK_BITS/8;
  99                 length_b -= SHA256_BLOCK_BITS;
 100         }
 101         sha256_lastBlock(&s, msg, length_b);
 102         sha256_ctx2hash(dest,&s);
 103 }
 104
 105
 106
 107 /*************************************************************************/
 108
 109 void sha256_ctx2hash(void *dest, const sha256_ctx_t *state){
 110 #if defined LITTLE_ENDIAN
 111         uint8_t i, j, *s=(uint8_t*)(state->h);
 112         i=8;
 113         do{
 114                 j=3;
 115                 do{
 116                         *((uint8_t*)dest) = s[j];
 117                         dest = (uint8_t*)dest + 1;
 118                 }while(j--);
 119                 s += 4;
 120         }while(--i);
 121 #elif BIG_ENDIAN
 122         memcpy(dest, state->h, 32);
 123 #else
 124 # error unsupported endian type!
 125 #endif
 126 }
 127
 128