module Stratosphere.Lambda.CodeSigningConfig.CodeSigningPoliciesProperty (
CodeSigningPoliciesProperty(..), mkCodeSigningPoliciesProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CodeSigningPoliciesProperty
=
CodeSigningPoliciesProperty {CodeSigningPoliciesProperty -> ()
haddock_workaround_ :: (),
CodeSigningPoliciesProperty -> Value Text
untrustedArtifactOnDeployment :: (Value Prelude.Text)}
deriving stock (CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty -> Bool
(CodeSigningPoliciesProperty
-> CodeSigningPoliciesProperty -> Bool)
-> (CodeSigningPoliciesProperty
-> CodeSigningPoliciesProperty -> Bool)
-> Eq CodeSigningPoliciesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty -> Bool
== :: CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty -> Bool
$c/= :: CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty -> Bool
/= :: CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty -> Bool
Prelude.Eq, Int -> CodeSigningPoliciesProperty -> ShowS
[CodeSigningPoliciesProperty] -> ShowS
CodeSigningPoliciesProperty -> String
(Int -> CodeSigningPoliciesProperty -> ShowS)
-> (CodeSigningPoliciesProperty -> String)
-> ([CodeSigningPoliciesProperty] -> ShowS)
-> Show CodeSigningPoliciesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CodeSigningPoliciesProperty -> ShowS
showsPrec :: Int -> CodeSigningPoliciesProperty -> ShowS
$cshow :: CodeSigningPoliciesProperty -> String
show :: CodeSigningPoliciesProperty -> String
$cshowList :: [CodeSigningPoliciesProperty] -> ShowS
showList :: [CodeSigningPoliciesProperty] -> ShowS
Prelude.Show)
mkCodeSigningPoliciesProperty ::
Value Prelude.Text -> CodeSigningPoliciesProperty
mkCodeSigningPoliciesProperty :: Value Text -> CodeSigningPoliciesProperty
mkCodeSigningPoliciesProperty Value Text
untrustedArtifactOnDeployment
= CodeSigningPoliciesProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
untrustedArtifactOnDeployment :: Value Text
untrustedArtifactOnDeployment = Value Text
untrustedArtifactOnDeployment}
instance ToResourceProperties CodeSigningPoliciesProperty where
toResourceProperties :: CodeSigningPoliciesProperty -> ResourceProperties
toResourceProperties CodeSigningPoliciesProperty {()
Value Text
haddock_workaround_ :: CodeSigningPoliciesProperty -> ()
untrustedArtifactOnDeployment :: CodeSigningPoliciesProperty -> Value Text
haddock_workaround_ :: ()
untrustedArtifactOnDeployment :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Lambda::CodeSigningConfig.CodeSigningPolicies",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"UntrustedArtifactOnDeployment"
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..= Value Text
untrustedArtifactOnDeployment]}
instance JSON.ToJSON CodeSigningPoliciesProperty where
toJSON :: CodeSigningPoliciesProperty -> Value
toJSON CodeSigningPoliciesProperty {()
Value Text
haddock_workaround_ :: CodeSigningPoliciesProperty -> ()
untrustedArtifactOnDeployment :: CodeSigningPoliciesProperty -> Value Text
haddock_workaround_ :: ()
untrustedArtifactOnDeployment :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"UntrustedArtifactOnDeployment"
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..= Value Text
untrustedArtifactOnDeployment]
instance Property "UntrustedArtifactOnDeployment" CodeSigningPoliciesProperty where
type PropertyType "UntrustedArtifactOnDeployment" CodeSigningPoliciesProperty = Value Prelude.Text
set :: PropertyType
"UntrustedArtifactOnDeployment" CodeSigningPoliciesProperty
-> CodeSigningPoliciesProperty -> CodeSigningPoliciesProperty
set PropertyType
"UntrustedArtifactOnDeployment" CodeSigningPoliciesProperty
newValue CodeSigningPoliciesProperty {()
Value Text
haddock_workaround_ :: CodeSigningPoliciesProperty -> ()
untrustedArtifactOnDeployment :: CodeSigningPoliciesProperty -> Value Text
haddock_workaround_ :: ()
untrustedArtifactOnDeployment :: Value Text
..}
= CodeSigningPoliciesProperty
{untrustedArtifactOnDeployment :: Value Text
untrustedArtifactOnDeployment = PropertyType
"UntrustedArtifactOnDeployment" CodeSigningPoliciesProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}