{-# 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.MediaConvert.Types.JobSettings
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.MediaConvert.Types.JobSettings where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaConvert.Types.AvailBlanking
import Amazonka.MediaConvert.Types.EsamSettings
import Amazonka.MediaConvert.Types.ExtendedDataServices
import Amazonka.MediaConvert.Types.Input
import Amazonka.MediaConvert.Types.KantarWatermarkSettings
import Amazonka.MediaConvert.Types.MotionImageInserter
import Amazonka.MediaConvert.Types.NielsenConfiguration
import Amazonka.MediaConvert.Types.NielsenNonLinearWatermarkSettings
import Amazonka.MediaConvert.Types.OutputGroup
import Amazonka.MediaConvert.Types.TimecodeConfig
import Amazonka.MediaConvert.Types.TimedMetadataInsertion
import qualified Amazonka.Prelude as Prelude

-- | JobSettings contains all the transcode settings for a job.
--
-- /See:/ 'newJobSettings' smart constructor.
data JobSettings = JobSettings'
  { -- | Ignore these settings unless you are using Nielsen non-linear
    -- watermarking. Specify the values that MediaConvert uses to generate and
    -- place Nielsen watermarks in your output audio. In addition to specifying
    -- these values, you also need to set up your cloud TIC server. These
    -- settings apply to every output in your job. The MediaConvert
    -- implementation is currently with the following Nielsen versions: Nielsen
    -- Watermark SDK Version 5.2.1 Nielsen NLM Watermark Engine Version 1.2.7
    -- Nielsen Watermark Authenticator [SID_TIC] Version [5.0.0]
    JobSettings -> Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark :: Prelude.Maybe NielsenNonLinearWatermarkSettings,
    -- | Settings for Event Signaling And Messaging (ESAM). If you don\'t do ad
    -- insertion, you can ignore these settings.
    JobSettings -> Maybe EsamSettings
esam :: Prelude.Maybe EsamSettings,
    -- | Use Inputs (inputs) to define source file used in the transcode job.
    -- There can be multiple inputs add in a job. These inputs will be
    -- concantenated together to create the output.
    JobSettings -> Maybe [Input]
inputs :: Prelude.Maybe [Input],
    -- | Enable Timed metadata insertion (TimedMetadataInsertion) to include ID3
    -- tags in any HLS outputs. To include timed metadata, you must enable it
    -- here, enable it in each output container, and specify tags and timecodes
    -- in ID3 insertion (Id3Insertion) objects.
    JobSettings -> Maybe TimedMetadataInsertion
timedMetadataInsertion :: Prelude.Maybe TimedMetadataInsertion,
    -- | Settings for your Nielsen configuration. If you don\'t do Nielsen
    -- measurement and analytics, ignore these settings. When you enable
    -- Nielsen configuration (nielsenConfiguration), MediaConvert enables PCM
    -- to ID3 tagging for all outputs in the job. To enable Nielsen
    -- configuration programmatically, include an instance of
    -- nielsenConfiguration in your JSON job specification. Even if you don\'t
    -- include any children of nielsenConfiguration, you still enable the
    -- setting.
    JobSettings -> Maybe NielsenConfiguration
nielsenConfiguration :: Prelude.Maybe NielsenConfiguration,
    -- | Settings for ad avail blanking. Video can be blanked or overlaid with an
    -- image, and audio muted during SCTE-35 triggered ad avails.
    JobSettings -> Maybe AvailBlanking
availBlanking :: Prelude.Maybe AvailBlanking,
    -- | If your source content has EIA-608 Line 21 Data Services, enable this
    -- feature to specify what MediaConvert does with the Extended Data
    -- Services (XDS) packets. You can choose to pass through XDS packets, or
    -- remove them from the output. For more information about XDS, see EIA-608
    -- Line Data Services, section 9.5.1.5 05h Content Advisory.
    JobSettings -> Maybe ExtendedDataServices
extendedDataServices :: Prelude.Maybe ExtendedDataServices,
    -- | Overlay motion graphics on top of your video. The motion graphics that
    -- you specify here appear on all outputs in all output groups. For more
    -- information, see
    -- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/motion-graphic-overlay.html.
    JobSettings -> Maybe MotionImageInserter
motionImageInserter :: Prelude.Maybe MotionImageInserter,
    -- | These settings control how the service handles timecodes throughout the
    -- job. These settings don\'t affect input clipping.
    JobSettings -> Maybe TimecodeConfig
timecodeConfig :: Prelude.Maybe TimecodeConfig,
    -- | (OutputGroups) contains one group of settings for each set of outputs
    -- that share a common package type. All unpackaged files (MPEG-4, MPEG-2
    -- TS, Quicktime, MXF, and no container) are grouped in a single output
    -- group as well. Required in (OutputGroups) is a group of settings that
    -- apply to the whole group. This required object depends on the value you
    -- set for (Type) under (OutputGroups)>(OutputGroupSettings). Type,
    -- settings object pairs are as follows. * FILE_GROUP_SETTINGS,
    -- FileGroupSettings * HLS_GROUP_SETTINGS, HlsGroupSettings *
    -- DASH_ISO_GROUP_SETTINGS, DashIsoGroupSettings *
    -- MS_SMOOTH_GROUP_SETTINGS, MsSmoothGroupSettings * CMAF_GROUP_SETTINGS,
    -- CmafGroupSettings
    JobSettings -> Maybe [OutputGroup]
outputGroups :: Prelude.Maybe [OutputGroup],
    -- | When specified, this offset (in milliseconds) is added to the input Ad
    -- Avail PTS time.
    JobSettings -> Maybe Int
adAvailOffset :: Prelude.Maybe Prelude.Int,
    -- | Use these settings only when you use Kantar watermarking. Specify the
    -- values that MediaConvert uses to generate and place Kantar watermarks in
    -- your output audio. These settings apply to every output in your job. In
    -- addition to specifying these values, you also need to store your Kantar
    -- credentials in AWS Secrets Manager. For more information, see
    -- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/kantar-watermarking.html.
    JobSettings -> Maybe KantarWatermarkSettings
kantarWatermark :: Prelude.Maybe KantarWatermarkSettings
  }
  deriving (JobSettings -> JobSettings -> Bool
(JobSettings -> JobSettings -> Bool)
-> (JobSettings -> JobSettings -> Bool) -> Eq JobSettings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: JobSettings -> JobSettings -> Bool
$c/= :: JobSettings -> JobSettings -> Bool
== :: JobSettings -> JobSettings -> Bool
$c== :: JobSettings -> JobSettings -> Bool
Prelude.Eq, ReadPrec [JobSettings]
ReadPrec JobSettings
Int -> ReadS JobSettings
ReadS [JobSettings]
(Int -> ReadS JobSettings)
-> ReadS [JobSettings]
-> ReadPrec JobSettings
-> ReadPrec [JobSettings]
-> Read JobSettings
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [JobSettings]
$creadListPrec :: ReadPrec [JobSettings]
readPrec :: ReadPrec JobSettings
$creadPrec :: ReadPrec JobSettings
readList :: ReadS [JobSettings]
$creadList :: ReadS [JobSettings]
readsPrec :: Int -> ReadS JobSettings
$creadsPrec :: Int -> ReadS JobSettings
Prelude.Read, Int -> JobSettings -> ShowS
[JobSettings] -> ShowS
JobSettings -> String
(Int -> JobSettings -> ShowS)
-> (JobSettings -> String)
-> ([JobSettings] -> ShowS)
-> Show JobSettings
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [JobSettings] -> ShowS
$cshowList :: [JobSettings] -> ShowS
show :: JobSettings -> String
$cshow :: JobSettings -> String
showsPrec :: Int -> JobSettings -> ShowS
$cshowsPrec :: Int -> JobSettings -> ShowS
Prelude.Show, (forall x. JobSettings -> Rep JobSettings x)
-> (forall x. Rep JobSettings x -> JobSettings)
-> Generic JobSettings
forall x. Rep JobSettings x -> JobSettings
forall x. JobSettings -> Rep JobSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep JobSettings x -> JobSettings
$cfrom :: forall x. JobSettings -> Rep JobSettings x
Prelude.Generic)

-- |
-- Create a value of 'JobSettings' 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:
--
-- 'nielsenNonLinearWatermark', 'jobSettings_nielsenNonLinearWatermark' - Ignore these settings unless you are using Nielsen non-linear
-- watermarking. Specify the values that MediaConvert uses to generate and
-- place Nielsen watermarks in your output audio. In addition to specifying
-- these values, you also need to set up your cloud TIC server. These
-- settings apply to every output in your job. The MediaConvert
-- implementation is currently with the following Nielsen versions: Nielsen
-- Watermark SDK Version 5.2.1 Nielsen NLM Watermark Engine Version 1.2.7
-- Nielsen Watermark Authenticator [SID_TIC] Version [5.0.0]
--
-- 'esam', 'jobSettings_esam' - Settings for Event Signaling And Messaging (ESAM). If you don\'t do ad
-- insertion, you can ignore these settings.
--
-- 'inputs', 'jobSettings_inputs' - Use Inputs (inputs) to define source file used in the transcode job.
-- There can be multiple inputs add in a job. These inputs will be
-- concantenated together to create the output.
--
-- 'timedMetadataInsertion', 'jobSettings_timedMetadataInsertion' - Enable Timed metadata insertion (TimedMetadataInsertion) to include ID3
-- tags in any HLS outputs. To include timed metadata, you must enable it
-- here, enable it in each output container, and specify tags and timecodes
-- in ID3 insertion (Id3Insertion) objects.
--
-- 'nielsenConfiguration', 'jobSettings_nielsenConfiguration' - Settings for your Nielsen configuration. If you don\'t do Nielsen
-- measurement and analytics, ignore these settings. When you enable
-- Nielsen configuration (nielsenConfiguration), MediaConvert enables PCM
-- to ID3 tagging for all outputs in the job. To enable Nielsen
-- configuration programmatically, include an instance of
-- nielsenConfiguration in your JSON job specification. Even if you don\'t
-- include any children of nielsenConfiguration, you still enable the
-- setting.
--
-- 'availBlanking', 'jobSettings_availBlanking' - Settings for ad avail blanking. Video can be blanked or overlaid with an
-- image, and audio muted during SCTE-35 triggered ad avails.
--
-- 'extendedDataServices', 'jobSettings_extendedDataServices' - If your source content has EIA-608 Line 21 Data Services, enable this
-- feature to specify what MediaConvert does with the Extended Data
-- Services (XDS) packets. You can choose to pass through XDS packets, or
-- remove them from the output. For more information about XDS, see EIA-608
-- Line Data Services, section 9.5.1.5 05h Content Advisory.
--
-- 'motionImageInserter', 'jobSettings_motionImageInserter' - Overlay motion graphics on top of your video. The motion graphics that
-- you specify here appear on all outputs in all output groups. For more
-- information, see
-- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/motion-graphic-overlay.html.
--
-- 'timecodeConfig', 'jobSettings_timecodeConfig' - These settings control how the service handles timecodes throughout the
-- job. These settings don\'t affect input clipping.
--
-- 'outputGroups', 'jobSettings_outputGroups' - (OutputGroups) contains one group of settings for each set of outputs
-- that share a common package type. All unpackaged files (MPEG-4, MPEG-2
-- TS, Quicktime, MXF, and no container) are grouped in a single output
-- group as well. Required in (OutputGroups) is a group of settings that
-- apply to the whole group. This required object depends on the value you
-- set for (Type) under (OutputGroups)>(OutputGroupSettings). Type,
-- settings object pairs are as follows. * FILE_GROUP_SETTINGS,
-- FileGroupSettings * HLS_GROUP_SETTINGS, HlsGroupSettings *
-- DASH_ISO_GROUP_SETTINGS, DashIsoGroupSettings *
-- MS_SMOOTH_GROUP_SETTINGS, MsSmoothGroupSettings * CMAF_GROUP_SETTINGS,
-- CmafGroupSettings
--
-- 'adAvailOffset', 'jobSettings_adAvailOffset' - When specified, this offset (in milliseconds) is added to the input Ad
-- Avail PTS time.
--
-- 'kantarWatermark', 'jobSettings_kantarWatermark' - Use these settings only when you use Kantar watermarking. Specify the
-- values that MediaConvert uses to generate and place Kantar watermarks in
-- your output audio. These settings apply to every output in your job. In
-- addition to specifying these values, you also need to store your Kantar
-- credentials in AWS Secrets Manager. For more information, see
-- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/kantar-watermarking.html.
newJobSettings ::
  JobSettings
newJobSettings :: JobSettings
newJobSettings =
  JobSettings' :: Maybe NielsenNonLinearWatermarkSettings
-> Maybe EsamSettings
-> Maybe [Input]
-> Maybe TimedMetadataInsertion
-> Maybe NielsenConfiguration
-> Maybe AvailBlanking
-> Maybe ExtendedDataServices
-> Maybe MotionImageInserter
-> Maybe TimecodeConfig
-> Maybe [OutputGroup]
-> Maybe Int
-> Maybe KantarWatermarkSettings
-> JobSettings
JobSettings'
    { $sel:nielsenNonLinearWatermark:JobSettings' :: Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark =
        Maybe NielsenNonLinearWatermarkSettings
forall a. Maybe a
Prelude.Nothing,
      $sel:esam:JobSettings' :: Maybe EsamSettings
esam = Maybe EsamSettings
forall a. Maybe a
Prelude.Nothing,
      $sel:inputs:JobSettings' :: Maybe [Input]
inputs = Maybe [Input]
forall a. Maybe a
Prelude.Nothing,
      $sel:timedMetadataInsertion:JobSettings' :: Maybe TimedMetadataInsertion
timedMetadataInsertion = Maybe TimedMetadataInsertion
forall a. Maybe a
Prelude.Nothing,
      $sel:nielsenConfiguration:JobSettings' :: Maybe NielsenConfiguration
nielsenConfiguration = Maybe NielsenConfiguration
forall a. Maybe a
Prelude.Nothing,
      $sel:availBlanking:JobSettings' :: Maybe AvailBlanking
availBlanking = Maybe AvailBlanking
forall a. Maybe a
Prelude.Nothing,
      $sel:extendedDataServices:JobSettings' :: Maybe ExtendedDataServices
extendedDataServices = Maybe ExtendedDataServices
forall a. Maybe a
Prelude.Nothing,
      $sel:motionImageInserter:JobSettings' :: Maybe MotionImageInserter
motionImageInserter = Maybe MotionImageInserter
forall a. Maybe a
Prelude.Nothing,
      $sel:timecodeConfig:JobSettings' :: Maybe TimecodeConfig
timecodeConfig = Maybe TimecodeConfig
forall a. Maybe a
Prelude.Nothing,
      $sel:outputGroups:JobSettings' :: Maybe [OutputGroup]
outputGroups = Maybe [OutputGroup]
forall a. Maybe a
Prelude.Nothing,
      $sel:adAvailOffset:JobSettings' :: Maybe Int
adAvailOffset = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:kantarWatermark:JobSettings' :: Maybe KantarWatermarkSettings
kantarWatermark = Maybe KantarWatermarkSettings
forall a. Maybe a
Prelude.Nothing
    }

-- | Ignore these settings unless you are using Nielsen non-linear
-- watermarking. Specify the values that MediaConvert uses to generate and
-- place Nielsen watermarks in your output audio. In addition to specifying
-- these values, you also need to set up your cloud TIC server. These
-- settings apply to every output in your job. The MediaConvert
-- implementation is currently with the following Nielsen versions: Nielsen
-- Watermark SDK Version 5.2.1 Nielsen NLM Watermark Engine Version 1.2.7
-- Nielsen Watermark Authenticator [SID_TIC] Version [5.0.0]
jobSettings_nielsenNonLinearWatermark :: Lens.Lens' JobSettings (Prelude.Maybe NielsenNonLinearWatermarkSettings)
jobSettings_nielsenNonLinearWatermark :: (Maybe NielsenNonLinearWatermarkSettings
 -> f (Maybe NielsenNonLinearWatermarkSettings))
-> JobSettings -> f JobSettings
jobSettings_nielsenNonLinearWatermark = (JobSettings -> Maybe NielsenNonLinearWatermarkSettings)
-> (JobSettings
    -> Maybe NielsenNonLinearWatermarkSettings -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe NielsenNonLinearWatermarkSettings)
     (Maybe NielsenNonLinearWatermarkSettings)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark :: Maybe NielsenNonLinearWatermarkSettings
$sel:nielsenNonLinearWatermark:JobSettings' :: JobSettings -> Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark} -> Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark) (\s :: JobSettings
s@JobSettings' {} Maybe NielsenNonLinearWatermarkSettings
a -> JobSettings
s {$sel:nielsenNonLinearWatermark:JobSettings' :: Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark = Maybe NielsenNonLinearWatermarkSettings
a} :: JobSettings)

