source4/lib/crypto/hmacsha1.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Interface header:    HMAC SHA-1 code
   4    Copyright (C) Stefan Metzmacher
   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 /*
  21  taken direct from rfc2202 implementation and modified for suitable use
  22  */
  23
  24 #include "includes.h"
  25 #include "lib/crypto/crypto.h"
  26
  27 /***********************************************************************
  28  the rfc 2104/2202 version of hmac_sha1 initialisation.
  29 ***********************************************************************/
  30 _PUBLIC_ void hmac_sha1_init(const uint8_t *key, size_t key_len, struct HMACSHA1Context *ctx)
  31 {
  32         int i;
  33         uint8_t tk[SHA1HashSize];
  34
  35         /* if key is longer than 64 bytes reset it to key=MD5(key) */
  36         if (key_len > 64)
  37         {
  38                 struct SHA1Context tctx;
  39
  40                 SHA1Init(&tctx);
  41                 SHA1Update(&tctx, key, key_len);
  42                 SHA1Final(tk, &tctx);
  43
  44                 key = tk;
  45                 key_len = SHA1HashSize;
  46         }
  47
  48         /* start out by storing key in pads */
  49         ZERO_STRUCT(ctx->k_ipad);
  50         ZERO_STRUCT(ctx->k_opad);
  51         memcpy( ctx->k_ipad, key, key_len);
  52         memcpy( ctx->k_opad, key, key_len);
  53
  54         /* XOR key with ipad and opad values */
  55         for (i=0; i<64; i++)
  56         {
  57                 ctx->k_ipad[i] ^= 0x36;
  58                 ctx->k_opad[i] ^= 0x5c;
  59         }
  60
  61         SHA1Init(&ctx->ctx);
  62         SHA1Update(&ctx->ctx, ctx->k_ipad, 64);
  63 }
  64
  65 /***********************************************************************
  66  update hmac_sha1 "inner" buffer
  67 ***********************************************************************/
  68 _PUBLIC_ void hmac_sha1_update(const uint8_t *data, size_t data_len, struct HMACSHA1Context *ctx)
  69 {
  70         SHA1Update(&ctx->ctx, data, data_len); /* then text of datagram */
  71 }
  72
  73 /***********************************************************************
  74  finish off hmac_sha1 "inner" buffer and generate outer one.
  75 ***********************************************************************/
  76 _PUBLIC_ void hmac_sha1_final(uint8_t digest[SHA1HashSize], struct HMACSHA1Context *ctx)
  77 {
  78         struct SHA1Context ctx_o;
  79
  80         SHA1Final(digest, &ctx->ctx);
  81
  82         SHA1Init(&ctx_o);
  83         SHA1Update(&ctx_o, ctx->k_opad, 64);
  84         SHA1Update(&ctx_o, digest, SHA1HashSize);
  85         SHA1Final(digest, &ctx_o);
  86 }