//Dejamos una linea en el log
error_reporting(0); //Para controlar los errores. Evita los warnings
//Hora local
$time=localtime();
$segundos=$time[0];
$minutos=$time[1];
$hora=$time[2];
$diadelmes=$time[3];
$nummesanyo=$time[4];
$anyo=$time[5];
switch($nummesanyo)
{
case 0: $mesanyo="Jan"; break;
case 1: $mesanyo="Feb"; break;
case 2: $mesanyo="Mar"; break;
case 3: $mesanyo="Apr"; break;
case 4: $mesanyo="May"; break;
case 5: $mesanyo="Jun"; break;
case 6: $mesanyo="Jul"; break;
case 7: $mesanyo="Aug"; break;
case 8: $mesanyo="Sep"; break;
case 9: $mesanyo="Oct"; break;
case 10: $mesanyo="Nov"; break;
case 11: $mesanyo="Dec"; break;
}
$anyo=$anyo+1900;
if ($segundos < 10)
{
$segundos="0".$segundos;
}
if ($minutos < 10)
{
$minutos="0".$minutos;
}
if ($hora < 10)
{
$hora="0".$hora;
}
if ($HTTP_REFERER) {$REFERIDOR=$HTTP_REFERER;}
else {
$REFERIDOR="-";
}
//Tenemos la linea para el log
$ruta_documento=substr($DOCUMENT_ROOT,0,strlen($DOCUMENT_ROOT));
$rutaf=$ruta_documento."registrese.php";
$tam=filesize("$rutaf");
if ($tam == "") {$tam="-";}
$linea="$REMOTE_ADDR - - [$diadelmes/$mesanyo/$anyo:$hora:$minutos:$segundos +0200] \"GET /registrese.php ";
$linea=$linea." $SERVER_PROTOCOL \" 200 $tam \"$REFERIDOR\" \"$HTTP_USER_AGENT\" \n";
$ruta="/var/www/cgi-bin/accesos/planetatierra_cgis_$mesanyo"."_$anyo.log";
$ruta2="/var/www/cgi-bin/accesos/planetatierra_PHP_$mesanyo"."_$anyo.log";
//Abro el fichero
$f=fopen($ruta,"a");
$f2=fopen($ruta2,"a");
fputs($f,$linea); //Imprimo la linea
fputs($f2,$linea); //Imprimo la linea
fclose($f); //cierro el fichero
fclose($f2); //cierro el fichero
?>