Package: devscripts
Version: 2.10.29
Severity: wishlist
Tags: patch

Hi,
the attached patch (against svn r1497) adds support for displaying the
upload's date alongside uploader.
The html date extraction awk is a bit clumsy but you get the idea.

thanks,
filippo

-- Package-specific info:

--- /etc/devscripts.conf ---

--- ~/.devscripts ---
Not present

-- System Information:
Debian Release: lenny/sid
  APT prefers unstable
  APT policy: (990, 'unstable')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.25.1-mactel (SMP w/2 CPU cores)
Locale: LANG=en_US, LC_CTYPE=en_US (charmap=ISO-8859-1)
Shell: /bin/sh linked to /bin/bash

Versions of packages devscripts depends on:
ii  dpkg-dev                      1.14.19    package building tools for Debian
ii  libc6                         2.7-12     GNU C Library: Shared libraries
ii  perl                          5.10.0-10  Larry Wall's Practical Extraction 

Versions of packages devscripts recommends:
ii  at            3.1.10.1                   Delayed job execution and batch pr
ii  bsd-mailx [ma 8.1.2-0.20071201cvs-3      A simple mail user agent
ii  bzr           1.5-1                      easy to use distributed version co
ii  curl          7.18.2-1                   Get a file from an HTTP, HTTPS or 
ii  cvs           1:1.12.13-11               Concurrent Versions System
ii  dctrl-tools   2.12                       Command-line tools to process Debi
ii  debian-keyrin 2008.05.28                 GnuPG (and obsolete PGP) keys of D
pn  debian-mainta <none>                     (no description available)
ii  dput          0.9.2.32                   Debian package upload tool
ii  elinks [www-b 0.11.3-8                   advanced text-mode WWW browser
ii  epiphany-geck 2.22.2-2                   Intuitive GNOME web browser - Geck
ii  epiphany-webk 2.22.2-2                   Intuitive GNOME web browser - webk
pn  equivs        <none>                     (no description available)
ii  fakeroot      1.9.5                      Gives a fake root environment
ii  firefox-3.0 [ 3.0~rc1+nobinonly-0ubuntu1 safe and easy web browser from Moz
ii  git-core      1:1.5.5.4-1                fast, scalable, distributed revisi
ii  gnupg         1.4.9-2                    GNU privacy guard - a free PGP rep
ii  iceweasel [ww 3.0~rc2-1                  lightweight web browser based on M
pn  libauthen-sas <none>                     (no description available)
ii  libcrypt-ssle 0.57-1+b1                  Support for https protocol in LWP
ii  libparse-debc 2.005-2                    Easy OO parsing of Debian control-
ii  libsoap-lite- 0.710.06-1                 Client and server side SOAP implem
pn  libterm-size- <none>                     (no description available)
ii  libtimedate-p 1.1600-9                   Time and date functions for Perl
ii  liburi-perl   1.35.dfsg.1-1              Manipulates and accesses URI strin
ii  libwww-perl   5.812-1                    WWW client/server library for Perl
pn  libyaml-syck- <none>                     (no description available)
ii  lintian       1.24.1                     Debian package checker
ii  lsb-release   3.2-12                     Linux Standard Base version report
ii  lynx [www-bro 2.8.6-2                    Text-mode WWW Browser
ii  mailx         1:20071201-3               Transitional package for mailx ren
ii  man-db        2.5.2-1                    on-line manual pager
ii  mercurial     1.0.1-1                    Scalable distributed version contr
ii  openssh-clien 1:4.7p1-12                 secure shell client, an rlogin/rsh
ii  patch         2.5.9-5                    Apply a diff file to an original
ii  patchutils    0.2.31-4                   Utilities to work with patches
ii  strace        4.5.15-1.2                 A system call tracer
ii  subversion    1.4.6dfsg1-4               Advanced version control system
ii  unzip         5.52-11                    De-archiver for .zip files
ii  wdiff         0.5-17                     Compares two files word by word
ii  wget          1.11.3-1                   retrieves files from the web

-- no debconf information
Index: scripts/who-uploads.1
===================================================================
--- scripts/who-uploads.1       (revision 1497)
+++ scripts/who-uploads.1       (working copy)
@@ -35,6 +35,9 @@
 Do not read any configuration files.  This can only be used as the
 first option given on the command-line.
 .TP
+\fB\-\-date\fR
+Show the date of upload alongside uploader
+.TP
 .BR \-\-help ", " \-h
 Display a help message and exit successfully.
 .TP
Index: scripts/who-uploads.sh
===================================================================
--- scripts/who-uploads.sh      (revision 1497)
+++ scripts/who-uploads.sh      (working copy)
@@ -42,6 +42,7 @@
     --no-conf, --noconf
                       Don't read devscripts config files;
                       must be the first option given
+    --date            Show upload's date
     --help            Show this message
     --version         Show version and copyright information
 
@@ -64,8 +65,8 @@
 
DEFAULT_WHOUPLOADS_KEYRINGS=/usr/share/keyrings/debian-keyring.gpg:/usr/share/keyrings/debian-keyring.pgp:/usr/share/keyrings/debian-maintainers.gpg
 DEFAULT_WHOUPLOADS_MAXUPLOADS=3
 VARS="WHOUPLOADS_KEYRINGS WHOUPLOADS_MAXUPLOADS"
+WANT_DATE=""
 
-
 if [ "$1" = "--no-conf" -o "$1" = "--noconf" ]; then
     shift
     MODIFIED_CONF_MSG="$MODIFIED_CONF_MSG
@@ -136,6 +137,7 @@
 TEMP=$(getopt -s bash -o 'h' \
        --long max-uploads:,keyring:,no-default-keyrings \
        --long no-conf,noconf \
+       --long date \
        --long help,version -n "$PROGNAME" -- "$@")
 if [ $? != 0 ] ; then exit 1 ; fi
 
@@ -163,6 +165,7 @@
     --no-conf|--noconf)
        echo "$PROGNAME: $1 is only acceptable as the first command-line 
option!" >&2
        exit 1 ;;
+    --date) WANT_DATE=1 ;;
     --help|-h) usage; exit 0 ;;
     --version) version; exit 0 ;;
     --)        shift; break ;;
