| #!/bin/sh |
| |
| echo "Using ssh-nightly-slave settings from $HOME/.corpus" |
| . $HOME/.corpus |
| |
| host=`echo "$1" | perl -ne 's/:-j(\S+)$//;print'` |
| [ "$clienttree" = "" ] && clienttree=tree |
| |
| set -x |
| |
| # a rather rough-and-ready way to ensure any hangover mass-checks |
| # from the previous set are killed, before we start these ones |
| ssh $host \ |
| pkill -15 -f perl |
| |
| # and clean out the client-side caches of old cached mail |
| ssh $host \ |
| find $clienttree/cs_cache/. -type f -mtime +180 -print > o |
| if [ -s o ] ; then |
| ssh $host xargs rm < o |
| else |
| true |
| fi |
| |
| ssh $host \ |
| find $clienttree/cs_cache/. -depth -type d -empty -print > o |
| if [ -s o ] ; then |
| ssh $host xargs rmdir < o |
| else |
| true |
| fi |
| |