diff options
author | guilhem <guilhem@fripost.org> | 2013-09-05 08:09:39 +0200 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-09-05 11:09:08 -0400 |
commit | 217b0d3794ea466c64654b3bd91bbfb55cc40248 (patch) | |
tree | 8194c96ab756248f8f8e4cfb47a4c4fcfb3d9afe /Types/Crypto.hs | |
parent | ab2aacb24de0d411e96aee0fab056469b071c26c (diff) |
Leverage an ambiguities between Ciphers
Cipher is now a datatype
data Cipher = Cipher String | MacOnlyCipher String
which makes more precise its interpretation MAC-only vs. MAC + used to
derive a key for symmetric crypto.
Diffstat (limited to 'Types/Crypto.hs')
-rw-r--r-- | Types/Crypto.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Types/Crypto.hs b/Types/Crypto.hs index 8a15ead16..487a29391 100644 --- a/Types/Crypto.hs +++ b/Types/Crypto.hs @@ -23,7 +23,7 @@ import Data.Digest.Pure.SHA import Utility.Gpg (KeyIds(..)) -- XXX ideally, this would be a locked memory region -newtype Cipher = Cipher String +data Cipher = Cipher String | MacOnlyCipher String data StorableCipher = EncryptedCipher String EncryptedCipherVariant KeyIds | SharedCipher String |