version 1.27, 2004/08/12 12:11:41 |
version 1.37, 2020/10/03 08:24:14 |
|
|
/* $OpenXM: OpenXM/src/util/ox_pathfinder.c,v 1.26 2004/03/05 06:26:52 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> |
|
|
#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 656 char **getServerEnv(char *oxServer) { |
|
Line 727 char **getServerEnv(char *oxServer) { |
|
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 669 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 678 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 1011 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 1123 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 1137 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 1195 int oxpSendStringAsFile(char *user,char *hostname, cha |
|
Line 1286 int oxpSendStringAsFile(char *user,char *hostname, cha |
|
|
|
char *oxpReadOneTimePasswordFromFile(char *filename) { |
char *oxpReadOneTimePasswordFromFile(char *filename) { |
} |
} |
|
|
|
int ox_pathfinderEngineLogToStdout(int state) { |
|
EngineLogToStdout = state; |
|
} |