Bug 283581 : Move UserInGroup out of globals.pl

Patch by Colin Ogilvie <colin.ogilvie@gmail.com>   r=mkanat  a=justdave

diff --git a/Bugzilla/Attachment.pm b/Bugzilla/Attachment.pm
index 8be92dcf253438a94d7a2a4e7a5d9adbf9a5f88a..1a1246d862d031dba087b3ea1c854c6aff2dd189 100644 (file)
--- a/Bugzilla/Attachment.pm
+++ b/Bugzilla/Attachment.pm
@@ -34,6 +34,7 @@ package Bugzilla::Attachment;
 # Use the Flag module to handle flags.
 use Bugzilla::Flag;
 use Bugzilla::Config qw(:locations);
+use Bugzilla::User;
 
 ############################################################################
 # Functions
@@ -69,7 +70,7 @@ sub query
 
   my $dbh = Bugzilla->dbh;
 
-  my $in_editbugs = &::UserInGroup("editbugs");
+  my $in_editbugs = UserInGroup("editbugs");
   &::SendSQL("SELECT product_id
            FROM bugs 
            WHERE bug_id = $bugid");

diff --git a/Bugzilla/DB.pm b/Bugzilla/DB.pm
index 6e0903a76f5ed0077befccae4e1efa067e5beeff..098d10ba19fd32f785cc250c2fc2b5dd3ddd5002 100644 (file)
--- a/Bugzilla/DB.pm
+++ b/Bugzilla/DB.pm
@@ -49,6 +49,7 @@ use Bugzilla::Config qw(:DEFAULT :db);
 use Bugzilla::Util;
 use Bugzilla::Error;
 use Bugzilla::DB::Schema;
+use Bugzilla::User;
 
 # All this code is backwards compat fu. As such, its a bit ugly. Note the
 # circular dependencies on Bugzilla.pm
@@ -261,7 +262,7 @@ sub bz_get_field_defs {
     my ($self) = @_;
 
     my $extra = "";
-    if (!&::UserInGroup(Param('timetrackinggroup'))) {
+    if (!UserInGroup(Param('timetrackinggroup'))) {
         $extra = "AND name NOT IN ('estimated_time', 'remaining_time', " .
                  "'work_time', 'percentage_complete', 'deadline')";
     }

diff --git a/Bugzilla/Search.pm b/Bugzilla/Search.pm
index e38aed7bfab3e44dd31545c62ff6747538bed765..af8df0ab2e0a6941b7b8062004fd91c2d1937f18 100644 (file)
--- a/Bugzilla/Search.pm
+++ b/Bugzilla/Search.pm
@@ -562,7 +562,7 @@ sub init {
              my $table = "longdescs_$chartid";
              my $extra = "";
              if (Param("insidergroup") 
-                 && !&::UserInGroup(Param("insidergroup")))
+                 && !UserInGroup(Param("insidergroup")))
              {
                  $extra = "AND $table.isprivate < 1";
              }
@@ -625,7 +625,7 @@ sub init {
              }
              my $table = "longdescs_$chartseq";
              my $extra = "";
-             if (Param("insidergroup") && !&::UserInGroup(Param("insidergroup"))) {
+             if (Param("insidergroup") && !UserInGroup(Param("insidergroup"))) {
                  $extra = "AND $table.isprivate < 1";
              }
              push(@supptables, "LEFT JOIN longdescs AS $table " .
@@ -643,7 +643,7 @@ sub init {
              }
              my $table = "longdescs_$chartseq";
              my $extra = "";
-             if (Param("insidergroup") && !&::UserInGroup(Param("insidergroup"))) {
+             if (Param("insidergroup") && !UserInGroup(Param("insidergroup"))) {
                  $extra = "AND $table.isprivate < 1";
              }
              if ($list) {
@@ -664,7 +664,7 @@ sub init {
          "^long_?desc," => sub {
              my $table = "longdescs_$chartid";
              my $extra = "";
-             if (Param("insidergroup") && !&::UserInGroup(Param("insidergroup"))) {
+             if (Param("insidergroup") && !UserInGroup(Param("insidergroup"))) {
                  $extra = "AND $table.isprivate < 1";
              }
              push(@supptables, "INNER JOIN longdescs AS $table " .
@@ -740,7 +740,7 @@ sub init {
          "^attachments\..*," => sub {
              my $table = "attachments_$chartid";
              my $extra = "";
-             if (Param("insidergroup") && !&::UserInGroup(Param("insidergroup"))) {
+             if (Param("insidergroup") && !UserInGroup(Param("insidergroup"))) {
                  $extra = "AND $table.isprivate = 0";
              }
              push(@supptables, "INNER JOIN attachments AS $table " .

diff --git a/Bugzilla/Series.pm b/Bugzilla/Series.pm
index 53e6fbabfd863fd0f27bb11d0a6919f2110cd431..3d4f301b97f5a56c0b1ff28e5cc10e0501322313 100644 (file)
--- a/Bugzilla/Series.pm
+++ b/Bugzilla/Series.pm
@@ -163,7 +163,7 @@ sub initFromCGI {
     
     # Change 'admin' here and in series.html.tmpl, or remove the check
     # completely, if you want to change who can make series public.
-    $self->{'public'} = 0 unless &::UserInGroup('admin');
+    $self->{'public'} = 0 unless UserInGroup('admin');
 }
 
 sub writeToDatabase {

diff --git a/Bugzilla/Template.pm b/Bugzilla/Template.pm
index aea32a2b3cf93378409243a3546efc731d6ec60f..3e37ed5e75c2ffb2983075e2f20aee01b0aaa73e 100644 (file)
--- a/Bugzilla/Template.pm
+++ b/Bugzilla/Template.pm
@@ -32,6 +32,7 @@ use strict;
 
 use Bugzilla::Config qw(:DEFAULT $templatedir $datadir);
 use Bugzilla::Util;
+use Bugzilla::User;
 
 # for time2str - replace by TT Date plugin??
 use Date::Format ();
@@ -406,7 +407,7 @@ sub create {
             'user' => sub { return Bugzilla->user; },
 
             # UserInGroup. Deprecated - use the user.* functions instead
-            'UserInGroup' => \&::UserInGroup,
+            'UserInGroup' => \&Bugzilla::User::UserInGroup,
 
             # SendBugMail - sends mail about a bug, using Bugzilla::BugMail.pm
             'SendBugMail' => sub {

diff --git a/Bugzilla/User.pm b/Bugzilla/User.pm
index 63b2f6848d98ef379ad5194fdb5b5c187859d212..fabffa62168b0a1152bbb9b7cc0a40b6ca925eba 100644 (file)
--- a/Bugzilla/User.pm
+++ b/Bugzilla/User.pm
@@ -45,6 +45,7 @@ use Bugzilla::Auth;
 use base qw(Exporter);
 @Bugzilla::User::EXPORT = qw(insert_new_user is_available_username
     login_to_id
+    UserInGroup
 );
 
 ################################################################################
@@ -1058,6 +1059,10 @@ sub login_to_id ($) {
     }
 }
 
+sub UserInGroup ($) {
+    return defined Bugzilla->user->groups->{$_[0]} ? 1 : 0;
+}
+
 1;
 
 __END__
@@ -1335,8 +1340,6 @@ Params: $username (scalar, string) - The full login name of the username
             can change his username to $username. (That is, this function
             will return a boolean true value).
 
-=back
-
 =item C<login_to_id($login)>
 
 Takes a login name of a Bugzilla user and changes that into a numeric
@@ -1351,6 +1354,12 @@ of a user, but you don't want the full weight of Bugzilla::User.
 However, consider using a Bugzilla::User object instead of this function
 if you need more information about the user than just their ID.
 
+=item C<UserInGroup($groupname)>
+
+Takes a name of a group, and returns 1 if a user is in the group, 0 otherwise.
+
+=back
+
 =head1 SEE ALSO
 
 L<Bugzilla|Bugzilla>

diff --git a/CGI.pl b/CGI.pl
index 31ed48e3d400da2c1b6e2c722685cee6af45679c..d1c738ff93ccf36226721984c4513210aa4236c7 100644 (file)
--- a/CGI.pl
+++ b/CGI.pl
@@ -46,6 +46,7 @@ use Bugzilla::Constants;
 use Bugzilla::Error;
 use Bugzilla::BugMail;
 use Bugzilla::Bug;
+use Bugzilla::User;
 
 # Shut up misguided -w warnings about "used only once".  For some reason,
 # "use vars" chokes on me when I try it here.

diff --git a/buglist.cgi b/buglist.cgi
index 9727177313af754f60c11851f8a5f4f1f7b2ce22..c401c43c27c6e87c8d7b21be477546e7e11a52ef 100755 (executable)
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -39,6 +39,7 @@ use vars qw($template $vars);
 use Bugzilla;
 use Bugzilla::Search;
 use Bugzilla::Constants;
+use Bugzilla::User;
 
 # Include the Bugzilla CGI and general utility library.
 require "CGI.pl";

diff --git a/chart.cgi b/chart.cgi
index 8b0d3971e94ad571628552ca72ffa1f281032348..321c867fef1087dfc508f6b45c3490abe452b1df 100755 (executable)
--- a/chart.cgi
+++ b/chart.cgi
@@ -48,6 +48,7 @@ require "CGI.pl";
 use Bugzilla::Constants;
 use Bugzilla::Chart;
 use Bugzilla::Series;
+use Bugzilla::User;
 
 use vars qw($cgi $template $vars);
 

diff --git a/colchange.cgi b/colchange.cgi
index d84ee5404fb06ada465896e6f390cdd80727a998..11caca423f82aff302eb689864deed43078d8167 100755 (executable)
--- a/colchange.cgi
+++ b/colchange.cgi
@@ -34,6 +34,7 @@ use vars qw(
 
 use Bugzilla;
 use Bugzilla::Constants;
+use Bugzilla::User;
 require "CGI.pl";
 
 Bugzilla->login();

diff --git a/describekeywords.cgi b/describekeywords.cgi
index 8597e67910d79aeb510622530e9f074a9134e49a..dd25c40d69f6f755698b617f37b6f18829bef8fe 100755 (executable)
--- a/describekeywords.cgi
+++ b/describekeywords.cgi
@@ -25,6 +25,7 @@ use strict;
 use lib ".";
 
 use Bugzilla;
+use Bugzilla::User;
 
 require "CGI.pl";
 

diff --git a/doeditparams.cgi b/doeditparams.cgi
index 099b98404ca6b611fd99d7969fa3e756cce02aab..028f28a60ff4290d6754438c1eb79a4f4efee90a 100755 (executable)
--- a/doeditparams.cgi
+++ b/doeditparams.cgi
@@ -28,6 +28,7 @@ use lib qw(.);
 use Bugzilla;
 use Bugzilla::Constants;
 use Bugzilla::Config qw(:DEFAULT :admin $datadir);
+use Bugzilla::User;
 
 require "CGI.pl";
 

diff --git a/editflagtypes.cgi b/editflagtypes.cgi
index 9c14219d20db35b2d1779a5e807fcfcfc0feebd9..7936823dc784c3c3235730068878e0e948059c24 100755 (executable)
--- a/editflagtypes.cgi
+++ b/editflagtypes.cgi
@@ -36,6 +36,7 @@ use Bugzilla;
 use Bugzilla::Constants;
 use Bugzilla::Flag;
 use Bugzilla::FlagType;
+use Bugzilla::User;
 
 use vars qw( $template $vars );
 

diff --git a/editgroups.cgi b/editgroups.cgi
index abef251f426e882aa8b4bcfa1c34f24662f77653..c352908bb7cf1230fff7871a6b7057ea153027d0 100755 (executable)
--- a/editgroups.cgi
+++ b/editgroups.cgi
@@ -31,6 +31,7 @@ use lib ".";
 
 use Bugzilla;
 use Bugzilla::Constants;
+use Bugzilla::User;
 require "CGI.pl";
 
 my $cgi = Bugzilla->cgi;

diff --git a/editkeywords.cgi b/editkeywords.cgi
index 4f4cf4bd52cd518bc2194789181d483b670e4f23..f5fcf6a574c313b2fb2efa920e11d146162a11b3 100755 (executable)
--- a/editkeywords.cgi
+++ b/editkeywords.cgi
@@ -27,6 +27,7 @@ require "CGI.pl";
 
 use Bugzilla::Constants;
 use Bugzilla::Config qw(:DEFAULT $datadir);
+use Bugzilla::User;
 
 my $cgi = Bugzilla->cgi;
 

diff --git a/editmilestones.cgi b/editmilestones.cgi
index 85bcae8d30cf35e2cb2dd25fc8184336a1ceccb6..e62dcc4cb6c4f82179dc54299741abe1821e41d3 100755 (executable)
--- a/editmilestones.cgi
+++ b/editmilestones.cgi
@@ -23,6 +23,7 @@ require "globals.pl";
 
 use Bugzilla::Constants;
 use Bugzilla::Config qw(:DEFAULT $datadir);
+use Bugzilla::User;
 
 use vars qw($template $vars);
 

diff --git a/editparams.cgi b/editparams.cgi
index 5d7ff9178e3e84bff58425a832d5aaf2ad93d3c2..620ae6baee1cb71446578362bbe5965d2dc1bc78 100755 (executable)
--- a/editparams.cgi
+++ b/editparams.cgi
@@ -27,6 +27,7 @@ use lib ".";
 
 use Bugzilla::Constants;
 use Bugzilla::Config qw(:DEFAULT :admin);
+use Bugzilla::User;
 
 require "CGI.pl";
 

diff --git a/editproducts.cgi b/editproducts.cgi
index de0c874e2d7bc72ef6c4bfc1fab3a56956f27436..aff79871ca92804f11c9c6b0edcdd71dc5cf83d8 100755 (executable)
--- a/editproducts.cgi
+++ b/editproducts.cgi
@@ -35,7 +35,7 @@ use Bugzilla::Constants;
 require "CGI.pl";
 require "globals.pl";
 use Bugzilla::Series;
-
+use Bugzilla::User;
 use Bugzilla::Config qw(:DEFAULT $datadir);
 
 # Shut up misguided -w warnings about "used only once".  "use vars" just

diff --git a/editsettings.cgi b/editsettings.cgi
index 7ce05b2a22ce106fd1502522da15daed741225e6..b5e810ba9f38a23f81f5f3edf9af728f86bec6eb 100755 (executable)
--- a/editsettings.cgi
+++ b/editsettings.cgi
@@ -21,6 +21,7 @@ use lib qw(.);
 
 use Bugzilla;
 use Bugzilla::Constants;
+use Bugzilla::User;
 use Bugzilla::User::Setting;
 
 require "CGI.pl";

diff --git a/editversions.cgi b/editversions.cgi
index 7faea7c8d592ce4d49de61956829a12034ed7343..86c82beea395b312094863cdf06afb7c1427ec7b 100755 (executable)
--- a/editversions.cgi
+++ b/editversions.cgi
@@ -35,6 +35,7 @@ require "globals.pl";
 
 use Bugzilla::Constants;
 use Bugzilla::Config qw(:DEFAULT $datadir);
+use Bugzilla::User;
 
 use vars qw($template $vars);
 

diff --git a/enter_bug.cgi b/enter_bug.cgi
index e2cd7f295d30c5b18b8a369e9fb4a97c1619f296..a242c1883f566d310518fc07a2f186928b611fc5 100755 (executable)
--- a/enter_bug.cgi
+++ b/enter_bug.cgi
@@ -40,6 +40,7 @@ use lib qw(.);
 use Bugzilla;
 use Bugzilla::Constants;
 use Bugzilla::Bug;
+use Bugzilla::User;
 require "CGI.pl";
 
 use vars qw(

diff --git a/globals.pl b/globals.pl
index ec7d396933b0c17085e3428d4c7bff104056eef8..ec8c52d4d4336ba19d69c537a91087118054b1c0 100644 (file)
--- a/globals.pl
+++ b/globals.pl
@@ -966,14 +966,6 @@ sub get_legal_field_values {
     return @$result_ref;
 }
 
-sub UserInGroup {
-    if ($_[1]) {
-        die "UserInGroup no longer takes a second parameter.";
-    }
-    
-    return defined Bugzilla->user->groups->{$_[0]};
-}
-
 sub BugInGroupId {
     my ($bugid, $groupid) = (@_);
     PushGlobalSQLState();

diff --git a/query.cgi b/query.cgi
index ef02bbbca935426eb82f06bc9b9e7d5c1fe77ee9..6251171395967f3ee8d0ad56de54d622de78c42e 100755 (executable)
--- a/query.cgi
+++ b/query.cgi
@@ -32,6 +32,7 @@ require "CGI.pl";
 
 use Bugzilla::Constants;
 use Bugzilla::Search;
+use Bugzilla::User;
 
 use vars qw(
     @CheckOptionValues

diff --git a/sanitycheck.cgi b/sanitycheck.cgi
index c3c415312523cc216579a16fbe4c792c31390297..6f85e6cfd9d7ad3718d6dd194e51f659f2a5cbc6 100755 (executable)
--- a/sanitycheck.cgi
+++ b/sanitycheck.cgi
@@ -28,6 +28,7 @@ use lib qw(.);
 
 require "CGI.pl";
 use Bugzilla::Constants;
+use Bugzilla::User;
 
 ###########################################################################
 # General subs

diff --git a/show_bug.cgi b/show_bug.cgi
index 03cf6f60d57570c29e7cc76823d14d806b699285..e855b442f2c1a2a7fd92e0a84bb5c3bec63e5acd 100755 (executable)
--- a/show_bug.cgi
+++ b/show_bug.cgi
@@ -26,6 +26,7 @@ use lib qw(.);
 
 use Bugzilla;
 use Bugzilla::Constants;
+use Bugzilla::User;
 
 require "CGI.pl";
 

diff --git a/showdependencytree.cgi b/showdependencytree.cgi
index f1a495a6d434a99f73bcab14f93772937fcd973c..b373563c154773e13f13dccb5fb35c0b75792402 100755 (executable)
--- a/showdependencytree.cgi
+++ b/showdependencytree.cgi
@@ -27,6 +27,7 @@ use strict;
 
 use lib qw(.);
 require "CGI.pl";
+use Bugzilla::User;
 
 # Use global template variables.
 use vars qw($template $vars);

diff --git a/summarize_time.cgi b/summarize_time.cgi
index 94b7e83f885606349d25c35ad73dcd03145f7247..8992918cc029608e15e5a74f6327b826ccf4d468 100755 (executable)
--- a/summarize_time.cgi
+++ b/summarize_time.cgi
@@ -26,7 +26,7 @@ use Date::Format;        # strftime
 use Bugzilla::Bug;       # EmitDependList
 use Bugzilla::Util;      # trim
 use Bugzilla::Constants; # LOGIN_*
-
+use Bugzilla::User;      # UserInGroup
 require "CGI.pl";
 
 GetVersionTable();