desertmonad

prasincs / sha1-hash.clj

Created February 15, 2011 08:36

clojure sha1 hash

	(defn get-hash [type data]
	(.digest (java.security.MessageDigest/getInstance type) (.getBytes data) ))

	(defn sha1-hash [data]
	(get-hash "sha1" data))

	(defn get-hash-str [data-bytes]
	(apply str
	(map
	#(.substring