s4-test: use standard process model for 'dc' server
authorAndrew Tridgell <tridge@samba.org>
Fri, 12 Aug 2011 04:37:04 +0000 (14:37 +1000)
committerAndrew Tridgell <tridge@samba.org>
Fri, 12 Aug 2011 09:06:50 +0000 (11:06 +0200)
this provides us with both 'standard' and 'single' process models in
selftest, ensuring that we test the standard process model in the
build farm

Pair-Programmed-With: Andrew Bartlett <abartlet@samba.org>

Autobuild-User: Andrew Tridgell <tridge@samba.org>
Autobuild-Date: Fri Aug 12 11:06:50 CEST 2011 on sn-devel-104

selftest/target/Samba4.pm

index 825c40c67c9f59977203cb9df9c658815b066248..89faf01fab0c0ebf5c415695802d29eecaf5c7d3 100644 (file)
@@ -85,9 +85,9 @@ sub slapd_stop($$)
        return 1;
 }
 
-sub check_or_start($$)
+sub check_or_start($$$)
 {
-       my ($self, $env_vars) = @_;
+       my ($self, $env_vars, $process_model) = @_;
        return 0 if ( -p $env_vars->{SAMBA_TEST_FIFO});
 
        unlink($env_vars->{SAMBA_TEST_FIFO});
@@ -135,16 +135,8 @@ sub check_or_start($$)
                }
                my $samba =  Samba::bindir_path($self, "samba");
 
-               # allow selection of the process model using
-               # the environment varibale SAMBA_PROCESS_MODEL
-               # that allows us to change the process model for
-               # individual machines in the build farm
-               my $model = "single";
-               if (defined($ENV{SAMBA_PROCESS_MODEL})) {
-                       $model = $ENV{SAMBA_PROCESS_MODEL};
-               }
                chomp($pwd);
-               my $cmdline = "$valgrind ${pwd}/$samba $optarg $env_vars->{CONFIGURATION} -M $model -i";
+               my $cmdline = "$valgrind ${pwd}/$samba $optarg $env_vars->{CONFIGURATION} -M $process_model -i";
                my $ret = system("$cmdline");
                if ($ret == -1) {
                        print "Unable to start $cmdline: $ret: $!\n";
@@ -1423,7 +1415,7 @@ sub setup_member($$$)
        my $env = $self->provision_member($path, $dc_vars);
 
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1440,7 +1432,7 @@ sub setup_rpc_proxy($$$)
        my $env = $self->provision_rpc_proxy($path, $dc_vars);
 
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1455,7 +1447,7 @@ sub setup_dc($$)
 
        my $env = $self->provision_dc($path);
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "standard");
 
                $self->wait_for_start($env);
 
@@ -1470,7 +1462,7 @@ sub setup_fl2000dc($$)
 
        my $env = $self->provision_fl2000dc($path);
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1487,7 +1479,7 @@ sub setup_fl2003dc($$)
        my $env = $self->provision_fl2003dc($path);
 
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1503,7 +1495,7 @@ sub setup_fl2008r2dc($$)
        my $env = $self->provision_fl2008r2dc($path);
 
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1520,7 +1512,7 @@ sub setup_vampire_dc($$$)
        my $env = $self->provision_vampire_dc($path, $dc_vars);
 
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);
 
@@ -1573,7 +1565,7 @@ sub setup_rodc($$$)
                return undef;
        }
 
-       $self->check_or_start($env);
+       $self->check_or_start($env, "single");
 
        $self->wait_for_start($env);
 
@@ -1588,7 +1580,7 @@ sub setup_plugin_s4_dc($$)
 
        my $env = $self->provision_plugin_s4_dc($path);
        if (defined $env) {
-               $self->check_or_start($env);
+               $self->check_or_start($env, "single");
 
                $self->wait_for_start($env);