git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/group.c

   1 /* group.c - ldbm backend acl group routine */
   2 /*
   3  * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6
   7 #include "portable.h"
   8
   9 #include <stdio.h>
  10
  11 #include <ac/socket.h>
  12 #include <ac/string.h>
  13
  14 #include "slap.h"
  15 #include "back-ldbm.h"
  16 #include "proto-back-ldbm.h"
  17
  18
  19 /* return 0 IFF op_dn is a value in member attribute
  20  * of entry with gr_dn AND that entry has an objectClass
  21  * value of groupOfNames
  22  */
  23 int
  24 ldbm_back_group(
  25         Backend *be,
  26         Entry   *target,
  27         char    *gr_ndn,
  28         char    *op_ndn,
  29         char    *objectclassValue,
  30         char    *groupattrName
  31 )
  32 {
  33         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
  34         Entry        *e;
  35         int          rc = 1;
  36
  37         Attribute   *attr;
  38         struct berval bv;
  39
  40         Debug( LDAP_DEBUG_ARGS,
  41                 "=> ldbm_back_group: gr dn: \"%s\"\n",
  42                 gr_ndn, 0, 0 );
  43         Debug( LDAP_DEBUG_ARGS,
  44                 "=> ldbm_back_group: op dn: \"%s\"\n",
  45                 op_ndn, 0, 0 );
  46         Debug( LDAP_DEBUG_ARGS,
  47                 "=> ldbm_back_group: objectClass: \"%s\" attrName: \"%s\"\n",
  48                 objectclassValue, groupattrName, 0 );
  49
  50         Debug( LDAP_DEBUG_ARGS,
  51                 "=> ldbm_back_group: tr dn: \"%s\"\n",
  52                 target->e_ndn, 0, 0 );
  53
  54         if (strcmp(target->e_ndn, gr_ndn) == 0) {
  55                 /* we already have a LOCKED copy of the entry */
  56                 e = target;
  57                 Debug( LDAP_DEBUG_ARGS,
  58                         "=> ldbm_back_group: target is group: \"%s\"\n",
  59                         gr_ndn, 0, 0 );
  60
  61         } else {
  62                 /* can we find group entry with reader lock */
  63                 if ((e = dn2entry_r(be, gr_ndn, NULL )) == NULL) {
  64                         Debug( LDAP_DEBUG_ACL,
  65                                 "=> ldbm_back_group: cannot find group: \"%s\"\n",
  66                                         gr_ndn, 0, 0 );
  67                         return( 1 );
  68                 }
  69
  70                 Debug( LDAP_DEBUG_ACL,
  71                         "=> ldbm_back_group: found group: \"%s\"\n",
  72                         gr_ndn, 0, 0 );
  73     }
  74
  75         /* find it's objectClass and member attribute values
  76          * make sure this is a group entry
  77          * finally test if we can find op_dn in the member attribute value list *
  78          */
  79
  80         rc = 1;
  81
  82         if ((attr = attr_find(e->e_attrs, "objectclass")) == NULL)  {
  83                 Debug( LDAP_DEBUG_ACL,
  84                         "<= ldbm_back_group: failed to find objectClass\n", 0, 0, 0 );
  85                 goto return_results;
  86         }
  87
  88         bv.bv_val = "ALIAS";
  89         bv.bv_len = sizeof("ALIAS")-1;
  90
  91         if ( value_find(attr->a_vals, &bv, attr->a_syntax, 1) == 0) {
  92                 Debug( LDAP_DEBUG_ACL,
  93                         "<= ldbm_back_group: group is an alias\n", 0, 0, 0 );
  94                 goto return_results;
  95         }
  96
  97         bv.bv_val = "REFERRAL";
  98         bv.bv_len = sizeof("REFERRAL")-1;
  99
 100         if ( value_find(attr->a_vals, &bv, attr->a_syntax, 1) == 0) {
 101                 Debug( LDAP_DEBUG_ACL,
 102                         "<= ldbm_back_group: group is a referral\n",
 103                         0, 0, 0 );
 104                 goto return_results;
 105         }
 106
 107         bv.bv_val = objectclassValue;
 108         bv.bv_len = strlen( bv.bv_val );
 109
 110         if (value_find(attr->a_vals, &bv, attr->a_syntax, 1) != 0) {
 111                 Debug( LDAP_DEBUG_ACL,
 112                         "<= ldbm_back_group: failed to find %s in objectClass\n",
 113                                 objectclassValue, 0, 0 );
 114                 goto return_results;
 115         }
 116
 117         if ((attr = attr_find(e->e_attrs, groupattrName)) == NULL) {
 118                 Debug( LDAP_DEBUG_ACL,
 119                         "<= ldbm_back_group: failed to find %s\n",
 120                         groupattrName, 0, 0 );
 121                 goto return_results;
 122         }
 123
 124         Debug( LDAP_DEBUG_ACL,
 125                 "<= ldbm_back_group: found objectClass %s and %s\n",
 126                 objectclassValue, groupattrName, 0 );
 127
 128         bv.bv_val = op_ndn;
 129         bv.bv_len = strlen( op_ndn );
 130
 131         if( value_find( attr->a_vals, &bv, attr->a_syntax, 1) != 0 )
 132         {
 133                 Debug( LDAP_DEBUG_ACL,
 134                         "<= ldbm_back_group: \"%s\" not in \"%s\": %s\n",
 135                         op_ndn, gr_ndn, groupattrName );
 136                 goto return_results;
 137         }
 138
 139         Debug( LDAP_DEBUG_ACL,
 140                 "<= ldbm_back_group: \"%s\" is in \"%s\": %s\n",
 141                 op_ndn, gr_ndn, groupattrName );
 142
 143         rc = 0;
 144
 145 return_results:
 146         if( target != e ) {
 147                 /* free entry and reader lock */
 148                 cache_return_entry_r( &li->li_cache, e );
 149         }
 150
 151         Debug( LDAP_DEBUG_TRACE, "ldbm_back_group: rc=%d\n", rc, 0, 0 );
 152         return(rc);
 153 }
 154