/** 
 * Copyright (C) 2009-2010 Yichuan, Fuchun All rights reserved. 
 * Licensed to the Apache Software Foundation (ASF) under one or more 
 * contributor license agreements. See the NOTICE file distributed with 
 * this work for additional information regarding copyright ownership. 
 * The ASF licenses this file to You under the Apache License, Version 2.0 
 * (the "License"); you may not use this file except in compliance with 
 * the License. You may obtain a copy of the License at 
 * http://www.apache.org/licenses/LICENSE-2.0 
 * Unless required by applicable law or agreed to in writing, software 
 * distributed under the License is distributed on an "AS IS" BASIS, 
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
 * See the License for the specific language governing permissions and 
 * limitations under the License. 
 * @(#) IdcardUtils.java Date: 2010-06-17 
 */  
package my.tools;  
  
import java.text.ParseException;  
import java.text.SimpleDateFormat;  
import java.util.Calendar;  
import java.util.Date;  
import java.util.HashMap;  
import java.util.Map;  
  
import org.apache.commons.lang.StringUtils;  
  
/** 
 * 身份证工具类 
 *  
 * @author June 
 * @version 1.0, 2010-06-17 
 */  
public class IdcardUtils extends StringUtils {  
  
    /** 中国公民身份证号码最小长度。 */  
    public static final int CHINA_ID_MIN_LENGTH = 15;  
  
    /** 中国公民身份证号码最大长度。 */  
    public static final int CHINA_ID_MAX_LENGTH = 18;  
  
    /** 省、直辖市代码表 */  
    public static final String cityCode[] = {  
            "11", "12", "13", "14", "15", "21", "22", "23", "31", "32", "33", "34", "35", "36", "37", "41",  
            "42", "43", "44", "45", "46", "50", "51", "52", "53", "54", "61", "62", "63", "64", "65", "71",  
            "81", "82", "91"  
    };  
  
    /** 每位加权因子 */  
    public static final int power[] = {  
            7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2  
    };  
  
    /** 第18位校检码 */  
    public static final String verifyCode[] = {  
            "1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2"  
    };  
    /** 最低年限 */  
    public static final int MIN = 1930;  
    public static Map<String, String> cityCodes = new HashMap<String, String>();  
    /** 台湾身份首字母对应数字 */  
    public static Map<String, Integer> twFirstCode = new HashMap<String, Integer>();  
    /** 香港身份首字母对应数字 */  
    public static Map<String, Integer> hkFirstCode = new HashMap<String, Integer>();  
    static {  
        cityCodes.put("11", "北京");  
        cityCodes.put("12", "天津");  
        cityCodes.put("13", "河北");  
        cityCodes.put("14", "山西");  
        cityCodes.put("15", "内蒙古");  
        cityCodes.put("21", "辽宁");  
        cityCodes.put("22", "吉林");  
        cityCodes.put("23", "黑龙江");  
        cityCodes.put("31", "上海");  
        cityCodes.put("32", "江苏");  
        cityCodes.put("33", "浙江");  
        cityCodes.put("34", "安徽");  
        cityCodes.put("35", "福建");  
        cityCodes.put("36", "江西");  
        cityCodes.put("37", "山东");  
        cityCodes.put("41", "河南");  
        cityCodes.put("42", "湖北");  
        cityCodes.put("43", "湖南");  
        cityCodes.put("44", "广东");  
        cityCodes.put("45", "广西");  
        cityCodes.put("46", "海南");  
        cityCodes.put("50", "重庆");  
        cityCodes.put("51", "四川");  
        cityCodes.put("52", "贵州");  
        cityCodes.put("53", "云南");  
        cityCodes.put("54", "西藏");  
        cityCodes.put("61", "陕西");  
        cityCodes.put("62", "甘肃");  
        cityCodes.put("63", "青海");  
        cityCodes.put("64", "宁夏");  
        cityCodes.put("65", "新疆");  
        cityCodes.put("71", "台湾");  
        cityCodes.put("81", "香港");  
        cityCodes.put("82", "澳门");  
        cityCodes.put("91", "国外");  
        twFirstCode.put("A", 10);  
        twFirstCode.put("B", 11);  
        twFirstCode.put("C", 12);  
        twFirstCode.put("D", 13);  
        twFirstCode.put("E", 14);  
        twFirstCode.put("F", 15);  
        twFirstCode.put("G", 16);  
        twFirstCode.put("H", 17);  
        twFirstCode.put("J", 18);  
        twFirstCode.put("K", 19);  
        twFirstCode.put("L", 20);  
        twFirstCode.put("M", 21);  
        twFirstCode.put("N", 22);  
        twFirstCode.put("P", 23);  
        twFirstCode.put("Q", 24);  
        twFirstCode.put("R", 25);  
        twFirstCode.put("S", 26);  
        twFirstCode.put("T", 27);  
        twFirstCode.put("U", 28);  
        twFirstCode.put("V", 29);  
        twFirstCode.put("X", 30);  
        twFirstCode.put("Y", 31);  
        twFirstCode.put("W", 32);  
        twFirstCode.put("Z", 33);  
        twFirstCode.put("I", 34);  
        twFirstCode.put("O", 35);  
        hkFirstCode.put("A", 1);  
        hkFirstCode.put("B", 2);  
        hkFirstCode.put("C", 3);  
        hkFirstCode.put("R", 18);  
        hkFirstCode.put("U", 21);  
        hkFirstCode.put("Z", 26);  
        hkFirstCode.put("X", 24);  
        hkFirstCode.put("W", 23);  
        hkFirstCode.put("O", 15);  
        hkFirstCode.put("N", 14);  
    }  
  
