| version 1.6, 2002/02/24 10:27:20 |
version 1.13, 2004/02/25 23:14:35 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.5 2001/05/04 01:06:30 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.12 2003/09/16 02:57:39 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" |
| /* |
/* |
| Line 23 jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solari |
|
| Line 24 jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solari |
|
| #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 37 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; |
SET_TCPIOERROR; |
| Line 73 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); |
| } |
} |
| Line 90 socketAccept(int snum) { |
|
| Line 91 socketAccept(int snum) { |
|
| s = snum; |
s = snum; |
| fprintf(TcpioError,"Trying to accept... "); fflush(TcpioError); |
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); |
fprintf(TcpioError,"Accepted.\n"); fflush(TcpioError); |
| if (close(s) < 0) { |
if (close(s) < 0) { |
| Line 112 socketAcceptLocal(int snum) { |
|
| Line 117 socketAcceptLocal(int snum) { |
|
| fprintf(TcpioError,"Trying to accept from localhost... "); fflush(TcpioError); |
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); |
| Line 141 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; |
| |
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); |
| |
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."); |
| |
fprintf(stderr,"The connection is refused."); |
| |
return(-1); |
| |
} |
| |
|
| |
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; |
SET_TCPIOERROR; |
| FD_ZERO(&readfds); |
FD_ZERO(&readfds); |
| FD_SET(fd,&readfds); |
FD_SET(fd,&readfds); |
| Line 177 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; |
SET_TCPIOERROR; |
| FD_ZERO(&readfds); |
FD_ZERO(&readfds); |
| Line 262 socketConnectWithPass(char *servername,int port,char * |
|
| Line 309 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) { |