From: Andreas Schneider <asn@samba.org>
Date: Thu, 21 Mar 2019 13:37:28 +0000 (+0100)
Subject: s3:script: Fix running rsync in fake_snap.pl
X-Git-Tag: tdb-1.4.1~659
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=883436839aeb97b68ca18ae211199faa4448b5a0;p=thirdparty%2Fsamba.git

s3:script: Fix running rsync in fake_snap.pl

We need to unset BASH_ENV or we get:
    Insecure $ENV{BASH_ENV} while running setgid

This probably only happens on recent perl versions.

Signed-off-by: Andreas Schneider <asn@samba.org>
Reviewed-by: David Disseldorp <ddiss@samba.org>
---

diff --git a/source3/script/tests/fake_snap.pl b/source3/script/tests/fake_snap.pl
index 18bbcb7142e..d88307eaecc 100755
--- a/source3/script/tests/fake_snap.pl
+++ b/source3/script/tests/fake_snap.pl
@@ -22,6 +22,8 @@ sub _create_snapshot
 	my $snap_path = $base_path . "/.snapshots/\@GMT-" . $time_str;
 	my $ret;
 
+	delete @ENV{'BASH_ENV'};
+
 	$ENV{'PATH'} = '/bin:/usr/bin'; # untaint PATH
 	POSIX::mkdir($base_path . "/.snapshots", 0755);