<?php

// ------------------------------------------------------------------------- //
// Masque dans une adresse IP ou dans un hostname l'élément qui permet       //
// d'identifier une machine sur le réseau ou le domaine.                     //
// ------------------------------------------------------------------------- //
// Auteur: J-Pierre DEZELUS                                                  //
// Email:  jpdezelus@phpinfo.net                                             //
// Web:    http://www.phpinfo.net/                                           //
// ------------------------------------------------------------------------- //

function MasquerMachine($adresse) {

  
$tAdr = explode(".", $adresse);
  
$nb = count($tAdr);
  
  if (
$nb > 1){
    
    if (
intval($tAdr[$nb-1]) != 0) {
      
$nouv_adresse = substr($adresse, 0, strrpos($adresse,".")).".---";
    } else {
      
$nouv_adresse = "---".strstr($adresse, ".");
    }
  
  } else {

    
$nouv_adresse = $adresse;

  }

  return(
$nouv_adresse);

}

$adrIP = $REMOTE_ADDR;
$host  = gethostbyaddr($adrIP);

echo
"IP: ".MasquerMachine($adrIP)."<BR>";
echo
"Host: ".MasquerMachine($host);
if (
$adrIP == $host)
  echo
" Pas de résolution de nom pour cette IP.";

?>