Hi guys,
i'm trying to generate a passwordlist for rainbow tables.
I know that t-com routers use a password with a "SP-" at the beging and 9 chars of HEX behind it.
So it should look like "SP-1A2B3C4D5"
When i would have a list with all possibilities (Bruteforce) i could generate a salted RT and crack WPA.
my coding is realy lame but i found a scripts which i though i could use:
i tried to change it the way i needed but recognized that it's no good for bruteforce:
if some could help me i would be very thankful. i would donate with paypal i it works ;)
thanks...
sorry for my bad english
silly me :)
take a look at this:
https://hackforums.net/showthread.php?tid=290118
i'm trying to generate a passwordlist for rainbow tables.
I know that t-com routers use a password with a "SP-" at the beging and 9 chars of HEX behind it.
So it should look like "SP-1A2B3C4D5"
When i would have a list with all possibilities (Bruteforce) i could generate a salted RT and crack WPA.
my coding is realy lame but i found a scripts which i though i could use:
Code
--- genpw.pl
#!/usr/bin/perl
#
# genpw.pl
# Craig Perry
# 4th Apr 2007
#
# Generate a PW list of a specific format.
#
use strict;
# Change to suit the first 4 letters, keep space seperated
my @first_four = qw/ f F /;
my @second_four = qw/ u U /;
my @third_four = qw/ l L /;
my @fourth_four = qw/ l L /;
my @alphabet = qw/ a b c d e f g h i j k l m n o p q r s t u v w x y z
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z /;
for my $four1 ( @first_four ){
for my $four2 ( @second_four ){
for my $four3 ( @third_four ){
for my $four4 ( @fourth_four ){
for my $letter1 ( @alphabet ) {
for my $letter2 ( @alphabet ) {
for my $letter3 ( @alphabet ) {
# Generate digits from 00 to 99
for my $tail_digit ( 0..99 ) {
printf "%s%02d\n", $four1 . $four2 . $four3 . $four4 . $letter1 . $letter2 . $letter3, $tail_digit;
}
}
}
}
}
}
}
}
--- end genpw.pli tried to change it the way i needed but recognized that it's no good for bruteforce:
Code
--- genpw.pl
#!/usr/bin/perl
#
# genpw.pl
# Craig Perry
# 4th Apr 2007
#
# Generate a PW list of a specific format.
#
use strict;
# Change to suit the first 4 letters, keep space seperated
my @first = qw/ S /;
my @second = qw/ P /;
my @third = qw/ - /;
my @alphabet = qw/ A B C D E F 0 1 2 3 4 5 6 7 8 9 /;
for my $four1 ( @first ){
for my $four2 ( @second ){
for my $four3 ( @third ){
for my $letter1 ( @alphabet ) {
for my $letter2 ( @alphabet ) {
for my $letter3 ( @alphabet ) {
for my $letter4 ( @alphabet ) {
for my $letter5 ( @alphabet ) {
for my $letter6 ( @alphabet ) {
for my $letter7 ( @alphabet ) {
for my $letter8 ( @alphabet ) {
for my $letter9 ( @alphabet ) {
# Generate digits from 00 to 99 <---- here is my problem i think
for my $tail_digit ( 0..99 ) {
printf "%s%02d\n", $four1 . $four2 . $four3 . $letter1 . $letter2 . $letter3 . $letter4 . $letter5 . $letter5 . $letter6 . $letter7 . $letter8 . $letter9;
}
}
}
}
}
}
}
}
}
}
}
}
--- end genpw.plif some could help me i would be very thankful. i would donate with paypal i it works ;)
thanks...
sorry for my bad english
silly me :)
take a look at this:
https://hackforums.net/showthread.php?tid=290118
