Added preliminary backend for creating rounds and groups.

[ccbs] / html / show-tournament.pl

diff --git a/html/show-tournament.pl b/html/show-tournament.pl
index b204270422048e58ee57d461c324df362a509efb..57bd379a16f2a68df1b2430f4bc619e84e7754a7 100755 (executable)
--- a/html/show-tournament.pl
+++ b/html/show-tournament.pl
@@ -61,10 +61,27 @@ for my $score (@$scores) {
        $pl->[$#$pl]->{'total'} += $score->{'score'};
 }
 
+my $num_rounds = scalar @rounds;
+my $num_rankings = scalar @$rankings;
+
+# If there have been no rounds, check out the number of participants; if not, check the
+# number of qualified from the last round
+my $num_qualified;
+if ($num_rounds == 0) {
+       my $ref = $dbh->selectrow_hashref('SELECT COUNT(*) AS num_participants FROM tournamentparticipation WHERE tournament=?', undef, $id);
+       $num_qualified = $ref->{'num_participants'};
+} else {
+       my $ref = $dbh->selectrow_hashref('SELECT numqualifying FROM roundparticipation WHERE tournament=? AND round=?', undef, $id, $num_rounds);
+       $num_qualified = $ref->{'numqualifying'};
+}
+
 ccbs::print_header();
 ccbs::process_template('show-tournament.tmpl', $tournament->{'tournamentname'}, {
        tournament => $tournament,
        rankings => $rankings,
-       rounds => \@rounds
+       num_rankings => $num_rankings,
+       rounds => \@rounds,
+       num_rounds => $num_rounds,
+       num_qualified => $num_qualified
 });
 $dbh->disconnect;