hoauth2-providers-tutorial-0.1: tutorial for hoauth2-providers module

Safe Haskell	Safe-Inferred
Language	Haskell2010

HOAuth2ProvidersTutorial

Contents

Configuration
Web server
Utilities

Synopsis

testAuth0App :: IdpApplication 'AuthorizationCode Auth0
testAuth0Idp :: Idp Auth0
testGoogleIdp :: Idp Google
testGoogleApp :: IdpApplication 'AuthorizationCode Google
randomStateValue :: Text
data DemoUser = DemoUser {
- name :: Text
- email :: Maybe Text
}
app :: IO ()
indexH :: IORef (Maybe DemoUser) -> ActionM ()
loginAuth0H :: ActionM ()
loginGoogleH :: ActionM ()
logoutH :: IORef (Maybe DemoUser) -> ActionM ()
callbackH :: IORef (Maybe DemoUser) -> ActionM ()
handleAuth0Callback :: ExchangeToken -> ExceptT Text IO DemoUser
handleGoogleCallback :: ExchangeToken -> ExceptT Text IO DemoUser
uriToText :: URI -> Text
bslToText :: ByteString -> Text
paramValue :: Text -> [Param] -> Either Text Text
excepttToActionM :: Show a => ExceptT Text IO a -> ActionM a
oauth2ErrorToText :: OAuth2Error Errors -> Text

Configuration

testAuth0App :: IdpApplication 'AuthorizationCode Auth0 Source #

testAuth0Idp :: Idp Auth0 Source #

testGoogleIdp :: Idp Google Source #

testGoogleApp :: IdpApplication 'AuthorizationCode Google Source #

randomStateValue :: Text Source #

You'll need to find out an better way to create state which is recommended in https://www.rfc-editor.org/rfc/rfc6749#section-10.12

Web server

data DemoUser Source #

Constructors

DemoUser
Fields name :: Text email :: Maybe Text

Instances

Instances details

Show DemoUser Source #
Instance details Defined in HOAuth2ProvidersTutorial Methods showsPrec :: Int -> DemoUser -> ShowS # show :: DemoUser -> String # showList :: [DemoUser] -> ShowS #
Eq DemoUser Source #
Instance details Defined in HOAuth2ProvidersTutorial Methods (==) :: DemoUser -> DemoUser -> Bool # (/=) :: DemoUser -> DemoUser -> Bool #

app :: IO () Source #

The scotty application

indexH :: IORef (Maybe DemoUser) -> ActionM () Source #

/ endpoint handler

loginAuth0H :: ActionM () Source #

loginauth0 endpoint handler

loginGoogleH :: ActionM () Source #

logingoogle endpoint handler

logoutH :: IORef (Maybe DemoUser) -> ActionM () Source #

/logout endpoint handler

callbackH :: IORef (Maybe DemoUser) -> ActionM () Source #

oauth2callback endpoint handler

handleAuth0Callback :: ExchangeToken -> ExceptT Text IO DemoUser Source #

handleGoogleCallback :: ExchangeToken -> ExceptT Text IO DemoUser Source #

Utilities

uriToText :: URI -> Text Source #

bslToText :: ByteString -> Text Source #

paramValue Source #

Arguments

:: Text	Parameter key
-> [Param]	All parameters
-> Either Text Text

excepttToActionM :: Show a => ExceptT Text IO a -> ActionM a Source #

Lift ExceptT to ActionM which is basically the handler Monad in Scotty.

oauth2ErrorToText :: OAuth2Error Errors -> Text Source #