mirror.MikroTik/nymurbd.MikroTik-scripts
1
0
Fork 0
mirror of https://github.com/nymurbd/MikroTik-scripts.git synced 2025-07-26 22:04:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

mod/scriptrunonce: switch to $LogPrint

Browse source
This commit is contained in:
Christian Hesse 2024-03-08 12:45:38 +01:00
parent 699f09c282
commit 8c62c31604
1 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

13
mod/scriptrunonce.rsc
View file

@ -15,13 +15,14 @@
:global ScriptRunOnceBaseUrl; :global ScriptRunOnceBaseUrl;
:global ScriptRunOnceUrlSuffix; :global ScriptRunOnceUrlSuffix;
:global LogPrintExit2; :global LogPrint;
:global ValidateSyntax; :global ValidateSyntax;
:foreach Script in=$Scripts do={ :foreach Script in=$Scripts do={
:if (!($Script ~ "^(ftp|https?|sftp)://")) do={ :if (!($Script ~ "^(ftp|https?|sftp)://")) do={
:if ([ :len $ScriptRunOnceBaseUrl ] = 0) do={ :if ([ :len $ScriptRunOnceBaseUrl ] = 0) do={
$LogPrintExit2 warning $0 ("Script '" . $Script . "' is not an url and base url is not available.") true; $LogPrint warning $0 ("Script '" . $Script . "' is not an url and base url is not available.");
:error false;
} }
:set Script ($ScriptRunOnceBaseUrl . $Script . ".rsc" . $ScriptRunOnceUrlSuffix); :set Script ($ScriptRunOnceBaseUrl . $Script . ".rsc" . $ScriptRunOnceUrlSuffix);
} }
@ -30,19 +31,19 @@
:do { :do {
:set Source ([ /tool/fetch check-certificate=yes-without-crl $Script output=user as-value ]->"data"); :set Source ([ /tool/fetch check-certificate=yes-without-crl $Script output=user as-value ]->"data");
} on-error={ } on-error={
$LogPrintExit2 warning $0 ("Failed fetching script '" . $Script . "'!") false; $LogPrint warning $0 ("Failed fetching script '" . $Script . "'!");
} }
:if ([ :len $Source ] > 0) do={ :if ([ :len $Source ] > 0) do={
:if ([ $ValidateSyntax $Source ] = true) do={ :if ([ $ValidateSyntax $Source ] = true) do={
:do { :do {
$LogPrintExit2 info $0 ("Running script '" . $Script . "' now.") false; $LogPrint info $0 ("Running script '" . $Script . "' now.");
[ :parse $Source ]; [ :parse $Source ];
} on-error={ } on-error={
$LogPrintExit2 warning $0 ("The script '" . $Script . "' failed to run!") false; $LogPrint warning $0 ("The script '" . $Script . "' failed to run!");
} }
} else={ } else={
$LogPrintExit2 warning $0 ("The script '" . $Script . "' failed syntax validation!") false; $LogPrint warning $0 ("The script '" . $Script . "' failed syntax validation!");
} }
} }
} }