common 6.7 KB
Newer Older
J
Joerg Jaspert 已提交
1
# -*- mode:sh -*-
J
Joerg Jaspert 已提交
2 3 4 5
# log something (basically echo it together with a timestamp)
#
# Set $PROGRAM to a string to have it added to the output.
function log () {
6 7
        local prefix=${PROGRAM:-}
        echo "$(date +"%b %d %H:%M:%S") $(hostname -s) ${prefix}[$$]: $@"
J
Joerg Jaspert 已提交
8 9 10 11 12 13 14
}

# log the message using log() but then also send a mail
# to the address configured in MAILTO (if non-empty)
function log_error () {
        log "$@"
        if [ -z "${MAILTO}" ]; then
15
                echo "$@" | mail -a "X-Debian: DAK" -e -s "[$PROGRAM@$(hostname -s)] ERROR [$$]" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" ${MAILTO}
J
Joerg Jaspert 已提交
16 17 18 19 20 21 22 23 24
        fi
}

# debug log, only output when DEBUG=1
function debug () {
    if [ $DEBUG -eq 1 ]; then
        log "$*"
    fi
}
J
Joerg Jaspert 已提交
25

J
buildd  
Joerg Jaspert 已提交
26
function wbtrigger() {
27
    SSHOPT="-n -o BatchMode=yes -o ConnectTimeout=30 -o SetupTimeout=240"
J
buildd  
Joerg Jaspert 已提交
28
    if lockfile -r 3 -l 3600 "${LOCK_BUILDD}"; then
A
Ansgar Burchardt 已提交
29
        ssh -q -q ${SSHOPT} wbadm@buildd /srv/wanna-build/trigger.often
J
buildd  
Joerg Jaspert 已提交
30
    fi
J
Joerg Jaspert 已提交
31
    rm -f "${LOCK_BUILDD}"
J
buildd  
Joerg Jaspert 已提交
32 33
}

J
Joerg Jaspert 已提交
34 35
# used by cron.dinstall *and* cron.unchecked.
function make_buildd_dir () {
36
    # We generate straight into the static mirror location for incoming
37
    dak manage-build-queues -a
38
    dak generate-packages-sources2 -a build-queues
J
silence  
Joerg Jaspert 已提交
39
    dak generate-releases -a build-queues >/dev/null
40

M
Mark Hymers 已提交
41 42 43
    # Stick a last modified date in the page footer
    echo "<p>Last updated: `date -u`</p>" > ${incoming}/web/README.html

44
    # Tell the mirrors that we've updated
M
Mark Hymers 已提交
45
    chronic /usr/local/bin/static-update-component incoming.debian.org
J
Joerg Jaspert 已提交
46
}
J
Joerg Jaspert 已提交
47

48 49
# Process (oldstable)-proposed-updates "NEW" queue
function punew_do() {
50
    local queue="$1"
51
    local qdir="$2"
52 53
    local to="${3}"

54
    date -u -R >> REPORT
55
    dak process-policy "${queue}" | tee -a REPORT | mail -a "X-Debian: DAK" -e -s "NEW changes in ${queue}" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" "${to}"
56
    echo >> REPORT
57 58 59

    dak generate-packages-sources2 -s "${queue}"

60 61
    STAMP=${STAMP:-$(date "+%Y%m%d%H%M")}

62 63
    local exportdir="${qdir}/tree/${STAMP}"
    local targetdir="${qdir}/export"
64
    mkdir -p -- ${exportdir}
65
    dak export -q "${queue}" -d "${exportdir}" --all
J
Joerg Jaspert 已提交
66
    ln -sfT ${exportdir} ${targetdir}
67
    find "${qdir}/tree" -mindepth 1 -maxdepth 1 -not -name "${STAMP}" -type d -print0 | xargs --no-run-if-empty -0 rm -rf
68 69 70 71
}

# These versions used in dinstall
function punew() {
M
Mark Hymers 已提交
72 73 74
    if [ "${PROGRAM}" = "dinstall" ]; then
        log "Doing automated p-u-new processing"
    fi
75
    cd "${queuedir}/p-u-new"
76
    punew_do "$1" "${queuedir}/p-u-new" "debian-release@lists.debian.org"
77 78 79
}

function opunew() {
M
Mark Hymers 已提交
80 81 82
    if [ "${PROGRAM}" = "dinstall" ]; then
        log "Doing automated o-p-u-new processing"
    fi
83
    cd "${queuedir}/o-p-u-new"
84
    punew_do "$1" "${queuedir}/o-p-u-new" "debian-release@lists.debian.org"
85 86 87 88 89 90 91 92 93 94 95 96 97
}

function backports_policy() {
    local queue="backports-policy"
    local qdir="/srv/backports-master.debian.org/queue/policy"
    local to="backports-team@debian.org"

    if [ "${PROGRAM}" = "dinstall" ]; then
        log "Doing automated ${queue} processing"
    fi

    cd "${qdir}"
    punew_do "${queue}" "${qdir}" "${to}"
98 99
}

