From: Heikki Levanto Date: Mon, 15 Aug 2011 08:58:31 +0000 (+0200) Subject: Merge branch 'master' of ssh://git.indexdata.com:222/home/git/pub/git-tools X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=commitdiff_plain;h=e7bde77565717df3a875975d75f485ac84fbfed7;hp=e3b8c4e49b10c58031459a5301b59363befd70ba;p=git-tools-moved-to-github.git Merge branch 'master' of ssh://git.indexdata.com:222/home/git/pub/git-tools --- diff --git a/aptcheck/aptcheck.pl b/aptcheck/aptcheck.pl index 7c9245b..03680ce 100755 --- a/aptcheck/aptcheck.pl +++ b/aptcheck/aptcheck.pl @@ -18,10 +18,15 @@ # # 11-Mar-2011 Heikki: Started this # 22-Mar-2011 Heikki: Adding manually maintained packages +# 15-Aug-2011 Heikki: Adding a total in the headline, for nagiosgrapher # # TODO: Assumes that we release our restricted packages for all versions # and architectures at the same time. Gets only the highest version from # all, and reports anything less than this. Good enough for now. +# +# TODO: Get the dates from ls --full-time /var/cache/apt/archives/ +# and display next to the packages, so we can see how long they have +# been lingering. Boldface them if older than some limit #### Init use strict; @@ -36,6 +41,7 @@ my %hostcomments = ( "bellone" => "Niels Erik does the manual upgrades", "cfrepous" => "Wolfram does the manual upgrades", "leopard" => "Wolfram does the manual upgrades", + "lsd" => "Heikki takes care of all upgrades", ); @@ -227,7 +233,7 @@ for my $hline ( split("\n",$hostlist) ) { if ( $hostcomments{$H} ); $table .= $det if $pkgs; print "\n$table\n" if $debug>2; - last if $H =~/dart/ && $debug; + last if $H =~/diane/ && $debug; } $table .= "\n"; @@ -239,6 +245,9 @@ print F "\n"; print F "Apt upgrade status\n"; print F "\n"; print F "

Apt package status

\n"; +print F "" . ( $sectot + $owntot + $mantot + $normtot ) . + " packages pending, including $sectot security \n"; + print F "

Debug run, many hosts missing!

\n" if $debug;