    /** 
     * 将15位身份证号码转换为18位 
     *  
     * @param idCard 
     *            15位身份编码 
     * @return 18位身份编码 
     */  
    public static String conver15CardTo18(String idCard) {  
        String idCard18 = "";  
        if (idCard.length() != CHINA_ID_MIN_LENGTH) {  
            return null;  
        }  
        if (isNum(idCard)) {  
            // 获取出生年月日  
            String birthday = idCard.substring(6, 12);  
            Date birthDate = null;  
            try {  
                birthDate = new SimpleDateFormat("yyMMdd").parse(birthday);  
            } catch (ParseException e) {  
                e.printStackTrace();  
            }  
            Calendar cal = Calendar.getInstance();  
            if (birthDate != null)  
                cal.setTime(birthDate);  
            // 获取出生年(完全表现形式,如：2010)  
            String sYear = String.valueOf(cal.get(Calendar.YEAR));  
            idCard18 = idCard.substring(0, 6) + sYear + idCard.substring(8);  
            // 转换字符数组  
            char[] cArr = idCard18.toCharArray();  
            if (cArr != null) {  
                int[] iCard = converCharToInt(cArr);  
                int iSum17 = getPowerSum(iCard);  
                // 获取校验位  
                String sVal = getCheckCode18(iSum17);  
                if (sVal.length() > 0) {  
                    idCard18 += sVal;  
                } else {  
                    return null;  
                }  
            }  
        } else {  
            return null;  
        }  
        return idCard18;  
    }  
  
    /** 
     * 验证身份证是否合法 
     */  
    public static boolean validateCard(String idCard) {  
        String card = idCard.trim();  
        if (validateIdCard18(card)) {  
            return true;  
        }  
        if (validateIdCard15(card)) {  
            return true;  
        }  
        String[] cardval = validateIdCard10(card);  
        if (cardval != null) {  
            if (cardval[2].equals("true")) {  
                return true;  
            }  
        }  
        return false;  
    }  
  
    /** 
     * 验证18位身份编码是否合法 
     *  
     * @param idCard 身份编码 
     * @return 是否合法 
     */  
    public static boolean validateIdCard18(String idCard) {  
        boolean bTrue = false;  
        if (idCard.length() == CHINA_ID_MAX_LENGTH) {  
            // 前17位  
            String code17 = idCard.substring(0, 17);  
            // 第18位  
            String code18 = idCard.substring(17, CHINA_ID_MAX_LENGTH);  
            if (isNum(code17)) {  
                char[] cArr = code17.toCharArray();  
                if (cArr != null) {  
                    int[] iCard = converCharToInt(cArr);  
                    int iSum17 = getPowerSum(iCard);  
                    // 获取校验位  
                    String val = getCheckCode18(iSum17);  
                    if (val.length() > 0) {  
                        if (val.equalsIgnoreCase(code18)) {  
                            bTrue = true;  
                        }  
                    }  
                }  
            }  
        }  
        return bTrue;  
    }  
  
