(DataFlex) Get an EC Key in Raw Hex Format

Demonstrates how to get the private and public key parts of an EC (ECDSA) key in lowercase hex formmat.

Note: This example requires Chilkat v9.5.0.83 or greater.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoPrivKey
    Boolean iSuccess
    Variant vSbPubKeyHex
    Handle hoSbPubKeyHex
    String sPrivKeyHex
    String sTemp1
    Integer iTemp1

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

    // Load an EC key from some format..
    Get Create (RefClass(cComChilkatPrivateKey)) To hoPrivKey
    If (Not(IsComObjectCreated(hoPrivKey))) Begin
        Send CreateComObject of hoPrivKey
    End

    // This loads an ECDSA key from an unencrypted PEM file (no password required).
    Get ComLoadAnyFormatFile Of hoPrivKey "qa_data/ecc/openssl_ecc_privKey.pem" "" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPrivKey To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // The key type should be "ecc" to indicate an EC key.
    Get ComKeyType Of hoPrivKey To sTemp1
    Showln "key type = " sTemp1

    // What is the size of the private key in bits?
    Get ComBitLength Of hoPrivKey To iTemp1
    Showln "size in bits = " iTemp1

    // Get the private and public EC key parts in raw hex format:
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSbPubKeyHex
    If (Not(IsComObjectCreated(hoSbPubKeyHex))) Begin
        Send CreateComObject of hoSbPubKeyHex
    End
    Get pvComObject of hoSbPubKeyHex to vSbPubKeyHex
    Get ComGetRawHex Of hoPrivKey vSbPubKeyHex To sPrivKeyHex

    // If the private key size in bits is 256, then we should have a 32-byte key (a 64 character hex string).
    Showln "private key = " sPrivKeyHex

    // The public key is composed of the "x" and "y" parts, and is composed like this:  04||HEX(x)||HEX(y)
    Get ComGetAsString Of hoSbPubKeyHex To sTemp1
    Showln "public key = " sTemp1

    // Sample output:
    // key type = ecc
    // size in bits = 256
    // private key = ced36f2ba3332be439f79143d69937fc52494cd38e45243c3ea05db183919f1b
    // public key = 045b4edcd501831740895f5907feabb71587076a6314d9d5141f9f8c33a478b8ce08b8dfd2a091eb6355803d7e729876c790bc0b176f2015f3bb103813753f676a


End_Procedure