804597f72d
folding to 64 bits, while SHA1 code is big endian. Therefore, a bswap32 is required before using the value. Without this change, the implementation does not conform to test vector found in RFC 2289. PR: bin/170519 Submitted by: Arthur Mesh <arthurmesh gmail com> (with changes) MFC after: 1 week
79 lines
2.0 KiB
C
79 lines
2.0 KiB
C
/* hash.c: The opiehash() library function.
|
|
|
|
%%% copyright-cmetz-96
|
|
This software is Copyright 1996-2001 by Craig Metz, All Rights Reserved.
|
|
The Inner Net License Version 3 applies to this software.
|
|
You should have received a copy of the license with this software. If
|
|
you didn't get a copy, you may request one from <license@inner.net>.
|
|
|
|
History:
|
|
|
|
Modified by cmetz for OPIE 2.4. Use struct opie_otpkey for binary arg.
|
|
Modified by cmetz for OPIE 2.31. Added SHA support (which may
|
|
not be correct). Backed out previous optimizations as
|
|
they killed thread-safety.
|
|
Created by cmetz for OPIE 2.3 using the old hash.c as a guide.
|
|
|
|
$FreeBSD$
|
|
*/
|
|
|
|
#include <sys/endian.h>
|
|
|
|
#include "opie_cfg.h"
|
|
#include "opie.h"
|
|
|
|
#include <sha.h>
|
|
#include <md4.h>
|
|
#include <md5.h>
|
|
|
|
VOIDRET opiehash FUNCTION((x, algorithm), struct opie_otpkey *x AND
|
|
unsigned algorithm)
|
|
{
|
|
UINT4 *results = (UINT4 *)x;
|
|
|
|
switch(algorithm) {
|
|
case 3:
|
|
{
|
|
SHA_CTX sha;
|
|
UINT4 digest[5];
|
|
SHA1_Init(&sha);
|
|
SHA1_Update(&sha, (unsigned char *)x, 8);
|
|
SHA1_Final((unsigned char *)digest, &sha);
|
|
results[0] = digest[0] ^ digest[2] ^ digest[4];
|
|
results[1] = digest[1] ^ digest[3];
|
|
|
|
/*
|
|
* RFC2289 mandates that we convert SHA1 digest from big-endian to little
|
|
* see Appendix A.
|
|
*/
|
|
results[0] = bswap32(results[0]);
|
|
results[1] = bswap32(results[1]);
|
|
};
|
|
break;
|
|
case 4:
|
|
{
|
|
MD4_CTX mdx;
|
|
UINT4 mdx_tmp[4];
|
|
|
|
MD4Init(&mdx);
|
|
MD4Update(&mdx, (unsigned char *)x, 8);
|
|
MD4Final((unsigned char *)mdx_tmp, &mdx);
|
|
results[0] = mdx_tmp[0] ^ mdx_tmp[2];
|
|
results[1] = mdx_tmp[1] ^ mdx_tmp[3];
|
|
};
|
|
break;
|
|
case 5:
|
|
{
|
|
MD5_CTX mdx;
|
|
UINT4 mdx_tmp[4];
|
|
|
|
MD5Init(&mdx);
|
|
MD5Update(&mdx, (unsigned char *)x, 8);
|
|
MD5Final((unsigned char *)mdx_tmp, &mdx);
|
|
results[0] = mdx_tmp[0] ^ mdx_tmp[2];
|
|
results[1] = mdx_tmp[1] ^ mdx_tmp[3];
|
|
};
|
|
break;
|
|
}
|
|
}
|