1 files changed, 52 insertions, 0 deletions
diff --git a/contrib/opie/libopie/hash.c b/contrib/opie/libopie/hash.c
new file mode 100644
index 0000000..4029fa9
--- /dev/null
+++ b/contrib/opie/libopie/hash.c
@@ -0,0 +1,52 @@
+/* hash.c: The opiehash() library function.
+
+%%% copyright-cmetz
+This software is Copyright 1996 by Craig Metz, All Rights Reserved.
+The Inner Net License Version 2 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:
+
+        Created by cmetz for OPIE 2.3 using the old hash.c as a guide.
+*/
+
+#include "opie_cfg.h"
+#include "opie.h"
+
+static struct opiemdx_ctx mdx;
+static UINT4 mdx_tmp[4];
+#if 0
+static SHA_INFO sha;
+#endif /* 0 */
+
+VOIDRET opiehash FUNCTION((x, algorithm), VOIDPTR x AND unsigned algorithm)
+{
+  UINT4 *results = (UINT4 *)x;
+
+  switch(algorithm) {
+#if 0
+    case 3:
+      sha_init(&sha);
+      sha_update(&sha, (BYTE *)x, 8);
+      sha_final(&sha);
+      results[0] = sha.digest[0] ^ sha.digest[2] ^ sha.digest[4];
+      results[1] = sha.digest[1] ^ sha.digest[3] ^ sha.digest[5];
+      break;
+#endif /* 0 */
+    case 4:
+      opiemd4init(&mdx);
+      opiemd4update(&mdx, (unsigned char *)x, 8);
+      opiemd4final((unsigned char *)mdx_tmp, &mdx);
+      results[0] = mdx_tmp[0] ^ mdx_tmp[2];
+      results[1] = mdx_tmp[1] ^ mdx_tmp[3];
+      break;
+    case 5:
+      opiemd5init(&mdx);
+      opiemd5update(&mdx, (unsigned char *)x, 8);
+      opiemd5final((unsigned char *)mdx_tmp, &mdx);
+      results[0] = mdx_tmp[0] ^ mdx_tmp[2];
+      results[1] = mdx_tmp[1] ^ mdx_tmp[3];
+      break;
+  }
+}