[BACK]Return to ox_toolkit.h CVS log [TXT][DIR] Up to [local] / OpenXM / src / ox_toolkit

Diff for /OpenXM/src/ox_toolkit/ox_toolkit.h between version 1.4 and 1.21

version 1.4, 2000/10/12 15:53:25 version 1.21, 2003/06/02 20:38:41
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.3 2000/10/11 08:22:58 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.20 2003/06/02 10:25:57 ohara Exp $ */
   
 #ifndef _OX_TOOLKIT_H_  #ifndef _OX_TOOLKIT_H_
   
 #define _OX_TOOLKIT_H_  #define _OX_TOOLKIT_H_
   
   #ifdef __cplusplus
   extern "C" {
   #endif
   
 #include <stdio.h>  #include <stdio.h>
 #include <gmp.h>  #if defined(WITH_GMP)
 #include "ox_toolkit_tags.h"  #include <gmp.h>
   #else
   #include "gmp_fake.h"
   #endif /* WITH_GMP */
   #include <ox/cmotag.h>
   #include <ox/oxMessageTag.h>
   #include <ox/smCommand.h>
   #include <gc/gc.h>
   
   #define MALLOC(x) GC_MALLOC((x))
   #define ALLOCA(x) alloca((x))
   /* #define FREE(x)   free((x)) */
   #define FREE(x)
   
 #if !defined(__GNUC__) && !defined(__inline__)  #if !defined(__GNUC__) && !defined(__inline__)
 #define __inline__  #define __inline__
 #endif  #endif
   
 /* functions related to ox.c */  /* Mathcap Local Database */
   typedef struct {
       int tag;
       int flag;
   } table;
   
 #define MATHCAP_FLAG_DENY   0  typedef struct mathcap {
 #define MATHCAP_FLAG_ALLOW  1      table *cmotbl;
       table *smtbl;
   } mathcap;
   
 /* Open Xm File Descripter */  /* OpenXM File Descripter */
 typedef struct OXFILE{  typedef struct OXFILE{
         int fd;      int fd;
         int (*send_int32)(struct OXFILE *oxfp, int int32);      int (*send_int32)(struct OXFILE *oxfp, int int32);
         int (*receive_int32)(struct OXFILE *oxfp);      int (*receive_int32)(struct OXFILE *oxfp);
         int serial_number;      int serial_number;
         struct OXFILE *control;  /* pointer to his control server. */      int received_serial_number;
         int error;      struct OXFILE *control;  /* pointer to his control server. */
       struct mathcap *mathcap;
       int error;
       char *wbuf;
       int wbuf_size;
       int wbuf_count;
 } OXFILE;  } OXFILE;
   
 typedef struct {  typedef struct cmo {
     int tag;      int tag;
 } cmo;  } cmo;
   
Line 63  typedef cmo_mathcap cmo_indeterminate;
Line 90  typedef cmo_mathcap cmo_indeterminate;
   
 /* a double linked list */  /* a double linked list */
 typedef struct cell {  typedef struct cell {
     cmo *cmo;      struct cmo *cmo;
     struct cell *next;      struct cell *next;
     struct cell *prev;      struct cell *prev;
 } cell;  } cell;
