Visual FoxPro
Visual FoxPro
Calculate a X_RISKIFIED_HMAC_SHA256 for riskified.com API Calls
See more REST Misc Examples
Demonstrates how to calculate the value for the X_RISKIFIED_HMAC_SHA256 header for riskified.com HTTP requests (REST API calls).Chilkat Visual FoxPro Downloads
LOCAL loJson
LOCAL lcJsonBody
LOCAL loCrypt
LOCAL lcHmacHexStr
LOCAL loSbHmacHex
* This example requires the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.
* Create the JSON that is to be the body of the HTTP request.
* The JSON created by this code is shown at the bottom of this example.
*
* The JSON Code Generator at http://tools.chilkat.io/ can be used
* to generate the following code from sample JSON.
loJson = CreateObject('Chilkat.JsonObject')
loJson.UpdateNull("order.cancel_reason")
loJson.UpdateNull("order.cancelled_at")
loJson.UpdateString("order.cart_token","68778783ad298f1c80c3bafcddeea02f")
loJson.UpdateNull("order.closed_at")
loJson.UpdateString("order.created_at","2008-01-10T11:00:00-05:00")
loJson.UpdateString("order.currency","USD")
loJson.UpdateString("order.email","bob.norman@hostmail.com")
loJson.UpdateString("order.gateway","authorize_net")
loJson.UpdateNumber("order.id","450789469")
loJson.UpdateString("order.total_discounts","0.00")
loJson.UpdateString("order.total_price","409.94")
loJson.UpdateString("order.updated_at","2008-01-10T11:00:00-05:00")
loJson.UpdateString("order.note","some note made by the shop’s stuff member")
loJson.UpdateNull("order.browser_ip")
loJson.UpdateString("order.discount_codes[0].amount","10.00")
loJson.UpdateString("order.discount_codes[0].code","TENOFF")
loJson.UpdateString("order.line_items[0].title","IPod Nano - 8gb - green")
loJson.UpdateNumber("order.line_items[0].price","199.00")
loJson.UpdateNumber("order.line_items[0].product_id","632910392")
loJson.UpdateNumber("order.line_items[0].quantity","1")
loJson.UpdateString("order.line_items[0].sku","IPOD2008GREEN")
loJson.UpdateString("order.shipping_lines[0].code","Free Shipping")
loJson.UpdateString("order.shipping_lines[0].price","0.00")
loJson.UpdateString("order.shipping_lines[0].title","Free Shipping")
loJson.UpdateNull("order.payment_details.avs_result_code")
loJson.UpdateNull("order.payment_details.credit_card_bin")
loJson.UpdateString("order.payment_details.credit_card_company","Visa")
loJson.UpdateString("order.payment_details.credit_card_number","XXXX-XXXX-XXXX-4242")
loJson.UpdateNull("order.payment_details.cvv_result_code")
loJson.UpdateString("order.payment_details.authorization_id","RK346IK124")
loJson.UpdateString("order.billing_address.address1","Chestnut Street 92")
loJson.UpdateString("order.billing_address.address2","")
loJson.UpdateString("order.billing_address.city","Louisville")
loJson.UpdateNull("order.billing_address.company")
loJson.UpdateString("order.billing_address.country","United States")
loJson.UpdateString("order.billing_address.country_code","US")
loJson.UpdateString("order.billing_address.first_name","Bob")
loJson.UpdateString("order.billing_address.last_name","Norman")
loJson.UpdateString("order.billing_address.name","Bob Norman")
loJson.UpdateString("order.billing_address.phone","555-625-1199")
loJson.UpdateString("order.billing_address.province","Kentucky")
loJson.UpdateString("order.billing_address.province_code","KY")
loJson.UpdateString("order.billing_address.zip","40202")
loJson.UpdateString("order.shipping_address.address1","Chestnut Street 92")
loJson.UpdateString("order.shipping_address.address2","")
loJson.UpdateString("order.shipping_address.city","Louisville")
loJson.UpdateNull("order.shipping_address.company")
loJson.UpdateString("order.shipping_address.country","United States")
loJson.UpdateString("order.shipping_address.country_code","US")
loJson.UpdateString("order.shipping_address.first_name","Bob")
loJson.UpdateString("order.shipping_address.last_name","Norman")
loJson.UpdateString("order.shipping_address.name","Bob Norman")
loJson.UpdateString("order.shipping_address.phone","555-625-1199")
loJson.UpdateString("order.shipping_address.province","Kentucky")
loJson.UpdateString("order.shipping_address.province_code","KY")
loJson.UpdateString("order.shipping_address.zip","40202")
loJson.UpdateString("order.customer.created_at","2013-04-23T13:36:50-04:00")
loJson.UpdateString("order.customer.email","bob.norman@hostmail.com")
loJson.UpdateString("order.customer.first_name","Bob")
loJson.UpdateNumber("order.customer.id","207119551")
loJson.UpdateString("order.customer.last_name","Norman")
loJson.UpdateNull("order.customer.note")
loJson.UpdateNumber("order.customer.orders_count","0")
loJson.UpdateBool("order.customer.verified_email",1)
* Emit the JSON in compact format..
loJson.EmitCompact = 1
* Get the JSON that will be HMAC'd and will also be the contents of the HTTP request body.
lcJsonBody = loJson.Emit()
loCrypt = CreateObject('Chilkat.Crypt2')
loCrypt.EncodingMode = "hex"
loCrypt.HashAlgorithm = "sha256"
loCrypt.MacAlgorithm = "hmac"
loCrypt.SetMacKeyString("55fe0f4d4023bbdfbc124cabd88bf9bb")
lcHmacHexStr = loCrypt.MacStringENC(lcJsonBody)
IF (loCrypt.LastMethodSuccess <> 1) THEN
? loCrypt.LastErrorText
RELEASE loJson
RELEASE loCrypt
CANCEL
ENDIF
* We need a lowercase hmacHexStr...
loSbHmacHex = CreateObject('Chilkat.StringBuilder')
loSbHmacHex.Append(lcHmacHexStr)
loSbHmacHex.ToLowercase()
lcHmacHexStr = loSbHmacHex.GetAsString()
? "The value of the X_RISKIFIED_HMAC_SHA256 should be: " + lcHmacHexStr
* This example is only to show the HMAC SHA256 calculation.
* See examples of sending REST requests to riskified.com at http://rest-examples.chilkat.io/riskified/default.cshtml
* ----------------------------------------------
* This is the JSON created by the above code..
* {
* "order": {
* "cancel_reason": null,
* "cancelled_at": null,
* "cart_token": "68778783ad298f1c80c3bafcddeea02f",
* "closed_at": null,
* "created_at": "2008-01-10T11:00:00-05:00",
* "currency": "USD",
* "email": "bob.norman@hostmail.com",
* "gateway": "authorize_net",
* "id": 450789469,
* "total_discounts": "0.00",
* "total_price": "409.94",
* "updated_at": "2008-01-10T11:00:00-05:00",
* "note": "some note made by the shop’s stuff member",
* "browser_ip": null,
* "discount_codes": [
* {
* "amount": "10.00",
* "code": "TENOFF"
* }
* ],
* "line_items": [
* {
* "title": "IPod Nano - 8gb - green",
* "price": 199.00,
* "product_id": 632910392,
* "quantity": 1,
* "sku": "IPOD2008GREEN"
* }
* ],
* "shipping_lines": [
* {
* "code": "Free Shipping",
* "price": "0.00",
* "title": "Free Shipping"
* }
* ],
* "payment_details": {
* "avs_result_code": null,
* "credit_card_bin": null,
* "credit_card_company": "Visa",
* "credit_card_number": "XXXX-XXXX-XXXX-4242",
* "cvv_result_code": null,
* "authorization_id": "RK346IK124"
* },
* "billing_address": {
* "address1": "Chestnut Street 92",
* "address2": "",
* "city": "Louisville",
* "company": null,
* "country": "United States",
* "country_code": "US",
* "first_name": "Bob",
* "last_name": "Norman",
* "name": "Bob Norman",
* "phone": "555-625-1199",
* "province": "Kentucky",
* "province_code": "KY",
* "zip": "40202"
* },
* "shipping_address": {
* "address1": "Chestnut Street 92",
* "address2": "",
* "city": "Louisville",
* "company": null,
* "country": "United States",
* "country_code": "US",
* "first_name": "Bob",
* "last_name": "Norman",
* "name": "Bob Norman",
* "phone": "555-625-1199",
* "province": "Kentucky",
* "province_code": "KY",
* "zip": "40202"
* },
* "customer": {
* "created_at": "2013-04-23T13:36:50-04:00",
* "email": "bob.norman@hostmail.com",
* "first_name": "Bob",
* "id": 207119551,
* "last_name": "Norman",
* "note": null,
* "orders_count": 0,
* "verified_email": true
* }
* }
* }
RELEASE loJson
RELEASE loCrypt
RELEASE loSbHmacHex