From: Ansgar Burchardt <ansgar@debian.org>
Date: Sat, 12 Jan 2013 13:40:16 +0000 (+0100)
Subject: Stop generating dm-uploaders.html.
X-Git-Url: https://git.decadent.org.uk/gitweb/?a=commitdiff_plain;h=d31ae14a9de247d47d9ff7b3f36705a58a065916;p=dak.git

Stop generating dm-uploaders.html.

dm-uploaders.html is huge (74 MB) which makes is unusable. DM upload
permissions can now be seen in dm.txt.
---

diff --git a/config/backports/dinstall.functions b/config/backports/dinstall.functions
index 06988bd5..cf84cae8 100644
--- a/config/backports/dinstall.functions
+++ b/config/backports/dinstall.functions
@@ -434,7 +434,7 @@ function transitionsclean() {
 
 function dm() {
     log "Updating DM html page"
-    $scriptsdir/dm-monitor >$webdir/dm-uploaders.html
+    #$scriptsdir/dm-monitor >$webdir/dm-uploaders.html
 }
 
 function bts() {
diff --git a/config/debian/dinstall.functions b/config/debian/dinstall.functions
index 8e8735bf..4836f538 100644
--- a/config/debian/dinstall.functions
+++ b/config/debian/dinstall.functions
@@ -401,8 +401,7 @@ function transitionsclean() {
 }
 
 function dm() {
-    log "Updating DM html page"
-    $scriptsdir/dm-monitor >$webdir/dm-uploaders.html
+    log "Updating DM permissions page"
     dak acl export-per-source dm >$exportdir/dm.txt
 }
 
diff --git a/scripts/debian/dm-monitor b/scripts/debian/dm-monitor
deleted file mode 100755
index 92a945d5..00000000
--- a/scripts/debian/dm-monitor
+++ /dev/null
@@ -1,83 +0,0 @@
-#!/bin/sh
-
-echo "Known debian maintainers:"
-
-eval $(dak admin config db-shell)
-
-psql --html <<EOF
-  SELECT uid.uid, uid.name, f.fingerprint
-    FROM uid LEFT OUTER JOIN fingerprint f ON (uid.id = f.uid) 
-   WHERE uid.uid LIKE '%@%'
-ORDER BY uid.uid;
-EOF
-
-echo "Debian maintainers not able to update any packages:"
-
-psql --html <<EOF
-  SELECT uid.uid, uid.name
-    FROM uid 
-   WHERE uid.uid LIKE 'dm:%'
-     AND uid.uid NOT IN (
-              SELECT u.uid
-                FROM src_uploaders su JOIN source s ON (su.source = s.id)
-                     JOIN src_associations sa ON (s.id = sa.source)
-                     JOIN maintainer m ON (su.maintainer = m.id)
-                     JOIN uid u ON 
-		       (m.name LIKE u.name || ' <%>' OR
-		        m.name LIKE '% <' || substring(u.uid FROM 4) || '>')
-               WHERE u.uid LIKE '%@%' AND sa.suite = 5
-         )
-ORDER BY uid.uid;
-EOF
-
-echo "Packages debian maintainers may update:"
-
-psql --html <<EOF
-  SELECT s.source, space_separated_list(s.version), u.uid
-    FROM src_uploaders su JOIN source s ON (su.source = s.id) 
-         JOIN src_associations sa ON (s.id = sa.source)
-         JOIN maintainer m ON (su.maintainer = m.id)
-         JOIN uid u ON (m.name LIKE u.name || ' <%>' OR
-                m.name LIKE '% <' || substring(u.uid FROM 4) || '>')
-   WHERE s.dm_upload_allowed = 't' GROUP BY s.source, s.version, u.uid
-ORDER BY u.uid, s.source, s.version;
-EOF
-
-echo "Source packages in the pool uploaded by debian maintainers:"
-
-psql --html <<EOF
-  SELECT s.source, s.version, s.install_date, u.uid
-    FROM source s JOIN fingerprint f ON (s.sig_fpr = f.id) 
-         JOIN uid u ON (f.uid = u.id)
-   WHERE u.uid LIKE '%@%'
-ORDER BY u.uid, s.source, s.version;
-EOF
-
-echo "Binary packages in the pool uploaded by debian maintainers:"
-
-psql --html <<EOF
-  SELECT b.package, b.version, a.arch_string AS arch, u.uid
-    FROM binaries b JOIN architecture a ON (b.architecture = a.id)
-         JOIN fingerprint f ON (b.sig_fpr = f.id) 
-         JOIN uid u ON (f.uid = u.id)
-   WHERE u.uid LIKE '%@%'
-ORDER BY u.uid, b.package, b.version;
-EOF
-
-echo "Recorded Uploaders:"
-
-psql --html <<EOF
-  SELECT s.source, s.version, m.name
-    FROM src_uploaders su JOIN source s ON (su.source = s.id) 
-         JOIN maintainer m ON (su.maintainer = m.id)
-ORDER BY m.name, s.source, s.version;
-EOF
-
-echo "Keys without a recorded uid:"
-
-psql --html <<EOF
-  SELECT *
-    FROM fingerprint f
-   WHERE f.uid IS NULL;
-EOF
-