[BACK]Return to ox_pathfinder.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / util

Diff for /OpenXM/src/util/ox_pathfinder.c between version 1.22 and 1.37

version 1.22, 2004/03/03 08:21:30 version 1.37, 2020/10/03 08:24:14
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.21 2004/03/03 02:31:51 takayama Exp $ */  /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.36 2015/10/13 10:16:53 takayama Exp $ */
 /* Moved from misc-2003/07/cygwin/test.c */  /* Moved from misc-2003/07/cygwin/test.c */
   
 #include <stdio.h>  #include <stdio.h>
Line 7 
Line 7 
 #include <fcntl.h>  #include <fcntl.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <unistd.h>  #include <unistd.h>
   #if  (!defined(__MINGW32__) &&  !defined(__MINGW64__))
 #include <sys/wait.h>  #include <sys/wait.h>
   #else
   #include <_mingw.h>
   #endif
 #include <signal.h>  #include <signal.h>
 #include <ctype.h>  #include <ctype.h>
 #include <time.h>  #include <time.h>
 #include <string.h>  #include <string.h>
 #include "ox_pathfinder.h"  #include "ox_pathfinder.h"
   
   void *sGC_malloc(int);
   
 int OX_P_stdin = -1;  int OX_P_stdin = -1;
 int OX_P_stdout = -1;  int OX_P_stdout = -1;
 int OX_P_stderr = -1;  int OX_P_stderr = -1;
