[PATCH 20/31] selftest: Wait for the logon server to register to join the member.

[Andreas Schneider]

Signed-off-by: Andreas Schneider <asn at samba.org>
---
 selftest/target/Samba3.pm | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/selftest/target/Samba3.pm b/selftest/target/Samba3.pm
index ff5ff82..65834c9 100755
--- a/selftest/target/Samba3.pm
+++ b/selftest/target/Samba3.pm
@@ -242,6 +242,8 @@ sub setup_s3dc($$)
 sub setup_member($$$)
 {
 	my ($self, $prefix, $s3dcvars) = @_;
+	my $count = 0;
+	my $rc;
 
 	print "PROVISIONING MEMBER...";
 
@@ -257,6 +259,21 @@ sub setup_member($$$)
 
 	$ret or return undef;
 
+	my $nmblookup = Samba::bindir_path($self, "nmblookup");
+	do {
+		print "Waiting for the LOGON SERVER registration ...\n";
+		$rc = system("$nmblookup $ret->{CONFIGURATION} $ret->{DOMAIN}\#1c");
+		if ($rc != 0) {
+			sleep(1);
+		}
+		$count++;
+	} while ($rc != 0 && $count < 10);
+	if ($count == 10) {
+		print "NMBD not reachable after 10 retries\n";
+		teardown_env($self, $ret);
+		return 0;
+	}
+
 	my $net = Samba::bindir_path($self, "net");
 	my $cmd = "";
 	$cmd .= "SOCKET_WRAPPER_DEFAULT_IFACE=\"$ret->{SOCKET_WRAPPER_DEFAULT_IFACE}\" ";
-- 
2.1.3