arch-mirror: clean up pool directory, too

1 files changed, 20 insertions, 0 deletions

diff --git a/arch-mirror b/arch-mirror
index 751aba8..683367e 100755
--- a/arch-mirror
+++ b/arch-mirror
@@ -222,6 +222,26 @@ remove_unindexed_packages() {
     | xargs -r rm
   done
   find "$1" \
+    -type d \
+    -name pool \
+    -printf '%p\n' \
+  | while read -r pool; do
+    {
+      find "${pool%/*}" \
+        -name 'pool' -prune , \
+        -type l \
+        -name '*.pkg*' \
+        -readlink -e {} + \
+        grep '^'"${pool}"'/'
+      find "${pool}" \
+        -type f \
+        -printf '%p\n'
+    } \
+    | sort \
+    | uniq -u \
+    | xargs -r rm
+  done
+  find "$1" \
     -name '.~tmp~' -prune , \
     -name '*.db' -printf '%p\n' \
   | while read -r db; do