version 1.73, 2015/08/04 06:20:45 |
version 1.79, 2017/08/30 09:40:30 |
|
|
* 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_asir.c,v 1.72 2014/05/09 19:35:51 ohara Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/io/ox_asir.c,v 1.78 2016/08/24 08:21:03 ohara Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
|
|
#include "version.h" |
#include "version.h" |
|
|
char *find_asirrc(); |
char *find_asirrc(); |
void ox_usr1_handler(); |
|
int asir_ox_init(); |
int asir_ox_init(); |
|
|
/* environement is defined in libpari.a */ |
/* environement is defined in libpari.a */ |
Line 163 void ox_main(int argc,char **argv) { |
|
Line 162 void ox_main(int argc,char **argv) { |
|
ox_send_sync(0); |
ox_send_sync(0); |
} |
} |
while ( 1 ) { |
while ( 1 ) { |
extern int recv_intr; |
|
|
|
serial = ox_recv(0,&id,&obj); |
serial = ox_recv(0,&id,&obj); |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
if ( recv_intr ) { |
check_intr(); |
if ( recv_intr == 1 ) { |
|
recv_intr = 0; |
|
int_handler(SIGINT); |
|
} else { |
|
recv_intr = 0; |
|
ox_usr1_handler(0); |
|
} |
|
} |
|
#endif |
#endif |
if ( do_message ) |
if ( do_message ) |
fprintf(stderr,"#%d Got %s",serial,name_of_id(id)); |
fprintf(stderr,"#%d Got %s",serial,name_of_id(id)); |
Line 948 void ox_asir_init(int argc,char **argv,char *servernam |
|
Line 937 void ox_asir_init(int argc,char **argv,char *servernam |
|
extern char displayname[]; |
extern char displayname[]; |
static ox_asir_initialized = 0; |
static ox_asir_initialized = 0; |
int do_server_sav; |
int do_server_sav; |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) |
int tmp; |
int tmp; |
#endif |
#endif |
|
|
GC_init(); |
GC_init(); |
#if !defined(VISUAL) && !defined(MPI) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(MPI) |
do_server_in_X11 = 1; /* XXX */ |
do_server_in_X11 = 1; /* XXX */ |
#endif |
#endif |
asir_save_handler(); |
asir_save_handler(); |
Line 984 void ox_asir_init(int argc,char **argv,char *servernam |
|
Line 973 void ox_asir_init(int argc,char **argv,char *servernam |
|
sysf_init(); |
sysf_init(); |
parif_init(); |
parif_init(); |
order_init(); |
order_init(); |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
init_socket(); |
init_socket(); |
#endif |
#endif |
#if defined(UINIT) |
#if defined(UINIT) |
Line 1031 void ox_io_init() { |
|
Line 1020 void ox_io_init() { |
|
|
|
I_am_server = 1; |
I_am_server = 1; |
endian_init(); |
endian_init(); |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
if ( !ox_sock_id ) |
if ( !ox_sock_id ) |
exit(0); |
exit(0); |
iofp[0].in = WSIO_open(ox_sock_id,"r"); |
iofp[0].in = WSIO_open(ox_sock_id,"r"); |
Line 1044 void ox_io_init() { |
|
Line 1033 void ox_io_init() { |
|
setbuffer(iofp[0].in,(char *)malloc(LBUFSIZ),LBUFSIZ); |
setbuffer(iofp[0].in,(char *)malloc(LBUFSIZ),LBUFSIZ); |
setbuffer(iofp[0].out,(char *)malloc(LBUFSIZ),LBUFSIZ); |
setbuffer(iofp[0].out,(char *)malloc(LBUFSIZ),LBUFSIZ); |
#endif |
#endif |
signal(SIGUSR1,ox_usr1_handler); |
set_signal(SIGUSR1,ox_usr1_handler); |
#endif |
#endif |
asir_OperandStackSize = BUFSIZ; |
asir_OperandStackSize = BUFSIZ; |
asir_OperandStack = (Obj *)CALLOC(asir_OperandStackSize,sizeof(Obj)); |
asir_OperandStack = (Obj *)CALLOC(asir_OperandStackSize,sizeof(Obj)); |
Line 1061 void ox_io_init() { |
|
Line 1050 void ox_io_init() { |
|
register_server(0,0,0,-1); |
register_server(0,0,0,-1); |
} |
} |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) |
/* |
/* |
* Library mode functions |
* Library mode functions |
*/ |
*/ |
Line 1230 int asir_ox_init(int byteorder) |
|
Line 1219 int asir_ox_init(int byteorder) |
|
static ox_asir_initialized = 0; |
static ox_asir_initialized = 0; |
|
|
GC_init(); |
GC_init(); |
#if !defined(VISUAL) && !defined(MPI) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(MPI) |
do_server_in_X11 = 0; /* XXX */ |
do_server_in_X11 = 0; /* XXX */ |
#endif |
#endif |
asir_save_handler(); |
asir_save_handler(); |
Line 1255 int asir_ox_init(int byteorder) |
|
Line 1244 int asir_ox_init(int byteorder) |
|
pf_init(); |
pf_init(); |
sysf_init(); |
sysf_init(); |
parif_init(); |
parif_init(); |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) |
init_socket(); |
init_socket(); |
#endif |
#endif |
#if defined(UINIT) |
#if defined(UINIT) |