Viewing file:  de_mbox_a_patrocinadores.php (3.93 KB) -rw-rw-r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
include('/home/wwwroot/frames/conn.php');
include_once ("/home/wwwroot/frames/classes/class.log.php");
$conn2=mysql_connect("81.4.127.184","papyr225_phpb1","bJ8V1vmDPkHZ");
$handle=fopen("/home/scripts/ppl.mbox","r");
if (!$handle)die("error de apertura");
/*$var .= fread($handle, 8192);
/ echo $var;
die();
*/
while (!feof($handle)) {
$var .= fread($handle, 8192);
}
$array=explode("Return-Path: <[email protected]>",$var);
$contador=0;
foreach($array as $clave=>$valor){
flush();
$correo=trim(hasta($valor,"Reply-To: ",chr(10)));
$fecha1=hasta ($valor,"Date: ",chr(10));
$fecha1=hasta($fecha1,",","-");
if (strstr($fecha1,"Dec") and strstr($fecha1,"2014")){
$sqlb="SELECT *
FROM papyr225_papyre.patrocinadores
WHERE correo='$correo' and fecha > '2014-12-01'
";
$resb=mysql_query($sqlb,$conn);
if (mysql_num_rows($resb)==0){
$contador++;
/// tachaaaaaaan
//buscamos si el correo est� ya en BBDD torrebruno
$sql="select username, user_email from ".BBDD_FORO.".phpbb_users where user_email='$correo'";
echo chr(10);
echo mysql_error();
$res=mysql_query($sql,$conn2);
$row=mysql_fetch_array($res);
$username=str_replace(" ","+",$row['username']);
//echo "+++++++++++++++++++++++ correo es $correo ";
if ($username>''){
echo " el username es $username";
$control= new control($username);
if ($control->grupo!="patrocinador"){
echo "****************+++++ $username";
$handler = curl_init("http://hostveloz.com/automatas/patrocinadores.php?submit=Enviar&dale=si&usuario=$username");
$response = curl_exec ($handler);
curl_close($handler);
if (strpos($response,"Torrebruno")){
echo "BIENNNNNNNNNNNNNNNNNNNNn";
$sqla="INSERT INTO papyr225_papyre.adtfinal (usuario, correo, estado) values ('$username','$correo','si')";
$reas=mysql_query($sqla,$conn);
}else{
echo "----------------------------------------------FALLO";
$sqla="INSERT INTO papyr225_papyre.adtfinal (usuario, correo, estado) values ('$username','$correo','no')";
$reas=mysql_query($sqla,$conn);
echo mysql_error();
}
flush();
echo "contador es ".$contador.chr(10);
die();
//if ($contador>1)die();
// echo "+++++++++++++++++++++++++ y fecha es $fecha1".chr(10);
}else{echo "usuario $username a es ADT".chr(10);}
}else{
$sqla="INSERT INTO papyr225_papyre.adtfinal (usuario, correo, estado) values ('','$correo','--')";
$reas=mysql_query($sqla,$conn);
}
}else{echo " correo $correo ya es ADT".chr(10);}
}
}
function hasta($ccadena,$vdesde,$vhasta) {
## esta funcion es para devolver la cadena desde $vdesde hasta $hasta, excluidas estas
$ccadena=strstr($ccadena,$vdesde);
if (!$ccadena){
echo "NO SE ENCONTRO ".$ccadena."<br>".chr(10);
return(null);
}
## ahora, contamos hasta desde $desde
## hasta el caracter $vhasta
$ccadena=substr($ccadena,strlen($vdesde));
$c="";
$a=0;
$b="";
/*
while($b!="$vhasta") {
$b=substr($ccadena,$a,1);
$c=$c.$b;
$a++;
echo $a.chr(10);
}
*/
while(!strstr($c,$vhasta)) {
$b=substr($ccadena,$a,1);
$c=$c.$b;
$a++;
#echo $a.chr(10);
}
## quitamos los ultimos caracteres, que es "$vhasta"
$c=substr($c,0,(strlen($c)-(strlen($vhasta))));
return ("$c");
}
### fin ---------------------------------------------funcion hasta
?>
|