<?php
//-------------------------------------------------------------------
// class Profiler
//-------------------------------------------------------------------
class Profiler
{
  //-----------------------------------------------------------------
  static $inst_object;
  //-----------------------------------------------------------------
  /**
  * @returns Profiler
  */
  static function instance()
  {
    if(!empty(self::$inst_object)) return self::$inst_object;

    self::$inst_object = new Profiler();

    return self::$inst_object;
  } // instance
  //-----------------------------------------------------------------
  static function log_point($msg)
  {
    static $profile_time;

    $profiler = self::instance();
    if(empty($profiler)) return;

    $log_file = $profiler->get_log_file();
    if(!$log_file) return;

    if(empty($profile_time)) $profile_time = microtime(true);

    $duration = microtime(true) - $profile_time;

    $_SESSION[S_CONTEXT]["current_profile_statistics"][$msg][] = $duration;

    $msg = substr(sprintf("%-60s", $msg), 0, 60) . "    " .
           sprintf("%8s", number_format($duration, 3, ".", "")) . " seconds";

    if((!file_exists($log_file) && is_writable(dirname($log_file))) || is_writable($log_file))
    {
      error_log($msg . "\r\n", 3, $log_file);
    }

    $profile_time = microtime(true);
  } // log_point
  //-----------------------------------------------------------------
  function get_log_file($average = false)
  {
    $path = __FILE__;
    $basename = basename(__FILE__);
    $path = str_replace("include\\_generic\\$basename", "", $path);
    $path = str_replace("include/_generic/$basename", "", $path);

    if(empty($_SESSION[S_CONTEXT]["current_profile_file"]))
    {
      if(!file_exists($path . "log/profiles") &&
         !@mkdir($path . "log/profiles"))
      {
        return false;
      }

      if(!file_exists($path . "log/profiles/" . session_id()) &&
         !@mkdir($path . "log/profiles/" . session_id()))
      {
        return false;
      }

      if($average)
      {
        return $path . "log/profiles/" . session_id() . "/average.log";
      }

      $_SESSION[S_CONTEXT]["current_profile_file"] = $path . "log/profiles/" . session_id() . "/" . date("H.i.s") . ".log";
    }

    return $_SESSION[S_CONTEXT]["current_profile_file"];
  } // get_log_file
  //-----------------------------------------------------------------
  function __destruct()
  {
    unset($_SESSION[S_CONTEXT]["current_profile_file"]);

    if(empty($_SESSION[S_CONTEXT]["current_profile_statistics"])) return;

    $log_file = $this->get_log_file(true);
    if(!$log_file) return;

    if(file_exists($log_file)) @unlink($log_file);

    foreach($_SESSION[S_CONTEXT]["current_profile_statistics"] as $msg => $durations)
    {
      $duration = 0;

      if(count($durations) > 0) $duration = array_sum($durations)/count($durations);

      $msg = substr(sprintf("%-60s", $msg), 0, 60) . "    " .
             sprintf("%8s", number_format($duration, 3, ".", "")) . " seconds";

      if((!file_exists($log_file) && is_writable(dirname($log_file))) || is_writable($log_file))
      {
        error_log($msg . "\r\n", 3, $log_file);
      }
    }
  } // __destruct
  //--------------------------------------------------------------------
} // Profiler
//-------------------------------------------------------------------
?>

Profiler::log_point("start");
...
Profiler::log_point("before operation 1");
...
Profiler::log_point("operation 1 done");
...
Profiler::log_point("end");

[mysqld]
innodb_buffer_pool_size = 512M
innodb_log_file_size = 512M
innodb_flush_log_at_trx_commit = 2 # may change to 2 or 0
innodb_flush_method = O_DIRECT
innodb_io_capacity_max=6000
innodb_io_capacity=3000

max_connections=2000

max_allowed_packet=24M
max_connect_errors=100
open_files_limit=4161
sort_buffer_size=512M

query_cache_size=32M
thread_cache_size=0

ft_min_word_len=3
back_log=450
open_files_limit=10000
key_buffer_size=128M
read_buffer_size=512M
read_rnd_buffer_size=512M
join_buffer_size=512M
sort_buffer_size=512M
myisam_sort_buffer_size=512M