[BACK]Return to mytcpio.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / plugin

Diff for /OpenXM/src/kan96xx/plugin/mytcpio.c between version 1.2 and 1.17

version 1.2, 1999/10/30 02:22:16 version 1.17, 2020/10/06 11:33:47
Line 1 
Line 1 
 /*  $OpenXM$ */  /*  $OpenXM: OpenXM/src/kan96xx/plugin/mytcpio.c,v 1.16 2005/07/03 11:08:54 ohara Exp $ */
 #include <stdio.h>  #include <stdio.h>
   #include <string.h>
 #include <sys/types.h>  #include <sys/types.h>
 #include <sys/socket.h>  #include <sys/socket.h>
 #include <sys/time.h>  #include <sys/time.h>
 #include <netinet/in.h>  #include <netinet/in.h>
 #include <netdb.h>  #include <netdb.h>
 #include <setjmp.h>  #include <setjmp.h>
   #include <errno.h>
   #include <unistd.h>
 /* -lnsl -lsocket /usr/ucblib/libucb.a */  /* -lnsl -lsocket /usr/ucblib/libucb.a */
 #include "ox_kan.h"  #include "ox_kan.h"
 /*  /*
Line 15 
Line 18 
 #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;
   
 socketOpen(char *serverName,int portNumber) {  int socketOpen(char *serverName,int portNumber) {
   static struct hostent *myhost;    static struct hostent *myhost;
   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 46  socketOpen(char *serverName,int portNumber) {
Line 54  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 68  socketOpen(char *serverName,int portNumber) {
Line 76  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);
 }  }
   
   
 socketAccept(int snum) {  int 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 95  socketAccept(int snum) {
Line 108  socketAccept(int snum) {
   return(news);    return(news);
 }  }
   
 socketAcceptLocal(int snum) {  int socketAcceptLocal(int snum) {
   int s, news;    int s, news;
   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 134  socketAcceptLocal(int snum) {
Line 152  socketAcceptLocal(int snum) {
   return(news);    return(news);
 }  }
   
   /* It does not close the socket for listening. */
   int 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 163  int oxSocketSelect0(int fd,int t) {
Line 221  int oxSocketSelect0(int fd,int t) {
   else return(0);    else return(0);
 }  }
   
 oxSocketMultiSelect(int sid[],int size,int t,int result[])  int oxSocketMultiSelect(int sid[],int size,int t,int result[])
 {  {
   int i,fd,p;    int i,fd,p;
   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 214  oxSocketMultiSelect(int sid[],int size,int t,int resul
Line 272  oxSocketMultiSelect(int sid[],int size,int t,int resul
 }  }
   
   
 socketConnect(char *serverName,int portNumber) {  int socketConnect(char *serverName,int portNumber) {
   struct hostent *servhost;    struct hostent *servhost;
   struct sockaddr_in server;    struct sockaddr_in server;
   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 228  socketConnect(char *serverName,int portNumber) {
Line 287  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 236  socketConnect(char *serverName,int portNumber) {
Line 295  socketConnect(char *serverName,int portNumber) {
   }    }
   /* on=1; setsockopt(socketid,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on));  */    /* on=1; setsockopt(socketid,SOL_SOCKET,SO_REUSEADDR,&on,sizeof(on));  */
   if (!Quiet) {    if (!Quiet) {
     fprintf(TcpioError,"Trying to connect port %d, ip=%x\n",ntohs(server.sin_port),server.sin_addr);      fprintf(TcpioError,"Trying to connect port %d, ip=%lx\n",ntohs(server.sin_port),(long) server.sin_addr.s_addr);
   }    }
   if (connect(socketid,(struct sockaddr *)&server,sizeof(server)) == -1) {    if (connect(socketid,(struct sockaddr *)&server,sizeof(server)) == -1) {
     errorMsg1s("cannot connect");      errorMsg1s("cannot connect");
Line 246  socketConnect(char *serverName,int portNumber) {
Line 305  socketConnect(char *serverName,int portNumber) {
   return(socketid);    return(socketid);
 }  }
   
 socketConnectWithPass(char *servername,int port,char *pass)  int socketConnectWithPass(char *servername,int port,char *pass)
 {  {
   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)+1);      m = write(fd,pass,strlen(pass)+1);
     if (m != strlen(pass)+1) {      if (m != strlen(pass)+1) {
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.17
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>