--- /dev/null
+/*
+ * 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 <stdio.h>
+
+#include <oid.h>
+#include <proto.h>
+
+#include <d1_attset.h>
+#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