#! /bin/sh

user=dovecot
group=mail
maildir=/var/vmail/bsd.falbi.kiev.ua/import
maildirlist=${maildir}/.subscriptions
today=${maildir}/.backup.inform.`date +"%Y%m%d"`
max_age=8

if [ ! -d ${today} ]; then
	mkdir ${today}
	chown ${user} ${today}
	chgrp ${group} ${today}
fi

rm -rf `ls -dr ${maildir}/.backup.inform.* | awk "{if(NR>${max_age})print \\$0}"`

perl -pi -e 's/^.+$//s if(/^backup/)' ${maildirlist}
ls -dr ${maildir}/.backup.inform.* | perl -pe 's/^.+\/\.(.+?)$/$1/' >>${maildirlist}