2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.1 1995-11-01 13:07:18 quinn
8 * Data1 module now lives in YAZ.
10 * Revision 1.13 1995/10/25 16:00:49 quinn
11 * USMARC support is now almost operational
13 * Revision 1.12 1995/10/16 14:02:59 quinn
14 * Changes to support element set names and espec1
16 * Revision 1.11 1995/10/13 16:05:10 quinn
17 * Adding Espec1-processing
19 * Revision 1.10 1995/10/11 14:53:46 quinn
22 * Revision 1.9 1995/10/10 16:27:59 quinn
23 * *** empty log message ***
25 * Revision 1.8 1995/10/06 16:44:14 quinn
26 * Work on attribute set mapping, etc.
28 * Revision 1.7 1995/10/06 12:58:36 quinn
31 * Revision 1.6 1995/10/04 09:29:51 quinn
32 * Adjustments to support USGS test data
34 * Revision 1.5 1995/10/03 17:56:44 quinn
37 * Revision 1.4 1995/10/02 14:55:43 quinn
38 * *** empty log message ***
40 * Revision 1.3 1995/09/15 14:41:43 quinn
43 * Revision 1.2 1995/09/14 15:18:14 quinn
46 * Revision 1.1 1995/09/12 11:24:33 quinn
47 * Beginning to add code for structured records.
60 #include <d1_attset.h>
63 #define DATA1_MAX_SYMBOL 31
65 typedef struct data1_name
68 struct data1_name *next;
71 typedef enum data1_datatype
73 DATA1K_structured = 1,
78 DATA1K_generalizedtime,
85 typedef struct data1_marctab
90 char record_status[2];
91 char implementation_codes[5];
93 int identifier_length;
96 int length_data_entry;
98 int length_implementation;
101 struct data1_marctab *next;
104 typedef struct data1_esetname
108 struct data1_esetname *next;
112 * Variant set definitions.
115 typedef struct data1_vartype
118 struct data1_varclass *class;
120 data1_datatype datatype;
121 struct data1_vartype *next;
124 typedef struct data1_varclass
127 struct data1_varset *set;
129 data1_vartype *types;
130 struct data1_varclass *next;
133 typedef struct data1_varset
137 data1_varclass *classes;
146 typedef struct data1_tag
161 struct data1_tagset *tagset;
162 struct data1_tag *next;
165 typedef struct data1_tagset
167 char *name; /* symbolic name */
169 int type; /* type of tagset in current context */
170 data1_tag *tags; /* tags defined by this set */
171 struct data1_tagset *children; /* included tagsets */
172 struct data1_tagset *next; /* sibling */
176 * abstract syntax specification
179 typedef struct data1_element
184 struct data1_element *children;
185 struct data1_element *next;
188 typedef struct data1_absyn
192 data1_tagset *tagset;
193 data1_attset *attset;
194 data1_varset *varset;
195 data1_esetname *esetnames;
196 data1_maptab *maptabs;
198 data1_element *elements;
202 * record data node (tag/data/variant)
205 typedef struct data1_node
210 DATA1N_tag, /* a tag */
212 DATA1N_variant, /* variant specification */
213 DATA1N_indicator /* ISO2709 indicator */
221 data1_absyn *absyn; /* abstract syntax for this type */
227 data1_element *element;
235 DATA1I_inctxt, /* text inclusion */
236 DATA1I_incbin, /* binary data inclusion */
237 DATA1I_text, /* text data */
238 DATA1I_num /* numerical data */
241 char *data; /* filename or data */
242 #define DATA1_LOCALDATA 15
243 char lbuf[DATA1_LOCALDATA]; /* small buffer for local data */
260 struct data1_node *next;
261 struct data1_node *child;
262 struct data1_node *parent;
263 struct data1_node *root;
266 data1_node *get_parent_tag(data1_node *n);
267 data1_node *data1_read_node(char **buf, data1_node *parent, int *line,
269 data1_node *data1_read_record(int (*rf)(int, char *, size_t), int fd);
270 data1_absyn *data1_read_absyn(char *file);
271 data1_tag *data1_gettagbynum(data1_tagset *s, int type, int value);
272 data1_tagset *data1_read_tagset(char *file);
273 data1_element *data1_getelementbytagname(data1_absyn *abs,
274 data1_element *parent, char *tagname);
275 Z_GenericRecord *data1_nodetogr(data1_node *n, int select, ODR o);
276 int data1_matchstr(char *s1, char *s2);
277 data1_tag *data1_gettagbyname(data1_tagset *s, char *name);
278 void data1_free_tree(data1_node *t);
279 char *data1_nodetobuf(data1_node *n, int select, int *len);
280 data1_node *data1_insert_taggeddata(data1_node *root, data1_node *at,
282 data1_datatype data1_maptype(char *t);
283 data1_varset *data1_read_varset(char *file);
284 data1_vartype *data1_getvartypebyct(data1_varset *set, char *class, char *type);
285 Z_Espec1 *data1_read_espec1(char *file, ODR o);
286 int data1_doespec1(data1_node *n, Z_Espec1 *e);
287 data1_esetname *data1_getesetbyname(data1_absyn *a, char *name);
288 data1_element *data1_getelementbyname(data1_absyn *absyn, char *name);
289 data1_node *data1_mk_node(void);
290 data1_absyn *data1_get_absyn(char *name);
291 data1_maptab *data1_read_maptab(char *file);
292 data1_node *data1_map_record(data1_node *n, data1_maptab *map);
293 data1_marctab *data1_read_marctab(char *file);
294 char *data1_nodetomarc(data1_marctab *p, data1_node *n, int selected, int *len);