module Stratosphere.MediaLive.Channel.AudioSelectorSettingsProperty (
        module Exports, AudioSelectorSettingsProperty(..),
        mkAudioSelectorSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.AudioHlsRenditionSelectionProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.AudioLanguageSelectionProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.AudioPidSelectionProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.AudioTrackSelectionProperty as Exports
import Stratosphere.ResourceProperties
data AudioSelectorSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-audioselectorsettings.html>
    AudioSelectorSettingsProperty {AudioSelectorSettingsProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-audioselectorsettings.html#cfn-medialive-channel-audioselectorsettings-audiohlsrenditionselection>
                                   AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioHlsRenditionSelection :: (Prelude.Maybe AudioHlsRenditionSelectionProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-audioselectorsettings.html#cfn-medialive-channel-audioselectorsettings-audiolanguageselection>
                                   AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioLanguageSelection :: (Prelude.Maybe AudioLanguageSelectionProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-audioselectorsettings.html#cfn-medialive-channel-audioselectorsettings-audiopidselection>
                                   AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioPidSelection :: (Prelude.Maybe AudioPidSelectionProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-audioselectorsettings.html#cfn-medialive-channel-audioselectorsettings-audiotrackselection>
                                   AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
audioTrackSelection :: (Prelude.Maybe AudioTrackSelectionProperty)}
  deriving stock (AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> Bool
(AudioSelectorSettingsProperty
 -> AudioSelectorSettingsProperty -> Bool)
-> (AudioSelectorSettingsProperty
    -> AudioSelectorSettingsProperty -> Bool)
-> Eq AudioSelectorSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> Bool
== :: AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> Bool
$c/= :: AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> Bool
/= :: AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> Bool
Prelude.Eq, Int -> AudioSelectorSettingsProperty -> ShowS
[AudioSelectorSettingsProperty] -> ShowS
AudioSelectorSettingsProperty -> String
(Int -> AudioSelectorSettingsProperty -> ShowS)
-> (AudioSelectorSettingsProperty -> String)
-> ([AudioSelectorSettingsProperty] -> ShowS)
-> Show AudioSelectorSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AudioSelectorSettingsProperty -> ShowS
showsPrec :: Int -> AudioSelectorSettingsProperty -> ShowS
$cshow :: AudioSelectorSettingsProperty -> String
show :: AudioSelectorSettingsProperty -> String
$cshowList :: [AudioSelectorSettingsProperty] -> ShowS
showList :: [AudioSelectorSettingsProperty] -> ShowS
Prelude.Show)
mkAudioSelectorSettingsProperty :: AudioSelectorSettingsProperty
mkAudioSelectorSettingsProperty :: AudioSelectorSettingsProperty
mkAudioSelectorSettingsProperty
  = AudioSelectorSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioHlsRenditionSelection = Maybe AudioHlsRenditionSelectionProperty
forall a. Maybe a
Prelude.Nothing,
       audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioLanguageSelection = Maybe AudioLanguageSelectionProperty
forall a. Maybe a
Prelude.Nothing,
       audioPidSelection :: Maybe AudioPidSelectionProperty
audioPidSelection = Maybe AudioPidSelectionProperty
forall a. Maybe a
Prelude.Nothing,
       audioTrackSelection :: Maybe AudioTrackSelectionProperty
audioTrackSelection = Maybe AudioTrackSelectionProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties AudioSelectorSettingsProperty where
  toResourceProperties :: AudioSelectorSettingsProperty -> ResourceProperties
toResourceProperties AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.AudioSelectorSettings",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> AudioHlsRenditionSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioHlsRenditionSelection"
                              (AudioHlsRenditionSelectionProperty -> (Key, Value))
-> Maybe AudioHlsRenditionSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioHlsRenditionSelectionProperty
audioHlsRenditionSelection,
                            Key -> AudioLanguageSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioLanguageSelection"
                              (AudioLanguageSelectionProperty -> (Key, Value))
-> Maybe AudioLanguageSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioLanguageSelectionProperty
audioLanguageSelection,
                            Key -> AudioPidSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioPidSelection" (AudioPidSelectionProperty -> (Key, Value))
-> Maybe AudioPidSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioPidSelectionProperty
audioPidSelection,
                            Key -> AudioTrackSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioTrackSelection" (AudioTrackSelectionProperty -> (Key, Value))
-> Maybe AudioTrackSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioTrackSelectionProperty
audioTrackSelection])}
instance JSON.ToJSON AudioSelectorSettingsProperty where
  toJSON :: AudioSelectorSettingsProperty -> Value
toJSON AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> AudioHlsRenditionSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioHlsRenditionSelection"
                 (AudioHlsRenditionSelectionProperty -> (Key, Value))
-> Maybe AudioHlsRenditionSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioHlsRenditionSelectionProperty
audioHlsRenditionSelection,
               Key -> AudioLanguageSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioLanguageSelection"
                 (AudioLanguageSelectionProperty -> (Key, Value))
-> Maybe AudioLanguageSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioLanguageSelectionProperty
audioLanguageSelection,
               Key -> AudioPidSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioPidSelection" (AudioPidSelectionProperty -> (Key, Value))
-> Maybe AudioPidSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioPidSelectionProperty
audioPidSelection,
               Key -> AudioTrackSelectionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioTrackSelection" (AudioTrackSelectionProperty -> (Key, Value))
-> Maybe AudioTrackSelectionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioTrackSelectionProperty
audioTrackSelection]))
instance Property "AudioHlsRenditionSelection" AudioSelectorSettingsProperty where
  type PropertyType "AudioHlsRenditionSelection" AudioSelectorSettingsProperty = AudioHlsRenditionSelectionProperty
  set :: PropertyType
  "AudioHlsRenditionSelection" AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> AudioSelectorSettingsProperty
