Skip to content

HORIZON HASKELL Docs lts/ghc-10.0.xfc4e5982026-10-11Search names, modules, packages, or :: a typeCtrl K

GHC 10.0.0.20260917 · lts/ghc-10.0.x · fc4e598 · 2026-10-11

Modulehoauth2-providers-0.9.2Haskell2010

Network.OAuth2.Provider.Google

Google build oauth2 web server application

2 types
6 values

Packagehoauth2-providers-0.9.2
Exports8
LanguageHaskell2010
LicenceMIT
SourceGoogle.hs

Authorization Code flow

1 declaration

valuesampleGoogleAuthorizationCodeApp :: AuthorizationCodeApplication

Service Account

2 declarations

valuesampleServiceAccountApp :: Jwt -> JwtBearerApplication

datadata GoogleServiceAccountKey

Service account key (in JSON format) that download from google

Constructors

GoogleServiceAccountKey
- privateKey :: String
- clientEmail :: Text
- projectId :: Text
- privateKeyId :: Text
- clientId :: Text
- authUri :: Text
- tokenUri :: Text
- authProviderX509CertUrl :: Text
- clientX509CertUrl :: Text

Instances3Generic, FromJSON, Rep

Generic GoogleServiceAccountKeyDefined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google
FromJSON GoogleServiceAccountKeyDefined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google
type Rep GoogleServiceAccountKey = D1 ('MetaData "GoogleServiceAccountKey" "Network.OAuth2.Provider.Google" "hoauth2-providers-0.9.2-DCqOYeV5sQY765mpJ0ylF0" 'False) (C1 ('MetaCons "GoogleServiceAccountKey" 'PrefixI 'True) (((S1 ('MetaSel ('Just "privateKey") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 String) :*: S1 ('MetaSel ('Just "clientEmail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "projectId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "privateKeyId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :*: ((S1 ('MetaSel ('Just "clientId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "authUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "tokenUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "authProviderX509CertUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "clientX509CertUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))))Defined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google

Service Account

2 declarations

valuemkJwt

:: PrivateKey
-> Text
Private key
-> Maybe Text
Issuer
-> Set Scope
impersonate user
-> Idp 'Google
Scope
-> IO (Either String Jwt)

valuereadPemRsaKey

:: String
PEM content
-> IO (Either String PrivateKey)

Read private RSA Key in PEM format

IDP

3 declarations

valuefetchUserInfo

:: (MonadIO m, HasUserInfoRequest a, FromJSON b)
=> IdpApplication i a
-> Manager
-> AccessToken
-> ExceptT ByteString m b

valuedefaultGoogleIdp :: Idp 'Google

datadata GoogleUser

Constructors

GoogleUser
- name :: Text
- id :: Text
- email :: Text

Instances4Show, Generic, FromJSON, Rep

Show GoogleUserDefined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google
Generic GoogleUserDefined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google
FromJSON GoogleUserDefined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google
type Rep GoogleUser = D1 ('MetaData "GoogleUser" "Network.OAuth2.Provider.Google" "hoauth2-providers-0.9.2-DCqOYeV5sQY765mpJ0ylF0" 'False) (C1 ('MetaCons "GoogleUser" 'PrefixI 'True) (S1 ('MetaSel ('Just "name") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "email") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))Defined in hoauth2-providers-0.9.2 · Network.OAuth2.Provider.Google