whois.php

网站综合信息查询工具SiteInfoChecker v1.0 飞狐源码站

	      $pos=strpos($lne,"no such domain");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
}

function nlwhois($dom,$domt,&$regdet)
{
  if ($regdet=="*")
  {
	  $regdet="";
	  $connection=@fsockopen("whois.domain-registry.nl",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,"Is ".$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<1)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"is free");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
  else
  {
	  $regdet="";
	  $connection=@fsockopen("whois.domain-registry.nl",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"not a registered domain");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
}
function luwhois($dom,$domt,&$regdet)
{
  if ($regdet=="*")
  {
	  $regdet="";
	  $connection=@fsockopen("whois.dns.lu",4343,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,"GET 1.0 $dom\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne," free");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
  else
  {
	  $regdet="";
	  $connection=@fsockopen("whois.dns.lu",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"no such domain");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
}
function dewhois($dom,$domt,&$regdet)
{
  if ($regdet=="*")
  {
	  $regdet="";
	  $connection=@fsockopen("whois.denic.de",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,"-C ISO-8859-1 ".$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"status:      free");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
  else
  {
	  $regdet="";
	  $connection=@fsockopen("whois.denic.de",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,"-C ISO-8859-1 -T dn ".$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"not found in database");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
}
function auwhois($dom,$domt,&$regdet)
{
  if ($regdet=="*")
  {
	  $regdet="";
	  $connection=@fsockopen("whois-check.ausregistry.net.au",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<1)
	      return(5);
      $registered=0;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"not available");
	      if (is_integer($pos))
        {
	        $registered=1;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
  else
  {
	  $regdet="";
	  $connection=@fsockopen("whois.ausregistry.net.au",43,$errorno,$errordesc);
	  if ($connection)
	  {
	    fputs($connection,$dom.$domt."\r\n");
	    while(!feof($connection))
	    {
	      $regdet[]=fgets($connection,255);
	    }
	    fclose($connection);
	    if (count($regdet)<2)
	      return(5);
      $registered=1;
	    for($index=0;$index<count($regdet);$index++)
	    {
	      $lne=strtolower($regdet[$index]);
	      $pos=strpos($lne,"no data found");
	      if (is_integer($pos))
        {
	        $registered=0;
          break;
        }
	    }
      return($registered);
	  }
	  else
	    return(5);
  }
}
function zawhois($dom,$domt,&$regdet)
{
  if (!($fh=@fopen("http://co.za/cgi-bin/whois.sh?Domain=".$dom,"r")))
  {
    return(5);
  }
  $buf="";
	do
	{
   $buf1 = fread($fh, 100000);
   if (strlen($buf1) == 0)
   {
       break;
 	 }
   $buf .= $buf1;
	}
 	while (true);
  fclose($fh);
  $pos=strpos($buf,"No Matches");
  if (!is_integer($pos))
  {
	  $pos=strpos($buf,"0a.");
	  if (is_integer($pos))
	  {
	    $buf=substr($buf,$pos);
	    $regdet=explode("\n",$buf);
	  }
	  return(1); // Not available
  }
  return(0); // Available
}

function grwhois($dom,$domt,&$regdet)
{
	global $grusername,$grpassword;
  $regdet="";
	if (!($fh=fopen("http://www.papaki.gr/server.aspx?message=<request><username>$grusername</username><password>$grpassword</password><type>domainSearch</type><lang>el</lang><test>False</test><domain>$dom</domain><extensions><ext>$domt</ext></extensions></request>","rb")))
	{
		return(5);
	}
	$contents = fread ($fh, 100000);
	fclose ($fh);
	$code=getxmldata($contents,"code");
	if ($code!="1000")
	{
	  return(5);
	}
	$available=getxmldata($contents,"availableDomains");
	if ($available!="")
	{
		$available=getxmldata($available,"domain");
		if (is_integer(strpos($available,$dom.$domt)))
		{
			$regdet[]=$dom.$domt." is available";
	  	$regdet[]="Full whois for ".$domt." domains not available";
    	return(0); // domain available
  	}
  }
  $regdet[]=$dom.$domt." is not available";
  $regdet[]="Full whois for ".$domt." domains not available";
  return(1); // domain not available
}
function getxmldata($contents,$tag)
{
	$tag=strtolower($tag);
  $contentslower=strtolower($contents);
  $pos = strpos($contentslower, "<".$tag.">");
  $pos2 = strpos($contentslower, "</".$tag.">");
  if ((is_integer($pos)) && (is_integer($pos2)))
    return( substr($contents, $pos + strlen($tag)+2, $pos2 - $pos-(strlen($tag)+2)));
  else
  	return("");
}


/* ------------------------------------------------------------------------- */
/* idna_convert.class.php - Encode / Decode punycode based domain names      */
/* (c) 2004 blue birdy, Berlin (http://bluebirdy.de)                         */
/* All rights reserved                                                       */
/* v0.1.5                                                                    */
/* ------------------------------------------------------------------------- */
class idna_convert
{
    // Internal settings, do not mess with them
    var $punycode_prefix = 'xn--';
    var $invalid_ucs =     0x80000000;
    var $max_ucs =         0x10ffff;
    var $base =            36;
    var $tmin =            1;
    var $tmax =            26;
    var $skew =            38;
    var $damp =            700;
    var $initial_bias =    72;
    var $initial_n =       0x80;
    var $error =           FALSE;

    // The constructor
    function idna_convert()
    {
        return TRUE;
    }

    // Decode a given Domain name
    function decode($encoded)
    {
        // Clean up input
        $encoded = trim($encoded);
        // Call actual wrapper
        return $this->_do_job($encoded, 'decode');
    }

    // Encode a given Domain name
    function encode($decoded)
    {
        // Clean up input
        $decoded = preg_replace('!