-- | Settings for Event Signaling And Messaging (ESAM). If you don\'t do ad
-- insertion, you can ignore these settings.
jobSettings_esam :: Lens.Lens' JobSettings (Prelude.Maybe EsamSettings)
jobSettings_esam :: (Maybe EsamSettings -> f (Maybe EsamSettings))
-> JobSettings -> f JobSettings
jobSettings_esam = (JobSettings -> Maybe EsamSettings)
-> (JobSettings -> Maybe EsamSettings -> JobSettings)
-> Lens
     JobSettings JobSettings (Maybe EsamSettings) (Maybe EsamSettings)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe EsamSettings
esam :: Maybe EsamSettings
$sel:esam:JobSettings' :: JobSettings -> Maybe EsamSettings
esam} -> Maybe EsamSettings
esam) (\s :: JobSettings
s@JobSettings' {} Maybe EsamSettings
a -> JobSettings
s {$sel:esam:JobSettings' :: Maybe EsamSettings
esam = Maybe EsamSettings
a} :: JobSettings)

-- | Use Inputs (inputs) to define source file used in the transcode job.
-- There can be multiple inputs add in a job. These inputs will be
-- concantenated together to create the output.
jobSettings_inputs :: Lens.Lens' JobSettings (Prelude.Maybe [Input])
jobSettings_inputs :: (Maybe [Input] -> f (Maybe [Input]))
-> JobSettings -> f JobSettings
jobSettings_inputs = (JobSettings -> Maybe [Input])
-> (JobSettings -> Maybe [Input] -> JobSettings)
-> Lens JobSettings JobSettings (Maybe [Input]) (Maybe [Input])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe [Input]
inputs :: Maybe [Input]
$sel:inputs:JobSettings' :: JobSettings -> Maybe [Input]
inputs} -> Maybe [Input]
inputs) (\s :: JobSettings
s@JobSettings' {} Maybe [Input]
a -> JobSettings
s {$sel:inputs:JobSettings' :: Maybe [Input]
inputs = Maybe [Input]
a} :: JobSettings) ((Maybe [Input] -> f (Maybe [Input]))
 -> JobSettings -> f JobSettings)
