module Stratosphere.EKS.IdentityProviderConfig.OidcIdentityProviderConfigProperty (
        module Exports, OidcIdentityProviderConfigProperty(..),
        mkOidcIdentityProviderConfigProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.EKS.IdentityProviderConfig.RequiredClaimProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data OidcIdentityProviderConfigProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html>
    OidcIdentityProviderConfigProperty {OidcIdentityProviderConfigProperty -> ()
haddock_workaround_ :: (),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-clientid>
                                        OidcIdentityProviderConfigProperty -> Value Text
clientId :: (Value Prelude.Text),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-groupsclaim>
                                        OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsClaim :: (Prelude.Maybe (Value Prelude.Text)),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-groupsprefix>
                                        OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: (Prelude.Maybe (Value Prelude.Text)),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-issuerurl>
                                        OidcIdentityProviderConfigProperty -> Value Text
issuerUrl :: (Value Prelude.Text),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-requiredclaims>
                                        OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
requiredClaims :: (Prelude.Maybe [RequiredClaimProperty]),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-usernameclaim>
                                        OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernameClaim :: (Prelude.Maybe (Value Prelude.Text)),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-identityproviderconfig-oidcidentityproviderconfig.html#cfn-eks-identityproviderconfig-oidcidentityproviderconfig-usernameprefix>
                                        OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty -> Bool
(OidcIdentityProviderConfigProperty
 -> OidcIdentityProviderConfigProperty -> Bool)
-> (OidcIdentityProviderConfigProperty
    -> OidcIdentityProviderConfigProperty -> Bool)
-> Eq OidcIdentityProviderConfigProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty -> Bool
== :: OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty -> Bool
$c/= :: OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty -> Bool
/= :: OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty -> Bool
Prelude.Eq, Int -> OidcIdentityProviderConfigProperty -> ShowS
[OidcIdentityProviderConfigProperty] -> ShowS
OidcIdentityProviderConfigProperty -> String
(Int -> OidcIdentityProviderConfigProperty -> ShowS)
-> (OidcIdentityProviderConfigProperty -> String)
-> ([OidcIdentityProviderConfigProperty] -> ShowS)
-> Show OidcIdentityProviderConfigProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> OidcIdentityProviderConfigProperty -> ShowS
showsPrec :: Int -> OidcIdentityProviderConfigProperty -> ShowS
$cshow :: OidcIdentityProviderConfigProperty -> String
show :: OidcIdentityProviderConfigProperty -> String
$cshowList :: [OidcIdentityProviderConfigProperty] -> ShowS
showList :: [OidcIdentityProviderConfigProperty] -> ShowS
Prelude.Show)
mkOidcIdentityProviderConfigProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> OidcIdentityProviderConfigProperty
mkOidcIdentityProviderConfigProperty :: Value Text -> Value Text -> OidcIdentityProviderConfigProperty
mkOidcIdentityProviderConfigProperty Value Text
clientId Value Text
issuerUrl
  = OidcIdentityProviderConfigProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), clientId :: Value Text
clientId = Value Text
clientId,
       issuerUrl :: Value Text
issuerUrl = Value Text
issuerUrl, groupsClaim :: Maybe (Value Text)
groupsClaim = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       groupsPrefix :: Maybe (Value Text)
groupsPrefix = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, requiredClaims :: Maybe [RequiredClaimProperty]
requiredClaims = Maybe [RequiredClaimProperty]
forall a. Maybe a
Prelude.Nothing,
       usernameClaim :: Maybe (Value Text)
usernameClaim = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, usernamePrefix :: Maybe (Value Text)
usernamePrefix = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties OidcIdentityProviderConfigProperty where
  toResourceProperties :: OidcIdentityProviderConfigProperty -> ResourceProperties
toResourceProperties OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::EKS::IdentityProviderConfig.OidcIdentityProviderConfig",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ClientId" 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
clientId, Key
"IssuerUrl" 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
issuerUrl]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [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..=) Key
"GroupsClaim" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
groupsClaim,
                               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..=) Key
"GroupsPrefix" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
groupsPrefix,
                               Key -> [RequiredClaimProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequiredClaims" ([RequiredClaimProperty] -> (Key, Value))
-> Maybe [RequiredClaimProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [RequiredClaimProperty]
requiredClaims,
                               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..=) Key
"UsernameClaim" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
usernameClaim,
                               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..=) Key
