check-certificates: wait to be fully connected

This commit is contained in:
Christian Hesse 2020-08-21 23:13:47 +02:00
parent eaffb1dbd2
commit b68b997c1e

View file

@ -17,18 +17,16 @@
:global ParseKeyValueStore; :global ParseKeyValueStore;
:global SendNotification; :global SendNotification;
:global SymbolForNotification; :global SymbolForNotification;
:global TimeIsSync;
:global UrlEncode; :global UrlEncode;
:global WaitForFile; :global WaitForFile;
:global WaitFullyConnected;
:local FormatExpire do={ :local FormatExpire do={
:global CharacterReplace; :global CharacterReplace;
:return [ $CharacterReplace [ $CharacterReplace [ :tostr $1 ] "w" "w " ] "d" "d " ]; :return [ $CharacterReplace [ $CharacterReplace [ :tostr $1 ] "w" "w " ] "d" "d " ];
} }
:if ([ $TimeIsSync ] = false) do={ $WaitFullyConnected;
$LogPrintExit warning ("Time is not yet synchronized.") true;
}
:foreach Cert in=[ / certificate find where !revoked !ca !scep-url expires-after<3w ] do={ :foreach Cert in=[ / certificate find where !revoked !ca !scep-url expires-after<3w ] do={
:local CertVal [ / certificate get $Cert ]; :local CertVal [ / certificate get $Cert ];