Crash_Override/routeros-scripts
1
0
Fork 0
mirror of https://github.com/eworm-de/routeros-scripts synced 2024-05-14 08:04:19 +00:00
Code Issues Projects Releases Packages Wiki Activity

daily-psk: use $LogPrintExit

Browse source
This commit is contained in:
Christian Hesse 2020-03-05 08:26:05 +01:00
parent 1dbd91f76d
commit 3127800496
3 changed files with 11 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
daily-psk.capsman
View file

@ -7,9 +7,10 @@
#
# !! Do not edit this file, it is generated from template!
:global Identity;
:global DailyPskMatchComment;
:global Identity;
:global LogPrintExit;
:global SendNotification;
:global UrlEncode;
:global WaitForFile;
@ -56,13 +57,13 @@
:local Skip 0;
:if ($NewPsk != $OldPsk) do={
:log info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")");
$LogPrintExit info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")") false;
/ caps-man access-list set $AccList private-passphrase=$NewPsk;
:if ([ / caps-man interface print count-only where configuration=$Configuration ] > 0) do={
:foreach SeenSsid in=$Seen do={
:if ($SeenSsid = $Ssid) do={
:log debug ("Already sent a mail for SSID " . $Ssid . ", skipping.");
$LogPrintExit debug ("Already sent a mail for SSID " . $Ssid . ", skipping.") false;
:set Skip 1;
}
}

7
daily-psk.local
View file

@ -7,9 +7,10 @@
#
# !! Do not edit this file, it is generated from template!
:global Identity;
:global DailyPskMatchComment;
:global Identity;
:global LogPrintExit;
:global SendNotification;
:global UrlEncode;
:global WaitForFile;
@ -56,13 +57,13 @@
:local Skip 0;
:if ($NewPsk != $OldPsk) do={
:log info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")");
$LogPrintExit info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")") false;
/ interface wireless access-list set $AccList private-pre-shared-key=$NewPsk;
:if ([ / interface wireless print count-only where name=$IntName disabled=no ] = 1) do={
:foreach SeenSsid in=$Seen do={
:if ($SeenSsid = $Ssid) do={
:log debug ("Already sent a mail for SSID " . $Ssid . ", skipping.");
$LogPrintExit debug ("Already sent a mail for SSID " . $Ssid . ", skipping.") false;
:set Skip 1;
}
}

5
daily-psk.template
View file

@ -11,6 +11,7 @@
:global DailyPskMatchComment;
:global Identity;
:global LogPrintExit;
:global SendNotification;
:global UrlEncode;
:global WaitForFile;
@ -60,7 +61,7 @@
:local Skip 0;
:if ($NewPsk != $OldPsk) do={
:log info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")");
$LogPrintExit info ("Updating daily PSK for " . $Ssid . " to " . $NewPsk . " (was " . $OldPsk . ")") false;
/ interface wireless access-list set $AccList private-pre-shared-key=$NewPsk;
/ caps-man access-list set $AccList private-passphrase=$NewPsk;
@ -68,7 +69,7 @@
:if ([ / caps-man interface print count-only where configuration=$Configuration ] > 0) do={
:foreach SeenSsid in=$Seen do={
:if ($SeenSsid = $Ssid) do={
:log debug ("Already sent a mail for SSID " . $Ssid . ", skipping.");
$LogPrintExit debug ("Already sent a mail for SSID " . $Ssid . ", skipping.") false;
:set Skip 1;
}
}