sha1.c 2.75 KB
Newer Older
Niels Möller's avatar
Niels Möller committed
1
/* sha1.c
Niels Möller's avatar
Niels Möller committed
2 3
 *
 * The sha1 hash function.
4
 * Defined by http://www.itl.nist.gov/fipspubs/fip180-1.htm.
Niels Möller's avatar
Niels Möller committed
5 6 7 8 9 10 11 12 13 14 15
 */

/* nettle, low-level cryptographics library
 *
 * Copyright (C) 2001 Peter Gutmann, Andrew Kuchling, Niels Möller
 *  
 * The nettle library is free software; you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation; either version 2.1 of the License, or (at your
 * option) any later version.
 * 
Niels Möller's avatar
Niels Möller committed
16
 * The nettle library is distributed in the hope that it will be useful, but
Niels Möller's avatar
Niels Möller committed
17 18 19 20 21
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
 * License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public License
Niels Möller's avatar
Niels Möller committed
22
 * along with the nettle library; see the file COPYING.LIB.  If not, write to
Niels Möller's avatar
Niels Möller committed
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38
 * the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 * MA 02111-1307, USA.
 */

/* Here's the first paragraph of Peter Gutmann's posting,
 * <30ajo5$oe8@ccu2.auckland.ac.nz>: 
 *
 * The following is my SHA (FIPS 180) code updated to allow use of the "fixed"
 * SHA, thanks to Jim Gillogly and an anonymous contributor for the information on
 * what's changed in the new version.  The fix is a simple change which involves
 * adding a single rotate in the initial expansion function.  It is unknown
 * whether this is an optimal solution to the problem which was discovered in the
 * SHA or whether it's simply a bandaid which fixes the problem with a minimum of
 * effort (for example the reengineering of a great many Capstone chips).
 */

39 40 41
#if HAVE_CONFIG_H
# include "config.h"
#endif
Niels Möller's avatar
Niels Möller committed
42 43

#include <assert.h>
Niels Möller's avatar
Niels Möller committed
44
#include <stdlib.h>
Niels Möller's avatar
Niels Möller committed
45 46
#include <string.h>

47 48 49
#include "sha.h"

#include "macros.h"
50
#include "nettle-write.h"
51

Niels Möller's avatar
Niels Möller committed
52 53 54 55
/* Initialize the SHA values */
void
sha1_init(struct sha1_ctx *ctx)
{
56 57 58 59 60 61 62 63 64 65 66 67 68
  /* FIXME: Put the buffer last in the struct, and arrange so that we
     can initialize with a single memcpy. */
  static const uint32_t iv[_SHA1_DIGEST_LENGTH] = 
    {
      /* SHA initial values */
      0x67452301L,
      0xEFCDAB89L,
      0x98BADCFEL,
      0x10325476L,
      0xC3D2E1F0L,
    };

  memcpy(ctx->state, iv, sizeof(ctx->state));
Niels Möller's avatar
Niels Möller committed
69 70 71 72 73 74 75 76
  ctx->count_low = ctx->count_high = 0;
  
  /* Initialize buffer */
  ctx->index = 0;
}

void
sha1_update(struct sha1_ctx *ctx,
77
	    unsigned length, const uint8_t *data)
Niels Möller's avatar
Niels Möller committed
78
{
79
  MD_UPDATE (ctx, length, data, _nettle_sha1_compress);
Niels Möller's avatar
Niels Möller committed
80 81 82
}
	  
void
83
sha1_digest(struct sha1_ctx *ctx,
Niels Möller's avatar
Niels Möller committed
84 85 86 87 88
	    unsigned length,
	    uint8_t *digest)
{
  assert(length <= SHA1_DIGEST_SIZE);

89 90 91
  /* There are 512 = 2^9 bits in one block */  
  MD_FINAL(ctx, 32, 9, _nettle_sha1_compress, WRITE_UINT32);
  _nettle_write_be32(length, digest, ctx->state);
92
  sha1_init(ctx);
Niels Möller's avatar
Niels Möller committed
93
}