| 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; |