ospf-to-leds: do not flood but log properly

This commit is contained in:
Christian Hesse 2021-07-06 21:41:02 +02:00
parent fcc0d1551a
commit 92a97b12ca
1 changed files with 2 additions and 1 deletions

View File

@ -18,11 +18,12 @@
:local LED ([ $ParseKeyValueStore ($InstanceVal->"comment") ]->"leds");
:local LEDType [ / system leds get [ find where leds=$LED ] type ];
$LogPrintExit2 debug $0 ("OSPF instance " . $InstanceVal->"name" . " is " . $InstanceVal->"state" . ".") false;
:if ($InstanceVal->"state" = "running" && $LEDType = "off") do={
$LogPrintExit2 info $0 ("OSPF instance " . $InstanceVal->"name" . " is running, led on!") false;
/ system leds set type=on [ find where leds=$LED ];
}
:if ($InstanceVal->"state" = "down" && $LEDType = "on") do={
$LogPrintExit2 info $0 ("OSPF instance " . $InstanceVal->"name" . " is down, led off!") false;
/ system leds set type=off [ find where leds=$LED ];
}
}