Changeset 922 for dasscm

Timestamp:

Jul 29, 2010, 6:46:20 PM (14 years ago)

Author:

joergs

Message:

bugfix: error when user have not enough permission to update plugin result files

File:

• dasscm/trunk/usr/bin/dasscm (modified) (4 diffs)

dasscm/trunk/usr/bin/dasscm

@@ -201 +201 @@
 my $DASSCM_CHECKOUT_USERNAME;
 my $DASSCM_CHECKOUT_PASSWORD;
+my $DASSCM_GID;
 my @DASSCM_ADDITIONAL_FILES;
 
@@ -414 +415 @@
 
     #$svnOptions .= " --username $DASSCM_USERNAME "
+    
+    #
+    # prepare file permissions
+    # (read-write access for group "dasscm",
+    # if this group exists)
+    #
+    (my $gname, my $gpw, $DASSCM_GID, my $members) = getgrnam( "dasscm" );
+    if( $DASSCM_GID ) {
+        umask 0007
+    }
 }
 
@@ -736 +747 @@
     my @array    = @_;
 
+    if ( -e $filename && !-w $filename ) {
+        warning( "failed to write to $filename:", "permission denied" );
+        return;
+    }
+
     if ( !-w dirname($filename) ) {
-        warning( "failed to write to $filename", "directory does not exist" );
+        warning( "failed to write to $filename:", "directory does not exist" );
         return;
     }
@@ -751 +767 @@
     }
     close(OUTFILE);
+
+    # if group dasscm exists,
+    # create plugin results with group membership dasscm
+    if( $DASSCM_GID ) {
+        chown( -1, $DASSCM_GID, $filename );
+    }
 
     return 1;