git.sur5r.net Git - openldap/blob - servers/slapd/back-ldap/attribute.c

   1 /* group.c - ldap 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-ldap.h"
  17
  18
  19 /* return 0 IFF we can retrieve the attributes
  20  * of entry with ndn
  21  */
  22 int
  23 ldap_back_attribute(
  24         Backend *be,
  25         Connection *conn,
  26         Operation *op,
  27         Entry   *target,
  28         struct berval   *ndn,
  29         AttributeDescription *entry_at,
  30         BerVarray *vals
  31 )
  32 {
  33         struct ldapinfo *li = (struct ldapinfo *) be->be_private;
  34         int rc = 1, i, j, count, is_oc;
  35         Attribute *attr = NULL;
  36         BerVarray abv, v;
  37         struct berval mapped = { 0, NULL };
  38         char **vs = NULL;
  39         LDAPMessage     *result = NULL, *e = NULL;
  40         char *gattr[2];
  41         LDAP *ld = NULL;
  42
  43         *vals = NULL;
  44         if (target != NULL && dn_match( &target->e_nname, ndn )) {
  45                 /* we already have a copy of the entry */
  46                 /* attribute and objectclass mapping has already been done */
  47                 if ((attr = attr_find(target->e_attrs, entry_at)) == NULL)
  48                         return(1);
  49
  50                 for ( count = 0; attr->a_vals[count].bv_val != NULL; count++ ) { }
  51                 v = (BerVarray) ch_calloc( (count + 1), sizeof(struct berval) );
  52                 if (v != NULL) {
  53                         for ( j = 0, abv = attr->a_vals; --count >= 0; abv++ ) {
  54                                 if ( abv->bv_len > 0 ) {
  55                                         ber_dupbv( &v[j], abv );
  56                                         if( v[j].bv_val == NULL )
  57                                                 break;
  58                                 }
  59                         }
  60                         v[j].bv_val = NULL;
  61                         *vals = v;
  62                         return 0;
  63                 }
  64
  65         }
  66         ldap_back_map(&li->at_map, &entry_at->ad_cname, &mapped, 0);
  67         if (mapped.bv_val == NULL) {
  68                 return 1;
  69         }
  70
  71         if (ldap_initialize(&ld, li->url) != LDAP_SUCCESS) {
  72                 return 1;
  73         }
  74
  75         if (ldap_bind_s(ld, li->binddn, li->bindpw, LDAP_AUTH_SIMPLE) != LDAP_SUCCESS) {
  76                 goto cleanup;
  77         }
  78
  79         gattr[0] = mapped.bv_val;
  80         gattr[1] = NULL;
  81         if (ldap_search_ext_s(ld, ndn->bv_val, LDAP_SCOPE_BASE, "(objectclass=*)",
  82                                 gattr, 0, NULL, NULL, LDAP_NO_LIMIT,
  83                                 LDAP_NO_LIMIT, &result) != LDAP_SUCCESS)
  84         {
  85                 goto cleanup;
  86         }
  87
  88         if ((e = ldap_first_entry(ld, result)) == NULL) {
  89                 goto cleanup;
  90         }
  91
  92         vs = ldap_get_values(ld, e, mapped.bv_val);
  93         if (vs == NULL) {
  94                 goto cleanup;
  95         }
  96
  97         for ( count = 0; vs[count] != NULL; count++ ) { }
  98         v = (BerVarray) ch_calloc( (count + 1), sizeof(struct berval) );
  99         if (v == NULL) {
 100                 goto cleanup;
 101         }
 102
 103         is_oc = (strcasecmp("objectclass", mapped.bv_val) == 0);
 104         for ( i = 0, j = 0; i < count; i++) {
 105                 ber_str2bv(vs[i], 0, 0, &v[j] );
 106                 if (!is_oc) {
 107                         if( v[j].bv_val == NULL )
 108                                 ch_free(vs[i]);
 109                         else
 110                                 j++;
 111                 } else {
 112                         ldap_back_map(&li->oc_map, &v[j], &mapped, 1);
 113                         if (mapped.bv_val) {
 114                                 ber_dupbv( &v[j], &mapped );
 115                                 if (v[j].bv_val)
 116                                         j++;
 117                         }
 118                         ch_free(vs[i]);
 119                 }
 120         }
 121         v[j].bv_val = NULL;
 122         *vals = v;
 123         rc = 0;
 124         ch_free(vs);
 125         vs = NULL;
 126
 127 cleanup:
 128         if (vs) {
 129                 ldap_value_free(vs);
 130         }
 131         if (result) {
 132                 ldap_msgfree(result);
 133         }
 134         ldap_unbind(ld);
 135
 136         return(rc);
 137 }
 138