[skrypt] Whoip RIPE.net, informacje o dostawny internetu, kraju.. Opcje

[tiraeth]

Witam, napisałem skrypt pobierający (wyr. regularne) informacje ze strony RIPE.NET/WHOIS (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

Skrypt pobiera:
Pulę adresów dla danego miejsca
Nazwę dostawcy internetu
Kraj, do którego należy dany IP
Miasto

UWAGA! Należy dograć flagi (np. pl.gif) do katalogu flagi/ w głównym folderze skryptu. Znaleźć je można np. na cs.pl

[PHP] pobierz, plaintext 
<?php
$cities = array('Wroclaw' => 'Wrocław', 
		'Rzeszow' => 'Rzeszów', 
		'Krakow' => 'Kraków', 
		'Poznan' => 'Poznań', 
		'Kolobrzeg' => 'Kołobrzeg'
		);
 
$ip = ($_GET['ip']) ? $_GET['ip'] : $_SERVER['REMOTE_ADDR'];
 
$url = 'http://ripe.net/fcgi-bin/whois?form_type=advanced&full_query_string=&searchtext='.$ip;
$url.= '&inverse_attributes=None&ip_search_lvl=Default&recursive=ON&domain_name_referral=ON';
$url.= '&alt_database=RIPE&object_type=domain&object_type=inet6num&object_type=inetnum';
$url.= '&Simple+search=Simple+search';
 
$file = file($url);
$read = implode(&#092;"\", $file);
$read = str_replace(&#092;"r\", \"\", $read);
$read = str_replace(&#092;"n\", \"!nline!\", $read);
 
if(preg_match('#<pre><b><u>inetnum</u></b>:(.*?)</pre>#', $read, $zmienna))
{
   $a = $zmienna[1];
   $a = str_replace(&#092;"!nline!\", \"n\", $a);
   $a = strip_tags($a);
 
   $b = explode(&#092;"n\", $a);
   foreach($b as $line)
   {
	  $line = str_replace(&#092;"   \", \"\", $line);
	  $line = preg_replace(&#092;"#(.*?):#\", \"\", $line);
 
	  $ab[] = $line;
   }
 
   $info['inetnum'] = $ab[0];
   $info['ispname'] = $ab[2];
   $info['city']	= $ab[3];
   $info['country'] = $ab[4];
 
   function strip_space($txt)
   {
	  if($txt{0} == &#092;" \")
	  {
		 $txt = substr($txt, 1);
		 $txt = strip_space($txt);
	  }
	  return $txt;
   }
 
   $info['inetnum'] = strip_space($info['inetnum']);
   $info['ispname'] = strip_space($info['ispname']);
   $info['city']	= strip_space($info['city']   );
   $info['country'] = strip_space($info['country']);
 
   if(file_exists('flagi/'.strtolower($info['country']).'.gif'))
   {
	  $flag = '<img src=\"flagi/'.strtolower($info['country']).'.gif\" border=\"0\">';
   }
   else
   {
	  $flag = '<img src=\"flagi/na.gif\" border=\"0\">';
   }
 
   foreach($cities as $cit => $pl)
   {
	  $info['city'] = str_replace($cit, $pl, $info['city']);
   }
 
   echo '<p style=\"font-family:Verdana; font-size:10px;\">';
   echo '<b>Pula adresów:</b> '.$info['inetnum'].'<br />';
   echo '<b>Dostawca internetu:</b> '.$info['ispname'].'<br />';
   echo '<b>Kraj i miasto:</b> '.$flag.' '.$info['city'].'</p>';
 
}
?>
[PHP] pobierz, plaintext 

Przykład użycia:

• Link: index.php?ip=83.27.66.241

Kod można dowolnie modyfikować.... jest w stanie zwrócić wszystkie informacje wyświetlane przez ripe.net (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)