X-Git-Url: https://git.sesse.net/?p=ccbs;a=blobdiff_plain;f=html%2Fdo-set-active-round.pl;h=5b0376e6b44ea0d908c7bff4b0a3b503e3380df0;hp=c98a478dc9a1320804cde5020167e50506fdcb58;hb=a317762dab2b775334cc85a43b6fe2e3c2097eab;hpb=9c78e37258ab59892b8032be8ed2265d2ad2f587 diff --git a/html/do-set-active-round.pl b/html/do-set-active-round.pl index c98a478..5b0376e 100755 --- a/html/do-set-active-round.pl +++ b/html/do-set-active-round.pl @@ -4,20 +4,24 @@ use ccbs; use strict; use warnings; +ccbs::admin_only(); + my $dbh = ccbs::db_connect(); my $cgi = new CGI; my $tournament = $cgi->param('tournament'); my $round = $cgi->param('round'); my $parallel = $cgi->param('parallel'); +my $num_machines = $cgi->param('nummachines'); +my $players_per_machine = $cgi->param('playerspermachine'); $dbh->{AutoCommit} = 0; $dbh->do('DELETE FROM bigscreen.active_groups WHERE tournament=? AND round=? AND parallel=?', undef, $tournament, $round, $parallel); if ($cgi->param('show') eq 'true') { - $dbh->do('INSERT INTO bigscreen.active_groups (tournament, round, parallel, last_updated) VALUES (?,?,?,now())', - undef, $tournament, $round, $parallel); + $dbh->do('INSERT INTO bigscreen.active_groups (tournament, round, parallel, num_machines, last_updated, players_per_machine) VALUES (?,?,?,?,now(),?)', + undef, $tournament, $round, $parallel, $num_machines, $players_per_machine); } $dbh->do('NOTIFY active_groups');