bacula: remove obsolete pools

diff --git a/modules/bacula/files/volumes-delete-old b/modules/bacula/files/volumes-delete-old
index e533e71..cc0f92e 100755 (executable)
--- a/modules/bacula/files/volumes-delete-old
+++ b/modules/bacula/files/volumes-delete-old
@@ -107,6 +107,21 @@ for r in cursor.fetchall():
   c = "delete volume=%s yes"%(r['volumename'],)
   cmd.append(c)
 
+# find obsolete pools
+cursor.execute("""
+  SELECT name
+  FROM pool
+  WHERE
+    name != 'Scratch' AND
+    numvols = 0 AND
+    poolid NOT IN (SELECT recyclepoolid FROM media)
+""", {})
+
+for r in cursor.fetchall():
+  c = "delete pool=%s"%(r['name'],)
+  cmd.append(c)
+  cmd.append("yes")
+
 if args.nodo:
   print("\n".join(cmd))
   sys.exit(0)