Alexandre Julliard : winetest.cron: Move old test results out of the way.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: 23a7f808b7229d2778c9d0f035020fb917eb94d5
URL:    http://source.winehq.org/git/tools.git/?a=commit;h=23a7f808b7229d2778c9d0f03...

Author: Alexandre Julliard <julliard(a)winehq.org>
Date:   Thu Mar 27 20:06:55 2008 +0100

winetest.cron: Move old test results out of the way.

---

 winetest/winetest.cron |   12 ++++++++++++
 1 files changed, 12 insertions(+), 0 deletions(-)

diff --git a/winetest/winetest.cron b/winetest/winetest.cron
index 58ed741..e4129db 100755
--- a/winetest/winetest.cron
+++ b/winetest/winetest.cron
@@ -8,5 +8,17 @@ if [ ! -f $lock ]; then
     touch $lock
     while perl dissect; [ $? -eq 0 -o $? -eq 1 ]; do true; done
     while perl gather; do true; done
+
+    # move 2-month old results out of the way
+    for i in `find ./data -maxdepth 1 -mtime +60 -type d -print`
+    do
+        mv $i old-data
+    done
+
+    # and archive 6-month old results
+    (cd old-data && for i in `find . -maxdepth 1 -mtime +180 -type d -print`
+    do
+        tar cfj $i.tar.bz2 $i && rm -rf $i
+    done)
     rm $lock
 fi