diff options
author | Stefan Metzmacher <metze@samba.org> | 2007-04-18 14:02:26 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 14:51:05 -0500 |
commit | 08a44496d136b3ac184a6584f3ce8f476f545c76 (patch) | |
tree | e160672551ba8850add54086bdd2b01b6624826e /source4/script/tests/Samba3.pm | |
parent | 0fe8434b3b4fa0c7c56a6f2e04d3257cd4227e74 (diff) | |
download | samba-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.pm | 10 |
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; |