]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/group.c
redesign of back-bdb locking :
[openldap] / servers / slapd / back-bdb / group.c
1 /* group.c - bdb backend acl group 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-bdb.h"
17 #include "proto-bdb.h"
18
19
20 /* return 0 IFF op_dn is a value in member attribute
21  * of entry with gr_dn AND that entry has an objectClass
22  * value of groupOfNames
23  */
24 int
25 bdb_group(
26         Backend *be,
27         Connection *conn,
28         Operation *op,
29         Entry   *target,
30         struct berval   *gr_ndn,
31         struct berval   *op_ndn,
32         ObjectClass *group_oc,
33         AttributeDescription *group_at
34 )
35 {
36         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
37         struct bdb_op_info *boi = NULL;
38         DB_TXN *txn = NULL;
39         Entry *e;
40         int     rc = 1;
41         Attribute *attr;
42
43         AttributeDescription *ad_objectClass = slap_schema.si_ad_objectClass;
44         const char *group_oc_name = NULL;
45         const char *group_at_name = group_at->ad_cname.bv_val;
46
47         u_int32_t       locker;
48         DB_LOCK         lock;
49
50         if( group_oc->soc_names && group_oc->soc_names[0] ) {
51                 group_oc_name = group_oc->soc_names[0];
52         } else {
53                 group_oc_name = group_oc->soc_oid;
54         }
55
56 #ifdef NEW_LOGGING
57         LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY,
58                 "bdb_group: check (%s) member of (%s), oc %s\n",
59                 op_ndn->bv_val, gr_ndn->bv_val, group_oc_name ));
60 #else
61         Debug( LDAP_DEBUG_ARGS,
62                 "=> bdb_group: gr dn: \"%s\"\n",
63                 gr_ndn->bv_val, 0, 0 ); 
64
65         Debug( LDAP_DEBUG_ARGS,
66                 "=> bdb_group: op dn: \"%s\"\n",
67                 op_ndn->bv_val, 0, 0 ); 
68         Debug( LDAP_DEBUG_ARGS,
69                 "=> bdb_group: oc: \"%s\" at: \"%s\"\n", 
70                 group_oc_name, group_at_name, 0 ); 
71
72         Debug( LDAP_DEBUG_ARGS,
73                 "=> bdb_group: tr dn: \"%s\"\n",
74                 target->e_ndn, 0, 0 ); 
75 #endif
76
77         if( op ) boi = (struct bdb_op_info *) op->o_private;
78         if( boi != NULL && be == boi->boi_bdb ) {
79                 txn = boi->boi_txn;
80         }
81
82         if ( txn )
83                 locker = TXN_ID( txn );
84         else
85                 LOCK_ID ( bdb->bi_dbenv, &locker );
86
87         if (dn_match(&target->e_name, gr_ndn)) {
88                 /* we already have a LOCKED copy of the entry */
89                 e = target;
90 #ifdef NEW_LOGGING
91                 LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
92                         "bdb_group: target is group (%s)\n", gr_ndn->bv_val ));
93 #else
94                 Debug( LDAP_DEBUG_ARGS,
95                         "=> bdb_group: target is group: \"%s\"\n",
96                         gr_ndn->bv_val, 0, 0 );
97 #endif
98         } else {
99 dn2entry_retry:
100                 /* can we find group entry */
101                 rc = bdb_dn2entry_r( be, NULL, gr_ndn, &e, NULL, 0, locker, &lock ); 
102                 if( rc ) {
103                         if ( rc == DB_LOCK_DEADLOCK || rc == DB_LOCK_NOTGRANTED )
104                                 goto dn2entry_retry;
105                         if( txn ) {
106                                 boi->boi_err = rc;
107                         }
108                         else {
109                                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
110                         }
111                         return( 1 );
112                 }
113                 if (e == NULL) {
114 #ifdef NEW_LOGGING
115                         LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
116                                 "bdb_group: cannot find group (%s)\n",
117                                 gr_ndn->bv_val ));
118 #else
119                         Debug( LDAP_DEBUG_ACL,
120                                 "=> bdb_group: cannot find group: \"%s\"\n",
121                                         gr_ndn->bv_val, 0, 0 ); 
122 #endif
123                         if ( txn == NULL ) {
124                                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
125                         }
126                         return( 1 );
127                 }
128 #ifdef NEW_LOGGING
129                 LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
130                         "bdb_group: found group (%s)\n", gr_ndn->bv_val ));
131 #else
132                 Debug( LDAP_DEBUG_ACL,
133                         "=> bdb_group: found group: \"%s\"\n",
134                         gr_ndn->bv_val, 0, 0 ); 
135 #endif
136         }
137
138         /* find it's objectClass and member attribute values
139          * make sure this is a group entry
140          * finally test if we can find op_dn in the member attribute value list
141          */
142         rc = 1;
143
144 #ifdef BDB_ALIASES
145         if( is_entry_alias( e ) ) {
146 #ifdef NEW_LOGGING
147                 LDAP_LOG(( "backend", LDAP_LEVEL_INFO,
148                         "bdb_group: group (%s) is an alias\n", gr_ndn->bv_val ));
149 #else
150                 Debug( LDAP_DEBUG_ACL,
151                         "<= bdb_group: group is an alias\n", 0, 0, 0 );
152 #endif
153                 goto return_results;
154         }
155 #endif
156
157         if( is_entry_referral( e ) ) {
158 #ifdef NEW_LOGGING
159                 LDAP_LOG(( "backend", LDAP_LEVEL_INFO,
160                         "bdb_group: group (%s) is a referral.\n", gr_ndn->bv_val ));
161 #else
162                 Debug( LDAP_DEBUG_ACL,
163                         "<= bdb_group: group is a referral\n", 0, 0, 0 );
164 #endif
165                 goto return_results;
166         }
167
168         if( !is_entry_objectclass( e, group_oc, 0 ) ) {
169 #ifdef NEW_LOGGING
170                 LDAP_LOG(( "backend", LDAP_LEVEL_ERR,
171                         "bdb_group: failed to find %s in objectClass.\n",
172                         group_oc_name ));
173 #else
174                 Debug( LDAP_DEBUG_ACL,
175                         "<= bdb_group: failed to find %s in objectClass\n", 
176                                 group_oc_name, 0, 0 ); 
177 #endif
178                 goto return_results;
179         }
180
181         if ((attr = attr_find(e->e_attrs, group_at)) == NULL) {
182 #ifdef NEW_LOGGING
183                 LDAP_LOG(( "backend", LDAP_LEVEL_INFO,
184                         "bdb_group: failed to find %s\n", group_at_name ));
185 #else
186                 Debug( LDAP_DEBUG_ACL,
187                         "<= bdb_group: failed to find %s\n",
188                         group_at_name, 0, 0 ); 
189 #endif
190                 goto return_results;
191         }
192
193 #ifdef NEW_LOGGING
194         LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY,
195                 "bdb_group: found objectClass %s and %s\n",
196                 group_oc_name, group_at_name ));
197 #else
198         Debug( LDAP_DEBUG_ACL,
199                 "<= bdb_group: found objectClass %s and %s\n",
200                 group_oc_name, group_at_name, 0 ); 
201 #endif
202
203         if( value_find( group_at, attr->a_vals, op_ndn ) != LDAP_SUCCESS ) {
204 #ifdef NEW_LOGGING
205                 LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
206                         "bdb_group: \"%s\" not in \"%s\": %s\n",
207                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name ));
208 #else
209                 Debug( LDAP_DEBUG_ACL,
210                         "<= bdb_group: \"%s\" not in \"%s\": %s\n", 
211                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name ); 
212 #endif
213                 goto return_results;
214         }
215
216 #ifdef NEW_LOGGING
217         LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
218                 "bdb_group: %s is in %s: %s\n",
219                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name ));
220 #else
221         Debug( LDAP_DEBUG_ACL,
222                 "<= bdb_group: \"%s\" is in \"%s\": %s\n", 
223                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name ); 
224 #endif
225
226         rc = 0;
227
228 return_results:
229         if( target != e ) {
230                 /* free entry */
231                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
232         }
233
234         if ( txn == NULL ) {
235                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
236         }
237
238 #ifdef NEW_LOGGING
239         LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY,
240                 "bdb_group: rc=%d\n", rc ));
241 #else
242         Debug( LDAP_DEBUG_TRACE, "bdb_group: rc=%d\n", rc, 0, 0 ); 
243 #endif
244
245         return(rc);
246 }
247