Home | History | Annotate | Line # | Download | only in back-mdb
bind.c revision 1.1.1.3 
      1 /*	$NetBSD: bind.c,v 1.1.1.3 2018/02/06 01:53:17 christos Exp $	*/
      2 
      3 /* bind.c - mdb backend bind routine */
      4 /* $OpenLDAP$ */
      5 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
      6  *
      7  * Copyright 2000-2017 The OpenLDAP Foundation.
      8  * All rights reserved.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted only as authorized by the OpenLDAP
     12  * Public License.
     13  *
     14  * A copy of this license is available in the file LICENSE in the
     15  * top-level directory of the distribution or, alternatively, at
     16  * <http://www.OpenLDAP.org/license.html>.
     17  */
     18 
     19 #include <sys/cdefs.h>
     20 __RCSID("$NetBSD: bind.c,v 1.1.1.3 2018/02/06 01:53:17 christos Exp $");
     21 
     22 #include "portable.h"
     23 
     24 #include <stdio.h>
     25 #include <ac/string.h>
     26 #include <ac/unistd.h>
     27 
     28 #include "back-mdb.h"
     29 
     30 int
     31 mdb_bind( Operation *op, SlapReply *rs )
     32 {
     33 	struct mdb_info *mdb = (struct mdb_info *) op->o_bd->be_private;
     34 	Entry		*e;
     35 	Attribute	*a;
     36 
     37 	AttributeDescription *password = slap_schema.si_ad_userPassword;
     38 
     39 	MDB_txn		*rtxn;
     40 	mdb_op_info	opinfo = {{{0}}}, *moi = &opinfo;
     41 
     42 	Debug( LDAP_DEBUG_ARGS,
     43 		"==> " LDAP_XSTRING(mdb_bind) ": dn: %s\n",
     44 		op->o_req_dn.bv_val, 0, 0);
     45 
     46 	/* allow noauth binds */
     47 	switch ( be_rootdn_bind( op, NULL ) ) {
     48 	case LDAP_SUCCESS:
     49 		/* frontend will send result */
     50 		return rs->sr_err = LDAP_SUCCESS;
     51 
     52 	default:
     53 		/* give the database a chance */
     54 		/* NOTE: this behavior departs from that of other backends,
     55 		 * since the others, in case of password checking failure
     56 		 * do not give the database a chance.  If an entry with
     57 		 * rootdn's name does not exist in the database the result
     58 		 * will be the same.  See ITS#4962 for discussion. */
     59 		break;
     60 	}
     61 
     62 	rs->sr_err = mdb_opinfo_get(op, mdb, 1, &moi);
     63 	switch(rs->sr_err) {
     64 	case 0:
     65 		break;
     66 	default:
     67 		rs->sr_text = "internal error";
     68 		send_ldap_result( op, rs );
     69 		return rs->sr_err;
     70 	}
     71 
     72 	rtxn = moi->moi_txn;
     73 
     74 	/* get entry with reader lock */
     75 	rs->sr_err = mdb_dn2entry( op, rtxn, NULL, &op->o_req_ndn, &e, NULL, 0 );
     76 
     77 	switch(rs->sr_err) {
     78 	case MDB_NOTFOUND:
     79 		rs->sr_err = LDAP_INVALID_CREDENTIALS;
     80 		goto done;
     81 	case 0:
     82 		break;
     83 	case LDAP_BUSY:
     84 		rs->sr_text = "ldap_server_busy";
     85 		goto done;
     86 	default:
     87 		rs->sr_err = LDAP_OTHER;
     88 		rs->sr_text = "internal error";
     89 		goto done;
     90 	}
     91 
     92 	ber_dupbv( &op->oq_bind.rb_edn, &e->e_name );
     93 
     94 	/* check for deleted */
     95 	if ( is_entry_subentry( e ) ) {
     96 		/* entry is an subentry, don't allow bind */
     97 		Debug( LDAP_DEBUG_TRACE, "entry is subentry\n", 0,
     98 			0, 0 );
     99 		rs->sr_err = LDAP_INVALID_CREDENTIALS;
    100 		goto done;
    101 	}
    102 
    103 	if ( is_entry_alias( e ) ) {
    104 		/* entry is an alias, don't allow bind */
    105 		Debug( LDAP_DEBUG_TRACE, "entry is alias\n", 0, 0, 0 );
    106 		rs->sr_err = LDAP_INVALID_CREDENTIALS;
    107 		goto done;
    108 	}
    109 
    110 	if ( is_entry_referral( e ) ) {
    111 		Debug( LDAP_DEBUG_TRACE, "entry is referral\n", 0,
    112 			0, 0 );
    113 		rs->sr_err = LDAP_INVALID_CREDENTIALS;
    114 		goto done;
    115 	}
    116 
    117 	switch ( op->oq_bind.rb_method ) {
    118 	case LDAP_AUTH_SIMPLE:
    119 		a = attr_find( e->e_attrs, password );
    120 		if ( a == NULL ) {
    121 			rs->sr_err = LDAP_INVALID_CREDENTIALS;
    122 			goto done;
    123 		}
    124 
    125 		if ( slap_passwd_check( op, e, a, &op->oq_bind.rb_cred,
    126 					&rs->sr_text ) != 0 )
    127 		{
    128 			/* failure; stop front end from sending result */
    129 			rs->sr_err = LDAP_INVALID_CREDENTIALS;
    130 			goto done;
    131 		}
    132 
    133 		rs->sr_err = 0;
    134 		break;
    135 
    136 	default:
    137 		assert( 0 ); /* should not be reachable */
    138 		rs->sr_err = LDAP_STRONG_AUTH_NOT_SUPPORTED;
    139 		rs->sr_text = "authentication method not supported";
    140 	}
    141 
    142 done:
    143 	if ( moi == &opinfo ) {
    144 		mdb_txn_reset( moi->moi_txn );
    145 		LDAP_SLIST_REMOVE( &op->o_extra, &moi->moi_oe, OpExtra, oe_next );
    146 	} else {
    147 		moi->moi_ref--;
    148 	}
    149 	/* free entry and reader lock */
    150 	if( e != NULL ) {
    151 		mdb_entry_return( op, e );
    152 	}
    153 
    154 	if ( rs->sr_err ) {
    155 		send_ldap_result( op, rs );
    156 		if ( rs->sr_ref ) {
    157 			ber_bvarray_free( rs->sr_ref );
    158 			rs->sr_ref = NULL;
    159 		}
    160 	}
    161 	/* front end will send result on success (rs->sr_err==0) */
    162 	return rs->sr_err;
    163 }
    164