Network.OAuth.OAuth2.TokenRequest

Bindings Access Token and Refresh Token part of The OAuth 2.0 Authorization Framework RFC6749 https://www.rfc-editor.org/rfc/rfc6749

Token Request Errors

data TokenRequestError

Constructors

TokenRequestError

Fields

• error :: TokenRequestErrorCode
• errorDescription :: Maybe Text
• errorUri :: Maybe (URIRef Absolute)

Instances

FromJSON TokenRequestError

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

parseJSON :: Value -> Parser TokenRequestError

parseJSONList :: Value -> Parser [TokenRequestError]

Generic TokenRequestError

Defined in Network.OAuth.OAuth2.TokenRequest

Associated Types

type Rep TokenRequestError :: Type -> Type

Methods

from :: TokenRequestError -> Rep TokenRequestError x

to :: Rep TokenRequestError x -> TokenRequestError

Show TokenRequestError

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

showsPrec :: Int -> TokenRequestError -> ShowS

show :: TokenRequestError -> String

showList :: [TokenRequestError] -> ShowS

Eq TokenRequestError

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

(==) :: TokenRequestError -> TokenRequestError -> Bool

(/=) :: TokenRequestError -> TokenRequestError -> Bool

type Rep TokenRequestError

Defined in Network.OAuth.OAuth2.TokenRequest

