From 16fcdec8df47342bd4921c58deeeb2ef14896ac0 Mon Sep 17 00:00:00 2001 From: Kurt Zeilenga Date: Thu, 12 Oct 2000 21:59:08 +0000 Subject: [PATCH] Import Stig reorganized daemon.c + style changes --- servers/slapd/daemon.c | 507 ++++++++++++++++++++++------------------- 1 file changed, 275 insertions(+), 232 deletions(-) diff --git a/servers/slapd/daemon.c b/servers/slapd/daemon.c index 1d7ef9328f..282da950f4 100644 --- a/servers/slapd/daemon.c +++ b/servers/slapd/daemon.c @@ -191,20 +191,187 @@ static void slapd_close(ber_socket_t s) { tcp_close(s); } +static slap_free_listener_addresses(struct sockaddr **sal) +{ + struct sockaddr **sap; + + if (sal == NULL) { + return; + } + + for (sap = sal; *sap != NULL; sap++) { + ch_free(*sap); + } + + ch_free(sal); +} + +/* port = 0 indicates AF_LOCAL */ +static int slap_get_listener_addresses( + const char *host, + unsigned short port, + struct sockaddr ***sal) +{ + struct sockaddr **sap; +#ifdef HAVE_GETADDRINFO + struct addrinfo hints, *res, *sai; + int n, err; + + memset( &hints, '\0', sizeof(hints) ); + hints.ai_flags = AI_PASSIVE; + hints.ai_socktype = SOCK_STREAM; +# ifdef LDAP_PF_LOCAL + if ( port == 0 ) { + hints.ai_family = AF_LOCAL; + /* host specifies a service in this case */ + if (err = getaddrinfo(NULL, host, &hints, &res)) { + Debug( LDAP_DEBUG_ANY, "daemon: getaddrinfo failed: %s\n", + gai_strerror(err), 0, 0); + return -1; + } + } else +# endif + { + char serv[7]; + + snprintf(serv, sizeof serv, "%d", port); + hints.ai_family = AF_UNSPEC; + if (err = getaddrinfo(host, serv, &hints, &res)) { + Debug( LDAP_DEBUG_ANY, "daemon: getaddrinfo failed: %s\n", + gai_strerror(err), 0, 0); + return -1; + } + } + + sai = res; + for (n=2; (sai = sai->ai_next) != NULL; n++) { + /* EMPTY */ ; + } + *sal = ch_malloc(n * sizeof(*sal)); + if (*sal == NULL) { + return -1; + } + + sai = res; + sap = *sal; + do { + switch (sai->ai_family) { +# ifdef LDAP_PF_LOCAL + case AF_LOCAL: { + *sap = ch_malloc(sizeof(struct sockaddr_un)); + if (*sap == NULL) { + freeaddrinfo(res); + goto errexit; + } + *(struct sockaddr_un *)*sap = + *((struct sockaddr_un *)sai->ai_addr); + } break; +# endif +# ifdef LDAP_PF_INET6 + case AF_INET6: { + *sap = ch_malloc(sizeof(struct sockaddr_in6)); + if (*sap == NULL) { + freeaddrinfo(res); + goto errexit; + } + *(struct sockaddr_in6 *)*sap = + *((struct sockaddr_in6 *)sai->ai_addr); + } break; +# endif + case AF_INET: { + *sap = ch_malloc(sizeof(struct sockaddr_in)); + if (*sap == NULL) { + freeaddrinfo(res); + goto errexit; + } + *(struct sockaddr_in *)*sap = + *((struct sockaddr_in *)sai->ai_addr); + } break; + default: + *sap = NULL; + break; + } + sap++; + } while ((sai = sai->ai_next) != NULL); + + freeaddrinfo(res); + +#else +# ifdef LDAP_PF_LOCAL + if ( port == 0 ) { + *sal = ch_malloc(2 * sizeof(*sal)); + if (*sal == NULL) { + return -1; + } + sap = *sal; + *sap = ch_malloc(sizeof(struct sockaddr_un)); + if (*sap == NULL) + goto errexit; + (void)memset( (void *)*sap, '\0', sizeof(struct sockaddr_un) ); + (*sap)->sa_family = AF_LOCAL; + if ( strlen(host) > + (sizeof(((struct sockaddr_un *)*sal)->sun_path) - 1) ) { + Debug( LDAP_DEBUG_ANY, + "daemon: domain socket path (%s) too long in URL", + host, 0, 0); + goto errexit; + } + strcpy( ((struct sockaddr_un *)*sap)->sun_path, host ); + } else +# endif + { + struct in_addr in; + + if ( host == NULL ) { + in.s_addr = htonl(INADDR_ANY); + + } else if ( !inet_aton( host, &in ) ) { + struct hostent *he = gethostbyname( host ); + if( he == NULL ) { + Debug( LDAP_DEBUG_ANY, + "daemon: invalid host %s", host, 0, 0); + return -1; + } + AC_MEMCPY( &in, he->h_addr, sizeof( in ) ); + } + + *sal = ch_malloc(2 * sizeof(*sal)); + if (*sal == NULL) { + return -1; + } + + sap = *sal; + *sap = ch_malloc(sizeof(struct sockaddr_in)); + if (*sap == NULL) { + goto errexit; + } + + (void)memset( (void *)*sap, '\0', sizeof(struct sockaddr_in) ); + (*sap)->sa_family = AF_INET; + ((struct sockaddr_in *)*sap)->sin_port = htons(port); + ((struct sockaddr_in *)*sap)->sin_addr = in; + } + sap++; +#endif + + *sap = NULL; + return 0; -static Listener * open_listener( const char* url ) +errexit: + slap_free_listener_addresses(*sal); + return -1; +} + +static Listener * slap_open_listener( + const char* url ) { int tmp, rc; Listener l; Listener *li; LDAPURLDesc *lud; - char *s; - int port; -#ifdef HAVE_GETADDRINFO - char serv[7]; - struct addrinfo hints, *res, *sai; - int err; -#endif + unsigned short port; + int err, addrlen; + struct sockaddr **sal, **psal; rc = ldap_url_parse( url, &lud ); @@ -236,295 +403,171 @@ static Listener * open_listener( const char* url ) } #endif -#ifdef HAVE_GETADDRINFO - memset( &hints, '\0', sizeof(hints) ); - hints.ai_flags = AI_PASSIVE; - hints.ai_family = AF_UNSPEC; - hints.ai_socktype = SOCK_STREAM; - -# ifdef LDAP_PF_LOCAL + port = (unsigned short) lud->lud_port; + if ( ldap_pvt_url_scheme2proto(lud->lud_scheme) == LDAP_PROTO_IPC ) { +#ifdef LDAP_PF_LOCAL if ( lud->lud_host == NULL || lud->lud_host[0] == '\0' ) { - err = getaddrinfo(NULL, LDAPI_SOCK, &hints, &res); - if (!err) - unlink( LDAPI_SOCK ); + err = slap_get_listener_addresses(LDAPI_SOCK, 0, &sal); } else { - err = getaddrinfo(NULL, lud->lud_host, &hints, &res); - if (!err) - unlink( lud->lud_host ); + err = slap_get_listener_addresses(lud->lud_host, 0, &sal); } - } else -# endif /* LDAP_PF_LOCAL */ - { - snprintf(serv, sizeof serv, "%d", lud->lud_port); +#else + Debug( LDAP_DEBUG_ANY, "daemon: URL scheme not supported: %s", + url, 0, 0); + ldap_free_urldesc( lud ); + return NULL; +#endif + } else { if( lud->lud_host == NULL || lud->lud_host[0] == '\0' || strcmp(lud->lud_host, "*") == 0 ) { - err = getaddrinfo(NULL, serv, &hints, &res); + err = slap_get_listener_addresses(NULL, port, &sal); } else { - err = getaddrinfo(lud->lud_host, serv, &hints, &res); + err = slap_get_listener_addresses(lud->lud_host, port, &sal); } } + ldap_free_urldesc( lud ); if ( err ) { - Debug( LDAP_DEBUG_ANY, "daemon: getaddrinfo failed: %s\n", gai_strerror(err), 0, 0); - ldap_free_urldesc( lud ); return NULL; } - ldap_free_urldesc( lud ); - sai = res; - do { - switch( sai->ai_family ) { + psal = sal; + while ( *sal != NULL ) { + switch( (*sal)->sa_family ) { case AF_INET: -# ifdef LDAP_PF_INET6 +#ifdef LDAP_PF_INET6 case AF_INET6: -# endif -# ifdef LDAP_PF_LOCAL +#endif +#ifdef LDAP_PF_LOCAL case AF_LOCAL: -# endif +#endif break; default: + sal++; continue; } - - l.sl_sd = socket( sai->ai_family, sai->ai_socktype, sai->ai_protocol); + l.sl_sd = socket( (*sal)->sa_family, SOCK_STREAM, 0); if ( l.sl_sd == AC_SOCKET_INVALID ) { int err = sock_errno(); Debug( LDAP_DEBUG_ANY, "daemon: socket() failed errno=%d (%s)\n", err, sock_errstr(err), 0 ); + sal++; continue; } - - if ( sai->ai_family != AF_LOCAL ) { -#else - - if ( ldap_pvt_url_scheme2proto(lud->lud_scheme) == LDAP_PROTO_IPC ) { -#ifdef LDAP_PF_LOCAL - port = 0; - (void) memset( (void *)&l.sl_sa.sa_un_addr, '\0', sizeof(l.sl_sa.sa_un_addr) ); - - l.sl_sa.sa_un_addr.sun_family = AF_LOCAL; - - /* hack: overload the host to be the path */ - if ( lud->lud_host == NULL || lud->lud_host[0] == '\0' ) { - strcpy( l.sl_sa.sa_un_addr.sun_path, LDAPI_SOCK ); - } else { - if ( strlen(lud->lud_host) > (sizeof(l.sl_sa.sa_un_addr.sun_path) - 1) ) { - Debug( LDAP_DEBUG_ANY, - "daemon: domain socket path (%s) too long in URL: %s", - lud->lud_host, url, 0); - ldap_free_urldesc( lud ); - return NULL; - } - strcpy( l.sl_sa.sa_un_addr.sun_path, lud->lud_host ); +#ifndef HAVE_WINSOCK + if ( l.sl_sd >= dtblsize ) { + Debug( LDAP_DEBUG_ANY, + "daemon: listener descriptor %ld is too great %ld\n", + (long) l.sl_sd, (long) dtblsize, 0 ); + tcp_close( l.sl_sd ); + sal++; + continue; } - unlink( l.sl_sa.sa_un_addr.sun_path ); -#if 0 - /* I don't think we need to set this. */ - l.sl_sa.sa_un_addr.sun_len = sizeof( l.sl_sa.sa_un_addr.sun_len ) + - sizeof( l.sl_sa.sa_un_addr.sun_family ) + - strlen( l.sl_sa.sa_un_addr.sun_path ) + 1; #endif -#else - Debug( LDAP_DEBUG_ANY, "daemon: URL scheme not supported: %s", - url, 0, 0); - ldap_free_urldesc( lud ); - return NULL; -#endif /* LDAP_PF_LOCAL */ - } else { - - port = lud->lud_port; - - (void) memset( (void*) &l.sl_addr, '\0', sizeof(l.sl_addr) ); - - l.sl_addr.sin_family = AF_INET; - l.sl_addr.sin_port = htons( (unsigned short) lud->lud_port ); - - if( lud->lud_host == NULL || lud->lud_host[0] == '\0' - || strcmp(lud->lud_host, "*") == 0 ) - { - l.sl_addr.sin_addr.s_addr = htonl(INADDR_ANY); - - } else { - /* host or address was specified */ - if( !inet_aton( lud->lud_host, &l.sl_addr.sin_addr ) ) { - struct hostent *he = gethostbyname( lud->lud_host ); - if( he == NULL ) { +#ifdef LDAP_PF_LOCAL + if ( (*sal)->sa_family == AF_LOCAL ) { + unlink ( ((struct sockaddr_un *)*sal)->sun_path ); + } else +#endif + { +#ifdef SO_REUSEADDR + /* enable address reuse */ + tmp = 1; + rc = setsockopt( l.sl_sd, SOL_SOCKET, SO_REUSEADDR, + (char *) &tmp, sizeof(tmp) ); + if ( rc == AC_SOCKET_ERROR ) { + int err = sock_errno(); Debug( LDAP_DEBUG_ANY, - "daemon: invalid host (%s) in URL: %s", - lud->lud_host, url, 0); - ldap_free_urldesc( lud ); - return NULL; + "slapd(%ld): setsockopt(SO_REUSEADDR) failed errno=%d (%s)\n", + (long) l.sl_sd, err, sock_errstr(err) ); } - - AC_MEMCPY( &l.sl_addr.sin_addr, he->h_addr, - sizeof( l.sl_addr.sin_addr ) ); +#endif } - } - } - - ldap_free_urldesc( lud ); - - l.sl_sd = socket( l.sl_sa.sa_addr.sa_family, SOCK_STREAM, 0 ); - if ( l.sl_sd == AC_SOCKET_INVALID ) { - int err = sock_errno(); - Debug( LDAP_DEBUG_ANY, - "daemon: socket() failed errno=%d (%s)\n", err, - sock_errstr(err), 0 ); - return NULL; - } - -#ifndef HAVE_WINSOCK - if ( l.sl_sd >= dtblsize ) { - Debug( LDAP_DEBUG_ANY, - "daemon: listener descriptor %ld is too great %ld\n", - (long) l.sl_sd, (long) dtblsize, 0 ); - tcp_close( l.sl_sd ); - return NULL; - } + + switch( (*sal)->sa_family ) { + case AF_INET: + addrlen = sizeof(struct sockaddr_in); + break; +#ifdef LDAP_PF_INET6 + case AF_INET6: + addrlen = sizeof(struct sockaddr_in6); + break; #endif - #ifdef LDAP_PF_LOCAL - /* for IPv4 and IPv6 sockets only */ - if ( l.sl_sa.sa_addr.sa_family != AF_LOCAL ) { -#endif /* LDAP_PF_LOCAL */ -#endif /* HAVE_GETADDRINFO */ - -#ifdef SO_REUSEADDR - /* enable address reuse */ - tmp = 1; - rc = setsockopt( l.sl_sd, SOL_SOCKET, SO_REUSEADDR, - (char *) &tmp, sizeof(tmp) ); - if ( rc == AC_SOCKET_ERROR ) { - int err = sock_errno(); - Debug( LDAP_DEBUG_ANY, - "slapd(%ld): setsockopt(SO_REUSEADDR) failed errno=%d (%s)\n", - (long) l.sl_sd, err, sock_errstr(err) ); - } + case AF_LOCAL: + addrlen = sizeof(struct sockaddr_un); + break; #endif - -#ifdef HAVE_GETADDRINFO - } /* sai->ai_family != AF_LOCAL */ - if (!bind(l.sl_sd, sai->ai_addr, sai->ai_addrlen)) + } + + if (!bind(l.sl_sd, *sal, addrlen)) break; err = sock_errno(); Debug( LDAP_DEBUG_ANY, "daemon: bind(%ld) failed errno=%d (%s)\n", - (long) l.sl_sd, err, sock_errstr(err) ); + (long) l.sl_sd, err, sock_errstr(err) ); tcp_close( l.sl_sd ); - } while ((sai = sai->ai_next) != NULL); + sal++; + } /* while ( *sal != NULL ) */ - if (!sai) { + if ( *sal == NULL ) { Debug( LDAP_DEBUG_ANY, "daemon: bind(%ld) failed\n", (long) l.sl_sd, 0, 0 ); + slap_free_listener_addresses(psal); return NULL; } - switch ( sai->ai_family ) { -# ifdef LDAP_PF_LOCAL - case AF_LOCAL: - if ( chmod( (char *)sai->ai_addr, S_IRWXU ) < 0 ) { + switch ( (*sal)->sa_family ) { +#ifdef LDAP_PF_LOCAL + case AF_LOCAL: { + char *addr = ((struct sockaddr_un *)*sal)->sun_path; + if ( chmod( addr, S_IRWXU ) < 0 ) { int err = sock_errno(); Debug( LDAP_DEBUG_ANY, "daemon: fchmod(%ld) failed errno=%d (%s)", - (long) l.sl_sd, err, sock_errstr(err) ); + (long) l.sl_sd, err, sock_errstr(err) ); tcp_close( l.sl_sd ); + slap_free_listener_addresses(psal); return NULL; } - l.sl_name = ch_malloc( strlen((char *)sai->ai_addr) + sizeof("PATH=") ); - sprintf( l.sl_name, "PATH=%s", sai->ai_addr ); - break; -# endif /* LDAP_PF_LOCAL */ + l.sl_name = ch_malloc( strlen(addr) + sizeof("PATH=") ); + sprintf( l.sl_name, "PATH=%s", addr ); + } break; +#endif /* LDAP_PF_LOCAL */ case AF_INET: { + char *s; +#ifdef HAVE_GETADDRINFO char addr[INET_ADDRSTRLEN]; - inet_ntop( AF_INET, - &((struct sockaddr_in *)sai->ai_addr)->sin_addr, - addr, sizeof(addr) ); - l.sl_name = ch_malloc( strlen(addr) + strlen(serv) + sizeof("IP=:") ); - sprintf( l.sl_name, "IP=%s:%s", addr, serv ); + inet_ntop( AF_INET, &((struct sockaddr_in *)*sal)->sin_addr, + addr, sizeof(addr) ); + s = addr; +#else + s = inet_ntoa( l.sl_addr.sin_addr ); +#endif + l.sl_name = ch_malloc( sizeof("IP=255.255.255.255:65535") ); + sprintf( l.sl_name, "IP=%s:%d", + s != NULL ? s : "unknown" , port ); } break; -# ifdef LDAP_PF_INET6 +#ifdef LDAP_PF_INET6 case AF_INET6: { char addr[INET6_ADDRSTRLEN]; - inet_ntop( AF_INET6, - &((struct sockaddr_in6 *)sai->ai_addr)->sin6_addr, - addr, sizeof addr); - l.sl_name = ch_malloc( strlen(addr) + strlen(serv) + sizeof("IP= ") ); - sprintf( l.sl_name, "IP=%s %s", addr, serv ); + inet_ntop( AF_INET6, &((struct sockaddr_in6 *)*sal)->sin6_addr, + addr, sizeof addr); + l.sl_name = ch_malloc( strlen(addr) + sizeof("IP= 65535") ); + sprintf( l.sl_name, "IP=%s %d", addr, port ); } break; -# endif /* LDAP_PF_INET6 */ +#endif /* LDAP_PF_INET6 */ default: Debug( LDAP_DEBUG_ANY, "daemon: unsupported address family (%d)\n", - (int) sai->ai_family, 0, 0 ); + (int) (*sal)->sa_family, 0, 0 ); break; } -#else -#ifdef LDAP_PF_LOCAL - /* close conditional */ - } -#endif /* LDAP_PF_LOCAL */ - - switch ( l.sl_sa.sa_addr.sa_family ) { -#ifdef LDAP_PF_LOCAL - case AF_LOCAL: - rc = bind( l.sl_sd, (struct sockaddr *)&l.sl_sa, - sizeof(l.sl_sa.sa_un_addr) ); - break; -#endif - - case AF_INET: - rc = bind( l.sl_sd, (struct sockaddr *)&l.sl_sa, - sizeof(l.sl_sa.sa_in_addr) ); - break; - - default: - rc = AC_SOCKET_ERROR; - errno = EINVAL; - break; - } - - if ( rc == AC_SOCKET_ERROR ) { - int err = sock_errno(); - Debug( LDAP_DEBUG_ANY, "daemon: bind(%ld) failed errno=%d (%s)\n", - (long) l.sl_sd, err, sock_errstr(err) ); - tcp_close( l.sl_sd ); - return NULL; - } - - switch ( l.sl_sa.sa_addr.sa_family ) { -#ifdef LDAP_PF_LOCAL - case AF_LOCAL: - if ( chmod( l.sl_sa.sa_un_addr.sun_path, S_IRWXU ) < 0 ) { - int err = sock_errno(); - Debug( LDAP_DEBUG_ANY, - "daemon: chmod(%ld) failed errno=%d (%s)", - (long) l.sl_sd, err, sock_errstr(err) ); - tcp_close( l.sl_sd ); - return NULL; - } - - l.sl_name = ch_malloc( strlen(l.sl_sa.sa_un_addr.sun_path) - + sizeof("PATH=") ); - sprintf( l.sl_name, "PATH=%s", l.sl_sa.sa_un_addr.sun_path ); - break; -#endif /* LDAP_PF_LOCAL */ - - case AF_INET: - l.sl_name = ch_malloc( sizeof("IP=255.255.255.255:65336") ); - s = inet_ntoa( l.sl_addr.sin_addr ); - sprintf( l.sl_name, "IP=%s:%d", - s != NULL ? s : "unknown" , port ); - break; - - default: - l.sl_name = ch_strdup( "UNKNOWN" ); - break; - } -#endif /* HAVE_GETADDRINFO */ + slap_free_listener_addresses(psal); l.sl_url = ch_strdup( url ); li = ch_malloc( sizeof( Listener ) ); @@ -610,7 +653,7 @@ int slapd_daemon_init( const char *urls ) slap_listeners = ch_malloc( (i+1)*sizeof(Listener *) ); for(i = 0; u[i] != NULL; i++ ) { - slap_listeners[i] = open_listener( u[i] ); + slap_listeners[i] = slap_open_listener( u[i] ); if( slap_listeners[i] == NULL ) { charray_free( u ); -- 2.39.5