module Stratosphere.PCAConnectorAD.Template.TemplateDefinitionProperty (
        module Exports, TemplateDefinitionProperty(..),
        mkTemplateDefinitionProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.PCAConnectorAD.Template.TemplateV2Property as Exports
import {-# SOURCE #-} Stratosphere.PCAConnectorAD.Template.TemplateV3Property as Exports
import {-# SOURCE #-} Stratosphere.PCAConnectorAD.Template.TemplateV4Property as Exports
import Stratosphere.ResourceProperties
data TemplateDefinitionProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pcaconnectorad-template-templatedefinition.html>
    TemplateDefinitionProperty {TemplateDefinitionProperty -> ()
haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pcaconnectorad-template-templatedefinition.html#cfn-pcaconnectorad-template-templatedefinition-templatev2>
                                TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV2 :: (Prelude.Maybe TemplateV2Property),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pcaconnectorad-template-templatedefinition.html#cfn-pcaconnectorad-template-templatedefinition-templatev3>
                                TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV3 :: (Prelude.Maybe TemplateV3Property),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pcaconnectorad-template-templatedefinition.html#cfn-pcaconnectorad-template-templatedefinition-templatev4>
                                TemplateDefinitionProperty -> Maybe TemplateV4Property
templateV4 :: (Prelude.Maybe TemplateV4Property)}
  deriving stock (TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool
(TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool)
-> (TemplateDefinitionProperty
    -> TemplateDefinitionProperty -> Bool)
-> Eq TemplateDefinitionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool
== :: TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool
$c/= :: TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool
/= :: TemplateDefinitionProperty -> TemplateDefinitionProperty -> Bool
Prelude.Eq, Int -> TemplateDefinitionProperty -> ShowS
[TemplateDefinitionProperty] -> ShowS
TemplateDefinitionProperty -> String
(Int -> TemplateDefinitionProperty -> ShowS)
-> (TemplateDefinitionProperty -> String)
-> ([TemplateDefinitionProperty] -> ShowS)
-> Show TemplateDefinitionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TemplateDefinitionProperty -> ShowS
showsPrec :: Int -> TemplateDefinitionProperty -> ShowS
$cshow :: TemplateDefinitionProperty -> String
show :: TemplateDefinitionProperty -> String
$cshowList :: [TemplateDefinitionProperty] -> ShowS
showList :: [TemplateDefinitionProperty] -> ShowS
Prelude.Show)
mkTemplateDefinitionProperty :: TemplateDefinitionProperty
mkTemplateDefinitionProperty :: TemplateDefinitionProperty
mkTemplateDefinitionProperty
  = TemplateDefinitionProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), templateV2 :: Maybe TemplateV2Property
templateV2 = Maybe TemplateV2Property
forall a. Maybe a
Prelude.Nothing,
       templateV3 :: Maybe TemplateV3Property
templateV3 = Maybe TemplateV3Property
forall a. Maybe a
Prelude.Nothing, templateV4 :: Maybe TemplateV4Property
templateV4 = Maybe TemplateV4Property
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties TemplateDefinitionProperty where
  toResourceProperties :: TemplateDefinitionProperty -> ResourceProperties
toResourceProperties TemplateDefinitionProperty {Maybe TemplateV4Property
Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: TemplateDefinitionProperty -> ()
templateV2 :: TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV3 :: TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV4 :: TemplateDefinitionProperty -> Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::PCAConnectorAD::Template.TemplateDefinition",
         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 -> TemplateV2Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV2" (TemplateV2Property -> (Key, Value))
-> Maybe TemplateV2Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV2Property
templateV2,
                            Key -> TemplateV3Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV3" (TemplateV3Property -> (Key, Value))
-> Maybe TemplateV3Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV3Property
templateV3,
                            Key -> TemplateV4Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV4" (TemplateV4Property -> (Key, Value))
-> Maybe TemplateV4Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV4Property
templateV4])}
instance JSON.ToJSON TemplateDefinitionProperty where
  toJSON :: TemplateDefinitionProperty -> Value
