IP 来源查询 php源代码

原创 2002年08月13日 09:13:00

《追捕》现在已经响当当了,他的成功,在于它的数据库的维护的毅力,

很多软件都在用它的数据,有些改了名字,变成xxx.dat了,嗬嗬,我觉得不太可取,有点儿不地道的感觉。

我的代码也用到了他,改不改名字无所谓了,关键尊重人家的劳动就好了。

 

在网页上增加一个段简单的代码,就可以显示来访者的地点。

还可以在自己的网站里面写一个个性化的日志,记录ip也记录地点。

效果可以查看 www.fogsun.com 的左边下角.

<?php
/**********************************************************************
*                      IP 来源追踪 Ver 1.1a
*              作者 耙子
pazee@21cn.com  http://www.fogsun.com
*                          2002/08/10
*
* 程序中的数据库来自《追捕》,请把追捕中wry.dll 拷贝到函数当前目录。
* 追捕的数据库是个的dbf文件,只不过它的扩展名字变成了dll。
* 2000年我在一个偶然的机会发现了他的dll的真实格式,后来的很多文章也提到了此格式,
* 《追捕》的数据文件目前应用非常广泛,很多查IP来源程序的基本都用到了他的数据库。
* 比如有个去广告,能显示IP来源的QQ就使用了他。
* 2001年初写过一个php的函数,但是需要php的dbf模块支持,很多网站并不提供此模块。
* 现在的版本采用二进制的文件读写,不依赖php的dbf的支持了,没有用到
* 任何shell命令.
* 由于数据文件本身是有序的,所以非常方便的采用了折半查找的算法,
* 速度很快,目前的20020325版本的数据库,大约有记录28905条,最多比较14次。
*
* 在此感谢《追捕》作者“冯志宏”
* 有任何问题请于我联系,谢谢!
pazee@21cn.com 
*
*
* 声明:
* 你可以随意传播、复制、修改此程序,但是请保留此段文字。
* 代码请勿用在商业软件上、请勿用在不正当的地方(这是《追捕》的要求),
*                       再次表示谢谢。
***********************************************************************/

// define path of wry.dll
define("DBFILENAME", "wry.dll"); 


class TRec
{
    var $StartIP;
    var $EndIP;
    var $Country;
    var $Local;
}

class TWru
{
    var $ip;
 var $fp;
 var $Rec;
    var $DATAFIELDBEGIN= 0xc2;
    var $RECORDLENGTH;
 
 // Check IP and Format IP
 function FormatIP($ip)
 {
   $ret= ereg("^([0-9]+)/.([0-9]+)/.([0-9]+)/.([0-9]+)$", $ip, $IPSection);
   if ($ret == false)
     return -1; // Invild IP
   $this->ip= '';
   for ($i=1; $i<=4; $i++)
  if ($IPSection[$i] > 255)
    return -1;
  else
    $this->ip.= sprintf("%03.0f", $IPSection[$i]). (($i<4) ? '.' : '');
   return 0;
 }
 
 // read a record from DB  
    function ReadRec($RecNo)
    {
   $this->Seek($RecNo);
      $buf= fread($this->fp, $this->RECORDLENGTH);
      if (strlen($buf) == 0)
      {
        return 1;
      }
      $this->Rec->StartIP= (substr($buf, 0, 17));
      $this->Rec->EndIP= trim(substr($buf, 17, 22));
      $this->Rec->Country= trim(substr($buf, 17+22, 13));
      $this->Rec->Local= trim(substr($buf, 17+22+13, 47));
      return 0;
    }
   
 // Go to Record Number
    function Seek($RecNo)
    {
      return fseek($this->fp, $RecNo * $this->RECORDLENGTH + $this->DATAFIELDBEGIN, SEEK_SET);
    }
   
    // Where_are_you Main Fucntion
 /*********************************************
 * 使用说明
 * 参数:
 *  IP 合法IP地址即可
 *  szLocal 是保存返回的结果字符串的
 * 返回值:
 *   此函数有返回值,可以根据返回值自行处理结果
 *   0: 查找成功
 *  -1: 无效的IP
 *   1: 打开数据库文件失败
 *   2: 数据文件错误(没找到有效记录)
 *   3: 未知 IP
 **********************************************/
 function wru($ip, &$szLocal)
    {
      $this->Rec= new TRec;
      $nRet= 0;
      $this->RECORDLENGTH= 17 + 22 + 13 + 47 + 12 + 1;   
      if ($this->FormatIP($ip) != 0)
      {
        $szLocal= "InvalidIP";
        return -1;
      }
   
      $this->fp= fopen(DBFILENAME, "rb");
      if ($this->fp == NULL) {
        $szLocal= "OpenFileError";
        return 1;
      }
   
      // Get Record Count
      fseek($this->fp, 0, SEEK_END);
      $RecordCount= floor((ftell($this->fp) - $this->DATAFIELDBEGIN) / $this->RECORDLENGTH);
      if ($RecordCount <= 1)
      {
        $szLocal= "FileDataError";
        $nRet= 2;
      }
      else
      {
        $RangB= 0;
        $RangE= $RecordCount;
        // Match ...
        while ($RangB < $RangE-1)
        {
          $RecNo= floor(($RangB + $RangE) / 2);
          $this->ReadRec($RecNo);
          if (strcmp($this->ip, $this->Rec->StartIP) >=0 && strcmp($this->ip, $this->Rec->EndIP) <=0 )
            break;          //Found match record
          if (strcmp($this->ip, $this->Rec->StartIP) > 0)
            $RangB= $RecNo;
          else
            $RangE= $RecNo;
        }
        if (!($RangB < $RangE-1))
        {
          $szLocal= "UnknowLocal!";
          $nRet= 3;
        }
        else
        { // Match Success
          $szLocal= $this->Rec->Country;
          $szLocal.= $this->Rec->Local;
        }
      }
      fclose($this->fp);
      return $nRet;
    }
}

