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 Packages Projects Releases Wiki Activity

hotspot-to-wpa: use $LogPrintExit and add more logging

Browse source
This commit is contained in:
Christian Hesse 2020-03-05 09:17:19 +01:00
parent 970641a974
commit e104b54bf0
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
hotspot-to-wpa
View file

@ -4,6 +4,8 @@
#
# add private WPA passphrase after hotspot login
:global LogPrintExit;
:local MacAddress $"mac-address";
:local UserName $username;
:local Date [ / system clock get date ];
@ -11,10 +13,13 @@
:if ([ / caps-man access-list print count-only where comment="--- hotspot-to-wpa above ---" disabled ] = 0) do={
/ caps-man access-list add comment="--- hotspot-to-wpa above ---" disabled;
log warn "Added disabled access-list entry with comment '--- hotspot-to-wpa above ---'.";
$LogPrintExit warning "Added disabled access-list entry with comment '--- hotspot-to-wpa above ---'." false;
}
:local PlaceBefore [ / caps-man access-list find where comment="--- hotspot-to-wpa above ---" disabled ];
$LogPrintExit info ("Adding/updating accesslist entry for mac address " . $MacAddress . \
" (user " . $UserName . ").") false;
/ caps-man access-list remove [ find where mac-address=$MacAddress comment~"^hotspot-to-wpa: " ];
:local Limits [ / caps-man access-list get $PlaceBefore ];