 |
|
 |
 |
Menu |
 |
|
 Home |
| |
|
 Discussions |
| |
|
 Tools |
| |
|
| Affiliates |
| |
|
 Content |
| |
|
 Info |
| | |
|
|
|
|
|
User Info |
|
 Membership:
 Latest: MichaelSnaRe
 New Today: 0
 New Yesterday: 0
 Overall: 9144
 People Online:
 Visitors: 152
 Members: 0
 Total: 152
|
|
|
|
|
|
Full disclosure |
|
|
|
 |
|
 |
 |
|
 |
IT Security and Insecurity Portal |
|
|
[tool] Zone-h mass poster |
|
 Posted: Thu May 12, 2011 10:20 pm |
 |
|
| pink_spider |
| Advanced user |
 |
|
| Joined: Aug 28, 2010 |
| Posts: 91 |
|
|
|
 |
|
 |
|
Sophia Hacker Group - Zone-h Mass poster
[img]http://www.sitehacker.com.br/images/exploit.bmp[/img]
#!/usr/bin/perl
#Sophia Hacker Group exploit priv8
#Envia defacements para o zone-h
#Qualquer problema pra rodar o script
#entre em contato com o SHG
#
#Pink_spider79@hotmail.com
#
#Somos : Pink_spider & Alternative (:
#
#21:58 11/5/2011
use Win32::Console::ANSI;
system('cls');
system('title Sophia Hacker Group - Zone-h Mass Poster [v1.0]');
print "\n\t+-------------------------------------------------+\n";
print "\t|\t \e[01;31mS\e[0mophia \e[01;31mH\e[0macker \e[01;31mG\e[0mroup \e[01;31mC\e[0mr3w\'s \t\t |";
print "\n\t|\t Coded by : ";
print "\e[33;50;1mPink_spider";
print "\t\t\e[0m |\n";
print "\t+-------------------------------------------------+\n\n";
if(!$ARGV[0]){
print "\t\t+---------------------------------+\n";
print "\t\t| \e[01;31mUse:\e[0m perl $0 <sites.txt> |\n";
print "\t\t+---------------------------------+\n\n";
exit;
}
$arq = $ARGV[0];
$grupo = 'Soroup';
open(a,"<$arq");
@site = <a>;
close(a);
$b = scalar(@site);
print "\t+-------------------------------------------------+\n";
for($a=0;$a<=$b;$a++)
{chomp $site[$a];
if($site[$a] =~ /http/) { substr($site[$a], 0, 7) =""; }
print "\t| [+] Postando url => $site[$a]";
$leg=length($site[$a]);
$space=($leg - 30);
for($i=$leg; $i<28; $i++){
print " ";
}
print "|\n";
use IO::Socket::INET;
$sock = IO::Socket::INET->new(PeerAddr => "www.zone-h.org", PeerPort => 80, Proto => "tcp") or next;
print $sock "POST /notify/single HTTP/1.0\r\n";
print $sock "Accept: */*\r\n";
print $sock "Referer: http://www.zone-h.org/notify/single\r\n";
print $sock "Accept-Language: pt-br\r\n";
print $sock "Content-Type: application/x-www-form-urlencoded\r\n";
print $sock "Connection: Keep-Alive\r\n";
print $sock "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)\r\n";
print $sock "Host: www.zone-h.org\r\n";
$length=length("defacer=$grupo&domain1=http%3A%2F%2F$site[$a]&hackmode=17&reason=1");
print $sock "Content-Length: $length\r\n";
print $sock "Pragma: no-cache\r\n";
print $sock "\r\n";
print $sock "defacer=$grupo&domain1=http%3A%2F%2F$site[$a]&hackmode=17&reason=1\r\n";
close($sock);
}
print "\t+-------------------------------------------------+\n\n";
print "\t\t+---------------------------------+\n";
print "\t\t| \e[01;31mCoded by:\e[0m Pink_spider |\n";
print "\t\t+---------------------------------+\n\n"; |
|
_________________
Pink_spider (: - Sophia Hacker Group 2009-2011 |
|
|
|
|
|
Re: [tool] Zone-h mass poster |
|
| Posted: Sun May 15, 2011 5:46 am |
|
|
| juanz123 |
| Regular user |
 |
|
| Joined: Oct 20, 2010 |
| Posts: 11 |
|
|
|
|
|
|
|
| wow!! thx this is really good! |
|
|
|
|
| Posted: Fri Jun 03, 2011 12:36 am |
|
|
| pink_spider |
| Advanced user |
|
|
| Joined: Aug 28, 2010 |
| Posts: 91 |
|
|
|
|
|
|
|
|
_________________
Pink_spider (: - Sophia Hacker Group 2009-2011 |
|
|
|
www.waraxe.us Forum Index -> Perl
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
|
All times are GMT
Page 1 of 1
|
|
|
|
Powered by phpBB © 2001-2008 phpBB Group
|
|
|
|
|
|
|
