(PureBasic) Duo Auth API - Check
The /check endpoint can be called to verify that the Auth API integration and secret keys are valid, and that the signature is being generated properly.
Note: This example requires Chilkat v9.5.0.89 or greater. For more information, see https://duo.com/docs/authapi#/check
IncludeFile "CkHttp.pb"
Procedure ChilkatExample()
success.i = 0
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
integrationKey.s = "DIMS3V5QDVG9J9ABRXC4"
secretKey.s = "HWVQ46nubLBxhnRlKddTltWIi3hL0fIQF2qTvLab"
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkHttp::setCkAccept(http, "application/json")
; Use your own hostname here:
url.s = "https://api-a03782e1.duosecurity.com/auth/v2/check"
CkHttp::setCkLogin(http, integrationKey)
CkHttp::setCkPassword(http, secretKey)
jsonStr.s = CkHttp::ckQuickGetStr(http,url)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
ProcedureReturn
EndIf
Debug "status code = " + Str(CkHttp::ckLastStatus(http))
Debug jsonStr
; Sample successful output:
; status code = 200
; {"response": {"time": 1632358829}, "stat": "OK"}
CkHttp::ckDispose(http)
ProcedureReturn
EndProcedure
|