contrib/opie/libopie/hash.c

   1 /* hash.c: The opiehash() library function.
   2
   3 %%% copyright-cmetz-96
   4 This software is Copyright 1996-2001 by Craig Metz, All Rights Reserved.
   5 The Inner Net License Version 3 applies to this software.
   6 You should have received a copy of the license with this software. If
   7 you didn't get a copy, you may request one from <license@inner.net>.
   8
   9         History:
  10
  11         Modified by cmetz for OPIE 2.4. Use struct opie_otpkey for binary arg.
  12         Modified by cmetz for OPIE 2.31. Added SHA support (which may
  13               not be correct). Backed out previous optimizations as
  14               they killed thread-safety.
  15         Created by cmetz for OPIE 2.3 using the old hash.c as a guide.
  16
  17 $FreeBSD: src/contrib/opie/libopie/hash.c,v 1.3.6.2 2002/07/15 14:48:47 des Exp $
  18 */
  19
  20 #include "opie_cfg.h"
  21 #include "opie.h"
  22
  23 #include <sha.h>
  24 #include <md4.h>
  25 #include <md5.h>
  26
  27 VOIDRET opiehash FUNCTION((x, algorithm), struct opie_otpkey *x AND
  28 unsigned algorithm)
  29 {
  30   UINT4 *results = (UINT4 *)x;
  31
  32   switch(algorithm) {
  33     case 3:
  34       {
  35       SHA_CTX sha;
  36       UINT4 digest[5];
  37       SHA1_Init(&sha);
  38       SHA1_Update(&sha, (unsigned char *)x, 8);
  39       SHA1_Final((unsigned char *)digest, &sha);
  40       results[0] = digest[0] ^ digest[2] ^ digest[4];
  41       results[1] = digest[1] ^ digest[3];
  42       };
  43       break;
  44     case 4:
  45       {
  46       MD4_CTX mdx;
  47       UINT4 mdx_tmp[4];
  48
  49       MD4Init(&mdx);
  50       MD4Update(&mdx, (unsigned char *)x, 8);
  51       MD4Final((unsigned char *)mdx_tmp, &mdx);
  52       results[0] = mdx_tmp[0] ^ mdx_tmp[2];
  53       results[1] = mdx_tmp[1] ^ mdx_tmp[3];
  54       };
  55       break;
  56     case 5:
  57       {
  58       MD5_CTX mdx;
  59       UINT4 mdx_tmp[4];
  60
  61       MD5Init(&mdx);
  62       MD5Update(&mdx, (unsigned char *)x, 8);
  63       MD5Final((unsigned char *)mdx_tmp, &mdx);
  64       results[0] = mdx_tmp[0] ^ mdx_tmp[2];
  65       results[1] = mdx_tmp[1] ^ mdx_tmp[3];
  66       };
  67       break;
  68   }
  69 }