{-# 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.Firehose.Types.ExtendedS3DestinationUpdate where
import qualified Amazonka.Core as Core
import Amazonka.Firehose.Types.BufferingHints
import Amazonka.Firehose.Types.CloudWatchLoggingOptions
import Amazonka.Firehose.Types.CompressionFormat
import Amazonka.Firehose.Types.DataFormatConversionConfiguration
import Amazonka.Firehose.Types.DynamicPartitioningConfiguration
import Amazonka.Firehose.Types.EncryptionConfiguration
import Amazonka.Firehose.Types.ProcessingConfiguration
import Amazonka.Firehose.Types.S3BackupMode
import Amazonka.Firehose.Types.S3DestinationUpdate
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data ExtendedS3DestinationUpdate = ExtendedS3DestinationUpdate'
{
ExtendedS3DestinationUpdate -> Maybe S3BackupMode
s3BackupMode :: Prelude.Maybe S3BackupMode,
ExtendedS3DestinationUpdate -> Maybe Text
prefix :: Prelude.Maybe Prelude.Text,
ExtendedS3DestinationUpdate -> Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions :: Prelude.Maybe CloudWatchLoggingOptions,
ExtendedS3DestinationUpdate -> Maybe Text
errorOutputPrefix :: Prelude.Maybe Prelude.Text,
ExtendedS3DestinationUpdate -> Maybe S3DestinationUpdate
s3BackupUpdate :: Prelude.Maybe S3DestinationUpdate,
ExtendedS3DestinationUpdate -> Maybe EncryptionConfiguration
encryptionConfiguration :: Prelude.Maybe EncryptionConfiguration,
ExtendedS3DestinationUpdate
-> Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration :: Prelude.Maybe DynamicPartitioningConfiguration,
ExtendedS3DestinationUpdate -> Maybe CompressionFormat
compressionFormat :: Prelude.Maybe CompressionFormat,
ExtendedS3DestinationUpdate -> Maybe BufferingHints
bufferingHints :: Prelude.Maybe BufferingHints,
ExtendedS3DestinationUpdate
-> Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration :: Prelude.Maybe DataFormatConversionConfiguration,
ExtendedS3DestinationUpdate -> Maybe Text
bucketARN :: Prelude.Maybe Prelude.Text,
ExtendedS3DestinationUpdate -> Maybe ProcessingConfiguration
processingConfiguration :: Prelude.Maybe ProcessingConfiguration,
ExtendedS3DestinationUpdate -> Maybe Text
roleARN :: Prelude.Maybe Prelude.Text
}
deriving (ExtendedS3DestinationUpdate -> ExtendedS3DestinationUpdate -> Bool
(ExtendedS3DestinationUpdate
-> ExtendedS3DestinationUpdate -> Bool)
-> (ExtendedS3DestinationUpdate
-> ExtendedS3DestinationUpdate -> Bool)
-> Eq ExtendedS3DestinationUpdate
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ExtendedS3DestinationUpdate -> ExtendedS3DestinationUpdate -> Bool
$c/= :: ExtendedS3DestinationUpdate -> ExtendedS3DestinationUpdate -> Bool
== :: ExtendedS3DestinationUpdate -> ExtendedS3DestinationUpdate -> Bool
$c== :: ExtendedS3DestinationUpdate -> ExtendedS3DestinationUpdate -> Bool
Prelude.Eq, ReadPrec [ExtendedS3DestinationUpdate]
ReadPrec ExtendedS3DestinationUpdate
Int -> ReadS ExtendedS3DestinationUpdate
ReadS [ExtendedS3DestinationUpdate]
(Int -> ReadS ExtendedS3DestinationUpdate)
-> ReadS [ExtendedS3DestinationUpdate]
-> ReadPrec ExtendedS3DestinationUpdate
-> ReadPrec [ExtendedS3DestinationUpdate]
-> Read ExtendedS3DestinationUpdate
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ExtendedS3DestinationUpdate]
$creadListPrec :: ReadPrec [ExtendedS3DestinationUpdate]
readPrec :: ReadPrec ExtendedS3DestinationUpdate
$creadPrec :: ReadPrec ExtendedS3DestinationUpdate
readList :: ReadS [ExtendedS3DestinationUpdate]
$creadList :: ReadS [ExtendedS3DestinationUpdate]
readsPrec :: Int -> ReadS ExtendedS3DestinationUpdate
$creadsPrec :: Int -> ReadS ExtendedS3DestinationUpdate
Prelude.Read, Int -> ExtendedS3DestinationUpdate -> ShowS
[ExtendedS3DestinationUpdate] -> ShowS
ExtendedS3DestinationUpdate -> String
(Int -> ExtendedS3DestinationUpdate -> ShowS)
-> (ExtendedS3DestinationUpdate -> String)
-> ([ExtendedS3DestinationUpdate] -> ShowS)
-> Show ExtendedS3DestinationUpdate
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ExtendedS3DestinationUpdate] -> ShowS
$cshowList :: [ExtendedS3DestinationUpdate] -> ShowS
show :: ExtendedS3DestinationUpdate -> String
$cshow :: ExtendedS3DestinationUpdate -> String
showsPrec :: Int -> ExtendedS3DestinationUpdate -> ShowS
$cshowsPrec :: Int -> ExtendedS3DestinationUpdate -> ShowS
Prelude.Show, (forall x.
ExtendedS3DestinationUpdate -> Rep ExtendedS3DestinationUpdate x)
-> (forall x.
Rep ExtendedS3DestinationUpdate x -> ExtendedS3DestinationUpdate)
-> Generic ExtendedS3DestinationUpdate
forall x.
Rep ExtendedS3DestinationUpdate x -> ExtendedS3DestinationUpdate
forall x.
ExtendedS3DestinationUpdate -> Rep ExtendedS3DestinationUpdate x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ExtendedS3DestinationUpdate x -> ExtendedS3DestinationUpdate
$cfrom :: forall x.
ExtendedS3DestinationUpdate -> Rep ExtendedS3DestinationUpdate x
Prelude.Generic)
newExtendedS3DestinationUpdate ::
ExtendedS3DestinationUpdate
newExtendedS3DestinationUpdate :: ExtendedS3DestinationUpdate
newExtendedS3DestinationUpdate =
ExtendedS3DestinationUpdate' :: Maybe S3BackupMode
-> Maybe Text
-> Maybe CloudWatchLoggingOptions
-> Maybe Text
-> Maybe S3DestinationUpdate
-> Maybe EncryptionConfiguration
-> Maybe DynamicPartitioningConfiguration
-> Maybe CompressionFormat
-> Maybe BufferingHints
-> Maybe DataFormatConversionConfiguration
-> Maybe Text
-> Maybe ProcessingConfiguration
-> Maybe Text
-> ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate'
{ $sel:s3BackupMode:ExtendedS3DestinationUpdate' :: Maybe S3BackupMode
s3BackupMode =
Maybe S3BackupMode
forall a. Maybe a
Prelude.Nothing,
$sel:prefix:ExtendedS3DestinationUpdate' :: Maybe Text
prefix = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:cloudWatchLoggingOptions:ExtendedS3DestinationUpdate' :: Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions = Maybe CloudWatchLoggingOptions
forall a. Maybe a
Prelude.Nothing,
$sel:errorOutputPrefix:ExtendedS3DestinationUpdate' :: Maybe Text
errorOutputPrefix = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:s3BackupUpdate:ExtendedS3DestinationUpdate' :: Maybe S3DestinationUpdate
s3BackupUpdate = Maybe S3DestinationUpdate
forall a. Maybe a
Prelude.Nothing,
$sel:encryptionConfiguration:ExtendedS3DestinationUpdate' :: Maybe EncryptionConfiguration
encryptionConfiguration = Maybe EncryptionConfiguration
forall a. Maybe a
Prelude.Nothing,
$sel:dynamicPartitioningConfiguration:ExtendedS3DestinationUpdate' :: Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration =
Maybe DynamicPartitioningConfiguration
forall a. Maybe a
Prelude.Nothing,
$sel:compressionFormat:ExtendedS3DestinationUpdate' :: Maybe CompressionFormat
compressionFormat = Maybe CompressionFormat
forall a. Maybe a
Prelude.Nothing,
$sel:bufferingHints:ExtendedS3DestinationUpdate' :: Maybe BufferingHints
bufferingHints = Maybe BufferingHints
forall a. Maybe a
Prelude.Nothing,
$sel:dataFormatConversionConfiguration:ExtendedS3DestinationUpdate' :: Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration =
Maybe DataFormatConversionConfiguration
forall a. Maybe a
Prelude.Nothing,
$sel:bucketARN:ExtendedS3DestinationUpdate' :: Maybe Text
bucketARN = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:processingConfiguration:ExtendedS3DestinationUpdate' :: Maybe ProcessingConfiguration
processingConfiguration = Maybe ProcessingConfiguration
forall a. Maybe a
Prelude.Nothing,
$sel:roleARN:ExtendedS3DestinationUpdate' :: Maybe Text
roleARN = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
extendedS3DestinationUpdate_s3BackupMode :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe S3BackupMode)
extendedS3DestinationUpdate_s3BackupMode :: (Maybe S3BackupMode -> f (Maybe S3BackupMode))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_s3BackupMode = (ExtendedS3DestinationUpdate -> Maybe S3BackupMode)
-> (ExtendedS3DestinationUpdate
-> Maybe S3BackupMode -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe S3BackupMode)
(Maybe S3BackupMode)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe S3BackupMode
s3BackupMode :: Maybe S3BackupMode
$sel:s3BackupMode:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe S3BackupMode
s3BackupMode} -> Maybe S3BackupMode
s3BackupMode) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe S3BackupMode
a -> ExtendedS3DestinationUpdate
s {$sel:s3BackupMode:ExtendedS3DestinationUpdate' :: Maybe S3BackupMode
s3BackupMode = Maybe S3BackupMode
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_prefix :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe Prelude.Text)
extendedS3DestinationUpdate_prefix :: (Maybe Text -> f (Maybe Text))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_prefix = (ExtendedS3DestinationUpdate -> Maybe Text)
-> (ExtendedS3DestinationUpdate
-> Maybe Text -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe Text
prefix :: Maybe Text
$sel:prefix:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
prefix} -> Maybe Text
prefix) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe Text
a -> ExtendedS3DestinationUpdate
s {$sel:prefix:ExtendedS3DestinationUpdate' :: Maybe Text
prefix = Maybe Text
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_cloudWatchLoggingOptions :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe CloudWatchLoggingOptions)
extendedS3DestinationUpdate_cloudWatchLoggingOptions :: (Maybe CloudWatchLoggingOptions
-> f (Maybe CloudWatchLoggingOptions))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_cloudWatchLoggingOptions = (ExtendedS3DestinationUpdate -> Maybe CloudWatchLoggingOptions)
-> (ExtendedS3DestinationUpdate
-> Maybe CloudWatchLoggingOptions -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe CloudWatchLoggingOptions)
(Maybe CloudWatchLoggingOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions :: Maybe CloudWatchLoggingOptions
$sel:cloudWatchLoggingOptions:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions} -> Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe CloudWatchLoggingOptions
a -> ExtendedS3DestinationUpdate
s {$sel:cloudWatchLoggingOptions:ExtendedS3DestinationUpdate' :: Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions = Maybe CloudWatchLoggingOptions
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_errorOutputPrefix :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe Prelude.Text)
extendedS3DestinationUpdate_errorOutputPrefix :: (Maybe Text -> f (Maybe Text))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_errorOutputPrefix = (ExtendedS3DestinationUpdate -> Maybe Text)
-> (ExtendedS3DestinationUpdate
-> Maybe Text -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe Text
errorOutputPrefix :: Maybe Text
$sel:errorOutputPrefix:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
errorOutputPrefix} -> Maybe Text
errorOutputPrefix) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe Text
a -> ExtendedS3DestinationUpdate
s {$sel:errorOutputPrefix:ExtendedS3DestinationUpdate' :: Maybe Text
errorOutputPrefix = Maybe Text
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_s3BackupUpdate :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe S3DestinationUpdate)
extendedS3DestinationUpdate_s3BackupUpdate :: (Maybe S3DestinationUpdate -> f (Maybe S3DestinationUpdate))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_s3BackupUpdate = (ExtendedS3DestinationUpdate -> Maybe S3DestinationUpdate)
-> (ExtendedS3DestinationUpdate
-> Maybe S3DestinationUpdate -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe S3DestinationUpdate)
(Maybe S3DestinationUpdate)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe S3DestinationUpdate
s3BackupUpdate :: Maybe S3DestinationUpdate
$sel:s3BackupUpdate:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe S3DestinationUpdate
s3BackupUpdate} -> Maybe S3DestinationUpdate
s3BackupUpdate) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe S3DestinationUpdate
a -> ExtendedS3DestinationUpdate
s {$sel:s3BackupUpdate:ExtendedS3DestinationUpdate' :: Maybe S3DestinationUpdate
s3BackupUpdate = Maybe S3DestinationUpdate
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_encryptionConfiguration :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe EncryptionConfiguration)
extendedS3DestinationUpdate_encryptionConfiguration :: (Maybe EncryptionConfiguration
-> f (Maybe EncryptionConfiguration))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_encryptionConfiguration = (ExtendedS3DestinationUpdate -> Maybe EncryptionConfiguration)
-> (ExtendedS3DestinationUpdate
-> Maybe EncryptionConfiguration -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe EncryptionConfiguration)
(Maybe EncryptionConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe EncryptionConfiguration
encryptionConfiguration :: Maybe EncryptionConfiguration
$sel:encryptionConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe EncryptionConfiguration
encryptionConfiguration} -> Maybe EncryptionConfiguration
encryptionConfiguration) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe EncryptionConfiguration
a -> ExtendedS3DestinationUpdate
s {$sel:encryptionConfiguration:ExtendedS3DestinationUpdate' :: Maybe EncryptionConfiguration
encryptionConfiguration = Maybe EncryptionConfiguration
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_dynamicPartitioningConfiguration :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe DynamicPartitioningConfiguration)
extendedS3DestinationUpdate_dynamicPartitioningConfiguration :: (Maybe DynamicPartitioningConfiguration
-> f (Maybe DynamicPartitioningConfiguration))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_dynamicPartitioningConfiguration = (ExtendedS3DestinationUpdate
-> Maybe DynamicPartitioningConfiguration)
-> (ExtendedS3DestinationUpdate
-> Maybe DynamicPartitioningConfiguration
-> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe DynamicPartitioningConfiguration)
(Maybe DynamicPartitioningConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration :: Maybe DynamicPartitioningConfiguration
$sel:dynamicPartitioningConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate
-> Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration} -> Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe DynamicPartitioningConfiguration
a -> ExtendedS3DestinationUpdate
s {$sel:dynamicPartitioningConfiguration:ExtendedS3DestinationUpdate' :: Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration = Maybe DynamicPartitioningConfiguration
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_compressionFormat :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe CompressionFormat)
extendedS3DestinationUpdate_compressionFormat :: (Maybe CompressionFormat -> f (Maybe CompressionFormat))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_compressionFormat = (ExtendedS3DestinationUpdate -> Maybe CompressionFormat)
-> (ExtendedS3DestinationUpdate
-> Maybe CompressionFormat -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe CompressionFormat)
(Maybe CompressionFormat)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe CompressionFormat
compressionFormat :: Maybe CompressionFormat
$sel:compressionFormat:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe CompressionFormat
compressionFormat} -> Maybe CompressionFormat
compressionFormat) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe CompressionFormat
a -> ExtendedS3DestinationUpdate
s {$sel:compressionFormat:ExtendedS3DestinationUpdate' :: Maybe CompressionFormat
compressionFormat = Maybe CompressionFormat
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_bufferingHints :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe BufferingHints)
extendedS3DestinationUpdate_bufferingHints :: (Maybe BufferingHints -> f (Maybe BufferingHints))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_bufferingHints = (ExtendedS3DestinationUpdate -> Maybe BufferingHints)
-> (ExtendedS3DestinationUpdate
-> Maybe BufferingHints -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe BufferingHints)
(Maybe BufferingHints)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe BufferingHints
bufferingHints :: Maybe BufferingHints
$sel:bufferingHints:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe BufferingHints
bufferingHints} -> Maybe BufferingHints
bufferingHints) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe BufferingHints
a -> ExtendedS3DestinationUpdate
s {$sel:bufferingHints:ExtendedS3DestinationUpdate' :: Maybe BufferingHints
bufferingHints = Maybe BufferingHints
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_dataFormatConversionConfiguration :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe DataFormatConversionConfiguration)
extendedS3DestinationUpdate_dataFormatConversionConfiguration :: (Maybe DataFormatConversionConfiguration
-> f (Maybe DataFormatConversionConfiguration))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_dataFormatConversionConfiguration = (ExtendedS3DestinationUpdate
-> Maybe DataFormatConversionConfiguration)
-> (ExtendedS3DestinationUpdate
-> Maybe DataFormatConversionConfiguration
-> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe DataFormatConversionConfiguration)
(Maybe DataFormatConversionConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration :: Maybe DataFormatConversionConfiguration
$sel:dataFormatConversionConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate
-> Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration} -> Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe DataFormatConversionConfiguration
a -> ExtendedS3DestinationUpdate
s {$sel:dataFormatConversionConfiguration:ExtendedS3DestinationUpdate' :: Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration = Maybe DataFormatConversionConfiguration
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_bucketARN :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe Prelude.Text)
extendedS3DestinationUpdate_bucketARN :: (Maybe Text -> f (Maybe Text))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_bucketARN = (ExtendedS3DestinationUpdate -> Maybe Text)
-> (ExtendedS3DestinationUpdate
-> Maybe Text -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe Text
bucketARN :: Maybe Text
$sel:bucketARN:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
bucketARN} -> Maybe Text
bucketARN) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe Text
a -> ExtendedS3DestinationUpdate
s {$sel:bucketARN:ExtendedS3DestinationUpdate' :: Maybe Text
bucketARN = Maybe Text
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_processingConfiguration :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe ProcessingConfiguration)
extendedS3DestinationUpdate_processingConfiguration :: (Maybe ProcessingConfiguration
-> f (Maybe ProcessingConfiguration))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_processingConfiguration = (ExtendedS3DestinationUpdate -> Maybe ProcessingConfiguration)
-> (ExtendedS3DestinationUpdate
-> Maybe ProcessingConfiguration -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe ProcessingConfiguration)
(Maybe ProcessingConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe ProcessingConfiguration
processingConfiguration :: Maybe ProcessingConfiguration
$sel:processingConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe ProcessingConfiguration
processingConfiguration} -> Maybe ProcessingConfiguration
processingConfiguration) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe ProcessingConfiguration
a -> ExtendedS3DestinationUpdate
s {$sel:processingConfiguration:ExtendedS3DestinationUpdate' :: Maybe ProcessingConfiguration
processingConfiguration = Maybe ProcessingConfiguration
a} :: ExtendedS3DestinationUpdate)
extendedS3DestinationUpdate_roleARN :: Lens.Lens' ExtendedS3DestinationUpdate (Prelude.Maybe Prelude.Text)
extendedS3DestinationUpdate_roleARN :: (Maybe Text -> f (Maybe Text))
-> ExtendedS3DestinationUpdate -> f ExtendedS3DestinationUpdate
extendedS3DestinationUpdate_roleARN = (ExtendedS3DestinationUpdate -> Maybe Text)
-> (ExtendedS3DestinationUpdate
-> Maybe Text -> ExtendedS3DestinationUpdate)
-> Lens
ExtendedS3DestinationUpdate
ExtendedS3DestinationUpdate
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ExtendedS3DestinationUpdate' {Maybe Text
roleARN :: Maybe Text
$sel:roleARN:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
roleARN} -> Maybe Text
roleARN) (\s :: ExtendedS3DestinationUpdate
s@ExtendedS3DestinationUpdate' {} Maybe Text
a -> ExtendedS3DestinationUpdate
s {$sel:roleARN:ExtendedS3DestinationUpdate' :: Maybe Text
roleARN = Maybe Text
a} :: ExtendedS3DestinationUpdate)
instance Prelude.Hashable ExtendedS3DestinationUpdate
instance Prelude.NFData ExtendedS3DestinationUpdate
instance Core.ToJSON ExtendedS3DestinationUpdate where
toJSON :: ExtendedS3DestinationUpdate -> Value
toJSON ExtendedS3DestinationUpdate' {Maybe Text
Maybe BufferingHints
Maybe CloudWatchLoggingOptions
Maybe CompressionFormat
Maybe EncryptionConfiguration
Maybe ProcessingConfiguration
Maybe DynamicPartitioningConfiguration
Maybe S3BackupMode
Maybe S3DestinationUpdate
Maybe DataFormatConversionConfiguration
roleARN :: Maybe Text
processingConfiguration :: Maybe ProcessingConfiguration
bucketARN :: Maybe Text
dataFormatConversionConfiguration :: Maybe DataFormatConversionConfiguration
bufferingHints :: Maybe BufferingHints
compressionFormat :: Maybe CompressionFormat
dynamicPartitioningConfiguration :: Maybe DynamicPartitioningConfiguration
encryptionConfiguration :: Maybe EncryptionConfiguration
s3BackupUpdate :: Maybe S3DestinationUpdate
errorOutputPrefix :: Maybe Text
cloudWatchLoggingOptions :: Maybe CloudWatchLoggingOptions
prefix :: Maybe Text
s3BackupMode :: Maybe S3BackupMode
$sel:roleARN:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
$sel:processingConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe ProcessingConfiguration
$sel:bucketARN:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
$sel:dataFormatConversionConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate
-> Maybe DataFormatConversionConfiguration
$sel:bufferingHints:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe BufferingHints
$sel:compressionFormat:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe CompressionFormat
$sel:dynamicPartitioningConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate
-> Maybe DynamicPartitioningConfiguration
$sel:encryptionConfiguration:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe EncryptionConfiguration
$sel:s3BackupUpdate:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe S3DestinationUpdate
$sel:errorOutputPrefix:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
$sel:cloudWatchLoggingOptions:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe CloudWatchLoggingOptions
$sel:prefix:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe Text
$sel:s3BackupMode:ExtendedS3DestinationUpdate' :: ExtendedS3DestinationUpdate -> Maybe S3BackupMode
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"S3BackupMode" Text -> S3BackupMode -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (S3BackupMode -> Pair) -> Maybe S3BackupMode -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3BackupMode
s3BackupMode,
(Text
"Prefix" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
prefix,
(Text
"CloudWatchLoggingOptions" Text -> CloudWatchLoggingOptions -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(CloudWatchLoggingOptions -> Pair)
-> Maybe CloudWatchLoggingOptions -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CloudWatchLoggingOptions
cloudWatchLoggingOptions,
(Text
"ErrorOutputPrefix" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
errorOutputPrefix,
(Text
"S3BackupUpdate" Text -> S3DestinationUpdate -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(S3DestinationUpdate -> Pair)
-> Maybe S3DestinationUpdate -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3DestinationUpdate
s3BackupUpdate,
(Text
"EncryptionConfiguration" Text -> EncryptionConfiguration -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(EncryptionConfiguration -> Pair)
-> Maybe EncryptionConfiguration -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionConfiguration
encryptionConfiguration,
(Text
"DynamicPartitioningConfiguration" Text -> DynamicPartitioningConfiguration -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(DynamicPartitioningConfiguration -> Pair)
-> Maybe DynamicPartitioningConfiguration -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DynamicPartitioningConfiguration
dynamicPartitioningConfiguration,
(Text
"CompressionFormat" Text -> CompressionFormat -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(CompressionFormat -> Pair)
-> Maybe CompressionFormat -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CompressionFormat
compressionFormat,
(Text
"BufferingHints" Text -> BufferingHints -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(BufferingHints -> Pair) -> Maybe BufferingHints -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BufferingHints
bufferingHints,
(Text
"DataFormatConversionConfiguration" Text -> DataFormatConversionConfiguration -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(DataFormatConversionConfiguration -> Pair)
-> Maybe DataFormatConversionConfiguration -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataFormatConversionConfiguration
dataFormatConversionConfiguration,
(Text
"BucketARN" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
bucketARN,
(Text
"ProcessingConfiguration" Text -> ProcessingConfiguration -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(ProcessingConfiguration -> Pair)
-> Maybe ProcessingConfiguration -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ProcessingConfiguration
processingConfiguration,
(Text
"RoleARN" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Text -> Pair) -> Maybe Text -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
roleARN
]
)