| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259 |
- /** BEGIN COPYRIGHT BLOCK
- * This Program is free software; you can redistribute it and/or modify it under
- * the terms of the GNU General Public License as published by the Free Software
- * Foundation; version 2 of the License.
- *
- * This Program is distributed in the hope that it will be useful, but WITHOUT
- * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
- * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along with
- * this Program; if not, write to the Free Software Foundation, Inc., 59 Temple
- * Place, Suite 330, Boston, MA 02111-1307 USA.
- *
- * In addition, as a special exception, Red Hat, Inc. gives You the additional
- * right to link the code of this Program with code not covered under the GNU
- * General Public License ("Non-GPL Code") and to distribute linked combinations
- * including the two, subject to the limitations in this paragraph. Non-GPL Code
- * permitted under this exception must only link to the code of this Program
- * through those well defined interfaces identified in the file named EXCEPTION
- * found in the source code files (the "Approved Interfaces"). The files of
- * Non-GPL Code may instantiate templates or use macros or inline functions from
- * the Approved Interfaces without causing the resulting work to be covered by
- * the GNU General Public License. Only Red Hat, Inc. may make changes or
- * additions to the list of Approved Interfaces. You must obey the GNU General
- * Public License in all respects for all of the Program code and other code used
- * in conjunction with the Program except the Non-GPL Code covered by this
- * exception. If you modify this file, you may extend this exception to your
- * version of the file, but you are not obligated to do so. If you do not wish to
- * provide this exception without modification, you must delete this exception
- * statement from your version and license this file solely under the GPL without
- * exception.
- *
- *
- * Copyright (C) 2001 Sun Microsystems, Inc. Used by permission.
- * Copyright (C) 2009 Red Hat, Inc.
- * Copyright (C) 2009, 2010 Hewlett-Packard Development Company, L.P.
- * All rights reserved.
- *
- * Contributors:
- * Hewlett-Packard Development Company, L.P.
- * Bugfix for bug #195302
- *
- * END COPYRIGHT BLOCK **/
- #ifdef HAVE_CONFIG_H
- # include <config.h>
- #endif
- /*
- * Copyright (c) 1995 Regents of the University of Michigan.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms are permitted
- * provided that this notice is preserved and that due credit is given
- * to the University of Michigan at Ann Arbor. The name of the University
- * may not be used to endorse or promote products derived from this
- * software without specific prior written permission. This software
- * is provided ``as is'' without express or implied warranty.
- */
- #include <stdio.h>
- #include <string.h>
- #include <time.h>
- #include <string.h>
- #include <sys/types.h>
- #ifndef _WIN32
- #include <sys/socket.h>
- #endif
- #include "slap.h"
- #include "pratom.h"
- #if defined(irix) || defined(aix) || defined(_WIN32)
- #include <time.h>
- #endif
- /* Forward declarations */
- static int modify_internal_pb (Slapi_PBlock *pb);
- static void op_shared_modify (Slapi_PBlock *pb, int pw_change, char *old_pw);
- static void remove_mod (Slapi_Mods *smods, const char *type, Slapi_Mods *smod_unhashed);
- static int op_shared_allow_pw_change (Slapi_PBlock *pb, LDAPMod *mod, char **old_pw, Slapi_Mods *smods);
- static int hash_rootpw (LDAPMod **mods);
- #ifdef LDAP_DEBUG
- static const char*
- mod_op_image (int op)
- {
- switch (op & ~LDAP_MOD_BVALUES) {
- case LDAP_MOD_ADD: return "add";
- case LDAP_MOD_DELETE: return "delete";
- case LDAP_MOD_REPLACE: return "replace";
- default: break;
- }
- return "???";
- }
- #endif
- /* an AttrCheckFunc function should return an LDAP result code (LDAP_SUCCESS if all goes well). */
- typedef int (*AttrCheckFunc)(const char *attr_name, char *value, long minval, long maxval, char *errorbuf);
- static struct attr_value_check {
- const char *attr_name; /* the name of the attribute */
- AttrCheckFunc checkfunc;
- long minval;
- long maxval;
- } AttrValueCheckList[] = {
- {CONFIG_PW_SYNTAX_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_CHANGE_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_LOCKOUT_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_MUSTCHANGE_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_EXP_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_UNLOCK_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_HISTORY_ATTRIBUTE, attr_check_onoff, 0, 0},
- {CONFIG_PW_MINAGE_ATTRIBUTE, check_pw_duration_value, -1, -1},
- {CONFIG_PW_WARNING_ATTRIBUTE, check_pw_duration_value, 0, -1},
- {CONFIG_PW_MINLENGTH_ATTRIBUTE, attr_check_minmax, 2, 512},
- {CONFIG_PW_MAXFAILURE_ATTRIBUTE, attr_check_minmax, 1, 32767},
- {CONFIG_PW_INHISTORY_ATTRIBUTE, attr_check_minmax, 2, 24},
- {CONFIG_PW_LOCKDURATION_ATTRIBUTE, check_pw_duration_value, -1, -1},
- {CONFIG_PW_RESETFAILURECOUNT_ATTRIBUTE, check_pw_resetfailurecount_value, -1, -1},
- {CONFIG_PW_GRACELIMIT_ATTRIBUTE, attr_check_minmax, 0, -1},
- {CONFIG_PW_STORAGESCHEME_ATTRIBUTE, check_pw_storagescheme_value, -1, -1},
- {CONFIG_PW_MAXAGE_ATTRIBUTE, check_pw_duration_value, -1, -1}
- };
- /* This function is called to process operation that come over external connections */
- void
- do_modify( Slapi_PBlock *pb )
- {
- Slapi_Operation *operation;
- BerElement *ber;
- char *last, *type = NULL;
- ber_tag_t tag;
- ber_len_t len;
- LDAPMod *mod;
- LDAPMod **mods;
- Slapi_Mods smods;
- int err;
- int pw_change = 0; /* 0= no password change */
- int ignored_some_mods = 0;
- int has_password_mod = 0; /* number of password mods */
- char *old_pw = NULL; /* remember the old password */
- char *dn = NULL;
- LDAPDebug( LDAP_DEBUG_TRACE, "do_modify\n", 0, 0, 0 );
- slapi_pblock_get( pb, SLAPI_OPERATION, &operation);
- ber = operation->o_ber;
- /* count the modify request */
- slapi_counter_increment(g_get_global_snmp_vars()->ops_tbl.dsModifyEntryOps);
- /*
- * Parse the modify request. It looks like this:
- *
- * ModifyRequest := [APPLICATION 6] SEQUENCE {
- * name DistinguishedName,
- * mods SEQUENCE OF SEQUENCE {
- * operation ENUMERATED {
- * add (0),
- * delete (1),
- * replace (2)
- * },
- * modification SEQUENCE {
- * type AttributeType,
- * values SET OF AttributeValue
- * }
- * }
- * }
- */
- {
- char *rawdn = NULL;
- size_t dnlen = 0;
- int rc = 0;
- if ( ber_scanf( ber, "{a", &rawdn ) == LBER_ERROR )
- {
- LDAPDebug( LDAP_DEBUG_ANY,
- "ber_scanf failed (op=Modify; params=DN)\n", 0, 0, 0 );
- op_shared_log_error_access (pb, "MOD", "???", "decoding error");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL, NULL, 0, NULL );
- slapi_ch_free_string(&rawdn);
- return;
- }
- /* Check if we should be performing strict validation. */
- if (config_get_dn_validate_strict()) {
- /* check that the dn is formatted correctly */
- rc = slapi_dn_syntax_check(pb, rawdn, 1);
- if (rc) { /* syntax check failed */
- op_shared_log_error_access(pb, "MOD", rawdn?rawdn:"",
- "strict: invalid dn");
- send_ldap_result(pb, LDAP_INVALID_DN_SYNTAX,
- NULL, "invalid dn", 0, NULL);
- slapi_ch_free((void **) &rawdn);
- return;
- }
- }
- rc = slapi_dn_normalize_ext(rawdn, 0, &dn, &dnlen);
- if (rc < 0) {
- op_shared_log_error_access(pb, "MOD", rawdn?rawdn:"", "invalid dn");
- send_ldap_result(pb, LDAP_INVALID_DN_SYNTAX,
- NULL, "invalid dn", 0, NULL);
- slapi_ch_free((void **) &rawdn);
- return;
- } else if (rc > 0) { /* if rc == 0, rawdn is passed in */
- slapi_ch_free_string(&rawdn);
- } else { /* rc == 0; rawdn is passed in; not null terminated */
- *(dn + dnlen) = '\0';
- }
- }
- LDAPDebug( LDAP_DEBUG_ARGS, "do_modify: dn (%s)\n", dn, 0, 0 );
- slapi_pblock_set( pb, SLAPI_REQUESTOR_ISROOT, &pb->pb_op->o_isroot);
- slapi_pblock_set( pb, SLAPI_ORIGINAL_TARGET, dn );
- /* collect modifications & save for later */
- slapi_mods_init(&smods, 0);
- len = -1;
- for ( tag = ber_first_element( ber, &len, &last );
- tag != LBER_ERROR && tag != LBER_END_OF_SEQORSET;
- tag = ber_next_element( ber, &len, last ) )
- {
- ber_int_t mod_op;
- mod = (LDAPMod *) slapi_ch_malloc( sizeof(LDAPMod) );
- mod->mod_bvalues = NULL;
- len = -1; /* reset - len is not used */
- if ( ber_scanf( ber, "{i{a[V]}}", &mod_op, &type,
- &mod->mod_bvalues ) == LBER_ERROR )
- {
- op_shared_log_error_access (pb, "MOD", dn, "decoding error");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL,
- "decoding error", 0, NULL );
- ber_bvecfree(mod->mod_bvalues);
- slapi_ch_free((void **)&mod);
- slapi_ch_free_string(&type);
- goto free_and_return;
- }
- mod->mod_op = mod_op;
- mod->mod_type = slapi_attr_syntax_normalize(type);
- if ( !mod->mod_type || !*mod->mod_type ) {
- char ebuf[BUFSIZ];
- PR_snprintf (ebuf, BUFSIZ, "invalid type '%s'", type);
- op_shared_log_error_access (pb, "MOD", dn, ebuf);
- send_ldap_result( pb, LDAP_INVALID_SYNTAX, NULL, ebuf, 0, NULL );
- slapi_ch_free((void **)&type);
- ber_bvecfree(mod->mod_bvalues);
- slapi_ch_free_string(&mod->mod_type);
- slapi_ch_free((void **)&mod);
- goto free_and_return;
- }
- slapi_ch_free((void **)&type);
- if ( mod->mod_op != LDAP_MOD_ADD &&
- mod->mod_op != LDAP_MOD_DELETE &&
- mod->mod_op != LDAP_MOD_REPLACE )
- {
- op_shared_log_error_access (pb, "MOD", dn, "unrecognized modify operation");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL,
- "unrecognized modify operation", 0, NULL );
- ber_bvecfree(mod->mod_bvalues);
- slapi_ch_free((void **)&(mod->mod_type));
- slapi_ch_free((void **)&mod);
- goto free_and_return;
- }
- if ( mod->mod_bvalues == NULL
- && mod->mod_op != LDAP_MOD_DELETE
- && mod->mod_op != LDAP_MOD_REPLACE )
- {
- op_shared_log_error_access (pb, "MOD", dn, "no values given");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL,
- "no values given", 0, NULL );
- ber_bvecfree(mod->mod_bvalues);
- slapi_ch_free((void **)&(mod->mod_type));
- slapi_ch_free((void **)&mod);
- goto free_and_return;
- }
- /* check if user is allowed to modify the specified attribute */
- if (!op_shared_is_allowed_attr (mod->mod_type, pb->pb_conn->c_isreplication_session))
- {
- /* for now we just ignore attributes that client is not allowed
- to modify so not to break existing clients */
- ++ignored_some_mods;
- ber_bvecfree(mod->mod_bvalues);
- slapi_ch_free((void **)&(mod->mod_type));
- slapi_ch_free((void **)&mod);
- continue;
- }
-
- /* check for password change */
- if ( mod->mod_bvalues != NULL &&
- strcasecmp( mod->mod_type, SLAPI_USERPWD_ATTR ) == 0 ){
- has_password_mod++;
- }
- mod->mod_op |= LDAP_MOD_BVALUES;
- slapi_mods_add_ldapmod (&smods, mod);
- }
- if (ignored_some_mods && (0 == smods.num_elements)) {
- send_ldap_result( pb, LDAP_UNWILLING_TO_PERFORM, NULL, NULL, 0, NULL );
- goto free_and_return;
- }
- /* check for decoding error */
- /*
- if using mozldap - will return LBER_END_OF_SEQORSET if loop
- completed successfully, otherwise, other value
- if using openldap - will return LBER_DEFAULT in either case
- if there was at least one element read, len will be -1
- if there were no elements read (empty modify) len will be 0
- */
- #if defined(USE_OPENLDAP)
- if ( tag != LBER_END_OF_SEQORSET )
- {
- if ( ( len == 0 ) && ( 0 == smods.num_elements ) && !ignored_some_mods ) {
- /* ok - empty modify - allow empty modifies */
- } else if ( len != -1 ) {
- op_shared_log_error_access (pb, "MOD", dn, "decoding error");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL, "decoding error", 0, NULL );
- goto free_and_return;
- }
- /* else ok */
- }
- #else
- if ( tag != LBER_END_OF_SEQORSET )
- {
- op_shared_log_error_access (pb, "MOD", dn, "decoding error");
- send_ldap_result( pb, LDAP_PROTOCOL_ERROR, NULL, "decoding error", 0, NULL );
- goto free_and_return;
- }
- #endif
- /* decode the optional controls - put them in the pblock */
- if ( (err = get_ldapmessage_controls( pb, ber, NULL )) != 0 )
- {
- op_shared_log_error_access (pb, "MOD", dn, "failed to decode LDAP controls");
- send_ldap_result( pb, err, NULL, NULL, 0, NULL );
- goto free_and_return;
- }
- /* if there are any password mods, see if they are allowed */
- if (has_password_mod) {
- /* iterate through the mods looking for password mods */
- for (mod = slapi_mods_get_first_mod(&smods);
- mod;
- mod = slapi_mods_get_next_mod(&smods)) {
- if ( mod->mod_bvalues != NULL &&
- strcasecmp( mod->mod_type, SLAPI_USERPWD_ATTR ) == 0 ) {
- /* assumes controls have already been decoded and placed
- in the pblock */
- pw_change = op_shared_allow_pw_change (pb, mod, &old_pw, &smods);
- if (pw_change == -1) {
- goto free_and_return;
- }
- }
- }
- }
- if (!pb->pb_conn->c_isreplication_session &&
- pb->pb_conn->c_needpw && pw_change == 0 )
- {
- (void)slapi_add_pwd_control ( pb, LDAP_CONTROL_PWEXPIRED, 0);
- op_shared_log_error_access (pb, "MOD", dn, "need new password");
- send_ldap_result( pb, LDAP_UNWILLING_TO_PERFORM, NULL, NULL, 0, NULL );
- goto free_and_return;
- }
- #ifdef LDAP_DEBUG
- LDAPDebug( LDAP_DEBUG_ARGS, "modifications:\n", 0, 0, 0 );
- for (mod = slapi_mods_get_first_mod(&smods); mod != NULL;
- mod = slapi_mods_get_next_mod(&smods))
- {
- LDAPDebug( LDAP_DEBUG_ARGS, "\t%s: %s\n",
- mod_op_image( mod->mod_op ), mod->mod_type, 0 );
- }
- #endif
-
- mods = slapi_mods_get_ldapmods_passout (&smods);
- slapi_pblock_set( pb, SLAPI_MODIFY_MODS, mods);
- op_shared_modify ( pb, pw_change, old_pw );
- slapi_pblock_get(pb, SLAPI_MODIFY_MODS, &mods);
- ldap_mods_free (mods, 1 /* Free the Array and the Elements */);
- free_and_return:;
- slapi_ch_free ((void**)&dn);
- slapi_mods_done(&smods);
- }
- /* This function is used to issue internal modify operation
- This is an old style API. Its use is discoraged because it is not extendable and
- because it does not allow to check whether plugin has right to access part of the
- tree it is trying to modify. Use slapi_modify_internal_pb instead */
- Slapi_PBlock*
- slapi_modify_internal(const char *idn,
- LDAPMod **mods,
- LDAPControl **controls,
- int dummy)
- {
- Slapi_PBlock pb;
- Slapi_PBlock *result_pb = NULL;
- int opresult;
- pblock_init(&pb);
- slapi_modify_internal_set_pb (&pb, idn, (LDAPMod**)mods, controls, NULL,
- (void *)plugin_get_default_component_id(), 0);
- modify_internal_pb (&pb);
- result_pb = slapi_pblock_new();
- if (result_pb)
- {
- slapi_pblock_get(&pb, SLAPI_PLUGIN_INTOP_RESULT, &opresult);
- slapi_pblock_set(result_pb, SLAPI_PLUGIN_INTOP_RESULT, &opresult);
- }
- pblock_done(&pb);
- return result_pb;
- }
- /* This is new style API to issue internal modify operation.
- pblock should contain the following data (can be set via call to slapi_modify_internal_set_pb):
- For uniqueid based operation:
- SLAPI_TARGET_DN set to dn that allows to select right backend, can be stale
- SLAPI_TARGET_UNIQUEID set to the uniqueid of the entry we are looking for
- SLAPI_MODIFY_MODS set to the mods
- SLAPI_CONTROLS_ARG set to request controls if present
- For dn based search:
- SLAPI_TARGET_DN set to the entry dn
- SLAPI_MODIFY_MODS set to the mods
- SLAPI_CONTROLS_ARG set to request controls if present
- */
- int slapi_modify_internal_pb (Slapi_PBlock *pb)
- {
- if (pb == NULL)
- return -1;
- if (!allow_operation (pb))
- {
- slapi_send_ldap_result( pb, LDAP_UNWILLING_TO_PERFORM, NULL,
- "This plugin is not configured to access operation target data", 0, NULL );
- return 0;
- }
- return modify_internal_pb (pb);
- }
- /* Initialize a pblock for a call to slapi_modify_internal_pb() */
- void slapi_modify_internal_set_pb (Slapi_PBlock *pb, const char *dn, LDAPMod **mods, LDAPControl **controls,
- const char *uniqueid, Slapi_ComponentId *plugin_identity, int operation_flags)
- {
- Operation *op;
- PR_ASSERT (pb != NULL);
- if (pb == NULL || dn == NULL || mods == NULL)
- {
- slapi_log_error(SLAPI_LOG_FATAL, NULL,
- "slapi_modify_internal_set_pb: NULL parameter\n");
- return;
- }
- op= internal_operation_new(SLAPI_OPERATION_MODIFY,operation_flags);
- slapi_pblock_set(pb, SLAPI_OPERATION, op);
- slapi_pblock_set(pb, SLAPI_ORIGINAL_TARGET, (void*)dn);
- slapi_pblock_set(pb, SLAPI_MODIFY_MODS, mods);
- slapi_pblock_set(pb, SLAPI_CONTROLS_ARG, controls);
- if (uniqueid)
- {
- slapi_pblock_set(pb, SLAPI_TARGET_UNIQUEID, (void*)uniqueid);
- }
- slapi_pblock_set(pb, SLAPI_PLUGIN_IDENTITY, plugin_identity);
- }
- /* Helper functions */
- static int modify_internal_pb (Slapi_PBlock *pb)
- {
- LDAPControl **controls;
- int pwpolicy_ctrl = 0;
- Operation *op;
- int opresult = 0;
- LDAPMod **normalized_mods = NULL;
- LDAPMod **mods;
- LDAPMod **mod;
- Slapi_Mods smods;
- int pw_change = 0;
- char *old_pw = NULL;
- PR_ASSERT (pb != NULL);
- slapi_pblock_get(pb, SLAPI_MODIFY_MODS, &mods);
- slapi_pblock_get(pb, SLAPI_CONTROLS_ARG, &controls);
- /* See if pwpolicy control is present. We need to do
- * this before we call op_shared_allow_pw_change() since
- * it looks for SLAPI_PWPOLICY in the pblock to determine
- * if the response contorl is needed. */
- pwpolicy_ctrl = slapi_control_present( controls,
- LDAP_X_CONTROL_PWPOLICY_REQUEST, NULL, NULL );
- slapi_pblock_set( pb, SLAPI_PWPOLICY, &pwpolicy_ctrl );
- if(mods == NULL)
- {
- opresult = LDAP_PARAM_ERROR;
- slapi_pblock_set(pb, SLAPI_PLUGIN_INTOP_RESULT, &opresult);
- return 0;
- }
- /* first normalize the mods so they are bvalue
- * Note: We don't add any special
- * attributes such as "creatorsname".
- * for CIR we don't want to change them, for other
- * plugins the writer should change these if it wants too by explicitly
- * adding them to the mods
- */
- normalized_mods = normalize_mods2bvals((const LDAPMod**)mods);
- if (normalized_mods == NULL)
- {
- opresult = LDAP_PARAM_ERROR;
- slapi_pblock_set(pb, SLAPI_PLUGIN_INTOP_RESULT, &opresult);
- return 0;
- }
- /* check for password change */
- mod = normalized_mods;
- while (*mod)
- {
- if ((*mod)->mod_bvalues != NULL && strcasecmp((*mod)->mod_type, SLAPI_USERPWD_ATTR) == 0)
- {
- slapi_mods_init_passin(&smods, mods);
- pw_change = op_shared_allow_pw_change (pb, *mod, &old_pw, &smods);
- if (pw_change == -1)
- {
- /* The internal result code will already have been set by op_shared_allow_pw_change() */
- ldap_mods_free(normalized_mods, 1);
- return 0;
- }
- }
- mod ++;
- }
- slapi_pblock_get(pb, SLAPI_OPERATION, &op);
- op->o_handler_data = &opresult;
- op->o_result_handler = internal_getresult_callback;
- slapi_pblock_set(pb, SLAPI_MODIFY_MODS, normalized_mods);
- slapi_pblock_set(pb, SLAPI_REQCONTROLS, controls);
-
- /* set parameters common for all internal operations */
- set_common_params (pb);
- /* set actions taken to process the operation */
- set_config_params (pb);
- /* perform modify operation */
- op_shared_modify (pb, pw_change, old_pw);
- /* free the normalized_mods don't forget to add this*/
- slapi_pblock_get(pb, SLAPI_MODIFY_MODS, &normalized_mods);
- if (normalized_mods != NULL)
- {
- ldap_mods_free(normalized_mods, 1);
- }
- /* return original mods here */
- slapi_pblock_set(pb, SLAPI_MODIFY_MODS, mods);
- /* set result */
- slapi_pblock_set(pb, SLAPI_PLUGIN_INTOP_RESULT, &opresult);
- return 0;
- }
- static void op_shared_modify (Slapi_PBlock *pb, int pw_change, char *old_pw)
- {
- Slapi_Backend *be = NULL;
- Slapi_Entry *pse;
- Slapi_Entry *referral;
- Slapi_Entry *e = NULL;
- char ebuf[BUFSIZ];
- char *dn;
- Slapi_DN sdn;
- LDAPMod **mods, *pw_mod, **tmpmods = NULL;
- Slapi_Mods smods;
- Slapi_Mods unhashed_pw_smod;
- int repl_op, internal_op, lastmod, skip_modified_attrs;
- char *unhashed_pw_attr = NULL;
- Slapi_Operation *operation;
- char errorbuf[BUFSIZ];
- int err;
- LDAPMod *lc_mod = NULL;
- struct slapdplugin *p = NULL;
- int numattr, i;
- char *proxydn = NULL;
- int proxy_err = LDAP_SUCCESS;
- char *errtext = NULL;
- slapi_pblock_get (pb, SLAPI_ORIGINAL_TARGET, &dn);
- slapi_pblock_get (pb, SLAPI_MODIFY_MODS, &mods);
- slapi_pblock_get (pb, SLAPI_MODIFY_MODS, &tmpmods);
- slapi_pblock_get (pb, SLAPI_IS_REPLICATED_OPERATION, &repl_op);
- slapi_pblock_get (pb, SLAPI_OPERATION, &operation);
- internal_op= operation_is_flag_set(operation, OP_FLAG_INTERNAL);
- slapi_pblock_get (pb, SLAPI_SKIP_MODIFIED_ATTRS, &skip_modified_attrs);
- if (dn == NULL)
- {
- slapi_sdn_init_dn_byref (&sdn, "");
- }
- else
- {
- slapi_sdn_init_dn_byref (&sdn, dn);
- }
- slapi_pblock_set(pb, SLAPI_MODIFY_TARGET, (void*)slapi_sdn_get_ndn (&sdn));
- slapi_mods_init_passin (&smods, mods);
- slapi_mods_init(&unhashed_pw_smod, 0);
- /* target spec is used to decide which plugins are applicable for the operation */
- operation_set_target_spec (pb->pb_op, &sdn);
- /* get the proxy auth dn if the proxy auth control is present */
- proxy_err = proxyauth_get_dn(pb, &proxydn, &errtext);
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- char *proxystr = NULL;
- if (proxydn)
- {
- proxystr = slapi_ch_smprintf(" authzid=\"%s\"", proxydn);
- }
- if ( !internal_op )
- {
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"%s\n",
- pb->pb_conn->c_connid,
- pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "");
- }
- else
- {
- slapi_log_access(LDAP_DEBUG_ARGS, "conn=%s op=%d MOD dn=\"%s\"%s\n",
- LOG_INTERNAL_OP_CON_ID,
- LOG_INTERNAL_OP_OP_ID,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "");
- }
- slapi_ch_free_string(&proxystr);
- }
- /* If we encountered an error parsing the proxy control, return an error
- * to the client. We do this here to ensure that we log the operation first. */
- if (proxy_err != LDAP_SUCCESS)
- {
- send_ldap_result(pb, proxy_err, NULL, errtext, 0, NULL);
- goto free_and_return;
- }
- /*
- * We could be serving multiple database backends. Select the
- * appropriate one.
- */
- if ((err = slapi_mapping_tree_select(pb, &be, &referral, errorbuf)) != LDAP_SUCCESS) {
- send_ldap_result(pb, err, NULL, errorbuf, 0, NULL);
- be = NULL;
- goto free_and_return;
- }
- if (referral)
- {
- int managedsait;
- slapi_pblock_get(pb, SLAPI_MANAGEDSAIT, &managedsait);
- if (managedsait)
- {
- send_ldap_result(pb, LDAP_UNWILLING_TO_PERFORM, NULL,
- "cannot update referral", 0, NULL);
- slapi_entry_free(referral);
- goto free_and_return;
- }
-
- send_referrals_from_entry(pb,referral);
- slapi_entry_free(referral);
- goto free_and_return;
- }
- slapi_pblock_set(pb, SLAPI_BACKEND, be);
- /* The following section checks the valid values of fine-grained
- * password policy attributes.
- * 1. First, it checks if the entry has "passwordpolicy" objectclass.
- * 2. If yes, then if the mods contain any passwdpolicy specific attributes.
- * 3. If yes, then it invokes corrosponding checking function.
- */
- if ( !repl_op && !internal_op && dn &&
- (e = get_entry(pb, slapi_dn_normalize(dn))) )
- {
- Slapi_Value target;
- slapi_value_init(&target);
- slapi_value_set_string(&target,"passwordpolicy");
- if ((slapi_entry_attr_has_syntax_value(e, "objectclass", &target)) == 1)
- {
- numattr = sizeof(AttrValueCheckList)/sizeof(AttrValueCheckList[0]);
- while ( tmpmods && *tmpmods )
- {
- if ((*tmpmods)->mod_bvalues != NULL &&
- !SLAPI_IS_MOD_DELETE((*tmpmods)->mod_op))
- {
- for (i=0; i < numattr; i++)
- {
- if (slapi_attr_type_cmp((*tmpmods)->mod_type,
- AttrValueCheckList[i].attr_name, SLAPI_TYPE_CMP_SUBTYPE) == 0)
- {
- /* The below function call is good for
- * single-valued attrs only
- */
- if ( (err = AttrValueCheckList[i].checkfunc (AttrValueCheckList[i].attr_name,
- (*tmpmods)->mod_bvalues[0]->bv_val, AttrValueCheckList[i].minval,
- AttrValueCheckList[i].maxval, errorbuf))
- != LDAP_SUCCESS)
- {
- /* return error */
- send_ldap_result(pb, err, NULL, errorbuf, 0, NULL);
- goto free_and_return;
- }
- }
- }
- }
- tmpmods++;
- } /* end of (while */
- } /* end of if (found */
- value_done (&target);
- } /* end of if (!repl_op */
- /* can get lastmod only after backend is selected */
- slapi_pblock_get(pb, SLAPI_BE_LASTMOD, &lastmod);
-
- /* if this is replication session or the operation has been
- * flagged - leave mod attributes alone */
- if (!repl_op && !skip_modified_attrs && lastmod)
- {
- modify_update_last_modified_attr(pb, &smods);
- }
- if (0 == slapi_mods_get_num_mods(&smods)) {
- /* nothing to do - no mods - this is not an error - just
- send back LDAP_SUCCESS */
- send_ldap_result(pb, LDAP_SUCCESS, NULL, NULL, 0, NULL);
- goto free_and_return;
- }
-
- /*
- * Add the unhashed password pseudo-attribute before
- * calling the preop plugins
- */
- if (pw_change)
- {
- Slapi_Value **va= NULL;
- unhashed_pw_attr = slapi_attr_syntax_normalize(PSEUDO_ATTR_UNHASHEDUSERPASSWORD);
- for ( pw_mod = slapi_mods_get_first_mod(&smods); pw_mod;
- pw_mod = slapi_mods_get_next_mod(&smods) )
- {
- if (strcasecmp (pw_mod->mod_type, SLAPI_USERPWD_ATTR) != 0)
- continue;
- /* add pseudo password attribute */
- valuearray_init_bervalarray(pw_mod->mod_bvalues, &va);
- slapi_mods_add_mod_values(&smods, pw_mod->mod_op, unhashed_pw_attr, va);
- valuearray_free(&va);
- /* Init new value array for hashed value */
- valuearray_init_bervalarray(pw_mod->mod_bvalues, &va);
- /* encode password */
- pw_encodevals_ext(pb, &sdn, va);
- /* remove current clear value of userpassword */
- ber_bvecfree(pw_mod->mod_bvalues);
- /* add the cipher in the structure */
- valuearray_get_bervalarray(va, &pw_mod->mod_bvalues);
- valuearray_free(&va);
- }
- }
- for ( p = get_plugin_list(PLUGIN_LIST_REVER_PWD_STORAGE_SCHEME); p != NULL; p = p->plg_next )
- {
- char *L_attr = NULL;
- int i = 0;
-
- /* Get the appropriate encoding function */
- for ( L_attr = p->plg_argv[i]; i<p->plg_argc; L_attr = p->plg_argv[++i])
- {
- char *L_normalized = slapi_attr_syntax_normalize(L_attr);
- for ( lc_mod = slapi_mods_get_first_mod(&smods); lc_mod;
- lc_mod = slapi_mods_get_next_mod(&smods) )
- {
- Slapi_Value **va= NULL;
- if (strcasecmp (lc_mod->mod_type, L_normalized) != 0)
- continue;
-
- switch (lc_mod->mod_op & ~LDAP_MOD_BVALUES)
- {
- case LDAP_MOD_ADD:
- case LDAP_MOD_REPLACE:
-
- /* Init new value array for hashed value */
- valuearray_init_bervalarray(lc_mod->mod_bvalues, &va);
- if ( va )
- {
- /* encode local credentials */
- pw_rever_encode(va, L_normalized);
- /* remove current clear value of userpassword */
- ber_bvecfree(lc_mod->mod_bvalues);
- /* add the cipher in the structure */
- valuearray_get_bervalarray(va, &lc_mod->mod_bvalues);
-
- valuearray_free(&va);
- }
- break;
- default:
- /* for LDAP_MOD_DELETE, don't do anything */
- /* for LDAP_MOD_BVALUES, don't do anything */
- ;
- }
- }
- if (L_normalized)
- slapi_ch_free ((void**)&L_normalized);
- }
- }
- /*
- * call the pre-mod plugins. if they succeed, call
- * the backend mod function. then call the post-mod
- * plugins.
- */
- slapi_pblock_set (pb, SLAPI_MODIFY_MODS, (void*)slapi_mods_get_ldapmods_passout (&smods));
- if (plugin_call_plugins(pb, internal_op ? SLAPI_PLUGIN_INTERNAL_PRE_MODIFY_FN :
- SLAPI_PLUGIN_PRE_MODIFY_FN) == 0)
- {
- int rc;
- /*
- * Hash any rootpw attribute values. We hash them after pre-op
- * plugins are called in case any pre-op plugin needs the clear value.
- * They do need to be hashed here so they wont get audit logged in the
- * clear. Note that config_set_rootpw will also do hashing if needed,
- * but it will detect that the password is already hashed.
- */
- slapi_pblock_get (pb, SLAPI_MODIFY_MODS, &mods);
- if (hash_rootpw (mods) != 0) {
- send_ldap_result(pb, LDAP_UNWILLING_TO_PERFORM, NULL,
- "Failed to hash root user's password", 0, NULL);
- goto free_and_return;
- }
- slapi_pblock_set(pb, SLAPI_PLUGIN, be->be_database);
- set_db_default_result_handlers(pb);
- /* Remove the unhashed password pseudo-attribute prior */
- /* to db access */
- if (pw_change)
- {
- slapi_mods_init_passin (&smods, mods);
- remove_mod (&smods, unhashed_pw_attr, &unhashed_pw_smod);
- slapi_pblock_set (pb, SLAPI_MODIFY_MODS,
- (void*)slapi_mods_get_ldapmods_passout (&smods));
- }
- if (be->be_modify != NULL)
- {
- if ((rc = (*be->be_modify)(pb)) == 0)
- {
- /* acl is not used for internal operations */
- /* don't update aci store for remote acis */
- if ((!internal_op) &&
- (!slapi_be_is_flag_set(be,SLAPI_BE_FLAG_REMOTE_DATA)))
- {
- plugin_call_acl_mods_update (pb, SLAPI_OPERATION_MODIFY);
- }
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_AUDIT))
- write_audit_log_entry(pb); /* Record the operation in the audit log */
- if (pw_change && (!slapi_be_is_flag_set(be,SLAPI_BE_FLAG_REMOTE_DATA)))
- {
- /* update the password info */
- update_pw_info (pb, old_pw);
- }
- slapi_pblock_get(pb, SLAPI_ENTRY_POST_OP, &pse);
- do_ps_service(pse, NULL, LDAP_CHANGETYPE_MODIFY, 0);
- }
- else
- {
- if (rc == SLAPI_FAIL_DISKFULL)
- {
- operation_out_of_disk_space();
- goto free_and_return;
- }
- }
- }
- else
- {
- send_ldap_result(pb, LDAP_UNWILLING_TO_PERFORM, NULL,
- "Function not implemented", 0, NULL);
- }
- /* Add the pseudo-attribute prior to calling the postop plugins */
- if (pw_change)
- {
- LDAPMod *lc_mod = NULL;
- slapi_pblock_get (pb, SLAPI_MODIFY_MODS, &mods);
- slapi_mods_init_passin (&smods, mods);
- for ( lc_mod = slapi_mods_get_first_mod(&unhashed_pw_smod); lc_mod;
- lc_mod = slapi_mods_get_next_mod(&unhashed_pw_smod) )
- {
- Slapi_Mod lc_smod;
- slapi_mod_init_byval(&lc_smod, lc_mod); /* copies lc_mod */
- /* this extracts the copy of lc_mod and finalizes lc_smod too */
- slapi_mods_add_ldapmod(&smods,
- slapi_mod_get_ldapmod_passout(&lc_smod));
- }
- slapi_pblock_set (pb, SLAPI_MODIFY_MODS,
- (void*)slapi_mods_get_ldapmods_passout (&smods));
- slapi_mods_done(&unhashed_pw_smod); /* can finalize now */
- }
- slapi_pblock_set(pb, SLAPI_PLUGIN_OPRETURN, &rc);
- plugin_call_plugins(pb, internal_op ? SLAPI_PLUGIN_INTERNAL_POST_MODIFY_FN :
- SLAPI_PLUGIN_POST_MODIFY_FN);
- }
- free_and_return:
- {
- Slapi_Entry *epre = NULL, *epost = NULL;
- slapi_pblock_get(pb, SLAPI_ENTRY_PRE_OP, &epre);
- slapi_pblock_get(pb, SLAPI_ENTRY_POST_OP, &epost);
- if (epre == e) {
- epre = NULL; /* to avoid possible double free below */
- }
- if (epost == e) {
- epost = NULL; /* to avoid possible double free below */
- }
- if (epre == epost) {
- epost = NULL; /* to avoid possible double free below */
- }
- slapi_pblock_set(pb, SLAPI_ENTRY_PRE_OP, NULL);
- slapi_pblock_set(pb, SLAPI_ENTRY_POST_OP, NULL);
- slapi_entry_free(epre);
- slapi_entry_free(epost);
- }
- slapi_entry_free(e);
-
- if (be)
- slapi_be_Unlock(be);
- slapi_sdn_done(&sdn);
- if (unhashed_pw_attr)
- slapi_ch_free ((void**)&unhashed_pw_attr);
- slapi_ch_free_string(&proxydn);
- }
- static void remove_mod (Slapi_Mods *smods, const char *type, Slapi_Mods *smod_unhashed)
- {
- LDAPMod *mod;
- Slapi_Mod smod;
- for (mod = slapi_mods_get_first_mod(smods); mod; mod = slapi_mods_get_next_mod(smods))
- {
- if (strcasecmp (mod->mod_type, type) == 0)
- {
- slapi_mod_init_byval (&smod, mod);
- slapi_mods_add_smod(smod_unhashed, &smod);
- slapi_mods_remove (smods);
- }
- }
- }
- static int op_shared_allow_pw_change (Slapi_PBlock *pb, LDAPMod *mod, char **old_pw, Slapi_Mods *smods)
- {
- int isroot, internal_op, repl_op, pwresponse_req = 0;
- int res = 0;
- char *dn;
- char *errtxt = NULL;
- Slapi_DN sdn;
- Slapi_Entry *e = NULL;
- passwdPolicy *pwpolicy;
- int rc = 0;
- char ebuf[BUFSIZ];
- Slapi_Value **values= NULL;
- Slapi_Operation *operation;
- int proxy_err = LDAP_SUCCESS;
- char *proxydn = NULL;
- char *proxystr = NULL;
- char *errtext = NULL;
- slapi_pblock_get (pb, SLAPI_IS_REPLICATED_OPERATION, &repl_op);
- if (repl_op) {
- /* Treat like there's no password */
- return (0);
- }
- *old_pw = NULL;
- slapi_pblock_get (pb, SLAPI_ORIGINAL_TARGET, &dn);
- slapi_pblock_get (pb, SLAPI_REQUESTOR_ISROOT, &isroot);
- slapi_pblock_get (pb, SLAPI_OPERATION, &operation);
- slapi_pblock_get (pb, SLAPI_PWPOLICY, &pwresponse_req);
- internal_op= operation_is_flag_set(operation, OP_FLAG_INTERNAL);
- slapi_sdn_init_dn_byref (&sdn, dn);
- pwpolicy = new_passwdPolicy(pb, (char *)slapi_sdn_get_ndn(&sdn));
- /* get the proxy auth dn if the proxy auth control is present */
- if ((proxy_err = proxyauth_get_dn(pb, &proxydn, &errtext)) != LDAP_SUCCESS)
- {
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"\n",
- pb->pb_conn->c_connid, pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf));
- }
- send_ldap_result(pb, proxy_err, NULL, errtext, 0, NULL);
- rc = -1;
- goto done;
- }
- /* internal operation has root permisions for subtrees it is allowed to access */
- if (!internal_op)
- {
- /* slapi_acl_check_mods needs an array of LDAPMods, but
- * we're really only interested in the one password mod. */
- LDAPMod *mods[2];
- mods[0] = mod;
- mods[1] = NULL;
- /* We need to actually fetch the target here to use for ACI checking. */
- slapi_search_internal_get_entry(&sdn, NULL, &e, (void *)plugin_get_default_component_id());
- /* Create a bogus entry with just the target dn if we were unable to
- * find the actual entry. This will only be used for checking the ACIs. */
- if (e == NULL) {
- e = slapi_entry_alloc();
- slapi_entry_init( e, NULL, NULL );
- slapi_sdn_set_dn_byref(slapi_entry_get_sdn(e), dn);
- }
- /* Set the backend in the pblock. The slapi_access_allowed function
- * needs this set to work properly. */
- slapi_pblock_set( pb, SLAPI_BACKEND, slapi_be_select( &sdn ) );
- /* Check if ACIs allow password to be changed */
- if ( (res = slapi_acl_check_mods(pb, e, mods, &errtxt)) != LDAP_SUCCESS) {
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- if (proxydn)
- {
- proxystr = slapi_ch_smprintf(" authzid=\"%s\"", proxydn);
- }
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"%s\n",
- pb->pb_conn->c_connid, pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "");
- }
- /* Write access is denied to userPassword by ACIs */
- if ( pwresponse_req == 1 ) {
- slapi_pwpolicy_make_response_control ( pb, -1, -1,
- LDAP_PWPOLICY_PWDMODNOTALLOWED );
- }
- send_ldap_result(pb, res, NULL, errtxt, 0, NULL);
- slapi_ch_free_string(&errtxt);
- rc = -1;
- goto done;
- }
- /* Check if password policy allows users to change their passwords.*/
- if (!pb->pb_op->o_isroot && slapi_sdn_compare(&sdn, &pb->pb_op->o_sdn)==0 &&
- !pb->pb_conn->c_needpw && !pwpolicy->pw_change)
- {
- if ( pwresponse_req == 1 ) {
- slapi_pwpolicy_make_response_control ( pb, -1, -1, LDAP_PWPOLICY_PWDMODNOTALLOWED );
- }
- send_ldap_result(pb, LDAP_UNWILLING_TO_PERFORM, NULL,
- "user is not allowed to change password", 0, NULL);
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- if (proxydn)
- {
- proxystr = slapi_ch_smprintf(" authzid=\"%s\"", proxydn);
- }
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"%s, %s\n",
- pb->pb_conn->c_connid, pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "",
- "user is not allowed to change password");
- }
-
- rc = -1;
- goto done;
- }
- }
-
- /* check if password is within password minimum age;
- error result is sent directly from check_pw_minage */
- if ((internal_op || !pb->pb_conn->c_needpw) &&
- check_pw_minage(pb, &sdn, mod->mod_bvalues) == 1)
- {
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- if (proxydn)
- {
- proxystr = slapi_ch_smprintf(" authzid=\"%s\"", proxydn);
- }
- if ( !internal_op )
- {
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"%s, %s\n",
- pb->pb_conn->c_connid,
- pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "",
- "within password minimum age");
- }
- else
- {
- slapi_log_access(LDAP_DEBUG_ARGS, "conn=%s op=%d MOD dn=\"%s\"%s, %s\n",
- LOG_INTERNAL_OP_CON_ID,
- LOG_INTERNAL_OP_OP_ID,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "",
- "within password minimum age");
- }
- }
- rc = -1;
- goto done;
- }
- /* check password syntax; remember the old password;
- error sent directly from check_pw_syntax function */
- valuearray_init_bervalarray(mod->mod_bvalues, &values);
- switch (check_pw_syntax_ext (pb, &sdn, values, old_pw, NULL, 1, smods))
- {
- case 0: /* success */
- rc = 1;
- break;
- case 1: /* failed checking */
- if (operation_is_flag_set(operation,OP_FLAG_ACTION_LOG_ACCESS))
- {
- if (proxydn)
- {
- proxystr = slapi_ch_smprintf(" authzid=\"%s\"", proxydn);
- }
- if ( !internal_op )
- {
- slapi_log_access(LDAP_DEBUG_STATS, "conn=%" NSPRIu64 " op=%d MOD dn=\"%s\"%s, %s\n",
- pb->pb_conn->c_connid,
- pb->pb_op->o_opid,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "",
- "invalid password syntax");
- }
- else
- {
- slapi_log_access(LDAP_DEBUG_ARGS, "conn=%s op=%d MOD dn=\"%s\"%s, %s\n",
- LOG_INTERNAL_OP_CON_ID,
- LOG_INTERNAL_OP_OP_ID,
- escape_string(slapi_sdn_get_dn(&sdn), ebuf),
- proxystr ? proxystr : "",
- "invalid password syntax");
- }
- }
- rc = -1;
- break;
- case -1: /* The entry is not found. No password checking is done. Countinue execution
- and it should get caught later and send "no such object back. */
- rc = 0;
- break;
- default: break;
- }
- valuearray_free(&values);
- done:
- slapi_entry_free( e );
- slapi_sdn_done (&sdn);
- delete_passwdPolicy(&pwpolicy);
- slapi_ch_free_string(&proxydn);
- slapi_ch_free_string(&proxystr);
- return rc;
- }
- /*
- * Hashes any nsslapd-rootpw attribute values using the password storage
- * scheme specified in cn=config:nsslapd-rootpwstoragescheme.
- * Note: This is only done for modify, because rootdn's password lives
- * in cn=config, which is never added.
- */
- static int
- hash_rootpw (LDAPMod **mods)
- {
- int i, j;
- slapdFrontendConfig_t *slapdFrontendConfig = getFrontendConfig();
- if (strcasecmp(slapdFrontendConfig->rootpwstoragescheme->pws_name, "clear") == 0) {
- /* No work to do if the rootpw storage scheme is clear */
- return 0;
- }
- for (i=0; mods[i] != NULL; i++) {
- LDAPMod *mod = mods[i];
- if (strcasecmp (mod->mod_type, CONFIG_ROOTPW_ATTRIBUTE) != 0)
- continue;
- for (j = 0; mod->mod_bvalues[j] != NULL; j++) {
- char *val = mod->mod_bvalues[j]->bv_val;
- char *hashedval = NULL;
- if (pw_val2scheme (val, NULL, 0)) {
- /* Value is pre-hashed, no work to do for this value */
- continue;
- } else if (! slapd_nss_is_initialized() ) {
- /* We need to hash a value but NSS is not initialized; bail */
- return -1;
- }
- hashedval=(slapdFrontendConfig->rootpwstoragescheme->pws_enc)(val);
- slapi_ch_free_string (&val);
- mod->mod_bvalues[j]->bv_val = hashedval;
- mod->mod_bvalues[j]->bv_len = strlen (hashedval);
- }
- }
- return 0;
- }
|