mirror of
https://git.openldap.org/openldap/openldap.git
synced 2025-01-06 10:46:21 +08:00
4a8ab5dbf2
ITS#1677 - cast away const warnings
ITS#1678 - unsigned char args to ctype funcs
ITS#1682 - don't redefine ldap_debug
ITS#1683 - uninitialized vars
ITS#1703 - ldo_debug initialization
ITS#1705 - unsigned testing
ITS#1706 - socklen_t args
ITS#1719 - back-tcl update (other cleanups/fixes/improvements; yet untested)
ITS#1724 - integerNormalize/integerFilter/integerIndexer bugs
ITS#1725 - libdes not required
Implement back-null (/dev/null style backend)
Cleanup some misc warnings ("%lu" format, unused/uninitialized vars,
ambiguous operator precedence)
Kurt, please regenerate configure
110 lines
2.5 KiB
C
110 lines
2.5 KiB
C
/* referral.c - DNS SRV backend referral handler */
|
|
/* $OpenLDAP$ */
|
|
/*
|
|
* Copyright 2000-2002 The OpenLDAP Foundation, All Rights Reserved.
|
|
* COPYING RESTRICTIONS APPLY, see COPYRIGHT file
|
|
*/
|
|
|
|
#include "portable.h"
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <ac/string.h>
|
|
#include <ac/socket.h>
|
|
|
|
#include "slap.h"
|
|
#include "external.h"
|
|
|
|
int
|
|
dnssrv_back_referrals(
|
|
Backend *be,
|
|
Connection *conn,
|
|
Operation *op,
|
|
struct berval *dn,
|
|
struct berval *ndn,
|
|
const char **text )
|
|
{
|
|
int i;
|
|
int rc = LDAP_OTHER;
|
|
char *domain = NULL;
|
|
char *hostlist = NULL;
|
|
char **hosts = NULL;
|
|
BerVarray urls = NULL;
|
|
|
|
if( ndn->bv_len == 0 ) {
|
|
*text = "DNS SRV operation upon null (empty) DN disallowed";
|
|
return LDAP_UNWILLING_TO_PERFORM;
|
|
}
|
|
|
|
if( get_manageDSAit( op ) ) {
|
|
if( op->o_tag == LDAP_REQ_SEARCH ) {
|
|
return LDAP_SUCCESS;
|
|
}
|
|
|
|
*text = "DNS SRV problem processing manageDSAit control";
|
|
return LDAP_OTHER;
|
|
}
|
|
|
|
if( ldap_dn2domain( dn->bv_val, &domain ) ) {
|
|
send_ldap_result( conn, op, LDAP_REFERRAL,
|
|
NULL, NULL, default_referral, NULL );
|
|
return LDAP_REFERRAL;
|
|
}
|
|
|
|
Debug( LDAP_DEBUG_TRACE, "DNSSRV: dn=\"%s\" -> domain=\"%s\"\n",
|
|
dn->bv_val,
|
|
domain == NULL ? "" : domain,
|
|
0 );
|
|
|
|
if( ( rc = ldap_domain2hostlist( domain, &hostlist ) ) ) {
|
|
Debug( LDAP_DEBUG_TRACE,
|
|
"DNSSRV: domain2hostlist(%s) returned %d\n",
|
|
domain, rc, 0 );
|
|
*text = "no DNS SRV RR available for DN";
|
|
rc = LDAP_NO_SUCH_OBJECT;
|
|
goto done;
|
|
}
|
|
|
|
hosts = str2charray( hostlist, " " );
|
|
|
|
if( hosts == NULL ) {
|
|
Debug( LDAP_DEBUG_TRACE, "DNSSRV: str2charrary error\n", 0, 0, 0 );
|
|
*text = "problem processing DNS SRV records for DN";
|
|
goto done;
|
|
}
|
|
|
|
for( i=0; hosts[i] != NULL; i++) {
|
|
struct berval url;
|
|
|
|
url.bv_len = sizeof("ldap://")-1 + strlen(hosts[i]);
|
|
url.bv_val = ch_malloc( url.bv_len + 1 );
|
|
|
|
strcpy( url.bv_val, "ldap://" );
|
|
strcpy( &url.bv_val[sizeof("ldap://")-1], hosts[i] );
|
|
|
|
if ( ber_bvarray_add( &urls, &url ) < 0 ) {
|
|
free( url.bv_val );
|
|
*text = "problem processing DNS SRV records for DN";
|
|
goto done;
|
|
}
|
|
}
|
|
|
|
Statslog( LDAP_DEBUG_STATS,
|
|
"conn=%lu op=%lu DNSSRV p=%d dn=\"%s\" url=\"%s\"\n",
|
|
op->o_connid, op->o_opid, op->o_protocol,
|
|
dn->bv_val, urls[0].bv_val );
|
|
|
|
Debug( LDAP_DEBUG_TRACE, "DNSSRV: dn=\"%s\" -> url=\"%s\"\n",
|
|
dn->bv_val, urls[0].bv_val, 0 );
|
|
|
|
send_ldap_result( conn, op, rc = LDAP_REFERRAL,
|
|
NULL, "DNS SRV generated referrals", urls, NULL );
|
|
|
|
done:
|
|
if( domain != NULL ) ch_free( domain );
|
|
if( hostlist != NULL ) ch_free( hostlist );
|
|
if( hosts != NULL ) charray_free( hosts );
|
|
ber_bvarray_free( urls );
|
|
return rc;
|
|
}
|