(Tcl) URL Signing for Google Maps API
Demonstrates how to sign a URL for the Google Maps API.
load ./chilkat.dll
# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
set crypt [new_CkCrypt2]
# The output will be modified Base64.
# Modified Base64 for URLs replaces the '+' and '/' characters
# of standard Base64 with '-' and '_' respectively, so that these
# Base64 signatures no longer need to be URL-encoded.
CkCrypt2_put_EncodingMode $crypt "modBase64"
# Set the hash algorithm to sha-1
CkCrypt2_put_HashAlgorithm $crypt "sha-1"
# Set the HMAC key (this is the private key provided by Google)
CkCrypt2_SetHmacKeyEncoded $crypt "vNIXE0xscrmjlyV-12Nj_BvUPaw=" "modBase64"
# Compute the URL signature
set sig [CkCrypt2_hmacStringENC $crypt "/maps/api/geocode/json?address=New+York&sensor=false&client=clientID"]
# The result should be KrU1TzVQM7Ur0i8i7K3huiw3MsA=
puts "$sig"
delete_CkCrypt2 $crypt
|