Network.OAuth2.OAuth2

Documentation

data OAuth2

Query Parameter Representation

TODO: add a base endpoint URI.

Constructors

OAuth2

Fields

oauthClientId :: ByteString

oauthClientSecret :: ByteString

oauthOAuthorizeEndpoint :: ByteString

oauthAccessTokenEndpoint :: ByteString

oauthCallback :: Maybe ByteString

oauthAccessToken :: Maybe ByteString

Instances

Eq OAuth2

Show OAuth2

data OAuthException

Simple Exception representation.

Constructors

OAuthException String

Instances

Eq OAuthException

Show OAuthException

Typeable OAuthException

Exception OAuthException

data AccessToken

The gained Access Token. Use Data.Aeson.decode to decode string to AccessToken.

Constructors

AccessToken

Fields

accessToken :: ByteString

Instances

Show AccessToken

FromJSON AccessToken

type QueryParams = [(ByteString, ByteString)]

type synonym of query parameters

type PostBody = [(ByteString, ByteString)]

type synonym of post body content

type URI = ByteString

type synonym of a URI

appendQueryParam :: URI -> QueryParams -> URI

Append query parameters

transform' :: [(a, Maybe b)] -> [(a, b)]

lift value in the Maybe and abonda Nothing

authorizationUrl :: OAuth2 -> URI

Prepare the authorization URL. Redirect to this URL asking for user interactive authentication.

accessTokenUrl

Arguments

:: OAuth2

-> ByteString

access code gained via authorization URL

-> (URI, PostBody)

access token request URL plus the request body.

Prepare access token URL and the request body query.

accessTokenUrl'

Arguments

:: OAuth2

-> ByteString

access code gained via authorization URL

-> Maybe ByteString

Grant Type

-> (URI, PostBody)

access token request URL plus the request body.

appendAccessToken

Arguments

:: URI

Base URI

-> OAuth2

OAuth has Authorized Access Token

-> URI

Combined Result

For GET method API.

accessTokenToParam :: ByteString -> [(ByteString, ByteString)]