閑來(lái)無(wú)事，想在Linux下用shell寫(xiě)一個(gè)陽(yáng)歷轉(zhuǎn)農(nóng)歷的腳本，斷斷續(xù)續(xù)大概一個(gè)星期終于搞定。現(xiàn)在拿出來(lái)與大家分享。
1、緣由
本腳本實(shí)現(xiàn)原理是查表法（因?yàn)楣接姓`差）；基于農(nóng)歷新年為基準(zhǔn)，對(duì)農(nóng)歷新年前后兩個(gè)不同的農(nóng)歷進(jìn)行計(jì)算。
寫(xiě)這個(gè)腳本之前是想在Linux 終端命令提示符中加入陽(yáng)歷及農(nóng)歷日期。在Ubuntu中有Lunar軟件可以獲取農(nóng)歷日期，但在Fedora或CentOS中并沒(méi)有類似軟件，所以就想自己來(lái)實(shí)現(xiàn)一個(gè)，但網(wǎng)上用其他語(yǔ)言寫(xiě)的一大把，如果再寫(xiě)沒(méi)什么必要。所以就想用shell來(lái)寫(xiě)一個(gè)。
2、功能及使用
功能：將具體的陽(yáng)歷日期轉(zhuǎn)換為農(nóng)歷日期。
時(shí)間范圍：1901~2099，對(duì)應(yīng)農(nóng)歷年時(shí)間為4598~4796
參數(shù)格式（無(wú)參數(shù)默認(rèn)為當(dāng)前系統(tǒng)日期）：yyyymmdd
如2013年1月1日：
復(fù)制代碼 代碼如下:
$./lunar.sh 20130101
4709-11-20
3、完整數(shù)據(jù)
完整數(shù)據(jù)下載鏈接：
http://xiazai.jb51.net/201408/tools/lunar-20131202.7z
包中文件：
lunar.sh 主腳本，具體實(shí)現(xiàn)
datebases 農(nóng)歷元數(shù)據(jù)
change.log 更改日志
readme 腳本說(shuō)明及注意事項(xiàng)
主要腳本lunar.sh代碼如下：
#!/bin/sh
DATE=$@
[ "$DATE" = "" ] DATE=$(date +%Y%m%d)
databases_path=databases
date_year=$(echo $DATE |sed 's/^\(.\{4\}\).*/\1/')
date_month=$(echo $DATE |sed 's/.*\(..\)..$/\1/')
date_day=$(echo $DATE |sed 's/.*\(..\)$/\1/')
date_days=$(date -d $DATE +%j)
lunar_year=$(sed /$date_year/!d $databases_path |sed 's/^\(....\).*/\1/')
lunar_year_data=$(sed /$date_year/!d $databases_path |sed 's/.*\ \(.*\)/\1/')
lunar_year_data_bin=$(echo "ibase=16;obase=2;$lunar_year_data"|bc |sed -e :a -e 's/^.\{1,23\}$/0/;ta')
new_year_month_bin=$(echo $lunar_year_data_bin |sed -e 's/^.\{17\}\(.\{2\}\).*/\1/')
new_year_month=$(echo "ibase=2;$new_year_month_bin"|bc |sed -e :a -e 's/^.\{1,1\}$/0/;ta')
new_year_day_bin=$(echo $lunar_year_data_bin |sed -e 's/.*\(.\{5\}\)$/\1/')
new_year_day=$(echo "ibase=2;$new_year_day_bin"|bc |sed -e :a -e 's/^.\{1,1\}$/0/;ta')
new_year_days=$(date -d $date_year$new_year_month$new_year_day +%j)
lunar_days=$(expr $date_days - $new_year_days + 1)
befor_or_after=0
if [ "$lunar_days" -le "0" ]; then
befor_or_after=1
date_year=$(($date_year - 1))
lunar_year=$(sed /$date_year/!d $databases_path |sed 's/^\(....\).*/\1/')
lunar_year_data=$(sed /$date_year/!d $databases_path |sed 's/.*\ \(.*\)/\1/')
lunar_year_data_bin=$(echo "ibase=16;obase=2;$lunar_year_data"|bc |sed -e :a -e 's/^.\{1,23\}$/0/;ta')
fi
lunar_leap_month_bin=$(echo $lunar_year_data_bin |sed -e 's/^\(.\{4\}\).*/\1/')
lunar_leap_month=$(echo "ibase=2;$lunar_leap_month_bin"|bc)
lunar_month_all_bin=$(echo $lunar_year_data_bin |sed -e 's/^.\{4\}\(.\{13\}\).*/\1/')
[ "$lunar_leap_month" = "0" ] lunar_month_all_bin=$(echo $lunar_year_data_bin |sed -e 's/^.\{4\}\(.\{12\}\).*/\1/')
lunar_month_all=$(echo $lunar_month_all_bin |sed -e 's/0/29\ /g' |sed -e 's/1/30\ /g')
if [ "$befor_or_after" = "0" ];then
lunar_month=1
lunar_day=$lunar_days
for i in $lunar_month_all
do
[ "$lunar_day" -gt "$i" ] lunar_day=$(($lunar_day - $i)) lunar_month=$(($lunar_month + 1))
[ "$lunar_day" = "$i" ] break
done
else
lunar_month=12
lunar_day=$((-$lunar_days))
lunar_month_all_bin=$(echo $lunar_month_all_bin |rev)
lunar_month_all=$(echo $lunar_month_all_bin |sed -e 's/0/29\ /g' |sed -e 's/1/30\ /g')
for i in $lunar_month_all
do
if [ "$lunar_day" -gt "$i" ]; then
lunar_day=$(($lunar_day - $i))
lunar_month=$(($lunar_month - 1))
else
lunar_day=$(($i - $lunar_day))
break
fi
done
fi
if [ "$lunar_leap_month" = "0" ]; then
echo $lunar_year-$lunar_month-$lunar_day
else
if [ "$lunar_leap_month" -ge "$lunar_month" ]; then
echo $lunar_year-$lunar_month-$lunar_day
elif [ "$befor_or_after" = "0" ]; then
if [ "$(($lunar_leap_month + 1))" = "$lunar_month" ];then
lunar_month=$(($lunar_month - 1))
echo $lunar_year-*$lunar_month-$lunar_day
else
lunar_month=$(($lunar_month - 1))
echo $lunar_year-$lunar_month-$lunar_day
fi
else
echo $lunar_year-$lunar_month-$lunar_day
fi
fi
lunar.sh
4 修改歷史
2013-12-02
發(fā)現(xiàn)bug：如果農(nóng)歷上個(gè)月是大月，本月為小月，則上個(gè)月的三十輸出為本月的初一，原因是上個(gè)月剩下30天，這正好是上個(gè)月的三十，而本月是29天，2930，下一次循環(huán)的時(shí)候又減本月的天數(shù)，使得上個(gè)月的三十成為本月的初一
bug修改：添加判斷語(yǔ)句，如果農(nóng)歷剩余天數(shù)等于當(dāng)月的天數(shù)則不再循環(huán)
您可能感興趣的文章:- php實(shí)現(xiàn)陽(yáng)歷陰歷互轉(zhuǎn)的方法
- php 陰歷-農(nóng)歷-轉(zhuǎn)換類代碼
- PHP實(shí)現(xiàn)陽(yáng)歷到農(nóng)歷轉(zhuǎn)換的類實(shí)例
- 顯示今天的日期js代碼(陽(yáng)歷和農(nóng)歷)
- python實(shí)現(xiàn)的陽(yáng)歷轉(zhuǎn)陰歷（農(nóng)歷）算法
- js輸出陰歷、陽(yáng)歷、年份、月份、周示例代碼
- 很全的顯示陰歷（農(nóng)歷）日期的js代碼
- php陽(yáng)歷轉(zhuǎn)農(nóng)歷優(yōu)化版
