Annotation of OpenXM/src/ox_toolkit/ox.h, Revision 1.2
1.1 ohara 1: /* -*- mode: C; coding: euc-japan -*- */
1.2 ! ohara 2: /* $OpenXM: OpenXM/src/ox_toolkit/ox.h,v 1.1 1999/12/09 22:44:56 ohara Exp $ */
1.1 ohara 3:
4: #ifndef _OX_H_
5:
6: #define _OX_H_
7:
8: #include <gmp.h>
9: #include "oxtag.h"
10:
11: /*
12: 関数の名前付け規約(その2)
13: (1) receive_cmo 関数はCMOタグとデータ本体を受信する. この関数は CMOタグの
14: 値が事前に分からないときに使用する. 返り値として、cmo へのポインタを返す。
15: (2) receive_cmo_XXX 関数は, CMOタグを親の関数で受信してから呼び出される関
16: 数で、データ本体のみを受信し、cmo_XXX へのポインタを返す。しかも、
17: 関数内部で new_cmo_XXX 関数を呼び出す。
18: (3) send_cmo 関数はCMOタグとデータ本体を送信する.
19: (4) send_cmo_XXX 関数はCMOタグを親の関数で送信してから呼び出される関数で、
20: データ本体のみを送信する.
21:
22: ----
23: (5) receive_ox_XXX 関数は存在しない(作らない). receive_cmo を利用する.
24: (6) send_ox_XXX 関数は OX タグを含めて送信する.
25: (7) ox_XXX 関数は一連の送受信を含むより抽象的な操作を表現する.
26: ox_XXX 関数は、第一引数として、ox_file_t型の変数 sv をとる.
27:
28: (8) YYY_cmo 関数と YYY_cmo_XXX 関数の関係は次の通り:
29: まず YYY_cmo 関数で cmo のタグを処理し、タグを除いた残りの部分を
30: YYY_cmo_XXX 関数が処理する。cmo の内部に cmo_ZZZ へのポインタが
31: あるときには、その種類によらずに YYY_cmo 関数を呼び出す
32: */
33:
34: #define DEFAULT_LOGFILE "/tmp/result"
35:
36: /* Open Xm File Descripter */
37: typedef int oxfd;
38:
39: #if 0
40: /* そのうちこちらに移行したい... */
41: typedef struct {
42: int fd_read;
43: int fd_write;
44: int byteorder;
45: } oxfile;
46: typedef oxfile *oxfd;
47: #endif
48:
49: /* サーバーとの通信路に用いるファイルディスクリプタのペア. */
50: typedef struct {
51: oxfd stream;
52: oxfd control;
53: } __ox_file_struct;
54:
55: typedef __ox_file_struct *ox_file_t;
56:
57: /*
58: 警告:
59: cmo_list 型のリストには破壊的な代入をしてはいけない.
60: cmo_list の各メンバに直接アクセスしてはいけない.
61: メソッド(..._cmo_list 関数)を用いること.
62: */
63:
64: /* ここからは新しい定義 */
65: typedef struct {
66: int tag;
67: } cmo;
68:
69: typedef cmo cmo_null;
70: typedef cmo cmo_zero;
71: typedef cmo cmo_dms_generic;
72:
73: typedef struct {
74: int tag;
75: int i;
76: } cmo_int32;
77:
78: typedef struct {
79: int tag;
80: int size;
81: char *body;
82: } cmo_datum;
83:
84: typedef struct {
85: int tag;
86: char *s;
87: } cmo_string;
88:
89: typedef struct {
90: int tag;
91: cmo *ob;
92: } cmo_mathcap;
93:
94: typedef cmo_mathcap cmo_error2;
95: typedef cmo_mathcap cmo_ring_by_name;
96: typedef cmo_mathcap cmo_indeterminate;
97:
98: typedef struct cell {
99: struct cell *next;
100: cmo *cmo;
101: } cell;
102:
103: typedef struct {
104: int tag;
105: int length; /* リストの長さ(必要??) */
106: cell head[1];
107: } cmo_list;
108:
109:
110: typedef struct {
111: int tag;
112: int length;
113: int *exps;
114: cmo *coef;
115: } cmo_monomial32;
116:
117: typedef struct {
118: int tag;
119: mpz_t mpz;
120: } cmo_zz;
121:
122: typedef struct {
123: int tag;
124: cmo *num; /* 分子 (cmo_zz) */
125: cmo *den; /* 分母 (cmo_zz) */
126: } cmo_qq;
127:
128: /* cmo_list の派生. append_cmo_list を使ってよい. */
129: typedef struct {
130: int tag;
131: int length; /* number of monomials */
132: cell head[1]; /* a list of monomials */
133: cmo *ringdef;
134: } cmo_distributed_polynomial;
135:
136: typedef cmo ox;
137:
138: typedef ox ox_sync_ball;
139:
140: typedef struct {
141: int tag;
142: int command;
143: } ox_command;
144:
145: typedef struct {
146: int tag;
147: cmo *cmo;
148: } ox_data;
149:
150: cmo_null* new_cmo_null();
151: cmo_int32* new_cmo_int32(int i);
152: cmo_string* new_cmo_string(char* s);
153: cmo_mathcap* new_cmo_mathcap(cmo* ob);
154: cmo_list* new_cmo_list();
155: cmo_monomial32* new_cmo_monomial32();
156: cmo_monomial32* new_cmo_monomial32_size(int size);
157: cmo_zz* new_cmo_zz();
158: cmo_zz* new_cmo_zz_size(int size);
159: cmo_zz* new_cmo_zz_set_si(int integer);
160: cmo_zz* new_cmo_zz_noinit();
161: cmo_zero* new_cmo_zero();
162: cmo_distributed_polynomial* new_cmo_distributed_polynomial();
163: cmo_dms_generic* new_cmo_dms_generic();
164: cmo_ring_by_name* new_cmo_ring_by_name(cmo* ob);
165: cmo_indeterminate* new_cmo_indeterminate(cmo* ob);
166: cmo_error2* new_cmo_error2(cmo* ob);
167:
168: ox_data* new_ox_data(cmo* c);
169: ox_command* new_ox_command(int sm_code);
170:
171: cmo_error2* make_error_object(int err_code, cmo *ob);
172: cmo* make_mathcap_object(int version, char *id_string);
173:
174: cmo* receive_cmo(int fd);
175: cmo* receive_cmo2(int fd);
176: int receive_int32(int fd);
177: int receive_ox_tag(int fd);
178:
179: int send_cmo(int fd, cmo* m);
180: int send_int32(int fd, int integer);
181: int send_ox(ox_file_t s, ox* m);
182: int send_ox_cmo(int fd, cmo* m);
183: void send_ox_command(int fd, int sm_command);
184: int send_ox_tag(int fd, int tag);
185:
186: int append_cmo_list(cmo_list* this, cmo *ob);
187: int length_cmo_list(cmo_list* this);
188: cell* next_cell(cell *this);
189: int cmolen_cmo(cmo* m);
190:
191: void ox_close(ox_file_t sv);
192: void ox_executeStringByLocalParser(ox_file_t sv, char* str);
193: cmo_mathcap* ox_mathcap(ox_file_t sv);
194: char* ox_popString(ox_file_t sv, int fd);
195: cmo* ox_pop_cmo(ox_file_t sv, int fd);
196: void ox_reset(ox_file_t sv);
197: ox_file_t ox_start(char* host, char* prog1, char* prog2);
198: ox_file_t ox_start_insecure_nonreverse(char* host, short portControl, short portStream);
199:
200: int init_dump_buff(char *buff);
201: int dump_cmo(cmo* m);
202: int dump_ox_command(ox_command* m);
203: int dump_ox_data(ox_data* m);
204:
205: int print_cmo(cmo* c);
206: int print_cmo_int32(cmo_int32* c);
207: int print_cmo_list(cmo_list* li);
208: int print_cmo_mathcap(cmo_mathcap* c);
209: int print_cmo_string(cmo_string* c);
210:
211: int decideByteOrderClient(oxfd fd, int order);
212: int decideByteOrderServer(oxfd fd, int order);
213: int next_serial();
214: void setCmotypeDisable(int type);
215:
216: cmo_zz* new_cmo_zz_set_string(char *s);
217: char* convert_zz_to_string(cmo_zz *c);
218: char* convert_cmo_to_string(cmo *m);
219: char* convert_null_to_string();
220: char* convert_int_to_string(int integer);
1.2 ! ohara 221:
! 222: typedef cmo *(*hook_t)(int, cmo *);
! 223:
! 224: int add_hook_before_send_cmo(hook_t func);
! 225: int add_hook_after_send_cmo(hook_t func);
1.1 ohara 226:
227: #endif /* _OX_H_ */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to ox.h CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / ox_toolkit