From: Tim Beale <timbeale@catalyst.net.nz>
Date: Tue, 26 Feb 2019 02:52:28 +0000 (+1300)
Subject: selftest: Add helper function to create exports file for a testenv
X-Git-Tag: talloc-2.2.0~105
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d192ba4e0bd82020ca0f34c620a64e616378524c;p=thirdparty%2Fsamba.git

selftest: Add helper function to create exports file for a testenv

This writes out the environment variables that are normally setup in the
testenv xterm to a file. This allows them to be sourced later.

This function is currently unused. However, it provides an alternative
replacement for the selftest-vars.sh script (which is really out of
date). I do plan to make use of this function in a subsequent patch-set.

Signed-off-by: Tim Beale <timbeale@catalyst.net.nz>
Reviewed-by: Andrew Bartlett <abartlet@samba.org>
---

diff --git a/selftest/target/Samba.pm b/selftest/target/Samba.pm
index e13952c8256..3a2386202a6 100644
--- a/selftest/target/Samba.pm
+++ b/selftest/target/Samba.pm
@@ -639,4 +639,14 @@ sub export_envvars
 	}
 }
 
+sub export_envvars_to_file
+{
+	my ($filepath, $testenv_vars) = @_;
+	my $env_str = exported_envvars_str($testenv_vars);
+
+	open(FILE, "> $filepath");
+	print FILE "$env_str";
+	close(FILE);
+}
+
 1;