/*******************************************************************
* 变更记录:
* 2002/08/10 完成版本 1.0a
* 2002/08/12 增加FormatIP成员函数,提供了对IP的标准格式化,支持
*   202.96.128.68 这类的写法,类的内部自动转为 202.096.128.068,
*   同时提供了完整的对IP地址的有效检查。规则是4个整数部分均不超
*   过255的自然数。
* ********************************************************************/

?>

<?
 
// Test Code.
  $wru= new TWru;
  $szResult="";
  $ip= "202.96.134.133";
  //  $ip= $REMOTE_ADDR;
  $wru->wru($ip, $szResult);
  echo $ip."<br>";
  echo $szResult;
//---------------------------------------------------------------------------
?>

记录访客的(ip,浏览器,ip归属地,操作系统代码)并记录在文件中

1.Windows操作系统的版本号一览 操作系统 PlatformID 主版本号 副版本号 Windows2000 2 ...
  • qq_33481237
  • qq_33481237
  • 2016年02月02日 11:03
  • 1531

PHP利用纯真IP数据库在本地实现IP地址信息查询

准备工作: 建议本地IP地址数据库,请到http://www.cz88.net/这个网站下载一个纯真IP数据库,安装完成后,到安装目录里把QQWry.dat文件取出来,这个就是我们想要的IP数据...
  • myweishanli
  • myweishanli
  • 2015年04月17日 16:30
  • 2361

IP 来源查询 php源代码

《追捕》现在已经响当当了,他的成功,在于它的数据库的维护的毅力,很多软件都在用它的数据,有些改了名字,变成xxx.dat了,嗬嗬,我觉得不太可取,有点儿不地道的感觉。我的代码也用到了他,改不改名字无所...
  • pazee
  • pazee
  • 2002年08月13日 09:13
  • 1417

geoip+php示例:通过ip,获取国家名称和代码

geoip+php示例:通过ip,获取国家名称和代码
  • hellochenlian
  • hellochenlian
  • 2015年03月14日 10:32
  • 4485

php 使用curl模拟ip和来源进行访问

对于限制了ip和来源的网站,使用正常的访问方式是无法访问的。本文将介绍一种方法,使用php的curl类实现模拟ip和来源,访问那些限制了ip和来源的网站。...
  • fdipzone
  • fdipzone
  • 2017年02月23日 22:04
  • 18195

使用CURL伪造来源网址与IP

很多投票都有对来路的网址和IP进行验证,但是使用CURL可以伪造成任意的网址与IP,以绕过一些简单的验证,下面举一个简单的例子。 程序运行之前,请确保 php.ini 中 extension=php...
  • suleil1
  • suleil1
  • 2015年10月28日 16:58
  • 172

IP地址查询区域源代码

  • 2014年06月17日 15:25
  • 4KB
  • 下载

PHP 根据IP地址获取所在城市

有这样的需求,需要根据用户的IP地址,定位用户所在的城市。 本文记录性文章,无逻辑性。有这样需求的朋友,可以直接拷贝使用。直接上代码,不需赘述。 ...
  • liruxing1715
  • liruxing1715
  • 2014年06月03日 10:57
  • 54231

在PHP中获取IP来源地址并且插入数据库

在项目中用到查询IP来源地址的功能,在网上搜索了一下免费的IP地址数据库未果,就直接使用ip138网站做为数据来源了,通过直接使用PHP代码去查询IP信息,然后分析网页来得到地址,最后插入数据库。 $...
  • k1988
  • k1988
  • 2011年07月04日 10:57
  • 2581

php的简单页面来源判断 HTTP_REFERER

通过 getenv("HTTP_REFERER")  可以得到页面来源可以以此进行ip限制或者页面提交限制等简要记之... ...
  • keyunq
  • keyunq
  • 2007年01月31日 11:41
  • 3482
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:IP 来源查询 php源代码
举报原因:
原因补充:

(最多只允许输入30个字)