gforge-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gforge-commits] gforge/deb-specific db-upgrade.pl,1.63,1.64


From: lo-lan-do
Subject: [Gforge-commits] gforge/deb-specific db-upgrade.pl,1.63,1.64
Date: Tue, 26 Oct 2004 15:57:23 -0500

Update of /cvsroot/gforge/gforge/deb-specific
In directory db.perdue.net:/tmp/cvs-serv5174/deb-specific

Modified Files:
        db-upgrade.pl 
Log Message:
Added GRANT statements to give the gforge_nss user read access to the
nss_{groups,passwd,usergroups} views.  I'll think a bit about
nss_shadow.


Index: db-upgrade.pl
===================================================================
RCS file: /cvsroot/gforge/gforge/deb-specific/db-upgrade.pl,v
retrieving revision 1.63
retrieving revision 1.64
diff -u -d -r1.63 -r1.64
--- db-upgrade.pl       25 Oct 2004 14:36:55 -0000      1.63
+++ db-upgrade.pl       26 Oct 2004 20:57:21 -0000      1.64
@@ -1755,6 +1755,29 @@
         $dbh->commit () ;
     }
 
+    $version = &get_db_version ;
+    $target = "4.0.0-0+1" ;
+    if (&is_lesser ($version, $target)) {
+        &debug ("Granting read access permissions to NSS") ;
+
+        @reqlist = ( "GRANT SELECT ON nss_passwd TO gforge_nss",
+                    "GRANT SELECT ON nss_groups TO gforge_nss",
+                    "GRANT SELECT ON nss_usergroups TO gforge_nss",
+                   ) ;
+        foreach my $s (@reqlist) {
+            $query = $s ;
+            # debug $query ;
+            $sth = $dbh->prepare ($query) ;
+            $sth->execute () ;
+            $sth->finish () ;
+        }
+        @reqlist = () ;
+
+        &update_db_version ($target) ;
+        &debug ("Committing.") ;
+        $dbh->commit () ;
+    }
+
 
     &debug ("It seems your database $action went well and smoothly.  That's 
cool.") ;
     &debug ("Please enjoy using Gforge.") ;





reply via email to

[Prev in Thread] Current Thread [Next in Thread]