diff options
Diffstat (limited to 'selftest')
-rwxr-xr-x | selftest/selftest.pl | 1 | ||||
-rwxr-xr-x | selftest/target/Samba4.pm | 6 |
2 files changed, 6 insertions, 1 deletions
diff --git a/selftest/selftest.pl b/selftest/selftest.pl index 528aa9c7d47..1ab932bb5e1 100755 --- a/selftest/selftest.pl +++ b/selftest/selftest.pl @@ -836,6 +836,7 @@ my @exported_envvars = ( "DNS_FORWARDER1", "DNS_FORWARDER2", "RESOLV_CONF", + "UNACCEPTABLE_PASSWORD", # nss_wrapper "NSS_WRAPPER_PASSWD", diff --git a/selftest/target/Samba4.pm b/selftest/target/Samba4.pm index 693e62305c7..731ad1f7db6 100755 --- a/selftest/target/Samba4.pm +++ b/selftest/target/Samba4.pm @@ -1761,6 +1761,9 @@ sub provision_chgdcpass($$) print "PROVISIONING CHGDCPASS...\n"; my $extra_provision_options = undef; + # This environment disallows the use of this password + # (and also removes the default AD complexity checks) + my $unacceptable_password = "widk3Dsle32jxdBdskldsk55klASKQ"; push (@{$extra_provision_options}, "--dns-backend=BIND9_DLZ"); my $ret = $self->provision($prefix, "domain controller", @@ -1771,7 +1774,7 @@ sub provision_chgdcpass($$) "chgDCpass1", undef, undef, - "", + "check password script = sed -e '/$unacceptable_password/{;q1}; /$unacceptable_password/!{q0}'\n", "", $extra_provision_options); unless (defined $ret) { @@ -1797,6 +1800,7 @@ sub provision_chgdcpass($$) $ret->{DC_NETBIOSNAME} = $ret->{NETBIOSNAME}; $ret->{DC_USERNAME} = $ret->{USERNAME}; $ret->{DC_PASSWORD} = $ret->{PASSWORD}; + $ret->{UNACCEPTABLE_PASSWORD} = $unacceptable_password; return $ret; } |