diff options
| -rw-r--r-- | Echolot/Stats.pm | 11 | ||||
| -rw-r--r-- | NEWS | 1 | ||||
| -rw-r--r-- | templates/echolot.html | 8 |
3 files changed, 17 insertions, 3 deletions
diff --git a/Echolot/Stats.pm b/Echolot/Stats.pm index 45c7b3d..82bef86 100644 --- a/Echolot/Stats.pm +++ b/Echolot/Stats.pm @@ -1,7 +1,7 @@ package Echolot::Stats; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Stats.pm,v 1.30 2002/08/15 00:06:53 weasel Exp $ +# $Id: Stats.pm,v 1.31 2002/08/23 08:17:21 weasel Exp $ # =pod @@ -480,6 +480,8 @@ sub build_lists() { my $rems; my $pubrems; + my %stats; + my $broken1 = read_file( Echolot::Config::get()->{'broken1'}, 1); my $broken2 = read_file( Echolot::Config::get()->{'broken2'}, 1); my $sameop = read_file( Echolot::Config::get()->{'sameop'}, 1); @@ -490,6 +492,8 @@ sub build_lists() { build_list2( $rems, $broken1, $broken2, $sameop, Echolot::Config::get()->{'private_resultdir'}.'/'.'mlist2'); build_mlist1( $pubrems, $broken1, $broken2, $sameop, Echolot::Config::get()->{'resultdir'}.'/'.'mlist', Echolot::Config::get()->{'templates'}->{'mlist'}); build_list2( $pubrems, $broken1, $broken2, $sameop, Echolot::Config::get()->{'resultdir'}.'/'.'mlist2', Echolot::Config::get()->{'templates'}->{'mlist2'}); + $stats{'mix_total'} = scalar @$pubrems; + $stats{'mix_98'} = scalar grep { $_->{'stats'}->{'avr_reliability'} >= 0.98 } @$pubrems; if (Echolot::Config::get()->{'combined_list'}) { $clist->{'mix'} = $rems; $pubclist->{'mix'} = $pubrems; $pubrems = undef; @@ -501,6 +505,8 @@ sub build_lists() { build_list2( $rems,$broken1, $broken2, $sameop, Echolot::Config::get()->{'private_resultdir'}.'/'.'rlist2'); build_rlist1( $pubrems, $broken1, $broken2, $sameop, Echolot::Config::get()->{'resultdir'}.'/'.'rlist', Echolot::Config::get()->{'templates'}->{'rlist'}); build_list2( $pubrems, $broken1, $broken2, $sameop, Echolot::Config::get()->{'resultdir'}.'/'.'rlist2', Echolot::Config::get()->{'templates'}->{'rlist2'}); + $stats{'cpunk_total'} = scalar @$pubrems; + $stats{'cpunk_98'} = scalar grep { $_->{'stats'}->{'avr_reliability'} >= 0.98 } @$pubrems; if (Echolot::Config::get()->{'combined_list'} && ! Echolot::Config::get()->{'seperate_rlists'}) { $clist->{'cpunk'} = $rems; $pubclist->{'cpunk'} = $pubrems; $pubrems = undef; @@ -548,7 +554,8 @@ sub build_lists() { Echolot::Tools::write_HTML_file( Echolot::Config::get()->{'resultdir'}.'/'.Echolot::Config::get()->{'indexfilebasename'}, Echolot::Config::get()->{'templates'}->{'indexfile'}, - Echolot::Config::get()->{'buildstats'}); + Echolot::Config::get()->{'buildstats'}, + %stats ); }; @@ -1,6 +1,7 @@ Changes in version 2.0beta33 - 2002-08-23 * Scheduler fixes (inserted jobs for one time processing got requeued over and over again according to their interval). + * Give a short summary about current stats on index page. Changes in version 2.0beta32 - 2002-08-23 * Fix a major bug introduced in 2.0beta31 that resulted in no diff --git a/templates/echolot.html b/templates/echolot.html index 2d81516..a298e10 100644 --- a/templates/echolot.html +++ b/templates/echolot.html @@ -2,7 +2,7 @@ <head> <title>Remailer Reliability Stats [<TMPL_VAR NAME="SITE_NAME">]</title> <META HTTP-EQUIV="Expires" CONTENT="<TMPL_VAR NAME="EXPIRES">"> - <!-- $Id: echolot.html,v 1.5 2002/08/21 19:19:57 weasel Exp $ --> + <!-- $Id: echolot.html,v 1.6 2002/08/23 08:17:21 weasel Exp $ --> </head> <body> <h1>Remailer Reliability Stats [<TMPL_VAR NAME="SITE_NAME">]</h1> @@ -49,6 +49,12 @@ queries </TMPL_IF>for your convenience. </tr> </table> +<p> +Out of the <TMPL_VAR NAME="CPUNK_TOTAL"> Cypherpunk and +<TMPL_VAR NAME="MIX_TOTAL"> Mixmaster remailers on these stats there +are <TMPL_VAR NAME="CPUNK_98"> CPunks and <TMPL_VAR NAME="MIX_98"> Mixes +over 98.0% in terms of overall reliability. + <h2>Available Keyrings</h2> <table border=1> |