X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=config%2Fdebian%2Fdinstall.functions;h=390c23b7606a3accb3bfb497a04969af8962eec3;hb=8d1607e01b87f42e876c00d2abed535216ac05f3;hp=f1693a3292fffc7ae1d3a8f0be97b301c2ef6a84;hpb=28b86b197fffbd068c2f030e987bc145829d9601;p=dak.git

diff --git a/config/debian/dinstall.functions b/config/debian/dinstall.functions
index f1693a32..390c23b7 100644
--- a/config/debian/dinstall.functions
+++ b/config/debian/dinstall.functions
@@ -107,6 +107,17 @@ function dominate() {
     dak dominate
 }
 
+function autocruft() {
+    log "Check for obsolete binary packages"
+    # Initially only run with -n and output into a file, to check.
+    local dstamp=$(date -u +"%Y-%m-%d_%H:%M")
+    local report=${webdir}/auto-cruft-report_${dstamp}.txt
+    echo "Report for ${dstamp}" > ${report}
+    dak auto-decruft -n -s unstable >> ${report}
+    dak auto-decruft -n -s experimental --if-newer-version-in unstable --if-newer-version-in-rm-msg "NVIU" >> ${report}
+    cat ${report} | 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() {
     log "Updating fingerprints"
     dak import-keyring -L /srv/keyring.debian.org/keyrings/debian-keyring.gpg