util/hashes.lua

Sun, 26 Oct 2008 21:22:59 +0500

author
Waqas Hussain <waqas20@gmail.com>
date
Sun, 26 Oct 2008 21:22:59 +0500
changeset 185
a67c88ce1c6a
parent 155
8c9a9f6f6455
child 194
4ea1ec218976
permissions
-rw-r--r--

Added support for XEP-0049: Private XML Storage (mod_private)


local softreq = function (...) return select(2, pcall(require, ...)); end
local error = error;

module "hashes"

local md5 = softreq("md5");
if md5 then
	if md5.digest then
		local md5_digest = md5.digest;
		local sha1_digest = sha1.digest;
		function _M.md5(input)
			return md5_digest(input);
		end
		function _M.sha1(input)
			return sha1_digest(input);
		end
	elseif md5.sumhexa then
		local md5_sumhexa = md5.sumhexa;
		function _M.md5(input)
			return md5_sumhexa(input);
		end
	else
		error("md5 library found, but unrecognised... no hash functions will be available", 0);
	end
end

return _M;

mercurial