Skip to content

带GOOGLE地图功能的IP查询

2009 九月 26
by 荒野无灯

测试站点:
http://www.ihacklog.com/wordpress/wp-content/demo/ip

更新日期;2009年9月26日。
现在更换google maps api了,我下面用的是 version 3 of the Maps API ,这个第三版有什么好处呢?以前一个站点要调用这个google maps api的话,必须先到http://code.google.com/apis/maps/去为你的网站申请一个key ,而第三版的则无需key了。
用到了纯真ip库,可以到 www.qqwry.com下载最新的ip库文件。
1.ip.php

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
<?php
//读取纯真IP库
      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));a
    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;

}


function gbk2utf8($str)
{
  if(function_exists(iconv))
$str=iconv("GBK", "UTF-8", $str);
elseif(function_exists(mb_convert_encoding))
$str=mb_convert_encoding($str,"UTF-8","GBK");  //GBK 编码的转成UTF-8编码
return $str;
}


//把ip转换为物理地址的函数
function convertip($ip)
{

    $return = '';

    if(preg_match("/^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/", $ip))
    {

        $iparray = explode('.', $ip);

        if($iparray[0] == 10 || $iparray[0] == 127 || ($iparray[0] == 192 && $iparray[1] == 168) || ($iparray[0] == 172 && ($iparray[1] >= 16 && $iparray[1] <= 31)))
        {
            $return = 'LAN';
        } elseif($iparray[0] > 255 || $iparray[1] > 255 || $iparray[2] > 255 || $iparray[3] > 255)
        {
            $return = 'Invalid IP Address';
        } else
        {
            $fullipfile = dirname(__FILE__).'/ipdata/QQWry.Dat';
            if(@file_exists($fullipfile))
            {
            $return =gbk2utf8(convertip_full($ip, $fullipfile));
            //$return=str_replace('-','',$return);
            }
            else
            $return ="file {$fullipfile} is not exists!";
        }
    }

    return $return;

}


function getIp()
{
    if (isset($_SERVER))
    {
        if (isset($_SERVER["HTTP_X_FORWARDED_FOR"]))
        {
            $ip_addr = $_SERVER["HTTP_X_FORWARDED_FOR"];
        }
        elseif (isset($_SERVER["HTTP_CLIENT_IP"]))
        {
            $ip_addr = $_SERVER["HTTP_CLIENT_IP"];
        }
        else
        {
            $ip_addr = $_SERVER["REMOTE_ADDR"];
        }
    }
    else
    {
        if ( getenv( 'HTTP_X_FORWARDED_FOR' ) )
        {
            $ip_addr = getenv( 'HTTP_X_FORWARDED_FOR' );
        }
        elseif ( getenv( 'HTTP_CLIENT_IP' ) )
        {
            $ip_addr = getenv( 'HTTP_CLIENT_IP' );
        }
        else
        {
            $ip_addr = getenv( 'REMOTE_ADDR' );
        }
    }
return $ip_addr;
}




if(!empty($_REQUEST['q']))
{
$clientIp=strip_tags($_REQUEST['q']);
}
else
{
   
        $clientIp=getIp();
}
$location=convertip($clientIp);


?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>IP地址查询|IP查询     By 荒野无灯@Hacklog</title>
<meta name="Keywords" content="ip地址查询,ip查询,ip" />
<meta name="Description" content="查询你不知道的ip的来源" />
<style type="text/css">
body{
    text-align:center;
    font-size:14px;
}
.showip,.div{
    padding:10px;
    line-height:30px;
}
</style>
</head>

<body>
<h1>IP地址查询</h1>
<div class="showip">
你的IP是<?php echo   $clientIp; ?><br />你使用的网络是:<span style='color:#F00;'><?php echo $location;?></span></div>
<form action="index.php" method="post" name="search">
<div class="div">
<input type="text" name="q" value="<?php echo   $clientIp; ?>" /> <input type="submit" name="submit" value="查询" />
</div>
</form>
<br />
<br /><br />
<iframe src="maps.php?q=<?php $location=explode(' ',$location); echo $location[0];?>" width="550" height="350" frameborder="0" scrolling="no"></iframe><br />
<br />
<div style="margin:auto;">&copy; 2008-2009<a href="http://www.ihacklog.com" title="荒野无灯@Hacklog">荒野无灯@Hacklog</a></div>
<div style="display:none;">
    <script src="http://s33.cnzz.com/stat.php?id=1342177&web_id=1342177&show=pic1" language="JavaScript" charset="gb2312">  </script>

    </div>
</body>
</html>

2.maps.php

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
<?php
$addr=$_REQUEST['q'];
$url = "http://maps.google.com/maps/geo?q={$addr}&output=csv";
$content = file_get_contents($url);
$arr = explode(",",$content);
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
  <head>
       <meta name="viewport" content="initial-scale=1.0, user-scalable=no" />
    <title>Google Maps  By 荒野无灯@Hacklog</title>
<script type="text/javascript" src="http://maps.google.com/maps/api/js?sensor=true"></script>
<script type="text/javascript">
  function initialize() {
    var latlng = new google.maps.LatLng(<?php echo $arr[2];?>,<?php echo  $arr[3] ;?>);
    var myOptions = {
      zoom: 9,
      center: latlng,
      mapTypeId: google.maps.MapTypeId.ROADMAP
    };
    var map = new google.maps.Map(document.getElementById("map_canvas"), myOptions);
  }

</script>
</head>

 <body onload="initialize()">
  <div id="map_canvas" style="width:800px; height:500px"></div>
</body>

</html>

喜欢这篇文章吗?

请订阅本站 RSS feed填写您的邮件地址,订阅我们的精彩内容:,欢迎点击这里捐赠以支持荒野无灯转播到腾讯微博 转播到腾讯微博

作者:荒野无灯
出处:Hacklog【Hacklog】

声明: 本站遵循 署名-非商业性使用-相同方式共享 3.0 共享协议. 转载请注明转自Hacklog【荒野无灯weblog】

本文链接: http://ihacklog.com/?p=2372

4 Responses Post a comment
  1. 陈晓伟 permalink
    四月 17, 2012

    if($ipbegin < 0) $ipbegin += pow(2, 32);这句错误?????????

  2. 六月 19, 2009

    用过类似的东西,定位很精准啊

  3. 六月 19, 2009

    不错,不错。收藏收藏。

    PS:原来还有纯真IP库这个东东,才知道。

    另外,感觉像这种PHP连带HTML代码的,尤其是HTML还占很大比例的程序
    你可以分为两部分高亮来分别显示,标明是同一个文件就成了。呵呵。

  4. 六月 18, 2009

    呵呵,不错的东东。赞一个!

Leave a Reply

Allowed Tags - You may use these HTML tags and attributes in your comment.

<a href="" title=""> <abbr title=""> <acronym title=""> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <q cite=""> <strong>

 :wink:  :-|  :-x  :twisted:  :)  8-O  :(  :roll:  :-P  :oops:  :-o  :mrgreen:  :lol:  :idea:  :-D  :evil:  :cry:  8)  :arrow:  :-?  :?:  :!:

Note: You may use basic HTML in your comments. Your email address will not be published.

Subscribe to this comment feed via RSS