X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FSt.pm;h=099c1936a6f6646c747fdd8a44ff0bb5530f3e81;hb=9da2f4958089ae517865b808be61bb12d43b61de;hp=2100049934964b905a433176b30ca2d3502785af;hpb=a90230ea14d4f5e2c93528830deed883d5afdbc2;p=plack-app-gruntmaster.git diff --git a/lib/Gruntmaster/Page/St.pm b/lib/Gruntmaster/Page/St.pm index 2100049..099c193 100644 --- a/lib/Gruntmaster/Page/St.pm +++ b/lib/Gruntmaster/Page/St.pm @@ -7,23 +7,6 @@ use Gruntmaster::Page::Base st => 'Standings'; our @ISA = qw/Gruntmaster::Page::Base/; our $VERSION = '0.001'; -use constant TEMPLATES => { - en => <<'HTML', - - - -
UsernameTotal -
UsernameScore - - -
- - - -
-HTML -}; - use constant LEVEL_VALUES => { beginner => 100, easy => 250, @@ -45,15 +28,15 @@ sub calc_score{ } sub _generate{ - my ($self, $htc, $path, $lang) = @_; + my ($self, $htc, $lang, $env, $ct) = @_; + debug $env => "language is '$lang' and contest is '$ct'"; my ($totaltime, $start); - $path =~ m,^(?:ct/([^/]+)/)?,; local $Gruntmaster::Data::contest; - if ($1) { - $start = contest_start ($1); - $totaltime = contest_end ($1) - $start; - $Gruntmaster::Data::contest = $1; + if ($ct) { + $start = contest_start ($ct); + $totaltime = contest_end ($ct) - $start; + $Gruntmaster::Data::contest = $ct; } my @problems = problems; @@ -64,8 +47,8 @@ sub _generate{ $tries{job_user()}{job_problem()}++; $scores{job_user()}{job_problem()} = job_result() ? 0 : calc_score (job_user(), job_problem(), job_date(), $tries{job_user()}{job_problem()}, $totaltime) if job_date() > $start; } else { - if (job_result_text =~ m/^(\d+)/) { - $scores{job_user()}{job_problem()} = $1; + if (job_result_text =~ m/^(\scores+)/) { + $scores{job_user()}{job_problem()} = $ct; } else { $scores{job_user()}{job_problem()} = job_result() ? 0 : 100; }