(AutoIt) Convert Java KeyStore to PEM

Loads a Java keystore file and saves the trusted certificate entries to a PEM file.

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

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

$oJks = ObjCreate("Chilkat.JavaKeyStore")

Local $sJksPassword = "myJksPassword"

; Load the Java keystore from a file.  The JKS file password is used
; to verify the keyed digest that is found at the very end of the keystore.
; It verifies that the keystore has not been modified.
Local $bSuccess = $oJks.LoadFile($sJksPassword,"/someDir/keyStore.jks")
If ($bSuccess <> True) Then
    ConsoleWrite($oJks.LastErrorText & @CRLF)
    Exit
EndIf

; Open/create the output PEM file. 
; This example uses Chilkat's file access class for writing the output file.
; You may replace the file I/O lines of code with whatever is most convenient for you.
$oFac = ObjCreate("Chilkat.FileAccess")
$bSuccess = $oFac.OpenForWrite("/pemFiles/caCerts.pem")
If ($bSuccess <> True) Then
    ConsoleWrite($oFac.LastErrorText & @CRLF)
    Exit
EndIf

Local $iNumCerts = $oJks.NumTrustedCerts
Local $i

Local $oCert
Local $sPem

; Iterate over the trusted certs, get the PEM for each,
; and append it to the output file.
$i = 0
While $i < $iNumCerts
    $oCert = $oJks.GetTrustedCert($i)

    ; Get the certificate in PEM format.  
    $sPem = $oCert.ExportCertPem()

    ; Append the PEM string to the open file.
    ; The PEM contains only us-ascii chars..
    $bSuccess = $oFac.AppendAnsi($sPem)
    If ($bSuccess <> True) Then
        ConsoleWrite($oFac.LastErrorText & @CRLF)

        Exit
    EndIf

    $i = $i + 1
Wend

; Close the output file.
$oFac.FileClose 

ConsoleWrite("Trusted certificates saved to PEM." & @CRLF)