Add autocruft function, calling (guess) auto_decruft

[dak.git] / config / debian / dinstall.functions

diff --git a/config/debian/dinstall.functions b/config/debian/dinstall.functions
index 2cf6e120e8e549f852a8e862bf13bf8b7f59022b..281d428782391cea5c8042c1acf492dc51a3ca48 100644 (file)
--- a/config/debian/dinstall.functions
+++ b/config/debian/dinstall.functions
@@ -107,9 +107,16 @@ function dominate() {
     dak dominate
 }
 
-function filelist() {
-    log "Generating file lists for apt-ftparchive"
-    dak generate-filelist
+function autocruft() {
+    log "Check for obsolete binary packages"
+    suites=${1:-"unstable experimental"}
+    # Initially only run with -n and output into a file, to check.
+    dstamp=$(date -u +"%Y-%m-%d_%H:%M")
+    echo "Report for ${dstamp}" > $webdir/auto-cruft-report_${dstamp}.txt
+    for suite in ${suites}; do
+        dak auto-decruft -n -s ${suite} >> $webdir/auto-cruft-report_${dstamp}.txt
+    done
+    cat $webdir/auto-cruft-report_${dstamp}.txt | mail -a "X-Debian: DAK" -e -s "Debian archive AUTOMATIC cruft report for ${dstamp}" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" -c niels@thykier.net ftpmaster@ftp-master.debian.org
 }
 
 function fingerprints() {
@@ -389,7 +396,7 @@ function mkchecksums() {
 }
 
 function mirror() {
-    local archiveroot
+    local archiveroot mirrordir
 
     log "Regenerating \"public\" mirror/ hardlink fun"
     DATE_SERIAL=$(date +"%Y%m%d01")