git.sur5r.net Git - openldap/blob - servers/slapd/back-meta/add.c

   1 /*
   2  * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
   3  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   4  *
   5  * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
   6  *
   7  * This work has been developed to fulfill the requirements
   8  * of SysNet s.n.c. <http:www.sys-net.it> and it has been donated
   9  * to the OpenLDAP Foundation in the hope that it may be useful
  10  * to the Open Source community, but WITHOUT ANY WARRANTY.
  11  *
  12  * Permission is granted to anyone to use this software for any purpose
  13  * on any computer system, and to alter it and redistribute it, subject
  14  * to the following restrictions:
  15  *
  16  * 1. The author and SysNet s.n.c. are not responsible for the consequences
  17  *    of use of this software, no matter how awful, even if they arise from
  18  *    flaws in it.
  19  *
  20  * 2. The origin of this software must not be misrepresented, either by
  21  *    explicit claim or by omission.  Since few users ever read sources,
  22  *    credits should appear in the documentation.
  23  *
  24  * 3. Altered versions must be plainly marked as such, and must not be
  25  *    misrepresented as being the original software.  Since few users
  26  *    ever read sources, credits should appear in the documentation.
  27  *    SysNet s.n.c. cannot be responsible for the consequences of the
  28  *    alterations.
  29  *
  30  * 4. This notice may not be removed or altered.
  31  *
  32  *
  33  * This software is based on the backend back-ldap, implemented
  34  * by Howard Chu <hyc@highlandsun.com>, and modified by Mark Valence
  35  * <kurash@sassafras.com>, Pierangelo Masarati <ando@sys-net.it> and other
  36  * contributors. The contribution of the original software to the present
  37  * implementation is acknowledged in this copyright statement.
  38  *
  39  * A special acknowledgement goes to Howard for the overall architecture
  40  * (and for borrowing large pieces of code), and to Mark, who implemented
  41  * from scratch the attribute/objectclass mapping.
  42  *
  43  * The original copyright statement follows.
  44  *
  45  * Copyright 1999, Howard Chu, All rights reserved. <hyc@highlandsun.com>
  46  *
  47  * Permission is granted to anyone to use this software for any purpose
  48  * on any computer system, and to alter it and redistribute it, subject
  49  * to the following restrictions:
  50  *
  51  * 1. The author is not responsible for the consequences of use of this
  52  *    software, no matter how awful, even if they arise from flaws in it.
  53  *
  54  * 2. The origin of this software must not be misrepresented, either by
  55  *    explicit claim or by omission.  Since few users ever read sources,
  56  *    credits should appear in the documentation.
  57  *
  58  * 3. Altered versions must be plainly marked as such, and must not be
  59  *    misrepresented as being the original software.  Since few users
  60  *    ever read sources, credits should appear in the
  61  *    documentation.
  62  *
  63  * 4. This notice may not be removed or altered.
  64  *
  65  */
  66
  67
  68 #include "portable.h"
  69
  70 #include <stdio.h>
  71
  72 #include <ac/string.h>
  73 #include <ac/socket.h>
  74
  75 #include "slap.h"
  76 #include "../back-ldap/back-ldap.h"
  77 #include "back-meta.h"
  78
  79 int
  80 meta_back_add(
  81                 Backend         *be,
  82                 Connection      *conn,
  83                 Operation       *op,
  84                 Entry           *e
  85 )
  86 {
  87         struct metainfo *li = ( struct metainfo * )be->be_private;
  88         struct metaconn *lc;
  89         int i, candidate = -1;
  90         Attribute *a;
  91         LDAPMod **attrs;
  92         struct berval mdn = { 0, NULL }, mapped;
  93
  94 #ifdef NEW_LOGGING
  95         LDAP_LOG( BACK_META, ENTRY, "meta_back_add: %s\n", e->e_dn, 0, 0 );
  96 #else /* !NEW_LOGGING */
  97         Debug(LDAP_DEBUG_ARGS, "==> meta_back_add: %s\n%s%s", e->e_dn, "", "");
  98 #endif /* !NEW_LOGGING */
  99
 100         /*
 101          * get the current connection
 102          */
 103         lc = meta_back_getconn( li, conn, op, META_OP_REQUIRE_SINGLE,
 104                         &e->e_nname, &candidate );
 105         if ( !lc || !meta_back_dobind( lc, op ) || !meta_back_is_valid( lc, candidate ) ) {
 106                 send_ldap_result( conn, op, LDAP_OTHER,
 107                                 NULL, NULL, NULL, NULL );
 108                 return -1;
 109         }
 110
 111         /*
 112          * Rewrite the add dn, if needed
 113          */
 114         switch ( rewrite_session( li->targets[ candidate ]->rwinfo,
 115                                 "addDn", e->e_dn, conn, &mdn.bv_val )) {
 116         case REWRITE_REGEXEC_OK:
 117                 if ( mdn.bv_val != NULL && mdn.bv_val[ 0 ] != '\0' ) {
 118                         mdn.bv_len = strlen( mdn.bv_val );
 119                 } else {
 120                         mdn = e->e_name;
 121                 }
 122
 123 #ifdef NEW_LOGGING
 124                 LDAP_LOG( BACK_META, DETAIL1,
 125                         "[rw] addDn: \"%s\" -> \"%s\"\n", e->e_dn, mdn.bv_val, 0 );
 126 #else /* !NEW_LOGGING */
 127                 Debug( LDAP_DEBUG_ARGS, "rw> addDn: \"%s\" -> \"%s\"\n%s",
 128                                 e->e_dn, mdn.bv_val, "" );
 129 #endif /* !NEW_LOGGING */
 130                 break;
 131
 132         case REWRITE_REGEXEC_UNWILLING:
 133                 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
 134                                 NULL, NULL, NULL, NULL );
 135                 return -1;
 136
 137         case REWRITE_REGEXEC_ERR:
 138                 send_ldap_result( conn, op, LDAP_OTHER,
 139                                 NULL, NULL, NULL, NULL );
 140                 return -1;
 141         }
 142
 143         /* Count number of attributes in entry */
 144         for ( i = 1, a = e->e_attrs; a; i++, a = a->a_next );
 145
 146         /* Create array of LDAPMods for ldap_add() */
 147         attrs = ch_malloc( sizeof( LDAPMod * )*i );
 148
 149         for ( i = 0, a = e->e_attrs; a; a = a->a_next ) {
 150                 int j;
 151
 152                 if ( a->a_desc->ad_type->sat_no_user_mod  ) {
 153                         continue;
 154                 }
 155
 156                 ldap_back_map( &li->targets[ candidate ]->at_map,
 157                                 &a->a_desc->ad_cname, &mapped, 0);
 158                 if ( mapped.bv_val == NULL ) {
 159                         continue;
 160                 }
 161
 162                 attrs[ i ] = ch_malloc( sizeof( LDAPMod ) );
 163                 if ( attrs[ i ] == NULL ) {
 164                         continue;
 165                 }
 166                 attrs[ i ]->mod_op = LDAP_MOD_BVALUES;
 167                 attrs[ i ]->mod_type = mapped.bv_val;
 168
 169                 /*
 170                  * FIXME: dn-valued attrs should be rewritten
 171                  * to allow their use in ACLs at the back-ldap
 172                  * level.
 173                  */
 174                 if ( strcmp( a->a_desc->ad_type->sat_syntax->ssyn_oid,
 175                                         SLAPD_DN_SYNTAX ) == 0 ) {
 176                         ldap_dnattr_rewrite( li->targets[ candidate ]->rwinfo,
 177                                         a->a_vals, conn );
 178                 }
 179
 180                 for (j=0; a->a_vals[ j ].bv_val; j++);
 181                 attrs[ i ]->mod_vals.modv_bvals = ch_malloc((j+1)*sizeof(struct berval *));
 182                 for (j=0; a->a_vals[ j ].bv_val; j++)
 183                         attrs[ i ]->mod_vals.modv_bvals[ j ] = &a->a_vals[ j ];
 184                 attrs[ i ]->mod_vals.modv_bvals[ j ] = NULL;
 185                 i++;
 186         }
 187         attrs[ i ] = NULL;
 188
 189         ldap_add_s( lc->conns[ candidate ].ld, mdn.bv_val, attrs );
 190         for ( --i; i >= 0; --i ) {
 191                 free( attrs[ i ]->mod_vals.modv_bvals );
 192                 free( attrs[ i ] );
 193         }
 194         free( attrs );
 195         if ( mdn.bv_val != e->e_dn ) {
 196                 free( mdn.bv_val );
 197         }
 198         return meta_back_op_result( lc, op );
 199 }
 200