X-Git-Url: https://git.exim.org/buildfarm-server.git/blobdiff_plain/a5b7e0d7a2c566eba768c6b6c7d3f699639d0997..56170e9cf92ff0a11194ac893b0ad48d933ea474:/cgi-bin/show_status.pl diff --git a/cgi-bin/show_status.pl b/cgi-bin/show_status.pl old mode 100644 new mode 100755 index 3816185..f0b6f17 --- a/cgi-bin/show_status.pl +++ b/cgi-bin/show_status.pl @@ -23,56 +23,28 @@ my $sort_clause = ""; my $sortby = $query->param('sortby') || 'nosort'; if ($sortby eq 'name') { - $sort_clause = 'sysname,'; + $sort_clause = 'lower(sysname),'; } elsif ($sortby eq 'os') { - $sort_clause = 'operating_system, os_version desc,'; + $sort_clause = 'lower(operating_system), os_version desc,'; } elsif ($sortby eq 'compiler') { - $sort_clause = "compiler, compiler_version,"; + $sort_clause = "lower(compiler), compiler_version,"; } my $db = DBI->connect($dsn,$dbuser,$dbpass) or die("$dsn,$dbuser,$dbpass,$!"); -# there is possibly some redundancy in this query, but it makes -# a lot of the processing simpler. - my $statement =< now() - '30 days'::interval - ) m - where name = sysname - and s.status = 'approved' + select timezone('GMT'::text, now())::timestamp(0) without time zone - b.snapshot AS when_ago, b.* + from dashboard_mat b order by branch = 'HEAD' desc, branch desc, $sort_clause snapshot desc - - EOS ; @@ -84,6 +56,18 @@ while (my $row = $sth->fetchrow_hashref) next if (@members && ! grep {$_ eq $row->{sysname} } @members); $row->{build_flags} =~ s/^\{(.*)\}$/$1/; $row->{build_flags} =~ s/,/ /g; + # enable-integer-datetimes is now the default + if ($row->{branch} eq 'HEAD' || $row->{branch} gt 'REL8_3_STABLE') + { + $row->{build_flags} .= " --enable-integer-datetimes " + unless ($row->{build_flags} =~ /--(en|dis)able-integer-datetimes/); + } + # enable-thread-safety is now the default + if ($row->{branch} eq 'HEAD' || $row->{branch} gt 'REL8_5_STABLE') + { + $row->{build_flags} .= " --enable-thread-safety " + unless ($row->{build_flags} =~ /--(en|dis)able-thread-safety/); + } $row->{build_flags} =~ s/--((enable|with)-)?//g; $row->{build_flags} =~ s/libxml/xml/; $row->{build_flags} =~ s/\S+=\S+//g; @@ -130,7 +114,7 @@ __DATA__ [%- BLOCK img ; IF flag == 'depend' or flag == 'gnu-ld' ; ; ELSIF flag_imgs.$flag %][% flag %] [% ELSE %][%# flag ; ' ' %][% END ; END -%] -[%- BLOCK cl %] class=" [% SWITCH bgfor -%] +[%- BLOCK cl %] class="[% SWITCH bgfor.replace('-.*','') -%] [%- CASE 'OK' %]pass[% CASE 'ContribCheck' %]warn[% CASE [ 'Check' 'InstallCheck' ] %]warnx[% CASE %]fail[% END %]" [%- END -%]