c0e075c902
We no longer add these. If you use Emacs, configure it yourself.
Also, due to our "smart-tab" usage the editor anyway does a subpar
job handling our tabs. However, on the upside every user can choose
whatever tab-width he/she prefers. If "smart-tabs" are used properly
(like we do), every tab-width will work.
No manual changes, just ran commands:
F=($(git grep -l -e '-\*-'))
sed '1 { /\/\* *-\*- *[mM]ode.*\*\/$/d }' -i "${F[@]}"
sed '1,4 { /^\(#\|--\|dnl\) *-\*- [mM]ode/d }' -i "${F[@]}"
Check remaining lines with:
git grep -e '-\*-'
The ultimate purpose of this is to cleanup our files and eventually use
SPDX license identifiers. For that, first get rid of the boilerplate lines.
122 lines
3.8 KiB
Lua
Executable File
122 lines
3.8 KiB
Lua
Executable File
#!/usr/bin/env lua
|
|
-- vim: ft=lua ts=2 sts=2 sw=2 et ai
|
|
--
|
|
-- This program is free software; you can redistribute it and/or modify
|
|
-- it under the terms of the GNU General Public License as published by
|
|
-- the Free Software Foundation; either version 2 of the License, or
|
|
-- (at your option) any later version.
|
|
--
|
|
-- This program is distributed in the hope that it will be useful,
|
|
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
-- GNU General Public License for more details.
|
|
--
|
|
-- You should have received a copy of the GNU General Public License along
|
|
-- with this program; if not, write to the Free Software Foundation, Inc.,
|
|
-- 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
--
|
|
-- Copyright 2015 Red Hat, Inc.
|
|
--
|
|
--
|
|
-- This example lists Wi-Fi access points NetworkManager scanned on Wi-Fi devices.
|
|
-- The example uses libnm library using GObject introspection via Lua lgi module.
|
|
-- Most distribution ship the module as lua-lgi package.
|
|
-- libnm guide: https://developer.gnome.org/libnm/1.0/
|
|
-- Lua-lgi guide: https://github.com/pavouk/lgi/blob/master/docs/guide.md
|
|
--
|
|
|
|
local lgi = require 'lgi'
|
|
local NM = lgi.NM
|
|
|
|
function is_empty(t)
|
|
local next = next
|
|
if next(t) then return false else return true end
|
|
end
|
|
|
|
function ssid_to_utf8(ap)
|
|
local ssid = ap:get_ssid()
|
|
if not ssid then return "" end
|
|
return NM.utils_ssid_to_utf8(ssid:get_data())
|
|
end
|
|
|
|
function print_device_info(device)
|
|
local active_ap = device:get_active_access_point()
|
|
if active_ap then ssid = ssid_to_utf8(active_ap) end
|
|
local info = string.format("Device: %s | Driver: %s | Active AP: %s",
|
|
device:get_iface(), device:get_driver(), ssid)
|
|
print(info)
|
|
print(string.rep("=", info:len()))
|
|
end
|
|
|
|
function flags_to_string(flags)
|
|
local str = ""
|
|
for flag, _ in pairs(flags) do
|
|
str = str .. " " .. flag
|
|
end
|
|
if str == "" then str = "NONE" end
|
|
return (str:gsub( "^%s", ""))
|
|
end
|
|
|
|
function flags_to_security(flags, wpa_flags, rsn_flags)
|
|
local str = ""
|
|
if flags["PRIVACY"] and is_empty(wpa_flags) and is_empty(rsn_flags) then
|
|
str = str .. " WEP"
|
|
end
|
|
if not is_empty(wpa_flags) then
|
|
str = str .. " WPA1"
|
|
end
|
|
if not is_empty(rsn_flags) then
|
|
str = str .. " WPA2"
|
|
end
|
|
if wpa_flags["KEY_MGMT_802_1X"] or rsn_flags["KEY_MGMT_802_1X"] then
|
|
str = str .. " 802.1X"
|
|
end
|
|
return (str:gsub( "^%s", ""))
|
|
end
|
|
|
|
function print_ap_info(ap)
|
|
local strength = ap:get_strength()
|
|
local frequency = ap:get_frequency()
|
|
local flags = ap:get_flags()
|
|
local wpa_flags = ap:get_wpa_flags()
|
|
local rsn_flags = ap:get_rsn_flags()
|
|
-- remove extra NONE from the flags tables
|
|
flags["NONE"] = nil
|
|
wpa_flags["NONE"] = nil
|
|
rsn_flags["NONE"] = nil
|
|
print("SSID: ", ssid_to_utf8(ap))
|
|
print("BSSID: ", ap:get_bssid())
|
|
print("Frequency: ", frequency)
|
|
print("Channel: ", NM.utils_wifi_freq_to_channel(frequency))
|
|
print("Mode: ", ap:get_mode())
|
|
print("Flags: ", flags_to_string(flags))
|
|
print("WPA flags: ", flags_to_string(wpa_flags))
|
|
print("RSN flags: ", flags_to_string(rsn_flags))
|
|
print("Security: ", flags_to_security(flags, wpa_flags, rsn_flags))
|
|
print(string.format("Strength: %s %s%%", NM.utils_wifi_strength_bars(strength), strength))
|
|
print("")
|
|
end
|
|
|
|
|
|
---------------------------
|
|
-- Main code starts here --
|
|
---------------------------
|
|
-- Call setlocale() else NM.utils_wifi_strength_bars() will think the locale
|
|
-- is ASCII-only, and return the fallback characters rather than the unicode bars
|
|
os.setlocale('')
|
|
|
|
-- get all devices
|
|
client = NM.Client.new()
|
|
devs = client:get_devices()
|
|
|
|
-- print APs for all Wi-Fi devices
|
|
for _, dev in ipairs(devs) do
|
|
if dev:get_device_type() == "WIFI" then
|
|
print_device_info(dev)
|
|
for _, ap in ipairs(dev:get_access_points()) do
|
|
print_ap_info(ap)
|
|
end
|
|
end
|
|
end
|
|
|