set PropertyType
  "AudioHlsRenditionSelection" AudioSelectorSettingsProperty
newValue AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = AudioSelectorSettingsProperty
        {audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioHlsRenditionSelection = AudioHlsRenditionSelectionProperty
-> Maybe AudioHlsRenditionSelectionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "AudioHlsRenditionSelection" AudioSelectorSettingsProperty
AudioHlsRenditionSelectionProperty
newValue, Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: ()
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
instance Property "AudioLanguageSelection" AudioSelectorSettingsProperty where
  type PropertyType "AudioLanguageSelection" AudioSelectorSettingsProperty = AudioLanguageSelectionProperty
  set :: PropertyType "AudioLanguageSelection" AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> AudioSelectorSettingsProperty
set PropertyType "AudioLanguageSelection" AudioSelectorSettingsProperty
newValue AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = AudioSelectorSettingsProperty
        {audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioLanguageSelection = AudioLanguageSelectionProperty
-> Maybe AudioLanguageSelectionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AudioLanguageSelection" AudioSelectorSettingsProperty
AudioLanguageSelectionProperty
newValue, Maybe AudioHlsRenditionSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
instance Property "AudioPidSelection" AudioSelectorSettingsProperty where
  type PropertyType "AudioPidSelection" AudioSelectorSettingsProperty = AudioPidSelectionProperty
  set :: PropertyType "AudioPidSelection" AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> AudioSelectorSettingsProperty
set PropertyType "AudioPidSelection" AudioSelectorSettingsProperty
newValue AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = AudioSelectorSettingsProperty
        {audioPidSelection :: Maybe AudioPidSelectionProperty
audioPidSelection = AudioPidSelectionProperty -> Maybe AudioPidSelectionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AudioPidSelection" AudioSelectorSettingsProperty
AudioPidSelectionProperty
newValue, Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
instance Property "AudioTrackSelection" AudioSelectorSettingsProperty where
  type PropertyType "AudioTrackSelection" AudioSelectorSettingsProperty = AudioTrackSelectionProperty
  set :: PropertyType "AudioTrackSelection" AudioSelectorSettingsProperty
-> AudioSelectorSettingsProperty -> AudioSelectorSettingsProperty
set PropertyType "AudioTrackSelection" AudioSelectorSettingsProperty
newValue AudioSelectorSettingsProperty {Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
Maybe AudioTrackSelectionProperty
()
haddock_workaround_ :: AudioSelectorSettingsProperty -> ()
audioHlsRenditionSelection :: AudioSelectorSettingsProperty
-> Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: AudioSelectorSettingsProperty
-> Maybe AudioLanguageSelectionProperty
audioPidSelection :: AudioSelectorSettingsProperty -> Maybe AudioPidSelectionProperty
audioTrackSelection :: AudioSelectorSettingsProperty -> Maybe AudioTrackSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
audioTrackSelection :: Maybe AudioTrackSelectionProperty
..}
    = AudioSelectorSettingsProperty
        {audioTrackSelection :: Maybe AudioTrackSelectionProperty
audioTrackSelection = AudioTrackSelectionProperty -> Maybe AudioTrackSelectionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AudioTrackSelection" AudioSelectorSettingsProperty
AudioTrackSelectionProperty
newValue, Maybe AudioHlsRenditionSelectionProperty
Maybe AudioLanguageSelectionProperty
Maybe AudioPidSelectionProperty
()
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
haddock_workaround_ :: ()
audioHlsRenditionSelection :: Maybe AudioHlsRenditionSelectionProperty
audioLanguageSelection :: Maybe AudioLanguageSelectionProperty
audioPidSelection :: Maybe AudioPidSelectionProperty
..}