AutoIt

Convert Let's Encrypt PEM Files to a PFX

See more PFX/P12 Examples

Demonstrates how to convert the .pem files provided by Let's Encrypt to a single PFX. AutoIt

Local $bSuccess = False

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

;  Let's Encrypt provides four .pem files
;  1. fullchain.pem
;  2. privkey.pem
;  3. cert.pem
;  4. chain.pem

;  The cert.pem and chain.pem are redundant. 
;  The fullchain.pem is composed of the cert.pem and chain.pem.

;  To convert the PEM's to a single .pfx, we don't need the redundant data.
;  The privkey.pem and fullchain.pem provide the required data.
;  We can ignore cert.pem and chain.pem (because those certs are already found in fullchain.pem).

;  We need a single .pem file that contains both the private key, the cert,
;  and the certs in the chain of authentication.
;  Let's combine priveky.pem and fullchain.pem into a single .pem

$oSbPem = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oSbPem.LoadFile("qa_data/pem/lets_encrypt/privkey.pem","utf-8")
If ($bSuccess = False) Then
    ConsoleWrite("Failed to load privkey.pem" & @CRLF)
    Exit
EndIf

;  To be safe, append a blank line..
$oSbPem.AppendLine("",False)

$oSbFullChainPem = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oSbFullChainPem.LoadFile("qa_data/pem/lets_encrypt/fullchain.pem","utf-8")
If ($bSuccess = False) Then
    ConsoleWrite("Failed to load fullchain.pem" & @CRLF)
    Exit
EndIf

;  Append the full cert chain PEM to the private key PEM.
$oSbPem.AppendSb($oSbFullChainPem)

;  Load the combined PEM into a Chilkat PFX object.
$oPfx = ObjCreate("Chilkat.Pfx")
$bSuccess = $oPfx.LoadPem($oSbPem.GetAsString(),"no password required")
If ($bSuccess = False) Then
    ConsoleWrite($oPfx.LastErrorText & @CRLF)
    Exit
EndIf

;  Write the PFX w/ a password.
Local $sPfxPassword = "secret"
$bSuccess = $oPfx.ToFile($sPfxPassword,"qa_output/sample.pfx")
If ($bSuccess = False) Then
    ConsoleWrite($oPfx.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Success!" & @CRLF)