check-certificates: add url encoding for certificate download

This commit is contained in:
Christian Hesse 2019-04-10 14:47:20 +02:00
parent e562825bd9
commit 58c25c8cca

View file

@ -9,6 +9,7 @@
:global CertRenewPass; :global CertRenewPass;
:global SendNotification; :global SendNotification;
:global UrlEncode;
:local GetIssuerCN do={ :local GetIssuerCN do={
:foreach IssuerI in=$1 do={ :foreach IssuerI in=$1 do={
@ -35,14 +36,15 @@
} }
:foreach Type in={ ".pem"; ".p12" } do={ :foreach Type in={ ".pem"; ".p12" } do={
:local CertFileName ([ $UrlEncode $CommonName ] . $Type);
:do { :do {
/ tool fetch check-certificate=yes-without-crl ($CertRenewUrl . $CommonName . $Type); / tool fetch check-certificate=yes-without-crl ($CertRenewUrl . $CertFileName);
:foreach PassPhrase in=$CertRenewPass do={ :foreach PassPhrase in=$CertRenewPass do={
/ certificate import file-name=($CommonName . $Type) passphrase=$PassPhrase; / certificate import file-name=$CertFileName passphrase=$PassPhrase;
} }
/ file remove [ find where name=($CommonName . $Type) ]; / file remove [ find where name=$CertFileName ];
} on-error={ } on-error={
:log debug ("Could not download certificate file " . $CommonName . $Type); :log debug ("Could not download certificate file " . $CertFileName);
} }
} }