-> ((Maybe [Input] -> f (Maybe [Input]))
    -> Maybe [Input] -> f (Maybe [Input]))
-> (Maybe [Input] -> f (Maybe [Input]))
-> JobSettings
-> f JobSettings
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Input] [Input] [Input] [Input]
-> Iso
     (Maybe [Input]) (Maybe [Input]) (Maybe [Input]) (Maybe [Input])
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 AnIso [Input] [Input] [Input] [Input]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | Enable Timed metadata insertion (TimedMetadataInsertion) to include ID3
-- tags in any HLS outputs. To include timed metadata, you must enable it
-- here, enable it in each output container, and specify tags and timecodes
-- in ID3 insertion (Id3Insertion) objects.
jobSettings_timedMetadataInsertion :: Lens.Lens' JobSettings (Prelude.Maybe TimedMetadataInsertion)
jobSettings_timedMetadataInsertion :: (Maybe TimedMetadataInsertion -> f (Maybe TimedMetadataInsertion))
-> JobSettings -> f JobSettings
jobSettings_timedMetadataInsertion = (JobSettings -> Maybe TimedMetadataInsertion)
-> (JobSettings -> Maybe TimedMetadataInsertion -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe TimedMetadataInsertion)
     (Maybe TimedMetadataInsertion)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe TimedMetadataInsertion
