From 730c54a40681776aaaab1b727af42559cf1592fe Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 7 Aug 2016 19:18:52 -0400 Subject: serialization for tunings --- Types.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'Types.hs') diff --git a/Types.hs b/Types.hs index 7873175..41c3a00 100644 --- a/Types.hs +++ b/Types.hs @@ -42,12 +42,15 @@ data Tunables = Tunables -- | An expensive hash, used to make it hard to crack an encrypted secret key. data ExpensiveHashTunable = UseArgon2 Argon2.HashOptions (Cost CreationOp) + deriving (Show) -- | What encryption to use. data EncryptionTunable = UseAES256 + deriving (Show) -- | An additional puzzle that makes decryption more expensive. data DecryptionPuzzleTunable = KeyBlindingLeftSide (Cost DecryptionOp) + deriving (Show) defaultTunables :: Tunables defaultTunables = Tunables -- cgit v1.2.3