From 9b6ec1f545da1cc4088ddf9cc117747954e58e65 Mon Sep 17 00:00:00 2001
From: David Lawrence <dkl@mozilla.com>
Date: Fri, 26 Feb 2016 17:57:55 +0000
Subject: Bug 1069799 - move the QA repository into the main repository
 r=LpSolit

---
 xt/webservice/bugzilla.t | 49 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 49 insertions(+)
 create mode 100644 xt/webservice/bugzilla.t

(limited to 'xt/webservice/bugzilla.t')

diff --git a/xt/webservice/bugzilla.t b/xt/webservice/bugzilla.t
new file mode 100644
index 000000000..2ddb13092
--- /dev/null
+++ b/xt/webservice/bugzilla.t
@@ -0,0 +1,49 @@
+# 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.
+
+##################################################
+# Test for xmlrpc call functions in Bugzilla.pm  #
+##################################################
+
+use 5.10.1;
+use strict;
+use warnings;
+
+use FindBin qw($RealBin);
+use lib "$RealBin/../lib";
+
+use Test::More tests => 11 * 3;
+use QA::Util;
+my ($config, @clients) = get_rpc_clients();
+
+foreach my $rpc (@clients) {
+    my $vers_call = $rpc->bz_call_success('Bugzilla.version');
+    my $version = $vers_call->result->{version};
+    ok($version, "Bugzilla.version returns $version");
+
+    my $tz_call = $rpc->bz_call_success('Bugzilla.timezone');
+    my $tz = $tz_call->result->{timezone};
+    ok($tz, "Bugzilla.timezone retuns $tz");
+
+    my $ext_call = $rpc->bz_call_success('Bugzilla.extensions');
+    my $extensions = $ext_call->result->{extensions};
+    isa_ok($extensions, 'HASH', 'extensions');
+
+    # There is always at least the QA extension enabled.
+    my $cmp = $config->{test_extensions} ? '>' : '==';
+    my @ext_names = keys %$extensions;
+    my $desc = scalar(@ext_names) . ' extension(s) returned: ' . join(', ', @ext_names);
+    cmp_ok(scalar(@ext_names), $cmp, 1, $desc);
+    ok(grep($_ eq 'QA', @ext_names), 'The QA extension is enabled');
+
+    my $time_call = $rpc->bz_call_success('Bugzilla.time');
+    my $time_result = $time_call->result;
+    foreach my $type (qw(db_time web_time)) {
+        cmp_ok($time_result->{$type}, '=~', $rpc->DATETIME_REGEX,
+               "Bugzilla.time returns a datetime for $type");
+    }
+}
-- 
cgit v1.2.3-24-g4f1b