version 1.9, 2000/12/03 16:15:03 |
version 1.10, 2000/12/14 01:41:03 |
|
|
/* -*- mode: C; coding: euc-japan -*- */ |
/* -*- mode: C; coding: euc-japan -*- */ |
/* $OpenXM: OpenXM/src/ox_toolkit/oxf.c,v 1.8 2000/12/01 07:27:03 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/ox_toolkit/oxf.c,v 1.9 2000/12/03 16:15:03 ohara Exp $ */ |
|
|
/* |
/* |
This module includes functions for sending/receiveng CMO's. |
This module includes functions for sending/receiveng CMO's. |
Line 345 OXFILE *oxf_execute_cmd(OXFILE *oxfp, char *cmd) |
|
Line 345 OXFILE *oxf_execute_cmd(OXFILE *oxfp, char *cmd) |
|
int listened; |
int listened; |
|
|
if ((listened = oxf_listen(&port)) != -1) { |
if ((listened = oxf_listen(&port)) != -1) { |
send_ox_cmo(oxfp, (cmo *)new_cmo_int32(port)); |
cmo_list *args = list_appendl(NULL, list_append(new_cmo_list(), new_cmo_int32(port)), new_cmo_string(cmd), NULL); |
send_ox_cmo(oxfp, (cmo *)new_cmo_string(cmd)); |
send_ox_cmo(oxfp, (cmo *)args); |
send_ox_cmo(oxfp, (cmo *)new_cmo_int32(2)); /* number of arguments */ |
send_ox_command(oxfp, SM_control_spawn_server); |
send_ox_cmo(oxfp, (cmo *)new_cmo_string("oxc_open")); |
|
send_ox_command(oxfp, SM_executeFunction); |
|
return oxf_connect_passive(listened); |
return oxf_connect_passive(listened); |
} |
} |
return NULL; |
return NULL; |