Line 32  static char *get_oxlog_path();
Line 38  static char *get_oxlog_path();
 static int getFileSize(char *fn);  static int getFileSize(char *fn);
 static void errorPathFinder(char *s);  static void errorPathFinder(char *s);
 static void msgPathFinder(char *s);  static void msgPathFinder(char *s);
   static char *cygname(char *s);
   
   
 static int Verbose_get_home = 0;  static int Verbose_get_home = 0;
 static int Verbose = 1;  static int Verbose = 1;
 static int NoX = 0;  static int NoX = 0;
   static int ErrorVerbose = 1;
   static int EngineLogToStdout = 0;
   
   #define nomemory(a) {fprintf(stderr,"(%p) no more memory.\n",(void *)a);exit(10);}
 #define nomemory(a) {fprintf(stderr,"(%d) no more memory.\n",a);exit(10);}  
 #define mymalloc(a)  sGC_malloc(a)  #define mymalloc(a)  sGC_malloc(a)
   
   static char *cygname(char *s) {
     char *name;
   #if defined(__MSYS__)
     return(s);
   #else
     name = mymalloc(strlen(s)+16);
     strcpy(name,"/cygdrive");
     return(strcat(name,s));
   #endif
   }
   void pathFinderErrorVerbose(int k) {
     static int prev;
     if (k >= 0) {
           prev = ErrorVerbose;
           ErrorVerbose = k;
     }else{
           ErrorVerbose = prev;
     }
   }
 static void errorPathFinder(char *s) {  static void errorPathFinder(char *s) {
   /* Todo; we need to return the error message to the client if it is used    /* Todo; we need to return the error message to the client if it is used
      in ox_shell */       in ox_shell */
   fprintf(stderr,"Error: %s",s);    if (ErrorVerbose) fprintf(stderr,"Error: %s",s);
 }  }
 static void msgPathFinder(char *s) {  static void msgPathFinder(char *s) {
   /* Todo; we need to return the error message to the client if it is used    /* Todo; we need to return the error message to the client if it is used
Line 59  int ox_pathfinderNoX(int f) {
Line 85  int ox_pathfinderNoX(int f) {
   return f;    return f;
 }  }
 int ox_pathfinderVerbose(int f) {  int ox_pathfinderVerbose(int f) {
   extern Verbose_get_home;    extern int Verbose_get_home;
   if (f < 0) return Verbose_get_home;    if (f < 0) return Verbose_get_home;
   Verbose_get_home = f;    Verbose_get_home = f;
   return f;    return f;
Line 112  void *sGC_malloc(int s) { return (void *) malloc(s); }
Line 138  void *sGC_malloc(int s) { return (void *) malloc(s); }
 #define MYFORKCP_SIZE 100  #define MYFORKCP_SIZE 100
 static int Myforkchildren[MYFORKCP_SIZE];  static int Myforkchildren[MYFORKCP_SIZE];
 static int Myforkcp=0;  static int Myforkcp=0;
   #if  (!defined(__MINGW32__)  && !defined(__MINGW64__))
 static void myforkwait() {  static void myforkwait() {
   int status;    int status;
   int pid;    int pid;
Line 161  int oxForkExec(char **argv) {
Line 188  int oxForkExec(char **argv) {
        sigaddset(&sss,SIGINT);         sigaddset(&sss,SIGINT);
        sigprocmask(SIG_BLOCK,&sss,NULL);         sigprocmask(SIG_BLOCK,&sss,NULL);
     }      }
     if (NoX) {      if (NoX && (!EngineLogToStdout)) {
       FILE *null;        FILE *null;
       null = fopen("/dev/null","wb");        null = fopen("/dev/null","wb");
       if (OX_P_stdout >= 0) dup2(OX_P_stdout,1); else dup2(fileno(null),1);        if (OX_P_stdout >= 0) dup2(OX_P_stdout,1); else dup2(fileno(null),1);
Line 206  int oxForkExecBlocked(char **argv) {
Line 233  int oxForkExecBlocked(char **argv) {
        sigaddset(&sss,SIGINT);         sigaddset(&sss,SIGINT);
        sigprocmask(SIG_BLOCK,&sss,NULL);         sigprocmask(SIG_BLOCK,&sss,NULL);
     }      }
     if (NoX) {      if (NoX && (!EngineLogToStdout)) {
       FILE *null;        FILE *null;
       null = fopen("/dev/null","wb");        null = fopen("/dev/null","wb");
       if (OX_P_stdout >= 0) dup2(OX_P_stdout,1); else dup2(fileno(null),1);        if (OX_P_stdout >= 0) dup2(OX_P_stdout,1); else dup2(fileno(null),1);
Line 222  int oxForkExecBlocked(char **argv) {
Line 249  int oxForkExecBlocked(char **argv) {
     exit(3);      exit(3);
   }    }
 }  }
   #else
   static void myforkwait() {
     fprintf(stderr,"ERROR: myforkwait is not implented in mingw\n");
     return;
   }
   int oxForkExec(char **argv) {
     /* cf. Kan/shell.c */
     fprintf(stderr,"ERROR: oxForkExec is not implented in mingw\n");
     return(-1);
   }
   int oxForkExecBlocked(char **argv) {
     fprintf(stderr,"ERROR: oxForkExecBlocked is not implented in mingw\n");
     return(-1);
   }
   #endif
   
 static int getOStypei() {  static int getOStypei() {
   /*    /*
Line 229  static int getOStypei() {
Line 271  static int getOStypei() {
      1  windows-cygwin       1  windows-cygwin
      2  windows-cygwin-on-X       2  windows-cygwin-on-X
      3  windows-native       3  windows-native
        4  windows-msys
        5  windows-msys-on-x
   */    */
   int ostype;    int ostype;
   char *s,*s2,*s3;    char *s,*s2,*s3;
 #if defined(__CYGWIN__)  #if defined(__CYGWIN__) || defined(__MSYS__)
   ostype = 1;    ostype = 1;
 #else  #else
   ostype = 0;    ostype = 0;
 #endif  #endif
   if (ostype == 0) return ostype;    if (ostype == 0) return ostype;
   /* Heuristic method */    /* Heuristic method */
     s = getenv("MSYSTEM");
     if (s != NULL) {
       if (strcmp(s,"MSYS")==0) return(4);
       s = (char *)getenv("WINDOWID");
       if (s != NULL) {
         return 5;  // not tested.
       }
     }
   s = (char *)getenv("WINDOWID");    s = (char *)getenv("WINDOWID");
   if (s != NULL) {    if (s != NULL) {
     return 2;      return 2;
Line 262  char *getOStypes() {
Line 314  char *getOStypes() {
     return("Windows-cygwin-on-X");      return("Windows-cygwin-on-X");
   }else if (ostype == 3) {    }else if (ostype == 3) {
     return("Windows-native");      return("Windows-native");
     }else if (ostype == 4) {
       return("Windows-msys");
     }else if (ostype == 5) {
       return("Windows-msys-on-X");
   }else{    }else{
     return("unix");      return("unix");
   }    }
Line 365  char *getOpenXM_HOME() {
Line 421  char *getOpenXM_HOME() {
   if (getOStypei() != 3) {    if (getOStypei() != 3) {
     p = "/usr/local/OpenXM";      p = "/usr/local/OpenXM";
   }else{    }else{
     p = "/cygdrive/c/usr/local/OpenXM";      p = cygname("/c/usr/local/OpenXM");
   }    }
   if (getFileSize(p) != -1) return addSlash(p);    if (getFileSize(p) != -1) return addSlash(p);
   msg_get_home(1,"OpenXM is not found under /usr/local");    msg_get_home(1,"OpenXM is not found under /usr/local");
   
   if (getOStypei() != 0) {    if (getOStypei() != 0) {
     p = "/cygdrive/c/OpenXM";      p = cygname("/c/OpenXM");
     if (getFileSize(p) != -1) return addSlash(p);      if (getFileSize(p) != -1) return addSlash(p);
     msg_get_home(1,"OpenXM is not found under c:\\");      msg_get_home(1,"OpenXM is not found under c:\\");
   
     p = "/cygdrive/c/OpenXM-win";      p = cygname("/c/OpenXM-win");
     if (getFileSize(p) != -1) return addSlash(p);      if (getFileSize(p) != -1) return addSlash(p);
     msg_get_home(1,"OpenXM-win is not found under c:\\");      msg_get_home(1,"OpenXM-win is not found under c:\\");
   
     p = "/cygdrive/c/Program Files/OpenXM";      p = cygname("/c/Program Files/OpenXM");
     if (getFileSize(p) != -1) return addSlash(p);      if (getFileSize(p) != -1) return addSlash(p);
     msg_get_home(1,"OpenXM is not found under c:\\Program Files");      msg_get_home(1,"OpenXM is not found under c:\\Program Files");
   
     p = "/cygdrive/c/Program Files/OpenXM-win";      p = cygname("/c/Program Files/OpenXM-win");
     if (getFileSize(p) != -1) return addSlash(p);      if (getFileSize(p) != -1) return addSlash(p);
     msg_get_home(1,"OpenXM-win is not found under c:\\Program Files");      msg_get_home(1,"OpenXM-win is not found under c:\\Program Files");
   
Line 560  char *cygwinPathToWinPath(char *s) {
Line 616  char *cygwinPathToWinPath(char *s) {
   }else{    }else{
     strcpy(ans,s);      strcpy(ans,s);
   }    }
   #if defined(__MSYS__)
     pos = (char *)strstr(s,"/c/");
     if (pos == s) {
       strcpy(ans,&(s[1]));
       ans[0] = s[1]; ans[1] = ':'; ans[2] = '\\';
     }else{
       strcpy(ans,s);
     }
   #endif
   
   if (ans[0] == '/') {    if (ans[0] == '/') {
   #if defined(__MSYS__) && defined(__x86_64__)
       strcpy(ans,"C:\\msys64");
   #elif defined(__CYGWIN64__) || (defined(__CYGWIN__) && defined(__x86_64__))
       strcpy(ans,"C:\\cygwin64");
   #else
     strcpy(ans,"C:\\cygwin");      strcpy(ans,"C:\\cygwin");
   #endif
     strcat(ans,s);      strcat(ans,s);
   }    }
   
Line 635  char **getServerEnv(char *oxServer) {
Line 706  char **getServerEnv(char *oxServer) {
     argv[i] = oxlog; i++; argv[i] = NULL;      argv[i] = oxlog; i++; argv[i] = NULL;
     if (!NoX) {      if (!NoX) {
       argv[i] = oxterm ; i++; argv[i] = NULL;        argv[i] = oxterm ; i++; argv[i] = NULL;
       argv[i] = oxtermOpt; i++; argv[i] = NULL;        if (((char *)getenv("OX_XTERM_GEOMETRY")) != NULL) {
       argv[i] = "-e"; i++; argv[i] = NULL;          /* ex. OX_XTERM_GEOMETRY=80x20+0+0 */
           argv[i] = "-geometry"; i++; argv[i] = NULL;
                   argv[i] = (char *) getenv("OX_XTERM_GEOMETRY"); i++; argv[i] = NULL;
         }else{
           argv[i] = oxtermOpt; i++; argv[i] = NULL;
         }
             /* dirty hack for buggy international xterm cf. OpenXM FAQ */
         argv[i] = "-xrm"; i++; argv[i] = NULL;
         argv[i] = "XTerm*locale:false"; i++; argv[i] = NULL;
   
           if (((char *)getenv("OX_XTERM_SCROLL")) != NULL) {            if (((char *)getenv("OX_XTERM_SCROLL")) != NULL) {
                   argv[i] = "-sb"; i++; argv[i] = NULL;
                 argv[i] = "-sl"; i++; argv[i] = NULL;                  argv[i] = "-sl"; i++; argv[i] = NULL;
                 argv[i] = (char *) getenv("OX_XTERM_SCROLL"); i++; argv[i] = NULL;                  argv[i] = (char *) getenv("OX_XTERM_SCROLL"); i++; argv[i] = NULL;
           }            }
         argv[i] = "-e"; i++; argv[i] = NULL;
     }      }
     argv[i] = get_ox_path(); i++; argv[i] = NULL;      argv[i] = get_ox_path(); i++; argv[i] = NULL;
     argv[i] = "-ox"; i++; argv[i] = NULL;      argv[i] = "-ox"; i++; argv[i] = NULL;
     argv[i] = oxServer; i++; argv[i] = NULL;      argv[i] = oxServer; i++; argv[i] = NULL;
   }else{    }else if ((ostype == 1) || (ostype == 3)) {  // cygwin or windows-native
     if (!NoX) {      if (!NoX) {
       if (getFileSize("/cygdrive/c/winnt/system32/cmd.exe") >= 0) {        if (getFileSize("/cygdrive/c/winnt/system32/cmd.exe") >= 0) {
         oxterm = "/cygdrive/c/winnt/system32/cmd.exe /c start /min ";          oxterm = "/cygdrive/c/winnt/system32/cmd.exe /c start /min ";
Line 658  char **getServerEnv(char *oxServer) {
Line 740  char **getServerEnv(char *oxServer) {
         NoX = 1;          NoX = 1;
       }        }
     }      }
       printf("oxterm=%s\n",oxterm); fflush(NULL);
     oxlog = " ";      oxlog = " ";
     if (!NoX) {      if (!NoX) {
       argv[i] = "/c"; i++; argv[i] = NULL;        argv[i] = "/c"; i++; argv[i] = NULL;
Line 667  char **getServerEnv(char *oxServer) {
Line 750  char **getServerEnv(char *oxServer) {
     argv[i] = cygwinPathToWinPath(get_ox_path()); i++; argv[i] = NULL;      argv[i] = cygwinPathToWinPath(get_ox_path()); i++; argv[i] = NULL;
     argv[i] = "-ox"; i++; argv[i] = NULL;      argv[i] = "-ox"; i++; argv[i] = NULL;
     argv[i] = oxServer; i++; argv[i] = NULL;      argv[i] = oxServer; i++; argv[i] = NULL;
     }else {
       /* msys with mintty*/
       if (!NoX) {
         oxterm = "/usr/bin/mintty";
       }
       if (!NoX) {
         argv[i] = oxterm ; i++; argv[i] = NULL;
         argv[i] = "--exec"; i++; argv[i] = NULL;
       }
       argv[i] = get_ox_path(); i++; argv[i] = NULL;
       argv[i] = "-ox"; i++; argv[i] = NULL;
       argv[i] = oxServer; i++; argv[i] = NULL;
   }    }
   
   
   aaa = (char **) mymalloc(sizeof(char*)*(i+1));    aaa = (char **) mymalloc(sizeof(char*)*(i+1));
   if (aaa == NULL) nomemory(0);    if (aaa == NULL) nomemory(0);
   msg_get_home(2,"--------- Result --------------");    msg_get_home(2,"--------- Result --------------");
Line 1000  char *getCommandPath(char *cmdname)
Line 1096  char *getCommandPath(char *cmdname)
     if (getFileSize(cmdname) >= 0) { /* Todo: isExecutableFile() */      if (getFileSize(cmdname) >= 0) { /* Todo: isExecutableFile() */
     }else{      }else{
       msg = (char *)mymalloc(strlen(cmdname)+30);        msg = (char *)mymalloc(strlen(cmdname)+30);
       sprintf(msg,"getCommandPath: %s is not found.");        sprintf(msg,"getCommandPath: %s is not found.",cmdname);
       errorPathFinder(msg);        errorPathFinder(msg);
       return NULL;        return NULL;
     }      }
Line 1112  int oxDeleteFile(char *fname) {
Line 1208  int oxDeleteFile(char *fname) {
 /* This function just kills processes, so if there is a process which  /* This function just kills processes, so if there is a process which
    uses ox protocol, it is not relevant to use this functions.     uses ox protocol, it is not relevant to use this functions.
 */  */
   #if  (!defined(__MINGW32__) &&  !defined(__MINGW64__))
 int oxKillAll(void) {  int oxKillAll(void) {
   int i;    int i;
   int pid;    int pid;
Line 1126  int oxKillAll(void) {
Line 1223  int oxKillAll(void) {
   Myforkcp = 0;    Myforkcp = 0;
   return(0);    return(0);
 }  }
   #else
   int oxKillAll(void) {
     fprintf(stderr,"ERROR: oxKillAll is not implented in mingw\n");
     return(-1);
   }
   #endif
 void ox_pathfinder_quiet(void) {  void ox_pathfinder_quiet(void) {
   Verbose_get_home = 0;    Verbose_get_home = 0;
   Verbose = 0;    Verbose = 0;
Line 1149  char *oxTermWhich_unix(int *typep) {
Line 1251  char *oxTermWhich_unix(int *typep) {
   
   return NULL;    return NULL;
 }  }
   
   int oxpSendStringAsFile(char *user,char *hostname, char *filename, char *str)
   {
     FILE *fp;
     int i;
     char *comm;
     char *argv[10];
     mode_t oumask;
     oumask = umask((mode_t) (64-1));
     /* 077=111 111 */
     fp = fopen(filename,"w");
     umask(oumask);
     if (fp == NULL) {
           return -1;
     }
     for (i=0; i <strlen(str); i++) {
           fputc(str[i],fp);
     }
     fclose(fp);
     if (strcmp(hostname,"localhost") == 0) return 0;
     comm = (char *)malloc(strlen(user)+strlen(hostname)+strlen(filename)*2+1024);
     if (comm == NULL) return -2;
   
     argv[0] = getCommandPath("scp");
     if (argv[0] == NULL) return -3;
     argv[1] = filename;
     comm = (char *)malloc(strlen(user)+strlen(hostname)+strlen(filename)+256);
     sprintf(comm,"%s@%s:%s",user,hostname,filename);
     argv[2] = comm;
     argv[3] = NULL;
     return oxForkExec(argv);
   }
   
   char *oxpReadOneTimePasswordFromFile(char *filename) {
   }
   
   int ox_pathfinderEngineLogToStdout(int state) {
     EngineLogToStdout = state;
   }
Legend:
Removed from v.1.22  
changed lines
  Added in v.1.37
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>