Write out the list of running VMs to AFS as well as the database backup

[invirt/packages/xvm-db-backup.git] / xvm-db-backup

diff --git a/xvm-db-backup b/xvm-db-backup
index 58a3323..80d6ae9 100755 (executable)
--- a/xvm-db-backup
+++ b/xvm-db-backup
@@ -5,8 +5,12 @@ set -e
 kinit -k "daemon/$(hostname -f)"
 aklog sipb
 
-filename="/mit/xvm/backups/db/prod/$(date +%Y-%m-%d-%H-%M.sql.gz)"
+db_filename="/mit/xvm/backups/db/prod/$(date +%Y-%m-%d-%H-%M.sql.gz)"
 
 /usr/bin/pg_dump -U "$(invirt-getconf db.user)" \
                  -h "$(invirt-getconf db.host)" \
-                 "$(invirt-getconf db.dbname)" | gzip - >"$filename"
+                 "$(invirt-getconf db.dbname)" | gzip - >"$db_filename"
+
+running_filename="/mit/xvm/log/running/prod/$(date +%Y-%m-%d-%H-%M.gz)"
+
+remctl "$(invirt-getconf remote.hostname)" web listvms | gzip - >"$running_filename"