{-# 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 #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.ElasticTranscoder.CreatePipeline -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- The CreatePipeline operation creates a pipeline with settings that you -- specify. module Amazonka.ElasticTranscoder.CreatePipeline ( -- * Creating a Request CreatePipeline (..), newCreatePipeline, -- * Request Lenses createPipeline_awsKmsKeyArn, createPipeline_contentConfig, createPipeline_notifications, createPipeline_outputBucket, createPipeline_thumbnailConfig, createPipeline_name, createPipeline_inputBucket, createPipeline_role, -- * Destructuring the Response CreatePipelineResponse (..), newCreatePipelineResponse, -- * Response Lenses createPipelineResponse_pipeline, createPipelineResponse_warnings, createPipelineResponse_httpStatus, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.ElasticTranscoder.Types import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | The @CreatePipelineRequest@ structure. -- -- /See:/ 'newCreatePipeline' smart constructor. data CreatePipeline = CreatePipeline' { -- | The AWS Key Management Service (AWS KMS) key that you want to use with -- this pipeline. -- -- If you use either @s3@ or @s3-aws-kms@ as your @Encryption:Mode@, you -- don\'t need to provide a key with your job because a default key, known -- as an AWS-KMS key, is created for you automatically. You need to provide -- an AWS-KMS key only if you want to use a non-default AWS-KMS key, or if -- you are using an @Encryption:Mode@ of @aes-cbc-pkcs7@, @aes-ctr@, or -- @aes-gcm@. CreatePipeline -> Maybe Text awsKmsKeyArn :: Prelude.Maybe Prelude.Text, -- | The optional @ContentConfig@ object specifies information about the -- Amazon S3 bucket in which you want Elastic Transcoder to save transcoded -- files and playlists: which bucket to use, which users you want to have -- access to the files, the type of access you want users to have, and the -- storage class that you want to assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save transcoded files and playlists. -- -- - __Permissions__ (Optional): The Permissions object specifies which -- users you want to have access to transcoded files and the type of -- access you want them to have. You can grant permissions to a maximum -- of 30 users and\/or predefined Amazon S3 groups. -- -- - __Grantee Type__: Specify the type of value that appears in the -- @Grantee@ object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. For more -- information about canonical user IDs, see Access Control List -- (ACL) Overview in the Amazon Simple Storage Service Developer -- Guide. For more information about using CloudFront origin access -- identities to require that users use CloudFront URLs instead of -- Amazon S3 URLs, see Using an Origin Access Identity to Restrict -- Access to Your Amazon S3 Content. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- transcoded files and playlists. To identify the user or group, you -- can specify the canonical user ID for an AWS account, an origin -- access identity for a CloudFront distribution, the registered email -- address of an AWS account, or a predefined Amazon S3 group -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- files that Elastic Transcoder adds to the bucket, including -- playlists and video files. Valid values include: -- -- - @READ@: The grantee can read the objects and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the objects that Elastic Transcoder -- adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the video files and playlists that it stores in your Amazon S3 -- bucket. CreatePipeline -> Maybe PipelineOutputConfig contentConfig :: Prelude.Maybe PipelineOutputConfig, -- | The Amazon Simple Notification Service (Amazon SNS) topic that you want -- to notify to report job status. -- -- To receive notifications, you must also subscribe to the new topic in -- the Amazon SNS console. -- -- - __Progressing__: The topic ARN for the Amazon Simple Notification -- Service (Amazon SNS) topic that you want to notify when Elastic -- Transcoder has started to process a job in this pipeline. This is -- the ARN that Amazon SNS returned when you created the topic. For -- more information, see Create a Topic in the Amazon Simple -- Notification Service Developer Guide. -- -- - __Complete__: The topic ARN for the Amazon SNS topic that you want -- to notify when Elastic Transcoder has finished processing a job in -- this pipeline. This is the ARN that Amazon SNS returned when you -- created the topic. -- -- - __Warning__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters a warning condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. -- -- - __Error__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters an error condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. CreatePipeline -> Maybe Notifications notifications :: Prelude.Maybe Notifications, -- | The Amazon S3 bucket in which you want Elastic Transcoder to save the -- transcoded files. (Use this, or use ContentConfig:Bucket plus -- ThumbnailConfig:Bucket.) -- -- Specify this value when all of the following are true: -- -- - You want to save transcoded files, thumbnails (if any), and -- playlists (if any) together in one bucket. -- -- - You do not want to specify the users or groups who have access to -- the transcoded files, thumbnails, and playlists. -- -- - You do not want to specify the permissions that Elastic Transcoder -- grants to the files. -- -- When Elastic Transcoder saves files in @OutputBucket@, it grants -- full control over the files only to the AWS account that owns the -- role that is specified by @Role@. -- -- - You want to associate the transcoded files and thumbnails with the -- Amazon S3 Standard storage class. -- -- If you want to save transcoded files and playlists in one bucket and -- thumbnails in another bucket, specify which users can access the -- transcoded files or the permissions the users have, or change the Amazon -- S3 storage class, omit @OutputBucket@ and specify values for -- @ContentConfig@ and @ThumbnailConfig@ instead. CreatePipeline -> Maybe Text outputBucket :: Prelude.Maybe Prelude.Text, -- | The @ThumbnailConfig@ object specifies several values, including the -- Amazon S3 bucket in which you want Elastic Transcoder to save thumbnail -- files, which users you want to have access to the files, the type of -- access you want users to have, and the storage class that you want to -- assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@ even if you don\'t want to create thumbnails. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save thumbnail files. -- -- - __Permissions__ (Optional): The @Permissions@ object specifies which -- users and\/or predefined Amazon S3 groups you want to have access to -- thumbnail files, and the type of access you want them to have. You -- can grant permissions to a maximum of 30 users and\/or predefined -- Amazon S3 groups. -- -- - __GranteeType__: Specify the type of value that appears in the -- Grantee object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- thumbnail files. To identify the user or group, you can specify the -- canonical user ID for an AWS account, an origin access identity for -- a CloudFront distribution, the registered email address of an AWS -- account, or a predefined Amazon S3 group. -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- thumbnail files that Elastic Transcoder adds to the bucket. Valid -- values include: -- -- - @READ@: The grantee can read the thumbnails and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the thumbnails that Elastic -- Transcoder adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the thumbnails that it stores in your Amazon S3 bucket. CreatePipeline -> Maybe PipelineOutputConfig thumbnailConfig :: Prelude.Maybe PipelineOutputConfig, -- | The name of the pipeline. We recommend that the name be unique within -- the AWS account, but uniqueness is not enforced. -- -- Constraints: Maximum 40 characters. CreatePipeline -> Text name :: Prelude.Text, -- | The Amazon S3 bucket in which you saved the media files that you want to -- transcode. CreatePipeline -> Text inputBucket :: Prelude.Text, -- | The IAM Amazon Resource Name (ARN) for the role that you want Elastic -- Transcoder to use to create the pipeline. CreatePipeline -> Text role' :: Prelude.Text } deriving (CreatePipeline -> CreatePipeline -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: CreatePipeline -> CreatePipeline -> Bool $c/= :: CreatePipeline -> CreatePipeline -> Bool == :: CreatePipeline -> CreatePipeline -> Bool $c== :: CreatePipeline -> CreatePipeline -> Bool Prelude.Eq, ReadPrec [CreatePipeline] ReadPrec CreatePipeline Int -> ReadS CreatePipeline ReadS [CreatePipeline] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [CreatePipeline] $creadListPrec :: ReadPrec [CreatePipeline] readPrec :: ReadPrec CreatePipeline $creadPrec :: ReadPrec CreatePipeline readList :: ReadS [CreatePipeline] $creadList :: ReadS [CreatePipeline] readsPrec :: Int -> ReadS CreatePipeline $creadsPrec :: Int -> ReadS CreatePipeline Prelude.Read, Int -> CreatePipeline -> ShowS [CreatePipeline] -> ShowS CreatePipeline -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [CreatePipeline] -> ShowS $cshowList :: [CreatePipeline] -> ShowS show :: CreatePipeline -> String $cshow :: CreatePipeline -> String showsPrec :: Int -> CreatePipeline -> ShowS $cshowsPrec :: Int -> CreatePipeline -> ShowS Prelude.Show, forall x. Rep CreatePipeline x -> CreatePipeline forall x. CreatePipeline -> Rep CreatePipeline x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep CreatePipeline x -> CreatePipeline $cfrom :: forall x. CreatePipeline -> Rep CreatePipeline x Prelude.Generic) -- | -- Create a value of 'CreatePipeline' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'awsKmsKeyArn', 'createPipeline_awsKmsKeyArn' - The AWS Key Management Service (AWS KMS) key that you want to use with -- this pipeline. -- -- If you use either @s3@ or @s3-aws-kms@ as your @Encryption:Mode@, you -- don\'t need to provide a key with your job because a default key, known -- as an AWS-KMS key, is created for you automatically. You need to provide -- an AWS-KMS key only if you want to use a non-default AWS-KMS key, or if -- you are using an @Encryption:Mode@ of @aes-cbc-pkcs7@, @aes-ctr@, or -- @aes-gcm@. -- -- 'contentConfig', 'createPipeline_contentConfig' - The optional @ContentConfig@ object specifies information about the -- Amazon S3 bucket in which you want Elastic Transcoder to save transcoded -- files and playlists: which bucket to use, which users you want to have -- access to the files, the type of access you want users to have, and the -- storage class that you want to assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save transcoded files and playlists. -- -- - __Permissions__ (Optional): The Permissions object specifies which -- users you want to have access to transcoded files and the type of -- access you want them to have. You can grant permissions to a maximum -- of 30 users and\/or predefined Amazon S3 groups. -- -- - __Grantee Type__: Specify the type of value that appears in the -- @Grantee@ object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. For more -- information about canonical user IDs, see Access Control List -- (ACL) Overview in the Amazon Simple Storage Service Developer -- Guide. For more information about using CloudFront origin access -- identities to require that users use CloudFront URLs instead of -- Amazon S3 URLs, see Using an Origin Access Identity to Restrict -- Access to Your Amazon S3 Content. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- transcoded files and playlists. To identify the user or group, you -- can specify the canonical user ID for an AWS account, an origin -- access identity for a CloudFront distribution, the registered email -- address of an AWS account, or a predefined Amazon S3 group -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- files that Elastic Transcoder adds to the bucket, including -- playlists and video files. Valid values include: -- -- - @READ@: The grantee can read the objects and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the objects that Elastic Transcoder -- adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the video files and playlists that it stores in your Amazon S3 -- bucket. -- -- 'notifications', 'createPipeline_notifications' - The Amazon Simple Notification Service (Amazon SNS) topic that you want -- to notify to report job status. -- -- To receive notifications, you must also subscribe to the new topic in -- the Amazon SNS console. -- -- - __Progressing__: The topic ARN for the Amazon Simple Notification -- Service (Amazon SNS) topic that you want to notify when Elastic -- Transcoder has started to process a job in this pipeline. This is -- the ARN that Amazon SNS returned when you created the topic. For -- more information, see Create a Topic in the Amazon Simple -- Notification Service Developer Guide. -- -- - __Complete__: The topic ARN for the Amazon SNS topic that you want -- to notify when Elastic Transcoder has finished processing a job in -- this pipeline. This is the ARN that Amazon SNS returned when you -- created the topic. -- -- - __Warning__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters a warning condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. -- -- - __Error__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters an error condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. -- -- 'outputBucket', 'createPipeline_outputBucket' - The Amazon S3 bucket in which you want Elastic Transcoder to save the -- transcoded files. (Use this, or use ContentConfig:Bucket plus -- ThumbnailConfig:Bucket.) -- -- Specify this value when all of the following are true: -- -- - You want to save transcoded files, thumbnails (if any), and -- playlists (if any) together in one bucket. -- -- - You do not want to specify the users or groups who have access to -- the transcoded files, thumbnails, and playlists. -- -- - You do not want to specify the permissions that Elastic Transcoder -- grants to the files. -- -- When Elastic Transcoder saves files in @OutputBucket@, it grants -- full control over the files only to the AWS account that owns the -- role that is specified by @Role@. -- -- - You want to associate the transcoded files and thumbnails with the -- Amazon S3 Standard storage class. -- -- If you want to save transcoded files and playlists in one bucket and -- thumbnails in another bucket, specify which users can access the -- transcoded files or the permissions the users have, or change the Amazon -- S3 storage class, omit @OutputBucket@ and specify values for -- @ContentConfig@ and @ThumbnailConfig@ instead. -- -- 'thumbnailConfig', 'createPipeline_thumbnailConfig' - The @ThumbnailConfig@ object specifies several values, including the -- Amazon S3 bucket in which you want Elastic Transcoder to save thumbnail -- files, which users you want to have access to the files, the type of -- access you want users to have, and the storage class that you want to -- assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@ even if you don\'t want to create thumbnails. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save thumbnail files. -- -- - __Permissions__ (Optional): The @Permissions@ object specifies which -- users and\/or predefined Amazon S3 groups you want to have access to -- thumbnail files, and the type of access you want them to have. You -- can grant permissions to a maximum of 30 users and\/or predefined -- Amazon S3 groups. -- -- - __GranteeType__: Specify the type of value that appears in the -- Grantee object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- thumbnail files. To identify the user or group, you can specify the -- canonical user ID for an AWS account, an origin access identity for -- a CloudFront distribution, the registered email address of an AWS -- account, or a predefined Amazon S3 group. -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- thumbnail files that Elastic Transcoder adds to the bucket. Valid -- values include: -- -- - @READ@: The grantee can read the thumbnails and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the thumbnails that Elastic -- Transcoder adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the thumbnails that it stores in your Amazon S3 bucket. -- -- 'name', 'createPipeline_name' - The name of the pipeline. We recommend that the name be unique within -- the AWS account, but uniqueness is not enforced. -- -- Constraints: Maximum 40 characters. -- -- 'inputBucket', 'createPipeline_inputBucket' - The Amazon S3 bucket in which you saved the media files that you want to -- transcode. -- -- 'role'', 'createPipeline_role' - The IAM Amazon Resource Name (ARN) for the role that you want Elastic -- Transcoder to use to create the pipeline. newCreatePipeline :: -- | 'name' Prelude.Text -> -- | 'inputBucket' Prelude.Text -> -- | 'role'' Prelude.Text -> CreatePipeline newCreatePipeline :: Text -> Text -> Text -> CreatePipeline newCreatePipeline Text pName_ Text pInputBucket_ Text pRole_ = CreatePipeline' { $sel:awsKmsKeyArn:CreatePipeline' :: Maybe Text awsKmsKeyArn = forall a. Maybe a Prelude.Nothing, $sel:contentConfig:CreatePipeline' :: Maybe PipelineOutputConfig contentConfig = forall a. Maybe a Prelude.Nothing, $sel:notifications:CreatePipeline' :: Maybe Notifications notifications = forall a. Maybe a Prelude.Nothing, $sel:outputBucket:CreatePipeline' :: Maybe Text outputBucket = forall a. Maybe a Prelude.Nothing, $sel:thumbnailConfig:CreatePipeline' :: Maybe PipelineOutputConfig thumbnailConfig = forall a. Maybe a Prelude.Nothing, $sel:name:CreatePipeline' :: Text name = Text pName_, $sel:inputBucket:CreatePipeline' :: Text inputBucket = Text pInputBucket_, $sel:role':CreatePipeline' :: Text role' = Text pRole_ } -- | The AWS Key Management Service (AWS KMS) key that you want to use with -- this pipeline. -- -- If you use either @s3@ or @s3-aws-kms@ as your @Encryption:Mode@, you -- don\'t need to provide a key with your job because a default key, known -- as an AWS-KMS key, is created for you automatically. You need to provide -- an AWS-KMS key only if you want to use a non-default AWS-KMS key, or if -- you are using an @Encryption:Mode@ of @aes-cbc-pkcs7@, @aes-ctr@, or -- @aes-gcm@. createPipeline_awsKmsKeyArn :: Lens.Lens' CreatePipeline (Prelude.Maybe Prelude.Text) createPipeline_awsKmsKeyArn :: Lens' CreatePipeline (Maybe Text) createPipeline_awsKmsKeyArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Maybe Text awsKmsKeyArn :: Maybe Text $sel:awsKmsKeyArn:CreatePipeline' :: CreatePipeline -> Maybe Text awsKmsKeyArn} -> Maybe Text awsKmsKeyArn) (\s :: CreatePipeline s@CreatePipeline' {} Maybe Text a -> CreatePipeline s {$sel:awsKmsKeyArn:CreatePipeline' :: Maybe Text awsKmsKeyArn = Maybe Text a} :: CreatePipeline) -- | The optional @ContentConfig@ object specifies information about the -- Amazon S3 bucket in which you want Elastic Transcoder to save transcoded -- files and playlists: which bucket to use, which users you want to have -- access to the files, the type of access you want users to have, and the -- storage class that you want to assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save transcoded files and playlists. -- -- - __Permissions__ (Optional): The Permissions object specifies which -- users you want to have access to transcoded files and the type of -- access you want them to have. You can grant permissions to a maximum -- of 30 users and\/or predefined Amazon S3 groups. -- -- - __Grantee Type__: Specify the type of value that appears in the -- @Grantee@ object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. For more -- information about canonical user IDs, see Access Control List -- (ACL) Overview in the Amazon Simple Storage Service Developer -- Guide. For more information about using CloudFront origin access -- identities to require that users use CloudFront URLs instead of -- Amazon S3 URLs, see Using an Origin Access Identity to Restrict -- Access to Your Amazon S3 Content. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- transcoded files and playlists. To identify the user or group, you -- can specify the canonical user ID for an AWS account, an origin -- access identity for a CloudFront distribution, the registered email -- address of an AWS account, or a predefined Amazon S3 group -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- files that Elastic Transcoder adds to the bucket, including -- playlists and video files. Valid values include: -- -- - @READ@: The grantee can read the objects and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the objects that -- Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the objects that Elastic Transcoder -- adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the video files and playlists that it stores in your Amazon S3 -- bucket. createPipeline_contentConfig :: Lens.Lens' CreatePipeline (Prelude.Maybe PipelineOutputConfig) createPipeline_contentConfig :: Lens' CreatePipeline (Maybe PipelineOutputConfig) createPipeline_contentConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Maybe PipelineOutputConfig contentConfig :: Maybe PipelineOutputConfig $sel:contentConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig contentConfig} -> Maybe PipelineOutputConfig contentConfig) (\s :: CreatePipeline s@CreatePipeline' {} Maybe PipelineOutputConfig a -> CreatePipeline s {$sel:contentConfig:CreatePipeline' :: Maybe PipelineOutputConfig contentConfig = Maybe PipelineOutputConfig a} :: CreatePipeline) -- | The Amazon Simple Notification Service (Amazon SNS) topic that you want -- to notify to report job status. -- -- To receive notifications, you must also subscribe to the new topic in -- the Amazon SNS console. -- -- - __Progressing__: The topic ARN for the Amazon Simple Notification -- Service (Amazon SNS) topic that you want to notify when Elastic -- Transcoder has started to process a job in this pipeline. This is -- the ARN that Amazon SNS returned when you created the topic. For -- more information, see Create a Topic in the Amazon Simple -- Notification Service Developer Guide. -- -- - __Complete__: The topic ARN for the Amazon SNS topic that you want -- to notify when Elastic Transcoder has finished processing a job in -- this pipeline. This is the ARN that Amazon SNS returned when you -- created the topic. -- -- - __Warning__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters a warning condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. -- -- - __Error__: The topic ARN for the Amazon SNS topic that you want to -- notify when Elastic Transcoder encounters an error condition while -- processing a job in this pipeline. This is the ARN that Amazon SNS -- returned when you created the topic. createPipeline_notifications :: Lens.Lens' CreatePipeline (Prelude.Maybe Notifications) createPipeline_notifications :: Lens' CreatePipeline (Maybe Notifications) createPipeline_notifications = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Maybe Notifications notifications :: Maybe Notifications $sel:notifications:CreatePipeline' :: CreatePipeline -> Maybe Notifications notifications} -> Maybe Notifications notifications) (\s :: CreatePipeline s@CreatePipeline' {} Maybe Notifications a -> CreatePipeline s {$sel:notifications:CreatePipeline' :: Maybe Notifications notifications = Maybe Notifications a} :: CreatePipeline) -- | The Amazon S3 bucket in which you want Elastic Transcoder to save the -- transcoded files. (Use this, or use ContentConfig:Bucket plus -- ThumbnailConfig:Bucket.) -- -- Specify this value when all of the following are true: -- -- - You want to save transcoded files, thumbnails (if any), and -- playlists (if any) together in one bucket. -- -- - You do not want to specify the users or groups who have access to -- the transcoded files, thumbnails, and playlists. -- -- - You do not want to specify the permissions that Elastic Transcoder -- grants to the files. -- -- When Elastic Transcoder saves files in @OutputBucket@, it grants -- full control over the files only to the AWS account that owns the -- role that is specified by @Role@. -- -- - You want to associate the transcoded files and thumbnails with the -- Amazon S3 Standard storage class. -- -- If you want to save transcoded files and playlists in one bucket and -- thumbnails in another bucket, specify which users can access the -- transcoded files or the permissions the users have, or change the Amazon -- S3 storage class, omit @OutputBucket@ and specify values for -- @ContentConfig@ and @ThumbnailConfig@ instead. createPipeline_outputBucket :: Lens.Lens' CreatePipeline (Prelude.Maybe Prelude.Text) createPipeline_outputBucket :: Lens' CreatePipeline (Maybe Text) createPipeline_outputBucket = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Maybe Text outputBucket :: Maybe Text $sel:outputBucket:CreatePipeline' :: CreatePipeline -> Maybe Text outputBucket} -> Maybe Text outputBucket) (\s :: CreatePipeline s@CreatePipeline' {} Maybe Text a -> CreatePipeline s {$sel:outputBucket:CreatePipeline' :: Maybe Text outputBucket = Maybe Text a} :: CreatePipeline) -- | The @ThumbnailConfig@ object specifies several values, including the -- Amazon S3 bucket in which you want Elastic Transcoder to save thumbnail -- files, which users you want to have access to the files, the type of -- access you want users to have, and the storage class that you want to -- assign to the files. -- -- If you specify values for @ContentConfig@, you must also specify values -- for @ThumbnailConfig@ even if you don\'t want to create thumbnails. -- -- If you specify values for @ContentConfig@ and @ThumbnailConfig@, omit -- the @OutputBucket@ object. -- -- - __Bucket__: The Amazon S3 bucket in which you want Elastic -- Transcoder to save thumbnail files. -- -- - __Permissions__ (Optional): The @Permissions@ object specifies which -- users and\/or predefined Amazon S3 groups you want to have access to -- thumbnail files, and the type of access you want them to have. You -- can grant permissions to a maximum of 30 users and\/or predefined -- Amazon S3 groups. -- -- - __GranteeType__: Specify the type of value that appears in the -- Grantee object: -- -- - __Canonical__: The value in the @Grantee@ object is either the -- canonical user ID for an AWS account or an origin access -- identity for an Amazon CloudFront distribution. -- -- A canonical user ID is not the same as an AWS account number. -- -- - __Email__: The value in the @Grantee@ object is the registered -- email address of an AWS account. -- -- - __Group__: The value in the @Grantee@ object is one of the -- following predefined Amazon S3 groups: @AllUsers@, -- @AuthenticatedUsers@, or @LogDelivery@. -- -- - __Grantee__: The AWS user or group that you want to have access to -- thumbnail files. To identify the user or group, you can specify the -- canonical user ID for an AWS account, an origin access identity for -- a CloudFront distribution, the registered email address of an AWS -- account, or a predefined Amazon S3 group. -- -- - __Access__: The permission that you want to give to the AWS user -- that you specified in @Grantee@. Permissions are granted on the -- thumbnail files that Elastic Transcoder adds to the bucket. Valid -- values include: -- -- - @READ@: The grantee can read the thumbnails and metadata for -- objects that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @READ_ACP@: The grantee can read the object ACL for thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @WRITE_ACP@: The grantee can write the ACL for the thumbnails -- that Elastic Transcoder adds to the Amazon S3 bucket. -- -- - @FULL_CONTROL@: The grantee has @READ@, @READ_ACP@, and -- @WRITE_ACP@ permissions for the thumbnails that Elastic -- Transcoder adds to the Amazon S3 bucket. -- -- - __StorageClass__: The Amazon S3 storage class, @Standard@ or -- @ReducedRedundancy@, that you want Elastic Transcoder to assign to -- the thumbnails that it stores in your Amazon S3 bucket. createPipeline_thumbnailConfig :: Lens.Lens' CreatePipeline (Prelude.Maybe PipelineOutputConfig) createPipeline_thumbnailConfig :: Lens' CreatePipeline (Maybe PipelineOutputConfig) createPipeline_thumbnailConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Maybe PipelineOutputConfig thumbnailConfig :: Maybe PipelineOutputConfig $sel:thumbnailConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig thumbnailConfig} -> Maybe PipelineOutputConfig thumbnailConfig) (\s :: CreatePipeline s@CreatePipeline' {} Maybe PipelineOutputConfig a -> CreatePipeline s {$sel:thumbnailConfig:CreatePipeline' :: Maybe PipelineOutputConfig thumbnailConfig = Maybe PipelineOutputConfig a} :: CreatePipeline) -- | The name of the pipeline. We recommend that the name be unique within -- the AWS account, but uniqueness is not enforced. -- -- Constraints: Maximum 40 characters. createPipeline_name :: Lens.Lens' CreatePipeline Prelude.Text createPipeline_name :: Lens' CreatePipeline Text createPipeline_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Text name :: Text $sel:name:CreatePipeline' :: CreatePipeline -> Text name} -> Text name) (\s :: CreatePipeline s@CreatePipeline' {} Text a -> CreatePipeline s {$sel:name:CreatePipeline' :: Text name = Text a} :: CreatePipeline) -- | The Amazon S3 bucket in which you saved the media files that you want to -- transcode. createPipeline_inputBucket :: Lens.Lens' CreatePipeline Prelude.Text createPipeline_inputBucket :: Lens' CreatePipeline Text createPipeline_inputBucket = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Text inputBucket :: Text $sel:inputBucket:CreatePipeline' :: CreatePipeline -> Text inputBucket} -> Text inputBucket) (\s :: CreatePipeline s@CreatePipeline' {} Text a -> CreatePipeline s {$sel:inputBucket:CreatePipeline' :: Text inputBucket = Text a} :: CreatePipeline) -- | The IAM Amazon Resource Name (ARN) for the role that you want Elastic -- Transcoder to use to create the pipeline. createPipeline_role :: Lens.Lens' CreatePipeline Prelude.Text createPipeline_role :: Lens' CreatePipeline Text createPipeline_role = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipeline' {Text role' :: Text $sel:role':CreatePipeline' :: CreatePipeline -> Text role'} -> Text role') (\s :: CreatePipeline s@CreatePipeline' {} Text a -> CreatePipeline s {$sel:role':CreatePipeline' :: Text role' = Text a} :: CreatePipeline) instance Core.AWSRequest CreatePipeline where type AWSResponse CreatePipeline = CreatePipelineResponse request :: (Service -> Service) -> CreatePipeline -> Request CreatePipeline 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 CreatePipeline -> ClientResponse ClientBody -> m (Either Error (ClientResponse (AWSResponse CreatePipeline))) 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 Pipeline -> Maybe [Warning] -> Int -> CreatePipelineResponse CreatePipelineResponse' 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 "Pipeline") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Either String (Maybe a) Data..?> Key "Warnings" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a Core..!@ forall a. Monoid a => a Prelude.mempty) 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 CreatePipeline where hashWithSalt :: Int -> CreatePipeline -> Int hashWithSalt Int _salt CreatePipeline' {Maybe Text Maybe Notifications Maybe PipelineOutputConfig Text role' :: Text inputBucket :: Text name :: Text thumbnailConfig :: Maybe PipelineOutputConfig outputBucket :: Maybe Text notifications :: Maybe Notifications contentConfig :: Maybe PipelineOutputConfig awsKmsKeyArn :: Maybe Text $sel:role':CreatePipeline' :: CreatePipeline -> Text $sel:inputBucket:CreatePipeline' :: CreatePipeline -> Text $sel:name:CreatePipeline' :: CreatePipeline -> Text $sel:thumbnailConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:outputBucket:CreatePipeline' :: CreatePipeline -> Maybe Text $sel:notifications:CreatePipeline' :: CreatePipeline -> Maybe Notifications $sel:contentConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:awsKmsKeyArn:CreatePipeline' :: CreatePipeline -> Maybe Text ..} = Int _salt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text awsKmsKeyArn forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe PipelineOutputConfig contentConfig forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Notifications notifications forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text outputBucket forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe PipelineOutputConfig thumbnailConfig forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text name forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text inputBucket forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Text role' instance Prelude.NFData CreatePipeline where rnf :: CreatePipeline -> () rnf CreatePipeline' {Maybe Text Maybe Notifications Maybe PipelineOutputConfig Text role' :: Text inputBucket :: Text name :: Text thumbnailConfig :: Maybe PipelineOutputConfig outputBucket :: Maybe Text notifications :: Maybe Notifications contentConfig :: Maybe PipelineOutputConfig awsKmsKeyArn :: Maybe Text $sel:role':CreatePipeline' :: CreatePipeline -> Text $sel:inputBucket:CreatePipeline' :: CreatePipeline -> Text $sel:name:CreatePipeline' :: CreatePipeline -> Text $sel:thumbnailConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:outputBucket:CreatePipeline' :: CreatePipeline -> Maybe Text $sel:notifications:CreatePipeline' :: CreatePipeline -> Maybe Notifications $sel:contentConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:awsKmsKeyArn:CreatePipeline' :: CreatePipeline -> Maybe Text ..} = forall a. NFData a => a -> () Prelude.rnf Maybe Text awsKmsKeyArn seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe PipelineOutputConfig contentConfig seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Notifications notifications seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text outputBucket seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe PipelineOutputConfig thumbnailConfig seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text name seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text inputBucket seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Text role' instance Data.ToHeaders CreatePipeline where toHeaders :: CreatePipeline -> ResponseHeaders toHeaders = forall a b. a -> b -> a Prelude.const forall a. Monoid a => a Prelude.mempty instance Data.ToJSON CreatePipeline where toJSON :: CreatePipeline -> Value toJSON CreatePipeline' {Maybe Text Maybe Notifications Maybe PipelineOutputConfig Text role' :: Text inputBucket :: Text name :: Text thumbnailConfig :: Maybe PipelineOutputConfig outputBucket :: Maybe Text notifications :: Maybe Notifications contentConfig :: Maybe PipelineOutputConfig awsKmsKeyArn :: Maybe Text $sel:role':CreatePipeline' :: CreatePipeline -> Text $sel:inputBucket:CreatePipeline' :: CreatePipeline -> Text $sel:name:CreatePipeline' :: CreatePipeline -> Text $sel:thumbnailConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:outputBucket:CreatePipeline' :: CreatePipeline -> Maybe Text $sel:notifications:CreatePipeline' :: CreatePipeline -> Maybe Notifications $sel:contentConfig:CreatePipeline' :: CreatePipeline -> Maybe PipelineOutputConfig $sel:awsKmsKeyArn:CreatePipeline' :: CreatePipeline -> Maybe Text ..} = [Pair] -> Value Data.object ( forall a. [Maybe a] -> [a] Prelude.catMaybes [ (Key "AwsKmsKeyArn" 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 Text awsKmsKeyArn, (Key "ContentConfig" 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 PipelineOutputConfig contentConfig, (Key "Notifications" 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 Notifications notifications, (Key "OutputBucket" 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 Text outputBucket, (Key "ThumbnailConfig" 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 PipelineOutputConfig thumbnailConfig, forall a. a -> Maybe a Prelude.Just (Key "Name" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Text name), forall a. a -> Maybe a Prelude.Just (Key "InputBucket" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Text inputBucket), forall a. a -> Maybe a Prelude.Just (Key "Role" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv Data..= Text role') ] ) instance Data.ToPath CreatePipeline where toPath :: CreatePipeline -> ByteString toPath = forall a b. a -> b -> a Prelude.const ByteString "/2012-09-25/pipelines" instance Data.ToQuery CreatePipeline where toQuery :: CreatePipeline -> QueryString toQuery = forall a b. a -> b -> a Prelude.const forall a. Monoid a => a Prelude.mempty -- | When you create a pipeline, Elastic Transcoder returns the values that -- you specified in the request. -- -- /See:/ 'newCreatePipelineResponse' smart constructor. data CreatePipelineResponse = CreatePipelineResponse' { -- | A section of the response body that provides information about the -- pipeline that is created. CreatePipelineResponse -> Maybe Pipeline pipeline :: Prelude.Maybe Pipeline, -- | Elastic Transcoder returns a warning if the resources used by your -- pipeline are not in the same region as the pipeline. -- -- Using resources in the same region, such as your Amazon S3 buckets, -- Amazon SNS notification topics, and AWS KMS key, reduces processing time -- and prevents cross-regional charges. CreatePipelineResponse -> Maybe [Warning] warnings :: Prelude.Maybe [Warning], -- | The response's http status code. CreatePipelineResponse -> Int httpStatus :: Prelude.Int } deriving (CreatePipelineResponse -> CreatePipelineResponse -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: CreatePipelineResponse -> CreatePipelineResponse -> Bool $c/= :: CreatePipelineResponse -> CreatePipelineResponse -> Bool == :: CreatePipelineResponse -> CreatePipelineResponse -> Bool $c== :: CreatePipelineResponse -> CreatePipelineResponse -> Bool Prelude.Eq, ReadPrec [CreatePipelineResponse] ReadPrec CreatePipelineResponse Int -> ReadS CreatePipelineResponse ReadS [CreatePipelineResponse] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [CreatePipelineResponse] $creadListPrec :: ReadPrec [CreatePipelineResponse] readPrec :: ReadPrec CreatePipelineResponse $creadPrec :: ReadPrec CreatePipelineResponse readList :: ReadS [CreatePipelineResponse] $creadList :: ReadS [CreatePipelineResponse] readsPrec :: Int -> ReadS CreatePipelineResponse $creadsPrec :: Int -> ReadS CreatePipelineResponse Prelude.Read, Int -> CreatePipelineResponse -> ShowS [CreatePipelineResponse] -> ShowS CreatePipelineResponse -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [CreatePipelineResponse] -> ShowS $cshowList :: [CreatePipelineResponse] -> ShowS show :: CreatePipelineResponse -> String $cshow :: CreatePipelineResponse -> String showsPrec :: Int -> CreatePipelineResponse -> ShowS $cshowsPrec :: Int -> CreatePipelineResponse -> ShowS Prelude.Show, forall x. Rep CreatePipelineResponse x -> CreatePipelineResponse forall x. CreatePipelineResponse -> Rep CreatePipelineResponse x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep CreatePipelineResponse x -> CreatePipelineResponse $cfrom :: forall x. CreatePipelineResponse -> Rep CreatePipelineResponse x Prelude.Generic) -- | -- Create a value of 'CreatePipelineResponse' with all optional fields omitted. -- -- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'pipeline', 'createPipelineResponse_pipeline' - A section of the response body that provides information about the -- pipeline that is created. -- -- 'warnings', 'createPipelineResponse_warnings' - Elastic Transcoder returns a warning if the resources used by your -- pipeline are not in the same region as the pipeline. -- -- Using resources in the same region, such as your Amazon S3 buckets, -- Amazon SNS notification topics, and AWS KMS key, reduces processing time -- and prevents cross-regional charges. -- -- 'httpStatus', 'createPipelineResponse_httpStatus' - The response's http status code. newCreatePipelineResponse :: -- | 'httpStatus' Prelude.Int -> CreatePipelineResponse newCreatePipelineResponse :: Int -> CreatePipelineResponse newCreatePipelineResponse Int pHttpStatus_ = CreatePipelineResponse' { $sel:pipeline:CreatePipelineResponse' :: Maybe Pipeline pipeline = forall a. Maybe a Prelude.Nothing, $sel:warnings:CreatePipelineResponse' :: Maybe [Warning] warnings = forall a. Maybe a Prelude.Nothing, $sel:httpStatus:CreatePipelineResponse' :: Int httpStatus = Int pHttpStatus_ } -- | A section of the response body that provides information about the -- pipeline that is created. createPipelineResponse_pipeline :: Lens.Lens' CreatePipelineResponse (Prelude.Maybe Pipeline) createPipelineResponse_pipeline :: Lens' CreatePipelineResponse (Maybe Pipeline) createPipelineResponse_pipeline = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipelineResponse' {Maybe Pipeline pipeline :: Maybe Pipeline $sel:pipeline:CreatePipelineResponse' :: CreatePipelineResponse -> Maybe Pipeline pipeline} -> Maybe Pipeline pipeline) (\s :: CreatePipelineResponse s@CreatePipelineResponse' {} Maybe Pipeline a -> CreatePipelineResponse s {$sel:pipeline:CreatePipelineResponse' :: Maybe Pipeline pipeline = Maybe Pipeline a} :: CreatePipelineResponse) -- | Elastic Transcoder returns a warning if the resources used by your -- pipeline are not in the same region as the pipeline. -- -- Using resources in the same region, such as your Amazon S3 buckets, -- Amazon SNS notification topics, and AWS KMS key, reduces processing time -- and prevents cross-regional charges. createPipelineResponse_warnings :: Lens.Lens' CreatePipelineResponse (Prelude.Maybe [Warning]) createPipelineResponse_warnings :: Lens' CreatePipelineResponse (Maybe [Warning]) createPipelineResponse_warnings = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipelineResponse' {Maybe [Warning] warnings :: Maybe [Warning] $sel:warnings:CreatePipelineResponse' :: CreatePipelineResponse -> Maybe [Warning] warnings} -> Maybe [Warning] warnings) (\s :: CreatePipelineResponse s@CreatePipelineResponse' {} Maybe [Warning] a -> CreatePipelineResponse s {$sel:warnings:CreatePipelineResponse' :: Maybe [Warning] warnings = Maybe [Warning] a} :: CreatePipelineResponse) 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 -- | The response's http status code. createPipelineResponse_httpStatus :: Lens.Lens' CreatePipelineResponse Prelude.Int createPipelineResponse_httpStatus :: Lens' CreatePipelineResponse Int createPipelineResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\CreatePipelineResponse' {Int httpStatus :: Int $sel:httpStatus:CreatePipelineResponse' :: CreatePipelineResponse -> Int httpStatus} -> Int httpStatus) (\s :: CreatePipelineResponse s@CreatePipelineResponse' {} Int a -> CreatePipelineResponse s {$sel:httpStatus:CreatePipelineResponse' :: Int httpStatus = Int a} :: CreatePipelineResponse) instance Prelude.NFData CreatePipelineResponse where rnf :: CreatePipelineResponse -> () rnf CreatePipelineResponse' {Int Maybe [Warning] Maybe Pipeline httpStatus :: Int warnings :: Maybe [Warning] pipeline :: Maybe Pipeline $sel:httpStatus:CreatePipelineResponse' :: CreatePipelineResponse -> Int $sel:warnings:CreatePipelineResponse' :: CreatePipelineResponse -> Maybe [Warning] $sel:pipeline:CreatePipelineResponse' :: CreatePipelineResponse -> Maybe Pipeline ..} = forall a. NFData a => a -> () Prelude.rnf Maybe Pipeline pipeline seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [Warning] warnings seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Int httpStatus