timedMetadataInsertion :: Maybe TimedMetadataInsertion
$sel:timedMetadataInsertion:JobSettings' :: JobSettings -> Maybe TimedMetadataInsertion
timedMetadataInsertion} -> Maybe TimedMetadataInsertion
timedMetadataInsertion) (\s :: JobSettings
s@JobSettings' {} Maybe TimedMetadataInsertion
a -> JobSettings
s {$sel:timedMetadataInsertion:JobSettings' :: Maybe TimedMetadataInsertion
timedMetadataInsertion = Maybe TimedMetadataInsertion
a} :: JobSettings)

-- | Settings for your Nielsen configuration. If you don\'t do Nielsen
-- measurement and analytics, ignore these settings. When you enable
-- Nielsen configuration (nielsenConfiguration), MediaConvert enables PCM
-- to ID3 tagging for all outputs in the job. To enable Nielsen
-- configuration programmatically, include an instance of
-- nielsenConfiguration in your JSON job specification. Even if you don\'t
-- include any children of nielsenConfiguration, you still enable the
-- setting.
jobSettings_nielsenConfiguration :: Lens.Lens' JobSettings (Prelude.Maybe NielsenConfiguration)
jobSettings_nielsenConfiguration :: (Maybe NielsenConfiguration -> f (Maybe NielsenConfiguration))
-> JobSettings -> f JobSettings
jobSettings_nielsenConfiguration = (JobSettings -> Maybe NielsenConfiguration)
-> (JobSettings -> Maybe NielsenConfiguration -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe NielsenConfiguration)
     (Maybe NielsenConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe NielsenConfiguration
nielsenConfiguration :: Maybe NielsenConfiguration
$sel:nielsenConfiguration:JobSettings' :: JobSettings -> Maybe NielsenConfiguration
nielsenConfiguration} -> Maybe NielsenConfiguration
nielsenConfiguration) (\s :: JobSettings
s@JobSettings' {} Maybe NielsenConfiguration
a -> JobSettings
s {$sel:nielsenConfiguration:JobSettings' :: Maybe NielsenConfiguration
nielsenConfiguration = Maybe NielsenConfiguration
a} :: JobSettings)

