Skip to content

Instantly share code, notes, and snippets.

@prasincs

prasincs/sha1-hash.clj

Created February 15, 2011 08:36
Show Gist options
  • Star 10 You must be signed in to star a gist
  • Fork 2 You must be signed in to fork a gist
  • Save prasincs/827272 to your computer and use it in GitHub Desktop.
Save prasincs/827272 to your computer and use it in GitHub Desktop.
Download ZIP
clojure sha1 hash
Raw
sha1-hash.clj
(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
(Integer/toString
(+ (bit-and % 0xff) 0x100) 16) 1)
data-bytes)
))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment