{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.DocumentDB.Types.PendingModifiedValues where
import qualified Amazonka.Core as Core
import Amazonka.DocumentDB.Types.PendingCloudwatchLogsExports
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data PendingModifiedValues = PendingModifiedValues'
{
PendingModifiedValues -> Maybe Text
engineVersion :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Text
masterUserPassword :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Text
dbSubnetGroupName :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Int
iops :: Prelude.Maybe Prelude.Int,
PendingModifiedValues -> Maybe Text
dbInstanceClass :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Text
licenseModel :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Text
cACertificateIdentifier :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe Text
dbInstanceIdentifier :: Prelude.Maybe Prelude.Text,
PendingModifiedValues -> Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports :: Prelude.Maybe PendingCloudwatchLogsExports,
PendingModifiedValues -> Maybe Int
backupRetentionPeriod :: Prelude.Maybe Prelude.Int,
PendingModifiedValues -> Maybe Bool
multiAZ :: Prelude.Maybe Prelude.Bool,
PendingModifiedValues -> Maybe Int
allocatedStorage :: Prelude.Maybe Prelude.Int,
PendingModifiedValues -> Maybe Int
port :: Prelude.Maybe Prelude.Int,
PendingModifiedValues -> Maybe Text
storageType :: Prelude.Maybe Prelude.Text
}
deriving (PendingModifiedValues -> PendingModifiedValues -> Bool
(PendingModifiedValues -> PendingModifiedValues -> Bool)
-> (PendingModifiedValues -> PendingModifiedValues -> Bool)
-> Eq PendingModifiedValues
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PendingModifiedValues -> PendingModifiedValues -> Bool
$c/= :: PendingModifiedValues -> PendingModifiedValues -> Bool
== :: PendingModifiedValues -> PendingModifiedValues -> Bool
$c== :: PendingModifiedValues -> PendingModifiedValues -> Bool
Prelude.Eq, ReadPrec [PendingModifiedValues]
ReadPrec PendingModifiedValues
Int -> ReadS PendingModifiedValues
ReadS [PendingModifiedValues]
(Int -> ReadS PendingModifiedValues)
-> ReadS [PendingModifiedValues]
-> ReadPrec PendingModifiedValues
-> ReadPrec [PendingModifiedValues]
-> Read PendingModifiedValues
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [PendingModifiedValues]
$creadListPrec :: ReadPrec [PendingModifiedValues]
readPrec :: ReadPrec PendingModifiedValues
$creadPrec :: ReadPrec PendingModifiedValues
readList :: ReadS [PendingModifiedValues]
$creadList :: ReadS [PendingModifiedValues]
readsPrec :: Int -> ReadS PendingModifiedValues
$creadsPrec :: Int -> ReadS PendingModifiedValues
Prelude.Read, Int -> PendingModifiedValues -> ShowS
[PendingModifiedValues] -> ShowS
PendingModifiedValues -> String
(Int -> PendingModifiedValues -> ShowS)
-> (PendingModifiedValues -> String)
-> ([PendingModifiedValues] -> ShowS)
-> Show PendingModifiedValues
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PendingModifiedValues] -> ShowS
$cshowList :: [PendingModifiedValues] -> ShowS
show :: PendingModifiedValues -> String
$cshow :: PendingModifiedValues -> String
showsPrec :: Int -> PendingModifiedValues -> ShowS
$cshowsPrec :: Int -> PendingModifiedValues -> ShowS
Prelude.Show, (forall x. PendingModifiedValues -> Rep PendingModifiedValues x)
-> (forall x. Rep PendingModifiedValues x -> PendingModifiedValues)
-> Generic PendingModifiedValues
forall x. Rep PendingModifiedValues x -> PendingModifiedValues
forall x. PendingModifiedValues -> Rep PendingModifiedValues x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PendingModifiedValues x -> PendingModifiedValues
$cfrom :: forall x. PendingModifiedValues -> Rep PendingModifiedValues x
Prelude.Generic)
newPendingModifiedValues ::
PendingModifiedValues
newPendingModifiedValues :: PendingModifiedValues
newPendingModifiedValues =
PendingModifiedValues' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues
PendingModifiedValues'
{ $sel:engineVersion:PendingModifiedValues' :: Maybe Text
engineVersion =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:masterUserPassword:PendingModifiedValues' :: Maybe Text
masterUserPassword = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:dbSubnetGroupName:PendingModifiedValues' :: Maybe Text
dbSubnetGroupName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:iops:PendingModifiedValues' :: Maybe Int
iops = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:dbInstanceClass:PendingModifiedValues' :: Maybe Text
dbInstanceClass = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:licenseModel:PendingModifiedValues' :: Maybe Text
licenseModel = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:cACertificateIdentifier:PendingModifiedValues' :: Maybe Text
cACertificateIdentifier = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:dbInstanceIdentifier:PendingModifiedValues' :: Maybe Text
dbInstanceIdentifier = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:pendingCloudwatchLogsExports:PendingModifiedValues' :: Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports = Maybe PendingCloudwatchLogsExports
forall a. Maybe a
Prelude.Nothing,
$sel:backupRetentionPeriod:PendingModifiedValues' :: Maybe Int
backupRetentionPeriod = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:multiAZ:PendingModifiedValues' :: Maybe Bool
multiAZ = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:allocatedStorage:PendingModifiedValues' :: Maybe Int
allocatedStorage = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:port:PendingModifiedValues' :: Maybe Int
port = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:storageType:PendingModifiedValues' :: Maybe Text
storageType = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
pendingModifiedValues_engineVersion :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_engineVersion :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_engineVersion = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
engineVersion :: Maybe Text
$sel:engineVersion:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
engineVersion} -> Maybe Text
engineVersion) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:engineVersion:PendingModifiedValues' :: Maybe Text
engineVersion = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_masterUserPassword :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_masterUserPassword :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_masterUserPassword = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
masterUserPassword :: Maybe Text
$sel:masterUserPassword:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
masterUserPassword} -> Maybe Text
masterUserPassword) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:masterUserPassword:PendingModifiedValues' :: Maybe Text
masterUserPassword = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_dbSubnetGroupName :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_dbSubnetGroupName :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_dbSubnetGroupName = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
dbSubnetGroupName :: Maybe Text
$sel:dbSubnetGroupName:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
dbSubnetGroupName} -> Maybe Text
dbSubnetGroupName) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:dbSubnetGroupName:PendingModifiedValues' :: Maybe Text
dbSubnetGroupName = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_iops :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Int)
pendingModifiedValues_iops :: (Maybe Int -> f (Maybe Int))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_iops = (PendingModifiedValues -> Maybe Int)
-> (PendingModifiedValues -> Maybe Int -> PendingModifiedValues)
-> Lens
PendingModifiedValues PendingModifiedValues (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Int
iops :: Maybe Int
$sel:iops:PendingModifiedValues' :: PendingModifiedValues -> Maybe Int
iops} -> Maybe Int
iops) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Int
a -> PendingModifiedValues
s {$sel:iops:PendingModifiedValues' :: Maybe Int
iops = Maybe Int
a} :: PendingModifiedValues)
pendingModifiedValues_dbInstanceClass :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_dbInstanceClass :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_dbInstanceClass = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
dbInstanceClass :: Maybe Text
$sel:dbInstanceClass:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
dbInstanceClass} -> Maybe Text
dbInstanceClass) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:dbInstanceClass:PendingModifiedValues' :: Maybe Text
dbInstanceClass = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_licenseModel :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_licenseModel :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_licenseModel = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
licenseModel :: Maybe Text
$sel:licenseModel:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
licenseModel} -> Maybe Text
licenseModel) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:licenseModel:PendingModifiedValues' :: Maybe Text
licenseModel = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_cACertificateIdentifier :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_cACertificateIdentifier :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_cACertificateIdentifier = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
cACertificateIdentifier :: Maybe Text
$sel:cACertificateIdentifier:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
cACertificateIdentifier} -> Maybe Text
cACertificateIdentifier) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:cACertificateIdentifier:PendingModifiedValues' :: Maybe Text
cACertificateIdentifier = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_dbInstanceIdentifier :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_dbInstanceIdentifier :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_dbInstanceIdentifier = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
dbInstanceIdentifier :: Maybe Text
$sel:dbInstanceIdentifier:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
dbInstanceIdentifier} -> Maybe Text
dbInstanceIdentifier) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:dbInstanceIdentifier:PendingModifiedValues' :: Maybe Text
dbInstanceIdentifier = Maybe Text
a} :: PendingModifiedValues)
pendingModifiedValues_pendingCloudwatchLogsExports :: Lens.Lens' PendingModifiedValues (Prelude.Maybe PendingCloudwatchLogsExports)
pendingModifiedValues_pendingCloudwatchLogsExports :: (Maybe PendingCloudwatchLogsExports
-> f (Maybe PendingCloudwatchLogsExports))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_pendingCloudwatchLogsExports = (PendingModifiedValues -> Maybe PendingCloudwatchLogsExports)
-> (PendingModifiedValues
-> Maybe PendingCloudwatchLogsExports -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe PendingCloudwatchLogsExports)
(Maybe PendingCloudwatchLogsExports)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports :: Maybe PendingCloudwatchLogsExports
$sel:pendingCloudwatchLogsExports:PendingModifiedValues' :: PendingModifiedValues -> Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports} -> Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe PendingCloudwatchLogsExports
a -> PendingModifiedValues
s {$sel:pendingCloudwatchLogsExports:PendingModifiedValues' :: Maybe PendingCloudwatchLogsExports
pendingCloudwatchLogsExports = Maybe PendingCloudwatchLogsExports
a} :: PendingModifiedValues)
pendingModifiedValues_backupRetentionPeriod :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Int)
pendingModifiedValues_backupRetentionPeriod :: (Maybe Int -> f (Maybe Int))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_backupRetentionPeriod = (PendingModifiedValues -> Maybe Int)
-> (PendingModifiedValues -> Maybe Int -> PendingModifiedValues)
-> Lens
PendingModifiedValues PendingModifiedValues (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Int
backupRetentionPeriod :: Maybe Int
$sel:backupRetentionPeriod:PendingModifiedValues' :: PendingModifiedValues -> Maybe Int
backupRetentionPeriod} -> Maybe Int
backupRetentionPeriod) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Int
a -> PendingModifiedValues
s {$sel:backupRetentionPeriod:PendingModifiedValues' :: Maybe Int
backupRetentionPeriod = Maybe Int
a} :: PendingModifiedValues)
pendingModifiedValues_multiAZ :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Bool)
pendingModifiedValues_multiAZ :: (Maybe Bool -> f (Maybe Bool))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_multiAZ = (PendingModifiedValues -> Maybe Bool)
-> (PendingModifiedValues -> Maybe Bool -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Bool)
(Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Bool
multiAZ :: Maybe Bool
$sel:multiAZ:PendingModifiedValues' :: PendingModifiedValues -> Maybe Bool
multiAZ} -> Maybe Bool
multiAZ) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Bool
a -> PendingModifiedValues
s {$sel:multiAZ:PendingModifiedValues' :: Maybe Bool
multiAZ = Maybe Bool
a} :: PendingModifiedValues)
pendingModifiedValues_allocatedStorage :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Int)
pendingModifiedValues_allocatedStorage :: (Maybe Int -> f (Maybe Int))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_allocatedStorage = (PendingModifiedValues -> Maybe Int)
-> (PendingModifiedValues -> Maybe Int -> PendingModifiedValues)
-> Lens
PendingModifiedValues PendingModifiedValues (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Int
allocatedStorage :: Maybe Int
$sel:allocatedStorage:PendingModifiedValues' :: PendingModifiedValues -> Maybe Int
allocatedStorage} -> Maybe Int
allocatedStorage) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Int
a -> PendingModifiedValues
s {$sel:allocatedStorage:PendingModifiedValues' :: Maybe Int
allocatedStorage = Maybe Int
a} :: PendingModifiedValues)
pendingModifiedValues_port :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Int)
pendingModifiedValues_port :: (Maybe Int -> f (Maybe Int))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_port = (PendingModifiedValues -> Maybe Int)
-> (PendingModifiedValues -> Maybe Int -> PendingModifiedValues)
-> Lens
PendingModifiedValues PendingModifiedValues (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Int
port :: Maybe Int
$sel:port:PendingModifiedValues' :: PendingModifiedValues -> Maybe Int
port} -> Maybe Int
port) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Int
a -> PendingModifiedValues
s {$sel:port:PendingModifiedValues' :: Maybe Int
port = Maybe Int
a} :: PendingModifiedValues)
pendingModifiedValues_storageType :: Lens.Lens' PendingModifiedValues (Prelude.Maybe Prelude.Text)
pendingModifiedValues_storageType :: (Maybe Text -> f (Maybe Text))
-> PendingModifiedValues -> f PendingModifiedValues
pendingModifiedValues_storageType = (PendingModifiedValues -> Maybe Text)
-> (PendingModifiedValues -> Maybe Text -> PendingModifiedValues)
-> Lens
PendingModifiedValues
PendingModifiedValues
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\PendingModifiedValues' {Maybe Text
storageType :: Maybe Text
$sel:storageType:PendingModifiedValues' :: PendingModifiedValues -> Maybe Text
storageType} -> Maybe Text
storageType) (\s :: PendingModifiedValues
s@PendingModifiedValues' {} Maybe Text
a -> PendingModifiedValues
s {$sel:storageType:PendingModifiedValues' :: Maybe Text
storageType = Maybe Text
a} :: PendingModifiedValues)
instance Core.FromXML PendingModifiedValues where
parseXML :: [Node] -> Either String PendingModifiedValues
parseXML [Node]
x =
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues
PendingModifiedValues'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"EngineVersion")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"MasterUserPassword")
Either
String
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"DBSubnetGroupName")
Either
String
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Int)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"Iops")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"DBInstanceClass")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"LicenseModel")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"CACertificateIdentifier")
Either
String
(Maybe Text
-> Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either
String
(Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"DBInstanceIdentifier")
Either
String
(Maybe PendingCloudwatchLogsExports
-> Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe PendingCloudwatchLogsExports)
-> Either
String
(Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node]
-> Text -> Either String (Maybe PendingCloudwatchLogsExports)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"PendingCloudwatchLogsExports")
Either
String
(Maybe Int
-> Maybe Bool
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> PendingModifiedValues)
-> Either String (Maybe Int)
-> Either
String
(Maybe Bool
-> Maybe Int -> Maybe Int -> Maybe Text -> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"BackupRetentionPeriod")
Either
String
(Maybe Bool
-> Maybe Int -> Maybe Int -> Maybe Text -> PendingModifiedValues)
-> Either String (Maybe Bool)
-> Either
String
(Maybe Int -> Maybe Int -> Maybe Text -> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Bool)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"MultiAZ")
Either
String
(Maybe Int -> Maybe Int -> Maybe Text -> PendingModifiedValues)
-> Either String (Maybe Int)
-> Either String (Maybe Int -> Maybe Text -> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"AllocatedStorage")
Either String (Maybe Int -> Maybe Text -> PendingModifiedValues)
-> Either String (Maybe Int)
-> Either String (Maybe Text -> PendingModifiedValues)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"Port")
Either String (Maybe Text -> PendingModifiedValues)
-> Either String (Maybe Text)
-> Either String PendingModifiedValues
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"StorageType")
instance Prelude.Hashable PendingModifiedValues
instance Prelude.NFData PendingModifiedValues