PureBasic

Load a Private Key from XML Text

Demonstrates the Chilkat PrivateKey.LoadXml method, which loads a private key from XML text. The only argument is the XML string. Supported roots include RSAKeyValue, DSAKeyValue, ECCKeyValue, and Ed25519KeyValue.

Background: XML key representations such as RSAKeyValue come from the .NET/XML-DSIG world, where keys are exchanged as XML elements. This loads that form — the inverse of GetXml — which is handy for interoperating with .NET code or systems built around XML signatures. It is a plaintext format, so protect the XML like any unencrypted key material.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkPrivateKey.pb"

Procedure ChilkatExample()

    success.i = 0

    ;  Demonstrates the PrivateKey.LoadXml method, which loads a private key from XML text.  The only
    ;  argument is the XML string.  Supported roots include RSAKeyValue, DSAKeyValue, ECCKeyValue,
    ;  and Ed25519KeyValue.

    privKey.i = CkPrivateKey::ckCreate()
    If privKey.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ;  The XML text of a private key (for example as produced by GetXml).
    xmlText.s = "<RSAKeyValue><Modulus>...</Modulus><Exponent>AQAB</Exponent>...</RSAKeyValue>"

    success = CkPrivateKey::ckLoadXml(privKey,xmlText)
    If success = 0
        Debug CkPrivateKey::ckLastErrorText(privKey)
        CkPrivateKey::ckDispose(privKey)
        ProcedureReturn
    EndIf

    Debug "Loaded a " + CkPrivateKey::ckKeyType(privKey) + " private key."


    CkPrivateKey::ckDispose(privKey)


    ProcedureReturn
EndProcedure