Merge branch 'master' into debian-r

[dak.git] / scripts / debian / dm-monitor

diff --git a/scripts/debian/dm-monitor b/scripts/debian/dm-monitor
deleted file mode 100755 (executable)
index 92a945d..0000000
--- 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
-