From 35495da4b840d3893124657c81427bfc2f78f9e2 Mon Sep 17 00:00:00 2001 From: Andreas Schneider Date: Tue, 9 Sep 2014 09:47:05 +0200 Subject: [PATCH] selftest: Wait for the logon server to register to join the member. Signed-off-by: Andreas Schneider Reviewed-by: Andrew Bartlett --- selftest/target/Samba3.pm | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) diff --git a/selftest/target/Samba3.pm b/selftest/target/Samba3.pm index 50c26429d5f..4c9124df257 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.34.1