首页 > 开发 > Linux Shell > 正文

Shell脚本实现的阳历转农历代码分享

2020-07-27 19:13:34
字体:
来源:转载
供稿:网友

闲来无事,想在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.VeVB.COm/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修改:添加判断语句,如果农历剩余天数等于当月的天数则不再循环

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表