X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPlack%2FApp%2FGruntmaster%2FHTML.pm;h=1e0f7889870101de3c74c793ac537e51bfc99b98;hb=7e158d3c2f023119628265310fdb8f85d9b1c29e;hp=fe7e4964ebe02507e0f86b4d281667bb0636c593;hpb=20777d844ac7adb5887ea4e50885cd9702b7ee6a;p=plack-app-gruntmaster.git diff --git a/lib/Plack/App/Gruntmaster/HTML.pm b/lib/Plack/App/Gruntmaster/HTML.pm index fe7e496..1e0f788 100644 --- a/lib/Plack/App/Gruntmaster/HTML.pm +++ b/lib/Plack/App/Gruntmaster/HTML.pm @@ -32,7 +32,7 @@ sub HTML::Element::iter3 { } sub HTML::Element::fid { shift->look_down(id => shift) } -sub HTML::Element::fclass { shift->look_down(class => shift) } +sub HTML::Element::fclass { shift->look_down(class => qr/\b$_[0]\b/) } sub HTML::Element::namedlink { my ($self, $id, $name) = @_; @@ -114,6 +114,7 @@ sub process_us { sub process_ct_entry { my ($tree, %args) = @_; $_->edit_href (sub {s/contest_id/$args{id}/}) for $tree->find('a'); + $tree->fid('editorial')->detach unless $args{finished}; $tree->fid('links')->detach unless $args{started}; my $status = ($args{time} < $args{start} ? 'starts' : 'ends'); $tree->fclass('timer')->attr('data-stop', $status eq 'ends' ? $args{stop} : $args{start}); @@ -122,6 +123,7 @@ sub process_ct_entry { stop => ftime $args{stop}, status => $status, description => literal $args{description}); + $tree->fid('ctcountdown')->detach if $args{time} >= $args{stop}; } sub process_ct { @@ -147,6 +149,11 @@ sub process_pb_entry { level => ucfirst $args{level}, author => $args{author}, owner => $args{owner_name} || $args{owner}); + if ($args{limits}) { + my @limits = (@{$args{limits}}, {format => 'Other', timeout => $args{timeout} }); + @limits = map { sprintf '%s (%s)', @{$_}{qw/timeout format/} } @limits; + $tree->look_down(smap => 'timeout')->replace_content(join ', ', @limits); + } if ($args{contest_stop}) { $tree->fid('solution')->detach; $tree->fid('solution_modal')->detach; @@ -161,11 +168,13 @@ sub process_pb_entry { $tree->fid('solution_modal')->fclass('modal-body')->replace_content(literal $args{solution}); } if ($args{cansubmit}) { + $tree->fid('nosubmit')->detach; $tree->look_down(name => 'problem')->attr(value => $args{id}); my $contest = $tree->look_down(name => 'contest'); - $contest->attr(value => $args{contest}) if $args{contest}; - $contest->detach unless $args{contest} + $contest->attr(value => $args{args}{contest}) if $args{args}{contest}; + $contest->detach unless $args{args}{contest} } else { + $tree->fid('nosubmit')->find('a')->edit_href(sub{s/id/$args{id}/}); $tree->fid('submit')->detach } } @@ -183,7 +192,7 @@ sub process_pb { $tr->fclass('name')->namedlink($data->{id}, $data->{name}); $tr->fclass('name')->find('a')->edit_href(sub {$_ .= "?contest=$args{contest}"}) if $args{contest}; $tr->fclass('owner')->namedlink($data->{owner}, $data->{owner_name}); - $tr->find('td')->attr(class => $tr->find('td')->attr('class').' warning') if $data->{private}; + $tr->find('td')->attr(class => $tr->find('td')->attr('class').' warning') if $data->{private} && !$args{contest}; }; my $iter = sub { my ($data, $div) = @_; @@ -192,6 +201,7 @@ sub process_pb { $div->find('tbody')->find('tr')->iter3($args{$data}, $titer); }; $tree->fid('beginner')->iter3([grep {$args{$_}} qw/beginner easy medium hard/], $iter); + $tree->fid('open-alert')->detach unless $args{contest}; } sub process_log_entry { @@ -226,13 +236,11 @@ sub process_log { my ($data, $tr) = @_; $tr->fclass('id')->namedlink($data->{id}); $tr->fclass('problem')->namedlink($data->{problem}, $data->{problem_name}); - $tr->fclass('problem')->find('a')->edit_href(sub{$_ .= "?contest=$args{contest}"}) if $args{contest}; + $tr->fclass('problem')->find('a')->edit_href(sub{$_ .= "?contest=$args{args}{contest}"}) if $args{args}{contest}; $tr->fclass('contest')->namedlink($data->{contest}, $data->{contest_name}) if $data->{contest}; $tr->fclass('contest')->replace_content('None') unless $data->{contest}; $tr->fclass('date')->replace_content(ftime $data->{date}); - $tr->fclass('format')->replace_content($data->{format}); - $tr->fclass('size')->namedlink("$data->{id}.$data->{extension}", sprintf "%.2fKB", $data->{size}/1024); - $tr->fclass('size')->attr('data-private', '') if $data->{private}; + $tr->fclass('source')->namedlink("$data->{id}.$data->{extension}", sprintf "%.2fKB %s", $data->{size}/1024, $data->{format}); $tr->fclass('owner')->namedlink($data->{owner}, $data->{owner_name}); $tr->fclass('result_text')->replace_content($data->{result_text}); $tr->fclass('result_text')->attr(class => "r$data->{result}"); @@ -246,7 +254,7 @@ sub process_log { next unless $elem; delete $args{args}{page}; my $str = join '&', map { $_ . '=' . $args{args}{$_} } keys %{$args{args}}; - $elem->find('a')->edit_href(sub{s/$/&$str/}); + $elem->find('a')->edit_href(sub{s/$/&$str/}) if $str; } $tree->fclass('current')->replace_content("Page $args{current_page} of $args{last_page}"); } @@ -274,12 +282,13 @@ sub process_st { sub process_ed { my ($tree, %args) = @_; + $tree->content_handler(editorial => literal $args{editorial}); my $iter = sub { my ($data, $div) = @_; $div->set_child_content(class => 'value', $data->{value}); $div->set_child_content(class => 'solution', literal $data->{solution}); $div->fclass('problem')->namedlink($data->{id}, $data->{name}); }; - my @pb = map { @{$args{$_}} } qw/beginner easy medium hard/; + my @pb = map { @{$args{$_} // []} } qw/beginner easy medium hard/; $tree->fclass('well')->iter3(\@pb, $iter); }