-/*\r
- * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.\r
- * COPYING RESTRICTIONS APPLY, see COPYRIGHT file\r
- */\r
-/*\r
- * (C) Copyright IBM Corp. 1997,2002\r
- * Redistribution and use in source and binary forms are permitted\r
- * provided that this notice is preserved and that due credit is\r
- * given to IBM Corporation. This software is provided ``as is''\r
- * without express or implied warranty.\r
- */\r
-\r
-#include "portable.h"\r
-#include "slapi_common.h"\r
-#include <slap.h>\r
-#include <slapi.h>\r
-#include <lber.h>\r
-#include "../../../libraries/liblber/lber-int.h"\r
-\r
-\r
-int bvptr2obj( struct berval **bvptr, struct berval **bvobj );\r
-\r
-static void\r
-internal_result_v3(\r
- Connection *conn, \r
- Operation *op, \r
- ber_int_t err,\r
- const char *matched, \r
- const char *text, \r
- BerVarray referrals,\r
- LDAPControl **ctrls )\r
-{\r
- return;\r
-}\r
-\r
-static int\r
-internal_search_entry(\r
- Backend *be, \r
- Connection *conn, \r
- Operation *op, \r
- Entry *e, \r
- AttributeName *attrs, \r
- int attrsonly, \r
- LDAPControl **ctrls ) \r
-{\r
- char *ent2str = NULL;\r
- int nentries = 0, len = 0, i = 0;\r
- Slapi_Entry **head = NULL, **tp;\r
- \r
- ent2str = slapi_entry2str( e, &len );\r
- if ( ent2str == NULL ) {\r
- return SLAPD_NO_MEMORY;\r
- }\r
-\r
- slapi_pblock_get( (Slapi_PBlock *)op->o_pb,\r
- SLAPI_NENTRIES, &nentries );\r
- slapi_pblock_get( (Slapi_PBlock *)op->o_pb,\r
- SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, &head );\r
- \r
- i = nentries + 1;\r
- if ( nentries == 0 ) {\r
- tp = (Slapi_Entry **)slapi_ch_malloc( 2 * sizeof(Slapi_Entry *) );\r
- if ( tp == NULL ) {\r
- return SLAPD_NO_MEMORY;\r
- }\r
-\r
- tp[ 0 ] = (Slapi_Entry *)str2entry( ent2str );\r
- if ( tp[ 0 ] == NULL ) { \r
- return SLAPD_NO_MEMORY;\r
- }\r
-\r
- } else {\r
- tp = (Slapi_Entry **)slapi_ch_realloc( (char *)head,\r
- sizeof(Slapi_Entry *) * ( i + 1 ) );\r
- if ( tp == NULL ) {\r
- return SLAPD_NO_MEMORY;\r
- }\r
- tp[ i - 1 ] = (Slapi_Entry *)str2entry( ent2str );\r
- if ( tp[ i - 1 ] == NULL ) { \r
- return SLAPD_NO_MEMORY;\r
- }\r
- }\r
- tp[ i ] = NULL;\r
- \r
- slapi_pblock_set( (Slapi_PBlock *)op->o_pb,\r
- SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES, (void *)tp );\r
- slapi_pblock_set( (Slapi_PBlock *)op->o_pb,\r
- SLAPI_NENTRIES, (void *)i );\r
- slapi_ch_free( ent2str );\r
-\r
- return LDAP_SUCCESS;\r
-}\r
-\r
-static void\r
-internal_search_result(\r
- Connection *conn, \r
- Operation *op,\r
- ber_int_t err, \r
- const char *matched, \r
- const char *text, \r
- BerVarray refs,\r
- LDAPControl **ctrls,\r
- int nentries ) \r
-{\r
- slapi_pblock_set( (Slapi_PBlock *)op->o_pb,\r
- SLAPI_NENTRIES, (void *)nentries );\r
-\r
- return;\r
-}\r
-\r
-static void\r
-internal_result_ext(\r
- Connection *conn, \r
- Operation *op, \r
- ber_int_t errnum, \r
- const char *matched,\r
- const char *text,\r
- BerVarray refs,\r
- const char *rspoid,\r
- struct berval *rspdata,\r
- LDAPControl **ctrls )\r
-{\r
- return;\r
-}\r
-\r
-static int\r
-internal_search_reference(\r
- Backend *be,\r
- Connection *conn, \r
- Operation *op, \r
- Entry *e,\r
- BerVarray refs,\r
- LDAPControl **ctrls,\r
- BerVarray *v2refs )\r
-{\r
- return LDAP_SUCCESS;\r
-}\r
-\r
-static Connection *\r
-fakeConnection(\r
- char *DN, \r
- int OpType ) \r
-{ \r
- Connection *pConn, *c;\r
- ber_len_t max = sockbuf_max_incoming;\r
-\r
- pConn = (Connection *) slapi_ch_calloc(1, sizeof(Connection));\r
- if (pConn == NULL) {\r
- return (Connection *)NULL;\r
- }\r
-\r
- LDAP_STAILQ_INIT( &pConn->c_pending_ops );\r
-\r
- pConn->c_pending_ops.stqh_first =\r
- (Operation *) slapi_ch_calloc( 1, sizeof(Operation) );\r
- if ( pConn->c_pending_ops.stqh_first == NULL ) { \r
- slapi_ch_free( pConn );\r
- return (Connection *)NULL;\r
- }\r
-\r
- pConn->c_pending_ops.stqh_first->o_pb = \r
- (Slapi_PBlock *) slapi_pblock_new();\r
- if ( pConn->c_pending_ops.stqh_first->o_pb == NULL ) {\r
- slapi_ch_free( pConn->c_pending_ops.stqh_first );\r
- slapi_ch_free( pConn );\r
- return (Connection *)NULL;\r
- }\r
-\r
- c = pConn;\r
-\r
- /* operation object */\r
- c->c_pending_ops.stqh_first->o_tag = OpType;\r
- c->c_pending_ops.stqh_first->o_protocol = LDAP_VERSION3; \r
- c->c_pending_ops.stqh_first->o_authmech.bv_val = NULL; \r
- c->c_pending_ops.stqh_first->o_authmech.bv_len = 0; \r
- c->c_pending_ops.stqh_first->o_time = slap_get_time();\r
-\r
- /* connection object */\r
- c->c_authmech.bv_val = NULL;\r
- c->c_authmech.bv_len = 0;\r
- c->c_dn.bv_val = NULL;\r
- c->c_dn.bv_len = 0;\r
- c->c_ndn.bv_val = NULL;\r
- c->c_ndn.bv_len = 0;\r
- c->c_groups = NULL;\r
-\r
- c->c_listener = NULL;\r
- c->c_peer_domain.bv_val = NULL;\r
- c->c_peer_domain.bv_len = 0;\r
- c->c_peer_name.bv_val = NULL;\r
- c->c_peer_name.bv_len = 0;\r
-\r
- LDAP_STAILQ_INIT( &c->c_ops );\r
-\r
- c->c_sasl_bind_mech.bv_val = NULL;\r
- c->c_sasl_bind_mech.bv_len = 0;\r
- c->c_sasl_context = NULL;\r
- c->c_sasl_extra = NULL;\r
-\r
- c->c_sb = ber_sockbuf_alloc( );\r
-\r
- ber_sockbuf_ctrl( c->c_sb, LBER_SB_OPT_SET_MAX_INCOMING, &max );\r
-\r
- c->c_currentber = NULL;\r
-\r
- /* should check status of thread calls */\r
- ldap_pvt_thread_mutex_init( &c->c_mutex );\r
- ldap_pvt_thread_mutex_init( &c->c_write_mutex );\r
- ldap_pvt_thread_cond_init( &c->c_write_cv );\r
-\r
- c->c_n_ops_received = 0;\r
- c->c_n_ops_executing = 0;\r
- c->c_n_ops_pending = 0;\r
- c->c_n_ops_completed = 0;\r
-\r
- c->c_n_get = 0;\r
- c->c_n_read = 0;\r
- c->c_n_write = 0;\r
-\r
- c->c_protocol = LDAP_VERSION3; \r
-\r
- c->c_activitytime = c->c_starttime = slap_get_time();\r
-\r
- c->c_connid = 0;\r
-\r
- c->c_conn_state = 0x01; /* SLAP_C_ACTIVE */\r
- c->c_struct_state = 0x02; /* SLAP_C_USED */\r
-\r
- c->c_ssf = c->c_transport_ssf = 0;\r
- c->c_tls_ssf = 0;\r
-\r
- backend_connection_init( c );\r
-\r
- pConn->c_send_ldap_result = internal_result_v3;\r
- pConn->c_send_search_entry = internal_search_entry;\r
- pConn->c_send_search_result = internal_search_result;\r
- pConn->c_send_ldap_extended = internal_result_ext;\r
- pConn->c_send_search_reference = internal_search_reference;\r
-\r
- return pConn;\r
-}\r
-\r
-/* \r
- * Function : ValuestoBValues \r
- * Convert an array of char ptrs to an array of berval ptrs.\r
- * return value : LDAP_SUCCESS\r
- * LDAP_NO_MEMORY\r
- * LDAP_OTHER\r
-*/\r
-\r
-static int \r
-ValuesToBValues(\r
- char **ppValue, \r
- struct berval ***pppBV )\r
-{\r
- int rc = LDAP_SUCCESS;\r
- int i;\r
- struct berval *pTmpBV;\r
- struct berval **ppNewBV;\r
-\r
- /* count the number of char ptrs. */\r
- for ( i = 0; ppValue != NULL && ppValue[i] != NULL; i++ ) {\r
- ; /* NULL */\r
- }\r
-\r
- if ( i == 0 ) {\r
- rc = LDAP_OTHER;\r
- } else {\r
- *pppBV = ppNewBV = (struct berval **)slapi_ch_malloc( (i+1)*(sizeof(struct berval *)) );\r
- if ( *pppBV == NULL ) {\r
- rc = LDAP_NO_MEMORY;\r
- } else {\r
- while ( ppValue != NULL && *ppValue != NULL && rc == LDAP_SUCCESS ) {\r
- pTmpBV = (struct berval *)slapi_ch_malloc(sizeof(struct berval));\r
- if ( pTmpBV == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- } else {\r
- pTmpBV->bv_val = slapi_ch_strdup(*ppValue);\r
- if ( pTmpBV->bv_val == NULL ) {\r
- rc = LDAP_NO_MEMORY;\r
- } else {\r
- pTmpBV->bv_len = strlen(*ppValue);\r
- *ppNewBV = pTmpBV;\r
- ppNewBV++;\r
- }\r
- ppValue++;\r
- }\r
- }\r
- /* null terminate the array of berval ptrs */\r
- *ppNewBV = NULL;\r
- }\r
- }\r
- return( rc );\r
-}\r
-\r
-\r
-/*\r
- * Function : LDAPModToEntry \r
- * convert a dn plus an array of LDAPMod struct ptrs to an entry structure\r
- * with a link list of the correspondent attributes.\r
- * Return value : LDAP_SUCCESS\r
- * LDAP_NO_MEMORY\r
- * LDAP_OTHER\r
-*/\r
-Entry *\r
-LDAPModToEntry(\r
- char *ldn, \r
- LDAPMod **mods )\r
-{\r
- struct berval dn = { 0, NULL };\r
- Entry *pEntry=NULL;\r
- LDAPMod *pMod;\r
- struct berval *bv;\r
- struct berval **ppBV;\r
- Backend *be;\r
- Operation *op;\r
-\r
- Modifications *modlist = NULL;\r
- Modifications **modtail = &modlist;\r
- Modifications tmp;\r
-\r
- int rc = LDAP_SUCCESS;\r
- int i;\r
-\r
- const char *text = NULL;\r
-\r
-\r
- op = (Operation *) slapi_ch_calloc(1, sizeof(Operation));\r
- if ( pEntry == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- } \r
- op->o_tag = LDAP_REQ_ADD;\r
-\r
- pEntry = (Entry *) ch_calloc( 1, sizeof(Entry) );\r
- if ( pEntry == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- } \r
-\r
- dn.bv_val = slapi_ch_strdup(ldn);\r
- dn.bv_len = strlen(ldn);\r
-\r
- rc = dnPrettyNormal( NULL, &dn, &pEntry->e_name, &pEntry->e_nname );\r
- if (rc != LDAP_SUCCESS) goto cleanup;\r
-\r
- if ( rc == LDAP_SUCCESS ) {\r
- for ( i=0, pMod=mods[0]; rc == LDAP_SUCCESS && pMod != NULL; pMod=mods[++i]) {\r
- Modifications *mod;\r
- if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) {\r
- /* attr values are in berval format */\r
- /* convert an array of pointers to bervals to an array of bervals */\r
- rc = bvptr2obj(pMod->mod_bvalues, &bv);\r
- if (rc != LDAP_SUCCESS) goto cleanup;\r
- tmp.sml_type.bv_val = slapi_ch_strdup(pMod->mod_type);\r
- tmp.sml_type.bv_len = slapi_ch_stlen(pMod->mod_type);\r
- tmp.sml_bvalues = bv;\r
- \r
- mod = (Modifications *) ch_malloc( sizeof(Modifications) );\r
-\r
- mod->sml_op = LDAP_MOD_ADD;\r
- mod->sml_next = NULL;\r
- mod->sml_desc = NULL;\r
- mod->sml_type = tmp.sml_type;\r
- mod->sml_bvalues = tmp.sml_bvalues;\r
-\r
- *modtail = mod;\r
- modtail = &mod->sml_next;\r
-\r
- } else {\r
- /* attr values are in string format, need to be converted */\r
- /* to an array of bervals */ \r
- if ( pMod->mod_values == NULL ) {\r
- rc = LDAP_OTHER;\r
- } else {\r
- rc = ValuesToBValues( pMod->mod_values, &ppBV );\r
- if (rc != LDAP_SUCCESS) goto cleanup;\r
- rc = bvptr2obj(ppBV, &bv);\r
- if (rc != LDAP_SUCCESS) goto cleanup;\r
- tmp.sml_type.bv_val = slapi_ch_strdup(pMod->mod_type);\r
- tmp.sml_type.bv_len = slapi_ch_stlen(pMod->mod_type);\r
- tmp.sml_bvalues = bv;\r
- \r
- mod = (Modifications *) ch_malloc( sizeof(Modifications) );\r
-\r
- mod->sml_op = LDAP_MOD_ADD;\r
- mod->sml_next = NULL;\r
- mod->sml_desc = NULL;\r
- mod->sml_type = tmp.sml_type;\r
- mod->sml_bvalues = tmp.sml_bvalues;\r
-\r
- *modtail = mod;\r
- modtail = &mod->sml_next;\r
-\r
- if ( ppBV != NULL ) {\r
- ber_bvecfree( ppBV );\r
- }\r
- }\r
- }\r
- } /* for each LDAPMod */\r
- }\r
-\r
- be = select_backend(&dn, 0, 0);\r
- if ( be == NULL ) {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- goto cleanup;\r
- }\r
-\r
- if ( be ) {\r
- int repl_user = be_isupdate(be, &be->be_rootdn );\r
- if ( !be->be_update_ndn.bv_len || repl_user ) {\r
- int update = be->be_update_ndn.bv_len;\r
- char textbuf[SLAP_TEXT_BUFLEN];\r
- size_t textlen = sizeof textbuf;\r
-\r
- rc = slap_mods_check( modlist, update, &text, \r
- textbuf, textlen );\r
- if ( rc != LDAP_SUCCESS) {\r
- goto cleanup;\r
- }\r
-\r
- if ( !repl_user ) {\r
- rc = slap_mods_opattrs( be, op,\r
- modlist, modtail, &text, \r
- textbuf, textlen );\r
- if ( rc != LDAP_SUCCESS) {\r
- goto cleanup;\r
- }\r
- }\r
-\r
- /*\r
- * FIXME: slap_mods2entry is declared static \r
- * in servers/slapd/add.c\r
- */\r
- rc = slap_mods2entry( modlist, &pEntry, repl_user,\r
- &text, textbuf, textlen );\r
- if (rc != LDAP_SUCCESS) {\r
- goto cleanup;\r
- }\r
-\r
- } else {\r
- rc = LDAP_REFERRAL;\r
- }\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
-\r
- if ( dn.bv_val ) slapi_ch_free( dn.bv_val );\r
- if ( op ) slapi_ch_free( op );\r
- if ( modlist != NULL ) slap_mods_free( modlist );\r
- if ( rc != LDAP_SUCCESS ) {\r
- if ( pEntry != NULL ) {\r
- slapi_entry_free( pEntry );\r
- }\r
- pEntry = NULL;\r
- }\r
-\r
- return( pEntry );\r
-}\r
-\r
-/* Function : slapi_delete_internal\r
- *\r
- * Description : Plugin functions call this routine to delete an entry \r
- * in the backend directly\r
- * Return values : LDAP_SUCCESS\r
- * LDAP_OPERAITONS_ERROR\r
- * LDAP_NO_MEMORY\r
- * LDAP_OTHER\r
- * LDAP_UNWILLING_TO_PERFORM\r
-*/\r
-Slapi_PBlock *\r
-slapi_delete_internal(\r
- char *ldn, \r
- LDAPControl **controls, \r
- int log_change )\r
-{\r
-#if defined(LDAP_SLAPI)\r
- Backend *be;\r
- Connection *pConn = NULL;\r
- Operation *op = NULL;\r
- Slapi_PBlock *pPB = NULL;\r
- Slapi_PBlock *pSavePB = NULL;\r
-\r
- struct berval dn = { 0, NULL };\r
- struct berval pdn = { 0, NULL };\r
- struct berval ndn = { 0, NULL };\r
-\r
- int rc=LDAP_SUCCESS;\r
- int manageDsaIt = 0;\r
- int isCritical;\r
-\r
- if ( ldn == NULL ) {\r
- rc = LDAP_OPERATIONS_ERROR; \r
- goto cleanup;\r
- }\r
-\r
- pConn = fakeConnection( NULL, LDAP_REQ_DELETE );\r
- if (pConn == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- }\r
-\r
- op = (Operation *)pConn->c_pending_ops.stqh_first;\r
- pPB = (Slapi_PBlock *)op->o_pb;\r
- op->o_ctrls = controls;\r
-\r
- dn.bv_val = slapi_ch_strdup(ldn);\r
- dn.bv_len = slapi_strlen(ldn);\r
- rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn );\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
-\r
- if ( slapi_control_present( controls, \r
- SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical) ) {\r
- manageDsaIt = 1; \r
- }\r
-\r
- be = select_backend( &dn, manageDsaIt, 0 );\r
- if ( be == NULL ) {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- goto cleanup;\r
- }\r
-\r
- op->o_ndn.bv_val = slapi_ch_strdup(be->be_rootdn.bv_val);\r
- op->o_ndn.bv_len = be->be_rootdn.bv_len;\r
- pConn->c_dn.bv_val = slapi_ch_strdup(be->be_rootdn.bv_val);\r
- pConn->c_dn.bv_len = be->be_rootdn.bv_len;\r
-\r
- suffix_alias( be, &ndn );\r
-\r
- if ( be->be_delete ) {\r
- int repl_user = be_isupdate( be, &op->o_ndn );\r
- if ( !be->be_update_ndn.bv_len || repl_user ) {\r
- rc = (*be->be_delete)( be, pConn, op, &pdn, &ndn );\r
- if ( rc == 0 ) {\r
- if (log_change) {\r
- replog( be, op, &pdn, &ndn, NULL );\r
- }\r
- rc = LDAP_SUCCESS;\r
- } else {\r
- rc = LDAP_OPERATIONS_ERROR;\r
- }\r
- } else {\r
- rc = LDAP_REFERRAL;\r
- }\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
- if (pPB != NULL) \r
- slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
-\r
- if (dn.bv_val) slapi_ch_free(dn.bv_val);\r
- if (pdn.bv_val) slapi_ch_free(pdn.bv_val);\r
- if (ndn.bv_val) slapi_ch_free(ndn.bv_val);\r
-\r
- if ( pConn != NULL ) {\r
- if ( pConn->c_dn.bv_val ) slapi_ch_free( pConn->c_dn.bv_val );\r
- if ( op->o_dn.bv_val ) slapi_ch_free( op->o_dn.bv_val );\r
- if ( op ) slapi_ch_free( op );\r
- pSavePB = pPB;\r
- free( pConn );\r
- }\r
- \r
- return (pSavePB);\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-Slapi_PBlock * \r
-slapi_add_entry_internal(\r
- Slapi_Entry *e, \r
- LDAPControl **controls, \r
- int log_changes ) \r
-{\r
-#if defined(LDAP_SLAPI)\r
- Connection *pConn = NULL;\r
- Operation *op = NULL;\r
- Slapi_PBlock *pPB = NULL, *pSavePB = NULL;\r
- Backend *be;\r
-\r
- int manageDsaIt = 0;\r
- int isCritical;\r
- int rc = LDAP_SUCCESS;\r
-\r
- if ( e == NULL ) {\r
- rc = LDAP_OPERATIONS_ERROR;\r
- goto cleanup;\r
- }\r
- \r
- pConn = fakeConnection( NULL, LDAP_REQ_ADD );\r
- if ( pConn == NULL ) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- }\r
-\r
- if ( slapi_control_present( controls, LDAP_CONTROL_MANAGEDSAIT,\r
- NULL, &isCritical ) ) {\r
- manageDsaIt = 1; \r
- }\r
-\r
- op = (Operation *)pConn->c_pending_ops.stqh_first;\r
- pPB = (Slapi_PBlock *)op->o_pb;\r
- op->o_ctrls = controls;\r
-\r
- be = select_backend( &e->e_nname, manageDsaIt, 0 );\r
- if ( be == NULL ) {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- goto cleanup;\r
- }\r
-\r
- op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- op->o_ndn.bv_len = be->be_rootdn.bv_len;\r
- pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- pConn->c_dn.bv_len = be->be_rootdn.bv_len;\r
-\r
- if ( be->be_add ) {\r
- int repl_user = be_isupdate( be, &op->o_ndn );\r
- if ( !be->be_update_ndn.bv_len || repl_user ){\r
- if ( (*be->be_add)( be, pConn, op, e ) == 0 ) {\r
- if ( log_changes ) {\r
- replog( be, op, &e->e_name, \r
- &e->e_nname, e );\r
- }\r
- rc = LDAP_SUCCESS;\r
- }\r
- } else {\r
- rc = LDAP_REFERRAL;\r
- }\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
-\r
- if ( pPB != NULL ) {\r
- slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
- }\r
-\r
- if ( pConn != NULL ) {\r
- if ( pConn->c_dn.bv_val ) slapi_ch_free( pConn->c_dn.bv_val );\r
- if ( op ) {\r
- if ( op->o_ndn.bv_val ) {\r
- slapi_ch_free( op->o_ndn.bv_val );\r
- }\r
- free(op);\r
- }\r
- pSavePB = pPB;\r
- free( pConn );\r
- }\r
- return( pSavePB );\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-\r
-Slapi_PBlock *\r
-slapi_add_internal(\r
- char *dn, \r
- LDAPMod **mods, \r
- LDAPControl **controls, \r
- int log_changes ) \r
-{\r
-#if defined(LDAP_SLAPI)\r
- LDAPMod *pMod = NULL;\r
- Slapi_PBlock *pb = NULL;\r
- Entry *pEntry = NULL;\r
- int i, rc=LDAP_SUCCESS;\r
-\r
- if ( mods == NULL || *mods == NULL || dn == NULL || *dn == '\0' ) {\r
- rc = LDAP_OPERATIONS_ERROR ;\r
- }\r
-\r
- if ( rc == LDAP_SUCCESS ) {\r
- for ( i = 0, pMod = mods[0]; pMod != NULL; pMod = mods[++i] ) {\r
- if ( (pMod->mod_op & ~LDAP_MOD_BVALUES) != LDAP_MOD_ADD ) {\r
- rc = LDAP_OTHER;\r
- break;\r
- }\r
- }\r
- }\r
-\r
- if ( rc == LDAP_SUCCESS ) {\r
- if((pEntry = LDAPModToEntry( dn, mods )) == NULL) {\r
- rc = LDAP_OTHER;\r
- }\r
- }\r
-\r
- if ( rc != LDAP_SUCCESS ) {\r
- pb = slapi_pblock_new();\r
- slapi_pblock_set( pb, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
- } else {\r
- pb = slapi_add_entry_internal( pEntry, controls, log_changes );\r
- }\r
-\r
- if ( pEntry ) {\r
- slapi_entry_free(pEntry);\r
- }\r
-\r
- return(pb);\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-/* Function : slapi_modrdn_internal\r
- *\r
- * Description : Plugin functions call this routine to modify the rdn \r
- * of an entry in the backend directly\r
- * Return values : LDAP_SUCCESS\r
- * LDAP_OPERAITONS_ERROR\r
- * LDAP_NO_MEMORY\r
- * LDAP_OTHER\r
- * LDAP_UNWILLING_TO_PERFORM\r
- *\r
- * NOTE: This function does not support the "newSuperior" option from LDAP V3.\r
- */\r
-Slapi_PBlock *\r
-slapi_modrdn_internal(\r
- char *olddn, \r
- char *lnewrdn, \r
- int deloldrdn, \r
- LDAPControl **controls, \r
- int log_change )\r
-{\r
-#if defined(LDAP_SLAPI)\r
- int rc = LDAP_SUCCESS;\r
-\r
- struct berval dn = { 0, NULL };\r
- struct berval pdn = { 0, NULL };\r
- struct berval ndn = { 0, NULL };\r
-\r
- struct berval newrdn = { 0, NULL };\r
- struct berval pnewrdn = { 0, NULL };\r
- struct berval nnewrdn = { 0, NULL };\r
-\r
-#if 0 /* currently unused */\r
- struct berval newSuperior = { 0, NULL };\r
-#endif\r
- struct berval pnewSuperior = { 0, NULL }; \r
-#if 0 /* currently unused */\r
- struct berval nnewSuperior = { 0, NULL }; \r
-#endif\r
-\r
- struct berval *pnewS = NULL;\r
- struct berval *nnewS = NULL;\r
-\r
- Connection *pConn = NULL;\r
- Operation *op = NULL;\r
- Slapi_PBlock *pPB = NULL;\r
- Slapi_PBlock *pSavePB = NULL;\r
-\r
- Backend *be;\r
-#if 0 /* currently unused */\r
- Backend *newSuperior_be = NULL;\r
-#endif\r
-\r
- int manageDsaIt = 0;\r
- int isCritical;\r
-#if 0 /* currently unused */\r
- const char *text = NULL;\r
-#endif\r
-\r
- dn.bv_val = slapi_ch_strdup(olddn);\r
- dn.bv_len = slapi_ch_stlen(olddn);\r
-\r
- rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn );\r
-\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
-\r
- if ( ndn.bv_len == 0 ) {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- goto cleanup;\r
- }\r
-\r
- newrdn.bv_val = slapi_ch_strdup( lnewrdn );\r
- newrdn.bv_len = slapi_ch_stlen( lnewrdn );\r
-\r
- rc = dnPrettyNormal( NULL, &newrdn, &pnewrdn, &nnewrdn );\r
-\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
-\r
- if ( rdnValidate( &pnewrdn ) != LDAP_SUCCESS ) goto cleanup;\r
-\r
- pConn = fakeConnection( NULL, LDAP_REQ_MODRDN);\r
- if ( pConn == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- }\r
-\r
- op = (Operation *)pConn->c_pending_ops.stqh_first;\r
- pPB = (Slapi_PBlock *)op->o_pb;\r
- op->o_ctrls = controls;\r
-\r
- if ( slapi_control_present( controls, \r
- SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) {\r
- manageDsaIt = 1;\r
- }\r
-\r
- be = select_backend( &dn, manageDsaIt, 0 );\r
- if ( be == NULL ) {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- goto cleanup;\r
- }\r
-\r
- op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- op->o_ndn.bv_len = be->be_rootdn.bv_len;\r
- pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- pConn->c_dn.bv_len = be->be_rootdn.bv_len;\r
-\r
- suffix_alias( be, &ndn );\r
-\r
- if ( be->be_modrdn ) {\r
- int repl_user = be_isupdate( be, &op->o_ndn );\r
- if ( !be->be_update_ndn.bv_len || repl_user ) {\r
- rc = (*be->be_modrdn)( be, pConn, op, &pdn, &ndn,\r
- &pnewrdn, &nnewrdn, deloldrdn, pnewS,\r
- nnewS );\r
- if ( rc == 0 ) {\r
- struct slap_replog_moddn moddn;\r
- moddn.newrdn = &pnewrdn;\r
- moddn.deloldrdn = deloldrdn;\r
- moddn.newsup = &pnewSuperior;\r
- if ( log_change ) {\r
- replog( be, op, &pdn, &ndn, &moddn );\r
- }\r
- rc = LDAP_SUCCESS;\r
-\r
- } else {\r
- rc = LDAP_OPERATIONS_ERROR;\r
- }\r
-\r
- } else {\r
- rc = LDAP_REFERRAL;\r
- }\r
-\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
-\r
- if ( pPB != NULL ) {\r
- slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
- }\r
- \r
- if ( dn.bv_val ) ch_free( dn.bv_val );\r
- if ( pdn.bv_val ) ch_free( pdn.bv_val );\r
- if ( ndn.bv_val ) ch_free( ndn.bv_val );\r
-\r
- if ( newrdn.bv_val ) ch_free( newrdn.bv_val );\r
- if ( pnewrdn.bv_val ) ch_free( newrdn.bv_val );\r
- if ( nnewrdn.bv_val ) ch_free( newrdn.bv_val );\r
-\r
- if ( pConn != NULL ) {\r
- if ( pConn->c_dn.bv_val ) slapi_ch_free( pConn->c_dn.bv_val );\r
- if ( op ) {\r
- if ( op->o_dn.bv_val ) slapi_ch_free( op->o_dn.bv_val );\r
- slapi_ch_free( op );\r
- }\r
- pSavePB = pPB;\r
- free( pConn );\r
- }\r
-\r
- return( pSavePB );\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-/* Function : slapi_modify_internal\r
- *\r
- * Description: Plugin functions call this routine to modify an entry \r
- * in the backend directly\r
- * Return values : LDAP_SUCCESS\r
- * LDAP_OPERAITONS_ERROR\r
- * LDAP_NO_MEMORY\r
- * LDAP_OTHER\r
- * LDAP_UNWILLING_TO_PERFORM\r
-*/\r
-Slapi_PBlock *\r
-slapi_modify_internal(\r
- char *ldn, \r
- LDAPMod **mods, \r
- LDAPControl **controls, \r
- int log_change )\r
-{\r
-#if defined(LDAP_SLAPI)\r
- int i, rc = LDAP_SUCCESS;\r
- Connection *pConn = NULL;\r
- Operation *op = NULL;\r
- Slapi_PBlock *pPB = NULL;\r
- Slapi_PBlock *pSavePB = NULL;\r
-\r
- struct berval dn = { 0, NULL };\r
- struct berval pdn = { 0, NULL };\r
- struct berval ndn = { 0, NULL };\r
-\r
- int manageDsaIt = 0;\r
- int isCritical;\r
- Backend *be;\r
- struct berval *bv;\r
- struct berval **ppBV;\r
- LDAPMod *pMod;\r
-\r
- Modifications *modlist = NULL;\r
- Modifications **modtail = &modlist;\r
- Modifications tmp;\r
-\r
- if ( mods == NULL || *mods == NULL || ldn == NULL ) {\r
- rc = LDAP_OPERATIONS_ERROR ;\r
- goto cleanup;\r
- }\r
-\r
- pConn = fakeConnection( NULL, LDAP_REQ_MODIFY );\r
- if ( pConn == NULL ) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- }\r
-\r
- op = (Operation *)pConn->c_pending_ops.stqh_first;\r
- pPB = (Slapi_PBlock *)op->o_pb;\r
- op->o_ctrls = controls;\r
-\r
- dn.bv_val = slapi_ch_strdup( ldn );\r
- dn.bv_len = slapi_strlen( ldn );\r
- rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn );\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
-\r
- if ( slapi_control_present( controls, \r
- SLAPI_CONTROL_MANAGEDSAIT_OID, NULL, &isCritical ) ) {\r
- manageDsaIt = 1;\r
- }\r
-\r
- be = select_backend( &dn, manageDsaIt, 0 );\r
- if ( be == NULL ) {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- goto cleanup;\r
- }\r
-\r
- op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- op->o_ndn.bv_len = be->be_rootdn.bv_len;\r
- pConn->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- pConn->c_dn.bv_len = be->be_rootdn.bv_len;\r
-\r
- suffix_alias( be, &ndn );\r
-\r
- for ( i = 0, pMod = mods[0]; rc == LDAP_SUCCESS && pMod != NULL; \r
- pMod = mods[++i] ) {\r
- Modifications *mod;\r
- if ( (pMod->mod_op & LDAP_MOD_BVALUES) != 0 ) {\r
- /*\r
- * attr values are in berval format\r
- * convert an array of pointers to bervals\r
- * to an array of bervals\r
- */\r
- rc = bvptr2obj( pMod->mod_bvalues, &bv );\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
- tmp.sml_type.bv_val = slapi_ch_strdup( pMod->mod_type );\r
- tmp.sml_type.bv_len = slapi_ch_stlen( pMod->mod_type );\r
- tmp.sml_bvalues = bv;\r
-\r
- mod = (Modifications *)ch_malloc( sizeof(Modifications) );\r
-\r
- mod->sml_op = pMod->mod_op;\r
- mod->sml_next = NULL;\r
- mod->sml_desc = NULL;\r
- mod->sml_type = tmp.sml_type;\r
- mod->sml_bvalues = tmp.sml_bvalues;\r
- } else { \r
- rc = ValuesToBValues( pMod->mod_values, &ppBV );\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
- rc = bvptr2obj( ppBV, &bv );\r
- if ( rc != LDAP_SUCCESS ) goto cleanup;\r
- tmp.sml_type.bv_val = slapi_ch_strdup( pMod->mod_type );\r
- tmp.sml_type.bv_len = slapi_ch_stlen( pMod->mod_type );\r
- tmp.sml_bvalues = bv;\r
-\r
- mod = (Modifications *) ch_malloc( sizeof(Modifications) );\r
-\r
- mod->sml_op = pMod->mod_op;\r
- mod->sml_next = NULL;\r
- mod->sml_desc = NULL;\r
- mod->sml_type = tmp.sml_type;\r
- mod->sml_bvalues = tmp.sml_bvalues;\r
-\r
- if ( ppBV != NULL ) {\r
- ber_bvecfree( ppBV );\r
- }\r
- }\r
- *modtail = mod;\r
- modtail = &mod->sml_next;\r
-\r
- switch( pMod->mod_op ) {\r
- case LDAP_MOD_ADD:\r
- if ( mod->sml_bvalues == NULL ) {\r
- rc = LDAP_PROTOCOL_ERROR;\r
- goto cleanup;\r
- }\r
-\r
- /* fall through */\r
- case LDAP_MOD_DELETE:\r
- case LDAP_MOD_REPLACE:\r
- break;\r
-\r
- default:\r
- rc = LDAP_PROTOCOL_ERROR;\r
- goto cleanup;\r
- }\r
- } \r
- *modtail = NULL;\r
-\r
- if ( ndn.bv_len == 0 ) {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- goto cleanup;\r
- }\r
-\r
- if ( be->be_modify ) {\r
- int repl_user = be_isupdate( be, &op->o_ndn );\r
- if ( !be->be_update_ndn.bv_len || repl_user ) {\r
- int update = be->be_update_ndn.bv_len;\r
- const char *text = NULL;\r
- char textbuf[SLAP_TEXT_BUFLEN];\r
- size_t textlen = sizeof( textbuf );\r
-\r
- rc = slap_mods_check( modlist, update,\r
- &text, textbuf, textlen );\r
- if (rc != LDAP_SUCCESS) {\r
- goto cleanup;\r
- }\r
-\r
- if ( !repl_user ) {\r
- rc = slap_mods_opattrs( be, op, modlist,\r
- modtail, &text, textbuf, \r
- textlen );\r
- if (rc != LDAP_SUCCESS) {\r
- goto cleanup;\r
- }\r
- }\r
- rc = (*be->be_modify)( be, pConn, op,\r
- &pdn, &ndn, modlist );\r
- if ( rc == 0 ) {\r
- if ( log_change ) {\r
- replog( be, op, &pdn, &ndn, modlist );\r
- }\r
- rc = LDAP_SUCCESS;\r
- } else {\r
- rc = LDAP_OPERATIONS_ERROR;\r
- }\r
- } else {\r
- rc = LDAP_REFERRAL;\r
- }\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
-\r
- if ( pPB != NULL ) \r
- slapi_pblock_set( pPB, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
-\r
- if ( dn.bv_val ) ch_free( dn.bv_val );\r
- if ( pdn.bv_val ) ch_free( pdn.bv_val );\r
- if ( ndn.bv_val ) ch_free( ndn.bv_val );\r
-\r
- if ( modlist != NULL ) slap_mods_free( modlist );\r
-\r
- if ( pConn != NULL ) {\r
- if ( pConn->c_dn.bv_val ) slapi_ch_free( pConn->c_dn.bv_val );\r
- if ( op ) {\r
- if ( op->o_dn.bv_val ) slapi_ch_free( op->o_dn.bv_val );\r
- slapi_ch_free( op );\r
- }\r
- pSavePB = pPB;\r
- free( pConn );\r
- }\r
-\r
- return ( pSavePB );\r
-\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-Slapi_PBlock *\r
-slapi_search_internal_bind(\r
- char *bindDN, \r
- char *ldn, \r
- int scope, \r
- char *filStr, \r
- LDAPControl **controls, \r
- char **attrs, \r
- int attrsonly ) \r
-{ \r
-#if defined(LDAP_SLAPI)\r
- Backend *be;\r
- Connection *c;\r
- Operation *op = NULL;\r
- Slapi_PBlock *ptr = NULL; \r
- Slapi_PBlock *pSavePB = NULL; \r
- struct berval dn = { 0, NULL };\r
- struct berval pdn = { 0, NULL };\r
- struct berval ndn = { 0, NULL };\r
- Filter *filter=NULL;\r
- struct berval fstr = { 0, NULL };\r
- AttributeName *an = NULL;\r
- const char *text = NULL;\r
-\r
- int deref=0;\r
- int sizelimit=-1, timelimit=-1;\r
-\r
- int manageDsaIt = 0; \r
- int isCritical;\r
-\r
- int i, rc = LDAP_SUCCESS;\r
- \r
- c = fakeConnection( NULL, LDAP_REQ_SEARCH );\r
- if (c == NULL) {\r
- rc = LDAP_NO_MEMORY;\r
- goto cleanup;\r
- }\r
-\r
- op = (Operation *)c->c_pending_ops.stqh_first;\r
- ptr = (Slapi_PBlock *)op->o_pb;\r
- op->o_ctrls = controls;\r
-\r
- dn.bv_val = slapi_ch_strdup(ldn);\r
- dn.bv_len = slapi_strlen(ldn);\r
-\r
- rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn );\r
- if (rc != LDAP_SUCCESS) goto cleanup;\r
-\r
- if ( scope != LDAP_SCOPE_BASE && \r
- scope != LDAP_SCOPE_ONELEVEL && \r
- scope != LDAP_SCOPE_SUBTREE ) {\r
- rc = LDAP_PROTOCOL_ERROR;\r
- goto cleanup;\r
- }\r
-\r
- filter = slapi_str2filter(filStr);\r
- if ( filter == NULL ) {\r
- rc = LDAP_PROTOCOL_ERROR;\r
- goto cleanup;\r
- }\r
-\r
- filter2bv( filter, &fstr );\r
-\r
- for ( i = 0; attrs != NULL && attrs[i] != NULL; i++ ) {\r
- ; /* count the number of attributes */\r
- }\r
-\r
- if (i > 0) {\r
- an = (AttributeName *)slapi_ch_calloc(1, sizeof(AttributeName));\r
- for (i = 0; attrs[i] != 0; i++) {\r
- an[i].an_desc = NULL;\r
- an[i].an_oc = NULL;\r
- an[i].an_name.bv_val = slapi_ch_strdup(attrs[i]);\r
- an[i].an_name.bv_len = slapi_strlen(attrs[i]);\r
- slap_bv2ad( &an[i].an_name, &an[i].an_desc, &text );\r
- }\r
- }\r
-\r
- if ( scope == LDAP_SCOPE_BASE ) {\r
- Entry *entry = NULL;\r
-\r
- if ( ndn.bv_len == 0 ) {\r
- rc = root_dse_info( c, &entry, &text );\r
- }\r
-\r
- if( rc != LDAP_SUCCESS ) {\r
- send_ldap_result( c, op, rc, NULL, text, NULL, NULL );\r
- goto cleanup;\r
- } else if ( entry != NULL ) {\r
- rc = test_filter( NULL, c, op, entry, filter );\r
-\r
- if( rc == LDAP_COMPARE_TRUE ) {\r
- send_search_entry( NULL, c, op, entry,\r
- an, attrsonly, NULL );\r
- }\r
-\r
- entry_free( entry );\r
-\r
- send_ldap_result( c, op, LDAP_SUCCESS, \r
- NULL, NULL, NULL, NULL );\r
-\r
- rc = LDAP_SUCCESS;\r
-\r
- goto cleanup;\r
- }\r
- }\r
-\r
- if ( !ndn.bv_len && default_search_nbase.bv_len ) {\r
- ch_free( pdn.bv_val );\r
- ch_free( ndn.bv_val );\r
-\r
- ber_dupbv( &pdn, &default_search_base );\r
- ber_dupbv( &ndn, &default_search_nbase );\r
- }\r
-\r
- if ( slapi_control_present( controls,\r
- LDAP_CONTROL_MANAGEDSAIT, NULL, &isCritical ) ) {\r
- manageDsaIt = 1;\r
- }\r
-\r
- be = select_backend( &dn, manageDsaIt, 0 );\r
- if ( be == NULL ) {\r
- if ( manageDsaIt == 1 ) {\r
- rc = LDAP_NO_SUCH_OBJECT;\r
- } else {\r
- rc = LDAP_PARTIAL_RESULTS;\r
- }\r
- goto cleanup;\r
- } \r
-\r
- op->o_ndn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- op->o_ndn.bv_len = be->be_rootdn.bv_len;\r
- c->c_dn.bv_val = slapi_ch_strdup( be->be_rootdn.bv_val );\r
- c->c_dn.bv_len = be->be_rootdn.bv_len;\r
-\r
- if ( be->be_search ) {\r
- rc = (*be->be_search)( be, c, op, &pdn, &ndn,\r
- scope, deref, sizelimit, timelimit,\r
- filter, &fstr, an, attrsonly );\r
- if ( rc == 0 ) {\r
- rc = LDAP_SUCCESS;\r
- } else {\r
- rc = LDAP_OPERATIONS_ERROR;\r
- }\r
- } else {\r
- rc = LDAP_UNWILLING_TO_PERFORM;\r
- }\r
-\r
-cleanup:\r
-\r
- if ( ptr != NULL )\r
- slapi_pblock_set( ptr, SLAPI_PLUGIN_INTOP_RESULT, (void *)rc );\r
-\r
- if ( dn.bv_val ) free( dn.bv_val );\r
- if ( ndn.bv_val ) free( ndn.bv_val );\r
- if ( pdn.bv_val ) free( pdn.bv_val );\r
-\r
- if ( filter ) slapi_filter_free( filter, 1 );\r
- if ( fstr.bv_val ) free ( fstr.bv_val );\r
-\r
- if ( an != NULL ) free( an );\r
-\r
- if ( c != NULL ) {\r
- if ( c->c_dn.bv_val ) slapi_ch_free( c->c_dn.bv_val );\r
- if ( op ) {\r
- if ( op->o_ndn.bv_val ) slapi_ch_free( op->o_ndn.bv_val );\r
- free( op );\r
- }\r
- pSavePB = ptr;\r
- free( c );\r
- }\r
- return( pSavePB );\r
-#endif /* LDAP_SLAPI */\r
- return NULL;\r
-}\r
-\r
-Slapi_PBlock * \r
-slapi_search_internal(\r
- char *base,\r
- int scope,\r
- char *filStr, \r
- LDAPControl **controls,\r
- char **attrs,\r
- int attrsonly ) \r
-{\r
-#if defined(LDAP_SLAPI)\r
- return slapi_search_internal_bind( NULL, base, scope, filStr,\r
- controls, attrs, attrsonly );\r
-#endif\r
- return NULL;\r
-}\r
-\r
+/* $OpenLDAP$ */
+/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
+ *
+ * Copyright 2002-2003 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
+ * <http://www.OpenLDAP.org/license.html>.
+ */
+/* 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 <ac/string.h>
+#include <ac/stdarg.h>
+#include <ac/ctype.h>
+#include <ac/unistd.h>
+
+#include <slap.h>
+#include <lber_pvt.h>
+#include <slapi.h>
+
+/*
+ * 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;
+}
+
+static Connection *
+slapiConnectionInit(
+ 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();
+ c->c_pending_ops.stqh_first->o_tmpmemctx = NULL;
+ c->c_pending_ops.stqh_first->o_tmpmfuncs = &ch_mfuncs;
+ c->c_pending_ops.stqh_first->o_conn = c;
+
+ /* 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_listener = &slap_unknown_listener;
+ ber_dupbv( &c->c_peer_domain, (struct berval *)&slap_unknown_bv );
+ ber_dupbv( &c->c_peer_name, (struct berval *)&slap_unknown_bv );
+
+ 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_authctx = NULL;
+ c->c_sasl_sockctx = 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_ldap_extended = internal_result_ext;
+ pConn->c_send_search_reference = internal_search_reference;
+
+ return pConn;
+}
+
+static void slapiConnectionDestroy( Connection **pConn )
+{
+ Connection *conn = *pConn;
+ Operation *op;
+
+ if ( pConn == NULL ) {
+ return;
+ }
+
+ op = (Operation *)conn->c_pending_ops.stqh_first;
+
+ 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++ )
+ ;
+
+ 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 rc = LDAP_SUCCESS;
+ int i;
+ BerVarray tmpberval;
+
+ if ( bvptr == NULL || *bvptr == NULL ) {
+ return LDAP_OTHER;
+ }
+
+ for ( i = 0; bvptr != NULL && 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;
+
+ if ( rc == LDAP_SUCCESS ) {
+ *bvobj = tmpberval;
+ }
+
+ 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;
+ 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 ( op == 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, 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_bvalues = 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_bvalues = tmp.sml_bvalues;
+ 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_bvalues = 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_bvalues = tmp.sml_bvalues;
+ 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( op->o_bd, &op->o_bd->be_rootdn );
+ if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) {
+ int update = op->o_bd->be_update_ndn.bv_len;
+ char textbuf[SLAP_TEXT_BUFLEN];
+ size_t textlen = sizeof textbuf;
+
+ rc = slap_mods_check( modlist, update, &text,
+ textbuf, textlen, NULL );
+ if ( rc != LDAP_SUCCESS) {
+ goto cleanup;
+ }
+
+ if ( !repl_user ) {
+ rc = slap_mods_opattrs( op,
+ modlist, modtail, &text,
+ textbuf, textlen );
+ 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 ( 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 )
+{
+#ifdef LDAP_SLAPI
+ Connection *pConn = NULL;
+ Operation *op = NULL;
+ Slapi_PBlock *pPB = NULL;
+ Slapi_PBlock *pSavePB = NULL;
+ SlapReply rs = { REP_RESULT };
+ struct berval dn = { 0, NULL };
+
+ int manageDsaIt = 0;
+ int isCritical;
+
+ if ( ldn == NULL ) {
+ rs.sr_err = LDAP_PARAM_ERROR;
+ goto cleanup;
+ }
+
+ pConn = slapiConnectionInit( 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 = 1;
+ }
+
+ op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 0 );
+ 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->o_bd, &op->o_ndn );
+ if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) {
+ if ( (*op->o_bd->be_delete)( op, &rs ) == 0 ) {
+ if ( log_change ) {
+ replog( op );
+ }
+ } else {
+ 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 ( pConn != NULL ) {
+ pSavePB = pPB;
+ }
+
+ slapiConnectionDestroy( &pConn );
+
+ return (pSavePB);
+#else
+ return NULL;
+#endif /* LDAP_SLAPI */
+}
+
+#ifdef LDAP_SLAPI
+static Slapi_PBlock *
+slapi_add_entry_internal_locked(
+ Slapi_Entry **e,
+ LDAPControl **controls,
+ int log_changes )
+{
+ Connection *pConn = NULL;
+ Operation *op = NULL;
+ Slapi_PBlock *pPB = NULL, *pSavePB = NULL;
+
+ int manageDsaIt = 0;
+ int isCritical;
+ SlapReply rs = { REP_RESULT };
+
+ if ( *e == NULL ) {
+ rs.sr_err = LDAP_PARAM_ERROR;
+ goto cleanup;
+ }
+
+ pConn = slapiConnectionInit( NULL, LDAP_REQ_ADD );
+ if ( pConn == NULL ) {
+ rs.sr_err = 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;
+
+ op->o_bd = select_backend( &((*e)->e_nname), manageDsaIt, 0 );
+ 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->o_bd, &op->o_ndn );
+ if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) {
+ if ( (*op->o_bd->be_add)( op, &rs ) == 0 ) {
+ if ( log_changes ) {
+ replog( op );
+ }
+ 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 );
+ }
+
+ if ( pConn != NULL ) {
+ pSavePB = pPB;
+ }
+
+ slapiConnectionDestroy( &pConn );
+
+ return( pSavePB );
+}
+#endif /* LDAP_SLAPI */
+
+Slapi_PBlock *
+slapi_add_entry_internal(
+ Slapi_Entry *e,
+ LDAPControl **controls,
+ int log_changes )
+{
+#ifdef LDAP_SLAPI
+ Slapi_PBlock *pb;
+ Slapi_Entry *entry;
+
+ /*
+ * 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_add_entry_internal_locked( &entry, controls, log_changes );
+ if ( entry != NULL ) {
+ slapi_entry_free( entry );
+ }
+ 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;
+ 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 ) {
+ pEntry = LDAPModToEntry( 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_add_entry_internal_locked( &pEntry, controls, log_changes );
+ }
+
+ if ( pEntry != NULL ) {
+ slapi_entry_free(pEntry);
+ }
+
+ 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 = { 0, NULL };
+ struct berval newrdn = { 0, NULL };
+ Connection *pConn = NULL;
+ Operation *op = NULL;
+ Slapi_PBlock *pPB = NULL;
+ Slapi_PBlock *pSavePB = NULL;
+ int manageDsaIt = 0;
+ int isCritical;
+ SlapReply rs = { REP_RESULT };
+
+ pConn = slapiConnectionInit( 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 = 1;
+ }
+
+ op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 0 );
+ 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 ( rdnValidate( &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->o_bd, &op->o_ndn );
+ if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) {
+ if ( (*op->o_bd->be_modrdn)( op, &rs ) == 0 ) {
+ if ( log_change ) {
+ replog( op );
+ }
+ } else {
+ 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 );
+
+ if ( pConn != NULL ) {
+ pSavePB = pPB;
+ }
+
+ slapiConnectionDestroy( &pConn );
+
+ return( pSavePB );
+#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;
+ Slapi_PBlock *pSavePB = NULL;
+
+ struct berval dn = { 0, NULL };
+
+ int manageDsaIt = 0;
+ 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 = slapiConnectionInit( 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 = 1;
+ }
+
+ op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 0 );
+ 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_bvalues = bv;
+ tmp.sml_nvalues = NULL;
+
+ 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;
+ 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_bvalues = bv;
+ tmp.sml_nvalues = NULL;
+
+ 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;
+ mod->sml_nvalues = tmp.sml_nvalues;
+ }
+ *modtail = mod;
+ modtail = &mod->sml_next;
+
+ switch( pMod->mod_op ) {
+ case LDAP_MOD_ADD:
+ if ( mod->sml_bvalues == NULL ) {
+ rs.sr_err = LDAP_PROTOCOL_ERROR;
+ goto cleanup;
+ }
+
+ /* fall through */
+ case LDAP_MOD_DELETE:
+ case LDAP_MOD_REPLACE:
+ 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->o_bd, &op->o_ndn );
+ if ( !op->o_bd->be_update_ndn.bv_len || repl_user ) {
+ int update = op->o_bd->be_update_ndn.bv_len;
+ const char *text = NULL;
+ char textbuf[SLAP_TEXT_BUFLEN];
+ size_t textlen = sizeof( textbuf );
+
+ rs.sr_err = slap_mods_check( modlist, update,
+ &text, textbuf, textlen, NULL );
+ if ( rs.sr_err != LDAP_SUCCESS ) {
+ goto cleanup;
+ }
+
+ if ( !repl_user ) {
+ rs.sr_err = slap_mods_opattrs( op, modlist,
+ modtail, &text, textbuf,
+ textlen );
+ if ( rs.sr_err != LDAP_SUCCESS ) {
+ goto cleanup;
+ }
+ }
+ if ( (*op->o_bd->be_modify)( op, &rs ) == 0 ) {
+ if ( log_change ) {
+ replog( op );
+ }
+ } else {
+ 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 );
+
+ if ( pConn != NULL ) {
+ pSavePB = pPB;
+ }
+
+ slapiConnectionDestroy( &pConn );
+
+ return ( pSavePB );
+#else
+ return NULL;
+#endif /* LDAP_SLAPI */
+}
+
+Slapi_PBlock *
+slapi_search_internal_bind(
+ char *bindDN,
+ char *ldn,
+ int scope,
+ char *filStr,
+ LDAPControl **controls,
+ char **attrs,
+ int attrsonly )
+{
+#ifdef LDAP_SLAPI
+ Connection *c;
+ Operation *op = NULL;
+ Slapi_PBlock *ptr = NULL;
+ Slapi_PBlock *pSavePB = NULL;
+ struct berval dn = { 0, NULL };
+ Filter *filter=NULL;
+ struct berval fstr = { 0, NULL };
+ AttributeName *an = NULL;
+ const char *text = NULL;
+
+ int manageDsaIt = 0;
+ int isCritical;
+ int i;
+
+ SlapReply rs = { REP_RESULT };
+
+ c = slapiConnectionInit( NULL, LDAP_REQ_SEARCH );
+ if ( c == NULL ) {
+ rs.sr_err = LDAP_NO_MEMORY;
+ goto cleanup;
+ }
+
+ op = (Operation *)c->c_pending_ops.stqh_first;
+ ptr = (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;
+
+ 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 = 1;
+ }
+
+ op->o_bd = select_backend( &op->o_req_ndn, manageDsaIt, 0 );
+ if ( op->o_bd == NULL ) {
+ if ( manageDsaIt == 1 ) {
+ 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 = LDAP_NO_LIMIT;
+ op->oq_search.rs_tlimit = LDAP_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 ( ptr != NULL )
+ slapi_pblock_set( ptr, 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 );
+
+ if ( c != NULL ) {
+ pSavePB = ptr;
+ }
+
+ slapiConnectionDestroy( &c );
+
+ return( pSavePB );
+#else
+ return NULL;
+#endif /* LDAP_SLAPI */
+}
+
+Slapi_PBlock *
+slapi_search_internal(
+ char *base,
+ int scope,
+ char *filStr,
+ LDAPControl **controls,
+ char **attrs,
+ int attrsonly )
+{
+#ifdef LDAP_SLAPI
+ return slapi_search_internal_bind( NULL, base, scope, filStr,
+ controls, attrs, attrsonly );
+#else
+ return NULL;
+#endif /* LDAP_SLAPI */
+}
+