X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FSt.pm;h=a812cfa0124b89bee6481e8a6b94cafed6cfd4e3;hb=8e1eb2c1fbf99436083b0854235142f766c5167f;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..a812cfa 100644 --- a/lib/Gruntmaster/Page/St.pm +++ b/lib/Gruntmaster/Page/St.pm @@ -9,7 +9,7 @@ our $VERSION = '0.001'; use constant TEMPLATES => { en => <<'HTML', - +
UsernameTotal
UsernameScore @@ -45,15 +45,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 +64,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; }