PHPはIPアドレスを実際のアドレスに変換します

生在红旗下长在春风里，长期浸泡在河蟹社会里面所以久而久之就有了一些河蟹的思维方式，正好有一段时间在做一个.NET的网站访问统计系统，顺便想着怎么“监视”下每一个留言的博主们的所在地，于是就有了如今下图所示的根据获取到的留言者的IP地址得到留言者所在的地区，当然并没有河蟹社会监视人民群众的意思，纯属了解一下各位博主所在的真实地点，万一是个美女博主不就可以让我有线索可循。

　　想要把IPv4地址转为真实的地址，肯定要参考IP数据库，商业的IP数据库存储在关系型数据库中，查询和使用都非常方便，但是成本不是个人和小公司愿意承受的，所以简单应用的思路就是利用一些免费的IP数据库或者一些大网站提供的查询API，他们的数据量足够我们使用了。

　　1. 利用纯真IP数据库

　　利用本地的QQWry.Dat文件（搜索下载一个QQWry.Dat 文件放到你的wordpress主题根目录下），优点是查询速度非常快，缺点是数据库文件要放在自己的空间内并且要偶尔更新数据库。时间关系废话不多说，下面是使用这个文件的函数，如果是在WordPress里面使用这个功能，把下面的代码写入主题下面的functions.php里面，然后在comments-list的输出即可。仅管理员可见话，则调用代码即可。如果是其他程序引用，输入一个有效的IPv4地址就可以得到一个真实的地址。

以下引用内容：<br><br>function Convertip($ip) {<br> $dat_path = TEMPLATEPATH."/QQWry.Dat";<br> if(!$fd = @ fopen($dat_path, "rb")){<br> return "IP 日付ファイルが存在しないか、アクセスが拒否されました";<br> }<br> $ip =explode(".", $ip);<br> $ ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];<br> $DataBegin = fread($fd, 4);<br> $ DataEnd = fread($fd, 4);<br> $ipbegin = implode("", unpack("L", $DataBegin));<br> if($ipbegin < 0) $ipbegin += pow(2) , 32);<br/> $ipend = implode("", unpack("L", $DataEnd));<br/> if($ipend < 0) $ipend += pow(2, 32);<br/> $ipAllNum = ($ipend - $ipbegin) / 7 + 1;<br/> $BeginNum = 0;<br/> $EndNum = $ipAllNum;<br/> while($ip1num>$ipNum $ip2num<$ipNum) { <br/> $Middle= intval(($EndNum + $BeginNum) / 2);<br/> fseek($fd, $ipbegin + 7 * $Middle);<br/> $ipData1 = fread($fd, 4); <br/> if(strlen($ipData1) < 4) {<br/> fclose($fd);<br/> return "システムエラー";<br/> }<br/> $ip1num = implode("", unpack( "L", $ipData1));<br/> if($ip1num < 0) $ip1num += pow(2, 32);<br/> if($ip1num > $ipNum) {<br> $EndNum = $Middle;<br> continue;<br> }<br> $データシーク = fread($fd, 3);<br> if(strlen($DataSeek) < 3) {<br> fclose($fd);<br> return "システムエラー";<br> $DataSeek = implode("", unpack("L", $DataSeek.chr(0)));<br> fseek($fd, $DataSeek);<br> $ipData2 = fread($fd, 4);<br> if(strlen($ipData2) < 4) {<br> fclose($fd);<br> return "システムエラー";<br> }<br> $ip2num = implode("", unpack("L ", $ipData2));<br> if($ip2num < 0) $ip2num += pow(2, 32);<br> if($ip2num < $ipNum) {<br> if($Middle = = $BeginNum) {<br> fclose($fd);<br> return "Unknown";<br> }<br> $BeginNum = $Middle;<br> }<br> }<br> $ipFlag = fread ($fd, 1);<br> if($ipFlag == chr(1)) {<br> $ipSeek = fread($fd, 3);<br> if(strlen($ipSeek) fclose($fd);<br> return "システムエラー";<br> }<br> $ipSeek = implode("", unpack("L", $ipSeek.chr(0))); <br> fseek($fd, $ipSeek);<br> $ipFlag = fread($fd, 1);<br> }<br> if($ipFlag == chr(2)) {<br> $AddrSeek = fread($fd, 3);<br> if(strlen($AddrSeek) < 3) {<br> fclose($fd);<br> return "システムエラー";<br> }<br> $ipFlag = fread($fd, 1);<br> if($ipFlag == ( 2)) {<br> $AddrSeek2 = fread($fd, 3);<br> if(strlen($AddrSeek2) fclose($fd);<br> 「システムエラー」を返します;<br> }<br> $AddrSeek2 = implode("", unpack("L", $AddrSeek2.chr(0)));<br> fseek($fd, $AddrSeek2);<br> { <br> fseek($fd, -1, SEEK_CUR);<br> }<br> while(($char = fread($fd, 1)) != chr(0))<br> $ipAddr2 .= $ char;<br> $AddrSeek = implode("", unpack("L", $AddrSeek.chr(0)));<br> fseek($fd, $AddrSeek);<br> while(($char = fread($fd, 1)) != chr(0))<br> $ipAddr1 .= $char;<br> } else {<br> fseek($fd, -1, SEEK_CUR);<br> while( ($char = fread($fd, 1)) != chr(0))<br> $ipAddr1 .= $char;<br><br> $ipFlag = fread($fd, 1);<br> if ($ipFlag == chr(2)) {<br>　　　　　　　　　　　 $AddrSeek2 = fread($fd, 3);<br> if(strlen($AddrSeek2) < 3) {<br> fclose($fd);<br> return "システムエラー";<br> }<br> $ addrseek2 = inprode（ ""、unpack（ "l"、$ addrseek2.chr（0）））;<br>fseek（$ fd、$ addrseek2）; <br>} elsek（$ fd（$ fd） , -1, SEEK_CUR);<br> }<br> while(($char = fread($fd, 1)) != chr(0)){<br> $ipAddr2 .= $char;<br> } <br> }<br> fclose($fd);<br> if(preg_match("/http/i", $ipAddr2)) {<br> $ipAddr2 = "";<br> }<br> $ipaddr = "$ipAddr1 $ipAddr2";<br> $ipaddr = preg_replace("/CZ88.Net/is", "", $ipaddr);<br> $ipaddr = preg_replace("/^s*/is", " ", $ipaddr);<br> $ipaddr = preg_replace("/s*$/is", "", $ipaddr);<br> if(preg_match("/http/i", $ipaddr) $ipaddr = = "") {<br> $ipaddr = "不明";<br> }<br> $ipaddr = iconv("gbk", "utf-8//IGNORE", $ipaddr); <br> if( $ipaddr != " " )<br> return $ipaddr;<br> else<br> $ipaddr = "地址未知！火星来客?";<br> return $ipaddr;<br>}<br>