X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=recctrl%2Fsgmlread.c;h=96a5450546ba109f70f6f59c3fe000c73f006806;hb=b912fcbe609de53861c5cf9b5196986dd97a1462;hp=79e7e6f75a16a9a2dc59c78782a48b4212fb2807;hpb=4415da5dbbba04e50d4524347486d60113ed569c;p=idzebra-moved-to-github.git

diff --git a/recctrl/sgmlread.c b/recctrl/sgmlread.c
index 79e7e6f..96a5450 100644
--- a/recctrl/sgmlread.c
+++ b/recctrl/sgmlread.c
@@ -1,57 +1,137 @@
-/*
- * Copyright (C) 1994-1999, Index Data
- * All rights reserved.
- * Sebastian Hammer, Adam Dickmeiss
- *
- * $Log: sgmlread.c,v $
- * Revision 1.6  1999-05-20 12:57:18  adam
- * Implemented TCL filter. Updated recctrl system.
- *
- * Revision 1.5  1999/02/02 14:51:31  adam
- * Updated WIN32 code specific sections. Changed header.
- *
- * Revision 1.4  1997/09/17 12:19:22  adam
- * Zebra version corresponds to YAZ version 1.4.
- * Changed Zebra server so that it doesn't depend on global common_resource.
- *
- * Revision 1.3  1997/09/04 13:54:41  adam
- * Added MARC filter - type grs.marc.<syntax> where syntax refers
- * to abstract syntax. New method tellf in retrieve/extract method.
- *
- * Revision 1.2  1997/04/30 08:56:08  quinn
- * null
- *
- * Revision 1.1  1996/10/11  10:57:32  adam
- * New module recctrl. Used to manage records (extract/retrieval).
- *
- */
-#include <log.h>
-
-#include "grsread.h"
+/* $Id: sgmlread.c,v 1.17 2005-03-31 12:42:07 adam Exp $
+   Copyright (C) 1995-2005
+   Index Data ApS
+
+This file is part of the Zebra server.
+
+Zebra is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2, or (at your option) any later
+version.
+
+Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with Zebra; see the file LICENSE.zebra.  If not, write to the
+Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
+02111-1307, USA.
+*/
+
+
+#include <assert.h>
+#include <yaz/log.h>
+
+#include <idzebra/recgrs.h>
+
+struct sgml_getc_info {
+    char *buf;
+    int buf_size;
+    int size;
+    int off;
+    int moffset;
+    void *fh;
+    int (*readf)(void *, char *, size_t);
+    WRBUF wrbuf;
+};
+
+int sgml_getc (void *clientData)
+{
+    struct sgml_getc_info *p = (struct sgml_getc_info *) clientData;
+    int res;
+    
+    if (p->off < p->size)
+	return p->buf[(p->off)++];
+    if (p->size < p->buf_size)
+	return 0;
+    p->moffset += p->off;
+    p->off = 0;
+    p->size = 0;
+    res = (*p->readf)(p->fh, p->buf, p->buf_size);
+    if (res > 0)
+    {
+	p->size += res;
+	return p->buf[(p->off)++];
+    }
+    return 0;
+}
 
 static data1_node *grs_read_sgml (struct grs_read_info *p)
 {
-    logf (LOG_LOG, "grs_read_sgml");
-    return data1_read_record (p->dh, p->readf, p->fh, p->mem);
+    struct sgml_getc_info *sgi = (struct sgml_getc_info *) p->clientData;
+    data1_node *node;
+    int res;
+    
+    sgi->moffset = p->offset;
+    sgi->fh = p->fh;
+    sgi->readf = p->readf;
+    sgi->off = 0;
+    sgi->size = 0;
+    res = (*sgi->readf)(sgi->fh, sgi->buf, sgi->buf_size);
+    if (res > 0)
+	sgi->size += res;
+    else
+	return 0;
+    node = data1_read_nodex (p->dh, p->mem, sgml_getc, sgi, sgi->wrbuf);
+    if (node && p->endf)
+	(*p->endf)(sgi->fh, sgi->moffset + sgi->off);
+    return node;
 }
 
-static void *grs_init_sgml()
+static void *grs_init_sgml(Res res, RecType recType)
 {
-    logf (LOG_LOG, "grs_init_gsml");
-    return 0;
+    struct sgml_getc_info *p = (struct sgml_getc_info *) xmalloc (sizeof(*p));
+    p->buf_size = 512;
+    p->buf = xmalloc (p->buf_size);
+    p->wrbuf = wrbuf_alloc();
+    return p;
+}
+
+static void grs_config_sgml(void *clientData, Res res, const char *args)
+{
+
 }
 
 static void grs_destroy_sgml(void *clientData)
 {
-    logf (LOG_LOG, "grs_destroy_sgml");
+    struct sgml_getc_info *p = (struct sgml_getc_info *) clientData;
+
+    wrbuf_free(p->wrbuf, 1);
+    xfree (p->buf);
+    xfree (p);
 }
 
-static struct recTypeGrs sgml_type = {
-    "sgml",
+static int grs_extract_sgml(void *clientData, struct recExtractCtrl *ctrl)
+{
+    return zebra_grs_extract(clientData, ctrl, grs_read_sgml);
+}
+
+static int grs_retrieve_sgml(void *clientData, struct recRetrieveCtrl *ctrl)
+{
+    return zebra_grs_retrieve(clientData, ctrl, grs_read_sgml);
+}
+
+static struct recType grs_type_sgml =
+{
+    0,
+    "grs.sgml",
     grs_init_sgml,
+    grs_config_sgml,
     grs_destroy_sgml,
-    grs_read_sgml
+    grs_extract_sgml,
+    grs_retrieve_sgml
 };
 
-RecTypeGrs recTypeGrs_sgml = &sgml_type;
+RecType
+#ifdef IDZEBRA_STATIC_GRS_SGML
+idzebra_filter_grs_sgml
+#else
+idzebra_filter
+#endif
 
+[] = {
+    &grs_type_sgml,
+    0,
+};