external/bsd/openldap/dist/servers/slapd/back-ldap/add.c

   1 /* add.c - ldap backend add function */
   2 /* $OpenLDAP: pkg/ldap/servers/slapd/back-ldap/add.c,v 1.61.2.5 2008/02/11 23:26:46 kurt Exp $ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 1999-2008 The OpenLDAP Foundation.
   6  * Portions Copyright 2000-2003 Pierangelo Masarati.
   7  * Portions Copyright 1999-2003 Howard Chu.
   8  * All rights reserved.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted only as authorized by the OpenLDAP
  12  * Public License.
  13  *
  14  * A copy of this license is available in the file LICENSE in the
  15  * top-level directory of the distribution or, alternatively, at
  16  * <http://www.OpenLDAP.org/license.html>.
  17  */
  18 /* ACKNOWLEDGEMENTS:
  19  * This work was initially developed by the Howard Chu for inclusion
  20  * in OpenLDAP Software and subsequently enhanced by Pierangelo
  21  * Masarati.
  22  */
  23
  24 #include "portable.h"
  25
  26 #include <stdio.h>
  27
  28 #include <ac/string.h>
  29 #include <ac/socket.h>
  30
  31 #include "slap.h"
  32 #include "back-ldap.h"
  33
  34 int
  35 ldap_back_add(
  36         Operation       *op,
  37         SlapReply       *rs )
  38 {
  39         ldapinfo_t              *li = (ldapinfo_t *)op->o_bd->be_private;
  40
  41         ldapconn_t              *lc = NULL;
  42         int                     i = 0,
  43                                 j = 0;
  44         Attribute               *a;
  45         LDAPMod                 **attrs = NULL,
  46                                 *attrs2 = NULL;
  47         ber_int_t               msgid;
  48         int                     isupdate;
  49         ldap_back_send_t        retrying = LDAP_BACK_RETRYING;
  50         LDAPControl             **ctrls = NULL;
  51
  52         rs->sr_err = LDAP_SUCCESS;
  53
  54         Debug( LDAP_DEBUG_ARGS, "==> ldap_back_add(\"%s\")\n",
  55                         op->o_req_dn.bv_val, 0, 0 );
  56
  57         if ( !ldap_back_dobind( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
  58                 lc = NULL;
  59                 goto cleanup;
  60         }
  61
  62         /* Count number of attributes in entry */
  63         for ( i = 1, a = op->oq_add.rs_e->e_attrs; a; i++, a = a->a_next )
  64                 /* just count attrs */ ;
  65
  66         /* Create array of LDAPMods for ldap_add() */
  67         attrs = (LDAPMod **)ch_malloc( sizeof( LDAPMod * )*i
  68                         + sizeof( LDAPMod )*( i - 1 ) );
  69         attrs2 = ( LDAPMod * )&attrs[ i ];
  70
  71         isupdate = be_shadow_update( op );
  72         for ( i = 0, a = op->oq_add.rs_e->e_attrs; a; a = a->a_next ) {
  73                 if ( !isupdate && !get_relax( op ) && a->a_desc->ad_type->sat_no_user_mod  )
  74                 {
  75                         continue;
  76                 }
  77
  78                 attrs[ i ] = &attrs2[ i ];
  79                 attrs[ i ]->mod_op = LDAP_MOD_BVALUES;
  80                 attrs[ i ]->mod_type = a->a_desc->ad_cname.bv_val;
  81
  82                 for ( j = 0; a->a_vals[ j ].bv_val; j++ )
  83                         /* just count vals */ ;
  84                 attrs[i]->mod_vals.modv_bvals =
  85                         ch_malloc( ( j + 1 )*sizeof( struct berval * ) );
  86                 for ( j = 0; a->a_vals[ j ].bv_val; j++ ) {
  87                         attrs[ i ]->mod_vals.modv_bvals[ j ] = &a->a_vals[ j ];
  88                 }
  89                 attrs[ i ]->mod_vals.modv_bvals[ j ] = NULL;
  90                 i++;
  91         }
  92         attrs[ i ] = NULL;
  93
  94 retry:
  95         ctrls = op->o_ctrls;
  96         rs->sr_err = ldap_back_controls_add( op, rs, lc, &ctrls );
  97         if ( rs->sr_err != LDAP_SUCCESS ) {
  98                 send_ldap_result( op, rs );
  99                 goto cleanup;
 100         }
 101
 102         rs->sr_err = ldap_add_ext( lc->lc_ld, op->o_req_dn.bv_val, attrs,
 103                         ctrls, NULL, &msgid );
 104         rs->sr_err = ldap_back_op_result( lc, op, rs, msgid,
 105                 li->li_timeout[ SLAP_OP_ADD ],
 106                 ( LDAP_BACK_SENDRESULT | retrying ) );
 107         if ( rs->sr_err == LDAP_UNAVAILABLE && retrying ) {
 108                 retrying &= ~LDAP_BACK_RETRYING;
 109                 if ( ldap_back_retry( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
 110                         /* if the identity changed, there might be need to re-authz */
 111                         (void)ldap_back_controls_free( op, rs, &ctrls );
 112                         goto retry;
 113                 }
 114         }
 115
 116 cleanup:
 117         (void)ldap_back_controls_free( op, rs, &ctrls );
 118
 119         if ( attrs ) {
 120                 for ( --i; i >= 0; --i ) {
 121                         ch_free( attrs[ i ]->mod_vals.modv_bvals );
 122                 }
 123                 ch_free( attrs );
 124         }
 125
 126         if ( lc ) {
 127                 ldap_back_release_conn( li, lc );
 128         }
 129
 130         Debug( LDAP_DEBUG_ARGS, "<== ldap_back_add(\"%s\"): %d\n",
 131                         op->o_req_dn.bv_val, rs->sr_err, 0 );
 132
 133         return rs->sr_err;
 134 }
 135