Xbase++

Example: Http.SetOAuthRsaKey method

Demonstrates the SetOAuthRsaKey method. Xbase++

LOCAL nSuccess
LOCAL oPfx
LOCAL oPrivKey
LOCAL oHttp
LOCAL oResp

nSuccess := 0

oPfx := CreateObject("Chilkat.Pfx")
nSuccess := oPfx:LoadPfxFile("qa_data/pfx/MCD_Sandbox_chilkat_iccp_API_Keys/chilkat_iccp-sandbox.p12", "keystorepassword")
IF (nSuccess == 0)
    ? oPfx:LastErrorText
    oPfx:destroy()
    RETURN
ENDIF

oPrivKey := CreateObject("Chilkat.PrivateKey")
nSuccess := oPfx:PrivateKeyAt(0, oPrivKey)
IF (nSuccess == 0)
    ? oPfx:LastErrorText
    oPfx:destroy()
    oPrivKey:destroy()
    RETURN
ENDIF

oHttp := CreateObject("Chilkat.Http")

//  Use OAuth1.0a authentication.
oHttp:OAuth1 := 1

//  Use your own consumer key (this is not a valid consumer key)
oHttp:OAuthConsumerKey := "123abc"

oHttp:OAuthSigMethod := "RSA-SHA256"

nSuccess := oHttp:SetOAuthRsaKey(oPrivKey)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oPfx:destroy()
    oPrivKey:destroy()
    oHttp:destroy()
    RETURN
ENDIF

//  Tell Chilkat to automatically calculate and add the oauth_body_hash field when sending the request.
oHttp:OAuthBodyHash := 1

//  Send this request to an endpoint at chilkatsoft.com.  The purpose of this example is to show
//  how the OAuth1.0a Authorization header is computed and sent by Chilkat.
//  The chilkatsoft.com site itself doesn't do OAuth1.  It's just ignoring the Authorization header.
oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpStr("POST", "https://chilkatsoft.com/echo_request_body.asp", "<notUsed>123</notUsed>", "utf-8", "application/xml", oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oPfx:destroy()
    oPrivKey:destroy()
    oHttp:destroy()
    oResp:destroy()
    RETURN
ENDIF

//  Examine the request header we just sent..
? oHttp:LastHeader

//  Sample output:

//  POST /echo_request_body.asp HTTP/1.1
//  Host: chilkatsoft.com
//  Accept: */*
//  Accept-Encoding: gzip
//  Content-Type: application/xml
//  Content-Length: 22
//  Authorization: OAuth oauth_consumer_key="123abc", oauth_nonce="A2E91C3B53E0BD7FBF71F441336679E358DDCEEE", oauth_body_hash="a5kPTsDwUwmBjC0voNlAAvM6YoaRS5X7sTO49jl3/h8=", oauth_timestamp="1756324932", oauth_signature_method="RSA-SHA256", oauth_version="1.0", oauth_signature="*****"

oPfx:destroy()
oPrivKey:destroy()
oHttp:destroy()
oResp:destroy()