Ver Mensaje Individual
  #3 (permalink)  
Antiguo 19/08/2007, 14:31
Avatar de urgido
urgido
 
Fecha de Ingreso: febrero-2005
Mensajes: 2.351
Antigüedad: 19 años, 2 meses
Puntos: 25
Re: Identificar ip con php

Código PHP:
<?php

# Pongo el time limit en 0 para que no se acabe el script por time limit.
set_time_limit(0);

# Cojo los puertos de puertos.txt y los meto en un array
$db file('puertos.txt');
foreach (
$db as $a=>$b) {
    
$puerto explode(" ",$b);
    
$desc str_replace($puerto[0]." ","",$b); 
    
$ports[$puerto[0]] = $desc;
}

# Verifico que la ip sean numeros
if(is_numeric(str_replace(".","",$_SERVER['REMOTE_ADDR']))) {
    
# Con este foreach verifico todos los puertos
    
foreach($ports as $a=>$b) {
        
# Si conecto pongo que conecto
        
if(conecta($a)) {
            
pon($a,$b,"./images/on.gif");
        }
        
# Si no conecto pongo que no conecto
        
else {
            
pon($a,$b,"./images/off.gif");
        }
    }
}
else { die(
"La ip debe contener solamente numeros."); }

# Función que me dice si el puerto esta abierto o no
function conecta ($port) {
    
$conexion = @fsockopen($_SERVER['REMOTE_ADDR'],$port,$errno,$errstr,5);
    @
fclose($conexion);
    if(
$conexion) return 1;
    else return 
0;
}

# Función que pone si el puerto esta abierto o no.
function pon ($port,$desc,$img) {
    echo
"<tr style=\"font: 9px Tahoma;\">\n";
    echo
"    <td width=\"15%\" style=\"text-align: center;\"><img src=\"".$img."\"></td>\n";
    echo
"    <td width=\"25%\" style=\"text-align: center;\">".$port."</td>\n";
    echo
"    <td width=\"60%\" style=\"text-align: center;\">".$desc."</td>\n";
    echo
"</tr>\n";
}
?>
Saludos
__________________
Hospedaje Web al mejor costo!