amazonka-kms 0.0.0 → 0.0.1

raw patch · 6 files changed

+35/−23 lines, 6 filesdep ~amazonka-corePVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-kms.cabal +3/−3
• gen/Network/AWS/KMS/CreateGrant.hs +3/−3
• gen/Network/AWS/KMS/CreateKey.hs +4/−4
• gen/Network/AWS/KMS/GenerateDataKey.hs +3/−3
• gen/Network/AWS/KMS/GenerateDataKeyWithoutPlaintext.hs +3/−3
• gen/Network/AWS/KMS/Types.hs +19/−7

@@ -1,5 +1,5 @@ name:                  amazonka-kms-version:               0.0.0+version:               0.0.1 synopsis:              Amazon Key Management Service SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -69,5 +69,5 @@     other-modules:      build-depends:-          amazonka-core-        , base          >= 4.7 && < 5+          amazonka-core == 0.0.1.*+        , base          >= 4.7     && < 5

@@ -63,7 +63,7 @@     , _cgGrantTokens       :: List "GrantTokens" Text     , _cgGranteePrincipal  :: Text     , _cgKeyId             :: Text-    , _cgOperations        :: List "Operations" Text+    , _cgOperations        :: List "Operations" GrantOperation     , _cgRetiringPrincipal :: Maybe Text     } deriving (Eq, Show) @@ -79,7 +79,7 @@ -- -- * 'cgKeyId' @::@ 'Text' ----- * 'cgOperations' @::@ ['Text']+-- * 'cgOperations' @::@ ['GrantOperation'] -- -- * 'cgRetiringPrincipal' @::@ 'Maybe' 'Text' --@@ -118,7 +118,7 @@ -- | List of operations permitted by the grant. This can be any combination of -- one or more of the following values: Decrypt Encrypt GenerateDataKey -- GenerateDataKeyWithoutPlaintext ReEncryptFrom ReEncryptTo CreateGrant.-cgOperations :: Lens' CreateGrant [Text]+cgOperations :: Lens' CreateGrant [GrantOperation] cgOperations = lens _cgOperations (\s a -> s { _cgOperations = a }) . _List  -- | Principal given permission to retire the grant. For more information, see

@@ -53,9 +53,9 @@  data CreateKey = CreateKey     { _ckDescription :: Maybe Text-    , _ckKeyUsage    :: Maybe Text+    , _ckKeyUsage    :: Maybe KeyUsageType     , _ckPolicy      :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Show)  -- | 'CreateKey' constructor. --@@ -63,7 +63,7 @@ -- -- * 'ckDescription' @::@ 'Maybe' 'Text' ----- * 'ckKeyUsage' @::@ 'Maybe' 'Text'+-- * 'ckKeyUsage' @::@ 'Maybe' 'KeyUsageType' -- -- * 'ckPolicy' @::@ 'Maybe' 'Text' --@@ -82,7 +82,7 @@ -- | Specifies the intended use of the key. Currently this defaults to -- ENCRYPT/DECRYPT, and only symmetric encryption and decryption are -- supported.-ckKeyUsage :: Lens' CreateKey (Maybe Text)+ckKeyUsage :: Lens' CreateKey (Maybe KeyUsageType) ckKeyUsage = lens _ckKeyUsage (\s a -> s { _ckKeyUsage = a })  -- | Policy to be attached to the key. This is required and delegates back to

@@ -56,7 +56,7 @@     { _gdkEncryptionContext :: Map Text Text     , _gdkGrantTokens       :: List "GrantTokens" Text     , _gdkKeyId             :: Text-    , _gdkKeySpec           :: Maybe Text+    , _gdkKeySpec           :: Maybe DataKeySpec     , _gdkNumberOfBytes     :: Maybe Nat     } deriving (Eq, Show) @@ -70,7 +70,7 @@ -- -- * 'gdkKeyId' @::@ 'Text' ----- * 'gdkKeySpec' @::@ 'Maybe' 'Text'+-- * 'gdkKeySpec' @::@ 'Maybe' 'DataKeySpec' -- -- * 'gdkNumberOfBytes' @::@ 'Maybe' 'Natural' --@@ -105,7 +105,7 @@  -- | Value that identifies the encryption algorithm and key size to generate a -- data key for. Currently this can be AES_128 or AES_256.-gdkKeySpec :: Lens' GenerateDataKey (Maybe Text)+gdkKeySpec :: Lens' GenerateDataKey (Maybe DataKeySpec) gdkKeySpec = lens _gdkKeySpec (\s a -> s { _gdkKeySpec = a })  -- | Integer that contains the number of bytes to generate. Common values are

