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

   1 /*
   2  * Copyright 1998-2003 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( Operation *op, SlapReply *rs )
  81 {
  82         struct metainfo *li = ( struct metainfo * )op->o_bd->be_private;
  83         struct metaconn *lc;
  84         int i, candidate = -1;
  85         Attribute *a;
  86         LDAPMod **attrs;
  87         struct berval mdn = { 0, NULL }, mapped;
  88
  89 #ifdef NEW_LOGGING
  90         LDAP_LOG( BACK_META, ENTRY, "meta_back_add: %s\n",
  91                         op->o_req_dn.bv_val, 0, 0 );
  92 #else /* !NEW_LOGGING */
  93         Debug(LDAP_DEBUG_ARGS, "==> meta_back_add: %s\n",
  94                         op->o_req_dn.bv_val, 0, 0 );
  95 #endif /* !NEW_LOGGING */
  96
  97         /*
  98          * get the current connection
  99          */
 100         lc = meta_back_getconn( op, rs, META_OP_REQUIRE_SINGLE,
 101                         &op->o_req_ndn, &candidate );
 102         if ( !lc ) {
 103                 send_ldap_result( op, rs );
 104         }
 105
 106         if ( !meta_back_dobind( lc, op )
 107                         || !meta_back_is_valid( lc, candidate ) ) {
 108                 rs->sr_err = LDAP_OTHER;
 109                 send_ldap_result( op, rs );
 110                 return -1;
 111         }
 112
 113         /*
 114          * Rewrite the add dn, if needed
 115          */
 116         switch ( rewrite_session( li->targets[ candidate ]->rwinfo,
 117                                 "addDn", op->o_req_dn.bv_val, op->o_conn,
 118                                 &mdn.bv_val ) ) {
 119         case REWRITE_REGEXEC_OK:
 120                 if ( mdn.bv_val != NULL && mdn.bv_val[ 0 ] != '\0' ) {
 121                         mdn.bv_len = strlen( mdn.bv_val );
 122                 } else {
 123                         mdn = op->o_req_dn;
 124                 }
 125
 126 #ifdef NEW_LOGGING
 127                 LDAP_LOG( BACK_META, DETAIL1,
 128                                 "[rw] addDn: \"%s\" -> \"%s\"\n",
 129                                 op->o_req_dn.bv_val, mdn.bv_val, 0 );
 130 #else /* !NEW_LOGGING */
 131                 Debug( LDAP_DEBUG_ARGS, "rw> addDn: \"%s\" -> \"%s\"\n",
 132                                 op->o_req_dn.bv_val, mdn.bv_val, 0 );
 133 #endif /* !NEW_LOGGING */
 134                 break;
 135
 136         case REWRITE_REGEXEC_UNWILLING:
 137                 rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
 138                 rs->sr_text = "Operation not allowed";
 139                 send_ldap_result( op, rs );
 140                 return -1;
 141
 142         case REWRITE_REGEXEC_ERR:
 143                 rs->sr_err = LDAP_OTHER;
 144                 rs->sr_text = "Rewrite error";
 145                 send_ldap_result( op, rs );
 146                 return -1;
 147         }
 148
 149         /* Count number of attributes in entry */
 150         for ( i = 1, a = op->oq_add.rs_e->e_attrs; a; i++, a = a->a_next );
 151
 152         /* Create array of LDAPMods for ldap_add() */
 153         attrs = ch_malloc( sizeof( LDAPMod * )*i );
 154
 155         for ( i = 0, a = op->oq_add.rs_e->e_attrs; a; a = a->a_next ) {
 156                 int j;
 157
 158                 if ( a->a_desc->ad_type->sat_no_user_mod  ) {
 159                         continue;
 160                 }
 161
 162                 ldap_back_map( &li->targets[ candidate ]->at_map,
 163                                 &a->a_desc->ad_cname, &mapped, BACKLDAP_MAP );
 164                 if ( mapped.bv_val == NULL || mapped.bv_val[0] == '\0' ) {
 165                         continue;
 166                 }
 167
 168                 attrs[ i ] = ch_malloc( sizeof( LDAPMod ) );
 169                 if ( attrs[ i ] == NULL ) {
 170                         continue;
 171                 }
 172                 attrs[ i ]->mod_op = LDAP_MOD_BVALUES;
 173                 attrs[ i ]->mod_type = mapped.bv_val;
 174
 175                 /*
 176                  * FIXME: dn-valued attrs should be rewritten
 177                  * to allow their use in ACLs at the back-ldap
 178                  * level.
 179                  */
 180                 if ( strcmp( a->a_desc->ad_type->sat_syntax->ssyn_oid,
 181                                         SLAPD_DN_SYNTAX ) == 0 ) {
 182                         ldap_dnattr_rewrite( li->targets[ candidate ]->rwinfo,
 183                                         a->a_vals, op->o_conn );
 184                 }
 185
 186                 for ( j = 0; a->a_vals[ j ].bv_val; j++ );
 187                 attrs[ i ]->mod_vals.modv_bvals = ch_malloc((j+1)*sizeof(struct berval *));
 188                 for ( j = 0; a->a_vals[ j ].bv_val; j++ ) {
 189                         attrs[ i ]->mod_vals.modv_bvals[ j ] = &a->a_vals[ j ];
 190                 }
 191                 attrs[ i ]->mod_vals.modv_bvals[ j ] = NULL;
 192                 i++;
 193         }
 194         attrs[ i ] = NULL;
 195
 196         ldap_add_s( lc->conns[ candidate ].ld, mdn.bv_val, attrs );
 197         for ( --i; i >= 0; --i ) {
 198                 free( attrs[ i ]->mod_vals.modv_bvals );
 199                 free( attrs[ i ] );
 200         }
 201         free( attrs );
 202         if ( mdn.bv_val != op->oq_add.rs_e->e_dn ) {
 203                 free( mdn.bv_val );
 204         }
 205         return meta_back_op_result( lc, op, rs );
 206 }
 207