1999-09-09 03:06:24 +08:00
|
|
|
/* $OpenLDAP$ */
|
1998-08-09 08:43:13 +08:00
|
|
|
/*
|
1998-12-29 04:53:15 +08:00
|
|
|
* Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
|
|
|
|
* COPYING RESTRICTIONS APPLY, see COPYRIGHT file
|
|
|
|
*/
|
|
|
|
/* Portions
|
1998-08-09 08:43:13 +08:00
|
|
|
* Copyright (c) 1995 Regents of the University of Michigan.
|
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* open.c
|
|
|
|
*/
|
|
|
|
|
1998-10-25 10:01:14 +08:00
|
|
|
#include "portable.h"
|
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
#include <stdio.h>
|
1999-06-03 08:37:44 +08:00
|
|
|
|
|
|
|
#include <ac/stdlib.h>
|
1998-08-09 08:43:13 +08:00
|
|
|
|
1999-11-02 01:21:24 +08:00
|
|
|
#include <ac/param.h>
|
1998-10-25 10:01:14 +08:00
|
|
|
#include <ac/socket.h>
|
|
|
|
#include <ac/string.h>
|
|
|
|
#include <ac/time.h>
|
1998-08-09 08:43:13 +08:00
|
|
|
|
|
|
|
#include "ldap-int.h"
|
|
|
|
|
1999-09-23 12:08:33 +08:00
|
|
|
int ldap_open_defconn( LDAP *ld )
|
|
|
|
{
|
1999-12-08 02:52:05 +08:00
|
|
|
if (( ld->ld_defconn = ldap_new_connection( ld, ld->ld_options.ldo_defludp, 1,1,0 )) == NULL )
|
1999-09-23 12:08:33 +08:00
|
|
|
{
|
|
|
|
ld->ld_errno = LDAP_SERVER_DOWN;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
++ld->ld_defconn->lconn_refcnt; /* so it never gets closed/freed */
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
1999-03-03 04:23:14 +08:00
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
/*
|
|
|
|
* ldap_open - initialize and connect to an ldap server. A magic cookie to
|
|
|
|
* be used for future communication is returned on success, NULL on failure.
|
|
|
|
* "host" may be a space-separated list of hosts or IP addresses
|
|
|
|
*
|
|
|
|
* Example:
|
|
|
|
* LDAP *ld;
|
|
|
|
* ld = ldap_open( hostname, port );
|
|
|
|
*/
|
|
|
|
|
|
|
|
LDAP *
|
1999-05-19 09:12:33 +08:00
|
|
|
ldap_open( LDAP_CONST char *host, int port )
|
1998-08-09 08:43:13 +08:00
|
|
|
{
|
1999-09-23 12:08:33 +08:00
|
|
|
int rc;
|
1998-08-09 08:43:13 +08:00
|
|
|
LDAP *ld;
|
|
|
|
|
|
|
|
Debug( LDAP_DEBUG_TRACE, "ldap_open\n", 0, 0, 0 );
|
|
|
|
|
|
|
|
if (( ld = ldap_init( host, port )) == NULL ) {
|
|
|
|
return( NULL );
|
|
|
|
}
|
|
|
|
|
1999-09-23 12:08:33 +08:00
|
|
|
rc = ldap_open_defconn( ld );
|
1998-08-09 08:43:13 +08:00
|
|
|
|
1999-09-23 12:08:33 +08:00
|
|
|
if( rc < 0 ) {
|
1999-05-19 09:12:33 +08:00
|
|
|
ldap_ld_free( ld, 0, NULL, NULL );
|
1998-08-09 08:43:13 +08:00
|
|
|
return( NULL );
|
|
|
|
}
|
|
|
|
|
|
|
|
Debug( LDAP_DEBUG_TRACE, "ldap_open successful, ld_host is %s\n",
|
|
|
|
( ld->ld_host == NULL ) ? "(null)" : ld->ld_host, 0, 0 );
|
|
|
|
|
|
|
|
return( ld );
|
|
|
|
}
|
|
|
|
|
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
|
|
|
|
int
|
|
|
|
ldap_create( LDAP **ldp )
|
1998-08-09 08:43:13 +08:00
|
|
|
{
|
|
|
|
LDAP *ld;
|
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
*ldp = NULL;
|
1999-05-29 03:33:05 +08:00
|
|
|
if( ldap_int_global_options.ldo_valid != LDAP_INITIALIZED ) {
|
|
|
|
ldap_int_initialize();
|
1998-11-10 02:40:37 +08:00
|
|
|
}
|
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
Debug( LDAP_DEBUG_TRACE, "ldap_init\n", 0, 0, 0 );
|
|
|
|
|
1998-10-25 10:01:14 +08:00
|
|
|
#ifdef HAVE_WINSOCK2
|
|
|
|
{ WORD wVersionRequested;
|
|
|
|
WSADATA wsaData;
|
|
|
|
|
|
|
|
wVersionRequested = MAKEWORD( 2, 0 );
|
1999-12-08 02:52:05 +08:00
|
|
|
if ( WSAStartup( wVersionRequested, &wsaData ) != 0 ) {
|
1998-10-25 10:01:14 +08:00
|
|
|
/* Tell the user that we couldn't find a usable */
|
|
|
|
/* WinSock DLL. */
|
1999-12-08 02:52:05 +08:00
|
|
|
return LDAP_LOCAL_ERROR;
|
1998-10-25 10:01:14 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Confirm that the WinSock DLL supports 2.0.*/
|
|
|
|
/* Note that if the DLL supports versions greater */
|
|
|
|
/* than 2.0 in addition to 2.0, it will still return */
|
|
|
|
/* 2.0 in wVersion since that is the version we */
|
|
|
|
/* requested. */
|
|
|
|
|
|
|
|
if ( LOBYTE( wsaData.wVersion ) != 2 ||
|
|
|
|
HIBYTE( wsaData.wVersion ) != 0 )
|
|
|
|
{
|
|
|
|
/* Tell the user that we couldn't find a usable */
|
|
|
|
/* WinSock DLL. */
|
|
|
|
WSACleanup( );
|
1999-12-08 02:52:05 +08:00
|
|
|
return LDAP_LOCAL_ERROR;
|
1998-10-25 10:01:14 +08:00
|
|
|
}
|
|
|
|
} /* The WinSock DLL is acceptable. Proceed. */
|
|
|
|
|
|
|
|
#elif HAVE_WINSOCK
|
1999-03-02 11:09:04 +08:00
|
|
|
{ WSADATA wsaData;
|
1999-03-02 05:08:07 +08:00
|
|
|
if ( WSAStartup( 0x0101, &wsaData ) != 0 ) {
|
1999-12-08 02:52:05 +08:00
|
|
|
return LDAP_LOCAL_ERROR;
|
1998-10-25 10:01:14 +08:00
|
|
|
}
|
1999-03-02 05:08:07 +08:00
|
|
|
}
|
1998-10-25 10:01:14 +08:00
|
|
|
#endif
|
1998-08-09 08:43:13 +08:00
|
|
|
|
1999-05-29 09:19:14 +08:00
|
|
|
if ( (ld = (LDAP *) LDAP_CALLOC( 1, sizeof(LDAP) )) == NULL ) {
|
1998-10-25 10:01:14 +08:00
|
|
|
WSACleanup( );
|
1999-12-08 02:52:05 +08:00
|
|
|
return( LDAP_NO_MEMORY );
|
1998-08-09 08:43:13 +08:00
|
|
|
}
|
1999-03-03 04:23:14 +08:00
|
|
|
|
1998-11-11 07:37:30 +08:00
|
|
|
/* copy the global options */
|
1999-05-29 03:33:05 +08:00
|
|
|
memcpy(&ld->ld_options, &ldap_int_global_options,
|
1998-11-11 07:37:30 +08:00
|
|
|
sizeof(ld->ld_options));
|
|
|
|
|
1999-05-29 03:33:05 +08:00
|
|
|
ld->ld_valid = LDAP_VALID_SESSION;
|
|
|
|
|
1999-05-19 14:27:35 +08:00
|
|
|
/* but not pointers to malloc'ed items */
|
1999-12-08 02:52:05 +08:00
|
|
|
ld->ld_options.ldo_defludp = NULL;
|
1999-05-19 14:27:35 +08:00
|
|
|
ld->ld_options.ldo_sctrls = NULL;
|
|
|
|
ld->ld_options.ldo_cctrls = NULL;
|
1998-11-11 07:37:30 +08:00
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
ld->ld_options.ldo_defludp =
|
|
|
|
ldap_url_duplist(ldap_int_global_options.ldo_defludp);
|
1998-11-11 07:37:30 +08:00
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
if ( ld->ld_options.ldo_defludp == NULL ) {
|
1999-05-29 09:19:14 +08:00
|
|
|
LDAP_FREE( (char*)ld );
|
1998-10-25 10:01:14 +08:00
|
|
|
WSACleanup( );
|
1999-12-08 02:52:05 +08:00
|
|
|
return LDAP_NO_MEMORY;
|
1998-12-02 04:08:39 +08:00
|
|
|
}
|
|
|
|
|
1998-11-11 07:37:30 +08:00
|
|
|
if (( ld->ld_selectinfo = ldap_new_select_info()) == NULL ) {
|
1999-12-08 02:52:05 +08:00
|
|
|
ldap_free_urllist( ld->ld_options.ldo_defludp );
|
1999-05-29 09:19:14 +08:00
|
|
|
LDAP_FREE( (char*) ld );
|
1998-10-25 10:01:14 +08:00
|
|
|
WSACleanup( );
|
1999-12-08 02:52:05 +08:00
|
|
|
return LDAP_NO_MEMORY;
|
1998-11-11 07:37:30 +08:00
|
|
|
}
|
1998-08-09 08:43:13 +08:00
|
|
|
|
|
|
|
ld->ld_lberoptions = LBER_USE_DER;
|
1998-08-09 10:28:45 +08:00
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
#if defined( STR_TRANSLATION ) && defined( LDAP_DEFAULT_CHARSET )
|
|
|
|
ld->ld_lberoptions |= LBER_TRANSLATE_STRINGS;
|
|
|
|
#if LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET
|
|
|
|
ldap_set_string_translators( ld, ldap_8859_to_t61, ldap_t61_to_8859 );
|
|
|
|
#endif /* LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET */
|
|
|
|
#endif /* STR_TRANSLATION && LDAP_DEFAULT_CHARSET */
|
|
|
|
|
1999-01-31 09:09:00 +08:00
|
|
|
/* we'll assume we're talking version 2 for now */
|
|
|
|
ld->ld_version = LDAP_VERSION2;
|
|
|
|
|
1999-05-19 09:12:33 +08:00
|
|
|
ber_pvt_sb_init( &(ld->ld_sb) );
|
1999-03-03 04:23:14 +08:00
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
*ldp = ld;
|
|
|
|
return LDAP_SUCCESS;
|
1998-08-09 08:43:13 +08:00
|
|
|
}
|
|
|
|
|
1999-12-08 14:44:22 +08:00
|
|
|
/*
|
|
|
|
* ldap_init - initialize the LDAP library. A magic cookie to be used for
|
|
|
|
* future communication is returned on success, NULL on failure.
|
|
|
|
* "host" may be a space-separated list of hosts or IP addresses
|
|
|
|
*
|
|
|
|
* Example:
|
|
|
|
* LDAP *ld;
|
|
|
|
* ld = ldap_open( host, port );
|
|
|
|
*/
|
|
|
|
LDAP *
|
|
|
|
ldap_init( LDAP_CONST char *defhost, int defport )
|
|
|
|
{
|
|
|
|
LDAP *ld;
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
rc = ldap_create(&ld);
|
|
|
|
if ( rc != LDAP_SUCCESS )
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
if (defport != 0)
|
|
|
|
ld->ld_options.ldo_defport = defport;
|
|
|
|
|
|
|
|
if (defhost != NULL) {
|
|
|
|
rc = ldap_set_option(ld, LDAP_OPT_HOST_NAME, defhost);
|
|
|
|
if ( rc != LDAP_SUCCESS ) {
|
|
|
|
ldap_ld_free(ld, 1, NULL, NULL);
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return( ld );
|
|
|
|
}
|
|
|
|
|
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
int
|
|
|
|
ldap_initialize( LDAP **ldp, LDAP_CONST char *url )
|
|
|
|
{
|
|
|
|
int rc;
|
|
|
|
LDAP *ld;
|
|
|
|
|
|
|
|
*ldp = NULL;
|
|
|
|
rc = ldap_create(&ld);
|
|
|
|
if ( rc != LDAP_SUCCESS )
|
|
|
|
return rc;
|
|
|
|
|
|
|
|
if (url != NULL) {
|
|
|
|
rc = ldap_set_option(ld, LDAP_OPT_URI, url);
|
|
|
|
if ( rc != LDAP_SUCCESS ) {
|
|
|
|
ldap_ld_free(ld, 1, NULL, NULL);
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
*ldp = ld;
|
|
|
|
return LDAP_SUCCESS;
|
|
|
|
}
|
1998-08-09 08:43:13 +08:00
|
|
|
|
1999-12-10 06:33:22 +08:00
|
|
|
int
|
1999-12-11 02:26:12 +08:00
|
|
|
ldap_start_tls ( LDAP *ld,
|
|
|
|
LDAPControl **serverctrls,
|
|
|
|
LDAPControl **clientctrls )
|
1999-12-10 06:33:22 +08:00
|
|
|
{
|
1999-12-11 01:18:59 +08:00
|
|
|
#ifdef HAVE_TLS
|
1999-12-10 06:33:22 +08:00
|
|
|
LDAPConn *lc;
|
|
|
|
int rc;
|
1999-12-11 11:50:33 +08:00
|
|
|
char *rspoid = NULL;
|
|
|
|
struct berval *rspdata = NULL;
|
1999-12-10 06:33:22 +08:00
|
|
|
|
|
|
|
if (ld->ld_conns == NULL) {
|
|
|
|
rc = ldap_open_defconn( ld );
|
|
|
|
if (rc != LDAP_SUCCESS)
|
|
|
|
return(rc);
|
|
|
|
}
|
|
|
|
|
|
|
|
for (lc = ld->ld_conns; lc != NULL; lc = lc->lconn_next) {
|
|
|
|
if (ldap_pvt_tls_inplace(lc->lconn_sb) != 0)
|
|
|
|
return LDAP_OPERATIONS_ERROR;
|
|
|
|
rc = ldap_extended_operation_s(ld, LDAP_EXOP_START_TLS,
|
1999-12-11 02:26:12 +08:00
|
|
|
NULL, serverctrls, clientctrls, &rspoid, &rspdata);
|
1999-12-10 06:33:22 +08:00
|
|
|
if (rc != LDAP_SUCCESS)
|
|
|
|
return rc;
|
1999-12-11 11:50:33 +08:00
|
|
|
if (rspoid != NULL)
|
|
|
|
LDAP_FREE(rspoid);
|
|
|
|
if (rspdata != NULL)
|
|
|
|
ber_bvfree(rspdata);
|
1999-12-10 06:33:22 +08:00
|
|
|
rc = ldap_pvt_tls_start( lc->lconn_sb, ld->ld_options.ldo_tls_ctx );
|
|
|
|
if (rc != LDAP_SUCCESS)
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
return LDAP_SUCCESS;
|
1999-12-11 01:18:59 +08:00
|
|
|
#else
|
|
|
|
return LDAP_NOT_SUPPORTED;
|
|
|
|
#endif
|
1999-12-10 06:33:22 +08:00
|
|
|
}
|
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
int
|
1999-12-08 02:52:05 +08:00
|
|
|
open_ldap_connection( LDAP *ld, Sockbuf *sb, LDAPURLDesc *srv,
|
1998-08-09 08:43:13 +08:00
|
|
|
char **krbinstancep, int async )
|
|
|
|
{
|
1999-12-10 06:33:22 +08:00
|
|
|
int rc = -1;
|
1999-12-12 13:07:17 +08:00
|
|
|
int port;
|
|
|
|
#ifdef HAVE_TLS
|
|
|
|
int tls;
|
|
|
|
#endif
|
1999-12-08 02:52:05 +08:00
|
|
|
long addr;
|
1998-08-09 08:43:13 +08:00
|
|
|
|
|
|
|
Debug( LDAP_DEBUG_TRACE, "open_ldap_connection\n", 0, 0, 0 );
|
|
|
|
|
1999-12-08 02:52:05 +08:00
|
|
|
port = srv->lud_port;
|
|
|
|
if (port == 0)
|
|
|
|
port = ld->ld_options.ldo_defport;
|
|
|
|
port = htons( (short) port );
|
|
|
|
|
|
|
|
addr = 0;
|
1999-12-11 11:50:33 +08:00
|
|
|
if ( srv->lud_host == NULL || *srv->lud_host == 0 )
|
1999-12-08 02:52:05 +08:00
|
|
|
addr = htonl( INADDR_LOOPBACK );
|
1998-08-09 08:43:13 +08:00
|
|
|
|
2000-01-02 09:21:25 +08:00
|
|
|
switch ( srv->lud_protocol ) {
|
|
|
|
case LDAP_PROTO_TCP:
|
|
|
|
case LDAP_PROTO_UDP:
|
|
|
|
rc = ldap_connect_to_host( ld, sb, srv->lud_host, addr, port, async );
|
|
|
|
break;
|
2000-01-02 09:56:01 +08:00
|
|
|
#ifdef LDAP_PF_LOCAL
|
2000-01-02 09:21:25 +08:00
|
|
|
case LDAP_PROTO_LOCAL:
|
|
|
|
rc = ldap_connect_to_path( ld, sb, srv->lud_host, async );
|
|
|
|
break;
|
2000-01-02 09:56:01 +08:00
|
|
|
#endif /* LDAP_PF_LOCAL */
|
2000-01-02 09:21:25 +08:00
|
|
|
default:
|
|
|
|
rc = -1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
if ( rc == -1 ) {
|
|
|
|
return( rc );
|
|
|
|
}
|
1999-03-03 04:23:14 +08:00
|
|
|
|
1999-05-19 09:12:33 +08:00
|
|
|
ber_pvt_sb_set_io( sb, &ber_pvt_sb_io_tcp, NULL );
|
1998-08-09 08:43:13 +08:00
|
|
|
|
1999-07-14 03:32:51 +08:00
|
|
|
#ifdef HAVE_TLS
|
2000-01-02 09:21:25 +08:00
|
|
|
tls = (srv->lud_properties & LDAP_URL_USE_SSL);
|
|
|
|
if (tls == 0)
|
|
|
|
tls = (srv->lud_properties & LDAP_URL_USE_SSL_UNSPECIFIED);
|
|
|
|
|
1999-12-11 11:50:33 +08:00
|
|
|
if ( tls != 0 ) {
|
|
|
|
rc = ldap_pvt_tls_start( sb, ld->ld_options.ldo_tls_ctx );
|
|
|
|
if (rc != LDAP_SUCCESS)
|
|
|
|
return rc;
|
1999-07-14 03:32:51 +08:00
|
|
|
}
|
|
|
|
#endif
|
1999-12-11 11:50:33 +08:00
|
|
|
|
1998-08-09 08:43:13 +08:00
|
|
|
if ( krbinstancep != NULL ) {
|
1998-10-25 10:01:14 +08:00
|
|
|
#ifdef HAVE_KERBEROS
|
1999-05-19 15:20:06 +08:00
|
|
|
char *c;
|
1998-08-09 11:04:12 +08:00
|
|
|
if (( *krbinstancep = ldap_host_connected_to( sb )) != NULL &&
|
1999-05-19 14:13:44 +08:00
|
|
|
( c = strchr( *krbinstancep, '.' )) != NULL ) {
|
|
|
|
*c = '\0';
|
1998-08-09 08:43:13 +08:00
|
|
|
}
|
1998-10-25 10:01:14 +08:00
|
|
|
#else /* HAVE_KERBEROS */
|
1999-12-10 06:33:22 +08:00
|
|
|
*krbinstancep = NULL;
|
1998-10-25 10:01:14 +08:00
|
|
|
#endif /* HAVE_KERBEROS */
|
1998-08-09 08:43:13 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
return( 0 );
|
|
|
|
}
|