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

   1 /* add.c - ldap backend add function */
   2 /* $OpenLDAP$ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 1999-2007 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;
  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         int             do_retry = 1;
  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         lc = ldap_back_getconn( op, rs, LDAP_BACK_SENDERR );
  58         if ( !lc || !ldap_back_dobind( lc, op, rs, LDAP_BACK_SENDERR ) ) {
  59                 lc = NULL;
  60                 goto cleanup;
  61         }
  62
  63         /* Count number of attributes in entry */
  64         for ( i = 1, a = op->oq_add.rs_e->e_attrs; a; i++, a = a->a_next )
  65                 /* just count attrs */ ;
  66
  67         /* Create array of LDAPMods for ldap_add() */
  68         attrs = (LDAPMod **)ch_malloc( sizeof( LDAPMod * )*i
  69                         + sizeof( LDAPMod )*( i - 1 ) );
  70         attrs2 = ( LDAPMod * )&attrs[ i ];
  71
  72         isupdate = be_shadow_update( op );
  73         for ( i = 0, a = op->oq_add.rs_e->e_attrs; a; a = a->a_next ) {
  74                 if ( !isupdate && !get_manageDIT( op ) && a->a_desc->ad_type->sat_no_user_mod  )
  75                 {
  76                         continue;
  77                 }
  78
  79                 attrs[ i ] = &attrs2[ i ];
  80                 attrs[ i ]->mod_op = LDAP_MOD_BVALUES;
  81                 attrs[ i ]->mod_type = a->a_desc->ad_cname.bv_val;
  82
  83                 for ( j = 0; a->a_vals[ j ].bv_val; j++ )
  84                         /* just count vals */ ;
  85                 attrs[i]->mod_vals.modv_bvals =
  86                         ch_malloc( ( j + 1 )*sizeof( struct berval * ) );
  87                 for ( j = 0; a->a_vals[ j ].bv_val; j++ ) {
  88                         attrs[ i ]->mod_vals.modv_bvals[ j ] = &a->a_vals[ j ];
  89                 }
  90                 attrs[ i ]->mod_vals.modv_bvals[ j ] = NULL;
  91                 i++;
  92         }
  93         attrs[ i ] = NULL;
  94
  95 retry:
  96         ctrls = op->o_ctrls;
  97         rs->sr_err = ldap_back_proxy_authz_ctrl( lc, op, rs, &ctrls );
  98         if ( rs->sr_err != LDAP_SUCCESS ) {
  99                 send_ldap_result( op, rs );
 100                 goto cleanup;
 101         }
 102
 103         rs->sr_err = ldap_add_ext( lc->lc_ld, op->o_req_dn.bv_val, attrs,
 104                         ctrls, NULL, &msgid );
 105         rs->sr_err = ldap_back_op_result( lc, op, rs, msgid,
 106                 li->li_timeout[ LDAP_BACK_OP_ADD ], LDAP_BACK_SENDRESULT );
 107         if ( rs->sr_err == LDAP_UNAVAILABLE && do_retry ) {
 108                 do_retry = 0;
 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_proxy_authz_ctrl_free( op, &ctrls );
 112                         goto retry;
 113                 }
 114         }
 115
 116 cleanup:
 117         (void)ldap_back_proxy_authz_ctrl_free( op, &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( op, rs, 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