scripts/debian/dm-monitor

   1 #!/bin/sh
   2
   3 echo "Known debian maintainers:"
   4
   5 psql --html projectb <<EOF
   6   SELECT uid.uid, uid.name, f.fingerprint
   7     FROM uid LEFT OUTER JOIN fingerprint f ON (uid.id = f.uid)
   8    WHERE uid.uid LIKE '%@%'
   9 ORDER BY uid.uid;
  10 EOF
  11
  12 echo "Debian maintainers not able to update any packages:"
  13
  14 psql --html projectb <<EOF
  15   SELECT uid.uid, uid.name
  16     FROM uid
  17    WHERE uid.uid LIKE 'dm:%'
  18      AND uid.uid NOT IN (
  19               SELECT u.uid
  20                 FROM src_uploaders su JOIN source s ON (su.source = s.id)
  21                      JOIN src_associations sa ON (s.id = sa.source)
  22                      JOIN maintainer m ON (su.maintainer = m.id)
  23                      JOIN uid u ON
  24                        (m.name LIKE u.name || ' <%>' OR
  25                         m.name LIKE '% <' || substring(u.uid FROM 4) || '>')
  26                WHERE u.uid LIKE '%@%' AND sa.suite = 5
  27          )
  28 ORDER BY uid.uid;
  29 EOF
  30
  31 echo "Packages debian maintainers may update:"
  32
  33 psql --html projectb <<EOF
  34   SELECT s.source, space_separated_list(s.version), u.uid
  35     FROM src_uploaders su JOIN source s ON (su.source = s.id)
  36          JOIN src_associations sa ON (s.id = sa.source)
  37          JOIN maintainer m ON (su.maintainer = m.id)
  38          JOIN uid u ON (m.name LIKE u.name || ' <%>' OR
  39                 m.name LIKE '% <' || substring(u.uid FROM 4) || '>')
  40    WHERE s.dm_upload_allowed = 't' GROUP BY s.source, s.version, u.uid
  41 ORDER BY u.uid, s.source, s.version;
  42 EOF
  43
  44 echo "Source packages in the pool uploaded by debian maintainers:"
  45
  46 psql --html projectb <<EOF
  47   SELECT s.source, s.version, s.install_date, u.uid
  48     FROM source s JOIN fingerprint f ON (s.sig_fpr = f.id)
  49          JOIN uid u ON (f.uid = u.id)
  50    WHERE u.uid LIKE '%@%'
  51 ORDER BY u.uid, s.source, s.version;
  52 EOF
  53
  54 echo "Binary packages in the pool uploaded by debian maintainers:"
  55
  56 psql --html projectb <<EOF
  57   SELECT b.package, b.version, a.arch_string AS arch, u.uid
  58     FROM binaries b JOIN architecture a ON (b.architecture = a.id)
  59          JOIN fingerprint f ON (b.sig_fpr = f.id)
  60          JOIN uid u ON (f.uid = u.id)
  61    WHERE u.uid LIKE '%@%'
  62 ORDER BY u.uid, b.package, b.version;
  63 EOF
  64
  65 echo "Recorded Uploaders:"
  66
  67 psql --html projectb <<EOF
  68   SELECT s.source, s.version, m.name
  69     FROM src_uploaders su JOIN source s ON (su.source = s.id)
  70          JOIN maintainer m ON (su.maintainer = m.id)
  71 ORDER BY m.name, s.source, s.version;
  72 EOF
  73
  74 echo "Keys without a recorded uid:"
  75
  76 psql --html projectb <<EOF
  77   SELECT *
  78     FROM fingerprint f
  79    WHERE f.uid IS NULL;
  80 EOF
  81