Test socket et HTTP

Connexion TCP/IP\n"; if (( count($_POST) > 0) && ( isSet($_POST['Connecter']) ) ) { $serveur = htmlspecialchars($_POST['Serveur']); $service_port = htmlspecialchars($_POST['Port']); $cmd = htmlspecialchars($_POST['CmdHttp']); $ressource = htmlspecialchars($_POST['Ressource']); $version = htmlspecialchars($_POST['Version']); $continuer = true; echo "Connexion en cours sur $serveur:$service_port ...
"; /* Lit l'adresse IP du serveur de destination */ $address = gethostbyname ($serveur); /* Cree une socket TCP/IP. */ $socket = socket_create (AF_INET, SOCK_STREAM, getprotobyname('tcp')); if ($socket < 0) { echo "socket_create() a échoué : raison : " . socket_strerror ($socket) . "
\n"; $continuer = false; } else { echo "++socket_create OK.
\n"; echo "

Essai de connexion à '$address' sur le port '$service_port'...
\n"; $result = socket_connect ($socket, $address, $service_port); if ($result < 0) { $continuer = false; echo "socket_connect() a échoué : raison : ($result) " . socket_strerror($result) . "
\n"; } else { echo "++ OK.
\n"; $out = "$cmd $ressource HTTP/$version\r\n\r\n"; echo "Envoi de la requête: $out
"; socket_write ($socket, $out, strlen ($out)); echo "++ OK.
\n"; echo "Lire la réponse :
\n\n"; while ($in = socket_read ($socket, 2048)) { echo $in."
"; } } echo "
Fermeture de la socket... "; socket_close ($socket); echo "++ OK.
\n\n"; echo "

\n"; } } ?>

Ouvrir un socket vers :