Bug 1309965 - Report: List of Triage Owners which can be sorted and filtered on product and component

1 files changed, 132 insertions, 2 deletions

diff --git a/extensions/BMO/lib/Reports/Triage.pm b/extensions/BMO/lib/Reports/Triage.pm
index e9a987b54..90c77459f 100644
--- a/extensions/BMO/lib/Reports/Triage.pm
+++ b/extensions/BMO/lib/Reports/Triage.pm
@@ -16,13 +16,24 @@ use Bugzilla::Constants;
 use Bugzilla::Error;
 use Bugzilla::Product;
 use Bugzilla::User;
-use Bugzilla::Util qw(detaint_natural);
+use Bugzilla::Util qw(detaint_natural trim);
 use Date::Parse;
 
+use JSON::XS;
+use List::MoreUtils qw(any);
+
 # set an upper limit on the *unfiltered* number of bugs to process
 use constant MAX_NUMBER_BUGS => 4000;
 
-sub report {
+use constant DEFAULT_OWNER_PRODUCTS => (
+    'Core',
+    'Firefox',
+    'Firefox for Android',
+    'Firefox for iOS',
+    'Toolkit',
+);
+
+sub unconfirmed {
     my ($vars, $filter) = @_;
     my $dbh = Bugzilla->dbh;
     my $input = Bugzilla->input_params;
@@ -217,4 +228,123 @@ sub report {
     $vars->{'input'} = $input;
 }
 
+sub owners {
+    my ($vars, $filter) = @_;
+    my $dbh   = Bugzilla->dbh;
+    my $input = Bugzilla->input_params;
+    my $user  = Bugzilla->user;
+
+    Bugzilla::User::match_field({ 'owner' => {'type' => 'multi'}  });
+
+    my @products;
+    if (!$input->{product} && $input->{owner}) {
+        @products = @{ $user->get_selectable_products };
+    }
+    else {
+        my @product_names = $input->{product} ? ($input->{product}) : DEFAULT_OWNER_PRODUCTS;
+        foreach my $name (@product_names) {
+            push(@products, Bugzilla::Product->check({ name => $name }));
+        }
+    }
+
+    my @component_ids;
+    if (@products == 1 && $input->{'component'}) {
+        my $ra_components = ref($input->{'component'})
+                            ? $input->{'component'}
+                            : [ $input->{'component'} ];
+        foreach my $component_name (@$ra_components) {
+            my $component = Bugzilla::Component->check({ name => $component_name, product => $products[0] });
+            push @component_ids, $component->id;
+        }
+    }
+
+    my @owner_names = split(/[,;]+/, $input->{owner}) if $input->{owner};
+    my @owner_ids;
+    foreach my $name (@owner_names) {
+        $name = trim($name);
+        next unless $name;
+        push(@owner_ids, login_to_id($name, THROW_ERROR));
+    }
+
+    my $sql = "SELECT products.name, components.name, components.id, components.triage_owner_id
+               FROM components JOIN products ON components.product_id = products.id
+               WHERE products.id IN (" . join(',', map { $_->id } @products) . ")";
+    if (@component_ids) {
+        $sql .= " AND components.id IN (" . join(',', @component_ids) . ")";
+    }
+    if (@owner_ids) {
+        $sql .= " AND components.triage_owner_id IN (" . join(',', @owner_ids) . ")";
+    }
+    $sql .= " ORDER BY products.name, components.name";
+
+    my $rows = $dbh->selectall_arrayref($sql);
+
+    my $bug_count_sth = $dbh->prepare("
+        SELECT COUNT(bugs.bug_id)
+        FROM   bugs INNER JOIN components AS map_component ON bugs.component_id = map_component.id
+               INNER JOIN bug_status AS map_bug_status ON bugs.bug_status = map_bug_status.value
+               INNER JOIN priority AS map_priority ON bugs.priority = map_priority.value
+        WHERE  bugs.resolution IN ('')
+                AND bugs.priority IN ('--')
+                AND bugs.creation_ts >= '2016-06-01'
+                AND (NOT( EXISTS (
+                    SELECT 1
+                    FROM   bugs bugs_1
+                           LEFT JOIN attachments AS attachments_1 ON bugs_1.bug_id = attachments_1.bug_id
+                           LEFT JOIN flags AS flags_1 ON bugs_1.bug_id = flags_1.bug_id AND (flags_1.attach_id = attachments_1.attach_id OR flags_1.attach_id IS NULL)
+                           LEFT JOIN flagtypes AS flagtypes_1 ON flags_1.type_id = flagtypes_1.id
+                    WHERE  bugs_1.bug_id = bugs.bug_id AND CONCAT(flagtypes_1.name, flags_1.status) = 'needinfo?')))
+                AND bugs.component_id = ?");
+
+    my @results;
+    foreach my $row (@$rows) {
+        my ($product_name, $component_name, $component_id, $triage_owner_id) = @$row;
+        my $triage_owner = $triage_owner_id
+                           ? Bugzilla::User->new({ id => $triage_owner_id, cache => 1 })
+                           : "";
+        my $data = {
+            product     => $product_name,
+            component   => $component_name,
+            owner       => $triage_owner,
+        };
+        $data->{buglist_url} = 'priority=--&resolution=---&f1=creation_ts&o1=greaterthaneq&v1=2016-06-01'.
+                               '&f2=flagtypes.name&o2=notequals&v2=needinfo%3F';
+        if ($triage_owner) {
+            $data->{buglist_url} .= '&f3=triage_owner&o3=equals&v3=' . $triage_owner->login;
+        }
+        $bug_count_sth->execute($component_id);
+        ($data->{bug_count}) = $bug_count_sth->fetchrow_array();
+        push @results, $data;
+    }
+    $vars->{results} = \@results;
+
+    my $json_data = { products => [] };
+    foreach my $product (@{ $user->get_selectable_products }) {
+        my $prod_data = {
+            name        => $product->name,
+            components  => [],
+        };
+        foreach my $component (@{ $product->components }) {
+            my $selected = 0;
+            if ($input->{product}
+                && $input->{product} eq $product->name
+                && $input->{component})
+            {
+                $selected = 1 if (ref $input->{component} && any { $_ eq $component->name } @{ $input->{component} });
+                $selected = 1 if (!ref $input->{componet} && $input->{component} eq $component->name);
+            }
+            my $comp_data = {
+                name     => $component->name,
+                selected => $selected
+            };
+            push(@{ $prod_data->{components} }, $comp_data);
+        }
+        push(@{ $json_data->{products} }, $prod_data);
+    }
+
+    $vars->{product}   = $input->{product};
+    $vars->{owner}     = $input->{owner};
+    $vars->{json_data} = encode_json($json_data);
+}
+
 1;