Ayuda WordPress

// Enviate a ti mismo un email
mail($email_address,'Alerta de Googlebot', 'El Bot de Google ha visitado tu blog: '.$_SERVER['REQUEST_URI']);
}
?>

/*
*
* Recibe un email al día, informándote cuando un motor de búsqueda visito tu sitio web.
* Hacking Ball Z
* http://www.hackingballz.com/articulos/40/1/Espia-los-ingresos-de-motores-de-busqueda-a-tu-sitio/Page1.html
*/

//Opción demo
if($_GET['demo'] == 1){
   
    $_SERVER['HTTP_USER_AGENT'] = 'demo-googlebot';
   
}

//Correo electrónico
$abdy = 'tu@correo.com';

//Directorio de trabajo
$botspy = '/path/completo/demo_robots_spider/botspy'; # CHMOD 777 a todos los archivos.

// Bots "reconociodos"
$bots   = array('googlebot','msnbot','yahoo','teoma','gigabot','robozilla','nutch','ia_archiver','baiduspider');

/*
      Google            googlebot
      MSN Search        msnbot
      Yahoo             yahoo
      Ask/Teoma         teoma
      GigaBlast         gigabot
      DMOZ Checker      robozilla
      Nutch             nutch
      Alexa/Wayback     ia_archiver
      Baidu             baiduspider
*/

// Definimos HOY
$hoy = date('d-m-Y');

// Procesamos el USER_AGENT para verificar si es un bot reconocido.
while (list($key, $val) = each($bots)) {
   
   if ( stripos( $_SERVER['HTTP_USER_AGENT'], $val ) !== false ){
   
        $found_bot = true;
        break;
   
   }
   
}

// Si es un Bot reconocido, proseguimos.

if($found_bot){

    //Escribimos en el log los detalles
    $cadena = $_SERVER['HTTP_USER_AGENT']. ' || '. $_SERVER['REMOTE_ADDR'] .' || '. date('h:i:s A') . "\r\n";
    file_put_contents($botspy.'/'.$hoy.'.log',$cadena,FILE_APPEND);
   
}

// Enviamos un mensaje al día con el Blog del día anterior

if(!file_exists($botspy.'/'.$hoy.'.mail.log')){
   
if ($gestor = opendir($botspy)) {
    while (false !== ($archivo = readdir($gestor))) {
        if ($archivo != "." && $archivo != ".." && $archivo != $hoy.'.log') {   

            $log = fopen ($botspy.'/'.$archivo, "r");
            while (!feof ($log)) {
            //si extraigo una línea del archivo y no es false
            if ($contenido .= fgets($log)){
            //acumulo una en la variable número de líneas
            $num_lineas++;
         
         }
         }
         fclose($log);
           

            unlink($botspy.'/'.$archivo);
        }
    }
    closedir($gestor);
}

$mensaje = ("

FECHA ACTUAL: $hoy

REPORTE DEL DÍA DE AYER
===============================

Total de visitas de bots reconocidos: $num_lineas

LOG
===============================
$contenido

Un hacking saludo...

HACKING BALL Z
http://www.hackingballz.com
");

if(trim($num_lineas)!=''){

    mail($abdy,'Informe de visitas de los robots ayer.',$mensaje);

}

file_put_contents($botspy.'/'.$hoy.'.mail.log','');

}

?>