From 588fefc88f198bfb90c899f0812a80f567a97e70 Mon Sep 17 00:00:00 2001
From: Kijin Sung <kijin@kijinsung.com>
Date: Tue, 16 Feb 2016 11:33:54 +0900
Subject: [PATCH] Add slow queries, triggers, and widgets to debug comment
 output

---
 common/framework/debug.php    |  5 +++-
 common/tpl/debug_comment.html | 52 +++++++++++++++++++++++++++++++++++
 2 files changed, 56 insertions(+), 1 deletion(-)

diff --git a/common/framework/debug.php b/common/framework/debug.php
index 6c8ff7120..a072c757e 100644
--- a/common/framework/debug.php
+++ b/common/framework/debug.php
@@ -501,10 +501,13 @@ class Debug
 			'entries' => self::$_entries,
 			'errors' => config('debug.log_errors') ? self::$_errors : null,
 			'queries' => config('debug.log_queries') ? self::$_queries : null,
+			'slow_queries' => self::$_slow_queries,
+			'slow_triggers' => self::$_slow_triggers,
+			'slow_widgets' => self::$_slow_widgets,
 		);
 		
 		// Clean up the backtrace.
-		foreach (array('entries', 'errors', 'queries') as $key)
+		foreach (array('entries', 'errors', 'queries', 'slow_queries') as $key)
 		{
 			if (!$data->$key)
 			{
diff --git a/common/tpl/debug_comment.html b/common/tpl/debug_comment.html
index abb732305..db0b873b0 100644
--- a/common/tpl/debug_comment.html
+++ b/common/tpl/debug_comment.html
@@ -98,3 +98,55 @@ Query logging is disabled.
 	}
 ?>
 <?php endif; ?>
+
+Slow Queries
+============
+<?php
+	$query_count = 0;
+	if (!count($data->slow_queries))
+	{
+		echo 'None'. "\n";
+	}
+	foreach ($data->slow_queries as $query)
+	{
+		$query_caller = sprintf('%s line %d (%s)', $query->file, $query->line, $query->method);
+		$query_result = ($query->message === 'success') ? 'success' : sprintf('error %d %s', $query->error_code, $query->message);
+		echo sprintf('%02d. %s', ++$query_count, $query->query_string) . "\n";
+		echo sprintf('    - Caller:      %s', $query_caller) . "\n";
+		echo sprintf('    - Connection:  %s', $query->query_connection) . "\n";
+		echo sprintf('    - Query ID:    %s', $query->query_id) . "\n";
+		echo sprintf('    - Query Time:  %0.4f sec', $query->query_time) . "\n";
+		echo sprintf('    - Result:      %s', $query_result) . "\n";
+	}
+?>
+
+Slow Triggers
+=============
+<?php
+	$trigger_count = 0;
+	if (!count($data->slow_triggers))
+	{
+		echo 'None'. "\n";
+	}
+	foreach ($data->slow_triggers as $trigger)
+	{
+		echo sprintf('%02d. %s', ++$trigger_count, $trigger->trigger_name) . "\n";
+		echo sprintf('    - Target:     %s', $trigger->trigger_target) . "\n";
+		echo sprintf('    - Exec Time:  %0.4f sec', $trigger->trigger_time) . "\n";
+	}
+?>
+
+Slow Widgets
+============
+<?php
+	$widget_count = 0;
+	if (!count($data->slow_widgets))
+	{
+		echo 'None'. "\n";
+	}
+	foreach ($data->slow_widgets as $widget)
+	{
+		echo sprintf('%02d. %s', ++$widget_count, $widget->widget_name) . "\n";
+		echo sprintf('    - Exec Time:  %0.4f sec', $widget->widget_time) . "\n";
+	}
+?>