module Stratosphere.CodePipeline.Pipeline.EncryptionKeyProperty (
        EncryptionKeyProperty(..), mkEncryptionKeyProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EncryptionKeyProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-encryptionkey.html>
    EncryptionKeyProperty {EncryptionKeyProperty -> ()
haddock_workaround_ :: (),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-encryptionkey.html#cfn-codepipeline-pipeline-encryptionkey-id>
                           EncryptionKeyProperty -> Value Text
id :: (Value Prelude.Text),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codepipeline-pipeline-encryptionkey.html#cfn-codepipeline-pipeline-encryptionkey-type>
                           EncryptionKeyProperty -> Value Text
type' :: (Value Prelude.Text)}
  deriving stock (EncryptionKeyProperty -> EncryptionKeyProperty -> Bool
(EncryptionKeyProperty -> EncryptionKeyProperty -> Bool)
-> (EncryptionKeyProperty -> EncryptionKeyProperty -> Bool)
-> Eq EncryptionKeyProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EncryptionKeyProperty -> EncryptionKeyProperty -> Bool
== :: EncryptionKeyProperty -> EncryptionKeyProperty -> Bool
$c/= :: EncryptionKeyProperty -> EncryptionKeyProperty -> Bool
/= :: EncryptionKeyProperty -> EncryptionKeyProperty -> Bool
Prelude.Eq, Int -> EncryptionKeyProperty -> ShowS
[EncryptionKeyProperty] -> ShowS
EncryptionKeyProperty -> String
(Int -> EncryptionKeyProperty -> ShowS)
-> (EncryptionKeyProperty -> String)
-> ([EncryptionKeyProperty] -> ShowS)
-> Show EncryptionKeyProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EncryptionKeyProperty -> ShowS
showsPrec :: Int -> EncryptionKeyProperty -> ShowS
$cshow :: EncryptionKeyProperty -> String
show :: EncryptionKeyProperty -> String
$cshowList :: [EncryptionKeyProperty] -> ShowS
showList :: [EncryptionKeyProperty] -> ShowS
Prelude.Show)
mkEncryptionKeyProperty ::
  Value Prelude.Text -> Value Prelude.Text -> EncryptionKeyProperty
mkEncryptionKeyProperty :: Value Text -> Value Text -> EncryptionKeyProperty
mkEncryptionKeyProperty Value Text
id Value Text
type'
  = EncryptionKeyProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), id :: Value Text
id = Value Text
id, type' :: Value Text
type' = Value Text
type'}
instance ToResourceProperties EncryptionKeyProperty where
  toResourceProperties :: EncryptionKeyProperty -> ResourceProperties
toResourceProperties EncryptionKeyProperty {()
Value Text
haddock_workaround_ :: EncryptionKeyProperty -> ()
id :: EncryptionKeyProperty -> Value Text
type' :: EncryptionKeyProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
type' :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::CodePipeline::Pipeline.EncryptionKey",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Id" 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
id, Key
"Type" 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
type']}
instance JSON.ToJSON EncryptionKeyProperty where
  toJSON :: EncryptionKeyProperty -> Value
toJSON EncryptionKeyProperty {()
Value Text
haddock_workaround_ :: EncryptionKeyProperty -> ()
id :: EncryptionKeyProperty -> Value Text
type' :: EncryptionKeyProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
type' :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Id" 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
id, Key
"Type" 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
type']
instance Property "Id" EncryptionKeyProperty where
  type PropertyType "Id" EncryptionKeyProperty = Value Prelude.Text
  set :: PropertyType "Id" EncryptionKeyProperty
-> EncryptionKeyProperty -> EncryptionKeyProperty
set PropertyType "Id" EncryptionKeyProperty
newValue EncryptionKeyProperty {()
Value Text
haddock_workaround_ :: EncryptionKeyProperty -> ()
id :: EncryptionKeyProperty -> Value Text
type' :: EncryptionKeyProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
type' :: Value Text
..}
    = EncryptionKeyProperty {id :: Value Text
id = PropertyType "Id" EncryptionKeyProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
type' :: Value Text
haddock_workaround_ :: ()
type' :: Value Text
..}
instance Property "Type" EncryptionKeyProperty where
  type PropertyType "Type" EncryptionKeyProperty = Value Prelude.Text
  set :: PropertyType "Type" EncryptionKeyProperty
-> EncryptionKeyProperty -> EncryptionKeyProperty
set PropertyType "Type" EncryptionKeyProperty
newValue EncryptionKeyProperty {()
Value Text
haddock_workaround_ :: EncryptionKeyProperty -> ()
id :: EncryptionKeyProperty -> Value Text
type' :: EncryptionKeyProperty -> Value Text
haddock_workaround_ :: ()
id :: Value Text
type' :: Value Text
..}
    = EncryptionKeyProperty {type' :: Value Text
type' = PropertyType "Type" EncryptionKeyProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
id :: Value Text
haddock_workaround_ :: ()
id :: Value Text
..}