时间工具-农历日期

package com.zhihua.date;

import java.util.Date;

/**
 * 农历日期
 * <请替换成功能描述> <br>
 * <请替换成详细描述>
 * @author caizh
 * @since [1.0.0]
 * @version [1.0.0,2017年2月13日]
 */
public class Lunar {

    /**
     * 支持转换的最小农历年份
     */
    private static final int MIN_YEAR = 1900;

    /**
     * 支持转换的最大农历年份
     */
    private static final int MAX_YEAR = 2049;

    /**
     * 农历信息1900-2099
     * 数据结构如下，共使用17位数据
     * 第17位：表示闰月天数，0表示29天，1表示30天
     * 第16位-第5位（共12位）表示12个月，其中第16位表示第一月，如果该月为30天则为1,29天为0
     * 第4位-第1位（共4位）表示闰月是哪个月，如果当年没有闰月，则置0
     */
    private final static long[] lunarInfo = new long[]{
            0x04bd8, 0x04ae0, 0x0a570, 0x054d5,  
            0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2, 0x04ae0,  
            0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0, 0x0ada2,  
            0x095b0, 0x14977, 0x04970, 0x0a4b0, 0x0b4b5, 0x06a50, 0x06d40,  
            0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970, 0x06566, 0x0d4a0,  
            0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7,  
            0x0c950, 0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0,  
            0x092d0, 0x0d2b2, 0x0a950, 0x0b557, 0x06ca0, 0x0b550, 0x15355,  
            0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950, 0x06aa0,  
            0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263,  
            0x0d950, 0x05b57, 0x056a0, 0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0,  
            0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6, 0x095b0,  
            0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46,  
            0x0ab60, 0x09570, 0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50,  
            0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0, 0x0c960, 0x0d954,  
            0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0,  
            0x0cab5, 0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0,  
            0x0a5b0, 0x15176, 0x052b0, 0x0a930, 0x07954, 0x06aa0, 0x0ad50,  
            0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,  
            0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0, 0x1d0b6,  
            0x0d250, 0x0d520, 0x0dd45, 0x0b5a0, 0x056d0, 0x055b2, 0x049b0,  
            0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0   
    };

    /**
     * 天干，地支，属相
     */
    private final static String[] Gan = new String[] { "甲", "乙", "丙", "丁",
            "戊", "己", "庚", "辛", "壬", "癸" };
    private final static String[] Zhi = new String[] { "子", "丑", "寅", "卯",
            "辰", "巳", "午", "未", "申", "酉", "戌", "亥" };
    private final static String[] Animals = new String[] { "鼠", "牛", "虎",
            "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪" };

    //月份日期
    private final static String chineseTen[] = { "初", "十", "廿", "卅" };
    private final static String chineseDay[] = { "一", "二", "三", "四", "五",
            "六", "七", "八", "九", "十", "十一", "十二" };
    private final static String chineseMonth[] = { "正月", "二月", "三月", "四月",
            "五月", "六月", "七月", "八月", "九月", "十月", "十一月", "腊月" };

    /**
     * 获取指定农历年的总天数
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static int daysInYearForLunar(int year){
        int i,sum = 348;
        for(i = 0x8000; i > 0x8; i >>= 1){
            if((lunarInfo[year - MIN_YEAR] & i)!= 0){
                sum += 1;
            }            
        }
        return (sum+daysIsLeapInLunar(year));
    }

    /**
     * 获取指定农历年闰月的天数
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static int daysIsLeapInLunar(int year){
        if (leapMonth(year) != 0) {
            if ((lunarInfo[year - MIN_YEAR] & 0x10000) != 0)
                return 30;
            else
                return 29;
        } else
            return 0;
    }

    /**
     * 获取指定农历年某月的总天数
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year
     * @param month
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static int daysInMonthForLunar(int year, int month){

        if ((lunarInfo[year - MIN_YEAR] & (0x10000 >> month)) == 0)
            return 29;
        else
            return 30;
    }

    /**
     * 获取指定农历年闰月月份，没有闰月返回0
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static int leapMonth(int year){
        return (int)(lunarInfo[year - MIN_YEAR] & 0xf);
    }

    /*****************************公历转农历 计算***************************************/
    // 算出农历, 传入日期物件, 传回农历日期物件
    // 该物件属性有 .year .month .day .isLeap .yearCyl .dayCyl .monCyl
    public static String getLunar(Date date){
        return getLunar(date,false);
    }
    public static String getLunar(Date date,boolean showTGDZ){
        int year,month,day;//记录农历日期
        int leap = 0;
        int temp = 0;
        int yearCyl, monCyl,dayCyl;//天干地支年月日

        int  i;
        boolean isLeap = false;

        // 1900-01-31是农历1900年正月初一
        Date baseDate = DateUtils.getCalendar(DateUtils.convertStringToDate("1900-01-31", "yyyy-mm-dd")).getTime();// 获取毫秒数
        // 计算当前日期距1900-01-31的天数
        int offset = (int) ((date.getTime() - baseDate.getTime()) / (24 * 60 * 60 * 1000)); // 天数 
        //1899-12-21是农历1899年腊月甲子日
        dayCyl = offset + 40;
        //1898-10-01是农历甲子月
        monCyl = 14;
        // 计算当前日期距1900-01-31的年数
        for (i = MIN_YEAR; i <= MAX_YEAR && offset > 0; i++) {
            temp = daysInYearForLunar(i); // 农历每年天数
            offset -= temp;
            monCyl += 12; 
        }
        if (offset < 0) {
            offset += temp;
            i--;
            monCyl -= 12;
        }
        year = i;// 记录农历年
        yearCyl = year - MIN_YEAR +36 ; 
        leap = leapMonth(i); // 计算闰哪个月
        for (i = 1; i <= 12 && offset > 0; i++) {
            if (leap > 0 && i == (leap + 1) && isLeap == false) { // 是闰月
                --i;
                isLeap = true;
                temp = daysIsLeapInLunar(year);// 计算农历闰月天数
            } else {
                temp = daysInMonthForLunar(year, i);// 计算农历某月天数
            }
            if (isLeap == true && i == (leap + 1)) { // 解除闰月
                isLeap = false;
            }
            offset -= temp;
            if (isLeap == false) {
                monCyl++;  
            }
        }
        if (offset == 0 && leap > 0 && i == leap + 1) {// 正好是闰月
            if (isLeap) {
                isLeap = false;
            } else {
                isLeap = true;
                --i;
                --monCyl;
            }
        }
        if (offset < 0) {
            offset += temp;
            --i;
            --monCyl;
        }
        month = i; // 农历月份
        day = offset + 1; // 农历天份
        if (isLeap) {

        }
        return getChinaString(year, month, day, yearCyl, monCyl, dayCyl, isLeap, showTGDZ);
    }

