67 lines
1.9 KiB
PHP
Executable file
67 lines
1.9 KiB
PHP
Executable file
<?php
|
|
|
|
|
|
/**
|
|
* Name: rendertime
|
|
* Description: Shows the time that was needed to render the current page
|
|
* Version: 0.1
|
|
* Author: Michael Vvogel <http://pirati.ca/profile/heluecht>
|
|
*
|
|
*/
|
|
|
|
function rendertime_install() {
|
|
register_hook('page_end', 'addon/rendertime/rendertime.php', 'rendertime_page_end');
|
|
}
|
|
|
|
|
|
function rendertime_uninstall() {
|
|
unregister_hook('init_1', 'addon/rendertime/rendertime.php', 'rendertime_init_1');
|
|
unregister_hook('page_end', 'addon/rendertime/rendertime.php', 'rendertime_page_end');
|
|
}
|
|
|
|
function rendertime_init_1(&$a) {
|
|
}
|
|
|
|
function rendertime_page_end(&$a, &$o) {
|
|
|
|
$duration = microtime(true)-$a->performance["start"];
|
|
|
|
$ignored_modules = array("fbrowser");
|
|
$ignored = in_array($a->module, $ignored_modules);
|
|
|
|
if (is_site_admin() AND ($_GET["mode"] != "minimal") AND !$a->is_mobile AND !$a->is_tablet AND !$ignored) {
|
|
$o = $o.'<div class="renderinfo">'.sprintf(t("Database: %s, Network: %s, Rendering: %s, Session: %s, I/O: %s, Other: %s, Total: %s"),
|
|
round($a->performance["database"], 3),
|
|
round($a->performance["network"], 3),
|
|
round($a->performance["rendering"], 3),
|
|
round($a->performance["parser"], 3),
|
|
round($a->performance["file"], 3),
|
|
round($duration - $a->performance["database"] - $a->performance["network"]
|
|
- $a->performance["rendering"] - $a->performance["parser"]
|
|
- $a->performance["file"], 3),
|
|
round($duration, 3)
|
|
//round($a->performance["markstart"], 3)
|
|
//round($a->performance["plugin"], 3)
|
|
)."</div>";
|
|
|
|
if (get_config("rendertime", "callstack")) {
|
|
$o .= "<pre>";
|
|
$o .= "\nDatabase:\n";
|
|
foreach ($a->callstack["database"] AS $func => $time) {
|
|
$time = round($time, 3);
|
|
if ($time > 0)
|
|
$o .= $func.": ".$time."\n";
|
|
}
|
|
|
|
$o .= "\nNetwork:\n";
|
|
foreach ($a->callstack["network"] AS $func => $time) {
|
|
$time = round($time, 3);
|
|
if ($time > 0)
|
|
$o .= $func.": ".$time."\n";
|
|
}
|
|
|
|
$o .= "</pre>";
|
|
}
|
|
}
|
|
}
|