From c74993e8cb7d8f95f8942e5af57e1fb4b7e1e982 Mon Sep 17 00:00:00 2001
From: Byron Jones <bjones@mozilla.com>
Date: Tue, 18 Jun 2013 15:11:18 +0800
Subject: Bug 884177: add simple instrumentation to process_bug.cgi

---
 process_bug.cgi | 34 +++++++++++++++++++++++++++++++++-
 1 file changed, 33 insertions(+), 1 deletion(-)

(limited to 'process_bug.cgi')

diff --git a/process_bug.cgi b/process_bug.cgi
index 1f613982d..635c788a4 100755
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -61,6 +61,9 @@ use Bugzilla::Token;
 
 use List::MoreUtils qw(firstidx);
 use Storable qw(dclone);
+use Time::HiRes qw(time);
+use Encode qw(encode_utf8);
+use Sys::Syslog qw(:DEFAULT);
 
 my $user = Bugzilla->login(LOGIN_REQUIRED);
 
@@ -69,6 +72,8 @@ my $dbh = Bugzilla->dbh;
 my $template = Bugzilla->template;
 my $vars = {};
 
+my $timings = { start_time => time() };
+
 ######################################################################
 # Subroutines
 ######################################################################
@@ -205,6 +210,8 @@ else {
     check_token_data($token, 'buglist_mass_change', 'query.cgi');
 }
 
+$timings->{validation_time} = time();
+
 ######################################################################
 # End Data/Security Validation
 ######################################################################
@@ -392,11 +399,14 @@ if (defined $cgi->param('id')) {
     $first_bug->set_flags($flags, $new_flags);
 }
 
+$timings->{update_time} = time();
+
 ##############################
 # Do Actual Database Updates #
 ##############################
 foreach my $bug (@bug_objects) {
     my $changes = $bug->update();
+    $timings->{db_time} = time();
 
     if ($changes->{'bug_status'}) {
         my $new_status = $changes->{'bug_status'}->[1];
@@ -408,7 +418,8 @@ foreach my $bug (@bug_objects) {
         }
     }
 
-    $bug->send_changes($changes, $vars);
+    $timings->{recipients} = $bug->send_changes($changes, $vars);
+    $timings->{bugmail_time} = time();
 }
 
 # Delete the session token used for the mass-change.
@@ -434,6 +445,8 @@ elsif ($action eq 'next_bug' or $action eq 'same_bug') {
         }
         $template->process("bug/show.html.tmpl", $vars)
           || ThrowTemplateError($template->error());
+        $timings->{template_time} = time();
+        _log_timings();
         exit;
     }
 } elsif ($action ne 'nothing') {
@@ -446,6 +459,25 @@ unless (Bugzilla->usage_mode == USAGE_MODE_EMAIL) {
         || ThrowTemplateError($template->error());
     $template->process("global/footer.html.tmpl", $vars)
         || ThrowTemplateError($template->error());
+    $timings->{template_time} = time();
+    _log_timings();
+}
+
+sub _log_timings {
+    return unless scalar(@bug_objects) == 1;
+    my $entry = sprintf "bug-%s user-%s %.6f %.6f %.6f %.6f %.6f %.6f %s\n",
+        $bug_objects[0]->id,
+        $user->id,
+        time() - $timings->{start_time},
+        $timings->{validation_time} - $timings->{start_time},
+        $timings->{update_time} - $timings->{validation_time},
+        $timings->{db_time} - $timings->{update_time},
+        $timings->{bugmail_time} - $timings->{db_time},
+        $timings->{template_time} - $timings->{bugmail_time},
+        $timings->{recipients};
+    openlog('apache', 'cons,pid', 'local4');
+    syslog('notice', encode_utf8("[timing] $entry"));
+    closelog();
 }
 
 1;
-- 
cgit v1.2.3-24-g4f1b