[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.14 and 1.32

version 1.14, 2003/12/04 03:17:33 version 1.32, 2015/08/03 20:56:50
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.13 2003/12/03 13:38:39 takayama Exp $ */  /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.31 2010/08/30 04:17:17 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 14 
Line 14 
 #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 35  static void msgPathFinder(char *s);
Line 37  static void msgPathFinder(char *s);
   
   
 static int Verbose_get_home = 0;  static int Verbose_get_home = 0;
   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)
   
   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 62  int ox_pathfinderVerbose(int f) {
Line 75  int ox_pathfinderVerbose(int f) {
   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;
 }  } /* cf. ox_pathfinder_quiet() */
   
 /* test main   */  /* test main   */
 /*  /*
Line 117  static void myforkwait() {
Line 130  static void myforkwait() {
   int i,j;    int i,j;
   /* signal(SIGCHLD,SIG_IGN);  It is not allowed in posix */    /* signal(SIGCHLD,SIG_IGN);  It is not allowed in posix */
   pid = wait(&status);    pid = wait(&status);
   fprintf(stderr,"Child process %d is exiting.\n",pid);    if (Verbose) fprintf(stderr,"Child process %d is exiting.\n",pid);
   if (pid < 0) {    if (pid < 0) {
     perror("wait");      perror("wait");
   }    }
