ros到期脚本

#ROS PPPOE用户帐号到期提前提醒，过期帐号禁用及强制下线脚本
#用户帐户的备注里必须包含格式:[yyyymmdd] 如:有效期至[yyyymmdd]
#其中 yyyymmdd 为到期年月日

#before 为到期提前提醒的天数
:local before 2

#获取当前系统日期信息
:local curdate [/system clock get date]

#将当前系统日期信息转换为年月日 yyyymmdd 的格式
:local yy ([:find jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec [:pick $curdate 0 3]]+1)
:if ($yy<10) do={:set yy (0 . $yy)}
:set curdate ([:pick $curdate 7 11] . $yy . [:pick $curdate 4 6])

#expdate 为账户有效期变量
:local expdate ""

#cnt 为有效用户数变量
:local cnt "0"

/ppp secret
:foreach puse in [find disabled=no] do={
:local pcom [get $puse comment]
:set expdate [:pick $pcom ([:find $pcom "["]+1) ([:find $pcom "]"])]
:local pnam [get $puse name]
:set cnt ($cnt + 1)
:if ($pcom != "" && $pcom != "admin") do={
:if ([:len $pcom]<10) do={