php读取纯真ip数据库的简单例子

2. /*--------------------------------------------------
3. ip2address [qqwry.dat]
4. --------------------------------------------------*/
5. class ip {
6. var $fh; //IP数据库文件句柄
7. var $first; //第一条索引
8. var $last; //最后一条索引
9. var $total; //索引总数
10. //构造函数
11. function __construct() {
12. $this->fh = fopen('qqwry.dat', 'rb'); //qqwry.dat文件
13. $this->first = $this->getLong4();
14. $this->last = $this->getLong4();
15. $this->total = ($this->last - $this->first) / 7; //每条索引7字节
16. }
17. //检查IP合法性
18. function checkIp($ip) {
19. $arr = explode('.',$ip);
20. if(count($arr) !=4 ) {
21. return false;
22. } else {
23. for ($i=0; $i if ($arr[$i] '255') {
24. return false;
25. }
26. }
27. }
28. return true;
29. }
30. function getLong4() {
31. //读取little-endian编码的4个字节转化为长整型数
32. $result = unpack('Vlong', fread($this->fh, 4));
33. return $result['long'];
34. }
35. function getLong3() {
36. //读取little-endian编码的3个字节转化为长整型数
37. $result = unpack('Vlong', fread($this->fh, 3).chr(0));
38. return $result['long'];
39. }
40. //查询信息
41. function getInfo($data = "") {
42. $char = fread($this->fh, 1);
43. while (ord($char) != 0) { //国家地区信息以0结束
44. $data .= $char;
45. $char = fread($this->fh, 1);
46. }
47. return $data;
48. } bbs.it-home.org
49. //查询地区信息
50. function getArea() {
51. $byte = fread($this->fh, 1); //标志字节
52. switch (ord($byte)) {
53. case 0: $area = ''; break; //没有地区信息
54. case 1: //地区被重定向
55. fseek($this->fh, $this->getLong3());
56. $area = $this->getInfo(); break;
57. case 2: //地区被重定向
58. fseek($this->fh, $this->getLong3());
59. $area = $this->getInfo(); break;
60. default: $area = $this->getInfo($byte); break; //地区没有被重定向
61. }
62. return $area;
63. }
64. function ip2addr($ip) {
65. if(!$this -> checkIp($ip)){
66. return false;
67. }
68. $ip = pack('N', intval(ip2long($ip)));
69. //二分查找
70. $l = 0;
71. $r = $this->total;
72. while($l $m = floor(($l + $r) / 2); //计算中间索引
73. fseek($this->fh, $this->first + $m * 7);
74. $beginip = strrev(fread($this->fh, 4)); //中间索引的开始IP地址
75. fseek($this->fh, $this->getLong3());
76. $endip = strrev(fread($this->fh, 4)); //中间索引的结束IP地址
77. if ($ip $r = $m - 1;
78. } else {
79. if ($ip > $endip) { //用户的IP大于中间索引的结束IP地址时
80. $l = $m + 1;
81. } else { //用户IP在中间索引的IP范围内时
82. $findip = $this->first + $m * 7;
83. break;
84. }
85. }
86. }
87. //查询国家地区信息
88. fseek($this->fh, $findip);
89. $location['beginip'] = long2ip($this->getLong4()); //用户IP所在范围的开始地址
90. $offset = $this->getlong3();
91. fseek($this->fh, $offset);
92. $location['endip'] = long2ip($this->getLong4()); //用户IP所在范围的结束地址
93. $byte = fread($this->fh, 1); //标志字节
94. switch (ord($byte)) {
95. case 1: //国家和区域信息都被重定向
96. $countryOffset = $this->getLong3(); //重定向地址
97. fseek($this->fh, $countryOffset);
98. $byte = fread($this->fh, 1); //标志字节
99. switch (ord($byte)) {
100. case 2: //国家信息被二次重定向
101. fseek($this->fh, $this->getLong3());
102. $location['country'] = $this->getInfo();
103. fseek($this->fh, $countryOffset + 4);
104. $location['area'] = $this->getArea();
105. break;
106. default: //国家信息没有被二次重定向
107. $location['country'] = $this->getInfo($byte);
108. $location['area'] = $this->getArea();
109. break;
110. }
111. break;
112. case 2: //国家信息被重定向
113. fseek($this->fh, $this->getLong3());
114. $location['country'] = $this->getInfo();
115. fseek($this->fh, $offset + 8);
116. $location['area'] = $this->getArea();
117. break;
118. default: //国家信息没有被重定向
119. $location['country'] = $this->getInfo($byte);
120. $location['area'] = $this->getArea();
121. break;
122. }
123. //gb2312 to utf-8（去除无信息时显示的CZ88.NET）
124. foreach ($location as $k => $v) {
125. $location[$k] = str_replace('CZ88.NET','',iconv('gb2312', 'utf-8', $v));
126. }
127. return $location;
128. }
129. //析构函数
130. function __destruct() {
131. fclose($this->fh);
132. }
133. }
134. $ip = new ip();
135. $addr = $ip -> ip2addr('IP地址');
136. print_r($addr);
137. ?>

复制代码