{-# 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.ElastiCache.Types.LogDeliveryConfigurationRequest where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.ElastiCache.Types.DestinationDetails
import Amazonka.ElastiCache.Types.DestinationType
import Amazonka.ElastiCache.Types.LogFormat
import Amazonka.ElastiCache.Types.LogType
import qualified Amazonka.Prelude as Prelude
data LogDeliveryConfigurationRequest = LogDeliveryConfigurationRequest'
{
LogDeliveryConfigurationRequest -> Maybe DestinationDetails
destinationDetails :: Prelude.Maybe DestinationDetails,
LogDeliveryConfigurationRequest -> Maybe DestinationType
destinationType :: Prelude.Maybe DestinationType,
LogDeliveryConfigurationRequest -> Maybe Bool
enabled :: Prelude.Maybe Prelude.Bool,
LogDeliveryConfigurationRequest -> Maybe LogFormat
logFormat :: Prelude.Maybe LogFormat,
LogDeliveryConfigurationRequest -> Maybe LogType
logType :: Prelude.Maybe LogType
}
deriving (LogDeliveryConfigurationRequest
-> LogDeliveryConfigurationRequest -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LogDeliveryConfigurationRequest
-> LogDeliveryConfigurationRequest -> Bool
$c/= :: LogDeliveryConfigurationRequest
-> LogDeliveryConfigurationRequest -> Bool
== :: LogDeliveryConfigurationRequest
-> LogDeliveryConfigurationRequest -> Bool
$c== :: LogDeliveryConfigurationRequest
-> LogDeliveryConfigurationRequest -> Bool
Prelude.Eq, ReadPrec [LogDeliveryConfigurationRequest]
ReadPrec LogDeliveryConfigurationRequest
Int -> ReadS LogDeliveryConfigurationRequest
ReadS [LogDeliveryConfigurationRequest]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [LogDeliveryConfigurationRequest]
$creadListPrec :: ReadPrec [LogDeliveryConfigurationRequest]
readPrec :: ReadPrec LogDeliveryConfigurationRequest
$creadPrec :: ReadPrec LogDeliveryConfigurationRequest
readList :: ReadS [LogDeliveryConfigurationRequest]
$creadList :: ReadS [LogDeliveryConfigurationRequest]
readsPrec :: Int -> ReadS LogDeliveryConfigurationRequest
$creadsPrec :: Int -> ReadS LogDeliveryConfigurationRequest
Prelude.Read, Int -> LogDeliveryConfigurationRequest -> ShowS
[LogDeliveryConfigurationRequest] -> ShowS
LogDeliveryConfigurationRequest -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LogDeliveryConfigurationRequest] -> ShowS
$cshowList :: [LogDeliveryConfigurationRequest] -> ShowS
show :: LogDeliveryConfigurationRequest -> String
$cshow :: LogDeliveryConfigurationRequest -> String
showsPrec :: Int -> LogDeliveryConfigurationRequest -> ShowS
$cshowsPrec :: Int -> LogDeliveryConfigurationRequest -> ShowS
Prelude.Show, forall x.
Rep LogDeliveryConfigurationRequest x
-> LogDeliveryConfigurationRequest
forall x.
LogDeliveryConfigurationRequest
-> Rep LogDeliveryConfigurationRequest x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep LogDeliveryConfigurationRequest x
-> LogDeliveryConfigurationRequest
$cfrom :: forall x.
LogDeliveryConfigurationRequest
-> Rep LogDeliveryConfigurationRequest x
Prelude.Generic)
newLogDeliveryConfigurationRequest ::
LogDeliveryConfigurationRequest
newLogDeliveryConfigurationRequest :: LogDeliveryConfigurationRequest
newLogDeliveryConfigurationRequest =
LogDeliveryConfigurationRequest'
{ $sel:destinationDetails:LogDeliveryConfigurationRequest' :: Maybe DestinationDetails
destinationDetails =
forall a. Maybe a
Prelude.Nothing,
$sel:destinationType:LogDeliveryConfigurationRequest' :: Maybe DestinationType
destinationType = forall a. Maybe a
Prelude.Nothing,
$sel:enabled:LogDeliveryConfigurationRequest' :: Maybe Bool
enabled = forall a. Maybe a
Prelude.Nothing,
$sel:logFormat:LogDeliveryConfigurationRequest' :: Maybe LogFormat
logFormat = forall a. Maybe a
Prelude.Nothing,
$sel:logType:LogDeliveryConfigurationRequest' :: Maybe LogType
logType = forall a. Maybe a
Prelude.Nothing
}
logDeliveryConfigurationRequest_destinationDetails :: Lens.Lens' LogDeliveryConfigurationRequest (Prelude.Maybe DestinationDetails)
logDeliveryConfigurationRequest_destinationDetails :: Lens' LogDeliveryConfigurationRequest (Maybe DestinationDetails)
logDeliveryConfigurationRequest_destinationDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LogDeliveryConfigurationRequest' {Maybe DestinationDetails
destinationDetails :: Maybe DestinationDetails
$sel:destinationDetails:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationDetails
destinationDetails} -> Maybe DestinationDetails
destinationDetails) (\s :: LogDeliveryConfigurationRequest
s@LogDeliveryConfigurationRequest' {} Maybe DestinationDetails
a -> LogDeliveryConfigurationRequest
s {$sel:destinationDetails:LogDeliveryConfigurationRequest' :: Maybe DestinationDetails
destinationDetails = Maybe DestinationDetails
a} :: LogDeliveryConfigurationRequest)
logDeliveryConfigurationRequest_destinationType :: Lens.Lens' LogDeliveryConfigurationRequest (Prelude.Maybe DestinationType)
logDeliveryConfigurationRequest_destinationType :: Lens' LogDeliveryConfigurationRequest (Maybe DestinationType)
logDeliveryConfigurationRequest_destinationType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LogDeliveryConfigurationRequest' {Maybe DestinationType
destinationType :: Maybe DestinationType
$sel:destinationType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationType
destinationType} -> Maybe DestinationType
destinationType) (\s :: LogDeliveryConfigurationRequest
s@LogDeliveryConfigurationRequest' {} Maybe DestinationType
a -> LogDeliveryConfigurationRequest
s {$sel:destinationType:LogDeliveryConfigurationRequest' :: Maybe DestinationType
destinationType = Maybe DestinationType
a} :: LogDeliveryConfigurationRequest)
logDeliveryConfigurationRequest_enabled :: Lens.Lens' LogDeliveryConfigurationRequest (Prelude.Maybe Prelude.Bool)
logDeliveryConfigurationRequest_enabled :: Lens' LogDeliveryConfigurationRequest (Maybe Bool)
logDeliveryConfigurationRequest_enabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LogDeliveryConfigurationRequest' {Maybe Bool
enabled :: Maybe Bool
$sel:enabled:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe Bool
enabled} -> Maybe Bool
enabled) (\s :: LogDeliveryConfigurationRequest
s@LogDeliveryConfigurationRequest' {} Maybe Bool
a -> LogDeliveryConfigurationRequest
s {$sel:enabled:LogDeliveryConfigurationRequest' :: Maybe Bool
enabled = Maybe Bool
a} :: LogDeliveryConfigurationRequest)
logDeliveryConfigurationRequest_logFormat :: Lens.Lens' LogDeliveryConfigurationRequest (Prelude.Maybe LogFormat)
logDeliveryConfigurationRequest_logFormat :: Lens' LogDeliveryConfigurationRequest (Maybe LogFormat)
logDeliveryConfigurationRequest_logFormat = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LogDeliveryConfigurationRequest' {Maybe LogFormat
logFormat :: Maybe LogFormat
$sel:logFormat:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogFormat
logFormat} -> Maybe LogFormat
logFormat) (\s :: LogDeliveryConfigurationRequest
s@LogDeliveryConfigurationRequest' {} Maybe LogFormat
a -> LogDeliveryConfigurationRequest
s {$sel:logFormat:LogDeliveryConfigurationRequest' :: Maybe LogFormat
logFormat = Maybe LogFormat
a} :: LogDeliveryConfigurationRequest)
logDeliveryConfigurationRequest_logType :: Lens.Lens' LogDeliveryConfigurationRequest (Prelude.Maybe LogType)
logDeliveryConfigurationRequest_logType :: Lens' LogDeliveryConfigurationRequest (Maybe LogType)
logDeliveryConfigurationRequest_logType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LogDeliveryConfigurationRequest' {Maybe LogType
logType :: Maybe LogType
$sel:logType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogType
logType} -> Maybe LogType
logType) (\s :: LogDeliveryConfigurationRequest
s@LogDeliveryConfigurationRequest' {} Maybe LogType
a -> LogDeliveryConfigurationRequest
s {$sel:logType:LogDeliveryConfigurationRequest' :: Maybe LogType
logType = Maybe LogType
a} :: LogDeliveryConfigurationRequest)
instance
Prelude.Hashable
LogDeliveryConfigurationRequest
where
hashWithSalt :: Int -> LogDeliveryConfigurationRequest -> Int
hashWithSalt
Int
_salt
LogDeliveryConfigurationRequest' {Maybe Bool
Maybe DestinationType
Maybe DestinationDetails
Maybe LogFormat
Maybe LogType
logType :: Maybe LogType
logFormat :: Maybe LogFormat
enabled :: Maybe Bool
destinationType :: Maybe DestinationType
destinationDetails :: Maybe DestinationDetails
$sel:logType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogType
$sel:logFormat:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogFormat
$sel:enabled:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe Bool
$sel:destinationType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationType
$sel:destinationDetails:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationDetails
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DestinationDetails
destinationDetails
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DestinationType
destinationType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LogFormat
logFormat
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe LogType
logType
instance
Prelude.NFData
LogDeliveryConfigurationRequest
where
rnf :: LogDeliveryConfigurationRequest -> ()
rnf LogDeliveryConfigurationRequest' {Maybe Bool
Maybe DestinationType
Maybe DestinationDetails
Maybe LogFormat
Maybe LogType
logType :: Maybe LogType
logFormat :: Maybe LogFormat
enabled :: Maybe Bool
destinationType :: Maybe DestinationType
destinationDetails :: Maybe DestinationDetails
$sel:logType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogType
$sel:logFormat:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogFormat
$sel:enabled:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe Bool
$sel:destinationType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationType
$sel:destinationDetails:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationDetails
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe DestinationDetails
destinationDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DestinationType
destinationType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
enabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LogFormat
logFormat
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LogType
logType
instance Data.ToQuery LogDeliveryConfigurationRequest where
toQuery :: LogDeliveryConfigurationRequest -> QueryString
toQuery LogDeliveryConfigurationRequest' {Maybe Bool
Maybe DestinationType
Maybe DestinationDetails
Maybe LogFormat
Maybe LogType
logType :: Maybe LogType
logFormat :: Maybe LogFormat
enabled :: Maybe Bool
destinationType :: Maybe DestinationType
destinationDetails :: Maybe DestinationDetails
$sel:logType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogType
$sel:logFormat:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe LogFormat
$sel:enabled:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe Bool
$sel:destinationType:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationType
$sel:destinationDetails:LogDeliveryConfigurationRequest' :: LogDeliveryConfigurationRequest -> Maybe DestinationDetails
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"DestinationDetails" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe DestinationDetails
destinationDetails,
ByteString
"DestinationType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe DestinationType
destinationType,
ByteString
"Enabled" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
enabled,
ByteString
"LogFormat" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe LogFormat
logFormat,
ByteString
"LogType" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe LogType
logType
]