mirror.MikroTik/nymurbd.MikroTik-scripts
1
0
Fork 0
mirror of https://github.com/nymurbd/MikroTik-scripts.git synced 2025-08-04 10:14:51 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

add scripts

Browse source
This commit is contained in:
Christian Hesse 2018-07-05 15:29:26 +02:00
parent 1d99dc38ff
commit e1f134ead5
28 changed files with 842 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

41
daily-psk Normal file
View file

@ -0,0 +1,41 @@
# RouterOS script: daily-psk
# Copyright (c) 2013-2018 Christian Hesse <mail@eworm.de>
#
# update daily PSK (pre shared key)
:global "daily-psk-match-comment";
# check mail server
:if ([ / tool netwatch get [ find where comment=[ / tool e-mail get address ] ] status ] != "up" ) do={
:error "Mail server is not up.";
}
# check time
:if ([ / system ntp client get status ] != "synchronized") do={
:error "Time is not yet synchronized from ntp.";
}
:local GeneratePSK [ :parse [ / system script get GeneratePSK source ] ];
:local newpsk [ $GeneratePSK ];
:local sendmail 0;
:foreach acclist in=[ / interface wireless access-list find where comment~$"daily-psk-match-comment" ] do={
:local interface [ / interface wireless access-list get $acclist interface ];
:local ssid [ / interface wireless get $interface ssid ];
:local oldpsk [ / interface wireless access-list get $acclist private-pre-shared-key ];
:if ($newpsk != $oldpsk) do={
:log info ("Updating daily PSK for " . $interface . " to " . $newpsk . " (was " . $oldpsk . ")");
/ interface wireless access-list set $acclist private-pre-shared-key=$newpsk;
:set sendmail 1;
}
}
:if ($sendmail = 1) do={
/ system script run email-daily-psk;
}
/ system scheduler set disabled=yes [ find where name=daily-psk disabled=no ];