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>
35 * ldap_open - initialize and connect to an ldap server. A magic cookie to
36 * be used for future communication is returned on success, NULL on failure.
37 * "host" may be a space-separated list of hosts or IP addresses
41 * ld = ldap_open( hostname, port );
45 ldap_open( char *host, int port )
50 #endif /* LDAP_REFERRALS */
52 Debug( LDAP_DEBUG_TRACE, "ldap_open\n", 0, 0, 0 );
54 if (( ld = ldap_init( host, port )) == NULL ) {
59 if (( srv = (LDAPServer *)calloc( 1, sizeof( LDAPServer ))) ==
60 NULL || ( ld->ld_defhost != NULL && ( srv->lsrv_host =
61 strdup( ld->ld_defhost )) == NULL )) {
62 ldap_ld_free( ld, 0 );
65 srv->lsrv_port = ld->ld_defport;
67 if (( ld->ld_defconn = ldap_new_connection( ld, &srv, 1,1,0 )) == NULL ) {
68 if ( ld->ld_defhost != NULL ) free( srv->lsrv_host );
70 ldap_ld_free( ld, 0 );
73 ++ld->ld_defconn->lconn_refcnt; /* so it never gets closed/freed */
75 #else /* LDAP_REFERRALS */
76 if ( open_ldap_connection( ld, &ld->ld_sb, ld->ld_defhost,
77 ld->ld_defport, &ld->ld_host, 0 ) < 0 ) {
78 ldap_ld_free( ld, 0 );
81 #endif /* LDAP_REFERRALS */
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 * "defhost" may be a space-separated list of hosts or IP addresses
97 * ld = ldap_open( default_hostname, default_port );
100 ldap_init( char *defhost, int defport )
104 Debug( LDAP_DEBUG_TRACE, "ldap_init\n", 0, 0, 0 );
107 { WORD wVersionRequested;
111 wVersionRequested = MAKEWORD( 2, 0 );
113 err = WSAStartup( wVersionRequested, &wsaData );
115 /* Tell the user that we couldn't find a usable */
120 /* Confirm that the WinSock DLL supports 2.0.*/
121 /* Note that if the DLL supports versions greater */
122 /* than 2.0 in addition to 2.0, it will still return */
123 /* 2.0 in wVersion since that is the version we */
126 if ( LOBYTE( wsaData.wVersion ) != 2 ||
127 HIBYTE( wsaData.wVersion ) != 0 )
129 /* Tell the user that we couldn't find a usable */
134 } /* The WinSock DLL is acceptable. Proceed. */
137 if ( WSAStartup( 0x0101, &wsadata ) != 0 ) {
142 if ( (ld = (LDAP *) calloc( 1, sizeof(LDAP) )) == NULL ) {
147 #ifdef LDAP_REFERRALS
148 if (( ld->ld_selectinfo = ldap_new_select_info()) == NULL ) {
153 ld->ld_options = LDAP_OPT_REFERRALS;
154 #endif /* LDAP_REFERRALS */
156 if ( defhost != NULL &&
157 ( ld->ld_defhost = strdup( defhost )) == NULL ) {
158 #ifdef LDAP_REFERRALS
159 ldap_free_select_info( ld->ld_selectinfo );
160 #endif /* LDAP_REFERRALS */
167 ld->ld_defport = ( defport == 0 ) ? LDAP_PORT : defport;
168 ld->ld_version = LDAP_VERSION;
169 ld->ld_lberoptions = LBER_USE_DER;
170 ld->ld_refhoplimit = LDAP_DEFAULT_REFHOPLIMIT;
172 #ifdef LDAP_REFERRALS
173 ld->ld_options |= LDAP_OPT_REFERRALS;
174 #endif /* LDAP_REFERRALS */
176 #if defined( STR_TRANSLATION ) && defined( LDAP_DEFAULT_CHARSET )
177 ld->ld_lberoptions |= LBER_TRANSLATE_STRINGS;
178 #if LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET
179 ldap_set_string_translators( ld, ldap_8859_to_t61, ldap_t61_to_8859 );
180 #endif /* LDAP_CHARSET_8859 == LDAP_DEFAULT_CHARSET */
181 #endif /* STR_TRANSLATION && LDAP_DEFAULT_CHARSET */
188 open_ldap_connection( LDAP *ld, Sockbuf *sb, char *host, int defport,
189 char **krbinstancep, int async )
194 char *curhost, hostname[ 2*MAXHOSTNAMELEN ];
196 Debug( LDAP_DEBUG_TRACE, "open_ldap_connection\n", 0, 0, 0 );
198 defport = htons( (short) defport );
200 if ( host != NULL ) {
201 for ( p = host; p != NULL && *p != '\0'; p = q ) {
202 if (( q = strchr( p, ' ' )) != NULL ) {
203 strncpy( hostname, p, q - p );
204 hostname[ q - p ] = '\0';
206 while ( *q == ' ' ) {
210 curhost = p; /* avoid copy if possible */
214 if (( r = strchr( curhost, ':' )) != NULL ) {
215 if ( curhost != hostname ) {
216 strcpy( hostname, curhost ); /* now copy */
217 r = hostname + ( r - curhost );
221 port = htons( (short)atoi( r ));
226 if (( rc = ldap_connect_to_host( sb, curhost, 0L,
227 port, async )) != -1 ) {
232 rc = ldap_connect_to_host( sb, NULL, htonl( INADDR_LOOPBACK ),
240 if ( krbinstancep != NULL ) {
242 if (( *krbinstancep = ldap_host_connected_to( sb )) != NULL &&
243 ( p = strchr( *krbinstancep, '.' )) != NULL ) {
246 #else /* HAVE_KERBEROS */
248 #endif /* HAVE_KERBEROS */