Line 141  int oxForkExec(char **argv) {
Line 154  int oxForkExec(char **argv) {
     fprintf(stderr,"Cannot fork and exec.\n"); return -1;      fprintf(stderr,"Cannot fork and exec.\n"); return -1;
   }    }
   if ((pid = fork()) > 0) {    if ((pid = fork()) > 0) {
       oxResetRedirect();
     if (m&2) {      if (m&2) {
       /* Do not call singal to turn around a trouble on cygwin. BUG. */        /* Do not call singal to turn around a trouble on cygwin. BUG. */
     }else{      }else{
Line 159  int oxForkExec(char **argv) {
Line 173  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 185  int oxForkExecBlocked(char **argv) {
Line 199  int oxForkExecBlocked(char **argv) {
     fprintf(stderr,"Cannot fork and exec.\n"); return -1;      fprintf(stderr,"Cannot fork and exec.\n"); return -1;
   }    }
   if ((pid = fork()) > 0) {    if ((pid = fork()) > 0) {
       oxResetRedirect();
     Myforkchildren[Myforkcp++] = pid;      Myforkchildren[Myforkcp++] = pid;
     if (Myforkcp >= MYFORKCP_SIZE-1) {      if (Myforkcp >= MYFORKCP_SIZE-1) {
       fprintf(stderr,"Child process table is full.\n");        fprintf(stderr,"Child process table is full.\n");
Line 193  int oxForkExecBlocked(char **argv) {
Line 208  int oxForkExecBlocked(char **argv) {
     if (waitpid(pid,&status,0) < 0) {  /* blocked */      if (waitpid(pid,&status,0) < 0) {  /* blocked */
       perror("waitpid");        perror("waitpid");
     }      }
       Myforkcp--;
     return status;      return status;
   }else{    }else{
     /* close the specified files */      /* close the specified files */
Line 202  int oxForkExecBlocked(char **argv) {
Line 218  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 558  char *cygwinPathToWinPath(char *s) {
Line 574  char *cygwinPathToWinPath(char *s) {
   }    }
   
   if (ans[0] == '/') {    if (ans[0] == '/') {
   #if defined(__CYGWIN64__)
       strcpy(ans,"C:\\cygwin64");
   #else
     strcpy(ans,"C:\\cygwin");      strcpy(ans,"C:\\cygwin");
   #endif
     strcat(ans,s);      strcat(ans,s);
   }    }
   
Line 573  char **getServerEnv(char *oxServer) {
Line 593  char **getServerEnv(char *oxServer) {
   int ostype;    int ostype;
   char *p;    char *p;
   char *oxhome;    char *oxhome;
   char *xterm;    char *oxterm;
     int  oxtermType=0;
     char *oxtermOpt;
   char *oxlog;    char *oxlog;
   char *load_sm1_path;    char *load_sm1_path;
   char *load_k0_path;    char *load_k0_path;
Line 616  char **getServerEnv(char *oxServer) {
Line 638  char **getServerEnv(char *oxServer) {
   strcpy(oxServer,p);    strcpy(oxServer,p);
   
   if ((ostype == 0) || (ostype == 2)) {    if ((ostype == 0) || (ostype == 2)) {
     if (!NoX) {  
       xterm = "/usr/X11R6/bin/xterm";  
       if (getFileSize(xterm) == -1) {  
         msg_get_home(2,"xterm is not found. NoX is automatically set.");  
         NoX = 1;  
       }  
     }  
     oxlog = get_oxlog_path();      oxlog = get_oxlog_path();
     xterm = "/usr/X11R6/bin/xterm -icon -e ";          if (!NoX) {
             oxterm = oxTermWhich_unix(&oxtermType);
             if (oxterm == NULL) {
           msg_get_home(2,"oxterm, rxvt, xterm is not found. NoX is automatically set.");
           NoX = 1;
             }
             if (oxtermType == T_XTERM) oxtermOpt = "-icon";
             else  oxtermOpt = "-iconic";
           }
     argv[i] = oxlog; i++; argv[i] = NULL;      argv[i] = oxlog; i++; argv[i] = NULL;
     if (!NoX) {      if (!NoX) {
       argv[i] = "/usr/X11R6/bin/xterm"; i++; argv[i] = NULL;        argv[i] = oxterm ; i++; argv[i] = NULL;
       argv[i] = "-icon"; i++; argv[i] = NULL;        if (((char *)getenv("OX_XTERM_GEOMETRY")) != 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) {
                   argv[i] = "-sb"; i++; argv[i] = NULL;
                   argv[i] = "-sl"; i++; argv[i] = NULL;
                   argv[i] = (char *) getenv("OX_XTERM_SCROLL"); i++; argv[i] = NULL;
             }
       argv[i] = "-e"; 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;
Line 637  char **getServerEnv(char *oxServer) {
Line 675  char **getServerEnv(char *oxServer) {
   }else{    }else{
     if (!NoX) {      if (!NoX) {
       if (getFileSize("/cygdrive/c/winnt/system32/cmd.exe") >= 0) {        if (getFileSize("/cygdrive/c/winnt/system32/cmd.exe") >= 0) {
         xterm = "/cygdrive/c/winnt/system32/cmd.exe /c start /min ";          oxterm = "/cygdrive/c/winnt/system32/cmd.exe /c start /min ";
         argv[i] = "/cygdrive/c/winnt/system32/cmd.exe"; i++; argv[i] = NULL;          argv[i] = "/cygdrive/c/winnt/system32/cmd.exe"; i++; argv[i] = NULL;
       }else if (getFileSize("/cygdrive/c/windows/system32/cmd.exe") >= 0) {        }else if (getFileSize("/cygdrive/c/windows/system32/cmd.exe") >= 0) {
         xterm = "/cygdrive/c/windows/system32/cmd.exe  /c start /min ";          oxterm = "/cygdrive/c/windows/system32/cmd.exe  /c start /min ";
         argv[i] = "/cygdrive/c/windows/system32/cmd.exe"; i++; argv[i] = NULL;          argv[i] = "/cygdrive/c/windows/system32/cmd.exe"; i++; argv[i] = NULL;
       }else{        }else{
         msg_get_home(2,"cmd.exe is not found. NoX is automatically set.");          msg_get_home(2,"cmd.exe is not found. NoX is automatically set.");
Line 989  char *getCommandPath(char *cmdname)
Line 1027  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 1084  char *oxEvalEnvVar(char *s) {
Line 1122  char *oxEvalEnvVar(char *s) {
 }  }
   
 void oxResetRedirect(void) {  void oxResetRedirect(void) {
     if (OX_P_stdin >= 0) close(OX_P_stdin);
     if (OX_P_stdout >= 0) close(OX_P_stdout);
     if (OX_P_stderr >= 0) close(OX_P_stderr);
   OX_P_stdin = OX_P_stdout = OX_P_stderr = -1;    OX_P_stdin = OX_P_stdout = OX_P_stderr = -1;
 }  }
   
Line 1094  int oxDeleteFile(char *fname) {
Line 1135  int oxDeleteFile(char *fname) {
     return(-1);      return(-1);
   }    }
 }  }
   
   /* This function just kills processes, so if there is a process which
      uses ox protocol, it is not relevant to use this functions.
   */
   int oxKillAll(void) {
     int i;
     int pid;
     int status;
     for (i=0; i<Myforkcp; i++) {
       pid = Myforkchildren[i];
           if (Verbose) fprintf(stderr,"Sending signal to %d ... ",pid);
       kill(pid,SIGKILL);
           waitpid(pid,&status,0);
           if (Verbose) fprintf(stderr,"Gone.\n");
     }
     Myforkcp = 0;
     return(0);
   }
   
   void ox_pathfinder_quiet(void) {
     Verbose_get_home = 0;
     Verbose = 0;
   }
   
   char *oxTermWhich_unix(int *typep) {
     char *s;
     char *p;
     p = (char *) getenv("PATH");
     s = oxWhich("oxterm",p); *typep = T_OXTERM;
     if (s != NULL) return s;
   
   /*  skip the search of rxvt  (temporary)
     s = oxWhich("rxvt",p); *typep = T_RXVT;
     if (s != NULL) return s;
   */
   
     s = oxWhich("xterm",p); *typep = T_XTERM;
     if (s != NULL) return s;
   
     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.14  
changed lines
  Added in v.1.32
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>