WEP-KEY Spoonwep untuk naskah yang akan ditampilkan dalam ASCII

Dikirim oleh: admin di 3 Senin 9th, 2009

FreeBSD tidak dalam cerita sedikit perhatian dari WEP untuk menguji kerentanan Linux saya mencoba kembali.

Aircrack-ng merupakan probabilitas tinggi bahwa cepat atau IKENAKAっtanpa meningkat menjadi lebih dari satu konsol,欠KEMASU menjadi pintar?
Ketika demonstrasi di depan klien, "Sepertinya saya tidak dapat kepada siapapun."
Saya membersihkan, sehingga gagal untuk meningkatkan kesadaran keamanan, Spoonwep mencoba sebuah aplikasi GUI.

Aircrack-ng untuk mengambil beberapa kali dibandingkan dengan mode AP beralih baik karena diproses secara otomatis dalam pencarian dan analisis PAKETTOKYAPUCHA.
Dgn disayangkan, proses analisis akhir (aircrack-ng) hasil pilihan karena Hex.
 [ XX:XX:XX:XX:XX:XX ] 
Dikonversi ke pintar, diatur skrip perl sederhana untuk mempublikasikannya.

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 lain |

No Comments »