diff options
author | Stefan Metzmacher <metze@samba.org> | 2009-02-04 11:21:29 +0100 |
---|---|---|
committer | Stefan Metzmacher <metze@samba.org> | 2009-02-10 11:47:01 +0100 |
commit | 3c1feb82c87fe97b75ad671cd491d02432f1a839 (patch) | |
tree | f08b780ad56a5aea207e08a42e8d12f13aa8d082 /selftest | |
parent | b5e2e725117241fe9b5f346768b6a21adb5d6ec8 (diff) | |
download | samba-3c1feb82c87fe97b75ad671cd491d02432f1a839.tar.gz samba-3c1feb82c87fe97b75ad671cd491d02432f1a839.tar.bz2 samba-3c1feb82c87fe97b75ad671cd491d02432f1a839.zip |
selftest: add target::Template
metze
Diffstat (limited to 'selftest')
-rw-r--r-- | selftest/target/Template.pm | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/selftest/target/Template.pm b/selftest/target/Template.pm new file mode 100644 index 0000000000..25d9259668 --- /dev/null +++ b/selftest/target/Template.pm @@ -0,0 +1,52 @@ +#!/usr/bin/perl +# Copyright (C) 2009 Stefan Metzmacher <metze@samba.org> +# Published under the GNU GPL, v3 or later. + +package Template; + +use strict; + +sub new($$) { + my ($classname) = @_; + my $self = { + classname => $classname + }; + bless $self; + return $self; +} + +sub teardown_env($$) +{ + my ($self, $envvars) = @_; + + return 0; +} + +sub getlog_env($$) +{ + my ($self, $envvars) = @_; + + return ""; +} + +sub check_env($$) +{ + my ($self, $envvars) = @_; + + return 1; +} + +sub setup_env($$$) +{ + my ($self, $envname, $path) = @_; + my $envvars = undef; + + return $envvars; +} + +sub stop($) +{ + my ($self) = @_; +} + +1; |