blob: 2878a279280e68ff087d9c64744d5ce2628fcd37 (
about) (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
#!rsc
# RouterOS script: check-lte-firmware-update
# Copyright (c) 2018 Christian Hesse <mail@eworm.de>
#
# check for LTE firmware update, send notification e-mails
:global "identity";
:global "sent-lte-firmware-update-notification";
:global SendNotification;
:foreach interface in=[ / interface lte find ] do={
:local intname [ / interface lte get $interface name ];
:do {
:local firmware [ / interface lte firmware-upgrade $interface once as-value ];
# strip the extra line break (TODO: remove when fixed upstream)
:set ($firmware->"latest") [ :pick ($firmware->"latest") 0 [ :find ($firmware->"latest") "\n" ] ];
:if ($"sent-lte-firmware-update-notification" = ($firmware->"latest")) do={
:log debug ("Already sent the LTE firmware update notification for version " . \
($firmware->"latest") . ".");
} else={
:if (($firmware->"installed") != ($firmware->"latest")) do={
$SendNotification ("LTE firmware update notification") \
("A new firmware version " . ($firmware->"latest") . " is available for " . \
"LTE interface " . $intname . " on " . $identity . ".");
:set "sent-lte-firmware-update-notification" ($firmware->"latest");
}
}
} on-error={
:log debug ("Could not get latest LTE firmware version for interface " . \
$intname . ".");
}
}
|