mirror of
https://git.eworm.de/cgit/routeros-scripts
synced 2025-06-25 11:08:38 +02:00
check-routeros-update: move code into function
This commit is contained in:
Christian Hesse
parent
450ea2fa48
commit
22eb74cb3a
1 changed files with 125 additions and 121 deletions
|
|
@ -8,149 +8,153 @@
|
||||||
# check for RouterOS update, send notification and/or install
|
# check for RouterOS update, send notification and/or install
|
||||||
# https://git.eworm.de/cgit/routeros-scripts/about/doc/check-routeros-update.md
|
# https://git.eworm.de/cgit/routeros-scripts/about/doc/check-routeros-update.md
|
||||||
|
|
||||||
:local 0 [ :jobname ];
|
|
||||||
:global GlobalFunctionsReady;
|
:global GlobalFunctionsReady;
|
||||||
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
|
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
|
||||||
|
|
||||||
:global Identity;
|
:local Main do={
|
||||||
:global SafeUpdateAll;
|
:local ScriptName [ :tostr $1 ];
|
||||||
:global SafeUpdateNeighbor;
|
|
||||||
:global SafeUpdateNeighborIdentity;
|
|
||||||
:global SafeUpdatePatch;
|
|
||||||
:global SafeUpdateUrl;
|
|
||||||
:global SentRouterosUpdateNotification;
|
|
||||||
|
|
||||||
:global DeviceInfo;
|
:global Identity;
|
||||||
:global EscapeForRegEx;
|
:global SafeUpdateAll;
|
||||||
:global LogPrintExit2;
|
:global SafeUpdateNeighbor;
|
||||||
:global ScriptFromTerminal;
|
:global SafeUpdateNeighborIdentity;
|
||||||
:global ScriptLock;
|
:global SafeUpdatePatch;
|
||||||
:global SendNotification2;
|
:global SafeUpdateUrl;
|
||||||
:global SymbolForNotification;
|
:global SentRouterosUpdateNotification;
|
||||||
:global VersionToNum;
|
|
||||||
:global WaitFullyConnected;
|
|
||||||
|
|
||||||
:local DoUpdate do={
|
:global DeviceInfo;
|
||||||
:if ([ :len [ /system/script/find where name="packages-update" ] ] > 0) do={
|
:global EscapeForRegEx;
|
||||||
/system/script/run packages-update;
|
:global LogPrintExit2;
|
||||||
} else={
|
:global ScriptFromTerminal;
|
||||||
/system/package/update/install without-paging;
|
:global ScriptLock;
|
||||||
}
|
:global SendNotification2;
|
||||||
:error "Waiting for system to reboot.";
|
:global SymbolForNotification;
|
||||||
}
|
:global VersionToNum;
|
||||||
|
:global WaitFullyConnected;
|
||||||
|
|
||||||
$ScriptLock $0;
|
:local DoUpdate do={
|
||||||
|
:if ([ :len [ /system/script/find where name="packages-update" ] ] > 0) do={
|
||||||
$WaitFullyConnected;
|
/system/script/run packages-update;
|
||||||
|
} else={
|
||||||
:if ([ :len [ /system/scheduler/find where name="_RebootForUpdate" ] ] > 0) do={
|
/system/package/update/install without-paging;
|
||||||
:error "A reboot for update is already scheduled.";
|
}
|
||||||
}
|
:error "Waiting for system to reboot.";
|
||||||
|
|
||||||
$LogPrintExit2 debug $0 ("Checking for updates...") false;
|
|
||||||
/system/package/update/check-for-updates without-paging as-value;
|
|
||||||
:local Update [ /system/package/update/get ];
|
|
||||||
|
|
||||||
:if ([ $ScriptFromTerminal $0 ] = true && ($Update->"installed-version") = ($Update->"latest-version")) do={
|
|
||||||
$LogPrintExit2 info $0 ("System is already up to date.") true;
|
|
||||||
}
|
|
||||||
|
|
||||||
:local NumInstalled [ $VersionToNum ($Update->"installed-version") ];
|
|
||||||
:local NumLatest [ $VersionToNum ($Update->"latest-version") ];
|
|
||||||
:local Link ("https://mikrotik.com/download/changelogs/" . $Update->"channel" . "-release-tree");
|
|
||||||
|
|
||||||
:if ($NumLatest < 117505792) do={
|
|
||||||
$LogPrintExit2 info $0 ("The version '" . ($Update->"latest-version") . "' is not a valid version.") true;
|
|
||||||
}
|
|
||||||
|
|
||||||
:if ($NumInstalled < $NumLatest) do={
|
|
||||||
:if ($SafeUpdateAll ~ "^YES,? ?PLEASE!?\$") do={
|
|
||||||
$LogPrintExit2 info $0 ("Installing ALL versions automatically, including " . \
|
|
||||||
$Update->"latest-version" . "...") false;
|
|
||||||
$SendNotification2 ({ origin=$0; \
|
|
||||||
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
|
||||||
message=("Installing ALL versions automatically, including " . $Update->"latest-version" . \
|
|
||||||
"... Updating on " . $Identity . "..."); link=$Link; silent=true });
|
|
||||||
$DoUpdate;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
:if ($SafeUpdatePatch = true && ($NumInstalled & 0xffff0000) = ($NumLatest & 0xffff0000)) do={
|
$ScriptLock $ScriptName;
|
||||||
$LogPrintExit2 info $0 ("Version " . $Update->"latest-version" . " is a patch release, updating...") false;
|
$WaitFullyConnected;
|
||||||
$SendNotification2 ({ origin=$0; \
|
|
||||||
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
:if ([ :len [ /system/scheduler/find where name="_RebootForUpdate" ] ] > 0) do={
|
||||||
message=("Version " . $Update->"latest-version" . " is a patch update for " . $Update->"channel" . \
|
:error "A reboot for update is already scheduled.";
|
||||||
", updating on " . $Identity . "..."); link=$Link; silent=true });
|
|
||||||
$DoUpdate;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
:if ($SafeUpdateNeighbor = true) do={
|
$LogPrintExit2 debug $ScriptName ("Checking for updates...") false;
|
||||||
:local Neighbors [ /ip/neighbor/find where platform="MikroTik" identity~$SafeUpdateNeighborIdentity \
|
/system/package/update/check-for-updates without-paging as-value;
|
||||||
version~("^" . [ $EscapeForRegEx ($Update->"latest-version") ] . "\\b") ];
|
:local Update [ /system/package/update/get ];
|
||||||
:if ([ :len $Neighbors ] > 0) do={
|
|
||||||
:local Neighbor [ /ip/neighbor/get ($Neighbors->0) identity ];
|
:if ([ $ScriptFromTerminal $ScriptName ] = true && ($Update->"installed-version") = ($Update->"latest-version")) do={
|
||||||
$LogPrintExit2 info $0 ("Seen a neighbor (" . $Neighbor . ") running version " . \
|
$LogPrintExit2 info $ScriptName ("System is already up to date.") true;
|
||||||
$Update->"latest-version" . " from " . $Update->"channel" . ", updating...") false;
|
}
|
||||||
$SendNotification2 ({ origin=$0; \
|
|
||||||
|
:local NumInstalled [ $VersionToNum ($Update->"installed-version") ];
|
||||||
|
:local NumLatest [ $VersionToNum ($Update->"latest-version") ];
|
||||||
|
:local Link ("https://mikrotik.com/download/changelogs/" . $Update->"channel" . "-release-tree");
|
||||||
|
|
||||||
|
:if ($NumLatest < 117505792) do={
|
||||||
|
$LogPrintExit2 info $ScriptName ("The version '" . ($Update->"latest-version") . "' is not a valid version.") true;
|
||||||
|
}
|
||||||
|
|
||||||
|
:if ($NumInstalled < $NumLatest) do={
|
||||||
|
:if ($SafeUpdateAll ~ "^YES,? ?PLEASE!?\$") do={
|
||||||
|
$LogPrintExit2 info $ScriptName ("Installing ALL versions automatically, including " . \
|
||||||
|
$Update->"latest-version" . "...") false;
|
||||||
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
||||||
message=("Seen a neighbor (" . $Neighbor . ") running version " . $Update->"latest-version" . \
|
message=("Installing ALL versions automatically, including " . $Update->"latest-version" . \
|
||||||
" from " . $Update->"channel" . ", updating on " . $Identity . "..."); link=$Link; silent=true });
|
"... Updating on " . $Identity . "..."); link=$Link; silent=true });
|
||||||
$DoUpdate;
|
$DoUpdate;
|
||||||
}
|
}
|
||||||
}
|
|
||||||
|
|
||||||
:if ([ :len $SafeUpdateUrl ] > 0) do={
|
:if ($SafeUpdatePatch = true && ($NumInstalled & 0xffff0000) = ($NumLatest & 0xffff0000)) do={
|
||||||
:local Result;
|
$LogPrintExit2 info $ScriptName ("Version " . $Update->"latest-version" . " is a patch release, updating...") false;
|
||||||
:do {
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
:set Result [ /tool/fetch check-certificate=yes-without-crl \
|
|
||||||
($SafeUpdateUrl . $Update->"channel" . "?installed=" . $Update->"installed-version" . \
|
|
||||||
"&latest=" . $Update->"latest-version") output=user as-value ];
|
|
||||||
} on-error={
|
|
||||||
$LogPrintExit2 warning $0 ("Failed receiving safe version for " . $Update->"channel" . ".") false;
|
|
||||||
}
|
|
||||||
:if ($Result->"status" = "finished" && $Result->"data" = $Update->"latest-version") do={
|
|
||||||
$LogPrintExit2 info $0 ("Version " . $Update->"latest-version" . " is considered safe, updating...") false;
|
|
||||||
$SendNotification2 ({ origin=$0; \
|
|
||||||
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
||||||
message=("Version " . $Update->"latest-version" . " is considered safe for " . $Update->"channel" . \
|
message=("Version " . $Update->"latest-version" . " is a patch update for " . $Update->"channel" . \
|
||||||
", updating on " . $Identity . "..."); link=$Link; silent=true });
|
", updating on " . $Identity . "..."); link=$Link; silent=true });
|
||||||
$DoUpdate;
|
$DoUpdate;
|
||||||
}
|
}
|
||||||
}
|
|
||||||
|
|
||||||
:if ([ $ScriptFromTerminal $0 ] = true) do={
|
:if ($SafeUpdateNeighbor = true) do={
|
||||||
:put ("Do you want to install RouterOS version " . $Update->"latest-version" . "? [y/N]");
|
:local Neighbors [ /ip/neighbor/find where platform="MikroTik" identity~$SafeUpdateNeighborIdentity \
|
||||||
:if (([ /terminal/inkey timeout=60 ] % 32) = 25) do={
|
version~("^" . [ $EscapeForRegEx ($Update->"latest-version") ] . "\\b") ];
|
||||||
$DoUpdate;
|
:if ([ :len $Neighbors ] > 0) do={
|
||||||
} else={
|
:local Neighbor [ /ip/neighbor/get ($Neighbors->0) identity ];
|
||||||
:put "Canceled...";
|
$LogPrintExit2 info $ScriptName ("Seen a neighbor (" . $Neighbor . ") running version " . \
|
||||||
|
$Update->"latest-version" . " from " . $Update->"channel" . ", updating...") false;
|
||||||
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
|
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
||||||
|
message=("Seen a neighbor (" . $Neighbor . ") running version " . $Update->"latest-version" . \
|
||||||
|
" from " . $Update->"channel" . ", updating on " . $Identity . "..."); link=$Link; silent=true });
|
||||||
|
$DoUpdate;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
:if ([ :len $SafeUpdateUrl ] > 0) do={
|
||||||
|
:local Result;
|
||||||
|
:do {
|
||||||
|
:set Result [ /tool/fetch check-certificate=yes-without-crl \
|
||||||
|
($SafeUpdateUrl . $Update->"channel" . "?installed=" . $Update->"installed-version" . \
|
||||||
|
"&latest=" . $Update->"latest-version") output=user as-value ];
|
||||||
|
} on-error={
|
||||||
|
$LogPrintExit2 warning $ScriptName ("Failed receiving safe version for " . $Update->"channel" . ".") false;
|
||||||
|
}
|
||||||
|
:if ($Result->"status" = "finished" && $Result->"data" = $Update->"latest-version") do={
|
||||||
|
$LogPrintExit2 info $ScriptName ("Version " . $Update->"latest-version" . " is considered safe, updating...") false;
|
||||||
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
|
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
||||||
|
message=("Version " . $Update->"latest-version" . " is considered safe for " . $Update->"channel" . \
|
||||||
|
", updating on " . $Identity . "..."); link=$Link; silent=true });
|
||||||
|
$DoUpdate;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
:if ([ $ScriptFromTerminal $ScriptName ] = true) do={
|
||||||
|
:put ("Do you want to install RouterOS version " . $Update->"latest-version" . "? [y/N]");
|
||||||
|
:if (([ /terminal/inkey timeout=60 ] % 32) = 25) do={
|
||||||
|
$DoUpdate;
|
||||||
|
} else={
|
||||||
|
:put "Canceled...";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
:if ($SentRouterosUpdateNotification = $Update->"latest-version") do={
|
||||||
|
$LogPrintExit2 info $ScriptName ("Already sent the RouterOS update notification for version " . \
|
||||||
|
$Update->"latest-version" . ".") true;
|
||||||
|
}
|
||||||
|
|
||||||
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
|
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
||||||
|
message=("A new RouterOS version " . ($Update->"latest-version") . \
|
||||||
|
" is available for " . $Identity . ".\n\n" . \
|
||||||
|
[ $DeviceInfo ]); link=$Link; silent=true });
|
||||||
|
:set SentRouterosUpdateNotification ($Update->"latest-version");
|
||||||
}
|
}
|
||||||
|
|
||||||
:if ($SentRouterosUpdateNotification = $Update->"latest-version") do={
|
:if ($NumInstalled > $NumLatest) do={
|
||||||
$LogPrintExit2 info $0 ("Already sent the RouterOS update notification for version " . \
|
:if ($SentRouterosUpdateNotification = $Update->"latest-version") do={
|
||||||
$Update->"latest-version" . ".") true;
|
$LogPrintExit2 info $ScriptName ("Already sent the RouterOS downgrade notification for version " . \
|
||||||
}
|
$Update->"latest-version" . ".") true;
|
||||||
|
}
|
||||||
|
|
||||||
$SendNotification2 ({ origin=$0; \
|
$SendNotification2 ({ origin=$ScriptName; \
|
||||||
subject=([ $SymbolForNotification "sparkles" ] . "RouterOS update: " . $Update->"latest-version"); \
|
subject=([ $SymbolForNotification "warning-sign" ] . "RouterOS version: " . $Update->"latest-version"); \
|
||||||
message=("A new RouterOS version " . ($Update->"latest-version") . \
|
message=("A different RouterOS version " . ($Update->"latest-version") . \
|
||||||
" is available for " . $Identity . ".\n\n" . \
|
" is available for " . $Identity . ", but it is a downgrade.\n\n" . \
|
||||||
[ $DeviceInfo ]); link=$Link; silent=true });
|
[ $DeviceInfo ]); link=$Link; silent=true });
|
||||||
:set SentRouterosUpdateNotification ($Update->"latest-version");
|
$LogPrintExit2 info $ScriptName ("A different RouterOS version " . ($Update->"latest-version") . \
|
||||||
|
" is available for downgrade.") false;
|
||||||
|
:set SentRouterosUpdateNotification ($Update->"latest-version");
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
:if ($NumInstalled > $NumLatest) do={
|
$Main [ :jobname ];
|
||||||
:if ($SentRouterosUpdateNotification = $Update->"latest-version") do={
|
|
||||||
$LogPrintExit2 info $0 ("Already sent the RouterOS downgrade notification for version " . \
|
|
||||||
$Update->"latest-version" . ".") true;
|
|
||||||
}
|
|
||||||
|
|
||||||
$SendNotification2 ({ origin=$0; \
|
|
||||||
subject=([ $SymbolForNotification "warning-sign" ] . "RouterOS version: " . $Update->"latest-version"); \
|
|
||||||
message=("A different RouterOS version " . ($Update->"latest-version") . \
|
|
||||||
" is available for " . $Identity . ", but it is a downgrade.\n\n" . \
|
|
||||||
[ $DeviceInfo ]); link=$Link; silent=true });
|
|
||||||
$LogPrintExit2 info $0 ("A different RouterOS version " . ($Update->"latest-version") . \
|
|
||||||
" is available for downgrade.") false;
|
|
||||||
:set SentRouterosUpdateNotification ($Update->"latest-version");
|
|
||||||
}
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue