tons of hashes bleh

1 files changed, 31 insertions, 0 deletions

diff --git a/src/hash/pjw.c b/src/hash/pjw.c
new file mode 100644
index 0000000..8494ba2
--- /dev/null
+++ b/src/hash/pjw.c
@@ -0,0 +1,31 @@
+#include "../i_util.h"
+#include "../crypto.h"
+
+#include <stdio.h>
+#include <stdint.h>
+
+uint32_t pjw(uint8_t* in, size_t len){
+    uint32_t hash = 0;
+    uint32_t high;
+    
+    for(int i = 0; i != len; i++){
+        hash = (hash << 4) + *in++;
+        if((high = (hash & 0xf0000000)))
+            hash ^= high >> 24;
+        hash &= ~high; 
+    }
+
+    return hash;
+}
+
+int l_pjw(lua_State* L){ 
+  size_t len = 0;
+  uint8_t* a = (uint8_t*)luaL_checklstring(L, 1, &len);
+
+  char digest[32];
+
+  uint32_t u = pjw(a, len);
+  sprintf(digest,"%08x",u);
+  lua_pushstring(L, digest);
+  return 1;
+}