1 files changed, 109 insertions, 0 deletions
diff --git a/extensions/MyDashboard/lib/WebService.pm b/extensions/MyDashboard/lib/WebService.pm
new file mode 100644
index 000000000..41d327446
--- /dev/null
+++ b/extensions/MyDashboard/lib/WebService.pm
@@ -0,0 +1,109 @@
+# This Source Code Form is subject to the terms of the Mozilla Public
+# License, v. 2.0. If a copy of the MPL was not distributed with this
+# file, You can obtain one at http://mozilla.org/MPL/2.0/.
+#
+# This Source Code Form is "Incompatible With Secondary Licenses", as
+# defined by the Mozilla Public License, v. 2.0.
+package Bugzilla::Extension::MyDashboard::WebService;
+
+use strict;
+use warnings;
+
+use base qw(Bugzilla::WebService Bugzilla::WebService::Bug);
+
+use Bugzilla::Constants;
+use Bugzilla::Error;
+use Bugzilla::Util qw(detaint_natural trick_taint template_var);
+use Bugzilla::WebService::Util qw(validate);
+
+use Bugzilla::Extension::MyDashboard::Queries qw(QUERY_DEFS query_bugs query_flags);
+
+use constant READ_ONLY => qw(
+    run_bug_query
+    run_flag_query
+);
+
+sub run_bug_query {
+    my($self, $params) = @_;
+    my $dbh = Bugzilla->dbh;
+    my $user = Bugzilla->login(LOGIN_REQUIRED);
+
+    defined $params->{query}
+        || ThrowCodeError('param_required',
+                          { function => 'MyDashboard.run_bug_query',
+                            param    => 'query' });
+
+    my $result;
+    foreach my $qdef (QUERY_DEFS) {
+        next if $qdef->{name} ne $params->{query};
+        my ($bugs, $query_string) = query_bugs($qdef);
+
+        # Add last changes to each bug
+        foreach my $b (@$bugs) {
+            my $last_changes = {};
+            my $activity = $self->history({ ids => [ $b->{bug_id} ], 
+                                            start_time => $b->{changeddate} });
+            if (@{$activity->{bugs}[0]{history}}) {
+                my $change_set = $activity->{bugs}[0]{history}[0];
+                $last_changes->{activity} = $change_set->{changes};
+                foreach my $change (@{ $last_changes->{activity} }) {
+                    $change->{field_desc}
+                        = template_var('field_descs')->{$change->{field_name}} || $change->{field_name};
+                }
+                $last_changes->{email} = $change_set->{who};
+                $last_changes->{when} = $self->datetime_format_inbound($change_set->{when});
+            }
+            my $last_comment_id = $dbh->selectrow_array("
+                SELECT comment_id FROM longdescs 
+                WHERE bug_id = ? AND bug_when >= ?",
+                undef, $b->{bug_id}, $b->{changeddate});
+            if ($last_comment_id) {
+                my $comments = $self->comments({ comment_ids => [ $last_comment_id ] });
+                my $comment = $comments->{comments}{$last_comment_id};
+                $last_changes->{comment} = $comment->{text};
+                $last_changes->{email} = $comment->{creator} if !$last_changes->{email};
+                $last_changes->{when}
+                    = $self->datetime_format_inbound($comment->{creation_time}) if !$last_changes->{when};
+            }
+            $b->{last_changes} = $last_changes;
+        }
+
+        $query_string =~ s/^POSTDATA=&//;
+        $qdef->{bugs}   = $bugs;
+        $qdef->{buffer} = $query_string;
+        $result = $qdef;
+        last;
+    }
+
+    return { result => $result };
+}
+
+sub run_flag_query {
+    my ($self, $params) =@_;
+    my $user = Bugzilla->login(LOGIN_REQUIRED);
+
+    my $type = $params->{type};
+    $type || ThrowCodeError('param_required',
+                            { function => 'MyDashboard.run_flag_query',
+                              param    => 'type' });
+
+    my $results = query_flags($type);
+    return { result => { $type => $results }};
+}
+
+1;
+
+__END__
+
+=head1 NAME
+
+Bugzilla::Extension::MyDashboard::Webservice - The MyDashboard WebServices API
+
+=head1 DESCRIPTION
+
+This module contains API methods that are useful to user's of bugzilla.mozilla.org.
+
+=head1 METHODS
+
+See L<Bugzilla::WebService> for a description of how parameters are passed, 
+and what B<STABLE>, B<UNSTABLE>, and B<EXPERIMENTAL> mean.