module Stratosphere.DataZone.Project.EnvironmentConfigurationUserParameterProperty (
module Exports, EnvironmentConfigurationUserParameterProperty(..),
mkEnvironmentConfigurationUserParameterProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DataZone.Project.EnvironmentParameterProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EnvironmentConfigurationUserParameterProperty
=
EnvironmentConfigurationUserParameterProperty {EnvironmentConfigurationUserParameterProperty -> ()
haddock_workaround_ :: (),
EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentConfigurationName :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
environmentParameters :: (Prelude.Maybe [EnvironmentParameterProperty])}
deriving stock (EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool
(EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool)
-> (EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool)
-> Eq EnvironmentConfigurationUserParameterProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool
== :: EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool
$c/= :: EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool
/= :: EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty -> Bool
Prelude.Eq, Int -> EnvironmentConfigurationUserParameterProperty -> ShowS
[EnvironmentConfigurationUserParameterProperty] -> ShowS
EnvironmentConfigurationUserParameterProperty -> String
(Int -> EnvironmentConfigurationUserParameterProperty -> ShowS)
-> (EnvironmentConfigurationUserParameterProperty -> String)
-> ([EnvironmentConfigurationUserParameterProperty] -> ShowS)
-> Show EnvironmentConfigurationUserParameterProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EnvironmentConfigurationUserParameterProperty -> ShowS
showsPrec :: Int -> EnvironmentConfigurationUserParameterProperty -> ShowS
$cshow :: EnvironmentConfigurationUserParameterProperty -> String
show :: EnvironmentConfigurationUserParameterProperty -> String
$cshowList :: [EnvironmentConfigurationUserParameterProperty] -> ShowS
showList :: [EnvironmentConfigurationUserParameterProperty] -> ShowS
Prelude.Show)
mkEnvironmentConfigurationUserParameterProperty ::
EnvironmentConfigurationUserParameterProperty
mkEnvironmentConfigurationUserParameterProperty :: EnvironmentConfigurationUserParameterProperty
mkEnvironmentConfigurationUserParameterProperty
= EnvironmentConfigurationUserParameterProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
environmentConfigurationName :: Maybe (Value Text)
environmentConfigurationName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
environmentId :: Maybe (Value Text)
environmentId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
environmentParameters :: Maybe [EnvironmentParameterProperty]
environmentParameters = Maybe [EnvironmentParameterProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties EnvironmentConfigurationUserParameterProperty where
toResourceProperties :: EnvironmentConfigurationUserParameterProperty -> ResourceProperties
toResourceProperties
EnvironmentConfigurationUserParameterProperty {Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentConfigurationUserParameterProperty -> ()
environmentConfigurationName :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentParameters :: EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::DataZone::Project.EnvironmentConfigurationUserParameter",
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 -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentConfigurationName"
(Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentConfigurationName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentId,
Key -> [EnvironmentParameterProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentParameters"
([EnvironmentParameterProperty] -> (Key, Value))
-> Maybe [EnvironmentParameterProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EnvironmentParameterProperty]
environmentParameters])}
instance JSON.ToJSON EnvironmentConfigurationUserParameterProperty where
toJSON :: EnvironmentConfigurationUserParameterProperty -> Value
toJSON EnvironmentConfigurationUserParameterProperty {Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentConfigurationUserParameterProperty -> ()
environmentConfigurationName :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentParameters :: EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
= [(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 -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentConfigurationName"
(Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentConfigurationName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentId,
Key -> [EnvironmentParameterProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentParameters"
([EnvironmentParameterProperty] -> (Key, Value))
-> Maybe [EnvironmentParameterProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EnvironmentParameterProperty]
environmentParameters]))
instance Property "EnvironmentConfigurationName" EnvironmentConfigurationUserParameterProperty where
type PropertyType "EnvironmentConfigurationName" EnvironmentConfigurationUserParameterProperty = Value Prelude.Text
set :: PropertyType
"EnvironmentConfigurationName"
EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
set PropertyType
"EnvironmentConfigurationName"
EnvironmentConfigurationUserParameterProperty
newValue EnvironmentConfigurationUserParameterProperty {Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentConfigurationUserParameterProperty -> ()
environmentConfigurationName :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentParameters :: EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
= EnvironmentConfigurationUserParameterProperty
{environmentConfigurationName :: Maybe (Value Text)
environmentConfigurationName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"EnvironmentConfigurationName"
EnvironmentConfigurationUserParameterProperty
Value Text
newValue, Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
instance Property "EnvironmentId" EnvironmentConfigurationUserParameterProperty where
type PropertyType "EnvironmentId" EnvironmentConfigurationUserParameterProperty = Value Prelude.Text
set :: PropertyType
"EnvironmentId" EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
set PropertyType
"EnvironmentId" EnvironmentConfigurationUserParameterProperty
newValue EnvironmentConfigurationUserParameterProperty {Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentConfigurationUserParameterProperty -> ()
environmentConfigurationName :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentParameters :: EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
= EnvironmentConfigurationUserParameterProperty
{environmentId :: Maybe (Value Text)
environmentId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"EnvironmentId" EnvironmentConfigurationUserParameterProperty
Value Text
newValue, Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
instance Property "EnvironmentParameters" EnvironmentConfigurationUserParameterProperty where
type PropertyType "EnvironmentParameters" EnvironmentConfigurationUserParameterProperty = [EnvironmentParameterProperty]
set :: PropertyType
"EnvironmentParameters"
EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
-> EnvironmentConfigurationUserParameterProperty
set PropertyType
"EnvironmentParameters"
EnvironmentConfigurationUserParameterProperty
newValue EnvironmentConfigurationUserParameterProperty {Maybe [EnvironmentParameterProperty]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentConfigurationUserParameterProperty -> ()
environmentConfigurationName :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentId :: EnvironmentConfigurationUserParameterProperty -> Maybe (Value Text)
environmentParameters :: EnvironmentConfigurationUserParameterProperty
-> Maybe [EnvironmentParameterProperty]
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
environmentParameters :: Maybe [EnvironmentParameterProperty]
..}
= EnvironmentConfigurationUserParameterProperty
{environmentParameters :: Maybe [EnvironmentParameterProperty]
environmentParameters = [EnvironmentParameterProperty]
-> Maybe [EnvironmentParameterProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [EnvironmentParameterProperty]
PropertyType
"EnvironmentParameters"
EnvironmentConfigurationUserParameterProperty
newValue, Maybe (Value Text)
()
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
haddock_workaround_ :: ()
environmentConfigurationName :: Maybe (Value Text)
environmentId :: Maybe (Value Text)
..}