diff options
| author | Thomas Munro | 2019-07-25 22:01:18 +0000 |
|---|---|---|
| committer | Thomas Munro | 2019-07-25 22:01:18 +0000 |
| commit | 27cd521e6e7084516fbc5e5a8492316b3ba8c25c (patch) | |
| tree | 99c6b41f698c06ea4736955bfefab3afb6cd8cd6 /src/test | |
| parent | f63d9e68d4132a4608e9f50782aaacbe5ed6f57a (diff) | |
Fix LDAP test instability.
After starting slapd, wait until it can accept a connection before
beginning the real test work. This avoids occasional test failures.
Back-patch to 11, where the LDAP tests arrived.
Author: Thomas Munro
Reviewed-by: Michael Paquier
Discussion: https://postgr.es/m/20190719033013.GI1859%40paquier.xyz
Diffstat (limited to 'src/test')
| -rw-r--r-- | src/test/ldap/t/001_auth.pl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/test/ldap/t/001_auth.pl b/src/test/ldap/t/001_auth.pl index 6c02f2530b6..84a3300d964 100644 --- a/src/test/ldap/t/001_auth.pl +++ b/src/test/ldap/t/001_auth.pl @@ -120,6 +120,22 @@ END append_to_file($ldap_pwfile, $ldap_rootpw); chmod 0600, $ldap_pwfile or die; +# wait until slapd accepts requests +my $retries = 0; +while (1) +{ + last + if ( + system_log( + "ldapsearch", "-h", $ldap_server, "-p", + $ldap_port, "-s", "base", "-b", + $ldap_basedn, "-D", $ldap_rootdn, "-y", + $ldap_pwfile, "-n", "'objectclass=*'") == 0); + die "cannot connect to slapd" if ++$retries >= 300; + note "waiting for slapd to accept requests..."; + Time::HiRes::usleep(1000000); +} + $ENV{'LDAPURI'} = $ldap_url; $ENV{'LDAPBINDDN'} = $ldap_rootdn; $ENV{'LDAPCONF'} = $ldap_conf; |