version 1.4.2.3, 2000/11/11 07:01:19 |
version 1.11, 2003/07/20 07:23:31 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.4.2.2 2000/11/11 04:44:30 maekawa Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.10 2003/07/20 07:18:45 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include <sys/types.h> |
#include <sys/types.h> |
#include <sys/socket.h> |
#include <sys/socket.h> |
|
|
#if defined(sun) |
#if defined(sun) |
int MyEnv_oxmisc[2000]; |
int MyEnv_oxmisc[2000]; |
#else |
#else |
|
#if defined(__CYGWIN__) |
|
sigjmp_buf MyEnv_oxmisc; /* may cause a trouble in Solaris. */ |
|
#else |
jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solaris. */ |
jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solaris. */ |
#endif |
#endif |
|
#endif |
|
|
#define READBUFSIZE 10000 |
#define READBUFSIZE 10000 |
|
#define MAX_LISTEN_QUEUE 3 |
static void errorMsg1s(char *s) { |
static void errorMsg1s(char *s) { |
fprintf(stderr,"%s\n",s); |
fprintf(stderr,"%s\n",s); |
} |
} |
Line 29 int OpenedSocket = 0; |
|
Line 34 int OpenedSocket = 0; |
|
extern int Quiet; |
extern int Quiet; |
|
|
socketOpen(char *serverName,int portNumber) { |
socketOpen(char *serverName,int portNumber) { |
struct addrinfo hints, *res, *ai; |
static struct hostent *myhost; |
struct sockaddr_storage ss; |
static struct sockaddr_in me; |
socklen_t len; |
static int s_waiting; |
char pstr[BUFSIZ], *errstr; |
static int on; |
int s, p, opt, error; |
extern int errno; |
|
int tt; |
|
|
SET_TCPIOERROR; |
SET_TCPIOERROR; |
fprintf(TcpioError, "Hello from open. serverName is %s and " |
fprintf(TcpioError,"Hello from open. serverName is %s and portnumber is %d\n", |
"portnumber is %d\n", serverName, portNumber); |
serverName,portNumber); |
|
if ((myhost = gethostbyname(serverName)) == NULL) { |
|
errorMsg1s("Bad server name."); |
|
return(-1); |
|
} |
|
bzero((char *)&me,sizeof(me)); |
|
me.sin_family = AF_INET; |
|
me.sin_port = htons(portNumber); |
|
bcopy(myhost->h_addr, |
|
&me.sin_addr,myhost->h_length); |
|
|
memset(&hints, 0, sizeof(hints)); |
if ((s_waiting = socket(AF_INET,SOCK_STREAM,0)) < 0) { |
hints.ai_family = PF_UNSPEC; |
errorMsg1s("Socket allocation is failed."); |
hints.ai_socktype = SOCK_STREAM; |
return(-1); |
|
} |
|
|
memset(pstr, 0, sizeof(pstr)); |
on=1; setsockopt(s_waiting,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on)); |
snprintf(pstr, sizeof(pstr), "%d", portNumber); |
/* important */ |
|
if ((tt = bind(s_waiting,(struct sockaddr *) &me,sizeof(me))) == -1) { |
|
fprintf(TcpioError,"Bind error. Error no is %d. See /usr/include/sys/errno.h. (asm/errno.h)\n",errno); |
|
errorMsg1s("cannot bind"); |
|
return(-1); |
|
} |
|
/* printf("bind returns %d\n",tt); */ |
|
tt = sizeof(me); |
|
if (getsockname(s_waiting,(struct sockaddr *)&me,&tt) < 0) { |
|
fprintf(TcpioError,"getsockname error. Error no is %d. See /usr/include/sys/errno.h (asm/errno.h).\n",errno); |
|
errorMsg1s("cannot getsockname"); |
|
return(-1); |
|
} |
|
|
error = getaddrinfo(serverName, pstr, &hints, &res); |
if (listen(s_waiting,MAX_LISTEN_QUEUE) < 0) { |
if (error) { |
errorMsg1s("Listen failed"); |
errorMsg1s("Bad server name."); |
return(-1); |
return (-1); |
} |
} |
fprintf(TcpioError,"Done the initialization. port =%d\n",ntohs(me.sin_port)); |
|
OpenedSocket = ntohs(me.sin_port); |
s = -1; |
return(s_waiting); |
p = -1; |
|
errstr = NULL; |
|
|
|
for (ai = res ; ai != NULL ; ai = ai->ai_next) { |
|
s = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol); |
|
if (s < 0) { |
|
errstr = "socket"; |
|
continue; |
|
} |
|
|
|
opt = 1; |
|
setsockopt(s, SOL_SOCKET, SO_REUSEADDR, &opt, sizeof(opt)); |
|
|
|
if (bind(s, ai->ai_addr, ai->ai_addrlen) < 0) { |
|
errstr = "bind"; |
|
close(s); |
|
s = -1; |
|
continue; |
|
} |
|
|
|
len = sizeof(ss); |
|
if (getsockname(s, (struct sockaddr *)&ss, &len) < 0) { |
|
errstr = "getsockname"; |
|
close(s); |
|
s = -1; |
|
continue; |
|
} |
|
|
|
switch (ss.ss_family) { |
|
case AF_INET: |
|
{ |
|
struct sockaddr_in *sin; |
|
sin = (struct sockaddr_in *)&ss; |
|
p = ntohs(sin->sin_port); |
|
break; |
|
} |
|
case AF_INET6: |
|
{ |
|
struct sockaddr_in6 *sin6; |
|
sin6 = (struct sockaddr_in6 *)&ss; |
|
p = ntohs(sin6->sin6_port); |
|
break; |
|
} |
|
default: |
|
p = -1; |
|
} |
|
if (p < 0) { |
|
errstr = "AF"; |
|
close(s); |
|
s = -1; |
|
continue; |
|
} |
|
|
|
if (listen(s, 1) < 0) { |
|
errstr = "listen"; |
|
close(s); |
|
s = -1; |
|
continue; |
|
} |
|
|
|
break; |
|
} |
|
|
|
freeaddrinfo(res); |
|
|
|
if (s < 0) { |
|
fprintf(TcpioError, "Error: %s", errstr); |
|
errorMsg1s(errstr); |
|
} else { |
|
OpenedSocket = p; |
|
} |
|
|
|
return (s); |
|
} |
} |
|
|
|
|
Line 147 socketAccept(int snum) { |
|
Line 102 socketAccept(int snum) { |
|
return(news); |
return(news); |
} |
} |
|
|
socketAcceptLocal(int s) { |
socketAcceptLocal(int snum) { |
struct sockaddr_storage ss; |
int s, news; |
socklen_t len; |
struct sockaddr peer; |
int ps, accepted, error; |
int len; |
|
int i; |
|
|
SET_TCPIOERROR; |
SET_TCPIOERROR; |
|
s = snum; |
|
fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError); |
|
len = sizeof(struct sockaddr); |
|
if ((news = accept(s,&peer,&len)) < 0) { |
|
errorMsg1s("Error in accept. Retrying"); |
|
/* Code added for strange behavior on cygwin. */ |
|
if ((news = accept(s,&peer,&len)) < 0) { |
|
errorMsg1s("Error in accept. Retrying"); |
|
return (-1); |
|
} |
|
} |
|
|
fprintf(TcpioError,"Trying to accept from localhost... "); |
len = sizeof(struct sockaddr); |
fflush(TcpioError); |
getpeername(news,&peer,&len); |
|
printf("len= %d\n",len); |
|
for (i=0; i<len; i++) { |
|
printf(" %x ",peer.sa_data[i]); |
|
} |
|
printf("\n"); |
|
if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 && |
|
peer.sa_data[4] == 0 && peer.sa_data[5] == 1) { |
|
fprintf(stderr,"Authentication: localhost is allowed to be accepted.\n"); |
|
}else{ |
|
errorMsg1s("Authentication: The connection is not from the localhost."); |
|
close(s); |
|
fprintf(stderr,"The connection is refused."); |
|
return(-1); |
|
} |
|
|
len = sizeof(ss); |
fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError); |
if ((ps = accept(s, (struct sockaddr *)&ss, &len)) < 0) { |
if (close(s) < 0) { |
errorMsg1s("Error in accept."); |
errorMsg1s("Error in closing the old socket."); |
close(s); |
return(-1); |
return (-1); |
} |
} |
return(news); |
|
} |
|
|
len = sizeof(ss); |
/* It does not close the socket for listening. */ |
if (getpeername(ps, (struct sockaddr *)&ss, &len) < 0) { |
socketAcceptLocal2(int snum) { |
close(s); |
int s, news; |
close(ps); |
struct sockaddr peer; |
errorMsg1s("Error in getpeername."); |
int len; |
return (-1); |
int i; |
} |
|
|
|
accepted = 0; |
SET_TCPIOERROR; |
switch (ss.ss_family) { |
s = snum; |
case AF_INET: |
fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError); |
{ |
len = sizeof(struct sockaddr); |
#ifndef INADDR_LOOPBACK |
if ((news = accept(s,&peer,&len)) < 0) { |
#define INADDR_LOOPBACK 0x7f000001 /* 127.0.0.1 */ |
errorMsg1s("Error in accept."); |
#endif /* INADDR_LOOPBACK */ |
return(-1); |
struct sockaddr_in *sin; |
} |
sin = (struct sockaddr_in *)&ss; |
|
if (sin->sin_addr.s_addr == INADDR_LOOPBACK) |
|
accepted = 1; |
|
break; |
|
} |
|
case AF_INET6: |
|
{ |
|
struct sockaddr_in6 *sin6; |
|
sin6 = (struct sockaddr_in6 *)&ss; |
|
if (IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr)) |
|
accepted = 1; |
|
break; |
|
} |
|
default: |
|
accepted = 0; |
|
} |
|
|
|
if (accepted) { |
len = sizeof(struct sockaddr); |
fprintf(stderr, "Authentication: " |
getpeername(news,&peer,&len); |
"localhost is allowed to be accepted.\n"); |
printf("len= %d\n",len); |
} else { |
for (i=0; i<len; i++) { |
errorMsg1s("Authentication: " |
printf(" %x ",peer.sa_data[i]); |
"The connection is not from the localhost."); |
} |
close(s); |
printf("\n"); |
close(ps); |
if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 && |
fprintf(stderr, "The connection is refused."); |
peer.sa_data[4] == 0 && peer.sa_data[5] == 1) { |
return (-1); |
fprintf(stderr,"Authentication: localhost is allowed to be accepted.\n"); |
} |
}else{ |
|
errorMsg1s("Authentication: The connection is not from the localhost."); |
|
fprintf(stderr,"The connection is refused."); |
|
return(-1); |
|
} |
|
|
fprintf(TcpioError, "Accepted.\n"); |
fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError); |
fflush(TcpioError); |
return(news); |
if (close(s) < 0) { |
|
errorMsg1s("Error in closing the old socket."); |
|
close(ps); |
|
return(-1); |
|
} |
|
|
|
return(ps); |
|
} |
} |
|
|
int oxSocketSelect0(int fd,int t) { |
int oxSocketSelect0(int fd,int t) { |
Line 303 oxSocketMultiSelect(int sid[],int size,int t,int resul |
|
Line 265 oxSocketMultiSelect(int sid[],int size,int t,int resul |
|
|
|
|
|
socketConnect(char *serverName,int portNumber) { |
socketConnect(char *serverName,int portNumber) { |
struct addrinfo hints, *res, *ai; |
struct hostent *servhost; |
char pstr[BUFSIZ], *errstr; |
struct sockaddr_in server; |
int s, error; |
int socketid; |
|
int on; |
|
|
SET_TCPIOERROR; |
SET_TCPIOERROR; |
|
if ((servhost = gethostbyname(serverName)) == NULL) { |
|
errorMsg1s("bad server name.\n"); |
|
return(-1); |
|
} |
|
bzero((char *)&server,sizeof(server)); |
|
server.sin_family = AF_INET; |
|
server.sin_port = htons(portNumber); |
|
bcopy(servhost->h_addr, |
|
(char *)&server.sin_addr,servhost->h_length); |
|
|
memset(&hints, 0, sizeof(hints)); |
if ((socketid = socket(AF_INET,SOCK_STREAM,0)) <0) { |
hints.ai_family = PF_UNSPEC; |
errorMsg1s("socket allocation is failed.\n"); |
hints.ai_socktype = SOCK_STREAM; |
return(-1); |
|
} |
memset(pstr, 0, sizeof(pstr)); |
/* on=1; setsockopt(socketid,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on)); */ |
snprintf(pstr, sizeof(pstr), "%d", portNumber); |
if (!Quiet) { |
|
fprintf(TcpioError,"Trying to connect port %d, ip=%x\n",ntohs(server.sin_port),server.sin_addr); |
error = getaddrinfo(serverName, pstr, &hints, &res); |
} |
if (error) { |
if (connect(socketid,(struct sockaddr *)&server,sizeof(server)) == -1) { |
errorMsg1s("bad server name.\n"); |
errorMsg1s("cannot connect"); |
return (-1); |
return(-1); |
} |
} |
|
if (!Quiet) fprintf(TcpioError,"connected.\n"); |
s = -1; |
return(socketid); |
errstr = NULL; |
|
|
|
for (ai = res ; ai != NULL ; ai = ai->ai_next) { |
|
s = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol); |
|
if (s < 0) { |
|
errstr = "socket"; |
|
continue; |
|
} |
|
|
|
if (!Quiet) { |
|
fprintf(TcpioError, "Trying to connect %s, port %d\n", |
|
serverName, portNumber); |
|
} |
|
|
|
if (connect(s, ai->ai_addr, ai->ai_addrlen) < 0) { |
|
errstr = "connect"; |
|
close(s); |
|
s = -1; |
|
continue; |
|
} |
|
} |
|
|
|
freeaddrinfo(res); |
|
|
|
if (s < 0) { |
|
fprintf(stderr, "Error %s\n", errstr); |
|
return (-1); |
|
} |
|
|
|
if (!Quiet) |
|
fprintf(TcpioError,"connected.\n"); |
|
|
|
return (s); |
|
} |
} |
|
|
socketConnectWithPass(char *servername,int port,char *pass) |
socketConnectWithPass(char *servername,int port,char *pass) |
Line 364 socketConnectWithPass(char *servername,int port,char * |
|
Line 303 socketConnectWithPass(char *servername,int port,char * |
|
int m; |
int m; |
SET_TCPIOERROR; |
SET_TCPIOERROR; |
fd = socketConnect(servername,port); |
fd = socketConnect(servername,port); |
|
if ((pass == NULL) && (fd >= 0)) return fd; |
|
if ((pass == NULL) && (fd < 0)) return -1; |
if (fd >= 0) { |
if (fd >= 0) { |
m = write(fd,pass,strlen(pass)+1); |
m = write(fd,pass,strlen(pass)+1); |
if (m != strlen(pass)+1) { |
if (m != strlen(pass)+1) { |