Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Newer
Older
100644 33 lines (19 sloc) 0.716 kb
faf203a @gbarr Add support for URIs to be passed to ->new. ldap: ldaps: and ldapi:
gbarr authored
1 #!perl
2
3 BEGIN {
4 require "t/common.pl";
5 start_server(ipc => 1);
6 }
7
8 print "1..12\n";
9
10 $ldap = client();
11 ok($ldap, "client");
12
13 $mesg = $ldap->bind($MANAGERDN, password => $PASSWD);
14
15 ok(!$mesg->code, "bind: " . $mesg->code . ": " . $mesg->error);
16
17 ok(ldif_populate($ldap, "data/50-in.ldif"), "data/50-in.ldif");
18
19 $mesg = $ldap->search(base => $BASEDN, filter => 'objectclass=*');
20 ok(!$mesg->code, "search: " . $mesg->code . ": " . $mesg->error);
21
22 compare_ldif("50",$mesg,$mesg->sorted);
23
24 $ldap = client(ipc => 1);
25 ok($ldap, "ipc client");
26
27 $mesg = $ldap->search(base => $BASEDN, filter => 'objectclass=*');
28 ok(!$mesg->code, "search: " . $mesg->code . ": " . $mesg->error);
29
30 compare_ldif("50",$mesg,$mesg->sorted);
31
32
Something went wrong with that request. Please try again.