mirror.MikroTik/eworm.routeros-scripts
1
0
Fork 0
mirror of https://git.eworm.de/cgit/routeros-scripts synced 2025-07-23 12:24:28 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

global-functions: $CertificateAvailable: use $LogPrintExit

Browse source
This commit is contained in:
Christian Hesse 2020-04-03 16:43:55 +02:00
parent 324f5b0ba4
commit 7cdeb9185e
1 changed files with 6 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

9
global-functions
View file

@ -47,16 +47,18 @@
:local CommonName [ :tostr $1 ]; :local CommonName [ :tostr $1 ];
:global CertificateDownload; :global CertificateDownload;
:global LogPrintExit;
:global ParseKeyValueStore; :global ParseKeyValueStore;
:if ([ / system resource get free-hdd-space ] < 8388608 && \ :if ([ / system resource get free-hdd-space ] < 8388608 && \
[ / certificate settings get crl-download ] = true && \ [ / certificate settings get crl-download ] = true && \
[ / certificate settings get crl-store ] = "system") do={ [ / certificate settings get crl-store ] = "system") do={
:log warning "This system has low free flash space but is configured to download certificate CRLs to system!"; $LogPrintExit warning ("This system has low free flash space but " . \
"is configured to download certificate CRLs to system!") false;
} }
:if ([ / certificate print count-only where common-name=$CommonName ] = 0) do={ :if ([ / certificate print count-only where common-name=$CommonName ] = 0) do={
:log info ("Certificate with CommonName \"" . $CommonName . "\" not available."); $LogPrintExit info ("Certificate with CommonName \"" . $CommonName . "\" not available.") false;
:if ([ $CertificateDownload $CommonName ] = false) do={ :if ([ $CertificateDownload $CommonName ] = false) do={
:return false; :return false;
} }
@ -66,7 +68,8 @@
:local Issuer $CommonName; :local Issuer $CommonName;
:do { :do {
:if ([ / certificate print count-only where common-name=$Issuer ] = 0) do={ :if ([ / certificate print count-only where common-name=$Issuer ] = 0) do={
:log info ("Certificate chain for \"" . $CommonName . "\" is incomplete, missing \"" . $Issuer . "\"."); $LogPrintExit info ("Certificate chain for \"" . $CommonName . \
"\" is incomplete, missing \"" . $Issuer . "\".") false;
:if ([ $CertificateDownload $CommonName ] = false) do={ :if ([ $CertificateDownload $CommonName ] = false) do={
:return false; :return false;
} }