Browse Source

Add new program popcon-largest-unused. Script from Yann Dirson, manual page from Petter Reinholdtsen. (Closes: #127633)

suites/ascii
Petter Reinholdtsen 19 years ago
parent
commit
909c525cf0
  1. 2
      debian/changelog
  2. 22
      debian/popcon-largest-unused.8
  3. 2
      debian/popularity-contest.8
  4. 1
      debian/rules
  5. 11
      popcon-largest-unused

2
debian/changelog

@ -3,6 +3,8 @@ popularity-contest (1.7) UNRELEASED; urgency=low
* Petter Reinholdtsen
- Provide 'popcon', to make it easier to find this package by
its common short name. (Closes: #215563)
- Add new program popcon-largest-unused. Script from Yann Dirson,
manual page from Petter Reinholdtsen. (Closes: #127633)
-- Petter Reinholdtsen <pere@debian.org> Sun, 19 Oct 2003 11:02:26 +0200

22
debian/popcon-largest-unused.8

@ -0,0 +1,22 @@
.TH "popcon-largest-unused" "8" "" "Yann Dirson" ""
.SH "NAME"
.LP
popcon\-largest\-unused \- List size of unused packages
.SH "SYNTAX"
.LP
popcon\-largest\-unused
.SH "DESCRIPTION"
.LP
Based on the list of unused packages reported by
popularity\-contest, this program extract the package size
from the APT cache, and list the unused packages sorted
by size.
.SH "FILES"
.LP
\fI/var/log/popularity\-contest\fP
.SH "AUTHORS"
.LP
Yann Dirson <dirson@debian.org>
.SH "SEE ALSO"
.LP
popularity\-contest(8)

2
debian/popularity-contest.8

@ -33,5 +33,7 @@ according to the settings in
.SH SEE ALSO
Additional documentation is in
.BR /usr/share/doc/popularity-contest/
.LP
popcon-largest-unused(8)
.SH AUTHOR
Avery Pennarun <apenwarr@debian.org>.

1
debian/rules

@ -25,6 +25,7 @@ install:
install -d debian/tmp/usr/sbin/
install -d debian/tmp/etc/
install popularity-contest debian/tmp/usr/sbin/
install popcon-largest-unused debian/tmp/usr/sbin/
# Build architecture-independent files here.
binary-indep: build install

11
popcon-largest-unused

@ -0,0 +1,11 @@
#!/bin/sh
#
# Author: Yann Dirson <dirson@debian.org>
# License: GPL
grep '<OLD>' /var/log/popularity-contest |
cut -d' ' -f3 |
xargs apt-cache -o 'APT::Cache::AllVersions=0' show |
grep -E '^(Package|Installed-Size): ' |
perl -ne 'if (/^Package: (.*)/) { $p = $1 }; if (/^Installed-Size: (.*)/) { print "$1 $p\n"; $p = 'BUG' }' |
sort -rn
Loading…
Cancel
Save