@@ -55,7 +55,7 @@     { _gdkwpEncryptionContext :: Map Text Text     , _gdkwpGrantTokens       :: List "GrantTokens" Text     , _gdkwpKeyId             :: Text-    , _gdkwpKeySpec           :: Maybe Text+    , _gdkwpKeySpec           :: Maybe DataKeySpec     , _gdkwpNumberOfBytes     :: Maybe Nat     } deriving (Eq, Show) @@ -69,7 +69,7 @@ -- -- * 'gdkwpKeyId' @::@ 'Text' ----- * 'gdkwpKeySpec' @::@ 'Maybe' 'Text'+-- * 'gdkwpKeySpec' @::@ 'Maybe' 'DataKeySpec' -- -- * 'gdkwpNumberOfBytes' @::@ 'Maybe' 'Natural' --@@ -102,7 +102,7 @@  -- | Value that identifies the encryption algorithm and key size. Currently -- this can be AES_128 or AES_256.-gdkwpKeySpec :: Lens' GenerateDataKeyWithoutPlaintext (Maybe Text)+gdkwpKeySpec :: Lens' GenerateDataKeyWithoutPlaintext (Maybe DataKeySpec) gdkwpKeySpec = lens _gdkwpKeySpec (\s a -> s { _gdkwpKeySpec = a })  -- | Integer that contains the number of bytes to generate. Common values are

@@ -113,6 +113,10 @@ instance ToText KeyUsageType where     toText EncryptDecrypt = "ENCRYPT_DECRYPT" +instance ToByteString KeyUsageType+instance ToHeader     KeyUsageType+instance ToQuery      KeyUsageType+ instance FromJSON KeyUsageType where     parseJSON = parseJSONText "KeyUsageType" @@ -126,8 +130,8 @@     , _kmDescription  :: Maybe Text     , _kmEnabled      :: Maybe Bool     , _kmKeyId        :: Text-    , _kmKeyUsage     :: Maybe Text-    } deriving (Eq, Ord, Show)+    , _kmKeyUsage     :: Maybe KeyUsageType+    } deriving (Eq, Show)  -- | 'KeyMetadata' constructor. --@@ -145,7 +149,7 @@ -- -- * 'kmKeyId' @::@ 'Text' ----- * 'kmKeyUsage' @::@ 'Maybe' 'Text'+-- * 'kmKeyUsage' @::@ 'Maybe' 'KeyUsageType' -- keyMetadata :: Text -- ^ 'kmKeyId'             -> KeyMetadata@@ -184,7 +188,7 @@ kmKeyId = lens _kmKeyId (\s a -> s { _kmKeyId = a })  -- | A value that specifies what operation(s) the key can perform.-kmKeyUsage :: Lens' KeyMetadata (Maybe Text)+kmKeyUsage :: Lens' KeyMetadata (Maybe KeyUsageType) kmKeyUsage = lens _kmKeyUsage (\s a -> s { _kmKeyUsage = a })  instance FromJSON KeyMetadata where@@ -224,6 +228,10 @@         AES128 -> "AES_128"         AES256 -> "AES_256" +instance ToByteString DataKeySpec+instance ToHeader     DataKeySpec+instance ToQuery      DataKeySpec+ instance FromJSON DataKeySpec where     parseJSON = parseJSONText "DataKeySpec" @@ -328,7 +336,7 @@     , _gleGrantId           :: Maybe Text     , _gleGranteePrincipal  :: Maybe Text     , _gleIssuingAccount    :: Maybe Text-    , _gleOperations        :: List "Operations" Text+    , _gleOperations        :: List "Operations" GrantOperation     , _gleRetiringPrincipal :: Maybe Text     } deriving (Eq, Show) @@ -344,7 +352,7 @@ -- -- * 'gleIssuingAccount' @::@ 'Maybe' 'Text' ----- * 'gleOperations' @::@ ['Text']+-- * 'gleOperations' @::@ ['GrantOperation'] -- -- * 'gleRetiringPrincipal' @::@ 'Maybe' 'Text' --@@ -380,7 +388,7 @@ -- | List of operations permitted by the grant. This can be any combination of -- one or more of the following values: Decrypt Encrypt GenerateDataKey -- GenerateDataKeyWithoutPlaintext ReEncryptFrom ReEncryptTo CreateGrant.-gleOperations :: Lens' GrantListEntry [Text]+gleOperations :: Lens' GrantListEntry [GrantOperation] gleOperations = lens _gleOperations (\s a -> s { _gleOperations = a }) . _List  -- | The principal that can retire the account.@@ -440,6 +448,10 @@         GOReEncryptFrom                   -> "ReEncryptFrom"         GOReEncryptTo                     -> "ReEncryptTo"         GORetireGrant                     -> "RetireGrant"++instance ToByteString GrantOperation+instance ToHeader     GrantOperation+instance ToQuery      GrantOperation  instance FromJSON GrantOperation where     parseJSON = parseJSONText "GrantOperation"