X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fslapi%2Fslapi_ops.c;h=3e32409ecf40e4adf29a0995d9fdf769ab298acf;hb=173330187ef1a4139e2e4c4fb30ad23832e40f77;hp=17b566b6f37d03c19e7c8ca91db69e19b35c2b37;hpb=146c0085d3c74eba7e5a9962fb26f270cd6d99a9;p=openldap diff --git a/servers/slapd/slapi/slapi_ops.c b/servers/slapd/slapi/slapi_ops.c index 17b566b6f3..3e32409ecf 100644 --- a/servers/slapd/slapi/slapi_ops.c +++ b/servers/slapd/slapi/slapi_ops.c @@ -1,1279 +1,1264 @@ -/* - * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved. - * COPYING RESTRICTIONS APPLY, see COPYRIGHT file - */ -/* - * (C) Copyright IBM Corp. 1997,2002 - * Redistribution and use in source and binary forms are permitted - * provided that this notice is preserved and that due credit is - * given to IBM Corporation. This software is provided ``as is'' - * without express or implied warranty. - */ - -#include "portable.h" -#include "slapi_common.h" -#include -#include -#include -#include "../../../libraries/liblber/lber-int.h" - - -int bvptr2obj( struct berval **bvptr, struct berval **bvobj ); - -static void -internal_result_v3( - Connection *conn, - Operation *op, - ber_int_t err, - const char *matched, - const char *text, - BerVarray referrals, - LDAPControl **ctrls ) -{ - return; -} - -static int -internal_search_entry( - Backend *be, - Connection *conn, - Operation *op, - Entry *e, - AttributeName *attrs, - int attrsonly, - LDAPControl **ctrls ) -{ - char *ent2str = NULL; - int nentries = 0, len = 0, i = 0; - Slapi_Entry **head = NULL, **tp; - - ent2str = slapi_entry2str( e, &len ); - if ( ent2str == NULL ) { - return 1; - } - - slapi_pblock_get( (Slapi_PBlock *)op->o_pb, - SLAPI_NENTRIES, &nentries ); - slapi_pblock_get( (Slapi_PBlock *)op->o_pb, - SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, &head ); - - i = nentries + 1; - if ( nentries == 0 ) { - tp = (Slapi_Entry **)slapi_ch_malloc( 2 * sizeof(Slapi_Entry *) ); - if ( tp == NULL ) { - return 1; - } - - tp[ 0 ] = (Slapi_Entry *)str2entry( ent2str ); - if ( tp[ 0 ] == NULL ) { - return 1; - } - - } else { - tp = (Slapi_Entry **)slapi_ch_realloc( (char *)head, - sizeof(Slapi_Entry *) * ( i + 1 ) ); - if ( tp == NULL ) { - return 1; - } - tp[ i - 1 ] = (Slapi_Entry *)str2entry( ent2str ); - if ( tp[ i - 1 ] == NULL ) { - return 1; - } - } - tp[ i ] = NULL; - - slapi_pblock_set( (Slapi_PBlock *)op->o_pb, - SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, (void *)tp ); - slapi_pblock_set( (Slapi_PBlock *)op->o_pb, - SLAPI_NENTRIES, (void *)i ); - - return LDAP_SUCCESS; -} - -static void -internal_search_result( - Connection *conn, - Operation *op, - ber_int_t err, - const char *matched, - const char *text, - BerVarray refs, - LDAPControl **ctrls, - int nentries ) -{ - slapi_pblock_set( (Slapi_PBlock *)op->o_pb, - SLAPI_NENTRIES, (void *)nentries ); - - return; -} - -static void -internal_result_ext( - Connection *conn, - Operation *op, - ber_int_t errnum, - const char *matched, - const char *text, - BerVarray refs, - const char *rspoid, - struct berval *rspdata, - LDAPControl **ctrls ) -{ - return; -} - -static int -internal_search_reference( - Backend *be, - Connection *conn, - Operation *op, - Entry *e, - BerVarray refs, - LDAPControl **ctrls, - BerVarray *v2refs ) -{ - return LDAP_SUCCESS; -} - -static Connection * -fakeConnection( - char *DN, - int OpType ) -{ - Connection *pConn, *c; - ber_len_t max = sockbuf_max_incoming; - - pConn = (Connection *) slapi_ch_calloc(1, sizeof(Connection)); - if (pConn == NULL) { - return (Connection *)NULL; - } - - LDAP_STAILQ_INIT( &pConn->c_pending_ops ); - - pConn->c_pending_ops.stqh_first = - (Operation *) slapi_ch_calloc( 1, sizeof(Operation) ); - if ( pConn->c_pending_ops.stqh_first == NULL ) { - slapi_ch_free( (void **)&pConn ); - return (Connection *)NULL; - } - - pConn->c_pending_ops.stqh_first->o_pb = - (Slapi_PBlock *) slapi_pblock_new(); - if ( pConn->c_pending_ops.stqh_first->o_pb == NULL ) { - slapi_ch_free( (void **)&pConn->c_pending_ops.stqh_first ); - slapi_ch_free( (void **)&pConn ); - return (Connection *)NULL; - } - - c = pConn; - - /* operation object */ - c->c_pending_ops.stqh_first->o_tag = OpType; - c->c_pending_ops.stqh_first->o_protocol = LDAP_VERSION3; - c->c_pending_ops.stqh_first->o_authmech.bv_val = NULL; - c->c_pending_ops.stqh_first->o_authmech.bv_len = 0; - c->c_pending_ops.stqh_first->o_time = slap_get_time(); - c->c_pending_ops.stqh_first->o_do_not_cache = 1; - c->c_pending_ops.stqh_first->o_threadctx = ldap_pvt_thread_pool_context( &connection_pool ); - - /* connection object */ - c->c_authmech.bv_val = NULL; - c->c_authmech.bv_len = 0; - c->c_dn.bv_val = NULL; - c->c_dn.bv_len = 0; - c->c_ndn.bv_val = NULL; - c->c_ndn.bv_len = 0; - c->c_groups = NULL; - - c->c_listener = NULL; - c->c_peer_domain.bv_val = NULL; - c->c_peer_domain.bv_len = 0; - c->c_peer_name.bv_val = NULL; - c->c_peer_name.bv_len = 0; - - LDAP_STAILQ_INIT( &c->c_ops ); - - c->c_sasl_bind_mech.bv_val = NULL; - c->c_sasl_bind_mech.bv_len = 0; - c->c_sasl_context = NULL; - c->c_sasl_extra = NULL; - - c->c_sb = ber_sockbuf_alloc( ); - - ber_sockbuf_ctrl( c->c_sb, LBER_SB_OPT_SET_MAX_INCOMING, &max ); - - c->c_currentber = NULL; - - /* should check status of thread calls */ - ldap_pvt_thread_mutex_init( &c->c_mutex ); - ldap_pvt_thread_mutex_init( &c->c_write_mutex ); - ldap_pvt_thread_cond_init( &c->c_write_cv ); - - c->c_n_ops_received = 0; - c->c_n_ops_executing = 0; - c->c_n_ops_pending = 0; - c->c_n_ops_completed = 0; - - c->c_n_get = 0; - c->c_n_read = 0; - c->c_n_write = 0; - - c->c_protocol = LDAP_VERSION3; - - c->c_activitytime = c->c_starttime = slap_get_time(); - - c->c_connid = 0; - - c->c_conn_state = 0x01; /* SLAP_C_ACTIVE */ - c->c_struct_state = 0x02; /* SLAP_C_USED */ - - c->c_ssf = c->c_transport_ssf = 0; - c->c_tls_ssf = 0; - - backend_connection_init( c ); - - pConn->c_send_ldap_result = internal_result_v3; - pConn->c_send_search_entry = internal_search_entry; - pConn->c_send_search_result = internal_search_result; - pConn->c_send_ldap_extended = internal_result_ext; - pConn->c_send_search_reference = internal_search_reference; - - return pConn; -} - -/* - * Function : ValuestoBValues - * Convert an array of char ptrs to an array of berval ptrs. - * return value : LDAP_SUCCESS - * LDAP_NO_MEMORY - * LDAP_OTHER -*/ - -static int -ValuesToBValues( - char **ppValue, - struct berval ***pppBV ) -{ - int rc = LDAP_SUCCESS; - int i; - struct berval *pTmpBV; - struct berval **ppNewBV; - - /* count the number of char ptrs. */ - for ( i = 0; ppValue != NULL && ppValue[i] != NULL; i++ ) { - ; /* NULL */ - } - - if ( i == 0 ) { - rc = LDAP_OTHER; - } else { - *pppBV = ppNewBV = (struct berval **)slapi_ch_malloc( (i+1)*(sizeof(struct berval *)) ); - if ( *pppBV == NULL ) { - rc = LDAP_NO_MEMORY; - } else { - while ( ppValue != NULL && *ppValue != NULL && rc == LDAP_SUCCESS ) { - pTmpBV = (struct berval *)slapi_ch_malloc(sizeof(struct berval)); - if ( pTmpBV == NULL) { - rc = LDAP_NO_MEMORY; - } else { - pTmpBV->bv_val = slapi_ch_strdup(*ppValue); - if ( pTmpBV->bv_val == NULL ) { - rc = LDAP_NO_MEMORY; - } else { - pTmpBV->bv_len = strlen(*ppValue); - *ppNewBV = pTmpBV; - ppNewBV++; - } - ppValue++; - } - } - /* null terminate the array of berval ptrs */ - *ppNewBV = NULL; - } - } - return( rc ); -} - - -/* - * Function : LDAPModToEntry - * convert a dn plus an array of LDAPMod struct ptrs to an entry structure - * with a link list of the correspondent attributes. - * Return value : LDAP_SUCCESS - * LDAP_NO_MEMORY - * LDAP_OTHER -*/ -Entry * -LDAPModToEntry( - char *ldn, - LDAPMod **mods ) -{ - struct berval dn = { 0, NULL }; - Entry *pEntry=NULL; - LDAPMod *pMod; - struct berval *bv; - struct berval **ppBV; - Backend *be; - Operation *op; - - Modifications *modlist = NULL; - Modifications **modtail = &modlist; - Modifications tmp; - - int rc = LDAP_SUCCESS; - int i; - - const char *text = NULL; - - - op = (Operation *) slapi_ch_calloc(1, sizeof(Operation)); - if ( pEntry == NULL) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - op->o_tag = LDAP_REQ_ADD; - - pEntry = (Entry *) ch_calloc( 1, sizeof(Entry) ); - if ( pEntry == NULL) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - dn.bv_val = slapi_ch_strdup(ldn); - dn.bv_len = strlen(ldn); - - rc = dnPrettyNormal( NULL, &dn, &pEntry->e_name, &pEntry->e_nname ); - if (rc != LDAP_SUCCESS) goto cleanup; - - if ( rc == LDAP_SUCCESS ) { - for ( i=0, pMod=mods[0]; rc == LDAP_SUCCESS && pMod != NULL; pMod=mods[++i]) { - Modifications *mod; - if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) { - /* attr values are in berval format */ - /* convert an array of pointers to bervals to an array of bervals */ - rc = bvptr2obj(pMod->mod_bvalues, &bv); - if (rc != LDAP_SUCCESS) goto cleanup; - tmp.sml_type.bv_val = slapi_ch_strdup(pMod->mod_type); - tmp.sml_type.bv_len = slapi_ch_stlen(pMod->mod_type); - tmp.sml_bvalues = bv; - - mod = (Modifications *) ch_malloc( sizeof(Modifications) ); - - mod->sml_op = LDAP_MOD_ADD; - mod->sml_next = NULL; - mod->sml_desc = NULL; - mod->sml_type = tmp.sml_type; - mod->sml_bvalues = tmp.sml_bvalues; - - *modtail = mod; - modtail = &mod->sml_next; - - } else { - /* attr values are in string format, need to be converted */ - /* to an array of bervals */ - if ( pMod->mod_values == NULL ) { - rc = LDAP_OTHER; - } else { - rc = ValuesToBValues( pMod->mod_values, &ppBV ); - if (rc != LDAP_SUCCESS) goto cleanup; - rc = bvptr2obj(ppBV, &bv); - if (rc != LDAP_SUCCESS) goto cleanup; - tmp.sml_type.bv_val = slapi_ch_strdup(pMod->mod_type); - tmp.sml_type.bv_len = slapi_ch_stlen(pMod->mod_type); - tmp.sml_bvalues = bv; - - mod = (Modifications *) ch_malloc( sizeof(Modifications) ); - - mod->sml_op = LDAP_MOD_ADD; - mod->sml_next = NULL; - mod->sml_desc = NULL; - mod->sml_type = tmp.sml_type; - mod->sml_bvalues = tmp.sml_bvalues; - - *modtail = mod; - modtail = &mod->sml_next; - - if ( ppBV != NULL ) { - ber_bvecfree( ppBV ); - } - } - } - } /* for each LDAPMod */ - } - - be = select_backend(&dn, 0, 0); - if ( be == NULL ) { - rc = LDAP_PARTIAL_RESULTS; - goto cleanup; - } - - if ( be ) { - int repl_user = be_isupdate(be, &be->be_rootdn ); - if ( !be->be_update_ndn.bv_len || repl_user ) { - int update = be->be_update_ndn.bv_len; - char textbuf[SLAP_TEXT_BUFLEN]; - size_t textlen = sizeof textbuf; - - rc = slap_mods_check( modlist, update, &text, - textbuf, textlen ); - if ( rc != LDAP_SUCCESS) { - goto cleanup; - } - - if ( !repl_user ) { - rc = slap_mods_opattrs( be, op, - modlist, modtail, &text, - textbuf, textlen ); - if ( rc != LDAP_SUCCESS) { - goto cleanup; - } - } - - /* - * FIXME: slap_mods2entry is declared static - * in servers/slapd/add.c - */ - rc = slap_mods2entry( modlist, &pEntry, repl_user, - &text, textbuf, textlen ); - if (rc != LDAP_SUCCESS) { - goto cleanup; - } - - } else { - rc = LDAP_REFERRAL; - } - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - - if ( dn.bv_val ) slapi_ch_free( (void **)&dn.bv_val ); - if ( op ) slapi_ch_free( (void **)&op ); - if ( modlist != NULL ) slap_mods_free( modlist ); - if ( rc != LDAP_SUCCESS ) { - if ( pEntry != NULL ) { - slapi_entry_free( pEntry ); - } - pEntry = NULL; - } - - return( pEntry ); -} - -/* Function : slapi_delete_internal - * - * Description : Plugin functions call this routine to delete an entry - * in the backend directly - * Return values : LDAP_SUCCESS - * LDAP_PARAM_ERROR - * LDAP_NO_MEMORY - * LDAP_OTHER - * LDAP_UNWILLING_TO_PERFORM -*/ -Slapi_PBlock * -slapi_delete_internal( - char *ldn, - LDAPControl **controls, - int log_change ) -{ -#if defined(LDAP_SLAPI) - Backend *be; - Connection *pConn = NULL; - Operation *op = NULL; - Slapi_PBlock *pPB = NULL; - Slapi_PBlock *pSavePB = NULL; - - struct berval dn = { 0, NULL }; - struct berval pdn = { 0, NULL }; - struct berval ndn = { 0, NULL }; - - int rc=LDAP_SUCCESS; - int manageDsaIt = 0; - int isCritical; - - if ( ldn == NULL ) { - rc = LDAP_PARAM_ERROR; - goto cleanup; - } - - pConn = fakeConnection( NULL, LDAP_REQ_DELETE ); - if (pConn == NULL) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - op = (Operation *)pConn->c_pending_ops.stqh_first; - pPB = (Slapi_PBlock *)op->o_pb; - op->o_ctrls = controls; - - dn.bv_val = slapi_ch_strdup(ldn); - dn.bv_len = slapi_strlen(ldn); - rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn ); - if ( rc != LDAP_SUCCESS ) goto cleanup; - - if ( slapi_control_present( controls, - SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical) ) { - manageDsaIt = 1; - } - - be = select_backend( &dn, manageDsaIt, 0 ); - if ( be == NULL ) { - rc = LDAP_PARTIAL_RESULTS; - goto cleanup; - } - - op->o_ndn.bv_val = slapi_ch_strdup(be->be_rootdn.bv_val); - op->o_ndn.bv_len = be->be_rootdn.bv_len; - pConn->c_dn.bv_val = slapi_ch_strdup(be->be_rootdn.bv_val); - pConn->c_dn.bv_len = be->be_rootdn.bv_len; - - suffix_alias( be, &ndn ); - - if ( be->be_delete ) { - int repl_user = be_isupdate( be, &op->o_ndn ); - if ( !be->be_update_ndn.bv_len || repl_user ) { - rc = (*be->be_delete)( be, pConn, op, &pdn, &ndn ); - if ( rc == 0 ) { - if (log_change) { - replog( be, op, &pdn, &ndn, NULL ); - } - rc = LDAP_SUCCESS; - } else { - rc = LDAP_OPERATIONS_ERROR; - } - } else { - rc = LDAP_REFERRAL; - } - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - if (pPB != NULL) - slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - - if (dn.bv_val) slapi_ch_free( (void **)&dn.bv_val ); - if (pdn.bv_val) slapi_ch_free( (void **)&pdn.bv_val ); - if (ndn.bv_val) slapi_ch_free( (void **)&ndn.bv_val ); - - if ( pConn != NULL ) { - if ( pConn->c_dn.bv_val ) slapi_ch_free( (void **)&pConn->c_dn.bv_val ); - if ( op->o_dn.bv_val ) slapi_ch_free( (void **)&op->o_dn.bv_val ); - if ( op ) slapi_ch_free( (void **)&op ); - pSavePB = pPB; - free( pConn ); - } - - return (pSavePB); -#endif /* LDAP_SLAPI */ - return NULL; -} - -Slapi_PBlock * -slapi_add_entry_internal( - Slapi_Entry *e, - LDAPControl **controls, - int log_changes ) -{ -#if defined(LDAP_SLAPI) - Connection *pConn = NULL; - Operation *op = NULL; - Slapi_PBlock *pPB = NULL, *pSavePB = NULL; - Backend *be; - - int manageDsaIt = 0; - int isCritical; - int rc = LDAP_SUCCESS; - - if ( e == NULL ) { - rc = LDAP_PARAM_ERROR; - goto cleanup; - } - - pConn = fakeConnection( NULL, LDAP_REQ_ADD ); - if ( pConn == NULL ) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - if ( slapi_control_present( controls, LDAP_CONTROL_MANAGEDSAIT, - NULL, &isCritical ) ) { - manageDsaIt = 1; - } - - op = (Operation *)pConn->c_pending_ops.stqh_first; - pPB = (Slapi_PBlock *)op->o_pb; - op->o_ctrls = controls; - - be = select_backend( &e->e_nname, manageDsaIt, 0 ); - if ( be == NULL ) { - rc = LDAP_PARTIAL_RESULTS; - goto cleanup; - } - - op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - op->o_ndn.bv_len = be->be_rootdn.bv_len; - pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - pConn->c_dn.bv_len = be->be_rootdn.bv_len; - - if ( be->be_add ) { - int repl_user = be_isupdate( be, &op->o_ndn ); - if ( !be->be_update_ndn.bv_len || repl_user ){ - if ( (*be->be_add)( be, pConn, op, e ) == 0 ) { - if ( log_changes ) { - replog( be, op, &e->e_name, - &e->e_nname, e ); - } - rc = LDAP_SUCCESS; - } - } else { - rc = LDAP_REFERRAL; - } - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - - if ( pPB != NULL ) { - slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - } - - if ( pConn != NULL ) { - if ( pConn->c_dn.bv_val ) slapi_ch_free( (void **)&pConn->c_dn.bv_val ); - if ( op ) { - if ( op->o_ndn.bv_val ) { - slapi_ch_free( (void **)&op->o_ndn.bv_val ); - } - free(op); - } - pSavePB = pPB; - free( pConn ); - } - return( pSavePB ); -#endif /* LDAP_SLAPI */ - return NULL; -} - - -Slapi_PBlock * -slapi_add_internal( - char *dn, - LDAPMod **mods, - LDAPControl **controls, - int log_changes ) -{ -#if defined(LDAP_SLAPI) - LDAPMod *pMod = NULL; - Slapi_PBlock *pb = NULL; - Entry *pEntry = NULL; - int i, rc=LDAP_SUCCESS; - - if ( mods == NULL || *mods == NULL || dn == NULL || *dn == '\0' ) { - rc = LDAP_PARAM_ERROR ; - } - - if ( rc == LDAP_SUCCESS ) { - for ( i = 0, pMod = mods[0]; pMod != NULL; pMod = mods[++i] ) { - if ( (pMod->mod_op & ~LDAP_MOD_BVALUES) != LDAP_MOD_ADD ) { - rc = LDAP_OTHER; - break; - } - } - } - - if ( rc == LDAP_SUCCESS ) { - if((pEntry = LDAPModToEntry( dn, mods )) == NULL) { - rc = LDAP_OTHER; - } - } - - if ( rc != LDAP_SUCCESS ) { - pb = slapi_pblock_new(); - slapi_pblock_set( pb, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - } else { - pb = slapi_add_entry_internal( pEntry, controls, log_changes ); - } - - if ( pEntry ) { - slapi_entry_free(pEntry); - } - - return(pb); -#endif /* LDAP_SLAPI */ - return NULL; -} - -/* Function : slapi_modrdn_internal - * - * Description : Plugin functions call this routine to modify the rdn - * of an entry in the backend directly - * Return values : LDAP_SUCCESS - * LDAP_PARAM_ERROR - * LDAP_OPERATIONS_ERROR - * LDAP_NO_MEMORY - * LDAP_OTHER - * LDAP_UNWILLING_TO_PERFORM - * - * NOTE: This function does not support the "newSuperior" option from LDAP V3. - */ -Slapi_PBlock * -slapi_modrdn_internal( - char *olddn, - char *lnewrdn, - int deloldrdn, - LDAPControl **controls, - int log_change ) -{ -#if defined(LDAP_SLAPI) - int rc = LDAP_SUCCESS; - - struct berval dn = { 0, NULL }; - struct berval pdn = { 0, NULL }; - struct berval ndn = { 0, NULL }; - - struct berval newrdn = { 0, NULL }; - struct berval pnewrdn = { 0, NULL }; - struct berval nnewrdn = { 0, NULL }; - -#if 0 /* currently unused */ - struct berval newSuperior = { 0, NULL }; -#endif - struct berval pnewSuperior = { 0, NULL }; -#if 0 /* currently unused */ - struct berval nnewSuperior = { 0, NULL }; -#endif - - struct berval *pnewS = NULL; - struct berval *nnewS = NULL; - - Connection *pConn = NULL; - Operation *op = NULL; - Slapi_PBlock *pPB = NULL; - Slapi_PBlock *pSavePB = NULL; - - Backend *be; -#if 0 /* currently unused */ - Backend *newSuperior_be = NULL; -#endif - - int manageDsaIt = 0; - int isCritical; -#if 0 /* currently unused */ - const char *text = NULL; -#endif - - dn.bv_val = slapi_ch_strdup(olddn); - dn.bv_len = slapi_ch_stlen(olddn); - - rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn ); - - if ( rc != LDAP_SUCCESS ) goto cleanup; - - if ( ndn.bv_len == 0 ) { - rc = LDAP_UNWILLING_TO_PERFORM; - goto cleanup; - } - - newrdn.bv_val = slapi_ch_strdup( lnewrdn ); - newrdn.bv_len = slapi_ch_stlen( lnewrdn ); - - rc = dnPrettyNormal( NULL, &newrdn, &pnewrdn, &nnewrdn ); - - if ( rc != LDAP_SUCCESS ) goto cleanup; - - if ( rdnValidate( &pnewrdn ) != LDAP_SUCCESS ) goto cleanup; - - pConn = fakeConnection( NULL, LDAP_REQ_MODRDN); - if ( pConn == NULL) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - op = (Operation *)pConn->c_pending_ops.stqh_first; - pPB = (Slapi_PBlock *)op->o_pb; - op->o_ctrls = controls; - - if ( slapi_control_present( controls, - SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) { - manageDsaIt = 1; - } - - be = select_backend( &dn, manageDsaIt, 0 ); - if ( be == NULL ) { - rc = LDAP_PARTIAL_RESULTS; - goto cleanup; - } - - op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - op->o_ndn.bv_len = be->be_rootdn.bv_len; - pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - pConn->c_dn.bv_len = be->be_rootdn.bv_len; - - suffix_alias( be, &ndn ); - - if ( be->be_modrdn ) { - int repl_user = be_isupdate( be, &op->o_ndn ); - if ( !be->be_update_ndn.bv_len || repl_user ) { - rc = (*be->be_modrdn)( be, pConn, op, &pdn, &ndn, - &pnewrdn, &nnewrdn, deloldrdn, pnewS, - nnewS ); - if ( rc == 0 ) { - struct slap_replog_moddn moddn; - moddn.newrdn = &pnewrdn; - moddn.deloldrdn = deloldrdn; - moddn.newsup = &pnewSuperior; - if ( log_change ) { - replog( be, op, &pdn, &ndn, &moddn ); - } - rc = LDAP_SUCCESS; - - } else { - rc = LDAP_OPERATIONS_ERROR; - } - - } else { - rc = LDAP_REFERRAL; - } - - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - - if ( pPB != NULL ) { - slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - } - - if ( dn.bv_val ) ch_free( dn.bv_val ); - if ( pdn.bv_val ) ch_free( pdn.bv_val ); - if ( ndn.bv_val ) ch_free( ndn.bv_val ); - - if ( newrdn.bv_val ) ch_free( newrdn.bv_val ); - if ( pnewrdn.bv_val ) ch_free( newrdn.bv_val ); - if ( nnewrdn.bv_val ) ch_free( newrdn.bv_val ); - - if ( pConn != NULL ) { - if ( pConn->c_dn.bv_val ) slapi_ch_free( (void **)&pConn->c_dn.bv_val ); - if ( op ) { - if ( op->o_dn.bv_val ) slapi_ch_free( (void **)&op->o_dn.bv_val ); - slapi_ch_free( (void **)&op ); - } - pSavePB = pPB; - free( pConn ); - } - - return( pSavePB ); -#endif /* LDAP_SLAPI */ - return NULL; -} - -/* Function : slapi_modify_internal - * - * Description: Plugin functions call this routine to modify an entry - * in the backend directly - * Return values : LDAP_SUCCESS - * LDAP_PARAM_ERROR - * LDAP_NO_MEMORY - * LDAP_OPERATIONS_ERROR - * LDAP_OTHER - * LDAP_UNWILLING_TO_PERFORM -*/ -Slapi_PBlock * -slapi_modify_internal( - char *ldn, - LDAPMod **mods, - LDAPControl **controls, - int log_change ) -{ -#if defined(LDAP_SLAPI) - int i, rc = LDAP_SUCCESS; - Connection *pConn = NULL; - Operation *op = NULL; - Slapi_PBlock *pPB = NULL; - Slapi_PBlock *pSavePB = NULL; - - struct berval dn = { 0, NULL }; - struct berval pdn = { 0, NULL }; - struct berval ndn = { 0, NULL }; - - int manageDsaIt = 0; - int isCritical; - Backend *be; - struct berval *bv; - struct berval **ppBV; - LDAPMod *pMod; - - Modifications *modlist = NULL; - Modifications **modtail = &modlist; - Modifications tmp; - - if ( mods == NULL || *mods == NULL || ldn == NULL ) { - rc = LDAP_PARAM_ERROR ; - goto cleanup; - } - - pConn = fakeConnection( NULL, LDAP_REQ_MODIFY ); - if ( pConn == NULL ) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - op = (Operation *)pConn->c_pending_ops.stqh_first; - pPB = (Slapi_PBlock *)op->o_pb; - op->o_ctrls = controls; - - dn.bv_val = slapi_ch_strdup( ldn ); - dn.bv_len = slapi_strlen( ldn ); - rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn ); - if ( rc != LDAP_SUCCESS ) goto cleanup; - - if ( slapi_control_present( controls, - SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) { - manageDsaIt = 1; - } - - be = select_backend( &dn, manageDsaIt, 0 ); - if ( be == NULL ) { - rc = LDAP_PARTIAL_RESULTS; - goto cleanup; - } - - op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - op->o_ndn.bv_len = be->be_rootdn.bv_len; - pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - pConn->c_dn.bv_len = be->be_rootdn.bv_len; - - suffix_alias( be, &ndn ); - - for ( i = 0, pMod = mods[0]; rc == LDAP_SUCCESS && pMod != NULL; - pMod = mods[++i] ) { - Modifications *mod; - if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) { - /* - * attr values are in berval format - * convert an array of pointers to bervals - * to an array of bervals - */ - rc = bvptr2obj( pMod->mod_bvalues, &bv ); - if ( rc != LDAP_SUCCESS ) goto cleanup; - tmp.sml_type.bv_val = slapi_ch_strdup( pMod->mod_type ); - tmp.sml_type.bv_len = slapi_ch_stlen( pMod->mod_type ); - tmp.sml_bvalues = bv; - - mod = (Modifications *)ch_malloc( sizeof(Modifications) ); - - mod->sml_op = pMod->mod_op; - mod->sml_next = NULL; - mod->sml_desc = NULL; - mod->sml_type = tmp.sml_type; - mod->sml_bvalues = tmp.sml_bvalues; - } else { - rc = ValuesToBValues( pMod->mod_values, &ppBV ); - if ( rc != LDAP_SUCCESS ) goto cleanup; - rc = bvptr2obj( ppBV, &bv ); - if ( rc != LDAP_SUCCESS ) goto cleanup; - tmp.sml_type.bv_val = slapi_ch_strdup( pMod->mod_type ); - tmp.sml_type.bv_len = slapi_ch_stlen( pMod->mod_type ); - tmp.sml_bvalues = bv; - - mod = (Modifications *) ch_malloc( sizeof(Modifications) ); - - mod->sml_op = pMod->mod_op; - mod->sml_next = NULL; - mod->sml_desc = NULL; - mod->sml_type = tmp.sml_type; - mod->sml_bvalues = tmp.sml_bvalues; - - if ( ppBV != NULL ) { - ber_bvecfree( ppBV ); - } - } - *modtail = mod; - modtail = &mod->sml_next; - - switch( pMod->mod_op ) { - case LDAP_MOD_ADD: - if ( mod->sml_bvalues == NULL ) { - rc = LDAP_PROTOCOL_ERROR; - goto cleanup; - } - - /* fall through */ - case LDAP_MOD_DELETE: - case LDAP_MOD_REPLACE: - break; - - default: - rc = LDAP_PROTOCOL_ERROR; - goto cleanup; - } - } - *modtail = NULL; - - if ( ndn.bv_len == 0 ) { - rc = LDAP_UNWILLING_TO_PERFORM; - goto cleanup; - } - - if ( be->be_modify ) { - int repl_user = be_isupdate( be, &op->o_ndn ); - if ( !be->be_update_ndn.bv_len || repl_user ) { - int update = be->be_update_ndn.bv_len; - const char *text = NULL; - char textbuf[SLAP_TEXT_BUFLEN]; - size_t textlen = sizeof( textbuf ); - - rc = slap_mods_check( modlist, update, - &text, textbuf, textlen ); - if (rc != LDAP_SUCCESS) { - goto cleanup; - } - - if ( !repl_user ) { - rc = slap_mods_opattrs( be, op, modlist, - modtail, &text, textbuf, - textlen ); - if (rc != LDAP_SUCCESS) { - goto cleanup; - } - } - rc = (*be->be_modify)( be, pConn, op, - &pdn, &ndn, modlist ); - if ( rc == 0 ) { - if ( log_change ) { - replog( be, op, &pdn, &ndn, modlist ); - } - rc = LDAP_SUCCESS; - } else { - rc = LDAP_OPERATIONS_ERROR; - } - } else { - rc = LDAP_REFERRAL; - } - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - - if ( pPB != NULL ) - slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - - if ( dn.bv_val ) ch_free( dn.bv_val ); - if ( pdn.bv_val ) ch_free( pdn.bv_val ); - if ( ndn.bv_val ) ch_free( ndn.bv_val ); - - if ( modlist != NULL ) slap_mods_free( modlist ); - - if ( pConn != NULL ) { - if ( pConn->c_dn.bv_val ) slapi_ch_free( (void **)&pConn->c_dn.bv_val ); - if ( op ) { - if ( op->o_dn.bv_val ) slapi_ch_free( (void **)&op->o_dn.bv_val ); - slapi_ch_free( (void **)&op ); - } - pSavePB = pPB; - free( pConn ); - } - - return ( pSavePB ); - -#endif /* LDAP_SLAPI */ - return NULL; -} - -Slapi_PBlock * -slapi_search_internal_bind( - char *bindDN, - char *ldn, - int scope, - char *filStr, - LDAPControl **controls, - char **attrs, - int attrsonly ) -{ -#if defined(LDAP_SLAPI) - Backend *be; - Connection *c; - Operation *op = NULL; - Slapi_PBlock *ptr = NULL; - Slapi_PBlock *pSavePB = NULL; - struct berval dn = { 0, NULL }; - struct berval pdn = { 0, NULL }; - struct berval ndn = { 0, NULL }; - Filter *filter=NULL; - struct berval fstr = { 0, NULL }; - AttributeName *an = NULL; - const char *text = NULL; - - int deref=0; - int sizelimit=-1, timelimit=-1; - - int manageDsaIt = 0; - int isCritical; - - int i, rc = LDAP_SUCCESS; - - c = fakeConnection( NULL, LDAP_REQ_SEARCH ); - if (c == NULL) { - rc = LDAP_NO_MEMORY; - goto cleanup; - } - - op = (Operation *)c->c_pending_ops.stqh_first; - ptr = (Slapi_PBlock *)op->o_pb; - op->o_ctrls = controls; - - dn.bv_val = slapi_ch_strdup(ldn); - dn.bv_len = slapi_strlen(ldn); - - rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn ); - if (rc != LDAP_SUCCESS) goto cleanup; - - if ( scope != LDAP_SCOPE_BASE && - scope != LDAP_SCOPE_ONELEVEL && - scope != LDAP_SCOPE_SUBTREE ) { - rc = LDAP_PROTOCOL_ERROR; - goto cleanup; - } - - filter = slapi_str2filter(filStr); - if ( filter == NULL ) { - rc = LDAP_PROTOCOL_ERROR; - goto cleanup; - } - - filter2bv( filter, &fstr ); - - for ( i = 0; attrs != NULL && attrs[i] != NULL; i++ ) { - ; /* count the number of attributes */ - } - - if (i > 0) { - an = (AttributeName *)slapi_ch_calloc(1, sizeof(AttributeName)); - for (i = 0; attrs[i] != 0; i++) { - an[i].an_desc = NULL; - an[i].an_oc = NULL; - an[i].an_name.bv_val = slapi_ch_strdup(attrs[i]); - an[i].an_name.bv_len = slapi_strlen(attrs[i]); - slap_bv2ad( &an[i].an_name, &an[i].an_desc, &text ); - } - } - - if ( scope == LDAP_SCOPE_BASE ) { - Entry *entry = NULL; - - if ( ndn.bv_len == 0 ) { - rc = root_dse_info( c, &entry, &text ); - } - - if( rc != LDAP_SUCCESS ) { - send_ldap_result( c, op, rc, NULL, text, NULL, NULL ); - goto cleanup; - } else if ( entry != NULL ) { - rc = test_filter( NULL, c, op, entry, filter ); - - if( rc == LDAP_COMPARE_TRUE ) { - send_search_entry( NULL, c, op, entry, - an, attrsonly, NULL ); - } - - entry_free( entry ); - - send_ldap_result( c, op, LDAP_SUCCESS, - NULL, NULL, NULL, NULL ); - - rc = LDAP_SUCCESS; - - goto cleanup; - } - } - - if ( !ndn.bv_len && default_search_nbase.bv_len ) { - ch_free( pdn.bv_val ); - ch_free( ndn.bv_val ); - - ber_dupbv( &pdn, &default_search_base ); - ber_dupbv( &ndn, &default_search_nbase ); - } - - if ( slapi_control_present( controls, - LDAP_CONTROL_MANAGEDSAIT, NULL, &isCritical ) ) { - manageDsaIt = 1; - } - - be = select_backend( &ndn, manageDsaIt, 0 ); - if ( be == NULL ) { - if ( manageDsaIt == 1 ) { - rc = LDAP_NO_SUCH_OBJECT; - } else { - rc = LDAP_PARTIAL_RESULTS; - } - goto cleanup; - } - - op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - op->o_ndn.bv_len = be->be_rootdn.bv_len; - c->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val ); - c->c_dn.bv_len = be->be_rootdn.bv_len; - - if ( be->be_search ) { - rc = (*be->be_search)( be, c, op, &pdn, &ndn, - scope, deref, sizelimit, timelimit, - filter, &fstr, an, attrsonly ); - if ( rc == 0 ) { - rc = LDAP_SUCCESS; - } else { - rc = LDAP_OPERATIONS_ERROR; - } - } else { - rc = LDAP_UNWILLING_TO_PERFORM; - } - -cleanup: - - if ( ptr != NULL ) - slapi_pblock_set( ptr, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); - - if ( dn.bv_val ) free( dn.bv_val ); - if ( ndn.bv_val ) free( ndn.bv_val ); - if ( pdn.bv_val ) free( pdn.bv_val ); - - if ( filter ) slapi_filter_free( filter, 1 ); - if ( fstr.bv_val ) free ( fstr.bv_val ); - - if ( an != NULL ) free( an ); - - if ( c != NULL ) { - if ( c->c_dn.bv_val ) slapi_ch_free( (void **)&c->c_dn.bv_val ); - if ( op ) { - if ( op->o_ndn.bv_val ) slapi_ch_free( (void **)&op->o_ndn.bv_val ); - free( op ); - } - pSavePB = ptr; - free( c ); - } - return( pSavePB ); -#endif /* LDAP_SLAPI */ - return NULL; -} - -Slapi_PBlock * -slapi_search_internal( - char *base, - int scope, - char *filStr, - LDAPControl **controls, - char **attrs, - int attrsonly ) -{ -#if defined(LDAP_SLAPI) - return slapi_search_internal_bind( NULL, base, scope, filStr, - controls, attrs, attrsonly ); -#else - return NULL; -#endif /* LDAP_SLAPI */ -} - +/* $OpenLDAP$ */ +/* This work is part of OpenLDAP Software . + * + * Copyright 2002-2005 The OpenLDAP Foundation. + * Portions Copyright 1997,2002-2003 IBM Corporation. + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted only as authorized by the OpenLDAP + * Public License. + * + * A copy of this license is available in the file LICENSE in the + * top-level directory of the distribution or, alternatively, at + * . + */ +/* ACKNOWLEDGEMENTS: + * This work was initially developed by IBM Corporation for use in + * IBM products and subsequently ported to OpenLDAP Software by + * Steve Omrani. Additional significant contributors include: + * Luke Howard + */ + +#include "portable.h" + +#include +#include +#include +#include + +#include +#include +#include + +/* + * use a fake listener when faking a connection, + * so it can be used in ACLs + */ +static struct slap_listener slap_unknown_listener = { + BER_BVC("unknown"), /* FIXME: use a URI form? (e.g. slapi://) */ + BER_BVC("UNKNOWN") +}; + +static void +internal_result_v3( + Operation *op, + SlapReply *rs ) +{ +#ifdef notdef + /* XXX needs review after internal API change */ + /* rs->sr_nentries appears to always be 0 */ + if (op->o_tag == LDAP_REQ_SEARCH) + slapi_pblock_set( (Slapi_PBlock *)op->o_pb, + SLAPI_NENTRIES, (void *)rs->sr_nentries ); +#endif + + return; +} + +static int +internal_search_entry( + Operation *op, + SlapReply *rs ) +{ + int nentries = 0, len = 0, i = 0; + Slapi_Entry **head = NULL, **tp; + Slapi_Entry *entry; + + entry = slapi_entry_dup( rs->sr_entry ); + if ( entry == NULL ) { + return 1; + } + + slapi_pblock_get( (Slapi_PBlock *)op->o_pb, + SLAPI_NENTRIES, &nentries ); + slapi_pblock_get( (Slapi_PBlock *)op->o_pb, + SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, &head ); + + i = nentries + 1; + if ( nentries == 0 ) { + tp = (Slapi_Entry **)slapi_ch_malloc( 2 * sizeof(Slapi_Entry *) ); + if ( tp == NULL ) { + slapi_entry_free( entry ); + return 1; + } + + tp[ 0 ] = entry; + } else { + tp = (Slapi_Entry **)slapi_ch_realloc( (char *)head, + sizeof(Slapi_Entry *) * ( i + 1 ) ); + if ( tp == NULL ) { + slapi_entry_free( entry ); + return 1; + } + tp[ i - 1 ] = entry; + } + tp[ i ] = NULL; + + slapi_pblock_set( (Slapi_PBlock *)op->o_pb, + SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, (void *)tp ); + slapi_pblock_set( (Slapi_PBlock *)op->o_pb, + SLAPI_NENTRIES, (void *)i ); + + return LDAP_SUCCESS; +} + +static void +internal_result_ext( + Operation *op, + SlapReply *sr ) +{ + return; +} + +static int +internal_search_reference( + Operation *op, + SlapReply *sr ) +{ + return LDAP_SUCCESS; +} + +Connection * +slapi_int_init_connection( + char *DN, + int OpType ) +{ + Connection *pConn; + ber_len_t max = sockbuf_max_incoming; + + pConn = (Connection *) slapi_ch_calloc(1, sizeof(Connection)); + if (pConn == NULL) { + return (Connection *)NULL; + } + + LDAP_STAILQ_INIT( &pConn->c_pending_ops ); + + pConn->c_pending_ops.stqh_first = + (Operation *) slapi_ch_calloc( 1, sizeof(Operation) ); + if ( pConn->c_pending_ops.stqh_first == NULL ) { + slapi_ch_free( (void **)&pConn ); + return (Connection *)NULL; + } + + pConn->c_pending_ops.stqh_first->o_pb = + (Slapi_PBlock *) slapi_pblock_new(); + if ( pConn->c_pending_ops.stqh_first->o_pb == NULL ) { + slapi_ch_free( (void **)&pConn->c_pending_ops.stqh_first ); + slapi_ch_free( (void **)&pConn ); + return (Connection *)NULL; + } + + /* connection object */ + pConn->c_authmech.bv_val = NULL; + pConn->c_authmech.bv_len = 0; + pConn->c_dn.bv_val = NULL; + pConn->c_dn.bv_len = 0; + pConn->c_ndn.bv_val = NULL; + pConn->c_ndn.bv_len = 0; + + pConn->c_listener = &slap_unknown_listener; + ber_dupbv( &pConn->c_peer_domain, (struct berval *)&slap_unknown_bv ); + ber_dupbv( &pConn->c_peer_name, (struct berval *)&slap_unknown_bv ); + + LDAP_STAILQ_INIT( &pConn->c_ops ); + + pConn->c_sasl_bind_mech.bv_val = NULL; + pConn->c_sasl_bind_mech.bv_len = 0; + pConn->c_sasl_authctx = NULL; + pConn->c_sasl_sockctx = NULL; + pConn->c_sasl_extra = NULL; + + pConn->c_sb = ber_sockbuf_alloc( ); + + ber_sockbuf_ctrl( pConn->c_sb, LBER_SB_OPT_SET_MAX_INCOMING, &max ); + + pConn->c_currentber = NULL; + + /* should check status of thread calls */ + ldap_pvt_thread_mutex_init( &pConn->c_mutex ); + ldap_pvt_thread_mutex_init( &pConn->c_write_mutex ); + ldap_pvt_thread_cond_init( &pConn->c_write_cv ); + + ldap_pvt_thread_mutex_lock( &pConn->c_mutex ); + + pConn->c_n_ops_received = 0; + pConn->c_n_ops_executing = 0; + pConn->c_n_ops_pending = 0; + pConn->c_n_ops_completed = 0; + + pConn->c_n_get = 0; + pConn->c_n_read = 0; + pConn->c_n_write = 0; + + pConn->c_protocol = LDAP_VERSION3; + + pConn->c_activitytime = pConn->c_starttime = slap_get_time(); + + /* + * A real connection ID is required, because syncrepl associates + * pending CSNs with unique ( connection, operation ) tuples. + * Setting a fake connection ID will cause slap_get_commit_csn() + * to return a stale value. + */ + connection_assign_nextid( pConn ); + + pConn->c_conn_state = 0x01; /* SLAP_C_ACTIVE */ + pConn->c_struct_state = 0x02; /* SLAP_C_USED */ + + pConn->c_ssf = pConn->c_transport_ssf = 0; + pConn->c_tls_ssf = 0; + + backend_connection_init( pConn ); + + pConn->c_send_ldap_result = internal_result_v3; + pConn->c_send_search_entry = internal_search_entry; + pConn->c_send_ldap_extended = internal_result_ext; + pConn->c_send_search_reference = internal_search_reference; + + /* operation object */ + pConn->c_pending_ops.stqh_first->o_tag = OpType; + pConn->c_pending_ops.stqh_first->o_protocol = LDAP_VERSION3; + pConn->c_pending_ops.stqh_first->o_authmech.bv_val = NULL; + pConn->c_pending_ops.stqh_first->o_authmech.bv_len = 0; + pConn->c_pending_ops.stqh_first->o_time = slap_get_time(); + pConn->c_pending_ops.stqh_first->o_do_not_cache = 1; + pConn->c_pending_ops.stqh_first->o_threadctx = ldap_pvt_thread_pool_context(); + pConn->c_pending_ops.stqh_first->o_tmpmemctx = NULL; + pConn->c_pending_ops.stqh_first->o_tmpmfuncs = &ch_mfuncs; + pConn->c_pending_ops.stqh_first->o_conn = pConn; + pConn->c_pending_ops.stqh_first->o_connid = pConn->c_connid; + + ldap_pvt_thread_mutex_unlock( &pConn->c_mutex ); + + return pConn; +} + +void slapi_int_connection_destroy( Connection **pConn ) +{ + Connection *conn = *pConn; + Operation *op; + + if ( pConn == NULL ) { + return; + } + + op = (Operation *)conn->c_pending_ops.stqh_first; + + slap_graduate_commit_csn( op ); + + if ( op->o_req_dn.bv_val != NULL ) { + slapi_ch_free( (void **)&op->o_req_dn.bv_val ); + } + if ( op->o_req_ndn.bv_val != NULL ) { + slapi_ch_free( (void **)&op->o_req_ndn.bv_val ); + } + + if ( conn->c_sb != NULL ) { + ber_sockbuf_free( conn->c_sb ); + } + if ( op != NULL ) { + slapi_ch_free( (void **)&op ); + } + slapi_ch_free( (void **)pConn ); +} + +/* + * Function : values2obj + * Convert an array of strings into a BerVarray. + * the strings. + */ +static int +values2obj_copy( + char **ppValue, + BerVarray *bvobj ) +{ + int i; + BerVarray tmpberval; + + if ( ppValue == NULL ) { + *bvobj = NULL; + return LDAP_SUCCESS; + } + + for ( i = 0; ppValue[i] != NULL; i++ ) + ; /* EMPTY */ + + tmpberval = (BerVarray)slapi_ch_malloc( (i+1) * (sizeof(struct berval)) ); + if ( tmpberval == NULL ) { + return LDAP_NO_MEMORY; + } + for ( i = 0; ppValue[i] != NULL; i++ ) { + size_t len = strlen( ppValue[i] ); + + tmpberval[i].bv_val = slapi_ch_malloc( len + 1 ); + AC_MEMCPY( tmpberval[i].bv_val, ppValue[i], len + 1 ); + tmpberval[i].bv_len = len; + } + tmpberval[i].bv_val = NULL; + tmpberval[i].bv_len = 0; + + *bvobj = tmpberval; + + return LDAP_SUCCESS; +} + +static int +bvptr2obj_copy( + struct berval **bvptr, + BerVarray *bvobj ) +{ + int i; + BerVarray tmpberval; + + if ( bvptr == NULL ) { + *bvobj = NULL; + return LDAP_SUCCESS; + } + + for ( i = 0; bvptr[i] != NULL; i++ ) + ; /* EMPTY */ + + tmpberval = (BerVarray)slapi_ch_malloc( (i + 1) * sizeof(struct berval)); + if ( tmpberval == NULL ) { + return LDAP_NO_MEMORY; + } + + for ( i = 0; bvptr[i] != NULL; i++ ) { + tmpberval[i].bv_val = slapi_ch_malloc( bvptr[i]->bv_len ); + tmpberval[i].bv_len = bvptr[i]->bv_len; + AC_MEMCPY( tmpberval[i].bv_val, bvptr[i]->bv_val, bvptr[i]->bv_len ); + } + + tmpberval[i].bv_val = NULL; + tmpberval[i].bv_len = 0; + + *bvobj = tmpberval; + + return LDAP_SUCCESS; +} + +/* + * Function : slapi_int_ldapmod_to_entry + * convert a dn plus an array of LDAPMod struct ptrs to an entry structure + * with a link list of the correspondent attributes. + * Return value : LDAP_SUCCESS + * LDAP_NO_MEMORY + * LDAP_OTHER +*/ +static Entry * +slapi_int_ldapmod_to_entry( + Connection *pConn, + char *ldn, + LDAPMod **mods ) +{ + struct berval dn = BER_BVNULL; + Entry *pEntry=NULL; + LDAPMod *pMod; + struct berval *bv; + Operation *op; + + Modifications *modlist = NULL; + Modifications **modtail = &modlist; + Modifications tmp; + + int rc = LDAP_SUCCESS; + int i; + + const char *text = NULL; + + op = (Operation *)pConn->c_pending_ops.stqh_first; + + pEntry = (Entry *) ch_calloc( 1, sizeof(Entry) ); + if ( pEntry == NULL) { + rc = LDAP_NO_MEMORY; + goto cleanup; + } + + dn.bv_val = slapi_ch_strdup(ldn); + dn.bv_len = strlen(ldn); + + rc = dnPrettyNormal( NULL, &dn, &pEntry->e_name, &pEntry->e_nname, NULL ); + if ( rc != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( rc == LDAP_SUCCESS ) { + for ( i = 0, pMod = mods[0]; rc == LDAP_SUCCESS && pMod != NULL; pMod = mods[++i]) { + Modifications *mod; + + if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) { + /* + * Convert an array of pointers to bervals to + * an array of bervals. Note that we need to copy the + * values too, as the slap_mods_check() will free the + * original values after prettying; the modifications + * being passed in may not have been allocated on the + * heap. + */ + rc = bvptr2obj_copy( pMod->mod_bvalues, &bv ); + if ( rc != LDAP_SUCCESS ) goto cleanup; + tmp.sml_type.bv_val = pMod->mod_type; + tmp.sml_type.bv_len = strlen( pMod->mod_type ); + tmp.sml_values = bv; + tmp.sml_nvalues = NULL; + + mod = (Modifications *) ch_malloc( sizeof(Modifications) ); + + mod->sml_op = LDAP_MOD_ADD; + mod->sml_next = NULL; + mod->sml_desc = NULL; + mod->sml_type = tmp.sml_type; + mod->sml_values = tmp.sml_values; + mod->sml_nvalues = tmp.sml_nvalues; + + *modtail = mod; + modtail = &mod->sml_next; + + } else { + /* attr values are in string format, need to be converted */ + /* to an array of bervals */ + if ( pMod->mod_values == NULL ) { + rc = LDAP_OTHER; + } else { + rc = values2obj_copy( pMod->mod_values, &bv ); + if ( rc != LDAP_SUCCESS ) goto cleanup; + tmp.sml_type.bv_val = pMod->mod_type; + tmp.sml_type.bv_len = strlen( pMod->mod_type ); + tmp.sml_values = bv; + tmp.sml_nvalues = NULL; + + mod = (Modifications *) ch_malloc( sizeof(Modifications) ); + + mod->sml_op = LDAP_MOD_ADD; + mod->sml_next = NULL; + mod->sml_desc = NULL; + mod->sml_type = tmp.sml_type; + mod->sml_values = tmp.sml_values; + mod->sml_nvalues = tmp.sml_nvalues; + + *modtail = mod; + modtail = &mod->sml_next; + } + } + } /* for each LDAPMod */ + } + + op->o_bd = select_backend( &pEntry->e_nname, 0, 0 ); + if ( op->o_bd == NULL ) { + rc = LDAP_PARTIAL_RESULTS; + } else { + int repl_user = be_isupdate_dn( op->o_bd, &op->o_bd->be_rootdn ); + if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) { + int update = !BER_BVISNULL( &op->o_bd->be_update_ndn ); + char textbuf[ SLAP_TEXT_BUFLEN ]; + size_t textlen = sizeof( textbuf ); + + rc = slap_mods_check( modlist, &text, + textbuf, textlen, NULL ); + if ( rc != LDAP_SUCCESS) { + goto cleanup; + } + + if ( !update ) { + rc = slap_mods_no_update_check( modlist, + &text, textbuf, textlen ); + if ( rc != LDAP_SUCCESS) { + goto cleanup; + } + } + + if ( !repl_user ) { + rc = slap_mods_opattrs( op, + modlist, modtail, &text, + textbuf, textlen, 1 ); + if ( rc != LDAP_SUCCESS) { + goto cleanup; + } + } + + rc = slap_mods2entry( modlist, &pEntry, repl_user, + 0, &text, textbuf, textlen ); + if (rc != LDAP_SUCCESS) { + goto cleanup; + } + + } else { + rc = LDAP_REFERRAL; + } + } + +cleanup: + + if ( dn.bv_val ) + slapi_ch_free( (void **)&dn.bv_val ); + if ( modlist != NULL ) + slap_mods_free( modlist ); + if ( rc != LDAP_SUCCESS ) { + if ( pEntry != NULL ) { + slapi_entry_free( pEntry ); + } + pEntry = NULL; + } + + return( pEntry ); +} + +/* Function : slapi_delete_internal + * + * Description : Plugin functions call this routine to delete an entry + * in the backend directly + * Return values : LDAP_SUCCESS + * LDAP_PARAM_ERROR + * LDAP_NO_MEMORY + * LDAP_OTHER + * LDAP_UNWILLING_TO_PERFORM +*/ +Slapi_PBlock * +slapi_delete_internal( + char *ldn, + LDAPControl **controls, + int log_change ) +{ +#ifdef LDAP_SLAPI + Connection *pConn = NULL; + Operation *op = NULL; + Slapi_PBlock *pPB = NULL; + SlapReply rs = { REP_RESULT }; + struct berval dn = BER_BVNULL; + + int manageDsaIt = SLAP_CONTROL_NONE; + int isCritical; + + if ( ldn == NULL ) { + rs.sr_err = LDAP_PARAM_ERROR; + goto cleanup; + } + + pConn = slapi_int_init_connection( NULL, LDAP_REQ_DELETE ); + if (pConn == NULL) { + rs.sr_err = LDAP_NO_MEMORY; + goto cleanup; + } + + op = (Operation *)pConn->c_pending_ops.stqh_first; + pPB = (Slapi_PBlock *)op->o_pb; + op->o_ctrls = controls; + + dn.bv_val = slapi_ch_strdup(ldn); + dn.bv_len = strlen(ldn); + rs.sr_err = dnPrettyNormal( NULL, &dn, &op->o_req_dn, &op->o_req_ndn, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) + goto cleanup; + + if ( slapi_control_present( controls, + SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical) ) { + manageDsaIt = isCritical ? SLAP_CONTROL_CRITICAL : SLAP_CONTROL_NONCRITICAL; + } + + op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 1 ); + if ( op->o_bd == NULL ) { + rs.sr_err = LDAP_PARTIAL_RESULTS; + goto cleanup; + } + + op->o_dn = pConn->c_dn = op->o_bd->be_rootdn; + op->o_ndn = pConn->c_ndn = op->o_bd->be_rootndn; + + if ( op->o_bd->be_delete ) { + int repl_user = be_isupdate( op ); + if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) { + slap_callback cb = { NULL, slap_replog_cb, NULL, NULL }; + if ( log_change ) op->o_callback = &cb; + if ( (*op->o_bd->be_delete)( op, &rs ) ) { + rs.sr_err = LDAP_OTHER; + } + } else { + rs.sr_err = LDAP_REFERRAL; + } + } else { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + } + +cleanup: + if ( pPB != NULL ) { + slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rs.sr_err ); + } + if ( dn.bv_val ) { + slapi_ch_free( (void **)&dn.bv_val ); + } + + slapi_int_connection_destroy( &pConn ); + + return pPB; +#else + return NULL; +#endif /* LDAP_SLAPI */ +} + +#ifdef LDAP_SLAPI +static Slapi_PBlock * +slapi_int_add_entry_locked( + Connection *pConn, + Slapi_Entry **e, + LDAPControl **controls, + int log_changes ) +{ + Operation *op = NULL; + Slapi_PBlock *pPB = NULL; + + int manageDsaIt = SLAP_CONTROL_NONE; + int isCritical; + SlapReply rs = { REP_RESULT }; + + if ( *e == NULL ) { + rs.sr_err = LDAP_PARAM_ERROR; + goto cleanup; + } + + if ( slapi_control_present( controls, LDAP_CONTROL_MANAGEDSAIT, + NULL, &isCritical ) ) { + manageDsaIt = isCritical ? SLAP_CONTROL_CRITICAL : SLAP_CONTROL_NONCRITICAL; + } + + op = (Operation *)pConn->c_pending_ops.stqh_first; + pPB = (Slapi_PBlock *)op->o_pb; + op->o_ctrls = controls; + + op->o_bd = select_backend( &((*e)->e_nname), manageDsaIt, 1 ); + if ( op->o_bd == NULL ) { + rs.sr_err = LDAP_PARTIAL_RESULTS; + goto cleanup; + } + + op->o_dn = pConn->c_dn = op->o_bd->be_rootdn; + op->o_ndn = pConn->c_ndn = op->o_bd->be_rootndn; + op->oq_add.rs_e = *e; + + if ( op->o_bd->be_add ) { + int repl_user = be_isupdate( op ); + if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) { + slap_callback cb = { NULL, slap_replog_cb, NULL, NULL }; + if ( log_changes ) op->o_callback = &cb; + if ( (*op->o_bd->be_add)( op, &rs ) == 0 ) { + be_entry_release_w( op, *e ); + *e = NULL; + } + } else { + rs.sr_err = LDAP_REFERRAL; + } + } else { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + } + +cleanup: + if ( pPB != NULL ) { + slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rs.sr_err ); + } + + return( pPB ); +} +#endif /* LDAP_SLAPI */ + +Slapi_PBlock * +slapi_add_entry_internal( + Slapi_Entry *e, + LDAPControl **controls, + int log_changes ) +{ +#ifdef LDAP_SLAPI + Slapi_PBlock *pb = NULL; + Slapi_Entry *entry = NULL; + Connection *pConn = NULL; + + pConn = slapi_int_init_connection( NULL, LDAP_REQ_ADD ); + if ( pConn == NULL ) { + return NULL; + } + + /* + * We make a copy to avoid an entry that may be freed later + * by the caller being placed in the cache. + */ + entry = slapi_entry_dup( e ); + pb = slapi_int_add_entry_locked( pConn, &entry, controls, log_changes ); + if ( entry != NULL ) { + slapi_entry_free( entry ); + } + + slapi_int_connection_destroy( &pConn ); + + return pb; +#else + return NULL; +#endif +} + +Slapi_PBlock * +slapi_add_internal( + char *dn, + LDAPMod **mods, + LDAPControl **controls, + int log_changes ) +{ +#ifdef LDAP_SLAPI + LDAPMod *pMod = NULL; + Connection *pConn = NULL; + Slapi_PBlock *pb = NULL; + Entry *pEntry = NULL; + int i, rc = LDAP_SUCCESS; + + if ( mods == NULL || *mods == NULL || dn == NULL || *dn == '\0' ) { + rc = LDAP_PARAM_ERROR ; + } + + if ( rc == LDAP_SUCCESS ) { + for ( i = 0, pMod = mods[0]; pMod != NULL; pMod = mods[++i] ) { + if ( (pMod->mod_op & LDAP_MOD_OP ) != LDAP_MOD_ADD ) { + rc = LDAP_OTHER; + break; + } + } + } + + if ( rc == LDAP_SUCCESS ) { + pConn = slapi_int_init_connection( NULL, LDAP_REQ_ADD ); + if ( pConn != NULL ) { + pEntry = slapi_int_ldapmod_to_entry( pConn, dn, mods ); + if ( pEntry == NULL ) { + rc = LDAP_OTHER; + } + } + } + + if ( rc != LDAP_SUCCESS ) { + pb = slapi_pblock_new(); + slapi_pblock_set( pb, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc ); + } else { + pb = slapi_int_add_entry_locked( pConn, &pEntry, controls, log_changes ); + } + + if ( pEntry != NULL ) { + slapi_entry_free( pEntry ); + } + + slapi_int_connection_destroy( &pConn ); + + return pb; +#else + return NULL; +#endif /* LDAP_SLAPI */ +} + +/* Function : slapi_modrdn_internal + * + * Description : Plugin functions call this routine to modify the rdn + * of an entry in the backend directly + * Return values : LDAP_SUCCESS + * LDAP_PARAM_ERROR + * LDAP_NO_MEMORY + * LDAP_OTHER + * LDAP_UNWILLING_TO_PERFORM + * + * NOTE: This function does not support the "newSuperior" option from LDAP V3. + */ +Slapi_PBlock * +slapi_modrdn_internal( + char *olddn, + char *lnewrdn, + int deloldrdn, + LDAPControl **controls, + int log_change ) +{ +#ifdef LDAP_SLAPI + struct berval dn = BER_BVNULL; + struct berval newrdn = BER_BVNULL; + Connection *pConn = NULL; + Operation *op = NULL; + Slapi_PBlock *pPB = NULL; + int manageDsaIt = SLAP_CONTROL_NONE; + int isCritical; + SlapReply rs = { REP_RESULT }; + + pConn = slapi_int_init_connection( NULL, LDAP_REQ_MODRDN ); + if ( pConn == NULL) { + rs.sr_err = LDAP_NO_MEMORY; + goto cleanup; + } + + op = (Operation *)pConn->c_pending_ops.stqh_first; + pPB = (Slapi_PBlock *)op->o_pb; + op->o_ctrls = controls; + + if ( slapi_control_present( controls, + SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) { + manageDsaIt = isCritical ? SLAP_CONTROL_CRITICAL : SLAP_CONTROL_NONCRITICAL; + } + + op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 1 ); + if ( op->o_bd == NULL ) { + rs.sr_err = LDAP_PARTIAL_RESULTS; + goto cleanup; + } + + op->o_dn = pConn->c_dn = op->o_bd->be_rootdn; + op->o_ndn = pConn->c_ndn = op->o_bd->be_rootndn; + + dn.bv_val = slapi_ch_strdup( olddn ); + dn.bv_len = strlen( olddn ); + + rs.sr_err = dnPrettyNormal( NULL, &dn, &op->o_req_dn, &op->o_req_ndn, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( op->o_req_dn.bv_len == 0 ) { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + goto cleanup; + } + + newrdn.bv_val = slapi_ch_strdup( lnewrdn ); + newrdn.bv_len = strlen( lnewrdn ); + + rs.sr_err = dnPrettyNormal( NULL, &newrdn, &op->oq_modrdn.rs_newrdn, &op->oq_modrdn.rs_nnewrdn, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( rdn_validate( &op->oq_modrdn.rs_nnewrdn ) != LDAP_SUCCESS ) { + goto cleanup; + } + + op->oq_modrdn.rs_newSup = NULL; + op->oq_modrdn.rs_nnewSup = NULL; + op->oq_modrdn.rs_deleteoldrdn = deloldrdn; + + if ( op->o_bd->be_modrdn ) { + int repl_user = be_isupdate( op ); + if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) { + slap_callback cb = { NULL, slap_replog_cb, NULL, NULL }; + if ( log_change ) op->o_callback = &cb; + if ( (*op->o_bd->be_modrdn)( op, &rs ) ) { + rs.sr_err = LDAP_OTHER; + } + } else { + rs.sr_err = LDAP_REFERRAL; + } + } else { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + } + +cleanup: + + if ( pPB != NULL ) { + slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rs.sr_err ); + } + + if ( dn.bv_val ) + slapi_ch_free( (void **)&dn.bv_val ); + + if ( newrdn.bv_val ) + slapi_ch_free( (void **)&newrdn.bv_val ); + if ( op->oq_modrdn.rs_newrdn.bv_val ) + slapi_ch_free( (void **)&op->oq_modrdn.rs_newrdn.bv_val ); + if ( op->oq_modrdn.rs_nnewrdn.bv_val ) + slapi_ch_free( (void **)&op->oq_modrdn.rs_nnewrdn.bv_val ); + + slapi_int_connection_destroy( &pConn ); + + return pPB; +#else + return NULL; +#endif /* LDAP_SLAPI */ +} + +/* Function : slapi_modify_internal + * + * Description: Plugin functions call this routine to modify an entry + * in the backend directly + * Return values : LDAP_SUCCESS + * LDAP_PARAM_ERROR + * LDAP_NO_MEMORY + * LDAP_OTHER + * LDAP_UNWILLING_TO_PERFORM +*/ +Slapi_PBlock * +slapi_modify_internal( + char *ldn, + LDAPMod **mods, + LDAPControl **controls, + int log_change ) +{ +#ifdef LDAP_SLAPI + int i; + Connection *pConn = NULL; + Operation *op = NULL; + Slapi_PBlock *pPB = NULL; + + struct berval dn = BER_BVNULL; + + int manageDsaIt = SLAP_CONTROL_NONE; + int isCritical; + struct berval *bv; + LDAPMod *pMod; + + Modifications *modlist = NULL; + Modifications **modtail = &modlist; + Modifications tmp; + + SlapReply rs = { REP_RESULT }; + + if ( mods == NULL || *mods == NULL || ldn == NULL ) { + rs.sr_err = LDAP_PARAM_ERROR ; + goto cleanup; + } + + pConn = slapi_int_init_connection( NULL, LDAP_REQ_MODIFY ); + if ( pConn == NULL ) { + rs.sr_err = LDAP_NO_MEMORY; + goto cleanup; + } + + op = (Operation *)pConn->c_pending_ops.stqh_first; + pPB = (Slapi_PBlock *)op->o_pb; + op->o_ctrls = controls; + + dn.bv_val = slapi_ch_strdup( ldn ); + dn.bv_len = strlen( ldn ); + rs.sr_err = dnPrettyNormal( NULL, &dn, &op->o_req_dn, &op->o_req_ndn, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( slapi_control_present( controls, + SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) { + manageDsaIt = isCritical ? SLAP_CONTROL_CRITICAL : SLAP_CONTROL_NONCRITICAL; + } + + op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 1 ); + if ( op->o_bd == NULL ) { + rs.sr_err = LDAP_PARTIAL_RESULTS; + goto cleanup; + } + + op->o_dn = pConn->c_dn = op->o_bd->be_rootdn; + op->o_ndn = pConn->c_ndn = op->o_bd->be_rootndn; + + for ( i = 0, pMod = mods[0]; + rs.sr_err == LDAP_SUCCESS && pMod != NULL; + pMod = mods[++i] ) + { + Modifications *mod; + + if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) { + /* + * attr values are in berval format + * convert an array of pointers to bervals + * to an array of bervals + */ + rs.sr_err = bvptr2obj_copy( pMod->mod_bvalues, &bv ); + if ( rs.sr_err != LDAP_SUCCESS ) + goto cleanup; + tmp.sml_type.bv_val = pMod->mod_type; + tmp.sml_type.bv_len = strlen( pMod->mod_type ); + tmp.sml_values = bv; + tmp.sml_nvalues = NULL; + + mod = (Modifications *)ch_malloc( sizeof(Modifications) ); + + mod->sml_op = pMod->mod_op & LDAP_MOD_OP; + mod->sml_next = NULL; + mod->sml_desc = NULL; + mod->sml_type = tmp.sml_type; + mod->sml_values = tmp.sml_values; + mod->sml_nvalues = tmp.sml_nvalues; + } else { + rs.sr_err = values2obj_copy( pMod->mod_values, &bv ); + if ( rs.sr_err != LDAP_SUCCESS ) + goto cleanup; + tmp.sml_type.bv_val = pMod->mod_type; + tmp.sml_type.bv_len = strlen( pMod->mod_type ); + tmp.sml_values = bv; + tmp.sml_nvalues = NULL; + + mod = (Modifications *) ch_malloc( sizeof(Modifications) ); + + mod->sml_op = pMod->mod_op & LDAP_MOD_OP; + mod->sml_next = NULL; + mod->sml_desc = NULL; + mod->sml_type = tmp.sml_type; + mod->sml_values = tmp.sml_values; + mod->sml_nvalues = tmp.sml_nvalues; + } + *modtail = mod; + modtail = &mod->sml_next; + + switch( pMod->mod_op & LDAP_MOD_OP ) { + case LDAP_MOD_ADD: + if ( mod->sml_values == NULL ) { + rs.sr_err = LDAP_PROTOCOL_ERROR; + goto cleanup; + } + + /* fall through */ + case LDAP_MOD_DELETE: + case LDAP_MOD_REPLACE: + case LDAP_MOD_INCREMENT: + break; + + default: + rs.sr_err = LDAP_PROTOCOL_ERROR; + goto cleanup; + } + } + *modtail = NULL; + + if ( op->o_req_ndn.bv_len == 0 ) { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + goto cleanup; + } + + op->oq_modify.rs_modlist = modlist; + + if ( op->o_bd->be_modify ) { + int repl_user = be_isupdate( op ); + if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) { + int update = !BER_BVISEMPTY( &op->o_bd->be_update_ndn ); + const char *text = NULL; + char textbuf[ SLAP_TEXT_BUFLEN ]; + size_t textlen = sizeof( textbuf ); + slap_callback cb = { NULL, slap_replog_cb, NULL, NULL }; + + rs.sr_err = slap_mods_check( modlist, + &text, textbuf, textlen, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( !update ) { + rs.sr_err = slap_mods_no_update_check( modlist, + &text, textbuf, textlen ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + } + + if ( !repl_user ) { + rs.sr_err = slap_mods_opattrs( op, modlist, + modtail, &text, textbuf, + textlen, 1 ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + } + if ( log_change ) op->o_callback = &cb; + if ( (*op->o_bd->be_modify)( op, &rs ) ) { + rs.sr_err = LDAP_OTHER; + } + } else { + rs.sr_err = LDAP_REFERRAL; + } + } else { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + } + +cleanup: + + if ( pPB != NULL ) + slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rs.sr_err ); + + if ( dn.bv_val ) + slapi_ch_free( (void **)&dn.bv_val ); + + if ( modlist != NULL ) + slap_mods_free( modlist ); + + slapi_int_connection_destroy( &pConn ); + + return pPB; +#else + return NULL; +#endif /* LDAP_SLAPI */ +} + +Slapi_PBlock * +slapi_search_internal( + char *ldn, + int scope, + char *filStr, + LDAPControl **controls, + char **attrs, + int attrsonly ) +{ +#ifdef LDAP_SLAPI + Connection *c; + Operation *op = NULL; + Slapi_PBlock *pPB = NULL; + struct berval dn = BER_BVNULL; + Filter *filter=NULL; + struct berval fstr = BER_BVNULL; + AttributeName *an = NULL; + const char *text = NULL; + + int manageDsaIt = SLAP_CONTROL_NONE; + int isCritical; + int i; + + SlapReply rs = { REP_RESULT }; + + c = slapi_int_init_connection( NULL, LDAP_REQ_SEARCH ); + if ( c == NULL ) { + rs.sr_err = LDAP_NO_MEMORY; + goto cleanup; + } + + op = (Operation *)c->c_pending_ops.stqh_first; + pPB = (Slapi_PBlock *)op->o_pb; + op->o_ctrls = controls; + + if ( ldn != NULL ) { + dn.bv_val = slapi_ch_strdup(ldn); + dn.bv_len = strlen(ldn); + } + + rs.sr_err = dnPrettyNormal( NULL, &dn, &op->o_req_dn, &op->o_req_ndn, NULL ); + if ( rs.sr_err != LDAP_SUCCESS ) { + goto cleanup; + } + + if ( scope != LDAP_SCOPE_BASE && + scope != LDAP_SCOPE_ONELEVEL && + scope != LDAP_SCOPE_SUBTREE ) { + rs.sr_err = LDAP_PROTOCOL_ERROR; + goto cleanup; + } + + filter = slapi_str2filter(filStr); + if ( filter == NULL ) { + rs.sr_err = LDAP_PROTOCOL_ERROR; + goto cleanup; + } + + filter2bv( filter, &fstr ); + + for ( i = 0; attrs != NULL && attrs[i] != NULL; i++ ) { + ; /* count the number of attributes */ + } + + if (i > 0) { + an = (AttributeName *)slapi_ch_calloc( (i + 1), sizeof(AttributeName) ); + for (i = 0; attrs[i] != 0; i++) { + an[i].an_desc = NULL; + an[i].an_oc = NULL; + an[i].an_oc_exclude = 0; + an[i].an_name.bv_val = slapi_ch_strdup(attrs[i]); + an[i].an_name.bv_len = strlen(attrs[i]); + slap_bv2ad( &an[i].an_name, &an[i].an_desc, &text ); + } + an[i].an_name.bv_val = NULL; + } + + memset( &rs, 0, sizeof(rs) ); + rs.sr_type = REP_RESULT; + rs.sr_err = LDAP_SUCCESS; + rs.sr_entry = NULL; /* paranoia */ + + if ( scope == LDAP_SCOPE_BASE ) { + rs.sr_entry = NULL; + + if ( op->o_req_ndn.bv_len == 0 ) { + rs.sr_err = root_dse_info( c, &rs.sr_entry, &rs.sr_text ); + } + + if( rs.sr_err != LDAP_SUCCESS ) { + send_ldap_result( op, &rs ); + goto cleanup; + } else if ( rs.sr_entry != NULL ) { + rs.sr_err = test_filter( op, rs.sr_entry, filter ); + + if ( rs.sr_err == LDAP_COMPARE_TRUE ) { + rs.sr_type = REP_SEARCH; + rs.sr_err = LDAP_SUCCESS; + rs.sr_attrs = an; + rs.sr_operational_attrs = NULL; + rs.sr_flags = REP_ENTRY_MODIFIABLE; + + send_search_entry( op, &rs ); + } + + entry_free( rs.sr_entry ); + + rs.sr_type = REP_RESULT; + rs.sr_err = LDAP_SUCCESS; + + send_ldap_result( op, &rs ); + + goto cleanup; + } + } + + if ( !op->o_req_ndn.bv_len && default_search_nbase.bv_len ) { + slapi_ch_free( (void **)&op->o_req_dn.bv_val ); + slapi_ch_free( (void **)&op->o_req_ndn.bv_val ); + + ber_dupbv( &op->o_req_dn, &default_search_base ); + ber_dupbv( &op->o_req_ndn, &default_search_nbase ); + } + + if ( slapi_control_present( controls, + LDAP_CONTROL_MANAGEDSAIT, NULL, &isCritical ) ) { + manageDsaIt = isCritical ? SLAP_CONTROL_CRITICAL : SLAP_CONTROL_NONCRITICAL; + } + + op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 1 ); + if ( op->o_bd == NULL ) { + if ( manageDsaIt > SLAP_CONTROL_NONE ) { + rs.sr_err = LDAP_NO_SUCH_OBJECT; + } else { + rs.sr_err = LDAP_PARTIAL_RESULTS; + } + goto cleanup; + } + + op->o_dn = c->c_dn = op->o_bd->be_rootdn; + op->o_ndn = c->c_ndn = op->o_bd->be_rootndn; + + op->oq_search.rs_scope = scope; + op->oq_search.rs_deref = 0; + op->oq_search.rs_slimit = SLAP_NO_LIMIT; + op->oq_search.rs_tlimit = SLAP_NO_LIMIT; + op->oq_search.rs_attrsonly = attrsonly; + op->oq_search.rs_attrs = an; + op->oq_search.rs_filter = filter; + op->oq_search.rs_filterstr = fstr; + + if ( op->o_bd->be_search ) { + if ( (*op->o_bd->be_search)( op, &rs ) != 0 ) { + rs.sr_err = LDAP_OTHER; + } + } else { + rs.sr_err = LDAP_UNWILLING_TO_PERFORM; + } + +cleanup: + + if ( pPB != NULL ) + slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rs.sr_err ); + + if ( dn.bv_val ) + slapi_ch_free( (void **)&dn.bv_val ); + if ( filter ) + slapi_filter_free( filter, 1 ); + if ( fstr.bv_val ) + slapi_ch_free( (void **)&fstr.bv_val ); + if ( an != NULL ) + slapi_ch_free( (void **)&an ); + + slapi_int_connection_destroy( &c ); + + return pPB; +#else + return NULL; +#endif /* LDAP_SLAPI */ +} +