Mirrors
/
aredn
mirror of https://github.com/aredn/aredn.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Merge branch 'wscan' into develop

This commit is contained in:
AE6XE 2015-04-04 22:29:35 -07:00
parent 7c216480a5 8b9ac8639a
commit a82b4be70f
1 changed files with 40 additions and 192 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

218
files/usr/local/bin/wscan
View File

@ -6,7 +6,7 @@
Copyright (c) 2013 David Rivenburg et al. BroadBand-HamNet Copyright (c) 2013 David Rivenburg et al. BroadBand-HamNet
2015-04-01 AE6XE update to display neighbor nodes 2015-04-01 AE6XE update to display neighbor nodes, replace vendor with mode
This program is free software: you can redistribute it and/or modify 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 it under the terms of the GNU General Public License as published by
@ -50,170 +50,6 @@ sub usage
exit; exit;
} }
%vendors =
(
"000D72" => "2Wire",
"001288" => "2Wire",
"001495" => "2Wire",
"00183F" => "2Wire",
"0019E4" => "2Wire",
"001AC4" => "2Wire",
"001B5B" => "2Wire",
"001EC7" => "2Wire",
"001FB3" => "2Wire",
"00217C" => "2Wire",
"0022A4" => "2Wire",
"002351" => "2Wire",
"002456" => "2Wire",
"00253C" => "2Wire",
"002650" => "2Wire",
"00D09E" => "2Wire",
"34EF44" => "2Wire",
"B0E754" => "2Wire",
"001D5A" => "2Wire",
"001CB3" => "Apple",
"001EC2" => "Apple",
"001F5B" => "Apple",
"001FF3" => "Apple",
"0021E9" => "Apple",
"002241" => "Apple",
"002312" => "Apple",
"002332" => "Apple",
"00236C" => "Apple",
"0023DF" => "Apple",
"002436" => "Apple",
"002500" => "Apple",
"00254B" => "Apple",
"0025BC" => "Apple",
"002608" => "Apple",
"00264A" => "Apple",
"0026B0" => "Apple",
"0026BB" => "Apple",
"041E64" => "Apple",
"34159E" => "Apple",
"40D32D" => "Apple",
"58B035" => "Apple",
"60FB42" => "Apple",
"64B9E8" => "Apple",
"7C6D62" => "Apple",
"90840D" => "Apple",
"D49A20" => "Apple",
"F81EDF" => "Apple",
"000393" => "Apple",
"000502" => "Apple",
"000A27" => "Apple",
"000A95" => "Apple",
"000D93" => "Apple",
"001124" => "Apple",
"0016CB" => "Apple",
"0017F2" => "Apple",
"003065" => "Apple",
"0050E4" => "Apple",
"00A040" => "Apple",
"001E52" => "Apple",
"001451" => "Apple",
"0019E3" => "Apple",
"001B63" => "Apple",
"001D4F" => "Apple",
"080007" => "Apple",
"0010FA" => "Apple",
"0030BD" => "Belkin",
"001150" => "Belkin",
"00173F" => "Belkin",
"002275" => "Belkin",
"944452" => "Belkin",
"001CDF" => "Belkin",
"0050BA" => "D-Link",
"000D88" => "D-Link",
"000F3D" => "D-Link",
"001195" => "D-Link",
"001346" => "D-Link",
"0015E9" => "D-Link",
"00179A" => "D-Link",
"00195B" => "D-Link",
"001B11" => "D-Link",
"001CF0" => "D-Link",
"001E58" => "D-Link",
"002191" => "D-Link",
"0022B0" => "D-Link",
"002401" => "D-Link",
"00265A" => "D-Link",
"1CAFF7" => "D-Link",
"1CBDB9" => "D-Link",
"00055D" => "D-Link",
"0080C8" => "D-Link",
"0016F0" => "Dell",
"00188B" => "Dell",
"00065B" => "Dell",
"000874" => "Dell",
"00B0D0" => "Dell",
"00C04F" => "Dell",
"000BDB" => "Dell",
"00123F" => "Dell",
"0015C5" => "Dell",
"001AA0" => "Dell",
"001C23" => "Dell",
"001D09" => "Dell",
"001EC9" => "Dell",
"002170" => "Dell",
"00219B" => "Dell",
"002219" => "Dell",
"0026B9" => "Dell",
"B8AC6F" => "Dell",
"001143" => "Dell",
"001372" => "Dell",
"001422" => "Dell",
"0019B9" => "Dell",
"001E4F" => "Dell",
"0023AE" => "Dell",
"0024E8" => "Dell",
"002564" => "Dell",
"A4BADB" => "Dell",
"00045A" => "Linksys",
"000625" => "Linksys",
"000E08" => "Cisco-Linksys",
"000C41" => "Cisco-Linksys",
"000F66" => "Cisco-Linksys",
"001217" => "Cisco-Linksys",
"001310" => "Cisco-Linksys",
"0016B6" => "Cisco-Linksys",
"001A70" => "Cisco-Linksys",
"001C10" => "Cisco-Linksys",
"001D7E" => "Cisco-Linksys",
"001EE5" => "Cisco-Linksys",
"002129" => "Cisco-Linksys",
"00226B" => "Cisco-Linksys",
"002369" => "Cisco-Linksys",
"00259C" => "Cisco-Linksys",
"687F74" => "Cisco-Linksys",
"0014BF" => "Cisco-Linksys",
"001839" => "Cisco-Linksys",
"0018F8" => "Cisco-Linksys",
"00095B" => "Netgear",
"0024B2" => "Netgear",
"0026F2" => "Netgear",
"30469A" => "Netgear",
"C03F0E" => "Netgear",
"000FB5" => "Netgear",
"00146C" => "Netgear",
"00184D" => "Netgear",
"001B2F" => "Netgear",
"001E2A" => "Netgear",
"001F33" => "Netgear",
"00223F" => "Netgear",
"000E3B" => "Hawking",
"00A0C5" => "Zyxel",
"004001" => "Zyxel",
"001349" => "Zyxel",
"0019CB" => "Zyxel",
"0023F8" => "Zyxel",
"404A03" => "Zyxel",
"002722" => "Ubiquiti",
"00156D" => "Ubiquiti",
);
sub pushAP sub pushAP
{ {
my($signal, $chan, $key, $ssid, $mac, $mode) = @_; my($signal, $chan, $key, $ssid, $mac, $mode) = @_;
@ -230,27 +66,30 @@ sub pushAP
$mac1 = $1 . $2 . $3; $mac1 = $1 . $2 . $3;
$mac2 = $4 . $5 . $6; $mac2 = $4 . $5 . $6;
$mac = $mac1 . $mac2; $mac = $mac1 . $mac2;
if(exists $vendors{$mac1}) { $vendor = $vendors{$mac1} }
else { $vendor = "" }
$vendor = "Ad-Hoc" if $mode eq "Ad-Hoc"; if ($ssid =~ /AREDN-(5|10|20)-v[3456]$/) {$typenet = "AREDN" }
elsif ($ssid =~ /BroadbandHamnet-(5|10|20)-v[3456]$/) {$typenet = "BroadbandHament" }
elsif ($mode eq "Master") {$typenet = "AP" }
elsif ($mode eq "Managed") {$typenet = "Client"}
elsif ($mode eq "Ad-Hoc" and $ssid =~ /(.*)-(5|10|20)-v[3456]$/ ) {$typenet = $1 }
else {$typenet = $mode}
if($avg) if($avg)
{ {
$avgs{"$mac total"} += $signal; $avgs{"$mac total"} += $signal;
$avgs{"$mac num"} += 1; $avgs{"$mac num"} += 1;
$aphash{$mac} = sprintf "%2d %s %-32s %s:%s %s\n", $aphash{$mac} = sprintf "%2d %s %-32s %s:%s %s\n",
$chan, $key, $ssid, $mac1, $mac2, $vendor; $chan, $key, $ssid, $mac1, $mac2, $typenet;
} }
elsif($web) elsif($web)
{ {
push @list, sprintf "%03d|%d|%s|%s|%s:%s|%s", push @list, sprintf "%03d|%d|%s|%s|%s:%s|%s",
$signal, $chan, $key, $ssid, $mac1, $mac2, $vendor; $signal, $chan, $key, $ssid, $mac1, $mac2, $typenet;
} }
else else
{ {
push @list, sprintf "%3d %2d %s %-32s %s:%s %s\n", push @list, sprintf "%3d %2d %s %-32s %s:%s %s\n",
$signal, $chan, $key, $ssid, $mac1, $mac2, $vendor; $signal, $chan, $key, $ssid, $mac1, $mac2, $typenet;
} }
} }
@ -290,10 +129,14 @@ if($raw)
exit; exit;
} }
$bbchan = 1;
while(1) while(1)
{ {
$line = `grep ssid /etc/config/wireless | tail -1`;
$line =~ /['"](.*-(5|10|20)-v[3456])/;
$myssid = $1;
$myssid =~ /(.*)-(5|10|20)-v[3456]/;
$mymode = $1;
open(FILE, "/usr/bin/iwinfo $iface scan 2>&1 |") or die "iwinfo failed"; open(FILE, "/usr/bin/iwinfo $iface scan 2>&1 |") or die "iwinfo failed";
$mode = ""; $mode = "";
$ssid = ""; $ssid = "";
@ -303,11 +146,10 @@ while(1)
while($line = <FILE>) while($line = <FILE>)
{ {
if($line =~ /Cell \d+ - Address: (\S+)/) if($line =~ /Cell \d+ - Address: (\S+)/ )
{ {
pushAP($signal, $chan, $key, $ssid, $mac, $mode); if ($ssid ne $myssid) { pushAP($signal, $chan, $key, $ssid, $mac, $mode)}
$mac = $1; $mac = $1;
if($ssid =~ /-(5|10|20)-v[3456]$/) { $bbchan = $chan }
} }
if($line =~ /\bESSID: "(.*)"/) { $ssid = $1 } if($line =~ /\bESSID: "(.*)"/) { $ssid = $1 }
@ -320,15 +162,14 @@ while(1)
close(FILE); close(FILE);
if($ssid =~ /-(5|10|20)-v[3456]$/) { $bbchan = $chan } if ($ssid ne $myssid) {pushAP($signal, $chan, $key, $ssid, $mac, $mode)}
pushAP($signal, $chan, $key, $ssid, $mac, $mode);
sleep 1 if not scalar @list and $loops != 1; sleep 1 if not scalar @list and $loops != 1;
$mode = ""; $mode = "";
$signal = 0; $signal = 0;
$key = "none"; $key = "none";
$chan = 1;
++$iters; ++$iters;
$bbchan = `iw $iface info | grep channel | cut -d\\ -f2`;
open(FILE, "/usr/sbin/iw $iface station dump 2>&1 |") or die "/usr/sbin/iw failed"; open(FILE, "/usr/sbin/iw $iface station dump 2>&1 |") or die "/usr/sbin/iw failed";
@ -339,15 +180,20 @@ while(1)
pushAP($signal, $bbchan, $key, $ssid, $mac, $mode); pushAP($signal, $bbchan, $key, $ssid, $mac, $mode);
$mac = $1; $mac = $1;
$ip = `grep $mac /proc/net/arp`; $ip = `grep $mac /proc/net/arp`;
$mac = uc $mac;
if ( $ip ne "" )
{
$ip =~ s/[ \t].*$// ; $ip =~ s/[ \t].*$// ;
chomp($ip); chomp($ip);
$ssid = $ip; $ssid = $ip;
$mac = uc $mac;
if( $ip ne "") if( $ip ne "")
{ {
foreach(`nslookup $ip`){ next unless ($ssid) = /Address 1: $ip (\S+)\.local\.mesh/ } foreach(`nslookup $ip`){ next unless ($ssid) = /Address 1: $ip (\S+)\.local\.mesh/ }
if ( $ssid eq "" ) { $ssid = $ip }
} }
$mode = 'Ad-Hoc'; }
else { $ssid = "????" }
$mode=$mymode;
} }
if($line =~ /signal avg:[ \t]+([-\d]+)/) { $signal = $1 } if($line =~ /signal avg:[ \t]+([-\d]+)/) { $signal = $1 }
@ -362,18 +208,18 @@ while(1)
if($avg) if($avg)
{ {
system "clear"; system "clear";
printf "Sig Rel Ch E SSID or Hostname MAC Vendor %6d\n", $iters; printf "Sig Rel Ch E SSID or Hostname MAC Mode %6d\n", $iters;
print "--- --- -- - -------------------------------- ------------- ------\n"; print "--- --- -- - -------------------------------- ------------- ------\n";
} }
elsif($web) elsif($web)
{ {
print "<table border=1 cellpadding=5>\n"; print "<table border=1 cellpadding=5>\n";
print "<tr><th>Sig</th><th>Chan</th><th>Enc</th><th>SSID or Hostname</th><th>MAC</th><th>Vendor</th></tr>\n"; print "<tr><th>Sig</th><th>Chan</th><th>Enc</th><th>SSID or Hostname</th><th>MAC</th><th>Mode</th></tr>\n";
} }
else else
{ {
#system "clear"; #system "clear";
printf "Sig Ch E SSID or Hostname MAC Vendor %6d\n", $iters; printf "Sig Ch E SSID or Hostname MAC Mode %6d\n", $iters;
print "--- -- - -------------------------------- ------------- ------\n"; print "--- -- - -------------------------------- ------------- ------\n";
} }
} }
@ -395,7 +241,9 @@ while(1)
{ {
foreach $line (sort @list) foreach $line (sort @list)
{ {
print "<tr>"; if ( $line =~ /AREDN/) { print "<tr class=\"wscan-row-node\">"}
else { print "<tr>"}
my $i = 0; my $i = 0;
foreach $val (split /\|/, $line) foreach $val (split /\|/, $line)
{ {