Convert a PFX to a Java KeyStore

See more PFX/P12 Examples

Demonstrates Pfx.ToJksObj, which populates a JavaKeyStore with a JKS representation of the PFX, then writes it to a file.

The file path is relative to the application's current working directory. An absolute path may also be used. Supply the path appropriate to your own environment.

use strict;
use warnings;
use Chilkat2;

my $pfx = Chilkat2::Pfx->new;

# The file path is relative to the application's current working directory.  An absolute path
# may also be used.  Supply the path appropriate to your own environment.
# The PFX password should come from a secure source rather than being hard-coded.
my $password = 'myPfxPassword';
my $success = $pfx->LoadPfxFile('qa_data/identity.pfx', $password);
if (!$success) {
    print $pfx->LastErrorText, "\n";
    exit;
}

# Populate a Java KeyStore (JKS) representation of this PFX.  One private-key entry is created for
# each private key, and the PFX certificates are used to build the certificate chains.  The 1st
# argument is the alias for the first private-key entry, and the 2nd protects the generated JKS.
# The JKS password should come from a secure source rather than being hard-coded.
my $jksPassword = 'myJksPassword';
my $jks = Chilkat2::JavaKeyStore->new;
$success = $pfx->ToJksObj('myalias', $jksPassword, $jks);
if (!$success) {
    print $pfx->LastErrorText, "\n";
    exit;
}

# The Java KeyStore object can then be written to a .jks file.
$success = $jks->ToFile($jksPassword, 'qa_output/identity.jks');
if (!$success) {
    print $jks->LastErrorText, "\n";
    exit;
}

print 'Wrote a Java KeyStore with ', $jks->NumPrivateKeys, " private key(s).\n";