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.
This commit is contained in:
parent
6883c17d62
commit
ac9807c887
4 changed files with 53 additions and 46 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue