php讀取qqwry.dat ip地址資料庫檔案程式

首先看看QQWry.Data檔案的內容結構 ，以及解讀方式 。

一、檔案結構
檔案主要分三個結構
1、檔案頭，8個位元組；
2、資料記錄區，不定長度；
3、索引區，長度為 7 的整數倍；

二、檔案頭
檔案頭的8個位元組分兩部分，每個部分4個位元組，分別指定了索引區的開始地址和結束位址。所以可以通過兩個地址的差值 除 7 後 加 1 可以計算出總的記錄數。

二、記錄區
記錄區的資料需要通過索引區的資料來獲得各個資料的起始位置；本區資料記錄了IP地址的結束位址和地區字串；所有地區字串都以 0×00 為結束。

三、索引區
檢索IP對應的地區，關鍵就是找到IP起始地址對應的索引內容。一個IP索引資料包含7個位元組，前4個位元組是IP地址起始值，後3個位元組是對應的IP資料 記錄在檔案內的位移地址；IP資料記錄中，前 4 個位元組是IP結束位址；緊跟的資料有兩種模式: 0×01 模式 和 0×02 模式。

0×01模式，即在IP資料的第5個位元組是 0×01，則在後面的 3 個位元組是國家地區資料的位移地址；國家地區資料包括國家和地區這兩個字串。即
—————————————————————
4位元組 | 3位元組 重新導向 0x NN NN NN -> 國家地區資料的檔案位移地址
—————————————————————

0×02模式，即在IP資料的第5個位元組是 0×02，則在後面的 3 個位元組是國家資料的位移地址，地區資料是再往後的字串，以 0×00 截至。即
—————————————————————————–
4位元組 | 3位元組 重新導向 0x NN NN NN -> 國家資料的檔案位移地址 | 地區字串 | 0×00
—————————————————————————–

對於 0×01 模式所得到的 國家地區資料中，它可能又帶有一個重新導向結構，即
————————————–
國家字串 | 0×00 | 地區字串 | 0×00
————————————–
或
————————————————————————-
國家字串 | 0×00 | 0×02 | 3位元組 0x NN NN NN -> 地區字串的檔案位移地址
————————————————————————-

對於前一種情況，比較簡單，直接讀出兩個字串資料就可以了；對於後一種情況，需要再次重新導向到地區字串的位移地址，然後讀取到 0×00 為字串結尾。

對於這種採取地址映射實際字串值的方式，主要作用是避免重複記錄字串值。在整個IP地址庫檔案中，有太多相同字串記錄了，採用 3 位元組的映射地址要比重複記錄字串值節省太多空間了。

PHP代碼讀取操作QQWry.dat檔案 ：

代碼如下

複製代碼

function bin2ip($bin){  $ip = '';  $bd = str_split($bin, 1);  for($i = 4; $i > 0; $i--){   $ip .= "." . sprintf("%03d", implode('', unpack('s', $bd[$i-1] . chr(0))));  }  return substr($ip, 1); } //-------------------------------------------------- $f = fopen('QQWry.Dat', 'r'); $c = fread($f, 4); $d = fread($f, 4); $index_begin = implode('', unpack('L', $c)); $index_end  = implode('', unpack('L', $d)); if($index_begin < 0) $index_begin += pow(2, 32); if($index_end < 0) $index_end += pow(2, 32); $ip_num = ($index_end - $index_begin) / 7 + 1; echo "index begin at: $index_beginn"; echo "index end at: $index_endn"; echo "ip data count : $ip_numn"; $output = ''; for($i = 0; $i < $ip_num; $i++){  //檔案指標指到每個IP資料檔案的索引取得索引資料(7位元組)上  fseek($f, $i * 7 + $index_begin);  $ip4 = fread($f, 4); //IP起始地址  if(strlen($ip4) < 4) exit('data file error');  $ip3 = fread($f, 3); //IP記錄位移地址  if(strlen($ip3) < 3) exit('data file error');  $dataseek = implode('', unpack('L', $ip3 . chr(0)));  if($dataseek < 0) $index_ip_record += pow(2, 32);  //指向記錄區 $dataseek 位置尋找記錄  fseek($f, $dataseek);  $ipdata = fread($f, 4); //IP結束位址  if(strlen($ipdata) < 4) exit('data file error');  $area = '';  $country = '';  //讀一個標記位  $flag = fread($f, 1);  if($flag == chr(1)){ //國家名位移標記位 模式一 0x01   $area1seek = fread($f, 3);   if(strlen($area1seek) < 3) exit('data file error');   $area1seek = implode('', unpack('L', $area1seek . chr(0)));   fseek($f, $area1seek);   $flag = fread($f, 1); //可能又是標記位  }  if($flag == chr(2)){ //國家地區 重新導向   $area1seek = fread($f, 3);   if(strlen($area1seek) < 3) exit('data file error');   $area1seek = implode('', unpack('L', $area1seek . chr(0)));   $flag = fread($f, 1);   if($flag == chr(2)){    $area2seek = fread($f, 3);    $area2seek = implode('', unpack('L', $area2seek . chr(0)));    fseek($f, $area2seek);   }else{    fseek($f, -1, SEEK_CUR);   }   while(($c = fread($f, 1)) != chr(0)) $area .= $c;   fseek($f, $area1seek);   while(($c = fread($f, 1)) != chr(0)) $country .= $c;  }else{   fseek($f, -1, SEEK_CUR);   while(($c = fread($f, 1)) != chr(0)) $country .= $c;   $flag = fread($f, 1); //如果地區是重新導向的   if($flag == chr(2)){    $area2seek = fread($f, 3);    $area2seek = implode('', unpack('L', $area2seek . chr(0)));    fseek($f, $area2seek);   }else{    fseek($f, -1, SEEK_CUR);   }   while(($c = fread($f, 1)) != chr(0)) $area .= $c;  }  $adata = trim($country) . trim($area); //$country是國家字串 , $area 是地區字串 } fclose($f);

這個函數我們看到最多的就是檔案操作相關函數如fopen,fseek,fread這些，有需要的朋友可以看看。