diff options
Diffstat (limited to 'Codec/Encryption/OpenPGP/ASCIIArmor/Types.hs')
-rw-r--r-- | Codec/Encryption/OpenPGP/ASCIIArmor/Types.hs | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/Codec/Encryption/OpenPGP/ASCIIArmor/Types.hs b/Codec/Encryption/OpenPGP/ASCIIArmor/Types.hs new file mode 100644 index 0000000..8c7ef6f --- /dev/null +++ b/Codec/Encryption/OpenPGP/ASCIIArmor/Types.hs | |||
@@ -0,0 +1,23 @@ | |||
1 | -- ASCIIArmor/Decode.hs: OpenPGP (RFC4880) ASCII armor implementation | ||
2 | -- Copyright Ⓒ 2012 Clint Adams | ||
3 | -- This software is released under the terms of the ISC license. | ||
4 | -- (See the LICENSE file). | ||
5 | |||
6 | module Codec.Encryption.OpenPGP.ASCIIArmor.Types ( | ||
7 | Armor(..) | ||
8 | , ArmorType(..) | ||
9 | ) where | ||
10 | |||
11 | import Data.ByteString (ByteString) | ||
12 | |||
13 | data Armor a = Armor (ArmorType a) [(String, String)] ByteString | ||
14 | | ClearSigned [(String, String)] String (Armor a) | ||
15 | deriving (Show, Eq) | ||
16 | |||
17 | data ArmorType a = ArmorMessage | ||
18 | | ArmorPublicKeyBlock | ||
19 | | ArmorPrivateKeyBlock | ||
20 | | ArmorSplitMessage a a | ||
21 | | ArmorSplitMessageIndefinite a | ||
22 | | ArmorSignature | ||
23 | deriving (Show, Eq) | ||