閑來無事,想在Linux下用shell寫一個陽曆轉農曆的指令碼,斷斷續續大概一個星期終於搞定。現在拿出來與大家分享。
1、緣由
本指令碼實現原理是查表法(因為公式有誤差);基於農曆新年為基準,對農曆新年前後兩個不同的農曆進行計算。
寫這個指令碼之前是想在Linux 終端命令提示字元中加入陽曆及農曆日期。在Ubuntu中有Lunar軟體可以擷取農曆日期,但在Fedora或CentOS中並沒有類似軟體,所以就想自己來實現一個,但網上用其他語言寫的一大把,如果再寫沒什麼必要。所以就想用shell來寫一個。
2、功能及使用
功能:將具體的陽曆日期轉換為農曆日期。
時間範圍:1901~2099,對應農曆年時間為4598~4796
參數格式(無參數預設為當前系統日期):yyyymmdd
如2013年1月1日:
複製代碼 代碼如下:
$./lunar.sh 20130101
4709-11-20
3、完整資料
完整資料下載連結:
http://xiazai.jb51.net/201408/tools/lunar-20131202.7z
包中檔案:
lunar.sh 主指令碼,具體實現
datebases 農曆中繼資料
change.log 變更記錄檔
readme 指令碼說明及注意事項
主要指令碼lunar.sh代碼如下:
#!/bin/shDATE=$@[ "$DATE" = "" ] && DATE=$(date +%Y%m%d)databases_path=databasesdate_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=0if [ "$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')filunar_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 doneelse 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 donefiif [ "$lunar_leap_month" = "0" ]; then echo $lunar_year-$lunar_month-$lunar_dayelse 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 fifilunar.sh
4 修改曆史
2013-12-02
發現bug:如果農曆上個月是大月,本月為小月,則上個月的三十輸出為本月的初一,原因是上個月剩下30天,這正好是上個月的三十,而本月是29天,29<30,下一次迴圈的時候又減本月的天數,使得上個月的三十成為本月的初一
bug修改:添加判斷語句,如果農曆剩餘天數等於當月的天數則不再迴圈