2 # Bootstrap Samba and run a number of tests against it.
3 # Copyright (C) 2005-2007 Jelmer Vernooij <jelmer@samba.org>
4 # Published under the GNU GPL, v3 or later.
13 my ($classname, $bindir, $binary_mapping, $bindir_path, $ldap, $srcdir, $exeext) = @_;
16 samba3 => new Samba3($bindir,$binary_mapping, $bindir_path, $srcdir, $exeext),
17 samba4 => new Samba4($bindir,$binary_mapping, $bindir_path, $ldap, $srcdir, $exeext),
25 my ($self, $envname, $path) = @_;
27 $ENV{ENVNAME} = $envname;
29 my $env = $self->{samba4}->setup_env($envname, $path);
31 $env->{target} = $self->{samba4};
33 $env = $self->{samba3}->setup_env($envname, $path);
35 $env->{target} = $self->{samba3};
38 if (not defined $env) {
39 warn("Samba can't provide environment '$envname'");