Tema: modulo
Ver Mensaje Individual
  #5 (permalink)  
Antiguo 07/12/2003, 23:35
Avatar de nuevo
nuevo
 
Fecha de Ingreso: mayo-2003
Ubicación: Spain
Mensajes: 2.009
Antigüedad: 20 años, 11 meses
Puntos: 2
Código PHP:
<?php
/********************************************************************************/
/*                SACO LA IP DEL USUARIO - VERSION IP + PROXI                   */
/********************************************************************************/
    
if ($_SERVER) {
        if ( isset(
$_SERVER['HTTP_X_FORWARDED_FOR'] )) {
            
$ip_real $_SERVER['HTTP_X_FORWARDED_FOR'];

        } elseif ( isset(
$_SERVER['HTTP_CLIENT_IP'] )) {
            
$ip_real $_SERVER['HTTP_CLIENT_IP'];

        } else {
$ip_real $_SERVER['REMOTE_ADDR'];}

        } else { if ( 
getenv'HTTP_X_FORWARDED_FOR' ) ) {
            
$ip_real getenv'HTTP_X_FORWARDED_FOR' );

        } elseif ( 
getenv'HTTP_CLIENT_IP' ) ) {
            
$ip_real getenv'HTTP_CLIENT_IP' );

        }else {
            
$ip_real getenv'REMOTE_ADDR' );
        }
    }
//////////////////////////////////////////////////////////////////////////////////


/********************************************************************************/
/*           FUNCION PARA SABER CUANTOS USUARIOS HAY ONLINE EN LA WEB           */
/********************************************************************************/
function FUNC_usrOnline($ip_real){//FUNC_usrOnline($ip_real);

    
$archivo "usuarios_online.txt"//archivo donde almacenarán los usuarios activos
    
$inactivo 600;//tiempo, cuando el user se va... tiempo que aun aparece online despues...
    
$contar 0;

        
$fp fopen($archivo,"r");
        
$tiempo time();
        
$contenido fread($fp,filesize($archivo));
        
fclose($fp);

    
$lineas split("\n",$contenido);
    
$filas file($archivo);

    for (
$a=0$a sizeof($filas); $a++) {
        
$datos split(':',$lineas[$a]);
        
$descontar $tiempo-$inactivo;

    if (
$datos[0] != $ip_real && $datos[1] > ($descontar)) {
        
$res.= $datos[0].":".$datos[1]."\n";
        
$contar++;
        }
    }

    
$res.= "$ip_real:$tiempo\n";
    
$contar++;
    
$fp fopen($archivo,"w");

        
fwrite ($fp,$res);
        
fclose($fp);

    if (
$contar==1){$contar="1";}else{$contar="$contar";}

    return 
$contar;//envio el numero de usr online
}
//////////////////////////////////////////////////////////////////////////////////


echo "Usuarios Online: ".FUNC_usrOnline($ip_real);
?>

venga un saludo
__________________
3w.valenciadjs.com
3w.laislatv.com