322 lines
10 KiB
PHP
322 lines
10 KiB
PHP
<?php
|
|
//
|
|
// +------------------------------------------------------------------------+
|
|
// | PEAR :: Benchmark |
|
|
// +------------------------------------------------------------------------+
|
|
// | Copyright (c) 2001-2006 Sebastian Bergmann <sb@sebastian-bergmann.de>. |
|
|
// +------------------------------------------------------------------------+
|
|
// | This source file is subject to the New BSD license, That is bundled |
|
|
// | with this package in the file LICENSE, and is available through |
|
|
// | the world-wide-web at |
|
|
// | http://www.opensource.org/licenses/bsd-license.php |
|
|
// | If you did not receive a copy of the new BSDlicense and are unable |
|
|
// | to obtain it through the world-wide-web, please send a note to |
|
|
// | license@php.net so we can mail you a copy immediately. |
|
|
// +------------------------------------------------------------------------+
|
|
//
|
|
// $Id: Timer.php,v 1.2 2007/05/24 05:23:20 anant Exp $
|
|
//
|
|
|
|
require_once 'PEAR.php';
|
|
|
|
/**
|
|
* Provides timing and profiling information.
|
|
*
|
|
* Example 1: Automatic profiling start, stop, and output.
|
|
*
|
|
* <code>
|
|
* <?php
|
|
* require_once 'Benchmark/Timer.php';
|
|
*
|
|
* $timer = new Benchmark_Timer(TRUE);
|
|
* $timer->setMarker('Marker 1');
|
|
* ?>
|
|
* </code>
|
|
*
|
|
* Example 2: Manual profiling start, stop, and output.
|
|
*
|
|
* <code>
|
|
* <?php
|
|
* require_once 'Benchmark/Timer.php';
|
|
*
|
|
* $timer = new Benchmark_Timer();
|
|
* $timer->start();
|
|
* $timer->setMarker('Marker 1');
|
|
* $timer->stop();
|
|
*
|
|
* $timer->display(); // to output html formated
|
|
* // AND/OR :
|
|
* $profiling = $timer->getProfiling(); // get the profiler info as an associative array
|
|
* ?>
|
|
* </code>
|
|
*
|
|
* @author Sebastian Bergmann <sb@sebastian-bergmann.de>
|
|
* @author Ludovico Magnocavallo <ludo@sumatrasolutions.com>
|
|
* @copyright Copyright © 2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
|
|
* @license http://www.php.net/license/3_0.txt The PHP License, Version 3.0
|
|
* @category Benchmarking
|
|
* @package Benchmark
|
|
*/
|
|
class Benchmark_Timer extends PEAR {
|
|
/**
|
|
* Contains the markers.
|
|
*
|
|
* @var array
|
|
* @access private
|
|
*/
|
|
var $markers = array();
|
|
|
|
/**
|
|
* Auto-start and stop timer.
|
|
*
|
|
* @var boolean
|
|
* @access private
|
|
*/
|
|
var $auto = FALSE;
|
|
|
|
/**
|
|
* Max marker name length for non-html output.
|
|
*
|
|
* @var integer
|
|
* @access private
|
|
*/
|
|
var $maxStringLength = 0;
|
|
|
|
/**
|
|
* Constructor.
|
|
*
|
|
* @param boolean $auto
|
|
* @access public
|
|
*/
|
|
function Benchmark_Timer($auto = FALSE) {
|
|
$this->auto = $auto;
|
|
|
|
if ($this->auto) {
|
|
$this->start();
|
|
}
|
|
|
|
$this->PEAR();
|
|
}
|
|
|
|
/**
|
|
* Close method. Stop timer and display output.
|
|
*
|
|
* @access public
|
|
*/
|
|
function close() {
|
|
if ($this->auto) {
|
|
$this->stop();
|
|
$this->display();
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Set "Start" marker.
|
|
*
|
|
* @see setMarker(), stop()
|
|
* @access public
|
|
*/
|
|
function start() {
|
|
$this->setMarker('Start');
|
|
}
|
|
|
|
/**
|
|
* Set "Stop" marker.
|
|
*
|
|
* @see setMarker(), start()
|
|
* @access public
|
|
*/
|
|
function stop() {
|
|
$this->setMarker('Stop');
|
|
}
|
|
|
|
/**
|
|
* Set marker.
|
|
*
|
|
* @param string $name Name of the marker to be set.
|
|
* @see start(), stop()
|
|
* @access public
|
|
*/
|
|
function setMarker($name) {
|
|
$this->markers[$name] = $this->_getMicrotime();
|
|
}
|
|
|
|
/**
|
|
* Returns the time elapsed betweens two markers.
|
|
*
|
|
* @param string $start start marker, defaults to "Start"
|
|
* @param string $end end marker, defaults to "Stop"
|
|
* @return double $time_elapsed time elapsed between $start and $end
|
|
* @access public
|
|
*/
|
|
function timeElapsed($start = 'Start', $end = 'Stop') {
|
|
if ($end == 'Stop' && !isset($this->markers['Stop'])) {
|
|
$this->markers['Stop'] = $this->_getMicrotime();
|
|
}
|
|
$end = isset($this->markers[$end]) ? $this->markers[$end] : 0;
|
|
$start = isset($this->markers[$start]) ? $this->markers[$start] : 0;
|
|
|
|
if (extension_loaded('bcmath')) {
|
|
return bcsub($end, $start, 6);
|
|
} else {
|
|
return $end - $start;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Returns profiling information.
|
|
*
|
|
* $profiling[x]['name'] = name of marker x
|
|
* $profiling[x]['time'] = time index of marker x
|
|
* $profiling[x]['diff'] = execution time from marker x-1 to this marker x
|
|
* $profiling[x]['total'] = total execution time up to marker x
|
|
*
|
|
* @return array
|
|
* @access public
|
|
*/
|
|
function getProfiling() {
|
|
$i = $total = 0;
|
|
$result = array();
|
|
$temp = reset($this->markers);
|
|
$this->maxStringLength = 0;
|
|
|
|
foreach ($this->markers as $marker => $time) {
|
|
if (extension_loaded('bcmath')) {
|
|
$diff = bcsub($time, $temp, 6);
|
|
$total = bcadd($total, $diff, 6);
|
|
} else {
|
|
$diff = $time - $temp;
|
|
$total = $total + $diff;
|
|
}
|
|
|
|
$result[$i]['name'] = $marker;
|
|
$result[$i]['time'] = $time;
|
|
$result[$i]['diff'] = $diff;
|
|
$result[$i]['total'] = $total;
|
|
|
|
$this->maxStringLength = (strlen($marker) > $this->maxStringLength ? strlen($marker) + 1 : $this->maxStringLength);
|
|
|
|
$temp = $time;
|
|
$i++;
|
|
}
|
|
|
|
$result[0]['diff'] = '-';
|
|
$result[0]['total'] = '-';
|
|
$this->maxStringLength = (strlen('total') > $this->maxStringLength ? strlen('total') : $this->maxStringLength);
|
|
$this->maxStringLength += 2;
|
|
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Return formatted profiling information.
|
|
*
|
|
* @param boolean $showTotal Optionnaly includes total in output, default no
|
|
* @param string $format output format (auto, plain or html), default auto
|
|
* @return string
|
|
* @see getProfiling()
|
|
* @access public
|
|
*/
|
|
function getOutput($showTotal = FALSE, $format = 'auto') {
|
|
if ($format == 'auto') {
|
|
if (function_exists('version_compare') &&
|
|
version_compare(phpversion(), '4.1', 'ge'))
|
|
{
|
|
$format = isset($_SERVER['SERVER_PROTOCOL']) ? 'html' : 'plain';
|
|
} else {
|
|
global $HTTP_SERVER_VARS;
|
|
$format = isset($HTTP_SERVER_VARS['SERVER_PROTOCOL']) ? 'html' : 'plain';
|
|
}
|
|
}
|
|
|
|
$total = $this->TimeElapsed();
|
|
$result = $this->getProfiling();
|
|
$dashes = '';
|
|
|
|
if ($format == 'html') {
|
|
$out = '<table border="1">'."\n";
|
|
$out .= '<tr><td> </td><td align="center"><b>time index</b></td><td align="center"><b>ex time</b></td><td align="center"><b>%</b></td>'.
|
|
($showTotal ?
|
|
'<td align="center"><b>elapsed</b></td><td align="center"><b>%</b></td>'
|
|
: '')."</tr>\n";
|
|
} else {
|
|
$dashes = $out = str_pad("\n",
|
|
$this->maxStringLength + ($showTotal ? 70 : 45), '-', STR_PAD_LEFT);
|
|
$out .= str_pad('marker', $this->maxStringLength) .
|
|
str_pad("time index", 22) .
|
|
str_pad("ex time", 16) .
|
|
str_pad("perct ", 8) .
|
|
($showTotal ? ' '.str_pad("elapsed", 16)."perct" : '')."\n" .
|
|
$dashes;
|
|
}
|
|
|
|
foreach ($result as $k => $v) {
|
|
$perc = (($v['diff'] * 100) / $total);
|
|
$tperc = (($v['total'] * 100) / $total);
|
|
|
|
if ($format == 'html') {
|
|
$out .= "<tr><td><b>" . $v['name'] .
|
|
"</b></td><td>" . $v['time'] .
|
|
"</td><td>" . $v['diff'] .
|
|
"</td><td align=\"right\">" . number_format($perc, 2, '.', '') .
|
|
"%</td>".
|
|
($showTotal ?
|
|
"<td>" . $v['total'] .
|
|
"</td><td align=\"right\">" .
|
|
number_format($tperc, 2, '.', '') .
|
|
"%</td>" : '').
|
|
"</tr>\n";
|
|
} else {
|
|
$out .= str_pad($v['name'], $this->maxStringLength, ' ') .
|
|
str_pad($v['time'], 22) .
|
|
str_pad($v['diff'], 14) .
|
|
str_pad(number_format($perc, 2, '.', '')."%",8, ' ', STR_PAD_LEFT) .
|
|
($showTotal ? ' '.
|
|
str_pad($v['total'], 14) .
|
|
str_pad(number_format($tperc, 2, '.', '')."%",
|
|
8, ' ', STR_PAD_LEFT) : '').
|
|
"\n";
|
|
}
|
|
|
|
$out .= $dashes;
|
|
}
|
|
|
|
if ($format == 'html') {
|
|
$out .= "<tr style='background: silver;'><td><b>total</b></td><td>-</td><td>${total}</td><td>100.00%</td>".($showTotal ? "<td>-</td><td>-</td>" : "")."</tr>\n";
|
|
$out .= "</table>\n";
|
|
} else {
|
|
$out .= str_pad('total', $this->maxStringLength);
|
|
$out .= str_pad('-', 22);
|
|
$out .= str_pad($total, 15);
|
|
$out .= "100.00%\n";
|
|
$out .= $dashes;
|
|
}
|
|
|
|
return $out;
|
|
}
|
|
|
|
/**
|
|
* Prints the information returned by getOutput().
|
|
*
|
|
* @param boolean $showTotal Optionnaly includes total in output, default no
|
|
* @param string $format output format (auto, plain or html), default auto
|
|
* @see getOutput()
|
|
* @access public
|
|
*/
|
|
function display($showTotal = FALSE, $format = 'auto') {
|
|
print $this->getOutput($showTotal, $format);
|
|
}
|
|
|
|
/**
|
|
* Wrapper for microtime().
|
|
*
|
|
* @return float
|
|
* @access private
|
|
* @since 1.3.0
|
|
*/
|
|
function _getMicrotime() {
|
|
$microtime = explode(' ', microtime());
|
|
return $microtime[1] . substr($microtime[0], 1);
|
|
}
|
|
}
|