再次提供一個IP地理位置查詢類-php教程-PHP中文網

IP 地理位置查詢類

/**
檔名：IpLocation.class.php
* IP 地理位置查詢類別(主檔案我上傳上來了還有一個測試檔案我上傳上來,同時還有一個QQWry.Dat這個大家可以在純真IP庫下載到因為有6M多所以這裡不上傳上來了)
*
* @author 馬秉堯
* @version 1.5
* @copyright 2005 CoolCode.CN
*/
class IpLocation {
/**
* QQWry.Dat檔案指標
* @var resource
*/
var $fp;
/**
* 第一筆IP記錄的偏移位址
* @var int
*/
var $firstip;
/**
* 最後一筆IP記錄的偏移位址
* @var int
*/
var $lastip;
* IP記錄的總條數（不包含版本資訊記錄）
* @var int
*/
var $lastip;
* 建構函數，開啟 QQWry.Dat 檔案並初始化類別中的資訊
* @param string $filename
* @return IpLocation
/**
* 傳回讀取的長整數數
* @access private
* @return int
*/
var $totalip;
/**
* 傳回讀取的3個位元組的長整數數
*
* @access private
* @return int
*/
function __construct($filename = "QQWry.Dat") {
$ this->fp = 0;
if (($this->fp = @fopen($filename, 'rb')) !== false) {
$this->firstip = $this->getlong ();
$this->lastip = $this->getlong();
$this->totalip = ($this->lastip - $this->firstip) / 7;
//註冊析構函數，使其在程式執行結束時執行
register_shutdown_function(array(&$this, '__construct'));
}
}
/**
* 回傳壓縮後可比較的IP位址
*
* @access private
* @param string $ip
* @return string
*/
function getlong() {
//將讀取的little-endian編碼的4個位元組轉換為長整數數
$result = unpack('Vlong', fread($this ->fp, 4));
return $result['long'];
}
/**
* 回傳讀取的字串
*
* @access private
* @param string $data
* @return string
*/
function getlong3() {
/ /將讀取的little-endian編碼的3個位元組轉換為長整數數
$result = unpack('Vlong', fread($this->fp, 3).chr(0));
return $result['long'];
}
/**
* 回傳地區資訊
*
* @access private
* @return string
*/
function packip($ip) {
// 將IP位址轉換為長整數型數，如果在PHP5中，IP位址錯誤，則傳回False，
// 這時intval將Flase轉換為整數-1，之後壓縮成big-endian編碼的字串
return pack(' N', intval(ip2long($ip)));
}
/**
* 根據所給予 IP 位址或網域名稱返回所在地區資訊
* @access public
* @param string $ip
* @return array
*/
function getstring($data = "") {
$char = fread($this->fp, 1);
while (ord($char) > 0) { // 字串依照C格式儲存，以
if ($ip $u = $i - 1; // 將搜尋的上邊界修改為中間記錄減一
} else {
fseek($this->fp, $this->getlong3());
$endip = strrev(fread($this->fp, 4)); // 取得中間記錄的結束IP位址
if ($ip > $endip) { // 使用者的IP大於中間記錄的結束IP位址時
$l = $i + 1; // 將搜尋的下邊界修改為中間記錄加一
} else { // 使用者的IP在中間記錄的IP範圍內時
$findip = $this->firstip + $i * 7;
break; // 則表示找到結果，退出迴圈
}
}
}
//取得查找到的IP地理位置資訊
fseek($this->fp, $findip);
$ location['beginip'] = long2ip($this->getlong()); // 使用者IP所在範圍的開始位址
$offset = $this->getlong3();
fseek($this-> fp, $offset);
$location['endip'] = long2ip($this->getlong()); // 使用者IP所在範圍的結束位址
$byte = fread($this->fp , 1); // 標誌位元組
switch (ord($byte)) {
case 1: // 標誌位元組為1，表示國家和區域資訊都同時被重新導向
$countryOffset = $this->getlong3(); // 重定向位址
fseek($this->fp, $countryOffset);
$byte = fread($this->fp, 1); // 標誌字節
switch (ord($byte)) {
case 2: // 標誌位元組為2，表示國家資訊再重新重新導向
fseek($this->fp, $this->getlong3 ());
$location['country'] = $this->getstring();
fseek($this->fp, $countryOffset + 4);
$location['area'] = $this->getarea();
break;
default: // 否則，表示國家資訊沒有被重新導向
$location['country'] = $this->getstring($byte) ;
$location['area'] = $this->getarea();
break;
}
break;
case 2: // 標誌位元組為2，表示國家訊息被重新導向
fseek($this->fp, $this->getlong3());
$location['country'] = $this->getstring();
fseek($this ->fp, $offset + 8);
$location['area'] = $this->getarea();
break;
default: // 否則，表示國家資訊沒有被重新導向
$location['country'] = $this->getstring($byte);
$location['area'] = $this->getarea();
break;
}
if ($location['country'] == " CZ88.NET") { // CZ88.NET表示沒有有效資訊
$location['country'] = "未知";
}
if ($location['area'] == " CZ88.NET") {
$location['area'] = "";
}
return $location;
}
/**
* 析構函數，用於在頁面執行結束後自動關閉已開啟的檔案。
*
*/
function __desctruct() {
if ($this->fp) {
fclose($this->fp);
}
fclose($this->fp);
}
$this->fp = 0;
}

}