Author: metze
Date: 2007-04-30 11:16:50 +0000 (Mon, 30 Apr 2007)
New Revision: 22601

WebSVN: 
http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=22601

Log:
run net join with the correct socket_wrapper and krb5 configuration

metze
Modified:
   branches/SAMBA_4_0/source/selftest/Samba4.pm


Changeset:
Modified: branches/SAMBA_4_0/source/selftest/Samba4.pm
===================================================================
--- branches/SAMBA_4_0/source/selftest/Samba4.pm        2007-04-30 10:49:42 UTC 
(rev 22600)
+++ branches/SAMBA_4_0/source/selftest/Samba4.pm        2007-04-30 11:16:50 UTC 
(rev 22601)
@@ -670,8 +670,14 @@
 
        $ret or die("Unable to provision");
 
-       system("$self->{bindir}/net join $ret->{CONFIGURATION} 
$dcvars->{DOMAIN} member -U$dcvars->{USERNAME}\%$dcvars->{PASSWORD}") == 0 or 
die("Join failed");
+       my $cmd = "";
+       $cmd .= 
"SOCKET_WRAPPER_DEFAULT_IFACE=\"$ret->{SOCKET_WRAPPER_DEFAULT_IFACE}\" ";
+       $cmd .= "KRB5_CONFIG=\"$ret->{KRB5_CONFIG}\" ";
+       $cmd .= "$self->{bindir}/net join $ret->{CONFIGURATION} 
$dcvars->{DOMAIN} member";
+       $cmd .= " -U$dcvars->{USERNAME}\%$dcvars->{PASSWORD}";
 
+       system($cmd) == 0 or die("Join failed\n$cmd");
+
        $ret->{SMBD_TEST_FIFO} = "$prefix/smbd_test.fifo";
        $ret->{SMBD_TEST_LOG} = "$prefix/smbd_test.log";
        $ret->{SMBD_TEST_LOG_POS} = 0;

Reply via email to