version 1.9, 1999/12/14 09:31:55 |
version 1.11, 2000/01/20 15:32:21 |
|
|
/* -*- mode: C; coding: euc-japan -*- */ |
/* -*- mode: C; coding: euc-japan -*- */ |
/* $OpenXM: OpenXM/src/ox_math/math2ox.c,v 1.8 1999/11/29 12:09:57 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/ox_math/math2ox.c,v 1.10 1999/12/22 11:27:59 ohara Exp $ */ |
|
|
|
/* |
|
Some commnets is written in Japanese by the EUC-JP coded |
|
character set. |
|
*/ |
|
|
#include <sys/types.h> |
#include <sys/types.h> |
#include <sys/stat.h> |
#include <sys/stat.h> |
#include <fcntl.h> |
#include <fcntl.h> |
Line 78 int OX_parse(char *s) |
|
Line 83 int OX_parse(char *s) |
|
cmo *m; |
cmo *m; |
symbol *symp; |
symbol *symp; |
int len = strlen(s); |
int len = strlen(s); |
setmode_mygetc(s, len); |
init_parser(s); |
|
|
if(s != NULL && len > 0 && (m = parse()) != NULL) { |
if(s != NULL && len > 0 && (m = parse()) != NULL) { |
if (m->tag == OX_DATA) { |
if (m->tag == OX_DATA) { |
Line 107 int OX_start(char* s) |
|
Line 112 int OX_start(char* s) |
|
return -1; |
return -1; |
} |
} |
|
|
|
int OX_start_remote_ssh(char *s, char *host) |
|
{ |
|
if (s != NULL && s[0] != '\0') { |
|
oxprog = s; |
|
} |
|
if (host != NULL || host[0] == '\0') { |
|
host = "localhost"; |
|
} |
|
if (++max_process < len_svs) { |
|
sv = ox_start_remote_with_ssh(oxprog, host); |
|
fprintf(stderr, "open (%s)\n", host); |
|
svs[max_process] = sv; |
|
return max_process; |
|
} |
|
return -1; |
|
} |
|
|
int OX_start_insecure(char *host, int portCtl, int portDat) |
int OX_start_insecure(char *host, int portCtl, int portDat) |
{ |
{ |
if (host != NULL || host[0] == '\0') { |
if (host != NULL || host[0] == '\0') { |
Line 144 int main(int argc, char *argv[]) |
|
Line 166 int main(int argc, char *argv[]) |
|
{ |
{ |
/* 構文解析器の設定 */ |
/* 構文解析器の設定 */ |
setflag_parse(PFLAG_ADDREV); |
setflag_parse(PFLAG_ADDREV); |
setgetc(mygetc); |
|
|
|
len_svs = 20; |
len_svs = 20; |
svs = (ox_file_t *)malloc(sizeof(ox_file_t)*len_svs); |
svs = (ox_file_t *)malloc(sizeof(ox_file_t)*len_svs); |
|
|