/[secure-testing]/bin/checklist
ViewVC logotype

Diff of /bin/checklist

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 4173 by joeyh, Sun Jun 11 02:06:20 2006 UTC revision 4284 by stef-guest, Thu Jun 22 21:44:30 2006 UTC
# Line 12  use Getopt::Long; Line 12  use Getopt::Long;
12  my $html=0;  my $html=0;
13  my $debug=0;  my $debug=0;
14  my $suite="testing";  my $suite="testing";
15  my $sta="http://secure-testing.debian.net/debian-secure-testing/dists/etch/security-updates/main/source/Sources.gz";  my $sta="http://security.debian.org/debian-security/dists/testing/updates/main/source/Sources.gz";
16  my $output;  my $output;
17  if (! GetOptions(  if (! GetOptions(
18                  "html" => \$html,                  "html" => \$html,
# Line 37  else { Line 37  else {
37    
38  if ($html) { # It's HTML, so we need a header  if ($html) { # It's HTML, so we need a header
39          print OUT "<html><title>$suite security issues</title>\n";          print OUT "<html><title>$suite security issues</title>\n";
40            print OUT <<"EOF";
41    <p><b>Note:</b>The information in the <a href="http://idssi.enyo.de/tracker">Security
42    Bug Tracker</a> is more detailed and likely more accurate.
43    </p>
44    EOF
45    
46    
47          # This is being run against something it's not meant to be, so print a warning          # This is being run against something it's not meant to be, so print a warning
48          if ($suite ne 'testing' && $suite ne 'unstable') {          if ($suite ne 'testing' && $suite ne 'unstable') {
# Line 314  if ($html) { Line 320  if ($html) {
320          }          }
321          print OUT "<br>";          print OUT "<br>";
322          print OUT "Total holes unfixed: $unfixed<br>\n";          print OUT "Total holes unfixed: $unfixed<br>\n";
323          print OUT "Total holes fixed in unstable but not $suite: $unprop_all ($fixedsta fixed in secure-testing archive)";          print OUT "Total holes fixed in unstable (or experimental) but not $suite: $unprop_all ($fixedsta fixed in secure-testing archive)";
324          if ($unprop_all != $unprop) {          if ($unprop_all != $unprop) {
325                  print OUT " (+".($unprop - $unprop_all)." on some arches)";                  print OUT " (+".($unprop - $unprop_all)." on some arches)";
326          }          }
Legend:
Removed from v.4173  
changed lines
  Added in v.4284
  ViewVC Help
Powered by ViewVC 1.1.5