amazonka-rds 1.4.0 → 1.4.1

raw patch · 84 files changed

+825/−76 lines, 84 filesdep ~amazonka-coredep ~amazonka-rdsdep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

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

API changes (from Hackage documentation)

Files

• README.md +41/−19
• amazonka-rds.cabal +45/−23
• gen/Network/AWS/RDS.hs +55/−18
• gen/Network/AWS/RDS/AddSourceIdentifierToSubscription.hs +5/−0
• gen/Network/AWS/RDS/AddTagsToResource.hs +4/−0
• gen/Network/AWS/RDS/ApplyPendingMaintenanceAction.hs +6/−0
• gen/Network/AWS/RDS/AuthorizeDBSecurityGroupIngress.hs +5/−0
• gen/Network/AWS/RDS/CopyDBClusterSnapshot.hs +4/−0
• gen/Network/AWS/RDS/CopyDBParameterGroup.hs +4/−0
• gen/Network/AWS/RDS/CopyDBSnapshot.hs +5/−1
• gen/Network/AWS/RDS/CopyOptionGroup.hs +4/−0
• gen/Network/AWS/RDS/CreateDBCluster.hs +4/−2
• gen/Network/AWS/RDS/CreateDBClusterParameterGroup.hs +4/−0
• gen/Network/AWS/RDS/CreateDBClusterSnapshot.hs +4/−0
• gen/Network/AWS/RDS/CreateDBInstance.hs +43/−2
• gen/Network/AWS/RDS/CreateDBInstanceReadReplica.hs +4/−0
• gen/Network/AWS/RDS/CreateDBParameterGroup.hs +4/−0
• gen/Network/AWS/RDS/CreateDBSecurityGroup.hs +4/−0
• gen/Network/AWS/RDS/CreateDBSnapshot.hs +4/−0
• gen/Network/AWS/RDS/CreateDBSubnetGroup.hs +4/−0
• gen/Network/AWS/RDS/CreateEventSubscription.hs +4/−0
• gen/Network/AWS/RDS/CreateOptionGroup.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBCluster.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBClusterParameterGroup.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBClusterSnapshot.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBInstance.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBParameterGroup.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBSecurityGroup.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBSnapshot.hs +4/−0
• gen/Network/AWS/RDS/DeleteDBSubnetGroup.hs +6/−0
• gen/Network/AWS/RDS/DeleteEventSubscription.hs +4/−0
• gen/Network/AWS/RDS/DeleteOptionGroup.hs +4/−0
• gen/Network/AWS/RDS/DescribeAccountAttributes.hs +4/−0
• gen/Network/AWS/RDS/DescribeCertificates.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBClusterParameterGroups.hs +5/−0
• gen/Network/AWS/RDS/DescribeDBClusterParameters.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBClusterSnapshots.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBClusters.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBEngineVersions.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBInstances.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBLogFiles.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBParameterGroups.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBParameters.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBSecurityGroups.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBSnapshotAttributes.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBSnapshots.hs +4/−0
• gen/Network/AWS/RDS/DescribeDBSubnetGroups.hs +4/−0
• gen/Network/AWS/RDS/DescribeEngineDefaultClusterParameters.hs +6/−0
• gen/Network/AWS/RDS/DescribeEngineDefaultParameters.hs +5/−0
• gen/Network/AWS/RDS/DescribeEventCategories.hs +4/−0
• gen/Network/AWS/RDS/DescribeEventSubscriptions.hs +4/−0
• gen/Network/AWS/RDS/DescribeEvents.hs +4/−0
• gen/Network/AWS/RDS/DescribeOptionGroupOptions.hs +4/−0
• gen/Network/AWS/RDS/DescribeOptionGroups.hs +4/−0
• gen/Network/AWS/RDS/DescribeOrderableDBInstanceOptions.hs +5/−0
• gen/Network/AWS/RDS/DescribePendingMaintenanceActions.hs +5/−0
• gen/Network/AWS/RDS/DescribeReservedDBInstances.hs +4/−0
• gen/Network/AWS/RDS/DescribeReservedDBInstancesOfferings.hs +5/−0
• gen/Network/AWS/RDS/DownloadDBLogFilePortion.hs +6/−1
• gen/Network/AWS/RDS/FailoverDBCluster.hs +4/−0
• gen/Network/AWS/RDS/ListTagsForResource.hs +4/−0
• gen/Network/AWS/RDS/ModifyDBCluster.hs +13/−3
• gen/Network/AWS/RDS/ModifyDBClusterParameterGroup.hs +2/−0
• gen/Network/AWS/RDS/ModifyDBInstance.hs +48/−0
• gen/Network/AWS/RDS/ModifyDBParameterGroup.hs +2/−0
• gen/Network/AWS/RDS/ModifyDBSnapshotAttribute.hs +4/−0
• gen/Network/AWS/RDS/ModifyDBSubnetGroup.hs +5/−1
• gen/Network/AWS/RDS/ModifyEventSubscription.hs +4/−0
• gen/Network/AWS/RDS/ModifyOptionGroup.hs +4/−0
• gen/Network/AWS/RDS/PromoteReadReplica.hs +4/−0
• gen/Network/AWS/RDS/PurchaseReservedDBInstancesOffering.hs +5/−0
• gen/Network/AWS/RDS/RebootDBInstance.hs +4/−0
• gen/Network/AWS/RDS/RemoveSourceIdentifierFromSubscription.hs +6/−0
• gen/Network/AWS/RDS/RemoveTagsFromResource.hs +4/−0
• gen/Network/AWS/RDS/ResetDBClusterParameterGroup.hs +2/−0
• gen/Network/AWS/RDS/ResetDBParameterGroup.hs +2/−0
• gen/Network/AWS/RDS/RestoreDBClusterFromSnapshot.hs +4/−0
• gen/Network/AWS/RDS/RestoreDBClusterToPointInTime.hs +4/−0
• gen/Network/AWS/RDS/RestoreDBInstanceFromDBSnapshot.hs +27/−1
• gen/Network/AWS/RDS/RestoreDBInstanceToPointInTime.hs +27/−1
• gen/Network/AWS/RDS/RevokeDBSecurityGroupIngress.hs +4/−0
• gen/Network/AWS/RDS/Types.hs +19/−0
• gen/Network/AWS/RDS/Types/Product.hs +201/−4
• gen/Network/AWS/RDS/Types/Sum.hs +2/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.0`+`1.4.1`   ## Description@@ -23,25 +23,47 @@ applications and businesses unique.  Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,-PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.-This means the code, applications, and tools you already use today with-your existing databases work with Amazon RDS without modification.-Amazon RDS automatically backs up your database and maintains the-database software that powers your DB instance. Amazon RDS is flexible:-you can scale your database instance\'s compute resources and storage-capacity to meet your application\'s demand. As with all Amazon Web-Services, there are no up-front investments, and you pay only for the-resources you use.+PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database+server. These capabilities mean that the code, applications, and tools+you already use today with your existing databases work with Amazon RDS+without modification. Amazon RDS automatically backs up your database+and maintains the database software that powers your DB instance. Amazon+RDS is flexible: you can scale your database instance\'s compute+resources and storage capacity to meet your application\'s demand. As+with all Amazon Web Services, there are no up-front investments, and you+pay only for the resources you use. -This is an interface reference for Amazon RDS. It contains documentation-for a programming or command line interface you can use to manage Amazon-RDS. Note that Amazon RDS is asynchronous, which means that some-interfaces might require techniques such as polling or callback-functions to determine when a command has been applied. In this-reference, the parameter descriptions indicate whether a command is-applied immediately, on the next instance reboot, or during the-maintenance window. For a summary of the Amazon RDS interfaces, go to-<http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.+This interface reference for Amazon RDS contains documentation for a+programming or command line interface you can use to manage Amazon RDS.+Note that Amazon RDS is asynchronous, which means that some interfaces+might require techniques such as polling or callback functions to+determine when a command has been applied. In this reference, the+parameter descriptions indicate whether a command is applied+immediately, on the next instance reboot, or during the maintenance+window. The reference structure is as follows, and we list following+some related topics from the user guide.++__Amazon RDS API Reference__++-   For the alphabetical list of API actions, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.++-   For the alphabetical list of data types, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.++-   For a list of common query parameters, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.++-   For descriptions of the error codes, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.++__Amazon RDS User Guide__++-   For a summary of the Amazon RDS interfaces, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.++-   For more information about how to use the Query API, see+    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.  Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-rds) and the [AWS API Reference](https://aws.amazon.com/documentation/).

@@ -1,5 +1,5 @@ name:                  amazonka-rds-version:               1.4.0+version:               1.4.1 synopsis:              Amazon Relational Database Service SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -23,25 +23,47 @@     applications and businesses unique.      Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,-    PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.-    This means the code, applications, and tools you already use today with-    your existing databases work with Amazon RDS without modification.-    Amazon RDS automatically backs up your database and maintains the-    database software that powers your DB instance. Amazon RDS is flexible:-    you can scale your database instance\'s compute resources and storage-    capacity to meet your application\'s demand. As with all Amazon Web-    Services, there are no up-front investments, and you pay only for the-    resources you use.+    PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database+    server. These capabilities mean that the code, applications, and tools+    you already use today with your existing databases work with Amazon RDS+    without modification. Amazon RDS automatically backs up your database+    and maintains the database software that powers your DB instance. Amazon+    RDS is flexible: you can scale your database instance\'s compute+    resources and storage capacity to meet your application\'s demand. As+    with all Amazon Web Services, there are no up-front investments, and you+    pay only for the resources you use. -    This is an interface reference for Amazon RDS. It contains documentation-    for a programming or command line interface you can use to manage Amazon-    RDS. Note that Amazon RDS is asynchronous, which means that some-    interfaces might require techniques such as polling or callback-    functions to determine when a command has been applied. In this-    reference, the parameter descriptions indicate whether a command is-    applied immediately, on the next instance reboot, or during the-    maintenance window. For a summary of the Amazon RDS interfaces, go to-    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.+    This interface reference for Amazon RDS contains documentation for a+    programming or command line interface you can use to manage Amazon RDS.+    Note that Amazon RDS is asynchronous, which means that some interfaces+    might require techniques such as polling or callback functions to+    determine when a command has been applied. In this reference, the+    parameter descriptions indicate whether a command is applied+    immediately, on the next instance reboot, or during the maintenance+    window. The reference structure is as follows, and we list following+    some related topics from the user guide.++    __Amazon RDS API Reference__++    -   For the alphabetical list of API actions, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.++    -   For the alphabetical list of data types, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.++    -   For a list of common query parameters, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.++    -   For descriptions of the error codes, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.++    __Amazon RDS User Guide__++    -   For a summary of the Amazon RDS interfaces, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.++    -   For more information about how to use the Query API, see+        <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.     .     The types from this library are intended to be used with     <http://hackage.haskell.org/package/amazonka amazonka>, which provides@@ -155,7 +177,7 @@         , Network.AWS.RDS.Types.Sum      build-depends:-          amazonka-core == 1.4.0.*+          amazonka-core == 1.4.1.*         , base          >= 4.7     && < 5  test-suite amazonka-rds-test@@ -175,9 +197,9 @@         , Test.AWS.RDS.Internal      build-depends:-          amazonka-core == 1.4.0.*-        , amazonka-test == 1.4.0.*-        , amazonka-rds == 1.4.0.*+          amazonka-core == 1.4.1.*+        , amazonka-test == 1.4.1.*+        , amazonka-rds == 1.4.1.*         , base         , bytestring         , tasty

@@ -21,25 +21,48 @@ -- applications and businesses unique. -- -- Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,--- PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.--- This means the code, applications, and tools you already use today with--- your existing databases work with Amazon RDS without modification.--- Amazon RDS automatically backs up your database and maintains the--- database software that powers your DB instance. Amazon RDS is flexible:--- you can scale your database instance\'s compute resources and storage--- capacity to meet your application\'s demand. As with all Amazon Web--- Services, there are no up-front investments, and you pay only for the--- resources you use.+-- PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database+-- server. These capabilities mean that the code, applications, and tools+-- you already use today with your existing databases work with Amazon RDS+-- without modification. Amazon RDS automatically backs up your database+-- and maintains the database software that powers your DB instance. Amazon+-- RDS is flexible: you can scale your database instance\'s compute+-- resources and storage capacity to meet your application\'s demand. As+-- with all Amazon Web Services, there are no up-front investments, and you+-- pay only for the resources you use. ----- This is an interface reference for Amazon RDS. It contains documentation--- for a programming or command line interface you can use to manage Amazon--- RDS. Note that Amazon RDS is asynchronous, which means that some--- interfaces might require techniques such as polling or callback--- functions to determine when a command has been applied. In this--- reference, the parameter descriptions indicate whether a command is--- applied immediately, on the next instance reboot, or during the--- maintenance window. For a summary of the Amazon RDS interfaces, go to--- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.+-- This interface reference for Amazon RDS contains documentation for a+-- programming or command line interface you can use to manage Amazon RDS.+-- Note that Amazon RDS is asynchronous, which means that some interfaces+-- might require techniques such as polling or callback functions to+-- determine when a command has been applied. In this reference, the+-- parameter descriptions indicate whether a command is applied+-- immediately, on the next instance reboot, or during the maintenance+-- window. The reference structure is as follows, and we list following+-- some related topics from the user guide.+--+-- __Amazon RDS API Reference__+--+-- -   For the alphabetical list of API actions, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.+--+-- -   For the alphabetical list of data types, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.+--+-- -   For a list of common query parameters, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.+--+-- -   For descriptions of the error codes, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.+--+-- __Amazon RDS User Guide__+--+-- -   For a summary of the Amazon RDS interfaces, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.+--+-- -   For more information about how to use the Query API, see+--     <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.+-- module Network.AWS.RDS     (     -- * Service Configuration@@ -165,6 +188,9 @@     -- ** InstanceQuotaExceededFault     , _InstanceQuotaExceededFault +    -- ** DomainNotFoundFault+    , _DomainNotFoundFault+     -- ** DBParameterGroupNotFoundFault     , _DBParameterGroupNotFoundFault @@ -578,6 +604,7 @@     -- ** DBClusterMember     , DBClusterMember     , dbClusterMember+    , dcmPromotionTier     , dcmDBInstanceIdentifier     , dcmIsClusterWriter     , dcmDBClusterParameterGroupStatus@@ -652,6 +679,7 @@     , diEngine     , diLatestRestorableTime     , diDBInstanceClass+    , diPromotionTier     , diLicenseModel     , diPreferredMaintenanceWindow     , diCACertificateIdentifier@@ -678,6 +706,7 @@     , diPendingModifiedValues     , diStorageType     , diStatusInfos+    , diDomainMemberships     , diDBName      -- ** DBInstanceStatusInfo@@ -776,6 +805,14 @@     , ddlfdLastWritten     , ddlfdSize     , ddlfdLogFileName++    -- ** DomainMembership+    , DomainMembership+    , domainMembership+    , dmStatus+    , dmFQDN+    , dmDomain+    , dmIAMRoleName      -- ** EC2SecurityGroup     , EC2SecurityGroup

@@ -105,6 +105,8 @@  instance Hashable AddSourceIdentifierToSubscription +instance NFData AddSourceIdentifierToSubscription+ instance ToHeaders AddSourceIdentifierToSubscription          where         toHeaders = const mempty@@ -152,3 +154,6 @@ -- | The response status code. asitsrsResponseStatus :: Lens' AddSourceIdentifierToSubscriptionResponse Int asitsrsResponseStatus = lens _asitsrsResponseStatus (\ s a -> s{_asitsrsResponseStatus = a});++instance NFData+         AddSourceIdentifierToSubscriptionResponse

@@ -87,6 +87,8 @@  instance Hashable AddTagsToResource +instance NFData AddTagsToResource+ instance ToHeaders AddTagsToResource where         toHeaders = const mempty @@ -111,3 +113,5 @@ addTagsToResourceResponse     :: AddTagsToResourceResponse addTagsToResourceResponse = AddTagsToResourceResponse'++instance NFData AddTagsToResourceResponse

@@ -83,6 +83,8 @@ apmaResourceIdentifier = lens _apmaResourceIdentifier (\ s a -> s{_apmaResourceIdentifier = a});  -- | The pending maintenance action to apply to this resource.+--+-- Valid values: 'system-update', 'db-upgrade' apmaApplyAction :: Lens' ApplyPendingMaintenanceAction Text apmaApplyAction = lens _apmaApplyAction (\ s a -> s{_apmaApplyAction = a}); @@ -114,6 +116,8 @@  instance Hashable ApplyPendingMaintenanceAction +instance NFData ApplyPendingMaintenanceAction+ instance ToHeaders ApplyPendingMaintenanceAction          where         toHeaders = const mempty@@ -160,3 +164,5 @@ -- | The response status code. apmarsResponseStatus :: Lens' ApplyPendingMaintenanceActionResponse Int apmarsResponseStatus = lens _apmarsResponseStatus (\ s a -> s{_apmarsResponseStatus = a});++instance NFData ApplyPendingMaintenanceActionResponse

@@ -140,6 +140,8 @@  instance Hashable AuthorizeDBSecurityGroupIngress +instance NFData AuthorizeDBSecurityGroupIngress+ instance ToHeaders AuthorizeDBSecurityGroupIngress          where         toHeaders = const mempty@@ -190,3 +192,6 @@ -- | The response status code. adsgirsResponseStatus :: Lens' AuthorizeDBSecurityGroupIngressResponse Int adsgirsResponseStatus = lens _adsgirsResponseStatus (\ s a -> s{_adsgirsResponseStatus = a});++instance NFData+         AuthorizeDBSecurityGroupIngressResponse

@@ -118,6 +118,8 @@  instance Hashable CopyDBClusterSnapshot +instance NFData CopyDBClusterSnapshot+ instance ToHeaders CopyDBClusterSnapshot where         toHeaders = const mempty @@ -164,3 +166,5 @@ -- | The response status code. cdcsrsResponseStatus :: Lens' CopyDBClusterSnapshotResponse Int cdcsrsResponseStatus = lens _cdcsrsResponseStatus (\ s a -> s{_cdcsrsResponseStatus = a});++instance NFData CopyDBClusterSnapshotResponse

@@ -128,6 +128,8 @@  instance Hashable CopyDBParameterGroup +instance NFData CopyDBParameterGroup+ instance ToHeaders CopyDBParameterGroup where         toHeaders = const mempty @@ -176,3 +178,5 @@ -- | The response status code. cdbpgrsResponseStatus :: Lens' CopyDBParameterGroupResponse Int cdbpgrsResponseStatus = lens _cdbpgrsResponseStatus (\ s a -> s{_cdbpgrsResponseStatus = a});++instance NFData CopyDBParameterGroupResponse

@@ -18,7 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Copies the specified DB Snapshot. The source DB snapshot must be in the+-- Copies the specified DB snapshot. The source DB snapshot must be in the -- \"available\" state. -- -- If you are copying from a shared manual DB snapshot, the@@ -160,6 +160,8 @@  instance Hashable CopyDBSnapshot +instance NFData CopyDBSnapshot+ instance ToHeaders CopyDBSnapshot where         toHeaders = const mempty @@ -208,3 +210,5 @@ -- | The response status code. cdsrsResponseStatus :: Lens' CopyDBSnapshotResponse Int cdsrsResponseStatus = lens _cdsrsResponseStatus (\ s a -> s{_cdsrsResponseStatus = a});++instance NFData CopyDBSnapshotResponse

@@ -127,6 +127,8 @@  instance Hashable CopyOptionGroup +instance NFData CopyOptionGroup+ instance ToHeaders CopyOptionGroup where         toHeaders = const mempty @@ -175,3 +177,5 @@ -- | The response status code. cogrsResponseStatus :: Lens' CopyOptionGroupResponse Int cogrsResponseStatus = lens _cogrsResponseStatus (\ s a -> s{_cogrsResponseStatus = a});++instance NFData CopyOptionGroupResponse

@@ -175,8 +175,6 @@ -- Constraints: Must contain no more than 255 alphanumeric characters, -- periods, underscores, spaces, or hyphens. Must not be default. ----- +--- -- Example: 'mySubnetgroup' cdcDBSubnetGroupName :: Lens' CreateDBCluster (Maybe Text) cdcDBSubnetGroupName = lens _cdcDBSubnetGroupName (\ s a -> s{_cdcDBSubnetGroupName = a});@@ -343,6 +341,8 @@  instance Hashable CreateDBCluster +instance NFData CreateDBCluster+ instance ToHeaders CreateDBCluster where         toHeaders = const mempty @@ -411,3 +411,5 @@ -- | The response status code. cdcrsResponseStatus :: Lens' CreateDBClusterResponse Int cdcrsResponseStatus = lens _cdcrsResponseStatus (\ s a -> s{_cdcrsResponseStatus = a});++instance NFData CreateDBClusterResponse

@@ -152,6 +152,8 @@  instance Hashable CreateDBClusterParameterGroup +instance NFData CreateDBClusterParameterGroup+ instance ToHeaders CreateDBClusterParameterGroup          where         toHeaders = const mempty@@ -201,3 +203,5 @@ -- | The response status code. cdcpgrsResponseStatus :: Lens' CreateDBClusterParameterGroupResponse Int cdcpgrsResponseStatus = lens _cdcpgrsResponseStatus (\ s a -> s{_cdcpgrsResponseStatus = a});++instance NFData CreateDBClusterParameterGroupResponse

@@ -118,6 +118,8 @@  instance Hashable CreateDBClusterSnapshot +instance NFData CreateDBClusterSnapshot+ instance ToHeaders CreateDBClusterSnapshot where         toHeaders = const mempty @@ -164,3 +166,5 @@ -- | The response status code. cdbcsrsResponseStatus :: Lens' CreateDBClusterSnapshotResponse Int cdbcsrsResponseStatus = lens _cdbcsrsResponseStatus (\ s a -> s{_cdbcsrsResponseStatus = a});++instance NFData CreateDBClusterSnapshotResponse

@@ -36,8 +36,10 @@     , cdiDBSubnetGroupName     , cdiMonitoringRoleARN     , cdiIOPS+    , cdiDomain     , cdiMonitoringInterval     , cdiTDECredentialPassword+    , cdiPromotionTier     , cdiLicenseModel     , cdiPreferredMaintenanceWindow     , cdiCharacterSetName@@ -52,6 +54,7 @@     , cdiOptionGroupName     , cdiCopyTagsToSnapshot     , cdiTDECredentialARN+    , cdiDomainIAMRoleName     , cdiTags     , cdiPort     , cdiStorageType@@ -90,8 +93,10 @@     , _cdiDBSubnetGroupName          :: !(Maybe Text)     , _cdiMonitoringRoleARN          :: !(Maybe Text)     , _cdiIOPS                       :: !(Maybe Int)+    , _cdiDomain                     :: !(Maybe Text)     , _cdiMonitoringInterval         :: !(Maybe Int)     , _cdiTDECredentialPassword      :: !(Maybe Text)+    , _cdiPromotionTier              :: !(Maybe Int)     , _cdiLicenseModel               :: !(Maybe Text)     , _cdiPreferredMaintenanceWindow :: !(Maybe Text)     , _cdiCharacterSetName           :: !(Maybe Text)@@ -106,6 +111,7 @@     , _cdiOptionGroupName            :: !(Maybe Text)     , _cdiCopyTagsToSnapshot         :: !(Maybe Bool)     , _cdiTDECredentialARN           :: !(Maybe Text)+    , _cdiDomainIAMRoleName          :: !(Maybe Text)     , _cdiTags                       :: !(Maybe [Tag])     , _cdiPort                       :: !(Maybe Int)     , _cdiStorageType                :: !(Maybe Text)@@ -141,10 +147,14 @@ -- -- * 'cdiIOPS' --+-- * 'cdiDomain'+-- -- * 'cdiMonitoringInterval' -- -- * 'cdiTDECredentialPassword' --+-- * 'cdiPromotionTier'+-- -- * 'cdiLicenseModel' -- -- * 'cdiPreferredMaintenanceWindow'@@ -173,6 +183,8 @@ -- -- * 'cdiTDECredentialARN' --+-- * 'cdiDomainIAMRoleName'+-- -- * 'cdiTags' -- -- * 'cdiPort'@@ -204,8 +216,10 @@     , _cdiDBSubnetGroupName = Nothing     , _cdiMonitoringRoleARN = Nothing     , _cdiIOPS = Nothing+    , _cdiDomain = Nothing     , _cdiMonitoringInterval = Nothing     , _cdiTDECredentialPassword = Nothing+    , _cdiPromotionTier = Nothing     , _cdiLicenseModel = Nothing     , _cdiPreferredMaintenanceWindow = Nothing     , _cdiCharacterSetName = Nothing@@ -220,6 +234,7 @@     , _cdiOptionGroupName = Nothing     , _cdiCopyTagsToSnapshot = Nothing     , _cdiTDECredentialARN = Nothing+    , _cdiDomainIAMRoleName = Nothing     , _cdiTags = Nothing     , _cdiPort = Nothing     , _cdiStorageType = Nothing@@ -246,7 +261,7 @@ -- -   __Version 5.5 (Available in all regions):__ --     ' 5.5.40b | 5.5.41 | 5.5.42' -- -   __Version 5.6 (Available in all regions):__---     ' 5.6.19a | 5.6.19b | 5.6.21 | 5.6.21b | 5.6.22 | 5.6.23'+--     ' 5.6.19a | 5.6.19b | 5.6.21 | 5.6.21b | 5.6.22 | 5.6.23 | 5.6.27' -- -   __Version 5.7 (Available in all regions):__ ' 5.7.10' -- -- __MariaDB__@@ -480,6 +495,10 @@ cdiIOPS :: Lens' CreateDBInstance (Maybe Int) cdiIOPS = lens _cdiIOPS (\ s a -> s{_cdiIOPS = a}); +-- | Specify the Active Directory Domain to create the instance in.+cdiDomain :: Lens' CreateDBInstance (Maybe Text)+cdiDomain = lens _cdiDomain (\ s a -> s{_cdiDomain = a});+ -- | The interval, in seconds, between points when Enhanced Monitoring -- metrics are collected for the DB instance. To disable collecting -- Enhanced Monitoring metrics, specify 0. The default is 60.@@ -496,6 +515,17 @@ cdiTDECredentialPassword :: Lens' CreateDBInstance (Maybe Text) cdiTDECredentialPassword = lens _cdiTDECredentialPassword (\ s a -> s{_cdiTDECredentialPassword = a}); +-- | A value that specifies the order in which an Aurora Replica is promoted+-- to the primary instance after a failure of the existing primary+-- instance. For more information, see+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.+--+-- Default: 1+--+-- Valid Values: 0 - 15+cdiPromotionTier :: Lens' CreateDBInstance (Maybe Int)+cdiPromotionTier = lens _cdiPromotionTier (\ s a -> s{_cdiPromotionTier = a});+ -- | License model information for this DB instance. -- -- Valid values: 'license-included' | 'bring-your-own-license' |@@ -664,6 +694,11 @@ cdiTDECredentialARN :: Lens' CreateDBInstance (Maybe Text) cdiTDECredentialARN = lens _cdiTDECredentialARN (\ s a -> s{_cdiTDECredentialARN = a}); +-- | Specify the name of the IAM role to be used when making API calls to the+-- Directory Service.+cdiDomainIAMRoleName :: Lens' CreateDBInstance (Maybe Text)+cdiDomainIAMRoleName = lens _cdiDomainIAMRoleName (\ s a -> s{_cdiDomainIAMRoleName = a});+ -- | Undocumented member. cdiTags :: Lens' CreateDBInstance [Tag] cdiTags = lens _cdiTags (\ s a -> s{_cdiTags = a}) . _Default . _Coerce;@@ -838,6 +873,8 @@  instance Hashable CreateDBInstance +instance NFData CreateDBInstance+ instance ToHeaders CreateDBInstance where         toHeaders = const mempty @@ -863,9 +900,10 @@                "MasterUsername" =: _cdiMasterUsername,                "DBSubnetGroupName" =: _cdiDBSubnetGroupName,                "MonitoringRoleArn" =: _cdiMonitoringRoleARN,-               "Iops" =: _cdiIOPS,+               "Iops" =: _cdiIOPS, "Domain" =: _cdiDomain,                "MonitoringInterval" =: _cdiMonitoringInterval,                "TdeCredentialPassword" =: _cdiTDECredentialPassword,+               "PromotionTier" =: _cdiPromotionTier,                "LicenseModel" =: _cdiLicenseModel,                "PreferredMaintenanceWindow" =:                  _cdiPreferredMaintenanceWindow,@@ -884,6 +922,7 @@                "OptionGroupName" =: _cdiOptionGroupName,                "CopyTagsToSnapshot" =: _cdiCopyTagsToSnapshot,                "TdeCredentialArn" =: _cdiTDECredentialARN,+               "DomainIAMRoleName" =: _cdiDomainIAMRoleName,                "Tags" =: toQuery (toQueryList "Tag" <$> _cdiTags),                "Port" =: _cdiPort, "StorageType" =: _cdiStorageType,                "DBName" =: _cdiDBName,@@ -920,3 +959,5 @@ -- | The response status code. cdirsResponseStatus :: Lens' CreateDBInstanceResponse Int cdirsResponseStatus = lens _cdirsResponseStatus (\ s a -> s{_cdirsResponseStatus = a});++instance NFData CreateDBInstanceResponse

@@ -313,6 +313,8 @@  instance Hashable CreateDBInstanceReadReplica +instance NFData CreateDBInstanceReadReplica+ instance ToHeaders CreateDBInstanceReadReplica where         toHeaders = const mempty @@ -372,3 +374,5 @@ -- | The response status code. cdirrrsResponseStatus :: Lens' CreateDBInstanceReadReplicaResponse Int cdirrrsResponseStatus = lens _cdirrrsResponseStatus (\ s a -> s{_cdirrrsResponseStatus = a});++instance NFData CreateDBInstanceReadReplicaResponse

@@ -140,6 +140,8 @@  instance Hashable CreateDBParameterGroup +instance NFData CreateDBParameterGroup+ instance ToHeaders CreateDBParameterGroup where         toHeaders = const mempty @@ -187,3 +189,5 @@ -- | The response status code. cdpgrsResponseStatus :: Lens' CreateDBParameterGroupResponse Int cdpgrsResponseStatus = lens _cdpgrsResponseStatus (\ s a -> s{_cdpgrsResponseStatus = a});++instance NFData CreateDBParameterGroupResponse

@@ -109,6 +109,8 @@  instance Hashable CreateDBSecurityGroup +instance NFData CreateDBSecurityGroup+ instance ToHeaders CreateDBSecurityGroup where         toHeaders = const mempty @@ -154,3 +156,5 @@ -- | The response status code. cdbsgrsResponseStatus :: Lens' CreateDBSecurityGroupResponse Int cdbsgrsResponseStatus = lens _cdbsgrsResponseStatus (\ s a -> s{_cdbsgrsResponseStatus = a});++instance NFData CreateDBSecurityGroupResponse

@@ -113,6 +113,8 @@  instance Hashable CreateDBSnapshot +instance NFData CreateDBSnapshot+ instance ToHeaders CreateDBSnapshot where         toHeaders = const mempty @@ -157,3 +159,5 @@ -- | The response status code. cdbsrsResponseStatus :: Lens' CreateDBSnapshotResponse Int cdbsrsResponseStatus = lens _cdbsrsResponseStatus (\ s a -> s{_cdbsrsResponseStatus = a});++instance NFData CreateDBSnapshotResponse

@@ -113,6 +113,8 @@  instance Hashable CreateDBSubnetGroup +instance NFData CreateDBSubnetGroup+ instance ToHeaders CreateDBSubnetGroup where         toHeaders = const mempty @@ -160,3 +162,5 @@ -- | The response status code. cdsgrsResponseStatus :: Lens' CreateDBSubnetGroupResponse Int cdsgrsResponseStatus = lens _cdsgrsResponseStatus (\ s a -> s{_cdsgrsResponseStatus = a});++instance NFData CreateDBSubnetGroupResponse

@@ -184,6 +184,8 @@  instance Hashable CreateEventSubscription +instance NFData CreateEventSubscription+ instance ToHeaders CreateEventSubscription where         toHeaders = const mempty @@ -237,3 +239,5 @@ -- | The response status code. cesrsResponseStatus :: Lens' CreateEventSubscriptionResponse Int cesrsResponseStatus = lens _cesrsResponseStatus (\ s a -> s{_cesrsResponseStatus = a});++instance NFData CreateEventSubscriptionResponse

@@ -126,6 +126,8 @@  instance Hashable CreateOptionGroup +instance NFData CreateOptionGroup+ instance ToHeaders CreateOptionGroup where         toHeaders = const mempty @@ -173,3 +175,5 @@ -- | The response status code. crsResponseStatus :: Lens' CreateOptionGroupResponse Int crsResponseStatus = lens _crsResponseStatus (\ s a -> s{_crsResponseStatus = a});++instance NFData CreateOptionGroupResponse

@@ -128,6 +128,8 @@  instance Hashable DeleteDBCluster +instance NFData DeleteDBCluster+ instance ToHeaders DeleteDBCluster where         toHeaders = const mempty @@ -173,3 +175,5 @@ -- | The response status code. ddbcrsResponseStatus :: Lens' DeleteDBClusterResponse Int ddbcrsResponseStatus = lens _ddbcrsResponseStatus (\ s a -> s{_ddbcrsResponseStatus = a});++instance NFData DeleteDBClusterResponse

@@ -84,6 +84,8 @@  instance Hashable DeleteDBClusterParameterGroup +instance NFData DeleteDBClusterParameterGroup+ instance ToHeaders DeleteDBClusterParameterGroup          where         toHeaders = const mempty@@ -110,3 +112,5 @@ deleteDBClusterParameterGroupResponse     :: DeleteDBClusterParameterGroupResponse deleteDBClusterParameterGroupResponse = DeleteDBClusterParameterGroupResponse'++instance NFData DeleteDBClusterParameterGroupResponse

@@ -88,6 +88,8 @@  instance Hashable DeleteDBClusterSnapshot +instance NFData DeleteDBClusterSnapshot+ instance ToHeaders DeleteDBClusterSnapshot where         toHeaders = const mempty @@ -132,3 +134,5 @@ -- | The response status code. ddcsrsResponseStatus :: Lens' DeleteDBClusterSnapshotResponse Int ddcsrsResponseStatus = lens _ddcsrsResponseStatus (\ s a -> s{_ddcsrsResponseStatus = a});++instance NFData DeleteDBClusterSnapshotResponse

@@ -142,6 +142,8 @@  instance Hashable DeleteDBInstance +instance NFData DeleteDBInstance+ instance ToHeaders DeleteDBInstance where         toHeaders = const mempty @@ -187,3 +189,5 @@ -- | The response status code. ddirsResponseStatus :: Lens' DeleteDBInstanceResponse Int ddirsResponseStatus = lens _ddirsResponseStatus (\ s a -> s{_ddirsResponseStatus = a});++instance NFData DeleteDBInstanceResponse

@@ -79,6 +79,8 @@  instance Hashable DeleteDBParameterGroup +instance NFData DeleteDBParameterGroup+ instance ToHeaders DeleteDBParameterGroup where         toHeaders = const mempty @@ -103,3 +105,5 @@ deleteDBParameterGroupResponse     :: DeleteDBParameterGroupResponse deleteDBParameterGroupResponse = DeleteDBParameterGroupResponse'++instance NFData DeleteDBParameterGroupResponse

@@ -84,6 +84,8 @@  instance Hashable DeleteDBSecurityGroup +instance NFData DeleteDBSecurityGroup+ instance ToHeaders DeleteDBSecurityGroup where         toHeaders = const mempty @@ -107,3 +109,5 @@ deleteDBSecurityGroupResponse     :: DeleteDBSecurityGroupResponse deleteDBSecurityGroupResponse = DeleteDBSecurityGroupResponse'++instance NFData DeleteDBSecurityGroupResponse

@@ -83,6 +83,8 @@  instance Hashable DeleteDBSnapshot +instance NFData DeleteDBSnapshot+ instance ToHeaders DeleteDBSnapshot where         toHeaders = const mempty @@ -125,3 +127,5 @@ -- | The response status code. ddbsrsResponseStatus :: Lens' DeleteDBSnapshotResponse Int ddbsrsResponseStatus = lens _ddbsrsResponseStatus (\ s a -> s{_ddbsrsResponseStatus = a});++instance NFData DeleteDBSnapshotResponse

@@ -66,6 +66,8 @@ -- -- You cannot delete the default subnet group. --+-- Constraints:+-- -- Constraints: Must contain no more than 255 alphanumeric characters, -- periods, underscores, spaces, or hyphens. Must not be default. --@@ -81,6 +83,8 @@  instance Hashable DeleteDBSubnetGroup +instance NFData DeleteDBSubnetGroup+ instance ToHeaders DeleteDBSubnetGroup where         toHeaders = const mempty @@ -104,3 +108,5 @@ deleteDBSubnetGroupResponse     :: DeleteDBSubnetGroupResponse deleteDBSubnetGroupResponse = DeleteDBSubnetGroupResponse'++instance NFData DeleteDBSubnetGroupResponse

@@ -78,6 +78,8 @@  instance Hashable DeleteEventSubscription +instance NFData DeleteEventSubscription+ instance ToHeaders DeleteEventSubscription where         toHeaders = const mempty @@ -121,3 +123,5 @@ -- | The response status code. drsResponseStatus :: Lens' DeleteEventSubscriptionResponse Int drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});++instance NFData DeleteEventSubscriptionResponse

@@ -72,6 +72,8 @@  instance Hashable DeleteOptionGroup +instance NFData DeleteOptionGroup+ instance ToHeaders DeleteOptionGroup where         toHeaders = const mempty @@ -95,3 +97,5 @@ deleteOptionGroupResponse     :: DeleteOptionGroupResponse deleteOptionGroupResponse = DeleteOptionGroupResponse'++instance NFData DeleteOptionGroupResponse

@@ -72,6 +72,8 @@  instance Hashable DescribeAccountAttributes +instance NFData DescribeAccountAttributes+ instance ToHeaders DescribeAccountAttributes where         toHeaders = const mempty @@ -119,3 +121,5 @@ -- | The response status code. daarsResponseStatus :: Lens' DescribeAccountAttributesResponse Int daarsResponseStatus = lens _daarsResponseStatus (\ s a -> s{_daarsResponseStatus = a});++instance NFData DescribeAccountAttributesResponse

@@ -127,6 +127,8 @@  instance Hashable DescribeCertificates +instance NFData DescribeCertificates+ instance ToHeaders DescribeCertificates where         toHeaders = const mempty @@ -185,3 +187,5 @@ -- | The response status code. dcrsResponseStatus :: Lens' DescribeCertificatesResponse Int dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a});++instance NFData DescribeCertificatesResponse

@@ -133,6 +133,8 @@  instance Hashable DescribeDBClusterParameterGroups +instance NFData DescribeDBClusterParameterGroups+ instance ToHeaders DescribeDBClusterParameterGroups          where         toHeaders = const mempty@@ -197,3 +199,6 @@ -- | The response status code. ddcpgrsResponseStatus :: Lens' DescribeDBClusterParameterGroupsResponse Int ddcpgrsResponseStatus = lens _ddcpgrsResponseStatus (\ s a -> s{_ddcpgrsResponseStatus = a});++instance NFData+         DescribeDBClusterParameterGroupsResponse

@@ -142,6 +142,8 @@  instance Hashable DescribeDBClusterParameters +instance NFData DescribeDBClusterParameters+ instance ToHeaders DescribeDBClusterParameters where         toHeaders = const mempty @@ -205,3 +207,5 @@ -- | The response status code. ddcprsResponseStatus :: Lens' DescribeDBClusterParametersResponse Int ddcprsResponseStatus = lens _ddcprsResponseStatus (\ s a -> s{_ddcprsResponseStatus = a});++instance NFData DescribeDBClusterParametersResponse

@@ -163,6 +163,8 @@  instance Hashable DescribeDBClusterSnapshots +instance NFData DescribeDBClusterSnapshots+ instance ToHeaders DescribeDBClusterSnapshots where         toHeaders = const mempty @@ -227,3 +229,5 @@ -- | The response status code. ddbcsrsResponseStatus :: Lens' DescribeDBClusterSnapshotsResponse Int ddbcsrsResponseStatus = lens _ddbcsrsResponseStatus (\ s a -> s{_ddbcsrsResponseStatus = a});++instance NFData DescribeDBClusterSnapshotsResponse

@@ -131,6 +131,8 @@  instance Hashable DescribeDBClusters +instance NFData DescribeDBClusters+ instance ToHeaders DescribeDBClusters where         toHeaders = const mempty @@ -189,3 +191,5 @@ -- | The response status code. ddcrsResponseStatus :: Lens' DescribeDBClustersResponse Int ddcrsResponseStatus = lens _ddcrsResponseStatus (\ s a -> s{_ddcrsResponseStatus = a});++instance NFData DescribeDBClustersResponse

@@ -172,6 +172,8 @@  instance Hashable DescribeDBEngineVersions +instance NFData DescribeDBEngineVersions+ instance ToHeaders DescribeDBEngineVersions where         toHeaders = const mempty @@ -238,3 +240,5 @@ -- | The response status code. ddevrsResponseStatus :: Lens' DescribeDBEngineVersionsResponse Int ddevrsResponseStatus = lens _ddevrsResponseStatus (\ s a -> s{_ddevrsResponseStatus = a});++instance NFData DescribeDBEngineVersionsResponse

@@ -137,6 +137,8 @@  instance Hashable DescribeDBInstances +instance NFData DescribeDBInstances+ instance ToHeaders DescribeDBInstances where         toHeaders = const mempty @@ -196,3 +198,5 @@ -- | The response status code. ddbirsResponseStatus :: Lens' DescribeDBInstancesResponse Int ddbirsResponseStatus = lens _ddbirsResponseStatus (\ s a -> s{_ddbirsResponseStatus = a});++instance NFData DescribeDBInstancesResponse

@@ -161,6 +161,8 @@  instance Hashable DescribeDBLogFiles +instance NFData DescribeDBLogFiles+ instance ToHeaders DescribeDBLogFiles where         toHeaders = const mempty @@ -221,3 +223,5 @@ -- | The response status code. ddlfrsResponseStatus :: Lens' DescribeDBLogFilesResponse Int ddlfrsResponseStatus = lens _ddlfrsResponseStatus (\ s a -> s{_ddlfrsResponseStatus = a});++instance NFData DescribeDBLogFilesResponse

@@ -136,6 +136,8 @@  instance Hashable DescribeDBParameterGroups +instance NFData DescribeDBParameterGroups+ instance ToHeaders DescribeDBParameterGroups where         toHeaders = const mempty @@ -196,3 +198,5 @@ -- | The response status code. ddpgrsResponseStatus :: Lens' DescribeDBParameterGroupsResponse Int ddpgrsResponseStatus = lens _ddpgrsResponseStatus (\ s a -> s{_ddpgrsResponseStatus = a});++instance NFData DescribeDBParameterGroupsResponse

@@ -146,6 +146,8 @@  instance Hashable DescribeDBParameters +instance NFData DescribeDBParameters+ instance ToHeaders DescribeDBParameters where         toHeaders = const mempty @@ -206,3 +208,5 @@ -- | The response status code. ddprsResponseStatus :: Lens' DescribeDBParametersResponse Int ddprsResponseStatus = lens _ddprsResponseStatus (\ s a -> s{_ddprsResponseStatus = a});++instance NFData DescribeDBParametersResponse

@@ -130,6 +130,8 @@  instance Hashable DescribeDBSecurityGroups +instance NFData DescribeDBSecurityGroups+ instance ToHeaders DescribeDBSecurityGroups where         toHeaders = const mempty @@ -190,3 +192,5 @@ -- | The response status code. ddbsgrsResponseStatus :: Lens' DescribeDBSecurityGroupsResponse Int ddbsgrsResponseStatus = lens _ddbsgrsResponseStatus (\ s a -> s{_ddbsgrsResponseStatus = a});++instance NFData DescribeDBSecurityGroupsResponse

@@ -90,6 +90,8 @@  instance Hashable DescribeDBSnapshotAttributes +instance NFData DescribeDBSnapshotAttributes+ instance ToHeaders DescribeDBSnapshotAttributes where         toHeaders = const mempty @@ -133,3 +135,5 @@ -- | The response status code. ddsarsResponseStatus :: Lens' DescribeDBSnapshotAttributesResponse Int ddsarsResponseStatus = lens _ddsarsResponseStatus (\ s a -> s{_ddsarsResponseStatus = a});++instance NFData DescribeDBSnapshotAttributesResponse

@@ -212,6 +212,8 @@  instance Hashable DescribeDBSnapshots +instance NFData DescribeDBSnapshots+ instance ToHeaders DescribeDBSnapshots where         toHeaders = const mempty @@ -275,3 +277,5 @@ -- | The response status code. ddsrsResponseStatus :: Lens' DescribeDBSnapshotsResponse Int ddsrsResponseStatus = lens _ddsrsResponseStatus (\ s a -> s{_ddsrsResponseStatus = a});++instance NFData DescribeDBSnapshotsResponse

@@ -133,6 +133,8 @@  instance Hashable DescribeDBSubnetGroups +instance NFData DescribeDBSubnetGroups+ instance ToHeaders DescribeDBSubnetGroups where         toHeaders = const mempty @@ -193,3 +195,5 @@ -- | The response status code. ddsgrsResponseStatus :: Lens' DescribeDBSubnetGroupsResponse Int ddsgrsResponseStatus = lens _ddsgrsResponseStatus (\ s a -> s{_ddsgrsResponseStatus = a});++instance NFData DescribeDBSubnetGroupsResponse

@@ -124,6 +124,9 @@ instance Hashable          DescribeEngineDefaultClusterParameters +instance NFData+         DescribeEngineDefaultClusterParameters+ instance ToHeaders          DescribeEngineDefaultClusterParameters where         toHeaders = const mempty@@ -176,3 +179,6 @@ -- | The response status code. dedcprsResponseStatus :: Lens' DescribeEngineDefaultClusterParametersResponse Int dedcprsResponseStatus = lens _dedcprsResponseStatus (\ s a -> s{_dedcprsResponseStatus = a});++instance NFData+         DescribeEngineDefaultClusterParametersResponse

@@ -134,6 +134,8 @@  instance Hashable DescribeEngineDefaultParameters +instance NFData DescribeEngineDefaultParameters+ instance ToHeaders DescribeEngineDefaultParameters          where         toHeaders = const mempty@@ -185,3 +187,6 @@ -- | Undocumented member. dedprsEngineDefaults :: Lens' DescribeEngineDefaultParametersResponse EngineDefaults dedprsEngineDefaults = lens _dedprsEngineDefaults (\ s a -> s{_dedprsEngineDefaults = a});++instance NFData+         DescribeEngineDefaultParametersResponse

@@ -95,6 +95,8 @@  instance Hashable DescribeEventCategories +instance NFData DescribeEventCategories+ instance ToHeaders DescribeEventCategories where         toHeaders = const mempty @@ -142,3 +144,5 @@ -- | The response status code. decrsResponseStatus :: Lens' DescribeEventCategoriesResponse Int decrsResponseStatus = lens _decrsResponseStatus (\ s a -> s{_decrsResponseStatus = a});++instance NFData DescribeEventCategoriesResponse

@@ -135,6 +135,8 @@  instance Hashable DescribeEventSubscriptions +instance NFData DescribeEventSubscriptions+ instance ToHeaders DescribeEventSubscriptions where         toHeaders = const mempty @@ -194,3 +196,5 @@ -- | The response status code. desrsResponseStatus :: Lens' DescribeEventSubscriptionsResponse Int desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a});++instance NFData DescribeEventSubscriptionsResponse

@@ -201,6 +201,8 @@  instance Hashable DescribeEvents +instance NFData DescribeEvents+ instance ToHeaders DescribeEvents where         toHeaders = const mempty @@ -265,3 +267,5 @@ -- | The response status code. dersResponseStatus :: Lens' DescribeEventsResponse Int dersResponseStatus = lens _dersResponseStatus (\ s a -> s{_dersResponseStatus = a});++instance NFData DescribeEventsResponse

@@ -140,6 +140,8 @@  instance Hashable DescribeOptionGroupOptions +instance NFData DescribeOptionGroupOptions+ instance ToHeaders DescribeOptionGroupOptions where         toHeaders = const mempty @@ -200,3 +202,5 @@ -- | The response status code. dogorsResponseStatus :: Lens' DescribeOptionGroupOptionsResponse Int dogorsResponseStatus = lens _dogorsResponseStatus (\ s a -> s{_dogorsResponseStatus = a});++instance NFData DescribeOptionGroupOptionsResponse

@@ -149,6 +149,8 @@  instance Hashable DescribeOptionGroups +instance NFData DescribeOptionGroups+ instance ToHeaders DescribeOptionGroups where         toHeaders = const mempty @@ -209,3 +211,5 @@ -- | The response status code. dogrsResponseStatus :: Lens' DescribeOptionGroupsResponse Int dogrsResponseStatus = lens _dogrsResponseStatus (\ s a -> s{_dogrsResponseStatus = a});++instance NFData DescribeOptionGroupsResponse

@@ -174,6 +174,8 @@  instance Hashable DescribeOrderableDBInstanceOptions +instance NFData DescribeOrderableDBInstanceOptions+ instance ToHeaders DescribeOrderableDBInstanceOptions          where         toHeaders = const mempty@@ -242,3 +244,6 @@ -- | The response status code. dodiorsResponseStatus :: Lens' DescribeOrderableDBInstanceOptionsResponse Int dodiorsResponseStatus = lens _dodiorsResponseStatus (\ s a -> s{_dodiorsResponseStatus = a});++instance NFData+         DescribeOrderableDBInstanceOptionsResponse

@@ -130,6 +130,8 @@  instance Hashable DescribePendingMaintenanceActions +instance NFData DescribePendingMaintenanceActions+ instance ToHeaders DescribePendingMaintenanceActions          where         toHeaders = const mempty@@ -193,3 +195,6 @@ -- | The response status code. dpmarsResponseStatus :: Lens' DescribePendingMaintenanceActionsResponse Int dpmarsResponseStatus = lens _dpmarsResponseStatus (\ s a -> s{_dpmarsResponseStatus = a});++instance NFData+         DescribePendingMaintenanceActionsResponse

@@ -194,6 +194,8 @@  instance Hashable DescribeReservedDBInstances +instance NFData DescribeReservedDBInstances+ instance ToHeaders DescribeReservedDBInstances where         toHeaders = const mempty @@ -261,3 +263,5 @@ -- | The response status code. drdirsResponseStatus :: Lens' DescribeReservedDBInstancesResponse Int drdirsResponseStatus = lens _drdirsResponseStatus (\ s a -> s{_drdirsResponseStatus = a});++instance NFData DescribeReservedDBInstancesResponse

@@ -190,6 +190,8 @@ instance Hashable          DescribeReservedDBInstancesOfferings +instance NFData DescribeReservedDBInstancesOfferings+ instance ToHeaders          DescribeReservedDBInstancesOfferings where         toHeaders = const mempty@@ -260,3 +262,6 @@ -- | The response status code. drdiorsResponseStatus :: Lens' DescribeReservedDBInstancesOfferingsResponse Int drdiorsResponseStatus = lens _drdiorsResponseStatus (\ s a -> s{_drdiorsResponseStatus = a});++instance NFData+         DescribeReservedDBInstancesOfferingsResponse

@@ -93,7 +93,8 @@ -- on the value of the Marker parameter. -- -- -   If neither Marker or NumberOfLines are specified, the entire log---     file is returned.+--     file is returned up to a maximum of 10000 lines, starting with the+--     most recent log entries first. -- -- -   If NumberOfLines is specified and Marker is not specified, then the --     most recent lines from the end of the log file are returned.@@ -154,6 +155,8 @@  instance Hashable DownloadDBLogFilePortion +instance NFData DownloadDBLogFilePortion+ instance ToHeaders DownloadDBLogFilePortion where         toHeaders = const mempty @@ -221,3 +224,5 @@ -- | The response status code. ddlfprsResponseStatus :: Lens' DownloadDBLogFilePortionResponse Int ddlfprsResponseStatus = lens _ddlfprsResponseStatus (\ s a -> s{_ddlfprsResponseStatus = a});++instance NFData DownloadDBLogFilePortionResponse

@@ -98,6 +98,8 @@  instance Hashable FailoverDBCluster +instance NFData FailoverDBCluster+ instance ToHeaders FailoverDBCluster where         toHeaders = const mempty @@ -140,3 +142,5 @@ -- | The response status code. fdcrsResponseStatus :: Lens' FailoverDBClusterResponse Int fdcrsResponseStatus = lens _fdcrsResponseStatus (\ s a -> s{_fdcrsResponseStatus = a});++instance NFData FailoverDBClusterResponse

@@ -94,6 +94,8 @@  instance Hashable ListTagsForResource +instance NFData ListTagsForResource+ instance ToHeaders ListTagsForResource where         toHeaders = const mempty @@ -140,3 +142,5 @@ -- | The response status code. ltfrrsResponseStatus :: Lens' ListTagsForResourceResponse Int ltfrrsResponseStatus = lens _ltfrrsResponseStatus (\ s a -> s{_ltfrrsResponseStatus = a});++instance NFData ListTagsForResourceResponse

@@ -181,10 +181,16 @@ -- | A value that specifies whether the modifications in this request and any -- pending modifications are asynchronously applied as soon as possible, -- regardless of the 'PreferredMaintenanceWindow' setting for the DB--- cluster.+-- cluster. If this parameter is set to 'false', changes to the DB cluster+-- are applied during the next maintenance window. ----- If this parameter is set to 'false', changes to the DB cluster are--- applied during the next maintenance window.+-- The 'ApplyImmediately' parameter only affects the+-- 'NewDBClusterIdentifier' and 'MasterUserPassword' values. If you set the+-- 'ApplyImmediately' parameter value to false, then changes to the+-- 'NewDBClusterIdentifier' and 'MasterUserPassword' values are applied+-- during the next maintenance window. All other changes are applied+-- immediately, regardless of the value of the 'ApplyImmediately'+-- parameter. -- -- Default: 'false' mdcApplyImmediately :: Lens' ModifyDBCluster (Maybe Bool)@@ -249,6 +255,8 @@  instance Hashable ModifyDBCluster +instance NFData ModifyDBCluster+ instance ToHeaders ModifyDBCluster where         toHeaders = const mempty @@ -307,3 +315,5 @@ -- | The response status code. mdcrsResponseStatus :: Lens' ModifyDBClusterResponse Int mdcrsResponseStatus = lens _mdcrsResponseStatus (\ s a -> s{_mdcrsResponseStatus = a});++instance NFData ModifyDBClusterResponse

@@ -110,6 +110,8 @@  instance Hashable ModifyDBClusterParameterGroup +instance NFData ModifyDBClusterParameterGroup+ instance ToHeaders ModifyDBClusterParameterGroup          where         toHeaders = const mempty

@@ -37,9 +37,11 @@     , mdiIOPS     , mdiAllowMajorVersionUpgrade     , mdiNewDBInstanceIdentifier+    , mdiDomain     , mdiMonitoringInterval     , mdiTDECredentialPassword     , mdiDBInstanceClass+    , mdiPromotionTier     , mdiPreferredMaintenanceWindow     , mdiCACertificateIdentifier     , mdiDBParameterGroupName@@ -52,6 +54,7 @@     , mdiOptionGroupName     , mdiCopyTagsToSnapshot     , mdiTDECredentialARN+    , mdiDomainIAMRoleName     , mdiStorageType     , mdiDBInstanceIdentifier @@ -84,9 +87,11 @@     , _mdiIOPS                       :: !(Maybe Int)     , _mdiAllowMajorVersionUpgrade   :: !(Maybe Bool)     , _mdiNewDBInstanceIdentifier    :: !(Maybe Text)+    , _mdiDomain                     :: !(Maybe Text)     , _mdiMonitoringInterval         :: !(Maybe Int)     , _mdiTDECredentialPassword      :: !(Maybe Text)     , _mdiDBInstanceClass            :: !(Maybe Text)+    , _mdiPromotionTier              :: !(Maybe Int)     , _mdiPreferredMaintenanceWindow :: !(Maybe Text)     , _mdiCACertificateIdentifier    :: !(Maybe Text)     , _mdiDBParameterGroupName       :: !(Maybe Text)@@ -99,6 +104,7 @@     , _mdiOptionGroupName            :: !(Maybe Text)     , _mdiCopyTagsToSnapshot         :: !(Maybe Bool)     , _mdiTDECredentialARN           :: !(Maybe Text)+    , _mdiDomainIAMRoleName          :: !(Maybe Text)     , _mdiStorageType                :: !(Maybe Text)     , _mdiDBInstanceIdentifier       :: !Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)@@ -127,12 +133,16 @@ -- -- * 'mdiNewDBInstanceIdentifier' --+-- * 'mdiDomain'+-- -- * 'mdiMonitoringInterval' -- -- * 'mdiTDECredentialPassword' -- -- * 'mdiDBInstanceClass' --+-- * 'mdiPromotionTier'+-- -- * 'mdiPreferredMaintenanceWindow' -- -- * 'mdiCACertificateIdentifier'@@ -157,6 +167,8 @@ -- -- * 'mdiTDECredentialARN' --+-- * 'mdiDomainIAMRoleName'+-- -- * 'mdiStorageType' -- -- * 'mdiDBInstanceIdentifier'@@ -175,9 +187,11 @@     , _mdiIOPS = Nothing     , _mdiAllowMajorVersionUpgrade = Nothing     , _mdiNewDBInstanceIdentifier = Nothing+    , _mdiDomain = Nothing     , _mdiMonitoringInterval = Nothing     , _mdiTDECredentialPassword = Nothing     , _mdiDBInstanceClass = Nothing+    , _mdiPromotionTier = Nothing     , _mdiPreferredMaintenanceWindow = Nothing     , _mdiCACertificateIdentifier = Nothing     , _mdiDBParameterGroupName = Nothing@@ -190,6 +204,7 @@     , _mdiOptionGroupName = Nothing     , _mdiCopyTagsToSnapshot = Nothing     , _mdiTDECredentialARN = Nothing+    , _mdiDomainIAMRoleName = Nothing     , _mdiStorageType = Nothing     , _mdiDBInstanceIdentifier = pDBInstanceIdentifier_     }@@ -246,6 +261,8 @@ -- -- Valid Values: '1150-65535' --+-- Type: Integer+-- -- __Oracle__ -- -- Default: '1521'@@ -389,6 +406,14 @@ mdiNewDBInstanceIdentifier :: Lens' ModifyDBInstance (Maybe Text) mdiNewDBInstanceIdentifier = lens _mdiNewDBInstanceIdentifier (\ s a -> s{_mdiNewDBInstanceIdentifier = a}); +-- | Specify the Active Directory Domain to move the instance to.+--+-- The specified Active Directory Domain must be created prior to this+-- operation. Currently only a SQL Server instance can be created in a+-- Active Directory Domain.+mdiDomain :: Lens' ModifyDBInstance (Maybe Text)+mdiDomain = lens _mdiDomain (\ s a -> s{_mdiDomain = a});+ -- | The interval, in seconds, between points when Enhanced Monitoring -- metrics are collected for the DB instance. To disable collecting -- Enhanced Monitoring metrics, specify 0. The default is 60.@@ -420,6 +445,17 @@ mdiDBInstanceClass :: Lens' ModifyDBInstance (Maybe Text) mdiDBInstanceClass = lens _mdiDBInstanceClass (\ s a -> s{_mdiDBInstanceClass = a}); +-- | A value that specifies the order in which an Aurora Replica is promoted+-- to the primary instance after a failure of the existing primary+-- instance. For more information, see+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.+--+-- Default: 1+--+-- Valid Values: 0 - 15+mdiPromotionTier :: Lens' ModifyDBInstance (Maybe Int)+mdiPromotionTier = lens _mdiPromotionTier (\ s a -> s{_mdiPromotionTier = a});+ -- | The weekly time range (in UTC) during which system maintenance can -- occur, which might result in an outage. Changing this parameter does not -- result in an outage, except in the following situation, and the change@@ -640,6 +676,11 @@ mdiTDECredentialARN :: Lens' ModifyDBInstance (Maybe Text) mdiTDECredentialARN = lens _mdiTDECredentialARN (\ s a -> s{_mdiTDECredentialARN = a}); +-- | Specify the name of the IAM role to be used when making API calls to the+-- Directory Service.+mdiDomainIAMRoleName :: Lens' ModifyDBInstance (Maybe Text)+mdiDomainIAMRoleName = lens _mdiDomainIAMRoleName (\ s a -> s{_mdiDomainIAMRoleName = a});+ -- | Specifies the storage type to be associated with the DB instance. -- -- Valid values: 'standard | gp2 | io1'@@ -674,6 +715,8 @@  instance Hashable ModifyDBInstance +instance NFData ModifyDBInstance+ instance ToHeaders ModifyDBInstance where         toHeaders = const mempty @@ -701,9 +744,11 @@                  _mdiAllowMajorVersionUpgrade,                "NewDBInstanceIdentifier" =:                  _mdiNewDBInstanceIdentifier,+               "Domain" =: _mdiDomain,                "MonitoringInterval" =: _mdiMonitoringInterval,                "TdeCredentialPassword" =: _mdiTDECredentialPassword,                "DBInstanceClass" =: _mdiDBInstanceClass,+               "PromotionTier" =: _mdiPromotionTier,                "PreferredMaintenanceWindow" =:                  _mdiPreferredMaintenanceWindow,                "CACertificateIdentifier" =:@@ -721,6 +766,7 @@                "OptionGroupName" =: _mdiOptionGroupName,                "CopyTagsToSnapshot" =: _mdiCopyTagsToSnapshot,                "TdeCredentialArn" =: _mdiTDECredentialARN,+               "DomainIAMRoleName" =: _mdiDomainIAMRoleName,                "StorageType" =: _mdiStorageType,                "DBInstanceIdentifier" =: _mdiDBInstanceIdentifier] @@ -753,3 +799,5 @@ -- | The response status code. mdirsResponseStatus :: Lens' ModifyDBInstanceResponse Int mdirsResponseStatus = lens _mdirsResponseStatus (\ s a -> s{_mdirsResponseStatus = a});++instance NFData ModifyDBInstanceResponse

@@ -120,6 +120,8 @@  instance Hashable ModifyDBParameterGroup +instance NFData ModifyDBParameterGroup+ instance ToHeaders ModifyDBParameterGroup where         toHeaders = const mempty 

@@ -137,6 +137,8 @@  instance Hashable ModifyDBSnapshotAttribute +instance NFData ModifyDBSnapshotAttribute+ instance ToHeaders ModifyDBSnapshotAttribute where         toHeaders = const mempty @@ -188,3 +190,5 @@ -- | The response status code. mdsarsResponseStatus :: Lens' ModifyDBSnapshotAttributeResponse Int mdsarsResponseStatus = lens _mdsarsResponseStatus (\ s a -> s{_mdsarsResponseStatus = a});++instance NFData ModifyDBSnapshotAttributeResponse

@@ -81,7 +81,7 @@ -- string. -- -- Constraints: Must contain no more than 255 alphanumeric characters,--- periods, underscores, spaces, or hyphens. Must not be \"default\".+-- periods, underscores, spaces, or hyphens. Must not be default. -- -- Example: 'mySubnetgroup' mdsgDBSubnetGroupName :: Lens' ModifyDBSubnetGroup Text@@ -103,6 +103,8 @@  instance Hashable ModifyDBSubnetGroup +instance NFData ModifyDBSubnetGroup+ instance ToHeaders ModifyDBSubnetGroup where         toHeaders = const mempty @@ -149,3 +151,5 @@ -- | The response status code. mdsgrsResponseStatus :: Lens' ModifyDBSubnetGroupResponse Int mdsgrsResponseStatus = lens _mdsgrsResponseStatus (\ s a -> s{_mdsgrsResponseStatus = a});++instance NFData ModifyDBSubnetGroupResponse

@@ -135,6 +135,8 @@  instance Hashable ModifyEventSubscription +instance NFData ModifyEventSubscription+ instance ToHeaders ModifyEventSubscription where         toHeaders = const mempty @@ -185,3 +187,5 @@ -- | The response status code. mesrsResponseStatus :: Lens' ModifyEventSubscriptionResponse Int mesrsResponseStatus = lens _mesrsResponseStatus (\ s a -> s{_mesrsResponseStatus = a});++instance NFData ModifyEventSubscriptionResponse

@@ -113,6 +113,8 @@  instance Hashable ModifyOptionGroup +instance NFData ModifyOptionGroup+ instance ToHeaders ModifyOptionGroup where         toHeaders = const mempty @@ -163,3 +165,5 @@ -- | The response status code. mogrsResponseStatus :: Lens' ModifyOptionGroupResponse Int mogrsResponseStatus = lens _mogrsResponseStatus (\ s a -> s{_mogrsResponseStatus = a});++instance NFData ModifyOptionGroupResponse

@@ -132,6 +132,8 @@  instance Hashable PromoteReadReplica +instance NFData PromoteReadReplica+ instance ToHeaders PromoteReadReplica where         toHeaders = const mempty @@ -176,3 +178,5 @@ -- | The response status code. prrrsResponseStatus :: Lens' PromoteReadReplicaResponse Int prrrsResponseStatus = lens _prrrsResponseStatus (\ s a -> s{_prrrsResponseStatus = a});++instance NFData PromoteReadReplicaResponse

@@ -113,6 +113,8 @@  instance Hashable PurchaseReservedDBInstancesOffering +instance NFData PurchaseReservedDBInstancesOffering+ instance ToHeaders          PurchaseReservedDBInstancesOffering where         toHeaders = const mempty@@ -164,3 +166,6 @@ -- | The response status code. prdiorsResponseStatus :: Lens' PurchaseReservedDBInstancesOfferingResponse Int prdiorsResponseStatus = lens _prdiorsResponseStatus (\ s a -> s{_prdiorsResponseStatus = a});++instance NFData+         PurchaseReservedDBInstancesOfferingResponse

@@ -113,6 +113,8 @@  instance Hashable RebootDBInstance +instance NFData RebootDBInstance+ instance ToHeaders RebootDBInstance where         toHeaders = const mempty @@ -156,3 +158,5 @@ -- | The response status code. rdirsResponseStatus :: Lens' RebootDBInstanceResponse Int rdirsResponseStatus = lens _rdirsResponseStatus (\ s a -> s{_rdirsResponseStatus = a});++instance NFData RebootDBInstanceResponse

@@ -95,6 +95,9 @@ instance Hashable          RemoveSourceIdentifierFromSubscription +instance NFData+         RemoveSourceIdentifierFromSubscription+ instance ToHeaders          RemoveSourceIdentifierFromSubscription where         toHeaders = const mempty@@ -143,3 +146,6 @@ -- | The response status code. rsifsrsResponseStatus :: Lens' RemoveSourceIdentifierFromSubscriptionResponse Int rsifsrsResponseStatus = lens _rsifsrsResponseStatus (\ s a -> s{_rsifsrsResponseStatus = a});++instance NFData+         RemoveSourceIdentifierFromSubscriptionResponse

@@ -86,6 +86,8 @@  instance Hashable RemoveTagsFromResource +instance NFData RemoveTagsFromResource+ instance ToHeaders RemoveTagsFromResource where         toHeaders = const mempty @@ -111,3 +113,5 @@ removeTagsFromResourceResponse     :: RemoveTagsFromResourceResponse removeTagsFromResourceResponse = RemoveTagsFromResourceResponse'++instance NFData RemoveTagsFromResourceResponse

@@ -114,6 +114,8 @@  instance Hashable ResetDBClusterParameterGroup +instance NFData ResetDBClusterParameterGroup+ instance ToHeaders ResetDBClusterParameterGroup where         toHeaders = const mempty 

@@ -132,6 +132,8 @@  instance Hashable ResetDBParameterGroup +instance NFData ResetDBParameterGroup+ instance ToHeaders ResetDBParameterGroup where         toHeaders = const mempty 

@@ -237,6 +237,8 @@  instance Hashable RestoreDBClusterFromSnapshot +instance NFData RestoreDBClusterFromSnapshot+ instance ToHeaders RestoreDBClusterFromSnapshot where         toHeaders = const mempty @@ -297,3 +299,5 @@ -- | The response status code. rdcfsrsResponseStatus :: Lens' RestoreDBClusterFromSnapshotResponse Int rdcfsrsResponseStatus = lens _rdcfsrsResponseStatus (\ s a -> s{_rdcfsrsResponseStatus = a});++instance NFData RestoreDBClusterFromSnapshotResponse

@@ -234,6 +234,8 @@  instance Hashable RestoreDBClusterToPointInTime +instance NFData RestoreDBClusterToPointInTime+ instance ToHeaders RestoreDBClusterToPointInTime          where         toHeaders = const mempty@@ -293,3 +295,5 @@ -- | The response status code. rdctpitrsResponseStatus :: Lens' RestoreDBClusterToPointInTimeResponse Int rdctpitrsResponseStatus = lens _rdctpitrsResponseStatus (\ s a -> s{_rdctpitrsResponseStatus = a});++instance NFData RestoreDBClusterToPointInTimeResponse

@@ -49,6 +49,7 @@     , rdifdsAutoMinorVersionUpgrade     , rdifdsDBSubnetGroupName     , rdifdsIOPS+    , rdifdsDomain     , rdifdsEngine     , rdifdsTDECredentialPassword     , rdifdsDBInstanceClass@@ -58,6 +59,7 @@     , rdifdsOptionGroupName     , rdifdsCopyTagsToSnapshot     , rdifdsTDECredentialARN+    , rdifdsDomainIAMRoleName     , rdifdsTags     , rdifdsPort     , rdifdsStorageType@@ -88,6 +90,7 @@     , _rdifdsAutoMinorVersionUpgrade :: !(Maybe Bool)     , _rdifdsDBSubnetGroupName       :: !(Maybe Text)     , _rdifdsIOPS                    :: !(Maybe Int)+    , _rdifdsDomain                  :: !(Maybe Text)     , _rdifdsEngine                  :: !(Maybe Text)     , _rdifdsTDECredentialPassword   :: !(Maybe Text)     , _rdifdsDBInstanceClass         :: !(Maybe Text)@@ -97,6 +100,7 @@     , _rdifdsOptionGroupName         :: !(Maybe Text)     , _rdifdsCopyTagsToSnapshot      :: !(Maybe Bool)     , _rdifdsTDECredentialARN        :: !(Maybe Text)+    , _rdifdsDomainIAMRoleName       :: !(Maybe Text)     , _rdifdsTags                    :: !(Maybe [Tag])     , _rdifdsPort                    :: !(Maybe Int)     , _rdifdsStorageType             :: !(Maybe Text)@@ -117,6 +121,8 @@ -- -- * 'rdifdsIOPS' --+-- * 'rdifdsDomain'+-- -- * 'rdifdsEngine' -- -- * 'rdifdsTDECredentialPassword'@@ -135,6 +141,8 @@ -- -- * 'rdifdsTDECredentialARN' --+-- * 'rdifdsDomainIAMRoleName'+-- -- * 'rdifdsTags' -- -- * 'rdifdsPort'@@ -156,6 +164,7 @@     , _rdifdsAutoMinorVersionUpgrade = Nothing     , _rdifdsDBSubnetGroupName = Nothing     , _rdifdsIOPS = Nothing+    , _rdifdsDomain = Nothing     , _rdifdsEngine = Nothing     , _rdifdsTDECredentialPassword = Nothing     , _rdifdsDBInstanceClass = Nothing@@ -165,6 +174,7 @@     , _rdifdsOptionGroupName = Nothing     , _rdifdsCopyTagsToSnapshot = Nothing     , _rdifdsTDECredentialARN = Nothing+    , _rdifdsDomainIAMRoleName = Nothing     , _rdifdsTags = Nothing     , _rdifdsPort = Nothing     , _rdifdsStorageType = Nothing@@ -224,6 +234,10 @@ rdifdsIOPS :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Int) rdifdsIOPS = lens _rdifdsIOPS (\ s a -> s{_rdifdsIOPS = a}); +-- | Specify the Active Directory Domain to restore the instance in.+rdifdsDomain :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text)+rdifdsDomain = lens _rdifdsDomain (\ s a -> s{_rdifdsDomain = a});+ -- | The database engine to use for the new instance. -- -- Default: The same as source@@ -294,6 +308,11 @@ rdifdsTDECredentialARN :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text) rdifdsTDECredentialARN = lens _rdifdsTDECredentialARN (\ s a -> s{_rdifdsTDECredentialARN = a}); +-- | Specify the name of the IAM role to be used when making API calls to the+-- Directory Service.+rdifdsDomainIAMRoleName :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text)+rdifdsDomainIAMRoleName = lens _rdifdsDomainIAMRoleName (\ s a -> s{_rdifdsDomainIAMRoleName = a});+ -- | Undocumented member. rdifdsTags :: Lens' RestoreDBInstanceFromDBSnapshot [Tag] rdifdsTags = lens _rdifdsTags (\ s a -> s{_rdifdsTags = a}) . _Default . _Coerce;@@ -365,6 +384,8 @@  instance Hashable RestoreDBInstanceFromDBSnapshot +instance NFData RestoreDBInstanceFromDBSnapshot+ instance ToHeaders RestoreDBInstanceFromDBSnapshot          where         toHeaders = const mempty@@ -383,7 +404,8 @@                "AutoMinorVersionUpgrade" =:                  _rdifdsAutoMinorVersionUpgrade,                "DBSubnetGroupName" =: _rdifdsDBSubnetGroupName,-               "Iops" =: _rdifdsIOPS, "Engine" =: _rdifdsEngine,+               "Iops" =: _rdifdsIOPS, "Domain" =: _rdifdsDomain,+               "Engine" =: _rdifdsEngine,                "TdeCredentialPassword" =:                  _rdifdsTDECredentialPassword,                "DBInstanceClass" =: _rdifdsDBInstanceClass,@@ -393,6 +415,7 @@                "OptionGroupName" =: _rdifdsOptionGroupName,                "CopyTagsToSnapshot" =: _rdifdsCopyTagsToSnapshot,                "TdeCredentialArn" =: _rdifdsTDECredentialARN,+               "DomainIAMRoleName" =: _rdifdsDomainIAMRoleName,                "Tags" =:                  toQuery (toQueryList "Tag" <$> _rdifdsTags),                "Port" =: _rdifdsPort,@@ -432,3 +455,6 @@ -- | The response status code. rdifdsrsResponseStatus :: Lens' RestoreDBInstanceFromDBSnapshotResponse Int rdifdsrsResponseStatus = lens _rdifdsrsResponseStatus (\ s a -> s{_rdifdsrsResponseStatus = a});++instance NFData+         RestoreDBInstanceFromDBSnapshotResponse

@@ -42,6 +42,7 @@     , rditpitDBSubnetGroupName     , rditpitRestoreTime     , rditpitIOPS+    , rditpitDomain     , rditpitEngine     , rditpitTDECredentialPassword     , rditpitDBInstanceClass@@ -51,6 +52,7 @@     , rditpitOptionGroupName     , rditpitCopyTagsToSnapshot     , rditpitTDECredentialARN+    , rditpitDomainIAMRoleName     , rditpitTags     , rditpitPort     , rditpitStorageType@@ -83,6 +85,7 @@     , _rditpitDBSubnetGroupName          :: !(Maybe Text)     , _rditpitRestoreTime                :: !(Maybe ISO8601)     , _rditpitIOPS                       :: !(Maybe Int)+    , _rditpitDomain                     :: !(Maybe Text)     , _rditpitEngine                     :: !(Maybe Text)     , _rditpitTDECredentialPassword      :: !(Maybe Text)     , _rditpitDBInstanceClass            :: !(Maybe Text)@@ -92,6 +95,7 @@     , _rditpitOptionGroupName            :: !(Maybe Text)     , _rditpitCopyTagsToSnapshot         :: !(Maybe Bool)     , _rditpitTDECredentialARN           :: !(Maybe Text)+    , _rditpitDomainIAMRoleName          :: !(Maybe Text)     , _rditpitTags                       :: !(Maybe [Tag])     , _rditpitPort                       :: !(Maybe Int)     , _rditpitStorageType                :: !(Maybe Text)@@ -116,6 +120,8 @@ -- -- * 'rditpitIOPS' --+-- * 'rditpitDomain'+-- -- * 'rditpitEngine' -- -- * 'rditpitTDECredentialPassword'@@ -134,6 +140,8 @@ -- -- * 'rditpitTDECredentialARN' --+-- * 'rditpitDomainIAMRoleName'+-- -- * 'rditpitTags' -- -- * 'rditpitPort'@@ -157,6 +165,7 @@     , _rditpitDBSubnetGroupName = Nothing     , _rditpitRestoreTime = Nothing     , _rditpitIOPS = Nothing+    , _rditpitDomain = Nothing     , _rditpitEngine = Nothing     , _rditpitTDECredentialPassword = Nothing     , _rditpitDBInstanceClass = Nothing@@ -166,6 +175,7 @@     , _rditpitOptionGroupName = Nothing     , _rditpitCopyTagsToSnapshot = Nothing     , _rditpitTDECredentialARN = Nothing+    , _rditpitDomainIAMRoleName = Nothing     , _rditpitTags = Nothing     , _rditpitPort = Nothing     , _rditpitStorageType = Nothing@@ -244,6 +254,10 @@ rditpitIOPS :: Lens' RestoreDBInstanceToPointInTime (Maybe Int) rditpitIOPS = lens _rditpitIOPS (\ s a -> s{_rditpitIOPS = a}); +-- | Specify the Active Directory Domain to restore the instance in.+rditpitDomain :: Lens' RestoreDBInstanceToPointInTime (Maybe Text)+rditpitDomain = lens _rditpitDomain (\ s a -> s{_rditpitDomain = a});+ -- | The database engine to use for the new instance. -- -- Default: The same as source@@ -316,6 +330,11 @@ rditpitTDECredentialARN :: Lens' RestoreDBInstanceToPointInTime (Maybe Text) rditpitTDECredentialARN = lens _rditpitTDECredentialARN (\ s a -> s{_rditpitTDECredentialARN = a}); +-- | Specify the name of the IAM role to be used when making API calls to the+-- Directory Service.+rditpitDomainIAMRoleName :: Lens' RestoreDBInstanceToPointInTime (Maybe Text)+rditpitDomainIAMRoleName = lens _rditpitDomainIAMRoleName (\ s a -> s{_rditpitDomainIAMRoleName = a});+ -- | Undocumented member. rditpitTags :: Lens' RestoreDBInstanceToPointInTime [Tag] rditpitTags = lens _rditpitTags (\ s a -> s{_rditpitTags = a}) . _Default . _Coerce;@@ -381,6 +400,8 @@  instance Hashable RestoreDBInstanceToPointInTime +instance NFData RestoreDBInstanceToPointInTime+ instance ToHeaders RestoreDBInstanceToPointInTime          where         toHeaders = const mempty@@ -401,7 +422,8 @@                  _rditpitAutoMinorVersionUpgrade,                "DBSubnetGroupName" =: _rditpitDBSubnetGroupName,                "RestoreTime" =: _rditpitRestoreTime,-               "Iops" =: _rditpitIOPS, "Engine" =: _rditpitEngine,+               "Iops" =: _rditpitIOPS, "Domain" =: _rditpitDomain,+               "Engine" =: _rditpitEngine,                "TdeCredentialPassword" =:                  _rditpitTDECredentialPassword,                "DBInstanceClass" =: _rditpitDBInstanceClass,@@ -411,6 +433,7 @@                "OptionGroupName" =: _rditpitOptionGroupName,                "CopyTagsToSnapshot" =: _rditpitCopyTagsToSnapshot,                "TdeCredentialArn" =: _rditpitTDECredentialARN,+               "DomainIAMRoleName" =: _rditpitDomainIAMRoleName,                "Tags" =:                  toQuery (toQueryList "Tag" <$> _rditpitTags),                "Port" =: _rditpitPort,@@ -450,3 +473,6 @@ -- | The response status code. rditpitrsResponseStatus :: Lens' RestoreDBInstanceToPointInTimeResponse Int rditpitrsResponseStatus = lens _rditpitrsResponseStatus (\ s a -> s{_rditpitrsResponseStatus = a});++instance NFData+         RestoreDBInstanceToPointInTimeResponse

@@ -132,6 +132,8 @@  instance Hashable RevokeDBSecurityGroupIngress +instance NFData RevokeDBSecurityGroupIngress+ instance ToHeaders RevokeDBSecurityGroupIngress where         toHeaders = const mempty @@ -180,3 +182,5 @@ -- | The response status code. rdsgirsResponseStatus :: Lens' RevokeDBSecurityGroupIngressResponse Int rdsgirsResponseStatus = lens _rdsgirsResponseStatus (\ s a -> s{_rdsgirsResponseStatus = a});++instance NFData RevokeDBSecurityGroupIngressResponse

@@ -55,6 +55,7 @@     , _DBSecurityGroupNotFoundFault     , _DBSecurityGroupNotSupportedFault     , _InstanceQuotaExceededFault+    , _DomainNotFoundFault     , _DBParameterGroupNotFoundFault     , _InvalidDBSubnetGroupFault     , _ReservedDBInstancesOfferingNotFoundFault@@ -154,6 +155,7 @@     -- * DBClusterMember     , DBClusterMember     , dbClusterMember+    , dcmPromotionTier     , dcmDBInstanceIdentifier     , dcmIsClusterWriter     , dcmDBClusterParameterGroupStatus@@ -228,6 +230,7 @@     , diEngine     , diLatestRestorableTime     , diDBInstanceClass+    , diPromotionTier     , diLicenseModel     , diPreferredMaintenanceWindow     , diCACertificateIdentifier@@ -254,6 +257,7 @@     , diPendingModifiedValues     , diStorageType     , diStatusInfos+    , diDomainMemberships     , diDBName      -- * DBInstanceStatusInfo@@ -353,6 +357,14 @@     , ddlfdSize     , ddlfdLogFileName +    -- * DomainMembership+    , DomainMembership+    , domainMembership+    , dmStatus+    , dmFQDN+    , dmDomain+    , dmIAMRoleName+     -- * EC2SecurityGroup     , EC2SecurityGroup     , ec2SecurityGroup@@ -652,6 +664,8 @@       | has (hasCode "ThrottlingException" . hasStatus 400) e =           Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"+      | has (hasStatus 504) e = Just "gateway_timeout"+      | has (hasStatus 502) e = Just "bad_gateway"       | has (hasStatus 503) e = Just "service_unavailable"       | has (hasStatus 500) e = Just "general_server_error"       | has (hasStatus 509) e = Just "limit_exceeded"@@ -865,6 +879,11 @@ _InstanceQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _InstanceQuotaExceededFault =     _ServiceError . hasStatus 400 . hasCode "InstanceQuotaExceeded"++-- | Prism for DomainNotFoundFault' errors.+_DomainNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError+_DomainNotFoundFault =+    _ServiceError . hasStatus 404 . hasCode "DomainNotFoundFault"  -- | /DBParameterGroupName/ does not refer to an existing DB parameter group. _DBParameterGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError

@@ -69,6 +69,8 @@  instance Hashable AccountQuota +instance NFData AccountQuota+ -- | Contains Availability Zone information. -- -- This data type is used as an element in the following data type:@@ -101,6 +103,8 @@  instance Hashable AvailabilityZone +instance NFData AvailabilityZone+ -- | A CA certificate for an AWS account. -- -- /See:/ 'certificate' smart constructor.@@ -166,6 +170,8 @@  instance Hashable Certificate +instance NFData Certificate+ -- | This data type is used as a response element in the action -- < DescribeDBEngineVersions>. --@@ -206,6 +212,8 @@  instance Hashable CharacterSet +instance NFData CharacterSet+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < CreateDBCluster>@@ -495,11 +503,14 @@  instance Hashable DBCluster +instance NFData DBCluster+ -- | Contains information about an instance that is part of a DB cluster. -- -- /See:/ 'dbClusterMember' smart constructor. data DBClusterMember = DBClusterMember'-    { _dcmDBInstanceIdentifier          :: !(Maybe Text)+    { _dcmPromotionTier                 :: !(Maybe Int)+    , _dcmDBInstanceIdentifier          :: !(Maybe Text)     , _dcmIsClusterWriter               :: !(Maybe Bool)     , _dcmDBClusterParameterGroupStatus :: !(Maybe Text)     } deriving (Eq,Read,Show,Data,Typeable,Generic)@@ -508,6 +519,8 @@ -- -- Use one of the following lenses to modify other fields as desired: --+-- * 'dcmPromotionTier'+-- -- * 'dcmDBInstanceIdentifier' -- -- * 'dcmIsClusterWriter'@@ -517,11 +530,19 @@     :: DBClusterMember dbClusterMember =     DBClusterMember'-    { _dcmDBInstanceIdentifier = Nothing+    { _dcmPromotionTier = Nothing+    , _dcmDBInstanceIdentifier = Nothing     , _dcmIsClusterWriter = Nothing     , _dcmDBClusterParameterGroupStatus = Nothing     } +-- | A value that specifies the order in which an Aurora Replica is promoted+-- to the primary instance after a failure of the existing primary+-- instance. For more information, see+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.+dcmPromotionTier :: Lens' DBClusterMember (Maybe Int)+dcmPromotionTier = lens _dcmPromotionTier (\ s a -> s{_dcmPromotionTier = a});+ -- | Specifies the instance identifier for this member of the DB cluster. dcmDBInstanceIdentifier :: Lens' DBClusterMember (Maybe Text) dcmDBInstanceIdentifier = lens _dcmDBInstanceIdentifier (\ s a -> s{_dcmDBInstanceIdentifier = a});@@ -539,12 +560,15 @@ instance FromXML DBClusterMember where         parseXML x           = DBClusterMember' <$>-              (x .@? "DBInstanceIdentifier") <*>-                (x .@? "IsClusterWriter")+              (x .@? "PromotionTier") <*>+                (x .@? "DBInstanceIdentifier")+                <*> (x .@? "IsClusterWriter")                 <*> (x .@? "DBClusterParameterGroupStatus")  instance Hashable DBClusterMember +instance NFData DBClusterMember+ -- | Contains status information for a DB cluster option group. -- -- /See:/ 'dbClusterOptionGroupStatus' smart constructor.@@ -584,6 +608,8 @@  instance Hashable DBClusterOptionGroupStatus +instance NFData DBClusterOptionGroupStatus+ -- | Contains the result of a successful invocation of the -- < CreateDBClusterParameterGroup> action. --@@ -639,6 +665,8 @@  instance Hashable DBClusterParameterGroup +instance NFData DBClusterParameterGroup+ -- | -- -- /See:/ 'dbClusterParameterGroupNameMessage' smart constructor.@@ -678,6 +706,8 @@  instance Hashable DBClusterParameterGroupNameMessage +instance NFData DBClusterParameterGroupNameMessage+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < CreateDBClusterSnapshot>@@ -867,6 +897,8 @@  instance Hashable DBClusterSnapshot +instance NFData DBClusterSnapshot+ -- | This data type is used as a response element in the action -- < DescribeDBEngineVersions>. --@@ -969,6 +1001,8 @@  instance Hashable DBEngineVersion +instance NFData DBEngineVersion+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < CreateDBInstance>@@ -996,6 +1030,7 @@     , _diEngine                                :: !(Maybe Text)     , _diLatestRestorableTime                  :: !(Maybe ISO8601)     , _diDBInstanceClass                       :: !(Maybe Text)+    , _diPromotionTier                         :: !(Maybe Int)     , _diLicenseModel                          :: !(Maybe Text)     , _diPreferredMaintenanceWindow            :: !(Maybe Text)     , _diCACertificateIdentifier               :: !(Maybe Text)@@ -1022,6 +1057,7 @@     , _diPendingModifiedValues                 :: !(Maybe PendingModifiedValues)     , _diStorageType                           :: !(Maybe Text)     , _diStatusInfos                           :: !(Maybe [DBInstanceStatusInfo])+    , _diDomainMemberships                     :: !(Maybe [DomainMembership])     , _diDBName                                :: !(Maybe Text)     } deriving (Eq,Read,Show,Data,Typeable,Generic) @@ -1061,6 +1097,8 @@ -- -- * 'diDBInstanceClass' --+-- * 'diPromotionTier'+-- -- * 'diLicenseModel' -- -- * 'diPreferredMaintenanceWindow'@@ -1113,6 +1151,8 @@ -- -- * 'diStatusInfos' --+-- * 'diDomainMemberships'+-- -- * 'diDBName' dbInstance     :: DBInstance@@ -1134,6 +1174,7 @@     , _diEngine = Nothing     , _diLatestRestorableTime = Nothing     , _diDBInstanceClass = Nothing+    , _diPromotionTier = Nothing     , _diLicenseModel = Nothing     , _diPreferredMaintenanceWindow = Nothing     , _diCACertificateIdentifier = Nothing@@ -1160,6 +1201,7 @@     , _diPendingModifiedValues = Nothing     , _diStorageType = Nothing     , _diStatusInfos = Nothing+    , _diDomainMemberships = Nothing     , _diDBName = Nothing     } @@ -1253,6 +1295,13 @@ diDBInstanceClass :: Lens' DBInstance (Maybe Text) diDBInstanceClass = lens _diDBInstanceClass (\ s a -> s{_diDBInstanceClass = a}); +-- | A value that specifies the order in which an Aurora Replica is promoted+-- to the primary instance after a failure of the existing primary+-- instance. For more information, see+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.+diPromotionTier :: Lens' DBInstance (Maybe Int)+diPromotionTier = lens _diPromotionTier (\ s a -> s{_diPromotionTier = a});+ -- | License model information for this DB instance. diLicenseModel :: Lens' DBInstance (Maybe Text) diLicenseModel = lens _diLicenseModel (\ s a -> s{_diLicenseModel = a});@@ -1379,6 +1428,11 @@ diStatusInfos :: Lens' DBInstance [DBInstanceStatusInfo] diStatusInfos = lens _diStatusInfos (\ s a -> s{_diStatusInfos = a}) . _Default . _Coerce; +-- | The Active Directory Domain membership records associated with the DB+-- instance.+diDomainMemberships :: Lens' DBInstance [DomainMembership]+diDomainMemberships = lens _diDomainMemberships (\ s a -> s{_diDomainMemberships = a}) . _Default . _Coerce;+ -- | The meaning of this parameter differs according to the database engine -- you use. For example, this value returns MySQL, MariaDB, or PostgreSQL -- information when returning values from CreateDBInstanceReadReplica since@@ -1423,6 +1477,7 @@                 <*> (x .@? "Engine")                 <*> (x .@? "LatestRestorableTime")                 <*> (x .@? "DBInstanceClass")+                <*> (x .@? "PromotionTier")                 <*> (x .@? "LicenseModel")                 <*> (x .@? "PreferredMaintenanceWindow")                 <*> (x .@? "CACertificateIdentifier")@@ -1457,10 +1512,15 @@                 <*>                 (x .@? "StatusInfos" .!@ mempty >>=                    may (parseXMLList "DBInstanceStatusInfo"))+                <*>+                (x .@? "DomainMemberships" .!@ mempty >>=+                   may (parseXMLList "DomainMembership"))                 <*> (x .@? "DBName")  instance Hashable DBInstance +instance NFData DBInstance+ -- | Provides a list of status information for a DB instance. -- -- /See:/ 'dbInstanceStatusInfo' smart constructor.@@ -1520,6 +1580,8 @@  instance Hashable DBInstanceStatusInfo +instance NFData DBInstanceStatusInfo+ -- | Contains the result of a successful invocation of the -- < CreateDBParameterGroup> action. --@@ -1574,6 +1636,8 @@  instance Hashable DBParameterGroup +instance NFData DBParameterGroup+ -- | Contains the result of a successful invocation of the -- < ModifyDBParameterGroup> or < ResetDBParameterGroup> action. --@@ -1605,6 +1669,8 @@  instance Hashable DBParameterGroupNameMessage +instance NFData DBParameterGroupNameMessage+ -- | The status of the DB parameter group. -- -- This data type is used as a response element in the following actions:@@ -1653,6 +1719,8 @@  instance Hashable DBParameterGroupStatus +instance NFData DBParameterGroupStatus+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < DescribeDBSecurityGroups>@@ -1738,6 +1806,8 @@  instance Hashable DBSecurityGroup +instance NFData DBSecurityGroup+ -- | This data type is used as a response element in the following actions: -- -- -   < ModifyDBInstance>@@ -1781,6 +1851,8 @@  instance Hashable DBSecurityGroupMembership +instance NFData DBSecurityGroupMembership+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < CreateDBSnapshot>@@ -2023,6 +2095,8 @@  instance Hashable DBSnapshot +instance NFData DBSnapshot+ -- | Contains the name and values of a manual DB snapshot attribute -- -- Manual DB snapshot attributes are used to authorize other AWS accounts@@ -2076,6 +2150,8 @@  instance Hashable DBSnapshotAttribute +instance NFData DBSnapshotAttribute+ -- | Contains the results of a successful call to the -- < DescribeDBSnapshotAttributes> API. --@@ -2121,6 +2197,8 @@  instance Hashable DBSnapshotAttributesResult +instance NFData DBSnapshotAttributesResult+ -- | Contains the result of a successful invocation of the following actions: -- -- -   < CreateDBSubnetGroup>@@ -2195,6 +2273,8 @@  instance Hashable DBSubnetGroup +instance NFData DBSubnetGroup+ -- | This data type is used as a response element to < DescribeDBLogFiles>. -- -- /See:/ 'describeDBLogFilesDetails' smart constructor.@@ -2242,6 +2322,69 @@  instance Hashable DescribeDBLogFilesDetails +instance NFData DescribeDBLogFilesDetails++-- | An Active Directory Domain membership record associated with the DB+-- instance.+--+-- /See:/ 'domainMembership' smart constructor.+data DomainMembership = DomainMembership'+    { _dmStatus      :: !(Maybe Text)+    , _dmFQDN        :: !(Maybe Text)+    , _dmDomain      :: !(Maybe Text)+    , _dmIAMRoleName :: !(Maybe Text)+    } deriving (Eq,Read,Show,Data,Typeable,Generic)++-- | Creates a value of 'DomainMembership' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dmStatus'+--+-- * 'dmFQDN'+--+-- * 'dmDomain'+--+-- * 'dmIAMRoleName'+domainMembership+    :: DomainMembership+domainMembership =+    DomainMembership'+    { _dmStatus = Nothing+    , _dmFQDN = Nothing+    , _dmDomain = Nothing+    , _dmIAMRoleName = Nothing+    }++-- | The status of the DB instance\'s Active Directory Domain membership,+-- such as joined, pending-join, failed etc).+dmStatus :: Lens' DomainMembership (Maybe Text)+dmStatus = lens _dmStatus (\ s a -> s{_dmStatus = a});++-- | The fully qualified domain name of the Active Directory Domain.+dmFQDN :: Lens' DomainMembership (Maybe Text)+dmFQDN = lens _dmFQDN (\ s a -> s{_dmFQDN = a});++-- | The identifier of the Active Directory Domain.+dmDomain :: Lens' DomainMembership (Maybe Text)+dmDomain = lens _dmDomain (\ s a -> s{_dmDomain = a});++-- | The name of the IAM role to be used when making API calls to the+-- Directory Service.+dmIAMRoleName :: Lens' DomainMembership (Maybe Text)+dmIAMRoleName = lens _dmIAMRoleName (\ s a -> s{_dmIAMRoleName = a});++instance FromXML DomainMembership where+        parseXML x+          = DomainMembership' <$>+              (x .@? "Status") <*> (x .@? "FQDN") <*>+                (x .@? "Domain")+                <*> (x .@? "IAMRoleName")++instance Hashable DomainMembership++instance NFData DomainMembership+ -- | This data type is used as a response element in the following actions: -- -- -   < AuthorizeDBSecurityGroupIngress>@@ -2305,6 +2448,8 @@  instance Hashable EC2SecurityGroup +instance NFData EC2SecurityGroup+ -- | This data type is used as a response element in the following actions: -- -- -   < CreateDBInstance>@@ -2357,6 +2502,8 @@  instance Hashable Endpoint +instance NFData Endpoint+ -- | Contains the result of a successful invocation of the -- < DescribeEngineDefaultParameters> action. --@@ -2410,6 +2557,8 @@  instance Hashable EngineDefaults +instance NFData EngineDefaults+ -- | This data type is used as a response element in the < DescribeEvents> -- action. --@@ -2478,6 +2627,8 @@  instance Hashable Event +instance NFData Event+ -- | Contains the results of a successful invocation of the -- < DescribeEventCategories> action. --@@ -2519,6 +2670,8 @@  instance Hashable EventCategoriesMap +instance NFData EventCategoriesMap+ -- | Contains the results of a successful invocation of the -- < DescribeEventSubscriptions> action. --@@ -2636,6 +2789,8 @@  instance Hashable EventSubscription +instance NFData EventSubscription+ -- | /See:/ 'filter'' smart constructor. data Filter = Filter'     { _fName   :: !Text@@ -2668,6 +2823,8 @@  instance Hashable Filter +instance NFData Filter+ instance ToQuery Filter where         toQuery Filter'{..}           = mconcat@@ -2713,6 +2870,8 @@  instance Hashable IPRange +instance NFData IPRange+ -- | Option details. -- -- /See:/ 'option' smart constructor.@@ -2813,6 +2972,8 @@  instance Hashable Option +instance NFData Option+ -- | A list of all available options -- -- /See:/ 'optionConfiguration' smart constructor.@@ -2871,6 +3032,8 @@  instance Hashable OptionConfiguration +instance NFData OptionConfiguration+ instance ToQuery OptionConfiguration where         toQuery OptionConfiguration'{..}           = mconcat@@ -2980,6 +3143,8 @@  instance Hashable OptionGroup +instance NFData OptionGroup+ -- | Provides information on the option groups the DB instance is a member -- of. --@@ -3022,6 +3187,8 @@  instance Hashable OptionGroupMembership +instance NFData OptionGroupMembership+ -- | Available option. -- -- /See:/ 'optionGroupOption' smart constructor.@@ -3153,6 +3320,8 @@  instance Hashable OptionGroupOption +instance NFData OptionGroupOption+ -- | Option group option settings are used to display settings available for -- each option with their default values and other information. These -- values are used with the DescribeOptionGroupOptions action.@@ -3230,6 +3399,8 @@  instance Hashable OptionGroupOptionSetting +instance NFData OptionGroupOptionSetting+ -- | Option settings are the actual settings being applied or configured for -- that option. It is used when you modify an option group or describe -- option groups. For example, the NATIVE_NETWORK_ENCRYPTION option has a@@ -3336,6 +3507,8 @@  instance Hashable OptionSetting +instance NFData OptionSetting+ instance ToQuery OptionSetting where         toQuery OptionSetting'{..}           = mconcat@@ -3481,6 +3654,8 @@  instance Hashable OrderableDBInstanceOption +instance NFData OrderableDBInstanceOption+ -- | This data type is used as a request parameter in the -- < ModifyDBParameterGroup> and < ResetDBParameterGroup> actions. --@@ -3597,6 +3772,8 @@  instance Hashable Parameter +instance NFData Parameter+ instance ToQuery Parameter where         toQuery Parameter'{..}           = mconcat@@ -3698,6 +3875,8 @@  instance Hashable PendingMaintenanceAction +instance NFData PendingMaintenanceAction+ -- | This data type is used as a response element in the < ModifyDBInstance> -- action. --@@ -3826,6 +4005,8 @@  instance Hashable PendingModifiedValues +instance NFData PendingModifiedValues+ -- | This data type is used as a response element in the -- < DescribeReservedDBInstances> and -- < DescribeReservedDBInstancesOfferings> actions.@@ -3867,6 +4048,8 @@  instance Hashable RecurringCharge +instance NFData RecurringCharge+ -- | This data type is used as a response element in the -- < DescribeReservedDBInstances> and -- < PurchaseReservedDBInstancesOffering> actions.@@ -4017,6 +4200,8 @@  instance Hashable ReservedDBInstance +instance NFData ReservedDBInstance+ -- | This data type is used as a response element in the -- < DescribeReservedDBInstancesOfferings> action. --@@ -4131,6 +4316,8 @@  instance Hashable ReservedDBInstancesOffering +instance NFData ReservedDBInstancesOffering+ -- | Describes the pending maintenance actions for a resource. -- -- /See:/ 'resourcePendingMaintenanceActions' smart constructor.@@ -4173,6 +4360,8 @@  instance Hashable ResourcePendingMaintenanceActions +instance NFData ResourcePendingMaintenanceActions+ -- | This data type is used as a response element in the -- < DescribeDBSubnetGroups> action. --@@ -4221,6 +4410,8 @@  instance Hashable Subnet +instance NFData Subnet+ -- | Metadata assigned to an Amazon RDS resource consisting of a key-value -- pair. --@@ -4267,6 +4458,8 @@  instance Hashable Tag +instance NFData Tag+ instance ToQuery Tag where         toQuery Tag'{..}           = mconcat ["Value" =: _tagValue, "Key" =: _tagKey]@@ -4341,6 +4534,8 @@  instance Hashable UpgradeTarget +instance NFData UpgradeTarget+ -- | This data type is used as a response element for queries on VPC security -- group membership. --@@ -4379,3 +4574,5 @@               (x .@? "Status") <*> (x .@? "VpcSecurityGroupId")  instance Hashable VPCSecurityGroupMembership++instance NFData VPCSecurityGroupMembership

@@ -37,6 +37,7 @@         PendingReboot -> "pending-reboot"  instance Hashable     ApplyMethod+instance NFData       ApplyMethod instance ToByteString ApplyMethod instance ToQuery      ApplyMethod instance ToHeader     ApplyMethod@@ -74,6 +75,7 @@         DBSnapshot -> "db-snapshot"  instance Hashable     SourceType+instance NFData       SourceType instance ToByteString SourceType instance ToQuery      SourceType instance ToHeader     SourceType