WEP-KEY Spoonwep voor een script weer te geven in ASCII

Geplaatst door: admin op 3 maandag 9th, 2009

FreeBSD is niet in het verhaal is een beetje aandacht van WEP voor het testen van de kwetsbaarheid van Linux Ik heb geprobeerd om terug.

Aircrack-ng is een grote kans dat vroeg of IKENAKAっzonder verhoging tot meer dan een console,欠KEMASU te slim?
Bij een demonstratie voor de klant, "Het lijkt erop dat ik niet voor iedereen."
Ik was opruimen, zodat het niet verhogen van de veiligheid bewustzijn, Spoonwep geprobeerd een GUI applicatie.

Aircrack-ng te nemen enige tijd in vergelijking met de AP-modus-schakelaar is goed zoals het is verwerkt in een volledig geautomatiseerde bevraging en analyse PAKETTOKYAPUCHA.
Helaas, het proces van de definitieve analyse (aircrack-ng) de resultaten in de optie, omdat het HEX.
 [ XX:XX:XX:XX:XX:XX ] 
Om te converteren naar een slimme, eenvoudige perl script geregeld te publiceren.

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);
 

Bewaard onder andere |

Geen reacties »