diff options
Diffstat (limited to 'examples/lua/lgi/show-wifi-networks.lua')
| -rwxr-xr-x | examples/lua/lgi/show-wifi-networks.lua | 122 |
1 files changed, 122 insertions, 0 deletions
diff --git a/examples/lua/lgi/show-wifi-networks.lua b/examples/lua/lgi/show-wifi-networks.lua new file mode 100755 index 00000000..954fee70 --- /dev/null +++ b/examples/lua/lgi/show-wifi-networks.lua @@ -0,0 +1,122 @@ +#!/usr/bin/env lua +-- -*- Mode: Lua; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- +-- 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 + |