通过纯真QQip地址库文件查询IP地理位置
第二段:创建类文件 IPLocation.php ,将下面代码直接拷贝到php文件中
php
/**
* IP 地理位置查询类
*
* @author 马秉尧
*/
class IpLocation
{
* QQWry.Dat文件指针(使用以前珊瑚虫QQ的IP)
* @var resource
var $fp;
* 第一条IP记录的偏移地址
* @var int
var $firstip;
* 最后一条IP记录的偏移地址
var $lastip;
* IP记录的总条数(不包含版本信息记录)
var $totalip;
* 返回读取的长整型数
* @access private
* @return int
function getlong()
return $result['long'];
}
* 返回压缩后可进行比较的IP地址
* @param string $ip
* @return string
function packip($ip)
// 这时intval将Flase转化为整数-1,之后压缩成big-endian编码的字符串
* 返回读取的字符串
* @param string $data
function getstring($data = "")
$char = fread($this-fp, 1);
while (ord($char) 0)
{ // 字符串按照C格式保存,以\0结束 ord()得到字符的ASCII码
$data .= $char; // 将读取的字符连接到给定字符串之后
return $data;
* 返回地区信息
function getarea()
$byte = fread($this-fp, 1); // 标志字节
switch (ord($byte)) {
case 0: // 没有区域信息
$area = "";
break;
case 1:
$area = $this-getstring();
default: // 否则,表示区域信息没有被重定向
$area = $this-getstring($byte);
return $area;
* 根据所给 IP 地址或域名返回所在地区信息
* @access public
* @return array
function getlocation($ip)
if (!$this-fp) return null; // 如果数据文件没有被正确打开,则直接返回空
$location['ip'] = gethostbyname($ip); // 将输入的域名转化为IP地址
$ip = $this-packip($location['ip']); // 将输入的IP地址转化为可比较的IP地址
// 对分搜索
$l = 0; // 搜索的下边界
$u = $this-totalip; // 搜索的上边界
$findip = $this-lastip; // 如果没有找到就返回最后一条IP记录(QQWry.Dat的版本信息)
while ($l = $u)
{ // 当上边界小于下边界时,查找失败
// strrev函数今天这一节的作用是将little-endian的压缩IP地址转化为big-endian的格式
// 以便用于比较,后面相同.
if ($ip $beginip)
{ // 用户的IP小于中间记录的开始IP地址时
$u = $i - 1; // 将搜索的上边界修改为中间记录减一
else
if ($ip $endip)
{ // 用户的IP大于中间记录的结束IP地址时
$l = $i + 1; // 将搜索的下边界修改为中间记录加一
{ // 用户的IP在中间记录的IP范围内时
break; // 则表示找到结果,退出循环
//获取查找到的IP地理位置信息
fseek($this-fp, $findip);
fseek($this-fp, $offset);
switch (ord($byte))
case 1: // 标志字节为1,表示国家和区域信息都被同时重定向
fseek($this-fp, $countryOffset);
$location['country'] = $this-getstring();
$location['area'] = $this-getarea();
default: // 否则,表示国家信息没有被重定向
$location['country'] = $this-getstring($byte);
default: // 否则,表示国家信息没有被重定向
$location['country'] = "未知";
$location['area'] = "";
return $location;
* 构造函数,打开 QQWry.Dat 文件并初始化类中的信息
* @param string $filename
* @return IpLocation
function IpLocation($filename = "QQWry.Dat")
if (($this-fp = @fopen($filename, 'rb')) !== false)
$this-firstip = $this-getlong();
$this-lastip = $this-getlong();
//注册析构函数,使其在程序执行结束时执行
register_shutdown_function(array($this, '_IpLocation'));
* 析构函数,用于在页面执行结束后自动关闭打开的文件.
function _IpLocation()
fclose($this-fp);
第三段:程序部分
require_once("includes/IPLocation.php") ; //这里引用刚创建的类文件
$ipLocation = new IpLocation("includes/QQWry.Dat") ; //这里引用ip地址库
下面是一个实例,获取IP并且检索出该IP地理位置
//获取IP
error_reporting (E_ERROR | E_WARNING | E_PARSE);
if($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"])
$ip = $HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"];
elseif($HTTP_SERVER_VARS["HTTP_CLIENT_IP"])
$ip = $HTTP_SERVER_VARS["HTTP_CLIENT_IP"];
elseif ($HTTP_SERVER_VARS["REMOTE_ADDR"])
$ip = $HTTP_SERVER_VARS["REMOTE_ADDR"];
elseif (getenv("HTTP_X_FORWARDED_FOR"))
$ip = getenv("HTTP_X_FORWARDED_FOR");
elseif (getenv("HTTP_CLIENT_IP"))
$ip = getenv("HTTP_CLIENT_IP");
elseif (getenv("REMOTE_ADDR"))
$ip = getenv("REMOTE_ADDR");
$ip = "Unknown";
$ips = $ipLocation-getlocation($ip) ; //$ips 就是所得到的物理地址
var_dump($ips);
效果如下(我使用本地测试):
//?程序员通常将?IP?转换成整形写入数据库
//?读取的时候再把它转成标准的?IP?地址
echo?'pre';
print_r(array($longip?=?$ip));
不知道你要的IP地址段是IP地址列表,还是只要一个起始地址,我就当你是前一种的意思,如果你只是要范围的话也很简单,下面有代码自己改了.
// $ip是IP地址,$subnetMask是子网掩码的IP地址
function getSubNetIPList($ip, $subnetMask)
// 将ip地址和子网掩码转换为整数
// 下面的计算需要必须能够了解子网掩码的相关知识
// 计算网络号对应的整数(此地址为此网段的起始地址,但是是表示网段,所以不能分给主机使用)
$netNum = ($ipNum $subnetMaskNum);
// 计算网段结束IP地址(此地址此网段的结束IP地址,但是是广播地址,所以不能分给主机使用)
$broadcastIPNum = $netNum | (~$subnetMaskNum);
// 所以,我们知道,能够使用的IP地址是由网络号加1,知道广播地址减1
// 那么,可用的IP地址列表就很简单了
$ipAddrs = array();
for ($num = $netNum + 1; $num = $broadcastIPNum - 1; $num++) {
return $ipAddrs;
print_r($ips);
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!