OpenXM/src/ox_toolkit/ox_toolkit.h - diff

Return to ox_toolkit.h CVS log

Up to [local] / OpenXM / src / ox_toolkit

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

version 1.2, 2000/10/10 05:23:20

version 1.21, 2003/06/02 20:38:41

Line 1

/* -*- mode: C -*- */

/* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.1 2000/03/10 12:24:39 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_

#define _OX_TOOLKIT_H_

#ifdef __cplusplus

extern "C" {

#endif

#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__)

#define __inline__

#endif

/* functions related to ox.c */

/* Mathcap Local Database */

typedef struct {

int tag;

int flag;

} table;

#define LOGOXFILE "/tmp/oxtk.XXXXXX"

typedef struct mathcap {

table *cmotbl;

table *smtbl;

} mathcap;

#define MATHCAP_FLAG_DENY 0

/* OpenXM File Descripter */

#define MATHCAP_FLAG_ALLOW 1

/* Open Xm File Descripter */

typedef struct OXFILE{

int fd;

/* FILE *fp; */

int (*send_int32)(struct OXFILE *oxfp, int int32);

int (*receive_int32)(struct OXFILE *oxfp);

int serial_number;

int received_serial_number;

struct OXFILE *control; /* pointer to his control server. */

struct mathcap *mathcap;

int error;

char *wbuf;

int wbuf_size;

int wbuf_count;

} OXFILE;

typedef struct {

typedef struct cmo {

int tag;

} cmo;

Line 65 typedef cmo_mathcap cmo_indeterminate;

Line 90 typedef cmo_mathcap cmo_indeterminate;

/* a double linked list */

typedef struct cell {

cmo *cmo;

struct cmo *cmo;

struct cell *next;

struct cell *prev;

} cell;

Line 94 typedef struct {

Line 119 typedef struct {

cmo *den; /* Bunbo (cmo_zz) */

} cmo_qq;

typedef struct {

int tag;

double d; /* machine dependent */

} cmo_double;

/* The following is a derived class from cmo_list.

that is, list_append can be used. */

typedef struct {

Line 114 typedef struct {

Line 144 typedef struct {

typedef struct {

int tag;

cmo *cmo;

struct cmo *cmo;

} ox_data;

cmo_null* new_cmo_null();

Line 131 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_set_string(char* s);

cmo_zero* new_cmo_zero();

cmo_double* new_cmo_double(double d);

cmo_distributed_polynomial* new_cmo_distributed_polynomial();

cmo_dms_generic* new_cmo_dms_generic();

cmo_ring_by_name* new_cmo_ring_by_name(cmo* ob);

Line 144 ox_sync_ball* new_ox_sync_ball();

Line 175 ox_sync_ball* new_ox_sync_ball();

char* new_string_set_cmo(cmo* m);

cmo_error2* make_error_object(int err_code, cmo* ob);

cmo* make_mathcap_object(int version, char *id_string);

/* Low level API */

cmo* receive_cmo(OXFILE *fp);

cmo* receive_cmo_tag(OXFILE *fp, int tag);

int receive_int32(OXFILE *fp);

int receive_ox_tag(OXFILE *fp);

Line 175 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[]);

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

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

void dump_buffer_init(char *s);

Line 211 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_tag(int tag);

symbol_t lookup(int i);

char *symbol_get_key(symbol_t sp);

char* get_symbol_by_tag(int tag);

/* 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_cmo_allow(int tag);

cmo_mathcap* mathcap_get(mathcap *);

void mathcap_cmo_deny(int tag);

mathcap *mathcap_update(mathcap *, cmo_mathcap *mc);

void mathcap_cmo_deny_all();

int mathcap_allowQ_cmo(mathcap *, cmo *ob);

void mathcap_cmo_allow_all();

cmo_list *mathcap_cmo_get_allow_all();

cmo_list *mathcap_sm_get_all();

cmo_list *mathcap_sysinfo_get_all();

void mathcap_sysinfo_set(int version, char *id, char *sysname);

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

/* for OXFILE */

int oxf_listen(short *portp);

OXFILE *oxf_connect_active(char *hostname, short port);

OXFILE *oxf_connect_passive(int listened);

OXFILE *oxf_open(int fd);

Line 243 void oxf_close(OXFILE *oxfp);

Line 268 void oxf_close(OXFILE *oxfp);

void oxf_setopt(OXFILE *oxfp, int mode);

void oxf_determine_byteorder_client(OXFILE *oxfp);

void oxf_determine_byteorder_server(OXFILE *oxfp);

OXFILE *oxf_execute_cmd(OXFILE *oxfp, char *cmd);

cmo_mathcap *oxf_cmo_mathcap(OXFILE *oxfp);

void oxf_mathcap_update(OXFILE *oxfp, cmo_mathcap *ob);

int send_int32_lbo(OXFILE *oxfp, int int32);

int send_int32_nbo(OXFILE *oxfp, int int32);

int receive_int32_lbo(OXFILE *oxfp);

int receive_int32_nbo(OXFILE *oxfp);

/* example: which("xterm", getenv("PATH")); */

char *which(char *exe, const char *env);

char *generate_otp();

int ox_stderr_init(FILE *fp);

int ox_printf(char *format, ...);

#ifdef __cplusplus

}

#endif

#endif /* _OX_TOOLKIT_H_ */

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>