hmac.c

   1 #include "quakedef.h"
   2 #include "hmac.h"
   3
   4 void hmac(
   5         hashfunc_t hfunc, int hlen, int hblock,
   6         unsigned char *out,
   7         unsigned char *in, int n,
   8         unsigned char *key, int k
   9 )
  10 {
  11         unsigned char hashbuf[32];
  12         unsigned char k_xor_ipad[128];
  13         unsigned char k_xor_opad[128];
  14         unsigned char catbuf[256];
  15         int i;
  16
  17         if(sizeof(hashbuf) < (size_t) hlen)
  18                 Host_Error("Invalid hash function used for HMAC - too long hash length");
  19         if(sizeof(k_xor_ipad) < (size_t) hblock)
  20                 Host_Error("Invalid hash function used for HMAC - too long hash block length");
  21         if(sizeof(catbuf) < (size_t) hblock + (size_t) hlen)
  22                 Host_Error("Invalid hash function used for HMAC - too long hash block length");
  23         if(sizeof(catbuf) < (size_t) hblock + (size_t) n)
  24                 Host_Error("Invalid hash function used for HMAC - too long message length");
  25
  26         if(k > hblock)
  27         {
  28                 // hash the key if it is too long
  29                 // NO! that makes it too short if hblock != hlen
  30                 // just shorten it, then
  31                 // hfunc(hashbuf, key, k);
  32                 // key = hashbuf;
  33                 k = hblock;
  34         }
  35         else if(k < hblock)
  36         {
  37                 // zero pad the key if it is too short
  38                 memcpy(k_xor_opad, key, k);
  39                 for(i = k; i < hblock; ++i)
  40                         k_xor_opad[i] = 0;
  41                 key = k_xor_opad;
  42                 k = hblock;
  43         }
  44
  45         for(i = 0; i < hblock; ++i)
  46         {
  47                 k_xor_ipad[i] = key[i] ^ 0x36;
  48                 k_xor_opad[i] = key[i] ^ 0x5c;
  49         }
  50
  51         memcpy(catbuf, k_xor_ipad, hblock);
  52         memcpy(catbuf + hblock, in, n);
  53         hfunc(hashbuf, catbuf, hblock + n);
  54         memcpy(catbuf, k_xor_opad, hblock);
  55         memcpy(catbuf + hblock, hashbuf, hlen);
  56         hfunc(out, catbuf, hblock + hlen);
  57 }