    /** 
     * 验证15位身份编码是否合法 
     *  
     * @param idCard 
     *            身份编码 
     * @return 是否合法 
     */  
    public static boolean validateIdCard15(String idCard) {  
        if (idCard.length() != CHINA_ID_MIN_LENGTH) {  
            return false;  
        }  
        if (isNum(idCard)) {  
            String proCode = idCard.substring(0, 2);  
            if (cityCodes.get(proCode) == null) {  
                return false;  
            }  
            String birthCode = idCard.substring(6, 12);  
            Date birthDate = null;  
            try {  
                birthDate = new SimpleDateFormat("yy").parse(birthCode.substring(0, 2));  
            } catch (ParseException e) {  
                e.printStackTrace();  
            }  
            Calendar cal = Calendar.getInstance();  
            if (birthDate != null)  
                cal.setTime(birthDate);  
            if (!valiDate(cal.get(Calendar.YEAR), Integer.valueOf(birthCode.substring(2, 4)),  
                    Integer.valueOf(birthCode.substring(4, 6)))) {  
                return false;  
            }  
        } else {  
            return false;  
        }  
        return true;  
    }  
  
    /** 
     * 验证10位身份编码是否合法 
     *  
     * @param idCard 身份编码 
     * @return 身份证信息数组 
     *         <p> 
     *         [0] - 台湾、澳门、香港 [1] - 性别(男M,女F,未知N) [2] - 是否合法(合法true,不合法false) 
     *         若不是身份证件号码则返回null 
     *         </p> 
     */  
    public static String[] validateIdCard10(String idCard) {  
        String[] info = new String[3];  
        String card = idCard.replaceAll("[\\(|\\)]", "");  
        if (card.length() != 8 && card.length() != 9 && idCard.length() != 10) {  
            return null;  
        }  
        if (idCard.matches("^[a-zA-Z][0-9]{9}$")) { // 台湾  
            info[0] = "台湾";  
            System.out.println("11111");  
            String char2 = idCard.substring(1, 2);  
            if (char2.equals("1")) {  
                info[1] = "M";  
                System.out.println("MMMMMMM");  
            } else if (char2.equals("2")) {  
                info[1] = "F";  
                System.out.println("FFFFFFF");  
            } else {  
                info[1] = "N";  
                info[2] = "false";  
                System.out.println("NNNN");  
                return info;  
            }  
            info[2] = validateTWCard(idCard) ? "true" : "false";  
        } else if (idCard.matches("^[1|5|7][0-9]{6}\\(?[0-9A-Z]\\)?$")) { // 澳门  
            info[0] = "澳门";  
            info[1] = "N";  
            // TODO  
        } else if (idCard.matches("^[A-Z]{1,2}[0-9]{6}\\(?[0-9A]\\)?$")) { // 香港  
            info[0] = "香港";  
            info[1] = "N";  
            info[2] = validateHKCard(idCard) ? "true" : "false";  
        } else {  
            return null;  
        }  
        return info;  
    }  
  
    /** 
     * 验证台湾身份证号码 
     *  
     * @param idCard 
     *            身份证号码 
     * @return 验证码是否符合 
     */  
    public static boolean validateTWCard(String idCard) {  
        String start = idCard.substring(0, 1);  
        String mid = idCard.substring(1, 9);  
        String end = idCard.substring(9, 10);  
        Integer iStart = twFirstCode.get(start);  
        Integer sum = iStart / 10 + (iStart % 10) * 9;  
        char[] chars = mid.toCharArray();  
        Integer iflag = 8;  
        for (char c : chars) {  
            sum = sum + Integer.valueOf(c + "") * iflag;  
            iflag--;  
        }  
        return (sum % 10 == 0 ? 0 : (10 - sum % 10)) == Integer.valueOf(end) ? true : false;  
    }  
  
