X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=retrieval%2Fd1_sumout.c;fp=retrieval%2Fd1_sumout.c;h=0000000000000000000000000000000000000000;hp=4c477d6076f6b3f11a7d26b720889217469c3e68;hb=95a7ea9b644c520d7d7b7c5d0c71ca44dd58a225;hpb=6866fce7b026f5ce8b75945f72a844d7b44abd85

diff --git a/retrieval/d1_sumout.c b/retrieval/d1_sumout.c
deleted file mode 100644
index 4c477d6..0000000
--- a/retrieval/d1_sumout.c
+++ /dev/null
@@ -1,118 +0,0 @@
-/*
- * Copyright (c) 1995-1999, Index Data.
- * See the file LICENSE for details.
- * Sebastian Hammer, Adam Dickmeiss
- *
- * $Log: d1_sumout.c,v $
- * Revision 1.5  1999-11-30 13:47:12  adam
- * Improved installation. Moved header files to include/yaz.
- *
- * Revision 1.4  1999/08/27 09:40:32  adam
- * Renamed logf function to yaz_log. Removed VC++ project files.
- *
- * Revision 1.3  1998/02/11 11:53:35  adam
- * Changed code so that it compiles as C++.
- *
- * Revision 1.2  1997/09/17 12:10:38  adam
- * YAZ version 1.4.
- *
- * Revision 1.1  1996/06/10 08:56:03  quinn
- * Work on Summary.
- *
- *
- */
-
-#include <assert.h>
-#include <string.h>
-#include <stdlib.h>
-
-#include <yaz/log.h>
-#include <yaz/proto.h>
-#include <yaz/data1.h>
-
-static int *f_integer(data1_node *c, ODR o)
-{
-    int *r;
-    char intbuf[64];
-
-    if (!c->child || c->child->which != DATA1N_data ||
-	c->child->u.data.len > 63)
-	return 0;
-    r = (int *)odr_malloc(o, sizeof(*r));
-    sprintf(intbuf, "%.*s", 63, c->child->u.data.data);
-    *r = atoi(intbuf);
-    return r;
-}
-
-static char *f_string(data1_node *c, ODR o)
-{
-    char *r;
-
-    if (!c->child || c->child->which != DATA1N_data)
-	return 0;
-    r = (char *)odr_malloc(o, c->child->u.data.len+1);
-    memcpy(r, c->child->u.data.data, c->child->u.data.len);
-    r[c->child->u.data.len] = '\0';
-    return r;
-}
-
-Z_BriefBib *data1_nodetosummary (data1_handle dh, data1_node *n,
-				 int select, ODR o)
-{
-    Z_BriefBib *res = (Z_BriefBib *)odr_malloc(o, sizeof(*res));
-    data1_node *c;
-
-    assert(n->which == DATA1N_root);
-    if (strcmp(n->u.root.type, "summary"))
-    {
-	yaz_log(LOG_WARN, "Attempt to convert a non-summary record");
-	return 0;
-    }
-
-    res->title = "[UNKNOWN]";
-    res->author = 0;
-    res->callNumber = 0;
-    res->recordType = 0;
-    res->bibliographicLevel = 0;
-    res->num_format = 0;
-    res->format = 0;
-    res->publicationPlace = 0;
-    res->publicationDate = 0;
-    res->targetSystemKey = 0;
-    res->satisfyingElement = 0;
-    res->rank = 0;
-    res->documentId = 0;
-    res->abstract = 0;
-    res->otherInfo = 0;
-
-    for (c = n->child; c; c = c->next)
-    {
-	if (c->which != DATA1N_tag || !c->u.tag.element)
-	{
-	    yaz_log(LOG_WARN, "Malformed element in Summary record");
-	    return 0;
-	}
-	if (select && !c->u.tag.node_selected)
-	    continue;
-	switch (c->u.tag.element->tag->value.numeric)
-	{
-	    case 0: res->title = f_string(c, o); break;
-	    case 1: res->author = f_string(c, o); break;
-	    case 2: res->callNumber = f_string(c, o); break;
-	    case 3: res->recordType = f_string(c, o); break;
-	    case 4: res->bibliographicLevel = f_string(c, o); break;
-	    case 5: abort();   /* TODO */
-	    case 10: res->publicationPlace = f_string(c, o); break;
-	    case 11: res->publicationDate = f_string(c, o); break;
-	    case 12: res->targetSystemKey = f_string(c, o); break;
-	    case 13: res->satisfyingElement = f_string(c, o); break;
-	    case 14: res->rank = f_integer(c, o); break;
-	    case 15: res->documentId = f_string(c, o); break;
-	    case 16: res->abstract = f_string(c, o); break;
-	    case 17: abort(); /* TODO */
-	    default:
-	        yaz_log(LOG_WARN, "Unknown element in Summary record.");
-	}
-    }
-    return res;
-}