git.sur5r.net Git - openldap/blob - 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                 switch(rc) {
  87                 case 0:
  88                         break;
  89                 default:
  90                         return 1;
  91                 }
  92         }
  93
  94         if (dn_match(&target->e_name, gr_ndn)) {
  95                 /* we already have a LOCKED copy of the entry */
  96                 e = target;
  97 #ifdef NEW_LOGGING
  98                 LDAP_LOG( BACK_BDB, DETAIL1,
  99                         "bdb_group: target is group (%s)\n", gr_ndn->bv_val, 0, 0 );
 100 #else
 101                 Debug( LDAP_DEBUG_ARGS,
 102                         "=> bdb_group: target is group: \"%s\"\n",
 103                         gr_ndn->bv_val, 0, 0 );
 104 #endif
 105         } else {
 106 dn2entry_retry:
 107                 /* can we find group entry */
 108                 rc = bdb_dn2entry_r( be, NULL, gr_ndn, &e, NULL, 0, locker, &lock );
 109                 if( rc ) {
 110                         if ( rc == DB_LOCK_DEADLOCK || rc == DB_LOCK_NOTGRANTED )
 111                                 goto dn2entry_retry;
 112                         if( txn ) {
 113                                 boi->boi_err = rc;
 114                         }
 115                         else {
 116                                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
 117                         }
 118                         return( 1 );
 119                 }
 120                 if (e == NULL) {
 121 #ifdef NEW_LOGGING
 122                         LDAP_LOG( BACK_BDB, DETAIL1,
 123                                 "bdb_group: cannot find group (%s)\n", gr_ndn->bv_val, 0, 0 );
 124 #else
 125                         Debug( LDAP_DEBUG_ACL,
 126                                 "=> bdb_group: cannot find group: \"%s\"\n",
 127                                         gr_ndn->bv_val, 0, 0 );
 128 #endif
 129                         if ( txn == NULL ) {
 130                                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
 131                         }
 132                         return( 1 );
 133                 }
 134 #ifdef NEW_LOGGING
 135                 LDAP_LOG( BACK_BDB, DETAIL1,
 136                         "bdb_group: found group (%s)\n", gr_ndn->bv_val, 0, 0 );
 137 #else
 138                 Debug( LDAP_DEBUG_ACL,
 139                         "=> bdb_group: found group: \"%s\"\n",
 140                         gr_ndn->bv_val, 0, 0 );
 141 #endif
 142         }
 143
 144         /* find it's objectClass and member attribute values
 145          * make sure this is a group entry
 146          * finally test if we can find op_dn in the member attribute value list
 147          */
 148         rc = 1;
 149
 150 #ifdef BDB_ALIASES
 151         if( is_entry_alias( e ) ) {
 152 #ifdef NEW_LOGGING
 153                 LDAP_LOG( BACK_BDB, INFO,
 154                         "bdb_group: group (%s) is an alias\n", gr_ndn->bv_val, 0, 0);
 155 #else
 156                 Debug( LDAP_DEBUG_ACL,
 157                         "<= bdb_group: group is an alias\n", 0, 0, 0 );
 158 #endif
 159                 goto return_results;
 160         }
 161 #endif
 162
 163         if( is_entry_referral( e ) ) {
 164 #ifdef NEW_LOGGING
 165                 LDAP_LOG( BACK_BDB, INFO,
 166                         "bdb_group: group (%s) is a referral.\n", gr_ndn->bv_val, 0, 0 );
 167 #else
 168                 Debug( LDAP_DEBUG_ACL,
 169                         "<= bdb_group: group is a referral\n", 0, 0, 0 );
 170 #endif
 171                 goto return_results;
 172         }
 173
 174         if( !is_entry_objectclass( e, group_oc, 0 ) ) {
 175 #ifdef NEW_LOGGING
 176                 LDAP_LOG( BACK_BDB, ERR,
 177                         "bdb_group: failed to find %s in objectClass.\n",
 178                         group_oc_name, 0, 0 );
 179 #else
 180                 Debug( LDAP_DEBUG_ACL,
 181                         "<= bdb_group: failed to find %s in objectClass\n",
 182                                 group_oc_name, 0, 0 );
 183 #endif
 184                 goto return_results;
 185         }
 186
 187         if ((attr = attr_find(e->e_attrs, group_at)) == NULL) {
 188 #ifdef NEW_LOGGING
 189                 LDAP_LOG( BACK_BDB, INFO,
 190                         "bdb_group: failed to find %s\n", group_at_name, 0, 0 );
 191 #else
 192                 Debug( LDAP_DEBUG_ACL,
 193                         "<= bdb_group: failed to find %s\n",
 194                         group_at_name, 0, 0 );
 195 #endif
 196                 goto return_results;
 197         }
 198
 199 #ifdef NEW_LOGGING
 200         LDAP_LOG( BACK_BDB, ENTRY,
 201                 "bdb_group: found objectClass %s and %s\n",
 202                 group_oc_name, group_at_name, 0 );
 203 #else
 204         Debug( LDAP_DEBUG_ACL,
 205                 "<= bdb_group: found objectClass %s and %s\n",
 206                 group_oc_name, group_at_name, 0 );
 207 #endif
 208
 209         if( value_find( group_at, attr->a_vals, op_ndn ) != LDAP_SUCCESS ) {
 210 #ifdef NEW_LOGGING
 211                 LDAP_LOG( BACK_BDB, DETAIL1,
 212                         "bdb_group: \"%s\" not in \"%s\": %s\n",
 213                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
 214 #else
 215                 Debug( LDAP_DEBUG_ACL,
 216                         "<= bdb_group: \"%s\" not in \"%s\": %s\n",
 217                         op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
 218 #endif
 219                 goto return_results;
 220         }
 221
 222 #ifdef NEW_LOGGING
 223         LDAP_LOG( BACK_BDB, DETAIL1, "bdb_group: %s is in %s: %s\n",
 224                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
 225 #else
 226         Debug( LDAP_DEBUG_ACL,
 227                 "<= bdb_group: \"%s\" is in \"%s\": %s\n",
 228                 op_ndn->bv_val, gr_ndn->bv_val, group_at_name );
 229 #endif
 230
 231         rc = 0;
 232
 233 return_results:
 234         if( target != e ) {
 235                 /* free entry */
 236                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
 237         }
 238
 239         if ( txn == NULL ) {
 240                 LOCK_ID_FREE ( bdb->bi_dbenv, locker );
 241         }
 242
 243 #ifdef NEW_LOGGING
 244         LDAP_LOG( BACK_BDB, ENTRY, "bdb_group: rc=%d\n", rc, 0, 0 );
 245 #else
 246         Debug( LDAP_DEBUG_TRACE, "bdb_group: rc=%d\n", rc, 0, 0 );
 247 #endif
 248
 249         return(rc);
 250 }
 251