用户名:
密 码: 记住
您当前的位置:首页 > 网络编程 > php教程

php查询ip所在地代码

时间:2015-01-23  来源:西部数据  作者:西部数据
  1. <?php 
  2. /** 
  3. *@ date         2010.12.21 
  4. *@ author       王刚 
  5. *@ email        373882774@qq.com 
  6. *@ qq           373882774 
  7. 注:文件头 [第一条索引的偏移量 (4byte)] + [最后一条索引的偏移地址 (4byte)]     8字节 
  8. 记录区 [结束ip (4byte)] + [地区1] + [地区2]                                4字节+不定长 
  9. 索引区 [开始ip (4byte)] + [指向记录区的偏移地址 (3byte)]                   7字节 
  10. */ 
  11. class iplocation{ 
  12. var $fp
  13. var $firstip;  //第一条ip索引的偏移地址 
  14. var $lastip;   //最后一条ip索引的偏移地址 
  15. var $totalip;  //总ip数 
  16. /* 
  17. |---------------------------------------------------------------------------- 
  18. | 构造函数,初始化一些变量 
  19. |---------------------------------------------------------------------------- 
  20. | 
  21. */ 
  22. function iplocation($datfile = "qqwry.dat"){ 
  23. $this->fp=fopen($datfile,'rb')or die("qqwry.dat不存在,请去网上 <a href='http://www.heqee.com/apps教程/download/iplocationapi.rar'>下载纯真ip数据 库</a>, 'qqwry.dat' 放到当前目录下");   //二制方式打开 
  24. $this->firstip = $this->get4b(); //第一条ip索引的绝对偏移地址 
  25. $this->lastip = $this->get4b();  //最后一条ip索引的绝对偏移地址 
  26. $this->totalip =($this->lastip - $this->firstip)/7 ; //ip总数 索引区是定长的7个字节,在此要除以7, 
  27. register_shutdown_function(array($this,"closefp"));  //为了兼容php5以下版本,本类没有用析构函数,自动关闭ip库. 
  28. /* 
  29. |---------------------------------------------------------------------------- 
  30. | 关闭ip库 
  31. |---------------------------------------------------------------------------- 
  32. | 
  33. */ 
  34. function closefp(){ 
  35. fclose($this->fp); 
  36. /* 
  37. |---------------------------------------------------------------------------- 
  38. | 读取4个字节并将解压成long的长模式 
  39. |---------------------------------------------------------------------------- 
  40. | 
  41. */ 
  42. function get4b(){ 
  43. $str=unpack("v",fread($this->fp,4)); 
  44. return $str[1]; 
  45. /* 
  46. |---------------------------------------------------------------------------- 
  47. | 读取重定向了的偏移地址 
  48. |---------------------------------------------------------------------------- 
  49. | 
  50. */ 
  51. function getoffset(){ 
  52. $str=unpack("v",fread($this->fp,3).chr(0)); 
  53. return $str[1]; 
  54. /* 
  55. |---------------------------------------------------------------------------- 
  56. | 读取ip的详细地址信息 
  57. |---------------------------------------------------------------------------- 
  58. | 
  59. */ 
  60. function getstr(){ 
  61. $split=fread($this->fp,1); 
  62. while (ord($split)!=0) { 
  63. $str .=$split
  64. $split=fread($this->fp,1); 
  65. return $str
  66. /* 
  67. |---------------------------------------------------------------------------- 
  68. | 将ip通过ip2long转成ipv4的互联网地址,再将他压缩成big-endian字节序 ,用来和索引区内的ip地址做比较 
  69. |---------------------------------------------------------------------------- 
  70. | 
  71. */ 
  72. function iptoint($ip){ 
  73. return pack("n",intval(ip2long($ip))); 
  74. /* 
  75. |---------------------------------------------------------------------------- 
  76. | 获取地址信息 
  77. |---------------------------------------------------------------------------- 
  78. | 
  79. */ 
  80. function readaddress(){ 
  81. $now_offset=ftell($this->fp); //得到当前的指针位址 
  82. $flag=$this->getflag(); 
  83. switch (ord($flag)){ 
  84. case 0: 
  85. $address=""
  86. break
  87. case 1: 
  88. case 2: 
  89. fseek($this->fp,$this->getoffset()); 
  90. $address=$this->getstr(); 
  91. break
  92. default
  93. fseek($this->fp,$now_offset); 
  94. $address=$this->getstr(); 
  95. break
  96. return $address
  97. /* 
  98. |---------------------------------------------------------------------------- 
  99. | 获取标志1或2   用来确定地址是否重定向了 
  100. |---------------------------------------------------------------------------- 
  101. | 
  102. */ 
  103. function getflag(){ 
  104. return fread($this->fp,1); 
  105. /* 
  106. |---------------------------------------------------------------------------- 
  107. | 用二分查找法在索引区内搜索ip 
  108. |---------------------------------------------------------------------------- 
  109. | 
  110. */ 
  111. function searchip($ip){ 
  112. $ip=gethostbyname($ip);     //将域名转成ip 
  113. $ip_offset["ip"]=$ip
  114. $ip=$this->iptoint($ip);    //将ip转换成长整型 
  115. $firstip=0;                 //搜索的上边界 
  116. $lastip=$this->totalip;     //搜索的下边界 
  117. $ipoffset=$this->lastip;    //初始化为最后一条ip地址的偏移地址 
  118. while ($firstip <= $lastip){ 
  119. $i=floor(($firstip + $lastip) / 2);          //计算近似中间记录 floor函数记算给定浮点数小的最大整数,说白了就是四舍五也舍 
  120. fseek($this->fp,$this->firstip + $i * 7);    //定位指针到中间记录 
  121. $startip=strrev(fread($this->fp,4));         //读取当前索引区内的开始ip地址,并将其little-endian的字节序转换成big-endian的字节序 
  122. if ($ip < $startip) { 
  123. $lastip=$i - 1; 
  124. else { 
  125. fseek($this->fp,$this->getoffset()); 
  126. $endip=strrev(fread($this->fp,4)); 
  127. if ($ip > $endip){ 
  128. $firstip=$i + 1; 
  129. else { 
  130. $ip_offset["offset"]=$this->firstip + $i * 7; 
  131. break
  132. return $ip_offset
  133. /* 
  134. |---------------------------------------------------------------------------- 
  135. | 获取ip地址详细信息 
  136. |---------------------------------------------------------------------------- 
  137. | 
  138. */ 
  139. function getaddress($ip){ 
  140. $ip_offset=$this->searchip($ip);  //获取ip 在索引区内的绝对编移地址 
  141. $ipoffset=$ip_offset["offset"]; 
  142. $address["ip"]=$ip_offset["ip"]; 
  143. fseek($this->fp,$ipoffset);      //定位到索引区 
  144. $address["startip"]=long2ip($this->get4b()); //索引区内的开始ip 地址 
  145. $address_offset=$this->getoffset();            //获取索引区内ip在ip记录区内的偏移地址 
  146. fseek($this->fp,$address_offset);            //定位到记录区内 
  147. $address["endip"]=long2ip($this->get4b());   //记录区内的结束ip 地址 
  148. $flag=$this->getflag();                      //读取标志字节 
  149. switch (ord($flag)) { 
  150. case 1:  //地区1地区2都重定向 
  151. $address_offset=$this->getoffset();   //读取重定向地址 
  152. fseek($this->fp,$address_offset);     //定位指针到重定向的地址 
  153. $flag=$this->getflag();               //读取标志字节 
  154. switch (ord($flag)) { 
  155. case 2:  //地区1又一次重定向, 
  156. fseek($this->fp,$this->getoffset()); 
  157. $address["area1"]=$this->getstr(); 
  158. fseek($this->fp,$address_offset+4);      //跳4个字节 
  159. $address["area2"]=$this->readaddress();  //地区2有可能重定向,有可能没有 
  160. break
  161. default//地区1,地区2都没有重定向 
  162. fseek($this->fp,$address_offset);        //定位指针到重定向的地址 
  163. $address["area1"]=$this->getstr(); 
  164. $address["area2"]=$this->readaddress(); 
  165. break
  166. break
  167. case 2: //地区1重定向 地区2没有重定向 
  168. $address1_offset=$this->getoffset();   //读取重定向地址 
  169. fseek($this->fp,$address1_offset);   
  170. $address["area1"]=$this->getstr(); 
  171. fseek($this->fp,$address_offset+8); 
  172. $address["area2"]=$this->readaddress(); 
  173. break
  174. default//地区1地区2都没有重定向 
  175. fseek($this->fp,$address_offset+4); 
  176. $address["area1"]=$this->getstr(); 
  177. $address["area2"]=$this->readaddress(); 
  178. break
  179. //*过滤一些无用数据 
  180. if (strpos($address["area1"],"cz88.net")!=false){ 
  181. $address["area1"]="未知"
  182. if (strpos($address["area2"],"cz88.net")!=false){ 
  183. $address["area2"]=" "
  184. return $address
  185.  
  186. /*用法如下:*/ 
  187. $ip=new iplocation("qqwry.dat"); 
  188. $address=$ip->getaddress("221.231.102.100"); 
  189. //$address=$ip->getaddress(www.111cn.net); 
  190. echo '<pre>'
  191. print_r($address); 
  192. ?> 
来顶一下
返回首页
返回首页
推荐资讯
WiFi太不安全:7岁女孩11分钟内入侵公共网络 WiFi太不安全:7岁女孩11分钟内入侵近期刚刚发布研究说WiFi网络能获得人们手机里多少私人信息,
不服跑个分?人工智能也出现“刷分”乱象 不服跑个分?人工智能也出现“刷分2014年,人工智能领域突然爆发,成为了科研和科技创业的热门
相关文章
    无相关信息
栏目更新
栏目热门