"UsernamePrefix" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
usernamePrefix]))}
instance JSON.ToJSON OidcIdentityProviderConfigProperty where
  toJSON :: OidcIdentityProviderConfigProperty -> Value
toJSON OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ClientId" 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
clientId, Key
"IssuerUrl" 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
issuerUrl]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [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..=) Key
"GroupsClaim" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
groupsClaim,
                  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..=) Key
"GroupsPrefix" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
groupsPrefix,
                  Key -> [RequiredClaimProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequiredClaims" ([RequiredClaimProperty] -> (Key, Value))
-> Maybe [RequiredClaimProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [RequiredClaimProperty]
requiredClaims,
                  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..=) Key
"UsernameClaim" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
usernameClaim,
                  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..=) Key
"UsernamePrefix" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
usernamePrefix])))
instance Property "ClientId" OidcIdentityProviderConfigProperty where
  type PropertyType "ClientId" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "ClientId" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "ClientId" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty {clientId :: Value Text
clientId = PropertyType "ClientId" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
instance Property "GroupsClaim" OidcIdentityProviderConfigProperty where
  type PropertyType "GroupsClaim" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "GroupsClaim" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "GroupsClaim" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty
        {groupsClaim :: Maybe (Value Text)
groupsClaim = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GroupsClaim" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
instance Property "GroupsPrefix" OidcIdentityProviderConfigProperty where
  type PropertyType "GroupsPrefix" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "GroupsPrefix" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "GroupsPrefix" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty
        {groupsPrefix :: Maybe (Value Text)
groupsPrefix = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GroupsPrefix" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
instance Property "IssuerUrl" OidcIdentityProviderConfigProperty where
  type PropertyType "IssuerUrl" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "IssuerUrl" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "IssuerUrl" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty {issuerUrl :: Value Text
issuerUrl = PropertyType "IssuerUrl" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
instance Property "RequiredClaims" OidcIdentityProviderConfigProperty where
  type PropertyType "RequiredClaims" OidcIdentityProviderConfigProperty = [RequiredClaimProperty]
  set :: PropertyType "RequiredClaims" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "RequiredClaims" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty
        {requiredClaims :: Maybe [RequiredClaimProperty]
requiredClaims = [RequiredClaimProperty] -> Maybe [RequiredClaimProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [RequiredClaimProperty]
PropertyType "RequiredClaims" OidcIdentityProviderConfigProperty
newValue, Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
instance Property "UsernameClaim" OidcIdentityProviderConfigProperty where
  type PropertyType "UsernameClaim" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "UsernameClaim" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "UsernameClaim" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty
        {usernameClaim :: Maybe (Value Text)
usernameClaim = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "UsernameClaim" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernamePrefix :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernamePrefix :: Maybe (Value Text)
..}
instance Property "UsernamePrefix" OidcIdentityProviderConfigProperty where
  type PropertyType "UsernamePrefix" OidcIdentityProviderConfigProperty = Value Prelude.Text
  set :: PropertyType "UsernamePrefix" OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
-> OidcIdentityProviderConfigProperty
set PropertyType "UsernamePrefix" OidcIdentityProviderConfigProperty
newValue OidcIdentityProviderConfigProperty {Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: OidcIdentityProviderConfigProperty -> ()
clientId :: OidcIdentityProviderConfigProperty -> Value Text
groupsClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
groupsPrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
issuerUrl :: OidcIdentityProviderConfigProperty -> Value Text
requiredClaims :: OidcIdentityProviderConfigProperty -> Maybe [RequiredClaimProperty]
usernameClaim :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
usernamePrefix :: OidcIdentityProviderConfigProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
usernamePrefix :: Maybe (Value Text)
..}
    = OidcIdentityProviderConfigProperty
        {usernamePrefix :: Maybe (Value Text)
usernamePrefix = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "UsernamePrefix" OidcIdentityProviderConfigProperty
Value Text
newValue, Maybe [RequiredClaimProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
haddock_workaround_ :: ()
clientId :: Value Text
groupsClaim :: Maybe (Value Text)
groupsPrefix :: Maybe (Value Text)
issuerUrl :: Value Text
requiredClaims :: Maybe [RequiredClaimProperty]
usernameClaim :: Maybe (Value Text)
..}