WEP-KEY Spoonwep už scenarijų rodyti ASCII

Posted by: admin, 3 Pirmadienis 9, 2009

FreeBSD yra ne istorija yra mažai dėmesio iš WEP išbandyti pažeidžiamas Linux Aš bandė Atsitraukia.

Aircrack-ng yra didelė tikimybė, kad anksčiau ar IKENAKAっbe padidinti iki daugiau nei vienos konsolės,欠KEMASU būti gudri?
Kai demonstravimo prie kliento "Atrodo, kad aš negaliu prie nieko."
Aš valymo, taip, kad ji nesugeba padidinti informuotumą apie apsaugą, Spoonwep bandė GUI taikymo.

Aircrack-ng skirti šiek tiek laiko, lyginant su AP režimo jungiklis yra gerai, kaip yra tvarkomi visiškai automatinė paieška ir analizė PAKETTOKYAPUCHA.
Deja, procesas analizė (aircrack-ng) rezultatų galimybę, nes tai HEX. 
 [ XX:XX:XX:XX:XX:XX ]
Norėdami konvertuoti į protingas, paprastas perl scenarijų lygiuojant į ją paskelbia.

hex-asc.pl 
 #!/usr/bin/perl

## ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
## WEP-KEY BIN Viewer for Spoonwep
## (ASCII to BINARY Changer for Spoonwep / Spoonwep2)
##
##           http://freebsd.ai-line.com/  by sio (Japan)
## ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

## How to use. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
#  1.Permission change to 0700.
#  2.When Spoonwep is finished, this running.
#  3.Executes this.
#  4.After that, Please give me a mail(sio<at>ai-line.com).
#    Girl or Japanese limitation ;-)
## ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

## configure
$output_dir = '/root/Desktop/CrackedWEP';

## Spoonwep default setting
$lastattack_dir = '/usr/local/bin/wifispoonfeeder/spoonwep/lastattack';
$key_file = 'key.txt';
$essid_file = 'wscapture-01.txt';

## wepkey
$readfile = "$lastattack_dir/$key_file";
open(IN, $readfile);
  $wepkey = <IN>;
close(IN);
$wepkey =~ s/\[|\]|\ |\:|\n//g;  # [ ww:xx:yy:zz ] => wwxxyyzz
$wepkey =~ s/([a-fA-F0-9][a-fA-F0-9])/pack("H2",$1)/eg; # ASCII to BINARY

## essid
$readfile = "$lastattack_dir/$essid_file";
open(IN, $readfile);
  @essid = <IN>;
close(IN);
$essid = $essid[2];
@essid = split(/,/, $essid);
$essid = $essid[13];
$essid =~ s/^\s*//;
$essid =~ s/\s*$//;

## Write
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$year += 1900;
$mon += 1;
$filename = "$year$mon$mday$hour$min$sec";
unless (-d $output_dir) {
  mkdir $output_dir;
}
open(FILE, "> $output_dir/$filename");
  print FILE "ESSID  = $essid\n";
  print FILE "WEPKEY = $wepkey";
close (FILE);

Filed under kita |

No Comments »