diff options
| author |  Benjamin Barenblat <bbaren@google.com> | 2018-07-31 17:48:05 -0400 |
|---|---|---|
| committer | Benjamin Barenblat <bbaren@google.com> | 2018-07-31 17:48:05 -0400 |
| commit | c6466a719d784054a82578c619e7dfff613e777b (patch) | |
| tree | ba9c39dc8239f0d73b1742ff012282dc9b06e677 /src/Data | |
| parent | 4256d1812062d566163e5797c75e4ede57669a7e (diff) | |
Begin implementing HKDF
Implement the `extract` phase of HKDF.
Diffstat (limited to 'src/Data')
| -rw-r--r-- | src/Data/HMAC.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/Data/HMAC.hs b/src/Data/HMAC.hs index 4c424be..85e6886 100644 --- a/src/Data/HMAC.hs +++ b/src/Data/HMAC.hs @@ -31,14 +31,10 @@ import Data.Digest.Internal import Foreign.Ptr.ConstantTimeEquals (constantTimeEquals) import Internal.Base import Internal.HMAC +import Types (SecretKey(SecretKey)) type LazyByteString = ByteString.Lazy.ByteString --- | A secret key used as input to a cipher or HMAC. Equality comparisons on --- this type are variable-time. -newtype SecretKey = SecretKey ByteString - deriving (Eq, Ord, Show) - -- | A hash-based message authentication code. Equality comparisons on this type -- are constant-time. newtype HMAC = HMAC ByteString |