    /*****************************生肖、天干、地支**************************************/

    /**
     * 获取农历年的生肖
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static String animalsYear(int year){
        return Animals[(year - 4) % 12];
    }

    /**
     * 传入月日的offset 获取干支, 0=甲子
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param num
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static String cyclicalm(int num) {
        return (Gan[num % 10] + Zhi[num % 12]);
    }

    /*****************************农历转汉字******************************************/
    /**
     * 农历转汉字
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year 农历年份
     * @param month 农历月份
     * @param day 农历日期
     * @param yearCyl 天干地支年份
     * @param monthCyl 天干地支月份
     * @param dayCyl 天干地支日
     * @param isLeap 是否是闰月
     * @param showTGDZ 是否显示天干地支
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    public static String getChinaString(int year, int month, int day, int yearCyl, int monthCyl, int dayCyl, 
            boolean isLeap, boolean showTGDZ){
        StringBuffer res = new StringBuffer();
        if(showTGDZ){
            //显示天干地支
            res.append(cyclicalm(yearCyl))
            .append(getYearInChinese(year))
            .append("】")
            .append((isLeap ? "闰" : "")).append(getMonthInChinese(month))
            .append(getDayInChinese(day))
            .append("（")
            .append(cyclicalm(monthCyl))
            .append("月 ")
            .append(cyclicalm(dayCyl))
            .append("日")
            .append("）");
        }else{
            res.append(getYearInChinese(year))
            .append((isLeap ? " 闰" : " ")).append(getMonthInChinese(month))
            .append(getDayInChinese(day));
        }
        return res.toString();
    }

    /**
     * 农历日期转汉字
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param day 农历日期
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    private static String getDayInChinese(int day){
        int n = day%10 == 0?9:day%10-1;
        if(day>30){
            return "出错";
        }
        if(day==10){
            return "初十";
        }else{
            return chineseTen[day/10] + chineseDay[n]; 
        }
    }

    /**
     * 农历月份转汉字
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param month 农历月份
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    private static String getMonthInChinese(int month){
        if(month<=0||month>12){
            return "出错";
        }
        return chineseMonth[month-1];
    }

    /**
     * 农历年份转汉字
     * <请替换成功能描述> <br>
     * <请替换成详细描述>
     * @param year 农历年份
     * @return
     * @author caizh
     * @since [1.0.0]
     * @version [1.0.0,2017年2月13日]
     */
    private static String getYearInChinese(int year){
        if (year <= MIN_YEAR || year > MAX_YEAR) {
            return "出错";
        }
        return animalsYear(year) + "年"; 
    }

    public static void main(String[] args) {
        System.out.println("农历："+ Lunar.getLunar(DateUtils.convertStringToDate("2009-06-27","yyyy-MM-dd")));
        System.out.println("农历："+ Lunar.getLunar(DateUtils.convertStringToDate("2009-06-27","yyyy-MM-dd"),true));
        System.out.println("农历："+ Lunar.getLunar(DateUtils.convertStringToDate(DateUtils.today(),"yyyy-MM-dd"),true));
    }
}