module Stratosphere.ASK.Skill (
        module Exports, Skill(..), mkSkill
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ASK.Skill.AuthenticationConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.ASK.Skill.SkillPackageProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data Skill
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ask-skill.html>
    Skill {Skill -> ()
haddock_workaround_ :: (),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ask-skill.html#cfn-ask-skill-authenticationconfiguration>
           Skill -> AuthenticationConfigurationProperty
authenticationConfiguration :: AuthenticationConfigurationProperty,
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ask-skill.html#cfn-ask-skill-skillpackage>
           Skill -> SkillPackageProperty
skillPackage :: SkillPackageProperty,
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ask-skill.html#cfn-ask-skill-vendorid>
           Skill -> Value Text
vendorId :: (Value Prelude.Text)}
  deriving stock (Skill -> Skill -> Bool
(Skill -> Skill -> Bool) -> (Skill -> Skill -> Bool) -> Eq Skill
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Skill -> Skill -> Bool
== :: Skill -> Skill -> Bool
$c/= :: Skill -> Skill -> Bool
/= :: Skill -> Skill -> Bool
Prelude.Eq, Int -> Skill -> ShowS
[Skill] -> ShowS
Skill -> String
(Int -> Skill -> ShowS)
-> (Skill -> String) -> ([Skill] -> ShowS) -> Show Skill
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Skill -> ShowS
showsPrec :: Int -> Skill -> ShowS
$cshow :: Skill -> String
show :: Skill -> String
$cshowList :: [Skill] -> ShowS
showList :: [Skill] -> ShowS
Prelude.Show)
mkSkill ::
  AuthenticationConfigurationProperty
  -> SkillPackageProperty -> Value Prelude.Text -> Skill
mkSkill :: AuthenticationConfigurationProperty
-> SkillPackageProperty -> Value Text -> Skill
mkSkill AuthenticationConfigurationProperty
authenticationConfiguration SkillPackageProperty
skillPackage Value Text
vendorId
  = Skill
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       authenticationConfiguration :: AuthenticationConfigurationProperty
authenticationConfiguration = AuthenticationConfigurationProperty
authenticationConfiguration,
       skillPackage :: SkillPackageProperty
skillPackage = SkillPackageProperty
skillPackage, vendorId :: Value Text
vendorId = Value Text
vendorId}
instance ToResourceProperties Skill where
  toResourceProperties :: Skill -> ResourceProperties
toResourceProperties Skill {()
Value Text
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: Skill -> ()
authenticationConfiguration :: Skill -> AuthenticationConfigurationProperty
skillPackage :: Skill -> SkillPackageProperty
vendorId :: Skill -> Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"Alexa::ASK::Skill", supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"AuthenticationConfiguration"
                         Key -> AuthenticationConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= AuthenticationConfigurationProperty
authenticationConfiguration,
                       Key
"SkillPackage" Key -> SkillPackageProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= SkillPackageProperty
skillPackage, Key
"VendorId" 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
vendorId]}
instance JSON.ToJSON Skill where
  toJSON :: Skill -> Value
toJSON Skill {()
Value Text
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: Skill -> ()
authenticationConfiguration :: Skill -> AuthenticationConfigurationProperty
skillPackage :: Skill -> SkillPackageProperty
vendorId :: Skill -> Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"AuthenticationConfiguration" Key -> AuthenticationConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= AuthenticationConfigurationProperty
authenticationConfiguration,
         Key
"SkillPackage" Key -> SkillPackageProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= SkillPackageProperty
skillPackage, Key
"VendorId" 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
vendorId]
instance Property "AuthenticationConfiguration" Skill where
  type PropertyType "AuthenticationConfiguration" Skill = AuthenticationConfigurationProperty
  set :: PropertyType "AuthenticationConfiguration" Skill -> Skill -> Skill
set PropertyType "AuthenticationConfiguration" Skill
newValue Skill {()
Value Text
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: Skill -> ()
authenticationConfiguration :: Skill -> AuthenticationConfigurationProperty
skillPackage :: Skill -> SkillPackageProperty
vendorId :: Skill -> Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..}
    = Skill {authenticationConfiguration :: AuthenticationConfigurationProperty
authenticationConfiguration = PropertyType "AuthenticationConfiguration" Skill
AuthenticationConfigurationProperty
newValue, ()
Value Text
SkillPackageProperty
haddock_workaround_ :: ()
skillPackage :: SkillPackageProperty
vendorId :: Value Text
haddock_workaround_ :: ()
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..}
instance Property "SkillPackage" Skill where
  type PropertyType "SkillPackage" Skill = SkillPackageProperty
  set :: PropertyType "SkillPackage" Skill -> Skill -> Skill
set PropertyType "SkillPackage" Skill
newValue Skill {()
Value Text
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: Skill -> ()
authenticationConfiguration :: Skill -> AuthenticationConfigurationProperty
skillPackage :: Skill -> SkillPackageProperty
vendorId :: Skill -> Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..} = Skill {skillPackage :: SkillPackageProperty
skillPackage = PropertyType "SkillPackage" Skill
SkillPackageProperty
newValue, ()
Value Text
AuthenticationConfigurationProperty
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
vendorId :: Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
vendorId :: Value Text
..}
instance Property "VendorId" Skill where
  type PropertyType "VendorId" Skill = Value Prelude.Text
  set :: PropertyType "VendorId" Skill -> Skill -> Skill
set PropertyType "VendorId" Skill
newValue Skill {()
Value Text
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: Skill -> ()
authenticationConfiguration :: Skill -> AuthenticationConfigurationProperty
skillPackage :: Skill -> SkillPackageProperty
vendorId :: Skill -> Value Text
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
vendorId :: Value Text
..} = Skill {vendorId :: Value Text
vendorId = PropertyType "VendorId" Skill
Value Text
newValue, ()
AuthenticationConfigurationProperty
SkillPackageProperty
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
haddock_workaround_ :: ()
authenticationConfiguration :: AuthenticationConfigurationProperty
skillPackage :: SkillPackageProperty
..}