module Stratosphere.QuickSight.Dashboard.LinkSharingConfigurationProperty (
        module Exports, LinkSharingConfigurationProperty(..),
        mkLinkSharingConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.QuickSight.Dashboard.ResourcePermissionProperty as Exports
import Stratosphere.ResourceProperties
data LinkSharingConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-dashboard-linksharingconfiguration.html>
    LinkSharingConfigurationProperty {LinkSharingConfigurationProperty -> ()
haddock_workaround_ :: (),
                                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-dashboard-linksharingconfiguration.html#cfn-quicksight-dashboard-linksharingconfiguration-permissions>
                                      LinkSharingConfigurationProperty
-> Maybe [ResourcePermissionProperty]
permissions :: (Prelude.Maybe [ResourcePermissionProperty])}
  deriving stock (LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty -> Bool
(LinkSharingConfigurationProperty
 -> LinkSharingConfigurationProperty -> Bool)
-> (LinkSharingConfigurationProperty
    -> LinkSharingConfigurationProperty -> Bool)
-> Eq LinkSharingConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty -> Bool
== :: LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty -> Bool
$c/= :: LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty -> Bool
/= :: LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty -> Bool
Prelude.Eq, Int -> LinkSharingConfigurationProperty -> ShowS
[LinkSharingConfigurationProperty] -> ShowS
LinkSharingConfigurationProperty -> String
(Int -> LinkSharingConfigurationProperty -> ShowS)
-> (LinkSharingConfigurationProperty -> String)
-> ([LinkSharingConfigurationProperty] -> ShowS)
-> Show LinkSharingConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LinkSharingConfigurationProperty -> ShowS
showsPrec :: Int -> LinkSharingConfigurationProperty -> ShowS
$cshow :: LinkSharingConfigurationProperty -> String
show :: LinkSharingConfigurationProperty -> String
$cshowList :: [LinkSharingConfigurationProperty] -> ShowS
showList :: [LinkSharingConfigurationProperty] -> ShowS
Prelude.Show)
mkLinkSharingConfigurationProperty ::
  LinkSharingConfigurationProperty
mkLinkSharingConfigurationProperty :: LinkSharingConfigurationProperty
mkLinkSharingConfigurationProperty
  = LinkSharingConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), permissions :: Maybe [ResourcePermissionProperty]
permissions = Maybe [ResourcePermissionProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties LinkSharingConfigurationProperty where
  toResourceProperties :: LinkSharingConfigurationProperty -> ResourceProperties
toResourceProperties LinkSharingConfigurationProperty {Maybe [ResourcePermissionProperty]
()
haddock_workaround_ :: LinkSharingConfigurationProperty -> ()
permissions :: LinkSharingConfigurationProperty
-> Maybe [ResourcePermissionProperty]
haddock_workaround_ :: ()
permissions :: Maybe [ResourcePermissionProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Dashboard.LinkSharingConfiguration",
         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 -> [ResourcePermissionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Permissions" ([ResourcePermissionProperty] -> (Key, Value))
-> Maybe [ResourcePermissionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ResourcePermissionProperty]
permissions])}
instance JSON.ToJSON LinkSharingConfigurationProperty where
  toJSON :: LinkSharingConfigurationProperty -> Value
toJSON LinkSharingConfigurationProperty {Maybe [ResourcePermissionProperty]
()
haddock_workaround_ :: LinkSharingConfigurationProperty -> ()
permissions :: LinkSharingConfigurationProperty
-> Maybe [ResourcePermissionProperty]
haddock_workaround_ :: ()
permissions :: Maybe [ResourcePermissionProperty]
..}
    = [(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 -> [ResourcePermissionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Permissions" ([ResourcePermissionProperty] -> (Key, Value))
-> Maybe [ResourcePermissionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ResourcePermissionProperty]
permissions]))
instance Property "Permissions" LinkSharingConfigurationProperty where
  type PropertyType "Permissions" LinkSharingConfigurationProperty = [ResourcePermissionProperty]
  set :: PropertyType "Permissions" LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty
-> LinkSharingConfigurationProperty
set PropertyType "Permissions" LinkSharingConfigurationProperty
newValue LinkSharingConfigurationProperty {Maybe [ResourcePermissionProperty]
()
haddock_workaround_ :: LinkSharingConfigurationProperty -> ()
permissions :: LinkSharingConfigurationProperty
-> Maybe [ResourcePermissionProperty]
haddock_workaround_ :: ()
permissions :: Maybe [ResourcePermissionProperty]
..}
    = LinkSharingConfigurationProperty
        {permissions :: Maybe [ResourcePermissionProperty]
permissions = [ResourcePermissionProperty] -> Maybe [ResourcePermissionProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ResourcePermissionProperty]
PropertyType "Permissions" LinkSharingConfigurationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}