Line 92  typedef struct {
Line 119  typedef struct {
     cmo *den;  /* Bunbo (cmo_zz) */      cmo *den;  /* Bunbo (cmo_zz) */
 } cmo_qq;  } cmo_qq;
   
   typedef struct {
       int tag;
       double d; /* machine dependent */
   } cmo_double;
   
 /* The following is a derived class from cmo_list.  /* The following is a derived class from cmo_list.
    that is, list_append can be used. */     that is, list_append can be used. */
 typedef struct {  typedef struct {
Line 112  typedef struct {
Line 144  typedef struct {
   
 typedef struct {  typedef struct {
     int tag;      int tag;
     cmo *cmo;      struct cmo *cmo;
 } ox_data;  } ox_data;
   
 cmo_null*          new_cmo_null();  cmo_null*          new_cmo_null();
Line 129  cmo_zz*            new_cmo_zz_set_mpz(mpz_ptr z);
Line 161  cmo_zz*            new_cmo_zz_set_mpz(mpz_ptr z);
 cmo_zz*            new_cmo_zz_noinit();  cmo_zz*            new_cmo_zz_noinit();
 cmo_zz*            new_cmo_zz_set_string(char* s);  cmo_zz*            new_cmo_zz_set_string(char* s);
 cmo_zero*          new_cmo_zero();  cmo_zero*          new_cmo_zero();
   cmo_double*        new_cmo_double(double d);
 cmo_distributed_polynomial* new_cmo_distributed_polynomial();  cmo_distributed_polynomial* new_cmo_distributed_polynomial();
 cmo_dms_generic*   new_cmo_dms_generic();  cmo_dms_generic*   new_cmo_dms_generic();
 cmo_ring_by_name*  new_cmo_ring_by_name(cmo* ob);  cmo_ring_by_name*  new_cmo_ring_by_name(cmo* ob);
Line 145  cmo_error2*        make_error_object(int err_code, cmo
Line 178  cmo_error2*        make_error_object(int err_code, cmo
   
 /* Low level API */  /* Low level API */
 cmo*               receive_cmo(OXFILE *fp);  cmo*               receive_cmo(OXFILE *fp);
   cmo*               receive_cmo_tag(OXFILE *fp, int tag);
 int                receive_int32(OXFILE *fp);  int                receive_int32(OXFILE *fp);
 int                receive_ox_tag(OXFILE *fp);  int                receive_ox_tag(OXFILE *fp);
   
Line 172  void               ox_push_cmd(OXFILE *sv, int sm_code
Line 206  void               ox_push_cmd(OXFILE *sv, int sm_code
 void               ox_cmo_rpc(OXFILE *sv, char *function, int argc, cmo *argv[]);  void               ox_cmo_rpc(OXFILE *sv, char *function, int argc, cmo *argv[]);
 int                ox_flush(OXFILE *sv);  int                ox_flush(OXFILE *sv);
   
 cell*              list_first(cmo_list *this);  cell*              list_first(cmo_list *);
 int                list_endof(cmo_list *this, cell *el);  int                list_endof(cmo_list *, cell *el);
 cell*              list_next(cell *el);  cell*              list_next(cell *el);
 cmo_list*          list_append(cmo_list* this, cmo *ob);  cmo_list*          list_append(cmo_list*, cmo *ob);
 cmo_list*          list_appendl(cmo_list* this, ...);  cmo_list*          list_appendl(cmo_list*, ...);
 int                list_length(cmo_list* this);  int                list_length(cmo_list* );
 cmo*               list_nth(cmo_list* this, int n);  cmo*               list_nth(cmo_list* , int n);
   
 int                cmolen_cmo(cmo* m);  int                cmolen_cmo(cmo* m);
 void               dump_buffer_init(char *s);  void               dump_buffer_init(char *s);
Line 208  symbol_t lookup_by_symbol(char *key);
Line 242  symbol_t lookup_by_symbol(char *key);
 symbol_t lookup_by_token(int tok);  symbol_t lookup_by_token(int tok);
 symbol_t lookup_by_tag(int tag);  symbol_t lookup_by_tag(int tag);
 symbol_t lookup(int i);  symbol_t lookup(int i);
 char *symbol_get_key(symbol_t sp);  char*    get_symbol_by_tag(int tag);
   
 /* for mathcap database */  /* for mathcap database */
 cmo_mathcap *mathcap_get();  mathcap *new_mathcap();
 int  mathcap_cmo_isallow_cmo(cmo *ob);  void mathcap_init(int ver, char *vstr, char *sysname, int cmos[], int sms[]);
 void mathcap_sysinfo_set(int version, char *id, char *sysname);  cmo_mathcap* mathcap_get(mathcap *);
   mathcap *mathcap_update(mathcap *, cmo_mathcap *mc);
   int mathcap_allowQ_cmo(mathcap *, cmo *ob);
   
 int oxf_read(void *buffer, size_t size, size_t num, OXFILE *oxfp);  int oxf_read(void *buffer, size_t size, size_t num, OXFILE *oxfp);
 int oxf_write(void *buffer, size_t size, size_t num, OXFILE *oxfp);  int oxf_write(void *buffer, size_t size, size_t num, OXFILE *oxfp);
Line 233  void oxf_setopt(OXFILE *oxfp, int mode);
Line 269  void oxf_setopt(OXFILE *oxfp, int mode);
 void oxf_determine_byteorder_client(OXFILE *oxfp);  void oxf_determine_byteorder_client(OXFILE *oxfp);
 void oxf_determine_byteorder_server(OXFILE *oxfp);  void oxf_determine_byteorder_server(OXFILE *oxfp);
 OXFILE *oxf_execute_cmd(OXFILE *oxfp, char *cmd);  OXFILE *oxf_execute_cmd(OXFILE *oxfp, char *cmd);
   cmo_mathcap *oxf_cmo_mathcap(OXFILE *oxfp);
   void oxf_mathcap_update(OXFILE *oxfp, cmo_mathcap *ob);
   
 /* example: which("xterm", getenv("PATH")); */  /* example: which("xterm", getenv("PATH")); */
 char *which(char *exe, const char *env);  char *which(char *exe, const char *env);
 char *generate_otp();  char *generate_otp();
   
   int ox_stderr_init(FILE *fp);
   int ox_printf(char *format, ...);
   
   #ifdef __cplusplus
   }
   #endif
   
 #endif /* _OX_TOOLKIT_H_ */  #endif /* _OX_TOOLKIT_H_ */
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.21
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>