Lianja

Configure OAuth 1.0a Authentication for REST

Demonstrates Rest.SetAuthOAuth1, which associates an OAuth1 provider so Chilkat computes the OAuth 1.0/1.0a signature for each request. The second argument selects whether OAuth parameters are placed in the query string or the Authorization header.

Background. OAuth 1.0a signs each request using the consumer key/secret and the access token/secret. Chilkat generates the nonce, timestamp, and signature automatically for every request sent through the object.

Chilkat Lianja Downloads

Download Chilkat for Lianja

Lianja

llSuccess = .F.

loRest = createobject("CkRest")
llBTls = .T.
llBAutoReconnect = .T.
llSuccess = loRest.Connect("example.com",443,llBTls,llBAutoReconnect)
if (llSuccess = .F.) then
    ? loRest.LastErrorText
    release loRest
    return
endif

//  Configure OAuth 1.0a request signing.  Provide the consumer credentials and the access token
//  credentials; Chilkat computes the OAuth signature for each request.
loOauth1 = createobject("CkOAuth1")
//  Normally you would not hard-code secrets in source.  You should instead obtain them from an
//  interactive prompt, environment variable, or a secrets vault.
loOauth1.ConsumerKey = "CONSUMER_KEY"
loOauth1.ConsumerSecret = "CONSUMER_SECRET"
loOauth1.Token = "ACCESS_TOKEN"
loOauth1.TokenSecret = "ACCESS_TOKEN_SECRET"
loOauth1.SignatureMethod = "HMAC-SHA1"

//  The 2nd argument selects whether OAuth parameters are placed in the query string (.T.) or the
//  Authorization header (.F.).
llBUseQueryParams = .F.
llSuccess = loRest.SetAuthOAuth1(loOauth1,llBUseQueryParams)
if (llSuccess = .F.) then
    ? loRest.LastErrorText
    release loRest
    release loOauth1
    return
endif

lcResponseText = loRest.FullRequestNoBody("GET","/api/resource")
if (loRest.LastMethodSuccess = .F.) then
    ? loRest.LastErrorText
    release loRest
    release loOauth1
    return
endif

? lcResponseText


release loRest
release loOauth1