-- | Settings for ad avail blanking. Video can be blanked or overlaid with an
-- image, and audio muted during SCTE-35 triggered ad avails.
jobSettings_availBlanking :: Lens.Lens' JobSettings (Prelude.Maybe AvailBlanking)
jobSettings_availBlanking :: (Maybe AvailBlanking -> f (Maybe AvailBlanking))
-> JobSettings -> f JobSettings
jobSettings_availBlanking = (JobSettings -> Maybe AvailBlanking)
-> (JobSettings -> Maybe AvailBlanking -> JobSettings)
-> Lens
     JobSettings JobSettings (Maybe AvailBlanking) (Maybe AvailBlanking)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe AvailBlanking
availBlanking :: Maybe AvailBlanking
$sel:availBlanking:JobSettings' :: JobSettings -> Maybe AvailBlanking
availBlanking} -> Maybe AvailBlanking
availBlanking) (\s :: JobSettings
s@JobSettings' {} Maybe AvailBlanking
a -> JobSettings
s {$sel:availBlanking:JobSettings' :: Maybe AvailBlanking
availBlanking = Maybe AvailBlanking
a} :: JobSettings)

-- | If your source content has EIA-608 Line 21 Data Services, enable this
-- feature to specify what MediaConvert does with the Extended Data
-- Services (XDS) packets. You can choose to pass through XDS packets, or
-- remove them from the output. For more information about XDS, see EIA-608
-- Line Data Services, section 9.5.1.5 05h Content Advisory.
jobSettings_extendedDataServices :: Lens.Lens' JobSettings (Prelude.Maybe ExtendedDataServices)
jobSettings_extendedDataServices :: (Maybe ExtendedDataServices -> f (Maybe ExtendedDataServices))
-> JobSettings -> f JobSettings
jobSettings_extendedDataServices = (JobSettings -> Maybe ExtendedDataServices)
-> (JobSettings -> Maybe ExtendedDataServices -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe ExtendedDataServices)
     (Maybe ExtendedDataServices)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe ExtendedDataServices
extendedDataServices :: Maybe ExtendedDataServices
$sel:extendedDataServices:JobSettings' :: JobSettings -> Maybe ExtendedDataServices
extendedDataServices} -> Maybe ExtendedDataServices
extendedDataServices) (\s :: JobSettings
s@JobSettings' {} Maybe ExtendedDataServices
a -> JobSettings
s {$sel:extendedDataServices:JobSettings' :: Maybe ExtendedDataServices
extendedDataServices = Maybe ExtendedDataServices
a} :: JobSettings)

-- | Overlay motion graphics on top of your video. The motion graphics that
-- you specify here appear on all outputs in all output groups. For more
-- information, see
-- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/motion-graphic-overlay.html.
jobSettings_motionImageInserter :: Lens.Lens' JobSettings (Prelude.Maybe MotionImageInserter)
jobSettings_motionImageInserter :: (Maybe MotionImageInserter -> f (Maybe MotionImageInserter))
-> JobSettings -> f JobSettings
jobSettings_motionImageInserter = (JobSettings -> Maybe MotionImageInserter)
-> (JobSettings -> Maybe MotionImageInserter -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe MotionImageInserter)
     (Maybe MotionImageInserter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe MotionImageInserter
motionImageInserter :: Maybe MotionImageInserter
$sel:motionImageInserter:JobSettings' :: JobSettings -> Maybe MotionImageInserter
motionImageInserter} -> Maybe MotionImageInserter
motionImageInserter) (\s :: JobSettings
s@JobSettings' {} Maybe MotionImageInserter
a -> JobSettings
s {$sel:motionImageInserter:JobSettings' :: Maybe MotionImageInserter
motionImageInserter = Maybe MotionImageInserter
a} :: JobSettings)