    /** 
     * 验证香港身份证号码(存在Bug，部份特殊身份证无法检查) 
     * <p> 
     * 身份证前2位为英文字符，如果只出现一个英文字符则表示第一位是空格，对应数字58 前2位英文字符A-Z分别对应数字10-35 
     * 最后一位校验码为0-9的数字加上字符"A"，"A"代表10 
     * </p> 
     * <p> 
     * 将身份证号码全部转换为数字，分别对应乘9-1相加的总和，整除11则证件号码有效 
     * </p> 
     *  
     * @param idCard 身份证号码 
     * @return 验证码是否符合 
     */  
    public static boolean validateHKCard(String idCard) {  
        String card = idCard.replaceAll("[\\(|\\)]", "");  
        Integer sum = 0;  
        if (card.length() == 9) {  
            sum = (Integer.valueOf(card.substring(0, 1).toUpperCase().toCharArray()[0]) - 55) * 9  
                    + (Integer.valueOf(card.substring(1, 2).toUpperCase().toCharArray()[0]) - 55) * 8;  
            card = card.substring(1, 9);  
        } else {  
            sum = 522 + (Integer.valueOf(card.substring(0, 1).toUpperCase().toCharArray()[0]) - 55) * 8;  
        }  
        String mid = card.substring(1, 7);  
        String end = card.substring(7, 8);  
        char[] chars = mid.toCharArray();  
        Integer iflag = 7;  
        for (char c : chars) {  
            sum = sum + Integer.valueOf(c + "") * iflag;  
            iflag--;  
        }  
        if (end.toUpperCase().equals("A")) {  
            sum = sum + 10;  
        } else {  
            sum = sum + Integer.valueOf(end);  
        }  
        return (sum % 11 == 0) ? true : false;  
    }  
  
    /** 
     * 将字符数组转换成数字数组 
     *  
     * @param ca 
     *            字符数组 
     * @return 数字数组 
     */  
    public static int[] converCharToInt(char[] ca) {  
        int len = ca.length;  
        int[] iArr = new int[len];  
        try {  
            for (int i = 0; i < len; i++) {  
                iArr[i] = Integer.parseInt(String.valueOf(ca[i]));  
            }  
        } catch (NumberFormatException e) {  
            e.printStackTrace();  
        }  
        return iArr;  
    }  
  
    /** 
     * 将身份证的每位和对应位的加权因子相乘之后，再得到和值 
     *  
     * @param iArr 
     * @return 身份证编码。 
     */  
    public static int getPowerSum(int[] iArr) {  
        int iSum = 0;  
        if (power.length == iArr.length) {  
            for (int i = 0; i < iArr.length; i++) {  
                for (int j = 0; j < power.length; j++) {  
                    if (i == j) {  
                        iSum = iSum + iArr[i] * power[j];  
                    }  
                }  
            }  
        }  
        return iSum;  
    }  
  
    /** 
     * 将power和值与11取模获得余数进行校验码判断 
     *  
     * @param iSum 
     * @return 校验位 
     */  
    public static String getCheckCode18(int iSum) {  
        String sCode = "";  
        switch (iSum % 11) {  
        case 10:  
            sCode = "2";  
            break;  
        case 9:  
            sCode = "3";  
            break;  
        case 8:  
            sCode = "4";  
            break;  
        case 7:  
            sCode = "5";  
            break;  
        case 6:  
            sCode = "6";  
            break;  
        case 5:  
            sCode = "7";  
            break;  
        case 4:  
            sCode = "8";  
            break;  
        case 3:  
            sCode = "9";  
            break;  
        case 2:  
            sCode = "x";  
            break;  
        case 1:  
            sCode = "0";  
            break;  
        case 0:  
            sCode = "1";  
            break;  
        }  
        return sCode;  
    }  
  
