]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/group.c
59a33e94b387b6d93699bc98394b1fd4206fc281
[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( BACK_BDB, 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( BACK_BDB, DETAIL1, 
92                         "bdb_group: target is group (%s)\n", gr_ndn->bv_val, 0, 0 );
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( BACK_BDB, DETAIL1, 
116                                 "bdb_group: cannot find group (%s)\n", gr_ndn->bv_val, 0, 0 );
117 #else
118                         Debug( LDAP_DEBUG_ACL,
119                                 "=> bdb_group: cannot find group: \"%s\"\n",
120                                         gr_ndn->bv_val, 0, 0 ); 
121 #endif
122                         if ( txn == NULL ) {
123                                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
124                         }
125                         return( 1 );
126                 }
127 #ifdef NEW_LOGGING
128                 LDAP_LOG( BACK_BDB, DETAIL1, 
129                         "bdb_group: found group (%s)\n", gr_ndn->bv_val, 0, 0 );
130 #else
131                 Debug( LDAP_DEBUG_ACL,
132                         "=> bdb_group: found group: \"%s\"\n",
133                         gr_ndn->bv_val, 0, 0 ); 
134 #endif
135         }
136
137         /* find it's objectClass and member attribute values
138          * make sure this is a group entry
139          * finally test if we can find op_dn in the member attribute value list
140          */
141         rc = 1;
142
143 #ifdef BDB_ALIASES
144         if( is_entry_alias( e ) ) {
145 #ifdef NEW_LOGGING
146                 LDAP_LOG( BACK_BDB, INFO, 
147                         "bdb_group: group (%s) is an alias\n", gr_ndn->bv_val, 0, 0);
148 #else
149                 Debug( LDAP_DEBUG_ACL,
150                         "<= bdb_group: group is an alias\n", 0, 0, 0 );
151 #endif
152                 goto return_results;
153         }
154 #endif
155
156         if( is_entry_referral( e ) ) {
157 #ifdef NEW_LOGGING
158                 LDAP_LOG( BACK_BDB, INFO, 
159                         "bdb_group: group (%s) is a referral.\n", gr_ndn->bv_val, 0, 0 );
160 #else
161                 Debug( LDAP_DEBUG_ACL,
162                         "<= bdb_group: group is a referral\n", 0, 0, 0 );
163 #endif
164                 goto return_results;
165         }
166
167         if( !is_entry_objectclass( e, group_oc, 0 ) ) {
168 #ifdef NEW_LOGGING
169                 LDAP_LOG( BACK_BDB, ERR, 
170                         "bdb_group: failed to find %s in objectClass.\n", 
171                         group_oc_name, 0, 0 );
172 #else
173                 Debug( LDAP_DEBUG_ACL,
174                         "<= bdb_group: failed to find %s in objectClass\n", 
175                                 group_oc_name, 0, 0 ); 
176 #endif
177                 goto return_results;
178         }
179
180         if ((attr = attr_find(e->e_attrs, group_at)) == NULL) {
181 #ifdef NEW_LOGGING
182                 LDAP_LOG( BACK_BDB, INFO, 
183                         "bdb_group: failed to find %s\n", group_at_name, 0, 0 );
184 #else
185                 Debug( LDAP_DEBUG_ACL,
186                         "<= bdb_group: failed to find %s\n",
187                         group_at_name, 0, 0 ); 
188 #endif
189                 goto return_results;
190         }
191
192 #ifdef NEW_LOGGING
193         LDAP_LOG( BACK_BDB, ENTRY, 
194                 "bdb_group: found objectClass %s and %s\n",
195                 group_oc_name, group_at_name, 0 );
196 #else
197         Debug( LDAP_DEBUG_ACL,
198                 "<= bdb_group: found objectClass %s and %s\n",
199                 group_oc_name, group_at_name, 0 ); 
200 #endif
201
202         if( value_find( group_at, attr->a_vals, op_ndn ) != LDAP_SUCCESS ) {
203 #ifdef NEW_LOGGING
204                 LDAP_LOG( BACK_BDB, DETAIL1, 
205                         "bdb_group: \"%s\" not in \"%s\": %s\n",
206                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
207 #else
208                 Debug( LDAP_DEBUG_ACL,
209                         "<= bdb_group: \"%s\" not in \"%s\": %s\n", 
210                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name ); 
211 #endif
212                 goto return_results;
213         }
214
215 #ifdef NEW_LOGGING
216         LDAP_LOG( BACK_BDB, DETAIL1, "bdb_group: %s is in %s: %s\n",
217                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
218 #else
219         Debug( LDAP_DEBUG_ACL,
220                 "<= bdb_group: \"%s\" is in \"%s\": %s\n", 
221                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name ); 
222 #endif
223
224         rc = 0;
225
226 return_results:
227         if( target != e ) {
228                 /* free entry */
229                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
230         }
231
232         if ( txn == NULL ) {
233                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
234         }
235
236 #ifdef NEW_LOGGING
237         LDAP_LOG( BACK_BDB, ENTRY, "bdb_group: rc=%d\n", rc, 0, 0 );
238 #else
239         Debug( LDAP_DEBUG_TRACE, "bdb_group: rc=%d\n", rc, 0, 0 ); 
240 #endif
241
242         return(rc);
243 }
244