NetworkManager/examples/lua/lgi/show-wifi-networks.lua
Thomas Haller 977ea352a0
all: update deprecated SPDX license identifiers
These SPDX license identifiers are deprecated ([1]). Update them.

[1] https://spdx.org/licenses/

  sed \
     -e '1 s%^/\* SPDX-License-Identifier: \(GPL-2.0\|LGPL-2.1\)+ \*/$%/* SPDX-License-Identifier: \1-or-later */%' \
     -e '1,2 s%^\(--\|#\|//\) SPDX-License-Identifier: \(GPL-2.0\|LGPL-2.1\)+$%\1 SPDX-License-Identifier: \2-or-later%' \
     -i \
     $(git grep -l SPDX-License-Identifier -- \
         ':(exclude)shared/c-*/' \
         ':(exclude)shared/n-*/' \
         ':(exclude)shared/systemd/src' \
         ':(exclude)src/systemd/src')
2021-01-05 09:46:21 +01:00

107 lines
3.1 KiB
Lua
Executable file

#!/usr/bin/env lua
-- SPDX-License-Identifier: GPL-2.0-or-later
--
-- Copyright (C) 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