selftest: add target::Template

metze

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;