3 * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
4 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
7 * Copyright (c) 1995 Regents of the University of Michigan.
17 #include <ac/stdlib.h>
20 #include <ac/socket.h>
21 #include <ac/string.h>
26 int ldap_open_defconn( LDAP *ld )
30 if (( srv = (LDAPServer *)LDAP_CALLOC( 1, sizeof( LDAPServer ))) ==
31 NULL || ( ld->ld_defhost != NULL && ( srv->lsrv_host =
32 LDAP_STRDUP( ld->ld_defhost )) == NULL ))
34 if( srv != NULL ) LDAP_FREE( (char*) srv );
35 ld->ld_errno = LDAP_NO_MEMORY;
39 srv->lsrv_port = ld->ld_defport;
41 if (( ld->ld_defconn = ldap_new_connection( ld, &srv, 1,1,0 )) == NULL )
43 if ( ld->ld_defhost != NULL ) LDAP_FREE( srv->lsrv_host );
44 LDAP_FREE( (char *)srv );
45 ld->ld_errno = LDAP_SERVER_DOWN;
49 ++ld->ld_defconn->lconn_refcnt; /* so it never gets closed/freed */
55 * ldap_open - initialize and connect to an ldap server. A magic cookie to
56 * be used for future communication is returned on success, NULL on failure.
57 * "host" may be a space-separated list of hosts or IP addresses
61 * ld = ldap_open( hostname, port );
65 ldap_open( LDAP_CONST char *host, int port )
70 Debug( LDAP_DEBUG_TRACE, "ldap_open\n", 0, 0, 0 );
72 if (( ld = ldap_init( host, port )) == NULL ) {
76 rc = ldap_open_defconn( ld );
79 ldap_ld_free( ld, 0, NULL, NULL );
83 Debug( LDAP_DEBUG_TRACE, "ldap_open successful, ld_host is %s\n",
84 ( ld->ld_host == NULL ) ? "(null)" : ld->ld_host, 0, 0 );
91 * ldap_init - initialize the LDAP library. A magic cookie to be used for
92 * future communication is returned on success, NULL on failure.
93 * "host" may be a space-separated list of hosts or IP addresses
97 * ld = ldap_open( host, port );
100 ldap_init( LDAP_CONST char *defhost, int defport )
104 if( ldap_int_global_options.ldo_valid != LDAP_INITIALIZED ) {
105 ldap_int_initialize();
108 Debug( LDAP_DEBUG_TRACE, "ldap_init\n", 0, 0, 0 );
111 { WORD wVersionRequested;
115 wVersionRequested = MAKEWORD( 2, 0 );
117 err = WSAStartup( wVersionRequested, &wsaData );
119 /* Tell the user that we couldn't find a usable */
124 /* Confirm that the WinSock DLL supports 2.0.*/
125 /* Note that if the DLL supports versions greater */
126 /* than 2.0 in addition to 2.0, it will still return */
127 /* 2.0 in wVersion since that is the version we */
130 if ( LOBYTE( wsaData.wVersion ) != 2 ||
131 HIBYTE( wsaData.wVersion ) != 0 )
133 /* Tell the user that we couldn't find a usable */
138 } /* The WinSock DLL is acceptable. Proceed. */
142 if ( WSAStartup( 0x0101, &wsaData ) != 0 ) {
148 if ( (ld = (LDAP *) LDAP_CALLOC( 1, sizeof(LDAP) )) == NULL ) {
153 /* copy the global options */
154 memcpy(&ld->ld_options, &ldap_int_global_options,
155 sizeof(ld->ld_options));
157 ld->ld_valid = LDAP_VALID_SESSION;
159 /* but not pointers to malloc'ed items */
160 ld->ld_options.ldo_defbase = NULL;
161 ld->ld_options.ldo_defhost = NULL;
162 ld->ld_options.ldo_sctrls = NULL;
163 ld->ld_options.ldo_cctrls = NULL;
165 if ( defhost != NULL ) {
166 ld->ld_options.ldo_defhost = LDAP_STRDUP( defhost );
168 ld->ld_options.ldo_defhost = LDAP_STRDUP(
169 ldap_int_global_options.ldo_defhost);
172 if ( ld->ld_options.ldo_defhost == NULL ) {
173 LDAP_FREE( (char*)ld );
178 if ( ldap_int_global_options.ldo_defbase != NULL ) {
179 ld->ld_options.ldo_defbase = LDAP_STRDUP(
180 ldap_int_global_options.ldo_defbase);
183 if (( ld->ld_selectinfo = ldap_new_select_info()) == NULL ) {
184 LDAP_FREE( (char*) ld->ld_options.ldo_defhost );
185 if ( ld->ld_options.ldo_defbase == NULL ) {
186 LDAP_FREE( (char*) ld->ld_options.ldo_defbase );
188 LDAP_FREE( (char*) ld );
194 ld->ld_defport = defport;
197 ld->ld_lberoptions = LBER_USE_DER;
199 #if defined( STR_TRANSLATION ) && defined( LDAP_DEFAULT_CHARSET )
200 ld->ld_lberoptions |= LBER_TRANSLATE_STRINGS;
201 #if LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET
202 ldap_set_string_translators( ld, ldap_8859_to_t61, ldap_t61_to_8859 );
203 #endif /* LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET */
204 #endif /* STR_TRANSLATION && LDAP_DEFAULT_CHARSET */
206 /* we'll assume we're talking version 2 for now */
207 ld->ld_version = LDAP_VERSION2;
209 ber_pvt_sb_init( &(ld->ld_sb) );
216 open_ldap_connection( LDAP *ld, Sockbuf *sb, const char *host, int defport,
217 char **krbinstancep, int async )
222 char *r, *curhost, hostname[ 2*MAXHOSTNAMELEN ];
224 Debug( LDAP_DEBUG_TRACE, "open_ldap_connection\n", 0, 0, 0 );
226 defport = htons( (short) defport );
228 if ( host != NULL ) {
229 for ( p = host; p != NULL && *p != '\0'; p = q ) {
230 if (( q = strchr( p, ' ' )) != NULL ) {
231 strncpy( hostname, p, q - p );
232 hostname[ q - p ] = '\0';
234 while ( *q == ' ' ) {
238 curhost = (char *) p; /* avoid copy if possible */
242 if (( r = strchr( curhost, ':' )) != NULL ) {
243 if ( curhost != hostname ) {
244 strcpy( hostname, curhost ); /* now copy */
245 r = hostname + ( r - curhost );
249 port = htons( (short) atoi( r ) );
254 if (( rc = ldap_connect_to_host( ld, sb, curhost, 0L,
255 port, async )) != -1 ) {
260 rc = ldap_connect_to_host( ld, sb, 0, htonl( INADDR_LOOPBACK ),
268 ber_pvt_sb_set_io( sb, &ber_pvt_sb_io_tcp, NULL );
271 if ( ld->ld_options.ldo_tls_mode == LDAP_OPT_X_TLS_HARD ) {
273 * Fortunately, the lib uses blocking io...
275 if ( ldap_pvt_tls_connect( sb, ld->ld_options.ldo_tls_ctx ) <
279 /* FIXME: hostname of server must be compared with name in
284 if ( krbinstancep != NULL ) {
287 if (( *krbinstancep = ldap_host_connected_to( sb )) != NULL &&
288 ( c = strchr( *krbinstancep, '.' )) != NULL ) {
291 #else /* HAVE_KERBEROS */
293 #endif /* HAVE_KERBEROS */