Bommels05/Mozilla
Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Adding support for pageloader test.

Browse Source 
git-svn-id: svn://10.0.0.236/trunk@91554 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
mcafee%netscape.com 2001-04-06 04:02:25 +00:00
parent c7abd509d0
commit eeb9c91502
1 changed files with 30 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
mozilla/webtools/tinderbox/showbuilds.cgi
View File

@ -186,7 +186,7 @@ sub print_page_head {
print "<a NAME=\"status\"></a>$status_message<br>"; # from $::tree/status.pl
}
# Quote and Lengend
# Quote and Legend
#
if ($form{legend}) {
my ($imageurl,$imagewidth,$imageheight,$quote) = &get_image;
@ -214,16 +214,26 @@ sub print_page_head {
<td>= Download Build</td>
</tr>
<tr>
<td align=center>
<img src="$images{star}"></td><td>= Show Log comments
</td></tr><tr><td colspan=2>
<table cellspacing=1 cellpadding=1 border=1>
<tr bgcolor="$colormap{success}"><td>Successful Build, optional bloaty stats:<br>
<tt>Lk:XXX</tt> (bytes leaked)<br><tt>Bl:YYYY</tt> (bytes allocated, bloat)</td>
<tr bgcolor="$colormap{building}"><td>Build in Progress</td>
<tr bgcolor="$colormap{testfailed}"><td>Successful Build,
but Tests Failed</td>
<tr bgcolor="$colormap{busted}"><td>Build Failed</td>
<td align=center>
<img src="$images{star}"></td>
<td>= Show Log comments</td>
</tr>
<tr>
<td colspan=2>
<table cellspacing=1 cellpadding=1 border=1>
<tr bgcolor="$colormap{success}">
<td>
Successful Build, optional bloaty stats:<br>
<tt>Lk:XXX</tt> (bytes leaked)<br>
<tt>Bl:YYYY</tt> (bytes allocated, bloat)<br>
<tt>Tpl:TTTT</tt> (page-loader time, ms)<br>
</td>
<tr bgcolor="$colormap{building}">
<td>Build in progress</td>
<tr bgcolor="$colormap{testfailed}">
<td>Successful build, but tests failed</td>
<tr bgcolor="$colormap{busted}">
<td>Build failed</td>
</table>
</td></tr></table>
</td>
@ -375,10 +385,19 @@ BEGIN {
if (defined $td->{bloaty}{$logfile}) {
my ($leaks, $bloat, $leaks_cmp, $bloat_cmp)
= @{ $td->{bloaty}{$logfile} };
# ex: Lk:21KB
print "<br>Lk:", print_bloat_delta($leaks, $leaks_cmp),
"<br>Bl:", print_bloat_delta($bloat, $bloat_cmp);
}
# Pageloader data
if (defined $td->{pageloader}{$logfile}) {
my ($pageloader_time)
= @{ $td->{pageloader}{$logfile} };
# ex: Tp:8.4s
print sprintf "<br>Tp:%3.1fs", $pageloader_time/1000;
}
# Warnings
if (defined $td->{warnings}{$logfile}) {
my ($warning_count) = $td->{warnings}{$logfile};