diff options
| -rw-r--r-- | doc/hotspot-to-wpa.md | 1 | ||||
| -rw-r--r-- | hotspot-to-wpa | 4 |
2 files changed, 5 insertions, 0 deletions
diff --git a/doc/hotspot-to-wpa.md b/doc/hotspot-to-wpa.md index b410979..8733a7c 100644 --- a/doc/hotspot-to-wpa.md +++ b/doc/hotspot-to-wpa.md @@ -56,6 +56,7 @@ Create hotspot login credentials: Additionally templates can be created to give more options for access list: +* `action`: set to `reject` to ignore logins on that hotspot * `private-passphrase`: do **not** use passphrase from hotspot's user credentials, but given one - or unset (use default passphrase) with special word `ignore` diff --git a/hotspot-to-wpa b/hotspot-to-wpa index b307a10..6290eda 100644 --- a/hotspot-to-wpa +++ b/hotspot-to-wpa @@ -23,6 +23,10 @@ :local Template [ / caps-man access-list get ([ find where disabled \ comment=("hotspot-to-wpa template " . $Hotspot) ]->0) ]; +:if ($Template->"action" = "reject") do={ + $LogPrintExit2 info $0 ("Ignoring login for hotspot '" . $Hotspot . "'.") true; +} + :if ([ :len [ / caps-man access-list find where comment="--- hotspot-to-wpa above ---" disabled ] ] = 0) do={ / caps-man access-list add comment="--- hotspot-to-wpa above ---" disabled=yes; $LogPrintExit2 warning $0 ("Added disabled access-list entry with comment '--- hotspot-to-wpa above ---'.") false; |