php讀取qqwry.dat ip地址數據庫文件程序

2024-05-04 21:48:43

字體：大中小

來源：轉載

供稿：網友

首先看看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;

}//開源代碼Vevb.com

$adata = trim($country) . trim($area); //$country是國家字符串 , $area 是地區字符串

}

fclose($f);