sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-01-08 21:18:16 +03:00
Code

selftest/Samba4: setup forest UPN and SPN namespaces for ad_dc and fl2008r2dc

Browse Source 
Signed-off-by: Stefan Metzmacher <metze@samba.org>
Reviewed-by: Andrew Bartlett <abartlet@samba.org>
This commit is contained in:
Stefan Metzmacher 2015-05-11 13:45:59 +02:00
parent 7ee4f23821
commit 7605c5d6e8
1 changed files with 51 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

52
selftest/target/Samba4.pm
View File

@ -470,6 +470,46 @@ EOF
umask $oldumask;
}
sub setup_namespaces($$:$$)
{
my ($self, $localenv, $upn_array, $spn_array) = @_;
@{$upn_array} = [] unless defined($upn_array);
my $upn_args = "";
foreach my $upn (@{$upn_array}) {
$upn_args .= " --add-upn-suffix=$upn";
}
@{$spn_array} = [] unless defined($spn_array);
my $spn_args = "";
foreach my $spn (@{$spn_array}) {
$spn_args .= " --add-spn-suffix=$spn";
}
my $samba_tool = Samba::bindir_path($self, "samba-tool");
my $cmd_env = "";
$cmd_env .= "SOCKET_WRAPPER_DEFAULT_IFACE=\"$localenv->{SOCKET_WRAPPER_DEFAULT_IFACE}\" ";
if (defined($localenv->{RESOLV_WRAPPER_CONF})) {
$cmd_env .= "RESOLV_WRAPPER_CONF=\"$localenv->{RESOLV_WRAPPER_CONF}\" ";
} else {
$cmd_env .= "RESOLV_WRAPPER_HOSTS=\"$localenv->{RESOLV_WRAPPER_HOSTS}\" ";
}
$cmd_env .= " KRB5_CONFIG=\"$localenv->{KRB5_CONFIG}\"";
my $cmd_config = " $localenv->{CONFIGURATION}";
my $namespaces = $cmd_env;
$namespaces .= " $samba_tool domain trust namespaces $upn_args $spn_args";
$namespaces .= $cmd_config;
unless (system($namespaces) == 0) {
warn("Failed to add namespaces \n$namespaces");
return;
}
return;
}
sub setup_trust($$$$$)
{
my ($self, $localenv, $remoteenv, $type, $extra_args) = @_;
@ -2140,6 +2180,11 @@ sub setup_fl2008r2dc($$$)
$self->wait_for_start($env);
my $upn_array = ["$env->{REALM}.upn"];
my $spn_array = ["$env->{REALM}.spn"];
$self->setup_namespaces($env, $upn_array, $spn_array);
$env = $self->setup_trust($env, $dc_vars, "forest", "");
$self->{vars}->{fl2008r2dc} = $env;
@ -2414,7 +2459,12 @@ sub setup_ad_dc($$)
$self->check_or_start($env, "single");
$self->wait_for_start($env);
my $upn_array = ["$env->{REALM}.upn"];
my $spn_array = ["$env->{REALM}.spn"];
$self->setup_namespaces($env, $upn_array, $spn_array);
$self->{vars}->{ad_dc} = $env;
return $env;
}