Java tutorial
/* * LumaQQ - Java QQ Client * * Copyright (C) 2004 luma <stubma@163.com> * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ package edu.tsinghua.lumaqq; import static edu.tsinghua.lumaqq.resource.Messages.*; import java.io.File; 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.HashMap; import java.util.List; import java.util.Map; import org.apache.commons.logging.Log; import org.apache.commons.logging.LogFactory; import edu.tsinghua.lumaqq.qq.Util; /** * <pre> * IP???LumaQQIP??? * </pre> * * @author luma */ public class IPSeeker { /** * <pre> * ??ip???ip * </pre> * * @author luma */ 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 int IP_RECORD_LENGTH = 7; private static final byte REDIRECT_MODE_1 = 0x01; private static final byte REDIRECT_MODE_2 = 0x02; // Log private static Log log = LogFactory.getLog(IPSeeker.class); // ??cacheipcache????? private Map<String, IPLocation> ipCache; // ? private RandomAccessFile ipFile; // private MappedByteBuffer mbb; // ?? private static IPSeeker instance = new IPSeeker(); // ???? private long ipBegin, ipEnd; // ???? private IPLocation loc; private byte[] buf; private byte[] b4; private byte[] b3; /** * ? */ private IPSeeker() { ipCache = new HashMap<String, IPLocation>(); loc = new IPLocation(); buf = new byte[100]; b4 = new byte[4]; b3 = new byte[3]; try { ipFile = new RandomAccessFile(LumaQQ.IP_FILE, "r"); } catch (FileNotFoundException e) { // ????????? // ???ip?? String filename = new File(LumaQQ.IP_FILE).getName().toLowerCase(); File[] files = new File(LumaQQ.INSTALL_DIR).listFiles(); for (int i = 0; i < files.length; i++) { if (files[i].isFile()) { if (files[i].getName().toLowerCase().equals(filename)) { try { ipFile = new RandomAccessFile(files[i], "r"); } catch (FileNotFoundException e1) { log.error("IP??IP"); ipFile = null; } break; } } } } // ??? if (ipFile != null) { try { ipBegin = readLong4(0); ipEnd = readLong4(4); if (ipBegin == -1 || ipEnd == -1) { ipFile.close(); ipFile = null; } } catch (IOException e) { log.error("IP???IP"); ipFile = null; } } } /** * @return ? */ public static IPSeeker getInstance() { return instance; } /** * ????s?IP * @param s ? * @return ?IPEntryList */ public List getIPEntriesDebug(String s) { List<IPEntry> ret = new ArrayList<IPEntry>(); long endOffset = ipEnd + 4; for (long offset = ipBegin + 4; offset <= endOffset; offset += IP_RECORD_LENGTH) { // ??IP?? long temp = readLong3(offset); // temp?-1?IP? if (temp != -1) { IPLocation ipLoc = getIPLocation(temp); // ???s??List if (ipLoc.country.indexOf(s) != -1 || ipLoc.area.indexOf(s) != -1) { IPEntry entry = new IPEntry(); entry.country = ipLoc.country; entry.area = ipLoc.area; // IP readIP(offset - 4, b4); entry.beginIp = Util.getIpStringFromBytes(b4); // ?IP readIP(temp, b4); entry.endIp = Util.getIpStringFromBytes(b4); // ret.add(entry); } } } return ret; } /** * ????s?IP * @param s ? * @return ?IPEntryList */ public List<IPEntry> getIPEntries(String s) { List<IPEntry> ret = new ArrayList<IPEntry>(); try { // IP? 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 ipLoc = getIPLocation(temp); // ???s??List if (ipLoc.country.indexOf(s) != -1 || ipLoc.area.indexOf(s) != -1) { IPEntry entry = new IPEntry(); entry.country = ipLoc.country; entry.area = ipLoc.area; // IP readIP(offset - 4, b4); entry.beginIp = Util.getIpStringFromBytes(b4); // ?IP readIP(temp, b4); entry.endIp = Util.getIpStringFromBytes(b4); // ret.add(entry); } } } } catch (IOException e) { log.error(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?? * @param ip ip? * @return ?? */ public String getCountry(byte[] ip) { // ip?? if (ipFile == null) return bad_ip_file; // ?ip?ip? String ipStr = Util.getIpStringFromBytes(ip); // cache???ip?? if (ipCache.containsKey(ipStr)) { IPLocation ipLoc = ipCache.get(ipStr); return ipLoc.country; } else { IPLocation ipLoc = getIPLocation(ip); ipCache.put(ipStr, ipLoc.getCopy()); return ipLoc.country; } } /** * ?IP?? * @param ip IP? * @return ?? */ public String getCountry(String ip) { return getCountry(Util.getIpByteArrayFromString(ip)); } /** * ?IP?? * @param ip ip? * @return ?? */ public String getArea(byte[] ip) { // ip?? if (ipFile == null) return bad_ip_file; // ?ip?ip? String ipStr = Util.getIpStringFromBytes(ip); // cache???ip?? if (ipCache.containsKey(ipStr)) { IPLocation ipLoc = ipCache.get(ipStr); return ipLoc.area; } else { IPLocation ipLoc = getIPLocation(ip); ipCache.put(ipStr, ipLoc.getCopy()); return ipLoc.area; } } /** * ?IP?? * @param ip IP? * @return ?? */ public String getArea(String ip) { return getArea(Util.getIpByteArrayFromString(ip)); } /** * ?ip?ip?IPLocation?ip??ip * @param ip ?IP * @return IPLocation */ 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 = unknown_country; info.area = unknown_area; } return info; } /** * offset??4longjavabig-endian? * ??? * @param offset * @return ?long-1? */ 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??3longjavabig-endian? * ??? * @param offset ?? * @return ?long-1? */ 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; } } /** * ???3??long * @return ?long-1? */ 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??ip?ip??ipbig-endian? * little-endian?? * @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) { log.error(e.getMessage()); } } /** * offset??ip?ip??ipbig-endian? * little-endian?? * @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; } /** * ?ipbeginIp?beginIpbig-endian * @param ip ?IP * @param beginIp IPIP * @return 0ipbeginIp1?-1 */ 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? * @param b1 * @param b2 * @return b1b210?-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; } /** * ?ip??ip??? * * @param ip ?IP * @return ?IP??-1 */ private long locateIP(byte[] ip) { long m = 0; int r; // ip readIP(ipBegin, b4); r = compareIP(ip, b4); if (r == 0) return ipBegin; else if (r < 0) return -1; // ? 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); } // ?ij?? // ?????? m = readLong3(m + 4); readIP(m, b4); r = compareIP(ip, b4); if (r <= 0) return m; else return -1; } /** * begin??end????? * @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; } /** * ip??IPLocation * @param offset ?? * @return IPLocation */ private IPLocation getIPLocation(long offset) { try { // 4ip ipFile.seek(offset + 4); // ?? byte b = ipFile.readByte(); if (b == REDIRECT_MODE_1) { // ??? long countryOffset = readLong3(); // ?? ipFile.seek(countryOffset); // ????? b = ipFile.readByte(); if (b == REDIRECT_MODE_2) { loc.country = readString(readLong3()); ipFile.seek(countryOffset + 4); } else loc.country = readString(countryOffset); // ? loc.area = readArea(ipFile.getFilePointer()); } else if (b == REDIRECT_MODE_2) { 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; } } /** * ip??IPLocation? * @param offset ?? * @return IPLocation */ private IPLocation getIPLocation(int offset) { // 4ip mbb.position(offset + 4); // ?? byte b = mbb.get(); if (b == REDIRECT_MODE_1) { // ??? int countryOffset = readInt3(); // ?? mbb.position(countryOffset); // ????? b = mbb.get(); if (b == REDIRECT_MODE_2) { loc.country = readString(readInt3()); mbb.position(countryOffset + 4); } else loc.country = readString(countryOffset); // ? loc.area = readArea(mbb.position()); } else if (b == REDIRECT_MODE_2) { loc.country = readString(readInt3()); loc.area = readArea(offset + 8); } else { loc.country = readString(mbb.position() - 1); loc.area = readArea(mbb.position()); } return loc; } /** * offset??????? * @param offset ?? * @return ?? * @throws IOException */ private String readArea(long offset) throws IOException { ipFile.seek(offset); byte b = ipFile.readByte(); if (b == REDIRECT_MODE_1 || b == REDIRECT_MODE_2) { long areaOffset = readLong3(offset + 1); if (areaOffset == 0) return unknown_area; 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 == REDIRECT_MODE_1 || b == REDIRECT_MODE_2) { int areaOffset = readInt3(); if (areaOffset == 0) return unknown_area; else return readString(areaOffset); } else return readString(offset); } /** * offset???0? * @param offset ?? * @return ? */ 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 Util.getString(buf, 0, i, "GBK"); } catch (IOException e) { log.error(e.getMessage()); } return ""; } /** * offset?0 * @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 Util.getString(buf, 0, i, "GBK"); } catch (IllegalArgumentException e) { log.error(e.getMessage()); } return ""; } }