=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/io/sio.c,v retrieving revision 1.7 retrieving revision 1.9.2.2 diff -u -p -r1.7 -r1.9.2.2 --- OpenXM_contrib2/asir2000/io/sio.c 2000/09/23 00:57:43 1.7 +++ OpenXM_contrib2/asir2000/io/sio.c 2000/11/08 08:31:55 1.9.2.2 @@ -44,7 +44,7 @@ * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. - * $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.6 2000/08/22 05:04:18 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/io/sio.c,v 1.9.2.1 2000/11/08 08:18:14 maekawa Exp $ */ #if INET #include "ca.h" @@ -65,6 +65,7 @@ extern int little_endian; +int I_am_server; struct IOFP iofp[MAXIOFP]; #if !defined(_PA_RISC1_1) @@ -85,17 +86,21 @@ void getremotename(s,name) int s; char *name; { - struct sockaddr_in peer; - struct hostent *hp; - int peerlen; + union { + struct sockaddr sa; + char data[SOCK_MAXADDRLEN]; + } dummy; + struct sockaddr *sa; + socklen_t len; + char host[NI_MAXHOST]; + int rs; - peerlen = sizeof(peer); - getpeername(getremotesocket(s),(struct sockaddr *)&peer,&peerlen); - hp = gethostbyaddr((char *)&peer.sin_addr,sizeof(struct in_addr),AF_INET); - if ( hp ) - strcpy(name,hp->h_name); - else - strcpy(name,(char *)inet_ntoa(peer.sin_addr)); + rs = getremotesocket(s); + len = SOCK_MAXADDRLEN; + getpeername(rs, (struct sockaddr *)dummy.data, &len); + sa = &(dummy.sa); + getnameinfo(sa, sa->sa_len, host, sizeof(host), NULL, 0, 0); + strcpy(name, host); } int generate_port(use_unix,port_str) @@ -107,11 +112,14 @@ char *port_str; unsigned int port; static int count=0; +#if !defined(VISUAL) if ( use_unix ) { sprintf(port_str,"/tmp/ox%02x.XXXXXX",count); count++; mktemp(port_str); - } else { + } else +#endif + { port = ((unsigned int)mt_genrand()+(unsigned int)get_current_time()) %(65536-1024)+1024; sprintf(port_str,"%d",port); @@ -122,64 +130,62 @@ int try_bind_listen(use_unix,port_str) int use_unix; char *port_str; { - struct sockaddr_in sin; - struct sockaddr *saddr; - int len; - int service; -#if !defined(VISUAL) - struct sockaddr_un s_un; + struct addrinfo hints, *res, *ai; + int s, error; + char *errstr; - if ( use_unix ) { - service = socket(AF_UNIX, SOCK_STREAM, 0); - if (service < 0) { - perror("in socket"); - return -1; - } - s_un.sun_family = AF_UNIX; - strcpy(s_un.sun_path,port_str); -#if defined(__FreeBSD__) - len = SUN_LEN(&s_un); - s_un.sun_len = len+1; /* XXX */ + memset(&hints, 0, sizeof(hints)); +#if defined(VISUAL) + hints.ai_family = PF_UNSPEC; #else - len = strlen(s_un.sun_path)+sizeof(s_un.sun_family); -#endif - saddr = (struct sockaddr *)&s_un; - } else -#endif - { - service = socket(AF_INET, SOCK_STREAM, 0); - if ( service < 0 ) { - perror("in socket"); - return -1; + if (use_unix) + hints.ai_family = PF_UNIX; + else + hints.ai_family = PF_UNSPEC; +#endif /* VISUAL */ + hints.ai_socktype = SOCK_STREAM; + + error = getaddrinfo(NULL, port_str, &hints, &res); + if (error) { + warnx("try_bind_listen(): %s", gai_strerror(error)); + return (-1); + } + + for (ai = res ; ai != NULL ; ai = ai->ai_next) { + if ((s = socket(ai->ai_family, ai->ai_socktype, + ai->ai_protocol)) < 0 ) { + errstr = "in socket"; + continue; } - sin.sin_family = AF_INET; sin.sin_addr.s_addr = INADDR_ANY; - sin.sin_port = htons(atoi(port_str)); - len = sizeof(sin); - saddr = (struct sockaddr *)&sin; + + if (bind(s, ai->ai_addr, ai->ai_addrlen) < 0) { + errstr = "in bind"; + close(s); + s = -1; + continue; + } + + if (listen(s, SOCKQUEUELENGTH) < 0) { + errstr = "in listen"; + close(s); + s = -1; + continue; + } + + /* established connection */ + break; } - if (bind(service, saddr, len) < 0) { - perror("in bind"); - close(service); - return -1; - } - if (getsockname(service,saddr, &len) < 0) { - perror("in getsockname"); - close(service); - return -1; - } - if (listen(service, SOCKQUEUELENGTH) < 0) { - perror("in listen"); - close(service); - return -1; - } - return service; + freeaddrinfo(res); + + if (s < 0) + perror(errstr); + return (s); } /* try to accept a connection request Input - af_unix: s is UNIX domain socket if af_unix is nonzero s: socket Output @@ -189,99 +195,94 @@ char *port_str; the original socket is always closed. */ -int try_accept(af_unix,s) -int af_unix,s; +int try_accept(s) +int s; { - int len,c,i; - struct sockaddr_in sin; + union { + struct sockaddr sa; + char data[SOCK_MAXADDRLEN]; + } dummy; + socklen_t len; + int c, i; -#if !defined(VISUAL) - struct sockaddr_un s_un; - if ( af_unix ) { - len = sizeof(s_un); - for ( c = -1, i = 0; (c < 0)&&(i = 10) ; i++ ) - c = accept(s, (struct sockaddr *) &s_un, &len); - } else -#endif - { + len = SOCK_MAXADDRLEN; + if (getsockname(s, (struct sockaddr *)dummy.data, &len) < 0) { + close(s); + return (-1) + } - len = sizeof(sin); - for ( c = -1, i = 0; (c < 0)&&(i = 10) ; i++ ) - c = accept(s, (struct sockaddr *) &sin, &len); + for (i = 0 ; i < 10 ; i++) { + c = accept(s, &(dummy.sa), &len); + if (c >= 0) { + close(s); + return (c); + } } - if ( i == 10 ) - c = -1; + close(s); - return c; + return (-1); } int try_connect(use_unix,host,port_str) int use_unix; char *host,*port_str; { - struct sockaddr_in sin; - struct sockaddr *saddr; - struct hostent *hp; - int len,s,i; -#if !defined(VISUAL) - struct sockaddr_un s_un; -#endif + struct addrinfo hints, *res, *ai; + int s, error, i; + char *errstr; - for ( i = 0; i < 10; i++ ) { -#if !defined(VISUAL) - if ( use_unix ) { - if ( (s = socket(AF_UNIX,SOCK_STREAM,0)) < 0 ) { - perror("socket"); - return -1; - } - bzero(&s_un,sizeof(s_un)); - s_un.sun_family = AF_UNIX; - strcpy(s_un.sun_path,port_str); -#if defined(__FreeBSD__) - len = SUN_LEN(&s_un); - s_un.sun_len = len+1; /* XXX */ + memset(&hints, 0, sizeof(hints)); +#if defined(VISUAL) + hints.ai_family = PF_UNSPEC; #else - len = strlen(s_un.sun_path)+sizeof(s_un.sun_family); -#endif - saddr = (struct sockaddr *)&s_un; - } else + if (use_unix) + hints.ai_family = PF_UNIX; + else + hints.ai_family = PF_UNSPEC; #endif /* VISUAL */ - { - if ( (s = socket(AF_INET,SOCK_STREAM,0)) < 0 ) { - perror("socket"); - return -1; + hints.ai_socktype = SOCK_STREAM; + + error = getaddrinfo(host, port_str, &hints, &res); + if (error) { + warnx("try_connect: %s", gai_strerror(error)); + return (-1); + } + for (i = 0 ; i < 10 ; i++) { + for (ai = res ; ai != NULL ; ai = ai->ai_next) { + if ((s = socket(ai->ai_family, ai->ai_socktype, + ai->ai_protocol)) < 0 ) { + errstr = "socket"; + continue; } - bzero(&sin,sizeof(sin)); - sin.sin_port = htons(atoi(port_str)); - sin.sin_addr.s_addr = inet_addr(host); - if ( sin.sin_addr.s_addr != -1 ) { - sin.sin_family = AF_INET; - } else { - hp = gethostbyname(host); - bcopy(hp->h_addr,&sin.sin_addr,hp->h_length); - sin.sin_family = hp->h_addrtype; + if (connect(s, ai->ai_addr, ai->ai_addrlen) < 0) { + errstr = "connect"; + close(s); + s = -1; + continue; } - len = sizeof(sin); - saddr = (struct sockaddr *)&sin; - } - if ( connect(s,saddr,len) >= 0 ) + + /* established a connection */ break; - else { - close(s); + } + + if (s >= 0) { + freeaddrinfo(res); + return (s); + } + #if defined(VISUAL) - Sleep(100); + Sleep(100); #else - usleep(100000); + usleep(100000); #endif - } } - if ( i == 10 ) { - perror("connect"); - return -1; - } else - return s; + freeaddrinfo(res); + + perror(errstr); + return (-1); } +#if 0 close_allconnections() { int s; @@ -305,6 +306,12 @@ int s; free_iofp(s); } } +#else +close_allconnections() +{ + shutdown_all(); +} +#endif free_iofp(s) int s; @@ -416,4 +423,6 @@ int fd; return i; return -1; } + #endif /* INET */ +