recctrl/sgmlread.c

   1 /*
   2  * Copyright (C) 1994-1999, Index Data
   3  * All rights reserved.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: sgmlread.c,v $
   7  * Revision 1.7  1999-05-21 12:00:17  adam
   8  * Better diagnostics for extraction process.
   9  *
  10  * Revision 1.6  1999/05/20 12:57:18  adam
  11  * Implemented TCL filter. Updated recctrl system.
  12  *
  13  * Revision 1.5  1999/02/02 14:51:31  adam
  14  * Updated WIN32 code specific sections. Changed header.
  15  *
  16  * Revision 1.4  1997/09/17 12:19:22  adam
  17  * Zebra version corresponds to YAZ version 1.4.
  18  * Changed Zebra server so that it doesn't depend on global common_resource.
  19  *
  20  * Revision 1.3  1997/09/04 13:54:41  adam
  21  * Added MARC filter - type grs.marc.<syntax> where syntax refers
  22  * to abstract syntax. New method tellf in retrieve/extract method.
  23  *
  24  * Revision 1.2  1997/04/30 08:56:08  quinn
  25  * null
  26  *
  27  * Revision 1.1  1996/10/11  10:57:32  adam
  28  * New module recctrl. Used to manage records (extract/retrieval).
  29  *
  30  */
  31 #include <log.h>
  32
  33 #include "grsread.h"
  34
  35 static data1_node *grs_read_sgml (struct grs_read_info *p)
  36 {
  37     return data1_read_record (p->dh, p->readf, p->fh, p->mem);
  38 }
  39
  40 static void *grs_init_sgml()
  41 {
  42     return 0;
  43 }
  44
  45 static void grs_destroy_sgml(void *clientData)
  46 {
  47 }
  48
  49 static struct recTypeGrs sgml_type = {
  50     "sgml",
  51     grs_init_sgml,
  52     grs_destroy_sgml,
  53     grs_read_sgml
  54 };
  55
  56 RecTypeGrs recTypeGrs_sgml = &sgml_type;
  57