{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Firehose.CreateDeliveryStream
(
CreateDeliveryStream (..),
newCreateDeliveryStream,
createDeliveryStream_amazonOpenSearchServerlessDestinationConfiguration,
createDeliveryStream_amazonopensearchserviceDestinationConfiguration,
createDeliveryStream_deliveryStreamEncryptionConfigurationInput,
createDeliveryStream_deliveryStreamType,
createDeliveryStream_elasticsearchDestinationConfiguration,
createDeliveryStream_extendedS3DestinationConfiguration,
createDeliveryStream_httpEndpointDestinationConfiguration,
createDeliveryStream_kinesisStreamSourceConfiguration,
createDeliveryStream_redshiftDestinationConfiguration,
createDeliveryStream_s3DestinationConfiguration,
createDeliveryStream_splunkDestinationConfiguration,
createDeliveryStream_tags,
createDeliveryStream_deliveryStreamName,
CreateDeliveryStreamResponse (..),
newCreateDeliveryStreamResponse,
createDeliveryStreamResponse_deliveryStreamARN,
createDeliveryStreamResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Firehose.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data CreateDeliveryStream = CreateDeliveryStream'
{
CreateDeliveryStream
-> Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration :: Prelude.Maybe AmazonOpenSearchServerlessDestinationConfiguration,
CreateDeliveryStream
-> Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration :: Prelude.Maybe AmazonopensearchserviceDestinationConfiguration,
CreateDeliveryStream
-> Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput :: Prelude.Maybe DeliveryStreamEncryptionConfigurationInput,
CreateDeliveryStream -> Maybe DeliveryStreamType
deliveryStreamType :: Prelude.Maybe DeliveryStreamType,
CreateDeliveryStream -> Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration :: Prelude.Maybe ElasticsearchDestinationConfiguration,
CreateDeliveryStream -> Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration :: Prelude.Maybe ExtendedS3DestinationConfiguration,
CreateDeliveryStream -> Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration :: Prelude.Maybe HttpEndpointDestinationConfiguration,
CreateDeliveryStream -> Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration :: Prelude.Maybe KinesisStreamSourceConfiguration,
CreateDeliveryStream -> Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration :: Prelude.Maybe RedshiftDestinationConfiguration,
CreateDeliveryStream -> Maybe S3DestinationConfiguration
s3DestinationConfiguration :: Prelude.Maybe S3DestinationConfiguration,
CreateDeliveryStream -> Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration :: Prelude.Maybe SplunkDestinationConfiguration,
CreateDeliveryStream -> Maybe (NonEmpty Tag)
tags :: Prelude.Maybe (Prelude.NonEmpty Tag),
CreateDeliveryStream -> Text
deliveryStreamName :: Prelude.Text
}
deriving (CreateDeliveryStream -> CreateDeliveryStream -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDeliveryStream -> CreateDeliveryStream -> Bool
$c/= :: CreateDeliveryStream -> CreateDeliveryStream -> Bool
== :: CreateDeliveryStream -> CreateDeliveryStream -> Bool
$c== :: CreateDeliveryStream -> CreateDeliveryStream -> Bool
Prelude.Eq, Int -> CreateDeliveryStream -> ShowS
[CreateDeliveryStream] -> ShowS
CreateDeliveryStream -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDeliveryStream] -> ShowS
$cshowList :: [CreateDeliveryStream] -> ShowS
show :: CreateDeliveryStream -> String
$cshow :: CreateDeliveryStream -> String
showsPrec :: Int -> CreateDeliveryStream -> ShowS
$cshowsPrec :: Int -> CreateDeliveryStream -> ShowS
Prelude.Show, forall x. Rep CreateDeliveryStream x -> CreateDeliveryStream
forall x. CreateDeliveryStream -> Rep CreateDeliveryStream x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateDeliveryStream x -> CreateDeliveryStream
$cfrom :: forall x. CreateDeliveryStream -> Rep CreateDeliveryStream x
Prelude.Generic)
newCreateDeliveryStream ::
Prelude.Text ->
CreateDeliveryStream
newCreateDeliveryStream :: Text -> CreateDeliveryStream
newCreateDeliveryStream Text
pDeliveryStreamName_ =
CreateDeliveryStream'
{ $sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration =
forall a. Maybe a
Prelude.Nothing,
$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration =
forall a. Maybe a
Prelude.Nothing,
$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput =
forall a. Maybe a
Prelude.Nothing,
$sel:deliveryStreamType:CreateDeliveryStream' :: Maybe DeliveryStreamType
deliveryStreamType = forall a. Maybe a
Prelude.Nothing,
$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration =
forall a. Maybe a
Prelude.Nothing,
$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration =
forall a. Maybe a
Prelude.Nothing,
$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:s3DestinationConfiguration:CreateDeliveryStream' :: Maybe S3DestinationConfiguration
s3DestinationConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateDeliveryStream' :: Maybe (NonEmpty Tag)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:deliveryStreamName:CreateDeliveryStream' :: Text
deliveryStreamName = Text
pDeliveryStreamName_
}
createDeliveryStream_amazonOpenSearchServerlessDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe AmazonOpenSearchServerlessDestinationConfiguration)
createDeliveryStream_amazonOpenSearchServerlessDestinationConfiguration :: Lens'
CreateDeliveryStream
(Maybe AmazonOpenSearchServerlessDestinationConfiguration)
createDeliveryStream_amazonOpenSearchServerlessDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
$sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration} -> Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe AmazonOpenSearchServerlessDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration = Maybe AmazonOpenSearchServerlessDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_amazonopensearchserviceDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe AmazonopensearchserviceDestinationConfiguration)
createDeliveryStream_amazonopensearchserviceDestinationConfiguration :: Lens'
CreateDeliveryStream
(Maybe AmazonopensearchserviceDestinationConfiguration)
createDeliveryStream_amazonopensearchserviceDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration :: Maybe AmazonopensearchserviceDestinationConfiguration
$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration} -> Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe AmazonopensearchserviceDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration = Maybe AmazonopensearchserviceDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_deliveryStreamEncryptionConfigurationInput :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe DeliveryStreamEncryptionConfigurationInput)
createDeliveryStream_deliveryStreamEncryptionConfigurationInput :: Lens'
CreateDeliveryStream
(Maybe DeliveryStreamEncryptionConfigurationInput)
createDeliveryStream_deliveryStreamEncryptionConfigurationInput = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput :: Maybe DeliveryStreamEncryptionConfigurationInput
$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput} -> Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe DeliveryStreamEncryptionConfigurationInput
a -> CreateDeliveryStream
s {$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput = Maybe DeliveryStreamEncryptionConfigurationInput
a} :: CreateDeliveryStream)
createDeliveryStream_deliveryStreamType :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe DeliveryStreamType)
createDeliveryStream_deliveryStreamType :: Lens' CreateDeliveryStream (Maybe DeliveryStreamType)
createDeliveryStream_deliveryStreamType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe DeliveryStreamType
deliveryStreamType :: Maybe DeliveryStreamType
$sel:deliveryStreamType:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe DeliveryStreamType
deliveryStreamType} -> Maybe DeliveryStreamType
deliveryStreamType) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe DeliveryStreamType
a -> CreateDeliveryStream
s {$sel:deliveryStreamType:CreateDeliveryStream' :: Maybe DeliveryStreamType
deliveryStreamType = Maybe DeliveryStreamType
a} :: CreateDeliveryStream)
createDeliveryStream_elasticsearchDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe ElasticsearchDestinationConfiguration)
createDeliveryStream_elasticsearchDestinationConfiguration :: Lens'
CreateDeliveryStream (Maybe ElasticsearchDestinationConfiguration)
createDeliveryStream_elasticsearchDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration :: Maybe ElasticsearchDestinationConfiguration
$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration} -> Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe ElasticsearchDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration = Maybe ElasticsearchDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_extendedS3DestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe ExtendedS3DestinationConfiguration)
createDeliveryStream_extendedS3DestinationConfiguration :: Lens'
CreateDeliveryStream (Maybe ExtendedS3DestinationConfiguration)
createDeliveryStream_extendedS3DestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration :: Maybe ExtendedS3DestinationConfiguration
$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration} -> Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe ExtendedS3DestinationConfiguration
a -> CreateDeliveryStream
s {$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration = Maybe ExtendedS3DestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_httpEndpointDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe HttpEndpointDestinationConfiguration)
createDeliveryStream_httpEndpointDestinationConfiguration :: Lens'
CreateDeliveryStream (Maybe HttpEndpointDestinationConfiguration)
createDeliveryStream_httpEndpointDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration :: Maybe HttpEndpointDestinationConfiguration
$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration} -> Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe HttpEndpointDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration = Maybe HttpEndpointDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_kinesisStreamSourceConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe KinesisStreamSourceConfiguration)
createDeliveryStream_kinesisStreamSourceConfiguration :: Lens' CreateDeliveryStream (Maybe KinesisStreamSourceConfiguration)
createDeliveryStream_kinesisStreamSourceConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration :: Maybe KinesisStreamSourceConfiguration
$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration} -> Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe KinesisStreamSourceConfiguration
a -> CreateDeliveryStream
s {$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration = Maybe KinesisStreamSourceConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_redshiftDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe RedshiftDestinationConfiguration)
createDeliveryStream_redshiftDestinationConfiguration :: Lens' CreateDeliveryStream (Maybe RedshiftDestinationConfiguration)
createDeliveryStream_redshiftDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration :: Maybe RedshiftDestinationConfiguration
$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration} -> Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe RedshiftDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration = Maybe RedshiftDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_s3DestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe S3DestinationConfiguration)
createDeliveryStream_s3DestinationConfiguration :: Lens' CreateDeliveryStream (Maybe S3DestinationConfiguration)
createDeliveryStream_s3DestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe S3DestinationConfiguration
s3DestinationConfiguration :: Maybe S3DestinationConfiguration
$sel:s3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe S3DestinationConfiguration
s3DestinationConfiguration} -> Maybe S3DestinationConfiguration
s3DestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe S3DestinationConfiguration
a -> CreateDeliveryStream
s {$sel:s3DestinationConfiguration:CreateDeliveryStream' :: Maybe S3DestinationConfiguration
s3DestinationConfiguration = Maybe S3DestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_splunkDestinationConfiguration :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe SplunkDestinationConfiguration)
createDeliveryStream_splunkDestinationConfiguration :: Lens' CreateDeliveryStream (Maybe SplunkDestinationConfiguration)
createDeliveryStream_splunkDestinationConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration :: Maybe SplunkDestinationConfiguration
$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration} -> Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe SplunkDestinationConfiguration
a -> CreateDeliveryStream
s {$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration = Maybe SplunkDestinationConfiguration
a} :: CreateDeliveryStream)
createDeliveryStream_tags :: Lens.Lens' CreateDeliveryStream (Prelude.Maybe (Prelude.NonEmpty Tag))
createDeliveryStream_tags :: Lens' CreateDeliveryStream (Maybe (NonEmpty Tag))
createDeliveryStream_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Maybe (NonEmpty Tag)
tags :: Maybe (NonEmpty Tag)
$sel:tags:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe (NonEmpty Tag)
tags} -> Maybe (NonEmpty Tag)
tags) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Maybe (NonEmpty Tag)
a -> CreateDeliveryStream
s {$sel:tags:CreateDeliveryStream' :: Maybe (NonEmpty Tag)
tags = Maybe (NonEmpty Tag)
a} :: CreateDeliveryStream) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createDeliveryStream_deliveryStreamName :: Lens.Lens' CreateDeliveryStream Prelude.Text
createDeliveryStream_deliveryStreamName :: Lens' CreateDeliveryStream Text
createDeliveryStream_deliveryStreamName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStream' {Text
deliveryStreamName :: Text
$sel:deliveryStreamName:CreateDeliveryStream' :: CreateDeliveryStream -> Text
deliveryStreamName} -> Text
deliveryStreamName) (\s :: CreateDeliveryStream
s@CreateDeliveryStream' {} Text
a -> CreateDeliveryStream
s {$sel:deliveryStreamName:CreateDeliveryStream' :: Text
deliveryStreamName = Text
a} :: CreateDeliveryStream)
instance Core.AWSRequest CreateDeliveryStream where
type
AWSResponse CreateDeliveryStream =
CreateDeliveryStreamResponse
request :: (Service -> Service)
-> CreateDeliveryStream -> Request CreateDeliveryStream
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy CreateDeliveryStream
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateDeliveryStream)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text -> Int -> CreateDeliveryStreamResponse
CreateDeliveryStreamResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"DeliveryStreamARN")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable CreateDeliveryStream where
hashWithSalt :: Int -> CreateDeliveryStream -> Int
hashWithSalt Int
_salt CreateDeliveryStream' {Maybe (NonEmpty Tag)
Maybe DeliveryStreamType
Maybe DeliveryStreamEncryptionConfigurationInput
Maybe KinesisStreamSourceConfiguration
Maybe S3DestinationConfiguration
Maybe RedshiftDestinationConfiguration
Maybe HttpEndpointDestinationConfiguration
Maybe ExtendedS3DestinationConfiguration
Maybe SplunkDestinationConfiguration
Maybe ElasticsearchDestinationConfiguration
Maybe AmazonopensearchserviceDestinationConfiguration
Maybe AmazonOpenSearchServerlessDestinationConfiguration
Text
deliveryStreamName :: Text
tags :: Maybe (NonEmpty Tag)
splunkDestinationConfiguration :: Maybe SplunkDestinationConfiguration
s3DestinationConfiguration :: Maybe S3DestinationConfiguration
redshiftDestinationConfiguration :: Maybe RedshiftDestinationConfiguration
kinesisStreamSourceConfiguration :: Maybe KinesisStreamSourceConfiguration
httpEndpointDestinationConfiguration :: Maybe HttpEndpointDestinationConfiguration
extendedS3DestinationConfiguration :: Maybe ExtendedS3DestinationConfiguration
elasticsearchDestinationConfiguration :: Maybe ElasticsearchDestinationConfiguration
deliveryStreamType :: Maybe DeliveryStreamType
deliveryStreamEncryptionConfigurationInput :: Maybe DeliveryStreamEncryptionConfigurationInput
amazonopensearchserviceDestinationConfiguration :: Maybe AmazonopensearchserviceDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
$sel:deliveryStreamName:CreateDeliveryStream' :: CreateDeliveryStream -> Text
$sel:tags:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe (NonEmpty Tag)
$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe SplunkDestinationConfiguration
$sel:s3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe S3DestinationConfiguration
$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe RedshiftDestinationConfiguration
$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe KinesisStreamSourceConfiguration
$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe HttpEndpointDestinationConfiguration
$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ExtendedS3DestinationConfiguration
$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ElasticsearchDestinationConfiguration
$sel:deliveryStreamType:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe DeliveryStreamType
$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe DeliveryStreamEncryptionConfigurationInput
$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonopensearchserviceDestinationConfiguration
$sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonOpenSearchServerlessDestinationConfiguration
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DeliveryStreamType
deliveryStreamType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe S3DestinationConfiguration
s3DestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Tag)
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
deliveryStreamName
instance Prelude.NFData CreateDeliveryStream where
rnf :: CreateDeliveryStream -> ()
rnf CreateDeliveryStream' {Maybe (NonEmpty Tag)
Maybe DeliveryStreamType
Maybe DeliveryStreamEncryptionConfigurationInput
Maybe KinesisStreamSourceConfiguration
Maybe S3DestinationConfiguration
Maybe RedshiftDestinationConfiguration
Maybe HttpEndpointDestinationConfiguration
Maybe ExtendedS3DestinationConfiguration
Maybe SplunkDestinationConfiguration
Maybe ElasticsearchDestinationConfiguration
Maybe AmazonopensearchserviceDestinationConfiguration
Maybe AmazonOpenSearchServerlessDestinationConfiguration
Text
deliveryStreamName :: Text
tags :: Maybe (NonEmpty Tag)
splunkDestinationConfiguration :: Maybe SplunkDestinationConfiguration
s3DestinationConfiguration :: Maybe S3DestinationConfiguration
redshiftDestinationConfiguration :: Maybe RedshiftDestinationConfiguration
kinesisStreamSourceConfiguration :: Maybe KinesisStreamSourceConfiguration
httpEndpointDestinationConfiguration :: Maybe HttpEndpointDestinationConfiguration
extendedS3DestinationConfiguration :: Maybe ExtendedS3DestinationConfiguration
elasticsearchDestinationConfiguration :: Maybe ElasticsearchDestinationConfiguration
deliveryStreamType :: Maybe DeliveryStreamType
deliveryStreamEncryptionConfigurationInput :: Maybe DeliveryStreamEncryptionConfigurationInput
amazonopensearchserviceDestinationConfiguration :: Maybe AmazonopensearchserviceDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
$sel:deliveryStreamName:CreateDeliveryStream' :: CreateDeliveryStream -> Text
$sel:tags:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe (NonEmpty Tag)
$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe SplunkDestinationConfiguration
$sel:s3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe S3DestinationConfiguration
$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe RedshiftDestinationConfiguration
$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe KinesisStreamSourceConfiguration
$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe HttpEndpointDestinationConfiguration
$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ExtendedS3DestinationConfiguration
$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ElasticsearchDestinationConfiguration
$sel:deliveryStreamType:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe DeliveryStreamType
$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe DeliveryStreamEncryptionConfigurationInput
$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonopensearchserviceDestinationConfiguration
$sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonOpenSearchServerlessDestinationConfiguration
..} =
forall a. NFData a => a -> ()
Prelude.rnf
Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DeliveryStreamType
deliveryStreamType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe S3DestinationConfiguration
s3DestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Tag)
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
deliveryStreamName
instance Data.ToHeaders CreateDeliveryStream where
toHeaders :: CreateDeliveryStream -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"Firehose_20150804.CreateDeliveryStream" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON CreateDeliveryStream where
toJSON :: CreateDeliveryStream -> Value
toJSON CreateDeliveryStream' {Maybe (NonEmpty Tag)
Maybe DeliveryStreamType
Maybe DeliveryStreamEncryptionConfigurationInput
Maybe KinesisStreamSourceConfiguration
Maybe S3DestinationConfiguration
Maybe RedshiftDestinationConfiguration
Maybe HttpEndpointDestinationConfiguration
Maybe ExtendedS3DestinationConfiguration
Maybe SplunkDestinationConfiguration
Maybe ElasticsearchDestinationConfiguration
Maybe AmazonopensearchserviceDestinationConfiguration
Maybe AmazonOpenSearchServerlessDestinationConfiguration
Text
deliveryStreamName :: Text
tags :: Maybe (NonEmpty Tag)
splunkDestinationConfiguration :: Maybe SplunkDestinationConfiguration
s3DestinationConfiguration :: Maybe S3DestinationConfiguration
redshiftDestinationConfiguration :: Maybe RedshiftDestinationConfiguration
kinesisStreamSourceConfiguration :: Maybe KinesisStreamSourceConfiguration
httpEndpointDestinationConfiguration :: Maybe HttpEndpointDestinationConfiguration
extendedS3DestinationConfiguration :: Maybe ExtendedS3DestinationConfiguration
elasticsearchDestinationConfiguration :: Maybe ElasticsearchDestinationConfiguration
deliveryStreamType :: Maybe DeliveryStreamType
deliveryStreamEncryptionConfigurationInput :: Maybe DeliveryStreamEncryptionConfigurationInput
amazonopensearchserviceDestinationConfiguration :: Maybe AmazonopensearchserviceDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration :: Maybe AmazonOpenSearchServerlessDestinationConfiguration
$sel:deliveryStreamName:CreateDeliveryStream' :: CreateDeliveryStream -> Text
$sel:tags:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe (NonEmpty Tag)
$sel:splunkDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe SplunkDestinationConfiguration
$sel:s3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe S3DestinationConfiguration
$sel:redshiftDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe RedshiftDestinationConfiguration
$sel:kinesisStreamSourceConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe KinesisStreamSourceConfiguration
$sel:httpEndpointDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe HttpEndpointDestinationConfiguration
$sel:extendedS3DestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ExtendedS3DestinationConfiguration
$sel:elasticsearchDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe ElasticsearchDestinationConfiguration
$sel:deliveryStreamType:CreateDeliveryStream' :: CreateDeliveryStream -> Maybe DeliveryStreamType
$sel:deliveryStreamEncryptionConfigurationInput:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe DeliveryStreamEncryptionConfigurationInput
$sel:amazonopensearchserviceDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonopensearchserviceDestinationConfiguration
$sel:amazonOpenSearchServerlessDestinationConfiguration:CreateDeliveryStream' :: CreateDeliveryStream
-> Maybe AmazonOpenSearchServerlessDestinationConfiguration
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ ( Key
"AmazonOpenSearchServerlessDestinationConfiguration"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=
)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AmazonOpenSearchServerlessDestinationConfiguration
amazonOpenSearchServerlessDestinationConfiguration,
( Key
"AmazonopensearchserviceDestinationConfiguration"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=
)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AmazonopensearchserviceDestinationConfiguration
amazonopensearchserviceDestinationConfiguration,
( Key
"DeliveryStreamEncryptionConfigurationInput"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=
)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DeliveryStreamEncryptionConfigurationInput
deliveryStreamEncryptionConfigurationInput,
(Key
"DeliveryStreamType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DeliveryStreamType
deliveryStreamType,
(Key
"ElasticsearchDestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ElasticsearchDestinationConfiguration
elasticsearchDestinationConfiguration,
(Key
"ExtendedS3DestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExtendedS3DestinationConfiguration
extendedS3DestinationConfiguration,
(Key
"HttpEndpointDestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HttpEndpointDestinationConfiguration
httpEndpointDestinationConfiguration,
(Key
"KinesisStreamSourceConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe KinesisStreamSourceConfiguration
kinesisStreamSourceConfiguration,
(Key
"RedshiftDestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RedshiftDestinationConfiguration
redshiftDestinationConfiguration,
(Key
"S3DestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3DestinationConfiguration
s3DestinationConfiguration,
(Key
"SplunkDestinationConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SplunkDestinationConfiguration
splunkDestinationConfiguration,
(Key
"Tags" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (NonEmpty Tag)
tags,
forall a. a -> Maybe a
Prelude.Just
(Key
"DeliveryStreamName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
deliveryStreamName)
]
)
instance Data.ToPath CreateDeliveryStream where
toPath :: CreateDeliveryStream -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery CreateDeliveryStream where
toQuery :: CreateDeliveryStream -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data CreateDeliveryStreamResponse = CreateDeliveryStreamResponse'
{
CreateDeliveryStreamResponse -> Maybe Text
deliveryStreamARN :: Prelude.Maybe Prelude.Text,
CreateDeliveryStreamResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateDeliveryStreamResponse
-> CreateDeliveryStreamResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDeliveryStreamResponse
-> CreateDeliveryStreamResponse -> Bool
$c/= :: CreateDeliveryStreamResponse
-> CreateDeliveryStreamResponse -> Bool
== :: CreateDeliveryStreamResponse
-> CreateDeliveryStreamResponse -> Bool
$c== :: CreateDeliveryStreamResponse
-> CreateDeliveryStreamResponse -> Bool
Prelude.Eq, ReadPrec [CreateDeliveryStreamResponse]
ReadPrec CreateDeliveryStreamResponse
Int -> ReadS CreateDeliveryStreamResponse
ReadS [CreateDeliveryStreamResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDeliveryStreamResponse]
$creadListPrec :: ReadPrec [CreateDeliveryStreamResponse]
readPrec :: ReadPrec CreateDeliveryStreamResponse
$creadPrec :: ReadPrec CreateDeliveryStreamResponse
readList :: ReadS [CreateDeliveryStreamResponse]
$creadList :: ReadS [CreateDeliveryStreamResponse]
readsPrec :: Int -> ReadS CreateDeliveryStreamResponse
$creadsPrec :: Int -> ReadS CreateDeliveryStreamResponse
Prelude.Read, Int -> CreateDeliveryStreamResponse -> ShowS
[CreateDeliveryStreamResponse] -> ShowS
CreateDeliveryStreamResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDeliveryStreamResponse] -> ShowS
$cshowList :: [CreateDeliveryStreamResponse] -> ShowS
show :: CreateDeliveryStreamResponse -> String
$cshow :: CreateDeliveryStreamResponse -> String
showsPrec :: Int -> CreateDeliveryStreamResponse -> ShowS
$cshowsPrec :: Int -> CreateDeliveryStreamResponse -> ShowS
Prelude.Show, forall x.
Rep CreateDeliveryStreamResponse x -> CreateDeliveryStreamResponse
forall x.
CreateDeliveryStreamResponse -> Rep CreateDeliveryStreamResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDeliveryStreamResponse x -> CreateDeliveryStreamResponse
$cfrom :: forall x.
CreateDeliveryStreamResponse -> Rep CreateDeliveryStreamResponse x
Prelude.Generic)
newCreateDeliveryStreamResponse ::
Prelude.Int ->
CreateDeliveryStreamResponse
newCreateDeliveryStreamResponse :: Int -> CreateDeliveryStreamResponse
newCreateDeliveryStreamResponse Int
pHttpStatus_ =
CreateDeliveryStreamResponse'
{ $sel:deliveryStreamARN:CreateDeliveryStreamResponse' :: Maybe Text
deliveryStreamARN =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateDeliveryStreamResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createDeliveryStreamResponse_deliveryStreamARN :: Lens.Lens' CreateDeliveryStreamResponse (Prelude.Maybe Prelude.Text)
createDeliveryStreamResponse_deliveryStreamARN :: Lens' CreateDeliveryStreamResponse (Maybe Text)
createDeliveryStreamResponse_deliveryStreamARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStreamResponse' {Maybe Text
deliveryStreamARN :: Maybe Text
$sel:deliveryStreamARN:CreateDeliveryStreamResponse' :: CreateDeliveryStreamResponse -> Maybe Text
deliveryStreamARN} -> Maybe Text
deliveryStreamARN) (\s :: CreateDeliveryStreamResponse
s@CreateDeliveryStreamResponse' {} Maybe Text
a -> CreateDeliveryStreamResponse
s {$sel:deliveryStreamARN:CreateDeliveryStreamResponse' :: Maybe Text
deliveryStreamARN = Maybe Text
a} :: CreateDeliveryStreamResponse)
createDeliveryStreamResponse_httpStatus :: Lens.Lens' CreateDeliveryStreamResponse Prelude.Int
createDeliveryStreamResponse_httpStatus :: Lens' CreateDeliveryStreamResponse Int
createDeliveryStreamResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDeliveryStreamResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateDeliveryStreamResponse' :: CreateDeliveryStreamResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateDeliveryStreamResponse
s@CreateDeliveryStreamResponse' {} Int
a -> CreateDeliveryStreamResponse
s {$sel:httpStatus:CreateDeliveryStreamResponse' :: Int
httpStatus = Int
a} :: CreateDeliveryStreamResponse)
instance Prelude.NFData CreateDeliveryStreamResponse where
rnf :: CreateDeliveryStreamResponse -> ()
rnf CreateDeliveryStreamResponse' {Int
Maybe Text
httpStatus :: Int
deliveryStreamARN :: Maybe Text
$sel:httpStatus:CreateDeliveryStreamResponse' :: CreateDeliveryStreamResponse -> Int
$sel:deliveryStreamARN:CreateDeliveryStreamResponse' :: CreateDeliveryStreamResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
deliveryStreamARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus