利用QQIP数据库做快速本地whois查询

upsdn首页 > 系统与网络 > 脚本与网站建设

采用cnss为QQ设计的IP数据文件格式，cz88.net收集整理的IP数据
大幅度减少文件读取次数，对保护 服务器硬盘应该有一定的好处。

2005-02-22 增加一个数据库浏览器

集成官方whois查询

演示地址  http://tools.upsdn.net/whois

1.用ip2long()做IP校验
2.用sprintf做强制转换
3.用unpack分析二进制数据，减少了 文件读取次数
4.substr strpos分析字符串，这也减少了文件读取次数
5.可惜速度没有明显提高;)


<-form name="ipform" method="get" action=""><-br/>IP Address:<-input type="text" name="ip"/><-br/><-a href="javascript:document.ipform.submit();">Submit<-/a><-br/><-/form>

define('IPDATA','ipdata.db');
//get ip
$ip = isset($_GET['ip'])?$_GET['ip']:getenv("REMOTE_ADDR");
echo "IP:{$ip} ARIN";
if (-1 === ($ip = ip2long($ip)))  die("Invalid IP");
$ip = sprintf("%u",$ip);
$country = $city = '';
echo "
Record No:".Whois($ip,$country,$city);
echo "
Location:{$country}  [{$city}]";

function Whois($ip,&$country,&$city)
{
  //open ip-database
  if (NULL == ($fp = fopen(IPDATA, "rb"))) die("cannot open dbfile.");
  //get data section offset
  $offset = unpack("Vbegin/Vend", fread($fp, 8));
  $begin = 0;$end = ($offset['end'] - $offset['begin']) / 7;
  //seek index
  while ($begin < $end - 1) {
    $num = ($begin + $end) >> 1;
    fseek ($fp , ($offset['begin'] + $num * 7) , SEEK_SET ) ;
    $record = unpack("Vip", fread($fp, 4));
    $record['ip'] = sprintf("%u",$record['ip']);
    if ($ip == $record['ip']) { $begin = $num; break;}
    if ($ip > $record['ip'])    $begin = $num;
    else                        $end = $num;    
  }
  //read index
  $record = unpack("Vbeginip/Vloc", ReadBinary($fp,$offset['begin']+$begin*7) );
  $locoff =($record['loc'] & 0x00FFFFFF);
  $info = unpack("Vendip/Vloc",ReadBinary($fp,$locoff)) ;
  $info['endip'] = sprintf("%u",$info['endip']);
  if($info['endip'] < $ip)  die(" [unkown location]");
  //get GEO
  $countryoff = (($info['loc'] & 0x000000FF)== 1)?($info['loc'] >> 8):($locoff+4);
  $country = ReadGEOStr($fp,$countryoff);
  $city = ReadGEOStr($fp,$countryoff);
  return $begin;
}  

function ReadGEOStr($fp,&$offset)
{
  $binarydata = ReadBinary($fp,$offset);
  $info = unpack("Vloc",$binarydata);
  if( ($info['loc'] & 0x000000FF) == 2 ) {
    $GeoStr = ReadBinary($fp,$info['loc'] >> 8 );
    $GeoStr = substr($GeoStr,0,strpos($GeoStr, 0));
    $offset += 4;
  }else {
    $len = strpos($binarydata, 0);
    $GeoStr = substr($binarydata,0,$len);
    $offset += $len + 1;
  }
  return $GeoStr;
}  

function ReadBinary($fp,$positionz)
{
  fseek ( $fp , $positionz , SEEK_SET ) ;
  return fread ( $fp , 32 ) ;
}
?>
===================================
2005-02-22 cnss格式QQ数据库 PHP浏览查询器

IP Address:
Submit

Start
Count
Submit

define('IPDATA','ipdata.db');

