Verifica Puertos Abiertos

verifica_puertos

    // Verificación de puertos 
	$ip = gethostbyaddr($_SERVER['REMOTE_ADDR']); // direccion IP
	$timeout = 1; // 1 segundo de espera Máximo recomendado 10
	$puertos_TCP = array(21,	 // puertos usados 
			     22,
			     23,
			     25,
			     79,
	                     80, 
			     110,
			     135,
			     137,
			     139,
	                     443,
			     445, 
			     3306,
			     4500, 
			     5000,						 
			     8080, 
 	   		     14147 ); 
						 
    // puertos usados  explicación						   
	
	$uso_TCP =     array("FTP",	
			     "SSH",
			     "Telnet",
			     "SMTP",
			     "Finger",
	                     "HTTP WEB",
			     "POP3",
			     "RPC", 
			     "Resolución de nombres NetBios",
			     "Servicio de sesiones NetBios",
	                     "HTTPS/SSL", 
		             "SMB (Bloque de mensajes de servidor)",
			     "Servicio SQL", 
			     "LSSA",
			     "UPnP",
			     "Servicio ISS,APACHE,TOMCAT,ETC",
			      "Server FTP");
						 
	$lista = count($puertos_TCP); // cantidad de puertos a leer
	$abierto = $inicio = $error_TCP = 0;
	
	echo "<p>Ip: $ip  -- Verificando puertos TCP\r\n</p>"; 
	
	while ($inicio < $lista) 
	
	 { settype($puertos_TCP[$inicio], "integer");
	 
	   if (!@fsockopen($ip, $puertos_TCP[$inicio], $errno, $errstr, $timeout)) 
	   
	      {  echo "<p>Puerto $puertos_TCP[$inicio] : Uso $uso_TCP[$inicio] = [ BLOQUEADO ] </p>"; }
		  else { echo "<p>Puerto  $puertos_TCP[$inicio] : Uso $uso_TCP[$inicio]  = [ ABIERTO ]</p>"; 
		  $abierto = 1;}
		  
	 $inicio++;
	 
	 }
	 
	 if ($abierto == 0) {echo "Felicitaciones!!! estan blindado...";}
	 else {echo "Revisa los puertos abiertos; son posibles huecos de seguridad.";}