#!/bin/sh
#
# UDD code to retrieve packages broken by an upload of another package
#

host_udd=merkel.debian.org
psql=/usr/lib/postgresql/8.4/bin/psql
udd_sql="ssh $host_udd $psql -t -A 'service=udd'"

pkg=dpkg
pkg_version=1.15.3

pkg_upload_date=`echo "SELECT date(date) FROM upload_history \
                       WHERE source = '$pkg' and version = '$pkg_version';" \
                   | $udd_sql`

echo "SELECT source FROM upload_history \
      WHERE date > timestamp '$pkg_upload_date 00:00';" \
  | $udd_sql \
  | sort -u \
  > uploads.list

lintian_lab=/srv/lintian.debian.org/laboratory

ssh lintian.debian.org ls $lintian_lab/source/*/binary/*/control/symbols \
  | cut -d/ -f6 \
  | sort -u \
  > symbols.list

cat uploads.list symbols.list \
  | sort \
  | uniq -d \
  > broken.list