diff options
author | Luke Shumaker <lukeshu@sbcglobal.net> | 2016-05-01 15:30:02 -0400 |
---|---|---|
committer | Luke Shumaker <lukeshu@sbcglobal.net> | 2016-05-01 15:30:02 -0400 |
commit | 1de335ad3f395ca6861085393ba366a9e3fb4a0d (patch) | |
tree | f1fdd326034e05177596851be6a7127615d81498 /includes/profiler/ProfilerStandard.php | |
parent | 9c75fa8ff6d4d38ef552c00fef5969fb154765e8 (diff) | |
parent | f6d65e533c62f6deb21342d4901ece24497b433e (diff) |
Merge commit 'f6d65'
# Conflicts:
# skins/ArchLinux/ArchLinux.php
Diffstat (limited to 'includes/profiler/ProfilerStandard.php')
-rw-r--r-- | includes/profiler/ProfilerStandard.php | 559 |
1 files changed, 0 insertions, 559 deletions
diff --git a/includes/profiler/ProfilerStandard.php b/includes/profiler/ProfilerStandard.php deleted file mode 100644 index cc134165..00000000 --- a/includes/profiler/ProfilerStandard.php +++ /dev/null @@ -1,559 +0,0 @@ -<?php -/** - * Common implementation class for profiling. - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License along - * with this program; if not, write to the Free Software Foundation, Inc., - * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. - * http://www.gnu.org/copyleft/gpl.html - * - * @file - * @ingroup Profiler - */ - -/** - * Standard profiler that tracks real time, cpu time, and memory deltas - * - * This supports profile reports, the debug toolbar, and high-contention - * DB query warnings. This does not persist the profiling data though. - * - * @ingroup Profiler - * @since 1.24 - */ -class ProfilerStandard extends Profiler { - /** @var array List of resolved profile calls with start/end data */ - protected $mStack = array(); - /** @var array Queue of open profile calls with start data */ - protected $mWorkStack = array(); - - /** @var array Map of (function name => aggregate data array) */ - protected $mCollated = array(); - /** @var bool */ - protected $mCollateDone = false; - /** @var bool */ - protected $mCollateOnly = false; - /** @var array Cache of a standard broken collation entry */ - protected $mErrorEntry; - - /** - * @param array $params - */ - public function __construct( array $params ) { - parent::__construct( $params ); - - $this->mCollateOnly = $this->collateOnly(); - - $this->addInitialStack(); - } - - /** - * Return whether this a stub profiler - * - * @return bool - */ - public function isStub() { - return false; - } - - /** - * Return whether this profiler stores data - * - * @see Profiler::logData() - * @return bool - */ - public function isPersistent() { - return false; - } - - /** - * Whether to internally just track aggregates and ignore the full stack trace - * - * Only doing collation saves memory overhead but limits the use of certain - * features like that of graph generation for the debug toolbar. - * - * @return bool - */ - protected function collateOnly() { - return false; - } - - /** - * Add the inital item in the stack. - */ - protected function addInitialStack() { - $this->mErrorEntry = $this->getErrorEntry(); - - $initialTime = $this->getInitialTime( 'wall' ); - $initialCpu = $this->getInitialTime( 'cpu' ); - if ( $initialTime !== null && $initialCpu !== null ) { - $this->mWorkStack[] = array( '-total', 0, $initialTime, $initialCpu, 0 ); - if ( $this->mCollateOnly ) { - $this->mWorkStack[] = array( '-setup', 1, $initialTime, $initialCpu, 0 ); - $this->profileOut( '-setup' ); - } else { - $this->mStack[] = array( '-setup', 1, $initialTime, $initialCpu, 0, - $this->getTime( 'wall' ), $this->getTime( 'cpu' ), 0 ); - } - } else { - $this->profileIn( '-total' ); - } - } - - /** - * @return array Initial collation entry - */ - protected function getZeroEntry() { - return array( - 'cpu' => 0.0, - 'cpu_sq' => 0.0, - 'real' => 0.0, - 'real_sq' => 0.0, - 'memory' => 0, - 'count' => 0, - 'min_cpu' => 0.0, - 'max_cpu' => 0.0, - 'min_real' => 0.0, - 'max_real' => 0.0, - 'periods' => array(), // not filled if mCollateOnly - 'overhead' => 0 // not filled if mCollateOnly - ); - } - - /** - * @return array Initial collation entry for errors - */ - protected function getErrorEntry() { - $entry = $this->getZeroEntry(); - $entry['count'] = 1; - return $entry; - } - - /** - * Update the collation entry for a given method name - * - * @param string $name - * @param float $elapsedCpu - * @param float $elapsedReal - * @param int $memChange - * @param int $subcalls - * @param array|null $period Map of ('start','end','memory','subcalls') - */ - protected function updateEntry( - $name, $elapsedCpu, $elapsedReal, $memChange, $subcalls = 0, $period = null - ) { - $entry =& $this->mCollated[$name]; - if ( !is_array( $entry ) ) { - $entry = $this->getZeroEntry(); - $this->mCollated[$name] =& $entry; - } - $entry['cpu'] += $elapsedCpu; - $entry['cpu_sq'] += $elapsedCpu * $elapsedCpu; - $entry['real'] += $elapsedReal; - $entry['real_sq'] += $elapsedReal * $elapsedReal; - $entry['memory'] += $memChange > 0 ? $memChange : 0; - $entry['count']++; - $entry['min_cpu'] = $elapsedCpu < $entry['min_cpu'] ? $elapsedCpu : $entry['min_cpu']; - $entry['max_cpu'] = $elapsedCpu > $entry['max_cpu'] ? $elapsedCpu : $entry['max_cpu']; - $entry['min_real'] = $elapsedReal < $entry['min_real'] ? $elapsedReal : $entry['min_real']; - $entry['max_real'] = $elapsedReal > $entry['max_real'] ? $elapsedReal : $entry['max_real']; - // Apply optional fields - $entry['overhead'] += $subcalls; - if ( $period ) { - $entry['periods'][] = $period; - } - } - - /** - * Called by wfProfieIn() - * - * @param string $functionname - */ - public function profileIn( $functionname ) { - global $wgDebugFunctionEntry; - - if ( $wgDebugFunctionEntry ) { - $this->debug( str_repeat( ' ', count( $this->mWorkStack ) ) . - 'Entering ' . $functionname . "\n" ); - } - - $this->mWorkStack[] = array( - $functionname, - count( $this->mWorkStack ), - $this->getTime( 'time' ), - $this->getTime( 'cpu' ), - memory_get_usage() - ); - } - - /** - * Called by wfProfieOut() - * - * @param string $functionname - */ - public function profileOut( $functionname ) { - global $wgDebugFunctionEntry; - - if ( $wgDebugFunctionEntry ) { - $this->debug( str_repeat( ' ', count( $this->mWorkStack ) - 1 ) . - 'Exiting ' . $functionname . "\n" ); - } - - $item = array_pop( $this->mWorkStack ); - list( $ofname, /* $ocount */, $ortime, $octime, $omem ) = $item; - - if ( $item === null ) { - $this->debugGroup( 'profileerror', "Profiling error: $functionname" ); - } else { - if ( $functionname === 'close' ) { - if ( $ofname !== '-total' ) { - $message = "Profile section ended by close(): {$ofname}"; - $this->debugGroup( 'profileerror', $message ); - if ( $this->mCollateOnly ) { - $this->mCollated[$message] = $this->mErrorEntry; - } else { - $this->mStack[] = array( $message, 0, 0.0, 0.0, 0, 0.0, 0.0, 0 ); - } - } - $functionname = $ofname; - } elseif ( $ofname !== $functionname ) { - $message = "Profiling error: in({$ofname}), out($functionname)"; - $this->debugGroup( 'profileerror', $message ); - if ( $this->mCollateOnly ) { - $this->mCollated[$message] = $this->mErrorEntry; - } else { - $this->mStack[] = array( $message, 0, 0.0, 0.0, 0, 0.0, 0.0, 0 ); - } - } - $realTime = $this->getTime( 'wall' ); - $cpuTime = $this->getTime( 'cpu' ); - if ( $this->mCollateOnly ) { - $elapsedcpu = $cpuTime - $octime; - $elapsedreal = $realTime - $ortime; - $memchange = memory_get_usage() - $omem; - $this->updateEntry( $functionname, $elapsedcpu, $elapsedreal, $memchange ); - } else { - $this->mStack[] = array_merge( $item, - array( $realTime, $cpuTime, memory_get_usage() ) ); - } - $this->trxProfiler->recordFunctionCompletion( $functionname, $realTime - $ortime ); - } - } - - /** - * Close opened profiling sections - */ - public function close() { - while ( count( $this->mWorkStack ) ) { - $this->profileOut( 'close' ); - } - } - - /** - * Log the data to some store or even the page output - */ - public function logData() { - /* Implement in subclasses */ - } - - /** - * Returns a profiling output to be stored in debug file - * - * @return string - */ - public function getOutput() { - global $wgDebugFunctionEntry, $wgProfileCallTree; - - $wgDebugFunctionEntry = false; // hack - - if ( !count( $this->mStack ) && !count( $this->mCollated ) ) { - return "No profiling output\n"; - } - - if ( $wgProfileCallTree ) { - return $this->getCallTree(); - } else { - return $this->getFunctionReport(); - } - } - - /** - * Returns a tree of function call instead of a list of functions - * @return string - */ - protected function getCallTree() { - return implode( '', array_map( - array( &$this, 'getCallTreeLine' ), $this->remapCallTree( $this->mStack ) - ) ); - } - - /** - * Recursive function the format the current profiling array into a tree - * - * @param array $stack Profiling array - * @return array - */ - protected function remapCallTree( array $stack ) { - if ( count( $stack ) < 2 ) { - return $stack; - } - $outputs = array(); - for ( $max = count( $stack ) - 1; $max > 0; ) { - /* Find all items under this entry */ - $level = $stack[$max][1]; - $working = array(); - for ( $i = $max -1; $i >= 0; $i-- ) { - if ( $stack[$i][1] > $level ) { - $working[] = $stack[$i]; - } else { - break; - } - } - $working = $this->remapCallTree( array_reverse( $working ) ); - $output = array(); - foreach ( $working as $item ) { - array_push( $output, $item ); - } - array_unshift( $output, $stack[$max] ); - $max = $i; - - array_unshift( $outputs, $output ); - } - $final = array(); - foreach ( $outputs as $output ) { - foreach ( $output as $item ) { - $final[] = $item; - } - } - return $final; - } - - /** - * Callback to get a formatted line for the call tree - * @param array $entry - * @return string - */ - protected function getCallTreeLine( $entry ) { - list( $fname, $level, $startreal, , , $endreal ) = $entry; - $delta = $endreal - $startreal; - $space = str_repeat( ' ', $level ); - # The ugly double sprintf is to work around a PHP bug, - # which has been fixed in recent releases. - return sprintf( "%10s %s %s\n", - trim( sprintf( "%7.3f", $delta * 1000.0 ) ), $space, $fname ); - } - - /** - * Populate mCollated - */ - protected function collateData() { - if ( $this->mCollateDone ) { - return; - } - $this->mCollateDone = true; - $this->close(); // set "-total" entry - - if ( $this->mCollateOnly ) { - return; // already collated as methods exited - } - - $this->mCollated = array(); - - # Estimate profiling overhead - $profileCount = count( $this->mStack ); - self::calculateOverhead( $profileCount ); - - # First, subtract the overhead! - $overheadTotal = $overheadMemory = $overheadInternal = array(); - foreach ( $this->mStack as $entry ) { - // $entry is (name,pos,rtime0,cputime0,mem0,rtime1,cputime1,mem1) - $fname = $entry[0]; - $elapsed = $entry[5] - $entry[2]; - $memchange = $entry[7] - $entry[4]; - - if ( $fname === '-overhead-total' ) { - $overheadTotal[] = $elapsed; - $overheadMemory[] = max( 0, $memchange ); - } elseif ( $fname === '-overhead-internal' ) { - $overheadInternal[] = $elapsed; - } - } - $overheadTotal = $overheadTotal ? - array_sum( $overheadTotal ) / count( $overheadInternal ) : 0; - $overheadMemory = $overheadMemory ? - array_sum( $overheadMemory ) / count( $overheadInternal ) : 0; - $overheadInternal = $overheadInternal ? - array_sum( $overheadInternal ) / count( $overheadInternal ) : 0; - - # Collate - foreach ( $this->mStack as $index => $entry ) { - // $entry is (name,pos,rtime0,cputime0,mem0,rtime1,cputime1,mem1) - $fname = $entry[0]; - $elapsedCpu = $entry[6] - $entry[3]; - $elapsedReal = $entry[5] - $entry[2]; - $memchange = $entry[7] - $entry[4]; - $subcalls = $this->calltreeCount( $this->mStack, $index ); - - if ( substr( $fname, 0, 9 ) !== '-overhead' ) { - # Adjust for profiling overhead (except special values with elapsed=0 - if ( $elapsed ) { - $elapsed -= $overheadInternal; - $elapsed -= ( $subcalls * $overheadTotal ); - $memchange -= ( $subcalls * $overheadMemory ); - } - } - - $period = array( 'start' => $entry[2], 'end' => $entry[5], - 'memory' => $memchange, 'subcalls' => $subcalls ); - $this->updateEntry( $fname, $elapsedCpu, $elapsedReal, $memchange, $subcalls, $period ); - } - - $this->mCollated['-overhead-total']['count'] = $profileCount; - arsort( $this->mCollated, SORT_NUMERIC ); - } - - /** - * Returns a list of profiled functions. - * - * @return string - */ - protected function getFunctionReport() { - $this->collateData(); - - $width = 140; - $nameWidth = $width - 65; - $format = "%-{$nameWidth}s %6d %13.3f %13.3f %13.3f%% %9d (%13.3f -%13.3f) [%d]\n"; - $titleFormat = "%-{$nameWidth}s %6s %13s %13s %13s %9s\n"; - $prof = "\nProfiling data\n"; - $prof .= sprintf( $titleFormat, 'Name', 'Calls', 'Total', 'Each', '%', 'Mem' ); - - $total = isset( $this->mCollated['-total'] ) - ? $this->mCollated['-total']['real'] - : 0; - - foreach ( $this->mCollated as $fname => $data ) { - $calls = $data['count']; - $percent = $total ? 100 * $data['real'] / $total : 0; - $memory = $data['memory']; - $prof .= sprintf( $format, - substr( $fname, 0, $nameWidth ), - $calls, - (float)( $data['real'] * 1000 ), - (float)( $data['real'] * 1000 ) / $calls, - $percent, - $memory, - ( $data['min_real'] * 1000.0 ), - ( $data['max_real'] * 1000.0 ), - $data['overhead'] - ); - } - $prof .= "\nTotal: $total\n\n"; - - return $prof; - } - - /** - * @return array - */ - public function getRawData() { - // This method is called before shutdown in the footer method on Skins. - // If some outer methods have not yet called wfProfileOut(), work around - // that by clearing anything in the work stack to just the "-total" entry. - // Collate after doing this so the results do not include profile errors. - if ( count( $this->mWorkStack ) > 1 ) { - $oldWorkStack = $this->mWorkStack; - $this->mWorkStack = array( $this->mWorkStack[0] ); // just the "-total" one - } else { - $oldWorkStack = null; - } - $this->collateData(); - // If this trick is used, then the old work stack is swapped back afterwards - // and mCollateDone is reset to false. This means that logData() will still - // make use of all the method data since the missing wfProfileOut() calls - // should be made by the time it is called. - if ( $oldWorkStack ) { - $this->mWorkStack = $oldWorkStack; - $this->mCollateDone = false; - } - - $total = isset( $this->mCollated['-total'] ) - ? $this->mCollated['-total']['real'] - : 0; - - $profile = array(); - foreach ( $this->mCollated as $fname => $data ) { - $periods = array(); - foreach ( $data['periods'] as $period ) { - $period['start'] *= 1000; - $period['end'] *= 1000; - $periods[] = $period; - } - $profile[] = array( - 'name' => $fname, - 'calls' => $data['count'], - 'elapsed' => $data['real'] * 1000, - 'percent' => $total ? 100 * $data['real'] / $total : 0, - 'memory' => $data['memory'], - 'min' => $data['min_real'] * 1000, - 'max' => $data['max_real'] * 1000, - 'overhead' => $data['overhead'], - 'periods' => $periods - ); - } - - return $profile; - } - - /** - * Dummy calls to wfProfileIn/wfProfileOut to calculate its overhead - * @param int $profileCount - */ - protected static function calculateOverhead( $profileCount ) { - wfProfileIn( '-overhead-total' ); - for ( $i = 0; $i < $profileCount; $i++ ) { - wfProfileIn( '-overhead-internal' ); - wfProfileOut( '-overhead-internal' ); - } - wfProfileOut( '-overhead-total' ); - } - - /** - * Counts the number of profiled function calls sitting under - * the given point in the call graph. Not the most efficient algo. - * - * @param array $stack - * @param int $start - * @return int - */ - protected function calltreeCount( $stack, $start ) { - $level = $stack[$start][1]; - $count = 0; - for ( $i = $start -1; $i >= 0 && $stack[$i][1] > $level; $i-- ) { - $count ++; - } - return $count; - } - - /** - * Get the content type sent out to the client. - * Used for profilers that output instead of store data. - * @return string - */ - protected function getContentType() { - foreach ( headers_list() as $header ) { - if ( preg_match( '#^content-type: (\w+/\w+);?#i', $header, $m ) ) { - return $m[1]; - } - } - return null; - } -} |