From 027c7a7622a4aa4d0ed6483ba495ab91e0c68991 Mon Sep 17 00:00:00 2001
From: ame <ameliasquires@disroot.org>
Date: Thu, 11 Jul 2024 12:27:06 -0500
Subject: fixes to ub:33 hashes now safe

---
 src/crypto.h | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'src/crypto.h')

diff --git a/src/crypto.h b/src/crypto.h
index 410b282..b3b0609 100644
--- a/src/crypto.h
+++ b/src/crypto.h
@@ -90,6 +90,12 @@ int _##luaname##_common_hash(lua_State* L){\
   struct hashname##_hash* a = (struct hashname##_hash*)lua_newuserdata(L, sizeof * a);\
   int ud = lua_gettop(L);\
   *a = initf;\
+  int ini = lua_gettop(L);\
+  lua_newtable(L);\
+  lua_setfield(L, LUA_REGISTRYINDEX, lua_topointer(L, ud));\
+  lua_getfield(L, LUA_REGISTRYINDEX, lua_topointer(L, ud));\
+  int i;\
+  for(i = ud; i != ini; i++) luaI_tsetv(L, ini + 1, lua_topointer(L, i), i);\
   lua_common_hash_meta_def(luaname);\
   lua_pushvalue(L, ud);\
   return 1;\
@@ -166,7 +172,7 @@ static const luaL_Reg crypto_function_list [] = {
       {"base64decode",l_base64decode},
 
       {"baseconvert",l_baseconvert},
-
+      
       {NULL,NULL}
 };
 
-- 
cgit v1.2.3