@@ -189,13 +192,16 @@
     count=0
     for news in $(wget -q -O - $pkgurl |
                   sed -ne 's%^.*<a 
href="\('$package'/news/[0-9A-Z]*\.html\)">Accepted .*%\1%p'); do
-       GPG_TEXT=$(wget -q -O - "$baseurl$news" |
+       HTML_TEXT=$(wget -q -O - "$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 }')
+       [ -n "$WANT_DATE" ] && DATE=$(echo "$HTML_TEXT" | awk 
'/^<li><em>Date<\/em>:/ { 
+                               print gensub(".*</em>:([^<]+)</li>", "\\1", 
""); exit }')
 
        GPG_ID=$(echo "$GPG_TEXT" | gpg $GPG_NO_KEYRING --verify 2>&1 |
                 sed -rne 's/.*ID ([0-9A-Z]+).*/\1/p')
@@ -206,7 +212,9 @@
                   awk  -F: '/@debian\.org>/ { a = $10; exit} /^pub/ { a = $10 
} END { print a }' )
        if [ -z "$UPLOADER" ]; then UPLOADER="<unrecognised public key 
($GPG_ID)>"; fi
 
-       echo "$VERSION to $DISTRO: $UPLOADER" | iconv -c -f UTF-8
+       output="$VERSION to $DISTRO: $UPLOADER" 
+       [ -n "$WANT_DATE" ] && output="$output on $DATE"
+       echo $output | iconv -c -f UTF-8
 
        count=$(($count + 1))
        [ $count -eq $MAXUPLOADS ] && break

Reply via email to