Cendreon

Bonjour,
je voudrai faire un script qui permet de savoir un les services controlés par une machine.
Voici ce quie j'ai fai, mais je voulais un autre plus simple que celui ci.
Ce script permet d'afficher l'état des serveur d'une machine

//Le titre
echo "\t\t\t<p class='MainTitre'>Etat des serveurs</p>\n\n";
//On met les adresse des serveurs, leurs ports
$FTP = @fsockopen("10.45.1.94", 21, $errno, $errstr, 1); // 90 Plan
$SSH = @fsockopen("213.186.33.2", 22, $errno, $errstr, 1); // 90 Plan
$DNS = @fsockopen("213.186.33.102", 53, $errno, $errstr, 1); // domaine.be
$TCP = @fsockopen("10.45.1.94", 80, $errno, $errstr, 1); // 90 Plan
$SSL = @fsockopen("213.186.33.2", 443, $errno, $errstr, 1); // 90 Plan
$SQL = @fsockopen("10.0.65.208", 3306, $errno, $errstr, 1); // mysql5-8
echo "\t\t\t<table width='700px'><tr>\n";
if ($FTP) { echo "\t\t\t<td class='Online'>Serveur FTP</td>\n"; fclose($FTP); }
else echo "\t\t\t<td class='Offline'>Serveur FTP</td>\n";
if ($SSH) { echo "\t\t\t<td class='Online'>Serveur SSH</td>\n"; fclose($SSH); }
else echo "\t\t\t<td class='Offline'>Serveur SSH</td>\n";
if ($DNS) { echo "\t\t\t<td class='Online'>Serveur DNS</td>\n"; fclose($DNS); }
else echo "\t\t\t<td class='Offline'>Serveur DNS</td>\n";
if ($TCP) { echo "\t\t\t<td class='Online'>Serveur TCP</td>\n"; fclose($TCP); }
else echo "\t\t\t<td class='Offline'>Serveur TCP</td>\n";
if ($SSL) { echo "\t\t\t<td class='Online'>Serveur SSL</td>\n"; fclose($SSL); }
else echo "\t\t\t<td class='Offline'>Serveur SSL</td>\n";
if ($SQL) { echo "\t\t\t<td class='Online'>Serveur SQL</td>\n"; fclose($SQL); }
else echo "\t\t\t<td class='Offline'>Serveur SQL</td>\n";
echo "\t\t\t</tr></table>\n\n";
echo "\t\t\t<p> </p>\n\n"
@echo reponses: > result.txt
pause
pause