#!rsc
# RouterOS script: packages-update
# Copyright (c) 2019 Christian Hesse <mail@eworm.de>
#
# download packages and reboot for installation

:global DownloadPackage;

:local Update [ / system package update get ];

:if ([ :typeof ($Update->"latest-version") ] = "nothing") do={
  :log warning "Latest version is not known.";
  :error "Latest version is not known.";
}

:if ($Update->"installed-version" = $Update->"latest-version") do={
  :log info ("Version " . $Update->"latest-version" . " is already installed.");
  :error "No updates available.";
}

:foreach Package in=[ / system package find where !bundle ] do={
  :local PkgName [ / system package get $Package name ];
  if ([ $DownloadPackage $PkgName ($Update->"latest-version") ] = false) do={
    :log error ("Download for package " . $PkgName . " failed.");
    :error "Error: See log for details.";
  }
}

:foreach Script in=[ / system script find where name~"^(email|upload)-backup\$" ] do={
  / system script run $Script;
}

:if (!([ /system resource get version ] ~ ($Update->"channel"))) do={
  :put "Update channel changed. Want to downgrade? [y/N]";
  :if ([ :terminal inkey timeout=60 ] = 121) do={
    :log info ("Rebooting for downgrade.");
    :delay 1s;
    / system package downgrade;
  }
}

:log info ("Rebooting for update.");
:delay 1s;
/ system reboot;