shell日期處理函數

######################################
#SHELL日期計算函數 #
#1:判斷是否閏年check_leap() #
#2:獲取月份最大日期get_mon_days() #
#3:檢查日期格式check_date() #
#4:返回昨天日期get_before_date() #
#5:返回明天日期get_next_date() #
#6:返回當月月末日期YYYYMMDD get_cur_date()
#7:返回當月月份YYYYMM get_cur_month()
#8:返回上月月末日期YYYYMMDD get_last_date()
#9:返回上月月份YYYYMM get_last_month()
######################################
#-----------------------------------------------------------------
#判斷是否閏年
#input:year
#output: "true" "fase"
check_leap()
{
Y=`expr substr $1 1 4`
r1=`expr $Y % 4`
r2=`expr $Y % 100`
r3=`expr $Y % 400`
if [ $r1 -eq 0 -a $r2 -ne 0 -o $r3 -eq 0 ]
then
FRUN="true"
else
FRUN="false"
fi
echo $FRUN
}
#-----------------------------------------------------------------

# 獲取月份最大日期
#方法1
get_mon_days()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`

case "$M" in
01|03|05|07|08|10|12) days=31;;
04|06|09|11) days=30;;
02)
_tmpStr=`check_leap "$Y"` #判斷是否閏年
if [ "$_tmpStr" = "true" ] ; then
#閏年
days=29
else
days=28
fi
;;
*)
days=0
;;
esac
echo $days
}
#-----------------------------------------------------------------
# 獲取月份最大日期
#方法2
get_mon_days2()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`

#取當月底最后一天
aa=`cal $M $Y` #日歷
days=`echo $aa | awk '{print $NF}'`
echo $days
}

#檢查日期格式(例:20090227)
#返回狀態($?) 0 合法 1 非法
check_date()
{
#檢查是否傳入一個參數
[ $# -ne 1 ] &&echo 1&&exit 1

#檢查字符串長度
_lenStr=`expr length "$1"`
[ "$_lenStr" -ne 8 ] &&echo 1&&exit 1

#檢查是否輸入的是非0開頭的數字
_tmpStr=`echo "$1" | grep "^[^0][0-9]*$"`
[ -z "$_tmpStr" ] &&echo 1&&exit 1

Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
D=`expr substr $1 7 2`
#檢查月份
[ "$M" -lt 1 -o "$M" -gt 12 ] &&echo 1&&exit 1
#取當月天數
days=`get_mon_days "$Y$M"`
#檢查日
[ "$D" -lt 1 -o "$D" -gt "$days" ] &&echo 1&&exit 1

echo 0
}
#-----------------------------------------------------------------

#返回昨天日期
get_before_date()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
D=`expr substr $1 7 2`

#某月01日的情況
if [ "$D" -eq 01 ]
then
if [ "$M" -eq 01 ]
then
#某年01月01日的情況
#取上年年底日期(12月31日)
YY=`expr $Y - 1`
be_date="${YY}1231"
else
#取上個月月末日期
MM=`expr $M - 1`
MM=`printf "%02d" $MM`
dad=`get_mon_days "$Y$MM"`
be_date="$Y$MM$dad"
fi
else
#通常情況
DD=`expr $D - 1`
DD=`printf "%02d" $DD`
be_date="$Y$M$DD"
fi
echo $be_date
}
#-----------------------------------------------------------------

#返回明天日期
get_next_date()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
D=`expr substr $1 7 2`

dad=`get_mon_days "$Y$M"` #當月天數

if [ "$D" = "$dad" ];then
#特殊情況:月底
if [ "$M$D" = "1231" ];then
#年底的情況
YY=`expr $Y + 1`
next_date="${YY}0101"
else
MM=`expr $M + 1`
MM=`printf "%02d" $MM`
next_date="$Y${MM}01"
fi
else
#通常情況
DD=`expr $D + 1`
DD=`printf "%02d" $DD`
next_date="$Y$M$DD"
fi

echo $next_date
}
#-----------------------------------------------------------------
#返回當月月末日期YYYYMMDD
get_cur_date()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
r1=`expr $Y % 4`
r2=`expr $Y % 100`
r3=`expr $Y % 400`
case $M in 01|03|05|07|08|10|12) days=31;; 04|06|09|11) days=30;;
esac
if [ $M -eq 02 ]
then if [ r1 -eq 0 -a r2 -ne 0 -o r3 -eq 0 ]
then days=29
else days=28
fi
fi
echo $Y$M$days
}
#返回當月月份YYYYMM
get_cur_month()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
echo $Y$M
}
#返回上月月末日期YYYYMMDD
get_last_date()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
M=`expr $M "-" 1`
if [ $M -eq 0 ]
then
let Y=Y-1
M=12
else M=`printf "%02d" $M`
fi
r1=`expr $Y % 4`
r2=`expr $Y % 100`
r3=`expr $Y % 400`
case $M in 01|03|05|07|08|10|12) days=31;; 04|06|09|11) days=30;;
esac
if [ $M -eq 02 ]
then if [ r1 -eq 0 -a r2 -ne 0 -o r3 -eq 0 ]
then days=29
else days=28
fi
fi
echo $Y$M$days
}
#返回上月月份YYYYMM
get_last_month()
{
Y=`expr substr $1 1 4`
M=`expr substr $1 5 2`
M=`expr $M "-" 1`
if [ $M -eq 0 ]
then
let Y=Y-1
M=12
else M=`printf "%02d" $M`
fi
echo $Y$M
}