]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/compare.c
Back out giant lock code, needs more work
[openldap] / servers / slapd / back-ldbm / compare.c
1 /* compare.c - ldbm backend compare routine */
2 /* $OpenLDAP$ */
3 /*
4  * Copyright 1998-2002 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     struct berval       *dn,
25     struct berval       *ndn,
26         AttributeAssertion *ava
27 )
28 {
29         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
30         Entry           *matched;
31         Entry           *e;
32         Attribute       *a;
33         int             rc;
34         int             manageDSAit = get_manageDSAit( op );
35
36         /* get entry with reader lock */
37         if ( (e = dn2entry_r( be, ndn, &matched )) == NULL ) {
38                 char *matched_dn = NULL;
39                 BerVarray refs = NULL;
40
41                 if ( matched != NULL ) {
42                         matched_dn = ch_strdup( matched->e_dn );
43                         refs = is_entry_referral( matched )
44                                 ? get_entry_referrals( be, conn, op, matched )
45                                 : NULL;
46                         cache_return_entry_r( &li->li_cache, matched );
47                 } else {
48                         refs = referral_rewrite( default_referral,
49                                 NULL, dn, LDAP_SCOPE_DEFAULT );
50                 }
51
52                 send_ldap_result( conn, op, LDAP_REFERRAL,
53                         matched_dn, NULL, refs, NULL );
54
55                 if ( refs ) ber_bvarray_free( refs );
56                 free( matched_dn );
57
58                 return( 1 );
59         }
60
61         if (!manageDSAit && is_entry_referral( e ) ) {
62                 /* entry is a referral, don't allow add */
63                 BerVarray refs = get_entry_referrals( be,
64                         conn, op, e );
65
66 #ifdef NEW_LOGGING
67                 LDAP_LOG(( "backend", LDAP_LEVEL_INFO,
68                         "ldbm_back_compare: entry (%s) is a referral.\n", e->e_dn ));
69 #else
70                 Debug( LDAP_DEBUG_TRACE, "entry is referral\n", 0,
71                     0, 0 );
72 #endif
73
74
75                 send_ldap_result( conn, op, LDAP_REFERRAL,
76                     e->e_dn, NULL, refs, NULL );
77
78                 if (refs ) ber_bvarray_free( refs );
79
80                 rc = 1;
81                 goto return_results;
82         }
83
84         if ( ! access_allowed( be, conn, op, e,
85                 ava->aa_desc, &ava->aa_value, ACL_COMPARE ) )
86         {
87                 send_ldap_result( conn, op, LDAP_INSUFFICIENT_ACCESS,
88                         NULL, NULL, NULL, NULL );
89                 rc = 1;
90                 goto return_results;
91         }
92
93         rc = LDAP_NO_SUCH_ATTRIBUTE;
94
95         for(a = attrs_find( e->e_attrs, ava->aa_desc );
96                 a != NULL;
97                 a = attrs_find( a->a_next, ava->aa_desc ))
98         {
99                 rc = LDAP_COMPARE_FALSE;
100
101                 if ( value_find( ava->aa_desc, a->a_vals, &ava->aa_value ) == 0 ) {
102                         rc = LDAP_COMPARE_TRUE;
103                         break;
104                 }
105
106         }
107
108         send_ldap_result( conn, op, rc,
109                 NULL, NULL, NULL, NULL );
110
111         if( rc != LDAP_NO_SUCH_ATTRIBUTE ) {
112                 rc = 0;
113         }
114
115
116 return_results:;
117         cache_return_entry_r( &li->li_cache, e );
118         return( rc );
119 }