diff --git a/secure/simul_efun/hash.c b/secure/simul_efun/hash.c
new file mode 100644
index 0000000..51bbf60
--- /dev/null
+++ b/secure/simul_efun/hash.c
@@ -0,0 +1,17 @@
+#include "/sys/tls.h"
+
+deprecated string md5(mixed arg, varargs mixed* iterations)
+{
+    if (extern_call())
+         set_this_object(previous_object());
+
+    return hash(TLS_HASH_MD5, arg, iterations...);
+}
+
+deprecated string sha1(mixed arg, varargs mixed* iterations)
+{
+    if (extern_call())
+         set_this_object(previous_object());
+
+    return hash(TLS_HASH_SHA1, arg, iterations...);
+}