Follow up r70940. This call should use the hook $result.
[lhc/web/wiklou.git] / profileinfo.php
1 <?php
2 /**
3 * Show profiling data.
4 *
5 * Copyright 2005 Kate Turner.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 * of this software and associated documentation files (the "Software"), to deal
9 * in the Software without restriction, including without limitation the rights
10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11 * copies of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
20 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
23 * SOFTWARE.
24 *
25 * @file
26 */
27
28 ini_set( 'zlib.output_compression', 'off' );
29
30 $wgEnableProfileInfo = $wgProfileToDatabase = false;
31
32 require_once( './includes/WebStart.php' );
33
34 ?>
35 <html>
36 <head>
37 <title>Profiling data</title>
38 <style type="text/css">
39 th {
40 text-align: left;
41 border-bottom: solid 1px black;
42 }
43
44 th, td {
45 padding-left: 0.5em;
46 padding-right: 0.5em;
47 }
48
49 td.timep, td.memoryp, td.count, td.cpr, td.tpc, td.mpc, td.tpr, td.mpr {
50 text-align: right;
51 }
52 td.timep, td.tpc, td.tpr {
53 background-color: #fffff0;
54 }
55 td.memoryp, td.mpc, td.mpr {
56 background-color: #f0f8ff;
57 }
58 td.count, td,cpr {
59 background-color: #f0fff0;
60 }
61 td.name {
62 background-color: #f9f9f9;
63 }
64 </style>
65 </head>
66 <body>
67 <?php
68
69 if ( !$wgEnableProfileInfo ) {
70 echo "<p>Disabled</p>\n";
71 echo "</body></html>";
72 exit( 1 );
73 }
74
75 $expand = array();
76 if ( isset( $_REQUEST['expand'] ) )
77 foreach( explode( ',', $_REQUEST['expand'] ) as $f )
78 $expand[$f] = true;
79
80 class profile_point {
81 var $name;
82 var $count;
83 var $time;
84 var $children;
85
86 static $totaltime, $totalmemory, $totalcount;
87
88 function __construct( $name, $count, $time, $memory ) {
89 $this->name = $name;
90 $this->count = $count;
91 $this->time = $time;
92 $this->memory = $memory;
93 $this->children = array();
94 }
95
96 function add_child( $child ) {
97 $this->children[] = $child;
98 }
99
100 function display( $expand, $indent = 0.0 ) {
101 usort( $this->children, 'compare_point' );
102
103 $extet = '';
104 if ( isset( $expand[$this->name()] ) )
105 $ex = true;
106 else $ex = false;
107 if ( !$ex ) {
108 if ( count( $this->children ) ) {
109 $url = getEscapedProfileUrl( false, false, $expand + array( $this->name() => true ) );
110 $extet = " <a href=\"$url\">[+]</a>";
111 } else $extet = '';
112 } else {
113 $e = array();
114 foreach ( $expand as $name => $ep )
115 if ( $name != $this->name() )
116 $e += array( $name => $ep );
117
118 $extet = " <a href=\"" . getEscapedProfileUrl( false, false, $e ) . "\">[–]</a>";
119 }
120 ?>
121 <tr>
122 <td class="name" style="padding-left: <?php echo $indent ?>em;">
123 <?php echo htmlspecialchars( $this->name() ) . $extet ?>
124 </td>
125 <td class="timep"><?php echo @wfPercent( $this->time() / self::$totaltime * 100 ) ?></td>
126 <td class="memoryp"><?php echo @wfPercent( $this->memory() / self::$totalmemory * 100 ) ?></td>
127 <td class="count"><?php echo $this->count() ?></td>
128 <td class="cpr"><?php echo round( sprintf( '%.2f', $this->callsPerRequest() ), 2 ) ?></td>
129 <td class="tpc"><?php echo round( sprintf( '%.2f', $this->timePerCall() ), 2 ) ?></td>
130 <td class="mpc"><?php echo round( sprintf( '%.2f' ,$this->memoryPerCall() / 1024 ), 2 ) ?></td>
131 <td class="tpr"><?php echo @round( sprintf( '%.2f', $this->time() / self::$totalcount ), 2 ) ?></td>
132 <td class="mpr"><?php echo @round( sprintf( '%.2f' ,$this->memory() / self::$totalcount / 1024 ), 2 ) ?></td>
133 </tr>
134 <?php
135 if ( $ex ) {
136 foreach ( $this->children as $child ) {
137 $child->display( $expand, $indent + 2 );
138 }
139 }
140 }
141
142 function name() {
143 return $this->name;
144 }
145
146 function count() {
147 return $this->count;
148 }
149
150 function time() {
151 return $this->time;
152 }
153
154 function memory() {
155 return $this->memory;
156 }
157
158 function timePerCall() {
159 return @( $this->time / $this->count );
160 }
161
162 function memoryPerCall() {
163 return @( $this->memory / $this->count );
164 }
165
166 function callsPerRequest() {
167 return @( $this->count / self::$totalcount );
168 }
169
170 function timePerRequest() {
171 return @( $this->time / self::$totalcount );
172 }
173
174 function memoryPerRequest() {
175 return @( $this->memory / self::$totalcount );
176 }
177
178 function fmttime() {
179 return sprintf( "%5.02f", $this->time );
180 }
181 };
182
183 function compare_point( $a, $b ) {
184 global $sort;
185 switch ( $sort ) {
186 case "name":
187 return strcmp( $a->name(), $b->name() );
188 case "time":
189 return $a->time() > $b->time() ? -1 : 1;
190 case "memory":
191 return $a->memory() > $b->memory() ? -1 : 1;
192 case "count":
193 return $a->count() > $b->count() ? -1 : 1;
194 case "time_per_call":
195 return $a->timePerCall() > $b->timePerCall() ? -1 : 1;
196 case "memory_per_call":
197 return $a->memoryPerCall() > $b->memoryPerCall() ? -1 : 1;
198 case "calls_per_req":
199 return $a->callsPerRequest() > $b->callsPerRequest() ? -1 : 1;
200 case "time_per_req":
201 return $a->timePerRequest() > $b->timePerRequest() ? -1 : 1;
202 case "memory_per_req":
203 return $a->memoryPerRequest() > $b->memoryPerRequest() ? -1 : 1;
204 }
205 }
206
207 $sorts = array( 'time', 'memory', 'count', 'calls_per_req', 'name',
208 'time_per_call', 'memory_per_call', 'time_per_req', 'memory_per_req' );
209 $sort = 'time';
210 if ( isset( $_REQUEST['sort'] ) && in_array( $_REQUEST['sort'], $sorts ) )
211 $sort = $_REQUEST['sort'];
212
213
214 $dbr = wfGetDB( DB_SLAVE );
215 $res = $dbr->select( 'profiling', '*', array(), 'profileinfo.php', array( 'ORDER BY' => 'pf_name ASC' ) );
216
217 if (isset( $_REQUEST['filter'] ) )
218 $filter = $_REQUEST['filter'];
219 else
220 $filter = '';
221
222 ?>
223 <form method="get" action="profileinfo.php">
224 <p>
225 <input type="text" name="filter" value="<?php echo htmlspecialchars($filter)?>"/>
226 <input type="hidden" name="sort" value="<?php echo htmlspecialchars($sort)?>"/>
227 <input type="hidden" name="expand" value="<?php echo htmlspecialchars(implode(",", array_keys($expand)))?>"/>
228 <input type="submit" value="Filter" />
229 </p>
230 </form>
231
232 <table cellspacing="0" border="1">
233 <tr id="top">
234 <th><a href="<?php echo getEscapedProfileUrl( false, 'name' ) ?>">Name</a></th>
235 <th><a href="<?php echo getEscapedProfileUrl( false, 'time' ) ?>">Time (%)</a></th>
236 <th><a href="<?php echo getEscapedProfileUrl( false, 'memory' ) ?>">Memory (%)</a></th>
237 <th><a href="<?php echo getEscapedProfileUrl( false, 'count' ) ?>">Count</a></th>
238 <th><a href="<?php echo getEscapedProfileUrl( false, 'calls_per_req' ) ?>">Calls/req</a></th>
239 <th><a href="<?php echo getEscapedProfileUrl( false, 'time_per_call' ) ?>">ms/call</a></th>
240 <th><a href="<?php echo getEscapedProfileUrl( false, 'memory_per_call' ) ?>">kb/call</a></th>
241 <th><a href="<?php echo getEscapedProfileUrl( false, 'time_per_req' ) ?>">ms/req</a></th>
242 <th><a href="<?php echo getEscapedProfileUrl( false, 'memory_per_req' ) ?>">kb/req</a></th>
243 </tr>
244 <?php
245 profile_point::$totaltime = 0.0;
246 profile_point::$totalcount = 0;
247 profile_point::$totalmemory = 0.0;
248
249 function getEscapedProfileUrl( $_filter = false, $_sort = false, $_expand = false ) {
250 global $filter, $sort, $expand;
251
252 if ( $_expand === false )
253 $_expand = $expand;
254
255 return htmlspecialchars(
256 '?' .
257 wfArrayToCGI( array(
258 'filter' => $_filter ? $_filter : $filter,
259 'sort' => $_sort ? $_sort : $sort,
260 'expand' => implode( ',', array_keys( $_expand ) )
261 ) )
262 );
263 }
264
265 $points = array();
266 $queries = array();
267 $sqltotal = 0.0;
268
269 $last = false;
270 foreach( $res as $o ) {
271 $next = new profile_point( $o->pf_name, $o->pf_count, $o->pf_time, $o->pf_memory );
272 if( $next->name() == '-total' ) {
273 profile_point::$totaltime = $next->time();
274 profile_point::$totalcount = $next->count();
275 profile_point::$totalmemory = $next->memory();
276 }
277 if ( $last !== false ) {
278 if ( preg_match( "/^".preg_quote( $last->name(), "/" )."/", $next->name() ) ) {
279 $last->add_child($next);
280 continue;
281 }
282 }
283 $last = $next;
284 if ( preg_match( "/^query: /", $next->name() ) || preg_match( "/^query-m: /", $next->name() ) ) {
285 $sqltotal += $next->time();
286 $queries[] = $next;
287 } else {
288 $points[] = $next;
289 }
290 }
291
292 $s = new profile_point( "SQL Queries", 0, $sqltotal, 0, 0 );
293 foreach ( $queries as $q )
294 $s->add_child($q);
295 $points[] = $s;
296
297 usort( $points, "compare_point" );
298
299 foreach ( $points as $point ) {
300 if ( strlen( $filter ) && !strstr( $point->name(), $filter ) )
301 continue;
302
303 $point->display( $expand );
304 }
305 ?>
306 </table>
307
308 <p>Total time: <tt><?php printf("%5.02f", profile_point::$totaltime) ?></tt></p>
309 <p>Total memory: <tt><?php printf("%5.02f", profile_point::$totalmemory / 1024 ) ?></tt></p>
310 </body>
311 </html>