config/debian/common

   1 # -*- mode:sh -*-
   2 # log something (basically echo it together with a timestamp)
   3 #
   4 # Set $PROGRAM to a string to have it added to the output.
   5 function log () {
   6         local prefix=${PROGRAM:-}
   7         echo "$(date +"%b %d %H:%M:%S") $(hostname -s) ${prefix}[$$]: $@"
   8 }
   9
  10 # log the message using log() but then also send a mail
  11 # to the address configured in MAILTO (if non-empty)
  12 function log_error () {
  13         log "$@"
  14         if [ -z "${MAILTO}" ]; then
  15                 echo "$@" | mail -a "X-Debian: DAK" -e -s "[$PROGRAM@$(hostname -s)] ERROR [$$]" ${MAILTO}  -- -F "Debian FTP Masters" -f ftpmaster@ftp-master.debian.org
  16         fi
  17 }
  18
  19 # debug log, only output when DEBUG=1
  20 function debug () {
  21     if [ $DEBUG -eq 1 ]; then
  22         log "$*"
  23     fi
  24 }
  25
  26 function wbtrigger() {
  27     SSHOPT="-o BatchMode=yes -o ConnectTimeout=30 -o SetupTimeout=240"
  28     if lockfile -r 3 -l 3600 "${LOCK_BUILDD}"; then
  29         ssh -q -q ${SSHOPT} wbadm@buildd /org/wanna-build/trigger.often
  30     fi
  31     rm -f "${LOCK_BUILDD}"
  32 }
  33
  34 # used by cron.dinstall *and* cron.unchecked.
  35 function make_buildd_dir () {
  36     dak manage-build-queues -a
  37     dak generate-packages-sources2 -a build-queues
  38     dak generate-releases -a build-queues
  39
  40     for suite in unstable experimental; do
  41         rm -rf "$incoming/dists/$suite/buildd"
  42         dak export-suite -s "buildd-$suite" -d "$incoming/dists/$suite/buildd"
  43     done
  44
  45     # export to old build queue directories
  46     # XXX: Remove once the buildds use the version generated above.
  47     for suite in $(ls -1 $incoming/dists/); do
  48         # Skip project trace directory
  49         if [ "${suite}x" = "projectx" ]; then continue; fi
  50         cd ${incoming}/dists/${dist}/buildd
  51
  52         dpkg-scanpackages . $overridedir/override.sid.all3 >Packages
  53         gzip -9c --rsyncable <Packages >Packages.gz
  54         dpkg-scansources . $override/override.sid.all3.src >Sources
  55         gzip -9c --rsyncable <Sources >Sources.gz
  56
  57         rm -f buildd/Release
  58         cd ..
  59         apt-ftparchive -qq -o APT::FTPArchive::Release::Origin="Debian" -o APT::FTPArchive::Release::Label="Debian" -o APT::FTPArchive::Release::Description="buildd $suite incoming" -o APT::FTPArchive::Release::Architectures="$archs" release buildd >Release
  60         if [ "$suite" = "experimental" ]; then
  61             echo "NotAutomatic: yes" >>Release
  62         fi
  63
  64         gpg --secret-keyring /srv/ftp-master.debian.org/s3kr1t/dot-gnupg/secring.gpg --keyring /srv/ftp-master.debian.org/s3kr1t/dot-gnupg/pubring.gpg --no-options --batch --no-tty --armour --default-key 473041FA --detach-sign -o Release.gpg Release
  65
  66         mv Release Release.gpg buildd/
  67     done
  68
  69     for dist in $(ls -1 ${incoming}/dists/); do
  70         # Skip project trace directory
  71         if [ "${dist}x" = "projectx" ]; then continue; fi
  72         cd ${incoming}/dists/${dist}
  73         mkdir -p tree/${STAMP}
  74         cp -al ${incoming}/dists/${dist}/buildd/. tree/${STAMP}/
  75         ln -sfT tree/${STAMP} ${incoming}/dists/${dist}/current
  76         find ./tree -mindepth 1 -maxdepth 1 -not -name "${STAMP}" -type d -print0 | xargs --no-run-if-empty -0 rm -rf
  77     done
  78 }
  79
  80 # Process (oldstable)-proposed-updates "NEW" queue
  81 function punew_do() {
  82     local queue="$1"
  83     local qdir="$2"
  84     date -u -R >> REPORT
  85     dak process-policy "${queue}" | tee -a REPORT | mail -a "X-Debian: DAK" -e -s "NEW changes in ${queue}" debian-release@lists.debian.org -- -F "Debian FTP Masters" -f ftpmaster@ftp-master.debian.org
  86     echo >> REPORT
  87
  88     dak generate-packages-sources2 -s "${queue}"
  89
  90     local exportdir="${queuedir}/${qdir}/export"
  91     rm -rf "${exportdir}"
  92     dak export -q "${queue}" -d "${exportdir}" --all
  93 }
  94
  95 # These versions used in dinstall
  96 function punew() {
  97     if [ "${PROGRAM}" = "dinstall" ]; then
  98         log "Doing automated p-u-new processing"
  99     fi
 100     cd "${queuedir}/p-u-new"
 101     punew_do "$1" "p-u-new"
 102 }
 103
 104 function opunew() {
 105     if [ "${PROGRAM}" = "dinstall" ]; then
 106         log "Doing automated o-p-u-new processing"
 107     fi
 108     cd "${queuedir}/o-p-u-new"
 109     punew_do "$1" "o-p-u-new"
 110 }
 111
 112 # Do the unchecked processing, in case we have files.
 113 function do_unchecked () {
 114     cd $unchecked
 115
 116     changes=$(find . -maxdepth 1 -mindepth 1 -type f -name \*.changes | sed -e "s,./,," | xargs)
 117     report=$queuedir/REPORT
 118     timestamp=$(date "+%Y-%m-%d %H:%M")
 119     UNCHECKED_WITHOUT_LOCK=${UNCHECKED_WITHOUT_LOCK:-""}
 120
 121     echo "$timestamp": ${changes:-"Nothing to do"}  >> $report
 122     dak process-upload -a ${UNCHECKED_WITHOUT_LOCK} -d "$unchecked" >> $report
 123 }
 124
 125 # process NEW policy queue
 126 function do_new () {
 127     if [ "${PROGRAM}" = "dinstall" ]; then
 128         log "Doing NEW processing"
 129     fi
 130     (dak process-policy new; dak process-policy byhand) | mail -a "X-Debian: DAK" -e -s "NEW and BYHAND processing" ftpmaster@ftp-master.debian.org -- -F "Debian FTP Masters" -f ftpmaster@ftp-master.debian.org
 131     dak clean-suites -a new
 132 }
 133
 134 function sync_debbugs () {
 135     # sync with debbugs
 136     echo "--" >> $report
 137     timestamp=$(date "+%Y-%m-%d-%H:%M")
 138     mkdir -p $queuedir/bts_version_track_archive/${timestamp}
 139     rsync -aq $queuedir/bts_version_track/ $queuedir/bts_version_track_archive/${timestamp}
 140     rmdir --ignore-fail-on-non-empty $queuedir/bts_version_track_archive/${timestamp} # remove if empty.
 141     rsync -aq -e "ssh -o Batchmode=yes -o ConnectTimeout=30 -o SetupTimeout=30" --remove-source-files  $queuedir/bts_version_track/ bugs-sync:/org/bugs.debian.org/versions/queue/ftp-master/ 2>/dev/null && touch $lockdir/synced_bts_version || true
 142     NOW=$(date +%s)
 143     TSTAMP=$(stat -c %Y $lockdir/synced_bts_version)
 144     DIFF=$(( NOW - TSTAMP ))
 145     if [ $DIFF -ge 259200 ]; then
 146         log "Kids, you tried your best and you failed miserably. The lesson is, never try. (Homer Simpson)"
 147     fi
 148 }
 149
 150 function clean_debbugs () {
 151     # Delete files older than 60 days
 152     find $queuedir/bts_version_track_archive/ -mtime +60 -type f -delete
 153     # Delete empty directories
 154     find $queuedir/bts_version_track_archive/ -empty -type d -delete
 155 }
 156
 157 function reports() {
 158     # Send a report on NEW/BYHAND packages
 159     log "Nagging ftpteam about NEW/BYHAND packages"
 160     dak queue-report | mail -a "X-Debian: DAK" -e -s "NEW and BYHAND on $(date +%D)" ftpmaster@ftp-master.debian.org -- -F "Debian FTP Masters" -f ftpmaster@ftp-master.debian.org
 161     # and one on crufty packages
 162     log "Sending information about crufty packages"
 163     dak cruft-report -R > $webdir/cruft-report-daily.txt
 164     dak cruft-report -R -s experimental >> $webdir/cruft-report-daily.txt
 165     cat $webdir/cruft-report-daily.txt | mail -a "X-Debian: DAK" -e -s "Debian archive cruft report for $(date +%D)" ftpmaster@ftp-master.debian.org -- -F "Debian FTP Masters" -f ftpmaster@ftp-master.debian.org
 166 }
 167
 168 function pg_timestamp() {
 169     tsname=${1:-"unknown"}
 170     log "Saving postgres transaction id for ${tsname}"
 171     psql -tAc 'select txid_current();' > $base/backup/txid_${tsname}_$(date +%Y.%m.%d-%H:%M:%S)
 172 }