amazonka-cloudtrail 1.4.3 → 1.4.4

raw patch · 17 files changed

+125/−31 lines, 17 filesdep ~amazonka-cloudtraildep ~amazonka-coredep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-cloudtrail, amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +2/−2
• amazonka-cloudtrail.cabal +7/−7
• gen/Network/AWS/CloudTrail.hs +5/−1
• gen/Network/AWS/CloudTrail/AddTags.hs +3/−1
• gen/Network/AWS/CloudTrail/CreateTrail.hs +25/−2
• gen/Network/AWS/CloudTrail/DeleteTrail.hs +4/−2
• gen/Network/AWS/CloudTrail/DescribeTrails.hs +6/−1
• gen/Network/AWS/CloudTrail/GetTrailStatus.hs +3/−1
• gen/Network/AWS/CloudTrail/ListTags.hs +3/−3
• gen/Network/AWS/CloudTrail/RemoveTags.hs +3/−1
• gen/Network/AWS/CloudTrail/StartLogging.hs +3/−1
• gen/Network/AWS/CloudTrail/StopLogging.hs +3/−1
• gen/Network/AWS/CloudTrail/Types.hs +15/−2
• gen/Network/AWS/CloudTrail/Types/Product.hs +15/−2
• gen/Network/AWS/CloudTrail/Types/Sum.hs +1/−1
• gen/Network/AWS/CloudTrail/UpdateTrail.hs +27/−3
• src/.gitkeep +0/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.3`+`1.4.4`   ## Description@@ -19,7 +19,7 @@  CloudTrail is a web service that records AWS API calls for your AWS account and delivers log files to an Amazon S3 bucket. The recorded information includes the identity of the user, the start time of the AWS API call, the source IP address, the request parameters, and the response elements returned by the service. -As an alternative to using the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>.+As an alternative to the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>.  See the CloudTrail User Guide for information about the data that is included with each AWS API call listed in the log files. 

@@ -1,5 +1,5 @@ name:                  amazonka-cloudtrail-version:               1.4.3+version:               1.4.4 synopsis:              Amazon CloudTrail SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -11,7 +11,7 @@ category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10-extra-source-files:    README.md fixture/*.yaml fixture/*.proto+extra-source-files:    README.md fixture/*.yaml fixture/*.proto src/.gitkeep description:     AWS CloudTrail @@ -19,7 +19,7 @@      CloudTrail is a web service that records AWS API calls for your AWS account and delivers log files to an Amazon S3 bucket. The recorded information includes the identity of the user, the start time of the AWS API call, the source IP address, the request parameters, and the response elements returned by the service. -    As an alternative to using the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>.+    As an alternative to the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>.      See the CloudTrail User Guide for information about the data that is included with each AWS API call listed in the log files.     .@@ -69,7 +69,7 @@         , Network.AWS.CloudTrail.Types.Sum      build-depends:-          amazonka-core == 1.4.3.*+          amazonka-core == 1.4.4.*         , base          >= 4.7     && < 5  test-suite amazonka-cloudtrail-test@@ -89,9 +89,9 @@         , Test.AWS.CloudTrail.Internal      build-depends:-          amazonka-core == 1.4.3.*-        , amazonka-test == 1.4.3.*-        , amazonka-cloudtrail == 1.4.3.*+          amazonka-core == 1.4.4.*+        , amazonka-test == 1.4.4.*+        , amazonka-cloudtrail == 1.4.4.*         , base         , bytestring         , tasty

@@ -17,7 +17,7 @@ -- -- CloudTrail is a web service that records AWS API calls for your AWS account and delivers log files to an Amazon S3 bucket. The recorded information includes the identity of the user, the start time of the AWS API call, the source IP address, the request parameters, and the response elements returned by the service. ----- As an alternative to using the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>.+-- As an alternative to the API, you can use one of the AWS SDKs, which consist of libraries and sample code for various programming languages and platforms (Java, Ruby, .NET, iOS, Android, etc.). The SDKs provide a convenient way to create programmatic access to AWSCloudTrail. For example, the SDKs take care of cryptographically signing requests, managing errors, and retrying requests automatically. For information about the AWS SDKs, including how to download and install them, see the <http://aws.amazon.com/tools/ Tools for Amazon Web Services page>. -- -- See the CloudTrail User Guide for information about the data that is included with each AWS API call listed in the log files. module Network.AWS.CloudTrail@@ -88,6 +88,9 @@     -- ** InvalidCloudWatchLogsLogGroupARNException     , _InvalidCloudWatchLogsLogGroupARNException +    -- ** KMSException+    , _KMSException+     -- ** S3BucketDoesNotExistException     , _S3BucketDoesNotExistException @@ -219,6 +222,7 @@     , tLogFileValidationEnabled     , tTrailARN     , tS3KeyPrefix+    , tSNSTopicARN     , tSNSTopicName     , tCloudWatchLogsLogGroupARN     , tKMSKeyId

@@ -70,7 +70,9 @@ atTagsList :: Lens' AddTags [Tag] atTagsList = lens _atTagsList (\ s a -> s{_atTagsList = a}) . _Default . _Coerce; --- | Specifies the ARN of the trail to which one or more tags will be added. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the ARN of the trail to which one or more tags will be added. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' atResourceId :: Lens' AddTags Text atResourceId = lens _atResourceId (\ s a -> s{_atResourceId = a}); 

@@ -43,6 +43,7 @@     , ctrsLogFileValidationEnabled     , ctrsTrailARN     , ctrsS3KeyPrefix+    , ctrsSNSTopicARN     , ctrsSNSTopicName     , ctrsCloudWatchLogsLogGroupARN     , ctrsKMSKeyId@@ -141,9 +142,13 @@ -- Examples: -- -- -   alias\/MyAliasName+-- -- -   arn:aws:kms:us-east-1:123456789012:alias\/MyAliasName+-- -- -   arn:aws:kms:us-east-1:123456789012:key\/12345678-1234-1234-1234-123456789012+-- -- -   12345678-1234-1234-1234-123456789012+-- ctKMSKeyId :: Lens' CreateTrail (Maybe Text) ctKMSKeyId = lens _ctKMSKeyId (\ s a -> s{_ctKMSKeyId = a}); @@ -162,10 +167,15 @@ -- | Specifies the name of the trail. The name must meet the following requirements: -- -- -   Contain only ASCII letters (a-z, A-Z), numbers (0-9), periods (.), underscores (_), or dashes (-)+-- -- -   Start with a letter or number, and end with a letter or number+-- -- -   Be between 3 and 128 characters+-- -- -   Have no adjacent periods, underscores or dashes. Names like 'my-_namespace' and 'my--namespace' are invalid.+-- -- -   Not be in IP address format (for example, 192.168.5.4)+-- ctName :: Lens' CreateTrail Text ctName = lens _ctName (\ s a -> s{_ctName = a}); @@ -183,6 +193,7 @@                    (x .?> "LogFileValidationEnabled") <*>                      (x .?> "TrailARN")                      <*> (x .?> "S3KeyPrefix")+                     <*> (x .?> "SnsTopicARN")                      <*> (x .?> "SnsTopicName")                      <*> (x .?> "CloudWatchLogsLogGroupArn")                      <*> (x .?> "KmsKeyId")@@ -239,6 +250,7 @@     { _ctrsLogFileValidationEnabled   :: !(Maybe Bool)     , _ctrsTrailARN                   :: !(Maybe Text)     , _ctrsS3KeyPrefix                :: !(Maybe Text)+    , _ctrsSNSTopicARN                :: !(Maybe Text)     , _ctrsSNSTopicName               :: !(Maybe Text)     , _ctrsCloudWatchLogsLogGroupARN  :: !(Maybe Text)     , _ctrsKMSKeyId                   :: !(Maybe Text)@@ -260,6 +272,8 @@ -- -- * 'ctrsS3KeyPrefix' --+-- * 'ctrsSNSTopicARN'+-- -- * 'ctrsSNSTopicName' -- -- * 'ctrsCloudWatchLogsLogGroupARN'@@ -285,6 +299,7 @@     { _ctrsLogFileValidationEnabled = Nothing     , _ctrsTrailARN = Nothing     , _ctrsS3KeyPrefix = Nothing+    , _ctrsSNSTopicARN = Nothing     , _ctrsSNSTopicName = Nothing     , _ctrsCloudWatchLogsLogGroupARN = Nothing     , _ctrsKMSKeyId = Nothing@@ -300,7 +315,9 @@ ctrsLogFileValidationEnabled :: Lens' CreateTrailResponse (Maybe Bool) ctrsLogFileValidationEnabled = lens _ctrsLogFileValidationEnabled (\ s a -> s{_ctrsLogFileValidationEnabled = a}); --- | Specifies the ARN of the trail that was created.+-- | Specifies the ARN of the trail that was created. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' ctrsTrailARN :: Lens' CreateTrailResponse (Maybe Text) ctrsTrailARN = lens _ctrsTrailARN (\ s a -> s{_ctrsTrailARN = a}); @@ -308,7 +325,13 @@ ctrsS3KeyPrefix :: Lens' CreateTrailResponse (Maybe Text) ctrsS3KeyPrefix = lens _ctrsS3KeyPrefix (\ s a -> s{_ctrsS3KeyPrefix = a}); --- | Specifies the name of the Amazon SNS topic defined for notification of log file delivery.+-- | Specifies the ARN of the Amazon SNS topic that CloudTrail uses to send notifications when log files are delivered. The format of a topic ARN is:+--+-- 'arn:aws:sns:us-east-1:123456789012:MyTopic'+ctrsSNSTopicARN :: Lens' CreateTrailResponse (Maybe Text)+ctrsSNSTopicARN = lens _ctrsSNSTopicARN (\ s a -> s{_ctrsSNSTopicARN = a});++-- | This field is deprecated. Use SnsTopicARN. ctrsSNSTopicName :: Lens' CreateTrailResponse (Maybe Text) ctrsSNSTopicName = lens _ctrsSNSTopicName (\ s a -> s{_ctrsSNSTopicName = a}); 

@@ -41,7 +41,7 @@ import           Network.AWS.Request import           Network.AWS.Response --- | < The request that specifies the name of a trail to delete.>+-- | The request that specifies the name of a trail to delete. -- -- /See:/ 'deleteTrail' smart constructor. newtype DeleteTrail = DeleteTrail'@@ -61,7 +61,9 @@     { _dtName = pName_     } --- | Specifies the name or the CloudTrail ARN of the trail to be deleted. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the name or the CloudTrail ARN of the trail to be deleted. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' dtName :: Lens' DeleteTrail Text dtName = lens _dtName (\ s a -> s{_dtName = a}); 

@@ -70,9 +70,14 @@ dtIncludeShadowTrails :: Lens' DescribeTrails (Maybe Bool) dtIncludeShadowTrails = lens _dtIncludeShadowTrails (\ s a -> s{_dtIncludeShadowTrails = a}); --- | Specifies a list of trail names, trail ARNs, or both, of the trails to describe. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'. If an empty list is specified, information for the trail in the current region is returned.+-- | Specifies a list of trail names, trail ARNs, or both, of the trails to describe. The format of a trail ARN is: --+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'+--+-- If an empty list is specified, information for the trail in the current region is returned.+-- -- -   If an empty list is specified and 'IncludeShadowTrails' is false, then information for all trails in the current region is returned.+-- -- -   If an empty list is specified and IncludeShadowTrails is null or true, then information for all trails in the current region and any associated shadow trails in other regions is returned. -- -- If one or more trail names are specified, information is returned only if the names match the names of trails belonging only to the current region. To return information about a trail in another region, you must specify its trail ARN.

@@ -78,7 +78,9 @@     { _gtsName = pName_     } --- | Specifies the name or the CloudTrail ARN of the trail for which you are requesting status. To get the status of a shadow trail (a replication of the trail in another region), you must specify its ARN. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the name or the CloudTrail ARN of the trail for which you are requesting status. To get the status of a shadow trail (a replication of the trail in another region), you must specify its ARN. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' gtsName :: Lens' GetTrailStatus Text gtsName = lens _gtsName (\ s a -> s{_gtsName = a}); 

@@ -18,8 +18,6 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Lists the tags for the specified trail or trails in the current region.--- -- Lists the tags for the trail in the current region. module Network.AWS.CloudTrail.ListTags     (@@ -73,7 +71,9 @@ ltNextToken :: Lens' ListTags (Maybe Text) ltNextToken = lens _ltNextToken (\ s a -> s{_ltNextToken = a}); --- | Specifies a list of trail ARNs whose tags will be listed. The list has a limit of 20 ARNs. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies a list of trail ARNs whose tags will be listed. The list has a limit of 20 ARNs. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' ltResourceIdList :: Lens' ListTags [Text] ltResourceIdList = lens _ltResourceIdList (\ s a -> s{_ltResourceIdList = a}) . _Coerce; 

@@ -70,7 +70,9 @@ rtTagsList :: Lens' RemoveTags [Tag] rtTagsList = lens _rtTagsList (\ s a -> s{_rtTagsList = a}) . _Default . _Coerce; --- | Specifies the ARN of the trail from which tags should be removed. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the ARN of the trail from which tags should be removed. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' rtResourceId :: Lens' RemoveTags Text rtResourceId = lens _rtResourceId (\ s a -> s{_rtResourceId = a}); 

@@ -61,7 +61,9 @@     { _sName = pName_     } --- | Specifies the name or the CloudTrail ARN of the trail for which CloudTrail logs AWS API calls. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the name or the CloudTrail ARN of the trail for which CloudTrail logs AWS API calls. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' sName :: Lens' StartLogging Text sName = lens _sName (\ s a -> s{_sName = a}); 

@@ -61,7 +61,9 @@     { _slName = pName_     } --- | Specifies the name or the CloudTrail ARN of the trail for which CloudTrail will stop logging AWS API calls. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the name or the CloudTrail ARN of the trail for which CloudTrail will stop logging AWS API calls. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' slName :: Lens' StopLogging Text slName = lens _slName (\ s a -> s{_slName = a}); 

@@ -36,6 +36,7 @@     , _TrailNotProvidedException     , _InvalidS3BucketNameException     , _InvalidCloudWatchLogsLogGroupARNException+    , _KMSException     , _S3BucketDoesNotExistException     , _InvalidNextTokenException     , _InvalidTagParameterException@@ -100,6 +101,7 @@     , tLogFileValidationEnabled     , tTrailARN     , tS3KeyPrefix+    , tSNSTopicARN     , tSNSTopicName     , tCloudWatchLogsLogGroupARN     , tKMSKeyId@@ -171,7 +173,7 @@ _UnsupportedOperationException =     _ServiceError . hasCode "UnsupportedOperationException" --- | This exception is thrown when the KMS key is disabled.+-- | This exception is deprecated. _KMSKeyDisabledException :: AsError a => Getting (First ServiceError) a ServiceError _KMSKeyDisabledException = _ServiceError . hasCode "KmsKeyDisabledException" @@ -195,7 +197,9 @@ _TagsLimitExceededException =     _ServiceError . hasCode "TagsLimitExceededException" --- | This exception is thrown when an operation is called with an invalid trail ARN. The format of a trail ARN is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | This exception is thrown when an operation is called with an invalid trail ARN. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' _CloudTrailARNInvalidException :: AsError a => Getting (First ServiceError) a ServiceError _CloudTrailARNInvalidException =     _ServiceError . hasCode "CloudTrailARNInvalidException"@@ -208,10 +212,15 @@ -- | This exception is thrown when the provided trail name is not valid. Trail names must meet the following requirements: -- -- -   Contain only ASCII letters (a-z, A-Z), numbers (0-9), periods (.), underscores (_), or dashes (-)+-- -- -   Start with a letter or number, and end with a letter or number+-- -- -   Be between 3 and 128 characters+-- -- -   Have no adjacent periods, underscores or dashes. Names like 'my-_namespace' and 'my--namespace' are invalid.+-- -- -   Not be in IP address format (for example, 192.168.5.4)+-- _InvalidTrailNameException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidTrailNameException =     _ServiceError . hasCode "InvalidTrailNameException"@@ -253,6 +262,10 @@ _InvalidCloudWatchLogsLogGroupARNException :: AsError a => Getting (First ServiceError) a ServiceError _InvalidCloudWatchLogsLogGroupARNException =     _ServiceError . hasCode "InvalidCloudWatchLogsLogGroupArnException"++-- | This exception is thrown when there is an issue with the specified KMS key and the trail can’t be updated.+_KMSException :: AsError a => Getting (First ServiceError) a ServiceError+_KMSException = _ServiceError . hasCode "KmsException"  -- | This exception is thrown when the specified S3 bucket does not exist. _S3BucketDoesNotExistException :: AsError a => Getting (First ServiceError) a ServiceError

@@ -349,6 +349,7 @@     { _tLogFileValidationEnabled   :: !(Maybe Bool)     , _tTrailARN                   :: !(Maybe Text)     , _tS3KeyPrefix                :: !(Maybe Text)+    , _tSNSTopicARN                :: !(Maybe Text)     , _tSNSTopicName               :: !(Maybe Text)     , _tCloudWatchLogsLogGroupARN  :: !(Maybe Text)     , _tKMSKeyId                   :: !(Maybe Text)@@ -370,6 +371,8 @@ -- -- * 'tS3KeyPrefix' --+-- * 'tSNSTopicARN'+-- -- * 'tSNSTopicName' -- -- * 'tCloudWatchLogsLogGroupARN'@@ -394,6 +397,7 @@     { _tLogFileValidationEnabled = Nothing     , _tTrailARN = Nothing     , _tS3KeyPrefix = Nothing+    , _tSNSTopicARN = Nothing     , _tSNSTopicName = Nothing     , _tCloudWatchLogsLogGroupARN = Nothing     , _tKMSKeyId = Nothing@@ -409,7 +413,9 @@ tLogFileValidationEnabled :: Lens' Trail (Maybe Bool) tLogFileValidationEnabled = lens _tLogFileValidationEnabled (\ s a -> s{_tLogFileValidationEnabled = a}); --- | The Amazon Resource Name of the trail. The 'TrailARN' format is 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- | Specifies the ARN of the trail. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' tTrailARN :: Lens' Trail (Maybe Text) tTrailARN = lens _tTrailARN (\ s a -> s{_tTrailARN = a}); @@ -417,7 +423,13 @@ tS3KeyPrefix :: Lens' Trail (Maybe Text) tS3KeyPrefix = lens _tS3KeyPrefix (\ s a -> s{_tS3KeyPrefix = a}); --- | Name of the existing Amazon SNS topic that CloudTrail uses to notify the account owner when new CloudTrail log files have been delivered. The maximum length is 256 characters.+-- | Specifies the ARN of the Amazon SNS topic that CloudTrail uses to send notifications when log files are delivered. The format of a topic ARN is:+--+-- 'arn:aws:sns:us-east-1:123456789012:MyTopic'+tSNSTopicARN :: Lens' Trail (Maybe Text)+tSNSTopicARN = lens _tSNSTopicARN (\ s a -> s{_tSNSTopicARN = a});++-- | This field is deprecated. Use SnsTopicARN. tSNSTopicName :: Lens' Trail (Maybe Text) tSNSTopicName = lens _tSNSTopicName (\ s a -> s{_tSNSTopicName = a}); @@ -463,6 +475,7 @@                    (x .:? "LogFileValidationEnabled") <*>                      (x .:? "TrailARN")                      <*> (x .:? "S3KeyPrefix")+                     <*> (x .:? "SnsTopicARN")                      <*> (x .:? "SnsTopicName")                      <*> (x .:? "CloudWatchLogsLogGroupArn")                      <*> (x .:? "KmsKeyId")

@@ -35,7 +35,7 @@         "resourcetype" -> pure ResourceType         "username" -> pure Username         e -> fromTextError $ "Failure parsing LookupAttributeKey from value: '" <> e-           <> "'. Accepted values: EventId, EventName, ResourceName, ResourceType, Username"+           <> "'. Accepted values: eventid, eventname, resourcename, resourcetype, username"  instance ToText LookupAttributeKey where     toText = \case

@@ -43,6 +43,7 @@     , utrsLogFileValidationEnabled     , utrsTrailARN     , utrsS3KeyPrefix+    , utrsSNSTopicARN     , utrsSNSTopicName     , utrsCloudWatchLogsLogGroupARN     , utrsKMSKeyId@@ -140,9 +141,13 @@ -- Examples: -- -- -   alias\/MyAliasName+-- -- -   arn:aws:kms:us-east-1:123456789012:alias\/MyAliasName+-- -- -   arn:aws:kms:us-east-1:123456789012:key\/12345678-1234-1234-1234-123456789012+-- -- -   12345678-1234-1234-1234-123456789012+-- utKMSKeyId :: Lens' UpdateTrail (Maybe Text) utKMSKeyId = lens _utKMSKeyId (\ s a -> s{_utKMSKeyId = a}); @@ -165,12 +170,18 @@ -- | Specifies the name of the trail or trail ARN. If 'Name' is a trail name, the string must meet the following requirements: -- -- -   Contain only ASCII letters (a-z, A-Z), numbers (0-9), periods (.), underscores (_), or dashes (-)+-- -- -   Start with a letter or number, and end with a letter or number+-- -- -   Be between 3 and 128 characters+-- -- -   Have no adjacent periods, underscores or dashes. Names like 'my-_namespace' and 'my--namespace' are invalid.+-- -- -   Not be in IP address format (for example, 192.168.5.4) ----- If 'Name' is a trail ARN, it must be in the format 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail'.+-- If 'Name' is a trail ARN, it must be in the format:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' utName :: Lens' UpdateTrail Text utName = lens _utName (\ s a -> s{_utName = a}); @@ -184,6 +195,7 @@                    (x .?> "LogFileValidationEnabled") <*>                      (x .?> "TrailARN")                      <*> (x .?> "S3KeyPrefix")+                     <*> (x .?> "SnsTopicARN")                      <*> (x .?> "SnsTopicName")                      <*> (x .?> "CloudWatchLogsLogGroupArn")                      <*> (x .?> "KmsKeyId")@@ -240,6 +252,7 @@     { _utrsLogFileValidationEnabled   :: !(Maybe Bool)     , _utrsTrailARN                   :: !(Maybe Text)     , _utrsS3KeyPrefix                :: !(Maybe Text)+    , _utrsSNSTopicARN                :: !(Maybe Text)     , _utrsSNSTopicName               :: !(Maybe Text)     , _utrsCloudWatchLogsLogGroupARN  :: !(Maybe Text)     , _utrsKMSKeyId                   :: !(Maybe Text)@@ -261,6 +274,8 @@ -- -- * 'utrsS3KeyPrefix' --+-- * 'utrsSNSTopicARN'+-- -- * 'utrsSNSTopicName' -- -- * 'utrsCloudWatchLogsLogGroupARN'@@ -286,6 +301,7 @@     { _utrsLogFileValidationEnabled = Nothing     , _utrsTrailARN = Nothing     , _utrsS3KeyPrefix = Nothing+    , _utrsSNSTopicARN = Nothing     , _utrsSNSTopicName = Nothing     , _utrsCloudWatchLogsLogGroupARN = Nothing     , _utrsKMSKeyId = Nothing@@ -301,7 +317,9 @@ utrsLogFileValidationEnabled :: Lens' UpdateTrailResponse (Maybe Bool) utrsLogFileValidationEnabled = lens _utrsLogFileValidationEnabled (\ s a -> s{_utrsLogFileValidationEnabled = a}); --- | Specifies the ARN of the trail that was updated.+-- | Specifies the ARN of the trail that was updated. The format of a trail ARN is:+--+-- 'arn:aws:cloudtrail:us-east-1:123456789012:trail\/MyTrail' utrsTrailARN :: Lens' UpdateTrailResponse (Maybe Text) utrsTrailARN = lens _utrsTrailARN (\ s a -> s{_utrsTrailARN = a}); @@ -309,7 +327,13 @@ utrsS3KeyPrefix :: Lens' UpdateTrailResponse (Maybe Text) utrsS3KeyPrefix = lens _utrsS3KeyPrefix (\ s a -> s{_utrsS3KeyPrefix = a}); --- | Specifies the name of the Amazon SNS topic defined for notification of log file delivery.+-- | Specifies the ARN of the Amazon SNS topic that CloudTrail uses to send notifications when log files are delivered. The format of a topic ARN is:+--+-- 'arn:aws:sns:us-east-1:123456789012:MyTopic'+utrsSNSTopicARN :: Lens' UpdateTrailResponse (Maybe Text)+utrsSNSTopicARN = lens _utrsSNSTopicARN (\ s a -> s{_utrsSNSTopicARN = a});++-- | This field is deprecated. Use SnsTopicARN. utrsSNSTopicName :: Lens' UpdateTrailResponse (Maybe Text) utrsSNSTopicName = lens _utrsSNSTopicName (\ s a -> s{_utrsSNSTopicName = a});