PureBasic

Export a Public Key as PEM

Demonstrates the Chilkat PublicKey.GetPem method, which returns the public key in PEM format. The only argument selects the underlying DER representation: true prefers the traditional PKCS #1 form (RSA), false uses the SubjectPublicKeyInfo form.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: PEM is the most portable way to share a public key — the Base64 text block most tooling reads. The boolean picks the encoding: false produces the modern, algorithm-independent PUBLIC KEY (SubjectPublicKeyInfo), which is the usual choice; true produces the older RSA-specific RSA PUBLIC KEY for tools that require it. A public key is not sensitive, so the PEM can be distributed openly.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkPublicKey.pb"

Procedure ChilkatExample()

    success.i = 0

    ;  Load a public key to export.  LoadFromFile inspects the content, so it accepts DER, PEM, XML,
    ;  JWK, and other supported representations.
    pubKey.i = CkPublicKey::ckCreate()
    If pubKey.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    success = CkPublicKey::ckLoadFromFile(pubKey,"qa_data/public.pem")
    If success = 0
        Debug CkPublicKey::ckLastErrorText(pubKey)
        CkPublicKey::ckDispose(pubKey)
        ProcedureReturn
    EndIf

    ;  Export the public key in PEM format.  The argument selects the underlying DER representation:
    ;  1 prefers the traditional PKCS #1 form (RSA), 0 uses the SubjectPublicKeyInfo form.
    preferPkcs1.i = 0
    pem.s = CkPublicKey::ckGetPem(pubKey,preferPkcs1)
    If CkPublicKey::ckLastMethodSuccess(pubKey) = 0
        Debug CkPublicKey::ckLastErrorText(pubKey)
        CkPublicKey::ckDispose(pubKey)
        ProcedureReturn
    EndIf

    Debug pem


    CkPublicKey::ckDispose(pubKey)


    ProcedureReturn
EndProcedure