summaryrefslogtreecommitdiff
path: root/Utility/Hash.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-01 20:34:06 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-01 20:34:36 -0400
commit2d8a1ba354653fb01f9f33ec126ca53d64200acf (patch)
tree19606245947fa4824d3ce5dcec5c645341f4ef98 /Utility/Hash.hs
parentdf58caaee491b729d35fa6a9a5e59eaa3c80cdc3 (diff)
Added SKEIN256 and SKEIN512 backends
SHA3 is still waiting for final standardization. Although this is looking less likely given https://www.cdt.org/blogs/joseph-lorenzo-hall/2409-nist-sha-3 In the meantime, cryptohash implements skein, and it's used by some of the haskell ecosystem (for yesod sessions, IIRC), so this implementation is likely to continue working. Also, I've talked with the cryprohash author and he's a reasonable guy. It makes sense to have an alternate high security hash, in case some horrible attack is found against SHA2 tomorrow, or in case SHA3 comes out and worst fears are realized. I'd also like to support using skein for HMAC. But no hurry there and a new version of cryptohash has much nicer HMAC code, so I will probably wait until I can use that version.
Diffstat (limited to 'Utility/Hash.hs')
-rw-r--r--Utility/Hash.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Utility/Hash.hs b/Utility/Hash.hs
index 31a36462c..e90f50623 100644
--- a/Utility/Hash.hs
+++ b/Utility/Hash.hs
@@ -26,4 +26,8 @@ sha512 = hashlazy
--sha3 :: L.ByteString -> Digest SHA3
--sha3 = hashlazy
+skein256 :: L.ByteString -> Digest Skein256_256
+skein256 = hashlazy
+skein512 :: L.ByteString -> Digest Skein512_512
+skein512 = hashlazy