-- | These settings control how the service handles timecodes throughout the
-- job. These settings don\'t affect input clipping.
jobSettings_timecodeConfig :: Lens.Lens' JobSettings (Prelude.Maybe TimecodeConfig)
jobSettings_timecodeConfig :: (Maybe TimecodeConfig -> f (Maybe TimecodeConfig))
-> JobSettings -> f JobSettings
jobSettings_timecodeConfig = (JobSettings -> Maybe TimecodeConfig)
-> (JobSettings -> Maybe TimecodeConfig -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe TimecodeConfig)
     (Maybe TimecodeConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe TimecodeConfig
timecodeConfig :: Maybe TimecodeConfig
$sel:timecodeConfig:JobSettings' :: JobSettings -> Maybe TimecodeConfig
timecodeConfig} -> Maybe TimecodeConfig
timecodeConfig) (\s :: JobSettings
s@JobSettings' {} Maybe TimecodeConfig
a -> JobSettings
s {$sel:timecodeConfig:JobSettings' :: Maybe TimecodeConfig
timecodeConfig = Maybe TimecodeConfig
a} :: JobSettings)

-- | (OutputGroups) contains one group of settings for each set of outputs
-- that share a common package type. All unpackaged files (MPEG-4, MPEG-2
-- TS, Quicktime, MXF, and no container) are grouped in a single output
-- group as well. Required in (OutputGroups) is a group of settings that
-- apply to the whole group. This required object depends on the value you
-- set for (Type) under (OutputGroups)>(OutputGroupSettings). Type,
-- settings object pairs are as follows. * FILE_GROUP_SETTINGS,
-- FileGroupSettings * HLS_GROUP_SETTINGS, HlsGroupSettings *
-- DASH_ISO_GROUP_SETTINGS, DashIsoGroupSettings *
-- MS_SMOOTH_GROUP_SETTINGS, MsSmoothGroupSettings * CMAF_GROUP_SETTINGS,
-- CmafGroupSettings
jobSettings_outputGroups :: Lens.Lens' JobSettings (Prelude.Maybe [OutputGroup])
jobSettings_outputGroups :: (Maybe [OutputGroup] -> f (Maybe [OutputGroup]))
-> JobSettings -> f JobSettings
jobSettings_outputGroups = (JobSettings -> Maybe [OutputGroup])
-> (JobSettings -> Maybe [OutputGroup] -> JobSettings)
-> Lens
     JobSettings JobSettings (Maybe [OutputGroup]) (Maybe [OutputGroup])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe [OutputGroup]
outputGroups :: Maybe [OutputGroup]
$sel:outputGroups:JobSettings' :: JobSettings -> Maybe [OutputGroup]
outputGroups} -> Maybe [OutputGroup]
outputGroups) (\s :: JobSettings
s@JobSettings' {} Maybe [OutputGroup]
a -> JobSettings
s {$sel:outputGroups:JobSettings' :: Maybe [OutputGroup]
outputGroups = Maybe [OutputGroup]
a} :: JobSettings) ((Maybe [OutputGroup] -> f (Maybe [OutputGroup]))
 -> JobSettings -> f JobSettings)
-> ((Maybe [OutputGroup] -> f (Maybe [OutputGroup]))
    -> Maybe [OutputGroup] -> f (Maybe [OutputGroup]))
-> (Maybe [OutputGroup] -> f (Maybe [OutputGroup]))
-> JobSettings
-> f JobSettings
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [OutputGroup] [OutputGroup] [OutputGroup] [OutputGroup]
-> Iso
     (Maybe [OutputGroup])
     (Maybe [OutputGroup])
     (Maybe [OutputGroup])
     (Maybe [OutputGroup])
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 AnIso [OutputGroup] [OutputGroup] [OutputGroup] [OutputGroup]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | When specified, this offset (in milliseconds) is added to the input Ad
-- Avail PTS time.
jobSettings_adAvailOffset :: Lens.Lens' JobSettings (Prelude.Maybe Prelude.Int)
jobSettings_adAvailOffset :: (Maybe Int -> f (Maybe Int)) -> JobSettings -> f JobSettings
jobSettings_adAvailOffset = (JobSettings -> Maybe Int)
-> (JobSettings -> Maybe Int -> JobSettings)
-> Lens JobSettings JobSettings (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe Int
adAvailOffset :: Maybe Int
$sel:adAvailOffset:JobSettings' :: JobSettings -> Maybe Int
adAvailOffset} -> Maybe Int
adAvailOffset) (\s :: JobSettings
s@JobSettings' {} Maybe Int
a -> JobSettings
s {$sel:adAvailOffset:JobSettings' :: Maybe Int
adAvailOffset = Maybe Int
a} :: JobSettings)

-- | Use these settings only when you use Kantar watermarking. Specify the
-- values that MediaConvert uses to generate and place Kantar watermarks in
-- your output audio. These settings apply to every output in your job. In
-- addition to specifying these values, you also need to store your Kantar
-- credentials in AWS Secrets Manager. For more information, see
-- https:\/\/docs.aws.amazon.com\/mediaconvert\/latest\/ug\/kantar-watermarking.html.
jobSettings_kantarWatermark :: Lens.Lens' JobSettings (Prelude.Maybe KantarWatermarkSettings)
jobSettings_kantarWatermark :: (Maybe KantarWatermarkSettings
 -> f (Maybe KantarWatermarkSettings))
-> JobSettings -> f JobSettings
jobSettings_kantarWatermark = (JobSettings -> Maybe KantarWatermarkSettings)
-> (JobSettings -> Maybe KantarWatermarkSettings -> JobSettings)
-> Lens
     JobSettings
     JobSettings
     (Maybe KantarWatermarkSettings)
     (Maybe KantarWatermarkSettings)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobSettings' {Maybe KantarWatermarkSettings
