===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/plugin/mytcpio.c,v
retrieving revision 1.6
retrieving revision 1.11
diff -u -p -r1.6 -r1.11
--- OpenXM/src/kan96xx/plugin/mytcpio.c	2002/02/24 10:27:20	1.6
+++ OpenXM/src/kan96xx/plugin/mytcpio.c	2003/07/20 07:23:31	1.11
@@ -1,4 +1,4 @@
-/*  $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.10 2003/07/20 07:18:45 takayama Exp $ */
 #include <stdio.h>
 #include <sys/types.h>
 #include <sys/socket.h>
@@ -23,6 +23,7 @@ jmp_buf MyEnv_oxmisc; /* may cause a trouble in Solari
 #endif
 
 #define READBUFSIZE 10000
+#define MAX_LISTEN_QUEUE 3
 static void errorMsg1s(char *s) {
   fprintf(stderr,"%s\n",s);
 }
@@ -73,7 +74,7 @@ socketOpen(char *serverName,int portNumber) {
     return(-1);
   }
 
-  if (listen(s_waiting,1) < 0) {
+  if (listen(s_waiting,MAX_LISTEN_QUEUE) < 0) {
     errorMsg1s("Listen failed");
     return(-1);
   }
@@ -112,8 +113,12 @@ socketAcceptLocal(int 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.");
-    return(-1);
+    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);
+   }
   }
 
   len = sizeof(struct sockaddr);
@@ -141,6 +146,42 @@ socketAcceptLocal(int snum) {
   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.");
+    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) {
   fd_set readfds;
   struct timeval timeout;
@@ -262,6 +303,8 @@ socketConnectWithPass(char *servername,int port,char *
   int m;
   SET_TCPIOERROR;
   fd = socketConnect(servername,port);
+  if ((pass == NULL) && (fd >= 0)) return fd;
+  if ((pass == NULL) && (fd < 0)) return -1;
   if (fd >= 0) {
     m = write(fd,pass,strlen(pass)+1);
     if (m != strlen(pass)+1) {