php调用纯真IP数据库进行IP定位

调用纯真IP数据库进行IP定位 使用exec函数调用系统Ping服务 支持linux与windows双系统运行 json格式数据回调，支持最大、最小、平均延迟返回
<?php
/*
*

• 调用系统进行ping动作
• 资源来自网络
• 由Youngxj整理

• 状态码：1000->成功,1001->error,1002->禁ping,1003->找不到主机
  *
  */
  header("Content-type: text/html; charset=gbk");
  header("Access-Control-Allow-Origin:*");
  header('Content-type: application/json');
  error_reporting(0);
  $nodeip = 'xxx.xxx.xxx.xxx'; //填写你的服务器IP
  $nodetext = '1'; //自定义文字支持html
  if (isset($_GET['host']) && $_GET["host"] != "") {

  $url = $_GET['host'];
  preg_match("/^(\w+:\/\/)?([^\/]+)/i", $url , $matches);  

  // 获得主机名

  $host = $matches[2];  

  }else{error();}
  //获取当前服务器ip地区
  $node = convertip($nodeip);
  //编码转换
  $nodetext = mb_convert_encoding($nodetext,"UTF-8","GBK");
  if (PATH_SEPARATOR==':'){ // linux

  exec("ping -c 2 -w 5 $host", $info);
  $strs = reset($info);
  $ping_time_line = end($info);
  preg_match_all("/\((.*?)\)/",$strs,$str);    //正则首行获取的ip
  $ip =$str[1][0];
  if($info[1]!=""){    //正常输出的内容

  $ping_time = explode("=", $ping_time_line)[1];
  $ping_time_min = explode("/", $ping_time)[0];
  $ping_time_avg = explode("/", $ping_time)[1];
  $ping_time_max = explode("/", $ping_time)[2];
  $location = convertip($ip);
  $arr = array("host"=>$host,"ip"=>$ip,"location"=>$location,"ping_time_min"=>$ping_time_min.'ms',"ping_time_avg"=>$ping_time_avg.'ms',"ping_time_max"=>$ping_time_max.'ms',"state"=>"1000","node"=>$node,'nodetext'=>$nodetext);
  echo json_encode($arr); //location:域名节点地址,ping_time_min:最小延迟,ping_time_avg:平均延迟,ping_time_max:最大延迟,node:该服务器地区,nodetext:自定义文字

  }elseif(empty($ip)){    //获取不到ip同时获取不到主机，说明当前地址错误或者未解析

  error();

  }else{    //禁Ping时输出的内容

  $title = explode(' ', $strs);
  $location = convertip($ip);
  $arr = array("host"=>$host,"ip"=>$ip,"location"=>$location,"state"=>"1002","title"=>$title[1],"node"=>$node,'nodetext'=>$nodetext);
  echo json_encode($arr);
  //location:域名节点地址,title:返回特殊地址,node:该服务器地区,nodetext:自定义文字

  }

  }
  else{ // windows

  exec("ping $host", $info);
  if($info[0]!=''){

  $arr = array("host"=>$host,"state"=>"1003","title"=>"请求找不到主机");
  echo json_encode($arr);
  exit();

  }
  //获取ip正则
  $strs = $info[1];
  preg_match_all("/\[(.*?)\]/",$strs,$str);
  $ip =$str[1][0];
  //获取ping值结果
  $info_time = end($info);
  $target = $info[2];
  $info_times = explode(" ",$info_time);
  $min_time = str_replace("，最长","",$info_times[6]);
  $max_time = str_replace("，平均","",$info_times[8]);
  $avg_time = str_replace("，最长","",$info_times[10]);

  //判断是否有ping值结果

  $result = checkStr("ms",$info_time);
  if($result){

  $location = convertip($ip);
  $arr = array("host"=>$host,"ip"=>$ip,"location"=>$location,"ping_time_min"=>$min_time,"ping_time_avg"=>$avg_time,"ping_time_max"=>$max_time,"state"=>"1000","node"=>$node,'nodetext'=>$nodetext);
  echo json_encode($arr); //location:域名节点地址,ping_time_min:最小延迟,ping_time_avg:平均延迟,ping_time_max:最大延迟,node:该服务器地区,nodetext:自定义文字

  }elseif(empty($ip)){        //获取不到ip同时获取不到主机，说明当前地址错误或者未解析

  error();

  }else{    //禁Ping时输出的内容

  $location = convertip($ip);
  $arr = array("host"=>$host,"ip"=>$ip,"location"=>$location,"state"=>"1002","node"=>$node,'nodetext'=>$nodetext);
  echo json_encode($arr); //location:域名节点地址,node:该服务器地区,nodetext:自定义文字

  }

  }
  function error(){

  $host = $_GET['host'];
  $arr = array("host"=>"$host","state"=>"1001");
  echo json_encode($arr);
  exit;

  }
  function convertip($ip) {
  //纯真IP数据库IP定位

  $dat_path = 'qqwry.dat';
  if(!$fd = @fopen($dat_path, 'rb')){  

  return 'IP数据库文件不存在或者禁止访问或者已经被删除！';

  }  
  $ip = explode('.', $ip);  
  $ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];  
  $DataBegin = fread($fd, 4);  
  $DataEnd = fread($fd, 4);  
  $ipbegin = implode('', unpack('L', $DataBegin));  
  if($ipbegin < 0) $ipbegin += pow(2, 32);  
  $ipend = implode('', unpack('L', $DataEnd));  
  if($ipend < 0) $ipend += pow(2, 32);  
  $ipAllNum = ($ipend - $ipbegin) / 7 + 1;  
  $BeginNum = 0;  
  $EndNum = $ipAllNum;  
  while($ip1num>$ipNum || $ip2num<$ipNum) {  

  $Middle= intval(($EndNum + $BeginNum) / 2);
  fseek($fd, $ipbegin + 7 * $Middle);
  $ipData1 = fread($fd, 4);
  if(strlen($ipData1) < 4) {

     fclose($fd);  
     return '系统出错！';  

  }
  $ip1num = implode('', unpack('L', $ipData1));
  if($ip1num < 0) $ip1num += pow(2, 32);
  if($ip1num > $ipNum) {

     $EndNum = $Middle;  
     continue;  

  }
  $DataSeek = fread($fd, 3);
  if(strlen($DataSeek) < 3) {

     fclose($fd);  
     return '系统出错！';  

  }
  $DataSeek = implode('', unpack('L', $DataSeek.chr(0)));
  fseek($fd, $DataSeek);
  $ipData2 = fread($fd, 4);
  if(strlen($ipData2) < 4) {

     fclose($fd);  
     return '系统出错！';  

  }
  $ip2num = implode('', unpack('L', $ipData2));
  if($ip2num < 0) $ip2num += pow(2, 32);
  if($ip2num < $ipNum) {

     if($Middle == $BeginNum) {  
         fclose($fd);  
         return '未知';  
     }  
     $BeginNum = $Middle;  

  }

  }  
  $ipFlag = fread($fd, 1);  
  if($ipFlag == chr(1)) {  

  $ipSeek = fread($fd, 3);
  if(strlen($ipSeek) < 3) {

     fclose($fd);  
     return '系统出错！';  

  }
  $ipSeek = implode('', unpack('L', $ipSeek.chr(0)));
  fseek($fd, $ipSeek);
  $ipFlag = fread($fd, 1);

  }  
  if($ipFlag == chr(2)) {  

  $AddrSeek = fread($fd, 3);
  if(strlen($AddrSeek) < 3) {

     fclose($fd);  
     return '系统出错！';  

  }
  $ipFlag = fread($fd, 1);
  if($ipFlag == chr(2)) {

     $AddrSeek2 = fread($fd, 3);  
     if(strlen($AddrSeek2) < 3) {  
         fclose($fd);  
         return '系统出错！';  
     }  
     $AddrSeek2 = implode('', unpack('L', $AddrSeek2.chr(0)));  
     fseek($fd, $AddrSeek2);  

  } else {

     fseek($fd, -1, SEEK_CUR);  

  }
  while(($char = fread($fd, 1)) != chr(0))

     $ipAddr2 .= $char;  

  $AddrSeek = implode('', unpack('L', $AddrSeek.chr(0)));
  fseek($fd, $AddrSeek);
  while(($char = fread($fd, 1)) != chr(0))

     $ipAddr1 .= $char;  
  } else {  

  fseek($fd, -1, SEEK_CUR);
  while(($char = fread($fd, 1)) != chr(0))

     $ipAddr1 .= $char;  

  $ipFlag = fread($fd, 1);
  if($ipFlag == chr(2)) {

     $AddrSeek2 = fread($fd, 3);  
     if(strlen($AddrSeek2) < 3) {  
         fclose($fd);  
         return '系统出错！';  
     }  
     $AddrSeek2 = implode('', unpack('L', $AddrSeek2.chr(0)));  
     fseek($fd, $AddrSeek2);  

  } else {

     fseek($fd, -1, SEEK_CUR);  

  }
  while(($char = fread($fd, 1)) != chr(0)){

     $ipAddr2 .= $char;  

  }

  }  
  fclose($fd);  
  if(preg_match('/http/i', $ipAddr2)) {  

  $ipAddr2 = '';

  }  
  $ipaddr = "$ipAddr1 $ipAddr2";  
  $ipaddr = preg_replace('/CZ88.Net/is', '', $ipaddr);  
  $ipaddr = preg_replace('/^s*/is', '', $ipaddr);  
  $ipaddr = preg_replace('/s*$/is', '', $ipaddr);  
  if(preg_match('/http/i', $ipaddr) || $ipaddr == '') {  

  $ipaddr = '未知';

  }  
  $ipaddr = iconv('gbk', 'utf-8//IGNORE', $ipaddr);   
  if( $ipaddr != '  ' )  

  return $ipaddr;

  else 

  $ipaddr = '来自火星，无法或者其所在地!';

  return $ipaddr;  

  }
  function checkStr($str,$target){
  //字符串是否存在正则

  $tmpArr = explode($str,$target);
  if(count($tmpArr)>1)return true;
  else return false;

  }
  ?>

赏 支付宝打赏 微信打赏

如果文章或资源对您有帮助，欢迎打赏作者。一路走来，感谢有您！