(PowerBuilder) Base64url Encoding

Base64url encoding is identical to base64 encoding except it uses non-reserved URL characters (e.g. '–' is used instead of '+', and '_' is used instead of '/') and it omits the padding characters. Chilkat adds support for "base64url" in version 9.5.0.56. (To be released Q1 2016.) The list of binary encodings supported by Chilkat are documented at Chilkat Binary Encodings For any supported encoding, such as base64, hex, url, quoted-printable, modbase64, base64url, etc., the encoding name may be used in any "EncodingMode" property or in any method argument that specifies a binary encoding. (Please note that a "binary encoding" is different than a "character encoding". Character encodings supported by Chilkat are listed at Chilkat Character Encodings.) This example demonstrates using base64url encoding by setting the RSA object's EncodingMode property equal to "base64url".

Note: This example requires Chilkat v10.1.2 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_CertStore
integer li_Success
oleobject loo_JsonCN
oleobject loo_Cert
oleobject loo_Pkey
string ls_PkeyXml
oleobject loo_Rsa
string ls_StrData
string ls_StrSig

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

// Create an instance of a certificate store object, load a PFX file,
// locate the certificate we need, and use it for signing.
// (a PFX file may contain more than one certificate.)
loo_CertStore = create oleobject
// Use "Chilkat_9_5_0.CertStore" for versions of Chilkat < 10.0.0
li_rc = loo_CertStore.ConnectToNewObject("Chilkat.CertStore")
if li_rc < 0 then
    destroy loo_CertStore
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// The 1st argument is the filename, the 2nd arg is the 
// PFX file's password:
li_Success = loo_CertStore.LoadPfxFile("chilkat.pfx","test")
if li_Success <> 1 then
    Write-Debug loo_CertStore.LastErrorText
    destroy loo_CertStore
    return
end if

loo_JsonCN = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_JsonCN.ConnectToNewObject("Chilkat.JsonObject")

loo_JsonCN.UpdateString("CN","Chilkat Software, Inc.")
loo_Cert = create oleobject
// Use "Chilkat_9_5_0.Cert" for versions of Chilkat < 10.0.0
li_rc = loo_Cert.ConnectToNewObject("Chilkat.Cert")

li_Success = loo_CertStore.FindCert(loo_JsonCN,loo_Cert)
if li_Success = 0 then
    Write-Debug loo_CertStore.LastErrorText
    destroy loo_CertStore
    destroy loo_JsonCN
    destroy loo_Cert
    return
end if

loo_Pkey = loo_Cert.ExportPrivateKey()
if loo_Cert.LastMethodSuccess = 0 then
    Write-Debug loo_Cert.LastErrorText
    destroy loo_CertStore
    destroy loo_JsonCN
    destroy loo_Cert
    return
end if

// Get the private key in XML format:
ls_PkeyXml = loo_Pkey.GetXml()

loo_Rsa = create oleobject
// Use "Chilkat_9_5_0.Rsa" for versions of Chilkat < 10.0.0
li_rc = loo_Rsa.ConnectToNewObject("Chilkat.Rsa")

// Import the private key into the RSA component:
li_Success = loo_Rsa.ImportPrivateKey(ls_PkeyXml)
if li_Success <> 1 then
    Write-Debug loo_Rsa.LastErrorText
    destroy loo_Pkey
    destroy loo_CertStore
    destroy loo_JsonCN
    destroy loo_Cert
    destroy loo_Rsa
    return
end if

// This example will sign a string, and receive the signature
// as a base64url encoded string.  Therefore, set the encoding mode
// to "base64url":
loo_Rsa.EncodingMode = "base64url"
loo_Rsa.LittleEndian = 0

ls_StrData = "This is the string to be signed."
ls_StrSig = loo_Rsa.SignStringENC(ls_StrData,"sha256")

destroy loo_Pkey

Write-Debug ls_StrSig


destroy loo_CertStore
destroy loo_JsonCN
destroy loo_Cert
destroy loo_Rsa