Richard Braakman wrote:
> It should be possible to construct a regexp that detects these usage
> patterns. Then you could grep through the .diff.gz files on the
> archive to see if they are used anywhere, and file individual
> bugreports. With a few exceptions, the diffs are not very large --
> you won't be grepping through 500 MB :-)
Here's my try at doing that:
[EMAIL PROTECTED]:~irc/mirror/debian/main/source>find |grep diff.gz | xargs
zcat |
perl -ne 'chomp ;if (/dh_.*\s+(.*?)(-p.*|-i|-a)(.*?)/ && ($1 || $2)) {
$args="$1 $2"; $args=~tr/\s/\s/s; foreach $word (split(/\s/,"$args")) { if
(! $word=~m/^-/) { print "$_: $word\n" } } }'
It comes up empty, no matches. (I checked non-free and contib and non-us
too). I don't think it's a bug in my command line, though others are
welcome to try alternate ways.
> This way you'll miss the "native" packages. Is there a list of those?
Just grep for .tar.gz files that are not .orig.tar.gz files:
[EMAIL PROTECTED]:~irc/mirror/debian/main/source>find |grep .tar.gz | grep -v
.orig.
|xargs -n 1 tar xzOf | perl -ne 'chomp ;if (/dh_.*\s+(.*?)(-p.*|-i|-a)(.*?)/
&& ($1 || $2)) { $args="$1 $2"; $args=~tr/\s/\s/s; foreach $word
(split(/\s/,"$args")) { if (! $word=~m/^-/) { print "$_: $word\n" } } }'
This also comes up empty.
--
see shy jo
--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] .
Trouble? e-mail to [EMAIL PROTECTED] .
