libraries/dbg/profiling.php

   1 <?php
   2 /* $Id$ */
   3 // vim: expandtab sw=4 ts=4 sts=4:
   4 /**
   5  * holds function for dumping profiling data
   6  *
   7  * allways use $GLOBALS here, as this script is included by footer.inc.hp
   8  * which can also be included from inside a function
   9  */
  10
  11 if ( ! empty( $GLOBALS['DBG'] )
  12   && $GLOBALS['cfg']['DBG']['profile']['enable'] ) {
  13
  14     /**
  15      * Displays profiling results when called
  16      * WARNING: this function is SLOW
  17      */
  18     function dbg_dump_profiling_results() {
  19         /* Applies to the original 'dbg_dump_profiling_results' function,
  20          * sourced from http://dd.cron.ru/dbg/download.php?h=prof_sample2
  21          * Copyright (c) 2002. Dmitri Dmitrienko
  22          * LICENCE: This source file is subject to Mozilla Public License (MPL)
  23          * AUTHOR: Dmitri Dmitrienko <dd@cron.ru>
  24          */
  25         dbg_get_profiler_results( $dbg_prof_results = '' );
  26         $cwdlen =  strlen(getcwd()); // gma added var, $cwdlen =  strlen(getcwd());
  27         echo '<br /><table xml:lang="en" dir="ltr" width="1000" cellspacing="0" cellpadding="2" style="font:8pt courier">' . "\n" .
  28             '<thead>' . "\n";
  29         // gma added "$tr ="
  30         $tr = '<tr>' . "\n" .
  31             '<th>' . $GLOBALS['strDBGModule'] . '</th>' . "\n" .
  32             '<th>' . $GLOBALS['strDBGLine'] . '</th>' . "\n" .
  33             '<th>' . $GLOBALS['strDBGHits'] . '</th>' . "\n" .
  34             '<th>' . $GLOBALS['strDBGTimePerHitMs'] . '</th>' . "\n" .
  35             '<th>' . $GLOBALS['strDBGTotalTimeMs'] . '</th>' . "\n" .
  36             '<th>' . $GLOBALS['strDBGMinTimeMs'] . '</th>' . "\n" .
  37             '<th>' . $GLOBALS['strDBGMaxTimeMs'] . '</th>' . "\n" .
  38             '<th>' . $GLOBALS['strDBGContextID'] . '</th>' . "\n" .
  39             '<th>' . $GLOBALS['strDBGContext'] . '</th>' . "\n" .
  40             '</tr>' . "\n";  // gma change "." to ";"
  41         echo $tr.'</thead><tbody style="vertical-align: top">' . "\n";
  42         $lines      = 0; // gma added "echo $tr." and "$lines = 0;"
  43         $ctx_name   = '';
  44         $mod_name   = '';
  45         $ctx_id     = '';
  46         $odd_row    = true;
  47         foreach ( $dbg_prof_results['line_no'] as $idx => $line_no ) {
  48             dbg_get_module_name( $dbg_prof_results['mod_no'][$idx], $mod_name );
  49
  50             //if (strpos("!".$mod_name, 'dbg.php') > 0) continue;
  51
  52             $time_sum = $dbg_prof_results['tm_sum'][$idx] * 1000;
  53             $time_avg_hit = $time_sum / $dbg_prof_results['hit_count'][$idx];
  54
  55             $time_sum = sprintf( '%.3f', $time_sum );
  56             $time_avg_hit = sprintf('%.3f', $time_avg_hit);
  57             $time_min = sprintf( '%.3f', $dbg_prof_results['tm_min'][$idx] * 1000 );
  58             $time_max = sprintf( '%.3f', $dbg_prof_results['tm_max'][$idx] * 1000 );
  59             dbg_get_source_context( $dbg_prof_results['mod_no'][$idx],
  60                 $line_no, $ctx_id );
  61
  62             // use a default context name if needed
  63             if ( dbg_get_context_name( $ctx_id, $ctx_name )
  64                     && strlen($ctx_name) == 0 ) {
  65                 $ctx_name = "::main";
  66             }
  67
  68             if ( $time_avg_hit > $GLOBALS['cfg']['DBG']['profile']['threshold'] ) {
  69                 echo '<tr class="' . $odd_row ? 'odd' : 'even' . '">' .
  70                     // gma changed "$mod_name" to "substr($mod_name,$cwdlen+1)"
  71                     '<td>' . substr($mod_name,$cwdlen+1) . '</td>' .
  72                     '<td>' . $line_no . '</td>' .
  73                     '<td>' . $dbg_prof_results['hit_count'][$idx] . '</td>' .
  74                     '<td>' . $time_avg_hit . '</td>' .
  75                     '<td>' . $time_sum . '</td>' .
  76                     '<td>' . $time_min . '</td>' .
  77                     '<td>' . $time_max . '</td>' .
  78                     '<td>' . $ctx_id . '</td>' .
  79                     '<td>' . $ctx_name . '</td>' .
  80                     '</tr>' . "\n";
  81
  82                 // gma added line. Repeats the header every x lines.
  83                 if ( $lines === 19 ) {
  84                     $odd_row    = true;
  85                     $lines      = 0;
  86                     echo $tr;
  87                 } else {
  88                     $odd_row    = ! $odd_row;
  89                     $lines++;
  90                 }
  91             }
  92         }
  93         echo '</tbody></table>';
  94     }
  95 }
  96 /*  gma ... Developer Notes
  97 These two scriptlets can be used as On/Off buttons in your browsers, add to links.
  98 ON:
  99 javascript: document.cookie = 'DBGSESSID=' + escape('1;d=1,p=1') + '; path=/'; document.execCommand('refresh');
 100 or ...
 101 javascript: document.cookie = 'DBGSESSID=' + escape('1;d=0,p=1') + '; path=/'; document.execCommand('refresh');
 102 OFF:
 103 javascript: document.cookie = 'DBGSESSID=' + escape('1;d=0,p=0') + '; path=/'; document.execCommand('refresh');
 104 */
 105 ?>