selftest: add target::Template

metze

1 files changed, 52 insertions, 0 deletions

diff --git a/selftest/target/Template.pm b/selftest/target/Template.pm
new file mode 100644
index 00000000000..25d92596687
--- /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;