X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Freferral.c;h=4537420f3e54c55a82303a3ff8c30c0b9147c5f0;hb=2c7f30061933e3bc65477ea2d9561b264497a6c9;hp=178761ee7a3d75794d09458ac743be2cff7ca99c;hpb=82fad7d0c81c062f00337536db3cb89749000bcc;p=openldap

diff --git a/servers/slapd/referral.c b/servers/slapd/referral.c
index 178761ee7a..4537420f3e 100644
--- a/servers/slapd/referral.c
+++ b/servers/slapd/referral.c
@@ -1,8 +1,17 @@
 /* referral.c - muck with referrals */
 /* $OpenLDAP$ */
-/*
- * Copyright 1998-2001 The OpenLDAP Foundation, All Rights Reserved.
- * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
+/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
+ *
+ * Copyright 1998-2006 The OpenLDAP Foundation.
+ * 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>.
  */
 
 #include "portable.h"
@@ -11,7 +20,6 @@
 
 #include <ac/socket.h>
 #include <ac/errno.h>
-#include <ac/signal.h>
 #include <ac/string.h>
 #include <ac/ctype.h>
 #include <ac/time.h>
@@ -25,24 +33,27 @@
  */
 static char * referral_dn_muck(
 	const char * refDN,
-	const char * baseDN,
-	const char * targetDN )
+	struct berval * baseDN,
+	struct berval * targetDN )
 {
-	char *tmp;
-	char *nrefDN = NULL;
-	char *nbaseDN = NULL;
-	char *ntargetDN = NULL;
+	int rc;
+	struct berval bvin;
+	struct berval nrefDN = BER_BVNULL;
+	struct berval nbaseDN = BER_BVNULL;
+	struct berval ntargetDN = BER_BVNULL;
 
 	if( !baseDN ) {
 		/* no base, return target */
-		return targetDN ? ch_strdup( targetDN ) : NULL;
+		return targetDN ? ch_strdup( targetDN->bv_val ) : NULL;
 	}
 
 	if( refDN ) {
-		nrefDN = dn_validate( tmp = ch_strdup( refDN ) );
-		if( !nrefDN ) {
+		bvin.bv_val = (char *)refDN;
+		bvin.bv_len = strlen( refDN );
+
+		rc = dnPretty( NULL, &bvin, &nrefDN, NULL );
+		if( rc != LDAP_SUCCESS ) {
 			/* Invalid refDN */
-			ch_free( tmp );
 			return NULL;
 		}
 	}
@@ -52,71 +63,73 @@ static char * referral_dn_muck(
 		 *	if refDN present return refDN
 		 *  else return baseDN
 		 */
-		return nrefDN ? nrefDN : ch_strdup( baseDN );
+		return nrefDN.bv_len ? nrefDN.bv_val : ch_strdup( baseDN->bv_val );
 	}
 
-	ntargetDN = dn_validate( tmp = ch_strdup( targetDN ) );
-	if( !ntargetDN ) {
-		ch_free( tmp );
-		ch_free( nrefDN );
+	rc = dnPretty( NULL, targetDN, &ntargetDN, NULL );
+	if( rc != LDAP_SUCCESS ) {
+		/* Invalid targetDN */
+		ch_free( nrefDN.bv_val );
 		return NULL;
 	}
 
-	if( nrefDN ) {
-		nbaseDN = dn_validate( tmp = ch_strdup( baseDN ) );
-		if( !nbaseDN ) {
+	if( nrefDN.bv_len ) {
+		rc = dnPretty( NULL, baseDN, &nbaseDN, NULL );
+		if( rc != LDAP_SUCCESS ) {
 			/* Invalid baseDN */
-			ch_free( ntargetDN );
-			ch_free( nrefDN );
-			ch_free( tmp );
+			ch_free( nrefDN.bv_val );
+			ch_free( ntargetDN.bv_val );
 			return NULL;
 		}
 
-		if( strcasecmp( nbaseDN, nrefDN ) == 0 ) {
-			ch_free( nrefDN );
-			ch_free( nbaseDN );
-			return ntargetDN;
+		if( dn_match( &nbaseDN, &nrefDN ) ) {
+			ch_free( nrefDN.bv_val );
+			ch_free( nbaseDN.bv_val );
+			return ntargetDN.bv_val;
 		}
 
 		{
-			/*
-			 * FIXME: string based mucking
-			 */
-			char *muck;
-			size_t reflen, baselen, targetlen, mucklen;
-
-			reflen = strlen( nrefDN );
-			baselen = strlen( nbaseDN );
-			targetlen = strlen( ntargetDN );
-
-			if( targetlen < baselen ) {
-				ch_free( nrefDN );
-				ch_free( nbaseDN );
-				return ntargetDN;
+			struct berval muck;
+
+			if( ntargetDN.bv_len < nbaseDN.bv_len ) {
+				ch_free( nrefDN.bv_val );
+				ch_free( nbaseDN.bv_val );
+				return ntargetDN.bv_val;
 			}
 
-			if( strcasecmp( &ntargetDN[targetlen-baselen], nbaseDN ) ) {
+			rc = strcasecmp(
+				&ntargetDN.bv_val[ntargetDN.bv_len-nbaseDN.bv_len],
+				nbaseDN.bv_val );
+			if( rc ) {
 				/* target not subordinate to base */
-				ch_free( nrefDN );
-				ch_free( nbaseDN );
-				return ntargetDN;
+				ch_free( nrefDN.bv_val );
+				ch_free( nbaseDN.bv_val );
+				return ntargetDN.bv_val;
 			}
 
-			mucklen = targetlen + reflen - baselen;
-			muck = ch_malloc( 1 + mucklen );
+			muck.bv_len = ntargetDN.bv_len + nrefDN.bv_len - nbaseDN.bv_len;
+			muck.bv_val = SLAP_MALLOC( muck.bv_len + 1 );
+			if( muck.bv_val == NULL ) {
+				Debug( LDAP_DEBUG_ANY,
+					"referral_dn_muck: SLAP_MALLOC failed\n", 0, 0, 0 );
+				return NULL;
+			}
 
-			strncpy( muck, ntargetDN, targetlen-baselen );
-			strcpy( &muck[targetlen-baselen], nrefDN );
+			strncpy( muck.bv_val, ntargetDN.bv_val,
+				ntargetDN.bv_len-nbaseDN.bv_len );
+			strcpy( &muck.bv_val[ntargetDN.bv_len-nbaseDN.bv_len],
+				nrefDN.bv_val );
 
-			ch_free( nrefDN );
-			ch_free( nbaseDN );
-			ch_free( ntargetDN );
+			ch_free( nrefDN.bv_val );
+			ch_free( nbaseDN.bv_val );
+			ch_free( ntargetDN.bv_val );
 
-			return muck;
+			return muck.bv_val;
 		}
 	}
 
-	return ntargetDN;
+	ch_free( nrefDN.bv_val );
+	return ntargetDN.bv_val;
 }
 
 
@@ -140,70 +153,41 @@ int validate_global_referral( const char *url )
 
 	case LDAP_URL_ERR_BADSCHEME:
 		/* not LDAP hence valid */
+		Debug( LDAP_DEBUG_CONFIG, "referral \"%s\": not LDAP.\n", url, 0, 0 );
 		return 0;
 
 	default:
 		/* other error, bail */
-#ifdef NEW_LOGGING
-		LDAP_LOG(( "config", LDAP_LEVEL_CRIT,
-			"referral: invalid URL (%s): %s (%d)\n",
-			url, "" /* ldap_url_error2str(rc) */, rc ));
-#else
 		Debug( LDAP_DEBUG_ANY,
 			"referral: invalid URL (%s): %s (%d)\n",
 			url, "" /* ldap_url_error2str(rc) */, rc );
-#endif
 		return 1;
 	}
 
 	rc = 0;
 
 	if( lurl->lud_dn && *lurl->lud_dn ) {
-#ifdef NEW_LOGGING
-		LDAP_LOG(( "config", LDAP_LEVEL_CRIT,
-			"referral: URL (%s): contains DN\n",
-			url ));
-#else
 		Debug( LDAP_DEBUG_ANY,
 			"referral: URL (%s): contains DN\n",
 			url, 0, 0 );
-#endif
 		rc = 1;
 
 	} else if( lurl->lud_attrs ) {
-#ifdef NEW_LOGGING
-		LDAP_LOG(( "config", LDAP_LEVEL_CRIT,
-			"referral: URL (%s): requests attributes\n",
-			url ));
-#else
 		Debug( LDAP_DEBUG_ANY,
 			"referral: URL (%s): requests attributes\n",
 			url, 0, 0 );
-#endif
 		rc = 1;
 
 	} else if( lurl->lud_scope != LDAP_SCOPE_DEFAULT ) {
-#ifdef NEW_LOGGING
-		LDAP_LOG(( "config", LDAP_LEVEL_CRIT,
-			"referral: URL (%s): contains explicit scope\n",
-			url ));
-#else
 		Debug( LDAP_DEBUG_ANY,
 			"referral: URL (%s): contains explicit scope\n",
 			url, 0, 0 );
-#endif
 		rc = 1;
 
 	} else if( lurl->lud_filter ) {
-#ifdef NEW_LOGGING
-		LDAP_LOG(( "config", LDAP_LEVEL_CRIT,
-			"referral: URL (%s): contains explicit filter\n",
-			url ));
-#else
 		Debug( LDAP_DEBUG_ANY,
 			"referral: URL (%s): contains explicit filter\n",
 			url, 0, 0 );
-#endif
 		rc = 1;
 	}
 
@@ -211,81 +195,90 @@ int validate_global_referral( const char *url )
 	return rc;
 }
 
-struct berval ** referral_rewrite(
-	struct berval **in,
-	const char *base,
-	const char *target,
+BerVarray referral_rewrite(
+	BerVarray in,
+	struct berval *base,
+	struct berval *target,
 	int scope )
 {
-	int i, j;
-	struct berval **refs;
+	int		i;
+	BerVarray	refs;
+	struct berval	*iv, *jv;
 
-	if( in == NULL ) return NULL;
+	if ( in == NULL ) {
+		return NULL;
+	}
 
-	for( i=0; in[i] != NULL ; i++ ) {
+	for ( i = 0; !BER_BVISNULL( &in[i] ); i++ ) {
 		/* just count them */
 	}
 
-	if( i < 1 ) return NULL;
-
-	refs = ch_malloc( (i+1) * sizeof( struct berval * ) );
+	if ( i < 1 ) {
+		return NULL;
+	}
 
-	for( i=0,j=0; in[i] != NULL ; i++ ) {
-		LDAPURLDesc *url;
-		int rc = ldap_url_parse_ext( in[i]->bv_val, &url );
+	refs = SLAP_MALLOC( ( i + 1 ) * sizeof( struct berval ) );
+	if ( refs == NULL ) {
+		Debug( LDAP_DEBUG_ANY,
+			"referral_rewrite: SLAP_MALLOC failed\n", 0, 0, 0 );
+		return NULL;
+	}
 
-		if( rc == LDAP_URL_ERR_BADSCHEME ) {
-			refs[j++] = ber_bvdup( in[i] );
+	for ( iv = in, jv = refs; !BER_BVISNULL( iv ); iv++ ) {
+		LDAPURLDesc	*url;
+		char		*dn;
+		int		rc;
+		
+		rc = ldap_url_parse_ext( iv->bv_val, &url );
+		if ( rc == LDAP_URL_ERR_BADSCHEME ) {
+			ber_dupbv( jv++, iv );
 			continue;
 
-		} else if( rc != LDAP_URL_SUCCESS ) {
+		} else if ( rc != LDAP_URL_SUCCESS ) {
 			continue;
 		}
 
-		{
-			char *dn = url->lud_dn;
-			url->lud_dn = referral_dn_muck(
-				( dn && *dn ) ? dn : NULL, base, target ); 
-
-			ldap_memfree( dn );
-		}
+		dn = url->lud_dn;
+		url->lud_dn = referral_dn_muck( ( dn && *dn ) ? dn : NULL,
+				base, target );
+		ldap_memfree( dn );
 
-		if( url->lud_scope == LDAP_SCOPE_DEFAULT ) {
+		if ( url->lud_scope == LDAP_SCOPE_DEFAULT ) {
 			url->lud_scope = scope;
 		}
 
-		refs[j] = ch_malloc( sizeof( struct berval ) );
+		jv->bv_val = ldap_url_desc2str( url );
+		if ( jv->bv_val != NULL ) {
+			jv->bv_len = strlen( jv->bv_val );
 
-		refs[j]->bv_val = ldap_url_desc2str( url );
-		refs[j]->bv_len = strlen( refs[j]->bv_val );
+		} else {
+			ber_dupbv( jv, iv );
+		}
+		jv++;
 
 		ldap_free_urldesc( url );
-		j++;
 	}
 
-	if( j == 0 ) {
+	if ( jv == refs ) {
 		ch_free( refs );
 		refs = NULL;
 
 	} else {
-		refs[j] = NULL;
+		BER_BVZERO( jv );
 	}
 
 	return refs;
 }
 
 
-struct berval **get_entry_referrals(
-	Backend *be,
-	Connection *conn,
+BerVarray get_entry_referrals(
 	Operation *op,
-	Entry *e,
-	const char *dn,
-	int scope )
+	Entry *e )
 {
 	Attribute *attr;
-	struct berval **refs;
-	unsigned i, j;
+	BerVarray refs;
+	unsigned i;
+	struct berval *iv, *jv;
 
 	AttributeDescription *ad_ref = slap_schema.si_ad_ref;
 
@@ -293,44 +286,93 @@ struct berval **get_entry_referrals(
 
 	if( attr == NULL ) return NULL;
 
-	for( i=0; attr->a_vals[i] != NULL; i++ ) {
+	for( i=0; attr->a_vals[i].bv_val != NULL; i++ ) {
 		/* count references */
 	}
 
 	if( i < 1 ) return NULL;
 
-	refs = ch_malloc( (i + 1) * sizeof(struct berval *));
+	refs = SLAP_MALLOC( (i + 1) * sizeof(struct berval));
+	if( refs == NULL ) {
+		Debug( LDAP_DEBUG_ANY,
+			"get_entry_referrals: SLAP_MALLOC failed\n", 0, 0, 0 );
+		return NULL;
+	}
 
-	for( i=0, j=0; attr->a_vals[i] != NULL; i++ ) {
+	for( iv=attr->a_vals, jv=refs; iv->bv_val != NULL; iv++ ) {
 		unsigned k;
-		struct berval *ref = ber_bvdup( attr->a_vals[i] );
+		ber_dupbv( jv, iv );
 
 		/* trim the label */
-		for( k=0; k<ref->bv_len; k++ ) {
-			if( isspace(ref->bv_val[k]) ) {
-				ref->bv_val[k] = '\0';
-				ref->bv_len = k;
+		for( k=0; k<jv->bv_len; k++ ) {
+			if( isspace( (unsigned char) jv->bv_val[k] ) ) {
+				jv->bv_val[k] = '\0';
+				jv->bv_len = k;
 				break;
 			}
 		}
 
-		if(	ref->bv_len > 0 ) {
-			refs[j++] = ref;
-
+		if(	jv->bv_len > 0 ) {
+			jv++;
 		} else {
-			ber_bvfree( ref );
+			free( jv->bv_val );
 		}
 	}
 
-	if( j == 0 ) {
-		ber_bvecfree( refs );
+	if( jv == refs ) {
+		free( refs );
 		refs = NULL;
 
 	} else {
-		refs[j] = NULL;
+		jv->bv_val = NULL;
 	}
 
 	/* we should check that a referral value exists... */
 	return refs;
 }
 
+
+int get_alias_dn(
+	Entry *e,
+	struct berval *ndn,
+	int *err,
+	const char **text )
+{	
+	Attribute *a;
+	AttributeDescription *aliasedObjectName
+		= slap_schema.si_ad_aliasedObjectName;
+
+	a = attr_find( e->e_attrs, aliasedObjectName );
+
+	if( a == NULL ) {
+		/*
+		 * there was an aliasedobjectname defined but no data.
+		 */
+		*err = LDAP_ALIAS_PROBLEM;
+		*text = "alias missing aliasedObjectName attribute";
+		return -1;
+	}
+
+	/* 
+	 * aliasedObjectName should be SINGLE-VALUED with a single value. 
+	 */			
+	if ( a->a_vals[0].bv_val == NULL ) {
+		/*
+		 * there was an aliasedobjectname defined but no data.
+		 */
+		*err = LDAP_ALIAS_PROBLEM;
+		*text = "alias missing aliasedObjectName value";
+		return -1;
+	}
+
+	if( a->a_nvals[1].bv_val != NULL ) {
+		*err = LDAP_ALIAS_PROBLEM;
+		*text = "alias has multivalued aliasedObjectName";
+		return -1;
+	}
+
+	*ndn = a->a_nvals[0];
+
+	return 0;
+}
+