УЕП кључ Споонуеп за скрипту за приказ у АСЦИИ

Постед бы: админ ат 3 понедељак 9тх, 2009

ФрееБСД није прича је мало пажње УЕП тестирати рањивост Линукс-сам покушао одустајање од нечега.

Аирцрацк-НГ је велика вероватноћа да је пре или ИКЕНАКАっбез повећања до више од једне конзоле,欠КЕМАСУ бити паметан?
Приликом демонстрације пред клијентом, "Изгледа да ја не могу никога."
Био сам чишћење, тако да не успева подићи безбедност свести, Споонуеп покушао један ГУИ апликацију.

Аирцрацк-НГ то потрајати неко време у односу на АП моду пребацити је добра као што је обрађено у потпуности аутоматизована тражења и анализа ПАКЕТТОКЫАПУЦХА.
Нажалост, процес коначне анализе (аирцрацк-НГ) резултата у опцију јер је Хекс.
 [ XX:XX:XX:XX:XX:XX ] 
Претворити у паметну, једноставну Перл скрипте уређен објавити га.

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

Подастрт под другим |

Но Цомментс »