[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.7 and 1.11

version 1.7, 2003/09/08 02:43:47 version 1.11, 2003/12/03 03:21:16
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.6 2003/07/22 07:39:57 takayama Exp $ */  /* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.10 2003/12/01 03:15:37 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 26  static char *get_ox_path();
Line 26  static char *get_ox_path();
 static char *get_oxc_path();  static char *get_oxc_path();
 static char *get_oxlog_path();  static char *get_oxlog_path();
 static int getFileSize(char *fn);  static int getFileSize(char *fn);
   static void errorPathFinder(char *s);
   static void msgPathFinder(char *s);
   
   
   
 static int Verbose_get_home = 0;  static int Verbose_get_home = 0;
 static int NoX = 0;  static int NoX = 0;
   
Line 36  static int NoX = 0;
Line 37  static int NoX = 0;
 #define nomemory(a) {fprintf(stderr,"(%d) no more memory.\n",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 void errorPathFinder(char *s) {
     /* Todo; we need to return the error message to the client if it is used
        in ox_shell */
     fprintf(stderr,"Error: %s",s);
   }
   static void msgPathFinder(char *s) {
     /* Todo; we need to return the error message to the client if it is used
        in ox_shell */
     fprintf(stderr,"Log(ox_pathfinder): %s",s);
   }
   
 int ox_pathfinderNoX(int f) {  int ox_pathfinderNoX(int f) {
   if (f < 0) return NoX;    if (f < 0) return NoX;
   NoX = f;    NoX = f;
Line 848  char *generateTMPfileName(char *seed) {
Line 860  char *generateTMPfileName(char *seed) {
   return NULL;    return NULL;
 }  }
   
   #define MAXTMP2  0xffffff
   char *generateTMPfileName2(char *seed,char *ext,int usetmp,int win){
     char *tmp;
     char *fname;
     char *tt;
     int num;
     static int prevnum=0;
     int i;
     int clean = 0;
     if (usetmp) {
           tmp = getenv("TMP");
           if (tmp == NULL) {
             tmp = getenv("TEMP");
           }
           if ((tmp == NULL) && (strcmp(getOStypes(),"Windows-native") != 0)) {
             tmp = "/tmp";
           }
           tmp = winPathToCygwinPath(tmp);
     }else{
           tmp = NULL;
     }
     if (tmp != NULL) {
       fname = (char *)mymalloc(strlen(tmp)+strlen(seed)+40);
       if (fname == NULL) nomemory(fname);
     }else{
       fname = (char *)mymalloc(strlen(seed)+40);
       if (fname == NULL) nomemory(fname);
     }
     for (num=prevnum+1; num <MAXTMP2; num++) {
       if (tmp != NULL) {
         sprintf(fname,"%s/%s-tmp-%d.%s",tmp,seed,num,ext);
       }else{
         sprintf(fname,"%s-tmp-%d.%s",seed,num,ext);
       }
       if (getFileSize(fname) < 0) {
         prevnum = num;
             if (win) fname= cygwinPathToWinPath(fname);
         return fname;
       } else {
         if ((num > MAXTMP2-10) && (!clean)) {
           /* Clean the old garbages. */
           for (i=0; i<MAXTMP2; i++) {
             if (tmp != NULL) {
               sprintf(fname,"%s/%s-tmp-%d.%s",tmp,seed,i,ext);
             }else{
               sprintf(fname,"%s-tmp-%d.%s",seed,i,ext);
             }
             {
               struct stat buf;
               int m;
               m = stat(fname,&buf);
               if ((m >= 0) && (buf.st_mtime+120 < time(NULL))) {
                 unlink(fname);
               }
             }
           }
           num = 0; clean=1; prevnum=0;
         }
       }
     }
     return NULL;
   }
   
 char *getCppPath(void) {  char *getCppPath(void) {
   static char *cpp = "/usr/local/bin/cpp";    static char *cpp = "/usr/local/bin/cpp";
Line 877  char *getCppPath(void) {
Line 951  char *getCppPath(void) {
     else return NULL;      else return NULL;
   }    }
 }  }
   
   char *getCommandPath(char *cmdname)
   {
     char *path;
     char *msg;
     char *path2;
     char *ss;
     int i,j;
     /* Use /cygdrive format always. */
     if (cmdname == NULL) return NULL;
     if (strlen(cmdname) < 1) {
           errorPathFinder("getCommandPath: cmdname is an empty string.\n");
           return NULL;
     }
     if (cmdname[0] == '/') {
           if (getFileSize(cmdname) >= 0) { /* Todo: isExecutableFile() */
           }else{
             msg = (char *)mymalloc(strlen(cmdname)+30);
             sprintf(msg,"getCommandPath: %s is not found.");
             errorPathFinder(msg);
             return NULL;
           }
           return cmdname;
     }
   
     path = getOpenXM_HOME();  /* It will return /cygdrive for windows. */
     if (path != NULL) {
           path2 = (char *)mymalloc(strlen(path)+5);
           strcpy(path2,path);
           strcat(path2,"bin");
           ss = oxWhich(cmdname,path2);
       if (ss != NULL) return ss;
     }
   
     path = (char *)getenv("PATH");  /* Todo: it will not give /cygdrive format*/
     ss = oxWhich(cmdname,path);
     if (ss == NULL) {
           errorPathFinder("oxWhich_unix: could not find it in the path string.\n");
     }
     return ss;
   }
   
   char *oxWhich(char *cmdname,char *path) {
     return(oxWhich_unix(cmdname,path));
   }
   
   char *oxWhich_unix(char *cmdname,char *path) {
     char *path2;
     int i,j;
     if (path == NULL) {
           return NULL;
     }
   
     path2 = (char *)mymalloc(strlen(path)+strlen(cmdname)+2);
     for (i=0, j=0; i <= strlen(path); i++) {
           path2[j] = 0;
           if ((path[i] == ':') || (path[i] == 0)) {
             strcat(path2,"/"); strcat(path2,cmdname);
             if (getFileSize(path2) >= 0) { /* Todo: isExecutableFile() */
                   return path2;
             }
             j = 0; path2[j] = 0;
           }else{
             path2[j] = path[i]; j++; path2[j] = 0;
           }
     }
     return NULL;
   }
   
   char *oxEvalEnvVar(char *s) {
     int n, i,j;
     char *es;
     char *news;
     int flag,flag2;
     flag=-1;
     n = strlen(s);
     es = (char *)mymalloc(n+1); es[0] = 0;
     if (es == NULL) nomemory(1);
     for (i=0; i<n; i++) {
       if ((s[i] == '$') && (s[i+1] == '{')) {
         for (j=0; ; j++) {
           if ((s[i+2+j] == 0) || (s[i+2+j] == '}')) {
             flag2 = i+2+j+1;
             break;
           }
           es[j] = s[i+2+j]; es[j+1]=0;
         }
         if (es[0] != 0) { flag=i; break; }
       }
     }
     if (flag >= 0) {
       es = (char *)getenv(es);
       if (es == NULL) es="";
       news = (char *) mymalloc(n+5+strlen(es));
       if (news == NULL) nomemory(1);
       j = 0;
       for (i=0; i<flag; i++) {
         news[j] = s[i]; j++;
       }
       for (i=0; i<strlen(es); i++) {
         news[j] = es[i]; j++;
       }
       for (i=flag2; i<strlen(s); i++) {
         news[j] = s[i]; j++;
       }
       news[j] = 0;
       return(oxEvalEnvVar(news));
     }else{
       return(s);
     }
   }
   
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.11
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>