1.IP记录实体c?br />
package com.guess.tools;
/** *
* 一条IP范围记录Q不仅包括国家和区域Q也包括起始IP和结束IP *
*
* @author swallow */
public class IPEntry {
public String beginIp;
public String endIp;
public String country;
public String area;
/** *//**
* 构造函?br />
*/
public IPEntry() {
beginIp = endIp = country = area = "";
}
public String toString(){
return this.area+" "+this.country+"IP范围:"+this.beginIp+"-"+this.endIp;
}
}
2.dQQwry.dat文gc?/span>
package com.guess.tools;
import java.io.FileNotFoundException;
import java.io.IOException;
import java.io.RandomAccessFile;
import java.nio.ByteOrder;
import java.nio.MappedByteBuffer;
import java.nio.channels.FileChannel;
import java.util.ArrayList;
import java.util.Hashtable;
import java.util.List;
/** *//**
* * 用来dQQwry.dat文gQ以Ҏip获得好友位置QQQwry.dat的格式是
* 一. 文g_?字节
* 1. W一个v始IP的绝对偏U， 4字节
* 2. 最后一个v始IP的绝对偏U， 4字节
* ? "l束地址/国家/区域"记录?br />
* 四字节ip地址后跟的每一条记录分成两个部?br />
* 1. 国家记录
* 2. 地区记录
* 但是地区记录是不一定有的。而且国家记录和地录都有两UŞ?br />
* 1. ?l束的字W串
* 2. 4个字节，一个字节可能ؓ0x1?x2
* a. ?x1Ӟ表示在绝对偏Udq跟着一个区域的记录Q注意是l对偏移之后Q而不是这四个字节之后
* b. ?x2Ӟ表示在绝对偏Ud没有区域记录
* 不管?x1q是0x2Q后三个字节都是实际国家名的文g内绝对偏U?br />
* 如果是地录，0x1?x2的含义不明，但是如果出现q两个字节，也肯定是跟着3个字节偏U，如果不是
* 则ؓ0l尾字符?br />
* ? "起始地址/l束地址偏移"记录?br />
* 1. 每条记录7字节Q按照v始地址从小到大排列
* a. 起始IP地址Q?字节
* b. l束ip地址的绝对偏U，3字节
*
* 注意Q这个文仉的ip地址和所有的偏移量均采用little-endian格式Q而java是采?br />
* big-endian格式的，要注意{?br />
*
*
* @author 马若?br />
*/
public class IPSeeker {
/** *//**
* * 用来装ip相关信息Q目前只有两个字D，ip所在的国家和地?br />
*
*
* @author swallow */
private class IPLocation {
public String country;
public String area;
public IPLocation() {
country = area = "";
}
public IPLocation getCopy() {
IPLocation ret = new IPLocation();
ret.country = country;
ret.area = area;
return ret;
}
}
private static final String IP_FILE = IPSeeker.class.getResource("/QQWry.DAT").toString().substring(5);
// 一些固定常量，比如记录长度{等
private static final int IP_RECORD_LENGTH = 7;
private static final byte AREA_FOLLOWED = 0x01;
private static final byte NO_AREA = 0x2;
// 用来做ؓcacheQ查询一个ip旉先查看cacheQ以减少不必要的重复查找
private Hashtable ipCache;
// 随机文g讉Kc?br />
private RandomAccessFile ipFile;
// 内存映射文g
private MappedByteBuffer mbb;
// 单一模式实例
private static IPSeeker instance = new IPSeeker();
// 起始地区的开始和l束的绝对偏U?br />
private long ipBegin, ipEnd;
// 为提高效率而采用的临时变量
private IPLocation loc;
private byte[] buf;
private byte[] b4;
private byte[] b3;
/** *//**
* U有构造函?br />
*/
private IPSeeker() {
ipCache = new Hashtable();
loc = new IPLocation();
buf = new byte[100];
b4 = new byte[4];
b3 = new byte[3];
try {
ipFile = new RandomAccessFile(IP_FILE, "r");
} catch (FileNotFoundException e) {
System.out.println(IPSeeker.class.getResource("/QQWry.DAT").toString());
System.out.println(IP_FILE);
System.out.println("IP地址信息文g没有扑ֈQIP昄功能无法?);
ipFile = null;
}
// 如果打开文g成功Q读取文件头信息
if(ipFile != null) {
try {
ipBegin = readLong4(0);
ipEnd = readLong4(4);
if(ipBegin == -1 || ipEnd == -1) {
ipFile.close();
ipFile = null;
}
} catch (IOException e) {
System.out.println("IP地址信息文g格式有错误，IP昄功能无法?);
ipFile = null;
}
}
}
/** *//**
* @return 单一实例
*/
public static IPSeeker getInstance() {
return instance;
}
/** *//**
* l定一个地点的不完全名字，得到一pd包含s子串的IP范围记录
* @param s 地点子串
* @return 包含IPEntrycd的List
*/
public List getIPEntriesDebug(String s) {
List ret = new ArrayList();
long endOffset = ipEnd + 4;
for(long offset = ipBegin + 4; offset <= endOffset; offset += IP_RECORD_LENGTH) {
// dl束IP偏移
long temp = readLong3(offset);
// 如果temp不等?1Q读取IP的地点信?br />
if(temp != -1) {
IPLocation loc = getIPLocation(temp);
// 判断是否q个地点里面包含了s子串Q如果包含了Q添加这个记录到List中，如果没有Ql?br />
if(loc.country.indexOf(s) != -1 || loc.area.indexOf(s) != -1) {
IPEntry entry = new IPEntry();
entry.country = loc.country;
entry.area = loc.area;
// 得到起始IP
readIP(offset - 4, b4);
entry.beginIp = Utils.getIpStringFromBytes(b4);
// 得到l束IP
readIP(temp, b4);
entry.endIp = Utils.getIpStringFromBytes(b4);
// d该记?br />
ret.add(entry);
}
}
}
return ret;
}
/** *//**
* l定一个地点的不完全名字，得到一pd包含s子串的IP范围记录
* @param s 地点子串
* @return 包含IPEntrycd的List
*/
public List getIPEntries(String s) {
List ret = new ArrayList();
try {
// 映射IP信息文g到内存中
if(mbb == null) {
FileChannel fc = ipFile.getChannel();
mbb = fc.map(FileChannel.MapMode.READ_ONLY, 0, ipFile.length());
mbb.order(ByteOrder.LITTLE_ENDIAN);
}
int endOffset = (int)ipEnd;
for(int offset = (int)ipBegin + 4; offset <= endOffset; offset += IP_RECORD_LENGTH) {
int temp = readInt3(offset);
if(temp != -1) {
IPLocation loc = getIPLocation(temp);
// 判断是否q个地点里面包含了s子串Q如果包含了Q添加这个记录到List中，如果没有Ql?br />
if(loc.country.indexOf(s) != -1 || loc.area.indexOf(s) != -1) {
IPEntry entry = new IPEntry();
entry.country = loc.country;
entry.area = loc.area;
// 得到起始IP
readIP(offset - 4, b4);
entry.beginIp = Utils.getIpStringFromBytes(b4);
// 得到l束IP
readIP(temp, b4);
entry.endIp = Utils.getIpStringFromBytes(b4);
// d该记?br />
ret.add(entry);
}
}
}
} catch (IOException e) {
System.out.println(e.getMessage());
}
return ret;
}
/** *//**
* 从内存映文件的offset位置开始的3个字节读取一个int
* @param offset
* @return
*/
private int readInt3(int offset) {
mbb.position(offset);
return mbb.getInt() & 0x00FFFFFF;
}
/** *//**
* 从内存映文件的当前位置开始的3个字节读取一个int
* @return
*/
private int readInt3() {
return mbb.getInt() & 0x00FFFFFF;
}
/** *//**
* ҎIP得到国家?br />
* @param ip ip的字节数lŞ?br />
* @return 国家名字W串
*/
public String getCountry(byte[] ip) {
// 查ip地址文g是否正常
if(ipFile == null) return "错误的IP数据库文?;
// 保存ipQ{换ip字节数组为字W串形式
String ipStr = Utils.getIpStringFromBytes(ip);
// 先检查cache中是否已l包含有q个ip的结果，没有再搜索文?br />
if(ipCache.containsKey(ipStr)) {
IPLocation loc = (IPLocation)ipCache.get(ipStr);
return loc.country;
} else {
IPLocation loc = getIPLocation(ip);
ipCache.put(ipStr, loc.getCopy());
return loc.country;
}
}
/** *//**
* ҎIP得到国家?br />
* @param ip IP的字W串形式
* @return 国家名字W串
*/
public String getCountry(String ip) {
return getCountry(Utils.getIpByteArrayFromString(ip));
}
/** *//**
* ҎIP得到地区?br />
* @param ip ip的字节数lŞ?br />
* @return 地区名字W串
*/
public String getArea(byte[] ip) {
// 查ip地址文g是否正常
if(ipFile == null) return "错误的IP数据库文?;
// 保存ipQ{换ip字节数组为字W串形式
String ipStr = Utils.getIpStringFromBytes(ip);
// 先检查cache中是否已l包含有q个ip的结果，没有再搜索文?br />
if(ipCache.containsKey(ipStr)) {
IPLocation loc = (IPLocation)ipCache.get(ipStr);
return loc.area;
} else {
IPLocation loc = getIPLocation(ip);
ipCache.put(ipStr, loc.getCopy());
return loc.area;
}
}
/** *//**
* ҎIP得到地区?br />
* @param ip IP的字W串形式
* @return 地区名字W串
*/
public String getArea(String ip) {
return getArea(Utils.getIpByteArrayFromString(ip));
}
/** *//**
* Ҏip搜烦ip信息文gQ得到IPLocationl构Q所搜烦的ip参数从类成员ip中得?br />
* @param ip 要查询的IP
* @return IPLocationl构
*/
private IPLocation getIPLocation(byte[] ip) {
IPLocation info = null;
long offset = locateIP(ip);
if(offset != -1)
info = getIPLocation(offset);
if(info == null) {
info = new IPLocation();
info.country = "未知国家";
info.area = "未知地区";
}
return info;
}
/** *//**
* 从offset位置d4个字节ؓ一个longQ因为java为big-endian格式Q所以没办法
* 用了q么一个函数来做{?br />
* @param offset
* @return d的long|q回-1表示d文gp|
*/
private long readLong4(long offset) {
long ret = 0;
try {
ipFile.seek(offset);
ret |= (ipFile.readByte() & 0xFF);
ret |= ((ipFile.readByte() << 8) & 0xFF00);
ret |= ((ipFile.readByte() << 16) & 0xFF0000);
ret |= ((ipFile.readByte() << 24) & 0xFF000000);
return ret;
} catch (IOException e) {
return -1;
}
}
/** *//**
* 从offset位置d3个字节ؓ一个longQ因为java为big-endian格式Q所以没办法
* 用了q么一个函数来做{?br />
* @param offset
* @return d的long|q回-1表示d文gp|
*/
private long readLong3(long offset) {
long ret = 0;
try {
ipFile.seek(offset);
ipFile.readFully(b3);
ret |= (b3[0] & 0xFF);
ret |= ((b3[1] << 8) & 0xFF00);
ret |= ((b3[2] << 16) & 0xFF0000);
return ret;
} catch (IOException e) {
return -1;
}
}
/** *//**
* 从当前位|读?个字节{换成long
* @return
*/
private long readLong3() {
long ret = 0;
try {
ipFile.readFully(b3);
ret |= (b3[0] & 0xFF);
ret |= ((b3[1] << 8) & 0xFF00);
ret |= ((b3[2] << 16) & 0xFF0000);
return ret;
} catch (IOException e) {
return -1;
}
}
/** *//**
* 从offset位置d四个字节的ip地址攑օip数组中，d后的ip为big-endian格式Q但?br />
* 文g中是little-endian形式Q将会进行{?br />
* @param offset
* @param ip
*/
private void readIP(long offset, byte[] ip) {
try {
ipFile.seek(offset);
ipFile.readFully(ip);
byte temp = ip[0];
ip[0] = ip[3];
ip[3] = temp;
temp = ip[1];
ip[1] = ip[2];
ip[2] = temp;
} catch (IOException e) {
System.out.println(e.getMessage());
}
}
/** *//**
* 从offset位置d四个字节的ip地址攑օip数组中，d后的ip为big-endian格式Q但?br />
* 文g中是little-endian形式Q将会进行{?br />
* @param offset
* @param ip
*/
private void readIP(int offset, byte[] ip) {
mbb.position(offset);
mbb.get(ip);
byte temp = ip[0];
ip[0] = ip[3];
ip[3] = temp;
temp = ip[1];
ip[1] = ip[2];
ip[2] = temp;
}
/** *//**
* 把类成员ip和beginIp比较Q注意这个beginIp是big-endian?br />
* @param ip 要查询的IP
* @param beginIp 和被查询IP相比较的IP
* @return 相等q回0Qip大于beginIp则返?Q小于返?1?br />
*/
private int compareIP(byte[] ip, byte[] beginIp) {
for(int i = 0; i < 4; i++) {
int r = compareByte(ip[i], beginIp[i]);
if(r != 0)
return r;
}
return 0;
}
/** *//**
* 把两个byte当作无符hq行比较
* @param b1
* @param b2
* @return 若b1大于b2则返?Q相{返?Q小于返?1
*/
private int compareByte(byte b1, byte b2) {
if((b1 & 0xFF) > (b2 & 0xFF)) // 比较是否大于
return 1;
else if((b1 ^ b2) == 0)// 判断是否相等
return 0;
else
return -1;
}
/** *//**
* q个Ҏ根据ip的内容，定位到包含这个ip国家地区的记录处Q返回一个绝对偏U?br />
* Ҏ使用二分法查找?br />
* @param ip 要查询的IP
* @return 如果扑ֈ了，q回l束IP的偏U，如果没有扑ֈQ返?1
*/
private long locateIP(byte[] ip) {
long m = 0;
int r;
// 比较W一个ip?br />
readIP(ipBegin, b4);
r = compareIP(ip, b4);
if(r == 0) return ipBegin;
else if(r < 0) return -1;
// 开始二分搜?br />
for(long i = ipBegin, j = ipEnd; i < j; ) {
m = getMiddleOffset(i, j);
readIP(m, b4);
r = compareIP(ip, b4);
// log.debug(Utils.getIpStringFromBytes(b));
if(r > 0)
i = m;
else if(r < 0) {
if(m == j) {
j -= IP_RECORD_LENGTH;
m = j;
} else
j = m;
} else
return readLong3(m + 4);
}
// 如果循环l束了，那么i和j必定是相{的Q这个记录ؓ最可能的记录，但是q
// 肯定是Q还要检查一下，如果是，p回结束地址区的l对偏移
m = readLong3(m + 4);
readIP(m, b4);
r = compareIP(ip, b4);
if(r <= 0) return m;
else return -1;
}
/** *//**
* 得到begin偏移和end偏移中间位置记录的偏U?br />
* @param begin
* @param end
* @return
*/
private long getMiddleOffset(long begin, long end) {
long records = (end - begin) / IP_RECORD_LENGTH;
records >>= 1;
if(records == 0) records = 1;
return begin + records * IP_RECORD_LENGTH;
}
/** *//**
* l定一个ip国家地区记录的偏U，q回一个IPLocationl构
* @param offset
* @return
*/
private IPLocation getIPLocation(long offset) {
try {
// 跌4字节ip
ipFile.seek(offset + 4);
// dW一个字节判断是否标志字?br />
byte b = ipFile.readByte();
if(b == AREA_FOLLOWED) {
// d国家偏移
long countryOffset = readLong3();
// 跌{臛_Ud
ipFile.seek(countryOffset);
// 再检查一ơ标志字节，因ؓq个时候这个地方仍然可能是个重定向
b = ipFile.readByte();
if(b == NO_AREA) {
loc.country = readString(readLong3());
ipFile.seek(countryOffset + 4);
} else
loc.country = readString(countryOffset);
// d地区标志
loc.area = readArea(ipFile.getFilePointer());
} else if(b == NO_AREA) {
loc.country = readString(readLong3());
loc.area = readArea(offset + 8);
} else {
loc.country = readString(ipFile.getFilePointer() - 1);
loc.area = readArea(ipFile.getFilePointer());
}
return loc;
} catch (IOException e) {
return null;
}
}
/** *//**
* @param offset
* @return
*/
private IPLocation getIPLocation(int offset) {
// 跌4字节ip
mbb.position(offset + 4);
// dW一个字节判断是否标志字?br />
byte b = mbb.get();
if(b == AREA_FOLLOWED) {
// d国家偏移
int countryOffset = readInt3();
// 跌{臛_Ud
mbb.position(countryOffset);
// 再检查一ơ标志字节，因ؓq个时候这个地方仍然可能是个重定向
b = mbb.get();
if(b == NO_AREA) {
loc.country = readString(readInt3());
mbb.position(countryOffset + 4);
} else
loc.country = readString(countryOffset);
// d地区标志
loc.area = readArea(mbb.position());
} else if(b == NO_AREA) {
loc.country = readString(readInt3());
loc.area = readArea(offset + 8);
} else {
loc.country = readString(mbb.position() - 1);
loc.area = readArea(mbb.position());
}
return loc;
}
/** *//**
* 从offset偏移开始解析后面的字节Q读Z个地区名
* @param offset
* @return 地区名字W串
* @throws IOException
*/
private String readArea(long offset) throws IOException {
ipFile.seek(offset);
byte b = ipFile.readByte();
if(b == 0x01 || b == 0x02) {
long areaOffset = readLong3(offset + 1);
if(areaOffset == 0)
return "未知地区";
else
return readString(areaOffset);
} else
return readString(offset);
}
/** *//**
* @param offset
* @return
*/
private String readArea(int offset) {
mbb.position(offset);
byte b = mbb.get();
if(b == 0x01 || b == 0x02) {
int areaOffset = readInt3();
if(areaOffset == 0)
return "未知地区";
else
return readString(areaOffset);
} else
return readString(offset);
}
/** *//**
* 从offset偏移处读取一个以0l束的字W串
* @param offset
* @return d的字W串Q出错返回空字符?br />
*/
private String readString(long offset) {
try {
ipFile.seek(offset);
int i;
for(i = 0, buf[i] = ipFile.readByte(); buf[i] != 0; buf[++i] = ipFile.readByte());
if(i != 0)
return Utils.getString(buf, 0, i, "GBK");
} catch (IOException e) {
System.out.println(e.getMessage());
}
return "";
}
/** *//**
* 从内存映文件的offset位置得到一?l尾字符?br />
* @param offset
* @return
*/
private String readString(int offset) {
try {
mbb.position(offset);
int i;
for(i = 0, buf[i] = mbb.get(); buf[i] != 0; buf[++i] = mbb.get());
if(i != 0)
return Utils.getString(buf, 0, i, "GBK");
} catch (IllegalArgumentException e){
System.out.println(e.getMessage());
}
return "";
}
public String getAddress(String ip){
String country = getCountry(ip).equals(" CZ88.NET")?"":getCountry(ip);
String area = getArea(ip).equals(" CZ88.NET")?"":getArea(ip);
String address = country+" "+area;
return address.trim();
}
public static void main(String args[]) {
List list=IPSeeker.getInstance().getIPEntriesDebug("江省杭州市");
}
}
]]>