X-Git-Url: https://git.exim.org/buildfarm-server.git/blobdiff_plain/e44fe8aa50d2a7fd82cc923d11b7a57684d96d1b..4bd92ca9427fbd4677e0adad3ad3a14dc1df6017:/cgi-bin/eximstatus.pl?ds=sidebyside diff --git a/cgi-bin/eximstatus.pl b/cgi-bin/eximstatus.pl index df25467..38a7d96 100755 --- a/cgi-bin/eximstatus.pl +++ b/cgi-bin/eximstatus.pl @@ -9,6 +9,7 @@ See accompanying License file for license details =cut use strict; +use URI::Escape; use vars qw($dbhost $dbname $dbuser $dbpass $dbport $all_stat $fail_stat $change_stat $green_stat @@ -76,7 +77,7 @@ if (open($brhandle,"../htdocs/branches_of_interest.txt")) my $content = - "branch=$branch&res=$res&stage=$stage&animal=$animal&". + 'branch=' . uri_escape($branch) . "&res=$res&stage=$stage&animal=$animal&". "ts=$ts&log=$log&conf=$conf"; my $extra_content = @@ -311,10 +312,10 @@ my $scmurl = $client_conf->{scm_url}; my $logst = <do("delete from dashboard_mat"); $db->do("insert into dashboard_mat select * from dashboard_mat_data"); $db->commit; -if ($stage ne 'OK') -{ - $db->begin_work; - # prevent occasional duplication by forcing serialization of this operation - $db->do("lock table nrecent_failures in share row exclusive mode"); - $db->do("delete from nrecent_failures"); - $db->do("insert into nrecent_failures select bs.sysname, bs.snapshot, bs.branch from build_status bs where bs.stage <> 'OK' and bs.snapshot > now() - interval '90 days'"); - $db->commit; -} + +#if ($stage ne 'OK') # On Exim build farm nrecent_failures is a view, not table... comment out +#{ +# $db->begin_work; +# # prevent occasional duplication by forcing serialization of this operation +# $db->do("lock table nrecent_failures in share row exclusive mode"); +# $db->do("delete from nrecent_failures"); +# $db->do("insert into nrecent_failures select bs.sysname, bs.snapshot, bs.branch from build_status bs where bs.stage <> 'OK' and bs.snapshot > now() - interval '90 days'"); +# $db->commit; +#} $db->disconnect;