Parse iw scan output

scan.awk

# iw wlan0 scan | sed -e 's#(on wlan# (on wlan#g' | awk -f scan.awk
$1 == "BSS" {
    MAC = $2
    print $2
    e = wifi[MAC]
    e["enc"] = "Open"
}
$1 == "SSID:" {
    e = wifi[MAC]
    e["SSID"] = $2
}
$1 == "freq:" {
    e = wifi[MAC]
    e["freq"] = $NF
}
$1 == "signal:" {
    e = wifi[MAC]
    e["sig"] = $2 " " $3
}
$1 == "WPA:" {
    e = wifi[MAC]
    e["enc"] = "WPA"
}
$1 == "WEP:" {
    e = wifi[MAC]
    e["enc"] = "WEP"
}
END {
    printf "%s\t\t%s\t%s\t\t%s\n","SSID","Frequency","Signal","Encryption"

    for (w in wifi) {
        e = wifi[w]
        printf "%s\t\t%s\t\t%s\t%s\n",e["SSID"],e["freq"],e["sig"],e["enc"]
    }
}