{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.ElasticTranscoder.Types.JobOutput -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.ElasticTranscoder.Types.JobOutput 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.Captions import Amazonka.ElasticTranscoder.Types.Clip import Amazonka.ElasticTranscoder.Types.Encryption import Amazonka.ElasticTranscoder.Types.JobAlbumArt import Amazonka.ElasticTranscoder.Types.JobWatermark import qualified Amazonka.Prelude as Prelude -- | Outputs recommended instead. -- -- If you specified one output for a job, information about that output. If -- you specified multiple outputs for a job, the @Output@ object lists -- information about the first output. This duplicates the information that -- is listed for the first output in the @Outputs@ object. -- -- /See:/ 'newJobOutput' smart constructor. data JobOutput = JobOutput' { -- | The album art to be associated with the output file, if any. JobOutput -> Maybe JobAlbumArt albumArt :: Prelude.Maybe JobAlbumArt, -- | If Elastic Transcoder used a preset with a @ColorSpaceConversionMode@ to -- transcode the output file, the @AppliedColorSpaceConversion@ parameter -- shows the conversion used. If no @ColorSpaceConversionMode@ was defined -- in the preset, this parameter is not be included in the job response. JobOutput -> Maybe Text appliedColorSpaceConversion :: Prelude.Maybe Prelude.Text, -- | You can configure Elastic Transcoder to transcode captions, or -- subtitles, from one format to another. All captions must be in UTF-8. -- Elastic Transcoder supports two types of captions: -- -- - __Embedded:__ Embedded captions are included in the same file as the -- audio and video. Elastic Transcoder supports only one embedded -- caption per language, to a maximum of 300 embedded captions per -- file. -- -- Valid input values include: @CEA-608 (EIA-608@, first non-empty -- channel only), @CEA-708 (EIA-708@, first non-empty channel only), -- and @mov-text@ -- -- Valid outputs include: @mov-text@ -- -- Elastic Transcoder supports a maximum of one embedded format per -- output. -- -- - __Sidecar:__ Sidecar captions are kept in a separate metadata file -- from the audio and video data. Sidecar captions require a player -- that is capable of understanding the relationship between the video -- file and the sidecar file. Elastic Transcoder supports only one -- sidecar caption per language, to a maximum of 20 sidecar captions -- per file. -- -- Valid input values include: @dfxp@ (first div element only), -- @ebu-tt@, @scc@, @smpt@, @srt@, @ttml@ (first div element only), and -- @webvtt@ -- -- Valid outputs include: @dfxp@ (first div element only), @scc@, -- @srt@, and @webvtt@. -- -- If you want ttml or smpte-tt compatible captions, specify dfxp as your -- output format. -- -- Elastic Transcoder does not support OCR (Optical Character Recognition), -- does not accept pictures as a valid input for captions, and is not -- available for audio-only transcoding. Elastic Transcoder does not -- preserve text formatting (for example, italics) during the transcoding -- process. -- -- To remove captions or leave the captions empty, set @Captions@ to null. -- To pass through existing captions unchanged, set the @MergePolicy@ to -- @MergeRetain@, and pass in a null @CaptionSources@ array. -- -- For more information on embedded files, see the Subtitles Wikipedia -- page. -- -- For more information on sidecar files, see the Extensible Metadata -- Platform and Sidecar file Wikipedia pages. :: Prelude.Maybe Captions, -- | You can create an output file that contains an excerpt from the input -- file. This excerpt, called a clip, can come from the beginning, middle, -- or end of the file. The Composition object contains settings for the -- clips that make up an output file. For the current release, you can only -- specify settings for a single clip per output file. The Composition -- object cannot be null. JobOutput -> Maybe [Clip] composition :: Prelude.Maybe [Clip], -- | Duration of the output file, in seconds. JobOutput -> Maybe Integer duration :: Prelude.Maybe Prelude.Integer, -- | Duration of the output file, in milliseconds. JobOutput -> Maybe Integer durationMillis :: Prelude.Maybe Prelude.Integer, -- | The encryption settings, if any, that you want Elastic Transcoder to -- apply to your output files. If you choose to use encryption, you must -- specify a mode to use. If you choose not to use encryption, Elastic -- Transcoder writes an unencrypted file to your Amazon S3 bucket. JobOutput -> Maybe Encryption encryption :: Prelude.Maybe Encryption, -- | File size of the output file, in bytes. JobOutput -> Maybe Integer fileSize :: Prelude.Maybe Prelude.Integer, -- | Frame rate of the output file, in frames per second. JobOutput -> Maybe Text frameRate :: Prelude.Maybe Prelude.Text, -- | Height of the output file, in pixels. JobOutput -> Maybe Int height :: Prelude.Maybe Prelude.Int, -- | A sequential counter, starting with 1, that identifies an output among -- the outputs from the current job. In the Output syntax, this value is -- always 1. JobOutput -> Maybe Text id :: Prelude.Maybe Prelude.Text, -- | The name to assign to the transcoded file. Elastic Transcoder saves the -- file in the Amazon S3 bucket specified by the @OutputBucket@ object in -- the pipeline that is specified by the pipeline ID. JobOutput -> Maybe Text key :: Prelude.Maybe Prelude.Text, -- | The value of the @Id@ object for the preset that you want to use for -- this job. The preset determines the audio, video, and thumbnail settings -- that Elastic Transcoder uses for transcoding. To use a preset that you -- created, specify the preset ID that Elastic Transcoder returned in the -- response when you created the preset. You can also use the Elastic -- Transcoder system presets, which you can get with @ListPresets@. JobOutput -> Maybe Text presetId :: Prelude.Maybe Prelude.Text, -- | The number of degrees clockwise by which you want Elastic Transcoder to -- rotate the output relative to the input. Enter one of the following -- values: -- -- @auto@, @0@, @90@, @180@, @270@ -- -- The value @auto@ generally works only if the file that you\'re -- transcoding contains rotation metadata. JobOutput -> Maybe Text rotate :: Prelude.Maybe Prelude.Text, -- | (Outputs in Fragmented MP4 or MPEG-TS format only. -- -- If you specify a preset in @PresetId@ for which the value of @Container@ -- is @fmp4@ (Fragmented MP4) or @ts@ (MPEG-TS), @SegmentDuration@ is the -- target maximum duration of each segment in seconds. For @HLSv3@ format -- playlists, each media segment is stored in a separate @.ts@ file. For -- @HLSv4@, @MPEG-DASH@, and @Smooth@ playlists, all media segments for an -- output are stored in a single file. Each segment is approximately the -- length of the @SegmentDuration@, though individual segments might be -- shorter or longer. -- -- The range of valid values is 1 to 60 seconds. If the duration of the -- video is not evenly divisible by @SegmentDuration@, the duration of the -- last segment is the remainder of total length\/SegmentDuration. -- -- Elastic Transcoder creates an output-specific playlist for each output -- @HLS@ output that you specify in OutputKeys. To add an output to the -- master playlist for this job, include it in the @OutputKeys@ of the -- associated playlist. JobOutput -> Maybe Text segmentDuration :: Prelude.Maybe Prelude.Text, -- | The status of one output in a job. If you specified only one output for -- the job, @Outputs:Status@ is always the same as @Job:Status@. If you -- specified more than one output: -- -- - @Job:Status@ and @Outputs:Status@ for all of the outputs is -- Submitted until Elastic Transcoder starts to process the first -- output. -- -- - When Elastic Transcoder starts to process the first output, -- @Outputs:Status@ for that output and @Job:Status@ both change to -- Progressing. For each output, the value of @Outputs:Status@ remains -- Submitted until Elastic Transcoder starts to process the output. -- -- - Job:Status remains Progressing until all of the outputs reach a -- terminal status, either Complete or Error. -- -- - When all of the outputs reach a terminal status, @Job:Status@ -- changes to Complete only if @Outputs:Status@ for all of the outputs -- is @Complete@. If @Outputs:Status@ for one or more outputs is -- @Error@, the terminal status for @Job:Status@ is also @Error@. -- -- The value of @Status@ is one of the following: @Submitted@, -- @Progressing@, @Complete@, @Canceled@, or @Error@. JobOutput -> Maybe Text status :: Prelude.Maybe Prelude.Text, -- | Information that further explains @Status@. JobOutput -> Maybe Text statusDetail :: Prelude.Maybe Prelude.Text, -- | The encryption settings, if any, that you want Elastic Transcoder to -- apply to your thumbnail. JobOutput -> Maybe Encryption thumbnailEncryption :: Prelude.Maybe Encryption, -- | Whether you want Elastic Transcoder to create thumbnails for your videos -- and, if so, how you want Elastic Transcoder to name the files. -- -- If you don\'t want Elastic Transcoder to create thumbnails, specify -- \"\". -- -- If you do want Elastic Transcoder to create thumbnails, specify the -- information that you want to include in the file name for each -- thumbnail. You can specify the following values in any sequence: -- -- - __@{count}@ (Required)__: If you want to create thumbnails, you must -- include @{count}@ in the @ThumbnailPattern@ object. Wherever you -- specify @{count}@, Elastic Transcoder adds a five-digit sequence -- number (beginning with __00001__) to thumbnail file names. The -- number indicates where a given thumbnail appears in the sequence of -- thumbnails for a transcoded file. -- -- If you specify a literal value and\/or @{resolution}@ but you omit -- @{count}@, Elastic Transcoder returns a validation error and does -- not create the job. -- -- - __Literal values (Optional)__: You can specify literal values -- anywhere in the @ThumbnailPattern@ object. For example, you can -- include them as a file name prefix or as a delimiter between -- @{resolution}@ and @{count}@. -- -- - __@{resolution}@ (Optional)__: If you want Elastic Transcoder to -- include the resolution in the file name, include @{resolution}@ in -- the @ThumbnailPattern@ object. -- -- When creating thumbnails, Elastic Transcoder automatically saves the -- files in the format (.jpg or .png) that appears in the preset that you -- specified in the @PresetID@ value of @CreateJobOutput@. Elastic -- Transcoder also appends the applicable file name extension. JobOutput -> Maybe Text thumbnailPattern :: Prelude.Maybe Prelude.Text, -- | Information about the watermarks that you want Elastic Transcoder to add -- to the video during transcoding. You can specify up to four watermarks -- for each output. Settings for each watermark must be defined in the -- preset that you specify in @Preset@ for the current output. -- -- Watermarks are added to the output video in the sequence in which you -- list them in the job output—the first watermark in the list is added to -- the output video first, the second watermark in the list is added next, -- and so on. As a result, if the settings in a preset cause Elastic -- Transcoder to place all watermarks in the same location, the second -- watermark that you add covers the first one, the third one covers the -- second, and the fourth one covers the third. JobOutput -> Maybe [JobWatermark] watermarks :: Prelude.Maybe [JobWatermark], -- | Specifies the width of the output file in pixels. JobOutput -> Maybe Int width :: Prelude.Maybe Prelude.Int } deriving (JobOutput -> JobOutput -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: JobOutput -> JobOutput -> Bool $c/= :: JobOutput -> JobOutput -> Bool == :: JobOutput -> JobOutput -> Bool $c== :: JobOutput -> JobOutput -> Bool Prelude.Eq, ReadPrec [JobOutput] ReadPrec JobOutput Int -> ReadS JobOutput ReadS [JobOutput] forall a. (Int -> ReadS a) -> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a readListPrec :: ReadPrec [JobOutput] $creadListPrec :: ReadPrec [JobOutput] readPrec :: ReadPrec JobOutput $creadPrec :: ReadPrec JobOutput readList :: ReadS [JobOutput] $creadList :: ReadS [JobOutput] readsPrec :: Int -> ReadS JobOutput $creadsPrec :: Int -> ReadS JobOutput Prelude.Read, Int -> JobOutput -> ShowS [JobOutput] -> ShowS JobOutput -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [JobOutput] -> ShowS $cshowList :: [JobOutput] -> ShowS show :: JobOutput -> String $cshow :: JobOutput -> String showsPrec :: Int -> JobOutput -> ShowS $cshowsPrec :: Int -> JobOutput -> ShowS Prelude.Show, forall x. Rep JobOutput x -> JobOutput forall x. JobOutput -> Rep JobOutput x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep JobOutput x -> JobOutput $cfrom :: forall x. JobOutput -> Rep JobOutput x Prelude.Generic) -- | -- Create a value of 'JobOutput' 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: -- -- 'albumArt', 'jobOutput_albumArt' - The album art to be associated with the output file, if any. -- -- 'appliedColorSpaceConversion', 'jobOutput_appliedColorSpaceConversion' - If Elastic Transcoder used a preset with a @ColorSpaceConversionMode@ to -- transcode the output file, the @AppliedColorSpaceConversion@ parameter -- shows the conversion used. If no @ColorSpaceConversionMode@ was defined -- in the preset, this parameter is not be included in the job response. -- -- 'captions', 'jobOutput_captions' - You can configure Elastic Transcoder to transcode captions, or -- subtitles, from one format to another. All captions must be in UTF-8. -- Elastic Transcoder supports two types of captions: -- -- - __Embedded:__ Embedded captions are included in the same file as the -- audio and video. Elastic Transcoder supports only one embedded -- caption per language, to a maximum of 300 embedded captions per -- file. -- -- Valid input values include: @CEA-608 (EIA-608@, first non-empty -- channel only), @CEA-708 (EIA-708@, first non-empty channel only), -- and @mov-text@ -- -- Valid outputs include: @mov-text@ -- -- Elastic Transcoder supports a maximum of one embedded format per -- output. -- -- - __Sidecar:__ Sidecar captions are kept in a separate metadata file -- from the audio and video data. Sidecar captions require a player -- that is capable of understanding the relationship between the video -- file and the sidecar file. Elastic Transcoder supports only one -- sidecar caption per language, to a maximum of 20 sidecar captions -- per file. -- -- Valid input values include: @dfxp@ (first div element only), -- @ebu-tt@, @scc@, @smpt@, @srt@, @ttml@ (first div element only), and -- @webvtt@ -- -- Valid outputs include: @dfxp@ (first div element only), @scc@, -- @srt@, and @webvtt@. -- -- If you want ttml or smpte-tt compatible captions, specify dfxp as your -- output format. -- -- Elastic Transcoder does not support OCR (Optical Character Recognition), -- does not accept pictures as a valid input for captions, and is not -- available for audio-only transcoding. Elastic Transcoder does not -- preserve text formatting (for example, italics) during the transcoding -- process. -- -- To remove captions or leave the captions empty, set @Captions@ to null. -- To pass through existing captions unchanged, set the @MergePolicy@ to -- @MergeRetain@, and pass in a null @CaptionSources@ array. -- -- For more information on embedded files, see the Subtitles Wikipedia -- page. -- -- For more information on sidecar files, see the Extensible Metadata -- Platform and Sidecar file Wikipedia pages. -- -- 'composition', 'jobOutput_composition' - You can create an output file that contains an excerpt from the input -- file. This excerpt, called a clip, can come from the beginning, middle, -- or end of the file. The Composition object contains settings for the -- clips that make up an output file. For the current release, you can only -- specify settings for a single clip per output file. The Composition -- object cannot be null. -- -- 'duration', 'jobOutput_duration' - Duration of the output file, in seconds. -- -- 'durationMillis', 'jobOutput_durationMillis' - Duration of the output file, in milliseconds. -- -- 'encryption', 'jobOutput_encryption' - The encryption settings, if any, that you want Elastic Transcoder to -- apply to your output files. If you choose to use encryption, you must -- specify a mode to use. If you choose not to use encryption, Elastic -- Transcoder writes an unencrypted file to your Amazon S3 bucket. -- -- 'fileSize', 'jobOutput_fileSize' - File size of the output file, in bytes. -- -- 'frameRate', 'jobOutput_frameRate' - Frame rate of the output file, in frames per second. -- -- 'height', 'jobOutput_height' - Height of the output file, in pixels. -- -- 'id', 'jobOutput_id' - A sequential counter, starting with 1, that identifies an output among -- the outputs from the current job. In the Output syntax, this value is -- always 1. -- -- 'key', 'jobOutput_key' - The name to assign to the transcoded file. Elastic Transcoder saves the -- file in the Amazon S3 bucket specified by the @OutputBucket@ object in -- the pipeline that is specified by the pipeline ID. -- -- 'presetId', 'jobOutput_presetId' - The value of the @Id@ object for the preset that you want to use for -- this job. The preset determines the audio, video, and thumbnail settings -- that Elastic Transcoder uses for transcoding. To use a preset that you -- created, specify the preset ID that Elastic Transcoder returned in the -- response when you created the preset. You can also use the Elastic -- Transcoder system presets, which you can get with @ListPresets@. -- -- 'rotate', 'jobOutput_rotate' - The number of degrees clockwise by which you want Elastic Transcoder to -- rotate the output relative to the input. Enter one of the following -- values: -- -- @auto@, @0@, @90@, @180@, @270@ -- -- The value @auto@ generally works only if the file that you\'re -- transcoding contains rotation metadata. -- -- 'segmentDuration', 'jobOutput_segmentDuration' - (Outputs in Fragmented MP4 or MPEG-TS format only. -- -- If you specify a preset in @PresetId@ for which the value of @Container@ -- is @fmp4@ (Fragmented MP4) or @ts@ (MPEG-TS), @SegmentDuration@ is the -- target maximum duration of each segment in seconds. For @HLSv3@ format -- playlists, each media segment is stored in a separate @.ts@ file. For -- @HLSv4@, @MPEG-DASH@, and @Smooth@ playlists, all media segments for an -- output are stored in a single file. Each segment is approximately the -- length of the @SegmentDuration@, though individual segments might be -- shorter or longer. -- -- The range of valid values is 1 to 60 seconds. If the duration of the -- video is not evenly divisible by @SegmentDuration@, the duration of the -- last segment is the remainder of total length\/SegmentDuration. -- -- Elastic Transcoder creates an output-specific playlist for each output -- @HLS@ output that you specify in OutputKeys. To add an output to the -- master playlist for this job, include it in the @OutputKeys@ of the -- associated playlist. -- -- 'status', 'jobOutput_status' - The status of one output in a job. If you specified only one output for -- the job, @Outputs:Status@ is always the same as @Job:Status@. If you -- specified more than one output: -- -- - @Job:Status@ and @Outputs:Status@ for all of the outputs is -- Submitted until Elastic Transcoder starts to process the first -- output. -- -- - When Elastic Transcoder starts to process the first output, -- @Outputs:Status@ for that output and @Job:Status@ both change to -- Progressing. For each output, the value of @Outputs:Status@ remains -- Submitted until Elastic Transcoder starts to process the output. -- -- - Job:Status remains Progressing until all of the outputs reach a -- terminal status, either Complete or Error. -- -- - When all of the outputs reach a terminal status, @Job:Status@ -- changes to Complete only if @Outputs:Status@ for all of the outputs -- is @Complete@. If @Outputs:Status@ for one or more outputs is -- @Error@, the terminal status for @Job:Status@ is also @Error@. -- -- The value of @Status@ is one of the following: @Submitted@, -- @Progressing@, @Complete@, @Canceled@, or @Error@. -- -- 'statusDetail', 'jobOutput_statusDetail' - Information that further explains @Status@. -- -- 'thumbnailEncryption', 'jobOutput_thumbnailEncryption' - The encryption settings, if any, that you want Elastic Transcoder to -- apply to your thumbnail. -- -- 'thumbnailPattern', 'jobOutput_thumbnailPattern' - Whether you want Elastic Transcoder to create thumbnails for your videos -- and, if so, how you want Elastic Transcoder to name the files. -- -- If you don\'t want Elastic Transcoder to create thumbnails, specify -- \"\". -- -- If you do want Elastic Transcoder to create thumbnails, specify the -- information that you want to include in the file name for each -- thumbnail. You can specify the following values in any sequence: -- -- - __@{count}@ (Required)__: If you want to create thumbnails, you must -- include @{count}@ in the @ThumbnailPattern@ object. Wherever you -- specify @{count}@, Elastic Transcoder adds a five-digit sequence -- number (beginning with __00001__) to thumbnail file names. The -- number indicates where a given thumbnail appears in the sequence of -- thumbnails for a transcoded file. -- -- If you specify a literal value and\/or @{resolution}@ but you omit -- @{count}@, Elastic Transcoder returns a validation error and does -- not create the job. -- -- - __Literal values (Optional)__: You can specify literal values -- anywhere in the @ThumbnailPattern@ object. For example, you can -- include them as a file name prefix or as a delimiter between -- @{resolution}@ and @{count}@. -- -- - __@{resolution}@ (Optional)__: If you want Elastic Transcoder to -- include the resolution in the file name, include @{resolution}@ in -- the @ThumbnailPattern@ object. -- -- When creating thumbnails, Elastic Transcoder automatically saves the -- files in the format (.jpg or .png) that appears in the preset that you -- specified in the @PresetID@ value of @CreateJobOutput@. Elastic -- Transcoder also appends the applicable file name extension. -- -- 'watermarks', 'jobOutput_watermarks' - Information about the watermarks that you want Elastic Transcoder to add -- to the video during transcoding. You can specify up to four watermarks -- for each output. Settings for each watermark must be defined in the -- preset that you specify in @Preset@ for the current output. -- -- Watermarks are added to the output video in the sequence in which you -- list them in the job output—the first watermark in the list is added to -- the output video first, the second watermark in the list is added next, -- and so on. As a result, if the settings in a preset cause Elastic -- Transcoder to place all watermarks in the same location, the second -- watermark that you add covers the first one, the third one covers the -- second, and the fourth one covers the third. -- -- 'width', 'jobOutput_width' - Specifies the width of the output file in pixels. newJobOutput :: JobOutput newJobOutput :: JobOutput newJobOutput = JobOutput' { $sel:albumArt:JobOutput' :: Maybe JobAlbumArt albumArt = forall a. Maybe a Prelude.Nothing, $sel:appliedColorSpaceConversion:JobOutput' :: Maybe Text appliedColorSpaceConversion = forall a. Maybe a Prelude.Nothing, $sel:captions:JobOutput' :: Maybe Captions captions = forall a. Maybe a Prelude.Nothing, $sel:composition:JobOutput' :: Maybe [Clip] composition = forall a. Maybe a Prelude.Nothing, $sel:duration:JobOutput' :: Maybe Integer duration = forall a. Maybe a Prelude.Nothing, $sel:durationMillis:JobOutput' :: Maybe Integer durationMillis = forall a. Maybe a Prelude.Nothing, $sel:encryption:JobOutput' :: Maybe Encryption encryption = forall a. Maybe a Prelude.Nothing, $sel:fileSize:JobOutput' :: Maybe Integer fileSize = forall a. Maybe a Prelude.Nothing, $sel:frameRate:JobOutput' :: Maybe Text frameRate = forall a. Maybe a Prelude.Nothing, $sel:height:JobOutput' :: Maybe Int height = forall a. Maybe a Prelude.Nothing, $sel:id:JobOutput' :: Maybe Text id = forall a. Maybe a Prelude.Nothing, $sel:key:JobOutput' :: Maybe Text key = forall a. Maybe a Prelude.Nothing, $sel:presetId:JobOutput' :: Maybe Text presetId = forall a. Maybe a Prelude.Nothing, $sel:rotate:JobOutput' :: Maybe Text rotate = forall a. Maybe a Prelude.Nothing, $sel:segmentDuration:JobOutput' :: Maybe Text segmentDuration = forall a. Maybe a Prelude.Nothing, $sel:status:JobOutput' :: Maybe Text status = forall a. Maybe a Prelude.Nothing, $sel:statusDetail:JobOutput' :: Maybe Text statusDetail = forall a. Maybe a Prelude.Nothing, $sel:thumbnailEncryption:JobOutput' :: Maybe Encryption thumbnailEncryption = forall a. Maybe a Prelude.Nothing, $sel:thumbnailPattern:JobOutput' :: Maybe Text thumbnailPattern = forall a. Maybe a Prelude.Nothing, $sel:watermarks:JobOutput' :: Maybe [JobWatermark] watermarks = forall a. Maybe a Prelude.Nothing, $sel:width:JobOutput' :: Maybe Int width = forall a. Maybe a Prelude.Nothing } -- | The album art to be associated with the output file, if any. jobOutput_albumArt :: Lens.Lens' JobOutput (Prelude.Maybe JobAlbumArt) jobOutput_albumArt :: Lens' JobOutput (Maybe JobAlbumArt) jobOutput_albumArt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe JobAlbumArt albumArt :: Maybe JobAlbumArt $sel:albumArt:JobOutput' :: JobOutput -> Maybe JobAlbumArt albumArt} -> Maybe JobAlbumArt albumArt) (\s :: JobOutput s@JobOutput' {} Maybe JobAlbumArt a -> JobOutput s {$sel:albumArt:JobOutput' :: Maybe JobAlbumArt albumArt = Maybe JobAlbumArt a} :: JobOutput) -- | If Elastic Transcoder used a preset with a @ColorSpaceConversionMode@ to -- transcode the output file, the @AppliedColorSpaceConversion@ parameter -- shows the conversion used. If no @ColorSpaceConversionMode@ was defined -- in the preset, this parameter is not be included in the job response. jobOutput_appliedColorSpaceConversion :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_appliedColorSpaceConversion :: Lens' JobOutput (Maybe Text) jobOutput_appliedColorSpaceConversion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text appliedColorSpaceConversion :: Maybe Text $sel:appliedColorSpaceConversion:JobOutput' :: JobOutput -> Maybe Text appliedColorSpaceConversion} -> Maybe Text appliedColorSpaceConversion) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:appliedColorSpaceConversion:JobOutput' :: Maybe Text appliedColorSpaceConversion = Maybe Text a} :: JobOutput) -- | You can configure Elastic Transcoder to transcode captions, or -- subtitles, from one format to another. All captions must be in UTF-8. -- Elastic Transcoder supports two types of captions: -- -- - __Embedded:__ Embedded captions are included in the same file as the -- audio and video. Elastic Transcoder supports only one embedded -- caption per language, to a maximum of 300 embedded captions per -- file. -- -- Valid input values include: @CEA-608 (EIA-608@, first non-empty -- channel only), @CEA-708 (EIA-708@, first non-empty channel only), -- and @mov-text@ -- -- Valid outputs include: @mov-text@ -- -- Elastic Transcoder supports a maximum of one embedded format per -- output. -- -- - __Sidecar:__ Sidecar captions are kept in a separate metadata file -- from the audio and video data. Sidecar captions require a player -- that is capable of understanding the relationship between the video -- file and the sidecar file. Elastic Transcoder supports only one -- sidecar caption per language, to a maximum of 20 sidecar captions -- per file. -- -- Valid input values include: @dfxp@ (first div element only), -- @ebu-tt@, @scc@, @smpt@, @srt@, @ttml@ (first div element only), and -- @webvtt@ -- -- Valid outputs include: @dfxp@ (first div element only), @scc@, -- @srt@, and @webvtt@. -- -- If you want ttml or smpte-tt compatible captions, specify dfxp as your -- output format. -- -- Elastic Transcoder does not support OCR (Optical Character Recognition), -- does not accept pictures as a valid input for captions, and is not -- available for audio-only transcoding. Elastic Transcoder does not -- preserve text formatting (for example, italics) during the transcoding -- process. -- -- To remove captions or leave the captions empty, set @Captions@ to null. -- To pass through existing captions unchanged, set the @MergePolicy@ to -- @MergeRetain@, and pass in a null @CaptionSources@ array. -- -- For more information on embedded files, see the Subtitles Wikipedia -- page. -- -- For more information on sidecar files, see the Extensible Metadata -- Platform and Sidecar file Wikipedia pages. jobOutput_captions :: Lens.Lens' JobOutput (Prelude.Maybe Captions) = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Captions captions :: Maybe Captions $sel:captions:JobOutput' :: JobOutput -> Maybe Captions captions} -> Maybe Captions captions) (\s :: JobOutput s@JobOutput' {} Maybe Captions a -> JobOutput s {$sel:captions:JobOutput' :: Maybe Captions captions = Maybe Captions a} :: JobOutput) -- | You can create an output file that contains an excerpt from the input -- file. This excerpt, called a clip, can come from the beginning, middle, -- or end of the file. The Composition object contains settings for the -- clips that make up an output file. For the current release, you can only -- specify settings for a single clip per output file. The Composition -- object cannot be null. jobOutput_composition :: Lens.Lens' JobOutput (Prelude.Maybe [Clip]) jobOutput_composition :: Lens' JobOutput (Maybe [Clip]) jobOutput_composition = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe [Clip] composition :: Maybe [Clip] $sel:composition:JobOutput' :: JobOutput -> Maybe [Clip] composition} -> Maybe [Clip] composition) (\s :: JobOutput s@JobOutput' {} Maybe [Clip] a -> JobOutput s {$sel:composition:JobOutput' :: Maybe [Clip] composition = Maybe [Clip] a} :: JobOutput) 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 -- | Duration of the output file, in seconds. jobOutput_duration :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer) jobOutput_duration :: Lens' JobOutput (Maybe Integer) jobOutput_duration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Integer duration :: Maybe Integer $sel:duration:JobOutput' :: JobOutput -> Maybe Integer duration} -> Maybe Integer duration) (\s :: JobOutput s@JobOutput' {} Maybe Integer a -> JobOutput s {$sel:duration:JobOutput' :: Maybe Integer duration = Maybe Integer a} :: JobOutput) -- | Duration of the output file, in milliseconds. jobOutput_durationMillis :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer) jobOutput_durationMillis :: Lens' JobOutput (Maybe Integer) jobOutput_durationMillis = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Integer durationMillis :: Maybe Integer $sel:durationMillis:JobOutput' :: JobOutput -> Maybe Integer durationMillis} -> Maybe Integer durationMillis) (\s :: JobOutput s@JobOutput' {} Maybe Integer a -> JobOutput s {$sel:durationMillis:JobOutput' :: Maybe Integer durationMillis = Maybe Integer a} :: JobOutput) -- | The encryption settings, if any, that you want Elastic Transcoder to -- apply to your output files. If you choose to use encryption, you must -- specify a mode to use. If you choose not to use encryption, Elastic -- Transcoder writes an unencrypted file to your Amazon S3 bucket. jobOutput_encryption :: Lens.Lens' JobOutput (Prelude.Maybe Encryption) jobOutput_encryption :: Lens' JobOutput (Maybe Encryption) jobOutput_encryption = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Encryption encryption :: Maybe Encryption $sel:encryption:JobOutput' :: JobOutput -> Maybe Encryption encryption} -> Maybe Encryption encryption) (\s :: JobOutput s@JobOutput' {} Maybe Encryption a -> JobOutput s {$sel:encryption:JobOutput' :: Maybe Encryption encryption = Maybe Encryption a} :: JobOutput) -- | File size of the output file, in bytes. jobOutput_fileSize :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer) jobOutput_fileSize :: Lens' JobOutput (Maybe Integer) jobOutput_fileSize = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Integer fileSize :: Maybe Integer $sel:fileSize:JobOutput' :: JobOutput -> Maybe Integer fileSize} -> Maybe Integer fileSize) (\s :: JobOutput s@JobOutput' {} Maybe Integer a -> JobOutput s {$sel:fileSize:JobOutput' :: Maybe Integer fileSize = Maybe Integer a} :: JobOutput) -- | Frame rate of the output file, in frames per second. jobOutput_frameRate :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_frameRate :: Lens' JobOutput (Maybe Text) jobOutput_frameRate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text frameRate :: Maybe Text $sel:frameRate:JobOutput' :: JobOutput -> Maybe Text frameRate} -> Maybe Text frameRate) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:frameRate:JobOutput' :: Maybe Text frameRate = Maybe Text a} :: JobOutput) -- | Height of the output file, in pixels. jobOutput_height :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Int) jobOutput_height :: Lens' JobOutput (Maybe Int) jobOutput_height = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Int height :: Maybe Int $sel:height:JobOutput' :: JobOutput -> Maybe Int height} -> Maybe Int height) (\s :: JobOutput s@JobOutput' {} Maybe Int a -> JobOutput s {$sel:height:JobOutput' :: Maybe Int height = Maybe Int a} :: JobOutput) -- | A sequential counter, starting with 1, that identifies an output among -- the outputs from the current job. In the Output syntax, this value is -- always 1. jobOutput_id :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_id :: Lens' JobOutput (Maybe Text) jobOutput_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text id :: Maybe Text $sel:id:JobOutput' :: JobOutput -> Maybe Text id} -> Maybe Text id) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:id:JobOutput' :: Maybe Text id = Maybe Text a} :: JobOutput) -- | The name to assign to the transcoded file. Elastic Transcoder saves the -- file in the Amazon S3 bucket specified by the @OutputBucket@ object in -- the pipeline that is specified by the pipeline ID. jobOutput_key :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_key :: Lens' JobOutput (Maybe Text) jobOutput_key = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text key :: Maybe Text $sel:key:JobOutput' :: JobOutput -> Maybe Text key} -> Maybe Text key) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:key:JobOutput' :: Maybe Text key = Maybe Text a} :: JobOutput) -- | The value of the @Id@ object for the preset that you want to use for -- this job. The preset determines the audio, video, and thumbnail settings -- that Elastic Transcoder uses for transcoding. To use a preset that you -- created, specify the preset ID that Elastic Transcoder returned in the -- response when you created the preset. You can also use the Elastic -- Transcoder system presets, which you can get with @ListPresets@. jobOutput_presetId :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_presetId :: Lens' JobOutput (Maybe Text) jobOutput_presetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text presetId :: Maybe Text $sel:presetId:JobOutput' :: JobOutput -> Maybe Text presetId} -> Maybe Text presetId) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:presetId:JobOutput' :: Maybe Text presetId = Maybe Text a} :: JobOutput) -- | The number of degrees clockwise by which you want Elastic Transcoder to -- rotate the output relative to the input. Enter one of the following -- values: -- -- @auto@, @0@, @90@, @180@, @270@ -- -- The value @auto@ generally works only if the file that you\'re -- transcoding contains rotation metadata. jobOutput_rotate :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_rotate :: Lens' JobOutput (Maybe Text) jobOutput_rotate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text rotate :: Maybe Text $sel:rotate:JobOutput' :: JobOutput -> Maybe Text rotate} -> Maybe Text rotate) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:rotate:JobOutput' :: Maybe Text rotate = Maybe Text a} :: JobOutput) -- | (Outputs in Fragmented MP4 or MPEG-TS format only. -- -- If you specify a preset in @PresetId@ for which the value of @Container@ -- is @fmp4@ (Fragmented MP4) or @ts@ (MPEG-TS), @SegmentDuration@ is the -- target maximum duration of each segment in seconds. For @HLSv3@ format -- playlists, each media segment is stored in a separate @.ts@ file. For -- @HLSv4@, @MPEG-DASH@, and @Smooth@ playlists, all media segments for an -- output are stored in a single file. Each segment is approximately the -- length of the @SegmentDuration@, though individual segments might be -- shorter or longer. -- -- The range of valid values is 1 to 60 seconds. If the duration of the -- video is not evenly divisible by @SegmentDuration@, the duration of the -- last segment is the remainder of total length\/SegmentDuration. -- -- Elastic Transcoder creates an output-specific playlist for each output -- @HLS@ output that you specify in OutputKeys. To add an output to the -- master playlist for this job, include it in the @OutputKeys@ of the -- associated playlist. jobOutput_segmentDuration :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_segmentDuration :: Lens' JobOutput (Maybe Text) jobOutput_segmentDuration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text segmentDuration :: Maybe Text $sel:segmentDuration:JobOutput' :: JobOutput -> Maybe Text segmentDuration} -> Maybe Text segmentDuration) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:segmentDuration:JobOutput' :: Maybe Text segmentDuration = Maybe Text a} :: JobOutput) -- | The status of one output in a job. If you specified only one output for -- the job, @Outputs:Status@ is always the same as @Job:Status@. If you -- specified more than one output: -- -- - @Job:Status@ and @Outputs:Status@ for all of the outputs is -- Submitted until Elastic Transcoder starts to process the first -- output. -- -- - When Elastic Transcoder starts to process the first output, -- @Outputs:Status@ for that output and @Job:Status@ both change to -- Progressing. For each output, the value of @Outputs:Status@ remains -- Submitted until Elastic Transcoder starts to process the output. -- -- - Job:Status remains Progressing until all of the outputs reach a -- terminal status, either Complete or Error. -- -- - When all of the outputs reach a terminal status, @Job:Status@ -- changes to Complete only if @Outputs:Status@ for all of the outputs -- is @Complete@. If @Outputs:Status@ for one or more outputs is -- @Error@, the terminal status for @Job:Status@ is also @Error@. -- -- The value of @Status@ is one of the following: @Submitted@, -- @Progressing@, @Complete@, @Canceled@, or @Error@. jobOutput_status :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_status :: Lens' JobOutput (Maybe Text) jobOutput_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text status :: Maybe Text $sel:status:JobOutput' :: JobOutput -> Maybe Text status} -> Maybe Text status) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:status:JobOutput' :: Maybe Text status = Maybe Text a} :: JobOutput) -- | Information that further explains @Status@. jobOutput_statusDetail :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_statusDetail :: Lens' JobOutput (Maybe Text) jobOutput_statusDetail = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text statusDetail :: Maybe Text $sel:statusDetail:JobOutput' :: JobOutput -> Maybe Text statusDetail} -> Maybe Text statusDetail) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:statusDetail:JobOutput' :: Maybe Text statusDetail = Maybe Text a} :: JobOutput) -- | The encryption settings, if any, that you want Elastic Transcoder to -- apply to your thumbnail. jobOutput_thumbnailEncryption :: Lens.Lens' JobOutput (Prelude.Maybe Encryption) jobOutput_thumbnailEncryption :: Lens' JobOutput (Maybe Encryption) jobOutput_thumbnailEncryption = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Encryption thumbnailEncryption :: Maybe Encryption $sel:thumbnailEncryption:JobOutput' :: JobOutput -> Maybe Encryption thumbnailEncryption} -> Maybe Encryption thumbnailEncryption) (\s :: JobOutput s@JobOutput' {} Maybe Encryption a -> JobOutput s {$sel:thumbnailEncryption:JobOutput' :: Maybe Encryption thumbnailEncryption = Maybe Encryption a} :: JobOutput) -- | Whether you want Elastic Transcoder to create thumbnails for your videos -- and, if so, how you want Elastic Transcoder to name the files. -- -- If you don\'t want Elastic Transcoder to create thumbnails, specify -- \"\". -- -- If you do want Elastic Transcoder to create thumbnails, specify the -- information that you want to include in the file name for each -- thumbnail. You can specify the following values in any sequence: -- -- - __@{count}@ (Required)__: If you want to create thumbnails, you must -- include @{count}@ in the @ThumbnailPattern@ object. Wherever you -- specify @{count}@, Elastic Transcoder adds a five-digit sequence -- number (beginning with __00001__) to thumbnail file names. The -- number indicates where a given thumbnail appears in the sequence of -- thumbnails for a transcoded file. -- -- If you specify a literal value and\/or @{resolution}@ but you omit -- @{count}@, Elastic Transcoder returns a validation error and does -- not create the job. -- -- - __Literal values (Optional)__: You can specify literal values -- anywhere in the @ThumbnailPattern@ object. For example, you can -- include them as a file name prefix or as a delimiter between -- @{resolution}@ and @{count}@. -- -- - __@{resolution}@ (Optional)__: If you want Elastic Transcoder to -- include the resolution in the file name, include @{resolution}@ in -- the @ThumbnailPattern@ object. -- -- When creating thumbnails, Elastic Transcoder automatically saves the -- files in the format (.jpg or .png) that appears in the preset that you -- specified in the @PresetID@ value of @CreateJobOutput@. Elastic -- Transcoder also appends the applicable file name extension. jobOutput_thumbnailPattern :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text) jobOutput_thumbnailPattern :: Lens' JobOutput (Maybe Text) jobOutput_thumbnailPattern = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Text thumbnailPattern :: Maybe Text $sel:thumbnailPattern:JobOutput' :: JobOutput -> Maybe Text thumbnailPattern} -> Maybe Text thumbnailPattern) (\s :: JobOutput s@JobOutput' {} Maybe Text a -> JobOutput s {$sel:thumbnailPattern:JobOutput' :: Maybe Text thumbnailPattern = Maybe Text a} :: JobOutput) -- | Information about the watermarks that you want Elastic Transcoder to add -- to the video during transcoding. You can specify up to four watermarks -- for each output. Settings for each watermark must be defined in the -- preset that you specify in @Preset@ for the current output. -- -- Watermarks are added to the output video in the sequence in which you -- list them in the job output—the first watermark in the list is added to -- the output video first, the second watermark in the list is added next, -- and so on. As a result, if the settings in a preset cause Elastic -- Transcoder to place all watermarks in the same location, the second -- watermark that you add covers the first one, the third one covers the -- second, and the fourth one covers the third. jobOutput_watermarks :: Lens.Lens' JobOutput (Prelude.Maybe [JobWatermark]) jobOutput_watermarks :: Lens' JobOutput (Maybe [JobWatermark]) jobOutput_watermarks = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe [JobWatermark] watermarks :: Maybe [JobWatermark] $sel:watermarks:JobOutput' :: JobOutput -> Maybe [JobWatermark] watermarks} -> Maybe [JobWatermark] watermarks) (\s :: JobOutput s@JobOutput' {} Maybe [JobWatermark] a -> JobOutput s {$sel:watermarks:JobOutput' :: Maybe [JobWatermark] watermarks = Maybe [JobWatermark] a} :: JobOutput) 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 -- | Specifies the width of the output file in pixels. jobOutput_width :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Int) jobOutput_width :: Lens' JobOutput (Maybe Int) jobOutput_width = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b Lens.lens (\JobOutput' {Maybe Int width :: Maybe Int $sel:width:JobOutput' :: JobOutput -> Maybe Int width} -> Maybe Int width) (\s :: JobOutput s@JobOutput' {} Maybe Int a -> JobOutput s {$sel:width:JobOutput' :: Maybe Int width = Maybe Int a} :: JobOutput) instance Data.FromJSON JobOutput where parseJSON :: Value -> Parser JobOutput parseJSON = forall a. String -> (Object -> Parser a) -> Value -> Parser a Data.withObject String "JobOutput" ( \Object x -> Maybe JobAlbumArt -> Maybe Text -> Maybe Captions -> Maybe [Clip] -> Maybe Integer -> Maybe Integer -> Maybe Encryption -> Maybe Integer -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Encryption -> Maybe Text -> Maybe [JobWatermark] -> Maybe Int -> JobOutput JobOutput' forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b Prelude.<$> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "AlbumArt") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "AppliedColorSpaceConversion") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Captions") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Composition" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Duration") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "DurationMillis") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Encryption") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "FileSize") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "FrameRate") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Height") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Id") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Key") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "PresetId") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Rotate") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "SegmentDuration") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Status") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "StatusDetail") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "ThumbnailEncryption") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "ThumbnailPattern") forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Watermarks" forall a. Parser (Maybe a) -> a -> Parser a Data..!= forall a. Monoid a => a Prelude.mempty) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b Prelude.<*> (Object x forall a. FromJSON a => Object -> Key -> Parser (Maybe a) Data..:? Key "Width") ) instance Prelude.Hashable JobOutput where hashWithSalt :: Int -> JobOutput -> Int hashWithSalt Int _salt JobOutput' {Maybe Int Maybe Integer Maybe [JobWatermark] Maybe [Clip] Maybe Text Maybe Encryption Maybe Captions Maybe JobAlbumArt width :: Maybe Int watermarks :: Maybe [JobWatermark] thumbnailPattern :: Maybe Text thumbnailEncryption :: Maybe Encryption statusDetail :: Maybe Text status :: Maybe Text segmentDuration :: Maybe Text rotate :: Maybe Text presetId :: Maybe Text key :: Maybe Text id :: Maybe Text height :: Maybe Int frameRate :: Maybe Text fileSize :: Maybe Integer encryption :: Maybe Encryption durationMillis :: Maybe Integer duration :: Maybe Integer composition :: Maybe [Clip] captions :: Maybe Captions appliedColorSpaceConversion :: Maybe Text albumArt :: Maybe JobAlbumArt $sel:width:JobOutput' :: JobOutput -> Maybe Int $sel:watermarks:JobOutput' :: JobOutput -> Maybe [JobWatermark] $sel:thumbnailPattern:JobOutput' :: JobOutput -> Maybe Text $sel:thumbnailEncryption:JobOutput' :: JobOutput -> Maybe Encryption $sel:statusDetail:JobOutput' :: JobOutput -> Maybe Text $sel:status:JobOutput' :: JobOutput -> Maybe Text $sel:segmentDuration:JobOutput' :: JobOutput -> Maybe Text $sel:rotate:JobOutput' :: JobOutput -> Maybe Text $sel:presetId:JobOutput' :: JobOutput -> Maybe Text $sel:key:JobOutput' :: JobOutput -> Maybe Text $sel:id:JobOutput' :: JobOutput -> Maybe Text $sel:height:JobOutput' :: JobOutput -> Maybe Int $sel:frameRate:JobOutput' :: JobOutput -> Maybe Text $sel:fileSize:JobOutput' :: JobOutput -> Maybe Integer $sel:encryption:JobOutput' :: JobOutput -> Maybe Encryption $sel:durationMillis:JobOutput' :: JobOutput -> Maybe Integer $sel:duration:JobOutput' :: JobOutput -> Maybe Integer $sel:composition:JobOutput' :: JobOutput -> Maybe [Clip] $sel:captions:JobOutput' :: JobOutput -> Maybe Captions $sel:appliedColorSpaceConversion:JobOutput' :: JobOutput -> Maybe Text $sel:albumArt:JobOutput' :: JobOutput -> Maybe JobAlbumArt ..} = Int _salt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe JobAlbumArt albumArt forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text appliedColorSpaceConversion forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Captions captions forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [Clip] composition forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Integer duration forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Integer durationMillis forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Encryption encryption forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Integer fileSize forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text frameRate forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Int height forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text id forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text key forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text presetId forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text rotate forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text segmentDuration forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text status forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text statusDetail forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Encryption thumbnailEncryption forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Text thumbnailPattern forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe [JobWatermark] watermarks forall a. Hashable a => Int -> a -> Int `Prelude.hashWithSalt` Maybe Int width instance Prelude.NFData JobOutput where rnf :: JobOutput -> () rnf JobOutput' {Maybe Int Maybe Integer Maybe [JobWatermark] Maybe [Clip] Maybe Text Maybe Encryption Maybe Captions Maybe JobAlbumArt width :: Maybe Int watermarks :: Maybe [JobWatermark] thumbnailPattern :: Maybe Text thumbnailEncryption :: Maybe Encryption statusDetail :: Maybe Text status :: Maybe Text segmentDuration :: Maybe Text rotate :: Maybe Text presetId :: Maybe Text key :: Maybe Text id :: Maybe Text height :: Maybe Int frameRate :: Maybe Text fileSize :: Maybe Integer encryption :: Maybe Encryption durationMillis :: Maybe Integer duration :: Maybe Integer composition :: Maybe [Clip] captions :: Maybe Captions appliedColorSpaceConversion :: Maybe Text albumArt :: Maybe JobAlbumArt $sel:width:JobOutput' :: JobOutput -> Maybe Int $sel:watermarks:JobOutput' :: JobOutput -> Maybe [JobWatermark] $sel:thumbnailPattern:JobOutput' :: JobOutput -> Maybe Text $sel:thumbnailEncryption:JobOutput' :: JobOutput -> Maybe Encryption $sel:statusDetail:JobOutput' :: JobOutput -> Maybe Text $sel:status:JobOutput' :: JobOutput -> Maybe Text $sel:segmentDuration:JobOutput' :: JobOutput -> Maybe Text $sel:rotate:JobOutput' :: JobOutput -> Maybe Text $sel:presetId:JobOutput' :: JobOutput -> Maybe Text $sel:key:JobOutput' :: JobOutput -> Maybe Text $sel:id:JobOutput' :: JobOutput -> Maybe Text $sel:height:JobOutput' :: JobOutput -> Maybe Int $sel:frameRate:JobOutput' :: JobOutput -> Maybe Text $sel:fileSize:JobOutput' :: JobOutput -> Maybe Integer $sel:encryption:JobOutput' :: JobOutput -> Maybe Encryption $sel:durationMillis:JobOutput' :: JobOutput -> Maybe Integer $sel:duration:JobOutput' :: JobOutput -> Maybe Integer $sel:composition:JobOutput' :: JobOutput -> Maybe [Clip] $sel:captions:JobOutput' :: JobOutput -> Maybe Captions $sel:appliedColorSpaceConversion:JobOutput' :: JobOutput -> Maybe Text $sel:albumArt:JobOutput' :: JobOutput -> Maybe JobAlbumArt ..} = forall a. NFData a => a -> () Prelude.rnf Maybe JobAlbumArt albumArt seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text appliedColorSpaceConversion seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Captions captions seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [Clip] composition seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Integer duration seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Integer durationMillis seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Encryption encryption seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Integer fileSize seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text frameRate seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Int height seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text id seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text key seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text presetId seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text rotate seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text segmentDuration seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text status seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text statusDetail seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Encryption thumbnailEncryption seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Text thumbnailPattern seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe [JobWatermark] watermarks seq :: forall a b. a -> b -> b `Prelude.seq` forall a. NFData a => a -> () Prelude.rnf Maybe Int width