]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/compare.c
f594a2b83bec5dcd6811b08d71a8a3ba6efe0ad4
[openldap] / servers / slapd / back-ldbm / compare.c
1 /* compare.c - ldbm backend compare routine */
2 /* $OpenLDAP$ */
3 /*
4  * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6  */
7
8 #include "portable.h"
9
10 #include <stdio.h>
11
12 #include <ac/socket.h>
13 #include <ac/string.h>
14
15 #include "slap.h"
16 #include "back-ldbm.h"
17 #include "proto-back-ldbm.h"
18
19 int
20 ldbm_back_compare(
21     Backend     *be,
22     Connection  *conn,
23     Operation   *op,
24     char        *dn,
25     char        *ndn,
26 #ifdef SLAPD_SCHEMA_NOT_COMPAT
27         AttributeAssertion *ava
28 #else
29     Ava         *ava
30 #endif
31 )
32 {
33         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
34         Entry           *matched;
35         Entry           *e;
36         Attribute       *a;
37         int             rc;
38         int             manageDSAit = get_manageDSAit( op );
39
40         /* get entry with reader lock */
41         if ( (e = dn2entry_r( be, ndn, &matched )) == NULL ) {
42                 char *matched_dn = NULL;
43                 struct berval **refs = NULL;
44
45                 if ( matched != NULL ) {
46                         matched_dn = ch_strdup( matched->e_dn );
47                         refs = is_entry_referral( matched )
48                                 ? get_entry_referrals( be, conn, op, matched )
49                                 : NULL;
50                         cache_return_entry_r( &li->li_cache, matched );
51                 } else {
52                         refs = default_referral;
53                 }
54
55                 send_ldap_result( conn, op, LDAP_REFERRAL,
56                         matched_dn, NULL, refs, NULL );
57
58                 if( matched != NULL ) {
59                         ber_bvecfree( refs );
60                         free( matched_dn );
61                 }
62
63                 return( 1 );
64         }
65
66         if (!manageDSAit && is_entry_referral( e ) ) {
67                 /* entry is a referral, don't allow add */
68                 struct berval **refs = get_entry_referrals( be,
69                         conn, op, e );
70
71                 Debug( LDAP_DEBUG_TRACE, "entry is referral\n", 0,
72                     0, 0 );
73
74                 send_ldap_result( conn, op, LDAP_REFERRAL,
75                     e->e_dn, NULL, refs, NULL );
76
77                 ber_bvecfree( refs );
78
79                 rc = 1;
80                 goto return_results;
81         }
82
83 #ifdef SLAPD_SCHEMA_NOT_COMPAT
84         if ( ! access_allowed( be, conn, op, e,
85                 ava->aa_desc, ava->aa_value, ACL_COMPARE ) )
86 #else
87         if ( ! access_allowed( be, conn, op, e,
88                 ava->ava_type, &ava->ava_value, ACL_COMPARE ) )
89 #endif
90         {
91                 send_ldap_result( conn, op, LDAP_INSUFFICIENT_ACCESS,
92                         NULL, NULL, NULL, NULL );
93                 rc = 1;
94                 goto return_results;
95         }
96
97 #ifdef SLAPD_SCHEMA_NOT_COMPAT
98         if ( (a = attr_find( e->e_attrs, ava->aa_desc )) == NULL )
99 #else
100         if ( (a = attr_find( e->e_attrs, ava->ava_type )) == NULL )
101 #endif
102         {
103                 send_ldap_result( conn, op, LDAP_NO_SUCH_ATTRIBUTE,
104                         NULL, NULL, NULL, NULL );
105                 rc = 1;
106                 goto return_results;
107         }
108
109 #ifdef SLAPD_SCHEMA_NOT_COMPAT
110         /* not yet implemented */
111 #else
112         if ( value_find( a->a_vals, &ava->ava_value, a->a_syntax, 1 ) == 0 ) 
113                 send_ldap_result( conn, op, LDAP_COMPARE_TRUE,
114                         NULL, NULL, NULL, NULL );
115         else
116 #endif
117                 send_ldap_result( conn, op, LDAP_COMPARE_FALSE,
118                         NULL, NULL, NULL, NULL );
119
120         rc = 0;
121
122 return_results:;
123         cache_return_entry_r( &li->li_cache, e );
124         return( rc );
125 }