mirror/openldap
2
0
Fork 0
mirror of https://git.openldap.org/openldap/openldap.git synced 2025-01-24 13:24:56 +08:00
Code Issues Packages Projects Releases Wiki Activity

Revert "ITS#6688 enforce search ACL in back-perl"

Browse Source 
This reverts commit 53bb95a2e3.
Code was working as designed/documented. Changing now will
probably break other users.
This commit is contained in:
Howard Chu 2011-06-09 15:37:11 -07:00
parent 53bb95a2e3
commit 68c7d375da
1 changed files with 0 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
servers/slapd/back-perl/search.c
View File

@ -35,27 +35,6 @@ perl_back_search(
int i;
PERL_SET_CONTEXT( PERL_INTERPRETER );
{
Entry base = {0};
slap_mask_t mask;
/* Require search access to base */
base.e_name = op->o_req_dn;
base.e_nname = op->o_req_ndn;
if ( !access_allowed_mask( op, &base, slap_schema.si_ad_entry,
NULL, ACL_SEARCH, NULL, &mask ))
{
if ( !ACL_GRANT( mask, ACL_DISCLOSE )) {
rs->sr_err = LDAP_NO_SUCH_OBJECT;
} else {
rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
}
send_ldap_result( op, rs );
return rs->sr_err;
}
}
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
{