Support EC keys as well

This commit is contained in:
Jamie Cameron
2023-03-11 16:03:17 -08:00
parent 0c9cda6a0b
commit b8935cd933

View File

@ -593,8 +593,8 @@ sub valid_pem_file
local ($file, $type) = @_;
local $data = &read_file_contents($file);
if ($type eq 'key') {
return $data =~ /\-{5}BEGIN (RSA )?PRIVATE KEY\-{5}/ &&
$data =~ /\-{5}END (RSA )?PRIVATE KEY\-{5}/;
return $data =~ /\-{5}BEGIN (RSA |EC )?PRIVATE KEY\-{5}/ &&
$data =~ /\-{5}END (RSA |EC )?PRIVATE KEY\-{5}/;
}
else {
return $data =~ /\-{5}BEGIN CERTIFICATE\-{5}/ &&