海运的博客

PHP检查域名年龄及Whois脚本

发布时间:July 1, 2014 // 分类:PHP // No Comments

<?php
class DomainAge{
  private $WHOIS_SERVERS=array(
    "com"               =>  array("whois.verisign-grs.com","/Creation Date:(.*)/"),
    "net"               =>  array("whois.verisign-grs.com","/Creation Date:(.*)/"),
    "org"               =>  array("whois.pir.org","/Created On:(.*)/"),
    "info"              =>  array("whois.afilias.info","/Created On:(.*)/"),
    "biz"               =>  array("whois.neulevel.biz","/Domain Registration Date:(.*)/"),
    "us"                =>  array("whois.nic.us","/Domain Registration Date:(.*)/"),
    "uk"                =>  array("whois.nic.uk","/Registered on:(.*)/"),
    "ca"                =>  array("whois.cira.ca","/Creation date:(.*)/"),
    "tel"               =>  array("whois.nic.tel","/Domain Registration Date:(.*)/"),
    "ie"                =>  array("whois.iedr.ie","/registration:(.*)/"),
    "it"                =>  array("whois.nic.it","/Created:(.*)/"),
    "cc"                =>  array("whois.nic.cc","/Creation Date:(.*)/"),
    "ws"                =>  array("whois.nic.ws","/Domain Created:(.*)/"),
    "sc"                =>  array("whois2.afilias-grs.net","/Created On:(.*)/"),
    "mobi"              =>  array("whois.dotmobiregistry.net","/Created On:(.*)/"),
    "pro"               =>  array("whois.registrypro.pro","/Created On:(.*)/"),
    "edu"               =>  array("whois.educause.net","/Domain record activated:(.*)/"),
    "tv"                =>  array("whois.nic.tv","/Creation Date:(.*)/"),
    "travel"            =>  array("whois.nic.travel","/Domain Registration Date:(.*)/"),
    "in"                =>  array("whois.inregistry.net","/Created On:(.*)/"),
    "me"                =>  array("whois.nic.me","/Domain Create Date:(.*)/"),
    "cn"                =>  array("whois.cnnic.cn","/Registration Date:(.*)/"),
    "asia"              =>  array("whois.nic.asia","/Domain Create Date:(.*)/"),
    "ro"                =>  array("whois.rotld.ro","/Registered On:(.*)/"),
    "aero"              =>  array("whois.aero","/Created On:(.*)/"),
    "nu"                =>  array("whois.nic.nu","/created:(.*)/")
  );
  public function age($domain)
  {
    $domain = trim($domain); //remove space from start and end of domain
    if(substr(strtolower($domain), 0, 7) == "http://") $domain = substr($domain, 7); // remove http:// if included
    if(substr(strtolower($domain), 0, 4) == "www.") $domain = substr($domain, 4);//remove www from domain
    if(preg_match("/^([-a-z0-9]{2,100})\.([a-z\.]{2,8})$/i",$domain))
    {
      $domain_parts = explode(".", $domain);
      //取后缀
      $tld = strtolower(array_pop($domain_parts));
      if(!$server=$this->WHOIS_SERVERS[$tld][0]) {
        return false;
      }
      $res=$this->queryWhois($server,$domain);
      if(preg_match($this->WHOIS_SERVERS[$tld][1],$res,$match))
      {
        date_default_timezone_set('UTC');
        $time = time() - strtotime($match[1]);
        $years = floor($time / 31556926);
        $days = floor(($time % 31556926) / 86400);
        if($years == "1") {$y= "1 year";}
        else {$y = $years . " years";}
        if($days == "1") {$d = "1 day";}
        else {$d = $days . " days";}
        return "$y, $d";
      }
      else
        return false;
    }
    else
      return false;
  }
  private function queryWhois($server,$domain)
  {
    $fp = @fsockopen($server, 43, $errno, $errstr, 20) or die("Socket Error " . $errno . " - " . $errstr);
    if($server=="whois.verisign-grs.com")
      $domain="=".$domain;
    //echo $domain;
    fputs($fp, $domain . "\r\n");
    $out = "";
    while(!feof($fp)){
      $out .= fgets($fp);
    }
    fclose($fp);
    //echo $out;
    return $out;
  }
}
$w=new DomainAge();
$age = $w->age("baidu.com");
echo $age."\n";
?>

标签:none

发表评论

分类
最新文章
最近回复
  • : linux系统上单个网卡多条宽带拨号获取公网IP,外网可以访问这些IP,有偿! Q:25299...
  • 硅谷少年: 非常有用,感谢分享
  • spartan2: https://dashboard.hcaptcha.com/welcome_accessib...
  • 海运: 应该能,在购买页面先手工跳过cf机器验证,后续一定时间内不更换ip应该不会再次验证。
  • spartan: 大佬斯巴达开启了CF的机器识别验证,请问插件能自动跳过吗? 另外这个脚本有没有简单使用说明,新...
  • vincent: 膜拜大佬
  • 海运: proxy-header或proxy_protocol
  • liangjw: 如果是 内部调用 或者 中间存在 代理 而上一个代理又在内网 ,那怎么处理来自代理私有IP?
  • chainofhonor: 感谢,用dnsmasq设置自动判断BIOS和UEFI成功了
  • 海运: 不好意思,这个是很多年前的,现在也许已经不适用,我现在也不用多线了。