ipseeker.java

一个jsp写的bbs

  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数组中，读取后的ip为big-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数组中，读取后的ip为big-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;
  }

  /**
   * 把类成员ip和beginIp比较，注意这个beginIp是big-endian的
   * @param ip 要查询的IP
   * @param beginIp 和被查询IP相比较的IP
   * @return 相等返回0，ip大于beginIp则返回1，小于返回-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 若b1大于b2则返回1，相等返回0，小于返回-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);
      }
    }
    // 如果循环结束了，那么i和j必定是相等的，这个记录为最可能的记录，但是并非
    //     肯定就是，还要检查一下，如果是，就返回结束地址区的绝对偏移
    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 {
      // 跳过4字节ip
      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) {
    // 跳过4字节ip
    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 LumaQQ.getString("unknown.area");
        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 LumaQQ.getString("unknown.area");
        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 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 getString(buf, 0, i, "GBK");
      }
    }
    catch (IllegalArgumentException e) {
      log.error(e.getMessage());
    }
    return "";
  }

  public static String getIpStringFromBytes(byte[] ip) {
    StringBuffer sb = new StringBuffer();
    sb.append(ip[0] & 0xFF);
    sb.append('.');
    sb.append(ip[1] & 0xFF);
    sb.append('.');
    sb.append(ip[2] & 0xFF);
    sb.append('.');
    sb.append(ip[3] & 0xFF);
    return sb.toString();
  }

  public static String getString(byte[] b, int offset, int len, String encoding) {
    try {
      return new String(b, offset, len, encoding);
    }
    catch (UnsupportedEncodingException ex) {
      return new String(b, offset, len);
    }
  }

  public static byte[] getIpByteArrayFromString(String ip) {
    byte[] ret = new byte[4];
    StringTokenizer st = new StringTokenizer(ip, ".");
    try {
      ret[0] = (byte) (Integer.parseInt(st.nextToken()) & 0xFF);
      ret[1] = (byte) (Integer.parseInt(st.nextToken()) & 0xFF);
      ret[2] = (byte) (Integer.parseInt(st.nextToken()) & 0xFF);
      ret[3] = (byte) (Integer.parseInt(st.nextToken()) & 0xFF);
    }
    catch (Exception e) {
      log.error(e.getMessage());
    }
    return ret;
  }

  public static void main(String[] args) {
    //System.out.println(IPSeeker.getInstance().getCountry("127.0.0.1"));
    //System.out.println(IPSeeker.getInstance().getArea("127.0.0.1"));
  }
}