(Unicode C) Iterate Keys and Certs in PEM

Demonstrates how to access each of the private keys and certs contained within a PEM.

Chilkat C/C++ Library Downloads
MS Visual C/C++ Linux/CentOS C/C++ Alpine Linux C/C++ MAC OS X C/C++	armhf/aarch64 C/C++ C++ Builder iOS C/C++ Android C/C++	Solaris C/C++ MinGW C/C++

#include <C_CkGlobalW.h>
#include <C_CkPemW.h>
#include <C_CkPrivateKeyW.h>
#include <C_CkCertW.h>

void ChilkatSample(void)
    {
    HCkGlobalW chilkatGlob;
    BOOL success;
    HCkPemW pem;
    const wchar_t *password;
    const wchar_t *pemContent;
    int numPrivateKeys;
    int i;
    HCkPrivateKeyW privKey;
    int numCerts;
    HCkCertW cert;

    // Starting in v9.5.0.49, all Chilkat classes can be unlocked at once at the beginning of a program
    // by calling UnlockBundle.  It requires a Bundle unlock code.
    chilkatGlob = CkGlobalW_Create();
    success = CkGlobalW_UnlockBundle(chilkatGlob,L"Anything for 30-day trial.");
    if (success != TRUE) {
        wprintf(L"%s\n",CkGlobalW_lastErrorText(chilkatGlob));
        CkGlobalW_Dispose(chilkatGlob);
        return;
    }

    // The Chilkat PEM class was introduced in v9.5.0.49.  
    // It requires the bundle to be unlocked, as shown above.
    pem = CkPemW_Create();

    // Load the PEM from a file.
    // If the PEM is encrypted, provide a password.  Otherwise pass an empty string for the password.
    password = L"myPassword";
    success = CkPemW_LoadPemFile(pem,L"../myPemFiles/myPem.pem",password);
    if (success != TRUE) {
        wprintf(L"%s\n",CkPemW_lastErrorText(pem));
        CkGlobalW_Dispose(chilkatGlob);
        CkPemW_Dispose(pem);
        return;
    }

    // Note: If the app already has the PEM pre-loaded in a string variable, then load it 
    // by calling LoadPem instead.  
    pemContent = L"... the PEM contents ...";
    success = CkPemW_LoadPem(pem,pemContent,password);
    // Check for success as before..

    // Iterate over the private keys.
    numPrivateKeys = CkPemW_getNumPrivateKeys(pem);
    i = 0;

    while (i < numPrivateKeys) {

        privKey = CkPemW_GetPrivateKey(pem,i);
        wprintf(L"Private Key %d is %d in length\n",i,CkPrivateKeyW_getBitLength(privKey));
        CkPrivateKeyW_Dispose(privKey);

        i = i + 1;
    }

    // Iterate over the certificates.
    numCerts = CkPemW_getNumCerts(pem);
    i = 0;

    while (i < numCerts) {

        cert = CkPemW_GetCert(pem,i);
        wprintf(L"Certificate %d : %s\n",i,CkCertW_subjectDN(cert));
        CkCertW_Dispose(cert);

        i = i + 1;
    }



    CkGlobalW_Dispose(chilkatGlob);
    CkPemW_Dispose(pem);

    }