version 1.18, 2004/03/02 10:34:49 |
version 1.26, 2015/08/14 13:51:55 |
|
|
* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY |
* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* $OpenXM: OpenXM_contrib2/asir2000/io/ox_launch.c,v 1.17 2004/03/02 02:43:55 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/io/ox_launch.c,v 1.25 2015/08/06 10:01:52 fujimoto Exp $ |
*/ |
*/ |
#include <setjmp.h> |
#include <setjmp.h> |
#include <signal.h> |
#include <signal.h> |
|
|
#include "ca.h" |
#include "ca.h" |
#include "com.h" |
#include "com.h" |
#include "ox.h" |
#include "ox.h" |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
#include <stdlib.h> |
#include <stdlib.h> |
#include <windows.h> |
#include <windows.h> |
#include <io.h> |
#include <io.h> |
|
|
#include <unistd.h> |
#include <unistd.h> |
#endif |
#endif |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
HANDLE hIntr,hReset,hKill; |
HANDLE hIntr,hReset,hKill; |
|
extern int _fileinfo; |
#endif |
#endif |
|
|
static void put_log(char *); |
static void put_log(char *); |
static int which_command(char *,char *); |
static int ox_spawn(char *,int,char *,char *); |
static int search_command(char *); |
|
static int ox_spawn(char *,int,char *,int); |
|
static void launch_error(char *); |
static void launch_error(char *); |
static void ox_io_init(int); |
static void ox_io_init(int); |
static void push_one(Obj); |
static void push_one(Obj); |
|
|
fflush(logfile); |
fflush(logfile); |
} |
} |
|
|
#if !defined(VISUAL) |
|
static int which_command(com,file) |
|
char *com,*file; |
|
{ |
|
char *c,*s; |
|
int len; |
|
char dir[BUFSIZ],path[BUFSIZ]; |
|
|
|
for ( s = (char *)getenv("PATH"); s; ) { |
|
c = (char *)index(s,':'); |
|
if ( c ) { |
|
len = c-s; |
|
strncpy(dir,s,len); s = c+1; dir[len] = 0; |
|
} else { |
|
strcpy(dir,s); s = 0; |
|
} |
|
sprintf(path,"%s/%s",dir,com); |
|
if ( search_command(path) ) { |
|
strcpy(file,path); return 1; |
|
} |
|
} |
|
file[0] = 0; return 0; |
|
} |
|
|
|
static int search_command(file) |
|
char *file; |
|
{ |
|
struct stat buf; |
|
|
|
if ( stat(file,&buf) || (buf.st_mode & S_IFDIR) ) |
|
return 0; |
|
if ( access(file,X_OK) ) |
|
return 0; |
|
else |
|
return 1; |
|
} |
|
#endif |
|
|
|
/* |
/* |
argv[1] : host to connect |
argv[1] : host to connect |
argv[2] : if 1, call try_bind_listen and try_accept |
argv[2] : if 1, call try_bind_listen and try_accept |
|
|
argv[5] : server |
argv[5] : server |
argv[6] : display or "0" |
argv[6] : display or "0" |
argv[7] : if exists, it should be "-nolog" |
argv[7] : if exists, it should be "-nolog" |
|
XXX : argv[7] is used to pass the path of engine.exe in Windows. |
*/ |
*/ |
|
|
void launch_main(argc,argv) |
void launch_main(argc,argv) |
int argc; |
int argc; |
char **argv; |
char **argv; |
{ |
{ |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) |
Obj p; |
Obj p; |
char *name; |
char *name; |
char buf[BUFSIZ]; |
char buf[BUFSIZ]; |
|
|
Obj obj; |
Obj obj; |
int cs,ss; |
int cs,ss; |
unsigned int cmd; |
unsigned int cmd; |
int use_unix,accept_client,nolog; |
int use_unix,accept_client; |
char *control_port_str,*server_port_str; |
char *control_port_str,*server_port_str; |
char *rhost,*server,*dname; |
char *rhost,*server,*dname,*nolog; |
char *e,*s; |
char *e,*s; |
|
|
GC_init(); nglob_init(); |
GC_init(); nglob_init(); |
|
|
server_port_str = argv[4]; |
server_port_str = argv[4]; |
server = argv[5]; |
server = argv[5]; |
dname = argv[6]; |
dname = argv[6]; |
nolog = argc > 7 ? 1 : 0; |
nolog = argc > 7 ? argv[7]: 0; |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
init_socket(); |
init_socket(); |
#endif |
#endif |
|
|
signal(SIGINT,SIG_IGN); |
signal(SIGINT,SIG_IGN); |
|
#if defined(SIGHUP) |
signal(SIGHUP,SIG_IGN); |
signal(SIGHUP,SIG_IGN); |
|
#endif |
#if defined(SIGUSR1) |
#if defined(SIGUSR1) |
signal(SIGUSR1,SIG_IGN); |
signal(SIGUSR1,SIG_IGN); |
#endif |
#endif |
|
|
} |
} |
} |
} |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
static void do_cmd(cmd) |
static void do_cmd(cmd) |
int cmd; |
int cmd; |
{ |
{ |
Line 297 static int ox_spawn(prog,bs,dname,nolog) |
|
Line 261 static int ox_spawn(prog,bs,dname,nolog) |
|
char *prog; |
char *prog; |
int bs; |
int bs; |
char *dname; |
char *dname; |
int nolog; |
char *nolog; |
{ |
{ |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
char *av[BUFSIZ]; |
char *av[BUFSIZ]; |
char sock_id[BUFSIZ],ox_intr[BUFSIZ],ox_reset[BUFSIZ],ox_kill[BUFSIZ]; |
char sock_id[BUFSIZ],ox_intr[BUFSIZ],ox_reset[BUFSIZ],ox_kill[BUFSIZ]; |
char AsirExe[BUFSIZ]; |
char AsirExe[BUFSIZ]; |
|
|
DuplicateHandle(GetCurrentProcess(),(HANDLE)bs, |
DuplicateHandle(GetCurrentProcess(),(HANDLE)bs, |
GetCurrentProcess(),(HANDLE *)&newbs, |
GetCurrentProcess(),(HANDLE *)&newbs, |
0,TRUE,DUPLICATE_SAME_ACCESS); |
0,TRUE,DUPLICATE_SAME_ACCESS); |
close(bs); |
closesocket(bs); |
bs = newbs; |
bs = newbs; |
|
|
mypid = GetCurrentProcessId(); |
mypid = GetCurrentProcessId(); |
|
|
av[4] = ox_reset; |
av[4] = ox_reset; |
av[5] = ox_kill; |
av[5] = ox_kill; |
av[6] = NULL; |
av[6] = NULL; |
Pget_rootdir(&rootdir); |
if ( nolog ) { |
sprintf(AsirExe,"%s\\bin\\engine.exe",BDY(rootdir)); |
sprintf(AsirExe,"\"%s\"",nolog); |
|
strcpy(AsirExe,nolog); |
|
} else { |
|
Pget_rootdir(&rootdir); |
|
sprintf(AsirExe,"%s\\bin\\engine.exe",BDY(rootdir)); |
|
} |
|
#if _MSC_VER < 1400 |
_fileinfo = 1; |
_fileinfo = 1; |
|
#endif |
hProc = _spawnv(_P_NOWAIT,AsirExe,av); |
hProc = _spawnv(_P_NOWAIT,AsirExe,av); |
return (int)hProc; |
return (int)hProc; |
#else /* VISUAL */ |
#else /* VISUAL */ |
|
|
#endif |
#endif |
} |
} |
if ( !nolog && !strcmp(dname,"1" ) ) /* XXX: for ssh */ |
if ( !nolog && !strcmp(dname,"1" ) ) /* XXX: for ssh */ |
execl(prog,prog,0); |
execl(prog,prog,(char *)0); |
else if ( nolog || !strcmp(dname,"0") ) { |
else if ( nolog || !strcmp(dname,"0") ) { |
FILE *null; |
FILE *null; |
|
|
|
|
if ( !strcmp(dname,"1") ) { |
if ( !strcmp(dname,"1") ) { |
/* XXX */ |
/* XXX */ |
putenv("DISPLAY="); |
putenv("DISPLAY="); |
execl(prog,prog,0); |
execl(prog,prog,(char *)0); |
} else if ( strcmp(dname,"0") ) |
} else if ( strcmp(dname,"0") ) |
execl(prog,prog,"-display",dname,0); |
execl(prog,prog,"-display",dname,(char *)0); |
else { |
else { |
putenv("DISPLAY="); |
putenv("DISPLAY="); |
execl(prog,prog,0); |
execl(prog,prog,(char *)0); |
} |
} |
} else |
} else |
execl(prog,prog,"-display",dname,0); |
execl(prog,prog,"-display",dname,(char *)0); |
/* On failure */ |
/* On failure */ |
errcode = 2; |
errcode = 2; |
write(4,&errcode,1); |
write(4,&errcode,1); |