mg-clear-git-caches: make parallel

diff --git a/mg-clear-git-caches b/mg-clear-git-caches
index 5cab72714aef51047a069cb0a9d357599963871c..76b5f513de54791bd612cbee22fc99798b687809 100755 (executable)
--- a/mg-clear-git-caches
+++ b/mg-clear-git-caches
@@ -28,16 +28,23 @@ cache=`getconfig GitCacheLocal`
 for lockfile in $cache/*/lock; do
        hostdir=${lockfile%/lock}
        host=${hostdir##*/}
-       printf "===== %s =====\n" $host
-       aside=$cache/$host.$$.`date +%s`.to-delete
-       mkdir $aside
-       if ! ./mg-allocate -U 10 $host; then continue; fi
-       set +e
-       mv $hostdir $aside/.
-       r=$?
-       set -e
-       ./mg-allocate !$host
-       if [ $r != 0 ]; then echo >&2 ' failed'; exit $r; fi
-       printf ' deleting\n'
-       sudo rm -rf $aside
+       (
+               printf "===== %s =====\n" $host
+               aside=$cache/$host.$$.`date +%s`.to-delete
+               mkdir $aside
+               if ! ./mg-allocate -U 10 $host; then continue; fi
+               set +e
+               mv $hostdir $aside/.
+               r=$?
+               set -e
+               ./mg-allocate !$host
+               if [ $r != 0 ]; then echo >&2 ' failed'; exit $r; fi
+               printf ' deleting\n'
+               sudo rm -rf $aside
+       ) &
+       sleep 0.5
 done
+
+echo "===== (waiting) ====="
+
+wait