summaryrefslogtreecommitdiff
path: root/source4/script/tests/Samba3.pm
diff options
context:
space:
mode:
authorStefan Metzmacher <metze@samba.org>2007-04-18 14:02:26 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 14:51:05 -0500
commit08a44496d136b3ac184a6584f3ce8f476f545c76 (patch)
treee160672551ba8850add54086bdd2b01b6624826e /source4/script/tests/Samba3.pm
parent0fe8434b3b4fa0c7c56a6f2e04d3257cd4227e74 (diff)
downloadsamba-08a44496d136b3ac184a6584f3ce8f476f545c76.tar.gz
samba-08a44496d136b3ac184a6584f3ce8f476f545c76.tar.bz2
samba-08a44496d136b3ac184a6584f3ce8f476f545c76.zip
r22337: print out the smbd log output after each test
metze (This used to be commit b6b95180d3fb851264fd64eb5a0de4803ee0892a)
Diffstat (limited to 'source4/script/tests/Samba3.pm')
-rw-r--r--source4/script/tests/Samba3.pm10
1 files changed, 10 insertions, 0 deletions
diff --git a/source4/script/tests/Samba3.pm b/source4/script/tests/Samba3.pm
index e133a6394e..fa51dba3a2 100644
--- a/source4/script/tests/Samba3.pm
+++ b/source4/script/tests/Samba3.pm
@@ -39,6 +39,14 @@ sub teardown_env($$)
return 0;
}
+sub getlog_env($$)
+{
+ my ($self, $envvars) = @_;
+
+ # TODO...
+ return "";
+}
+
sub setup_env($$$)
{
my ($self, $envname, $path) = @_;
@@ -292,6 +300,8 @@ sub wait_for_start($$)
print "wait for smbd\n";
system($self->binpath("smbclient") ." $envvars->{CONFIGURATION} -L $envvars->{SERVER_IP} -U% -p 139 | head -2");
system($self->binpath("smbclient") ." $envvars->{CONFIGURATION} -L $envvars->{SERVER_IP} -U% -p 139 | head -2");
+
+ print $self->getlog_env($envvars);
}
1;