Adding upstream version 2.25.15.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
This commit is contained in:
parent
10737b110a
commit
b543f2e88d
GPG key ID:
BCC918A2ABD66424
485 changed files with 191459 additions and 0 deletions
273
scripts/who-uploads.sh
Executable file
273
scripts/who-uploads.sh
Executable file
|
|
@ -0,0 +1,273 @@
|
|||
#!/bin/bash
|
||||
|
||||
# who-uploads sourcepkg [ sourcepkg ... ]
|
||||
# Tells you who made the latest uploads of a source package.
|
||||
# NB: I'm encoded in UTF-8!!
|
||||
|
||||
# Written and copyright 2006 by Julian Gilbey <jdg@debian.org>
|
||||
# Based on an original script
|
||||
# copyright 2006 Adeodato Simó <dato@net.com.org.es>
|
||||
#
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation; either version 2 of the License, or
|
||||
# (at your option) any later version.
|
||||
#
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
|
||||
set -e
|
||||
|
||||
PROGNAME=${0##*/}
|
||||
MODIFIED_CONF_MSG='Default settings modified by devscripts configuration files:'
|
||||
|
||||
usage() {
|
||||
echo \
|
||||
"Usage: $PROGNAME [options] package ...
|
||||
Display the most recent three uploaders of each package.
|
||||
Packages should be source packages, not binary packages.
|
||||
|
||||
Options:
|
||||
-M, --max-uploads=N
|
||||
Display at most the N most recent uploads (default: 3)
|
||||
--keyring KEYRING Add KEYRING as a GPG keyring for Debian Developers'
|
||||
keys in addition to /usr/share/keyrings/debian-keyring.*,
|
||||
/usr/share/keyrings/debian-maintainers.gpg and
|
||||
/usr/share/keyrings/debian-nonupload.gpg;
|
||||
this option may be given multiple times
|
||||
--no-default-keyrings
|
||||
Do not use the default keyrings
|
||||
--no-conf, --noconf
|
||||
Don't read devscripts config files;
|
||||
must be the first option given
|
||||
--date Display the date of the upload
|
||||
--no-date, --nodate
|
||||
Don't display the date of the upload (default)
|
||||
--help Show this message
|
||||
--version Show version and copyright information
|
||||
|
||||
$MODIFIED_CONF_MSG"
|
||||
}
|
||||
|
||||
version() {
|
||||
echo \
|
||||
"This is $PROGNAME, from the Debian devscripts package, version ###VERSION###
|
||||
This code is copyright 2006 by Julian Gilbey <jdg@debian.org>,
|
||||
all rights reserved.
|
||||
Based on original code copyright 2006 Adeodato Simó <dato@net.com.org.es>
|
||||
This program comes with ABSOLUTELY NO WARRANTY.
|
||||
You are free to redistribute this code under the terms of the
|
||||
GNU General Public License, version 2 or later."
|
||||
}
|
||||
|
||||
|
||||
# Boilerplate: set config variables
|
||||
DEFAULT_WHOUPLOADS_KEYRINGS=/usr/share/keyrings/debian-keyring.gpg:/usr/share/keyrings/debian-maintainers.gpg:/usr/share/keyrings/debian-nonupload.gpg
|
||||
DEFAULT_WHOUPLOADS_MAXUPLOADS=3
|
||||
DEFAULT_WHOUPLOADS_DATE=no
|
||||
VARS="WHOUPLOADS_KEYRINGS WHOUPLOADS_MAXUPLOADS WHOUPLOADS_DATE"
|
||||
|
||||
GPG=gpg
|
||||
if ! command -v $GPG > /dev/null; then
|
||||
echo "$GPG missing"
|
||||
exit 1
|
||||
fi
|
||||
|
||||
if [ "$1" = "--no-conf" -o "$1" = "--noconf" ]; then
|
||||
shift
|
||||
MODIFIED_CONF_MSG="$MODIFIED_CONF_MSG
|
||||
(no configuration files read)"
|
||||
|
||||
# set defaults
|
||||
for var in $VARS; do
|
||||
eval "$var=\$DEFAULT_$var"
|
||||
done
|
||||
else
|
||||
# Run in a subshell for protection against accidental errors
|
||||
# in the config files
|
||||
eval $(
|
||||
set +e
|
||||
for var in $VARS; do
|
||||
eval "$var=\$DEFAULT_$var"
|
||||
done
|
||||
|
||||
for file in /etc/devscripts.conf ~/.devscripts
|
||||
do
|
||||
[ -r $file ] && . $file
|
||||
done
|
||||
|
||||
set | grep "^WHOUPLOADS_")
|
||||
|
||||
# check sanity
|
||||
if [ "$WHOUPLOADS_MAXUPLOADS" != \
|
||||
"$(echo \"$WHOUPLOADS_MAXUPLOADS\" | tr -cd 0-9)" ]; then
|
||||
WHOUPLOADS_MAXUPLOADS=3
|
||||
fi
|
||||
|
||||
WHOUPLOADS_DATE="$(echo "$WHOUPLOADS_DATE" | tr A-Z a-z)"
|
||||
if [ "$WHOUPLOADS_DATE" != "yes" ] && [ "$WHOUPLOADS_DATE" != "no" ]; then
|
||||
WHOUPLOADS_DATE=no
|
||||
fi
|
||||
|
||||
# don't check WHOUPLOADS_KEYRINGS here
|
||||
|
||||
# set config message
|
||||
MODIFIED_CONF=''
|
||||
for var in $VARS; do
|
||||
eval "if [ \"\$$var\" != \"\$DEFAULT_$var\" ]; then
|
||||
MODIFIED_CONF_MSG=\"\$MODIFIED_CONF_MSG
|
||||
$var=\$$var\";
|
||||
MODIFIED_CONF=yes;
|
||||
fi"
|
||||
done
|
||||
|
||||
if [ -z "$MODIFIED_CONF" ]; then
|
||||
MODIFIED_CONF_MSG="$MODIFIED_CONF_MSG
|
||||
(none)"
|
||||
fi
|
||||
fi
|
||||
|
||||
MAXUPLOADS=$WHOUPLOADS_MAXUPLOADS
|
||||
WANT_DATE=$WHOUPLOADS_DATE
|
||||
|
||||
declare -a GPG_DEFAULT_KEYRINGS
|
||||
declare -a GPG_KEYRINGS
|
||||
|
||||
# Command-line options
|
||||
TEMP=$(getopt -s bash -o 'h' \
|
||||
--long max-uploads:,keyring:,no-default-keyrings \
|
||||
--long no-conf,noconf \
|
||||
--long date,nodate,no-date \
|
||||
--long help,version \
|
||||
--options M: \
|
||||
-n "$PROGNAME" -- "$@") || (usage >&2; exit 1)
|
||||
|
||||
eval set -- $TEMP
|
||||
|
||||
# Process Parameters
|
||||
while [ "$1" ]; do
|
||||
case $1 in
|
||||
--max-uploads|-M)
|
||||
shift
|
||||
if [ "$1" = "$(echo \"$1\" | tr -cd 0-9)" ]; then
|
||||
MAXUPLOADS=$1
|
||||
fi
|
||||
;;
|
||||
--keyring)
|
||||
shift
|
||||
if [ -f "$1" ]; then
|
||||
GPG_KEYRINGS=("${GPG_KEYRINGS[@]}" "--keyring" "$1")
|
||||
else
|
||||
echo "Could not find keyring $1, skipping" >&2
|
||||
fi
|
||||
;;
|
||||
--no-default-keyrings)
|
||||
WHOUPLOADS_KEYRINGS=
|
||||
;;
|
||||
--no-conf|--noconf)
|
||||
echo "$PROGNAME: $1 is only acceptable as the first command-line option!" >&2
|
||||
exit 1 ;;
|
||||
--date) WANT_DATE=yes ;;
|
||||
--no-date|--nodate) WANT_DATE=no ;;
|
||||
--help|-h) usage; exit 0 ;;
|
||||
--version) version; exit 0 ;;
|
||||
--) shift; break ;;
|
||||
*) echo "$PROGNAME: bug in option parser, sorry!" >&2 ; exit 1 ;;
|
||||
esac
|
||||
shift
|
||||
done
|
||||
|
||||
OIFS="$IFS"
|
||||
IFS=:
|
||||
|
||||
for keyring in $WHOUPLOADS_KEYRINGS; do
|
||||
if [ -f "$keyring" ]; then
|
||||
GPG_DEFAULT_KEYRINGS=("${GPG_DEFAULT_KEYRINGS[@]}" "--keyring" "$keyring")
|
||||
elif [ -n "$keyring" ]; then
|
||||
echo "Could not find keyring $keyring, skipping it" >&2
|
||||
fi
|
||||
done
|
||||
|
||||
IFS="${OIFS:- }"
|
||||
|
||||
GNUPGHOME=$(mktemp -d)
|
||||
exit_with_error() {
|
||||
[ ! -d "$GNUPGHOME" ] || rm -r "$GNUPGHOME"
|
||||
exit 1
|
||||
}
|
||||
trap exit_with_error HUP INT QUIT PIPE ALRM TERM
|
||||
export GNUPGHOME
|
||||
|
||||
# Some useful abbreviations for gpg options
|
||||
GPG_OPTIONS="--no-options --no-auto-check-trustdb --no-default-keyring"
|
||||
GPG_NO_KEYRING="$GPG_OPTIONS --keyring /dev/null"
|
||||
|
||||
if [ $# -eq 0 ]; then
|
||||
usage;
|
||||
exit 1
|
||||
fi
|
||||
|
||||
# Now actually get the reports :)
|
||||
|
||||
for package; do
|
||||
echo "Uploads for $package:"
|
||||
|
||||
pkgurl="https://tracker.debian.org/pkg//${package}"
|
||||
baseurl="https://tracker.debian.org"
|
||||
|
||||
# only grab the actual "Accepted" news announcements; hopefully this
|
||||
# won't pick up many false positives
|
||||
WGETOPTS="-q -O - --timeout=30 "
|
||||
count=0
|
||||
for news in $(wget $WGETOPTS $pkgurl |
|
||||
sed -ne 's%^.*<a href="\(/news/[0-9]\+/accepted-'$package'.*\)">.*$%\1%p'); do
|
||||
HTML_TEXT=$(wget $WGETOPTS "$baseurl$news")
|
||||
GPG_TEXT=$(echo "$HTML_TEXT" |
|
||||
sed -ne 's/^.*<pre>//; /-----BEGIN PGP SIGNED MESSAGE-----/,/-----END PGP SIGNATURE-----/p')
|
||||
|
||||
test -n "$GPG_TEXT" || continue
|
||||
|
||||
VERSION=$(echo "$GPG_TEXT" | awk '/^Version/ { print $2; exit }')
|
||||
DISTRO=$(echo "$GPG_TEXT" | awk '/^Distribution/ { print $2; exit }')
|
||||
if [ "$WANT_DATE" = "yes" ]; then
|
||||
DATE=$(echo "$HTML_TEXT" | xargs | perl -ne 'print $1 if m%<li><b>Date</b>: (.+) </li>%;')
|
||||
fi
|
||||
|
||||
GPG_ID=$(echo "$GPG_TEXT" | LC_ALL=C $GPG $GPG_NO_KEYRING --keyid-format long --verify 2>&1 |
|
||||
sed -rne 's/.*using [^ ]* key ([0-9A-Z]+).*/\1/p')
|
||||
|
||||
# First try to get the uid@debian.org email
|
||||
UPLOADER=$($GPG $GPG_OPTIONS \
|
||||
"${GPG_DEFAULT_KEYRINGS[@]}" "${GPG_KEYRINGS[@]}" \
|
||||
--list-key --with-colons --fixed-list-mode $GPG_ID 2>/dev/null |
|
||||
awk -F: '/@debian\.org/ { a = $10; exit} END { print a }' )
|
||||
|
||||
# If $UPLOADER is still null (no @debian.org email found), pull the next email uid
|
||||
if [ -z "$UPLOADER" ]; then
|
||||
UPLOADER=$($GPG $GPG_OPTIONS \
|
||||
"${GPG_DEFAULT_KEYRINGS[@]}" "${GPG_KEYRINGS[@]}" \
|
||||
--list-key --with-colons --fixed-list-mode $GPG_ID 2>/dev/null |
|
||||
awk -F: '/^uid/ { a = $10; exit} END { print a }' )
|
||||
|
||||
fi
|
||||
|
||||
# If $UPLOADER is still null (no email found on the key) print the <unrecognized public key> message
|
||||
if [ -z "$UPLOADER" ]; then UPLOADER="<unrecognised public key ($GPG_ID)>"; fi
|
||||
|
||||
output="$VERSION to $DISTRO: $UPLOADER"
|
||||
[ "$WANT_DATE" = "yes" ] && output="$output on $DATE"
|
||||
echo $output | iconv -c -f UTF-8
|
||||
|
||||
count=$(($count + 1))
|
||||
[ $count -eq $MAXUPLOADS ] && break
|
||||
done
|
||||
test $# -eq 1 || echo
|
||||
done
|
||||
|
||||
[ ! -d "$GNUPGHOME" ] || rm -r "$GNUPGHOME"
|
||||
exit 0
|
||||
Loading…
Add table
Add a link
Reference in a new issue