J
Joerg Jaspert 已提交
100 101 102 103 104 105 106
# Do the unchecked processing, in case we have files.
function do_unchecked () {
    cd $unchecked

    changes=$(find . -maxdepth 1 -mindepth 1 -type f -name \*.changes | sed -e "s,./,," | xargs)
    report=$queuedir/REPORT
    timestamp=$(date "+%Y-%m-%d %H:%M")
J
Joerg Jaspert 已提交
107
    UNCHECKED_WITHOUT_LOCK=${UNCHECKED_WITHOUT_LOCK:-""}
J
Joerg Jaspert 已提交
108

109
    echo "$timestamp": ${changes:-"Nothing to do"}  >> $report
J
cron  
Joerg Jaspert 已提交
110
    dak process-upload -a ${UNCHECKED_WITHOUT_LOCK} -d "$unchecked" >> $report
111
    dak process-commands -d "$unchecked" >> $report
J
Joerg Jaspert 已提交
112 113
}

114 115 116 117 118
# process NEW policy queue
function do_new () {
    if [ "${PROGRAM}" = "dinstall" ]; then
	log "Doing NEW processing"
    fi
119
    (dak process-policy new; dak process-policy byhand) | mail -a "X-Debian: DAK" -e -s "NEW and BYHAND processing" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" ftpmaster@ftp-master.debian.org
120

121
    dak process-policy backports-new | mail -a "X-Debian: DAK" -e -s "NEW processing for backports-new" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" backports-team@debian.org
122 123

    dak clean-suites -a new,backports-new
J
Joerg Jaspert 已提交
124 125
}

J
Joerg Jaspert 已提交
126 127
function sync_debbugs () {
    # sync with debbugs
128
    echo "--" >> $report
J
meh  
Joerg Jaspert 已提交
129
    timestamp=$(date "+%Y-%m-%d-%H:%M")
J
Joerg Jaspert 已提交
130
    mkdir -p $queuedir/bts_version_track_archive/${timestamp}
131
    rsync -aq $queuedir/bts_version_track/ $queuedir/bts_version_track_archive/${timestamp}
J
Joerg Jaspert 已提交
132
    rmdir --ignore-fail-on-non-empty $queuedir/bts_version_track_archive/${timestamp} # remove if empty.
A
Ansgar Burchardt 已提交
133
    rsync -aq -e "ssh -o Batchmode=yes -o ConnectTimeout=30 -o SetupTimeout=30" --remove-source-files  $queuedir/bts_version_track/ bugs-sync:/srv/bugs.debian.org/versions/queue/ftp-master/ 2>/dev/null && touch $lockdir/synced_bts_version || true
J
Joerg Jaspert 已提交
134 135 136 137 138 139 140
    NOW=$(date +%s)
    TSTAMP=$(stat -c %Y $lockdir/synced_bts_version)
    DIFF=$(( NOW - TSTAMP ))
    if [ $DIFF -ge 259200 ]; then
        log "Kids, you tried your best and you failed miserably. The lesson is, never try. (Homer Simpson)"
    fi
}
J
Joerg Jaspert 已提交
141

142 143 144 145 146 147 148
function clean_debbugs () {
    # Delete files older than 60 days
    find $queuedir/bts_version_track_archive/ -mtime +60 -type f -delete
    # Delete empty directories
    find $queuedir/bts_version_track_archive/ -empty -type d -delete
}

J
Joerg Jaspert 已提交
149 150 151
function reports() {
    # Send a report on NEW/BYHAND packages
    log "Nagging ftpteam about NEW/BYHAND packages"
152 153
    dak queue-report | mail -a "X-Debian: DAK" -e -s "NEW and BYHAND on $(date +%D)" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" ftpmaster@ftp-master.debian.org
    dak queue-report -d backports-new,backports-policy | mail -a "X-Debian: DAK" -e -s "NEW and POLICY on $(date +%D)" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" backports-team@debian.org
J
Joerg Jaspert 已提交
154 155
    # and one on crufty packages
    log "Sending information about crufty packages"
156 157
    dak cruft-report -R > $webdir/cruft-report-daily.txt
    dak cruft-report -R -s experimental >> $webdir/cruft-report-daily.txt
158
    cat $webdir/cruft-report-daily.txt | mail -a "X-Debian: DAK" -e -s "Debian archive cruft report for $(date +%D)" -a "From: Debian FTP Masters <ftpmaster@ftp-master.debian.org>" ftpmaster@ftp-master.debian.org
J
Joerg Jaspert 已提交
159
}
J
Joerg Jaspert 已提交
160 161 162 163 164 165

function pg_timestamp() {
    tsname=${1:-"unknown"}
    log "Saving postgres transaction id for ${tsname}"
    psql -tAc 'select txid_current();' > $base/backup/txid_${tsname}_$(date +%Y.%m.%d-%H:%M:%S)
}
166 167 168 169 170 171 172 173 174 175 176

function get_archiveroot() {
    local archivename="$1"
    local query="SELECT path FROM archive WHERE name='${archivename}'"
    local archiveroot="$(psql -tAc "${query}")"
    if [ -z "${archiveroot}" ]; then
        echo "get_archiveroot: couldn't get archiveroot for '${archivename}'" >&2
        return 1
    fi
    echo "${archiveroot}"
}