$fp = NULL;
if( isset($_GET['ip']) )
{
  $ipx = $_GET['ip'];
  if (-1 === ($ip = ip2long($ipx)))  die("Invalid IP");
  echo "IP:{$ipx} ARIN";
  $ip = sprintf("%u",$ip);
  $ippostion = '';
  $start_time=get_time();
  echo "
Record No:".Whois($ippostion);
  $end_time=get_time();
  echo "
Location:{$ippostion}";
  echo "
Process Time:".round($end_time-$start_time,3)."seconds";
}
else if ( isset($_GET['s']) )
{
  $first = $_GET['s'];
  $rcount = $_GET['c'];
  $startoff = $end = 0;
  GetSection($startoff,$end);
   
  if( ($i = $first+$rcount)>$end  || $first<0)
    die ("count overflow");
  else
  {
    $j = $first-$rcount;
    echo "Prev:::";
    $j = $first+$rcount;
    echo "Next
";
  }
   
  while( $first < $i)
  {
    echo ReadRecord($startoff,$first,$startip,$endip);
    $startip = long2ip($startip);
    $endip = long2ip($endip);
    echo " {$first}:{$startip}--{$endip}
";
    $first ++;
  }
  fclose($fp);
}
else
{
   echo "Powered by upsdn.net";
   echo "
Thanks to cz88.net";
}  



function Whois(&$country)
{
  global $ip,$fp;

  $startoff = $begin = $end = 0;
  GetSection($startoff,$end);
  //seek index
  while ($begin < $end - 1) {
    $num = ($begin + $end) >> 1;
    fseek ($fp , $startoff + $num * 7 , SEEK_SET ) ;
    $record = unpack("Vip", fread($fp, 4));
    $record['ip'] = sprintf("%u",$record['ip']);
    if ($ip == $record['ip']) { $begin = $num; break;}
    if ($ip > $record['ip'])    $begin = $num;
    else                        $end = $num;   
  }
  //read index
  $startip = $endip = 0;
  $country = ReadRecord($startoff,$begin,$startip,$endip);
  fclose($fp);
  return $begin;
} 

function GetSection(&$startoff,&$total)
{
  global $fp;
  //open ip-database
  if (NULL == ($fp = fopen(IPDATA, "rb"))) die("cannot open dbfile.");
  //get data section offset
  $offset = unpack("Vbegin/Vend", fread($fp, 8));
  $total = ($offset['end'] - $offset['begin']) / 7;
  $startoff = $offset['begin'];
}

function ReadRecord($startoff,$number,&$startip,&$endip)
{
  global $ip;
  $record = unpack("Vbeginip/Vloc", ReadBinary($startoff+$number*7) );
  $startip = $record['beginip'];
  $locoff =($record['loc'] & 0x00FFFFFF);
  $info = unpack("Vendip/Vloc",ReadBinary($locoff)) ;
  $endip = $info['endip'];
  $info['endip'] = sprintf("%u",$info['endip']);
  if($info['endip'] < $ip)  die(" [unkown location]");
  //get GEO
  $countryoff = (($info['loc'] & 0x000000FF)== 1)?($info['loc'] >> 8):($locoff+4);
  return ReadGEOStr($countryoff)."->".ReadGEOStr($countryoff);   
}

function ReadGEOStr(&$offset)
{
  $binarydata = ReadBinary($offset);
  $info = unpack("Vloc",$binarydata);
  if( ($info['loc'] & 0x000000FF) == 2 ) {
    $GeoStr = ReadBinary($info['loc'] >> 8 );
    $GeoStr = substr($GeoStr,0,strpos($GeoStr, 0));
    $offset += 4;
  }else {
    $len = strpos($binarydata, 0);
    $GeoStr = substr($binarydata,0,$len);
    $offset += $len + 1;
  }
  return $GeoStr;
} 

function ReadBinary($positionz)
{
  global $fp;
  fseek ( $fp , $positionz , SEEK_SET ) ;
  return fread ( $fp , 32 ) ;
}

function get_time() {
  $mtime=microtime();
  $mtime=explode(" ",$mtime);
  $mtime=$mtime[1]+$mtime[0];
  return($mtime);
}
?>


 
 

作者:Greg   更新日期:2005-02-20
来源:本站特稿   浏览次数:

相关文章

• 用PHP实现标准的IP Whois查询

相关评论   发表评论

• No Comments