Wscan

#!/bin/sh
sudo /sbin/iwlist wlan2 scan | awk 'function round(A) {return int( A + 0.5 )};BEGIN{off=0;on=0;wpa=0;is_wpa=0;FS="\n";RS="Address: "
print "BSSID              CH    ENC  Kvalita Signal ESSID\n————————————————————————————————————————————————————————————————"}
/WPA/{is_wpa = 1}{if (NF>6){bssid = $1;channel = $2;essid = $6;encrypt = $5;sub (/Channel:/, "", channel);sub (/ */, "", channel);
sub (/ESSID:/, "", essid);sub (/ */, "", essid);sub (/Encryption key:/, "", encrypt);sub (/ */, "", encrypt);
split ($4, tmp, "=");
sub(/  Signal level/, "", tmp[2]);
signal = tmp[3];
quality = tmp[2];
quala=substr(quality,1,2);
qualb=substr(quality,4,2);
signal =100 + signal
quality = (100 / qualb ) * quala
quality = round(quality);
if (encrypt == "off")
{off++;encrypt = "OFF"}
else if (is_wpa)
{wpa++;encrypt = "WPA";is_wpa = 0}
else
{on++;encrypt = "WEP"}
print bssid "  " channel "      " encrypt "    "  quality "%    " signal "%   " essid
}}END{print "\nPocet wifi siti: "off + on + wpa" , WEP: "on" , WPA: "wpa " , Nekodovanych: "off }'