From 1237873423722c1c5cffad7baa61281902c29c53 Mon Sep 17 00:00:00 2001 From: Sebastian Hammer Date: Wed, 1 Nov 1995 13:07:18 +0000 Subject: [PATCH] Data1 module now lives in YAZ. --- include/data1.h | 296 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 296 insertions(+) create mode 100644 include/data1.h diff --git a/include/data1.h b/include/data1.h new file mode 100644 index 0000000..65cc658 --- /dev/null +++ b/include/data1.h @@ -0,0 +1,296 @@ +/* + * Copyright (C) 1994, Index Data I/S + * All rights reserved. + * Sebastian Hammer, Adam Dickmeiss + * + * $Log: data1.h,v $ + * Revision 1.1 1995-11-01 13:07:18 quinn + * Data1 module now lives in YAZ. + * + * Revision 1.13 1995/10/25 16:00:49 quinn + * USMARC support is now almost operational + * + * Revision 1.12 1995/10/16 14:02:59 quinn + * Changes to support element set names and espec1 + * + * Revision 1.11 1995/10/13 16:05:10 quinn + * Adding Espec1-processing + * + * Revision 1.10 1995/10/11 14:53:46 quinn + * Work on variants. + * + * Revision 1.9 1995/10/10 16:27:59 quinn + * *** empty log message *** + * + * Revision 1.8 1995/10/06 16:44:14 quinn + * Work on attribute set mapping, etc. + * + * Revision 1.7 1995/10/06 12:58:36 quinn + * SUTRS support + * + * Revision 1.6 1995/10/04 09:29:51 quinn + * Adjustments to support USGS test data + * + * Revision 1.5 1995/10/03 17:56:44 quinn + * Fixing GRS code. + * + * Revision 1.4 1995/10/02 14:55:43 quinn + * *** empty log message *** + * + * Revision 1.3 1995/09/15 14:41:43 quinn + * GRS1 work + * + * Revision 1.2 1995/09/14 15:18:14 quinn + * Work + * + * Revision 1.1 1995/09/12 11:24:33 quinn + * Beginning to add code for structured records. + * + * + */ + +#ifndef DATA1_H +#define DATA1_H + +#include + +#include +#include + +#include +#include "d1_map.h" + +#define DATA1_MAX_SYMBOL 31 + +typedef struct data1_name +{ + char *name; + struct data1_name *next; +} data1_name; + +typedef enum data1_datatype +{ + DATA1K_structured = 1, + DATA1K_string, + DATA1K_numeric, + DATA1K_bool, + DATA1K_oid, + DATA1K_generalizedtime, + DATA1K_intunit, + DATA1K_int, + DATA1K_octetstring, + DATA1K_null +} data1_datatype; + +typedef struct data1_marctab +{ + char *name; + oid_value reference; + + char record_status[2]; + char implementation_codes[5]; + int indicator_length; + int identifier_length; + char user_systems[4]; + + int length_data_entry; + int length_starting; + int length_implementation; + char future_use[2]; + + struct data1_marctab *next; +} data1_marctab; + +typedef struct data1_esetname +{ + char *name; + Z_Espec1 *spec; + struct data1_esetname *next; +} data1_esetname; + +/* + * Variant set definitions. + */ + +typedef struct data1_vartype +{ + char *name; + struct data1_varclass *class; + int type; + data1_datatype datatype; + struct data1_vartype *next; +} data1_vartype; + +typedef struct data1_varclass +{ + char *name; + struct data1_varset *set; + int class; + data1_vartype *types; + struct data1_varclass *next; +} data1_varclass; + +typedef struct data1_varset +{ + char *name; + oid_value reference; + data1_varclass *classes; +} data1_varset; + +/* + * Tagset definitions + */ + +struct data1_tagset; + +typedef struct data1_tag +{ + data1_name *names; + enum + { + DATA1T_numeric, + DATA1T_string + } which; + union + { + int numeric; + char *string; + } value; + data1_datatype kind; + + struct data1_tagset *tagset; + struct data1_tag *next; +} data1_tag; + +typedef struct data1_tagset +{ + char *name; /* symbolic name */ + oid_value reference; + int type; /* type of tagset in current context */ + data1_tag *tags; /* tags defined by this set */ + struct data1_tagset *children; /* included tagsets */ + struct data1_tagset *next; /* sibling */ +} data1_tagset; + +/* + * abstract syntax specification + */ + +typedef struct data1_element +{ + char *name; + data1_tag *tag; + data1_att *att; + struct data1_element *children; + struct data1_element *next; +} data1_element; + +typedef struct data1_absyn +{ + char *name; + oid_value reference; + data1_tagset *tagset; + data1_attset *attset; + data1_varset *varset; + data1_esetname *esetnames; + data1_maptab *maptabs; + data1_marctab *marc; + data1_element *elements; +} data1_absyn; + +/* + * record data node (tag/data/variant) + */ + +typedef struct data1_node +{ + enum + { + DATA1N_root, + DATA1N_tag, /* a tag */ + DATA1N_data, /* */ + DATA1N_variant, /* variant specification */ + DATA1N_indicator /* ISO2709 indicator */ + } which; + + union + { + struct + { + char *type; + data1_absyn *absyn; /* abstract syntax for this type */ + } root; + + struct + { + char *tag; + data1_element *element; + int node_selected; + } tag; + + struct + { + enum + { + DATA1I_inctxt, /* text inclusion */ + DATA1I_incbin, /* binary data inclusion */ + DATA1I_text, /* text data */ + DATA1I_num /* numerical data */ + } what; + int len; + char *data; /* filename or data */ +#define DATA1_LOCALDATA 15 + char lbuf[DATA1_LOCALDATA]; /* small buffer for local data */ + } data; + + struct + { + data1_vartype *type; + char *value; + } variant; + + struct + { + char *ind; + } indicator; + } u; + + int line; + int num_children; + struct data1_node *next; + struct data1_node *child; + struct data1_node *parent; + struct data1_node *root; +} data1_node; + +data1_node *get_parent_tag(data1_node *n); +data1_node *data1_read_node(char **buf, data1_node *parent, int *line, + data1_absyn *absyn); +data1_node *data1_read_record(int (*rf)(int, char *, size_t), int fd); +data1_absyn *data1_read_absyn(char *file); +data1_tag *data1_gettagbynum(data1_tagset *s, int type, int value); +data1_tagset *data1_read_tagset(char *file); +data1_element *data1_getelementbytagname(data1_absyn *abs, + data1_element *parent, char *tagname); +Z_GenericRecord *data1_nodetogr(data1_node *n, int select, ODR o); +int data1_matchstr(char *s1, char *s2); +data1_tag *data1_gettagbyname(data1_tagset *s, char *name); +void data1_free_tree(data1_node *t); +char *data1_nodetobuf(data1_node *n, int select, int *len); +data1_node *data1_insert_taggeddata(data1_node *root, data1_node *at, + char *tagname); +data1_datatype data1_maptype(char *t); +data1_varset *data1_read_varset(char *file); +data1_vartype *data1_getvartypebyct(data1_varset *set, char *class, char *type); +Z_Espec1 *data1_read_espec1(char *file, ODR o); +int data1_doespec1(data1_node *n, Z_Espec1 *e); +data1_esetname *data1_getesetbyname(data1_absyn *a, char *name); +data1_element *data1_getelementbyname(data1_absyn *absyn, char *name); +data1_node *data1_mk_node(void); +data1_absyn *data1_get_absyn(char *name); +data1_maptab *data1_read_maptab(char *file); +data1_node *data1_map_record(data1_node *n, data1_maptab *map); +data1_marctab *data1_read_marctab(char *file); +char *data1_nodetomarc(data1_marctab *p, data1_node *n, int selected, int *len); + +#endif -- 1.7.10.4