PHP查询QQWry.dat通过IP获取地址信息

    使用PHP对QQWry查询得到地址，可以使用户在浏览器上就能查询：

PHP查询的代码可以直接参考Discuz项目：

http://code.google.com/p/discuz-renren-connect/

在function_misc.php里；

下面是查询函数代码：

function convertip_full($ip, $ipdatafile) {

        if(!$fd = @fopen($ipdatafile, 'rb')) {
                return '- Invalid IP data file';
        }

        $ip = explode('.', $ip);
        $ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];

        if(!($DataBegin = fread($fd, 4)) || !($DataEnd = fread($fd, 4)) ) return;
        @$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 = $ip2num = $ip1num = 0;
        $ipAddr1 = $ipAddr2 = '';
        $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 '- System Error';
                }
                $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 '- System Error';
                }
                $DataSeek = implode('', unpack('L', $DataSeek.chr(0)));
                fseek($fd, $DataSeek);
                $ipData2 = fread($fd, 4);
                if(strlen($ipData2) < 4) {
                        fclose($fd);
                        return '- System Error';
                }
                $ip2num = implode('', unpack('L', $ipData2));
                if($ip2num < 0) $ip2num += pow(2, 32);

                if($ip2num < $ipNum) {
                        if($Middle == $BeginNum) {
                                fclose($fd);
                                return '- Unknown';
                        }
                        $BeginNum = $Middle;
                }
        }

        $ipFlag = fread($fd, 1);
        if($ipFlag == chr(1)) {
                $ipSeek = fread($fd, 3);
                if(strlen($ipSeek) < 3) {
                        fclose($fd);
                        return '- System Error';
                }
                $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 '- System Error';
                }
                $ipFlag = fread($fd, 1);
                if($ipFlag == chr(2)) {
                        $AddrSeek2 = fread($fd, 3);
                        if(strlen($AddrSeek2) < 3) {
                                fclose($fd);
                                return '- System Error';
                        }
                        $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 '- System Error';
                        }
                        $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 = '- Unknown';
        }

        return '- '.$ipaddr;

}

 调用处需要传入要查询的IP地址和数据文件的路径，函数返回查询的结果；

所以再写一个调用的页面：

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
  <head>
    <meta http-equiv="content-type" content="text/html; charset=utf-8" />
    <script src="http://libs.baidu.com/jquery/1.9.0/jquery.js"></script>
    <script src="http://libs.baidu.com/bootstrap/2.0.4/js/bootstrap.min.js"></script>
    <link href="http://libs.baidu.com/bootstrap/2.0.4/css/bootstrap.min.css" rel="stylesheet"/>
    <title>IP查询简单版</title>
  </head>
  <body>
    <form class="form-horizontal" action="" method="post">
      <legend>
        QQWry
      </legend>
      <div class="control-group">
        <label class="control-label" for="ip">IP地址：</label>
        <div class="controls">
          <input  type="text" name="ip" id="ip" placeholder="请输入IP地址" maxlength="64">
        </div>
      </div>
      <div class="control-group">
        <div class="controls">
          <button type="submit" class="btn btn-primary" style="margin: 10px">
            确定
          </button>
          <button type="reset" class="btn btn-inverse" style="margin: 10px">
            重置
          </button>
        </div>
      </div>
    </form>
    <hr/>
    <?php
    header("Content-Type: text/html; charset=utf-8");
    if ($_POST != null && $_POST["ip"] != null) {
      include 'qqwry.php';
      $addr = qqwry($_POST["ip"], './qqwry.dat');
      echo iconv("GBK", "UTF-8", $addr);
    }
    ?>
  </body>
</html>

 

运行结果：