X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=recctrl%2Frecgrs.c;h=ea2dff03b4c3e7e6af924bef2c1988ea7cd9a3dc;hb=c6b44a954475cd6e5cbfe560e63158fc48d4899f;hp=5b5ee4f1467ae33ae8b691af4e5c3372c091e9ab;hpb=c7802a517bf6c79fefd72501e85f08f267c39ea9;p=idzebra-moved-to-github.git

diff --git a/recctrl/recgrs.c b/recctrl/recgrs.c
index 5b5ee4f..ea2dff0 100644
--- a/recctrl/recgrs.c
+++ b/recctrl/recgrs.c
@@ -1,10 +1,21 @@
 /*
- * Copyright (C) 1994-2000, Index Data
+ * Copyright (C) 1994-2001, Index Data
  * All rights reserved.
- * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: recgrs.c,v $
- * Revision 1.39  2000-12-05 19:09:15  adam
+ * Revision 1.43  2002-03-21 23:06:36  adam
+ * Source 'tag' in abs-file
+ *
+ * Revision 1.42  2002/02/20 17:30:01  adam
+ * Work on new API. Locking system re-implemented
+ *
+ * Revision 1.41  2001/05/22 21:01:47  adam
+ * Removed print of data1 tree on stdout so that inetd works again.
+ *
+ * Revision 1.40  2001/03/29 21:31:31  adam
+ * Fixed "record begin" for Tcl filter.
+ *
+ * Revision 1.39  2000/12/05 19:09:15  adam
  * Fixed problem where indexer could crash if abstract syntax was undefined.
  *
  * Revision 1.38  2000/12/05 14:44:58  adam
@@ -340,6 +351,11 @@ static void index_tag (data1_node *par, data1_node *n,
 	    wrd->string = n->u.data.data;
 	    wrd->length = n->u.data.len;
 	}
+	else if (!strcmp (tlist->source, "tag") && n->which == DATA1N_tag)
+        {
+	    wrd->string = n->u.tag.tag;
+	    wrd->length = strlen(n->u.tag.tag);
+	}
 	else if (sscanf (tlist->source, "attr(%511[^)])", xattr) == 1 &&
 	    n->which == DATA1N_tag)
 	{
@@ -506,6 +522,9 @@ static int grs_extract_sub(struct grs_handlers *h, struct recExtractCtrl *p,
     if ((oid_ent_to_oid (&oe, oidtmp)))
 	(*p->schemaAdd)(p, oidtmp);
 
+#if 0
+    data1_pr_tree (p->dh, n, stdout);
+#endif
     if (dumpkeys(n, p, 0) < 0)
     {
 	data1_free_tree(p->dh, n);
@@ -781,6 +800,9 @@ static int grs_retrieve(void *clientData, struct recRetrieveCtrl *p)
     else if (p->comp && !res)
 	selected = 1;
 
+#if 0
+    data1_pr_tree (p->dh, node, stdout);
+#endif
     logf (LOG_DEBUG, "grs_retrieve: transfer syntax mapping");
     switch (p->output_format = (p->input_format != VAL_NONE ?
 				p->input_format : VAL_SUTRS))