kantarWatermark :: Maybe KantarWatermarkSettings
$sel:kantarWatermark:JobSettings' :: JobSettings -> Maybe KantarWatermarkSettings
kantarWatermark} -> Maybe KantarWatermarkSettings
kantarWatermark) (\s :: JobSettings
s@JobSettings' {} Maybe KantarWatermarkSettings
a -> JobSettings
s {$sel:kantarWatermark:JobSettings' :: Maybe KantarWatermarkSettings
kantarWatermark = Maybe KantarWatermarkSettings
a} :: JobSettings)

instance Core.FromJSON JobSettings where
  parseJSON :: Value -> Parser JobSettings
parseJSON =
    String
-> (Object -> Parser JobSettings) -> Value -> Parser JobSettings
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
      String
"JobSettings"
      ( \Object
x ->
          Maybe NielsenNonLinearWatermarkSettings
-> Maybe EsamSettings
-> Maybe [Input]
-> Maybe TimedMetadataInsertion
-> Maybe NielsenConfiguration
-> Maybe AvailBlanking
-> Maybe ExtendedDataServices
-> Maybe MotionImageInserter
-> Maybe TimecodeConfig
-> Maybe [OutputGroup]
-> Maybe Int
-> Maybe KantarWatermarkSettings
-> JobSettings
JobSettings'
            (Maybe NielsenNonLinearWatermarkSettings
 -> Maybe EsamSettings
 -> Maybe [Input]
 -> Maybe TimedMetadataInsertion
 -> Maybe NielsenConfiguration
 -> Maybe AvailBlanking
 -> Maybe ExtendedDataServices
 -> Maybe MotionImageInserter
 -> Maybe TimecodeConfig
 -> Maybe [OutputGroup]
 -> Maybe Int
 -> Maybe KantarWatermarkSettings
 -> JobSettings)
-> Parser (Maybe NielsenNonLinearWatermarkSettings)
-> Parser
     (Maybe EsamSettings
      -> Maybe [Input]
      -> Maybe TimedMetadataInsertion
      -> Maybe NielsenConfiguration
      -> Maybe AvailBlanking
      -> Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe NielsenNonLinearWatermarkSettings)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"nielsenNonLinearWatermark")
            Parser
  (Maybe EsamSettings
   -> Maybe [Input]
   -> Maybe TimedMetadataInsertion
   -> Maybe NielsenConfiguration
   -> Maybe AvailBlanking
   -> Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe EsamSettings)
-> Parser
     (Maybe [Input]
      -> Maybe TimedMetadataInsertion
      -> Maybe NielsenConfiguration
      -> Maybe AvailBlanking
      -> Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe EsamSettings)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"esam")
            Parser
  (Maybe [Input]
   -> Maybe TimedMetadataInsertion
   -> Maybe NielsenConfiguration
   -> Maybe AvailBlanking
   -> Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe [Input])
-> Parser
     (Maybe TimedMetadataInsertion
      -> Maybe NielsenConfiguration
      -> Maybe AvailBlanking
      -> Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe [Input]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"inputs" Parser (Maybe (Maybe [Input]))
-> Maybe [Input] -> Parser (Maybe [Input])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [Input]
forall a. Monoid a => a
Prelude.mempty)
            Parser
  (Maybe TimedMetadataInsertion
   -> Maybe NielsenConfiguration
   -> Maybe AvailBlanking
   -> Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe TimedMetadataInsertion)
-> Parser
     (Maybe NielsenConfiguration
      -> Maybe AvailBlanking
      -> Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe TimedMetadataInsertion)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"timedMetadataInsertion")
            Parser
  (Maybe NielsenConfiguration
   -> Maybe AvailBlanking
   -> Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe NielsenConfiguration)
-> Parser
     (Maybe AvailBlanking
      -> Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe NielsenConfiguration)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"nielsenConfiguration")
            Parser
  (Maybe AvailBlanking
   -> Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe AvailBlanking)
-> Parser
     (Maybe ExtendedDataServices
      -> Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe AvailBlanking)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"availBlanking")
            Parser
  (Maybe ExtendedDataServices
   -> Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe ExtendedDataServices)
-> Parser
     (Maybe MotionImageInserter
      -> Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe ExtendedDataServices)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"extendedDataServices")
            Parser
  (Maybe MotionImageInserter
   -> Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe MotionImageInserter)
-> Parser
     (Maybe TimecodeConfig
      -> Maybe [OutputGroup]
      -> Maybe Int
      -> Maybe KantarWatermarkSettings
      -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe MotionImageInserter)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"motionImageInserter")
            Parser
  (Maybe TimecodeConfig
   -> Maybe [OutputGroup]
   -> Maybe Int
   -> Maybe KantarWatermarkSettings
   -> JobSettings)
-> Parser (Maybe TimecodeConfig)
-> Parser
     (Maybe [OutputGroup]
      -> Maybe Int -> Maybe KantarWatermarkSettings -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe TimecodeConfig)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"timecodeConfig")
            Parser
  (Maybe [OutputGroup]
   -> Maybe Int -> Maybe KantarWatermarkSettings -> JobSettings)
-> Parser (Maybe [OutputGroup])
-> Parser
     (Maybe Int -> Maybe KantarWatermarkSettings -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe [OutputGroup]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"outputGroups" Parser (Maybe (Maybe [OutputGroup]))
-> Maybe [OutputGroup] -> Parser (Maybe [OutputGroup])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [OutputGroup]
forall a. Monoid a => a
Prelude.mempty)
            Parser (Maybe Int -> Maybe KantarWatermarkSettings -> JobSettings)
