module Stratosphere.DataZone.UserProfile.UserProfileDetailsProperty (
        module Exports, UserProfileDetailsProperty(..),
        mkUserProfileDetailsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DataZone.UserProfile.IamUserProfileDetailsProperty as Exports
import {-# SOURCE #-} Stratosphere.DataZone.UserProfile.SsoUserProfileDetailsProperty as Exports
import Stratosphere.ResourceProperties
data UserProfileDetailsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datazone-userprofile-userprofiledetails.html>
    UserProfileDetailsProperty {UserProfileDetailsProperty -> ()
haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datazone-userprofile-userprofiledetails.html#cfn-datazone-userprofile-userprofiledetails-iam>
                                UserProfileDetailsProperty -> Maybe IamUserProfileDetailsProperty
iam :: (Prelude.Maybe IamUserProfileDetailsProperty),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-datazone-userprofile-userprofiledetails.html#cfn-datazone-userprofile-userprofiledetails-sso>
                                UserProfileDetailsProperty -> Maybe SsoUserProfileDetailsProperty
sso :: (Prelude.Maybe SsoUserProfileDetailsProperty)}
  deriving stock (UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool
(UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool)
-> (UserProfileDetailsProperty
    -> UserProfileDetailsProperty -> Bool)
-> Eq UserProfileDetailsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool
== :: UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool
$c/= :: UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool
/= :: UserProfileDetailsProperty -> UserProfileDetailsProperty -> Bool
Prelude.Eq, Int -> UserProfileDetailsProperty -> ShowS
[UserProfileDetailsProperty] -> ShowS
UserProfileDetailsProperty -> String
(Int -> UserProfileDetailsProperty -> ShowS)
-> (UserProfileDetailsProperty -> String)
-> ([UserProfileDetailsProperty] -> ShowS)
-> Show UserProfileDetailsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> UserProfileDetailsProperty -> ShowS
showsPrec :: Int -> UserProfileDetailsProperty -> ShowS
$cshow :: UserProfileDetailsProperty -> String
show :: UserProfileDetailsProperty -> String
$cshowList :: [UserProfileDetailsProperty] -> ShowS
showList :: [UserProfileDetailsProperty] -> ShowS
Prelude.Show)
mkUserProfileDetailsProperty :: UserProfileDetailsProperty
mkUserProfileDetailsProperty :: UserProfileDetailsProperty
mkUserProfileDetailsProperty
  = UserProfileDetailsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), iam :: Maybe IamUserProfileDetailsProperty
iam = Maybe IamUserProfileDetailsProperty
forall a. Maybe a
Prelude.Nothing,
       sso :: Maybe SsoUserProfileDetailsProperty
sso = Maybe SsoUserProfileDetailsProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties UserProfileDetailsProperty where
  toResourceProperties :: UserProfileDetailsProperty -> ResourceProperties
toResourceProperties UserProfileDetailsProperty {Maybe IamUserProfileDetailsProperty
Maybe SsoUserProfileDetailsProperty
()
haddock_workaround_ :: UserProfileDetailsProperty -> ()
iam :: UserProfileDetailsProperty -> Maybe IamUserProfileDetailsProperty
sso :: UserProfileDetailsProperty -> Maybe SsoUserProfileDetailsProperty
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
sso :: Maybe SsoUserProfileDetailsProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::DataZone::UserProfile.UserProfileDetails",
         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 -> IamUserProfileDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Iam" (IamUserProfileDetailsProperty -> (Key, Value))
-> Maybe IamUserProfileDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe IamUserProfileDetailsProperty
iam,
                            Key -> SsoUserProfileDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Sso" (SsoUserProfileDetailsProperty -> (Key, Value))
-> Maybe SsoUserProfileDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SsoUserProfileDetailsProperty
sso])}
instance JSON.ToJSON UserProfileDetailsProperty where
  toJSON :: UserProfileDetailsProperty -> Value
toJSON UserProfileDetailsProperty {Maybe IamUserProfileDetailsProperty
Maybe SsoUserProfileDetailsProperty
()
haddock_workaround_ :: UserProfileDetailsProperty -> ()
iam :: UserProfileDetailsProperty -> Maybe IamUserProfileDetailsProperty
sso :: UserProfileDetailsProperty -> Maybe SsoUserProfileDetailsProperty
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
sso :: Maybe SsoUserProfileDetailsProperty
..}
    = [(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 -> IamUserProfileDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Iam" (IamUserProfileDetailsProperty -> (Key, Value))
-> Maybe IamUserProfileDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe IamUserProfileDetailsProperty
iam,
               Key -> SsoUserProfileDetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Sso" (SsoUserProfileDetailsProperty -> (Key, Value))
-> Maybe SsoUserProfileDetailsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SsoUserProfileDetailsProperty
sso]))
instance Property "Iam" UserProfileDetailsProperty where
  type PropertyType "Iam" UserProfileDetailsProperty = IamUserProfileDetailsProperty
  set :: PropertyType "Iam" UserProfileDetailsProperty
-> UserProfileDetailsProperty -> UserProfileDetailsProperty
set PropertyType "Iam" UserProfileDetailsProperty
newValue UserProfileDetailsProperty {Maybe IamUserProfileDetailsProperty
Maybe SsoUserProfileDetailsProperty
()
haddock_workaround_ :: UserProfileDetailsProperty -> ()
iam :: UserProfileDetailsProperty -> Maybe IamUserProfileDetailsProperty
sso :: UserProfileDetailsProperty -> Maybe SsoUserProfileDetailsProperty
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
sso :: Maybe SsoUserProfileDetailsProperty
..}
    = UserProfileDetailsProperty {iam :: Maybe IamUserProfileDetailsProperty
iam = IamUserProfileDetailsProperty
-> Maybe IamUserProfileDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Iam" UserProfileDetailsProperty
IamUserProfileDetailsProperty
newValue, Maybe SsoUserProfileDetailsProperty
()
haddock_workaround_ :: ()
sso :: Maybe SsoUserProfileDetailsProperty
haddock_workaround_ :: ()
sso :: Maybe SsoUserProfileDetailsProperty
..}
instance Property "Sso" UserProfileDetailsProperty where
  type PropertyType "Sso" UserProfileDetailsProperty = SsoUserProfileDetailsProperty
  set :: PropertyType "Sso" UserProfileDetailsProperty
-> UserProfileDetailsProperty -> UserProfileDetailsProperty
set PropertyType "Sso" UserProfileDetailsProperty
newValue UserProfileDetailsProperty {Maybe IamUserProfileDetailsProperty
Maybe SsoUserProfileDetailsProperty
()
haddock_workaround_ :: UserProfileDetailsProperty -> ()
iam :: UserProfileDetailsProperty -> Maybe IamUserProfileDetailsProperty
sso :: UserProfileDetailsProperty -> Maybe SsoUserProfileDetailsProperty
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
sso :: Maybe SsoUserProfileDetailsProperty
..}
    = UserProfileDetailsProperty {sso :: Maybe SsoUserProfileDetailsProperty
sso = SsoUserProfileDetailsProperty
-> Maybe SsoUserProfileDetailsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Sso" UserProfileDetailsProperty
SsoUserProfileDetailsProperty
newValue, Maybe IamUserProfileDetailsProperty
()
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
haddock_workaround_ :: ()
iam :: Maybe IamUserProfileDetailsProperty
..}