X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FSt.pm;h=099c1936a6f6646c747fdd8a44ff0bb5530f3e81;hb=9da2f4958089ae517865b808be61bb12d43b61de;hp=fafded1c601dda5d63eda51851a07f568e3844ca;hpb=ca3dffeb7be20e4bf1269d8bb502f80eb533f0ab;p=plack-app-gruntmaster.git diff --git a/lib/Gruntmaster/Page/St.pm b/lib/Gruntmaster/Page/St.pm index fafded1..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,14 +28,15 @@ sub calc_score{ } sub _generate{ - my ($self, $htc, $path, $lang) = @_; - my $totaltime; + 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) { - $totaltime = contest_end ($1) - contest_start ($1); - $Gruntmaster::Data::contest = $1; + if ($ct) { + $start = contest_start ($ct); + $totaltime = contest_end ($ct) - $start; + $Gruntmaster::Data::contest = $ct; } my @problems = problems; @@ -61,10 +45,10 @@ sub _generate{ for (1 .. jobcard) { if ($Gruntmaster::Data::contest) { $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); + $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; }