這不是什么新鮮事情了，很早之前就已經(jīng)有人做出來了。
就是使用PHP操作純真IP庫或珊瑚蟲IP庫，根據(jù)來訪者的IP得到所在的物理位置。

我先帖出代碼。然后再慢慢一步步淺析出來。希望對想了解這一塊的朋友們有幫助。

Only For PHP5的代碼。會繼續(xù)優(yōu)化代碼的。

class IpLocation{
private $fp;
private $wrydat;
private $wrydat_version;
private $ipnumber;
private $firstip;
private $lastip;
private $ip_range_begin;
private $ip_range_end;
private $country;
private $area;
const REDIRECT_MODE_0 = 0;
const REDIRECT_MODE_1 = 1;
const REDIRECT_MODE_2 = 2;
function __construct(){
$args = func_get_args();
$this->wrydat = func_num_args()>0?$args[0]:'CoralWry.dat';
$this->initialize();
}
function __destruct(){
fclose($this->fp);
}
プライベート関數(shù)Initialize(){
if(file_exists($this->wrydat))
$this->fp = fopen($this->wrydat,'rb');
$this->getipnumber();
$this->getwryversion();
}
public function get($str){
return $this->$str;
}
public function set($str) ,$val){
$this->$str = $val;
}
プライベート関數(shù) getbyte($length,$offset=null){
if(!is_null($offset) ){
fseek($this->fp,$offset,SEEK_SET);
}
$b = fread($this->fp,$length);
$b を返す;
}
/**
* IP アドレスをビッグ エンディアン (ハイ エンディアン) 形式のバイナリ データにパックします。
* データ ストレージ形式はリトル エンディアン (ロー エンディアン) です。
* 00 28 C6 DA 218.198.40.0 little endian
* 3F 28 C6 DA 218.198.40.0 little endian
* このようなデータは二分探索では比較できないため、取得した IP データをビッグエンディアンに変換する必要があります
* @param using strrev $ip
* @ビッグエンディアン形式でバイナリデータを返します
*/
private function Packip($ip){
return Pack( "N", intval( ip2long( $ip)));
}

private function getlong($length=4, $offset=null){
$chr=null;
for($c=0;$length%4!=0&&$c<( 4-$length%4);$c ){
$chr .= chr(0);
}
$var = unpack( "Vlong", $this->getbyte($length, $offset).$chr);
return $var['long'];
}

private function getwryversion(){
$length = preg_match("/coral/i" ,$this->wrydat)?26:30;
$this->wrydat_version = $this->getbyte($length, $this->firstip-$length);
}

private function getipnumber(){
$this->firstip = $this->getlong();
$this->lastip = $this->getlong();
$this->ipnumber = ($this->lastip-$this->firstip)/7 1;
}

private function getstring($data="",$offset=) null){
$char = $this->getbyte(1,$offset);
while(ord($char) > 0){
$data .= $char;
$char = $this->getbyte(1);
}
return $data;
}

private function iplocaltion($ip){
$ip = $this->>packip($ip);
$low = 0;
$high = $this-> ipnumber-1;
$ipposition = $this->lastip;
while($low <= $high){
$t = Floor(($low $high)/2);
if($ip < strrev($this->getbyte(4,$this->firstip $t*7))){
$high = $t - 1;
} else {
if($ip > strrev($this->getbyte(4,$this->getlong(3)))){
$low = $t 1;
}else{
$ipposition = $this->firstip $t*7;
Break;
}
}
}
return $ipposition;
}
プライベート関數(shù) getarea (){
$b = $this->getbyte(1);
switch(ord($b)){
case self::REDIRECT_MODE_0 :
return "未知";
Break;
case self::REDIRECT_MODE_1:
case self::REDIRECT_MODE_2:
return $this->getstring("",$this->getlong(3) );
休憩;
デフォルト:
return $this->getstring($b);
Break;
}
}
public function getiplocation($ip) ){
$ippos = $this->iplocaltion($ip);
$this->ip_range_begin = long2ip($this->getlong(4,$ippos));
$this->ip_range_end = long2ip( $this->getlong(4,$this->getlong(3)));
$b = $this->getbyte(1);
switch (ord($b)){
case self::REDIRECT_MODE_1:
$b = $this->getbyte(1,$this->getlong(3));
if(ord($b) == REDIRECT_MODE_2){
$countryoffset = $this->getlong(3);
$this->area = $this->getarea();
$this->count ry = $this->getstring ("",$countryoffset);
}else{
$this->country = $this->getstring($b);
$this->area = $this->getarea();
}
休憩;

case self::REDIRECT_MODE_2:
$countryoffset = $this->getlong(3);
$this->area = $this->get area();
$this->country = $this->getstring("",$countryoffset);
Break;

デフォルト:
$this-& gt;國 = $this-> getstring($b);
$this->area = $this->getarea();
Break;
}
}
}
/* */
echo microtime();
echo "n";
$iploca = new IpLocation;
//$iploca = new IpLocation('QQWry.dat');
echo $iploca-> ;get('wrydat_version');
echo "n";
echo $iploca->get('ipnumber');
echo "n";
$iploca->getiplocation( '211.44.32.34');
/**/
echo $iploca->get('ip_range_begin');
echo "n";
echo $iploca->get(' ip_range_end');
echo "n";
echo $iploca->get('country');
echo "n";
echo $iploca->get('area' );

echo "n";
echo $iploca->get('lastip');
echo "n";
echo microtime();
echo "n";
unset($iploca);

參考資料：LumaQQ の純真IPデータベース庫格式詳解

CoralWry.dat 文件結(jié)構(gòu)上分域:

• 文件頭［固定8個字節(jié)］
• データ區(qū)［不固定長、記錄IPの地址情報］
• 索引區(qū)［大小由文件頭決定］

この文書ブロックの保存形式は、リトル エンディアンです。
ここでは、Unicode コードのリトル エンディアンとビッグ エンディアンに関する領(lǐng)域を參照しています。

引用：

ビッグ エンディアンとリトル エンディアンは、CPU が処理する多文字數(shù)の異なる方式です。たとえば、「チェック」文字の Unicode コードは 6C49 です。

6C を前に書けばビッグエンディアンになります。49 を前に書けばリトルエンディアンになります。

「エンディアン」これは《格配列》から出ています。これまでに6回の亂亂が発生し、そのうちの1人の皇帝が命を授け、もう1人の皇帝が王位を継承した。

一般にエンディアン翻訳を「文字シーケンス」とし、ビッグ エンディアンとリトル エンディアンを「大尾」と「小尾」と呼びます。

文ファイル: 色の四角形の中にあるのが文ファイルで、前の 4 文字がインデックス領(lǐng)域の開始位置、後の 4 文字がインデックス領(lǐng)域の終了位置です。

次の図に示すように：

點擊放大

データベースはリトルエンディアンの文字列を使用しているため、これをオーバーライドする必要があります。
は、ファイルの 0 ～ 3 の文字列を取得し、unpack 関數(shù)を使用してデータを二重に変換します。

処理後のインデックス エリアの開始位置は 00077450 です。インデックス エリアの終了位置は 000CE17C です。

ハンドルに UltraEdit のソフトウェアがある場合は、CoralWry を起動できます。
次の図に示すように、
は、アドレス 00077450 の位置、つまり IP アドレス インデックス領(lǐng)域の始まりです。

點擊放大

色の棒が存在するのがインデックス エリアの開始位置です。