diff options
| -rw-r--r-- | global-config.changes | 8 | ||||
| -rw-r--r-- | script-updates | 23 |
2 files changed, 30 insertions, 1 deletions
diff --git a/global-config.changes b/global-config.changes new file mode 100644 index 0000000..7c430dc --- /dev/null +++ b/global-config.changes @@ -0,0 +1,8 @@ +# RouterOS global-config changes +# Copyright (c) 2019 Christian Hesse <mail@eworm.de> + +# Changes for global-config to be added to notification on script-updates +:global GlobalConfigChanges { + 1="moved variables from global-config to global-functions for independence"; + 2="variable names became CamelCase to work around scripting issues"; +}; diff --git a/script-updates b/script-updates index 971f2e4..d2390db 100644 --- a/script-updates +++ b/script-updates @@ -78,9 +78,30 @@ } :if ($GlobalConfigVersion < $ExpectedConfigVersion) do={ + :global GlobalConfigChanges; + :local ChangeLogCode; + :local Changes; + + :log debug ("Fetching changelog."); + :do { + :local Result [ / tool fetch check-certificate=yes-without-crl \ + ($ScriptUpdatesBaseUrl . "global-config.changes" . $ScriptUpdatesUrlSuffix) \ + output=user as-value ]; + :if ($Result->"status" = "finished") do={ + :set ChangeLogCode ($Result->"data"); + } + } on-error={ + :log info ("Failed fetching changes!"); + } + [ :parse $ChangeLogCode ]; + :for I from=($GlobalConfigVersion + 1) to=$ExpectedConfigVersion do={ + :set Changes ( $Changes . "\n * " . $GlobalConfigChanges->[ :tostr $I ] ); + } + $SendNotification "Configuration warning!" \ ("Current configuration on " . $Identity . " is out of date. " . \ "Please update global-config, then increase variable " . \ "GlobalConfigVersion (currently " . $GlobalConfigVersion . \ - ") to " . $ExpectedConfigVersion . " and re-run global-config."); + ") to " . $ExpectedConfigVersion . " and re-run global-config.\n\n" . \ + "Changes:" . $Changes); } |