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 date file not exists or access denied";<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 　　　 $ipend = implode("", unpack("L", $DataEnd));<br>　　　 if($ipend 　　　 $ipAllNum = ($ipend - $ipbegin) / 7 + 1;<br>　　　 $BeginNum = 0;<br>　　　 $EndNum = $ipAllNum;<br>　　　 while($ip1num&gt;$ipNum $ip2num　　　　　　　 $Middle= intval(($EndNum + $BeginNum) / 2);<br>　　　　　　　 fseek($fd, $ipbegin + 7 * $Middle);<br>　　　　　　　 $ipData1 = fread($fd, 4);<br>　　　　　　　 if(strlen($ipData1) 　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　 return "System Error";<br>　　　　　　　 }<br>　　　　　　　 $ip1num = implode("", unpack("L", $ipData1));<br>　　　　　　　 if($ip1num 　　　　　　　 if($ip1num &gt; $ipNum) {<br>　　　　　　　　　　　 $EndNum = $Middle;<br>　　　　　　　　　　　 continue;<br>　　　　　　　 }<br>　　　　　　　 $DataSeek = fread($fd, 3);<br>　　　　　　　 if(strlen($DataSeek) 　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　 return "System Error";<br>　　　　　　　 }<br>　　　　　　　 $DataSeek = implode("", unpack("L", $DataSeek.chr(0)));<br>　　　　　　　 fseek($fd, $DataSeek);<br>　　　　　　　 $ipData2 = fread($fd, 4);<br>　　　　　　　 if(strlen($ipData2) 　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　 return "System Error";<br>　　　　　　　 }<br>　　　　　　　 $ip2num = implode("", unpack("L", $ipData2));<br>　　　　　　　 if($ip2num 　　　　　　　 if($ip2num 　　　　　　　　　　　 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 "System Error";<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) 　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　 return "System Error";<br>　　　　　　　 }<br>　　　　　　　 $ipFlag = fread($fd, 1);<br>　　　　　　　 if($ipFlag == chr(2)) {<br>　　　　　　　　　　　 $AddrSeek2 = fread($fd, 3);<br>　　　　　　　　　　　 if(strlen($AddrSeek2) 　　　　　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　　　　　 return "System Error";<br>　　　　　　　　　　　 }<br>　　　　　　　　　　　 $AddrSeek2 = implode("", unpack("L", $AddrSeek2.chr(0)));<br>　　　　　　　　　　　 fseek($fd, $AddrSeek2);<br>　　　　　　　 } else {<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) 　　　　　　　　　　　　　　　 fclose($fd);<br>　　　　　　　　　　　　　　　 return "System Error";<br>　　　　　　　　　　　 }<br>　　　　　　　　　　　 $AddrSeek2 = implode("", unpack("L", $AddrSeek2.chr(0)));<br>　　　　　　　　　　　 fseek($fd, $AddrSeek2);<br>　　　　　　　 } else {<br>　　　　　　　　　　　 fseek($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 = "Unknown";<br>　　　 }<br>　　　 $ipaddr = iconv("gbk", "utf-8//IGNORE", $ipaddr); <br>　　　 if( $ipaddr != "　 " )<br>　　　　　　　 return $ipaddr;<br>　　　 else<br>　　　　　　　 $ipaddr = "地址未知！火星来客？";<br>　　　　　　　 return $ipaddr;<br>}