-> Parser (Maybe Int)
-> Parser (Maybe KantarWatermarkSettings -> JobSettings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"adAvailOffset")
            Parser (Maybe KantarWatermarkSettings -> JobSettings)
-> Parser (Maybe KantarWatermarkSettings) -> Parser JobSettings
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe KantarWatermarkSettings)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"kantarWatermark")
      )

instance Prelude.Hashable JobSettings

instance Prelude.NFData JobSettings

instance Core.ToJSON JobSettings where
  toJSON :: JobSettings -> Value
toJSON JobSettings' {Maybe Int
Maybe [Input]
Maybe [OutputGroup]
Maybe AvailBlanking
Maybe EsamSettings
Maybe KantarWatermarkSettings
Maybe MotionImageInserter
Maybe NielsenConfiguration
Maybe NielsenNonLinearWatermarkSettings
Maybe TimecodeConfig
Maybe TimedMetadataInsertion
Maybe ExtendedDataServices
kantarWatermark :: Maybe KantarWatermarkSettings
adAvailOffset :: Maybe Int
outputGroups :: Maybe [OutputGroup]
timecodeConfig :: Maybe TimecodeConfig
motionImageInserter :: Maybe MotionImageInserter
extendedDataServices :: Maybe ExtendedDataServices
availBlanking :: Maybe AvailBlanking
nielsenConfiguration :: Maybe NielsenConfiguration
timedMetadataInsertion :: Maybe TimedMetadataInsertion
inputs :: Maybe [Input]
esam :: Maybe EsamSettings
nielsenNonLinearWatermark :: Maybe NielsenNonLinearWatermarkSettings
$sel:kantarWatermark:JobSettings' :: JobSettings -> Maybe KantarWatermarkSettings
$sel:adAvailOffset:JobSettings' :: JobSettings -> Maybe Int
$sel:outputGroups:JobSettings' :: JobSettings -> Maybe [OutputGroup]
$sel:timecodeConfig:JobSettings' :: JobSettings -> Maybe TimecodeConfig
$sel:motionImageInserter:JobSettings' :: JobSettings -> Maybe MotionImageInserter
$sel:extendedDataServices:JobSettings' :: JobSettings -> Maybe ExtendedDataServices
$sel:availBlanking:JobSettings' :: JobSettings -> Maybe AvailBlanking
$sel:nielsenConfiguration:JobSettings' :: JobSettings -> Maybe NielsenConfiguration
$sel:timedMetadataInsertion:JobSettings' :: JobSettings -> Maybe TimedMetadataInsertion
$sel:inputs:JobSettings' :: JobSettings -> Maybe [Input]
$sel:esam:JobSettings' :: JobSettings -> Maybe EsamSettings
$sel:nielsenNonLinearWatermark:JobSettings' :: JobSettings -> Maybe NielsenNonLinearWatermarkSettings
..} =
    [Pair] -> Value
Core.object
      ( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Text
"nielsenNonLinearWatermark" Text -> NielsenNonLinearWatermarkSettings -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (NielsenNonLinearWatermarkSettings -> Pair)
-> Maybe NielsenNonLinearWatermarkSettings -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NielsenNonLinearWatermarkSettings
nielsenNonLinearWatermark,
            (Text
"esam" Text -> EsamSettings -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (EsamSettings -> Pair) -> Maybe EsamSettings -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EsamSettings
esam,
            (Text
"inputs" Text -> [Input] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) ([Input] -> Pair) -> Maybe [Input] -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Input]
inputs,
            (Text
"timedMetadataInsertion" Text -> TimedMetadataInsertion -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (TimedMetadataInsertion -> Pair)
-> Maybe TimedMetadataInsertion -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TimedMetadataInsertion
timedMetadataInsertion,
            (Text
"nielsenConfiguration" Text -> NielsenConfiguration -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (NielsenConfiguration -> Pair)
-> Maybe NielsenConfiguration -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NielsenConfiguration
nielsenConfiguration,
            (Text
"availBlanking" Text -> AvailBlanking -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (AvailBlanking -> Pair) -> Maybe AvailBlanking -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AvailBlanking
availBlanking,
            (Text
"extendedDataServices" Text -> ExtendedDataServices -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (ExtendedDataServices -> Pair)
-> Maybe ExtendedDataServices -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExtendedDataServices
extendedDataServices,
            (Text
"motionImageInserter" Text -> MotionImageInserter -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (MotionImageInserter -> Pair)
-> Maybe MotionImageInserter -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MotionImageInserter
motionImageInserter,
            (Text
"timecodeConfig" Text -> TimecodeConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (TimecodeConfig -> Pair) -> Maybe TimecodeConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TimecodeConfig
timecodeConfig,
            (Text
"outputGroups" Text -> [OutputGroup] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) ([OutputGroup] -> Pair) -> Maybe [OutputGroup] -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [OutputGroup]
outputGroups,
            (Text
"adAvailOffset" Text -> Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Int -> Pair) -> Maybe Int -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
adAvailOffset,
            (Text
"kantarWatermark" Text -> KantarWatermarkSettings -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (KantarWatermarkSettings -> Pair)
-> Maybe KantarWatermarkSettings -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe KantarWatermarkSettings
kantarWatermark
          ]
      )