Skip to content

HORIZON HASKELL Docs lts/ghc-10.0.x8fef28d2026-11-02Search packagesCtrl K

Theme: |

GHC 10.0.0.20260917 · lts/ghc-10.0.x · 8fef28d · 2026-11-02

Modulehoauth2-providers-0.9.2Haskell2010

Network.OAuth2.Provider.Google

Google build oauth2 web server application

Contents

Authorization Code flow
Service Account
Service Account
IDP

Synopsis

value sampleGoogleAuthorizationCodeApp
value sampleServiceAccountApp
data GoogleServiceAccountKey
value mkJwt
value readPemRsaKey
value fetchUserInfo
value defaultGoogleIdp
data GoogleUser

Packagehoauth2-providers-0.9.2
Exports8
LanguageHaskell2010
LicenceMIT
SourceGoogle.hs

Authorization Code flow

valuesampleGoogleAuthorizationCodeApp :: AuthorizationCodeApplication

Service Account

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-pUC8lagufKBUfCiJnmmZv" '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

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

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-pUC8lagufKBUfCiJnmmZv" '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