tools/performance/layout/Header.pl

Wed, 31 Dec 2014 06:09:35 +0100

author
Michael Schloh von Bennewitz <michael@schloh.com>
date
Wed, 31 Dec 2014 06:09:35 +0100
changeset 0
6474c204b198
permissions
-rw-r--r--

Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.

michael@0 1 ##########################################################################################
michael@0 2 #
michael@0 3 # This Source Code Form is subject to the terms of the Mozilla Public
michael@0 4 # License, v. 2.0. If a copy of the MPL was not distributed with this
michael@0 5 # file, You can obtain one at http://mozilla.org/MPL/2.0/.
michael@0 6
michael@0 7 #############################################
michael@0 8 # User-defined variables
michael@0 9 #
michael@0 10 $machineStats = "WinNT 4.0 (sp5), 450 MHz, 128mg RAM";
michael@0 11 #
michael@0 12 #############################################
michael@0 13
michael@0 14 sub debug_print {
michael@0 15 foreach $str (@_){
michael@0 16 # print( $str );
michael@0 17 }
michael@0 18 }
michael@0 19
michael@0 20 @ARGV;
michael@0 21 #$buildRoot = $ARGV[0];
michael@0 22 #$buildIDFile = '< '.$buildRoot.'\bin\chrome\locales\en-US\navigator\locale\navigator.dtd';
michael@0 23 $pullDate = $ARGV[1];
michael@0 24 $useClockTime = $ARGV[2];
michael@0 25
michael@0 26 #open (XUL_FILE, $buildIDFile) or die "Unable to open BuildID file $buildIDFile (header.pl)";
michael@0 27 #$BuildNo = "";
michael@0 28 #$LineList;
michael@0 29 #while (<XUL_FILE>)
michael@0 30 #{
michael@0 31 # $ThisLine = $_;
michael@0 32 # chop ($ThisLine);
michael@0 33 # if (/Build ID/){
michael@0 34 # @LineList = split (/\"/, $ThisLine);
michael@0 35 # $BuildNo = $LineList[1];
michael@0 36 # }
michael@0 37 #}
michael@0 38 #$BuildNo =~ s/"//g;
michael@0 39 #$BuildNo =~ s/[>]//g;
michael@0 40 #close (XUL_FILE);
michael@0 41 #debug_print ($BuildNo);
michael@0 42
michael@0 43 #############################################
michael@0 44
michael@0 45 ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst)=localtime;
michael@0 46 %weekday= (
michael@0 47 "1", "$day",
michael@0 48 '2', 'Tuesday',
michael@0 49 '3', 'Wednesday',
michael@0 50 '4', 'Thursday',
michael@0 51 '5', 'Friday',
michael@0 52 '6', 'Saturday',
michael@0 53 '7', 'Sunday',
michael@0 54 );
michael@0 55 $mon += 1;
michael@0 56 $year += 1900;
michael@0 57
michael@0 58 open (TABLE_FILE, ">table.html");
michael@0 59
michael@0 60 print (TABLE_FILE "<center><b><font size=+2>Top 40 Sites - File Load Performance Metrics</font></b></center>");
michael@0 61 print (TABLE_FILE "<center><b><font size=+2>Seamonkey Win32</font></B></Center>");
michael@0 62 print (TABLE_FILE "<BR>");
michael@0 63 print (TABLE_FILE "<center><font size=+2 color=maroon>$pullDate</font></center>");
michael@0 64 print (TABLE_FILE "<BR><center><b><font size=+1>");
michael@0 65 print (TABLE_FILE "$weekday{$wday} ");
michael@0 66 print (TABLE_FILE "$mon/$mday/$year ");
michael@0 67 printf (TABLE_FILE "%02d:%02d:%02d", $hour, $min, $sec);
michael@0 68 print (TABLE_FILE "</font></b></center>");
michael@0 69 print (TABLE_FILE "<BR>");
michael@0 70 print (TABLE_FILE "<B><CENTER><font size=-1>\n");
michael@0 71 print (TABLE_FILE "$machineStats\n");
michael@0 72 print (TABLE_FILE "<BR>");
michael@0 73 if($useClockTime){
michael@0 74 print (TABLE_FILE "Time is reported in Seconds of Clock time");
michael@0 75 } else {
michael@0 76 print (TABLE_FILE "Time is reported in Seconds of CPU time");
michael@0 77 }
michael@0 78 print (TABLE_FILE "</font></CENTER></B>\n");
michael@0 79 print (TABLE_FILE "<BR>\n\n");
michael@0 80
michael@0 81 print (TABLE_FILE "<table BORDER COLS=15 WIDTH='90%' BGCOLOR='#CCFFFF'>");
michael@0 82 print (TABLE_FILE "<tr>");
michael@0 83 print (TABLE_FILE "<td WIDTH='25%'></td>");
michael@0 84 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 85 print (TABLE_FILE "<center><b>Parsing</b></center>");
michael@0 86 print (TABLE_FILE "</td>");
michael@0 87 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 88 print (TABLE_FILE "<center><b>Content Creation</b></center>");
michael@0 89 print (TABLE_FILE "</td>");
michael@0 90 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 91 print (TABLE_FILE "<center><b>Frame Creation</b></center>");
michael@0 92 print (TABLE_FILE "</td>");
michael@0 93 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 94 print (TABLE_FILE "<center><b>Style Resolution</b></center>");
michael@0 95 print (TABLE_FILE "</td>");
michael@0 96 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 97 print (TABLE_FILE "<center><b>Reflow</b></center>");
michael@0 98 print (TABLE_FILE "</td>");
michael@0 99 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 100 print (TABLE_FILE "<center><b>Total Layout Time</b></center>");
michael@0 101 print (TABLE_FILE "</td>");
michael@0 102 print (TABLE_FILE "<td COLSPAN='2' BGCOLOR='#CCFFFF'>");
michael@0 103 print (TABLE_FILE "<center><b>Total Page Load Time</b></center>");
michael@0 104 print (TABLE_FILE "</td>");
michael@0 105 print (TABLE_FILE "</tr>");
michael@0 106 print (TABLE_FILE "<tr>");
michael@0 107 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 108 print (TABLE_FILE "<center><b>Sites</b></center>");
michael@0 109 print (TABLE_FILE "</td>");
michael@0 110 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 111 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 112 print (TABLE_FILE "</td>");
michael@0 113 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 114 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 115 print (TABLE_FILE "</td>");
michael@0 116 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 117 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 118 print (TABLE_FILE "</td>");
michael@0 119 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 120 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 121 print (TABLE_FILE "</td>");
michael@0 122 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 123 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 124 print (TABLE_FILE "</td>");
michael@0 125 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 126 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 127 print (TABLE_FILE "</td>");
michael@0 128 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 129 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 130 print (TABLE_FILE "</td>");
michael@0 131 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 132 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 133 print (TABLE_FILE "</td>");
michael@0 134 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 135 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 136 print (TABLE_FILE "</td>");
michael@0 137 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 138 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 139 print (TABLE_FILE "</td>");
michael@0 140 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 141 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 142 print (TABLE_FILE "</td>");
michael@0 143 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 144 print (TABLE_FILE "<center><b>%</b></center>");
michael@0 145 print (TABLE_FILE "</td>");
michael@0 146 print (TABLE_FILE "<td COLSPAN='1' WIDTH='25%' BGCOLOR='#CCFFFF'>");
michael@0 147 print (TABLE_FILE "<center><b>Time</b></center>");
michael@0 148 print (TABLE_FILE "</td>");
michael@0 149 print (TABLE_FILE "</tr>\n\n");
michael@0 150 close (TABLE_FILE);

mercurial