type Rep TokenRequestError = D1 ('MetaData "TokenRequestError" "Network.OAuth.OAuth2.TokenRequest" "hoauth2-2.8.0-8EIsuvAkgQw6c6BKTAT16v" 'False) (C1 ('MetaCons "TokenRequestError" 'PrefixI 'True) (S1 ('MetaSel ('Just "error") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TokenRequestErrorCode) :*: (S1 ('MetaSel ('Just "errorDescription") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "errorUri") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (URIRef Absolute))))))

data TokenRequestErrorCode

Token Error Responses https://tools.ietf.org/html/rfc6749#section-5.2

Constructors

InvalidRequest

InvalidClient

InvalidGrant

UnauthorizedClient

UnsupportedGrantType

InvalidScope

UnknownErrorCode Text

Instances

FromJSON TokenRequestErrorCode

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

parseJSON :: Value -> Parser TokenRequestErrorCode

parseJSONList :: Value -> Parser [TokenRequestErrorCode]

Show TokenRequestErrorCode

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

showsPrec :: Int -> TokenRequestErrorCode -> ShowS

show :: TokenRequestErrorCode -> String

showList :: [TokenRequestErrorCode] -> ShowS

Eq TokenRequestErrorCode

Defined in Network.OAuth.OAuth2.TokenRequest

Methods

(==) :: TokenRequestErrorCode -> TokenRequestErrorCode -> Bool

(/=) :: TokenRequestErrorCode -> TokenRequestErrorCode -> Bool

parseTokeRequestError :: ByteString -> TokenRequestError

URL

accessTokenUrl

Arguments

:: OAuth2

-> ExchangeToken

access code gained via authorization URL

-> (URI, PostBody)

access token request URL plus the request body.

Prepare the URL and the request body query for fetching an access token.

refreshAccessTokenUrl

Arguments

:: OAuth2

-> RefreshToken

Refresh Token gained via authorization URL

-> (URI, PostBody)

Refresh Token request URL plus the request body.

Obtain a new access token by sending a Refresh Token to the Authorization server.

Token management

fetchAccessToken

Arguments

:: MonadIO m

=> Manager

HTTP connection manager

-> OAuth2

OAuth Data

-> ExchangeToken

OAuth2 Code

-> ExceptT TokenRequestError m OAuth2Token

Access Token

Exchange code for an Access Token with authenticate in request header.

fetchAccessToken2

Arguments

:: MonadIO m

=> Manager

HTTP connection manager

-> OAuth2

OAuth Data

-> ExchangeToken

Authorization Code

-> ExceptT TokenRequestError m OAuth2Token

Access Token

Deprecated: use fetchAccessTokenWithAuthMethod

fetchAccessTokenInternal

Arguments

:: MonadIO m

=> ClientAuthenticationMethod

-> Manager

HTTP connection manager

-> OAuth2

OAuth Data

-> ExchangeToken

Authorization Code

-> ExceptT TokenRequestError m OAuth2Token

Access Token

Deprecated: use fetchAccessTokenWithAuthMethod

fetchAccessTokenWithAuthMethod

Arguments

:: MonadIO m

=> ClientAuthenticationMethod

-> Manager

HTTP connection manager

-> OAuth2

OAuth Data

-> ExchangeToken

Authorization Code

-> ExceptT TokenRequestError m OAuth2Token

Access Token

Exchange code for an Access Token

OAuth2 spec allows credential (client_id, client_secret) to be sent either in the header (a.k.a ClientSecretBasic). or as form/url params (a.k.a ClientSecretPost).

The OAuth provider can choose to implement only one, or both. Look for API document from the OAuth provider you're dealing with. If you're uncertain, try fetchAccessToken which sends credential in authorization http header, which is common case.

Since: 2.6.0

refreshAccessToken

Arguments

:: MonadIO m

=> Manager

HTTP connection manager.

-> OAuth2

OAuth context

-> RefreshToken

Refresh Token gained after authorization

-> ExceptT TokenRequestError m OAuth2Token

Fetch a new AccessToken using the Refresh Token with authentication in request header.

refreshAccessToken2

Arguments

:: MonadIO m

=> Manager

HTTP connection manager.

-> OAuth2

OAuth context

-> RefreshToken

Refresh Token gained after authorization

-> ExceptT TokenRequestError m OAuth2Token

Deprecated: use refreshAccessTokenWithAuthMethod

refreshAccessTokenInternal

Arguments

:: MonadIO m

=> ClientAuthenticationMethod

-> Manager

HTTP connection manager.

-> OAuth2

OAuth context

-> RefreshToken

Refresh Token gained after authorization

-> ExceptT TokenRequestError m OAuth2Token

Deprecated: use refreshAccessTokenWithAuthMethod

refreshAccessTokenWithAuthMethod

Arguments

:: MonadIO m

=> ClientAuthenticationMethod

-> Manager

HTTP connection manager.

-> OAuth2

OAuth context

-> RefreshToken

Refresh Token gained after authorization

-> ExceptT TokenRequestError m OAuth2Token

Fetch a new AccessToken using the Refresh Token.

OAuth2 spec allows credential (client_id, client_secret) to be sent either in the header (a.k.a ClientSecretBasic). or as form/url params (a.k.a ClientSecretPost).

The OAuth provider can choose to implement only one, or both. Look for API document from the OAuth provider you're dealing with. If you're uncertain, try refreshAccessToken which sends credential in authorization http header, which is common case.

Since: 2.6.0

Utilies

doJSONPostRequest

Arguments

:: (MonadIO m, FromJSON a)

=> Manager

HTTP connection manager.

-> OAuth2

OAuth options

-> URI

The URL

-> PostBody

request body

-> ExceptT TokenRequestError m a

Response as JSON

Conduct post request and return response as JSON.

doSimplePostRequest

Arguments

:: MonadIO m

=> Manager

HTTP connection manager.

-> OAuth2

OAuth options

-> URI

URL

-> PostBody

Request body.

-> ExceptT TokenRequestError m ByteString

Response as ByteString

Conduct post request.

handleOAuth2TokenResponse :: Response ByteString -> Either TokenRequestError ByteString

Gets response body from a Response if 200 otherwise assume OAuth2Error

parseResponseFlexible :: FromJSON a => ByteString -> Either TokenRequestError a

Try to parses response as JSON, if failed, try to parse as like query string.

parseResponseString :: FromJSON a => ByteString -> Either TokenRequestError a

Parses the response that contains not JSON but a Query String

addDefaultRequestHeaders :: Request -> Request

Set several header values: + userAgennt : hoauth2 + accept : `application/json`

clientSecretPost :: OAuth2 -> PostBody

Add Credential (client_id, client_secret) to the request post body.