toJSON TemplateDefinitionProperty {Maybe TemplateV4Property
Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: TemplateDefinitionProperty -> ()
templateV2 :: TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV3 :: TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV4 :: TemplateDefinitionProperty -> Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
    = [(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 -> TemplateV2Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV2" (TemplateV2Property -> (Key, Value))
-> Maybe TemplateV2Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV2Property
templateV2,
               Key -> TemplateV3Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV3" (TemplateV3Property -> (Key, Value))
-> Maybe TemplateV3Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV3Property
templateV3,
               Key -> TemplateV4Property -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateV4" (TemplateV4Property -> (Key, Value))
-> Maybe TemplateV4Property -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TemplateV4Property
templateV4]))
instance Property "TemplateV2" TemplateDefinitionProperty where
  type PropertyType "TemplateV2" TemplateDefinitionProperty = TemplateV2Property
  set :: PropertyType "TemplateV2" TemplateDefinitionProperty
-> TemplateDefinitionProperty -> TemplateDefinitionProperty
set PropertyType "TemplateV2" TemplateDefinitionProperty
newValue TemplateDefinitionProperty {Maybe TemplateV4Property
Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: TemplateDefinitionProperty -> ()
templateV2 :: TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV3 :: TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV4 :: TemplateDefinitionProperty -> Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
    = TemplateDefinitionProperty
        {templateV2 :: Maybe TemplateV2Property
templateV2 = TemplateV2Property -> Maybe TemplateV2Property
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TemplateV2" TemplateDefinitionProperty
TemplateV2Property
newValue, Maybe TemplateV4Property
Maybe TemplateV3Property
()
haddock_workaround_ :: ()
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
instance Property "TemplateV3" TemplateDefinitionProperty where
  type PropertyType "TemplateV3" TemplateDefinitionProperty = TemplateV3Property
  set :: PropertyType "TemplateV3" TemplateDefinitionProperty
-> TemplateDefinitionProperty -> TemplateDefinitionProperty
set PropertyType "TemplateV3" TemplateDefinitionProperty
newValue TemplateDefinitionProperty {Maybe TemplateV4Property
Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: TemplateDefinitionProperty -> ()
templateV2 :: TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV3 :: TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV4 :: TemplateDefinitionProperty -> Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
    = TemplateDefinitionProperty
        {templateV3 :: Maybe TemplateV3Property
templateV3 = TemplateV3Property -> Maybe TemplateV3Property
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TemplateV3" TemplateDefinitionProperty
TemplateV3Property
newValue, Maybe TemplateV4Property
Maybe TemplateV2Property
()
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV4 :: Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV4 :: Maybe TemplateV4Property
..}
instance Property "TemplateV4" TemplateDefinitionProperty where
  type PropertyType "TemplateV4" TemplateDefinitionProperty = TemplateV4Property
  set :: PropertyType "TemplateV4" TemplateDefinitionProperty
-> TemplateDefinitionProperty -> TemplateDefinitionProperty
set PropertyType "TemplateV4" TemplateDefinitionProperty
newValue TemplateDefinitionProperty {Maybe TemplateV4Property
Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: TemplateDefinitionProperty -> ()
templateV2 :: TemplateDefinitionProperty -> Maybe TemplateV2Property
templateV3 :: TemplateDefinitionProperty -> Maybe TemplateV3Property
templateV4 :: TemplateDefinitionProperty -> Maybe TemplateV4Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
templateV4 :: Maybe TemplateV4Property
..}
    = TemplateDefinitionProperty
        {templateV4 :: Maybe TemplateV4Property
templateV4 = TemplateV4Property -> Maybe TemplateV4Property
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TemplateV4" TemplateDefinitionProperty
TemplateV4Property
newValue, Maybe TemplateV3Property
Maybe TemplateV2Property
()
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
haddock_workaround_ :: ()
templateV2 :: Maybe TemplateV2Property
templateV3 :: Maybe TemplateV3Property
..}