2 * Copyright (c) 1995 Regents of the University of Michigan.
11 static char copyright[] = "@(#) Copyright (c) 1995 Regents of the University of Michigan.\nAll rights reserved.\n";
17 #include <ac/socket.h>
18 #include <ac/string.h>
21 #ifdef HAVE_SYS_PARAM_H
22 #include <sys/param.h>
33 * ldap_open - initialize and connect to an ldap server. A magic cookie to
34 * be used for future communication is returned on success, NULL on failure.
35 * "host" may be a space-separated list of hosts or IP addresses
39 * ld = ldap_open( hostname, port );
43 ldap_open( char *host, int port )
48 #endif /* LDAP_REFERRALS */
50 Debug( LDAP_DEBUG_TRACE, "ldap_open\n", 0, 0, 0 );
52 if (( ld = ldap_init( host, port )) == NULL ) {
57 if (( srv = (LDAPServer *)calloc( 1, sizeof( LDAPServer ))) ==
58 NULL || ( ld->ld_defhost != NULL && ( srv->lsrv_host =
59 strdup( ld->ld_defhost )) == NULL )) {
60 ldap_ld_free( ld, 0 );
63 srv->lsrv_port = ld->ld_defport;
65 if (( ld->ld_defconn = ldap_new_connection( ld, &srv, 1,1,0 )) == NULL ) {
66 if ( ld->ld_defhost != NULL ) free( srv->lsrv_host );
68 ldap_ld_free( ld, 0 );
71 ++ld->ld_defconn->lconn_refcnt; /* so it never gets closed/freed */
73 #else /* LDAP_REFERRALS */
74 if ( open_ldap_connection( ld, &ld->ld_sb, ld->ld_defhost,
75 ld->ld_defport, &ld->ld_host, 0 ) < 0 ) {
76 ldap_ld_free( ld, 0 );
79 #endif /* LDAP_REFERRALS */
81 Debug( LDAP_DEBUG_TRACE, "ldap_open successful, ld_host is %s\n",
82 ( ld->ld_host == NULL ) ? "(null)" : ld->ld_host, 0, 0 );
89 * ldap_init - initialize the LDAP library. A magic cookie to be used for
90 * future communication is returned on success, NULL on failure.
91 * "defhost" may be a space-separated list of hosts or IP addresses
95 * ld = ldap_open( default_hostname, default_port );
98 ldap_init( char *defhost, int defport )
102 Debug( LDAP_DEBUG_TRACE, "ldap_init\n", 0, 0, 0 );
105 { WORD wVersionRequested;
109 wVersionRequested = MAKEWORD( 2, 0 );
111 err = WSAStartup( wVersionRequested, &wsaData );
113 /* Tell the user that we couldn't find a usable */
118 /* Confirm that the WinSock DLL supports 2.0.*/
119 /* Note that if the DLL supports versions greater */
120 /* than 2.0 in addition to 2.0, it will still return */
121 /* 2.0 in wVersion since that is the version we */
124 if ( LOBYTE( wsaData.wVersion ) != 2 ||
125 HIBYTE( wsaData.wVersion ) != 0 )
127 /* Tell the user that we couldn't find a usable */
132 } /* The WinSock DLL is acceptable. Proceed. */
135 if ( WSAStartup( 0x0101, &wsadata ) != 0 ) {
140 if ( (ld = (LDAP *) calloc( 1, sizeof(LDAP) )) == NULL ) {
145 #ifdef LDAP_REFERRALS
146 if (( ld->ld_selectinfo = ldap_new_select_info()) == NULL ) {
153 LDAP_BOOL_SET(ld, LDAP_BOOL_REFERRALS);
158 if ( defhost != NULL &&
159 ( ld->ld_defhost = strdup( defhost )) == NULL ) {
160 #ifdef LDAP_REFERRALS
161 ldap_free_select_info( ld->ld_selectinfo );
162 #endif /* LDAP_REFERRALS */
169 ld->ld_defport = ( defport == 0 ) ? LDAP_PORT : defport;
170 ld->ld_version = LDAP_VERSION;
171 ld->ld_lberoptions = LBER_USE_DER;
172 ld->ld_refhoplimit = LDAP_DEFAULT_REFHOPLIMIT;
174 #ifdef LDAP_REFERRALS
175 LDAP_BOOL_SET(ld, LDAP_BOOL_REFERRALS);
176 #endif /* LDAP_REFERRALS */
178 #if defined( STR_TRANSLATION ) && defined( LDAP_DEFAULT_CHARSET )
179 ld->ld_lberoptions |= LBER_TRANSLATE_STRINGS;
180 #if LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET
181 ldap_set_string_translators( ld, ldap_8859_to_t61, ldap_t61_to_8859 );
182 #endif /* LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET */
183 #endif /* STR_TRANSLATION && LDAP_DEFAULT_CHARSET */
190 open_ldap_connection( LDAP *ld, Sockbuf *sb, char *host, int defport,
191 char **krbinstancep, int async )
196 char *curhost, hostname[ 2*MAXHOSTNAMELEN ];
198 Debug( LDAP_DEBUG_TRACE, "open_ldap_connection\n", 0, 0, 0 );
200 defport = htons( (short) defport );
202 if ( host != NULL ) {
203 for ( p = host; p != NULL && *p != '\0'; p = q ) {
204 if (( q = strchr( p, ' ' )) != NULL ) {
205 strncpy( hostname, p, q - p );
206 hostname[ q - p ] = '\0';
208 while ( *q == ' ' ) {
212 curhost = p; /* avoid copy if possible */
216 if (( r = strchr( curhost, ':' )) != NULL ) {
217 if ( curhost != hostname ) {
218 strcpy( hostname, curhost ); /* now copy */
219 r = hostname + ( r - curhost );
223 port = htons( (short) atoi( r ) );
228 if (( rc = ldap_connect_to_host( sb, curhost, 0L,
229 port, async )) != -1 ) {
234 rc = ldap_connect_to_host( sb, NULL, htonl( INADDR_LOOPBACK ),
242 if ( krbinstancep != NULL ) {
244 if (( *krbinstancep = ldap_host_connected_to( sb )) != NULL &&
245 ( p = strchr( *krbinstancep, '.' )) != NULL ) {
248 #else /* HAVE_KERBEROS */
250 #endif /* HAVE_KERBEROS */