DataFlex

Generate OAuth 1.0 Signature

Demonstrates how to generate an OAuth 1.0 signature. DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoOauth
    String sTemp1

    Move False To iSuccess

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    Move False To iSuccess

    Get Create (RefClass(cComChilkatOAuth1)) To hoOauth
    If (Not(IsComObjectCreated(hoOauth))) Begin
        Send CreateComObject of hoOauth
    End

    // Set input parameters:
    Set ComOauthVersion Of hoOauth To "1.0"
    Set ComOauthMethod Of hoOauth To "GET"
    Set ComOauthUrl Of hoOauth To "http://echo.lab.madgex.com/echo.ashx"
    Set ComConsumerKey Of hoOauth To "key"
    Set ComConsumerSecret Of hoOauth To "secret"
    Set ComToken Of hoOauth To "accesskey"
    Set ComTokenSecret Of hoOauth To "accesssecret"
    Set ComNonce Of hoOauth To "01020304050607080102030405060708"
    Set ComTimestamp Of hoOauth To "1441659763"
    // Can be "HMAC-SHA1", "HMAC-SHA256", "RSA-SHA1", or "RSA-SHA2"
    Set ComSignatureMethod Of hoOauth To "HMAC-SHA256"

    Get ComGenerate Of hoOauth To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoOauth To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Examine the various outputs:

    Get ComQueryString Of hoOauth To sTemp1
    Showln sTemp1
    Get ComBaseString Of hoOauth To sTemp1
    Showln sTemp1
    Get ComHmacKey Of hoOauth To sTemp1
    Showln sTemp1
    Get ComSignature Of hoOauth To sTemp1
    Showln sTemp1
    Get ComEncodedSignature Of hoOauth To sTemp1
    Showln sTemp1
    Get ComAuthorizationHeader Of hoOauth To sTemp1
    Showln sTemp1
    Get ComGeneratedUrl Of hoOauth To sTemp1
    Showln sTemp1


End_Procedure