| version 1.1, 1999/10/08 02:12:05 |
version 1.15, 2004/11/23 05:28:19 |
|
|
| |
/* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.14 2004/02/28 13:39:42 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include <sys/types.h> |
#include <sys/types.h> |
| #include <sys/socket.h> |
#include <sys/socket.h> |
|
|
| #include <netinet/in.h> |
#include <netinet/in.h> |
| #include <netdb.h> |
#include <netdb.h> |
| #include <setjmp.h> |
#include <setjmp.h> |
| |
#include <errno.h> |
| /* -lnsl -lsocket /usr/ucblib/libucb.a */ |
/* -lnsl -lsocket /usr/ucblib/libucb.a */ |
| #include "ox_kan.h" |
#include "ox_kan.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); |
| } |
} |
| |
|
| FILE *TcpioError = stdout; |
#define SET_TCPIOERROR { if (TcpioError == NULL) TcpioError = stdout; } |
| |
FILE *TcpioError = NULL; |
| int OpenedSocket = 0; |
int OpenedSocket = 0; |
| extern int Quiet; |
extern int Quiet; |
| |
|
| Line 31 socketOpen(char *serverName,int portNumber) { |
|
| Line 39 socketOpen(char *serverName,int portNumber) { |
|
| static struct sockaddr_in me; |
static struct sockaddr_in me; |
| static int s_waiting; |
static int s_waiting; |
| static int on; |
static int on; |
| extern int errno; |
|
| int tt; |
int tt; |
| |
|
| |
SET_TCPIOERROR; |
| fprintf(TcpioError,"Hello from open. serverName is %s and portnumber is %d\n", |
if (!Quiet) fprintf(TcpioError,"Hello from open. serverName is %s and portnumber is %d\n", |
| serverName,portNumber); |
serverName,portNumber); |
| if ((myhost = gethostbyname(serverName)) == NULL) { |
if ((myhost = gethostbyname(serverName)) == NULL) { |
| errorMsg1s("Bad server name."); |
errorMsg1s("Bad server name."); |
| return(-1); |
return(-1); |
| Line 45 socketOpen(char *serverName,int portNumber) { |
|
| Line 52 socketOpen(char *serverName,int portNumber) { |
|
| me.sin_family = AF_INET; |
me.sin_family = AF_INET; |
| me.sin_port = htons(portNumber); |
me.sin_port = htons(portNumber); |
| bcopy(myhost->h_addr, |
bcopy(myhost->h_addr, |
| &me.sin_addr,myhost->h_length); |
&me.sin_addr,myhost->h_length); |
| |
|
| if ((s_waiting = socket(AF_INET,SOCK_STREAM,0)) < 0) { |
if ((s_waiting = socket(AF_INET,SOCK_STREAM,0)) < 0) { |
| errorMsg1s("Socket allocation is failed."); |
errorMsg1s("Socket allocation is failed."); |
| Line 67 socketOpen(char *serverName,int portNumber) { |
|
| Line 74 socketOpen(char *serverName,int portNumber) { |
|
| return(-1); |
return(-1); |
| } |
} |
| |
|
| if (listen(s_waiting,1) < 0) { |
if (listen(s_waiting,MAX_LISTEN_QUEUE) < 0) { |
| errorMsg1s("Listen failed"); |
errorMsg1s("Listen failed"); |
| return(-1); |
return(-1); |
| } |
} |
| fprintf(TcpioError,"Done the initialization. port =%d\n",ntohs(me.sin_port)); |
if (!Quiet) fprintf(TcpioError,"Done the initialization. port =%d\n",ntohs(me.sin_port)); |
| OpenedSocket = ntohs(me.sin_port); |
OpenedSocket = ntohs(me.sin_port); |
| return(s_waiting); |
return(s_waiting); |
| } |
} |
| Line 80 socketOpen(char *serverName,int portNumber) { |
|
| Line 87 socketOpen(char *serverName,int portNumber) { |
|
| socketAccept(int snum) { |
socketAccept(int snum) { |
| int s, news; |
int s, news; |
| |
|
| |
SET_TCPIOERROR; |
| s = snum; |
s = snum; |
| fprintf(TcpioError,"Trying to accept... "); fflush(TcpioError); |
if (!Quiet) {fprintf(TcpioError,"Trying to accept... "); fflush(TcpioError);} |
| if ((news = accept(s,NULL,NULL)) < 0) { |
if ((news = accept(s,NULL,NULL)) < 0) { |
| errorMsg1s("Error in accept."); |
errorMsg1s("Error in accept. Retrying (socketAccept)."); |
| return(-1); |
/* Code added for strange behavior on cygwin. */ |
| |
if ((news = accept(s,NULL,NULL)) < 0) { |
| |
errorMsg1s("Error in accept. Retry failed."); |
| |
return (-1); |
| |
} |
| } |
} |
| fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError); |
if (!Quiet) {fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);} |
| if (close(s) < 0) { |
if (close(s) < 0) { |
| errorMsg1s("Error in closing the old socket."); |
errorMsg1s("Error in closing the old socket."); |
| return(-1); |
return(-1); |
| Line 99 socketAcceptLocal(int snum) { |
|
| Line 111 socketAcceptLocal(int snum) { |
|
| struct sockaddr peer; |
struct sockaddr peer; |
| int len; |
int len; |
| int i; |
int i; |
| |
|
| |
SET_TCPIOERROR; |
| s = snum; |
s = snum; |
| fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError); |
if (!Quiet) {fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError);} |
| len = sizeof(struct sockaddr); |
len = sizeof(struct sockaddr); |
| if ((news = accept(s,&peer,&len)) < 0) { |
if ((news = accept(s,&peer,&len)) < 0) { |
| errorMsg1s("Error in accept."); |
errorMsg1s("Error in accept. Retrying"); |
| return(-1); |
/* Code added for strange behavior on cygwin. */ |
| |
if ((news = accept(s,&peer,&len)) < 0) { |
| |
errorMsg1s("Error in accept. Retry failed."); |
| |
return (-1); |
| |
} |
| } |
} |
| |
|
| len = sizeof(struct sockaddr); |
len = sizeof(struct sockaddr); |
| getpeername(news,&peer,&len); |
getpeername(news,&peer,&len); |
| printf("len= %d\n",len); |
if (!Quiet) printf("len= %d\n",len); |
| for (i=0; i<len; i++) { |
for (i=0; i<len; i++) { |
| printf(" %x ",peer.sa_data[i]); |
if (!Quiet) printf(" %x ",peer.sa_data[i]); |
| } |
} |
| printf("\n"); |
if (!Quiet) printf("\n"); |
| if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 && |
if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 && |
| peer.sa_data[4] == 0 && peer.sa_data[5] == 1) { |
peer.sa_data[4] == 0 && peer.sa_data[5] == 1) { |
| fprintf(stderr,"Authentification: localhost is allowed to be accepted.\n"); |
if (!Quiet) fprintf(stderr,"Authentication: localhost is allowed to be accepted.\n"); |
| }else{ |
}else{ |
| errorMsg1s("Authentification: The connection is not from the localhost."); |
errorMsg1s("Authentication: The connection is not from the localhost."); |
| close(s); |
close(s); |
| fprintf(stderr,"The connection is refused."); |
fprintf(stderr,"The connection is refused."); |
| return(-1); |
return(-1); |
| } |
} |
| |
|
| fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError); |
if (!Quiet) {fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);} |
| if (close(s) < 0) { |
if (close(s) < 0) { |
| errorMsg1s("Error in closing the old socket."); |
errorMsg1s("Error in closing the old socket."); |
| return(-1); |
return(-1); |
| Line 133 socketAcceptLocal(int snum) { |
|
| Line 150 socketAcceptLocal(int snum) { |
|
| return(news); |
return(news); |
| } |
} |
| |
|
| |
/* It does not close the socket for listening. */ |
| |
socketAcceptLocal2(int snum) { |
| |
int s, news; |
| |
struct sockaddr peer; |
| |
int len; |
| |
int i; |
| |
|
| |
SET_TCPIOERROR; |
| |
s = snum; |
| |
if (!Quiet) {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 (socketAcceptLocal2)."); |
| |
/* Code added for strange behavior on cygwin. */ |
| |
if ((news = accept(s,&peer,&len)) < 0) { |
| |
errorMsg1s("Error in accept. Retry failed."); |
| |
return (-1); |
| |
} |
| |
} |
| |
|
| |
len = sizeof(struct sockaddr); |
| |
getpeername(news,&peer,&len); |
| |
if (!Quiet) printf("len= %d\n",len); |
| |
for (i=0; i<len; i++) { |
| |
if (!Quiet) printf(" %x ",peer.sa_data[i]); |
| |
} |
| |
if (!Quiet) printf("\n"); |
| |
if (peer.sa_data[2] == 0x7f && peer.sa_data[3] == 0 && |
| |
peer.sa_data[4] == 0 && peer.sa_data[5] == 1) { |
| |
if (!Quiet) 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); |
| |
} |
| |
|
| |
if (!Quiet) {fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError);} |
| |
return(news); |
| |
} |
| |
|
| int oxSocketSelect0(int fd,int t) { |
int oxSocketSelect0(int fd,int t) { |
| fd_set readfds; |
fd_set readfds; |
| struct timeval timeout; |
struct timeval timeout; |
| int debug = 0; |
int debug = 0; |
| extern int errno; |
SET_TCPIOERROR; |
| FD_ZERO(&readfds); |
FD_ZERO(&readfds); |
| FD_SET(fd,&readfds); |
FD_SET(fd,&readfds); |
| timeout.tv_sec = 0; |
timeout.tv_sec = 0; |
| Line 168 oxSocketMultiSelect(int sid[],int size,int t,int resul |
|
| Line 225 oxSocketMultiSelect(int sid[],int size,int t,int resul |
|
| fd_set readfds; |
fd_set readfds; |
| struct timeval timeout; |
struct timeval timeout; |
| int isdata = 0; |
int isdata = 0; |
| extern errno; |
|
| |
|
| |
SET_TCPIOERROR; |
| FD_ZERO(&readfds); |
FD_ZERO(&readfds); |
| timeout.tv_sec = 0; |
timeout.tv_sec = 0; |
| timeout.tv_usec = (long)t; |
timeout.tv_usec = (long)t; |
| Line 219 socketConnect(char *serverName,int portNumber) { |
|
| Line 276 socketConnect(char *serverName,int portNumber) { |
|
| int socketid; |
int socketid; |
| int on; |
int on; |
| |
|
| |
SET_TCPIOERROR; |
| if ((servhost = gethostbyname(serverName)) == NULL) { |
if ((servhost = gethostbyname(serverName)) == NULL) { |
| errorMsg1s("bad server name.\n"); |
errorMsg1s("bad server name.\n"); |
| return(-1); |
return(-1); |
| Line 227 socketConnect(char *serverName,int portNumber) { |
|
| Line 285 socketConnect(char *serverName,int portNumber) { |
|
| server.sin_family = AF_INET; |
server.sin_family = AF_INET; |
| server.sin_port = htons(portNumber); |
server.sin_port = htons(portNumber); |
| bcopy(servhost->h_addr, |
bcopy(servhost->h_addr, |
| (char *)&server.sin_addr,servhost->h_length); |
(char *)&server.sin_addr,servhost->h_length); |
| |
|
| if ((socketid = socket(AF_INET,SOCK_STREAM,0)) <0) { |
if ((socketid = socket(AF_INET,SOCK_STREAM,0)) <0) { |
| errorMsg1s("socket allocation is failed.\n"); |
errorMsg1s("socket allocation is failed.\n"); |
| Line 249 socketConnectWithPass(char *servername,int port,char * |
|
| Line 307 socketConnectWithPass(char *servername,int port,char * |
|
| { |
{ |
| int fd; |
int fd; |
| int m; |
int m; |
| |
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)); |
m = write(fd,pass,strlen(pass)+1); |
| if (m != strlen(pass)) { |
if (m != strlen(pass)+1) { |
| fprintf(TcpioError,"Fail to send password to fd=%d.\n",fd); |
fprintf(TcpioError,"Fail to send password to fd=%d.\n",fd); |
| return(-1); |
return(-1); |
| } |
} |