ANTICHAT — форум по информационной безопасности, OSINT и технологиям

<?
print "\n";
print "-----------------------------------\ \n";
print " this is ftp checker.\n";
print "----------------------------------------------------->\n";
if($argv[1])
$file=$argv[1];
else
{
print " usage: ".$argv[0]." [file]\n";
print " ~~~~~\n";
print " where :\n";
print " ~~~~~\n";
}
$good=fopen("good.txt","a+") or die ("cann't open good.txt");
$bad=fopen("bad.txt","a+") or die("cann't open bad.txt");
$list=file($file) or die(" [file] - file which string's ftp://login:pass@domain\n");
$valid=0;
$novalid=0;
$i=0;
for($i=0;$i<count($list);$i++){

$ein=strrpos($list[$i],"/");
$zwei=strrpos($list[$i],":");
$drei=strrpos($list[$i],"@");
$username=substr($list[$i],$ein+1,$zwei-$ein-1);
$userpass=substr($list[$i],$zwei+1,$drei-$zwei-1);
$domain=substr($list[$i],$drei+1);
$connect=@ftp_connect($domain,21,10);
if(@ftp_login($connect,$username,$userpass))
{
 @ftp_close($connect);  
 fputs($good,"ftp://"."$username".":".$userpass."@".$domain);
 $valid++;
}
else
{
 @ftp_close($connect);
 fputs($bad,"ftp://"."$username".":".$userpass."@".$domain);
 $novalid++;
}
}
print " all done \n";
print " ~~~~~~~~ \n";
print " total ftp: ".count($list)."\n";
print " god ftp: ".$valid."\n";
print " bad ftp: ".$novalid."\n";
print " c(0)ding by evil_packman.icq 233-990-800.\n";
?>