From 14bcdce1dc6029c3676c3640d8148c83c14692e5 Mon Sep 17 00:00:00 2001 From: Dylan William Hardison Date: Mon, 12 Sep 2016 16:22:17 -0400 Subject: Revert "Bug 1283930 - Add Makefile.PL & local/lib/perl5 support to bmo/master + local symlink to data/ directory" This reverts commit e6bf4cacb10f86077fe898349485f5c7ab9fb4b6. --- qa/t/rest_bugzilla.t | 60 ---------------------------------------------------- 1 file changed, 60 deletions(-) delete mode 100644 qa/t/rest_bugzilla.t (limited to 'qa/t/rest_bugzilla.t') diff --git a/qa/t/rest_bugzilla.t b/qa/t/rest_bugzilla.t deleted file mode 100644 index cffab80db..000000000 --- a/qa/t/rest_bugzilla.t +++ /dev/null @@ -1,60 +0,0 @@ -# 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. - -####################################### -# Tests for REST calls in Bugzilla.pm # -####################################### - -use 5.10.1; -use strict; -use warnings; - -use FindBin qw($RealBin); -use lib "$RealBin/lib", "$RealBin/../../lib", "$RealBin/../../local/lib/perl5"; - -use Test::More tests => 11; -use QA::REST; - -my $rest = get_rest_client(); -my $config = $rest->bz_config; - -my $version = $rest->call('version')->{version}; -ok($version, "GET /rest/version returns $version"); - -my $extensions = $rest->call('extensions')->{extensions}; -isa_ok($extensions, 'HASH', 'GET /rest/extensions'); -my @ext_names = sort keys %$extensions; -# There is always at least the QA extension enabled. -ok(scalar(@ext_names), scalar(@ext_names) . ' extension(s) found: ' . join(', ', @ext_names)); -ok($extensions->{QA}, 'The QA extension is enabled, with version ' . $extensions->{QA}->{version}); - -my $timezone = $rest->call('timezone')->{timezone}; -ok($timezone, "GET /rest/timezone retuns $timezone"); - -my $time = $rest->call('time'); -foreach my $type (qw(db_time web_time)) { - ok($time->{$type}, "GET /rest/time returns $type = " . $time->{$type}); -} - -# Logged-out users can only access the maintainer and requirelogin parameters. -my $params = $rest->call('parameters')->{parameters}; -my @param_names = sort keys %$params; -ok(@param_names == 2 && defined $params->{maintainer} && defined $params->{requirelogin}, - 'Only 2 parameters accessible to logged-out users: ' . join(', ', @param_names)); - -# Powerless users can access much more parameters. -$params = $rest->call('parameters', { api_key => $config->{unprivileged_user_api_key} })->{parameters}; -@param_names = sort keys %$params; -ok(@param_names > 2, scalar(@param_names) . ' parameters accessible to powerless users'); - -# Admins can access all parameters. -$params = $rest->call('parameters', { api_key => $config->{admin_user_api_key} })->{parameters}; -@param_names = sort keys %$params; -ok(@param_names > 2, scalar(@param_names) . ' parameters accessible to admins'); - -my $timestamp = $rest->call('last_audit_time')->{last_audit_time}; -ok($timestamp, "GET /rest/last_audit_time returns $timestamp"); -- cgit v1.2.3-24-g4f1b