Merge "Linker: Use RequestContext::getMain()->getLanguage() instead of $wgLang"
[lhc/web/wiklou.git] / includes / debug / MWDebug.php
1 <?php
2 /**
3 * Debug toolbar related code.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 */
22
23 use MediaWiki\Logger\LegacyLogger;
24
25 /**
26 * New debugger system that outputs a toolbar on page view.
27 *
28 * By default, most methods do nothing ( self::$enabled = false ). You have
29 * to explicitly call MWDebug::init() to enabled them.
30 *
31 * @since 1.19
32 */
33 class MWDebug {
34 /**
35 * Log lines
36 *
37 * @var array $log
38 */
39 protected static $log = [];
40
41 /**
42 * Debug messages from wfDebug().
43 *
44 * @var array $debug
45 */
46 protected static $debug = [];
47
48 /**
49 * SQL statements of the database queries.
50 *
51 * @var array $query
52 */
53 protected static $query = [];
54
55 /**
56 * Is the debugger enabled?
57 *
58 * @var bool $enabled
59 */
60 protected static $enabled = false;
61
62 /**
63 * Array of functions that have already been warned, formatted
64 * function-caller to prevent a buttload of warnings
65 *
66 * @var array $deprecationWarnings
67 */
68 protected static $deprecationWarnings = [];
69
70 /**
71 * Enabled the debugger and load resource module.
72 * This is called by Setup.php when $wgDebugToolbar is true.
73 *
74 * @since 1.19
75 */
76 public static function init() {
77 self::$enabled = true;
78 }
79
80 /**
81 * Disable the debugger.
82 *
83 * @since 1.28
84 */
85 public static function deinit() {
86 self::$enabled = false;
87 }
88
89 /**
90 * Add ResourceLoader modules to the OutputPage object if debugging is
91 * enabled.
92 *
93 * @since 1.19
94 * @param OutputPage $out
95 */
96 public static function addModules( OutputPage $out ) {
97 if ( self::$enabled ) {
98 $out->addModules( 'mediawiki.debug' );
99 }
100 }
101
102 /**
103 * Adds a line to the log
104 *
105 * @since 1.19
106 * @param mixed $str
107 */
108 public static function log( $str ) {
109 if ( !self::$enabled ) {
110 return;
111 }
112 if ( !is_string( $str ) ) {
113 $str = print_r( $str, true );
114 }
115 self::$log[] = [
116 'msg' => htmlspecialchars( $str ),
117 'type' => 'log',
118 'caller' => wfGetCaller(),
119 ];
120 }
121
122 /**
123 * Returns internal log array
124 * @since 1.19
125 * @return array
126 */
127 public static function getLog() {
128 return self::$log;
129 }
130
131 /**
132 * Clears internal log array and deprecation tracking
133 * @since 1.19
134 */
135 public static function clearLog() {
136 self::$log = [];
137 self::$deprecationWarnings = [];
138 }
139
140 /**
141 * Adds a warning entry to the log
142 *
143 * @since 1.19
144 * @param string $msg
145 * @param int $callerOffset
146 * @param int $level A PHP error level. See sendMessage()
147 * @param string $log 'production' will always trigger a php error, 'auto'
148 * will trigger an error if $wgDevelopmentWarnings is true, and 'debug'
149 * will only write to the debug log(s).
150 */
151 public static function warning( $msg, $callerOffset = 1, $level = E_USER_NOTICE, $log = 'auto' ) {
152 global $wgDevelopmentWarnings;
153
154 if ( $log === 'auto' && !$wgDevelopmentWarnings ) {
155 $log = 'debug';
156 }
157
158 if ( $log === 'debug' ) {
159 $level = false;
160 }
161
162 $callerDescription = self::getCallerDescription( $callerOffset );
163
164 self::sendMessage( $msg, $callerDescription, 'warning', $level );
165
166 if ( self::$enabled ) {
167 self::$log[] = [
168 'msg' => htmlspecialchars( $msg ),
169 'type' => 'warn',
170 'caller' => $callerDescription['func'],
171 ];
172 }
173 }
174
175 /**
176 * Show a warning that $function is deprecated.
177 * This will send it to the following locations:
178 * - Debug toolbar, with one item per function and caller, if $wgDebugToolbar
179 * is set to true.
180 * - PHP's error log, with level E_USER_DEPRECATED, if $wgDevelopmentWarnings
181 * is set to true.
182 * - MediaWiki's debug log, if $wgDevelopmentWarnings is set to false.
183 *
184 * @since 1.19
185 * @param string $function Function that is deprecated.
186 * @param string|bool $version Version in which the function was deprecated.
187 * @param string|bool $component Component to which the function belongs.
188 * If false, it is assumed the function is in MediaWiki core.
189 * @param int $callerOffset How far up the callstack is the original
190 * caller. 2 = function that called the function that called
191 * MWDebug::deprecated() (Added in 1.20).
192 */
193 public static function deprecated( $function, $version = false,
194 $component = false, $callerOffset = 2
195 ) {
196 $callerDescription = self::getCallerDescription( $callerOffset );
197 $callerFunc = $callerDescription['func'];
198
199 $sendToLog = true;
200
201 // Check to see if there already was a warning about this function
202 if ( isset( self::$deprecationWarnings[$function][$callerFunc] ) ) {
203 return;
204 } elseif ( isset( self::$deprecationWarnings[$function] ) ) {
205 if ( self::$enabled ) {
206 $sendToLog = false;
207 } else {
208 return;
209 }
210 }
211
212 self::$deprecationWarnings[$function][$callerFunc] = true;
213
214 if ( $version ) {
215 global $wgDeprecationReleaseLimit;
216 if ( $wgDeprecationReleaseLimit && $component === false ) {
217 # Strip -* off the end of $version so that branches can use the
218 # format #.##-branchname to avoid issues if the branch is merged into
219 # a version of MediaWiki later than what it was branched from
220 $comparableVersion = preg_replace( '/-.*$/', '', $version );
221
222 # If the comparableVersion is larger than our release limit then
223 # skip the warning message for the deprecation
224 if ( version_compare( $wgDeprecationReleaseLimit, $comparableVersion, '<' ) ) {
225 $sendToLog = false;
226 }
227 }
228
229 $component = $component === false ? 'MediaWiki' : $component;
230 $msg = "Use of $function was deprecated in $component $version.";
231 } else {
232 $msg = "Use of $function is deprecated.";
233 }
234
235 if ( $sendToLog ) {
236 global $wgDevelopmentWarnings; // we could have a more specific $wgDeprecationWarnings setting.
237 self::sendMessage(
238 $msg,
239 $callerDescription,
240 'deprecated',
241 $wgDevelopmentWarnings ? E_USER_DEPRECATED : false
242 );
243 }
244
245 if ( self::$enabled ) {
246 $logMsg = htmlspecialchars( $msg ) .
247 Html::rawElement( 'div', [ 'class' => 'mw-debug-backtrace' ],
248 Html::element( 'span', [], 'Backtrace:' ) . wfBacktrace()
249 );
250
251 self::$log[] = [
252 'msg' => $logMsg,
253 'type' => 'deprecated',
254 'caller' => $callerFunc,
255 ];
256 }
257 }
258
259 /**
260 * Get an array describing the calling function at a specified offset.
261 *
262 * @param int $callerOffset How far up the callstack is the original
263 * caller. 0 = function that called getCallerDescription()
264 * @return array Array with two keys: 'file' and 'func'
265 */
266 private static function getCallerDescription( $callerOffset ) {
267 $callers = wfDebugBacktrace();
268
269 if ( isset( $callers[$callerOffset] ) ) {
270 $callerfile = $callers[$callerOffset];
271 if ( isset( $callerfile['file'] ) && isset( $callerfile['line'] ) ) {
272 $file = $callerfile['file'] . ' at line ' . $callerfile['line'];
273 } else {
274 $file = '(internal function)';
275 }
276 } else {
277 $file = '(unknown location)';
278 }
279
280 if ( isset( $callers[$callerOffset + 1] ) ) {
281 $callerfunc = $callers[$callerOffset + 1];
282 $func = '';
283 if ( isset( $callerfunc['class'] ) ) {
284 $func .= $callerfunc['class'] . '::';
285 }
286 if ( isset( $callerfunc['function'] ) ) {
287 $func .= $callerfunc['function'];
288 }
289 } else {
290 $func = 'unknown';
291 }
292
293 return [ 'file' => $file, 'func' => $func ];
294 }
295
296 /**
297 * Send a message to the debug log and optionally also trigger a PHP
298 * error, depending on the $level argument.
299 *
300 * @param string $msg Message to send
301 * @param array $caller Caller description get from getCallerDescription()
302 * @param string $group Log group on which to send the message
303 * @param int|bool $level Error level to use; set to false to not trigger an error
304 */
305 private static function sendMessage( $msg, $caller, $group, $level ) {
306 $msg .= ' [Called from ' . $caller['func'] . ' in ' . $caller['file'] . ']';
307
308 if ( $level !== false ) {
309 trigger_error( $msg, $level );
310 }
311
312 wfDebugLog( $group, $msg, 'private' );
313 }
314
315 /**
316 * This is a method to pass messages from wfDebug to the pretty debugger.
317 * Do NOT use this method, use MWDebug::log or wfDebug()
318 *
319 * @since 1.19
320 * @param string $str
321 * @param array $context
322 */
323 public static function debugMsg( $str, $context = [] ) {
324 global $wgDebugComments, $wgShowDebug;
325
326 if ( self::$enabled || $wgDebugComments || $wgShowDebug ) {
327 if ( $context ) {
328 $prefix = '';
329 if ( isset( $context['prefix'] ) ) {
330 $prefix = $context['prefix'];
331 } elseif ( isset( $context['channel'] ) && $context['channel'] !== 'wfDebug' ) {
332 $prefix = "[{$context['channel']}] ";
333 }
334 if ( isset( $context['seconds_elapsed'] ) && isset( $context['memory_used'] ) ) {
335 $prefix .= "{$context['seconds_elapsed']} {$context['memory_used']} ";
336 }
337 $str = LegacyLogger::interpolate( $str, $context );
338 $str = $prefix . $str;
339 }
340 self::$debug[] = rtrim( UtfNormal\Validator::cleanUp( $str ) );
341 }
342 }
343
344 /**
345 * Begins profiling on a database query
346 *
347 * @since 1.19
348 * @param string $sql
349 * @param string $function
350 * @param bool $isMaster
351 * @param float $runTime Query run time
352 * @return bool True if debugger is enabled, false otherwise
353 */
354 public static function query( $sql, $function, $isMaster, $runTime ) {
355 if ( !self::$enabled ) {
356 return false;
357 }
358
359 // Replace invalid UTF-8 chars with a square UTF-8 character
360 // This prevents json_encode from erroring out due to binary SQL data
361 $sql = preg_replace(
362 '/(
363 [\xC0-\xC1] # Invalid UTF-8 Bytes
364 | [\xF5-\xFF] # Invalid UTF-8 Bytes
365 | \xE0[\x80-\x9F] # Overlong encoding of prior code point
366 | \xF0[\x80-\x8F] # Overlong encoding of prior code point
367 | [\xC2-\xDF](?![\x80-\xBF]) # Invalid UTF-8 Sequence Start
368 | [\xE0-\xEF](?![\x80-\xBF]{2}) # Invalid UTF-8 Sequence Start
369 | [\xF0-\xF4](?![\x80-\xBF]{3}) # Invalid UTF-8 Sequence Start
370 | (?<=[\x0-\x7F\xF5-\xFF])[\x80-\xBF] # Invalid UTF-8 Sequence Middle
371 | (?<![\xC2-\xDF]|[\xE0-\xEF]|[\xE0-\xEF][\x80-\xBF]|[\xF0-\xF4]
372 | [\xF0-\xF4][\x80-\xBF]|[\xF0-\xF4][\x80-\xBF]{2})[\x80-\xBF] # Overlong Sequence
373 | (?<=[\xE0-\xEF])[\x80-\xBF](?![\x80-\xBF]) # Short 3 byte sequence
374 | (?<=[\xF0-\xF4])[\x80-\xBF](?![\x80-\xBF]{2}) # Short 4 byte sequence
375 | (?<=[\xF0-\xF4][\x80-\xBF])[\x80-\xBF](?![\x80-\xBF]) # Short 4 byte sequence (2)
376 )/x',
377 '■',
378 $sql
379 );
380
381 // last check for invalid utf8
382 $sql = UtfNormal\Validator::cleanUp( $sql );
383
384 self::$query[] = [
385 'sql' => $sql,
386 'function' => $function,
387 'master' => (bool)$isMaster,
388 'time' => $runTime,
389 ];
390
391 return true;
392 }
393
394 /**
395 * Returns a list of files included, along with their size
396 *
397 * @param IContextSource $context
398 * @return array
399 */
400 protected static function getFilesIncluded( IContextSource $context ) {
401 $files = get_included_files();
402 $fileList = [];
403 foreach ( $files as $file ) {
404 $size = filesize( $file );
405 $fileList[] = [
406 'name' => $file,
407 'size' => $context->getLanguage()->formatSize( $size ),
408 ];
409 }
410
411 return $fileList;
412 }
413
414 /**
415 * Returns the HTML to add to the page for the toolbar
416 *
417 * @since 1.19
418 * @param IContextSource $context
419 * @return string
420 */
421 public static function getDebugHTML( IContextSource $context ) {
422 global $wgDebugComments;
423
424 $html = '';
425
426 if ( self::$enabled ) {
427 self::log( 'MWDebug output complete' );
428 $debugInfo = self::getDebugInfo( $context );
429
430 // Cannot use OutputPage::addJsConfigVars because those are already outputted
431 // by the time this method is called.
432 $html = ResourceLoader::makeInlineScript(
433 ResourceLoader::makeConfigSetScript( [ 'debugInfo' => $debugInfo ] ),
434 $context->getOutput()->getCSPNonce()
435 );
436 }
437
438 if ( $wgDebugComments ) {
439 $html .= "<!-- Debug output:\n" .
440 htmlspecialchars( implode( "\n", self::$debug ), ENT_NOQUOTES ) .
441 "\n\n-->";
442 }
443
444 return $html;
445 }
446
447 /**
448 * Generate debug log in HTML for displaying at the bottom of the main
449 * content area.
450 * If $wgShowDebug is false, an empty string is always returned.
451 *
452 * @since 1.20
453 * @return string HTML fragment
454 */
455 public static function getHTMLDebugLog() {
456 global $wgShowDebug;
457
458 if ( !$wgShowDebug ) {
459 return '';
460 }
461
462 $ret = "\n<hr />\n<strong>Debug data:</strong><ul id=\"mw-debug-html\">\n";
463
464 foreach ( self::$debug as $line ) {
465 $display = nl2br( htmlspecialchars( trim( $line ) ) );
466
467 $ret .= "<li><code>$display</code></li>\n";
468 }
469
470 $ret .= '</ul>' . "\n";
471
472 return $ret;
473 }
474
475 /**
476 * Append the debug info to given ApiResult
477 *
478 * @param IContextSource $context
479 * @param ApiResult $result
480 */
481 public static function appendDebugInfoToApiResult( IContextSource $context, ApiResult $result ) {
482 if ( !self::$enabled ) {
483 return;
484 }
485
486 // output errors as debug info, when display_errors is on
487 // this is necessary for all non html output of the api, because that clears all errors first
488 $obContents = ob_get_contents();
489 if ( $obContents ) {
490 $obContentArray = explode( '<br />', $obContents );
491 foreach ( $obContentArray as $obContent ) {
492 if ( trim( $obContent ) ) {
493 self::debugMsg( Sanitizer::stripAllTags( $obContent ) );
494 }
495 }
496 }
497
498 self::log( 'MWDebug output complete' );
499 $debugInfo = self::getDebugInfo( $context );
500
501 ApiResult::setIndexedTagName( $debugInfo, 'debuginfo' );
502 ApiResult::setIndexedTagName( $debugInfo['log'], 'line' );
503 ApiResult::setIndexedTagName( $debugInfo['debugLog'], 'msg' );
504 ApiResult::setIndexedTagName( $debugInfo['queries'], 'query' );
505 ApiResult::setIndexedTagName( $debugInfo['includes'], 'queries' );
506 $result->addValue( null, 'debuginfo', $debugInfo );
507 }
508
509 /**
510 * Returns the HTML to add to the page for the toolbar
511 *
512 * @param IContextSource $context
513 * @return array
514 */
515 public static function getDebugInfo( IContextSource $context ) {
516 if ( !self::$enabled ) {
517 return [];
518 }
519
520 global $wgVersion;
521 $request = $context->getRequest();
522
523 // HHVM's reported memory usage from memory_get_peak_usage()
524 // is not useful when passing false, but we continue passing
525 // false for consistency of historical data in zend.
526 // see: https://github.com/facebook/hhvm/issues/2257#issuecomment-39362246
527 $realMemoryUsage = wfIsHHVM();
528
529 $branch = GitInfo::currentBranch();
530 if ( GitInfo::isSHA1( $branch ) ) {
531 // If it's a detached HEAD, the SHA1 will already be
532 // included in the MW version, so don't show it.
533 $branch = false;
534 }
535
536 return [
537 'mwVersion' => $wgVersion,
538 'phpEngine' => wfIsHHVM() ? 'HHVM' : 'PHP',
539 'phpVersion' => wfIsHHVM() ? HHVM_VERSION : PHP_VERSION,
540 'gitRevision' => GitInfo::headSHA1(),
541 'gitBranch' => $branch,
542 'gitViewUrl' => GitInfo::headViewUrl(),
543 'time' => $request->getElapsedTime(),
544 'log' => self::$log,
545 'debugLog' => self::$debug,
546 'queries' => self::$query,
547 'request' => [
548 'method' => $request->getMethod(),
549 'url' => $request->getRequestURL(),
550 'headers' => $request->getAllHeaders(),
551 'params' => $request->getValues(),
552 ],
553 'memory' => $context->getLanguage()->formatSize( memory_get_usage( $realMemoryUsage ) ),
554 'memoryPeak' => $context->getLanguage()->formatSize( memory_get_peak_usage( $realMemoryUsage ) ),
555 'includes' => self::getFilesIncluded( $context ),
556 ];
557 }
558 }