    /** 
     * 根据身份编号获取年龄 
     *  
     * @param idCard 
     *            身份编号 
     * @return 年龄 
     */  
    public static int getAgeByIdCard(String idCard) {  
        int iAge = 0;  
        if (idCard.length() == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        String year = idCard.substring(6, 10);  
        Calendar cal = Calendar.getInstance();  
        int iCurrYear = cal.get(Calendar.YEAR);  
        iAge = iCurrYear - Integer.valueOf(year);  
        return iAge;  
    }  
  
    /** 
     * 根据身份编号获取生日 
     *  
     * @param idCard 身份编号 
     * @return 生日(yyyyMMdd) 
     */  
    public static String getBirthByIdCard(String idCard) {  
        Integer len = idCard.length();  
        if (len < CHINA_ID_MIN_LENGTH) {  
            return null;  
        } else if (len == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        return idCard.substring(6, 14);  
    }  
  
    /** 
     * 根据身份编号获取生日年 
     *  
     * @param idCard 身份编号 
     * @return 生日(yyyy) 
     */  
    public static Short getYearByIdCard(String idCard) {  
        Integer len = idCard.length();  
        if (len < CHINA_ID_MIN_LENGTH) {  
            return null;  
        } else if (len == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        return Short.valueOf(idCard.substring(6, 10));  
    }  
  
    /** 
     * 根据身份编号获取生日月 
     *  
     * @param idCard 
     *            身份编号 
     * @return 生日(MM) 
     */  
    public static Short getMonthByIdCard(String idCard) {  
        Integer len = idCard.length();  
        if (len < CHINA_ID_MIN_LENGTH) {  
            return null;  
        } else if (len == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        return Short.valueOf(idCard.substring(10, 12));  
    }  
  
    /** 
     * 根据身份编号获取生日天 
     *  
     * @param idCard 
     *            身份编号 
     * @return 生日(dd) 
     */  
    public static Short getDateByIdCard(String idCard) {  
        Integer len = idCard.length();  
        if (len < CHINA_ID_MIN_LENGTH) {  
            return null;  
        } else if (len == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        return Short.valueOf(idCard.substring(12, 14));  
    }  
  
    /** 
     * 根据身份编号获取性别 
     *  
     * @param idCard 身份编号 
     * @return 性别(M-男，F-女，N-未知) 
     */  
    public static String getGenderByIdCard(String idCard) {  
        String sGender = "N";  
        if (idCard.length() == CHINA_ID_MIN_LENGTH) {  
            idCard = conver15CardTo18(idCard);  
        }  
        String sCardNum = idCard.substring(16, 17);  
        if (Integer.parseInt(sCardNum) % 2 != 0) {  
            sGender = "M";  
        } else {  
            sGender = "F";  
        }  
        return sGender;  
    }  
  
    /** 
     * 根据身份编号获取户籍省份 
     *  
     * @param idCard 身份编码 
     * @return 省级编码。 
     */  
    public static String getProvinceByIdCard(String idCard) {  
        int len = idCard.length();  
        String sProvince = null;  
        String sProvinNum = "";  
        if (len == CHINA_ID_MIN_LENGTH || len == CHINA_ID_MAX_LENGTH) {  
            sProvinNum = idCard.substring(0, 2);  
        }  
        sProvince = cityCodes.get(sProvinNum);  
        return sProvince;  
    }  
  
    /** 
     * 数字验证 
     *  
     * @param val 
     * @return 提取的数字。 
     */  
    public static boolean isNum(String val) {  
        return val == null || "".equals(val) ? false : val.matches("^[0-9]*$");  
    }  
  
    /** 
     * 验证小于当前日期 是否有效 
     *  
     * @param iYear 
     *            待验证日期(年) 
     * @param iMonth 
     *            待验证日期(月 1-12) 
     * @param iDate 
     *            待验证日期(日) 
     * @return 是否有效 
     */  
    public static boolean valiDate(int iYear, int iMonth, int iDate) {  
        Calendar cal = Calendar.getInstance();  
        int year = cal.get(Calendar.YEAR);  
        int datePerMonth;  
        if (iYear < MIN || iYear >= year) {  
            return false;  
        }  
        if (iMonth < 1 || iMonth > 12) {  
            return false;  
        }  
        switch (iMonth) {  
        case 4:  
        case 6:  
        case 9:  
        case 11:  
            datePerMonth = 30;  
            break;  
        case 2:  
            boolean dm = ((iYear % 4 == 0 && iYear % 100 != 0) || (iYear % 400 == 0))  
                    && (iYear > MIN && iYear < year);  
            datePerMonth = dm ? 29 : 28;  
            break;  
        default:  
            datePerMonth = 31;  
        }  
        return (iDate >= 1) && (iDate <= datePerMonth);  
    }  
}