Network.OIDC.WellKnown

Documentation

data OpenIDConfiguration

Slim OpenID Configuration TODO: could add more fields to be complete.

Constructors

OpenIDConfiguration

Fields

• issuer :: Text
• authorizationEndpoint :: Text
• tokenEndpoint :: Text
• userinfoEndpoint :: Text
• jwksUri :: Text

Instances

FromJSON OpenIDConfiguration

Defined in Network.OIDC.WellKnown

Methods

parseJSON :: Value -> Parser OpenIDConfiguration

parseJSONList :: Value -> Parser [OpenIDConfiguration]

Generic OpenIDConfiguration

Defined in Network.OIDC.WellKnown

Associated Types

type Rep OpenIDConfiguration :: Type -> Type

Methods

from :: OpenIDConfiguration -> Rep OpenIDConfiguration x

to :: Rep OpenIDConfiguration x -> OpenIDConfiguration

type Rep OpenIDConfiguration

Defined in Network.OIDC.WellKnown

type Rep OpenIDConfiguration = D1 ('MetaData "OpenIDConfiguration" "Network.OIDC.WellKnown" "hoauth2-providers-0.2-4pqA01ULTYqIJnBsLAcuNL" 'False) (C1 ('MetaCons "OpenIDConfiguration" 'PrefixI 'True) ((S1 ('MetaSel ('Just "issuer") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "authorizationEndpoint") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "tokenEndpoint") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "userinfoEndpoint") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "jwksUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))))

data OpenIDConfigurationUris

Constructors

OpenIDConfigurationUris

Fields

• authorizationUri :: URI
• tokenUri :: URI
• userinfoUri :: URI
• jwksUri :: URI

Instances

Generic OpenIDConfigurationUris

Defined in Network.OIDC.WellKnown

Associated Types

type Rep OpenIDConfigurationUris :: Type -> Type

Methods

from :: OpenIDConfigurationUris -> Rep OpenIDConfigurationUris x

to :: Rep OpenIDConfigurationUris x -> OpenIDConfigurationUris

type Rep OpenIDConfigurationUris

Defined in Network.OIDC.WellKnown

type Rep OpenIDConfigurationUris = D1 ('MetaData "OpenIDConfigurationUris" "Network.OIDC.WellKnown" "hoauth2-providers-0.2-4pqA01ULTYqIJnBsLAcuNL" 'False) (C1 ('MetaCons "OpenIDConfigurationUris" 'PrefixI 'True) ((S1 ('MetaSel ('Just "authorizationUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 URI) :*: S1 ('MetaSel ('Just "tokenUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 URI)) :*: (S1 ('MetaSel ('Just "userinfoUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 URI) :*: S1 ('MetaSel ('Just "jwksUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 URI))))

wellknownUrl :: Text

fetchWellKnown

Arguments

:: MonadIO m

=> Text

Domain

-> ExceptT Text m OpenIDConfiguration

fetchWellKnownUris :: MonadIO m => Text -> ExceptT Text m OpenIDConfigurationUris

handleWellKnownResponse :: Response ByteString -> Either Text OpenIDConfiguration